X-Git-Url: https://code.citadel.org/?p=citadel.git;a=blobdiff_plain;f=citadel%2Fmodules%2Fexpire%2Fexpire_policy.c;fp=citadel%2Fmodules%2Fexpire%2Fexpire_policy.c;h=260a49830829a064ea2d2b8c7a15016cc47f8dca;hp=0000000000000000000000000000000000000000;hb=0eea6dcc234e0f524bbf2a1d909455d41ed02314;hpb=d0e91c8de4c97de9bed71636c93ba7929ca6fa93

diff --git a/citadel/modules/expire/expire_policy.c b/citadel/modules/expire/expire_policy.c
new file mode 100644
index 000000000..260a49830
--- /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;
+	}
+
+}
+