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