forked from KolibriOS/kolibrios
558 lines
15 KiB
C
558 lines
15 KiB
C
//Leency & SoUrcerer, LGPL
|
|
|
|
#define LIST_INFO_H 59
|
|
int status_bar_h = 15;
|
|
|
|
llist mail_list;
|
|
llist letter_view;
|
|
scroll_bar scroll1 = { 17,200,210, LIST_INFO_H-3,18,0,115,15,0,0xCCCccc,0xD2CED0,0x555555,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1};
|
|
scroll_bar scroll2 = { 17,200,210, LIST_INFO_H,18,0,115,15,0,0xCCCccc,0xD2CED0,0x555555,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1};
|
|
|
|
struct letter_attr
|
|
{
|
|
char adress[64];
|
|
char header[256];
|
|
byte m_type;
|
|
int size;
|
|
void CreateMailsArray();
|
|
void SetMailsSizes();
|
|
int GetLetterSize(int N);
|
|
};
|
|
letter_attr atr;
|
|
dword mails_db;
|
|
|
|
|
|
char from[256];
|
|
char to[256];
|
|
char date[256];
|
|
char subj[256];
|
|
dword mdata;
|
|
|
|
char *listbuffer;
|
|
char *listpointer;
|
|
|
|
char *mailbuffer;
|
|
char *mailpointer;
|
|
|
|
|
|
enum {
|
|
GET_MAIL = 20,
|
|
SEND_MAIL,
|
|
DELETE_LETTER,
|
|
SAVE_LETTER,
|
|
STOP_LOADING,
|
|
EXIT_MAIL,
|
|
CHANGE_CHARSET,
|
|
CLOSE_CHANGE_CHARSET
|
|
};
|
|
|
|
|
|
void MailBoxLoop()
|
|
{
|
|
int key, id;
|
|
mouse m;
|
|
int panels_drag = 0;
|
|
char socket_char;
|
|
int letter_size;
|
|
dword line_col, text_col;
|
|
|
|
mail_list.h = Form.cheight/4;
|
|
mail_list.ClearList();
|
|
SetMailBoxStatus( NULL , NULL);
|
|
cur_charset = 0;
|
|
|
|
goto _MB_DRAW;
|
|
|
|
loop()
|
|
{
|
|
WaitEventTimeout(2);
|
|
switch(EAX & 0xFF)
|
|
{
|
|
case evMouse:
|
|
IF (GetProcessSlot(Form.ID)-GetActiveProcess()!=0) break;
|
|
m.get();
|
|
|
|
if (!m.lkm) panels_drag=0;
|
|
if (m.lkm) && (m.y>mail_list.y+mail_list.h-1) && (m.y<mail_list.y+mail_list.h+6)
|
|
&& (!scroll1.delta2) && (!scroll2.delta2) panels_drag = 1;
|
|
if (panels_drag)
|
|
{
|
|
if (m.y<mail_list.y+mail_list.min_h) || (m.y>Form.cheight-letter_view.min_h-status_bar_h-LIST_INFO_H) break;
|
|
mail_list.h = m.y - mail_list.y-2;
|
|
DrawMailBox();
|
|
break;
|
|
}
|
|
|
|
if (!mail_list.count) break;
|
|
if (!panels_drag) { scrollbar_v_mouse (#scroll1); scrollbar_v_mouse (#scroll2); }
|
|
|
|
if (mail_list.first <> scroll1.position)
|
|
{
|
|
mail_list.first = scroll1.position;
|
|
DrawMailList();
|
|
break;
|
|
};
|
|
if (letter_view.first <> scroll2.position)
|
|
{
|
|
letter_view.first = scroll2.position;
|
|
DrawLetter();
|
|
break;
|
|
};
|
|
|
|
if (mail_list.y+mail_list.h + 10 > m.y)
|
|
{
|
|
if (mail_list.MouseScroll(m.vert)) DrawMailList();
|
|
}
|
|
else
|
|
{
|
|
if (letter_view.MouseScroll(m.vert)) DrawLetter();
|
|
}
|
|
|
|
break;
|
|
case evButton:
|
|
id = GetButtonID();
|
|
if (id==1) SaveAndExit();
|
|
if (id==GET_MAIL) aim = SEND_NSTAT;
|
|
if (id==SAVE_LETTER)
|
|
{
|
|
if (!mailbuffer) break;
|
|
WriteFile(strlen(mailbuffer), mailbuffer, "mail.txt");
|
|
pause(10);
|
|
RunProgram("tinypad", "mail.txt");
|
|
}
|
|
if (id==STOP_LOADING)
|
|
{
|
|
StopLoading();
|
|
DrawStatusBar();
|
|
DrawMailList();
|
|
}
|
|
if (id==EXIT_MAIL)
|
|
{
|
|
StopLoading();
|
|
LoginBoxLoop();
|
|
}
|
|
if (id==CHANGE_CHARSET)
|
|
{
|
|
DefineButton(0,0,Form.cwidth,Form.cheight, CLOSE_CHANGE_CHARSET+BT_HIDE+BT_NOFRAME);
|
|
DrawRectangle(Form.cwidth-100, Form.cheight-status_bar_h- 70, 70, 82, sc.work_graph);
|
|
DrawRectangle3D(Form.cwidth-99, Form.cheight-status_bar_h- 69, 68, 80, 0xFFFfff, sc.work);
|
|
for (id=0; id<5; id++)
|
|
{
|
|
if (cur_charset==id+1) { line_col=sc.work_button; text_col=sc.work_button_text; }
|
|
else { line_col=sc.work; text_col=sc.work_text; }
|
|
DrawBar(Form.cwidth-98, id*16+Form.cheight-status_bar_h- 68, 67, 16, line_col);
|
|
DrawCaptButton(Form.cwidth-100, id*16+Form.cheight-status_bar_h- 68, 70,16, 10+id+BT_HIDE,
|
|
0, text_col, charsets[id+1]);
|
|
}
|
|
}
|
|
if (id==CLOSE_CHANGE_CHARSET) goto _MB_DRAW;
|
|
|
|
if (id>=30)
|
|
{
|
|
if (aim) break;
|
|
mail_list.current = mail_list.first + id - 30;
|
|
DrawMailList();
|
|
aim = SEND_RETR;
|
|
}
|
|
|
|
break;
|
|
case evKey:
|
|
key = GetKey();
|
|
|
|
if (key == 177){ //down
|
|
if (aim) break;
|
|
if (mail_list.current >= mail_list.count-1) break;
|
|
mail_list.current++ ;
|
|
if (mail_list.current >= mail_list.first + mail_list.visible) mail_list.first++ ;
|
|
DrawMailList();
|
|
aim = SEND_RETR;
|
|
}
|
|
if (key == 178){ //up
|
|
if (aim) break;
|
|
if (mail_list.current<=0) break;
|
|
mail_list.current-- ;
|
|
if (mail_list.current < mail_list.first) mail_list.first-- ;
|
|
DrawMailList();
|
|
aim = SEND_RETR;
|
|
}
|
|
if (key == 180){ //home
|
|
if (aim) break;
|
|
mail_list.first = mail_list.current = 0;
|
|
DrawMailList();
|
|
aim = SEND_RETR;
|
|
}
|
|
if (key == 181){ //end
|
|
if (aim) break;
|
|
mail_list.first = mail_list.count - mail_list.visible;
|
|
mail_list.current = mail_list.count - 1;
|
|
DrawMailList();
|
|
aim = SEND_RETR;
|
|
}
|
|
|
|
break;
|
|
case evReDraw: _MB_DRAW:
|
|
if !(DefineWindow(MAILBOX_HEADER)) break;
|
|
scroll1.bckg_col = scroll2.bckg_col = 0xBBBbbb;
|
|
scroll1.frnt_col = scroll2.frnt_col = sc.work;
|
|
scroll1.line_col = scroll2.line_col = sc.work_graph;
|
|
DrawToolbar();
|
|
DrawMailBox();
|
|
|
|
break;
|
|
default:
|
|
if (aim == SEND_NSTAT)
|
|
{
|
|
debug("Counting mail, awaiting answer...");
|
|
request_len = GetRequest("STAT", NULL);
|
|
WriteSocket(socket,request_len,#request);
|
|
if (EAX == 0xffffffff) { debug("Error sending STAT. Retry..."w); break;}
|
|
aim = GET_ANSWER_NSTAT;
|
|
}
|
|
|
|
if (aim == GET_ANSWER_NSTAT)
|
|
{
|
|
if (!PollSocket(socket)) break;
|
|
socket_char=ReadSocket(socket);
|
|
immputc(socket_char);
|
|
|
|
if (socket_char=='\n')
|
|
{
|
|
debug("GOT::");
|
|
debug(#immbuffer);
|
|
if (strstr(#immbuffer,"+OK"))
|
|
{
|
|
mail_list.count = GetMailCount();
|
|
debug("Letters:");
|
|
debug(itoa(mail_list.count));
|
|
listbuffer = free(listbuffer);
|
|
listbuffer = mem_Alloc(30*mail_list.count); //24* original
|
|
listpointer = listbuffer;
|
|
aim = SEND_NLIST;
|
|
debug("Recieving mail list...");
|
|
immfree();
|
|
}
|
|
else
|
|
{
|
|
notify("Sorry, can't recieve your mail");
|
|
immfree();
|
|
aim=NULL; //aim = SEND_NLIST;
|
|
}
|
|
}
|
|
}
|
|
|
|
if (aim == SEND_NLIST)
|
|
{
|
|
WriteText(5, Form.cheight-11, 0x80, sc.work_text, "Send LIST, awaiting answer...");
|
|
request_len = GetRequest("LIST", NULL);
|
|
WriteSocket(socket,request_len,#request);
|
|
if (EAX == 0xffffffff) {debug("Error while sending LIST. Retry..."); break;}
|
|
aim = GET_ANSWER_NLIST;
|
|
}
|
|
|
|
if (aim == GET_ANSWER_NLIST)
|
|
{
|
|
ticks = PollSocket(socket);
|
|
if (!ticks) break;
|
|
for (;ticks>0;ticks--)
|
|
{
|
|
socket_char=ReadSocket(socket);
|
|
listputc(socket_char);
|
|
|
|
if (socket_char=='.') //this way of checking end of message IS BAD
|
|
{
|
|
aim = SEND_RETR;
|
|
debug("Got mail list");
|
|
DrawMailBox();
|
|
|
|
atr.CreateMailsArray();
|
|
atr.SetMailsSizes();
|
|
}
|
|
}
|
|
}
|
|
if (aim == SEND_RETR)
|
|
{
|
|
from = to = date = subj = cur_charset = NULL;
|
|
letter_view.ClearList();
|
|
DrawMailBox();
|
|
debug("Send RETR, awaiting answer...");
|
|
request_len = GetRequest("RETR", itoa(mail_list.current+1));
|
|
WriteSocket(socket,request_len,#request);
|
|
if (EAX == 0xffffffff) { notify("Error while trying to get letter from server"); aim=NULL; break;}
|
|
|
|
mailbuffer = free(mailbuffer);
|
|
letter_size = atr.GetLetterSize(mail_list.current+1) + 1024;
|
|
mailbuffer = malloc(letter_size);
|
|
mailpointer = mailbuffer;
|
|
aim = GET_ANSWER_RETR;
|
|
}
|
|
if (aim == GET_ANSWER_RETR)
|
|
{
|
|
ticks=PollSocket(socket);
|
|
if (!ticks) break;
|
|
|
|
for (;ticks>0;ticks--)
|
|
{
|
|
socket_char=ReadSocket(socket);
|
|
//debugch(socket_char);
|
|
*mailpointer=socket_char;
|
|
mailpointer++;
|
|
*mailpointer='\0';
|
|
if (!aim) continue;
|
|
|
|
if (letter_size + mailbuffer - mailpointer - 2 < 0)
|
|
{
|
|
debug("Buffer overflow!!1 Realloc..."w);
|
|
letter_size += 4096;
|
|
mailbuffer = realloc(mailbuffer, letter_size);
|
|
if (!mailbuffer) {debug("Relloc error!"); aim=NULL; break;}
|
|
}
|
|
|
|
if (letter_size>5000)
|
|
{
|
|
id = mailpointer - mailbuffer * 100 ;
|
|
id /= letter_size - 1024;
|
|
if (id!=cur_st_percent) SetMailBoxStatus( id , NULL);
|
|
}
|
|
|
|
ParceMail();
|
|
}
|
|
}
|
|
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
void DrawMailBox()
|
|
{
|
|
DrawMailList();
|
|
DrawLetterInfo();
|
|
DrawLetter();
|
|
DrawStatusBar();
|
|
}
|
|
|
|
|
|
void DrawToolbar()
|
|
{
|
|
#define BUT_Y 7
|
|
#define BUT_H 22
|
|
#define BUT_W 74
|
|
#define BUT_SPACE 11
|
|
int toolbar_w = BUT_Y + BUT_H + BUT_Y + 3;
|
|
mail_list.SetSizes(0, toolbar_w, Form.cwidth - scroll1.size_x - 1, mail_list.h, 60,18);
|
|
|
|
DrawBar(0,0, Form.cwidth,toolbar_w-3, sc.work);
|
|
DrawCaptButton(10 , BUT_Y, BUT_W, BUT_H, GET_MAIL, sc.work_button, sc.work_button_text,"Get mail");
|
|
DrawCaptButton(BUT_W+BUT_SPACE + 10, BUT_Y, BUT_W, BUT_H, SEND_MAIL, sc.work_button, sc.work_button_text,"Send Email");
|
|
DrawCaptButton(BUT_W+BUT_SPACE*2 + 10, BUT_Y, BUT_W, BUT_H, DELETE_LETTER, sc.work_button, sc.work_button_text,"Delete");
|
|
DrawCaptButton(BUT_W+BUT_SPACE*3 + 10, BUT_Y, BUT_W, BUT_H, SAVE_LETTER, sc.work_button, sc.work_button_text,"Save");
|
|
DrawCaptButton(Form.cwidth-BUT_W - 10, BUT_Y, BUT_W, BUT_H, EXIT_MAIL, sc.work_button, sc.work_button_text,"< Exit");
|
|
|
|
DrawBar(0, mail_list.y-3, mail_list.w,1, sc.work_graph);
|
|
DrawBar(0, mail_list.y-2, mail_list.w,1, 0xdfdfdf);
|
|
DrawBar(0, mail_list.y-1, mail_list.w,1, 0xf0f0f0);
|
|
}
|
|
|
|
|
|
void DrawMailList()
|
|
{
|
|
int i, on_y;
|
|
mail_list.visible = mail_list.h / mail_list.line_h;
|
|
|
|
for (i=30; i<150; i++) DeleteButton(i);
|
|
for (i=0; (i<mail_list.visible) && (i+mail_list.first<mail_list.count); i++)
|
|
{
|
|
on_y = i*mail_list.line_h + mail_list.y;
|
|
if (mail_list.current==mail_list.first+i)
|
|
{
|
|
DrawBar(0, on_y, mail_list.w, mail_list.line_h-1, 0xEEEeee);
|
|
WriteText(strlen(itoa(i+mail_list.first+1))*6 + 42, on_y+5, 0x80, 0, #subj);
|
|
PutMailDirectionImage(strlen(itoa(i+mail_list.first+1))*6 + 18, mail_list.line_h-12/2+ on_y, #to, #from);
|
|
}
|
|
else
|
|
{
|
|
DrawBar(0, on_y, mail_list.w, mail_list.line_h-1, 0xFFFfff);
|
|
PutMailDirectionImage(strlen(itoa(i+mail_list.first+1))*6 + 18, mail_list.line_h-12/2+ on_y, NULL, NULL);
|
|
}
|
|
DefineButton(0, on_y, mail_list.w-1, mail_list.line_h, 30+i+BT_HIDE+BT_NOFRAME);
|
|
DrawBar(0, on_y + mail_list.line_h-1, mail_list.w, 1, 0xCCCccc);
|
|
WriteText(10, on_y+5, 0x80, 0, itoa(i+mail_list.first+1));
|
|
WriteText(mail_list.w - 40, on_y+5, 0x80, 0, ConvertMemSize(atr.GetLetterSize(i+mail_list.first+1)));
|
|
}
|
|
DrawBar(0, i*mail_list.line_h + mail_list.y, mail_list.w, -i*mail_list.line_h+mail_list.h, 0xFFFfff);
|
|
DrawScroller1();
|
|
}
|
|
|
|
|
|
void PutMailDirectionImage(int x,y, to_str, from_str)
|
|
{
|
|
char mail_direction=0;
|
|
if (strstri(to_str, #email_text)) mail_direction = 1;
|
|
if (strstri(from_str, #email_text)) mail_direction = 2;
|
|
_PutImage(x, y, 18,12, sizeof(in_out_mail)/3*mail_direction + #in_out_mail);
|
|
}
|
|
|
|
|
|
void DrawLetterInfo()
|
|
{
|
|
int lt_y = mail_list.y+mail_list.h;
|
|
|
|
DrawBar(0, lt_y, mail_list.w, 1, sc.work_graph);
|
|
DrawBar(0, lt_y+1, Form.cwidth, 1, LBUMP);
|
|
DrawBar(0, lt_y+2, Form.cwidth, LIST_INFO_H-4, sc.work);
|
|
WriteText(mail_list.w-30/2, lt_y, 0x80, 0x888888, "= = =");
|
|
WriteText(mail_list.w-30/2, lt_y+1, 0x80, 0xEeeeee, "= = =");
|
|
DrawBar(0, lt_y+LIST_INFO_H-2, mail_list.w, 1, sc.work_graph); //bottom
|
|
DrawBar(0, lt_y+LIST_INFO_H-1, mail_list.w, 1, 0xdfdfdf);
|
|
DrawBar(0, lt_y+LIST_INFO_H , mail_list.w, 1, 0xf0f0f0);
|
|
|
|
WriteTextB(10, lt_y+8 , 0x80, sc.work_text, "From:");
|
|
WriteText(45, lt_y+8 , 0x80, sc.work_text, #from);
|
|
|
|
WriteTextB(10, lt_y+20 , 0x80, sc.work_text, "To:");
|
|
WriteText(45, lt_y+20 , 0x80, sc.work_text, #to);
|
|
|
|
WriteTextB(10, lt_y+32, 0x80, sc.work_text, "Date:");
|
|
WriteText(45, lt_y+32, 0x80, sc.work_text, #date);
|
|
|
|
WriteTextB(10, lt_y+44, 0x80, sc.work_text, "Subject:");
|
|
WriteText(66, lt_y+44, 0x80, sc.work_text, #subj);
|
|
}
|
|
|
|
void DrawLetter()
|
|
{
|
|
int i=0;
|
|
dword cur_line, next_line, line_text;
|
|
cur_line = mdata;
|
|
|
|
letter_view.SetSizes(0, mail_list.y+mail_list.h+LIST_INFO_H+1, Form.cwidth - scroll2.size_x - 1,
|
|
Form.cheight - mail_list.y - mail_list.h - LIST_INFO_H - 1 - status_bar_h, 60, 12);
|
|
|
|
if (mailbuffer) && (!aim)
|
|
{
|
|
for ( ; i < letter_view.first; i++) cur_line = GetNextLine(cur_line);
|
|
|
|
for (i=0; i < letter_view.h / letter_view.line_h; i++)
|
|
{
|
|
next_line = GetNextLine(cur_line);
|
|
line_text = CopyBetweenOffsets(cur_line, next_line);
|
|
cur_line = next_line;
|
|
if (cur_line >= mailpointer) || (cur_line==1) break;
|
|
DrawBar(letter_view.x, i*letter_view.line_h + letter_view.y, letter_view.w, letter_view.line_h, 0xFFFfff);
|
|
if (line_text) { WriteText(letter_view.x+5, i*letter_view.line_h+letter_view.y+3, 0x80, 0, line_text); free(line_text);}
|
|
}
|
|
}
|
|
DrawBar(letter_view.x, i*letter_view.line_h + letter_view.y, letter_view.w, -i*letter_view.line_h + letter_view.h-1, 0xFFFfff);
|
|
DrawBar(letter_view.x, letter_view.y + letter_view.h-1, letter_view.w, 1, sc.work_graph);
|
|
DrawScroller2();
|
|
}
|
|
|
|
void DrawScroller1()
|
|
{
|
|
scroll1.max_area = mail_list.count;
|
|
scroll1.cur_area = mail_list.visible;
|
|
scroll1.position = mail_list.first;
|
|
|
|
scroll1.all_redraw=1;
|
|
scroll1.start_x = mail_list.x + mail_list.w;
|
|
scroll1.start_y = mail_list.y - 3;
|
|
scroll1.size_y = mail_list.h + 4;
|
|
scrollbar_v_draw(#scroll1);
|
|
}
|
|
|
|
void DrawScroller2()
|
|
{
|
|
scroll2.max_area = letter_view.count;
|
|
scroll2.cur_area = letter_view.visible;
|
|
scroll2.position = letter_view.first;
|
|
|
|
scroll2.all_redraw=1;
|
|
scroll2.start_x = letter_view.x + letter_view.w;
|
|
scroll2.start_y = letter_view.y - 3;
|
|
scroll2.size_y = letter_view.h + 3;
|
|
scrollbar_v_draw(#scroll2);
|
|
}
|
|
|
|
|
|
|
|
void DrawStatusBar()
|
|
{
|
|
int st_y = Form.cheight -status_bar_h;
|
|
DrawBar(0, st_y, Form.cwidth, status_bar_h, sc.work);
|
|
if (aim) {
|
|
SetMailBoxStatus(cur_st_percent, cur_st_text);
|
|
DrawCaptButton(240, st_y+1, 36, status_bar_h-3, STOP_LOADING, sc.work_button, sc.work_button_text,"Stop");
|
|
}
|
|
DrawCaptButton(Form.cwidth - 100, st_y+1, 70, status_bar_h-2, CHANGE_CHARSET+BT_HIDE, sc.work, sc.work_text,charsets[cur_charset]);
|
|
}
|
|
|
|
|
|
|
|
void SetMailBoxStatus(dword percent1, text1)
|
|
{
|
|
DrawProgressBar(3, Form.cheight -status_bar_h + 1, 220, 12, sc.work, 0xC3C3C3, 0x54B1D6, sc.work_text, percent1, text1);
|
|
cur_st_percent = percent1;
|
|
cur_st_text = text1;
|
|
}
|
|
|
|
|
|
void StopLoading()
|
|
{
|
|
aim = NULL;
|
|
mailbuffer = free(mailbuffer);
|
|
to = from = date = subj = cur_charset = NULL;
|
|
while (PollSocket(socket)) ReadSocket(socket);
|
|
}
|
|
|
|
int GetMailCount(){
|
|
char tmpbuf4[512];
|
|
strcpyb(#immbuffer, #tmpbuf4, "+OK ", " ");
|
|
return atoi(#tmpbuf4);
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
void listputc(char agot_char){
|
|
*listpointer=agot_char;
|
|
listpointer++;
|
|
*listpointer='\0';
|
|
}
|
|
|
|
int GetLetterSize_(int number){
|
|
char serch_num[24];
|
|
char letter_size1[24];
|
|
|
|
strcpy(#serch_num, "\n");
|
|
strcat(#serch_num, itoa(number));
|
|
strcat(#serch_num, " ");
|
|
strcpyb(listbuffer, #letter_size1, #serch_num, "\n");
|
|
return atoi(#letter_size1);
|
|
}
|
|
|
|
|
|
|
|
|
|
void letter_attr::CreateMailsArray()
|
|
{
|
|
mails_db = free(mails_db);
|
|
mails_db = malloc( mail_list.count * sizeof(atr) );
|
|
}
|
|
|
|
void letter_attr::SetMailsSizes()
|
|
{
|
|
int i, off;
|
|
for (i=0; i < mail_list.count; i++)
|
|
{
|
|
ESDWORD[sizeof(atr)*i+#mails_db+#atr.size-#atr] = GetLetterSize_(i);
|
|
}
|
|
}
|
|
|
|
int letter_attr::GetLetterSize(int N)
|
|
{
|
|
return ESDWORD[sizeof(atr)*N+#mails_db+#atr.size-#atr];
|
|
} |