Rev 5625 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
3368 | leency | 1 | //Leency & SoUrcerer, LGPL |
2 | |||
3 | //libraries |
||
4509 | leency | 4 | #define MEMSIZE 0x100000 |
4152 | leency | 5 | #include "../lib/kolibri.h" |
6 | #include "../lib/strings.h" |
||
7 | #include "../lib/mem.h" |
||
8 | #include "../lib/dll.h" |
||
9 | #include "../lib/encoding.h" |
||
5499 | leency | 10 | #include "../lib/gui.h" |
4152 | leency | 11 | #include "../lib/file_system.h" |
12 | #include "../lib/list_box.h" |
||
5499 | leency | 13 | #include "../lib/socket.h" |
4509 | leency | 14 | #include "../lib/draw_buf.h" |
15 | #include "../lib/cursor.h" |
||
3368 | leency | 16 | //*.obj libraries |
5499 | leency | 17 | #include "../lib/obj/box_lib.h" |
18 | #include "../lib/obj/network.h" |
||
19 | #include "../lib/obj/libio_lib.h" |
||
20 | #include "../lib/obj/libimg_lib.h" |
||
21 | #include "../lib/obj/netcode.h" |
||
22 | #include "../lib/obj/iconv.h" |
||
3368 | leency | 23 | //images |
4152 | leency | 24 | byte letter_icons[sizeof(file "img/letter_icons.raw")] = FROM "img/letter_icons.raw"; |
25 | #include "img/letter_icons.h" |
||
3368 | leency | 26 | |
27 | //connection algorithm |
||
28 | enum { |
||
29 | STOP, |
||
4139 | hidnplayr | 30 | RESOLVE, |
31 | OPEN_CONNECTION, |
||
3368 | leency | 32 | GET_ANSWER_CONNECT, |
33 | SEND_USER, |
||
34 | GET_ANSWER_USER, |
||
35 | SEND_PASS, |
||
36 | GET_ANSWER_PASS, |
||
37 | SEND_NLIST, |
||
38 | GET_ANSWER_NLIST, |
||
39 | SEND_NSTAT, |
||
40 | GET_ANSWER_NSTAT, |
||
41 | SEND_RETR, |
||
4164 | leency | 42 | GET_ANSWER_RETR |
3368 | leency | 43 | }; |
44 | |||
45 | //WindowDefinitions |
||
46 | #define WIN_W 600 |
||
47 | #define WIN_H 440 |
||
48 | #define WIN_MIN_W 500 |
||
49 | #define WIN_MIN_H 380 |
||
4186 | leency | 50 | #define LOGIN_HEADER "Login - Email client Liza 0.9.3" |
51 | #define OPTIONS_HEADER "Options - Email client Liza 0.9.3" |
||
52 | #define MAILBOX_HEADER "Mail Box - Email client Liza 0.9.3" |
||
4139 | hidnplayr | 53 | #define BUFFERSIZE 512 |
3368 | leency | 54 | proc_info Form; |
55 | system_colors sc; |
||
56 | #define LBUMP 0xFFFfff |
||
57 | |||
58 | //progress_bar definitions |
||
59 | char cur_st_percent; |
||
60 | dword cur_st_text; |
||
61 | |||
62 | //connection data |
||
63 | #define DEFAULT_POP_PORT 110; |
||
64 | char POP_server_path[128]; |
||
65 | dword POP_server_port; |
||
66 | char login[128]; |
||
67 | char request[256+22]; |
||
68 | int request_len; |
||
69 | char connection_status; |
||
4139 | hidnplayr | 70 | dword socketnum; |
3368 | leency | 71 | |
4139 | hidnplayr | 72 | sockaddr_in sockaddr; |
73 | |||
3368 | leency | 74 | int aim; |
75 | int ticks; |
||
76 | |||
4139 | hidnplayr | 77 | char immbuffer[BUFFERSIZE]; |
3368 | leency | 78 | |
4164 | leency | 79 | llist mail_list; |
80 | llist letter_view; |
||
81 | |||
4870 | leency | 82 | dword TAB_H = false; //19; |
83 | dword TAB_W = 150; |
||
84 | dword TOOLBAR_H = 31; //50; |
||
85 | dword STATUSBAR_H =15; |
||
86 | dword col_bg; |
||
87 | dword panel_color; |
||
88 | dword border_color; |
||
89 | |||
5520 | leency | 90 | progress_bar wv_progress_bar = {0, 10, 83, 150, 12, 0, 0, 100, 0xeeeEEE, 8072B7EBh, 0x9F9F9F}; |
4870 | leency | 91 | |
92 | int http_transfer; |
||
4509 | leency | 93 | char version[]=" WebView 0.1"; |
94 | #include "..\TWB\TWB.c" |
||
95 | |||
3368 | leency | 96 | #include "settings.c" |
97 | #include "login.c" |
||
4164 | leency | 98 | #include "letter_attr.c" |
3368 | leency | 99 | #include "mail_box.c" |
100 | #include "parselist.c" |
||
101 | |||
4509 | leency | 102 | void main() { |
3368 | leency | 103 | mem_Init(); |
4509 | leency | 104 | CursorPointer.Load(#CursorFile); |
5626 | leency | 105 | load_dll(boxlib, #box_lib_init,0); |
106 | load_dll(network_lib, #network_lib_init,0); |
||
107 | load_dll(netcode_lib, #base64_encode,0); |
||
108 | load_dll(libio, #libio_init,1); |
||
109 | load_dll(libimg, #libimg_init,1); |
||
110 | if (load_dll2(iconv_lib, #iconv_open,0)!=0) { notify("Error while loading library - iconv.obj"); use_iconv=2; } |
||
3368 | leency | 111 | OpenMailDat(); |
112 | SetEventMask(0x27); |
||
113 | LoginBoxLoop(); |
||
114 | } |
||
115 | |||
116 | |||
4509 | leency | 117 | int DefineWindow(dword wtitle) { |
3368 | leency | 118 | sc.get(); |
119 | DefineAndDrawWindow(GetScreenWidth()-WIN_W/2,GetScreenHeight()-WIN_H/2, WIN_W, WIN_H, 0x73,sc.work); |
||
120 | DrawTitle(wtitle); |
||
121 | GetProcessInfo(#Form, SelfInfo); |
||
122 | if (Form.status_window>2) return 0; //rolled_up |
||
123 | if (Form.width < WIN_MIN_W) MoveSize(OLD,OLD,WIN_MIN_W,OLD); |
||
124 | if (Form.height < WIN_MIN_H) MoveSize(OLD,OLD,OLD,WIN_MIN_H); |
||
125 | return 1; |
||
126 | } |
||
127 | |||
128 | |||
4509 | leency | 129 | void OpenMailDat() { |
3368 | leency | 130 | char read_data[512], pass_b64[256]; |
131 | ReadFile(0, 512, #read_data, "/sys/network/mail.dat"); |
||
132 | if (!read_data) |
||
133 | { |
||
4169 | leency | 134 | strcpy(#email_text, "testliza@ya.ru"); |
4164 | leency | 135 | strcpy(#pass_text, "kolibri"); |
3368 | leency | 136 | } |
137 | else |
||
138 | { |
||
5625 | leency | 139 | strcpy(#pass_b64, strchr(#read_data, '\n')); |
3368 | leency | 140 | base64_decode stdcall (#pass_b64, #pass_text, strlen(#pass_b64)); |
5625 | leency | 141 | ESBYTE[strchr(#read_data, '\n')] = NULL; |
3368 | leency | 142 | strcpy(#email_text, #read_data); |
143 | } |
||
144 | pass_box.size = pass_box.pos = strlen(#pass_text); |
||
145 | login_box.size = login_box.pos = strlen(#email_text); |
||
146 | } |
||
147 | |||
4509 | leency | 148 | void SaveAndExit() { |
3368 | leency | 149 | char write_data[512], pass_b64[256]; |
4139 | hidnplayr | 150 | Close(socketnum); |
3368 | leency | 151 | strcpy(#write_data, #email_text); |
4153 | leency | 152 | chrcat(#write_data, '\n'); |
3368 | leency | 153 | base64_encode stdcall (#pass_text, #pass_b64, strlen(#pass_text)); |
154 | strcat(#write_data, #pass_b64); |
||
155 | WriteFile(strlen(#write_data)+1, #write_data, "/sys/network/mail.dat"); |
||
156 | ExitProcess(); |
||
157 | } |
||
158 | |||
4169 | leency | 159 | |
4509 | leency | 160 | int GetRequest(dword command, text) { |
4166 | leency | 161 | strcpy(#request, command); |
162 | if (text) |
||
163 | { |
||
164 | chrcat(#request, ' '); |
||
165 | strcat(#request, text); |
||
166 | } |
||
167 | strcat(#request, "\n"); |
||
168 | return strlen(#request); |
||
169 | } |
||
3368 | leency | 170 | |
4509 | leency | 171 | void StopConnect(dword message) { |
4166 | leency | 172 | if (message) notify(message); |
173 | aim = STOP; |
||
4169 | leency | 174 | Close(socketnum); |
4166 | leency | 175 | } |
176 | |||
3368 | leency | 177 | stop:>> |
178 |