Subversion Repositories Kolibri OS

Rev

Rev 2803 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1971 lev 1
//HTML Viewer in C--
2433 leency 2
//Copyright 2007-2012 by Veliant & Leency
2739 leency 3
//Asper, lev, Lrz, Barsuk, Nable.
2696 leency 4
//home icon - rachel fu, GPL licence
5
 
2413 leency 6
#include "..\lib\kolibri.h--"
2660 leency 7
#include "..\lib\encoding.h--"
2413 leency 8
#include "..\lib\file_system.h--"
9
#include "img\toolbar_icons.c"
10
#include "img\URLgoto.txt";
11
#include "..\lib\mem.h--"
12
#include "..\lib\libio_lib.h--"
13
#include "..\lib\libimg_lib.h--"
14
#include "..\lib\edit_box_lib.h--"
15
#include "..\lib\dll.h--"
2739 leency 16
#include "..\lib\scroll_bar\scroll_lib.h--"
1971 lev 17
 
18
//переменные
2558 leency 19
char URL[4096],
1971 lev 20
	editURL[4096],
21
	page_links[12000],
22
	header[512];
23
 
2810 leency 24
int lines_visible,
25
	lines_all,
26
	lines_first,
27
	lines_column_max,
1971 lev 28
	mouse_dd;
29
 
30
edit_box edit1= {250,207,16,0xffffff,0x94AECE,0xffffff,0xffffff,0,248,#editURL,#mouse_dd,2,19,19};
2739 leency 31
scroll_bar scroll1 = { 18,200,398, 44,18,0,115,15,0,0xeeeeee,0xD2CED0,0x555555,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1}; //details in scroll_lib.h--
1971 lev 32
 
2413 leency 33
proc_info Form;
2764 leency 34
dword stak[100]; //меню ПКМ
35
mouse m;
1971 lev 36
 
2413 leency 37
#include "TWB.h"
2764 leency 38
#include "include\menu_rmb.h"
1971 lev 39
 
40
 
41
void main()
42
{
2153 leency 43
	int btn;
44
	byte key;
2810 leency 45
	int half_scroll_size;
2153 leency 46
 
2739 leency 47
	mem_Init();
48
	load_dll2(libio, #libio_init,1);
49
	load_dll2(libimg, #libimg_init,1);
50
	load_dll2(boxlib, #edit_box_draw,0);
51
	load_dll2(#abox_lib, #boxlib_init,0);
2248 leency 52
 
2810 leency 53
	if (param) strcpy(#URL, #param);
54
		else strcpy(#URL, "/sys/index.htm");
55
	strcpy(#editURL, #URL);
2248 leency 56
 
2764 leency 57
	OpenPage();
2420 leency 58
 
1971 lev 59
	SetEventMask(0x27);
60
	loop()
61
	{
2764 leency 62
		WaitEventTimeout(2);
2739 leency 63
		switch(EAX & 0xFF)
1971 lev 64
		{
2739 leency 65
			CASE evMouse:
66
				/*scrollbar_v_mouse (#scroll1);      //конченый скролл притормажимает, идём "своим путём"
2810 leency 67
				if (lines_first <> scroll1.position)
2739 leency 68
				{
2810 leency 69
					lines_first = scroll1.position;
2739 leency 70
					WB1.ParseHTML(buf, filesize);
71
					//break;
72
				};*/
2803 leency 73
 
2764 leency 74
				btn=GetSlot(Form.ID);
75
				IF (btn<>ActiveProcess()) break; //если окно не активно на события мыши не реагируем
76
 
2803 leency 77
				edit_box_mouse stdcall (#edit1);
78
 
1971 lev 79
				m.get();
2764 leency 80
 
81
				if (m.pkm) && (m.y>WB1.top) && (m.y
82
				{
83
					CreateThread(#menu_rmb,#stak);
84
				}
2739 leency 85
 
1971 lev 86
				IF (m.vert==65535) //прокрутка колёсиком
87
				{
2810 leency 88
					IF (lines_first==0) break;
89
					IF (lines_first>3) lines_first-=2; ELSE lines_first=1;
1971 lev 90
					WB1.Scan(ID1);
2739 leency 91
					break;
1971 lev 92
				}
93
				IF (m.vert==1)
94
				{
2810 leency 95
					IF(lines_visible+lines_first+3>=lines_all) WB1.Scan(181);
1971 lev 96
					ELSE	{
2810 leency 97
						lines_first+=2;
1971 lev 98
						WB1.Scan(ID2);
99
					}
2739 leency 100
					break;
1971 lev 101
				}
2739 leency 102
 
2810 leency 103
				IF (lines_all
104
				half_scroll_size = WB1.height - 16 * lines_visible / lines_all - 3 /2;
2085 leency 105
				if (m.x>=WB1.width-14) && (m.x<=WB1.width+6)
106
				&& (m.y>WB1.top+16) && (m.y
2810 leency 107
				&& (lines_all>lines_visible) while (m.lkm)
1971 lev 108
				{
2810 leency 109
					IF (half_scroll_size/2+WB1.top>m.y) || (m.y<0) || (m.y>4000) m.y=half_scroll_size/2+WB1.top; //если курсор над окном
110
					btn=lines_first; //сохраняем старое количество
111
					lines_first = m.y -half_scroll_size -WB1.top * lines_all / WB1.height;
112
					IF (lines_visible+lines_first>lines_all) lines_first=lines_all-lines_visible;
113
					IF (btn<>lines_first) WB1.ParseHTML(buf, filesize); //чтоб лишний раз не перерисовывать
1971 lev 114
					m.get();
2739 leency 115
				}
116
 
2413 leency 117
				break;
1971 lev 118
			case evButton:
119
				btn=GetButtonID();
2413 leency 120
				IF (btn==1)
121
				{
122
					KillProcess(downloader_id);
123
					ExitProcess();
124
				}
1971 lev 125
				ELSE
126
				{
127
					WB1.Scan(btn);
128
				}
2764 leency 129
				break;
1971 lev 130
			case evKey:
131
				key = GetKey();
2803 leency 132
 
133
				if (edit1.flags == 66) || (edit1.flags == 98) SWITCH(key) //если активна строка адреса игнорируем некоторые кнопки
134
					{ CASE 52: CASE 53: CASE 54: goto _EDIT_MARK; }
135
 
1971 lev 136
				WB1.Scan(key);
2803 leency 137
 
138
				_EDIT_MARK:
1974 yogev_ezra 139
				IF (key<>0x0d) && (key<>183) && (key<>184) && (key<>173) {EAX=key<<8; edit_box_key stdcall(#edit1);} //адресная строка
2764 leency 140
				break;
1971 lev 141
			case evReDraw:
142
				Draw_Window();
143
				break;
2739 leency 144
			default:
145
				if (downloader_id<>0)
146
				{
147
					if (GetProcessSlot(downloader_id)<>0) break;
148
					downloader_id=0;
2810 leency 149
					lines_first = lines_all = 0;
2764 leency 150
					ReadHtml();
151
					if (filesize) wintodos(buf);
2739 leency 152
					Draw_Window();
153
				}
1971 lev 154
		}
155
	}
156
}
157
 
158
 
159
void Draw_Window()
160
{
2810 leency 161
	int j;
1971 lev 162
	DefineAndDrawWindow(215,100,640,480,0x73,0x00E4DFE1,0,0,0);
2764 leency 163
 
2250 leency 164
	GetProcessInfo(#Form, SelfInfo);
2810 leency 165
	if (Form.status_window>2) //если свернуто в заголовок, ничего не рисуем
1971 lev 166
	{
167
		DrawTitle(#header);
168
		return;
169
	}
2810 leency 170
	if (Form.height<120) MoveSize(OLD,OLD,OLD,120);
171
	if (Form.width<280) MoveSize(OLD,OLD,280,OLD);
2155 leency 172
 
173
	PutPaletteImage(#toolbar,200,42,0,0,8,#toolbar_pal);
2413 leency 174
	if (GetProcessSlot(downloader_id)<>0) PutImage(#stop_btn,24,24,88,10);
175
 
2155 leency 176
	DrawBar(200,0,onLeft(200,9),43,0xE4DFE1); //закрашиваем фон под тулбаром
1971 lev 177
	DrawBar(0,42,onLeft(5,4),1,0xE2DBDC); //выпуклость
178
	DrawBar(0,43,onLeft(5,4),1,0xD2CED0); //выпуклость
2810 leency 179
	for (j=0; j<5; j++) DefineButton(j*37+11, 7, 29, 29, 300+j+BT_HIDE, 0x00E4DFE1);
1971 lev 180
	PutImage(#URLgoto,40,19,onLeft(57,0),14);
2152 leency 181
	DefineButton(onLeft(37,0),15, 18, 16, GOTOURL+BT_HIDE, 0xE4DFE1);
182
	DefineButton(onLeft(56,0),15, 17, 16, SEARCHWEB+BT_HIDE, 0xE4DFE1);
2739 leency 183
	DrawRegion(205,14,onLeft(58,205),18,0x94AECE); //ободок полосы адреса
184
	DrawRegion(206,15,onLeft(59,205),16,0xE4ECF3);
2764 leency 185
 
1971 lev 186
	edit1.width=Form.width-266;
187
	WB1.top=44;
2739 leency 188
	WB1.width=Form.width-13;
1971 lev 189
	WB1.height=onTop(43,5);
2810 leency 190
	lines_column_max = WB1.width - 30 / 6;
191
	lines_visible = WB1.height - 3 / 10 - 2;
2764 leency 192
 
2399 leency 193
	WB1.ShowPage(#URL);
1971 lev 194
}
195
 
2238 leency 196
int onLeft(dword right,left) {return Form.width-right-left;}
197
int onTop(dword down,up) {return Form.height-GetSkinWidth()-down-up;}
1971 lev 198
 
199
 
200
stop: