Subversion Repositories Kolibri OS

Rev

Rev 2739 | 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
 
2739 leency 24
int max_kolvo_strok, //lines_visible
25
	max_kolvo_stolbcov,
26
	count, //lines_all
27
	za_kadrom,
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;
1971 lev 34
 
35
 
2413 leency 36
#include "TWB.h"
1971 lev 37
 
38
 
39
void main()
40
{
2153 leency 41
	mouse m;
42
	int btn;
43
	byte key;
2739 leency 44
	int scroll_size;
2153 leency 45
 
2739 leency 46
	mem_Init();
47
	load_dll2(libio, #libio_init,1);
48
	load_dll2(libimg, #libimg_init,1);
49
	load_dll2(boxlib, #edit_box_draw,0);
50
	load_dll2(#abox_lib, #boxlib_init,0);
2248 leency 51
 
2739 leency 52
	if (param) copystr(#param,#URL);
53
		else copystr("/sys/index.htm",#URL);
2558 leency 54
 
2248 leency 55
	copystr(#URL,#editURL);
56
 
2420 leency 57
	if (!strcmp(get_URL_part(5),"http:"))) HttpLoad();
2433 leency 58
	//Draw_Window();  //shis is right
59
	//WB1.ShowPage(#URL);  //shis is right
2420 leency 60
 
1971 lev 61
	SetEventMask(0x27);
62
	loop()
63
	{
2739 leency 64
		WaitEventTimeout(1);
65
		switch(EAX & 0xFF)
1971 lev 66
		{
2739 leency 67
			CASE evMouse:
68
				edit_box_mouse stdcall (#edit1);
69
 
70
				/*scrollbar_v_mouse (#scroll1);      //конченый скролл притормажимает, идём "своим путём"
71
				if (za_kadrom <> scroll1.position)
72
				{
73
					za_kadrom = scroll1.position;
74
					WB1.ParseHTML(buf, filesize);
75
					//break;
76
				};*/
1971 lev 77
				m.get();
2739 leency 78
 
1971 lev 79
				IF (m.vert==65535) //прокрутка колёсиком
80
				{
81
					IF (za_kadrom==0) break;
82
					IF (za_kadrom>3) za_kadrom-=2; ELSE za_kadrom=1;
83
					WB1.Scan(ID1);
2739 leency 84
					break;
1971 lev 85
				}
86
				IF (m.vert==1)
87
				{
2238 leency 88
					IF(max_kolvo_strok+za_kadrom+3>=count) WB1.Scan(181);
1971 lev 89
					ELSE	{
90
						za_kadrom+=2;
91
						WB1.Scan(ID2);
92
					}
2739 leency 93
					break;
1971 lev 94
				}
2739 leency 95
 
96
				IF (count
97
				scroll_size = WB1.height - 16 * max_kolvo_strok / count - 3;
2085 leency 98
				if (m.x>=WB1.width-14) && (m.x<=WB1.width+6)
99
				&& (m.y>WB1.top+16) && (m.y
2238 leency 100
				&& (count>max_kolvo_strok) while (m.lkm)
1971 lev 101
				{
2238 leency 102
					IF (scroll_size/2+WB1.top>m.y) || (m.y<0) || (m.y>4000) m.y=scroll_size/2+WB1.top; //если курсор над окном
1971 lev 103
					btn=za_kadrom; //сохраняем старое количество
2238 leency 104
					j= scroll_size/2;
105
					za_kadrom = m.y -j -WB1.top * count / WB1.height;
106
					IF (max_kolvo_strok+za_kadrom>count) za_kadrom=count-max_kolvo_strok;
1971 lev 107
					IF (btn<>za_kadrom) WB1.ParseHTML(buf, filesize); //чтоб лишний раз не перерисовывать
108
					m.get();
2739 leency 109
				}
110
 
2413 leency 111
				break;
1971 lev 112
			case evButton:
113
				btn=GetButtonID();
2413 leency 114
				IF (btn==1)
115
				{
116
					KillProcess(downloader_id);
117
					ExitProcess();
118
				}
1971 lev 119
				ELSE
120
				{
121
					WB1.Scan(btn);
122
				}
1974 yogev_ezra 123
				BREAK;
1971 lev 124
			case evKey:
125
				key = GetKey();
126
				WB1.Scan(key);
1974 yogev_ezra 127
				IF (key<>0x0d) && (key<>183) && (key<>184) && (key<>173) {EAX=key<<8; edit_box_key stdcall(#edit1);} //адресная строка
128
				BREAK;
1971 lev 129
			case evReDraw:
130
				Draw_Window();
131
				break;
2739 leency 132
			default:
133
				if (downloader_id<>0)
134
				{
135
					if (GetProcessSlot(downloader_id)<>0) break;
136
					downloader_id=0;
137
					Draw_Window();
138
				}
1971 lev 139
		}
140
	}
141
}
142
 
143
 
144
void Draw_Window()
145
{
146
	DefineAndDrawWindow(215,100,640,480,0x73,0x00E4DFE1,0,0,0);
2248 leency 147
 
2250 leency 148
	GetProcessInfo(#Form, SelfInfo);
2763 leency 149
	IF (Form.status_window>2) //если свернуто в заголовок, ничего не рисуем
1971 lev 150
	{
151
		DrawTitle(#header);
152
		return;
153
	}
154
	IF (Form.height<120) MoveSize(OLD,OLD,OLD,120);
155
	IF (Form.width<280) MoveSize(OLD,OLD,280,OLD);
2155 leency 156
 
157
	PutPaletteImage(#toolbar,200,42,0,0,8,#toolbar_pal);
2413 leency 158
	if (GetProcessSlot(downloader_id)<>0) PutImage(#stop_btn,24,24,88,10);
159
 
2155 leency 160
	DrawBar(200,0,onLeft(200,9),43,0xE4DFE1); //закрашиваем фон под тулбаром
1971 lev 161
	DrawBar(0,42,onLeft(5,4),1,0xE2DBDC); //выпуклость
162
	DrawBar(0,43,onLeft(5,4),1,0xD2CED0); //выпуклость
163
	FOR (j=0; j<5; j++) DefineButton(j*37+11, 7, 29, 29, 300+j+BT_HIDE, 0x00E4DFE1);
164
	PutImage(#URLgoto,40,19,onLeft(57,0),14);
2152 leency 165
	DefineButton(onLeft(37,0),15, 18, 16, GOTOURL+BT_HIDE, 0xE4DFE1);
166
	DefineButton(onLeft(56,0),15, 17, 16, SEARCHWEB+BT_HIDE, 0xE4DFE1);
2739 leency 167
	DrawRegion(205,14,onLeft(58,205),18,0x94AECE); //ободок полосы адреса
168
	DrawRegion(206,15,onLeft(59,205),16,0xE4ECF3);
169
 
1971 lev 170
	edit1.width=Form.width-266;
2433 leency 171
	//edit_box_draw stdcall(#edit1); //рисуем строку адреса  //shis is right
172
 
1971 lev 173
	WB1.top=44;
2739 leency 174
	WB1.width=Form.width-13;
1971 lev 175
	WB1.height=onTop(43,5);
2399 leency 176
	WB1.ShowPage(#URL);
2739 leency 177
 
2433 leency 178
	//WB1.ParseHTML(buf, filesize); //shis is right
1971 lev 179
}
180
 
2238 leency 181
int onLeft(dword right,left) {return Form.width-right-left;}
182
int onTop(dword down,up) {return Form.height-GetSkinWidth()-down-up;}
1971 lev 183
 
184
 
185
stop: