Subversion Repositories Kolibri OS

Rev

Rev 5499 | 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
 
5444 leency 90
progress_bar 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);
5506 punk_joker 105
	if (load_dll2(boxlib, #box_lib_init,0)!=0)	        notify("Error while loading library - box_lib.obj");
4509 leency 106
	if (load_dll2(network_lib, #network_lib_init,0)!=0)	notify("Error while loading library - network.obj");
107
	if (load_dll2(netcode_lib, #base64_encode,0)!=0)	notify("Error while loading library - netcode.obj");
108
	if (load_dll2(iconv_lib, #iconv_open,0)!=0)	      { notify("Error while loading library - iconv.obj"); use_iconv=2; }
109
	if (load_dll2(libio, #libio_init,1)!=0)             notify("Error while loading library - libio.obj");
110
	if (load_dll2(libimg, #libimg_init,1)!=0)           notify("Error while loading library - libimg.obj");
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
	{
139
		strcpy(#pass_b64, #read_data+strchr(#read_data, '\n')+1);
140
		base64_decode stdcall (#pass_b64, #pass_text, strlen(#pass_b64));
141
		read_data[strchr(#read_data, '\n')-1] = NULL;
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