Go to most recent revision | Details | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
4662 | leency | 1 | #define MEMSIZE 0x100000 |
2 | //libraries |
||
3 | #include "..\lib\kolibri.h" |
||
4 | #include "..\lib\strings.h" |
||
5 | #include "..\lib\figures.h" |
||
6 | #include "..\lib\file_system.h" |
||
7 | #include "..\lib\mem.h" |
||
8 | #include "..\lib\dll.h" |
||
9 | #include "..\lib\list_box.h" |
||
10 | //*.obj libraries |
||
11 | #include "..\lib\lib.obj\box_lib.h" |
||
12 | #include "..\lib\lib.obj\libio_lib.h" |
||
13 | #include "..\lib\lib.obj\http.h" |
||
14 | |||
15 | char header[]="New Downloader v0.4"; |
||
16 | |||
17 | #ifdef LANG_RUS |
||
18 | char accept_language[]= "Accept-Language: ru\n"; |
||
19 | #else |
||
20 | char accept_language[]= "Accept-Language: en\n"; |
||
21 | #endif |
||
22 | |||
23 | proc_info Form; |
||
24 | #define WIN_W 400 |
||
25 | #define WIN_H 240 |
||
26 | system_colors sc; |
||
27 | #define URL param |
||
28 | |||
29 | int mouse_twb; |
||
30 | edit_box address_box= {250,20,20,0xffffff,0x94AECE,0xffffff,0xffffff,0,sizeof(URL),#URL,#mouse_twb,2,19,19}; |
||
31 | |||
32 | dword speed[2000]; |
||
33 | dword speed_position; |
||
34 | dword bufpointer; |
||
35 | dword bufsize; |
||
36 | |||
37 | dword http_transfer = 0; |
||
38 | dword http_buffer; |
||
39 | |||
40 | struct diagram { |
||
41 | int x,y,w,h; |
||
42 | } diagram; |
||
43 | |||
44 | void main() |
||
45 | { |
||
46 | int key, btn; |
||
47 | mouse m; |
||
48 | char filepath[4096]; |
||
49 | char notify_message[4296]; |
||
50 | |||
51 | mem_Init(); |
||
52 | if (load_dll2(boxlib, #box_lib_init,0)!=0) {notify("System Error: library doesn't exists /rd/1/lib/box_lib.obj"); ExitProcess();} |
||
53 | if (load_dll2(libio, #libio_init,1)!=0) notify("Error: library doesn't exists - libio"); |
||
54 | if (load_dll2(libHTTP, #http_lib_init,1)!=0) notify("Error: library doesn't exists - http"); |
||
55 | if (!URL) strcpy(#URL, "http://builds.kolibrios.org/eng/latest-iso.7z"); |
||
56 | address_box.size = address_box.pos = strlen(#URL); |
||
57 | |||
58 | SetEventMask(0xa7); |
||
59 | loop() |
||
60 | { |
||
61 | WaitEventTimeout(40); |
||
62 | switch(EAX & 0xFF) |
||
63 | { |
||
64 | CASE evMouse: |
||
65 | if (!CheckActiveProcess(Form.ID)) break; |
||
66 | if (http_transfer <= 0) edit_box_mouse stdcall (#address_box); |
||
67 | break; |
||
68 | |||
69 | case evButton: |
||
70 | btn=GetButtonID(); |
||
71 | if (btn==1) ExitProcess(); |
||
72 | Scan(btn); |
||
73 | break; |
||
74 | |||
75 | case evKey: |
||
76 | key = GetKey(); |
||
77 | if (address_box.flags & 0b10) |
||
78 | { |
||
79 | EAX=key<<8; |
||
80 | edit_box_key stdcall(#address_box); |
||
81 | } |
||
82 | if (key==13) Scan(301); |
||
83 | break; |
||
84 | |||
85 | case evReDraw: |
||
86 | sc.get(); |
||
87 | DefineAndDrawWindow(215,100,WIN_W,WIN_H,0x73,sc.work,#header,0); |
||
88 | GetProcessInfo(#Form, SelfInfo); |
||
89 | if (Form.status_window>2) return; |
||
90 | if (Form.height<120) MoveSize(OLD,OLD,OLD,120); |
||
91 | if (Form.width<280) MoveSize(OLD,OLD,280,OLD); |
||
92 | diagram.x = 20; |
||
93 | diagram.y = 87; |
||
94 | diagram.w = Form.cwidth - diagram.x - diagram.x; |
||
95 | diagram.h = Form.cheight - diagram.y - 28; |
||
96 | Draw_Window(); |
||
97 | break; |
||
98 | |||
99 | default: |
||
100 | if (Form.width==0) break; |
||
101 | if (http_transfer <= 0) break; |
||
102 | http_process stdcall (http_transfer); |
||
103 | if (EAX == 0) { |
||
104 | ESI = http_transfer; |
||
105 | bufpointer = ESI.http_msg.content_ptr; |
||
106 | bufsize = ESI.http_msg.content_received; |
||
107 | http_free stdcall (http_transfer); |
||
108 | http_transfer=0; |
||
109 | strcpy(#filepath, "/tmp0/1/"); |
||
110 | strcat(#filepath, #URL+strrchr(#URL, '/')); |
||
111 | if (WriteFile(bufsize, bufpointer, #filepath)) |
||
112 | { |
||
113 | strcpy(#notify_message, "File saved as "); |
||
114 | } |
||
115 | else |
||
116 | { |
||
117 | strcpy(#notify_message, "Error! Can't save file as "); |
||
118 | } |
||
119 | strcat(#notify_message, #filepath); |
||
120 | notify(#notify_message); |
||
121 | address_box.color = address_box.blur_border_color = address_box.focus_border_color = 0xFFFfff; |
||
122 | Draw_Window(); |
||
123 | } |
||
124 | ESI = http_transfer; |
||
125 | speed[speed_position] = ESI.http_msg.content_received; |
||
126 | DrawSpeed(); |
||
127 | speed_position++; |
||
128 | } |
||
129 | } |
||
130 | } |
||
131 | |||
132 | void DrawSpeed() |
||
133 | { |
||
134 | int i; |
||
135 | int speed_in_position; |
||
136 | int max_speed, start_from; |
||
137 | char bytes_received[70]; |
||
138 | |||
139 | DrawBar(diagram.x, diagram.y, diagram.w, diagram.h+1, 0xFCF8F7); |
||
140 | max_speed = speed[speed_position]; |
||
141 | if (speed_position < diagram.w) start_from = 0; else start_from = speed_position - diagram.w; |
||
142 | for (i = 0; i <= speed_position-start_from; i++) |
||
143 | { |
||
144 | if (max_speed>0) |
||
145 | { |
||
146 | speed_in_position = diagram.h - 2 * speed[i+start_from] / max_speed; |
||
147 | PutPixel(diagram.x+i, diagram.h - speed_in_position + diagram.y, 0x00A3CB); |
||
148 | ECX++; |
||
149 | $int 64; |
||
150 | } |
||
151 | } |
||
152 | if (speed_position==0) return; |
||
153 | if (http_transfer > 0) |
||
154 | { |
||
155 | strcpy(#bytes_received, "Downloading... "); |
||
156 | } |
||
157 | else |
||
158 | { |
||
159 | strcpy(#bytes_received, "Downloading competle. "); |
||
160 | } |
||
161 | strcat(#bytes_received, itoa(speed[speed_position-1])); |
||
162 | strcat(#bytes_received, " bytes received."); |
||
163 | DrawBar(diagram.x, diagram.y + diagram.h + 10, diagram.w, 9, sc.work); |
||
164 | WriteText(diagram.x, diagram.y + diagram.h + 10, 0x80, sc.work_text, #bytes_received); |
||
165 | } |
||
166 | |||
167 | void Draw_Window() |
||
168 | { |
||
169 | DrawBar(0,0,Form.cwidth,Form.cheight,sc.work); //bg |
||
170 | DrawCaptButton(diagram.x, 50, 120, 20, 301, sc.work_button, sc.work_button_text, "Start downloading"); |
||
171 | if (http_transfer <= 0) && (speed_position>0) |
||
172 | { |
||
173 | DrawCaptButton(diagram.x+130, 50, 120, 20, 305, sc.work_button, sc.work_button_text, "Show in folder"); |
||
174 | } |
||
175 | WriteText(diagram.x, address_box.top + 4, 0x80, sc.work_text, "URL:"); |
||
176 | address_box.left = strlen("URL:")*6 + 10 + diagram.x; |
||
177 | address_box.width = Form.cwidth - address_box.left - diagram.x - 3; |
||
178 | address_box.offset=0; |
||
179 | edit_box_draw stdcall(#address_box); |
||
180 | DrawRectangle(address_box.left-1, address_box.top-1, address_box.width+2, 16,address_box.color); |
||
181 | DrawRectangle(address_box.left-2, address_box.top-2, address_box.width+4, 18,sc.work_graph); |
||
182 | |||
183 | DrawRectangle(diagram.x-2, diagram.y-2, diagram.w+2, diagram.h+3, sc.work_graph); |
||
184 | DrawSpeed(); |
||
185 | } |
||
186 | |||
187 | void Scan(int id) |
||
188 | { |
||
189 | if (id==301) StartDownloading(); |
||
190 | if (id==302) StopDownloading(); |
||
191 | if (id==305) RunProgram("/sys/File managers/Eolite", "/tmp0/1/"); |
||
192 | } |
||
193 | |||
194 | |||
195 | void StopDownloading() |
||
196 | { |
||
197 | if (http_transfer<>0) |
||
198 | { |
||
199 | EAX = http_transfer; |
||
200 | EAX = EAX.http_msg.content_ptr; // get pointer to data |
||
201 | $push EAX // save it on the stack |
||
202 | http_free stdcall (http_transfer); // abort connection |
||
203 | $pop EAX |
||
204 | mem_Free(EAX); // free data |
||
205 | http_transfer=0; |
||
206 | bufsize = 0; |
||
207 | bufpointer = mem_Free(bufpointer); |
||
208 | } |
||
209 | address_box.color = address_box.blur_border_color = address_box.focus_border_color = 0xFFFfff; |
||
210 | Draw_Window(); |
||
211 | } |
||
212 | |||
213 | void StartDownloading() |
||
214 | { |
||
215 | StopDownloading(); |
||
216 | speed_position = 0; |
||
217 | if (strncmp(#URL,"http:",5)==0) |
||
218 | { |
||
219 | address_box.color = address_box.blur_border_color = address_box.focus_border_color = 0xededed; |
||
220 | Draw_Window(); |
||
221 | http_get stdcall (#URL, #accept_language); |
||
222 | http_transfer = EAX; |
||
223 | if (http_transfer == 0) |
||
224 | { |
||
225 | StopDownloading(); |
||
226 | bufsize = 0; |
||
227 | bufpointer = mem_Free(bufpointer); |
||
228 | return; |
||
229 | } |
||
230 | } |
||
231 | else |
||
232 | { |
||
233 | notify("File adress should starts form http://"); |
||
234 | } |
||
235 | } |
||
236 | |||
237 | |||
238 | |||
239 | stop:>=>=>>=>280)>120)>8;><8;>=> |