Implemnet new message listing mode, that allows to specify which headers to send
[citadel.git] / citadel / modules / ctdlproto / serv_messages.c
index 2d3208a221640a8c16f6ae0ce755e27de8c791df..ff03d2a6ea55ec40f7dfe70ecc2142f6742e1617 100644 (file)
@@ -1,7 +1,7 @@
 /*
  * represent messages to the citadel clients
  *
- * Copyright (c) 1987-2012 by the citadel.org team
+ * Copyright (c) 1987-2015 by the citadel.org team
  *
  * This program is open source software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License version 3.
 #include "internet_addressing.h"
 #include "user_ops.h"
 #include "room_ops.h"
+#include "config.h"
 
 extern char *msgkeys[];
 
 
-
 /*
  * Back end for the MSGS command: output message number only.
  */
@@ -34,7 +34,6 @@ void simple_listing(long msgnum, void *userdata)
 }
 
 
-
 /*
  * Back end for the MSGS command: output header summary.
  */
@@ -42,7 +41,7 @@ void headers_listing(long msgnum, void *userdata)
 {
        struct CtdlMessage *msg;
 
-       msg = CtdlFetchMessage(msgnum, 0);
+       msg = CtdlFetchMessage(msgnum, 0, 1);
        if (msg == NULL) {
                cprintf("%ld|0|||||\n", msgnum);
                return;
@@ -59,6 +58,44 @@ void headers_listing(long msgnum, void *userdata)
        CM_Free(msg);
 }
 
+typedef struct _msg_filter{
+       HashList *Filter;
+       HashPos *p;
+       StrBuf *buffer;
+}msg_filter;
+
+void headers_brief_filter(long msgnum, void *userdata)
+{
+       long i, l;
+       struct CtdlMessage *msg;
+       msg_filter *flt = (msg_filter*) userdata;
+
+       l = GetCount(flt->Filter);
+       msg = CtdlFetchMessage(msgnum, 0, 1);
+       StrBufPrintf(flt->buffer, "%ld", msgnum);
+       if (msg == NULL) {
+               for (i = 0; i < l; i++) {
+                       StrBufAppendBufPlain(flt->buffer, HKEY("|"), 0);
+               }
+       }
+       else {
+               const char *k;
+               long len;
+               void *v;
+               RewindHashPos(flt->Filter, flt->p, 0);
+               while (GetNextHashPos(flt->Filter, flt->p, &len, &k, &v)) {
+                       eMsgField f = (eMsgField) v;
+                       
+                       StrBufAppendBufPlain(flt->buffer, HKEY("|"), 0);
+                       if (!CM_IsEmpty(msg, f)) {
+                               StrBufAppendBufPlain(flt->buffer, CM_KEY(msg, f), 0);
+                       }
+               }
+       }
+       StrBufAppendBufPlain(flt->buffer, HKEY("\n"), 0);
+       cputbuf(flt->buffer);
+}
+
 /*
  * Back end for the MSGS command: output EUID header.
  */
@@ -66,7 +103,7 @@ void headers_euid(long msgnum, void *userdata)
 {
        struct CtdlMessage *msg;
 
-       msg = CtdlFetchMessage(msgnum, 0);
+       msg = CtdlFetchMessage(msgnum, 0, 1);
        if (msg == NULL) {
                cprintf("%ld||\n", msgnum);
                return;
@@ -93,9 +130,9 @@ void cmd_msgs(char *cmdbuf)
        char tfield[256];
        char tvalue[256];
        int cm_ref = 0;
-       int i;
        int with_template = 0;
        struct CtdlMessage *template = NULL;
+        msg_filter filt;
        char search_string[1024];
        ForEachMsgCallback CallBack;
 
@@ -117,6 +154,10 @@ void cmd_msgs(char *cmdbuf)
        case MSG_HDRS_EUID:
                CallBack = headers_euid;
                break;
+       case MSG_HDRS_BRIEFFILTER:
+               with_template = 2;
+               CallBack = headers_brief_filter;
+               break;
        }
 
        strcat(which, "   ");
@@ -137,13 +178,14 @@ void cmd_msgs(char *cmdbuf)
        else
                mode = MSGS_ALL;
 
-       if ( (mode == MSGS_SEARCH) && (!config.c_enable_fulltext) ) {
+       if ( (mode == MSGS_SEARCH) && (!CtdlGetConfigInt("c_enable_fulltext")) ) {
                cprintf("%d Full text index is not enabled on this server.\n",
                        ERROR + CMD_NOT_SUPPORTED);
                return;
        }
 
-       if (with_template) {
+       if (with_template == 1) {
+               memset(buf, 0, 5);
                unbuffer_output();
                cprintf("%d Send template then receive message list\n",
                        START_CHAT_MODE);
@@ -154,29 +196,64 @@ void cmd_msgs(char *cmdbuf)
                template->cm_anon_type = MES_NORMAL;
 
                while(client_getln(buf, sizeof buf) >= 0 && strcmp(buf,"000")) {
+                       eMsgField f;
                        long tValueLen;
-                       extract_token(tfield, buf, 0, '|', sizeof tfield);
-                       tValueLen = extract_token(tvalue, buf, 1, '|', sizeof tvalue);
-                       for (i='A'; i<='Z'; ++i) if (msgkeys[i]!=NULL) {
-                               if (!strcasecmp(tfield, msgkeys[i])) {
-                                       CM_SetField(template, i, tvalue, tValueLen);
+
+                       tValueLen = extract_token(tfield, buf, 0, '|', sizeof tfield);
+                       if ((tValueLen == 4) && GetFieldFromMnemonic(&f, tfield))
+                       {
+                               tValueLen = extract_token(tvalue, buf, 1, '|', sizeof tvalue);
+                               if (tValueLen >= 0) {
+                                       CM_SetField(template, f, tvalue, tValueLen);
                                }
                        }
                }
                buffer_output();
        }
+       else if (with_template == 2) {
+               long i = 0;
+               memset(buf, 0, 5);
+               filt.Filter = NewHash(1, lFlathash);
+               filt.buffer = NewStrBufPlain(NULL, 1024);
+               while(client_getln(buf, sizeof buf) >= 0 && strcmp(buf,"000")) {
+                       eMsgField f;
+       
+                       if (GetFieldFromMnemonic(&f, buf))
+                       {
+                               Put(filt.Filter, LKEY(i), (void*)f, reference_free_handler);
+                               i++;
+                       }
+               }
+               filt.p = GetNewHashPos(filt.Filter, 0);
+               buffer_output();
+       }
        else {
                cprintf("%d  \n", LISTING_FOLLOWS);
        }
 
-       CtdlForEachMessage(mode,
-                          ( (mode == MSGS_SEARCH) ? 0 : cm_ref ),
-                          ( (mode == MSGS_SEARCH) ? search_string : NULL ),
-                          NULL,
-                          template,
-                          CallBack,
-                          NULL);
-       if (template != NULL) CM_Free(template);
+       if (with_template < 2) {
+               CtdlForEachMessage(mode,
+                                  ( (mode == MSGS_SEARCH) ? 0 : cm_ref ),
+                                  ( (mode == MSGS_SEARCH) ? search_string : NULL ),
+                                  NULL,
+                                  template,
+                                  CallBack,
+                                  NULL);
+               if (template != NULL) CM_Free(template);
+       }
+       else {
+               CtdlForEachMessage(mode,
+                                  ( (mode == MSGS_SEARCH) ? 0 : cm_ref ),
+                                  ( (mode == MSGS_SEARCH) ? search_string : NULL ),
+                                  NULL,
+                                  NULL,
+                                  CallBack,
+                                  &filt);
+               DeleteHashPos(&filt.p);
+               DeleteHash(&filt.Filter);
+               FreeStrBuf(&filt.buffer);
+               
+       }
        cprintf("000\n");
 }
 
@@ -228,7 +305,7 @@ void cmd_msg3(char *cmdbuf)
        }
 
        msgnum = extract_long(cmdbuf, 0);
-       msg = CtdlFetchMessage(msgnum, 1);
+       msg = CtdlFetchMessage(msgnum, 1, 1);
        if (msg == NULL) {
                cprintf("%d Message %ld not found.\n", 
                        ERROR + MESSAGE_NOT_FOUND, msgnum);
@@ -599,7 +676,7 @@ void cmd_ent0(char *entargs)
        }
        free(all_recps);
 
-       if ((valid != NULL) && (valid->num_room == 1))
+       if ((valid != NULL) && (valid->num_room == 1) && !IsEmptyStr(valid->recp_orgroom))
        {
                /* posting into an ML room? set the envelope from 
                 * to the actual mail address so others get a valid