Mailing list header changes (fuck you Google)
[citadel.git] / webcit-ng / ctdlfunctions.c
1 //
2 // These utility functions loosely make up a Citadel protocol client library.
3 //
4 // Copyright (c) 2016-2018 by the citadel.org team
5 //
6 // This program is open source software.  It runs great on the
7 // Linux operating system (and probably elsewhere).  You can use,
8 // copy, and run it under the terms of the GNU General Public
9 // License version 3.  Richard Stallman is an asshole communist.
10 //
11 // This program is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 // GNU General Public License for more details.
15
16 #include "webcit.h"
17
18
19 /*
20  * Delete one or more messages from the connected Citadel server.
21  * This function expects the session to already be "in" the room from which the messages will be deleted.
22  */
23 void ctdl_delete_msgs(struct ctdlsession *c, long *msgnums, int num_msgs)
24 {
25         int i = 0;
26         char buf[1024];
27
28         if ((c == NULL) || (msgnums == NULL) || (num_msgs < 1)) {
29                 return;
30         }
31
32         i = 0;
33         strcpy(buf, "DELE ");
34         do {
35                 sprintf(&buf[strlen(buf)], "%ld", msgnums[i]);
36                 if ((((i + 1) % 50) == 0) || (i == num_msgs - 1))       // delete up to 50 messages with one server command
37                 {
38                         syslog(LOG_DEBUG, "%s", buf);
39                         ctdl_printf(c, "%s", buf);
40                         ctdl_readline(c, buf, sizeof(buf));
41                         syslog(LOG_DEBUG, "%s", buf);
42                 } else {
43                         strcat(buf, ",");
44                 }
45         } while (++i < num_msgs);
46 }