2 * Message journaling functions.
11 #if TIME_WITH_SYS_TIME
12 # include <sys/time.h>
16 # include <sys/time.h>
29 #include <libcitadel.h>
35 #include "sysdep_decls.h"
36 #include "citserver.h"
43 #include "internet_addressing.h"
44 #include "serv_vcard.h" /* Needed for vcard_getuser and extract_inet_email_addrs */
45 #include "journaling.h"
47 #include "ctdl_module.h"
50 struct jnlq *jnlq = NULL; /* journal queue */
53 * Hand off a copy of a message to be journalized.
55 void JournalBackgroundSubmit(struct CtdlMessage *msg,
56 StrBuf *saved_rfc822_version,
57 struct recptypes *recps) {
59 struct jnlq *jptr = NULL;
61 /* Avoid double journaling! */
62 if (!CM_IsEmpty(msg, eJournal)) {
63 FreeStrBuf(&saved_rfc822_version);
67 jptr = (struct jnlq *)malloc(sizeof(struct jnlq));
69 FreeStrBuf(&saved_rfc822_version);
72 memset(jptr, 0, sizeof(struct jnlq));
73 if (recps != NULL) memcpy(&jptr->recps, recps, sizeof(struct recptypes));
74 if (!CM_IsEmpty(msg, eAuthor)) jptr->from = strdup(msg->cm_fields[eAuthor]);
75 if (!CM_IsEmpty(msg, eNodeName)) jptr->node = strdup(msg->cm_fields[eNodeName]);
76 if (!CM_IsEmpty(msg, erFc822Addr)) jptr->rfca = strdup(msg->cm_fields[erFc822Addr]);
77 if (!CM_IsEmpty(msg, eMsgSubject)) jptr->subj = strdup(msg->cm_fields[eMsgSubject]);
78 if (!CM_IsEmpty(msg, emessageId)) jptr->msgn = strdup(msg->cm_fields[emessageId]);
79 jptr->rfc822 = SmashStrBuf(&saved_rfc822_version);
81 /* Add to the queue */
82 begin_critical_section(S_JOURNAL_QUEUE);
85 end_critical_section(S_JOURNAL_QUEUE);
90 * Convert a local user name to an internet email address for the journal
94 * TODODRW: change this into a CtdlModuleDo type function that returns alternative address info
95 * for this local user. Something like CtdlModuleGoGetAddr(char *localuser, int type, char *alt_addr, size_t alt_addr_len)
96 * where type can be ADDR_EMAIL, ADDR_FIDO, ADDR_UUCP, ADDR_WEB, ADDR_POSTAL etc etc.
97 * This then begs the question of what should be returned. Is it wise to return a single char* using a comma as a
98 * delimiter? Or would it be better to return a linked list of some kind?
100 void local_to_inetemail(char *inetemail, char *localuser, size_t inetemail_len) {
104 strcpy(inetemail, "");
105 if (CtdlGetUser(&us, localuser) != 0) {
109 v = vcard_get_user(&us);
114 extract_inet_email_addrs(inetemail, inetemail_len, NULL, 0, v, 1);
120 * Called by JournalRunQueue() to send an individual message.
122 void JournalRunQueueMsg(struct jnlq *jmsg) {
124 struct CtdlMessage *journal_msg = NULL;
125 struct recptypes *journal_recps = NULL;
126 StrBuf *message_text = NULL;
127 char mime_boundary[256];
137 journal_recps = validate_recipients(config.c_journal_dest, NULL, 0);
138 if (journal_recps != NULL) {
140 if ( (journal_recps->num_local > 0)
141 || (journal_recps->num_internet > 0)
142 || (journal_recps->num_ignet > 0)
143 || (journal_recps->num_room > 0)
147 * Construct journal message.
148 * Note that we are transferring ownership of some of the memory here.
150 journal_msg = malloc(sizeof(struct CtdlMessage));
151 memset(journal_msg, 0, sizeof(struct CtdlMessage));
152 journal_msg->cm_magic = CTDLMESSAGE_MAGIC;
153 journal_msg->cm_anon_type = MES_NORMAL;
154 journal_msg->cm_format_type = FMT_RFC822;
155 CM_SetField(journal_msg, eJournal, HKEY("is journal"));
156 CM_SetField(journal_msg, eAuthor, jmsg->from, strlen(jmsg->from));
157 CM_SetField(journal_msg, eNodeName, jmsg->node, strlen(jmsg->node));
158 CM_SetField(journal_msg, erFc822Addr, jmsg->rfca, strlen(jmsg->rfca));
159 CM_SetField(journal_msg, eMsgSubject, jmsg->subj, strlen(jmsg->subj));
161 mblen = snprintf(mime_boundary, sizeof(mime_boundary),
162 "--Citadel-Journal-%08lx-%04x--", time(NULL), ++seq);
163 rfc822len = strlen(jmsg->rfc822);
165 message_text = NewStrBufPlain(NULL, rfc822len + sizeof(struct recptypes) + 1024);
168 * Here is where we begin to compose the journalized message.
169 * NOTE: the superfluous "Content-Identifer: ExJournalReport" header was
170 * requested by a paying customer, and yes, it is intentionally
171 * spelled wrong. Do NOT remove or change it.
173 StrBufAppendBufPlain(
175 HKEY("Content-type: multipart/mixed; boundary=\""), 0);
177 StrBufAppendBufPlain(message_text, mime_boundary, mblen, 0);
179 StrBufAppendBufPlain(
182 "Content-Identifer: ExJournalReport\r\n"
183 "MIME-Version: 1.0\r\n"
187 StrBufAppendBufPlain(message_text, mime_boundary, mblen, 0);
189 StrBufAppendBufPlain(
192 "Content-type: text/plain\r\n"
196 if (CM_IsEmpty(journal_msg, eAuthor))
197 StrBufAppendBufPlain(
199 journal_msg->cm_fields[eAuthor], -1, 0);
201 StrBufAppendBufPlain(
205 if (!CM_IsEmpty(journal_msg, erFc822Addr)) {
206 StrBufAppendPrintf(message_text, " <%s>",
207 journal_msg->cm_fields[erFc822Addr]);
209 else if (!CM_IsEmpty(journal_msg, eNodeName)) {
210 StrBufAppendPrintf(message_text, " @ %s",
211 journal_msg->cm_fields[eNodeName]);
214 StrBufAppendBufPlain(
218 StrBufAppendBufPlain(
221 "Message-ID: <"), 0);
223 StrBufAppendBufPlain(message_text, jmsg->msgn, -1, 0);
224 StrBufAppendBufPlain(
227 "Recipients:\r\n"), 0);
229 if (jmsg->recps.num_local > 0) {
230 for (i=0; i<jmsg->recps.num_local; ++i) {
231 extract_token(recipient, jmsg->recps.recp_local,
232 i, '|', sizeof recipient);
233 local_to_inetemail(inetemail, recipient, sizeof inetemail);
234 StrBufAppendPrintf(message_text,
235 " %s <%s>\r\n", recipient, inetemail);
239 if (jmsg->recps.num_ignet > 0) {
240 for (i=0; i<jmsg->recps.num_ignet; ++i) {
241 extract_token(recipient, jmsg->recps.recp_ignet,
242 i, '|', sizeof recipient);
243 StrBufAppendPrintf(message_text,
244 " %s\r\n", recipient);
248 if (jmsg->recps.num_internet > 0) {
249 for (i=0; i<jmsg->recps.num_internet; ++i) {
250 extract_token(recipient, jmsg->recps.recp_internet,
251 i, '|', sizeof recipient);
252 StrBufAppendPrintf(message_text,
253 " %s\r\n", recipient);
257 StrBufAppendBufPlain(
262 StrBufAppendBufPlain(message_text, mime_boundary, mblen, 0);
264 StrBufAppendBufPlain(
267 "Content-type: message/rfc822\r\n"
270 StrBufAppendBufPlain(message_text, jmsg->rfc822, rfc822len, 0);
272 StrBufAppendBufPlain(
276 StrBufAppendBufPlain(message_text, mime_boundary, mblen, 0);
278 StrBufAppendBufPlain(
282 CM_SetAsFieldSB(journal_msg, eMesageText, &message_text);
288 /* Submit journal message */
289 CtdlSubmitMsg(journal_msg, journal_recps, "", 0);
290 CM_Free(journal_msg);
293 free_recipients(journal_recps);
296 /* We are responsible for freeing this memory. */
304 void JournalRunQueue(void) {
305 struct jnlq *jptr = NULL;
307 while (jnlq != NULL) {
308 begin_critical_section(S_JOURNAL_QUEUE);
313 end_critical_section(S_JOURNAL_QUEUE);
314 JournalRunQueueMsg(jptr);