5 CtxType CTX_MAILSUM = CTX_NONE;
6 CtxType CTX_MIME_ATACH = CTX_NONE;
8 HashList *MsgHeaderHandler = NULL;
9 HashList *DflMsgHeaderHandler = NULL;
10 HashList *DflEnumMsgHeaderHandler = NULL;
13 static inline void CheckConvertBufs(struct wcsession *WCC)
15 if (WCC->ConvertBuf1 == NULL)
16 WCC->ConvertBuf1 = NewStrBuf();
17 if (WCC->ConvertBuf2 == NULL)
18 WCC->ConvertBuf2 = NewStrBuf();
22 * message index functions
26 void DestroyMimeParts(wc_mime_attachment *Mime)
28 FreeStrBuf(&Mime->Name);
29 FreeStrBuf(&Mime->FileName);
30 FreeStrBuf(&Mime->PartNum);
31 FreeStrBuf(&Mime->Disposition);
32 FreeStrBuf(&Mime->ContentType);
33 FreeStrBuf(&Mime->Charset);
34 FreeStrBuf(&Mime->Data);
37 void DestroyMime(void *vMime)
39 wc_mime_attachment *Mime = (wc_mime_attachment*)vMime;
40 DestroyMimeParts(Mime);
44 void DestroyMessageSummary(void *vMsg)
46 message_summary *Msg = (message_summary*) vMsg;
48 FreeStrBuf(&Msg->from);
50 FreeStrBuf(&Msg->subj);
51 FreeStrBuf(&Msg->reply_inreplyto);
52 FreeStrBuf(&Msg->reply_references);
53 FreeStrBuf(&Msg->cccc);
54 FreeStrBuf(&Msg->ReplyTo);
55 FreeStrBuf(&Msg->hnod);
56 FreeStrBuf(&Msg->AllRcpt);
57 FreeStrBuf(&Msg->Room);
58 FreeStrBuf(&Msg->Rfca);
59 FreeStrBuf(&Msg->EnvTo);
60 FreeStrBuf(&Msg->OtherNode);
62 DeleteHash(&Msg->Attachments); /* list of Attachments */
63 DeleteHash(&Msg->Submessages);
64 DeleteHash(&Msg->AttachLinks);
65 DeleteHash(&Msg->AllAttach);
69 int EvaluateMsgHdrEnum(eMessageField f, message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
72 headereval* Hdr = NULL;
73 if (GetHash(DflEnumMsgHeaderHandler, IKEY(f), &vHdr) &&
75 Hdr = (headereval*)vHdr;
79 Hdr->evaluator(Msg, HdrLine, FoundCharset);
83 int EvaluateMsgHdr(const char *HeaderName, long HdrNLen, message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
86 headereval* Hdr = NULL;
88 if (GetHash(DflMsgHeaderHandler, HeaderName, HdrNLen, &vHdr) &&
90 Hdr = (headereval*)vHdr;
93 if (Hdr == NULL && GetHash(MsgHeaderHandler, HeaderName, HdrNLen, &vHdr) &&
95 Hdr = (headereval*)vHdr;
99 Hdr->evaluator(Msg, HdrLine, FoundCharset);
103 void RegisterMsgHdr(const char *HeaderName, long HdrNLen, ExamineMsgHeaderFunc evaluator, int type)
106 ev = (headereval*) malloc(sizeof(headereval));
107 ev->evaluator = evaluator;
112 if (GetFieldFromMnemonic(&f, HeaderName)) {
113 Put(DflMsgHeaderHandler, HeaderName, HdrNLen, ev, NULL);
114 Put(DflEnumMsgHeaderHandler, IKEY(f), ev, reference_free_handler);
118 Put(MsgHeaderHandler, HeaderName, HdrNLen, ev, NULL);
121 void RegisterMimeRenderer(const char *HeaderName, long HdrNLen,
122 RenderMimeFunc MimeRenderer,
123 int InlineRenderable,
126 RenderMimeFuncStruct *f;
128 f = (RenderMimeFuncStruct*) malloc(sizeof(RenderMimeFuncStruct));
130 Put(MimeRenderHandler, HeaderName, HdrNLen, f, NULL);
131 if (InlineRenderable)
132 RegisterEmbeddableMimeType(HeaderName, HdrNLen, 10000 - Priority);
135 /*----------------------------------------------------------------------------*/
138 * comparator for two longs in descending order.
140 int longcmp_r(const void *s1, const void *s2) {
144 l1 = *(long *)GetSearchPayload(s1);
145 l2 = *(long *)GetSearchPayload(s2);
147 if (l1 > l2) return(-1);
148 if (l1 < l2) return(+1);
153 * comparator for longs; descending order.
155 int qlongcmp_r(const void *s1, const void *s2) {
159 if (l1 > l2) return(-1);
160 if (l1 < l2) return(+1);
166 * comparator for message summary structs by ascending subject.
168 int summcmp_subj(const void *s1, const void *s2) {
169 message_summary *summ1;
170 message_summary *summ2;
172 summ1 = (message_summary *)GetSearchPayload(s1);
173 summ2 = (message_summary *)GetSearchPayload(s2);
174 return strcasecmp(ChrPtr(summ1->subj), ChrPtr(summ2->subj));
178 * comparator for message summary structs by descending subject.
180 int summcmp_rsubj(const void *s1, const void *s2) {
181 message_summary *summ1;
182 message_summary *summ2;
184 summ1 = (message_summary *)GetSearchPayload(s1);
185 summ2 = (message_summary *)GetSearchPayload(s2);
186 return strcasecmp(ChrPtr(summ2->subj), ChrPtr(summ1->subj));
189 * comparator for message summary structs by descending subject.
191 int groupchange_subj(const void *s1, const void *s2) {
192 message_summary *summ1;
193 message_summary *summ2;
195 summ1 = (message_summary *)s1;
196 summ2 = (message_summary *)s2;
197 return ChrPtr(summ2->subj)[0] != ChrPtr(summ1->subj)[0];
201 * comparator for message summary structs by ascending sender.
203 int summcmp_sender(const void *s1, const void *s2) {
204 message_summary *summ1;
205 message_summary *summ2;
207 summ1 = (message_summary *)GetSearchPayload(s1);
208 summ2 = (message_summary *)GetSearchPayload(s2);
209 return strcasecmp(ChrPtr(summ1->from), ChrPtr(summ2->from));
213 * comparator for message summary structs by descending sender.
215 int summcmp_rsender(const void *s1, const void *s2) {
216 message_summary *summ1;
217 message_summary *summ2;
219 summ1 = (message_summary *)GetSearchPayload(s1);
220 summ2 = (message_summary *)GetSearchPayload(s2);
221 return strcasecmp(ChrPtr(summ2->from), ChrPtr(summ1->from));
224 * comparator for message summary structs by descending sender.
226 int groupchange_sender(const void *s1, const void *s2) {
227 message_summary *summ1;
228 message_summary *summ2;
230 summ1 = (message_summary *)s1;
231 summ2 = (message_summary *)s2;
232 return strcasecmp(ChrPtr(summ2->from), ChrPtr(summ1->from)) != 0;
237 * comparator for message summary structs by ascending date.
239 int summcmp_date(const void *s1, const void *s2) {
240 message_summary *summ1;
241 message_summary *summ2;
243 summ1 = (message_summary *)GetSearchPayload(s1);
244 summ2 = (message_summary *)GetSearchPayload(s2);
246 if (summ1->date < summ2->date) return -1;
247 else if (summ1->date > summ2->date) return +1;
252 * comparator for message summary structs by descending date.
254 int summcmp_rdate(const void *s1, const void *s2) {
255 message_summary *summ1;
256 message_summary *summ2;
258 summ1 = (message_summary *)GetSearchPayload(s1);
259 summ2 = (message_summary *)GetSearchPayload(s2);
261 if (summ1->date < summ2->date) return +1;
262 else if (summ1->date > summ2->date) return -1;
267 * comparator for message summary structs by descending date.
269 const long DAYSECONDS = 24 * 60 * 60;
270 int groupchange_date(const void *s1, const void *s2) {
271 message_summary *summ1;
272 message_summary *summ2;
274 summ1 = (message_summary *)s1;
275 summ2 = (message_summary *)s2;
277 return (summ1->date % DAYSECONDS) != (summ2->date %DAYSECONDS);
281 /*----------------------------------------------------------------------------*/
282 /* Don't wanna know... or? */
283 void examine_pref(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset) {return;}
284 void examine_suff(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset) {return;}
285 void examine_path(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset) {return;}
286 void examine_content_encoding(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
288 /* TODO: do we care? */
292 void examine_exti(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
297 void examine_nhdr(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
300 if (!strncasecmp(ChrPtr(HdrLine), "yes", 8))
303 int Conditional_ANONYMOUS_MESSAGE(StrBuf *Target, WCTemplputParams *TP)
305 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
306 return Msg->nhdr != 0;
309 void examine_type(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
311 Msg->format_type = StrToi(HdrLine);
315 void examine_from(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
319 CheckConvertBufs(WCC);
320 FreeStrBuf(&Msg->from);
321 Msg->from = NewStrBufPlain(NULL, StrLength(HdrLine));
322 StrBuf_RFC822_2_Utf8(Msg->from,
329 void tmplput_MAIL_SUMM_FROM(StrBuf *Target, WCTemplputParams *TP)
331 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
332 StrBufAppendTemplate(Target, TP, Msg->from, 0);
335 void examine_subj(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
339 CheckConvertBufs(WCC);
340 FreeStrBuf(&Msg->subj);
341 Msg->subj = NewStrBufPlain(NULL, StrLength(HdrLine));
342 StrBuf_RFC822_2_Utf8(Msg->subj,
349 void tmplput_MAIL_SUMM_SUBJECT(StrBuf *Target, WCTemplputParams *TP)
351 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
353 if (TP->Tokens->nParameters == 4)
358 GetTemplateTokenString(Target, TP, 3, &pch, &len);
360 (strstr(ChrPtr(Msg->subj), pch) == NULL))
362 GetTemplateTokenString(Target, TP, 2, &pch, &len);
363 StrBufAppendBufPlain(Target, pch, len, 0);
366 StrBufAppendTemplate(Target, TP, Msg->subj, 0);
368 int Conditional_MAIL_SUMM_SUBJECT(StrBuf *Target, WCTemplputParams *TP)
370 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
373 return StrLength(Msg->subj) > 0;
377 void examine_msgn(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
383 CheckConvertBufs(WCC);
384 FreeStrBuf(&Msg->reply_inreplyto);
385 Msg->reply_inreplyto = NewStrBufPlain(NULL, StrLength(HdrLine));
386 pOffset = strchr(ChrPtr(HdrLine), '/');
387 if (pOffset != NULL) {
388 Offset = pOffset - ChrPtr(HdrLine);
390 Msg->reply_inreplyto_hash = ThreadIdHashOffset(HdrLine, Offset);
391 StrBuf_RFC822_2_Utf8(Msg->reply_inreplyto,
398 void tmplput_MAIL_SUMM_INREPLYTO(StrBuf *Target, WCTemplputParams *TP)
400 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
401 StrBufAppendTemplate(Target, TP, Msg->reply_inreplyto, 0);
404 int Conditional_MAIL_SUMM_UNREAD(StrBuf *Target, WCTemplputParams *TP)
406 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
407 return (Msg->Flags & MSGFLAG_READ) != 0;
410 void examine_wefw(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
416 CheckConvertBufs(WCC);
417 FreeStrBuf(&Msg->reply_references);
418 Msg->reply_references = NewStrBufPlain(NULL, StrLength(HdrLine));
419 pOffset = strchr(ChrPtr(HdrLine), '/');
420 if (pOffset != NULL) {
421 Offset = pOffset - ChrPtr(HdrLine);
423 Msg->reply_references_hash = ThreadIdHashOffset(HdrLine, Offset);
424 StrBuf_RFC822_2_Utf8(Msg->reply_references,
431 void tmplput_MAIL_SUMM_REFIDS(StrBuf *Target, WCTemplputParams *TP)
433 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
434 StrBufAppendTemplate(Target, TP, Msg->reply_references, 0);
437 void examine_replyto(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
441 CheckConvertBufs(WCC);
442 FreeStrBuf(&Msg->ReplyTo);
443 Msg->ReplyTo = NewStrBufPlain(NULL, StrLength(HdrLine));
444 StrBuf_RFC822_2_Utf8(Msg->ReplyTo,
450 if (Msg->AllRcpt == NULL)
451 Msg->AllRcpt = NewStrBufPlain(NULL, StrLength(HdrLine));
452 if (StrLength(Msg->AllRcpt) > 0) {
453 StrBufAppendBufPlain(Msg->AllRcpt, HKEY(", "), 0);
455 StrBufAppendBuf(Msg->AllRcpt, Msg->ReplyTo, 0);
457 void tmplput_MAIL_SUMM_REPLYTO(StrBuf *Target, WCTemplputParams *TP)
459 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
460 StrBufAppendTemplate(Target, TP, Msg->ReplyTo, 0);
463 void examine_cccc(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
467 CheckConvertBufs(WCC);
468 FreeStrBuf(&Msg->cccc);
469 Msg->cccc = NewStrBufPlain(NULL, StrLength(HdrLine));
470 StrBuf_RFC822_2_Utf8(Msg->cccc,
476 if (Msg->AllRcpt == NULL)
477 Msg->AllRcpt = NewStrBufPlain(NULL, StrLength(HdrLine));
478 if (StrLength(Msg->AllRcpt) > 0) {
479 StrBufAppendBufPlain(Msg->AllRcpt, HKEY(", "), 0);
481 StrBufAppendBuf(Msg->AllRcpt, Msg->cccc, 0);
483 void tmplput_MAIL_SUMM_CCCC(StrBuf *Target, WCTemplputParams *TP)
485 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
486 StrBufAppendTemplate(Target, TP, Msg->cccc, 0);
490 void examine_room(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
492 if ((StrLength(HdrLine) > 0) &&
493 (strcasecmp(ChrPtr(HdrLine), ChrPtr(WC->CurRoom.name)))) {
494 FreeStrBuf(&Msg->Room);
495 Msg->Room = NewStrBufDup(HdrLine);
498 void tmplput_MAIL_SUMM_ORGROOM(StrBuf *Target, WCTemplputParams *TP)
500 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
501 StrBufAppendTemplate(Target, TP, Msg->Room, 0);
505 void examine_rfca(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
507 FreeStrBuf(&Msg->Rfca);
508 Msg->Rfca = NewStrBufDup(HdrLine);
510 void tmplput_MAIL_SUMM_RFCA(StrBuf *Target, WCTemplputParams *TP)
512 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
513 StrBufAppendTemplate(Target, TP, Msg->Rfca, 0);
515 int Conditional_MAIL_SUMM_RFCA(StrBuf *Target, WCTemplputParams *TP)
517 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
518 return StrLength(Msg->Rfca) > 0;
520 int Conditional_MAIL_SUMM_CCCC(StrBuf *Target, WCTemplputParams *TP)
522 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
523 return StrLength(Msg->cccc) > 0;
525 int Conditional_MAIL_SUMM_REPLYTO(StrBuf *Target, WCTemplputParams *TP)
527 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
528 return StrLength(Msg->ReplyTo) > 0;
531 void examine_node(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
535 if ( (StrLength(HdrLine) > 0) &&
536 ((WC->CurRoom.QRFlags & QR_NETWORK)
537 || ((strcasecmp(ChrPtr(HdrLine), ChrPtr(WCC->serv_info->serv_nodename))
538 && (strcasecmp(ChrPtr(HdrLine), ChrPtr(WCC->serv_info->serv_fqdn))))))) {
539 FreeStrBuf(&Msg->OtherNode);
540 Msg->OtherNode = NewStrBufDup(HdrLine);
543 void tmplput_MAIL_SUMM_OTHERNODE(StrBuf *Target, WCTemplputParams *TP)
545 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
546 StrBufAppendTemplate(Target, TP, Msg->OtherNode, 0);
548 int Conditional_MAIL_SUMM_OTHERNODE(StrBuf *Target, WCTemplputParams *TP)
550 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
551 return StrLength(Msg->OtherNode) > 0;
554 void examine_nvto(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
558 CheckConvertBufs(WCC);
559 FreeStrBuf(&Msg->EnvTo);
560 Msg->EnvTo = NewStrBufPlain(NULL, StrLength(HdrLine));
561 StrBuf_RFC822_2_Utf8(Msg->EnvTo,
570 void examine_rcpt(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
574 CheckConvertBufs(WCC);
575 FreeStrBuf(&Msg->to);
576 Msg->to = NewStrBufPlain(NULL, StrLength(HdrLine));
577 StrBuf_RFC822_2_Utf8(Msg->to,
583 if (Msg->AllRcpt == NULL)
584 Msg->AllRcpt = NewStrBufPlain(NULL, StrLength(HdrLine));
585 if (StrLength(Msg->AllRcpt) > 0) {
586 StrBufAppendBufPlain(Msg->AllRcpt, HKEY(", "), 0);
588 StrBufAppendBuf(Msg->AllRcpt, Msg->to, 0);
590 void tmplput_MAIL_SUMM_TO(StrBuf *Target, WCTemplputParams *TP)
592 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
593 StrBufAppendTemplate(Target, TP, Msg->to, 0);
595 int Conditional_MAIL_SUMM_TO(StrBuf *Target, WCTemplputParams *TP)
597 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
598 return StrLength(Msg->to) != 0;
600 int Conditional_MAIL_SUMM_SUBJ(StrBuf *Target, WCTemplputParams *TP)
602 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
603 return StrLength(Msg->subj) != 0;
605 void tmplput_MAIL_SUMM_ALLRCPT(StrBuf *Target, WCTemplputParams *TP)
607 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
608 StrBufAppendTemplate(Target, TP, Msg->AllRcpt, 0);
613 void tmplput_SUMM_COUNT(StrBuf *Target, WCTemplputParams *TP)
615 StrBufAppendPrintf(Target, "%d", GetCount( WC->summ));
618 HashList *iterate_get_mailsumm_All(StrBuf *Target, WCTemplputParams *TP)
622 void examine_time(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
624 Msg->date = StrTol(HdrLine);
627 void tmplput_MAIL_SUMM_DATE_BRIEF(StrBuf *Target, WCTemplputParams *TP)
630 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
631 webcit_fmt_date(datebuf, 64, Msg->date, DATEFMT_BRIEF);
632 StrBufAppendBufPlain(Target, datebuf, -1, 0);
635 void tmplput_MAIL_SUMM_EUID(StrBuf *Target, WCTemplputParams *TP)
637 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
638 StrBufAppendTemplate(Target, TP, Msg->euid, 0);
641 void tmplput_MAIL_SUMM_DATE_FULL(StrBuf *Target, WCTemplputParams *TP)
644 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
645 webcit_fmt_date(datebuf, 64, Msg->date, DATEFMT_FULL);
646 StrBufAppendBufPlain(Target, datebuf, -1, 0);
648 void tmplput_MAIL_SUMM_DATE_NO(StrBuf *Target, WCTemplputParams *TP)
650 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
651 StrBufAppendPrintf(Target, "%ld", Msg->date, 0);
656 void render_MAIL(StrBuf *Target, WCTemplputParams *TP, StrBuf *FoundCharset)
658 wc_mime_attachment *Mime = (wc_mime_attachment *) CTX(CTX_MIME_ATACH);
659 const StrBuf *TemplateMime;
661 if (Mime->Data == NULL)
662 Mime->Data = NewStrBufPlain(NULL, Mime->length);
664 FlushStrBuf(Mime->Data);
665 read_message(Mime->Data, HKEY("view_submessage"), Mime->msgnum, Mime->PartNum, &TemplateMime, TP);
667 if ( (!IsEmptyStr(mime_submessages)) && (!section[0]) ) {
668 for (i=0; i<num_tokens(mime_submessages, '|'); ++i) {
669 extract_token(buf, mime_submessages, i, '|', sizeof buf);
670 / ** use printable_view to suppress buttons * /
671 wc_printf("<blockquote>");
672 read_message(Mime->msgnum, 1, ChrPtr(Mime->Section));
673 wc_printf("</blockquote>");
679 void render_MIME_ICS(StrBuf *Target, WCTemplputParams *TP, StrBuf *FoundCharset)
681 wc_mime_attachment *Mime = (wc_mime_attachment *) CTX(CTX_MIME_ATACH);
682 if (StrLength(Mime->Data) == 0) {
685 if (StrLength(Mime->Data) > 0) {
686 cal_process_attachment(Mime);
692 void examine_mime_part(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
694 const char *Ptr = NULL;
695 wc_mime_attachment *Mime;
699 CheckConvertBufs(WCC);
700 Mime = (wc_mime_attachment*) malloc(sizeof(wc_mime_attachment));
701 memset(Mime, 0, sizeof(wc_mime_attachment));
702 Mime->msgnum = Msg->msgnum;
705 Mime->Name = NewStrBuf();
706 StrBufExtract_NextToken(Buf, HdrLine, &Ptr, '|');
707 StrBuf_RFC822_2_Utf8(Mime->Name,
713 StrBufTrim(Mime->Name);
715 StrBufExtract_NextToken(Buf, HdrLine, &Ptr, '|');
716 Mime->FileName = NewStrBuf();
717 StrBuf_RFC822_2_Utf8(Mime->FileName,
723 StrBufTrim(Mime->FileName);
725 Mime->PartNum = NewStrBuf();
726 StrBufExtract_NextToken(Mime->PartNum, HdrLine, &Ptr, '|');
727 StrBufTrim(Mime->PartNum);
728 if (strchr(ChrPtr(Mime->PartNum), '.') != NULL)
733 Mime->Disposition = NewStrBuf();
734 StrBufExtract_NextToken(Mime->Disposition, HdrLine, &Ptr, '|');
736 Mime->ContentType = NewStrBuf();
737 StrBufExtract_NextToken(Mime->ContentType, HdrLine, &Ptr, '|');
738 StrBufTrim(Mime->ContentType);
739 StrBufLowerCase(Mime->ContentType);
740 if (!strcmp(ChrPtr(Mime->ContentType), "application/octet-stream")) {
741 StrBufPlain(Mime->ContentType,
742 GuessMimeByFilename(SKEY(Mime->FileName)), -1);
745 Mime->length = StrBufExtractNext_int(HdrLine, &Ptr, '|');
747 StrBufSkip_NTokenS(HdrLine, &Ptr, '|', 1); /* cbid?? */
749 Mime->Charset = NewStrBuf();
750 StrBufExtract_NextToken(Mime->Charset, HdrLine, &Ptr, '|');
753 if ( (StrLength(Mime->FileName) == 0) && (StrLength(Mime->Name) > 0) ) {
754 StrBufAppendBuf(Mime->FileName, Mime->Name, 0);
757 if (StrLength(Msg->PartNum) > 0) {
759 StrBufPrintf(Buf, "%s.%s", ChrPtr(Msg->PartNum), ChrPtr(Mime->PartNum));
765 if (Msg->AllAttach == NULL)
766 Msg->AllAttach = NewHash(1,NULL);
767 Put(Msg->AllAttach, SKEY(Mime->PartNum), Mime, DestroyMime);
772 void evaluate_mime_part(StrBuf *Target, WCTemplputParams *TP)
774 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
775 wc_mime_attachment *Mime = (wc_mime_attachment *) CTX(CTX_MIME_ATACH);
778 /* just print the root-node */
779 if ((Mime->level >= 1) &&
780 GetHash(MimeRenderHandler, SKEY(Mime->ContentType), &vMimeRenderer) &&
781 vMimeRenderer != NULL)
783 Mime->Renderer = (RenderMimeFuncStruct*) vMimeRenderer;
784 if (Msg->Submessages == NULL)
785 Msg->Submessages = NewHash(1,NULL);
786 Put(Msg->Submessages, SKEY(Mime->PartNum), Mime, reference_free_handler);
788 else if ((Mime->level >= 1) &&
789 (!strcasecmp(ChrPtr(Mime->Disposition), "inline"))
790 && (!strncasecmp(ChrPtr(Mime->ContentType), "image/", 6)) ){
791 if (Msg->AttachLinks == NULL)
792 Msg->AttachLinks = NewHash(1,NULL);
793 Put(Msg->AttachLinks, SKEY(Mime->PartNum), Mime, reference_free_handler);
795 else if ((Mime->level >= 1) &&
796 (StrLength(Mime->ContentType) > 0) &&
797 ( (!strcasecmp(ChrPtr(Mime->Disposition), "attachment"))
798 || (!strcasecmp(ChrPtr(Mime->Disposition), "inline"))
799 || (!strcasecmp(ChrPtr(Mime->Disposition), ""))))
801 if (Msg->AttachLinks == NULL)
802 Msg->AttachLinks = NewHash(1,NULL);
803 Put(Msg->AttachLinks, SKEY(Mime->PartNum), Mime, reference_free_handler);
804 if ((strcasecmp(ChrPtr(Mime->ContentType), "application/octet-stream") == 0) &&
805 (StrLength(Mime->FileName) > 0)) {
806 FlushStrBuf(Mime->ContentType);
807 StrBufAppendBufPlain(Mime->ContentType,
808 GuessMimeByFilename(SKEY(Mime->FileName)),
814 void tmplput_MAIL_SUMM_NATTACH(StrBuf *Target, WCTemplputParams *TP)
816 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
817 StrBufAppendPrintf(Target, "%ld", GetCount(Msg->Attachments));
821 void examine_hnod(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
825 CheckConvertBufs(WCC);
826 FreeStrBuf(&Msg->hnod);
827 Msg->hnod = NewStrBufPlain(NULL, StrLength(HdrLine));
828 StrBuf_RFC822_2_Utf8(Msg->hnod,
835 void tmplput_MAIL_SUMM_H_NODE(StrBuf *Target, WCTemplputParams *TP)
837 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
838 StrBufAppendTemplate(Target, TP, Msg->hnod, 0);
840 int Conditional_MAIL_SUMM_H_NODE(StrBuf *Target, WCTemplputParams *TP)
842 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
843 return StrLength(Msg->hnod) > 0;
848 void examine_text(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
850 if (Msg->MsgBody->Data == NULL)
851 Msg->MsgBody->Data = NewStrBufPlain(NULL, SIZ);
853 FlushStrBuf(Msg->MsgBody->Data);
856 void examine_msg4_partnum(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
858 Msg->MsgBody->PartNum = NewStrBufDup(HdrLine);
859 StrBufTrim(Msg->MsgBody->PartNum);
862 void examine_content_lengh(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
864 Msg->MsgBody->length = StrTol(HdrLine);
865 Msg->MsgBody->size_known = 1;
868 void examine_content_type(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
876 Msg->MsgBody->ContentType = NewStrBufDup(HdrLine);
877 sem = strchr(ChrPtr(HdrLine), ';');
880 Token = NewStrBufPlain(NULL, StrLength(HdrLine));
881 Value = NewStrBufPlain(NULL, StrLength(HdrLine));
882 len = sem - ChrPtr(HdrLine);
883 StrBufCutAt(Msg->MsgBody->ContentType, len, NULL);
884 while (sem != NULL) {
885 while (isspace(*(sem + 1)))
887 StrBufCutLeft(HdrLine, sem - ChrPtr(HdrLine));
888 sem = strchr(ChrPtr(HdrLine), ';');
890 len = sem - ChrPtr(HdrLine);
892 len = StrLength(HdrLine);
895 StrBufAppendBufPlain(Token, ChrPtr(HdrLine), len, 0);
896 eq = strchr(ChrPtr(Token), '=');
898 len = eq - ChrPtr(Token);
899 StrBufAppendBufPlain(Value, eq + 1, StrLength(Token) - len - 1, 0);
900 StrBufCutAt(Token, len, NULL);
905 if (EvaluateMsgHdr(SKEY(Token), Msg, Value, FoundCharset) < 0)
906 syslog(LOG_WARNING, "don't know how to handle content type sub-header[%s]\n", ChrPtr(Token));
914 int ReadOneMessageSummary(message_summary *Msg, StrBuf *FoundCharset, StrBuf *Buf)
921 serv_printf("MSG0 %ld|1", Msg->msgnum); /* ask for headers only */
923 StrBuf_ServGetln(Buf);
924 if (GetServerStatus(Buf, NULL) != 1) {
928 while (len = StrBuf_ServGetln(Buf),
931 strcmp(ChrPtr(Buf), "000")))
934 ebuf = strchr(ChrPtr(Buf), '=');
937 if (EvaluateMsgHdr(buf, nBuf, Msg, Buf, FoundCharset) < 0)
938 syslog(LOG_INFO, "Don't know how to handle Message Headerline [%s]", ChrPtr(Buf));
943 void tmplput_MAIL_SUMM_N(StrBuf *Target, WCTemplputParams *TP)
945 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
946 StrBufAppendPrintf(Target, "%ld", Msg->msgnum);
950 void tmplput_MAIL_SUMM_PERMALINK(StrBuf *Target, WCTemplputParams *TP)
952 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
956 perma_link = NewStrBufPlain(HKEY("/readfwd?go="));
957 StrBufUrlescAppend(perma_link, WC->CurRoom.name, NULL);
958 View = sbstr("view");
960 StrBufAppendBufPlain(perma_link, HKEY("?view="), 0);
961 StrBufAppendBuf(perma_link, View, 0);
963 StrBufAppendBufPlain(perma_link, HKEY("?start_reading_at="), 0);
964 StrBufAppendPrintf(perma_link, "%ld#%ld", Msg->msgnum, Msg->msgnum);
965 StrBufAppendBuf(Target, perma_link, 0);
966 FreeStrBuf(&perma_link);
970 int Conditional_MAIL_MIME_ALL(StrBuf *Target, WCTemplputParams *TP)
972 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
973 return GetCount(Msg->Attachments) > 0;
976 int Conditional_MAIL_MIME_SUBMESSAGES(StrBuf *Target, WCTemplputParams *TP)
978 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
979 return GetCount(Msg->Submessages) > 0;
982 int Conditional_MAIL_MIME_ATTACHLINKS(StrBuf *Target, WCTemplputParams *TP)
984 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
985 return GetCount(Msg->AttachLinks) > 0;
988 int Conditional_MAIL_MIME_ATTACH(StrBuf *Target, WCTemplputParams *TP)
990 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
991 return GetCount(Msg->AllAttach) > 0;
994 void tmplput_QUOTED_MAIL_BODY(StrBuf *Target, WCTemplputParams *TP)
1000 MsgNum = LBstr(TKEY(0));
1002 read_message(Buf, HKEY("view_message_replyquote"), MsgNum, NULL, &Mime, TP);
1003 StrBufAppendTemplate(Target, TP, Buf, 1);
1007 void tmplput_EDIT_MAIL_BODY(StrBuf *Target, WCTemplputParams *TP)
1013 MsgNum = LBstr(TKEY(0));
1015 read_message(Buf, HKEY("view_message_edit"), MsgNum, NULL, &Mime, TP);
1016 StrBufAppendTemplate(Target, TP, Buf, 1);
1020 void tmplput_EDIT_WIKI_BODY(StrBuf *Target, WCTemplputParams *TP)
1026 /* Insert the existing content of the wiki page into the editor. But we only want
1027 * to do this the first time -- if the user is uploading an attachment we don't want
1030 if (!havebstr("attach_button")) {
1031 StrBuf *wikipage = NewStrBufDup(sbstr("page"));
1032 putbstr("format", NewStrBufPlain(HKEY("plain")));
1033 str_wiki_index(wikipage);
1034 msgnum = locate_message_by_uid(ChrPtr(wikipage));
1035 FreeStrBuf(&wikipage);
1038 read_message(Buf, HKEY("view_message_wikiedit"), msgnum, NULL, &Mime, TP);
1039 StrBufAppendTemplate(Target, TP, Buf, 1);
1045 void tmplput_MAIL_BODY(StrBuf *Target, WCTemplputParams *TP)
1047 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
1048 StrBufAppendTemplate(Target, TP, Msg->MsgBody->Data, 0);
1052 void render_MAIL_variformat(StrBuf *Target, WCTemplputParams *TP, StrBuf *FoundCharset)
1054 /* Messages in legacy Citadel variformat get handled thusly... */
1055 wc_mime_attachment *Mime = (wc_mime_attachment *) CTX(CTX_MIME_ATACH);
1056 StrBuf *TTarget = NewStrBufPlain(NULL, StrLength(Mime->Data));
1057 FmOut(TTarget, "JUSTIFY", Mime->Data);
1058 FreeStrBuf(&Mime->Data);
1059 Mime->Data = TTarget;
1062 void render_MAIL_text_plain(StrBuf *Target, WCTemplputParams *TP, StrBuf *FoundCharset)
1064 wc_mime_attachment *Mime = (wc_mime_attachment *) CTX(CTX_MIME_ATACH);
1065 const char *ptr, *pte;
1066 const char *BufPtr = NULL;
1080 iconv_t ic = (iconv_t)(-1) ;
1083 if ((StrLength(Mime->Data) == 0) && (Mime->length > 0)) {
1084 FreeStrBuf(&Mime->Data);
1090 if (StrLength(Mime->Charset) != 0)
1092 else if (StrLength(FoundCharset) > 0)
1094 else if (StrLength(WC->DefaultCharset) > 0)
1095 cs = WC->DefaultCharset;
1099 else if (!strcasecmp(ChrPtr(cs), "utf-8")) {
1102 else if (!strcasecmp(ChrPtr(cs), "us-ascii")) {
1106 ctdl_iconv_open("UTF-8", ChrPtr(cs), &ic);
1107 if (ic == (iconv_t)(-1) ) {
1108 syslog(LOG_WARNING, "%s:%d iconv_open(UTF-8, %s) failed: %s\n",
1109 __FILE__, __LINE__, ChrPtr(Mime->Charset), strerror(errno));
1114 Line = NewStrBufPlain(NULL, SIZ);
1115 Line1 = NewStrBufPlain(NULL, SIZ);
1116 Line2 = NewStrBufPlain(NULL, SIZ);
1117 TTarget = NewStrBufPlain(NULL, StrLength(Mime->Data));
1120 if (StrLength(Mime->Data) > 0)
1123 StrBufSipLine(Line, Mime->Data, &BufPtr);
1127 len = StrLength(Line);
1130 while ((ptr < pte) &&
1139 if (i > 0) StrBufCutLeft(Line, i);
1141 if (StrLength(Line) == 0) {
1144 StrBufAppendBufPlain(TTarget, HKEY("<tt></tt><br>\n"), 0);
1150 for (i = bn; i < bq; i++)
1151 StrBufAppendBufPlain(TTarget, HKEY("<blockquote>"), 0);
1152 for (i = bq; i < bn; i++)
1153 StrBufAppendBufPlain(TTarget, HKEY("</blockquote>"), 0);
1156 StrBufConvert(Line, Line1, &ic);
1159 StrBufAppendBufPlain(TTarget, HKEY("<tt>"), 0);
1160 UrlizeText(Line1, Line, Line2);
1162 StrEscAppend(TTarget, Line1, NULL, 0, 0);
1163 StrBufAppendBufPlain(TTarget, HKEY("</tt><br>\n"), 0);
1167 while ((BufPtr != StrBufNOTNULL) &&
1170 if (nEmptyLines > 0)
1171 StrBufCutRight(TTarget, nEmptyLines * (sizeof ("<tt></tt><br>\n") - 1));
1172 for (i = 0; i < bn; i++)
1173 StrBufAppendBufPlain(TTarget, HKEY("</blockquote>"), 0);
1175 StrBufAppendBufPlain(TTarget, HKEY("</i><br>"), 0);
1177 if (ic != (iconv_t)(-1) ) {
1182 FreeStrBuf(&Mime->Data);
1183 Mime->Data = TTarget;
1184 FlushStrBuf(Mime->ContentType);
1185 StrBufAppendBufPlain(Mime->ContentType, HKEY("text/html"), 0);
1186 FlushStrBuf(Mime->Charset);
1187 StrBufAppendBufPlain(Mime->Charset, HKEY("UTF-8"), 0);
1193 void render_MAIL_html(StrBuf *Target, WCTemplputParams *TP, StrBuf *FoundCharset)
1195 wc_mime_attachment *Mime = (wc_mime_attachment *) CTX(CTX_MIME_ATACH);
1198 if (StrLength(Mime->Data) == 0)
1201 Buf = NewStrBufPlain(NULL, StrLength(Mime->Data));
1203 /* HTML is fun, but we've got to strip it first */
1204 output_html(ChrPtr(Mime->Charset),
1205 (WC->CurRoom.view == VIEW_WIKI ? 1 : 0),
1208 FreeStrBuf(&Mime->Data);
1213 void render_MAIL_UNKNOWN(StrBuf *Target, WCTemplputParams *TP, StrBuf *FoundCharset)
1215 wc_mime_attachment *Mime = (wc_mime_attachment *) CTX(CTX_MIME_ATACH);
1216 /* Unknown weirdness */
1217 FlushStrBuf(Mime->Data);
1218 StrBufAppendBufPlain(Mime->Data, _("I don't know how to display "), -1, 0);
1219 StrBufAppendBuf(Mime->Data, Mime->ContentType, 0);
1220 StrBufAppendBufPlain(Mime->Data, HKEY("<br>\n"), 0);
1224 HashList *iterate_get_mime_All(StrBuf *Target, WCTemplputParams *TP)
1226 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
1227 return Msg->Attachments;
1229 HashList *iterate_get_mime_Submessages(StrBuf *Target, WCTemplputParams *TP)
1231 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
1232 return Msg->Submessages;
1234 HashList *iterate_get_mime_AttachLinks(StrBuf *Target, WCTemplputParams *TP)
1236 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
1237 return Msg->AttachLinks;
1239 HashList *iterate_get_mime_Attachments(StrBuf *Target, WCTemplputParams *TP)
1241 message_summary *Msg = (message_summary*) CTX(CTX_MAILSUM);
1242 return Msg->AllAttach;
1245 void tmplput_MIME_Name(StrBuf *Target, WCTemplputParams *TP)
1247 wc_mime_attachment *mime = (wc_mime_attachment*) CTX(CTX_MIME_ATACH);
1248 StrBufAppendTemplate(Target, TP, mime->Name, 0);
1251 void tmplput_MIME_FileName(StrBuf *Target, WCTemplputParams *TP)
1253 wc_mime_attachment *mime = (wc_mime_attachment*) CTX(CTX_MIME_ATACH);
1254 StrBufAppendTemplate(Target, TP, mime->FileName, 0);
1257 void tmplput_MIME_PartNum(StrBuf *Target, WCTemplputParams *TP)
1259 wc_mime_attachment *mime = (wc_mime_attachment*) CTX(CTX_MIME_ATACH);
1260 StrBufAppendTemplate(Target, TP, mime->PartNum, 0);
1263 void tmplput_MIME_MsgNum(StrBuf *Target, WCTemplputParams *TP)
1265 wc_mime_attachment *mime = (wc_mime_attachment*) CTX(CTX_MIME_ATACH);
1266 StrBufAppendPrintf(Target, "%ld", mime->msgnum);
1269 void tmplput_MIME_Disposition(StrBuf *Target, WCTemplputParams *TP)
1271 wc_mime_attachment *mime = (wc_mime_attachment*) CTX(CTX_MIME_ATACH);
1272 StrBufAppendTemplate(Target, TP, mime->Disposition, 0);
1275 void tmplput_MIME_ContentType(StrBuf *Target, WCTemplputParams *TP)
1277 wc_mime_attachment *mime = (wc_mime_attachment*) CTX(CTX_MIME_ATACH);
1278 StrBufAppendTemplate(Target, TP, mime->ContentType, 0);
1281 void examine_charset(message_summary *Msg, StrBuf *HdrLine, StrBuf *FoundCharset)
1283 Msg->MsgBody->Charset = NewStrBufDup(HdrLine);
1286 void tmplput_MIME_Charset(StrBuf *Target, WCTemplputParams *TP)
1288 wc_mime_attachment *mime = (wc_mime_attachment*) CTX(CTX_MIME_ATACH);
1289 StrBufAppendTemplate(Target, TP, mime->Charset, 0);
1292 void tmplput_MIME_Data(StrBuf *Target, WCTemplputParams *TP)
1294 wc_mime_attachment *mime = (wc_mime_attachment*) CTX(CTX_MIME_ATACH);
1295 if (mime->Renderer != NULL)
1296 mime->Renderer->f(Target, TP, NULL);
1297 StrBufAppendTemplate(Target, TP, mime->Data, 0);
1298 /* TODO: check whether we need to load it now? */
1301 void tmplput_MIME_LoadData(StrBuf *Target, WCTemplputParams *TP)
1303 wcsession *WCC = WC;
1304 wc_mime_attachment *mime = (wc_mime_attachment*) CTX(CTX_MIME_ATACH);
1305 wc_mime_attachment *att;
1307 if (( (!strcasecmp(ChrPtr(mime->Disposition), "inline"))||
1308 (!strcasecmp(ChrPtr(mime->Disposition), "attachment"))) &&
1309 (strcasecmp(ChrPtr(mime->ContentType), "application/ms-tnef")!=0))
1314 /* steal this mime part... */
1315 att = malloc(sizeof(wc_mime_attachment));
1316 memcpy(att, mime, sizeof(wc_mime_attachment));
1317 memset(mime, 0, sizeof(wc_mime_attachment));
1319 if (att->Data == NULL)
1322 if (WCC->attachments == NULL)
1323 WCC->attachments = NewHash(1, NULL);
1324 /* And add it to the list. */
1325 n = snprintf(N, sizeof N, "%d", GetCount(WCC->attachments) + 1);
1326 Put(WCC->attachments, N, n, att, DestroyMime);
1330 void tmplput_MIME_Length(StrBuf *Target, WCTemplputParams *TP)
1332 wc_mime_attachment *mime = (wc_mime_attachment*) CTX(CTX_MIME_ATACH);
1333 StrBufAppendPrintf(Target, "%ld", mime->length);
1336 HashList *iterate_get_registered_Attachments(StrBuf *Target, WCTemplputParams *TP)
1338 return WC->attachments;
1341 void get_registered_Attachments_Count(StrBuf *Target, WCTemplputParams *TP)
1343 StrBufAppendPrintf(Target, "%ld", GetCount (WC->attachments));
1346 void servcmd_do_search(char *buf, long bufsize)
1348 snprintf(buf, bufsize, "MSGS SEARCH|%s", bstr("query"));
1351 void servcmd_headers(char *buf, long bufsize)
1353 snprintf(buf, bufsize, "MSGS ALL");
1356 void servcmd_readfwd(char *buf, long bufsize)
1358 snprintf(buf, bufsize, "MSGS ALL");
1361 void servcmd_readgt(char *buf, long bufsize)
1363 snprintf(buf, bufsize, "MSGS GT|%s", bstr("gt"));
1366 void servcmd_readlt(char *buf, long bufsize)
1368 snprintf(buf, bufsize, "MSGS LT|%s", bstr("lt"));
1371 void servcmd_readnew(char *buf, long bufsize)
1373 snprintf(buf, bufsize, "MSGS NEW");
1376 void servcmd_readold(char *buf, long bufsize)
1378 snprintf(buf, bufsize, "MSGS OLD");
1382 /* DO NOT REORDER OR REMOVE ANY OF THESE */
1383 readloop_struct rlid[] = {
1384 { {HKEY("do_search")}, servcmd_do_search },
1385 { {HKEY("headers")}, servcmd_headers },
1386 { {HKEY("readfwd")}, servcmd_readfwd },
1387 { {HKEY("readnew")}, servcmd_readnew },
1388 { {HKEY("readold")}, servcmd_readold },
1389 { {HKEY("readgt")}, servcmd_readgt },
1390 { {HKEY("readlt")}, servcmd_readlt }
1393 const char* fieldMnemonics[] = {
1394 "from", /* A -> eAuthor */
1395 "exti", /* E -> eXclusivID */
1396 "rfca", /* F -> erFc822Addr */
1397 "hnod", /* H -> eHumanNode */
1398 "msgn", /* I -> emessageId */
1399 "jrnl", /* J -> eJournal */
1400 "rep2", /* K -> eReplyTo */
1401 "list", /* L -> eListID */
1402 "text", /* M -> eMesageText */
1403 "node", /* N -> eNodeName */
1404 "room", /* O -> eOriginalRoom */
1405 "path", /* P -> eMessagePath */
1406 "rcpt", /* R -> eRecipient */
1407 "spec", /* S -> eSpecialField */
1408 "time", /* T -> eTimestamp */
1409 "subj", /* U -> eMsgSubject */
1410 "nvto", /* V -> eenVelopeTo */
1411 "wefw", /* W -> eWeferences */
1412 "cccc", /* Y -> eCarbonCopY */
1413 "nhdr", /* % -> eHeaderOnly */
1414 "type", /* % -> eFormatType */
1415 "part", /* % -> eMessagePart */
1416 "suff", /* % -> eSubFolder */
1417 "pref" /* % -> ePevious */
1419 HashList *msgKeyLookup = NULL;
1421 int GetFieldFromMnemonic(eMessageField *f, const char* c)
1424 if (GetHash(msgKeyLookup, c, 4, &v)) {
1425 *f = (eMessageField) v;
1431 void FillMsgKeyLookupTable(void)
1435 msgKeyLookup = NewHash (1, FourHash);
1437 while (i != eLastHeader) {
1438 if (fieldMnemonics[i] != NULL) {
1439 Put(msgKeyLookup, fieldMnemonics[i], 4, (void*)i, reference_free_handler);
1448 InitModule_MSGRENDERERS
1451 RegisterCTX(CTX_MAILSUM);
1452 RegisterCTX(CTX_MIME_ATACH);
1454 RegisterSortFunc(HKEY("date"),
1460 RegisterSortFunc(HKEY("subject"),
1466 RegisterSortFunc(HKEY("sender"),
1473 RegisterNamespace("SUMM:COUNT", 0, 0, tmplput_SUMM_COUNT, NULL, CTX_NONE);
1474 /* iterate over all known mails in WC->summ */
1475 RegisterIterator("MAIL:SUMM:MSGS", 0, NULL, iterate_get_mailsumm_All,
1476 NULL,NULL, CTX_MAILSUM, CTX_NONE, IT_NOFLAG);
1478 RegisterNamespace("MAIL:SUMM:EUID", 0, 1, tmplput_MAIL_SUMM_EUID, NULL, CTX_MAILSUM);
1479 RegisterNamespace("MAIL:SUMM:DATEBRIEF", 0, 0, tmplput_MAIL_SUMM_DATE_BRIEF, NULL, CTX_MAILSUM);
1480 RegisterNamespace("MAIL:SUMM:DATEFULL", 0, 0, tmplput_MAIL_SUMM_DATE_FULL, NULL, CTX_MAILSUM);
1481 RegisterNamespace("MAIL:SUMM:DATENO", 0, 0, tmplput_MAIL_SUMM_DATE_NO, NULL, CTX_MAILSUM);
1482 RegisterNamespace("MAIL:SUMM:N", 0, 0, tmplput_MAIL_SUMM_N, NULL, CTX_MAILSUM);
1483 RegisterNamespace("MAIL:SUMM:PERMALINK", 0, 0, tmplput_MAIL_SUMM_PERMALINK, NULL, CTX_MAILSUM);
1484 RegisterNamespace("MAIL:SUMM:FROM", 0, 2, tmplput_MAIL_SUMM_FROM, NULL, CTX_MAILSUM);
1485 RegisterNamespace("MAIL:SUMM:TO", 0, 2, tmplput_MAIL_SUMM_TO, NULL, CTX_MAILSUM);
1486 RegisterNamespace("MAIL:SUMM:SUBJECT", 0, 4, tmplput_MAIL_SUMM_SUBJECT, NULL, CTX_MAILSUM);
1487 RegisterNamespace("MAIL:SUMM:NTATACH", 0, 0, tmplput_MAIL_SUMM_NATTACH, NULL, CTX_MAILSUM);
1488 RegisterNamespace("MAIL:SUMM:CCCC", 0, 2, tmplput_MAIL_SUMM_CCCC, NULL, CTX_MAILSUM);
1489 RegisterNamespace("MAIL:SUMM:REPLYTO", 0, 2, tmplput_MAIL_SUMM_REPLYTO, NULL, CTX_MAILSUM);
1490 RegisterNamespace("MAIL:SUMM:H_NODE", 0, 2, tmplput_MAIL_SUMM_H_NODE, NULL, CTX_MAILSUM);
1491 RegisterNamespace("MAIL:SUMM:ALLRCPT", 0, 2, tmplput_MAIL_SUMM_ALLRCPT, NULL, CTX_MAILSUM);
1492 RegisterNamespace("MAIL:SUMM:ORGROOM", 0, 2, tmplput_MAIL_SUMM_ORGROOM, NULL, CTX_MAILSUM);
1493 RegisterNamespace("MAIL:SUMM:RFCA", 0, 2, tmplput_MAIL_SUMM_RFCA, NULL, CTX_MAILSUM);
1494 RegisterNamespace("MAIL:SUMM:OTHERNODE", 2, 0, tmplput_MAIL_SUMM_OTHERNODE, NULL, CTX_MAILSUM);
1495 RegisterNamespace("MAIL:SUMM:REFIDS", 0, 1, tmplput_MAIL_SUMM_REFIDS, NULL, CTX_MAILSUM);
1496 RegisterNamespace("MAIL:SUMM:INREPLYTO", 0, 2, tmplput_MAIL_SUMM_INREPLYTO, NULL, CTX_MAILSUM);
1497 RegisterNamespace("MAIL:BODY", 0, 2, tmplput_MAIL_BODY, NULL, CTX_MAILSUM);
1498 RegisterNamespace("MAIL:QUOTETEXT", 1, 2, tmplput_QUOTED_MAIL_BODY, NULL, CTX_NONE);
1499 RegisterNamespace("MAIL:EDITTEXT", 1, 2, tmplput_EDIT_MAIL_BODY, NULL, CTX_NONE);
1500 RegisterNamespace("MAIL:EDITWIKI", 1, 2, tmplput_EDIT_WIKI_BODY, NULL, CTX_NONE);
1501 RegisterConditional("COND:MAIL:SUMM:RFCA", 0, Conditional_MAIL_SUMM_RFCA, CTX_MAILSUM);
1502 RegisterConditional("COND:MAIL:SUMM:CCCC", 0, Conditional_MAIL_SUMM_CCCC, CTX_MAILSUM);
1503 RegisterConditional("COND:MAIL:SUMM:REPLYTO", 0, Conditional_MAIL_SUMM_REPLYTO, CTX_MAILSUM);
1504 RegisterConditional("COND:MAIL:SUMM:UNREAD", 0, Conditional_MAIL_SUMM_UNREAD, CTX_MAILSUM);
1505 RegisterConditional("COND:MAIL:SUMM:H_NODE", 0, Conditional_MAIL_SUMM_H_NODE, CTX_MAILSUM);
1506 RegisterConditional("COND:MAIL:SUMM:OTHERNODE", 0, Conditional_MAIL_SUMM_OTHERNODE, CTX_MAILSUM);
1507 RegisterConditional("COND:MAIL:SUMM:SUBJECT", 0, Conditional_MAIL_SUMM_SUBJECT, CTX_MAILSUM);
1508 RegisterConditional("COND:MAIL:ANON", 0, Conditional_ANONYMOUS_MESSAGE, CTX_MAILSUM);
1509 RegisterConditional("COND:MAIL:TO", 0, Conditional_MAIL_SUMM_TO, CTX_MAILSUM);
1510 RegisterConditional("COND:MAIL:SUBJ", 0, Conditional_MAIL_SUMM_SUBJ, CTX_MAILSUM);
1512 /* do we have mimetypes to iterate over? */
1513 RegisterConditional("COND:MAIL:MIME:ATTACH", 0, Conditional_MAIL_MIME_ALL, CTX_MAILSUM);
1514 RegisterConditional("COND:MAIL:MIME:ATTACH:SUBMESSAGES", 0, Conditional_MAIL_MIME_SUBMESSAGES, CTX_MAILSUM);
1515 RegisterConditional("COND:MAIL:MIME:ATTACH:LINKS", 0, Conditional_MAIL_MIME_ATTACHLINKS, CTX_MAILSUM);
1516 RegisterConditional("COND:MAIL:MIME:ATTACH:ATT", 0, Conditional_MAIL_MIME_ATTACH, CTX_MAILSUM);
1517 RegisterIterator("MAIL:MIME:ATTACH", 0, NULL, iterate_get_mime_All,
1518 NULL, NULL, CTX_MIME_ATACH, CTX_MAILSUM, IT_NOFLAG);
1519 RegisterIterator("MAIL:MIME:ATTACH:SUBMESSAGES", 0, NULL, iterate_get_mime_Submessages,
1520 NULL, NULL, CTX_MIME_ATACH, CTX_MAILSUM, IT_NOFLAG);
1521 RegisterIterator("MAIL:MIME:ATTACH:LINKS", 0, NULL, iterate_get_mime_AttachLinks,
1522 NULL, NULL, CTX_MIME_ATACH, CTX_MAILSUM, IT_NOFLAG);
1523 RegisterIterator("MAIL:MIME:ATTACH:ATT", 0, NULL, iterate_get_mime_Attachments,
1524 NULL, NULL, CTX_MIME_ATACH, CTX_MAILSUM, IT_NOFLAG);
1526 /* Parts of a mime attachent */
1527 RegisterNamespace("MAIL:MIME:NAME", 0, 2, tmplput_MIME_Name, NULL, CTX_MIME_ATACH);
1528 RegisterNamespace("MAIL:MIME:FILENAME", 0, 2, tmplput_MIME_FileName, NULL, CTX_MIME_ATACH);
1529 RegisterNamespace("MAIL:MIME:PARTNUM", 0, 2, tmplput_MIME_PartNum, NULL, CTX_MIME_ATACH);
1530 RegisterNamespace("MAIL:MIME:MSGNUM", 0, 2, tmplput_MIME_MsgNum, NULL, CTX_MIME_ATACH);
1531 RegisterNamespace("MAIL:MIME:DISPOSITION", 0, 2, tmplput_MIME_Disposition, NULL, CTX_MIME_ATACH);
1532 RegisterNamespace("MAIL:MIME:CONTENTTYPE", 0, 2, tmplput_MIME_ContentType, NULL, CTX_MIME_ATACH);
1533 RegisterNamespace("MAIL:MIME:CHARSET", 0, 2, tmplput_MIME_Charset, NULL, CTX_MIME_ATACH);
1534 RegisterNamespace("MAIL:MIME:LENGTH", 0, 2, tmplput_MIME_Length, NULL, CTX_MIME_ATACH);
1535 RegisterNamespace("MAIL:MIME:DATA", 0, 2, tmplput_MIME_Data, NULL, CTX_MIME_ATACH);
1536 /* load the actual attachment into WC->attachments; no output!!! */
1537 RegisterNamespace("MAIL:MIME:LOADDATA", 0, 0, tmplput_MIME_LoadData, NULL, CTX_MIME_ATACH);
1539 /* iterate the WC->attachments; use the above tokens for their contents */
1540 RegisterIterator("MSG:ATTACHNAMES", 0, NULL, iterate_get_registered_Attachments,
1541 NULL, NULL, CTX_MIME_ATACH, CTX_NONE, IT_NOFLAG);
1543 RegisterNamespace("MSG:NATTACH", 0, 0, get_registered_Attachments_Count, NULL, CTX_NONE);
1545 /* mime renderers translate an attachment into webcit viewable html text */
1546 RegisterMimeRenderer(HKEY("message/rfc822"), render_MAIL, 0, 150);
1548 RegisterMimeRenderer(HKEY("text/calendar"), render_MIME_ICS, 1, 501);
1549 RegisterMimeRenderer(HKEY("application/ics"), render_MIME_ICS, 1, 500);
1551 RegisterMimeRenderer(HKEY("text/x-citadel-variformat"), render_MAIL_variformat, 1, 2);
1552 RegisterMimeRenderer(HKEY("text/plain"), render_MAIL_text_plain, 1, 3);
1553 RegisterMimeRenderer(HKEY("text"), render_MAIL_text_plain, 1, 1);
1554 RegisterMimeRenderer(HKEY("text/x-markdown"), render_MAIL_text_plain, 1, 1);
1555 RegisterMimeRenderer(HKEY("text/html"), render_MAIL_html, 1, 100);
1556 RegisterMimeRenderer(HKEY(""), render_MAIL_UNKNOWN, 0, 0);
1558 /* these headers are citserver replies to MSG4 and friends. one evaluator for each */
1559 RegisterMsgHdr(HKEY("nhdr"), examine_nhdr, 0);
1560 RegisterMsgHdr(HKEY("exti"), examine_exti, 0);
1561 RegisterMsgHdr(HKEY("type"), examine_type, 0);
1562 RegisterMsgHdr(HKEY("from"), examine_from, 0);
1563 RegisterMsgHdr(HKEY("subj"), examine_subj, 0);
1564 RegisterMsgHdr(HKEY("msgn"), examine_msgn, 0);
1565 RegisterMsgHdr(HKEY("wefw"), examine_wefw, 0);
1566 RegisterMsgHdr(HKEY("cccc"), examine_cccc, 0);
1567 RegisterMsgHdr(HKEY("rep2"), examine_replyto, 0);
1568 RegisterMsgHdr(HKEY("hnod"), examine_hnod, 0);
1569 RegisterMsgHdr(HKEY("room"), examine_room, 0);
1570 RegisterMsgHdr(HKEY("rfca"), examine_rfca, 0);
1571 RegisterMsgHdr(HKEY("node"), examine_node, 0);
1572 RegisterMsgHdr(HKEY("rcpt"), examine_rcpt, 0);
1573 RegisterMsgHdr(HKEY("nvto"), examine_nvto, 0);
1574 RegisterMsgHdr(HKEY("time"), examine_time, 0);
1575 RegisterMsgHdr(HKEY("part"), examine_mime_part, 0);
1576 RegisterMsgHdr(HKEY("text"), examine_text, 1);
1577 /* these are the content-type headers we get infront of a message; put it into the same hash since it doesn't clash. */
1578 RegisterMsgHdr(HKEY("X-Citadel-MSG4-Partnum"), examine_msg4_partnum, 0);
1579 RegisterMsgHdr(HKEY("Content-type"), examine_content_type, 0);
1580 RegisterMsgHdr(HKEY("Content-length"), examine_content_lengh, 0);
1581 RegisterMsgHdr(HKEY("Content-transfer-encoding"), examine_content_encoding, 0); /* do we care? */
1582 RegisterMsgHdr(HKEY("charset"), examine_charset, 0);
1584 /* Don't care about these... */
1585 RegisterMsgHdr(HKEY("pref"), examine_pref, 0);
1586 RegisterMsgHdr(HKEY("suff"), examine_suff, 0);
1587 RegisterMsgHdr(HKEY("path"), examine_path, 0);
1591 InitModule2_MSGRENDERERS
1594 /* and finalize the anouncement to the server... */
1598 ServerStartModule_MSGRENDERERS
1601 DflMsgHeaderHandler = NewHash (1, FourHash);
1602 DflEnumMsgHeaderHandler = NewHash (1, Flathash);
1603 MsgHeaderHandler = NewHash(1, NULL);
1604 MimeRenderHandler = NewHash(1, NULL);
1605 ReadLoopHandler = NewHash(1, NULL);
1606 FillMsgKeyLookupTable();
1610 ServerShutdownModule_MSGRENDERERS
1613 DeleteHash(&DflMsgHeaderHandler);
1614 DeleteHash(&DflEnumMsgHeaderHandler);
1617 DeleteHash(&MsgHeaderHandler);
1618 DeleteHash(&MimeRenderHandler);
1619 DeleteHash(&ReadLoopHandler);
1620 DeleteHash(&msgKeyLookup);
1624 SessionDestroyModule_MSGRENDERERS
1627 DeleteHash(&sess->attachments);
1628 FreeStrBuf(&sess->ConvertBuf1);
1629 FreeStrBuf(&sess->ConvertBuf2);