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