"Fossies" - the Fresh Open Source Software Archive

Member "citadel/modules/expire/expire_policy.c" (5 Jun 2021, 5292 Bytes) of package /linux/www/citadel.tar.gz:


As a special service "Fossies" has tried to format the requested source page into HTML format using (guessed) C and C++ source code syntax highlighting (style: standard) with prefixed line numbers and code folding option. Alternatively you can here view or download the uninterpreted source code file. For more information about "expire_policy.c" see the Fossies "Dox" file reference documentation and the last Fossies "Diffs" side-by-side code changes report: 9.01_vs_902.

    1 /* 
    2  * Functions which manage expire policy for rooms
    3  * Copyright (c) 1987-2015 by the citadel.org team
    4  *
    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.
    7  *
    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.
   12  */
   13 
   14 #include "sysdep.h"
   15 #include <stdlib.h>
   16 #include <unistd.h>
   17 #include <stdio.h>
   18 #include <sys/stat.h>
   19 #include <string.h>
   20 
   21 #include <time.h>
   22 #include <limits.h>
   23 #include <libcitadel.h>
   24 #include "citadel.h"
   25 #include "server.h"
   26 #include "database.h"
   27 #include "config.h"
   28 #include "room_ops.h"
   29 #include "sysdep_decls.h"
   30 #include "support.h"
   31 #include "msgbase.h"
   32 #include "citserver.h"
   33 #include "ctdl_module.h"
   34 #include "user_ops.h"
   35 
   36 /*
   37  * Retrieve the applicable expire policy for a specific room
   38  */
   39 void GetExpirePolicy(struct ExpirePolicy *epbuf, struct ctdlroom *qrbuf) {
   40     struct floor *fl;
   41 
   42     /* If the room has its own policy, return it */ 
   43     if (qrbuf->QRep.expire_mode != 0) {
   44         memcpy(epbuf, &qrbuf->QRep, sizeof(struct ExpirePolicy));
   45         return;
   46     }
   47 
   48     /* (non-mailbox rooms)
   49      * If the floor has its own policy, return it
   50      */
   51     if ( (qrbuf->QRflags & QR_MAILBOX) == 0) {
   52         fl = CtdlGetCachedFloor(qrbuf->QRfloor);
   53         if (fl->f_ep.expire_mode != 0) {
   54             memcpy(epbuf, &fl->f_ep, sizeof(struct ExpirePolicy));
   55             return;
   56         }
   57     }
   58 
   59     /* (Mailbox rooms)
   60      * If there is a default policy for mailbox rooms, return it
   61      */
   62     if (qrbuf->QRflags & QR_MAILBOX) {
   63         if (CtdlGetConfigInt("c_mbxep_mode") != 0) {
   64             epbuf->expire_mode = CtdlGetConfigInt("c_mbxep_mode");
   65             epbuf->expire_value = CtdlGetConfigInt("c_mbxep_value");
   66             return;
   67         }
   68     }
   69 
   70     /* Otherwise, fall back on the system default */
   71     epbuf->expire_mode = CtdlGetConfigInt("c_ep_mode");
   72     epbuf->expire_value = CtdlGetConfigInt("c_ep_value");
   73 }
   74 
   75 
   76 /*
   77  * Get Policy EXpire
   78  */
   79 void cmd_gpex(char *argbuf) {
   80     struct ExpirePolicy exp;
   81     struct floor *fl;
   82     char which[128];
   83 
   84     memset(&exp, 0, sizeof(struct ExpirePolicy));
   85     extract_token(which, argbuf, 0, '|', sizeof which);
   86     if (!strcasecmp(which, strof(roompolicy)) || !strcasecmp(which, "room")) {
   87         memcpy(&exp, &CC->room.QRep, sizeof(struct ExpirePolicy));
   88     }
   89     else if (!strcasecmp(which, strof(floorpolicy)) || !strcasecmp(which, "floor")) {
   90         fl = CtdlGetCachedFloor(CC->room.QRfloor);
   91         memcpy(&exp, &fl->f_ep, sizeof(struct ExpirePolicy));
   92     }
   93     else if (!strcasecmp(which, strof(mailboxespolicy)) || !strcasecmp(which, "mailboxes")) {
   94         exp.expire_mode = CtdlGetConfigInt("c_mbxep_mode");
   95         exp.expire_value = CtdlGetConfigInt("c_mbxep_value");
   96     }
   97     else if (!strcasecmp(which, strof(sitepolicy)) || !strcasecmp(which, "site")) {
   98         exp.expire_mode = CtdlGetConfigInt("c_ep_mode");
   99         exp.expire_value = CtdlGetConfigInt("c_ep_value");
  100     }
  101     else {
  102         cprintf("%d Invalid keyword \"%s\"\n", ERROR + ILLEGAL_VALUE, which);
  103         return;
  104     }
  105 
  106     cprintf("%d %d|%d\n", CIT_OK, exp.expire_mode, exp.expire_value);
  107 }
  108 
  109 
  110 /*
  111  * Set Policy EXpire
  112  */
  113 void cmd_spex(char *argbuf) {
  114     struct ExpirePolicy exp;
  115     struct floor flbuf;
  116     char which[128];
  117 
  118     memset(&exp, 0, sizeof(struct ExpirePolicy));
  119     extract_token(which, argbuf, 0, '|', sizeof which);
  120     exp.expire_mode = extract_int(argbuf, 1);
  121     exp.expire_value = extract_int(argbuf, 2);
  122 
  123     if ((exp.expire_mode < 0) || (exp.expire_mode > 3)) {
  124         cprintf("%d Invalid policy.\n", ERROR + ILLEGAL_VALUE);
  125         return;
  126     }
  127 
  128     if ((!strcasecmp(which, strof(roompolicy))) || (!strcasecmp(which, "room")))
  129     {
  130         if (!is_room_aide()) {
  131             cprintf("%d Higher access required.\n", ERROR + HIGHER_ACCESS_REQUIRED);
  132             return;
  133         }
  134         CtdlGetRoomLock(&CC->room, CC->room.QRname);
  135         memcpy(&CC->room.QRep, &exp, sizeof(struct ExpirePolicy));
  136         CtdlPutRoomLock(&CC->room);
  137         cprintf("%d Room expire policy for '%s' has been updated.\n", CIT_OK, CC->room.QRname);
  138         syslog(LOG_DEBUG, "Room: %s , Policy: %d , Value: %d",
  139             CC->room.QRname,
  140             exp.expire_mode,
  141             exp.expire_value
  142         );
  143         return;
  144     }
  145 
  146     if (CC->user.axlevel < AxAideU) {
  147         cprintf("%d Higher access required.\n", ERROR + HIGHER_ACCESS_REQUIRED);
  148         return;
  149     }
  150 
  151     if ((!strcasecmp(which, strof(floorpolicy))) || (!strcasecmp(which, "floor")))
  152     {
  153         lgetfloor(&flbuf, CC->room.QRfloor);
  154         memcpy(&flbuf.f_ep, &exp, sizeof(struct ExpirePolicy));
  155         lputfloor(&flbuf, CC->room.QRfloor);
  156         cprintf("%d Floor expire policy has been updated.\n", CIT_OK);
  157         return;
  158     }
  159 
  160     else if ((!strcasecmp(which, strof(mailboxespolicy))) || (!strcasecmp(which, "mailboxes")))
  161     {
  162         CtdlSetConfigInt("c_mbxep_mode", exp.expire_mode);
  163         CtdlSetConfigInt("c_mbxep_value", exp.expire_value);
  164         cprintf("%d Default expire policy for mailboxes set.\n", CIT_OK);
  165         return;
  166     }
  167 
  168     else if ((!strcasecmp(which, strof(sitepolicy))) || (!strcasecmp(which, "site")))
  169     {
  170         if (exp.expire_mode == EXPIRE_NEXTLEVEL) {
  171             cprintf("%d Invalid policy (no higher level)\n", ERROR + ILLEGAL_VALUE);
  172             return;
  173         }
  174         CtdlSetConfigInt("c_ep_mode", exp.expire_mode);
  175         CtdlSetConfigInt("c_ep_value", exp.expire_value);
  176         cprintf("%d Site expire policy has been updated.\n", CIT_OK);
  177         return;
  178     }
  179 
  180     cprintf("%d Invalid keyword '%s'\n", ERROR + ILLEGAL_VALUE, which);
  181 }