* move policy.c into modules/expire/expire_policy.c, since it just controls this.

[citadel.git] / citadel / modules / expire / expire_policy.c

diff --git a/citadel/modules/expire/expire_policy.c b/citadel/modules/expire/expire_policy.c
new file mode 100644 (file)
index 0000000..260a498
--- /dev/null
+++ b/citadel/modules/expire/expire_policy.c
@@ -0,0 +1,181 @@
+/* 
+ * $Id$
+ *
+ * Functions which manage policy for rooms (such as message expiry)
+ */
+
+#include "sysdep.h"
+#include <stdlib.h>
+#include <unistd.h>
+#include <stdio.h>
+#include <sys/stat.h>
+#include <string.h>
+
+#if TIME_WITH_SYS_TIME
+# include <sys/time.h>
+# include <time.h>
+#else
+# if HAVE_SYS_TIME_H
+#  include <sys/time.h>
+# else
+#  include <time.h>
+# endif
+#endif
+
+#include <limits.h>
+#include <libcitadel.h>
+#include "citadel.h"
+#include "server.h"
+#include "database.h"
+#include "config.h"
+#include "room_ops.h"
+#include "sysdep_decls.h"
+#include "support.h"
+#include "user_ops.h"
+#include "msgbase.h"
+#include "citserver.h"
+
+#include "ctdl_module.h"
+
+/*
+ * Retrieve the applicable expire policy for a specific room
+ */
+void GetExpirePolicy(struct ExpirePolicy *epbuf, struct ctdlroom *qrbuf) {
+       struct floor *fl;
+
+       /* If the room has its own policy, return it */ 
+       if (qrbuf->QRep.expire_mode != 0) {
+               memcpy(epbuf, &qrbuf->QRep, sizeof(struct ExpirePolicy));
+               return;
+       }
+
+       /* (non-mailbox rooms)
+        * If the floor has its own policy, return it
+        */
+       if ( (qrbuf->QRflags & QR_MAILBOX) == 0) {
+               fl = CtdlGetCachedFloor(qrbuf->QRfloor);
+               if (fl->f_ep.expire_mode != 0) {
+                       memcpy(epbuf, &fl->f_ep, sizeof(struct ExpirePolicy));
+                       return;
+               }
+       }
+
+       /* (Mailbox rooms)
+        * If there is a default policy for mailbox rooms, return it
+        */
+       if (qrbuf->QRflags & QR_MAILBOX) {
+               if (config.c_mbxep.expire_mode != 0) {
+                       memcpy(epbuf, &config.c_mbxep,
+                               sizeof(struct ExpirePolicy));
+                       return;
+               }
+       }
+
+       /* Otherwise, fall back on the system default */
+       memcpy(epbuf, &config.c_ep, sizeof(struct ExpirePolicy));
+}
+
+
+/*
+ * Get Policy EXpire
+ */
+void cmd_gpex(char *argbuf) {
+       struct ExpirePolicy exp;
+       struct floor *fl;
+       char which[128];
+
+       extract_token(which, argbuf, 0, '|', sizeof which);
+       if (!strcasecmp(which, strof(room))) {
+               memcpy(&exp, &CC->room.QRep, sizeof(struct ExpirePolicy));
+       }
+       else if (!strcasecmp(which, strof(floorpolicy))) {
+               fl = CtdlGetCachedFloor(CC->room.QRfloor);
+               memcpy(&exp, &fl->f_ep, sizeof(struct ExpirePolicy));
+       }
+       else if (!strcasecmp(which, strof(mailboxespolicy))) {
+               memcpy(&exp, &config.c_mbxep, sizeof(struct ExpirePolicy));
+       }
+       else if (!strcasecmp(which, strof(sitepolicy))) {
+               memcpy(&exp, &config.c_ep, sizeof(struct ExpirePolicy));
+       }
+       else {
+               cprintf("%d Invalid keyword \"%s\"\n", ERROR + ILLEGAL_VALUE, which);
+               return;
+       }
+
+       cprintf("%d %d|%d\n", CIT_OK, exp.expire_mode, exp.expire_value);
+}
+
+
+/*
+ * Set Policy EXpire
+ */
+void cmd_spex(char *argbuf) {
+       struct ExpirePolicy exp;
+       struct floor flbuf;
+       char which[128];
+
+       memset(&exp, 0, sizeof(struct ExpirePolicy));
+       extract_token(which, argbuf, 0, '|', sizeof which);
+       exp.expire_mode = extract_int(argbuf, 1);
+       exp.expire_value = extract_int(argbuf, 2);
+
+       if ((exp.expire_mode < 0) || (exp.expire_mode > 3)) {
+               cprintf("%d Invalid policy.\n", ERROR + ILLEGAL_VALUE);
+               return;
+       }
+
+       if (!strcasecmp(which, "room")) {
+               if (!is_room_aide()) {
+                       cprintf("%d Higher access required.\n",
+                               ERROR + HIGHER_ACCESS_REQUIRED);
+                       return;
+               }
+               CtdlGetRoomLock(&CC->room, CC->room.QRname);
+               memcpy(&CC->room.QRep, &exp, sizeof(struct ExpirePolicy));
+               CtdlPutRoomLock(&CC->room);
+               cprintf("%d Room expire policy has been updated.\n", CIT_OK);
+               return;
+       }
+
+       if (CC->user.axlevel < AxAideU) {
+               cprintf("%d Higher access required.\n",
+                       ERROR + HIGHER_ACCESS_REQUIRED);
+               return;
+       }
+
+       if (!strcasecmp(which, strof(floorpolicy))) {
+               lgetfloor(&flbuf, CC->room.QRfloor);
+               memcpy(&flbuf.f_ep, &exp, sizeof(struct ExpirePolicy));
+               lputfloor(&flbuf, CC->room.QRfloor);
+               cprintf("%d Floor expire policy has been updated.\n", CIT_OK);
+               return;
+       }
+
+       else if (!strcasecmp(which, strof(mailboxespolicy))) {
+               memcpy(&config.c_mbxep, &exp, sizeof(struct ExpirePolicy));
+               put_config();
+               cprintf("%d Default expire policy for mailboxes set.\n",
+                       CIT_OK);
+               return;
+       }
+
+       else if (!strcasecmp(which, strof(sitepolicy))) {
+               if (exp.expire_mode == EXPIRE_NEXTLEVEL) {
+                       cprintf("%d Invalid policy (no higher level)\n",
+                               ERROR + ILLEGAL_VALUE);
+                       return;
+               }
+               memcpy(&config.c_ep, &exp, sizeof(struct ExpirePolicy));
+               put_config();
+               cprintf("%d Site expire policy has been updated.\n", CIT_OK);
+               return;
+       }
+
+       else {
+               cprintf("%d Invalid keyword \"%s\"\n", ERROR + ILLEGAL_VALUE, which);
+               return;
+       }
+
+}
+