* persistantly handle the bufferlengths for dates; snprintf doesn't terminate strings...
[citadel.git] / 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, 64, 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, 64, 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, 64, "%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 }