ircd/m_gline.c

   1 /*
   2  * IRC - Internet Relay Chat, ircd/m_gline.c
   3  * Copyright (C) 1990 Jarkko Oikarinen and
   4  *                    University of Oulu, Computing Center
   5  *
   6  * See file AUTHORS in IRC package for additional names of
   7  * the programmers.
   8  *
   9  * This program is free software; you can redistribute it and/or modify
  10  * it under the terms of the GNU General Public License as published by
  11  * the Free Software Foundation; either version 1, or (at your option)
  12  * any later version.
  13  *
  14  * This program is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  * GNU General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU General Public License
  20  * along with this program; if not, write to the Free Software
  21  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  22  *
  23  * $Id: m_gline.c 1904 2009-02-09 00:03:34Z entrope $
  24  */
  25
  26 /*
  27  * m_functions execute protocol messages on this server:
  28  *
  29  *    cptr    is always NON-NULL, pointing to a *LOCAL* client
  30  *            structure (with an open socket connected!). This
  31  *            identifies the physical socket where the message
  32  *            originated (or which caused the m_function to be
  33  *            executed--some m_functions may call others...).
  34  *
  35  *    sptr    is the source of the message, defined by the
  36  *            prefix part of the message if present. If not
  37  *            or prefix not found, then sptr==cptr.
  38  *
  39  *            (!IsServer(cptr)) => (cptr == sptr), because
  40  *            prefixes are taken *only* from servers...
  41  *
  42  *            (IsServer(cptr))
  43  *                    (sptr == cptr) => the message didn't
  44  *                    have the prefix.
  45  *
  46  *                    (sptr != cptr && IsServer(sptr) means
  47  *                    the prefix specified servername. (?)
  48  *
  49  *                    (sptr != cptr && !IsServer(sptr) means
  50  *                    that message originated from a remote
  51  *                    user (not local).
  52  *
  53  *            combining
  54  *
  55  *            (!IsServer(sptr)) means that, sptr can safely
  56  *            taken as defining the target structure of the
  57  *            message in this server.
  58  *
  59  *    *Always* true (if 'parse' and others are working correct):
  60  *
  61  *    1)      sptr->from == cptr  (note: cptr->from == cptr)
  62  *
  63  *    2)      MyConnect(sptr) <=> sptr == cptr (e.g. sptr
  64  *            *cannot* be a local connection, unless it's
  65  *            actually cptr!). [MyConnect(x) should probably
  66  *            be defined as (x == x->from) --msa ]
  67  *
  68  *    parc    number of variable parameter strings (if zero,
  69  *            parv is allowed to be NULL)
  70  *
  71  *    parv    a NULL terminated list of parameter pointers,
  72  *
  73  *                    parv[0], sender (prefix string), if not present
  74  *                            this points to an empty string.
  75  *                    parv[1]...parv[parc-1]
  76  *                            pointers to additional parameters
  77  *                    parv[parc] == NULL, *always*
  78  *
  79  *            note:   it is guaranteed that parv[0]..parv[parc-1] are all
  80  *                    non-NULL pointers.
  81  */
  82 #include "config.h"
  83
  84 #include "client.h"
  85 #include "gline.h"
  86 #include "hash.h"
  87 #include "ircd.h"
  88 #include "ircd_features.h"
  89 #include "ircd_log.h"
  90 #include "ircd_reply.h"
  91 #include "ircd_string.h"
  92 #include "match.h"
  93 #include "msg.h"
  94 #include "numeric.h"
  95 #include "numnicks.h"
  96 #include "s_conf.h"
  97 #include "s_debug.h"
  98 #include "s_misc.h"
  99 #include "send.h"
 100
 101 /* #include <assert.h> -- Now using assert in ircd_log.h */
 102 #include <stdlib.h>
 103 #include <string.h>
 104
 105 #define PASTWATCH       157680000       /* number of seconds in 5 years */
 106
 107 /*
 108  * If the expiration value, interpreted as an absolute timestamp, is
 109  * more recent than 5 years in the past, we interpret it as an
 110  * absolute timestamp; otherwise, we assume it's relative and convert
 111  * it to an absolute timestamp.  Either way, the output of this macro
 112  * is an absolute timestamp--not guaranteed to be a *valid* timestamp,
 113  * but you can't have everything in a macro ;)
 114  */
 115 #define abs_expire(exp)                                                 \
 116   ((exp) >= CurrentTime - PASTWATCH ? (exp) : (exp) + CurrentTime)
 117
 118 /*
 119  * ms_gline - server message handler
 120  *
 121  * parv[0] = Sender prefix
 122  * parv[1] = Target: server numeric
 123  * parv[2] = (+|-)<G-line mask>
 124  *
 125  * For other parameters, see doc/readme.gline.
 126  */
 127 int
 128 ms_gline(struct Client *cptr, struct Client *sptr, int parc, char *parv[])
 129 {
 130   struct Client *acptr = 0;
 131   struct Gline *agline = 0;
 132   unsigned int flags = 0;
 133   enum GlineAction action = GLINE_MODIFY;
 134   time_t expire = 0, lastmod = 0, lifetime = 0;
 135   char *mask = parv[2], *target = parv[1], *reason = "No reason", *tmp = 0;
 136
 137   if (parc < 3)
 138     return need_more_params(sptr, "GLINE");
 139
 140   if (IsServer(sptr))
 141     flags |= GLINE_FORCE;
 142
 143   if (*mask == '!') {
 144     mask++;
 145     flags |= GLINE_OPERFORCE; /* assume oper had WIDE_GLINE */
 146   }
 147
 148   switch (*mask) { /* handle +, -, <, and > */
 149   case '+': /* activate the G-line */
 150     action = GLINE_ACTIVATE;
 151     mask++;
 152     break;
 153
 154   case '-': /* deactivate the G-line */
 155     action = GLINE_DEACTIVATE;
 156     mask++;
 157     break;
 158
 159   case '>': /* locally activate the G-line */
 160     action = GLINE_LOCAL_ACTIVATE;
 161     mask++;
 162     break;
 163
 164   case '<': /* locally deactivate the G-line */
 165     action = GLINE_LOCAL_DEACTIVATE;
 166     mask++;
 167     break;
 168   }
 169
 170   /* Now, let's figure out if it's a local or global G-line */
 171   if (action == GLINE_LOCAL_ACTIVATE || action == GLINE_LOCAL_DEACTIVATE ||
 172       (target[0] == '*' && target[1] == '\0'))
 173     flags |= GLINE_GLOBAL;
 174   else
 175     flags |= GLINE_LOCAL;
 176
 177   /* now figure out if we need to resolve a server */
 178   if ((action == GLINE_LOCAL_ACTIVATE || action == GLINE_LOCAL_DEACTIVATE ||
 179        (flags & GLINE_LOCAL)) && !(acptr = FindNServer(target)))
 180     return 0; /* no such server, jump out */
 181
 182   /* If it's a local activate/deactivate and server isn't me, propagate it */
 183   if ((action == GLINE_LOCAL_ACTIVATE || action == GLINE_LOCAL_DEACTIVATE) &&
 184       !IsMe(acptr)) {
 185     Debug((DEBUG_DEBUG, "I am forwarding a local change to a global gline "
 186            "to a remote server; target %s, mask %s, operforce %s, action %c",
 187            target, mask, flags & GLINE_OPERFORCE ? "YES" : "NO",
 188            action == GLINE_LOCAL_ACTIVATE ? '>' : '<'));
 189
 190     sendcmdto_one(sptr, CMD_GLINE, acptr, "%C %s%c%s", acptr,
 191                   flags & GLINE_OPERFORCE ? "!" : "",
 192                   action == GLINE_LOCAL_ACTIVATE ? '>' : '<', mask);
 193
 194     return 0; /* all done */
 195   }
 196
 197   /* Next, try to find the G-line... */
 198   if ((flags & GLINE_GLOBAL) || IsMe(acptr)) /* don't bother if it's not me! */
 199     agline = gline_find(mask, flags | GLINE_ANY | GLINE_EXACT);
 200
 201   /* We now have all the pieces to tell us what we've got; let's put
 202    * it all together and convert the rest of the arguments.
 203    */
 204
 205   /* Handle the local G-lines first... */
 206   if (flags & GLINE_LOCAL) {
 207     assert(acptr);
 208
 209     /* normalize the action, first */
 210     if (action == GLINE_LOCAL_ACTIVATE || action == GLINE_MODIFY)
 211       action = GLINE_ACTIVATE;
 212     else if (action == GLINE_LOCAL_DEACTIVATE)
 213       action = GLINE_DEACTIVATE;
 214
 215     if (action == GLINE_ACTIVATE) { /* get expiration and reason */
 216       if (parc < 5) /* check parameter count... */
 217         return need_more_params(sptr, "GLINE");
 218
 219       expire = atoi(parv[3]); /* get expiration... */
 220       expire = abs_expire(expire); /* convert to absolute... */
 221       reason = parv[parc - 1]; /* and reason */
 222
 223       if (IsMe(acptr)) {
 224         if (agline) /* G-line already exists, so let's ignore it... */
 225           return 0;
 226
 227         /* OK, create the local G-line */
 228         Debug((DEBUG_DEBUG, "I am creating a local G-line here; target %s, "
 229                "mask %s, operforce %s, action %s, expire %Tu, reason: %s",
 230                target, mask, flags & GLINE_OPERFORCE ? "YES" : "NO",
 231                action == GLINE_ACTIVATE ? "+" : "-", expire, reason));
 232
 233         return gline_add(cptr, sptr, mask, reason, expire, lastmod,
 234                          lifetime, flags | GLINE_ACTIVE);
 235       }
 236     } else if (IsMe(acptr)) { /* destroying a local G-line */
 237       if (!agline) /* G-line doesn't exist, so let's complain... */
 238         return send_reply(sptr, ERR_NOSUCHGLINE, mask);
 239
 240       /* Let's now destroy the G-line */;
 241       Debug((DEBUG_DEBUG, "I am destroying a local G-line here; target %s, "
 242              "mask %s, operforce %s, action %s", target, mask,
 243              flags & GLINE_OPERFORCE ? "YES" : "NO",
 244              action == GLINE_ACTIVATE ? "+" : "-"));
 245
 246       return gline_destroy(cptr, sptr, agline);
 247     }
 248
 249     /* OK, we've converted arguments; if it's not for us, forward */
 250     /* UPDATE NOTE: Once all servers are updated to u2.10.12.11, the
 251      * format string in this sendcmdto_one() may be updated to omit
 252      * <lastmod> for GLINE_ACTIVATE and to omit <expire>, <lastmod>,
 253      * and <reason> for GLINE_DEACTIVATE.
 254      */
 255     assert(!IsMe(acptr));
 256
 257     Debug((DEBUG_DEBUG, "I am forwarding a local G-line to a remote server; "
 258            "target %s, mask %s, operforce %s, action %c, expire %Tu, "
 259            "lastmod %Tu, reason: %s", target, mask,
 260            flags & GLINE_OPERFORCE ? "YES" : "NO",
 261            action == GLINE_ACTIVATE ? '+' :  '-', expire, CurrentTime,
 262            reason));
 263
 264     sendcmdto_one(sptr, CMD_GLINE, acptr, "%C %s%c%s %Tu %Tu :%s",
 265                   acptr, flags & GLINE_OPERFORCE ? "!" : "",
 266                   action == GLINE_ACTIVATE ? '+' : '-', mask,
 267                   expire - CurrentTime, CurrentTime, reason);
 268
 269     return 0; /* all done */
 270   }
 271
 272   /* can't modify a G-line that doesn't exist, so remap to activate */
 273   if (!agline && action == GLINE_MODIFY)
 274     action = GLINE_ACTIVATE;
 275
 276   /* OK, let's figure out what other parameters we may have... */
 277   switch (action) {
 278   case GLINE_LOCAL_ACTIVATE: /* locally activating a G-line */
 279   case GLINE_LOCAL_DEACTIVATE: /* locally deactivating a G-line */
 280     if (!agline) /* no G-line to locally activate or deactivate? */
 281       return send_reply(sptr, ERR_NOSUCHGLINE, mask);
 282     lastmod = agline->gl_lastmod;
 283     break; /* no additional parameters to manipulate */
 284
 285   case GLINE_ACTIVATE: /* activating a G-line */
 286   case GLINE_DEACTIVATE: /* deactivating a G-line */
 287     /* in either of these cases, we have at least a lastmod parameter */
 288     if (parc < 4)
 289       return need_more_params(sptr, "GLINE");
 290     else if (parc == 4) /* lastmod only form... */
 291       lastmod = atoi(parv[3]);
 292     /*FALLTHROUGH*/
 293   case GLINE_MODIFY: /* modifying a G-line */
 294     /* convert expire and lastmod, look for lifetime and reason */
 295     if (parc > 4) { /* protect against fall-through from 4-param form */
 296       expire = atoi(parv[3]); /* convert expiration and lastmod */
 297       expire = abs_expire(expire);
 298       lastmod = atoi(parv[4]);
 299
 300       flags |= GLINE_EXPIRE; /* we have an expiration time update */
 301
 302       if (parc > 6) { /* no question, have a lifetime and reason */
 303         lifetime = atoi(parv[5]);
 304         reason = parv[parc - 1];
 305
 306         flags |= GLINE_LIFETIME | GLINE_REASON;
 307       } else if (parc == 6) { /* either a lifetime or a reason */
 308         if (!agline || /* gline creation, has to be the reason */
 309             /* trial-convert as lifetime, and if it doesn't fully convert,
 310              * it must be the reason */
 311             (!(lifetime = strtoul(parv[5], &tmp, 10)) && !*tmp)) {
 312           lifetime = 0;
 313           reason = parv[5];
 314
 315           flags |= GLINE_REASON; /* have a reason update */
 316         } else if (lifetime)
 317           flags |= GLINE_LIFETIME; /* have a lifetime update */
 318       }
 319     }
 320   }
 321
 322   if (!lastmod) /* must have a lastmod parameter by now */
 323     return need_more_params(sptr, "GLINE");
 324
 325   Debug((DEBUG_DEBUG, "I have a global G-line I am acting upon now; "
 326          "target %s, mask %s, operforce %s, action %s, expire %Tu, "
 327          "lastmod %Tu, lifetime %Tu, reason: %s; gline %s!  (fields "
 328          "present: %s %s %s)", target, mask,
 329          flags & GLINE_OPERFORCE ? "YES" : "NO",
 330          action == GLINE_ACTIVATE ? "+" :
 331          (action == GLINE_DEACTIVATE ? "-" :
 332           (action == GLINE_LOCAL_ACTIVATE ? ">" :
 333            (action == GLINE_LOCAL_DEACTIVATE ? "<" : "(MODIFY)"))),
 334          expire, lastmod, lifetime, reason,
 335          agline ? "EXISTS" : "does not exist",
 336          flags & GLINE_EXPIRE ? "expire" : "",
 337          flags & GLINE_LIFETIME ? "lifetime" : "",
 338          flags & GLINE_REASON ? "reason" : ""));
 339
 340   /* OK, at this point, we have converted all available parameters.
 341    * Let's actually do the action!
 342    */
 343   if (agline)
 344     return gline_modify(cptr, sptr, agline, action, reason, expire,
 345                         lastmod, lifetime, flags);
 346
 347   assert(action != GLINE_LOCAL_ACTIVATE);
 348   assert(action != GLINE_LOCAL_DEACTIVATE);
 349   assert(action != GLINE_MODIFY);
 350
 351   if (!expire) { /* Cannot *add* a G-line we don't have, but try hard */
 352     Debug((DEBUG_DEBUG, "Propagating G-line %s for G-line we don't have",
 353            action == GLINE_ACTIVATE ? "activation" : "deactivation"));
 354
 355     /* propagate the G-line, even though we don't have it */
 356     sendcmdto_serv_butone(sptr, CMD_GLINE, cptr, "* %c%s %Tu",
 357                           action == GLINE_ACTIVATE ? '+' : '-',
 358                           mask, lastmod);
 359
 360     return 0;
 361   }
 362
 363   return gline_add(cptr, sptr, mask, reason, expire, lastmod, lifetime,
 364                    flags | ((action == GLINE_ACTIVATE) ? GLINE_ACTIVE : 0));
 365 }
 366
 367 /*
 368  * mo_gline - oper message handler
 369  *
 370  * parv[0] = Sender prefix
 371  * parv[1] = [[+|-]<G-line mask>]
 372  *
 373  * For other parameters, see doc/readme.gline.
 374  */
 375 int
 376 mo_gline(struct Client *cptr, struct Client *sptr, int parc, char *parv[])
 377 {
 378   struct Client *acptr = 0;
 379   struct Gline *agline = 0;
 380   unsigned int flags = 0;
 381   enum GlineAction action = GLINE_MODIFY;
 382   time_t expire = 0;
 383   char *mask = parv[1], *target = 0, *reason = 0, *end;
 384
 385   if (parc < 2)
 386     return gline_list(sptr, 0);
 387
 388   if (*mask == '!') {
 389     mask++;
 390
 391     if (HasPriv(sptr, PRIV_WIDE_GLINE))
 392       flags |= GLINE_OPERFORCE;
 393   }
 394
 395   switch (*mask) { /* handle +, -, <, and > */
 396   case '+': /* activate the G-line */
 397     action = GLINE_ACTIVATE;
 398     mask++;
 399     break;
 400
 401   case '-': /* deactivate the G-line */
 402     action = GLINE_DEACTIVATE;
 403     mask++;
 404     break;
 405
 406   case '>': /* locally activate the G-line */
 407     action = GLINE_LOCAL_ACTIVATE;
 408     mask++;
 409     break;
 410
 411   case '<': /* locally deactivate the G-line */
 412     action = GLINE_LOCAL_DEACTIVATE;
 413     mask++;
 414     break;
 415   }
 416
 417   /* OK, let's figure out the parameters... */
 418   switch (action) {
 419   case GLINE_MODIFY: /* no specific action on the G-line... */
 420     if (parc == 2) /* user wants a listing of a specific G-line */
 421       return gline_list(sptr, mask);
 422     else if (parc < 4) /* must have target and expire, minimum */
 423       return need_more_params(sptr, "GLINE");
 424
 425     target = parv[2]; /* get the target... */
 426     expire = strtol(parv[3], &end, 10) + CurrentTime; /* and the expiration */
 427     if (*end != '\0')
 428       return send_reply(sptr, SND_EXPLICIT | ERR_BADEXPIRE, "%s :Bad expire time", parv[3]);
 429
 430     flags |= GLINE_EXPIRE; /* remember that we got an expire time */
 431
 432     if (parc > 4) { /* also got a reason... */
 433       reason = parv[parc - 1];
 434       flags |= GLINE_REASON;
 435     }
 436
 437     /* target is not global, interpolate action and require reason */
 438     if (target[0] != '*' || target[1] != '\0') {
 439       if (!reason) /* have to have a reason for this */
 440         return need_more_params(sptr, "GLINE");
 441
 442       action = GLINE_ACTIVATE;
 443     }
 444     break;
 445
 446   case GLINE_LOCAL_ACTIVATE: /* locally activate a G-line */
 447   case GLINE_LOCAL_DEACTIVATE: /* locally deactivate a G-line */
 448     if (parc > 2) { /* if target is available, pick it */
 449       target = parv[2];
 450       if (target[0] == '*' && target[1] == '\0')
 451         return send_reply(sptr, ERR_NOSUCHSERVER, target);
 452     }
 453     break;
 454
 455   case GLINE_ACTIVATE: /* activating/adding a G-line */
 456   case GLINE_DEACTIVATE: /* deactivating/removing a G-line */
 457     if (parc < 3)
 458       return need_more_params(sptr, "GLINE");
 459
 460     if (parc > 3) {
 461       /* get expiration and target */
 462       reason = parv[parc - 1];
 463       expire = strtol(parv[parc - 2], &end, 10) + CurrentTime;
 464       if (*end != '\0')
 465         return send_reply(sptr, SND_EXPLICIT | ERR_BADEXPIRE, "%s :Bad expire time", parv[parc - 2]);
 466
 467       flags |= GLINE_EXPIRE | GLINE_REASON; /* remember that we got 'em */
 468
 469       if (parc > 4) /* also have a target! */
 470         target = parv[2];
 471     } else {
 472       target = parv[2]; /* target has to be present, and has to be '*' */
 473
 474       if (target[0] != '*' || target[1] != '\0')
 475         return need_more_params(sptr, "GLINE");
 476     }
 477     break;
 478   }
 479
 480   /* Now let's figure out which is the target server */
 481   if (!target) /* no target, has to be me... */
 482     acptr = &me;
 483   /* if it's not '*', look up the server */
 484   else if ((target[0] != '*' || target[1] != '\0') &&
 485            !(acptr = find_match_server(target)))
 486     return send_reply(sptr, ERR_NOSUCHSERVER, target);
 487
 488   /* Now, is the G-line local or global? */
 489   if (action == GLINE_LOCAL_ACTIVATE || action == GLINE_LOCAL_DEACTIVATE ||
 490       !acptr)
 491     flags |= GLINE_GLOBAL;
 492   else /* it's some form of local G-line */
 493     flags |= GLINE_LOCAL;
 494
 495   /* If it's a local activate/deactivate and server isn't me, propagate it */
 496   if ((action == GLINE_LOCAL_ACTIVATE || action == GLINE_LOCAL_DEACTIVATE) &&
 497       !IsMe(acptr)) {
 498     /* check for permissions... */
 499     if (!feature_bool(FEAT_CONFIG_OPERCMDS))
 500       return send_reply(sptr, ERR_DISABLED, "GLINE");
 501     else if (!HasPriv(sptr, PRIV_GLINE))
 502       return send_reply(sptr, ERR_NOPRIVILEGES);
 503
 504     Debug((DEBUG_DEBUG, "I am forwarding a local change to a global gline "
 505            "to a remote server; target %s, mask %s, operforce %s, action %c",
 506            cli_name(acptr), mask, flags & GLINE_OPERFORCE ? "YES" : "NO",
 507            action == GLINE_LOCAL_ACTIVATE ? '>' : '<'));
 508
 509     sendcmdto_one(sptr, CMD_GLINE, acptr, "%C %s%c%s", acptr,
 510                   flags & GLINE_OPERFORCE ? "!" : "",
 511                   action == GLINE_LOCAL_ACTIVATE ? '>' : '<', mask);
 512
 513     return 0; /* all done */
 514   }
 515
 516   /* Next, try to find the G-line... */
 517   if ((flags & GLINE_GLOBAL) || IsMe(acptr)) /* don't bother if it's not me! */
 518     agline = gline_find(mask, flags | GLINE_ANY | GLINE_EXACT);
 519
 520   /* We now have all the pieces to tell us what we've got; let's put
 521    * it all together and convert the rest of the arguments.
 522    */
 523
 524   /* Handle the local G-lines first... */
 525   if (flags & GLINE_LOCAL) {
 526     assert(acptr);
 527
 528     /* normalize the action, first */
 529     if (action == GLINE_LOCAL_ACTIVATE || action == GLINE_MODIFY)
 530       action = GLINE_ACTIVATE;
 531     else if (action == GLINE_LOCAL_DEACTIVATE)
 532       action = GLINE_DEACTIVATE;
 533
 534     /* If it's not for us, forward */
 535     /* UPDATE NOTE: Once all servers are updated to u2.10.12.11, the
 536      * format string in this sendcmdto_one() may be updated to omit
 537      * <lastmod> for GLINE_ACTIVATE and to omit <expire>, <lastmod>,
 538      * and <reason> for GLINE_DEACTIVATE.
 539      */
 540
 541     if (!IsMe(acptr)) {
 542       /* check for permissions... */
 543       if (!feature_bool(FEAT_CONFIG_OPERCMDS))
 544         return send_reply(sptr, ERR_DISABLED, "GLINE");
 545       else if (!HasPriv(sptr, PRIV_GLINE))
 546         return send_reply(sptr, ERR_NOPRIVILEGES);
 547
 548       Debug((DEBUG_DEBUG, "I am forwarding a local G-line to a remote "
 549              "server; target %s, mask %s, operforce %s, action %c, "
 550              "expire %Tu, reason %s", target, mask,
 551              flags & GLINE_OPERFORCE ? "YES" : "NO",
 552              action == GLINE_ACTIVATE ? '+' : '-', expire, reason));
 553
 554       sendcmdto_one(sptr, CMD_GLINE, acptr, "%C %s%c%s %Tu %Tu :%s",
 555                     acptr, flags & GLINE_OPERFORCE ? "!" : "",
 556                     action == GLINE_ACTIVATE ? '+' : '-', mask,
 557                     expire - CurrentTime, CurrentTime, reason);
 558
 559       return 0; /* all done */
 560     }
 561
 562     /* check local G-line permissions... */
 563     if (!HasPriv(sptr, PRIV_LOCAL_GLINE))
 564       return send_reply(sptr, ERR_NOPRIVILEGES);
 565
 566     /* let's handle activation... */
 567     if (action == GLINE_ACTIVATE) {
 568       if (agline) /* G-line already exists, so let's ignore it... */
 569         return 0;
 570
 571       /* OK, create the local G-line */
 572       Debug((DEBUG_DEBUG, "I am creating a local G-line here; target %s, "
 573              "mask %s, operforce %s, action  %s, expire %Tu, reason: %s",
 574              target, mask, flags & GLINE_OPERFORCE ? "YES" : "NO",
 575              action == GLINE_ACTIVATE ? "+" : "-", expire, reason));
 576
 577       return gline_add(cptr, sptr, mask, reason, expire, 0, 0,
 578                        flags | GLINE_ACTIVE);
 579     } else { /* OK, it's a deactivation/destruction */
 580       if (!agline) /* G-line doesn't exist, so let's complain... */
 581         return send_reply(sptr, ERR_NOSUCHGLINE, mask);
 582
 583       /* Let's now destroy the G-line */
 584       Debug((DEBUG_DEBUG, "I am destroying a local G-line here; target %s, "
 585              "mask %s, operforce %s, action %s", target, mask,
 586              flags & GLINE_OPERFORCE ? "YES" : "NO",
 587              action == GLINE_ACTIVATE ? "+" : "-"));
 588
 589       return gline_destroy(cptr, sptr, agline);
 590     }
 591   }
 592
 593   /* can't modify a G-line that doesn't exist...
 594    * (and if we are creating a new one, we need a reason and expiration)
 595    */
 596   if (!agline &&
 597       (action == GLINE_MODIFY || action == GLINE_LOCAL_ACTIVATE ||
 598        action == GLINE_LOCAL_DEACTIVATE || !reason || !expire))
 599     return send_reply(sptr, ERR_NOSUCHGLINE, mask);
 600
 601   /* check for G-line permissions... */
 602   if (action == GLINE_LOCAL_ACTIVATE || action == GLINE_LOCAL_DEACTIVATE) {
 603     /* only need local privileges for locally-limited status changes */
 604     if (!HasPriv(sptr, PRIV_LOCAL_GLINE))
 605       return send_reply(sptr, ERR_NOPRIVILEGES);
 606   } else { /* global privileges required */
 607     if (!feature_bool(FEAT_CONFIG_OPERCMDS))
 608       return send_reply(sptr, ERR_DISABLED, "GLINE");
 609     else if (!HasPriv(sptr, PRIV_GLINE))
 610       return send_reply(sptr, ERR_NOPRIVILEGES);
 611   }
 612
 613   Debug((DEBUG_DEBUG, "I have a global G-line I am acting upon now; "
 614          "target %s, mask %s, operforce %s, action %s, expire %Tu, "
 615          "reason: %s; gline %s!  (fields present: %s %s)", target,
 616          mask, flags & GLINE_OPERFORCE ? "YES" : "NO",
 617          action == GLINE_ACTIVATE ? "+" :
 618          (action == GLINE_DEACTIVATE ? "-" :
 619           (action == GLINE_LOCAL_ACTIVATE ? ">" :
 620            (action == GLINE_LOCAL_DEACTIVATE ? "<" : "(MODIFY)"))),
 621          expire, reason, agline ? "EXISTS" : "does not exist",
 622          flags & GLINE_EXPIRE ? "expire" : "",
 623          flags & GLINE_REASON ? "reason" : ""));
 624
 625   if (agline) /* modifying an existing G-line */
 626     return gline_modify(cptr, sptr, agline, action, reason, expire,
 627                         CurrentTime, 0, flags);
 628
 629   assert(action != GLINE_LOCAL_ACTIVATE);
 630   assert(action != GLINE_LOCAL_DEACTIVATE);
 631   assert(action != GLINE_MODIFY);
 632
 633   /* create a new G-line */
 634   return gline_add(cptr, sptr, mask, reason, expire, CurrentTime, 0,
 635                    flags | ((action == GLINE_ACTIVATE) ? GLINE_ACTIVE : 0));
 636 }
 637
 638 /*
 639  * m_gline - user message handler
 640  *
 641  * parv[0] = Sender prefix
 642  * parv[1] = [<server name>]
 643  *
 644  */
 645 int
 646 m_gline(struct Client *cptr, struct Client *sptr, int parc, char *parv[])
 647 {
 648   if (parc < 2)
 649     return send_reply(sptr, ERR_NOSUCHGLINE, "");
 650
 651   return gline_list(sptr, parv[1]);
 652 }