WebSVN – Kolibri OS – Diff – /programs/cmm/browser/TWB.h


int	downloader_id;
 
dword
	buf,
	filesize,
	blink;
 
char download_path[]="/rd/1/.download";
char search_path[]="http://nigma.ru/index.php?s=";
 
#ifndef AUTOBUILD
	#include "lang.h--"
#endif
 
#ifdef LANG_RUS
	char version[]=" ¥ªáâ®¢ë© ¡à ã§¥à 0.99.07";
#else
	char version[]=" Text-based Browser 0.99.07";
#endif
 
 
 
 
struct TWebBrowser {
	int left, top, width, height, line_h;
	void Scan(int);
	void GetNewUrl();
	void OpenPage();
	void ReadHtml(byte);
	void ShowPage();
	void ParseHTML(dword);
	void WhatTextStyle(int left1, top1, width1);
	void DrawPage();
	void DrawScroller();
};	
TWebBrowser WB1;
 
byte rez, b_text, i_text, u_text, s_text, pre_text, blq_text, li_text,
	link, ignor_text, li_tab, cur_encoding;
 
dword text_colors[300],
	text_color_index,
	link_color,
	bg_color;
 
int stroka,
	stolbec,
	tab_len,
	anchor_line_num;
	
char line[500],
	tag[100],
	tagparam[10000],
	parametr[1200],
	options[4096],
	anchor[256];
 
#include "include\history.h"
#include "include\colors.h"
#include "include\unicode_tags.h"
#include "include\img_cache.h"
#include "include\some_code.h"
#include "include\parce_tag.h"
 
//=======================================================================
dword drawbuf;
void DrawBufInit()
{
	free(drawbuf);
	drawbuf = malloc(WB1.width * WB1.line_h +4 * 4 + 8); //+1 for good luck
	ESDWORD[drawbuf] = WB1.width;
	ESDWORD[drawbuf+4] = WB1.line_h;
}
void DrawBufFill()
{
	int i;
	for (i=0; i
}
void DrawBufBar(dword x, y, w, h, color)
{
	int i, j;
	for (j=0; j
	{
		for (i = y+j*WB1.width+x*4; i
	}
}
 
char shift[]={8,8,4,4};
void DrawBufSkew(dword x, y, w, h)
{
	int i, j;
	stolbec++;
	for (j=0; j<=3; j++)
	{
		for (i = y+j*WB1.width+x+w+h*4; i>y+j*WB1.width+x+h-12*4 ; i-=4)
								ESDWORD[drawbuf+i+8] = ESDWORD[-shift[j]+drawbuf+i+8];
	}
}
 
void TextGoDown(int left1, top1, width1)
{
	if (!stroka) DrawBar(WB1.left, WB1.top, WB1.width, 5, bg_color); //çàêðàøèâàåì ôîí íàä ïåðâîé ñòðîêîé
	stroka++;
	if (blq_text) stolbec = 8; else stolbec = 0;
	if (li_text) stolbec = li_tab * 5;
	if (top1>=WB1.top) && ( top1 < WB1.height+WB1.top-10)  && (!anchor)
	{
		PutPaletteImage(drawbuf+8, WB1.width, WB1.line_h, left1-5, top1, 32,0);
		DrawBufFill();
	}
}
 
void TWebBrowser::DrawPage()
{
	int start_x, start_y, line_length, magrin_left=5;
	
	if (!header)
	{
		strcpy(#header, #line);
		strcat(#header, " -");
		strcat(#header, #version);
		line = 0;
		return;
	}
	
	if (stroka >= 0) && (stroka - 2 < lines.visible) && (line) && (!anchor)
	{
		start_x = stolbec * 6 + left + magrin_left;
		start_y = stroka * 10 + top + magrin_left;
		line_length = strlen(#line) * 6;
 
		if (use_truetype == 1)
		{
			//line_length =  get_length stdcall (#line,-1,16,line_length);
			text_out stdcall (#line, #fontlol, 17, text_colors[text_color_index], start_x, start_y-3);
		}
		else
		{
			WriteBufText(start_x, 0, 0x88, text_colors[text_color_index], #line, drawbuf);
		}
		IF (b_text)	WriteBufText(start_x+1, 0, 0x88, text_colors[text_color_index], #line, drawbuf);
		IF (i_text) DrawBufSkew(start_x, 0, line_length, line_h);
		IF (s_text) DrawBufBar(start_x, 4, line_length, 1, text_colors[text_color_index]);
		IF (u_text) DrawBufBar(start_x, 8, line_length, 1, text_colors[text_color_index]);
		IF (link) {
			UnsafeDefineButton(start_x-2, start_y, line_length + 3, 9, blink + BT_HIDE, 0xB5BFC9);
			DrawBufBar(start_x, 8, line_length, 1, text_colors[text_color_index]);
		}
		stolbec += strlen(#line);
	}
}
//=======================================================================
 
void TWebBrowser::Scan(int id)
{
	if (id >= 400)
	{
		GetURLfromPageLinks(id);
		
		//#1
		if (URL[0] == '#')
		{
			strcpy(#anchor, #URL+strrchr(#URL, '#'));
			
			strcpy(#URL, BrowserHistory.CurrentUrl());
			
			lines.first=lines.all-lines.visible;
			ShowPage();
			return;
		}
		//liner.ru#1
		if (strrchr(#URL, '#')<>-1)
		{
			strcpy(#anchor, #URL+strrchr(#URL, '#'));
			URL[strrchr(#URL, '#')-1] = 0x00; //çàãëóøêà
		}
		
		GetNewUrl();
		
		if (!strcmp(#URL + strlen(#URL) - 4, ".gif")) || (!strcmp(#URL + strlen(#URL) - 4, ".png")) || (!strcmp(#URL + strlen(#URL) - 4, ".jpg"))
		{
			//if (strstr(#URL,"http:")) 
			RunProgram("/sys/media/kiv", #URL);
			strcpy(#editURL, BrowserHistory.CurrentUrl());
			strcpy(#URL, BrowserHistory.CurrentUrl());
			return;
		}
		if (!strcmpn(#URL,"mailto:", 7))
		{
			RunProgram("@notify", #URL);
			strcpy(#editURL, BrowserHistory.CurrentUrl());
			strcpy(#URL, BrowserHistory.CurrentUrl());
			return;
		}
 
		OpenPage();
		return;
	}
	
	IF(lines.all < lines.visible) SWITCH(id) //åñëè ìàëî ñòðîê èãíîðèðóåì íåêîòîðûå êíîïêè
	{ CASE 183: CASE 184: CASE 180: CASE 181: return; } 
	
	switch (id)
	{
		case 011: //Ctrk+K 
			ReadHtml(_KOI);
			break;
		case 021: //Ctrl+U
			ReadHtml(_UTF);
			break;
		case 004: //Ctrl+D
			ReadHtml(_DOS);
			break;
		case 002: //free img cache
			FreeImgCache();
			break;			
		case 005: //truetype
 
 
 
 
			if (use_truetype == 2) 
			{
				RunProgram("@notify", "Library does not exists /rd/1/lib/truetype.obj"w);
				return;
			}
			if (use_truetype == 1) use_truetype=0; else use_truetype=1;
			break;
		case BACK:
			if (!BrowserHistory.GoBack()) return;
			OpenPage();
			return;
		case FORWARD:
			if (!BrowserHistory.GoForward()) return;
			OpenPage();
			return;
		case 052:  //F3
			if (strcmp(get_URL_part(5),"http:")<>0) RunProgram("/rd/1/tinypad", #URL); else RunProgram("/rd/1/tinypad", #download_path);
			return;
		case 054: //F5
			IF(address_box.flags & 0b10) break;
		case REFRESH:
			if (GetProcessSlot(downloader_id)<>0)
			{
				KillProcess(downloader_id);
				pause(20);
				Draw_Window();
				return;
			}
			anchor_line_num=lines.first; //âåñ¸ëûé êîñòûëü :Ð
			anchor[0]='|';
			OpenPage();
			return;
		case 014: //Ctrl+N íîâîå îêíî
		case 020: //Ctrl+T íîâàÿ âêëàäêà
		case NEWTAB:
			MoveSize(190,80,OLD,OLD);
			RunProgram(#program_path, #URL);
			return;
			
		case HOME:
			strcpy(#editURL, "http://kolibrios.org/en/index.htm");
		case GOTOURL:
		case 0x0D: //enter
			//ïî÷åìó ttp://? Ãîñïîäà, îòëè÷íûé âîïðîñ. Äåëî â òîì, ÷òî ýòî õàê. 
			//strstr() åñëè íå íàøëî âîçâðàùàåò 0 è â ñëó÷àå óñïåõà âîçâðàùàåò 0. Òàê ÷òî ýòî õàê.
			if ((strstr(#editURL,"ttp://")==0) && (editURL[0]!='/')) strcpy(#URL,"http://"); else URL[0] = 0;
			strcat(#URL, #editURL);
			OpenPage();
			return;
		case SEARCHWEB:
			strcpy(#URL, #search_path);
			strcat(#URL, #editURL);
			OpenPage();
			return;
 
		case ID1: //ìîòàåì ââåðõ
			IF(lines.first <= 0) return;
			lines.first--;
			break; 
		case ID2: //ìîòàåì âíèç
			IF(lines.visible + lines.first >= lines.all) return;
			lines.first++;
			break; 
		case 183: //PgDown
			IF(lines.first == lines.all - lines.visible) return;
			lines.first += lines.visible + 2;
			IF(lines.visible + lines.first > lines.all) lines.first = lines.all - lines.visible;
			break;
		case 184: //PgUp
			IF(lines.first == 0) return;
			lines.first -= lines.visible - 2;
			IF(lines.first < 0) lines.first = 0;
			break;
		case 180: //home
			IF(lines.first == 0) return;
			lines.first = 0;
			break; 
		case 181: //end
			IF (lines.first == lines.all - lines.visible) return;
			lines.first = lines.all - lines.visible;
			break; 
		default:
			return;
	}
	ParseHTML(buf);
}
 
 
char *ABSOLUTE_LINKS[]={ "http:", "mailto:", "ftp:", "/sys/", "/kolibrios/", "/rd/", "/bd", "/hd", "/cd", "/tmp", "/usbhd", 0};
//dword TWebBrowser::GetNewUrl(dword CUR_URL, NEW_URL){
void TWebBrowser::GetNewUrl(){
	int i, len;
	
	for (i=0; ABSOLUTE_LINKS[i]; i++)
	{
		len=strlen(ABSOLUTE_LINKS[i]);
		if (!strcmpn(#URL, ABSOLUTE_LINKS[i], len)) return;
	}
		
	IF (!strcmpn(#URL,"./", 2)) strcpy(#URL, #URL+2); //èãíîðèì :)
	strcpy(#editURL, BrowserHistory.CurrentUrl()); //äîñòà¸ì àäðåñ òåêóùåé ñòðàíèöû
 
	if (URL[0] == '/')
	{
		i = strchr(#editURL+8, '/');
		editURL[i+7]=0;
		strcpy(#URL, #URL+1);
	}
		
	_CUT_ST_LEVEL_MARK:
		
		if (editURL[strrchr(#editURL, '/')-2]<>'/')  // åñëè íå http://
		{
			editURL[strrchr(#editURL, '/')] = 0x00; //îáðåçàåì å¸ óðë äî ïîñëåäíåãî /
		}
		
		IF (!strcmp(get_URL_part(3),"../")) //íà óðîâåíü ââåðõ
		{
			strcpy(#URL,#URL+3);
			editURL[strrchr(#editURL, '/')-1] = 0x00; //îáðåçàåì å¸ óðë äî ïîñëåäíåãî /
			goto _CUT_ST_LEVEL_MARK;
		}
		
		if (editURL[strlen(#editURL)-1]<>'/') strcat(#editURL, "/"); 
		
		strcat(#editURL, #URL); //êëåèì íîâûé àäðåñ
		strcpy(#URL, #editURL);
}
 
 
	
void TWebBrowser::ReadHtml(byte encoding)
{
	if (!strcmp(get_URL_part(5),"http:"))) 
		file_size stdcall (#download_path);
	else
		file_size stdcall (#URL);
	
	filesize = EBX;
	if (!filesize) return;
	
	mem_Free(buf);
	buf = mem_Alloc(filesize);
	if (!strcmp(get_URL_part(5),"http:"))) 
		ReadFile(0, filesize, buf, #download_path);
	else
		ReadFile(0, filesize, buf, #URL);
		
	cur_encoding = encoding;
	if (encoding==_WIN) wintodos(buf);
	if (encoding==_UTF) utf8rutodos(buf);
	if (encoding==_KOI) koitodos(buf);
}
 
 
void TWebBrowser::OpenPage()
{
	if (GetProcessSlot(downloader_id)<>0) PutPaletteImage(#toolbar,200,42,0,0,8,#toolbar_pal);
	KillProcess(downloader_id);
	strcpy(#editURL, #URL);
	BrowserHistory.AddUrl();
	strcpy(#header, #version);
	pre_text =0;
	if (!strcmp(get_URL_part(5),"http:")))
	{
		KillProcess(downloader_id); //óáèâàåì ñòàðûé ïðîöåññ
		DeleteFile(#download_path);
		IF (URL[strlen(#URL)-1]=='/') URL[strlen(#URL)-1]=NULL;
		downloader_id = RunProgram("/sys/network/downloader", #URL);
		//Browser Hack v2.0
		/*
		pause(60);
		if (GetProcessSlot(downloader_id)<>0)
		{
			debug("Browser Hack v2.0: Killing downloader and trying to run it one more!");
			KillProcess(downloader_id); //óáèâàåì ñòàðûé ïðîöåññ
			downloader_id = RunProgram("/sys/network/downloader", #URL);
		}
		*/
		IF (downloader_id<0) RunProgram("@notify", "Error running Downloader. Internet unavilable.");
		Draw_Window();
		return;
	}
	lines.first = lines.all =0;
	ReadHtml(_WIN);
	WB1.ShowPage();
}
 
 
void TWebBrowser::ShowPage()
{
	address_box.size = address_box.pos = strlen(#editURL);
	address_box.offset=0;
	edit_box_draw stdcall(#address_box);
 
	if (!filesize)
	{
		DrawBar(left, top, width+scroll1.size_x+1, height, 0xFFFFFF); //fill all
		if (GetProcessSlot(downloader_id)<>0) WriteText(left + 10, top + 18, 0x80, 0, "Loading...");
		else
		{
			WriteText(left + 10, top + 18, 0x80, 0, "Page not found. May be, URL contains some errors.");
			if (!strcmp(get_URL_part(5),"http:"))) WriteText(left + 10, top + 32, 0x80, 0, "Or Internet unavilable for your configuration.");
		}
		//return;
	}
	else
		ParseHTML(buf);
 
	if (!header) strcpy(#header, #version);
	if (!strcmp(#version, #header)) DrawTitle(#header);
}
 
 
 
void TWebBrowser::ParseHTML(dword bword){
	word bukva[2];
	int j, perenos_num;
	byte ignor_param;
	char temp[768];
	
	if (blink<400) blink=400; else for ( ; blink>400; blink--;) DeleteButton(blink);
	b_text = i_text = u_text = s_text = blq_text = 
	li_text = link = ignor_text = text_color_index = text_colors[0] = li_tab = 0; //îáíóëÿåì òåãè
	link_color = 0x0000FF;
	bg_color = 0xFFFFFF;
	DrawBufFill();
	line = NULL;
	strcpy(#page_links,"|");
	strcpy(#header, #version);
	stroka = -lines.first;
	stolbec = 0;
 
	if (pre_text<>2)
	{
		pre_text=0;
		if (!strcmp(#URL + strlen(#URL) - 4, ".txt")) pre_text = 1;
		if (!strcmp(#URL + strlen(#URL) - 4, ".mht")) ignor_text = 1;
	}
	
	for ( ; buf+filesize > bword; bword++;)
	{
		bukva = ESBYTE[bword];
		if (ignor_text) && (bukva<>'<') continue;
		switch (bukva)
		{
		case 0x0a:
			if (pre_text)
			{
				bukva = temp = NULL;
				goto NEXT_MARK;
			}
		case '\9':
			if (pre_text) //èíà÷å èä¸ì íà 0x0d	
			{
				tab_len=strlen(#line)/8;
				tab_len=tab_len*8;
				tab_len=8+tab_len-strlen(#line);
				for (j=0; j
				break;
			}
			goto DEFAULT_MARK;		
		case '=': //quoted printable
			if (strcmp(#URL + strlen(#URL) - 4, ".mht")<>0) goto DEFAULT_MARK;
 
			temp[0] = ESBYTE[bword+1];
			temp[1] = ESBYTE[bword+2];
			temp[2] = '\0';
			if (bukva = Hex2Symb(#temp))
			{
				bword+=2;
				goto DEFAULT_MARK;
			}
			break;
			
		case '&': //  and so on
			bword++;
			tag=0;
			for (j=0; (ESBYTE[bword]<>';') && (j<7);   j++, bword++;)
			{
				bukva = ESBYTE[bword];
				chrcat(#tag, bukva);
			}
			
			bukva = GetUnicodeSymbol();
			if (bukva) goto DEFAULT_MARK;
			break;
		case '<':
			bword++; //ïðîìîòàåì ñèìâîë <
			tag = parametr = tagparam = ignor_param = NULL;
			if (ESBYTE[bword] == '!') //ôèëüòðàöèÿ âíóòðè , äåðçêî
			{
				bword++;
				if (ESBYTE[bword] == '-')
				{
				HH_:
					do
					{
						bword++;
						if (buf + filesize <= bword) break 2;
					}
					while (ESBYTE[bword] <>'-');
					
					bword++;
					if (ESBYTE[bword] <>'-') goto HH_;
				}
			}
			while (ESBYTE[bword] !='>') && (bword < buf + filesize) //ïîëó÷àåì òåã è åãî ïàðàìåòðû
			{
				bukva = ESBYTE[bword];
				if (bukva == '\9') || (bukva == '\x0a') || (bukva == '\x0d') bukva = ' ';
				if (!ignor_param) && (bukva <>' ')
				{
					if (strlen(#tag)
				}
				else
				{
					ignor_param = true;
					if (!ignor_text) && (strlen(#tagparam)+1
				}
				bword++;
			}
			strlwr(#tag);
			strlwr(#tagparam);
 
			if (tag[strlen(#tag)-1]=='/') tag[strlen(#tag)-1]=NULL; //for br/
			if (tagparam) && (strlen(#tagparam) < 4000) GetNextParam();
 
			if (stolbec + strlen(#line) > lines.column_max) //============the same as NEXT_MARK
			{
				perenos_num = strrchr(#line, ' ');
				if (!perenos_num) && (strlen(#line)>lines.column_max) perenos_num=lines.column_max;
				strcpy(#temp, #line + perenos_num); //ïåðåíîñ ïî ñëîâàì
				line[perenos_num] = 0x00;
				if (stroka-1 > lines.visible) && (lines.first <>0) break 1; //óõîäèì...
				DrawPage();
				strcpy(#line, #temp);				
				TextGoDown(left + 5, stroka * 10 + top + 5, width - 20); //çàêðàøèâàåì ñëåäóùóþ ñòðîêó
			}
			DrawPage();
			line=NULL;
 
			if (tag) WhatTextStyle(left + 5, stroka * 10 + top + 5, width - 20); //îáðàáîòêà òåãîâ
 
			tag = parametr = tagparam = ignor_param = NULL;
			break;
		default:
			DEFAULT_MARK:
			if (bukva<=15) bukva=' ';
			if (!pre_text) && (bukva == ' ')
			{
				if (line[strlen(#line)-1]==' ') break; //óáðàòü 2 ïðîáåëà ïîäðÿä
				if (!stolbec) && (!line) break; //ñòðîêà íå ìîæåò íà÷èíàòüñÿ ñ ïðîáåëà
			}
			if (strlen(#line)
 
			if (stolbec + strlen(#line) > lines.column_max)
			{
			NEXT_MARK:
				perenos_num = strrchr(#line, ' ');
				if (!perenos_num) && (strlen(#line)>lines.column_max) perenos_num=lines.column_max;
				strcpy(#temp, #line + perenos_num); //ïåðåíîñ ïî ñëîâàì
				line[perenos_num] = 0x00;
				if (stroka-1 > lines.visible) && (lines.first <>0) break 1; //óõîäèì...
				DrawPage();
				strcpy(#line, #temp);			
				TextGoDown(left + 5, stroka * 10 + top + 5, width - 20); //çàêðàøèâàåì ñëåäóùóþ ñòðîêó
			}
		}
	}
 
	DrawPage(); //ðèñóåò ïîñëåäíþþ ñòðîêó, ïîòîì ýòî íàäî óáðàòü, îïòèìèçèðîâàâ êîä
	TextGoDown(left + 5, stroka * 10 + top + 5, width - 20); //çàêðàøèâàåì ñëåäóùóþ ñòðîêó
 
	if (lines.visible * 10 + 25 <= height)
		DrawBar(left, lines.visible * 10 + top + 25, width, -lines.visible * 10 + height - 25, bg_color);
	if (stroka * 10 + 5 <= height)
		DrawBar(left, stroka * 10 + top + 5, width, -stroka * 10 + height - 5, bg_color); //çàêðàøèâàåì âñ¸ äî êîíöà
	if (lines.first == 0) lines.all = stroka;
	if (anchor) //åñëè ïîñðåäè òåêñòà ïîÿâèòñÿ íîâûé ÿêîðü - áóäåò áåñêîíå÷íûé öèêë
	{
		anchor=NULL;
		lines.first=anchor_line_num;
		ParseHTML(buf);
	}
	DrawScroller();
}
 
 
 
char oldtag[100];
void TWebBrowser::WhatTextStyle(int left1, top1, width1) {
	dword hr_color;
 
	//ïðîâåðÿåì òåã îòêðûâàåòñÿ èëè çàêðûâàåòñÿ
	if (tag[0] == '/') 
	{
		 rez = 0;
		 strcpy(#tag, #tag+1);
	}
	else rez = 1;
		
	if (!chTag("html"))
	{
		IF(!strcmp(#URL + strlen(#URL) - 4, ".mht")) IF (rez==0) ignor_text = 1; ELSE ignor_text = 0;
		return;
	}
 
	if (!chTag("script")) || (!chTag("style")) || (!chTag("binary")) ignor_text = rez;
 
	if(!chTag("title"))
	{
		if (rez) header=NULL;
		else if (!stroka) DrawTitle(#header); //òåã çàêðûëñÿ - âûâåëè ñòðîêó
		return;
	}
 
	if (ignor_text) return;
 
 
	
	IF(!chTag("q")) strcat(#line, "\"");
 
	if (anchor) && (!strcmp(#parametr, "id=")) //î÷åíü ïëîõî!!! ïîòîìó ÷òî åñëè íå ïîñëåäíèé òåã, ðàáîòàòü íå áóäåò
	{
		if (!strcmp(#anchor, #options))	anchor_line_num=lines.first+stroka;
	}
	
	if (!chTag("body"))
	{
		do{
			if (!strcmp(#parametr, "link=")) link_color = GetColor(#options);
			if (!strcmp(#parametr, "text=")) text_colors[0]=GetColor(#options);
			if (!strcmp(#parametr, "bgcolor="))
			{
				bg_color=GetColor(#options);
				DrawBufFill();
			}
		} while(GetNextParam());
		return;
	}
 
	if (!chTag("a"))
	{
		if (rez)
		{
			if (link) IF(text_color_index > 0) text_color_index--; //åñëè ïðåäûäóùèé òåã à íå áûë çàêðûò
 
			do{
				if (!strcmp(#parametr, "href="))
				{
					if (stroka - 1 > lines.visible) || (stroka < -2) return;
					
					text_color_index++;
					text_colors[text_color_index] = text_colors[text_color_index-1];
					
					link = 1;
					blink++;
					text_colors[text_color_index] = link_color;
					strcat(#page_links, #options);
					strcat(#page_links, "|");
				}
				if (anchor) && (!strcmp(#parametr, "name="))
				{
					if (!strcmp(#anchor, #options))
					{
						anchor_line_num=lines.first+stroka;
					}
				}
			} while(GetNextParam());
		}
		else {
			link = 0;
			IF(text_color_index > 0) text_color_index--;
		}
		return;
	}
 
	if (!chTag("font"))
	{
		if (rez)
		{
			text_color_index++;
			text_colors[text_color_index] = text_colors[text_color_index-1];
		
			do{
				if (strcmp(#parametr, "color=") == 0) //&& (parametr[1] == '#')
				{
					text_colors[text_color_index] = GetColor(#options);
				}
			} while(GetNextParam());
		}
		else
			if (text_color_index > 0) text_color_index--;
		return;
	}
	if(!chTag("tr")) || (!chTag("br")) {
		TextGoDown(left1, top1, width1);
		return;
	}
	if (!chTag("div")) {
		IF(oldtag[0] <>'h') TextGoDown(left1, top1, width1);
		return;
	}
	if (!chTag("p")) {
		IF(oldtag[0] == 'h') return;
		TextGoDown(left1, top1, width1);
		IF(rez) TextGoDown(left1, top1 + 10, width1);
		return;
	}
	if (!chTag("h1")) || (!chTag("h2")) || (!chTag("h3")) || (!chTag("h4")) {
		TextGoDown(left1, top1, width1);
		IF(rez) TextGoDown(left1, top1 + 10, width1);
		b_text = rez;
		strcpy(#oldtag, #tag);
		return;
	}
	else
		oldtag=NULL;
		
	if (!chTag("b")) || (!chTag("strong")) || (!chTag("big")) {
		b_text = rez;
		return;
	}
	if(!chTag("i")) || (!chTag("em")) || (!chTag("subtitle")) {
		i_text = rez;
		return;
	}	
	if (!chTag("dt"))
	{
		li_text = rez;
		IF(rez == 0) return;
		TextGoDown(left1, top1, width1);
		return;
	}
	if(!chTag("li")) || (!chTag("dt")) //íàäî ñäåëàòü âëîæåííûå ñïèñêè
	{
		li_text = rez;
		if (rez)
		{
			TextGoDown(left1, top1, width1);
			if (stroka > -1) && (stroka - 2 < lines.visible) DrawBufBar(li_tab * 5 * 6 + left1 - 5, line_h/2-3, 2, 2, 0x555555);
		}
		return;
	}
	if (!chTag("u")) || (!chTag("ins")) u_text = rez;
	if (!chTag("s")) || (!chTag("strike")) || (!chTag("del")) s_text = rez;
	if (!chTag("ul")) || (!chTag("ol")) IF(!rez)
	{
		li_text = rez;
		li_tab--;
		TextGoDown(left1, top1, width1);
	} ELSE li_tab++;
	if (!chTag("dd")) stolbec += 5;
	if (!chTag("blockquote")) blq_text = rez;
	if (!chTag("pre")) pre_text = rez; 
	if (!chTag("hr"))
	{
		if (anchor) || (stroka < -1)
		{
			stroka+=2;
			return;
		}
		if (strcmp(#parametr, "color=") == 0) hr_color = GetColor(#options); else hr_color = 0x999999;
		TextGoDown(left1, top1, width1);
		DrawBufBar(5, WB1.line_h/2, WB1.width-10, 1, hr_color);
		TextGoDown(left1, top1+WB1.line_h, width1);
	}
	/*
	if (!chTag("input"))
	{
		do{
			if (!strcmp(#parametr, "type="))
			{
				if ((!strcmp(#options, "radio")) || (!strcmp(#options, "checkbox")))
				{
					if (!anchor) && (stroka > 0) CheckBox(stolbec*6 + left1,top1-2,10,10, 0, "\0", 0x888888, text_colors[text_color_index], 0);
					stolbec+=2;
				}
				if ((!strcmp(#options, "text")) || (!strcmp(#options, "password")))
				{
					if (!anchor) && (stroka > 0) CheckBox(stolbec*6 + left1,top1-2,90,10, 0, "\0", 0x555555, 0, 0);
					stolbec+=16;
				}
				if ((!strcmp(#options, "button")) || (!strcmp(#options, "file")) || (!strcmp(#options, "submit")))
				{
					if (!anchor) && (stroka > 0) DrawCaptButton(stolbec*6 + left1,top1-2,60,10, 0, 0xCCCccc, 0, "Button");
					stolbec+=21;
				}
			}
		} while(GetNextParam());
	}
	*/
	if (!chTag("img"))
	{
		Images( left1, top1, width1);
		return;
	}
	if (!chTag("meta")) || (!chTag("?xml"))
	{
		do{
			if (!strcmp(#parametr, "charset=")) || (!strcmp(#parametr, "content=")) || (!strcmp(#parametr, "encoding="))
			{
				strcpy(#options, #options[strrchr(#options, '=')]); //ïîèñê â content=
				if (!strcmp(#options,"utf-8"))   || (!strcmp(#options,"utf8"))      ReadHtml(_UTF);
				if (!strcmp(#options, "koi8-r")) || (!strcmp(#options, "koi8-u"))   ReadHtml(_KOI);
				if (!strcmp(#options, "dos"))    || (!strcmp(#options, "cp-866"))   ReadHtml(_DOS);
			}
		} while(GetNextParam());
		return;
	}
}
 
 
 
void TWebBrowser::DrawScroller() //íå îïòèìàëüíàÿ îòðèñîâêà, íî çàòî â îäíîì ìåñòå
{
	scroll1.max_area = lines.all;
	scroll1.cur_area = lines.visible;
	scroll1.position = lines.first;
 
	scroll1.all_redraw=1;
	scroll1.start_x = WB1.left + WB1.width;
	scroll1.size_y=WB1.height;
 
	scrollbar_v_draw(#scroll1);
}
>
>

Rev 3990	Rev 3992
1	int downloader_id;	1	int downloader_id;
2		2
3	dword	3	dword
4	buf,	4	buf,
5	filesize,	5	filesize,
6	blink;	6	blink;
7		7
8	char download_path[]="/rd/1/.download";	8	char download_path[]="/rd/1/.download";
9	char search_path[]="http://nigma.ru/index.php?s=";	9	char search_path[]="http://nigma.ru/index.php?s=";
10	char version[]=" Text-based Browser 0.99.05";	10
-		11	#ifndef AUTOBUILD
-		12	#include "lang.h--"
-		13	#endif
-		14
-		15	#ifdef LANG_RUS
-		16	char version[]=" ¥ªáâ®¢ë© ¡à ã§¥à 0.99.07";
-		17	#else
-		18	char version[]=" Text-based Browser 0.99.07";
11		19	#endif
-		20
-		21
-		22
12		23
13	struct TWebBrowser {	24	struct TWebBrowser {
14	int left, top, width, height, line_h;	25	int left, top, width, height, line_h;
15	void Scan(int);	26	void Scan(int);
16	void GetNewUrl();	27	void GetNewUrl();
17	void OpenPage();	28	void OpenPage();
18	void ReadHtml(byte);	29	void ReadHtml(byte);
19	void ShowPage();	30	void ShowPage();
20	void ParseHTML(dword);	31	void ParseHTML(dword);
21	void WhatTextStyle(int left1, top1, width1);	32	void WhatTextStyle(int left1, top1, width1);
22	void DrawPage();	33	void DrawPage();
23	void DrawScroller();	34	void DrawScroller();
24	};	35	};
25	TWebBrowser WB1;	36	TWebBrowser WB1;
26		37
27	byte rez, b_text, i_text, u_text, s_text, pre_text, blq_text, li_text,	38	byte rez, b_text, i_text, u_text, s_text, pre_text, blq_text, li_text,
28	link, ignor_text, li_tab, cur_encoding;	39	link, ignor_text, li_tab, cur_encoding;
29		40
30	dword text_colors[300],	41	dword text_colors[300],
31	text_color_index,	42	text_color_index,
32	link_color,	43	link_color,
33	bg_color;	44	bg_color;
34		45
35	int stroka,	46	int stroka,
36	stolbec,	47	stolbec,
37	tab_len,	48	tab_len,
38	anchor_line_num;	49	anchor_line_num;
39		50
40	char line[500],	51	char line[500],
41	tag[100],	52	tag[100],
42	tagparam[10000],	53	tagparam[10000],
43	parametr[1200],	54	parametr[1200],
44	options[4096],	55	options[4096],
45	anchor[256];	56	anchor[256];
46		57
47	#include "include\history.h"	58	#include "include\history.h"
48	#include "include\colors.h"	59	#include "include\colors.h"
49	#include "include\unicode_tags.h"	60	#include "include\unicode_tags.h"
50	#include "include\img_cache.h"	61	#include "include\img_cache.h"
51	#include "include\some_code.h"	62	#include "include\some_code.h"
52	#include "include\parce_tag.h"	63	#include "include\parce_tag.h"
53		64
54	//=======================================================================	65	//=======================================================================
55	dword drawbuf;	66	dword drawbuf;
56	void DrawBufInit()	67	void DrawBufInit()
57	{	68	{
58	free(drawbuf);	69	free(drawbuf);
59	drawbuf = malloc(WB1.width * WB1.line_h +4 * 4 + 8); //+1 for good luck	70	drawbuf = malloc(WB1.width * WB1.line_h +4 * 4 + 8); //+1 for good luck
60	ESDWORD[drawbuf] = WB1.width;	71	ESDWORD[drawbuf] = WB1.width;
61	ESDWORD[drawbuf+4] = WB1.line_h;	72	ESDWORD[drawbuf+4] = WB1.line_h;
62	}	73	}
63	void DrawBufFill()	74	void DrawBufFill()
64	{	75	{
65	int i;	76	int i;
66	for (i=0; i	77	for (i=0; i
67	}	78	}
68	void DrawBufBar(dword x, y, w, h, color)	79	void DrawBufBar(dword x, y, w, h, color)
69	{	80	{
70	int i, j;	81	int i, j;
71	for (j=0; j	82	for (j=0; j
72	{	83	{
73	for (i = y+jWB1.width+x4; i	84	for (i = y+jWB1.width+x4; i
74	}	85	}
75	}	86	}
76		87
77	char shift[]={8,8,4,4};	88	char shift[]={8,8,4,4};
78	void DrawBufSkew(dword x, y, w, h)	89	void DrawBufSkew(dword x, y, w, h)
79	{	90	{
80	int i, j;	91	int i, j;
81	stolbec++;	92	stolbec++;
82	for (j=0; j<=3; j++)	93	for (j=0; j<=3; j++)
83	{	94	{
84	for (i = y+jWB1.width+x+w+h4; i>y+jWB1.width+x+h-124 ; i-=4)	95	for (i = y+jWB1.width+x+w+h4; i>y+jWB1.width+x+h-124 ; i-=4)
85	ESDWORD[drawbuf+i+8] = ESDWORD[-shift[j]+drawbuf+i+8];	96	ESDWORD[drawbuf+i+8] = ESDWORD[-shift[j]+drawbuf+i+8];
86	}	97	}
87	}	98	}
88		99
89	void TextGoDown(int left1, top1, width1)	100	void TextGoDown(int left1, top1, width1)
90	{	101	{
91	if (!stroka) DrawBar(WB1.left, WB1.top, WB1.width, 5, bg_color); //çàêðàøèâàåì ôîí íàä ïåðâîé ñòðîêîé	102	if (!stroka) DrawBar(WB1.left, WB1.top, WB1.width, 5, bg_color); //çàêðàøèâàåì ôîí íàä ïåðâîé ñòðîêîé
92	stroka++;	103	stroka++;
93	if (blq_text) stolbec = 8; else stolbec = 0;	104	if (blq_text) stolbec = 8; else stolbec = 0;
94	if (li_text) stolbec = li_tab * 5;	105	if (li_text) stolbec = li_tab * 5;
95	if (top1>=WB1.top) && ( top1 < WB1.height+WB1.top-10) && (!anchor)	106	if (top1>=WB1.top) && ( top1 < WB1.height+WB1.top-10) && (!anchor)
96	{	107	{
97	PutPaletteImage(drawbuf+8, WB1.width, WB1.line_h, left1-5, top1, 32,0);	108	PutPaletteImage(drawbuf+8, WB1.width, WB1.line_h, left1-5, top1, 32,0);
98	DrawBufFill();	109	DrawBufFill();
99	}	110	}
100	}	111	}
101		112
102	void TWebBrowser::DrawPage()	113	void TWebBrowser::DrawPage()
103	{	114	{
104	int start_x, start_y, line_length, magrin_left=5;	115	int start_x, start_y, line_length, magrin_left=5;
105		116
106	if (!header)	117	if (!header)
107	{	118	{
108	strcpy(#header, #line);	119	strcpy(#header, #line);
109	strcat(#header, " -");	120	strcat(#header, " -");
110	strcat(#header, #version);	121	strcat(#header, #version);
111	line = 0;	122	line = 0;
112	return;	123	return;
113	}	124	}
114		125
115	if (stroka >= 0) && (stroka - 2 < lines.visible) && (line) && (!anchor)	126	if (stroka >= 0) && (stroka - 2 < lines.visible) && (line) && (!anchor)
116	{	127	{
117	start_x = stolbec * 6 + left + magrin_left;	128	start_x = stolbec * 6 + left + magrin_left;
118	start_y = stroka * 10 + top + magrin_left;	129	start_y = stroka * 10 + top + magrin_left;
119	line_length = strlen(#line) * 6;	130	line_length = strlen(#line) * 6;
120		131
121	if (use_truetype == 1)	132	if (use_truetype == 1)
122	{	133	{
123	//line_length = get_length stdcall (#line,-1,16,line_length);	134	//line_length = get_length stdcall (#line,-1,16,line_length);
124	text_out stdcall (#line, #fontlol, 17, text_colors[text_color_index], start_x, start_y-3);	135	text_out stdcall (#line, #fontlol, 17, text_colors[text_color_index], start_x, start_y-3);
125	}	136	}
126	else	137	else
127	{	138	{
128	WriteBufText(start_x, 0, 0x88, text_colors[text_color_index], #line, drawbuf);	139	WriteBufText(start_x, 0, 0x88, text_colors[text_color_index], #line, drawbuf);
129	}	140	}
130	IF (b_text) WriteBufText(start_x+1, 0, 0x88, text_colors[text_color_index], #line, drawbuf);	141	IF (b_text) WriteBufText(start_x+1, 0, 0x88, text_colors[text_color_index], #line, drawbuf);
131	IF (i_text) DrawBufSkew(start_x, 0, line_length, line_h);	142	IF (i_text) DrawBufSkew(start_x, 0, line_length, line_h);
132	IF (s_text) DrawBufBar(start_x, 4, line_length, 1, text_colors[text_color_index]);	143	IF (s_text) DrawBufBar(start_x, 4, line_length, 1, text_colors[text_color_index]);
133	IF (u_text) DrawBufBar(start_x, 8, line_length, 1, text_colors[text_color_index]);	144	IF (u_text) DrawBufBar(start_x, 8, line_length, 1, text_colors[text_color_index]);
134	IF (link) {	145	IF (link) {
135	UnsafeDefineButton(start_x-2, start_y, line_length + 3, 9, blink + BT_HIDE, 0xB5BFC9);	146	UnsafeDefineButton(start_x-2, start_y, line_length + 3, 9, blink + BT_HIDE, 0xB5BFC9);
136	DrawBufBar(start_x, 8, line_length, 1, text_colors[text_color_index]);	147	DrawBufBar(start_x, 8, line_length, 1, text_colors[text_color_index]);
137	}	148	}
138	stolbec += strlen(#line);	149	stolbec += strlen(#line);
139	}	150	}
140	}	151	}
141	//=======================================================================	152	//=======================================================================
142		153
143	void TWebBrowser::Scan(int id)	154	void TWebBrowser::Scan(int id)
144	{	155	{
145	if (id >= 400)	156	if (id >= 400)
146	{	157	{
147	GetURLfromPageLinks(id);	158	GetURLfromPageLinks(id);
148		159
149	//#1	160	//#1
150	if (URL[0] == '#')	161	if (URL[0] == '#')
151	{	162	{
152	strcpy(#anchor, #URL+strrchr(#URL, '#'));	163	strcpy(#anchor, #URL+strrchr(#URL, '#'));
153		164
154	strcpy(#URL, BrowserHistory.CurrentUrl());	165	strcpy(#URL, BrowserHistory.CurrentUrl());
155		166
156	lines.first=lines.all-lines.visible;	167	lines.first=lines.all-lines.visible;
157	ShowPage();	168	ShowPage();
158	return;	169	return;
159	}	170	}
160	//liner.ru#1	171	//liner.ru#1
161	if (strrchr(#URL, '#')<>-1)	172	if (strrchr(#URL, '#')<>-1)
162	{	173	{
163	strcpy(#anchor, #URL+strrchr(#URL, '#'));	174	strcpy(#anchor, #URL+strrchr(#URL, '#'));
164	URL[strrchr(#URL, '#')-1] = 0x00; //çàãëóøêà	175	URL[strrchr(#URL, '#')-1] = 0x00; //çàãëóøêà
165	}	176	}
166		177
167	GetNewUrl();	178	GetNewUrl();
168		179
169	if (!strcmp(#URL + strlen(#URL) - 4, ".gif")) \|\| (!strcmp(#URL + strlen(#URL) - 4, ".png")) \|\| (!strcmp(#URL + strlen(#URL) - 4, ".jpg"))	180	if (!strcmp(#URL + strlen(#URL) - 4, ".gif")) \|\| (!strcmp(#URL + strlen(#URL) - 4, ".png")) \|\| (!strcmp(#URL + strlen(#URL) - 4, ".jpg"))
170	{	181	{
171	//if (strstr(#URL,"http:"))	182	//if (strstr(#URL,"http:"))
172	RunProgram("/sys/media/kiv", #URL);	183	RunProgram("/sys/media/kiv", #URL);
173	strcpy(#editURL, BrowserHistory.CurrentUrl());	184	strcpy(#editURL, BrowserHistory.CurrentUrl());
174	strcpy(#URL, BrowserHistory.CurrentUrl());	185	strcpy(#URL, BrowserHistory.CurrentUrl());
175	return;	186	return;
176	}	187	}
177	if (!strcmpn(#URL,"mailto:", 7))	188	if (!strcmpn(#URL,"mailto:", 7))
178	{	189	{
179	RunProgram("@notify", #URL);	190	RunProgram("@notify", #URL);
180	strcpy(#editURL, BrowserHistory.CurrentUrl());	191	strcpy(#editURL, BrowserHistory.CurrentUrl());
181	strcpy(#URL, BrowserHistory.CurrentUrl());	192	strcpy(#URL, BrowserHistory.CurrentUrl());
182	return;	193	return;
183	}	194	}
184		195
185	OpenPage();	196	OpenPage();
186	return;	197	return;
187	}	198	}
188		199
189	IF(lines.all < lines.visible) SWITCH(id) //åñëè ìàëî ñòðîê èãíîðèðóåì íåêîòîðûå êíîïêè	200	IF(lines.all < lines.visible) SWITCH(id) //åñëè ìàëî ñòðîê èãíîðèðóåì íåêîòîðûå êíîïêè
190	{ CASE 183: CASE 184: CASE 180: CASE 181: return; }	201	{ CASE 183: CASE 184: CASE 180: CASE 181: return; }
191		202
192	switch (id)	203	switch (id)
193	{	204	{
194	case 011: //Ctrk+K	205	case 011: //Ctrk+K
195	ReadHtml(_KOI);	206	ReadHtml(_KOI);
196	break;	207	break;
197	case 021: //Ctrl+U	208	case 021: //Ctrl+U
198	ReadHtml(_UTF);	209	ReadHtml(_UTF);
199	break;	210	break;
200	case 004: //Ctrl+D	211	case 004: //Ctrl+D
201	ReadHtml(_DOS);	212	ReadHtml(_DOS);
202	break;	213	break;
203	case 002: //free img cache	214	case 002: //free img cache
204	FreeImgCache();	215	FreeImgCache();
205	break;	216	break;
206	case 003:	217	case 005: //truetype
207	if (!pre_text) pre_text=2;	-
208	else pre_text=0;	-
209	break;	-
210	case 005: //truetype	-
211	if (use_truetype == 2)	218	if (use_truetype == 2)
212	{	219	{
213	RunProgram("@notify", "Library does not exists /rd/1/lib/truetype.obj"w);	220	RunProgram("@notify", "Library does not exists /rd/1/lib/truetype.obj"w);
214	return;	221	return;
215	}	222	}
216	if (use_truetype == 1) use_truetype=0; else use_truetype=1;	223	if (use_truetype == 1) use_truetype=0; else use_truetype=1;
217	break;	224	break;
218	case BACK:	225	case BACK:
219	if (!BrowserHistory.GoBack()) return;	226	if (!BrowserHistory.GoBack()) return;
220	OpenPage();	227	OpenPage();
221	return;	228	return;
222	case FORWARD:	229	case FORWARD:
223	if (!BrowserHistory.GoForward()) return;	230	if (!BrowserHistory.GoForward()) return;
224	OpenPage();	231	OpenPage();
225	return;	232	return;
226	case 052: //F3	233	case 052: //F3
227	if (strcmp(get_URL_part(5),"http:")<>0) RunProgram("/rd/1/tinypad", #URL); else RunProgram("/rd/1/tinypad", #download_path);	234	if (strcmp(get_URL_part(5),"http:")<>0) RunProgram("/rd/1/tinypad", #URL); else RunProgram("/rd/1/tinypad", #download_path);
228	return;	235	return;
229	case 054: //F5	236	case 054: //F5
230	IF(address_box.flags & 0b10) break;	237	IF(address_box.flags & 0b10) break;
231	case REFRESH:	238	case REFRESH:
232	if (GetProcessSlot(downloader_id)<>0)	239	if (GetProcessSlot(downloader_id)<>0)
233	{	240	{
234	KillProcess(downloader_id);	241	KillProcess(downloader_id);
235	pause(20);	242	pause(20);
236	Draw_Window();	243	Draw_Window();
237	return;	244	return;
238	}	245	}
239	anchor_line_num=lines.first; //âåñ¸ëûé êîñòûëü :Ð	246	anchor_line_num=lines.first; //âåñ¸ëûé êîñòûëü :Ð
240	anchor[0]='\|';	247	anchor[0]='\|';
241	OpenPage();	248	OpenPage();
242	return;	249	return;
243	case 014: //Ctrl+N íîâîå îêíî	250	case 014: //Ctrl+N íîâîå îêíî
244	case 020: //Ctrl+T íîâàÿ âêëàäêà	251	case 020: //Ctrl+T íîâàÿ âêëàäêà
245	case NEWTAB:	252	case NEWTAB:
246	MoveSize(190,80,OLD,OLD);	253	MoveSize(190,80,OLD,OLD);
247	RunProgram(#program_path, #URL);	254	RunProgram(#program_path, #URL);
248	return;	255	return;
249		256
250	case HOME:	257	case HOME:
251	strcpy(#editURL, "http://kolibrios.org/en/index.htm");	258	strcpy(#editURL, "http://kolibrios.org/en/index.htm");
252	case GOTOURL:	259	case GOTOURL:
253	case 0x0D: //enter	260	case 0x0D: //enter
254	//ïî÷åìó ttp://? Ãîñïîäà, îòëè÷íûé âîïðîñ. Äåëî â òîì, ÷òî ýòî õàê.	261	//ïî÷åìó ttp://? Ãîñïîäà, îòëè÷íûé âîïðîñ. Äåëî â òîì, ÷òî ýòî õàê.
255	//strstr() åñëè íå íàøëî âîçâðàùàåò 0 è â ñëó÷àå óñïåõà âîçâðàùàåò 0. Òàê ÷òî ýòî õàê.	262	//strstr() åñëè íå íàøëî âîçâðàùàåò 0 è â ñëó÷àå óñïåõà âîçâðàùàåò 0. Òàê ÷òî ýòî õàê.
256	if ((strstr(#editURL,"ttp://")==0) && (editURL[0]!='/')) strcpy(#URL,"http://"); else URL[0] = 0;	263	if ((strstr(#editURL,"ttp://")==0) && (editURL[0]!='/')) strcpy(#URL,"http://"); else URL[0] = 0;
257	strcat(#URL, #editURL);	264	strcat(#URL, #editURL);
258	OpenPage();	265	OpenPage();
259	return;	266	return;
260	case SEARCHWEB:	267	case SEARCHWEB:
261	strcpy(#URL, #search_path);	268	strcpy(#URL, #search_path);
262	strcat(#URL, #editURL);	269	strcat(#URL, #editURL);
263	OpenPage();	270	OpenPage();
264	return;	271	return;
265		272
266	case ID1: //ìîòàåì ââåðõ	273	case ID1: //ìîòàåì ââåðõ
267	IF(lines.first <= 0) return;	274	IF(lines.first <= 0) return;
268	lines.first--;	275	lines.first--;
269	break;	276	break;
270	case ID2: //ìîòàåì âíèç	277	case ID2: //ìîòàåì âíèç
271	IF(lines.visible + lines.first >= lines.all) return;	278	IF(lines.visible + lines.first >= lines.all) return;
272	lines.first++;	279	lines.first++;
273	break;	280	break;
274	case 183: //PgDown	281	case 183: //PgDown
275	IF(lines.first == lines.all - lines.visible) return;	282	IF(lines.first == lines.all - lines.visible) return;
276	lines.first += lines.visible + 2;	283	lines.first += lines.visible + 2;
277	IF(lines.visible + lines.first > lines.all) lines.first = lines.all - lines.visible;	284	IF(lines.visible + lines.first > lines.all) lines.first = lines.all - lines.visible;
278	break;	285	break;
279	case 184: //PgUp	286	case 184: //PgUp
280	IF(lines.first == 0) return;	287	IF(lines.first == 0) return;
281	lines.first -= lines.visible - 2;	288	lines.first -= lines.visible - 2;
282	IF(lines.first < 0) lines.first = 0;	289	IF(lines.first < 0) lines.first = 0;
283	break;	290	break;
284	case 180: //home	291	case 180: //home
285	IF(lines.first == 0) return;	292	IF(lines.first == 0) return;
286	lines.first = 0;	293	lines.first = 0;
287	break;	294	break;
288	case 181: //end	295	case 181: //end
289	IF (lines.first == lines.all - lines.visible) return;	296	IF (lines.first == lines.all - lines.visible) return;
290	lines.first = lines.all - lines.visible;	297	lines.first = lines.all - lines.visible;
291	break;	298	break;
292	default:	299	default:
293	return;	300	return;
294	}	301	}
295	ParseHTML(buf);	302	ParseHTML(buf);
296	}	303	}
297		304
298		305
299	char *ABSOLUTE_LINKS[]={ "http:", "mailto:", "ftp:", "/sys/", "/kolibrios/", "/rd/", "/bd", "/hd", "/cd", "/tmp", "/usbhd", 0};	306	char *ABSOLUTE_LINKS[]={ "http:", "mailto:", "ftp:", "/sys/", "/kolibrios/", "/rd/", "/bd", "/hd", "/cd", "/tmp", "/usbhd", 0};
300	//dword TWebBrowser::GetNewUrl(dword CUR_URL, NEW_URL){	307	//dword TWebBrowser::GetNewUrl(dword CUR_URL, NEW_URL){
301	void TWebBrowser::GetNewUrl(){	308	void TWebBrowser::GetNewUrl(){
302	int i, len;	309	int i, len;
303		310
304	for (i=0; ABSOLUTE_LINKS[i]; i++)	311	for (i=0; ABSOLUTE_LINKS[i]; i++)
305	{	312	{
306	len=strlen(ABSOLUTE_LINKS[i]);	313	len=strlen(ABSOLUTE_LINKS[i]);
307	if (!strcmpn(#URL, ABSOLUTE_LINKS[i], len)) return;	314	if (!strcmpn(#URL, ABSOLUTE_LINKS[i], len)) return;
308	}	315	}
309		316
310	IF (!strcmpn(#URL,"./", 2)) strcpy(#URL, #URL+2); //èãíîðèì :)	317	IF (!strcmpn(#URL,"./", 2)) strcpy(#URL, #URL+2); //èãíîðèì :)
311	strcpy(#editURL, BrowserHistory.CurrentUrl()); //äîñòà¸ì àäðåñ òåêóùåé ñòðàíèöû	318	strcpy(#editURL, BrowserHistory.CurrentUrl()); //äîñòà¸ì àäðåñ òåêóùåé ñòðàíèöû
312		319
313	if (URL[0] == '/')	320	if (URL[0] == '/')
314	{	321	{
315	i = strchr(#editURL+8, '/');	322	i = strchr(#editURL+8, '/');
316	editURL[i+7]=0;	323	editURL[i+7]=0;
317	strcpy(#URL, #URL+1);	324	strcpy(#URL, #URL+1);
318	}	325	}
319		326
320	_CUT_ST_LEVEL_MARK:	327	_CUT_ST_LEVEL_MARK:
321		328
322	if (editURL[strrchr(#editURL, '/')-2]<>'/') // åñëè íå http://	329	if (editURL[strrchr(#editURL, '/')-2]<>'/') // åñëè íå http://
323	{	330	{
324	editURL[strrchr(#editURL, '/')] = 0x00; //îáðåçàåì å¸ óðë äî ïîñëåäíåãî /	331	editURL[strrchr(#editURL, '/')] = 0x00; //îáðåçàåì å¸ óðë äî ïîñëåäíåãî /
325	}	332	}
326		333
327	IF (!strcmp(get_URL_part(3),"../")) //íà óðîâåíü ââåðõ	334	IF (!strcmp(get_URL_part(3),"../")) //íà óðîâåíü ââåðõ
328	{	335	{
329	strcpy(#URL,#URL+3);	336	strcpy(#URL,#URL+3);
330	editURL[strrchr(#editURL, '/')-1] = 0x00; //îáðåçàåì å¸ óðë äî ïîñëåäíåãî /	337	editURL[strrchr(#editURL, '/')-1] = 0x00; //îáðåçàåì å¸ óðë äî ïîñëåäíåãî /
331	goto _CUT_ST_LEVEL_MARK;	338	goto _CUT_ST_LEVEL_MARK;
332	}	339	}
333		340
334	if (editURL[strlen(#editURL)-1]<>'/') strcat(#editURL, "/");	341	if (editURL[strlen(#editURL)-1]<>'/') strcat(#editURL, "/");
335		342
336	strcat(#editURL, #URL); //êëåèì íîâûé àäðåñ	343	strcat(#editURL, #URL); //êëåèì íîâûé àäðåñ
337	strcpy(#URL, #editURL);	344	strcpy(#URL, #editURL);
338	}	345	}
339		346
340		347
341		348
342	void TWebBrowser::ReadHtml(byte encoding)	349	void TWebBrowser::ReadHtml(byte encoding)
343	{	350	{
344	if (!strcmp(get_URL_part(5),"http:")))	351	if (!strcmp(get_URL_part(5),"http:")))
345	file_size stdcall (#download_path);	352	file_size stdcall (#download_path);
346	else	353	else
347	file_size stdcall (#URL);	354	file_size stdcall (#URL);
348		355
349	filesize = EBX;	356	filesize = EBX;
350	if (!filesize) return;	357	if (!filesize) return;
351		358
352	mem_Free(buf);	359	mem_Free(buf);
353	buf = mem_Alloc(filesize);	360	buf = mem_Alloc(filesize);
354	if (!strcmp(get_URL_part(5),"http:")))	361	if (!strcmp(get_URL_part(5),"http:")))
355	ReadFile(0, filesize, buf, #download_path);	362	ReadFile(0, filesize, buf, #download_path);
356	else	363	else
357	ReadFile(0, filesize, buf, #URL);	364	ReadFile(0, filesize, buf, #URL);
358		365
359	cur_encoding = encoding;	366	cur_encoding = encoding;
360	if (encoding==_WIN) wintodos(buf);	367	if (encoding==_WIN) wintodos(buf);
361	if (encoding==_UTF) utf8rutodos(buf);	368	if (encoding==_UTF) utf8rutodos(buf);
362	if (encoding==_KOI) koitodos(buf);	369	if (encoding==_KOI) koitodos(buf);
363	}	370	}
364		371
365		372
366	void TWebBrowser::OpenPage()	373	void TWebBrowser::OpenPage()
367	{	374	{
368	if (GetProcessSlot(downloader_id)<>0) PutPaletteImage(#toolbar,200,42,0,0,8,#toolbar_pal);	375	if (GetProcessSlot(downloader_id)<>0) PutPaletteImage(#toolbar,200,42,0,0,8,#toolbar_pal);
369	KillProcess(downloader_id);	376	KillProcess(downloader_id);
370	strcpy(#editURL, #URL);	377	strcpy(#editURL, #URL);
371	BrowserHistory.AddUrl();	378	BrowserHistory.AddUrl();
372	strcpy(#header, #version);	379	strcpy(#header, #version);
373	pre_text =0;	380	pre_text =0;
374	if (!strcmp(get_URL_part(5),"http:")))	381	if (!strcmp(get_URL_part(5),"http:")))
375	{	382	{
376	KillProcess(downloader_id); //óáèâàåì ñòàðûé ïðîöåññ	383	KillProcess(downloader_id); //óáèâàåì ñòàðûé ïðîöåññ
377	DeleteFile(#download_path);	384	DeleteFile(#download_path);
378	IF (URL[strlen(#URL)-1]=='/') URL[strlen(#URL)-1]=NULL;	385	IF (URL[strlen(#URL)-1]=='/') URL[strlen(#URL)-1]=NULL;
379	downloader_id = RunProgram("/sys/network/downloader", #URL);	386	downloader_id = RunProgram("/sys/network/downloader", #URL);
380	//Browser Hack v2.0	387	//Browser Hack v2.0
381	/*	388	/*
382	pause(60);	389	pause(60);
383	if (GetProcessSlot(downloader_id)<>0)	390	if (GetProcessSlot(downloader_id)<>0)
384	{	391	{
385	debug("Browser Hack v2.0: Killing downloader and trying to run it one more!");	392	debug("Browser Hack v2.0: Killing downloader and trying to run it one more!");
386	KillProcess(downloader_id); //óáèâàåì ñòàðûé ïðîöåññ	393	KillProcess(downloader_id); //óáèâàåì ñòàðûé ïðîöåññ
387	downloader_id = RunProgram("/sys/network/downloader", #URL);	394	downloader_id = RunProgram("/sys/network/downloader", #URL);
388	}	395	}
389	*/	396	*/
390	IF (downloader_id<0) RunProgram("@notify", "Error running Downloader. Internet unavilable.");	397	IF (downloader_id<0) RunProgram("@notify", "Error running Downloader. Internet unavilable.");
391	Draw_Window();	398	Draw_Window();
392	return;	399	return;
393	}	400	}
394	lines.first = lines.all =0;	401	lines.first = lines.all =0;
395	ReadHtml(_WIN);	402	ReadHtml(_WIN);
396	WB1.ShowPage();	403	WB1.ShowPage();
397	}	404	}
398		405
399		406
400	void TWebBrowser::ShowPage()	407	void TWebBrowser::ShowPage()
401	{	408	{
402	address_box.size = address_box.pos = strlen(#editURL);	409	address_box.size = address_box.pos = strlen(#editURL);
403	address_box.offset=0;	410	address_box.offset=0;
404	edit_box_draw stdcall(#address_box);	411	edit_box_draw stdcall(#address_box);
405		412
406	if (!filesize)	413	if (!filesize)
407	{	414	{
408	DrawBar(left, top, width+scroll1.size_x+1, height, 0xFFFFFF); //fill all	415	DrawBar(left, top, width+scroll1.size_x+1, height, 0xFFFFFF); //fill all
409	if (GetProcessSlot(downloader_id)<>0) WriteText(left + 10, top + 18, 0x80, 0, "Loading...");	416	if (GetProcessSlot(downloader_id)<>0) WriteText(left + 10, top + 18, 0x80, 0, "Loading...");
410	else	417	else
411	{	418	{
412	WriteText(left + 10, top + 18, 0x80, 0, "Page not found. May be, URL contains some errors.");	419	WriteText(left + 10, top + 18, 0x80, 0, "Page not found. May be, URL contains some errors.");
413	if (!strcmp(get_URL_part(5),"http:"))) WriteText(left + 10, top + 32, 0x80, 0, "Or Internet unavilable for your configuration.");	420	if (!strcmp(get_URL_part(5),"http:"))) WriteText(left + 10, top + 32, 0x80, 0, "Or Internet unavilable for your configuration.");
414	}	421	}
415	//return;	422	//return;
416	}	423	}
417	else	424	else
418	ParseHTML(buf);	425	ParseHTML(buf);
419		426
420	if (!header) strcpy(#header, #version);	427	if (!header) strcpy(#header, #version);
421	if (!strcmp(#version, #header)) DrawTitle(#header);	428	if (!strcmp(#version, #header)) DrawTitle(#header);
422	}	429	}
423		430
424		431
425		432
426	void TWebBrowser::ParseHTML(dword bword){	433	void TWebBrowser::ParseHTML(dword bword){
427	word bukva[2];	434	word bukva[2];
428	int j, perenos_num;	435	int j, perenos_num;
429	byte ignor_param;	436	byte ignor_param;
430	char temp[768];	437	char temp[768];
431		438
432	if (blink<400) blink=400; else for ( ; blink>400; blink--;) DeleteButton(blink);	439	if (blink<400) blink=400; else for ( ; blink>400; blink--;) DeleteButton(blink);
433	b_text = i_text = u_text = s_text = blq_text =	440	b_text = i_text = u_text = s_text = blq_text =
434	li_text = link = ignor_text = text_color_index = text_colors[0] = li_tab = 0; //îáíóëÿåì òåãè	441	li_text = link = ignor_text = text_color_index = text_colors[0] = li_tab = 0; //îáíóëÿåì òåãè
435	link_color = 0x0000FF;	442	link_color = 0x0000FF;
436	bg_color = 0xFFFFFF;	443	bg_color = 0xFFFFFF;
437	DrawBufFill();	444	DrawBufFill();
438	line = NULL;	445	line = NULL;
439	strcpy(#page_links,"\|");	446	strcpy(#page_links,"\|");
440	strcpy(#header, #version);	447	strcpy(#header, #version);
441	stroka = -lines.first;	448	stroka = -lines.first;
442	stolbec = 0;	449	stolbec = 0;
443		450
444	if (pre_text<>2)	451	if (pre_text<>2)
445	{	452	{
446	pre_text=0;	453	pre_text=0;
447	if (!strcmp(#URL + strlen(#URL) - 4, ".txt")) pre_text = 1;	454	if (!strcmp(#URL + strlen(#URL) - 4, ".txt")) pre_text = 1;
448	if (!strcmp(#URL + strlen(#URL) - 4, ".mht")) ignor_text = 1;	455	if (!strcmp(#URL + strlen(#URL) - 4, ".mht")) ignor_text = 1;
449	}	456	}
450		457
451	for ( ; buf+filesize > bword; bword++;)	458	for ( ; buf+filesize > bword; bword++;)
452	{	459	{
453	bukva = ESBYTE[bword];	460	bukva = ESBYTE[bword];
454	if (ignor_text) && (bukva<>'<') continue;	461	if (ignor_text) && (bukva<>'<') continue;
455	switch (bukva)	462	switch (bukva)
456	{	463	{
457	case 0x0a:	464	case 0x0a:
458	if (pre_text)	465	if (pre_text)
459	{	466	{
460	bukva = temp = NULL;	467	bukva = temp = NULL;
461	goto NEXT_MARK;	468	goto NEXT_MARK;
462	}	469	}
463	case '\9':	470	case '\9':
464	if (pre_text) //èíà÷å èä¸ì íà 0x0d	471	if (pre_text) //èíà÷å èä¸ì íà 0x0d
465	{	472	{
466	tab_len=strlen(#line)/8;	473	tab_len=strlen(#line)/8;
467	tab_len=tab_len*8;	474	tab_len=tab_len*8;
468	tab_len=8+tab_len-strlen(#line);	475	tab_len=8+tab_len-strlen(#line);
469	for (j=0; j	476	for (j=0; j
470	break;	477	break;
471	}	478	}
472	goto DEFAULT_MARK;	479	goto DEFAULT_MARK;
473	case '=': //quoted printable	480	case '=': //quoted printable
474	if (strcmp(#URL + strlen(#URL) - 4, ".mht")<>0) goto DEFAULT_MARK;	481	if (strcmp(#URL + strlen(#URL) - 4, ".mht")<>0) goto DEFAULT_MARK;
475		482
476	temp[0] = ESBYTE[bword+1];	483	temp[0] = ESBYTE[bword+1];
477	temp[1] = ESBYTE[bword+2];	484	temp[1] = ESBYTE[bword+2];
478	temp[2] = '\0';	485	temp[2] = '\0';
479	if (bukva = Hex2Symb(#temp))	486	if (bukva = Hex2Symb(#temp))
480	{	487	{
481	bword+=2;	488	bword+=2;
482	goto DEFAULT_MARK;	489	goto DEFAULT_MARK;
483	}	490	}
484	break;	491	break;
485		492
486	case '&': // and so on	493	case '&': // and so on
487	bword++;	494	bword++;
488	tag=0;	495	tag=0;
489	for (j=0; (ESBYTE[bword]<>';') && (j<7); j++, bword++;)	496	for (j=0; (ESBYTE[bword]<>';') && (j<7); j++, bword++;)

Subversion Repositories Kolibri OS

(root)/programs/cmm/browser/TWB.h – Rev 3990 → 3992