Subversion Repositories Kolibri OS

Rev

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
//LoginPanel
4
#define PANEL_W 220
5
#define PANEL_H 140
6
int panel_x, panel_y;
7
 
8
//edit_boxes at LoginPanel
9
int	mouse_dd;
10
unsigned char email_text[128];
11
unsigned char pass_text[32];
12
edit_box login_box= {PANEL_W-6,207,16,0xffffff,0x94AECE,0xffffff,0xffffff,0,sizeof(email_text)+2,#email_text,#mouse_dd,0b10};
13
edit_box pass_box= {PANEL_W-6,207,16,0xffffff,0x94AECE,0xffffff,0xffffff,0,sizeof(pass_text)+2,#pass_text,#mouse_dd,0b1};
14
 
15
 
4169 leency 16
void LoginNetworkProcess()
3368 leency 17
{
4169 leency 18
	if (aim) switch(aim)
3368 leency 19
	{
4169 leency 20
		case RESOLVE:
21
					if (!email_text) StopConnect("Enter email!");
22
					if (!pass_text) StopConnect("Enter password!");
23
					if ((!login) || (!POP_server_path)) StopConnect("Email should be such as username@somesite.com");
24
					if (!aim) return;
3368 leency 25
 
4139 hidnplayr 26
					sockaddr.sin_family = AF_INET4;
27
					AX = POP_server_port;
28
					$xchg	al, ah
29
					sockaddr.sin_port = AX;
30
					sockaddr.sin_addr = GetIPfromAdress(#POP_server_path);
4164 leency 31
					if (!sockaddr.sin_addr) { StopConnect("Can't obtain server IP."); break;}
4169 leency 32
					else aim = OPEN_CONNECTION;
4164 leency 33
					break;
4169 leency 34
		case OPEN_CONNECTION:
4139 hidnplayr 35
					socketnum = Socket(AF_INET4, SOCK_STREAM, 0);
4164 leency 36
					if (socketnum == 0xffffffff) { StopConnect("Cannot open socket."); break;}
4139 hidnplayr 37
					Connect(socketnum, #sockaddr, 16);
4164 leency 38
					aim = GET_ANSWER_CONNECT;
39
					break;
4169 leency 40
		case GET_ANSWER_CONNECT:
4139 hidnplayr 41
					ticks = Receive(socketnum, #immbuffer, BUFFERSIZE, 0);
4164 leency 42
					if ((ticks == 0xffffff) || (ticks < 2)) { StopConnect("Connection failed"); break;}
4139 hidnplayr 43
					immbuffer[ticks]='\0';
44
					if (immbuffer[ticks-2]=='\n')
3368 leency 45
					{
46
						if (strstr(#immbuffer,"+OK"))
47
							aim = SEND_USER;
48
						else
4164 leency 49
							StopConnect("Failed to connect to server. Retry...");
3368 leency 50
					}
4169 leency 51
					break;
52
		case SEND_USER:
3368 leency 53
					request_len = GetRequest("USER", #login);
4164 leency 54
					if (Send(socketnum, #request, request_len, 0) == 0xffffffff)
55
					{
56
						SetLoginStatus("Failed to send USER. Retry...");
57
						break;
58
					}
4169 leency 59
					else aim = GET_ANSWER_USER;
60
					break;
61
		case GET_ANSWER_USER:
4139 hidnplayr 62
					ticks = Receive(socketnum, #immbuffer, BUFFERSIZE, 0);
4164 leency 63
					if ((ticks == 0xffffffff) || (ticks < 2)) { SetLoginStatus("Connection failed"); break;}
4139 hidnplayr 64
					immbuffer[ticks]='\0';
65
					if (immbuffer[ticks-2]=='\n')
3368 leency 66
					{
67
						if (strstr(#immbuffer,"+OK"))
4164 leency 68
							aim = SEND_PASS;
3368 leency 69
						else
4164 leency 70
						{
71
							debug(#immbuffer);
72
							StopConnect("Wrong username");
73
						}
3368 leency 74
					}
4139 hidnplayr 75
					else
76
					{
4164 leency 77
						StopConnect("Connection failed");
4139 hidnplayr 78
					}
4169 leency 79
					break;
80
		case SEND_PASS:
3368 leency 81
					request_len = GetRequest("PASS", #pass_text);
4164 leency 82
					if (Send(socketnum, #request, request_len, 0) == 0xffffffff)
83
					{
84
						SetLoginStatus("Failed to send PASS. Retry...");
85
						break;
86
					}
4169 leency 87
					else aim = GET_ANSWER_PASS;
88
					break;
89
		case GET_ANSWER_PASS:
4139 hidnplayr 90
					ticks = Receive(socketnum, #immbuffer, BUFFERSIZE, 0);
4164 leency 91
					if ((ticks == 0xffffff) || (ticks < 2)) { SetLoginStatus("Server disconnected"); break;}
4139 hidnplayr 92
					immbuffer[ticks]='\0';
3368 leency 93
 
4139 hidnplayr 94
					if (immbuffer[ticks-2]=='\n')
3368 leency 95
					{
4164 leency 96
						if (strstr(#immbuffer,"+OK")) MailBoxLoop();
3368 leency 97
						else
98
						{
4164 leency 99
							StopConnect("Wrong password or POP3 disabled");
100
							debug(#immbuffer);
3368 leency 101
						}
102
					}
4139 hidnplayr 103
					else
104
					{
4164 leency 105
						StopConnect("Connection failed");
4139 hidnplayr 106
					}
4169 leency 107
	}
108
}
109
 
110
 
111
void LoginBoxLoop()
112
{
113
	int key, id;
114
 
115
	SetLoginStatus(NULL);
116
	goto _LB_DRAW;
117
	loop()
118
	{
119
		WaitEventTimeout(2);
120
		switch(EAX & 0xFF)
121
		{
122
			case evMouse:
123
				if (!CheckActiveProcess(Form.ID)) break;
124
				edit_box_mouse stdcall (#login_box);
125
				edit_box_mouse stdcall (#pass_box);
126
				break;
3368 leency 127
 
4169 leency 128
			case evButton:
129
				id = GetButtonID();
130
				if (id==1) SaveAndExit();
131
				if (id==11)	SettingsDialog();
132
				if (id==12)
133
				{
134
					if (!aim) aim=RESOLVE; else aim=NULL;
135
					GetSettings();
136
					DrawLoginScreen();
3368 leency 137
				}
4169 leency 138
				break;
3368 leency 139
 
4169 leency 140
			case evKey:
141
				key = GetKey();
142
				if (key==9)
143
				{
144
					if (login_box.flags & 0b10)
145
						{ pass_box.flags = 0b11; login_box.flags = 0; }
146
					else
147
						{ pass_box.flags = 0b1; login_box.flags = 0b10; }
148
					edit_box_draw stdcall(#login_box);
149
					edit_box_draw stdcall(#pass_box);
150
					break;
151
				}
152
				if (key==13) && (!aim)
153
				{
154
					aim=RESOLVE;
155
					GetSettings();
156
					DrawLoginScreen();
157
				}
158
				EAX=key<<8;
159
				edit_box_key stdcall(#login_box);
160
				edit_box_key stdcall(#pass_box);
161
				break;
162
 
163
			case evReDraw: _LB_DRAW:
164
				if !(DefineWindow(LOGIN_HEADER)) break;
165
				DrawLoginScreen();
166
				break;
167
 
168
			default:
169
				LoginNetworkProcess();
3368 leency 170
		}
171
	}
172
}
173
 
174
 
4164 leency 175
 
3368 leency 176
void DrawLoginScreen()
177
{
178
	panel_x = Form.cwidth - PANEL_W /2;
179
	panel_y = Form.cheight - PANEL_H /2 - 5;
180
 
181
	DrawBar(0,0, Form.cwidth, Form.cheight, sc.work);
182
 
183
	WriteText(panel_x,panel_y,0x80,sc.work_text,"Your Email:");
184
	DrawRectangle(panel_x, panel_y+12, PANEL_W,20, sc.work_graph); //border
185
	DrawRectangle3D(panel_x+1, panel_y+13, PANEL_W-2,18, 0xDDDddd, 0xFFFfff); //shadow
186
	DrawRectangle(panel_x+2, panel_y+14, PANEL_W-4,16, 0xFFFfff);
187
	login_box.left = panel_x+3;
188
	login_box.top = panel_y+15;
189
	edit_box_draw stdcall(#login_box);
190
 
191
	WriteText(panel_x,panel_y+40,0x80,sc.work_text,"Password:");
192
	DrawRectangle(panel_x, panel_y+52, PANEL_W,20, sc.work_graph); //border
193
	DrawRectangle3D(panel_x+1, panel_y+53, PANEL_W-2,18, 0xDDDddd, 0xFFFfff); //shadow
194
	DrawRectangle(panel_x+2, panel_y+54, PANEL_W-4,16, 0xFFFfff);
195
	pass_box.left = panel_x+3;
196
	pass_box.top = panel_y+55;
197
	edit_box_draw stdcall(#pass_box);
198
 
199
	if (!aim)
200
	{
201
		DrawCaptButton(panel_x,panel_y+90,100,20,11,sc.work_button, sc.work_button_text,"Settings");
202
		DrawCaptButton(panel_x+120,panel_y+90,100,20,12,sc.work_button, sc.work_button_text,"Enter >");
203
	}
204
	else DrawCaptButton(panel_x+120,panel_y+90,100,20,12,sc.work_button, sc.work_button_text,"Stop");
205
 
4164 leency 206
	SetLoginStatus(cur_st_text);
3368 leency 207
}
208
 
209
 
4169 leency 210
void GetSettings()
3368 leency 211
{
4169 leency 212
	int at_pos = strchr(#email_text,'@');
213
	strlcpy(#login, #email_text, at_pos-1);
3368 leency 214
 
4169 leency 215
	if (checked[CUSTOM])
3368 leency 216
	{
217
		strcpy(#POP_server_path, "pop.");
4169 leency 218
		strcat(#POP_server_path, #email_text+at_pos);
4164 leency 219
		POP_server_port = DEFAULT_POP_PORT;
3368 leency 220
	}
221
	if (checked[MANUAL])
222
	{
223
		strcpy(#POP_server_path, #POP_server1);
224
		POP_server_port = atoi(#POP_server_port1);
225
	}
4164 leency 226
	if (!strcmp(#POP_server_path, "pop.gmail.com"))	StopConnect("Can't connect GMAIL servers. Not support SSL/TLS encryption");
3368 leency 227
}
228
 
4164 leency 229
void SetLoginStatus(dword text1)
3368 leency 230
{
4164 leency 231
	if (text1) WriteText(10, Form.cheight-22, 0x80, sc.work_text, text1);
3368 leency 232
	cur_st_text = text1;
233
}