* move serv_info into the session, here we can control its de/allocation the right...
[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, Msg->date, 1);
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, 0);
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         Mime->length = StrBufExtract_int(HdrLine, 5, '|');
554
555         if ( (StrLength(Mime->FileName) == 0) && (StrLength(Mime->Name) > 0) ) {
556                 StrBufAppendBuf(Mime->FileName, Mime->Name, 0);
557         }
558
559         if (StrLength(Msg->PartNum) > 0) {
560                 StrBuf *tmp;
561                 StrBufPrintf(Buf, "%s.%s", ChrPtr(Msg->PartNum), ChrPtr(Mime->PartNum));
562                 tmp = Mime->PartNum;
563                 Mime->PartNum = Buf;
564                 Buf = tmp;
565         }
566
567         if (Msg->AllAttach == NULL)
568                 Msg->AllAttach = NewHash(1,NULL);
569         Put(Msg->AllAttach, SKEY(Mime->PartNum), Mime, DestroyMime);
570         FreeStrBuf(&Buf);
571 }
572
573
574 void evaluate_mime_part(message_summary *Msg, wc_mime_attachment *Mime)
575 {
576         void *vMimeRenderer;
577
578         /* just print the root-node */
579         if ((Mime->level == 1) &&
580             GetHash(MimeRenderHandler, SKEY(Mime->ContentType), &vMimeRenderer) &&
581             vMimeRenderer != NULL)
582         {
583                 Mime->Renderer = (RenderMimeFuncStruct*) vMimeRenderer;
584                 if (Msg->Submessages == NULL)
585                         Msg->Submessages = NewHash(1,NULL);
586                 Put(Msg->Submessages, SKEY(Mime->PartNum), Mime, reference_free_handler);
587         }
588         else if ((Mime->level == 1) &&
589                  (!strcasecmp(ChrPtr(Mime->Disposition), "inline"))
590                  && (!strncasecmp(ChrPtr(Mime->ContentType), "image/", 6)) ){
591                 if (Msg->AttachLinks == NULL)
592                         Msg->AttachLinks = NewHash(1,NULL);
593                 Put(Msg->AttachLinks, SKEY(Mime->PartNum), Mime, reference_free_handler);
594         }
595         else if ((Mime->level == 1) &&
596                  (StrLength(Mime->ContentType) > 0) &&
597                   ( (!strcasecmp(ChrPtr(Mime->Disposition), "attachment")) 
598                     || (!strcasecmp(ChrPtr(Mime->Disposition), "inline"))
599                     || (!strcasecmp(ChrPtr(Mime->Disposition), ""))))
600         {               
601                 if (Msg->AttachLinks == NULL)
602                         Msg->AttachLinks = NewHash(1,NULL);
603                 Put(Msg->AttachLinks, SKEY(Mime->PartNum), Mime, reference_free_handler);
604                 if ((strcasecmp(ChrPtr(Mime->ContentType), "application/octet-stream") == 0) && 
605                     (StrLength(Mime->FileName) > 0)) {
606                         FlushStrBuf(Mime->ContentType);
607                         StrBufAppendBufPlain(Mime->ContentType,
608                                              GuessMimeByFilename(SKEY(Mime->FileName)),
609                                              -1, 0);
610                 }
611         }
612 }
613
614 void tmplput_MAIL_SUMM_NATTACH(StrBuf *Target, WCTemplputParams *TP)
615 {
616         message_summary *Msg = (message_summary*) CTX;
617         StrBufAppendPrintf(Target, "%ld", GetCount(Msg->Attachments));
618 }
619
620
621 void examine_hnod(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
622 {
623         FreeStrBuf(&Msg->hnod);
624         Msg->hnod = NewStrBufPlain(NULL, StrLength(HdrLine));
625         StrBuf_RFC822_to_Utf8(Msg->hnod, HdrLine, WC->DefaultCharset, FoundCharset);
626 }
627 void tmplput_MAIL_SUMM_H_NODE(StrBuf *Target, WCTemplputParams *TP)
628 {
629         message_summary *Msg = (message_summary*) CTX;
630         StrBufAppendTemplate(Target, TP, Msg->hnod, 0);
631 }
632 int Conditional_MAIL_SUMM_H_NODE(StrBuf *Target, WCTemplputParams *TP)
633 {
634         message_summary *Msg = (message_summary*) CTX;
635         return StrLength(Msg->hnod) > 0;
636 }
637
638
639
640 void examine_text(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
641 {
642         Msg->MsgBody->Data = NewStrBuf();
643 }
644
645 void examine_msg4_partnum(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
646 {
647         Msg->MsgBody->PartNum = NewStrBufDup(HdrLine);
648         StrBufTrim(Msg->MsgBody->PartNum);
649 }
650
651 void examine_content_lengh(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
652 {
653         Msg->MsgBody->length = StrTol(HdrLine);
654         Msg->MsgBody->size_known = 1;
655 }
656
657 void examine_content_type(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
658 {
659         void *vHdr;
660         headereval *Hdr;
661         StrBuf *Token;
662         StrBuf *Value;
663         const char* sem;
664         const char *eq;
665         int len;
666         StrBufTrim(HdrLine);
667         Msg->MsgBody->ContentType = NewStrBufDup(HdrLine);
668         sem = strchr(ChrPtr(HdrLine), ';');
669
670         if (sem != NULL) {
671                 Token = NewStrBufPlain(NULL, StrLength(HdrLine));
672                 Value = NewStrBufPlain(NULL, StrLength(HdrLine));
673                 len = sem - ChrPtr(HdrLine);
674                 StrBufCutAt(Msg->MsgBody->ContentType, len, NULL);
675                 while (sem != NULL) {
676                         while (isspace(*(sem + 1)))
677                                 sem ++;
678                         StrBufCutLeft(HdrLine, sem - ChrPtr(HdrLine));
679                         sem = strchr(ChrPtr(HdrLine), ';');
680                         if (sem != NULL)
681                                 len = sem - ChrPtr(HdrLine);
682                         else
683                                 len = StrLength(HdrLine);
684                         FlushStrBuf(Token);
685                         FlushStrBuf(Value);
686                         StrBufAppendBufPlain(Token, ChrPtr(HdrLine), len, 0);
687                         eq = strchr(ChrPtr(Token), '=');
688                         if (eq != NULL) {
689                                 len = eq - ChrPtr(Token);
690                                 StrBufAppendBufPlain(Value, eq + 1, StrLength(Token) - len - 1, 0); 
691                                 StrBufCutAt(Token, len, NULL);
692                                 StrBufTrim(Value);
693                         }
694                         StrBufTrim(Token);
695
696                         if (GetHash(MsgHeaderHandler, SKEY(Token), &vHdr) &&
697                             (vHdr != NULL)) {
698                                 Hdr = (headereval*)vHdr;
699                                 Hdr->evaluator(Msg, Value, FoundCharset);
700                         }
701                         else lprintf(1, "don't know how to handle content type sub-header[%s]\n", ChrPtr(Token));
702                 }
703                 FreeStrBuf(&Token);
704                 FreeStrBuf(&Value);
705         }
706 }
707
708 void tmplput_MAIL_SUMM_N(StrBuf *Target, WCTemplputParams *TP)
709 {
710         message_summary *Msg = (message_summary*) CTX;
711         StrBufAppendPrintf(Target, "%ld", Msg->msgnum);
712 }
713
714
715
716 int Conditional_MAIL_MIME_ALL(StrBuf *Target, WCTemplputParams *TP)
717 {
718         message_summary *Msg = (message_summary*) CTX;
719         return GetCount(Msg->Attachments) > 0;
720 }
721
722 int Conditional_MAIL_MIME_SUBMESSAGES(StrBuf *Target, WCTemplputParams *TP)
723 {
724         message_summary *Msg = (message_summary*) CTX;
725         return GetCount(Msg->Submessages) > 0;
726 }
727
728 int Conditional_MAIL_MIME_ATTACHLINKS(StrBuf *Target, WCTemplputParams *TP)
729 {
730         message_summary *Msg = (message_summary*) CTX;
731         return GetCount(Msg->AttachLinks) > 0;
732 }
733
734 int Conditional_MAIL_MIME_ATTACH(StrBuf *Target, WCTemplputParams *TP)
735 {
736         message_summary *Msg = (message_summary*) CTX;
737         return GetCount(Msg->AllAttach) > 0;
738 }
739
740
741
742 /*----------------------------------------------------------------------------*/
743 void tmplput_QUOTED_MAIL_BODY(StrBuf *Target, WCTemplputParams *TP)
744 {
745         long MsgNum;
746         StrBuf *Buf;
747
748         MsgNum = LBstr(TKEY(0));
749         Buf = NewStrBuf();
750         read_message(Buf, HKEY("view_message_replyquote"), MsgNum, 0, NULL);
751         StrBufAppendTemplate(Target, TP, Buf, 1);
752         FreeStrBuf(&Buf);
753 }
754
755 void tmplput_MAIL_BODY(StrBuf *Target, WCTemplputParams *TP)
756 {
757         message_summary *Msg = (message_summary*) CTX;
758         StrBufAppendTemplate(Target, TP, Msg->MsgBody->Data, 0);
759 }
760
761
762 void render_MAIL_variformat(wc_mime_attachment *Mime, StrBuf *RawData, StrBuf *FoundCharset)
763 {
764         /* Messages in legacy Citadel variformat get handled thusly... */
765         StrBuf *Target = NewStrBufPlain(NULL, StrLength(Mime->Data));
766         FmOut(Target, "JUSTIFY", Mime->Data);
767         FreeStrBuf(&Mime->Data);
768         Mime->Data = Target;
769 }
770
771 void render_MAIL_text_plain(wc_mime_attachment *Mime, StrBuf *RawData, StrBuf *FoundCharset)
772 {
773         StrBuf *cs = NULL;
774         const char *ptr, *pte;
775         const char *BufPtr = NULL;
776         StrBuf *Line;
777         StrBuf *Line1;
778         StrBuf *Line2;
779         StrBuf *Target;
780
781         int ConvertIt = 1;
782         int bn = 0;
783         int bq = 0;
784         int i, n, done = 0;
785         long len;
786 #ifdef HAVE_ICONV
787         iconv_t ic = (iconv_t)(-1) ;
788 #endif
789
790         if ((StrLength(Mime->Data) == 0) && (Mime->length > 0)) {
791                 FreeStrBuf(&Mime->Data);
792                 MimeLoadData(Mime);
793         }
794
795         /* Boring old 80-column fixed format text gets handled this way... */
796         if ((strcasecmp(ChrPtr(Mime->Charset), "us-ascii") == 0) &&
797             (strcasecmp(ChrPtr(Mime->Charset), "UTF-8") == 0))
798                 ConvertIt = 0;
799
800 #ifdef HAVE_ICONV
801         if (ConvertIt) {
802                 if (StrLength(Mime->Charset) != 0)
803                         cs = Mime->Charset;
804                 else if (StrLength(FoundCharset) > 0)
805                         cs = FoundCharset;
806                 else if (StrLength(WC->DefaultCharset) > 0)
807                         cs = WC->DefaultCharset;
808                 if (cs == NULL) {
809                         ConvertIt = 0;
810                 }
811                 else {
812                         ctdl_iconv_open("UTF-8", ChrPtr(cs), &ic);
813                         if (ic == (iconv_t)(-1) ) {
814                                 lprintf(5, "%s:%d iconv_open(UTF-8, %s) failed: %s\n",
815                                         __FILE__, __LINE__, ChrPtr(Mime->Charset), strerror(errno));
816                         }
817                 }
818         }
819 #endif
820         Line = NewStrBuf();
821         Line1 = NewStrBuf();
822         Line2 = NewStrBuf();
823         Target = NewStrBufPlain(NULL, StrLength(Mime->Data));
824
825         while ((n = StrBufSipLine(Line, Mime->Data, &BufPtr), n >= 0) && !done)
826         {
827                 done = n == 0;
828                 bq = 0;
829                 i = 0;
830                 ptr = ChrPtr(Line);
831                 len = StrLength(Line);
832                 pte = ptr + len;
833                 
834                 while ((ptr < pte) &&
835                        ((*ptr == '>') ||
836                         isspace(*ptr)))
837                 {
838                         if (*ptr == '>')
839                                 bq++;
840                         ptr ++;
841                         i++;
842                 }
843                 if (i > 0) StrBufCutLeft(Line, i);
844                 
845                 if (StrLength(Line) == 0) {
846                         StrBufAppendBufPlain(Target, HKEY("<tt></tt><br />\n"), 0);
847                         continue;
848                 }
849
850                 for (i = bn; i < bq; i++)                               
851                         StrBufAppendBufPlain(Target, HKEY("<blockquote>"), 0);
852                 for (i = bq; i < bn; i++)                               
853                         StrBufAppendBufPlain(Target, HKEY("</blockquote>"), 0);
854
855                 if (ConvertIt == 1) {
856                         StrBufConvert(Line, Line1, &ic);
857                 }
858
859                 StrBufAppendBufPlain(Target, HKEY("<tt>"), 0);
860                 UrlizeText(Line1, Line, Line2);
861
862                 StrEscAppend(Target, Line1, NULL, 0, 0);
863                 StrBufAppendBufPlain(Target, HKEY("</tt><br />\n"), 0);
864                 bn = bq;
865         }
866
867         for (i = 0; i < bn; i++)                                
868                 StrBufAppendBufPlain(Target, HKEY("</blockquote>"), 0);
869
870         StrBufAppendBufPlain(Target, HKEY("</i><br />"), 0);
871 #ifdef HAVE_ICONV
872         if (ic != (iconv_t)(-1) ) {
873                 iconv_close(ic);
874         }
875 #endif
876
877         FreeStrBuf(&Mime->Data);
878         Mime->Data = Target;
879         FlushStrBuf(Mime->ContentType);
880         StrBufAppendBufPlain(Mime->ContentType, HKEY("text/html"), 0);
881         FlushStrBuf(Mime->Charset);
882         StrBufAppendBufPlain(Mime->Charset, HKEY("UTF-8"), 0);
883         FreeStrBuf(&Line);
884         FreeStrBuf(&Line1);
885         FreeStrBuf(&Line2);
886 }
887
888 void render_MAIL_html(wc_mime_attachment *Mime, StrBuf *RawData, StrBuf *FoundCharset)
889 {
890         StrBuf *Buf;
891
892         if (StrLength(Mime->Data) == 0)
893                 return;
894
895         Buf = NewStrBufPlain(NULL, StrLength(Mime->Data));
896
897         /* HTML is fun, but we've got to strip it first */
898         output_html(ChrPtr(Mime->Charset), 
899                     (WC->wc_view == VIEW_WIKI ? 1 : 0), 
900                     Mime->msgnum,
901                     Mime->Data, Buf);
902         FreeStrBuf(&Mime->Data);
903         Mime->Data = Buf;
904 }
905
906 void render_MAIL_UNKNOWN(wc_mime_attachment *Mime, StrBuf *RawData, StrBuf *FoundCharset)
907 {
908         /* Unknown weirdness */
909         FlushStrBuf(Mime->Data);
910         StrBufAppendBufPlain(Mime->Data, _("I don't know how to display "), -1, 0);
911         StrBufAppendBuf(Mime->Data, Mime->ContentType, 0);
912         StrBufAppendBufPlain(Mime->Data, HKEY("<br />\n"), 0);
913 }
914
915
916
917
918
919
920 HashList *iterate_get_mime_All(StrBuf *Target, WCTemplputParams *TP)
921 {
922         message_summary *Msg = (message_summary*) CTX;
923         return Msg->Attachments;
924 }
925 HashList *iterate_get_mime_Submessages(StrBuf *Target, WCTemplputParams *TP)
926 {
927         message_summary *Msg = (message_summary*) CTX;
928         return Msg->Submessages;
929 }
930 HashList *iterate_get_mime_AttachLinks(StrBuf *Target, WCTemplputParams *TP)
931 {
932         message_summary *Msg = (message_summary*) CTX;
933         return Msg->AttachLinks;
934 }
935 HashList *iterate_get_mime_Attachments(StrBuf *Target, WCTemplputParams *TP)
936 {
937         message_summary *Msg = (message_summary*) CTX;
938         return Msg->AllAttach;
939 }
940
941 void tmplput_MIME_Name(StrBuf *Target, WCTemplputParams *TP)
942 {
943         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
944         StrBufAppendTemplate(Target, TP, mime->Name, 0);
945 }
946
947 void tmplput_MIME_FileName(StrBuf *Target, WCTemplputParams *TP)
948 {
949         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
950         StrBufAppendTemplate(Target, TP, mime->FileName, 0);
951 }
952
953 void tmplput_MIME_PartNum(StrBuf *Target, WCTemplputParams *TP)
954 {
955         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
956         StrBufAppendTemplate(Target, TP, mime->PartNum, 0);
957 }
958
959 void tmplput_MIME_MsgNum(StrBuf *Target, WCTemplputParams *TP)
960 {
961         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
962         StrBufAppendPrintf(Target, "%ld", mime->msgnum);
963 }
964
965 void tmplput_MIME_Disposition(StrBuf *Target, WCTemplputParams *TP)
966 {
967         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
968         StrBufAppendTemplate(Target, TP, mime->Disposition, 0);
969 }
970
971 void tmplput_MIME_ContentType(StrBuf *Target, WCTemplputParams *TP)
972 {
973         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
974         StrBufAppendTemplate(Target, TP, mime->ContentType, 0);
975 }
976
977 void examine_charset(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
978 {
979         Msg->MsgBody->Charset = NewStrBufDup(HdrLine);
980 }
981
982 void tmplput_MIME_Charset(StrBuf *Target, WCTemplputParams *TP)
983 {
984         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
985         StrBufAppendTemplate(Target, TP, mime->Charset, 0);
986 }
987
988 void tmplput_MIME_Data(StrBuf *Target, WCTemplputParams *TP)
989 {
990         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
991         if (mime->Renderer != NULL)
992                 mime->Renderer->f(mime, NULL, NULL);
993         StrBufAppendTemplate(Target, TP, mime->Data, 0);
994         /* TODO: check whether we need to load it now? */
995 }
996
997 void tmplput_MIME_LoadData(StrBuf *Target, WCTemplputParams *TP)
998 {
999         wcsession *WCC = WC;    
1000         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
1001         wc_mime_attachment *att;
1002         
1003         if ( (!strcasecmp(ChrPtr(mime->Disposition), "inline"))||
1004              (!strcasecmp(ChrPtr(mime->Disposition), "attachment")) ) 
1005         {
1006                 
1007                 int n;
1008                 char N[64];
1009                 /* steal this mime part... */
1010                 att = malloc(sizeof(wc_mime_attachment));
1011                 memcpy(att, mime, sizeof(wc_mime_attachment));
1012                 memset(mime, 0, sizeof(wc_mime_attachment));
1013
1014                 if (att->Data == NULL) 
1015                         MimeLoadData(att);
1016
1017                 if (WCC->attachments == NULL)
1018                         WCC->attachments = NewHash(1, NULL);
1019                 /* And add it to the list. */
1020                 n = snprintf(N, sizeof N, "%d", GetCount(WCC->attachments) + 1);
1021                 Put(WCC->attachments, N, n, att, DestroyMime);
1022         }
1023 }
1024
1025 void tmplput_MIME_Length(StrBuf *Target, WCTemplputParams *TP)
1026 {
1027         wc_mime_attachment *mime = (wc_mime_attachment*) CTX;
1028         StrBufAppendPrintf(Target, "%ld", mime->length);
1029 }
1030
1031 HashList *iterate_get_registered_Attachments(StrBuf *Target, WCTemplputParams *TP)
1032 {
1033         return WC->attachments;
1034 }
1035
1036 void servcmd_do_search(char *buf, long bufsize)
1037 {
1038         snprintf(buf, bufsize, "MSGS SEARCH|%s", bstr("query"));
1039 }
1040
1041 void servcmd_headers(char *buf, long bufsize)
1042 {
1043         snprintf(buf, bufsize, "MSGS ALL");
1044 }
1045
1046 void servcmd_readfwd(char *buf, long bufsize)
1047 {
1048         snprintf(buf, bufsize, "MSGS ALL");
1049 }
1050
1051 void servcmd_readnew(char *buf, long bufsize)
1052 {
1053         snprintf(buf, bufsize, "MSGS NEW");
1054 }
1055
1056 void servcmd_readold(char *buf, long bufsize)
1057 {
1058         snprintf(buf, bufsize, "MSGS OLD");
1059 }
1060
1061
1062 readloop_struct rlid[] = {
1063         { {HKEY("do_search")}, servcmd_do_search},
1064         { {HKEY("headers")},   servcmd_headers},
1065         { {HKEY("readfwd")},   servcmd_readfwd},
1066         { {HKEY("readnew")},   servcmd_readnew},
1067         { {HKEY("readold")},   servcmd_readold}
1068 };
1069
1070
1071
1072 void SetAccessCommand(long Oper)
1073 {
1074         wcsession *WCC = WC;    
1075
1076         if (WCC->UrlFragment1 != NULL ) {
1077                 FlushStrBuf(WCC->UrlFragment1);
1078                 StrBufAppendBufPlain(WCC->UrlFragment1, 
1079                                      rlid[Oper].name.Key, rlid[Oper].name.len, 0);
1080         }
1081         else 
1082                 WCC->UrlFragment1 = NewStrBufPlain(rlid[Oper].name.Key, rlid[Oper].name.len);
1083 }
1084                 
1085
1086
1087
1088
1089 void 
1090 InitModule_MSGRENDERERS
1091 (void)
1092 {
1093         RegisterSortFunc(HKEY("date"), 
1094                          NULL, 0,
1095                          summcmp_date,
1096                          summcmp_rdate,
1097                          groupchange_date,
1098                          CTX_MAILSUM);
1099         RegisterSortFunc(HKEY("subject"), 
1100                          NULL, 0,
1101                          summcmp_subj,
1102                          summcmp_rsubj,
1103                          groupchange_subj,
1104                          CTX_MAILSUM);
1105         RegisterSortFunc(HKEY("sender"),
1106                          NULL, 0,
1107                          summcmp_sender,
1108                          summcmp_rsender,
1109                          groupchange_sender,
1110                          CTX_MAILSUM);
1111
1112         RegisterNamespace("SUMM:COUNT", 0, 0, tmplput_SUMM_COUNT, CTX_NONE);
1113         /* iterate over all known mails in WC->summ */
1114         RegisterIterator("MAIL:SUMM:MSGS", 0, NULL, iterate_get_mailsumm_All,
1115                          NULL,NULL, CTX_MAILSUM, CTX_NONE, IT_NOFLAG);
1116
1117         RegisterNamespace("MAIL:SUMM:DATEBRIEF", 0, 0, tmplput_MAIL_SUMM_DATE_BRIEF, CTX_MAILSUM);
1118         RegisterNamespace("MAIL:SUMM:DATEFULL", 0, 0, tmplput_MAIL_SUMM_DATE_FULL, CTX_MAILSUM);
1119         RegisterNamespace("MAIL:SUMM:DATENO",  0, 0, tmplput_MAIL_SUMM_DATE_NO,  CTX_MAILSUM);
1120         RegisterNamespace("MAIL:SUMM:N",       0, 0, tmplput_MAIL_SUMM_N,        CTX_MAILSUM);
1121         RegisterNamespace("MAIL:SUMM:FROM",    0, 2, tmplput_MAIL_SUMM_FROM,     CTX_MAILSUM);
1122         RegisterNamespace("MAIL:SUMM:TO",      0, 2, tmplput_MAIL_SUMM_TO,       CTX_MAILSUM);
1123         RegisterNamespace("MAIL:SUMM:SUBJECT", 0, 4, tmplput_MAIL_SUMM_SUBJECT,  CTX_MAILSUM);
1124         RegisterNamespace("MAIL:SUMM:NTATACH", 0, 0, tmplput_MAIL_SUMM_NATTACH,  CTX_MAILSUM);
1125         RegisterNamespace("MAIL:SUMM:CCCC", 0, 2, tmplput_MAIL_SUMM_CCCC,  CTX_MAILSUM);
1126         RegisterNamespace("MAIL:SUMM:H_NODE", 0, 2, tmplput_MAIL_SUMM_H_NODE,  CTX_MAILSUM);
1127         RegisterNamespace("MAIL:SUMM:ALLRCPT", 0, 2, tmplput_MAIL_SUMM_ALLRCPT,  CTX_MAILSUM);
1128         RegisterNamespace("MAIL:SUMM:ORGROOM", 0, 2, tmplput_MAIL_SUMM_ORGROOM,  CTX_MAILSUM);
1129         RegisterNamespace("MAIL:SUMM:RFCA", 0, 2, tmplput_MAIL_SUMM_RFCA,  CTX_MAILSUM);
1130         RegisterNamespace("MAIL:SUMM:OTHERNODE", 2, 0, tmplput_MAIL_SUMM_OTHERNODE,  CTX_MAILSUM);
1131         RegisterNamespace("MAIL:SUMM:REFIDS", 0, 0, tmplput_MAIL_SUMM_REFIDS,  CTX_MAILSUM);
1132         RegisterNamespace("MAIL:SUMM:INREPLYTO", 0, 2, tmplput_MAIL_SUMM_INREPLYTO,  CTX_MAILSUM);
1133         RegisterNamespace("MAIL:BODY", 0, 2, tmplput_MAIL_BODY,  CTX_MAILSUM);
1134         RegisterNamespace("MAIL:QUOTETEXT", 1, 2, tmplput_QUOTED_MAIL_BODY,  CTX_NONE);
1135         RegisterConditional(HKEY("COND:MAIL:SUMM:RFCA"), 0, Conditional_MAIL_SUMM_RFCA,  CTX_MAILSUM);
1136         RegisterConditional(HKEY("COND:MAIL:SUMM:CCCC"), 0, Conditional_MAIL_SUMM_CCCC,  CTX_MAILSUM);
1137         RegisterConditional(HKEY("COND:MAIL:SUMM:UNREAD"), 0, Conditional_MAIL_SUMM_UNREAD, CTX_MAILSUM);
1138         RegisterConditional(HKEY("COND:MAIL:SUMM:H_NODE"), 0, Conditional_MAIL_SUMM_H_NODE, CTX_MAILSUM);
1139         RegisterConditional(HKEY("COND:MAIL:SUMM:OTHERNODE"), 0, Conditional_MAIL_SUMM_OTHERNODE, CTX_MAILSUM);
1140         RegisterConditional(HKEY("COND:MAIL:SUMM:SUBJECT"), 0, Conditional_MAIL_SUMM_SUBJECT, CTX_MAILSUM);
1141         RegisterConditional(HKEY("COND:MAIL:ANON"), 0, Conditional_ANONYMOUS_MESSAGE, CTX_MAILSUM);
1142         RegisterConditional(HKEY("COND:MAIL:TO"), 0, Conditional_MAIL_SUMM_TO, CTX_MAILSUM);    
1143         RegisterConditional(HKEY("COND:MAIL:SUBJ"), 0, Conditional_MAIL_SUMM_SUBJ, CTX_MAILSUM);        
1144
1145         /* do we have mimetypes to iterate over? */
1146         RegisterConditional(HKEY("COND:MAIL:MIME:ATTACH"), 0, Conditional_MAIL_MIME_ALL, CTX_MAILSUM);
1147         RegisterConditional(HKEY("COND:MAIL:MIME:ATTACH:SUBMESSAGES"), 0, Conditional_MAIL_MIME_SUBMESSAGES, CTX_MAILSUM);
1148         RegisterConditional(HKEY("COND:MAIL:MIME:ATTACH:LINKS"), 0, Conditional_MAIL_MIME_ATTACHLINKS, CTX_MAILSUM);
1149         RegisterConditional(HKEY("COND:MAIL:MIME:ATTACH:ATT"), 0, Conditional_MAIL_MIME_ATTACH, CTX_MAILSUM);
1150         RegisterIterator("MAIL:MIME:ATTACH", 0, NULL, iterate_get_mime_All, 
1151                          NULL, NULL, CTX_MIME_ATACH, CTX_MAILSUM, IT_NOFLAG);
1152         RegisterIterator("MAIL:MIME:ATTACH:SUBMESSAGES", 0, NULL, iterate_get_mime_Submessages, 
1153                          NULL, NULL, CTX_MIME_ATACH, CTX_MAILSUM, IT_NOFLAG);
1154         RegisterIterator("MAIL:MIME:ATTACH:LINKS", 0, NULL, iterate_get_mime_AttachLinks, 
1155                          NULL, NULL, CTX_MIME_ATACH, CTX_MAILSUM, IT_NOFLAG);
1156         RegisterIterator("MAIL:MIME:ATTACH:ATT", 0, NULL, iterate_get_mime_Attachments, 
1157                          NULL, NULL, CTX_MIME_ATACH, CTX_MAILSUM, IT_NOFLAG);
1158
1159         /* Parts of a mime attachent */
1160         RegisterNamespace("MAIL:MIME:NAME", 0, 2, tmplput_MIME_Name, CTX_MIME_ATACH);
1161         RegisterNamespace("MAIL:MIME:FILENAME", 0, 2, tmplput_MIME_FileName, CTX_MIME_ATACH);
1162         RegisterNamespace("MAIL:MIME:PARTNUM", 0, 2, tmplput_MIME_PartNum, CTX_MIME_ATACH);
1163         RegisterNamespace("MAIL:MIME:MSGNUM", 0, 2, tmplput_MIME_MsgNum, CTX_MIME_ATACH);
1164         RegisterNamespace("MAIL:MIME:DISPOSITION", 0, 2, tmplput_MIME_Disposition, CTX_MIME_ATACH);
1165         RegisterNamespace("MAIL:MIME:CONTENTTYPE", 0, 2, tmplput_MIME_ContentType, CTX_MIME_ATACH);
1166         RegisterNamespace("MAIL:MIME:CHARSET", 0, 2, tmplput_MIME_Charset, CTX_MIME_ATACH);
1167         RegisterNamespace("MAIL:MIME:LENGTH", 0, 2, tmplput_MIME_Length, CTX_MIME_ATACH);
1168         RegisterNamespace("MAIL:MIME:DATA", 0, 2, tmplput_MIME_Data, CTX_MIME_ATACH);
1169         /* load the actual attachment into WC->attachments; no output!!! */
1170         RegisterNamespace("MAIL:MIME:LOADDATA", 0, 0, tmplput_MIME_LoadData, CTX_MIME_ATACH);
1171
1172         /* iterate the WC->attachments; use the above tokens for their contents */
1173         RegisterIterator("MSG:ATTACHNAMES", 0, NULL, iterate_get_registered_Attachments, 
1174                          NULL, NULL, CTX_MIME_ATACH, CTX_NONE, IT_NOFLAG);
1175
1176         /* mime renderers translate an attachment into webcit viewable html text */
1177         RegisterMimeRenderer(HKEY("message/rfc822"), render_MAIL);
1178         RegisterMimeRenderer(HKEY("text/x-vcard"), render_MIME_VCard);
1179         RegisterMimeRenderer(HKEY("text/vcard"), render_MIME_VCard);
1180         RegisterMimeRenderer(HKEY("text/calendar"), render_MIME_ICS);
1181         RegisterMimeRenderer(HKEY("application/ics"), render_MIME_ICS);
1182         RegisterMimeRenderer(HKEY("text/x-citadel-variformat"), render_MAIL_variformat);
1183         RegisterMimeRenderer(HKEY("text/plain"), render_MAIL_text_plain);
1184         RegisterMimeRenderer(HKEY("text"), render_MAIL_text_plain);
1185         RegisterMimeRenderer(HKEY("text/html"), render_MAIL_html);
1186         RegisterMimeRenderer(HKEY(""), render_MAIL_UNKNOWN);
1187
1188         /* these headers are citserver replies to MSG4 and friends. one evaluator for each */
1189         RegisterMsgHdr(HKEY("nhdr"), examine_nhdr, 0);
1190         RegisterMsgHdr(HKEY("type"), examine_type, 0);
1191         RegisterMsgHdr(HKEY("from"), examine_from, 0);
1192         RegisterMsgHdr(HKEY("subj"), examine_subj, 0);
1193         RegisterMsgHdr(HKEY("msgn"), examine_msgn, 0);
1194         RegisterMsgHdr(HKEY("wefw"), examine_wefw, 0);
1195         RegisterMsgHdr(HKEY("cccc"), examine_cccc, 0);
1196         RegisterMsgHdr(HKEY("hnod"), examine_hnod, 0);
1197         RegisterMsgHdr(HKEY("room"), examine_room, 0);
1198         RegisterMsgHdr(HKEY("rfca"), examine_rfca, 0);
1199         RegisterMsgHdr(HKEY("node"), examine_node, 0);
1200         RegisterMsgHdr(HKEY("rcpt"), examine_rcpt, 0);
1201         RegisterMsgHdr(HKEY("time"), examine_time, 0);
1202         RegisterMsgHdr(HKEY("part"), examine_mime_part, 0);
1203         RegisterMsgHdr(HKEY("text"), examine_text, 1);
1204         /* these are the content-type headers we get infront of a message; put it into the same hash since it doesn't clash. */
1205         RegisterMsgHdr(HKEY("X-Citadel-MSG4-Partnum"), examine_msg4_partnum, 0);
1206         RegisterMsgHdr(HKEY("Content-type"), examine_content_type, 0);
1207         RegisterMsgHdr(HKEY("Content-length"), examine_content_lengh, 0);
1208         RegisterMsgHdr(HKEY("Content-transfer-encoding"), examine_content_encoding, 0); /* do we care? */
1209         RegisterMsgHdr(HKEY("charset"), examine_charset, 0);
1210
1211         /* Don't care about these... */
1212         RegisterMsgHdr(HKEY("pref"), examine_pref, 0);
1213         RegisterMsgHdr(HKEY("suff"), examine_suff, 0);
1214         RegisterMsgHdr(HKEY("path"), examine_path, 0);
1215 }