Subversion Repositories Kolibri OS

//Leency & SoUrcerer, LGPL

//LoginPanel

#define PANEL_W 220

#define PANEL_H 140

int panel_x, panel_y;

//edit_boxes at LoginPanel

int	mouse_dd;

unsigned char email_text[128];

unsigned char pass_text[32];

edit_box login_box= {PANEL_W-6,207,16,0xffffff,0x94AECE,0xffffff,0xffffff,0x10000000,sizeof(email_text)+2,#email_text,#mouse_dd,0b10};

edit_box pass_box= {PANEL_W-6,207,16,0xffffff,0x94AECE,0xffffff,0xffffff,0x10000000,sizeof(pass_text)+2,#pass_text,#mouse_dd,0b1};

void LoginNetworkProcess()

{

	if (aim) switch(aim)

	{

		case RESOLVE:

					if (!email_text) StopConnect("Enter email!");

					if (!pass_text) StopConnect("Enter password!");

					if ((!login) || (!POP_server_path)) StopConnect("Email should be such as username@somesite.com");

					if (!aim) return;

					sockaddr.sin_family = AF_INET4;

					AX = POP_server_port;

					$xchg	al, ah

					sockaddr.sin_port = AX;

					sockaddr.sin_addr = GetIPfromAdress(#POP_server_path);

					if (!sockaddr.sin_addr) { StopConnect("Can't obtain server IP."); break;}

					else aim = OPEN_CONNECTION;

					break;

		case OPEN_CONNECTION:

					socketnum = Socket(AF_INET4, SOCK_STREAM, 0);

					if (socketnum == 0xffffffff) { StopConnect("Cannot open socket."); break;}

					Connect(socketnum, #sockaddr, 16);

					aim = GET_ANSWER_CONNECT;

					break;

		case GET_ANSWER_CONNECT:

					ticks = Receive(socketnum, #immbuffer, BUFFERSIZE, 0);

					if ((ticks == 0xffffff) || (ticks < 2)) { StopConnect("Connection failed"); break;}

					immbuffer[ticks]='\0';

					if (immbuffer[ticks-2]=='\n')

					{

						if (strstr(#immbuffer,"+OK"))

							aim = SEND_USER;

						else

							StopConnect("Failed to connect to server. Retry...");

					}

					break;

		case SEND_USER:

					request_len = GetRequest("USER", #login);

					if (Send(socketnum, #request, request_len, 0) == 0xffffffff)

					{

						SetLoginStatus("Failed to send USER. Retry...");

						break;

					}

					else aim = GET_ANSWER_USER;

					break;

		case GET_ANSWER_USER:

					ticks = Receive(socketnum, #immbuffer, BUFFERSIZE, 0);

					if ((ticks == 0xffffffff) || (ticks < 2)) { SetLoginStatus("Connection failed"); break;}

					immbuffer[ticks]='\0';

					if (immbuffer[ticks-2]=='\n')

					{

						if (strstr(#immbuffer,"+OK"))

							aim = SEND_PASS;

						else

						{

							debug(#immbuffer);

							StopConnect("Wrong username");

						}

					}

					else

					{

						StopConnect("Connection failed");

					}

					break;

		case SEND_PASS:

					request_len = GetRequest("PASS", #pass_text);

					if (Send(socketnum, #request, request_len, 0) == 0xffffffff)

					{

						SetLoginStatus("Failed to send PASS. Retry...");

						break;

					}

					else aim = GET_ANSWER_PASS;

					break;

		case GET_ANSWER_PASS:

					ticks = Receive(socketnum, #immbuffer, BUFFERSIZE, 0);

					if ((ticks == 0xffffff) || (ticks < 2)) { SetLoginStatus("Server disconnected"); break;}

					immbuffer[ticks]='\0';

					if (immbuffer[ticks-2]=='\n')

					{

						if (strstr(#immbuffer,"+OK")) MailBoxLoop();

						else

						{

							StopConnect("Wrong password or POP3 disabled");

							debug(#immbuffer);

						}

					}

					else

					{

						StopConnect("Connection failed");

					}

	}

}

void LoginBoxLoop()

{

	int id;

	SetLoginStatus(NULL);

	goto _LB_DRAW;

	loop()

	{

		WaitEventTimeout(2);

		switch(EAX & 0xFF)

		{

			case evMouse:

				edit_box_mouse stdcall (#login_box);

				edit_box_mouse stdcall (#pass_box);

				break;

			case evButton:

				id = GetButtonID();

				if (id==1) SaveAndExit();

				if (id==11)	SettingsDialog();

				if (id==12)

				{

					if (!aim) aim=RESOLVE; else aim=NULL;

					GetSettings();

					DrawLoginScreen();

				}

				break;

			case evKey:

				GetKeys();

				if (key_scancode==SCAN_CODE_TAB)

				{

					if (login_box.flags & 0b10)

						{ pass_box.flags = 0b11; login_box.flags = 0; }

					else

						{ pass_box.flags = 0b1; login_box.flags = 0b10; }

					edit_box_draw stdcall(#login_box);

					edit_box_draw stdcall(#pass_box);

					break;

				}

				if (key_scancode==SCAN_CODE_ENTER) && (!aim)

				{

					aim=RESOLVE;

					GetSettings();

					DrawLoginScreen();

				}

				EAX = key_editbox;

				edit_box_key stdcall(#login_box);

				edit_box_key stdcall(#pass_box);

				break;

			case evReDraw: _LB_DRAW:

				if !(DefineWindow(LOGIN_HEADER)) break;

				DrawLoginScreen();

				break;

			default:

				LoginNetworkProcess();

		}

	}

}

void DrawLoginScreen()

{

	panel_x = Form.cwidth - PANEL_W /2;

	panel_y = Form.cheight - PANEL_H /2 - 5;

	DrawBar(0,0, Form.cwidth, Form.cheight, sc.work);

	WriteText(panel_x,panel_y-3,0x80,sc.work_text,"Your Email:");

	DrawEditBoxPos(panel_x+3, panel_y+12, #login_box);

	WriteText(panel_x,panel_y+45,0x80,sc.work_text,"Password:");

	DrawEditBoxPos(panel_x+3, panel_y+60, #pass_box);

	if (!aim)

	{

		DrawCaptButton(panel_x,panel_y+100,100,26,11,sc.button, sc.button_text,"Settings");

		DrawCaptButton(panel_x+120,panel_y+100,100,26,12,sc.button, sc.button_text,"Enter >");

	}

	else DrawCaptButton(panel_x+120,panel_y+100,100,26,12,sc.button, sc.button_text,"Stop");

	SetLoginStatus(cur_st_text);

}

void GetSettings()

{

	strcpy(#login, #email_text);

	ESBYTE[strchr(#login,'@')] = NULL;

	if (automatic.checked)

	{

		strcpy(#POP_server_path, "pop.");

		strcat(#POP_server_path, strchr(#email_text,'@')+1);

		POP_server_port = DEFAULT_POP_PORT;

	}

	else

	{

		strcpy(#POP_server_path, #POP_server1);

		POP_server_port = atoi(#POP_server_port1);

	}

	if (!strcmp(#POP_server_path, "pop.gmail.com"))	StopConnect("Can't connect GMAIL servers. Not support SSL/TLS encryption");

}

void SetLoginStatus(dword text1)

{

	if (text1) WriteText(10, Form.cheight-22, 0x80, sc.work_text, text1);

	cur_st_text = text1;

}