2 * Functions which manage expire policy for rooms
3 * Copyright (c) 1987-2015 by the citadel.org team
5 * This program is open source software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License, version 3.
8 * This program is distributed in the hope that it will be useful,
9 * but WITHOUT ANY WARRANTY; without even the implied warranty of
10 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
11 * GNU General Public License for more details.
21 #if TIME_WITH_SYS_TIME
22 # include <sys/time.h>
26 # include <sys/time.h>
33 #include <libcitadel.h>
39 #include "sysdep_decls.h"
42 #include "citserver.h"
43 #include "ctdl_module.h"
47 * Retrieve the applicable expire policy for a specific room
49 void GetExpirePolicy(struct ExpirePolicy *epbuf, struct ctdlroom *qrbuf) {
52 /* If the room has its own policy, return it */
53 if (qrbuf->QRep.expire_mode != 0) {
54 memcpy(epbuf, &qrbuf->QRep, sizeof(struct ExpirePolicy));
58 /* (non-mailbox rooms)
59 * If the floor has its own policy, return it
61 if ( (qrbuf->QRflags & QR_MAILBOX) == 0) {
62 fl = CtdlGetCachedFloor(qrbuf->QRfloor);
63 if (fl->f_ep.expire_mode != 0) {
64 memcpy(epbuf, &fl->f_ep, sizeof(struct ExpirePolicy));
70 * If there is a default policy for mailbox rooms, return it
72 if (qrbuf->QRflags & QR_MAILBOX) {
73 if (CtdlGetConfigInt("c_mbxep_mode") != 0) {
74 epbuf->expire_mode = CtdlGetConfigInt("c_mbxep_mode");
75 epbuf->expire_value = CtdlGetConfigInt("c_mbxep_value");
80 /* Otherwise, fall back on the system default */
81 epbuf->expire_mode = CtdlGetConfigInt("c_ep_mode");
82 epbuf->expire_value = CtdlGetConfigInt("c_ep_value");
89 void cmd_gpex(char *argbuf) {
90 struct ExpirePolicy exp;
94 memset(&exp, 0, sizeof(struct ExpirePolicy));
95 extract_token(which, argbuf, 0, '|', sizeof which);
96 if (!strcasecmp(which, strof(roompolicy)) || !strcasecmp(which, "room")) {
97 memcpy(&exp, &CC->room.QRep, sizeof(struct ExpirePolicy));
99 else if (!strcasecmp(which, strof(floorpolicy)) || !strcasecmp(which, "floor")) {
100 fl = CtdlGetCachedFloor(CC->room.QRfloor);
101 memcpy(&exp, &fl->f_ep, sizeof(struct ExpirePolicy));
103 else if (!strcasecmp(which, strof(mailboxespolicy)) || !strcasecmp(which, "mailboxes")) {
104 exp.expire_mode = CtdlGetConfigInt("c_mbxep_mode");
105 exp.expire_value = CtdlGetConfigInt("c_mbxep_value");
107 else if (!strcasecmp(which, strof(sitepolicy)) || !strcasecmp(which, "site")) {
108 exp.expire_mode = CtdlGetConfigInt("c_ep_mode");
109 exp.expire_value = CtdlGetConfigInt("c_ep_value");
112 cprintf("%d Invalid keyword \"%s\"\n", ERROR + ILLEGAL_VALUE, which);
116 cprintf("%d %d|%d\n", CIT_OK, exp.expire_mode, exp.expire_value);
123 void cmd_spex(char *argbuf) {
124 struct ExpirePolicy exp;
128 memset(&exp, 0, sizeof(struct ExpirePolicy));
129 extract_token(which, argbuf, 0, '|', sizeof which);
130 exp.expire_mode = extract_int(argbuf, 1);
131 exp.expire_value = extract_int(argbuf, 2);
133 if ((exp.expire_mode < 0) || (exp.expire_mode > 3)) {
134 cprintf("%d Invalid policy.\n", ERROR + ILLEGAL_VALUE);
138 if ((!strcasecmp(which, strof(roompolicy))) || (!strcasecmp(which, "room")))
140 if (!is_room_aide()) {
141 cprintf("%d Higher access required.\n", ERROR + HIGHER_ACCESS_REQUIRED);
144 CtdlGetRoomLock(&CC->room, CC->room.QRname);
145 memcpy(&CC->room.QRep, &exp, sizeof(struct ExpirePolicy));
146 CtdlPutRoomLock(&CC->room);
147 cprintf("%d Room expire policy for '%s' has been updated.\n", CIT_OK, CC->room.QRname);
148 syslog(LOG_DEBUG, "Room: %s , Policy: %d , Value: %d",
156 if (CC->user.axlevel < AxAideU) {
157 cprintf("%d Higher access required.\n", ERROR + HIGHER_ACCESS_REQUIRED);
161 if ((!strcasecmp(which, strof(floorpolicy))) || (!strcasecmp(which, "floor")))
163 lgetfloor(&flbuf, CC->room.QRfloor);
164 memcpy(&flbuf.f_ep, &exp, sizeof(struct ExpirePolicy));
165 lputfloor(&flbuf, CC->room.QRfloor);
166 cprintf("%d Floor expire policy has been updated.\n", CIT_OK);
170 else if ((!strcasecmp(which, strof(mailboxespolicy))) || (!strcasecmp(which, "mailboxes")))
172 CtdlSetConfigInt("c_mbxep_mode", exp.expire_mode);
173 CtdlSetConfigInt("c_mbxep_value", exp.expire_value);
174 cprintf("%d Default expire policy for mailboxes set.\n", CIT_OK);
178 else if ((!strcasecmp(which, strof(sitepolicy))) || (!strcasecmp(which, "site")))
180 if (exp.expire_mode == EXPIRE_NEXTLEVEL) {
181 cprintf("%d Invalid policy (no higher level)\n", ERROR + ILLEGAL_VALUE);
184 CtdlSetConfigInt("c_ep_mode", exp.expire_mode);
185 CtdlSetConfigInt("c_ep_value", exp.expire_value);
186 cprintf("%d Site expire policy has been updated.\n", CIT_OK);
190 cprintf("%d Invalid keyword '%s'\n", ERROR + ILLEGAL_VALUE, which);