开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Internet/网络编程 > WEB邮件程序 > 查看源码
folder.c
资源名称：sqwebmail-0.37a.38pre2.tar.gz　[点击查看]
上传用户：s81996212
上传日期：2007-01-04
资源大小：722k
文件大小：52k
源码类别：

WEB邮件程序

开发平台：

C/C++

folder.c：源码内容
  1. /*
  2. ** Copyright 1998 - 1999 Double Precision, Inc.  See COPYING for
  3. ** distribution information.
  4. */
  7. /*
  8. ** $Id: folder.c,v 1.59 2000/06/03 05:40:27 mrsam Exp $
  9. */
  10. #include <stdio.h>
  11. #include <string.h>
  12. #include <ctype.h>
  13. #include <fcntl.h>
  14. #include <stdlib.h>
  15. #include "config.h"
  16. #include "sqwebmail.h"
  17. #include "maildir/maildirmisc.h"
  18. #include "rfc822/rfc822.h"
  19. #include "rfc822/rfc2047.h"
  20. #include "rfc2045/rfc2045.h"
  21. #include "maildir.h"
  22. #include "folder.h"
  23. #include "cgi/cgi.h"
  24. #include "pref.h"
  25. #include "html.h"
  26. #include "token.h"
  27. #include "filter.h"
  28. #include "buf.h"
  29. #include "pref.h"
  31. #if TIME_WITH_SYS_TIME
  32. #include <sys/time.h>
  33. #include <time.h>
  34. #else
  35. #if HAVE_SYS_TIME_H
  36. #include <sys/time.h>
  37. #else
  38. #include <time.h>
  39. #endif
  40. #endif
  42. extern const char *nonloginscriptptr();
  43. extern int pref_flagpagesize;
  44. extern const char *sqwebmail_content_charset;
  46. extern time_t rfc822_parsedt(const char *);
  47. static time_t current_time;
  48. static const char black_color[]="<FONT COLOR="#000000">";
  49. static const char end_font[]="</FONT>";
  51. static char *folder_err_msg=0;
  53. extern const char *sqwebmail_folder;
  55. extern char form_args[];
  56. extern void output_scriptptrget();
  57. extern void output_scriptptr();
  58. extern void output_attrencoded(const char *);
  59. extern void output_urlencoded(const char *);
  60. extern char *scriptptrget();
  62. void print_safe_len(const char *p, size_t n, void (*func)(const char *, size_t))
  63. {
  64. char buf[10];
  65. const char *q=p;
  67. while (n)
  68. {
  69. --n;
  70. if (*p == '<') strcpy(buf, "&lt;");
  71. else if (*p == '>') strcpy(buf, "&gt;");
  72. else if (*p == '&') strcpy(buf, "&amp;");
  73. else if (*p == ' ') strcpy(buf, "&nbsp;");
  74. else if (*p == 'n') strcpy(buf, "<BR>");
  75. else if (ISCTRL(*p))
  76. sprintf(buf, "&#%d;", (int)(unsigned char)*p);
  77. else
  78. {
  79. p++;
  80. continue;
  81. }
  83. (*func)(q, p-q);
  84. (*func)(buf, strlen(buf));
  85. p++;
  86. q=p;
  87. }
  88. (*func)(q, p-q);
  89. }
  91. static void print_safe_to_stdout(const char *p, size_t cnt)
  92. {
  93. fwrite(p, cnt, 1, stdout);
  94. }
  96. void print_safe(const char *p)
  97. {
  98. print_safe_len(p, strlen(p), print_safe_to_stdout);
  99. }
  101. void call_print_safe_to_stdout(const char *p, size_t cnt)
  102. {
  103. print_safe_len(p, cnt, print_safe_to_stdout);
  104. }
  106. void folder_contents_title()
  107. {
  108. char *p;
  109. char *lab;
  110. const char *f;
  111. const char *inbox_lab, *drafts_lab, *trash_lab, *sent_lab;
  113. p=strdup(form_args);
  114. if (!p) return;
  115. (void)strtok(p, "|");
  116. (void)strtok(0, "|");
  117. (void)strtok(0, "|");
  118. (void)strtok(0, "|");
  119. lab=strtok(0, "|");
  120. (void)strtok(0, "|");
  121. (void)strtok(0, "|");
  122. (void)strtok(0, "|");
  123. (void)strtok(0, "|");
  124. (void)strtok(0, "|");
  125. (void)strtok(0, "|");
  126. (void)strtok(0, "|");
  127. (void)strtok(0, "|");
  128. inbox_lab=strtok(0, "|");
  129. drafts_lab=strtok(0, "|");
  130. trash_lab=strtok(0, "|");
  131. sent_lab=strtok(0, "|");
  133. f=sqwebmail_folder;
  134. if (strcmp(f, INBOX) == 0) f=inbox_lab;
  135. else if (strcmp(f, DRAFTS) == 0) f=drafts_lab;
  136. else if (strcmp(f, SENT) == 0) f=sent_lab;
  137. else if (strcmp(f, TRASH) == 0) f=trash_lab;
  139. if (lab)
  140. {
  141. char *q=malloc(strlen(lab)+strlen(f)+1);
  143. if (*f == ':') ++f;
  144. if (!q) enomem();
  145. sprintf(q, lab, f);
  146. output_attrencoded(q);
  147. free(q);
  148. }
  149. free(p);
  150. }
  152. static int group_movedel(const char *folder,
  153. int (*func)(const char *, const char *, size_t))
  154. {
  155. struct cgi_arglist *arg;
  157. if (*cgi("SELECTALL")) /* Everything is selected */
  158. {
  159. for (arg=cgi_arglist; arg; arg=arg->next)
  160. {
  161. const char *f;
  163. if (strncmp(arg->argname, "MOVEFILE-", 9)) continue;
  164. f=cgi(arg->argname);
  165. CHECKFILENAME(f);
  166. if ((*func)(folder, f, atol(arg->argname+9)))
  167. return (-1);
  168. }
  169. return (0);
  170. }
  172. for (arg=cgi_arglist; arg; arg=arg->next)
  173. {
  174. unsigned long l;
  175. char movedel[MAXLONGSIZE+10];
  176. const char *f;
  178. if (strncmp(arg->argname, "MOVE-", 5)) continue;
  179. l=atol(arg->argname+5);
  180. sprintf(movedel, "MOVEFILE-%lu", l);
  181. f=cgi(movedel);
  182. CHECKFILENAME(f);
  183. if ((*func)(folder, f, l))
  184. return (-1);
  185. }
  186. return (0);
  187. }
  189. static int groupdel(const char *folder, const char *file, size_t pos)
  190. {
  191. maildir_msgdeletefile(folder, file, pos);
  192. return (0);
  193. }
  195. static int groupmove(const char *folder, const char *file, size_t pos)
  196. {
  197. return (maildir_msgmovefile(folder, file, cgi("moveto"), pos));
  198. }
  200. void folder_delmsgs(const char *dir, size_t pos)
  201. {
  202. int rc=0;
  204. if (*cgi("cmddel"))
  205. {
  206. rc=group_movedel( dir, &groupdel );
  207. maildir_savefoldermsgs(dir);
  208. }
  209. else if (*cgi("cmdmove"))
  210. {
  211. rc=group_movedel( dir, &groupmove );
  212. maildir_savefoldermsgs(dir);
  213. }
  215. http_redirect_argu(
  216. (rc ? "&error=quota&form=folder&pos=%s":"&form=folder&pos=%s"),
  217. (unsigned long)pos);
  218. }
  220. static void folder_msg_link(const char *, size_t, char);
  221. static void folder_msg_unlink(const char *, size_t, char);
  223. void folder_contents(const char *dir, size_t pos)
  224. {
  225. MSGINFO **contents;
  226. int i, found;
  227. int morebefore, moreafter;
  228. char *argdup;
  229. char *datelab, *fromlab, *subjlab, *sizelab, *beforelab, *afterlab;
  230. char *nomsg, *selectalllab;
  231. char *qerrmsg;
  233. maildir_reload(dir);
  234. contents=maildir_read(dir, pref_flagpagesize, &pos,
  235. &morebefore, &moreafter);
  237. argdup=strdup(form_args);
  238. if (!argdup) return;
  240. time(&current_time);
  241. datelab=strtok(argdup, "|");
  242. fromlab=strtok(0, "|");
  243. subjlab=strtok(0, "|");
  244. sizelab=strtok(0, "|");
  245. (void)strtok(0, "|");
  246. nomsg=strtok(0, "|");
  247. (void)strtok(0, "|");
  248. (void)strtok(0, "|");
  249. (void)strtok(0, "|");
  250. (void)strtok(0, "|");
  251. beforelab=strtok(0, "|");
  252. afterlab=strtok(0, "|");
  253. selectalllab=strtok(0, "|");
  254. if (!beforelab) beforelab="";
  255. if (!afterlab) afterlab="";
  256. if (!selectalllab) selectalllab="";
  258. (void)strtok(0, "|");
  259. (void)strtok(0, "|");
  260. (void)strtok(0, "|");
  261. (void)strtok(0, "|");
  263. qerrmsg=strtok(0, "|");
  264. if (!qerrmsg) qerrmsg="";
  266. if (strcmp(cgi("error"), "quota") == 0)
  267. printf("%s", qerrmsg);
  269. printf("<TABLE WIDTH="100%%" BORDER=0 CELLPADDING=1 CELLSPACING=0>");
  270. printf("<TR><TD ALIGN=LEFT>");
  271. printf("<TABLE BORDER=0 CELLSPACING=0 CELLPADDING=4><TR><TD BGCOLOR="#DDDDDD">");
  272. if (morebefore)
  273. {
  274. size_t beforepos;
  276. if (pos < pref_flagpagesize) beforepos=0;
  277. else beforepos=pos-pref_flagpagesize;
  279. printf("<A HREF="");
  280. output_scriptptrget();
  281. printf("&form=folder&pos=%ld" STYLE="text-decoration: none">",
  282. (long)beforepos);
  283. }
  284. printf("%s", beforelab);
  285. if (morebefore)
  286. printf("</A>");
  288. printf("</TD></TR></TABLE>n");
  290. printf("</TD><TD ALIGN=RIGHT>n");
  292. printf("<TABLE BORDER=0 CELLSPACING=0 CELLPADDING=4><TR><TD BGCOLOR="#DDDDDD">");
  293. if (moreafter)
  294. {
  295. printf("<A HREF="");
  296. output_scriptptrget();
  297. printf("&form=folder&pos=%ld" STYLE="text-decoration: none">",
  298. (long)(pos+pref_flagpagesize));
  299. }
  300. printf("%s", afterlab);
  301. if (moreafter)
  302. printf("</A>");
  304. printf("</TD></TR></TABLE>n");
  306. printf("</TD></TR></TABLE>");
  307. printf("<TABLE WIDTH="100%%" BORDER=0 CELLSPACING=0 CELLPADDING=4><TR BGCOLOR="#000080"><TH ALIGN=CENTER><FONT COLOR="#FFFF00">#</FONT></TH><TH>&nbsp;</TH><TH><FONT COLOR="#FFFF00">%s</FONT></TH><TH><FONT COLOR="#FFFF00">%s</FONT></TH><TH><FONT COLOR="#FFFF00">%s</FONT></TH><TH><FONT COLOR="#FFFF00">%s</FONT><BR></TH></TR>n",
  309. datelab ? datelab:"",
  310. fromlab ? fromlab:"",
  311. subjlab ? subjlab:"",
  312. sizelab ? sizelab:"");
  314. found=0;
  315. for (i=0; i<pref_flagpagesize; i++)
  316. {
  317. const char *date, *from, *subj, *size;
  318. char *froms, *subjs;
  319. const char *p, *q;
  320. size_t l;
  321. char type[8];
  322. char *start_bold, *end_bold;
  324. if (contents[i] == 0) continue;
  325. found=1;
  327. date=MSGINFO_DATE(contents[i]);
  328. from=MSGINFO_FROM(contents[i]);
  329. subj=MSGINFO_SUBJECT(contents[i]);
  330. size=MSGINFO_SIZE(contents[i]);
  332. type[0]=maildirfile_type(MSGINFO_FILENAME(contents[i]));
  333. type[1]='';
  334. if (type[0] == '') strcpy(type, "&nbsp;");
  336. start_bold=""; end_bold="";
  338. if (type[0] == MSGTYPE_NEW)
  339. {
  340. start_bold="<B>";
  341. end_bold="</B>";
  342. }
  344. p=MSGINFO_FILENAME(contents[i]);
  346. if ((q=strrchr(p, '/')) != 0)
  347. p=q+1;
  349. printf("<TR BGCOLOR="%s"><TD ALIGN=RIGHT>%s%s%ld.%s%s</TD><TD><INPUT TYPE=CHECKBOX NAME="MOVE-%ld",
  350. (i & 1 ? "#EEEEEE":"#DDDDDD"),
  351. black_color, start_bold,
  352. (long)(i+pos+1),
  353. end_bold, end_font,
  354. (long) (pos+i));
  355. printf(""%s><INPUT TYPE=HIDDEN NAME="MOVEFILE-%ld" VALUE="",
  356. (type[0] == MSGTYPE_DELETED ? " DISABLED":""),
  357. (long)(pos+i));
  358. output_attrencoded(p);
  359. printf("">&nbsp;%s%s%s%s%s</TD><TD>%s%s",
  360. black_color, start_bold,
  361. type,
  362. end_bold, end_font,
  364. black_color, start_bold
  365. );
  366. if (!*date) date=" ";
  367. folder_msg_link(dir, pos+i, type[0]);
  368. print_safe(date);
  369. folder_msg_unlink(dir, pos+i, type[0]);
  370. printf("%s%s</TD><TD>%s%s", end_bold, end_font,
  371. black_color, start_bold);
  372. if (!*from) from=" ";
  373. folder_msg_link(dir, pos+i, type[0]);
  375. froms=rfc2047_decode_simple(from);
  376. if (froms == 0) enomem();
  377. if (strlen(froms) >= 30)
  378. strcpy(froms+27, "...");
  379. print_safe(froms);
  380. free(froms);
  381. folder_msg_unlink(dir, pos+i, type[0]);
  382. printf("%s%s<BR></TD><TD>%s%s", end_bold, end_font,
  383. black_color, start_bold);
  385. folder_msg_link(dir, pos+i, type[0]);
  387. subjs=rfc2047_decode_simple(subj);
  388. if (subjs == 0) enomem();
  389. if (strlen(subjs) >= 40)
  390. strcpy(subjs+37, "...");
  391. print_safe(subjs);
  392. l=strlen(subjs);
  393. while (l++ < 8)
  394. printf("&nbsp;");
  395. free(subjs);
  397. folder_msg_unlink(dir, pos+i, type[0]);
  398. printf("%s%s</TD><TD ALIGN=RIGHT>%s%s%s%s%s<BR></TD></TR>n", end_bold, end_font, black_color, start_bold, size, end_bold, end_font);
  399. }
  400. if (found)
  401. {
  402. puts("<TR BGCOLOR="#DDDDDD"><TD COLSPAN=6><HR></TD></TR>");
  403. puts("<TR BGCOLOR="#EEEEEE"><TD>&nbsp;</TD>");
  404. printf("<TD COLSPAN=5><INPUT TYPE=CHECKBOX NAME="SELECTALL">&nbsp;%s</TD></TR>",
  405. selectalllab);
  406. }
  407. if (!found && nomsg)
  408. {
  409. puts("<TR BGCOLOR="#FFBBBB"><TD COLSPAN=6 ALIGN=LEFT><P>");
  410. puts(black_color);
  411. puts(nomsg);
  412. puts(end_font);
  413. puts("<BR></TD></TR>");
  414. }
  416. printf("</TABLE>n");
  417. free(argdup);
  418. maildir_free(contents, pref_flagpagesize);
  419. }
  421. static void folder_msg_link(const char *dir, size_t pos, char t)
  422. {
  423. if (t == MSGTYPE_DELETED)
  424. {
  425. printf("<A HREF="");
  426. output_scriptptrget();
  427. printf("&form=folder&pos=%s">", cgi("pos"));
  428. return;
  429. }
  431. printf("<A HREF="");
  432. if (strcmp(dir, DRAFTS))
  433. {
  434. output_scriptptrget();
  435. printf("&form=readmsg&pos=%ld">", (long)pos);
  436. }
  437. else
  438. {
  439. size_t mpos=pos;
  440. char *filename=maildir_posfind(dir, &mpos);
  441. char *basename=filename ? maildir_basename(filename):NULL;
  443. output_scriptptrget();
  444. printf("&form=newmsg&draft=");
  445. output_urlencoded(basename);
  446. printf("">");
  447. if (basename) free(basename);
  448. if (filename) free(filename);
  449. }
  450. }
  452. static void folder_msg_unlink(const char *dir, size_t pos, char t)
  453. {
  454. printf("</A>");
  455. }
  457. static size_t msg_pos, msg_count;
  458. static char *msg_posfile;
  459. static int msg_hasprev, msg_hasnext;
  460. static char *msg_nextlab=0, *msg_prevlab=0, *msg_deletelab=0,
  461. *msg_purgelab=0, *msg_folderlab=0;
  462. static char msg_type;
  463. static char *msg_badcontenttype=0;
  464. static char *msg_dispattachment=0;
  465. static char *msg_downattachment=0;
  466. static char *msg_replylab=0;
  467. static char *msg_replyalllab=0;
  468. static char *msg_forwardlab=0;
  469. static char *msg_forwardattlab=0;
  470. static char *msg_fullheaderlab=0;
  471. static char *msg_movetolab=0;
  472. static char *msg_print=0;
  474. static char *folder_inbox=0;
  475. static char *folder_drafts=0;
  476. static char *folder_trash=0;
  477. static char *folder_sent=0;
  478. static char *msg_golab=0;
  480. static const char *msg_msglab;
  481. static int initnextprevcnt;
  483. void folder_initnextprev(const char *dir, size_t pos)
  484. {
  485. MSGINFO **info;
  486. const char *p;
  487. const char *msg_numlab, *msg_numnewlab;
  489. initnextprevcnt=0;
  490. msg_nextlab=strtok(form_args, "|");
  491. msg_prevlab=strtok(NULL, "|");
  492. msg_deletelab=strtok(NULL, "|");
  493. msg_purgelab=strtok(NULL, "|");
  494. msg_folderlab=strtok(NULL, "|");
  495. msg_badcontenttype=strtok(NULL, "|");
  496. msg_dispattachment=strtok(NULL, "|");
  497. msg_downattachment=strtok(NULL, "|");
  498. msg_replylab=strtok(NULL, "|");
  499. msg_replyalllab=strtok(NULL, "|");
  500. msg_forwardlab=strtok(NULL, "|");
  501. msg_forwardattlab=strtok(NULL, "|");
  502. msg_numlab=strtok(NULL, "|");
  503. msg_numnewlab=strtok(NULL, "|");
  504. msg_fullheaderlab=strtok(NULL, "|");
  505. msg_movetolab=strtok(NULL, "|");
  506. msg_print=strtok(NULL, "|");
  508. folder_inbox=strtok(NULL, "|");
  509. folder_drafts=strtok(NULL, "|");
  510. folder_trash=strtok(NULL, "|");
  511. folder_sent=strtok(NULL, "|");
  513. p=strtok(NULL, "|");
  514. if (!p) p="";
  515. if (strcmp(cgi("error"),"quota") == 0)
  516. printf("%s", p);
  518. msg_golab=strtok(NULL, "|");
  520. info=maildir_read(dir, 1, &pos, &msg_hasprev, &msg_hasnext);
  521. msg_pos=pos;
  523. printf("<INPUT TYPE=HIDDEN NAME="pos" VALUE="%ld">",
  524. (long)msg_pos);
  526. p=strrchr(MSGINFO_FILENAME(info[0]), '/');
  527. if (p) p++;
  528. else p=MSGINFO_FILENAME(info[0]);
  529. msg_posfile=strdup(p);
  530. if (!msg_posfile) enomem();
  532. if ((msg_type=maildirfile_type(MSGINFO_FILENAME(info[0])))
  533. == MSGTYPE_NEW) msg_numlab=msg_numnewlab;
  535. msg_msglab=msg_numlab;
  536. msg_count=maildir_countof(dir);
  538. printf("<INPUT TYPE=HIDDEN NAME="posfile" VALUE="");
  539. output_attrencoded(p);
  540. printf(""><INPUT TYPE=HIDDEN NAME="form" VALUE="delmsg">");
  541. maildir_free(info, 1);
  542. }
  545. void folder_nextprev()
  546. {
  547. printf("<TABLE WIDTH="100%%" BORDER=0 CELLSPACING=0 CELLPADDING=0><TR VALIGN=CENTER>");
  549.     printf("<TD ALIGN=LEFT><TABLE BORDER=0 CELLSPACING=4><TR>");
  551. /* Pmovetolab */
  553. printf("<TD BGCOLOR="#DDDDDD">&nbsp;");
  555. if (msg_hasprev)
  556. {
  557. printf("<A HREF="");
  558. output_scriptptrget();
  559. printf("&form=readmsg&pos=%ld" STYLE="text-decoration: none">",
  560. (long)(msg_pos-1));
  561. }
  563. printf("%s", msg_prevlab ? msg_prevlab:"");
  565. if (msg_hasprev)
  566. {
  567. printf("</A>");
  568. }
  569. printf("&nbsp;</TD>");
  571. /* NEXT */
  573. printf("<TD BGCOLOR="#DDDDDD">&nbsp;");
  575. if (msg_hasnext)
  576. {
  577. printf("<A HREF="");
  578. output_scriptptrget();
  579. printf("&form=readmsg&pos=%ld" STYLE="text-decoration: none">",
  580. (long)(msg_pos+1));
  581. }
  583. printf("%s", msg_nextlab ? msg_nextlab:"");
  585. if (msg_hasnext)
  586. {
  587. printf("</A>");
  588. }
  589. printf("&nbsp;</TD>");
  591. /* DEL */
  593. printf("<TD BGCOLOR="#DDDDDD">&nbsp;");
  594. if (msg_type != MSGTYPE_DELETED)
  595. {
  596. printf("<A HREF="");
  597. output_scriptptrget();
  598. tokennewget();
  599. printf("&posfile=");
  600. output_urlencoded(msg_posfile);
  601. printf("&form=delmsg&pos=%ld" STYLE="text-decoration: none">",
  602. (long)msg_pos);
  603. }
  604. printf("%s", strcmp(sqwebmail_folder, TRASH) == 0
  605. ? msg_purgelab : msg_deletelab);
  607. if (msg_type != MSGTYPE_DELETED)
  608. printf("</A>");
  610. printf("&nbsp;</TD>n");
  612. /* FOLDER */
  614. printf("<TD BGCOLOR="#DDDDDD">&nbsp;<A HREF="");
  615. output_scriptptrget();
  616. printf("&pos=%ld&form=folder"; STYLE="text-decoration: none">%s</A>&nbsp;</TD>n",
  617. (long)( (msg_pos/pref_flagpagesize)*pref_flagpagesize ),
  618. msg_folderlab);
  620. /* REPLY */
  622. printf("<TD BGCOLOR="#DDDDDD">&nbsp;<A HREF="");
  623. output_scriptptrget();
  624. printf("&pos=%ld&reply=1&form=newmsg"; STYLE="text-decoration: none">%s</A>&nbsp;</TD>n",
  625. (long)msg_pos,
  626. msg_replylab);
  628. /* REPLY ALL */
  630. printf("<TD BGCOLOR="#DDDDDD">&nbsp;<A HREF="");
  631. output_scriptptrget();
  632. printf("&pos=%ld&replyall=1&form=newmsg"; STYLE="text-decoration: none">%s</A>&nbsp;</TD>n",
  633. (long)msg_pos,
  634. msg_replyalllab);
  636. printf("</TR></TABLE><TABLE BORDER=0 CELLSPACING=4><TR>");
  637. /* FORWARD */
  639. printf("<TD BGCOLOR="#DDDDDD">&nbsp;<A HREF="");
  640. output_scriptptrget();
  641. printf("&pos=%ld&forward=1&form=newmsg"; STYLE="text-decoration: none">%s</A>&nbsp;</TD>n",
  642. (long)msg_pos,
  643. msg_forwardlab);
  645. /* FORWARD AS ATTACHMENT*/
  647. printf("<TD BGCOLOR="#DDDDDD">&nbsp;<A HREF="");
  648. output_scriptptrget();
  649. printf("&pos=%ld&forwardatt=1&form=newmsg"; STYLE="text-decoration: none">%s</A>&nbsp;</TD>n",
  650. (long)msg_pos,
  651. msg_forwardattlab);
  653. /* FULL HEADERS */
  655. if (!pref_flagfullheaders && !*cgi("fullheaders"))
  656. {
  657. printf("<TD BGCOLOR="#DDDDDD">&nbsp;<A HREF="");
  658. output_scriptptrget();
  659. printf("&pos=%ld&form=readmsg&fullheaders=1"; STYLE="text-decoration: none">%s</A>&nbsp;</TD>n",
  660. (long)msg_pos, msg_fullheaderlab);
  661. }
  663. /* PRINT MESSAGE */
  665. printf("<TD BGCOLOR="#DDDDDD">&nbsp;<A HREF="");
  666. output_scriptptrget();
  667. if (pref_flagfullheaders || *cgi("fullheaders"))
  668. {
  669. printf("&pos=%ld&form=print&setcookie=1&fullheaders=1"; STYLE="text-decoration: none" TARGET="_BLANK">%s</A>&nbsp;</TD>n", (long)msg_pos, msg_print);
  670. }
  671. else
  672. {
  673. printf("&pos=%ld&form=print&setcookie=1"; STYLE="text-decoration: none" TARGET="_BLANK">%s</A>&nbsp;</TD>n", (long)msg_pos, msg_print);
  674. }
  675. printf("</TD>");
  677. /* end PRINT MESSAGE */
  680.     printf("</TR></TABLE></TD><TD ALIGN=RIGHT VALIGN=CENTER>");
  682. printf("<TABLE BORDER=0 CELLSPACING=4><TR><TD BGCOLOR="#666666">&nbsp;<FONT COLOR="#FFFFFF">");
  683. printf(msg_msglab, (int)msg_pos+1, (int)msg_count);
  684. printf("</FONT>&nbsp;</TD></TR></TABLE>");
  685.     printf("</TD></TR></TABLE>n");
  686. }
  688. static void show_transfer_dest(const char *cur_folder)
  689. {
  690. char **folders;
  691. size_t i;
  692. const char *p;
  693. int has_shared=0;
  695. maildir_readfolders(&folders);
  696. for (i=0; folders[i]; i++)
  697. {
  698. /* Transferring TO drafts is prohibited */
  700. if (strcmp(cur_folder, DRAFTS))
  701. {
  702. if (strcmp(folders[i], DRAFTS) == 0)
  703. continue;
  704. }
  705. else
  706. {
  707. if (folders[i][0] != ':' && strcmp(folders[i], TRASH))
  708. continue;
  709. }
  711. if (strcmp(cur_folder, folders[i]) == 0)
  712. continue;
  714. p=folders[i];
  716. if (strcmp(p, INBOX) == 0)
  717. p=folder_inbox;
  718. else if (strcmp(p, DRAFTS) == 0)
  719. p=folder_drafts;
  720. else if (strcmp(p, TRASH) == 0)
  721. p=folder_trash;
  722. else if (strcmp(p, SENT) == 0)
  723. p=folder_sent;
  724. if (!p) p=folders[i];
  726. if (folders[i][0] == ':')
  727. {
  728. char *d=maildir_shareddir(".", folders[i]+1);
  730. if (!d)
  731. {
  732. maildir_freefolders(&folders);
  733. enomem();
  734. }
  735. if (access(d, 0)) /* Not subscribed */
  736. {
  737. free(d);
  738. continue;
  739. }
  740. free(d);
  741. }
  743. if (folders[i][0] == ':' && !has_shared)
  744. {
  745. printf("<OPTION VALUE="">n");
  746. has_shared=1;
  747. }
  748. printf("<OPTION VALUE="");
  749. output_attrencoded(folders[i]);
  750. printf("">");
  752. print_safe(folders[i][0] == ':' ? p+1:p);
  753. printf("n");
  754. }
  755. maildir_freefolders(&folders);
  756. }
  758. void folder_msgmove()
  759. {
  760. ++initnextprevcnt;
  761. printf("<TABLE BORDER=0 BGCOLOR="#000000"><TR><TD>n");
  762. printf("<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0><TR><TD BGCOLOR="#DDDDDD">&nbsp;%s%s&nbsp;<SELECT NAME=list%d>n",
  763. black_color, msg_movetolab, initnextprevcnt);
  765. show_transfer_dest(sqwebmail_folder);
  767. printf("</SELECT><INPUT TYPE=SUBMIT %s NAME=move%d VALUE="%s">%s</TD></TR></TABLE>n",
  768. (msg_type == MSGTYPE_DELETED ? "DISABLED":""),
  769. initnextprevcnt,
  770. msg_golab ? msg_golab:"",
  771. end_font);
  772. printf("</TD></TR></TABLE>n");
  773. }
  775. void folder_delmsg(size_t pos)
  776. {
  777. MSGINFO **info;
  778. int dummy;
  779. const char *f=cgi("posfile");
  780. size_t newpos;
  781. int rc=0;
  783. CHECKFILENAME(f);
  785. if (*cgi("move1"))
  786. {
  787. rc=maildir_msgmovefile(sqwebmail_folder, f, cgi("list1"), pos);
  788. maildir_savefoldermsgs(sqwebmail_folder);
  789. }
  790. else if (*cgi("move2"))
  791. {
  792. rc=maildir_msgmovefile(sqwebmail_folder, f, cgi("list2"), pos);
  793. maildir_savefoldermsgs(sqwebmail_folder);
  794. }
  795. else
  796. {
  797. maildir_msgdeletefile(sqwebmail_folder, f, pos);
  798. maildir_savefoldermsgs(sqwebmail_folder);
  799. }
  801. if (rc)
  802. {
  803. http_redirect_argu("&form=readmsg&pos=%s&error=quota",
  804. (unsigned long)newpos);
  805. return;
  806. }
  808. newpos=pos+1;
  809. info=maildir_read(sqwebmail_folder, 1, &newpos, &dummy, &dummy);
  811. if (info[0] && newpos != pos)
  812. {
  813. maildir_free(info, 1);
  814. http_redirect_argu("&form=readmsg&pos=%s",
  815. (unsigned long)newpos);
  816. }
  817. else
  818. {
  819. maildir_free(info, 1);
  820. http_redirect_argu("&form=folder&pos=%s",
  821. (unsigned long)pos);
  822. }
  823. }
  825. static void showmsgrfc822(FILE *, struct rfc2045 *, struct rfc2045id *);
  826. static void showmsgrfc822_body(FILE *, struct rfc2045 *, struct rfc2045id *, int);
  828. void folder_showmsg(const char *dir, size_t pos)
  829. {
  830. char *filename;
  831. FILE *fp;
  832. struct rfc2045 *rfc;
  833. char buf[512];
  834. int n;
  835. int fd;
  837. filename=maildir_posfind(dir, &pos);
  838. if (!filename) return;
  840. fp=0;
  841. fd=maildir_semisafeopen(filename, O_RDONLY, 0);
  842. if (fd >= 0)
  843. {
  844. if ((fp=fdopen(fd, "r")) == 0)
  845. close(fd);
  846. }
  848. if (!fp)
  849. {
  850. free(filename);
  851. return;
  852. }
  854. msg_pos=pos;
  855. rfc=rfc2045_alloc();
  857. while ((n=fread(buf, 1, sizeof(buf), fp)) > 0)
  858. rfc2045_parse(rfc, buf, n);
  860. showmsgrfc822_body(fp, rfc, NULL, 0);
  861. rfc2045_free(rfc);
  862. fclose(fp);
  863. maildir_markread(dir, pos);
  864. free(filename);
  865. }
  867. static void showtextplain(FILE *, struct rfc2045 *, struct rfc2045id *);
  868. static void showdsn(FILE *, struct rfc2045 *, struct rfc2045id *);
  869. static void showtexthtml(FILE *, struct rfc2045 *, struct rfc2045id *);
  870. static void showmultipart(FILE *, struct rfc2045 *, struct rfc2045id *);
  871. static void showmsgrfc822(FILE *, struct rfc2045 *, struct rfc2045id *);
  872. static void showunknown(FILE *, struct rfc2045 *, struct rfc2045id *);
  874. static void (*get_known_handler(struct rfc2045 *mime))(FILE *, struct rfc2045 *, struct rfc2045id *)
  875. {
  876. const char *content_type, *dummy;
  877. const char *disposition_s;
  878. const char *disposition_name_s;
  879. const char *disposition_filename_s;
  881. rfc2045_mimeinfo(mime, &content_type, &dummy, &dummy);
  882. if (strncmp(content_type, "multipart/", 10) == 0)
  883. return ( &showmultipart );
  885. rfc2045_dispositioninfo(mime, &disposition_s, &disposition_name_s,
  886. &disposition_filename_s);
  888. if (disposition_s && strcmp(disposition_s, "attachment") == 0)
  889. return (0);
  891. if (strcmp(content_type, "text/plain") == 0 ||
  892. strcmp(content_type, "text/rfc822-headers") == 0)
  893. return ( &showtextplain );
  894. if (strcmp(content_type, "message/delivery-status") == 0)
  895. return ( &showdsn);
  896. if (pref_showhtml && strcmp(content_type, "text/html") == 0)
  897. return ( &showtexthtml );
  898. if (strcmp(content_type, "message/rfc822") == 0)
  899. return ( &showmsgrfc822 );
  900. return (0);
  901. }
  903. static void (*get_handler(struct rfc2045 *mime))(FILE *, struct rfc2045 *, struct rfc2045id *)
  904. {
  905. void (*func)(FILE *, struct rfc2045 *, struct rfc2045id *);
  907. if ((func=get_known_handler(mime)) == 0)
  908. func= &showunknown;
  910. return (func);
  911. }
  913. static void showmsgrfc822(FILE *fp, struct rfc2045 *rfc, struct rfc2045id *id)
  914. {
  915. if (rfc->firstpart)
  916. showmsgrfc822_body(fp, rfc->firstpart, id, 1);
  917. }
  919. static void showmsgrfc822_header(const char *);
  920. static void showmsgrfc822_addressheader(const char *);
  921. static void showmsgrfc2369_header(const char *);
  923. static int isaddressheader(const char *header)
  924. {
  925. return (strcmp(header, "to") == 0 ||
  926. strcmp(header, "cc") == 0 ||
  927. strcmp(header, "from") == 0 ||
  928. strcmp(header, "sender") == 0 ||
  929. strcmp(header, "resent-to") == 0 ||
  930. strcmp(header, "resent-cc") == 0 ||
  931. strcmp(header, "reply-to") == 0);
  932. }
  935. static void showmimeid(struct rfc2045id *idptr)
  936. {
  937. char *p="&mimeid=";
  939. while (idptr)
  940. {
  941. printf("%s%d", p, idptr->idnum);
  942. idptr=idptr->next;
  943. p=".";
  944. }
  945. }
  947. static void digestaction(struct rfc2045id *idptr)
  948. {
  949. printf("<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0><TR><TD><A HREF="");
  950. output_scriptptrget();
  951. showmimeid(idptr);
  952. printf("&pos=%ld&reply=1&form=newmsg"><FONT SIZE="-1">%s</FONT></A>&nbsp;</TD><TD>&nbsp;<A HREF="",
  953. (long)msg_pos, msg_replylab);
  955. output_scriptptrget();
  956. showmimeid(idptr);
  957. printf("&pos=%ld&replyall=1&form=newmsg"><FONT SIZE="-1">%s</FONT></A>&nbsp;</TD><TD>&nbsp;<A HREF="",
  958. (long)msg_pos, msg_replyalllab);
  959. output_scriptptrget();
  960. showmimeid(idptr);
  961. printf("&pos=%ld&forward=1&form=newmsg"><FONT SIZE="-1">%s</FONT></A>&nbsp;</TD><TD>&nbsp;<A HREF="",
  962. (long)msg_pos, msg_forwardlab);
  964. output_scriptptrget();
  965. showmimeid(idptr);
  966. printf("&pos=%ld&forwardatt=1&form=newmsg"><FONT SIZE="-1">%s</FONT></A></TD></TR></TABLE>n",
  967. (long)msg_pos, msg_forwardattlab);
  968. }
  970. /* Prettify header name by uppercasing the first character. */
  972. void header_uc(char *h)
  973. {
  974. while (*h)
  975. {
  976. *h=toupper( (int)(unsigned char) *h);
  977. while (*h)
  978. {
  979. if (*h++ == '-') break;
  980. }
  981. }
  982. }
  984. static void showmsgrfc822_body(FILE *fp, struct rfc2045 *rfc, struct rfc2045id *idptr, int flag)
  985. {
  986. char *header, *value;
  987. char *save_subject=0;
  988. char *save_date=0;
  989. char *par;
  990. off_t start_pos, end_pos, start_body;
  991. struct rfc2045id *p, newpart;
  992. off_t dummy;
  993. off_t pos;
  995. rfc2045_mimepos(rfc, &start_pos, &end_pos, &start_body, &dummy, &dummy);
  996. if (fseek(fp, start_pos, SEEK_SET) < 0)
  997. {
  998. error("Seek error.");
  999. return;
  1000. }
  1002. printf("<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0>n");
  1003. par="<P>";
  1005. pos=start_pos;
  1006. while ((header=maildir_readheader_mimepart(fp, &value, 1,
  1007. &pos, &start_body)) != 0)
  1008. {
  1009. if (strcmp(header, "list-help") == 0 ||
  1010. strcmp(header, "list-subscribe") == 0 ||
  1011. strcmp(header, "list-unsubscribe") == 0 ||
  1012. strcmp(header, "list-owner") == 0 ||
  1013. strcmp(header, "list-archive") == 0 ||
  1014. strcmp(header, "list-post") == 0)
  1015. {
  1016. header_uc(header);
  1017. printf("<TR VALIGN=BASELINE><TH ALIGN=RIGHT>%s%s:<TT>&nbsp;</TT></TH>",
  1018. par, header);
  1019. par="";
  1020. printf("<TD><TT>");
  1021. showmsgrfc2369_header(value);
  1022. printf("</TT></TD></TR>n");
  1023. continue;
  1024. }
  1026. if (pref_flagfullheaders || *cgi("fullheaders"))
  1027. {
  1028. int isaddress=isaddressheader(header);
  1030. header_uc(header);
  1031. printf("<TR VALIGN=BASELINE><TH ALIGN=RIGHT>%s%s:<TT>&nbsp;</TT></TH>",
  1032. par, header);
  1033. printf("<TD><TT>");
  1034. if (isaddress)
  1035. showmsgrfc822_addressheader(value);
  1036. else
  1037. showmsgrfc822_header(value);
  1038. printf("</TT></TD></TR>n");
  1039. par="";
  1040. continue;
  1041. }
  1042. if (strcmp(header, "subject") == 0)
  1043. {
  1044. if (save_subject) free(save_subject);
  1046. save_subject=rfc2047_decode_enhanced(value,
  1047. sqwebmail_content_charset);
  1048. if (save_subject == 0)
  1049. enomem();
  1050. continue;
  1051. }
  1052. if (strcmp(header, "date") == 0)
  1053. {
  1054. if (save_date) free(save_date);
  1055. if ((save_date=malloc(strlen(value)+1)) == 0)
  1056. enomem();
  1057. strcpy(save_date, value);
  1058. continue;
  1059. }
  1060. if (isaddressheader(header))
  1061. {
  1062. header_uc(header);
  1063. printf("<TR VALIGN=BASELINE><TH ALIGN=RIGHT>%s%s:<TT>&nbsp;</TT></TH>",
  1064. par, header);
  1065. printf("<TD><TT>");
  1066. showmsgrfc822_addressheader(value);
  1067. printf("</TT></TD></TR>n");
  1068. par="";
  1069. }
  1070. }
  1072. if (save_date)
  1073. {
  1074. time_t t=rfc822_parsedt(save_date);
  1075. struct tm *tmp=t ? localtime(&t):0;
  1076. char date_buf[100];
  1078. if (tmp)
  1079. {
  1080. printf("<TR VALIGN=BASELINE><TH ALIGN=RIGHT>%sDate:<TT>&nbsp;</TT></TH>",
  1081. par);
  1082. strftime(date_buf, sizeof(date_buf)-1, "%d %b %Y, %I:%M:%S %p", tmp);
  1083. date_buf[sizeof(date_buf)-1]=0;
  1084. printf("<TD><TT>");
  1085. showmsgrfc822_header(date_buf);
  1086. printf("</TT></TD></TR>n");
  1087. par="";
  1088. }
  1089. free(save_date);
  1090. }
  1092. if (save_subject)
  1093. {
  1094. printf("<TR VALIGN=BASELINE><TH ALIGN=RIGHT>%sSubject:<TT>&nbsp;</TT></TH>",
  1095. par);
  1096. printf("<TD><TT>");
  1097. showmsgrfc822_header(save_subject);
  1098. printf("</TT></TD></TR>n");
  1099. par="";
  1100. }
  1102. if (flag)
  1103. {
  1104. printf("<TR VALIGN=TOP><TD>&nbsp;</TD><TD ALIGN=LEFT VALIGN=TOP>");
  1105. digestaction(idptr);
  1106. printf("</TD></TR>n");
  1107. }
  1108. printf("</TABLE>n<HR WIDTH="100%%">n");
  1110. if (!idptr)
  1111. {
  1112. idptr= &newpart;
  1113. p=0;
  1114. }
  1115. else
  1116. {
  1117. for (p=idptr; p->next; p=p->next)
  1118. ;
  1119. p->next=&newpart;
  1120. }
  1121. newpart.idnum=1;
  1122. newpart.next=0;
  1123. (*get_handler(rfc))(fp, rfc, idptr);
  1124. if (p)
  1125. p->next=0;
  1126. }
  1128. static void showmsgrfc822_headerp(const char *p, size_t l)
  1129. {
  1130. fwrite(p, 1, l, stdout);
  1131. }
  1133. static void showmsgrfc822_header(const char *p)
  1134. {
  1135. filter_start(FILTER_FOR_DISPLAY, showmsgrfc822_headerp);
  1136. filter(p, strlen(p));
  1137. filter_end();
  1138. }
  1140. static void showaddressheader_printc(char c, void *p)
  1141. {
  1142. p=p;
  1143. print_safe_len(&c, 1, print_safe_to_stdout);
  1144. }
  1146. static void showaddressheader_printsep(const char *sep, void *p)
  1147. {
  1148. p=p;
  1149. printf("%s", sep);
  1150. }
  1152. static void showmsgrfc822_addressheader(const char *p)
  1153. {
  1154. struct rfc822t *rfcp;
  1155. struct  rfc822a *rfca;
  1157. rfcp=rfc822t_alloc(p, NULL);
  1158. if (!rfcp) enomem();
  1159. rfca=rfc822a_alloc(rfcp);
  1160. if (!rfca) enomem();
  1161. rfc2047_print(rfca, sqwebmail_content_charset,
  1162. showaddressheader_printc, showaddressheader_printsep, NULL);
  1163. rfc822a_free(rfca);
  1164. rfc822t_free(rfcp);
  1165. }
  1167. static void showrfc2369_printheader(char c, void *p)
  1168. {
  1169. p=p;
  1170. putchar(c);
  1171. }
  1173. static char *get_textlink(const char *);
  1175. static void showmsgrfc2369_header(const char *p)
  1176. {
  1177. struct rfc822t *rfcp;
  1178. struct  rfc822a *rfca;
  1179. int i;
  1181. rfcp=rfc822t_alloc(p, NULL);
  1182. if (!rfcp) enomem();
  1183. rfca=rfc822a_alloc(rfcp);
  1184. if (!rfca) enomem();
  1185. for (i=0; i<rfca->naddrs; i++)
  1186. {
  1187. char *p=rfc822_getaddr(rfca, i);
  1188. char *q=get_textlink(p);
  1190. if (rfca->addrs[i].tokens)
  1191. {
  1192. rfca->addrs[i].tokens->token=0;
  1193. if (*q)
  1194. free(p);
  1195. else
  1196. {
  1197. struct buf b;
  1199. buf_init(&b);
  1200. free(q);
  1201. for (q=p; *q; q++)
  1202. {
  1203. char c[2];
  1205. switch (*q) {
  1206. case '<':
  1207. buf_cat(&b, "&lt;");
  1208. break;
  1209. case '>':
  1210. buf_cat(&b, "&gt;");
  1211. break;
  1212. case '&':
  1213. buf_cat(&b, "&amp;");
  1214. break;
  1215. case ' ':
  1216. buf_cat(&b, "&nbsp;");
  1217. break;
  1218. default:
  1219. c[1]=0;
  1220. c[0]=*q;
  1221. buf_cat(&b, c);
  1222. break;
  1223. }
  1224. }
  1225. free(p);
  1226. q=strdup(b.ptr ? b.ptr:"");
  1227. buf_free(&b);
  1228. if (!q) enomem();
  1229. }
  1230. rfca->addrs[i].tokens->ptr=q;
  1231. rfca->addrs[i].tokens->len=strlen(q);
  1232. rfca->addrs[i].tokens->next=0;
  1233. }
  1234. else
  1235. {
  1236. free(q);
  1237. free(p);
  1238. }
  1239. }
  1241. rfc822_print(rfca, showrfc2369_printheader,
  1242. showaddressheader_printsep, NULL);
  1243. for (i=0; i<rfca->naddrs; i++)
  1244. if (rfca->addrs[i].tokens)
  1245. free((char *)rfca->addrs[i].tokens->ptr);
  1247. rfc822a_free(rfca);
  1248. rfc822t_free(rfcp);
  1249. }
  1251. static void output_mimeurl(struct rfc2045id *id)
  1252. {
  1253. output_scriptptrget();
  1254. printf("&form=fetch&pos=%ld", (long)msg_pos);
  1255. showmimeid(id);
  1256. }
  1258. static void showattname(const char *fmt, const char *name,
  1259. const char *content_type);
  1261. static void showunknown(FILE *fp, struct rfc2045 *rfc, struct rfc2045id *id)
  1262. {
  1263. const char *content_type, *dummy;
  1264. const char *disposition_s;
  1265. const char *disposition_name_s;
  1266. const char *disposition_filename_s;
  1268. id=id;
  1269. rfc2045_mimeinfo(rfc, &content_type, &dummy, &dummy);
  1270. rfc2045_dispositioninfo(rfc, &disposition_s, &disposition_name_s,
  1271. &disposition_filename_s);
  1273. /* Punt for image/ MIMEs */
  1275. if (strncmp(content_type, "image/", 6) == 0 &&
  1276. (disposition_s == 0 || strcmp(disposition_s, "attachment")))
  1277. {
  1278. printf("<A HREF="");
  1279. output_mimeurl(id);
  1280. printf("" TARGET="_blank"><IMG SRC="");
  1281. output_mimeurl(id);
  1282. printf("" ALT="Inline picture: ");
  1283. output_attrencoded(content_type);
  1284. printf(""></A>n");
  1285. return;
  1286. }
  1288. dummy=rfc2045_contentname(rfc);
  1290. printf("<TABLE BORDER=0 CELLPADDING=1 CELLSPACING=0 BGCOLOR="#000000"><TR><TD>");
  1291. printf("<TABLE BORDER=0 CELLPADDING=4 CELLSPACING=0 BGCOLOR="#DDDDDD"><TR><TD>");
  1292. if (msg_dispattachment)
  1293. {
  1294. printf("<CENTER><A HREF="");
  1295. output_mimeurl(id);
  1296. printf("" STYLE="text-decoration: none" TARGET="_blank">");
  1297. showattname(msg_dispattachment, dummy, content_type);
  1298. printf("</A></CENTER>");
  1299. }
  1300. printf("<HR WIDTH="100%%">n");
  1301. if (msg_downattachment)
  1302. {
  1303. printf("<CENTER><A HREF="");
  1304. output_mimeurl(id);
  1305. printf("&download=1" STYLE="text-decoration: none">");
  1306. showattname(msg_downattachment, dummy, content_type);
  1307. printf("</A></CENTER>");
  1308. }
  1309. printf("</TR></TD></TABLE>n");
  1310. printf("</TR></TD></TABLE>n");
  1311. }
  1313. static void showattname(const char *fmt, const char *name,
  1314. const char *content_type)
  1315. {
  1316. char *s, *t;
  1318. if (!name || !*name) name=content_type;
  1319. if (!name) name="";
  1321. s=rfc2047_decode_simple(name);
  1322. if (!s) return;
  1324. t=malloc(strlen(s)+strlen(fmt)+100);
  1325. if (!t)
  1326. {
  1327. free(s);
  1328. return;
  1329. }
  1331. sprintf(t, fmt, s ? s:name);
  1332. if (s) free(s);
  1333. output_attrencoded(t);
  1334. }
  1336. static void showmultipart(FILE *fp, struct rfc2045 *rfc, struct rfc2045id *id)
  1337. {
  1338. const char *content_type, *dummy;
  1339. struct rfc2045 *q;
  1340. struct rfc2045id nextpart;
  1341. struct rfc2045id *p;
  1343. for (p=id; p->next; p=p->next)
  1344. ;
  1345. p->next=&nextpart;
  1346. nextpart.idnum=0;
  1347. nextpart.next=0;
  1349. rfc2045_mimeinfo(rfc, &content_type, &dummy, &dummy);
  1351. if (strcmp(content_type, "multipart/alternative") == 0)
  1352. {
  1353. struct rfc2045 *q, *r=0;
  1354. int idnum=0;
  1356. for (q=rfc->firstpart; q; q=q->next, ++idnum)
  1357. {
  1358. if (q->isdummy) continue;
  1359. if (!r || get_known_handler(q))
  1360. {
  1361. r=q; /* Pick up at least one part */
  1362. nextpart.idnum=idnum;
  1363. }
  1364. }
  1366. if (r)
  1367. (*get_handler(r))(fp, r, id);
  1368. }
  1369. else if (strcmp(content_type, "multipart/related") == 0)
  1370. {
  1371. char *sid=rfc2045_related_start(rfc);
  1373. /*
  1374. ** We can't just walts in, search for the Content-ID:,
  1375. ** and skeddaddle, that's because we need to keep track of
  1376. ** our MIME section.  So we pretend that we're multipart/mixed,
  1377. ** see below, and abort at the first opportunity.
  1378. */
  1380. for (q=rfc->firstpart; q; q=q->next, ++nextpart.idnum)
  1381. {
  1382. const char *cid;
  1384. if (q->isdummy) continue;
  1386. cid=rfc2045_content_id(q);
  1388. if (sid && *sid && strcmp(sid, cid))
  1389. continue;
  1390. (*get_handler(q))(fp, q, id);
  1392. break;
  1393. /* In all cases, we stop after dumping something */
  1394. }
  1395. if (sid) free(sid);
  1396. }
  1397. else
  1398. {
  1399. for (q=rfc->firstpart; q; q=q->next, ++nextpart.idnum)
  1400. {
  1401. if (q->isdummy) continue;
  1402. (*get_handler(q))(fp, q, id);
  1403. if (q->next)
  1404. printf("<HR WIDTH="100%%">n");
  1405. }
  1406. }
  1407. p->next=0;
  1408. }
  1410. static void text_to_stdout(const char *p, size_t n)
  1411. {
  1412. while (n)
  1413. {
  1414. --n;
  1415. putchar(*p++);
  1416. }
  1417. }
  1419. static struct buf showtextplain_buf;
  1421. static const char *skip_text_url(const char *r, const char *end)
  1422. {
  1423. const char *q=r;
  1425. for (; r < end && (isalnum(*r) || *r == ':' || *r == '/'
  1426. || *r == '.' || *r == '~' || *r == '%'
  1427. || *r == '+' || *r == '?' || *r == '&' || *r == '#'
  1428. || *r == '=' || *r == '@' || *r == ';'
  1429. || *r == '-' || *r == '_' || *r == ','); r++)
  1430. {
  1431. if (*r == '&' && (end-r < 5 || strncmp(r, "&amp;", 5)))
  1432. break;
  1433. }
  1434. if (r > q && (r[-1] == ',' || r[-1] == '.')) --r;
  1435. return (r);
  1436. }
  1438. static char *decode_cgiurlencode(const char *s)
  1439. {
  1440. char *q=malloc(strlen(s)+1), *r;
  1441. const char *t;
  1443. if (!q) enomem();
  1445. for (r=q, t=s; *t; )
  1446. {
  1447. if (strncmp(t, "&amp;", 5) == 0)
  1448. {
  1449. *r++ = '&';
  1450. t += 5;
  1451. continue;
  1452. }
  1453. if (strncmp(t, "&lt;", 4) == 0)
  1454. {
  1455. *r++ = '<';
  1456. t += 4;
  1457. continue;
  1458. }
  1459. if (strncmp(t, "&gt;", 4) == 0)
  1460. {
  1461. *r++ = '>';
  1462. t += 4;
  1463. continue;
  1464. }
  1465. if (strncmp(t, "&quot;", 6) == 0)
  1466. {
  1467. *r++ = '"';
  1468. t += 6;
  1469. continue;
  1470. }
  1471. *r++ = *t++;
  1472. }
  1473. *r=0;
  1475. r=cgiurlencode(q);
  1476. free(q);
  1477. return (r);
  1478. }
  1480. static char *get_textlink(const char *s)
  1481. {
  1482. char *t;
  1483. struct buf b;
  1485. buf_init(&b);
  1487. if (strncmp(s, "mailto:", 7) == 0)
  1488. {
  1489. int i;
  1491. buf_cat(&b, "<A HREF="");
  1492. buf_cat(&b, scriptptrget());
  1493. buf_cat(&b, "&form=newmsg&to=");
  1495. for (i=7; s[i]; i++)
  1496. {
  1497. char c[2];
  1499. c[1]=0;
  1500. if ((c[0]=s[i]) == '?')
  1501. c[0]='&';
  1502. buf_cat(&b, c);
  1503. }
  1504. buf_cat(&b, "">");
  1505. buf_cat(&b, s);
  1506. buf_cat(&b, "</A>");
  1507. }
  1508. else if (strncmp(s, "http:", 5) == 0)
  1509. {
  1510. t=decode_cgiurlencode(s);
  1511. buf_cat(&b, "<A HREF="");
  1512. buf_cat(&b, getenv("SCRIPT_NAME"));
  1513. buf_cat(&b, "?redirect=");
  1514. buf_cat(&b, t);
  1515. buf_cat(&b, "" TARGET="_blank">");
  1516. buf_cat(&b, s);
  1517. buf_cat(&b, "</A>");
  1518. free(t);
  1519. }
  1520. t=strdup(b.ptr ? b.ptr:"");
  1521. if (!t) enomem();
  1522. buf_free(&b);
  1523. return (t);
  1524. }
  1526. static void showtextplain_oneline(const char *p, size_t n)
  1527. {
  1528. const char *q, *r;
  1529. char *s, *t;
  1531. for (q=r=p; q < p+n; q++)
  1532. {
  1533. if ( p+n-q > 7 &&
  1534. (strncmp(q, "http://", 7) == 0
  1535. ||
  1536. strncmp(q, "mailto:", 7) == 0)
  1537. )
  1538. {
  1539. fwrite(r, 1, q-r, stdout);
  1540. r=skip_text_url(q, p+n);
  1542. if ((s=malloc(r+1-q)) == NULL) enomem();
  1543. memcpy(s, q, r-q);
  1544. s[r-q]=0;
  1545. printf("%s", (t=get_textlink(s)));
  1546. free(t);
  1547. free(s);
  1548. q=r;
  1549. }
  1550. }
  1551. fwrite(r, 1, q-r, stdout);
  1552. }
  1554. static void showtextplainfunc(const char *txt, size_t l)
  1555. {
  1556. const char *p;
  1557. size_t n;
  1559. if (txt)
  1560. {
  1561. buf_catn(&showtextplain_buf, txt, l);
  1562. while ((p=strchr(showtextplain_buf.ptr, 'n')) != 0)
  1563. {
  1564. n= p+1 - showtextplain_buf.ptr;
  1565. showtextplain_oneline(showtextplain_buf.ptr, n);
  1566. buf_trimleft(&showtextplain_buf, n);
  1567. }
  1568. }
  1569. else if (showtextplain_buf.cnt)
  1570. showtextplain_oneline(showtextplain_buf.ptr,
  1571. showtextplain_buf.cnt);
  1572. }
  1574. static int filter_stub(const char *ptr, size_t cnt, void *voidptr)
  1575. {
  1576. filter(ptr, cnt);
  1577. return (0);
  1578. }
  1580. static void showtextplain(FILE *fp, struct rfc2045 *rfc, struct rfc2045id *id)
  1581. {
  1582. off_t start_pos, end_pos, start_body;
  1583. char buf[512];
  1584. int cnt;
  1585. off_t dummy;
  1587. id=id;
  1588. rfc2045_mimepos(rfc, &start_pos, &end_pos, &start_body, &dummy, &dummy);
  1589. if (fseek(fp, start_body, SEEK_SET) < 0)
  1590. {
  1591. error("Seek error.");
  1592. return;
  1593. }
  1594. printf("<TT><PRE>");
  1595. buf_init(&showtextplain_buf);
  1596. filter_start(FILTER_FOR_DISPLAY, &showtextplainfunc);
  1597. rfc2045_cdecode_start(rfc, &filter_stub, 0);
  1598. while (start_body < end_pos)
  1599. {
  1600. cnt=sizeof(buf);
  1601. if (cnt > end_pos-start_body)
  1602. cnt=end_pos-start_body;
  1603. cnt=fread(buf, 1, cnt, fp);
  1604. if (cnt <= 0) break;
  1605. rfc2045_cdecode(rfc, buf, cnt);
  1606. start_body += cnt;
  1607. }
  1608. rfc2045_cdecode_end(rfc);
  1609. filter_end();
  1610. showtextplainfunc(0, 0);
  1611. buf_free(&showtextplain_buf);
  1612. printf("</PRE></TT><BR>n");
  1614. }
  1616. static void showdsn(FILE *fp, struct rfc2045 *rfc, struct rfc2045id *id)
  1617. {
  1618. off_t start_pos, end_pos, start_body;
  1619. off_t dummy;
  1620. char *par;
  1622. id=id;
  1623. rfc2045_mimepos(rfc, &start_pos, &end_pos, &start_body, &dummy, &dummy);
  1624. if (fseek(fp, start_body, SEEK_SET) < 0)
  1625. {
  1626. error("Seek error.");
  1627. return;
  1628. }
  1629. par="<P>";
  1630. printf("<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0>n");
  1631. while (start_body < end_pos)
  1632. {
  1633. int c=getc(fp);
  1634. char *header, *value;
  1636. if (c == EOF) break;
  1637. if (c == 'n')
  1638. {
  1639. printf("<TR><TD COLSPAN=2><HR></TD></TR>n");
  1640. ++start_body;
  1641. par="<P>";
  1642. continue;
  1643. }
  1644. ungetc(c, fp);
  1646. if ((header=maildir_readheader_mimepart(fp, &value, 1,
  1647. &start_body, &end_pos)) == 0)
  1648. break;
  1650. header_uc(header);
  1651. printf("<TR VALIGN=BASELINE><TH ALIGN=RIGHT><FONT SIZE="-1">%s%s:</FONT><TT>&nbsp;</TT></TH>",
  1652. par, header);
  1653. par="";
  1654. printf("<TD><TT>");
  1655. /* showmsgrfc822_addressheader(value); */
  1656. printf("%s", value);
  1657. printf("</TT></TD></TR>n");
  1658. }
  1659. printf("</TABLE>n");
  1660. }
  1662. static int htmlfilter_stub(const char *ptr, size_t cnt, void *voidptr)
  1663. {
  1664. htmlfilter(ptr, cnt);
  1665. return (0);
  1666. }
  1668. /* Recursive search for a Content-ID: header that we want */
  1670. static struct rfc2045 *find_cid(struct rfc2045 *p, const char *cidurl)
  1671. {
  1672. const char *cid=rfc2045_content_id(p);
  1674. if (cid && strcmp(cid, cidurl) == 0)
  1675. return (p);
  1677. for (p=p->firstpart; p; p=p->next)
  1678. {
  1679. struct rfc2045 *q;
  1681. if (p->isdummy) continue;
  1683. q=find_cid(p, cidurl);
  1684. if (q) return (q);
  1685. }
  1686. return (0);
  1687. }
  1689. /*
  1690. ** Given an rfc2045 ptr, return the mime reference that will resolve to
  1691. ** this MIME part.
  1692. */
  1694. static char *rfc2mimeid(struct rfc2045 *p)
  1695. {
  1696. char buf[MAXLONGSIZE+1];
  1697. char *q=0;
  1698. unsigned n=p->pindex+1; /* mime counts start at one */
  1699. char *r;
  1701. if (p->parent)
  1702. {
  1703. q=rfc2mimeid(p->parent);
  1704. if (p->parent->firstpart->isdummy)
  1705. --n; /* ... except let's ignore the dummy part */
  1706. }
  1707. else n=1;
  1709. sprintf(buf, "%u", n);
  1710. r=malloc( (q ? strlen(q)+1:0)+strlen(buf)+1);
  1711. if (!r) enomem();
  1712. *r=0;
  1713. if (q)
  1714. {
  1715. strcat(strcat(r, q), ".");
  1716. free(q);
  1717. }
  1718. strcat(r, buf);
  1719. return (r);
  1720. }
  1722. /*
  1723. ** Convert cid: url to a http:// reference that will access the indicated
  1724. ** MIME section.
  1725. */
  1727. static char *convertcid(const char *cidurl, void *voidp)
  1728. {
  1729. struct rfc2045 *rfc= (struct rfc2045 *)voidp;
  1730. char *p;
  1731. char *mimeid;
  1732. char *q;
  1733. const char *pos;
  1735. if (rfc->parent) rfc=rfc->parent;
  1736. rfc=find_cid(rfc, cidurl);
  1738. if (!rfc) /* Not found, punt */
  1739. {
  1740. char *p=malloc(1);
  1742. if (!p) enomem();
  1743. *p=0;
  1744. return (p);
  1745. }
  1747. p=scriptptrget();
  1748. mimeid=rfc2mimeid(rfc);
  1749. pos=cgi("pos");
  1751. q=malloc(strlen(p)+strlen(mimeid)+strlen(pos) +
  1752. sizeof("&pos=&form=fetch&mimeid="));
  1753. if (!q) enomem();
  1754. strcpy(q, p);
  1755. strcat(q, "&form=fetch&pos=");
  1756. strcat(q, pos);
  1757. strcat(q, "&mimeid=");
  1758. strcat(q, mimeid);
  1759. free(p);
  1760. free(mimeid);
  1761. return (q);
  1762. }
  1764. static void showtexthtml(FILE *fp, struct rfc2045 *rfc, struct rfc2045id *id)
  1765. {
  1766. off_t start_pos, end_pos, start_body;
  1767. char buf[512];
  1768. int cnt;
  1769. static const char redirect[]="?redirect=";
  1770. const char *script_name=nonloginscriptptr();
  1771. char *washpfix;
  1772. char *washpfixmailto;
  1773. char *scriptnameget=scriptptrget();
  1774. static const char formbuf[]="&form=newmsg&to=";
  1775. off_t dummy;
  1776. char *content_base;
  1778. id=id;
  1779. if (!script_name) enomem();
  1780. rfc2045_mimepos(rfc, &start_pos, &end_pos, &start_body, &dummy, &dummy);
  1781. if (fseek(fp, start_body, SEEK_SET) < 0)
  1782. {
  1783. error("Seek error.");
  1784. return;
  1785. }
  1787. washpfix=malloc(strlen(script_name) + sizeof(redirect));
  1788. if (!washpfix) enomem();
  1789. strcat(strcpy(washpfix, script_name), redirect);
  1790. htmlfilter_washlink(washpfix);
  1791. htmlfilter_convertcid(&convertcid, rfc);
  1793. content_base=rfc2045_content_base(rfc);
  1795. htmlfilter_contentbase(content_base);
  1797. washpfixmailto=malloc(strlen(scriptnameget)+sizeof(formbuf));
  1798. if (!washpfixmailto) enomem();
  1799. strcat(strcpy(washpfixmailto, scriptnameget), formbuf);
  1800. htmlfilter_washlinkmailto(washpfixmailto);
  1801. htmlfilter_init(&text_to_stdout);
  1803. printf("<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0 WIDTH="100%%"><TR><TD>n");
  1804. rfc2045_cdecode_start(rfc, &htmlfilter_stub, 0);
  1805. while (start_body < end_pos)
  1806. {
  1807. cnt=sizeof(buf);
  1808. if (end_pos - start_body < cnt)
  1809. cnt=end_pos - start_body;
  1810. cnt=fread(buf, 1, cnt, fp);
  1811. if (cnt <= 0) break;
  1812. rfc2045_cdecode(rfc, buf, cnt);
  1813. start_body += cnt;
  1814. }
  1815. rfc2045_cdecode_end(rfc);
  1816. printf("</TD></TR></TABLE>n");
  1817. free(washpfix);
  1818. free(washpfixmailto);
  1819. free(content_base);
  1820. }
  1822. static char *get_parent_folder(const char *p)
  1823. {
  1824. const char *q=strrchr(p, '.');
  1825. char *s;
  1827. if (!q)
  1828. {
  1829. s=strdup("");
  1830. if (!s) enomem();
  1831. return (s);
  1832. }
  1834. s=malloc(q-p+1);
  1835. if (!s) enomem();
  1836. memcpy(s, p, q-p);
  1837. s[q-p]=0;
  1838. return (s);
  1839. }
  1841. void folder_list()
  1842. {
  1843. char **folders;
  1844. size_t i;
  1845. unsigned nnew, nother;
  1846. char *args=strdup(form_args);
  1847. char *unread_label;
  1848. char *err_invalid;
  1849. char *err_exists;
  1850. char *err_cantdelete;
  1851. char *msg_hasbeensent;
  1852. char *name_inbox;
  1853. char *name_drafts;
  1854. char *name_sent;
  1855. char *name_trash;
  1856. char *folder_img;
  1857. char *folders_img;
  1859. const char *folderdir;
  1861. if (!args) return;
  1863. unread_label=strtok(args, "|");
  1864. err_invalid=strtok(NULL, "|");
  1865. err_exists=strtok(NULL, "|");
  1866. err_cantdelete=strtok(NULL, "|");
  1867. msg_hasbeensent=strtok(NULL, "|");
  1868. name_inbox=strtok(NULL, "|");
  1869. name_drafts=strtok(NULL, "|");
  1870. name_sent=strtok(NULL, "|");
  1871. name_trash=strtok(NULL, "|");
  1872. folder_img=strtok(NULL, "|");
  1873. folders_img=strtok(NULL, "|");
  1875. if (!unread_label) unread_label="";
  1876. if (!err_invalid) err_invalid="";
  1877. if (!err_exists) err_exists="";
  1878. if (!err_cantdelete) err_cantdelete="";
  1879. if (!name_inbox) name_inbox="";
  1880. if (!name_drafts) name_drafts="";
  1881. if (!name_sent) name_sent="";
  1882. if (!name_trash) name_trash="";
  1883. if (!folder_img) folder_img="";
  1884. if (!folders_img) folders_img="";
  1886. if (folder_err_msg)
  1887. free(folder_err_msg);
  1888. folder_err_msg=0;
  1890. if (strcmp(cgi("foldermsg"), "sent") == 0)
  1891. folder_err_msg=msg_hasbeensent;
  1893. if (strcmp(cgi("cmd"), "newfolder") == 0)
  1894. {
  1895. const char *newfoldername=cgi("foldername");
  1896. const char *newdirname=cgi("dirname");
  1897. const char *folderdir=cgi("folderdir");
  1899. /*
  1900. ** New folder names cannot contain :s, and must be considered
  1901. ** as valid by maildir_folderpath.
  1902. */
  1904. if (!*newfoldername ||
  1905. strchr(newfoldername, '.') ||
  1906. strchr(newdirname, '.'))
  1907. folder_err_msg=err_invalid;
  1908. {
  1909. char *p=malloc(strlen(folderdir)+strlen(newfoldername)
  1910. +strlen(newdirname)+2);
  1912. if (!p) enomem();
  1913. strcpy(p, folderdir);
  1914. if (*newdirname)
  1915. {
  1916. if (*p) strcat(p, ".");
  1917. strcat(p, newdirname);
  1918. }
  1919. if (*p) strcat(p, ".");
  1920. strcat(p, newfoldername);
  1922. if (strchr(p, ':'))
  1923. {
  1924. free(p);
  1925. folder_err_msg=err_invalid;
  1926. }
  1927. else
  1928. {
  1929. char *q=maildir_folderdir(0, p);
  1931. if (!q)
  1932. folder_err_msg=err_invalid;
  1933. else
  1934. {
  1935. free(q);
  1936. if (maildir_create(p))
  1937. folder_err_msg=err_exists;
  1938. }
  1939. free(p);
  1940. }
  1941. }
  1942. }
  1944. if (*cgi("do.delete"))
  1945. {
  1946. const char *p=cgi("DELETE");
  1947. char *pp=strdup(p);
  1949. if (pp && strchr(pp, ':') == 0)
  1950. {
  1951. if (maildir_delete(pp))
  1952. folder_err_msg=err_cantdelete;
  1953. free(pp);
  1954. }
  1955. }
  1957. if (*cgi("do.subunsub"))
  1958. {
  1959. const char *p=cgi("DELETE");
  1960. char *pp=strdup(p);
  1961. char *d;
  1963. if (pp && *pp == ':' &&
  1964. (d=maildir_shareddir(".", pp+1)) != 0)
  1965. {
  1966. if (access(d, 0) == 0)
  1967. maildir_shared_unsubscribe(".", pp+1);
  1968. else
  1969. maildir_shared_subscribe(".", pp+1);
  1970. free(d);
  1971. }
  1973. if (pp)
  1974. free(pp);
  1975. }
  1977. if (*cgi("do.rename"))
  1978. {
  1979. const char *p=cgi("DELETE");
  1980. char *pp=strdup(p);
  1982. if (pp && strchr(pp, ':') == 0)
  1983. {
  1984. const char *q=cgi("renametofolder");
  1985. const char *r=cgi("renametoname");
  1986. char *s=malloc(strlen(q)+strlen(r)+1);
  1987. char *t;
  1989. if (!s) enomem();
  1990. *s=0;
  1991. if (strchr(q, '.'))
  1992. strcpy(s, q);
  1994. strcat(s, r);
  1996. if (strchr(s, ':') || (t=maildir_folderdir(0, s)) == 0)
  1997. folder_err_msg=err_invalid;
  1998. else
  1999. {
  2000. if (access(t, 0) == 0)
  2001. folder_err_msg=err_exists;
  2002. else
  2003. {
  2004. if (maildir_rename(pp, s))
  2005. folder_err_msg=err_cantdelete;
  2006. }
  2007. free(t);
  2008. }
  2009. free(pp);
  2010. free(s);
  2011. }
  2012. }
  2014. if (folder_err_msg)
  2015. {
  2016. char *p=malloc(strlen(folder_err_msg)+1);
  2018. if (!p) enomem();
  2019. strcpy(p, folder_err_msg);
  2020. folder_err_msg=p;
  2021. }
  2023. sqwebmail_folder=0;
  2024. folderdir=cgi("folderdir");
  2026. printf("<TABLE WIDTH="100%%" BORDER=0 CELLPADDING=2 CELLSPACING=0 BGCOLOR="#FFFFC0">n");
  2027. maildir_readfolders(&folders);
  2028. if (*folderdir)
  2029. {
  2030. char *parentfolder=get_parent_folder(folderdir);
  2031. size_t i;
  2033. printf("<TR><TD ALIGN=LEFT COLSPAN=2 BGCOLOR="#EEEE80">%s&lt;&lt;&lt;&nbsp;<A HREF="", folders_img);
  2034. output_scriptptrget();
  2035. printf("&form=folders&folder=INBOX">");
  2036. print_safe(name_inbox);
  2037. printf("</A>");
  2039. i=0;
  2040. while (parentfolder[i])
  2041. {
  2042. char *p=strchr(parentfolder+i, '.');
  2043. int c;
  2045. if (!p) p=parentfolder+strlen(parentfolder);
  2046. c= *p;
  2047. *p=0;
  2049. printf(".<A HREF="");
  2050. output_scriptptrget();
  2051. printf("&form=folders&folder=INBOX&folderdir=");
  2052. output_urlencoded(parentfolder);
  2053. printf("">");
  2054. print_safe(parentfolder+i);
  2055. printf("</A>");
  2056. if ( (*p=c) != 0) ++p;
  2057. i=p-parentfolder;
  2058. }
  2059. printf("</TD></TR>n");
  2060. free(parentfolder);
  2061. }
  2063. for (i=0; folders[i]; i++)
  2064. {
  2065. const char *p;
  2066. const char *shortname=folders[i];
  2067. size_t j;
  2068. const char *pfix=0;
  2069. int isshared=0;
  2070. int isunsubscribed=0;
  2071. char *img=folder_img;
  2073. if (*shortname == ':') /* Shared folders */
  2074. {
  2075. char *dir;
  2077. isshared=1;
  2078. pfix="+++";
  2080. dir=maildir_shareddir(".", shortname+1);
  2081. if (!dir) continue;
  2082. if (access(dir, 0))
  2083. isunsubscribed=1;
  2084. free(dir);
  2085. }
  2087. if (*folderdir)
  2088. {
  2089. unsigned l=strlen(folderdir);
  2091. if (memcmp(shortname, folderdir, l) ||
  2092. shortname[l] != '.') continue;
  2093. shortname += l;
  2094. ++shortname;
  2095. pfix=0;
  2096. }
  2098. if (!pfix)
  2099. {
  2100. pfix="&gt;&gt;&gt;";
  2101. }
  2103. if ((p=strchr(shortname, '.')) != 0)
  2104. {
  2105. char *s=malloc(p+1-folders[i]), *t;
  2106. unsigned tot_nnew, tot_nother;
  2108. if (!s) enomem();
  2109. memcpy(s, folders[i], p-folders[i]);
  2110. s[p-folders[i]]=0;
  2112. img=folders_img;
  2113. printf("<TR BGCOLOR="#EEEE80"><TD ALIGN=LEFT>%s%s&nbsp;<A HREF="", img, pfix);
  2114. output_scriptptrget();
  2115. printf("&form=folders&folder=INBOX&folderdir=");
  2116. output_urlencoded(s);
  2117. printf("">");
  2118. free(s);
  2119. t=malloc(p-shortname+1);
  2120. if (!t) enomem();
  2121. memcpy(t, shortname, p-shortname);
  2122. t[p-shortname]=0;
  2123. print_safe(isshared ? t+1:t);
  2124. free(t);
  2125. printf("</A>");
  2127. tot_nnew=0;
  2128. tot_nother=0;
  2130. j=i;
  2131. while (folders[j] && memcmp(folders[j], folders[i],
  2132. p-folders[i]+1) == 0)
  2133. {
  2134. maildir_count(folders[j], &nnew, &nother);
  2135. ++j;
  2136. tot_nnew += nnew;
  2137. tot_nother += nother;
  2138. }
  2139. i=j-1;
  2140. if (tot_nnew)
  2141. {
  2142. printf(" <FONT COLOR="#800000" SIZE="-1">");
  2143. printf(unread_label, tot_nnew);
  2144. printf(end_font);
  2145. }
  2146. printf("</TD><TD ALIGN=RIGHT VALIGN=TOP>%s%d%s&nbsp;&nbsp;</TD></TR>nn",
  2147. black_color, tot_nnew + tot_nother, end_font);
  2148. continue;
  2149. }
  2151. nnew=0;
  2152. nother=0;
  2154. if (!isunsubscribed)
  2155. maildir_count(folders[i], &nnew, &nother);
  2157. printf("<TR %s><TD ALIGN=LEFT VALIGN=TOP>",
  2158. isunsubscribed ? "BGCOLOR="#DDDD80"":"");
  2160. printf("%s<INPUT BORDER=0 TYPE="radio" NAME="DELETE" VALUE="", img);
  2161. output_attrencoded(folders[i]);
  2162. printf("">&nbsp;");
  2164. if (!isunsubscribed)
  2165. {
  2166. printf("<A HREF="");
  2167. output_scriptptrget();
  2168. printf("&form=folder&folder=");
  2169. output_urlencoded(folders[i]);
  2170. printf("">");
  2171. }
  2172. if (strcmp(folders[i], INBOX) == 0)
  2173. shortname=name_inbox;
  2174. else if (strcmp(folders[i], DRAFTS) == 0)
  2175. shortname=name_drafts;
  2176. else if (strcmp(folders[i], TRASH) == 0)
  2177. shortname=name_trash;
  2178. else if (strcmp(folders[i], SENT) == 0)
  2179. shortname=name_sent;
  2180. print_safe(shortname);
  2182. if (!isunsubscribed)
  2183. printf("</A>");
  2184. if (nnew)
  2185. {
  2186. printf(" <FONT COLOR="#800000" SIZE="-1">");
  2187. printf(unread_label, nnew);
  2188. printf(end_font);
  2189. }
  2190. printf("</TD><TD ALIGN=RIGHT VALIGN=TOP>");
  2192. if (!isunsubscribed)
  2193. {
  2194. printf("%s%d%s&nbsp;&nbsp;",
  2195. black_color, nnew + nother, end_font);
  2196. }
  2197. else
  2198. printf("&nbsp;n");
  2199. printf("</TD></TR>nn");
  2200. }
  2201. maildir_freefolders(&folders);
  2202. printf("</TABLE>n");
  2203. free(args);
  2204. }
  2206. void folder_list2()
  2207. {
  2208. if (folder_err_msg)
  2209. {
  2210. printf("<P><FONT COLOR="FF0000" SIZE="+1">%s%s<BR><BR>n",
  2211. folder_err_msg, end_font);
  2212. }
  2213. }
  2215. void folder_rename_list()
  2216. {
  2217. char **folders;
  2218. int i;
  2220. printf("<select name="renametofolder">n");
  2221. printf("<option value="%s">", INBOX);
  2222. printf("( ... )");
  2223. printf("</option>n");
  2225. maildir_readfolders(&folders);
  2226. for (i=0; folders[i]; i++)
  2227. {
  2228. const char *p=folders[i];
  2229. char *q;
  2230. size_t ql;
  2232. if (*p == ':') continue; /* Omit shared hierarchy */
  2234. p=strrchr(folders[i], '.');
  2235. if (!p) continue;
  2236. q=malloc(p-folders[i]+1);
  2237. if (!q) enomem();
  2238. memcpy(q, folders[i], p-folders[i]);
  2239. q[p-folders[i]]=0;
  2240. printf("<OPTION VALUE="");
  2241. output_attrencoded(q);
  2242. printf("." %s>",
  2243. strcmp(q, cgi("folderdir")) == 0 ? "SELECTED":"");
  2244. output_attrencoded(q);
  2245. printf(".</OPTION>n");
  2246. ql=strlen(q);
  2247. while (folders[++i])
  2248. {
  2249. if (memcmp(folders[i], q, ql) ||
  2250. folders[i][ql] != '.' ||
  2251. strchr(folders[i]+ql+1, '.')) break;
  2252. }
  2253. --i;
  2254. free(q);
  2255. }
  2256. maildir_freefolders(&folders);
  2257. printf("</select>n");
  2258. }
  2260. static int download_func(const char *, size_t, void *);
  2262. void disposition_attachment(FILE *fp, const char *p)
  2263. {
  2264. fprintf(fp, "Content-Disposition: attachment; filename="");
  2265. while (*p)
  2266. {
  2267. if (*p == '"' || *p == '\')
  2268. putc('\', fp);
  2269. if (!ISCTRL(*p))
  2270. putc(*p, fp);
  2271. p++;
  2272. }
  2273. fprintf(fp, ""n");
  2274. }
  2276. void folder_download(const char *folder, size_t pos, const char *mimeid)
  2277. {
  2278. char *filename;
  2279. struct rfc2045 *rfc, *part;
  2280. char buf[BUFSIZ];
  2281. int n,cnt;
  2282. const char *content_type, *dummy, *charset;
  2283. off_t start_pos, end_pos, start_body;
  2284. FILE *fp;
  2285. const char *content_name;
  2286. off_t ldummy;
  2287. const char *disposition_s;
  2288. const char *disposition_name_s;
  2289. const char *disposition_filename_s;
  2290. int fd;
  2292. filename=maildir_posfind(folder, &pos);
  2294. if (!filename) error("Message not found.");
  2296. fp=0;
  2297. fd=maildir_semisafeopen(filename, O_RDONLY, 0);
  2298. if (fd >= 0)
  2299. {
  2300. if ((fp=fdopen(fd, "r")) == 0)
  2301. close(fd);
  2302. }
  2304. if (!fp)
  2305. {
  2306. free(filename);
  2307. error("Message not found.");
  2308. return;
  2309. }
  2310. free(filename);
  2311. rfc=rfc2045_alloc();
  2313. while ((n=fread(buf, 1, sizeof(buf), fp)) > 0)
  2314. rfc2045_parse(rfc, buf, n);
  2316. part=rfc2045_find(rfc, mimeid);
  2317. if (!part) error("Message not found.");
  2318. rfc2045_mimeinfo(part, &content_type, &dummy, &charset);
  2319. rfc2045_dispositioninfo(part, &disposition_s, &disposition_name_s,
  2320. &disposition_filename_s);
  2322. cginocache();
  2323. content_name=rfc2045_contentname(part);
  2324. if (*cgi("download") == '1')
  2325. {
  2326. const char *p=disposition_filename_s;
  2328. if (!p || !*p) p=content_name;
  2329. if (!p || !*p) p="message.dat";
  2330. disposition_attachment(stdout, p);
  2331. content_type="application/octet-stream";
  2332. }
  2334. printf(
  2335. *content_name ?
  2336. "Content-Type: %s; charset="%s"; name="%s"nn":
  2337. "Content-Type: %s; charset="%s"nn",
  2338. content_type, charset, content_name);
  2340. rfc2045_mimepos(part, &start_pos, &end_pos, &start_body,
  2341. &ldummy, &ldummy);
  2342. if (fseek(fp, start_body, SEEK_SET) < 0)
  2343. {
  2344. error("Seek error.");
  2345. return;
  2346. }
  2348. rfc2045_cdecode_start(part, &download_func, 0);
  2350. while (start_body < end_pos)
  2351. {
  2352. cnt=sizeof(buf);
  2353. if (cnt > end_pos-start_body)
  2354. cnt=end_pos-start_body;
  2355. cnt=fread(buf, 1, cnt, fp);
  2356. if (cnt <= 0) break;
  2357. start_body += cnt;
  2358. rfc2045_cdecode(part, buf, cnt);
  2359. }
  2360. rfc2045_cdecode_end(part);
  2361. fclose(fp);
  2362. }
  2364. static int download_func(const char *p, size_t cnt, void *voidptr)
  2365. {
  2366. while (cnt--)
  2367. if (putchar(*p++) == EOF)
  2368. {
  2369. cleanup();
  2370. fake_exit(0);
  2371. }
  2372. return (0);
  2373. }
  2375. void folder_showtransfer()
  2376. {
  2377. char *p;
  2378. char *deletelab, *purgelab, *movelab, *golab;
  2380. p=strdup(form_args);
  2381. if (!p) return;
  2382. (void)strtok(p, "|");
  2383. (void)strtok(0, "|");
  2384. (void)strtok(0, "|");
  2385. (void)strtok(0, "|");
  2386. (void)strtok(0, "|");
  2387. (void)strtok(0, "|");
  2388. deletelab=strtok(0, "|");
  2389. purgelab=strtok(0, "|");
  2390. movelab=strtok(0, "|");
  2391. golab=strtok(0, "|");
  2392. if (!deletelab) deletelab="";
  2393. if (!purgelab) purgelab="";
  2394. if (!movelab) movelab="";
  2395. if (!golab) golab="";
  2396. (void)strtok(0, "|");
  2397. (void)strtok(0, "|");
  2398. (void)strtok(0, "|");
  2399. folder_inbox=strtok(NULL, "|");
  2400. folder_drafts=strtok(NULL, "|");
  2401. folder_trash=strtok(NULL, "|");
  2402. folder_sent=strtok(NULL, "|");
  2404. printf("<INPUT TYPE=HIDDEN NAME=pos VALUE=%s>", cgi("pos"));
  2405. printf("<INPUT TYPE=SUBMIT NAME=cmddel VALUE="%s">%s%s%s<SELECT NAME=moveto>",
  2406. strcmp(sqwebmail_folder, TRASH) == 0
  2407. ? purgelab:deletelab,
  2408. black_color, movelab, end_font);
  2410. show_transfer_dest(sqwebmail_folder);
  2411. printf("</SELECT><INPUT TYPE=SUBMIT NAME=cmdmove VALUE="%s">n",
  2412. golab);
  2413. }
  2415. void
  2416. folder_cleanup()
  2417. {
  2418. msg_purgelab=0;
  2419. msg_folderlab=0;
  2420. folder_drafts=0;
  2421. folder_inbox=0;
  2422. folder_sent=0;
  2423. folder_trash=0;
  2424. msg_badcontenttype=0;
  2425. msg_dispattachment=0;
  2426. msg_downattachment=0;
  2427. msg_forwardattlab=0;
  2428. msg_forwardlab=0;
  2429. msg_fullheaderlab=0;
  2430. msg_golab=0;
  2431. msg_movetolab=0;
  2432. msg_nextlab=0;
  2433. msg_prevlab=0;
  2434. msg_deletelab=0;
  2435. msg_posfile=0;
  2436. msg_replyalllab=0;
  2437. msg_replylab=0;
  2438. folder_err_msg=0;
  2439. msg_msglab=0;
  2441. msg_type=0;
  2442. initnextprevcnt=0;
  2443. msg_hasprev=0;
  2444. msg_hasnext=0;
  2445. msg_pos=0;
  2446. msg_count=0;
  2447. }