webcit/msg_renderers.c

   1 /*----------------------------------------------------------------------------*/
   2 #include "webcit.h"
   3 #include "webserver.h"
   4
   5 /**
   6  * message index functions
   7  */
   8
   9
  10 void DestroyMimeParts(wc_mime_attachment *Mime)
  11 {
  12         FreeStrBuf(&Mime->Name);
  13         FreeStrBuf(&Mime->FileName);
  14         FreeStrBuf(&Mime->PartNum);
  15         FreeStrBuf(&Mime->Disposition);
  16         FreeStrBuf(&Mime->ContentType);
  17         FreeStrBuf(&Mime->Charset);
  18         FreeStrBuf(&Mime->Data);
  19 }
  20
  21 void DestroyMime(void *vMime)
  22 {
  23         wc_mime_attachment *Mime = (wc_mime_attachment*)vMime;
  24         DestroyMimeParts(Mime);
  25         free(Mime);
  26 }
  27
  28 void DestroyMessageSummary(void *vMsg)
  29 {
  30         message_summary *Msg = (message_summary*) vMsg;
  31
  32         FreeStrBuf(&Msg->from);
  33         FreeStrBuf(&Msg->to);
  34         FreeStrBuf(&Msg->subj);
  35         FreeStrBuf(&Msg->reply_inreplyto);
  36         FreeStrBuf(&Msg->reply_references);
  37         FreeStrBuf(&Msg->cccc);
  38         FreeStrBuf(&Msg->hnod);
  39         FreeStrBuf(&Msg->AllRcpt);
  40         FreeStrBuf(&Msg->Room);
  41         FreeStrBuf(&Msg->Rfca);
  42         FreeStrBuf(&Msg->OtherNode);
  43
  44         FreeStrBuf(&Msg->reply_to);
  45
  46         DeleteHash(&Msg->Attachments);  /**< list of Accachments */
  47         DeleteHash(&Msg->Submessages);
  48         DeleteHash(&Msg->AttachLinks);
  49         DeleteHash(&Msg->AllAttach);
  50         free(Msg);
  51 }
  52
  53
  54
  55 void RegisterMsgHdr(const char *HeaderName, long HdrNLen, ExamineMsgHeaderFunc evaluator, int type)
  56 {
  57         headereval *ev;
  58         ev = (headereval*) malloc(sizeof(headereval));
  59         ev->evaluator = evaluator;
  60         ev->Type = type;
  61         Put(MsgHeaderHandler, HeaderName, HdrNLen, ev, NULL);
  62 }
  63
  64 void RegisterMimeRenderer(const char *HeaderName, long HdrNLen, RenderMimeFunc MimeRenderer)
  65 {
  66         RenderMimeFuncStruct *f;
  67
  68         f = (RenderMimeFuncStruct*) malloc(sizeof(RenderMimeFuncStruct));
  69         f->f = MimeRenderer;
  70         Put(MimeRenderHandler, HeaderName, HdrNLen, f, NULL);
  71
  72 }
  73
  74 /*----------------------------------------------------------------------------*/
  75
  76 /*
  77  *  comparator for two longs in descending order.
  78  */
  79 int longcmp_r(const void *s1, const void *s2) {
  80         long l1;
  81         long l2;
  82
  83         l1 = *(long *)GetSearchPayload(s1);
  84         l2 = *(long *)GetSearchPayload(s2);
  85
  86         if (l1 > l2) return(-1);
  87         if (l1 < l2) return(+1);
  88         return(0);
  89 }
  90
  91 /*
  92  *  comparator for longs; descending order.
  93  */
  94 int qlongcmp_r(const void *s1, const void *s2) {
  95         long l1 = (long) s1;
  96         long l2 = (long) s2;
  97
  98         if (l1 > l2) return(-1);
  99         if (l1 < l2) return(+1);
 100         return(0);
 101 }
 102
 103
 104 /*
 105  * comparator for message summary structs by ascending subject.
 106  */
 107 int summcmp_subj(const void *s1, const void *s2) {
 108         message_summary *summ1;
 109         message_summary *summ2;
 110
 111         summ1 = (message_summary *)GetSearchPayload(s1);
 112         summ2 = (message_summary *)GetSearchPayload(s2);
 113         return strcasecmp(ChrPtr(summ1->subj), ChrPtr(summ2->subj));
 114 }
 115
 116 /*
 117  * comparator for message summary structs by descending subject.
 118  */
 119 int summcmp_rsubj(const void *s1, const void *s2) {
 120         message_summary *summ1;
 121         message_summary *summ2;
 122
 123         summ1 = (message_summary *)GetSearchPayload(s1);
 124         summ2 = (message_summary *)GetSearchPayload(s2);
 125         return strcasecmp(ChrPtr(summ2->subj), ChrPtr(summ1->subj));
 126 }
 127 /*
 128  * comparator for message summary structs by descending subject.
 129  */
 130 int groupchange_subj(const void *s1, const void *s2) {
 131         message_summary *summ1;
 132         message_summary *summ2;
 133
 134         summ1 = (message_summary *)s1;
 135         summ2 = (message_summary *)s2;
 136         return ChrPtr(summ2->subj)[0] != ChrPtr(summ1->subj)[0];
 137 }
 138
 139 /*
 140  * comparator for message summary structs by ascending sender.
 141  */
 142 int summcmp_sender(const void *s1, const void *s2) {
 143         message_summary *summ1;
 144         message_summary *summ2;
 145
 146         summ1 = (message_summary *)GetSearchPayload(s1);
 147         summ2 = (message_summary *)GetSearchPayload(s2);
 148         return strcasecmp(ChrPtr(summ1->from), ChrPtr(summ2->from));
 149 }
 150
 151 /*
 152  * comparator for message summary structs by descending sender.
 153  */
 154 int summcmp_rsender(const void *s1, const void *s2) {
 155         message_summary *summ1;
 156         message_summary *summ2;
 157
 158         summ1 = (message_summary *)GetSearchPayload(s1);
 159         summ2 = (message_summary *)GetSearchPayload(s2);
 160         return strcasecmp(ChrPtr(summ2->from), ChrPtr(summ1->from));
 161 }
 162 /*
 163  * comparator for message summary structs by descending sender.
 164  */
 165 int groupchange_sender(const void *s1, const void *s2) {
 166         message_summary *summ1;
 167         message_summary *summ2;
 168
 169         summ1 = (message_summary *)s1;
 170         summ2 = (message_summary *)s2;
 171         return strcasecmp(ChrPtr(summ2->from), ChrPtr(summ1->from)) != 0;
 172
 173 }
 174
 175 /*
 176  * comparator for message summary structs by ascending date.
 177  */
 178 int summcmp_date(const void *s1, const void *s2) {
 179         message_summary *summ1;
 180         message_summary *summ2;
 181
 182         summ1 = (message_summary *)GetSearchPayload(s1);
 183         summ2 = (message_summary *)GetSearchPayload(s2);
 184
 185         if (summ1->date < summ2->date) return -1;
 186         else if (summ1->date > summ2->date) return +1;
 187         else return 0;
 188 }
 189
 190 /*
 191  * comparator for message summary structs by descending date.
 192  */
 193 int summcmp_rdate(const void *s1, const void *s2) {
 194         message_summary *summ1;
 195         message_summary *summ2;
 196
 197         summ1 = (message_summary *)GetSearchPayload(s1);
 198         summ2 = (message_summary *)GetSearchPayload(s2);
 199
 200         if (summ1->date < summ2->date) return +1;
 201         else if (summ1->date > summ2->date) return -1;
 202         else return 0;
 203 }
 204
 205 /*
 206  * comparator for message summary structs by descending date.
 207  */
 208 const long DAYSECONDS = 24 * 60 * 60;
 209 int groupchange_date(const void *s1, const void *s2) {
 210         message_summary *summ1;
 211         message_summary *summ2;
 212
 213         summ1 = (message_summary *)s1;
 214         summ2 = (message_summary *)s2;
 215
 216         return (summ1->date % DAYSECONDS) != (summ2->date %DAYSECONDS);
 217 }
 218
 219
 220 /*----------------------------------------------------------------------------*/
 221 /* Don't wanna know... or? */
 222 void examine_pref(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset) {return;}
 223 void examine_suff(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset) {return;}
 224 void examine_path(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset) {return;}
 225 void examine_content_encoding(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 226 {
 227 /* TODO: do we care? */
 228 }
 229
 230 void examine_nhdr(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 231 {
 232         Msg->nhdr = 0;
 233         if (!strncasecmp(ChrPtr(HdrLine), "yes", 8))
 234                 Msg->nhdr = 1;
 235 }
 236 int Conditional_ANONYMOUS_MESSAGE(StrBuf *Target, WCTemplputParams *TP)
 237 {
 238         message_summary *Msg = (message_summary*) CTX;
 239         return Msg->nhdr != 0;
 240 }
 241
 242 void examine_type(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 243 {
 244         Msg->format_type = StrToi(HdrLine);
 245
 246 }
 247
 248 void examine_from(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 249 {
 250         FreeStrBuf(&Msg->from);
 251         Msg->from = NewStrBufPlain(NULL, StrLength(HdrLine));
 252         StrBuf_RFC822_to_Utf8(Msg->from, HdrLine, WC->DefaultCharset, FoundCharset);
 253 }
 254 void tmplput_MAIL_SUMM_FROM(StrBuf *Target, WCTemplputParams *TP)
 255 {
 256         message_summary *Msg = (message_summary*) CTX;
 257         StrBufAppendTemplate(Target, TP, Msg->from, 0);
 258 }
 259
 260
 261
 262 void examine_subj(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 263 {
 264         FreeStrBuf(&Msg->subj);
 265         Msg->subj = NewStrBufPlain(NULL, StrLength(HdrLine));
 266         StrBuf_RFC822_to_Utf8(Msg->subj, HdrLine, WC->DefaultCharset, FoundCharset);
 267 }
 268 void tmplput_MAIL_SUMM_SUBJECT(StrBuf *Target, WCTemplputParams *TP)
 269 {/*////TODO: Fwd: and RE: filter!!*/
 270
 271         message_summary *Msg = (message_summary*) CTX;
 272         StrBufAppendTemplate(Target, TP, Msg->subj, 0);
 273 }
 274 int Conditional_MAIL_SUMM_SUBJECT(StrBuf *Target, WCTemplputParams *TP)
 275 {
 276         message_summary *Msg = (message_summary*) CTX;
 277         return StrLength(Msg->subj) > 0;
 278 }
 279
 280
 281 void examine_msgn(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 282 {
 283         FreeStrBuf(&Msg->reply_inreplyto);
 284         Msg->reply_inreplyto = NewStrBufPlain(NULL, StrLength(HdrLine));
 285         StrBuf_RFC822_to_Utf8(Msg->reply_inreplyto, HdrLine, WC->DefaultCharset, FoundCharset);
 286 }
 287 void tmplput_MAIL_SUMM_INREPLYTO(StrBuf *Target, WCTemplputParams *TP)
 288 {
 289         message_summary *Msg = (message_summary*) CTX;
 290         StrBufAppendTemplate(Target, TP, Msg->reply_inreplyto, 0);
 291 }
 292
 293 int Conditional_MAIL_SUMM_UNREAD(StrBuf *Target, WCTemplputParams *TP)
 294 {
 295         message_summary *Msg = (message_summary*) CTX;
 296         return Msg->is_new != 0;
 297 }
 298
 299 void examine_wefw(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 300 {
 301         FreeStrBuf(&Msg->reply_references);
 302         Msg->reply_references = NewStrBufPlain(NULL, StrLength(HdrLine));
 303         StrBuf_RFC822_to_Utf8(Msg->reply_references, HdrLine, WC->DefaultCharset, FoundCharset);
 304 }
 305 void tmplput_MAIL_SUMM_REFIDS(StrBuf *Target, WCTemplputParams *TP)
 306 {
 307         message_summary *Msg = (message_summary*) CTX;
 308         StrBufAppendTemplate(Target, TP, Msg->reply_references, 0);
 309 }
 310
 311
 312 void examine_cccc(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 313 {
 314         FreeStrBuf(&Msg->cccc);
 315         Msg->cccc = NewStrBufPlain(NULL, StrLength(HdrLine));
 316         StrBuf_RFC822_to_Utf8(Msg->cccc, HdrLine, WC->DefaultCharset, FoundCharset);
 317         if (Msg->AllRcpt == NULL)
 318                 Msg->AllRcpt = NewStrBufPlain(NULL, StrLength(HdrLine));
 319         if (StrLength(Msg->AllRcpt) > 0) {
 320                 StrBufAppendBufPlain(Msg->AllRcpt, HKEY(", "), 0);
 321         }
 322         StrBufAppendBuf(Msg->AllRcpt, Msg->cccc, 0);
 323 }
 324 void tmplput_MAIL_SUMM_CCCC(StrBuf *Target, WCTemplputParams *TP)
 325 {
 326         message_summary *Msg = (message_summary*) CTX;
 327         StrBufAppendTemplate(Target, TP, Msg->cccc, 0);
 328 }
 329
 330
 331 void examine_room(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 332 {
 333         if ((StrLength(HdrLine) > 0) &&
 334             (strcasecmp(ChrPtr(HdrLine), ChrPtr(WC->wc_roomname)))) {
 335                 FreeStrBuf(&Msg->Room);
 336                 Msg->Room = NewStrBufDup(HdrLine);
 337         }
 338 }
 339 void tmplput_MAIL_SUMM_ORGROOM(StrBuf *Target, WCTemplputParams *TP)
 340 {
 341         message_summary *Msg = (message_summary*) CTX;
 342         StrBufAppendTemplate(Target, TP, Msg->Room, 0);
 343 }
 344
 345
 346 void examine_rfca(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 347 {
 348         FreeStrBuf(&Msg->Rfca);
 349         Msg->Rfca = NewStrBufDup(HdrLine);
 350 }
 351 void tmplput_MAIL_SUMM_RFCA(StrBuf *Target, WCTemplputParams *TP)
 352 {
 353         message_summary *Msg = (message_summary*) CTX;
 354         StrBufAppendTemplate(Target, TP, Msg->Rfca, 0);
 355 }
 356 int Conditional_MAIL_SUMM_RFCA(StrBuf *Target, WCTemplputParams *TP)
 357 {
 358         message_summary *Msg = (message_summary*) CTX;
 359         return StrLength(Msg->Rfca) > 0;
 360 }
 361 int Conditional_MAIL_SUMM_CCCC(StrBuf *Target, WCTemplputParams *TP)
 362 {
 363         message_summary *Msg = (message_summary*) CTX;
 364         return StrLength(Msg->cccc) > 0;
 365 }
 366
 367 void examine_node(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 368 {
 369         wcsession *WCC = WC;
 370
 371         if ( (StrLength(HdrLine) > 0) &&
 372              ((WC->room_flags & QR_NETWORK)
 373               || ((strcasecmp(ChrPtr(HdrLine), ChrPtr(WCC->serv_info->serv_nodename))
 374                    && (strcasecmp(ChrPtr(HdrLine), ChrPtr(WCC->serv_info->serv_fqdn))))))) {
 375                 FreeStrBuf(&Msg->OtherNode);
 376                 Msg->OtherNode = NewStrBufDup(HdrLine);
 377         }
 378 }
 379 void tmplput_MAIL_SUMM_OTHERNODE(StrBuf *Target, WCTemplputParams *TP)
 380 {
 381         message_summary *Msg = (message_summary*) CTX;
 382         StrBufAppendTemplate(Target, TP, Msg->OtherNode, 0);
 383 }
 384 int Conditional_MAIL_SUMM_OTHERNODE(StrBuf *Target, WCTemplputParams *TP)
 385 {
 386         message_summary *Msg = (message_summary*) CTX;
 387         return StrLength(Msg->OtherNode) > 0;
 388 }
 389
 390
 391 void examine_rcpt(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 392 {
 393         FreeStrBuf(&Msg->to);
 394         Msg->to = NewStrBufPlain(NULL, StrLength(HdrLine));
 395         StrBuf_RFC822_to_Utf8(Msg->to, HdrLine, WC->DefaultCharset, FoundCharset);
 396         if (Msg->AllRcpt == NULL)
 397                 Msg->AllRcpt = NewStrBufPlain(NULL, StrLength(HdrLine));
 398         if (StrLength(Msg->AllRcpt) > 0) {
 399                 StrBufAppendBufPlain(Msg->AllRcpt, HKEY(", "), 0);
 400         }
 401         StrBufAppendBuf(Msg->AllRcpt, Msg->to, 0);
 402 }
 403 void tmplput_MAIL_SUMM_TO(StrBuf *Target, WCTemplputParams *TP)
 404 {
 405         message_summary *Msg = (message_summary*) CTX;
 406         StrBufAppendTemplate(Target, TP, Msg->to, 0);
 407 }
 408 int Conditional_MAIL_SUMM_TO(StrBuf *Target, WCTemplputParams *TP)
 409 {
 410         message_summary *Msg = (message_summary*) CTX;
 411         return StrLength(Msg->to) != 0;
 412 }
 413 int Conditional_MAIL_SUMM_SUBJ(StrBuf *Target, WCTemplputParams *TP)
 414 {
 415         message_summary *Msg = (message_summary*) CTX;
 416         return StrLength(Msg->subj) != 0;
 417 }
 418 void tmplput_MAIL_SUMM_ALLRCPT(StrBuf *Target, WCTemplputParams *TP)
 419 {
 420         message_summary *Msg = (message_summary*) CTX;
 421         StrBufAppendTemplate(Target, TP, Msg->AllRcpt, 0);
 422 }
 423
 424
 425
 426 void tmplput_SUMM_COUNT(StrBuf *Target, WCTemplputParams *TP)
 427 {
 428         StrBufAppendPrintf(Target, "%d", GetCount( WC->summ));
 429 }
 430
 431 HashList *iterate_get_mailsumm_All(StrBuf *Target, WCTemplputParams *TP)
 432 {
 433         return WC->summ;
 434 }
 435 void examine_time(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 436 {
 437         Msg->date = StrTol(HdrLine);
 438 }
 439
 440 void tmplput_MAIL_SUMM_DATE_BRIEF(StrBuf *Target, WCTemplputParams *TP)
 441 {
 442         char datebuf[64];
 443         message_summary *Msg = (message_summary*) CTX;
 444         webcit_fmt_date(datebuf, Msg->date, DATEFMT_BRIEF);
 445         StrBufAppendBufPlain(Target, datebuf, -1, 0);
 446 }
 447
 448 void tmplput_MAIL_SUMM_DATE_FULL(StrBuf *Target, WCTemplputParams *TP)
 449 {
 450         char datebuf[64];
 451         message_summary *Msg = (message_summary*) CTX;
 452         webcit_fmt_date(datebuf, Msg->date, DATEFMT_FULL);
 453         StrBufAppendBufPlain(Target, datebuf, -1, 0);
 454 }
 455 void tmplput_MAIL_SUMM_DATE_NO(StrBuf *Target, WCTemplputParams *TP)
 456 {
 457         message_summary *Msg = (message_summary*) CTX;
 458         StrBufAppendPrintf(Target, "%ld", Msg->date, 0);
 459 }
 460
 461
 462
 463 void render_MAIL(wc_mime_attachment *Mime, StrBuf *RawData, StrBuf *FoundCharset)
 464 {
 465         Mime->Data = NewStrBufPlain(NULL, Mime->length);
 466         read_message(Mime->Data, HKEY("view_submessage"), Mime->msgnum, 0, Mime->PartNum);
 467 /*
 468         if ( (!IsEmptyStr(mime_submessages)) && (!section[0]) ) {
 469                 for (i=0; i<num_tokens(mime_submessages, '|'); ++i) {
 470                         extract_token(buf, mime_submessages, i, '|', sizeof buf);
 471                         / ** use printable_view to suppress buttons * /
 472                         wprintf("<blockquote>");
 473                         read_message(Mime->msgnum, 1, ChrPtr(Mime->Section));
 474                         wprintf("</blockquote>");
 475                 }
 476         }
 477 */
 478 }
 479
 480 void render_MIME_VCard(wc_mime_attachment *Mime, StrBuf *RawData, StrBuf *FoundCharset)
 481 {
 482         wcsession *WCC = WC;
 483         MimeLoadData(Mime);
 484         if (StrLength(Mime->Data) > 0) {
 485                 StrBuf *Buf;
 486                 Buf = NewStrBuf();
 487                 /** If it's my vCard I can edit it */
 488                 if (    (!strcasecmp(ChrPtr(WCC->wc_roomname), USERCONFIGROOM))
 489                         || (!strcasecmp(&(ChrPtr(WCC->wc_roomname)[11]), USERCONFIGROOM))
 490                         || (WC->wc_view == VIEW_ADDRESSBOOK)
 491                         ) {
 492                         StrBufAppendPrintf(Buf, "<a href=\"edit_vcard?msgnum=%ld&partnum=%s\">",
 493                                 Mime->msgnum, ChrPtr(Mime->PartNum));
 494                         StrBufAppendPrintf(Buf, "[%s]</a>", _("edit"));
 495                 }
 496
 497                 /* In all cases, display the full card */
 498                 display_vcard(Buf, ChrPtr(Mime->Data), 0, 1, NULL, Mime->msgnum);
 499                 FreeStrBuf(&Mime->Data);
 500                 Mime->Data = Buf;
 501         }
 502
 503 }
 504
 505 void render_MIME_ICS(wc_mime_attachment *Mime, StrBuf *RawData, StrBuf *FoundCharset)
 506 {
 507         if (StrLength(Mime->Data) == 0) {
 508                 MimeLoadData(Mime);
 509         }
 510         if (StrLength(Mime->Data) > 0) {
 511                 cal_process_attachment(Mime);
 512         }
 513 }
 514
 515
 516
 517 void examine_mime_part(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 518 {
 519         wc_mime_attachment *Mime;
 520         StrBuf *Buf;
 521
 522         Mime = (wc_mime_attachment*) malloc(sizeof(wc_mime_attachment));
 523         memset(Mime, 0, sizeof(wc_mime_attachment));
 524         Mime->msgnum = Msg->msgnum;
 525         Buf = NewStrBuf();
 526
 527         Mime->Name = NewStrBuf();
 528         StrBufExtract_token(Buf, HdrLine, 0, '|');
 529         StrBuf_RFC822_to_Utf8(Mime->Name, Buf, WC->DefaultCharset, FoundCharset);
 530         StrBufTrim(Mime->Name);
 531
 532         StrBufExtract_token(Buf, HdrLine, 1, '|');
 533         Mime->FileName = NewStrBuf();
 534         StrBuf_RFC822_to_Utf8(Mime->FileName, Buf, WC->DefaultCharset, FoundCharset);
 535         StrBufTrim(Mime->FileName);
 536
 537         Mime->PartNum = NewStrBuf();
 538         StrBufExtract_token(Mime->PartNum, HdrLine, 2, '|');
 539         StrBufTrim(Mime->PartNum);
 540         if (strchr(ChrPtr(Mime->PartNum), '.') != NULL)
 541                 Mime->level = 2;
 542         else
 543                 Mime->level = 1;
 544
 545         Mime->Disposition = NewStrBuf();
 546         StrBufExtract_token(Mime->Disposition, HdrLine, 3, '|');
 547
 548         Mime->ContentType = NewStrBuf();
 549         StrBufExtract_token(Mime->ContentType, HdrLine, 4, '|');
 550         StrBufTrim(Mime->ContentType);
 551         StrBufLowerCase(Mime->ContentType);
 552
 553         if (!strcmp(ChrPtr(Mime->ContentType), "application/octet-stream")) {
 554                 StrBufPlain(Mime->ContentType,
 555                             GuessMimeByFilename(SKEY(Mime->FileName)), -1);
 556         }
 557         Mime->length = StrBufExtract_int(HdrLine, 5, '|');
 558
 559         if ( (StrLength(Mime->FileName) == 0) && (StrLength(Mime->Name) > 0) ) {
 560                 StrBufAppendBuf(Mime->FileName, Mime->Name, 0);
 561         }
 562
 563         if (StrLength(Msg->PartNum) > 0) {
 564                 StrBuf *tmp;
 565                 StrBufPrintf(Buf, "%s.%s", ChrPtr(Msg->PartNum), ChrPtr(Mime->PartNum));
 566                 tmp = Mime->PartNum;
 567                 Mime->PartNum = Buf;
 568                 Buf = tmp;
 569         }
 570
 571         if (Msg->AllAttach == NULL)
 572                 Msg->AllAttach = NewHash(1,NULL);
 573         Put(Msg->AllAttach, SKEY(Mime->PartNum), Mime, DestroyMime);
 574         FreeStrBuf(&Buf);
 575 }
 576
 577
 578 void evaluate_mime_part(message_summary *Msg, wc_mime_attachment *Mime)
 579 {
 580         void *vMimeRenderer;
 581
 582         /* just print the root-node */
 583         if ((Mime->level == 1) &&
 584             GetHash(MimeRenderHandler, SKEY(Mime->ContentType), &vMimeRenderer) &&
 585             vMimeRenderer != NULL)
 586         {
 587                 Mime->Renderer = (RenderMimeFuncStruct*) vMimeRenderer;
 588                 if (Msg->Submessages == NULL)
 589                         Msg->Submessages = NewHash(1,NULL);
 590                 Put(Msg->Submessages, SKEY(Mime->PartNum), Mime, reference_free_handler);
 591         }
 592         else if ((Mime->level == 1) &&
 593                  (!strcasecmp(ChrPtr(Mime->Disposition), "inline"))
 594                  && (!strncasecmp(ChrPtr(Mime->ContentType), "image/", 6)) ){
 595                 if (Msg->AttachLinks == NULL)
 596                         Msg->AttachLinks = NewHash(1,NULL);
 597                 Put(Msg->AttachLinks, SKEY(Mime->PartNum), Mime, reference_free_handler);
 598         }
 599         else if ((Mime->level == 1) &&
 600                  (StrLength(Mime->ContentType) > 0) &&
 601                   ( (!strcasecmp(ChrPtr(Mime->Disposition), "attachment"))
 602                     || (!strcasecmp(ChrPtr(Mime->Disposition), "inline"))
 603                     || (!strcasecmp(ChrPtr(Mime->Disposition), ""))))
 604         {
 605                 if (Msg->AttachLinks == NULL)
 606                         Msg->AttachLinks = NewHash(1,NULL);
 607                 Put(Msg->AttachLinks, SKEY(Mime->PartNum), Mime, reference_free_handler);
 608                 if ((strcasecmp(ChrPtr(Mime->ContentType), "application/octet-stream") == 0) &&
 609                     (StrLength(Mime->FileName) > 0)) {
 610                         FlushStrBuf(Mime->ContentType);
 611                         StrBufAppendBufPlain(Mime->ContentType,
 612                                              GuessMimeByFilename(SKEY(Mime->FileName)),
 613                                              -1, 0);
 614                 }
 615         }
 616 }
 617
 618 void tmplput_MAIL_SUMM_NATTACH(StrBuf *Target, WCTemplputParams *TP)
 619 {
 620         message_summary *Msg = (message_summary*) CTX;
 621         StrBufAppendPrintf(Target, "%ld", GetCount(Msg->Attachments));
 622 }
 623
 624
 625 void examine_hnod(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 626 {
 627         FreeStrBuf(&Msg->hnod);
 628         Msg->hnod = NewStrBufPlain(NULL, StrLength(HdrLine));
 629         StrBuf_RFC822_to_Utf8(Msg->hnod, HdrLine, WC->DefaultCharset, FoundCharset);
 630 }
 631 void tmplput_MAIL_SUMM_H_NODE(StrBuf *Target, WCTemplputParams *TP)
 632 {
 633         message_summary *Msg = (message_summary*) CTX;
 634         StrBufAppendTemplate(Target, TP, Msg->hnod, 0);
 635 }
 636 int Conditional_MAIL_SUMM_H_NODE(StrBuf *Target, WCTemplputParams *TP)
 637 {
 638         message_summary *Msg = (message_summary*) CTX;
 639         return StrLength(Msg->hnod) > 0;
 640 }
 641
 642
 643
 644 void examine_text(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 645 {
 646         Msg->MsgBody->Data = NewStrBuf();
 647 }
 648
 649 void examine_msg4_partnum(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 650 {
 651         Msg->MsgBody->PartNum = NewStrBufDup(HdrLine);
 652         StrBufTrim(Msg->MsgBody->PartNum);
 653 }
 654
 655 void examine_content_lengh(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 656 {
 657         Msg->MsgBody->length = StrTol(HdrLine);
 658         Msg->MsgBody->size_known = 1;
 659 }
 660
 661 void examine_content_type(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 662 {
 663         void *vHdr;
 664         headereval *Hdr;
 665         StrBuf *Token;
 666         StrBuf *Value;
 667         const char* sem;
 668         const char *eq;
 669         int len;
 670         StrBufTrim(HdrLine);
 671         Msg->MsgBody->ContentType = NewStrBufDup(HdrLine);
 672         sem = strchr(ChrPtr(HdrLine), ';');
 673
 674         if (sem != NULL) {
 675                 Token = NewStrBufPlain(NULL, StrLength(HdrLine));
 676                 Value = NewStrBufPlain(NULL, StrLength(HdrLine));
 677                 len = sem - ChrPtr(HdrLine);
 678                 StrBufCutAt(Msg->MsgBody->ContentType, len, NULL);
 679                 while (sem != NULL) {
 680                         while (isspace(*(sem + 1)))
 681                                 sem ++;
 682                         StrBufCutLeft(HdrLine, sem - ChrPtr(HdrLine));
 683                         sem = strchr(ChrPtr(HdrLine), ';');
 684                         if (sem != NULL)
 685                                 len = sem - ChrPtr(HdrLine);
 686                         else
 687                                 len = StrLength(HdrLine);
 688                         FlushStrBuf(Token);
 689                         FlushStrBuf(Value);
 690                         StrBufAppendBufPlain(Token, ChrPtr(HdrLine), len, 0);
 691                         eq = strchr(ChrPtr(Token), '=');
 692                         if (eq != NULL) {
 693                                 len = eq - ChrPtr(Token);
 694                                 StrBufAppendBufPlain(Value, eq + 1, StrLength(Token) - len - 1, 0);
 695                                 StrBufCutAt(Token, len, NULL);
 696                                 StrBufTrim(Value);
 697                         }
 698                         StrBufTrim(Token);
 699
 700                         if (GetHash(MsgHeaderHandler, SKEY(Token), &vHdr) &&
 701                             (vHdr != NULL)) {
 702                                 Hdr = (headereval*)vHdr;
 703                                 Hdr->evaluator(Msg, Value, FoundCharset);
 704                         }
 705                         else lprintf(1, "don't know how to handle content type sub-header[%s]\n", ChrPtr(Token));
 706                 }
 707                 FreeStrBuf(&Token);
 708                 FreeStrBuf(&Value);
 709         }
 710 }
 711
 712 void tmplput_MAIL_SUMM_N(StrBuf *Target, WCTemplputParams *TP)
 713 {
 714         message_summary *Msg = (message_summary*) CTX;
 715         StrBufAppendPrintf(Target, "%ld", Msg->msgnum);
 716 }
 717
 718
 719
 720 int Conditional_MAIL_MIME_ALL(StrBuf *Target, WCTemplputParams *TP)
 721 {
 722         message_summary *Msg = (message_summary*) CTX;
 723         return GetCount(Msg->Attachments) > 0;
 724 }
 725
 726 int Conditional_MAIL_MIME_SUBMESSAGES(StrBuf *Target, WCTemplputParams *TP)
 727 {
 728         message_summary *Msg = (message_summary*) CTX;
 729         return GetCount(Msg->Submessages) > 0;
 730 }
 731
 732 int Conditional_MAIL_MIME_ATTACHLINKS(StrBuf *Target, WCTemplputParams *TP)
 733 {
 734         message_summary *Msg = (message_summary*) CTX;
 735         return GetCount(Msg->AttachLinks) > 0;
 736 }
 737
 738 int Conditional_MAIL_MIME_ATTACH(StrBuf *Target, WCTemplputParams *TP)
 739 {
 740         message_summary *Msg = (message_summary*) CTX;
 741         return GetCount(Msg->AllAttach) > 0;
 742 }
 743
 744
 745
 746 /*----------------------------------------------------------------------------*/
 747 void tmplput_QUOTED_MAIL_BODY(StrBuf *Target, WCTemplputParams *TP)
 748 {
 749         long MsgNum;
 750         StrBuf *Buf;
 751
 752         MsgNum = LBstr(TKEY(0));
 753         Buf = NewStrBuf();
 754         read_message(Buf, HKEY("view_message_replyquote"), MsgNum, 0, NULL);
 755         StrBufAppendTemplate(Target, TP, Buf, 1);
 756         FreeStrBuf(&Buf);
 757 }
 758
 759 void tmplput_MAIL_BODY(StrBuf *Target, WCTemplputParams *TP)
 760 {
 761         message_summary *Msg = (message_summary*) CTX;
 762         StrBufAppendTemplate(Target, TP, Msg->MsgBody->Data, 0);
 763 }
 764
 765
 766 void render_MAIL_variformat(wc_mime_attachment *Mime, StrBuf *RawData, StrBuf *FoundCharset)
 767 {
 768         /* Messages in legacy Citadel variformat get handled thusly... */
 769         StrBuf *Target = NewStrBufPlain(NULL, StrLength(Mime->Data));
 770         FmOut(Target, "JUSTIFY", Mime->Data);
 771         FreeStrBuf(&Mime->Data);
 772         Mime->Data = Target;
 773 }
 774
 775 void render_MAIL_text_plain(wc_mime_attachment *Mime, StrBuf *RawData, StrBuf *FoundCharset)
 776 {
 777         StrBuf *cs = NULL;
 778         const char *ptr, *pte;
 779         const char *BufPtr = NULL;
 780         StrBuf *Line;
 781         StrBuf *Line1;
 782         StrBuf *Line2;
 783         StrBuf *Target;
 784
 785         int ConvertIt = 1;
 786         int bn = 0;
 787         int bq = 0;
 788         int i, n, done = 0;
 789         long len;
 790 #ifdef HAVE_ICONV
 791         iconv_t ic = (iconv_t)(-1) ;
 792 #endif
 793
 794         if ((StrLength(Mime->Data) == 0) && (Mime->length > 0)) {
 795                 FreeStrBuf(&Mime->Data);
 796                 MimeLoadData(Mime);
 797         }
 798
 799         /* Boring old 80-column fixed format text gets handled this way... */
 800         if ((strcasecmp(ChrPtr(Mime->Charset), "us-ascii") == 0) &&
 801             (strcasecmp(ChrPtr(Mime->Charset), "UTF-8") == 0))
 802                 ConvertIt = 0;
 803
 804 #ifdef HAVE_ICONV
 805         if (ConvertIt) {
 806                 if (StrLength(Mime->Charset) != 0)
 807                         cs = Mime->Charset;
 808                 else if (StrLength(FoundCharset) > 0)
 809                         cs = FoundCharset;
 810                 else if (StrLength(WC->DefaultCharset) > 0)
 811                         cs = WC->DefaultCharset;
 812                 if (cs == NULL) {
 813                         ConvertIt = 0;
 814                 }
 815                 else {
 816                         ctdl_iconv_open("UTF-8", ChrPtr(cs), &ic);
 817                         if (ic == (iconv_t)(-1) ) {
 818                                 lprintf(5, "%s:%d iconv_open(UTF-8, %s) failed: %s\n",
 819                                         __FILE__, __LINE__, ChrPtr(Mime->Charset), strerror(errno));
 820                         }
 821                 }
 822         }
 823 #endif
 824         Line = NewStrBuf();
 825         Line1 = NewStrBuf();
 826         Line2 = NewStrBuf();
 827         Target = NewStrBufPlain(NULL, StrLength(Mime->Data));
 828
 829         while ((n = StrBufSipLine(Line, Mime->Data, &BufPtr), n >= 0) && !done)
 830         {
 831                 done = n == 0;
 832                 bq = 0;
 833                 i = 0;
 834                 ptr = ChrPtr(Line);
 835                 len = StrLength(Line);
 836                 pte = ptr + len;
 837
 838                 while ((ptr < pte) &&
 839                        ((*ptr == '>') ||
 840                         isspace(*ptr)))
 841                 {
 842                         if (*ptr == '>')
 843                                 bq++;
 844                         ptr ++;
 845                         i++;
 846                 }
 847                 if (i > 0) StrBufCutLeft(Line, i);
 848
 849                 if (StrLength(Line) == 0) {
 850                         StrBufAppendBufPlain(Target, HKEY("<tt></tt><br />\n"), 0);
 851                         continue;
 852                 }
 853
 854                 for (i = bn; i < bq; i++)
 855                         StrBufAppendBufPlain(Target, HKEY("<blockquote>"), 0);
 856                 for (i = bq; i < bn; i++)
 857                         StrBufAppendBufPlain(Target, HKEY("</blockquote>"), 0);
 858
 859                 if (ConvertIt == 1) {
 860                         StrBufConvert(Line, Line1, &ic);
 861                 }
 862
 863                 StrBufAppendBufPlain(Target, HKEY("<tt>"), 0);
 864                 UrlizeText(Line1, Line, Line2);
 865
 866                 StrEscAppend(Target, Line1, NULL, 0, 0);
 867                 StrBufAppendBufPlain(Target, HKEY("</tt><br />\n"), 0);
 868                 bn = bq;
 869         }
 870
 871         for (i = 0; i < bn; i++)
 872                 StrBufAppendBufPlain(Target, HKEY("</blockquote>"), 0);
 873
 874         StrBufAppendBufPlain(Target, HKEY("</i><br />"), 0);
 875 #ifdef HAVE_ICONV
 876         if (ic != (iconv_t)(-1) ) {
 877                 iconv_close(ic);
 878         }
 879 #endif
 880
 881         FreeStrBuf(&Mime->Data);
 882         Mime->Data = Target;
 883         FlushStrBuf(Mime->ContentType);
 884         StrBufAppendBufPlain(Mime->ContentType, HKEY("text/html"), 0);
 885         FlushStrBuf(Mime->Charset);
 886         StrBufAppendBufPlain(Mime->Charset, HKEY("UTF-8"), 0);
 887         FreeStrBuf(&Line);
 888         FreeStrBuf(&Line1);
 889         FreeStrBuf(&Line2);
 890 }
 891
 892 void render_MAIL_html(wc_mime_attachment *Mime, StrBuf *RawData, StrBuf *FoundCharset)
 893 {
 894         StrBuf *Buf;
 895
 896         if (StrLength(Mime->Data) == 0)
 897                 return;
 898
 899         Buf = NewStrBufPlain(NULL, StrLength(Mime->Data));
 900
 901         /* HTML is fun, but we've got to strip it first */
 902         output_html(ChrPtr(Mime->Charset),
 903                     (WC->wc_view == VIEW_WIKI ? 1 : 0),
 904                     Mime->msgnum,
 905                     Mime->Data, Buf);
 906         FreeStrBuf(&Mime->Data);
 907         Mime->Data = Buf;
 908 }
 909
 910 void render_MAIL_UNKNOWN(wc_mime_attachment *Mime, StrBuf *RawData, StrBuf *FoundCharset)
 911 {
 912         /* Unknown weirdness */
 913         FlushStrBuf(Mime->Data);
 914         StrBufAppendBufPlain(Mime->Data, _("I don't know how to display "), -1, 0);
 915         StrBufAppendBuf(Mime->Data, Mime->ContentType, 0);
 916         StrBufAppendBufPlain(Mime->Data, HKEY("<br />\n"), 0);
 917 }
 918
 919
 920
 921
 922
 923
 924 HashList *iterate_get_mime_All(StrBuf *Target, WCTemplputParams *TP)
 925 {
 926         message_summary *Msg = (message_summary*) CTX;
 927         return Msg->Attachments;
 928 }
 929 HashList *iterate_get_mime_Submessages(StrBuf *Target, WCTemplputParams *TP)
 930 {
 931         message_summary *Msg = (message_summary*) CTX;
 932         return Msg->Submessages;
 933 }
 934 HashList *iterate_get_mime_AttachLinks(StrBuf *Target, WCTemplputParams *TP)
 935 {
 936         message_summary *Msg = (message_summary*) CTX;
 937         return Msg->AttachLinks;
 938 }
 939 HashList *iterate_get_mime_Attachments(StrBuf *Target, WCTemplputParams *TP)
 940 {
 941         message_summary *Msg = (message_summary*) CTX;
 942         return Msg->AllAttach;
 943 }
 944
 945 void tmplput_MIME_Name(StrBuf *Target, WCTemplputParams *TP)
 946 {
 947         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
 948         StrBufAppendTemplate(Target, TP, mime->Name, 0);
 949 }
 950
 951 void tmplput_MIME_FileName(StrBuf *Target, WCTemplputParams *TP)
 952 {
 953         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
 954         StrBufAppendTemplate(Target, TP, mime->FileName, 0);
 955 }
 956
 957 void tmplput_MIME_PartNum(StrBuf *Target, WCTemplputParams *TP)
 958 {
 959         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
 960         StrBufAppendTemplate(Target, TP, mime->PartNum, 0);
 961 }
 962
 963 void tmplput_MIME_MsgNum(StrBuf *Target, WCTemplputParams *TP)
 964 {
 965         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
 966         StrBufAppendPrintf(Target, "%ld", mime->msgnum);
 967 }
 968
 969 void tmplput_MIME_Disposition(StrBuf *Target, WCTemplputParams *TP)
 970 {
 971         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
 972         StrBufAppendTemplate(Target, TP, mime->Disposition, 0);
 973 }
 974
 975 void tmplput_MIME_ContentType(StrBuf *Target, WCTemplputParams *TP)
 976 {
 977         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
 978         StrBufAppendTemplate(Target, TP, mime->ContentType, 0);
 979 }
 980
 981 void examine_charset(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
 982 {
 983         Msg->MsgBody->Charset = NewStrBufDup(HdrLine);
 984 }
 985
 986 void tmplput_MIME_Charset(StrBuf *Target, WCTemplputParams *TP)
 987 {
 988         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
 989         StrBufAppendTemplate(Target, TP, mime->Charset, 0);
 990 }
 991
 992 void tmplput_MIME_Data(StrBuf *Target, WCTemplputParams *TP)
 993 {
 994         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
 995         if (mime->Renderer != NULL)
 996                 mime->Renderer->f(mime, NULL, NULL);
 997         StrBufAppendTemplate(Target, TP, mime->Data, 0);
 998         /* TODO: check whether we need to load it now? */
 999 }
1000
1001 void tmplput_MIME_LoadData(StrBuf *Target, WCTemplputParams *TP)
1002 {
1003         wcsession *WCC = WC;
1004         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
1005         wc_mime_attachment *att;
1006
1007         if ( (!strcasecmp(ChrPtr(mime->Disposition), "inline"))||
1008              (!strcasecmp(ChrPtr(mime->Disposition), "attachment")) )
1009         {
1010
1011                 int n;
1012                 char N[64];
1013                 /* steal this mime part... */
1014                 att = malloc(sizeof(wc_mime_attachment));
1015                 memcpy(att, mime, sizeof(wc_mime_attachment));
1016                 memset(mime, 0, sizeof(wc_mime_attachment));
1017
1018                 if (att->Data == NULL)
1019                         MimeLoadData(att);
1020
1021                 if (WCC->attachments == NULL)
1022                         WCC->attachments = NewHash(1, NULL);
1023                 /* And add it to the list. */
1024                 n = snprintf(N, sizeof N, "%d", GetCount(WCC->attachments) + 1);
1025                 Put(WCC->attachments, N, n, att, DestroyMime);
1026         }
1027 }
1028
1029 void tmplput_MIME_Length(StrBuf *Target, WCTemplputParams *TP)
1030 {
1031         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
1032         StrBufAppendPrintf(Target, "%ld", mime->length);
1033 }
1034
1035 HashList *iterate_get_registered_Attachments(StrBuf *Target, WCTemplputParams *TP)
1036 {
1037         return WC->attachments;
1038 }
1039
1040 void servcmd_do_search(char *buf, long bufsize)
1041 {
1042         snprintf(buf, bufsize, "MSGS SEARCH|%s", bstr("query"));
1043 }
1044
1045 void servcmd_headers(char *buf, long bufsize)
1046 {
1047         snprintf(buf, bufsize, "MSGS ALL");
1048 }
1049
1050 void servcmd_readfwd(char *buf, long bufsize)
1051 {
1052         snprintf(buf, bufsize, "MSGS ALL");
1053 }
1054
1055 void servcmd_readnew(char *buf, long bufsize)
1056 {
1057         snprintf(buf, bufsize, "MSGS NEW");
1058 }
1059
1060 void servcmd_readold(char *buf, long bufsize)
1061 {
1062         snprintf(buf, bufsize, "MSGS OLD");
1063 }
1064
1065
1066 readloop_struct rlid[] = {
1067         { {HKEY("do_search")}, servcmd_do_search},
1068         { {HKEY("headers")},   servcmd_headers},
1069         { {HKEY("readfwd")},   servcmd_readfwd},
1070         { {HKEY("readnew")},   servcmd_readnew},
1071         { {HKEY("readold")},   servcmd_readold}
1072 };
1073
1074
1075
1076 void SetAccessCommand(long Oper)
1077 {
1078         wcsession *WCC = WC;
1079
1080         if (WCC->UrlFragment1 != NULL ) {
1081                 FlushStrBuf(WCC->UrlFragment1);
1082                 StrBufAppendBufPlain(WCC->UrlFragment1,
1083                                      rlid[Oper].name.Key, rlid[Oper].name.len, 0);
1084         }
1085         else
1086                 WCC->UrlFragment1 = NewStrBufPlain(rlid[Oper].name.Key, rlid[Oper].name.len);
1087 }
1088
1089
1090
1091
1092
1093 void
1094 InitModule_MSGRENDERERS
1095 (void)
1096 {
1097         RegisterSortFunc(HKEY("date"),
1098                          NULL, 0,
1099                          summcmp_date,
1100                          summcmp_rdate,
1101                          groupchange_date,
1102                          CTX_MAILSUM);
1103         RegisterSortFunc(HKEY("subject"),
1104                          NULL, 0,
1105                          summcmp_subj,
1106                          summcmp_rsubj,
1107                          groupchange_subj,
1108                          CTX_MAILSUM);
1109         RegisterSortFunc(HKEY("sender"),
1110                          NULL, 0,
1111                          summcmp_sender,
1112                          summcmp_rsender,
1113                          groupchange_sender,
1114                          CTX_MAILSUM);
1115
1116         RegisterNamespace("SUMM:COUNT", 0, 0, tmplput_SUMM_COUNT, CTX_NONE);
1117         /* iterate over all known mails in WC->summ */
1118         RegisterIterator("MAIL:SUMM:MSGS", 0, NULL, iterate_get_mailsumm_All,
1119                          NULL,NULL, CTX_MAILSUM, CTX_NONE, IT_NOFLAG);
1120
1121         RegisterNamespace("MAIL:SUMM:DATEBRIEF", 0, 0, tmplput_MAIL_SUMM_DATE_BRIEF, CTX_MAILSUM);
1122         RegisterNamespace("MAIL:SUMM:DATEFULL", 0, 0, tmplput_MAIL_SUMM_DATE_FULL, CTX_MAILSUM);
1123         RegisterNamespace("MAIL:SUMM:DATENO",  0, 0, tmplput_MAIL_SUMM_DATE_NO,  CTX_MAILSUM);
1124         RegisterNamespace("MAIL:SUMM:N",       0, 0, tmplput_MAIL_SUMM_N,        CTX_MAILSUM);
1125         RegisterNamespace("MAIL:SUMM:FROM",    0, 2, tmplput_MAIL_SUMM_FROM,     CTX_MAILSUM);
1126         RegisterNamespace("MAIL:SUMM:TO",      0, 2, tmplput_MAIL_SUMM_TO,       CTX_MAILSUM);
1127         RegisterNamespace("MAIL:SUMM:SUBJECT", 0, 4, tmplput_MAIL_SUMM_SUBJECT,  CTX_MAILSUM);
1128         RegisterNamespace("MAIL:SUMM:NTATACH", 0, 0, tmplput_MAIL_SUMM_NATTACH,  CTX_MAILSUM);
1129         RegisterNamespace("MAIL:SUMM:CCCC", 0, 2, tmplput_MAIL_SUMM_CCCC,  CTX_MAILSUM);
1130         RegisterNamespace("MAIL:SUMM:H_NODE", 0, 2, tmplput_MAIL_SUMM_H_NODE,  CTX_MAILSUM);
1131         RegisterNamespace("MAIL:SUMM:ALLRCPT", 0, 2, tmplput_MAIL_SUMM_ALLRCPT,  CTX_MAILSUM);
1132         RegisterNamespace("MAIL:SUMM:ORGROOM", 0, 2, tmplput_MAIL_SUMM_ORGROOM,  CTX_MAILSUM);
1133         RegisterNamespace("MAIL:SUMM:RFCA", 0, 2, tmplput_MAIL_SUMM_RFCA,  CTX_MAILSUM);
1134         RegisterNamespace("MAIL:SUMM:OTHERNODE", 2, 0, tmplput_MAIL_SUMM_OTHERNODE,  CTX_MAILSUM);
1135         RegisterNamespace("MAIL:SUMM:REFIDS", 0, 1, tmplput_MAIL_SUMM_REFIDS,  CTX_MAILSUM);
1136         RegisterNamespace("MAIL:SUMM:INREPLYTO", 0, 2, tmplput_MAIL_SUMM_INREPLYTO,  CTX_MAILSUM);
1137         RegisterNamespace("MAIL:BODY", 0, 2, tmplput_MAIL_BODY,  CTX_MAILSUM);
1138         RegisterNamespace("MAIL:QUOTETEXT", 1, 2, tmplput_QUOTED_MAIL_BODY,  CTX_NONE);
1139         RegisterConditional(HKEY("COND:MAIL:SUMM:RFCA"), 0, Conditional_MAIL_SUMM_RFCA,  CTX_MAILSUM);
1140         RegisterConditional(HKEY("COND:MAIL:SUMM:CCCC"), 0, Conditional_MAIL_SUMM_CCCC,  CTX_MAILSUM);
1141         RegisterConditional(HKEY("COND:MAIL:SUMM:UNREAD"), 0, Conditional_MAIL_SUMM_UNREAD, CTX_MAILSUM);
1142         RegisterConditional(HKEY("COND:MAIL:SUMM:H_NODE"), 0, Conditional_MAIL_SUMM_H_NODE, CTX_MAILSUM);
1143         RegisterConditional(HKEY("COND:MAIL:SUMM:OTHERNODE"), 0, Conditional_MAIL_SUMM_OTHERNODE, CTX_MAILSUM);
1144         RegisterConditional(HKEY("COND:MAIL:SUMM:SUBJECT"), 0, Conditional_MAIL_SUMM_SUBJECT, CTX_MAILSUM);
1145         RegisterConditional(HKEY("COND:MAIL:ANON"), 0, Conditional_ANONYMOUS_MESSAGE, CTX_MAILSUM);
1146         RegisterConditional(HKEY("COND:MAIL:TO"), 0, Conditional_MAIL_SUMM_TO, CTX_MAILSUM);
1147         RegisterConditional(HKEY("COND:MAIL:SUBJ"), 0, Conditional_MAIL_SUMM_SUBJ, CTX_MAILSUM);
1148
1149         /* do we have mimetypes to iterate over? */
1150         RegisterConditional(HKEY("COND:MAIL:MIME:ATTACH"), 0, Conditional_MAIL_MIME_ALL, CTX_MAILSUM);
1151         RegisterConditional(HKEY("COND:MAIL:MIME:ATTACH:SUBMESSAGES"), 0, Conditional_MAIL_MIME_SUBMESSAGES, CTX_MAILSUM);
1152         RegisterConditional(HKEY("COND:MAIL:MIME:ATTACH:LINKS"), 0, Conditional_MAIL_MIME_ATTACHLINKS, CTX_MAILSUM);
1153         RegisterConditional(HKEY("COND:MAIL:MIME:ATTACH:ATT"), 0, Conditional_MAIL_MIME_ATTACH, CTX_MAILSUM);
1154         RegisterIterator("MAIL:MIME:ATTACH", 0, NULL, iterate_get_mime_All,
1155                          NULL, NULL, CTX_MIME_ATACH, CTX_MAILSUM, IT_NOFLAG);
1156         RegisterIterator("MAIL:MIME:ATTACH:SUBMESSAGES", 0, NULL, iterate_get_mime_Submessages,
1157                          NULL, NULL, CTX_MIME_ATACH, CTX_MAILSUM, IT_NOFLAG);
1158         RegisterIterator("MAIL:MIME:ATTACH:LINKS", 0, NULL, iterate_get_mime_AttachLinks,
1159                          NULL, NULL, CTX_MIME_ATACH, CTX_MAILSUM, IT_NOFLAG);
1160         RegisterIterator("MAIL:MIME:ATTACH:ATT", 0, NULL, iterate_get_mime_Attachments,
1161                          NULL, NULL, CTX_MIME_ATACH, CTX_MAILSUM, IT_NOFLAG);
1162
1163         /* Parts of a mime attachent */
1164         RegisterNamespace("MAIL:MIME:NAME", 0, 2, tmplput_MIME_Name, CTX_MIME_ATACH);
1165         RegisterNamespace("MAIL:MIME:FILENAME", 0, 2, tmplput_MIME_FileName, CTX_MIME_ATACH);
1166         RegisterNamespace("MAIL:MIME:PARTNUM", 0, 2, tmplput_MIME_PartNum, CTX_MIME_ATACH);
1167         RegisterNamespace("MAIL:MIME:MSGNUM", 0, 2, tmplput_MIME_MsgNum, CTX_MIME_ATACH);
1168         RegisterNamespace("MAIL:MIME:DISPOSITION", 0, 2, tmplput_MIME_Disposition, CTX_MIME_ATACH);
1169         RegisterNamespace("MAIL:MIME:CONTENTTYPE", 0, 2, tmplput_MIME_ContentType, CTX_MIME_ATACH);
1170         RegisterNamespace("MAIL:MIME:CHARSET", 0, 2, tmplput_MIME_Charset, CTX_MIME_ATACH);
1171         RegisterNamespace("MAIL:MIME:LENGTH", 0, 2, tmplput_MIME_Length, CTX_MIME_ATACH);
1172         RegisterNamespace("MAIL:MIME:DATA", 0, 2, tmplput_MIME_Data, CTX_MIME_ATACH);
1173         /* load the actual attachment into WC->attachments; no output!!! */
1174         RegisterNamespace("MAIL:MIME:LOADDATA", 0, 0, tmplput_MIME_LoadData, CTX_MIME_ATACH);
1175
1176         /* iterate the WC->attachments; use the above tokens for their contents */
1177         RegisterIterator("MSG:ATTACHNAMES", 0, NULL, iterate_get_registered_Attachments,
1178                          NULL, NULL, CTX_MIME_ATACH, CTX_NONE, IT_NOFLAG);
1179
1180         /* mime renderers translate an attachment into webcit viewable html text */
1181         RegisterMimeRenderer(HKEY("message/rfc822"), render_MAIL);
1182         RegisterMimeRenderer(HKEY("text/x-vcard"), render_MIME_VCard);
1183         RegisterMimeRenderer(HKEY("text/vcard"), render_MIME_VCard);
1184         RegisterMimeRenderer(HKEY("text/calendar"), render_MIME_ICS);
1185         RegisterMimeRenderer(HKEY("application/ics"), render_MIME_ICS);
1186         RegisterMimeRenderer(HKEY("text/x-citadel-variformat"), render_MAIL_variformat);
1187         RegisterMimeRenderer(HKEY("text/plain"), render_MAIL_text_plain);
1188         RegisterMimeRenderer(HKEY("text"), render_MAIL_text_plain);
1189         RegisterMimeRenderer(HKEY("text/html"), render_MAIL_html);
1190         RegisterMimeRenderer(HKEY(""), render_MAIL_UNKNOWN);
1191
1192         /* these headers are citserver replies to MSG4 and friends. one evaluator for each */
1193         RegisterMsgHdr(HKEY("nhdr"), examine_nhdr, 0);
1194         RegisterMsgHdr(HKEY("type"), examine_type, 0);
1195         RegisterMsgHdr(HKEY("from"), examine_from, 0);
1196         RegisterMsgHdr(HKEY("subj"), examine_subj, 0);
1197         RegisterMsgHdr(HKEY("msgn"), examine_msgn, 0);
1198         RegisterMsgHdr(HKEY("wefw"), examine_wefw, 0);
1199         RegisterMsgHdr(HKEY("cccc"), examine_cccc, 0);
1200         RegisterMsgHdr(HKEY("hnod"), examine_hnod, 0);
1201         RegisterMsgHdr(HKEY("room"), examine_room, 0);
1202         RegisterMsgHdr(HKEY("rfca"), examine_rfca, 0);
1203         RegisterMsgHdr(HKEY("node"), examine_node, 0);
1204         RegisterMsgHdr(HKEY("rcpt"), examine_rcpt, 0);
1205         RegisterMsgHdr(HKEY("time"), examine_time, 0);
1206         RegisterMsgHdr(HKEY("part"), examine_mime_part, 0);
1207         RegisterMsgHdr(HKEY("text"), examine_text, 1);
1208         /* these are the content-type headers we get infront of a message; put it into the same hash since it doesn't clash. */
1209         RegisterMsgHdr(HKEY("X-Citadel-MSG4-Partnum"), examine_msg4_partnum, 0);
1210         RegisterMsgHdr(HKEY("Content-type"), examine_content_type, 0);
1211         RegisterMsgHdr(HKEY("Content-length"), examine_content_lengh, 0);
1212         RegisterMsgHdr(HKEY("Content-transfer-encoding"), examine_content_encoding, 0); /* do we care? */
1213         RegisterMsgHdr(HKEY("charset"), examine_charset, 0);
1214
1215         /* Don't care about these... */
1216         RegisterMsgHdr(HKEY("pref"), examine_pref, 0);
1217         RegisterMsgHdr(HKEY("suff"), examine_suff, 0);
1218         RegisterMsgHdr(HKEY("path"), examine_path, 0);
1219 }