+/*
+ * $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>
-#include <pthread.h>
-#include <time.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 "support.h"
#include "user_ops.h"
#include "msgbase.h"
-#include "serv_chat.h"
#include "citserver.h"
+#include "ctdl_module.h"
/*
* Retrieve the applicable expire policy for a specific room
*/
-void GetExpirePolicy(struct ExpirePolicy *epbuf, struct quickroom *qrbuf) {
- struct floor flbuf;
+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;
}
+ }
- /* Otherwise, if the floor has its own policy, return it */
- getfloor(&flbuf, qrbuf->QRfloor);
- if (flbuf.f_ep.expire_mode != 0) {
- memcpy(epbuf, &flbuf.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, "room")) {
+ memcpy(&exp, &CC->room.QRep, sizeof(struct ExpirePolicy));
+ }
+ else if (!strcasecmp(which, "floor")) {
+ fl = CtdlGetCachedFloor(CC->room.QRfloor);
+ memcpy(&exp, &fl->f_ep, sizeof(struct ExpirePolicy));
+ }
+ else if (!strcasecmp(which, "mailboxes")) {
+ memcpy(&exp, &config.c_mbxep, sizeof(struct ExpirePolicy));
+ }
+ else if (!strcasecmp(which, "site")) {
+ 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 < 6) {
+ cprintf("%d Higher access required.\n",
+ ERROR + HIGHER_ACCESS_REQUIRED);
+ return;
+ }
+
+ if (!strcasecmp(which, "floor")) {
+ 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, "mailboxes")) {
+ 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, "site")) {
+ 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;
+ }
+
+}
+
+/*****************************************************************************/
+/* MODULE INITIALIZATION STUFF */
+/*****************************************************************************/
+CTDL_MODULE_INIT(policy)
+{
+ CtdlRegisterProtoHook(cmd_gpex, "GPEX", "Autoconverted. TODO: document me.");
+ CtdlRegisterProtoHook(cmd_spex, "SPEX", "Autoconverted. TODO: document me.");
+ /* return our Subversion id for the Log */
+ return "$Id$";
+}