2 * IRC - Internet Relay Chat, ircd/m_gline.c
3 * Copyright (C) 1990 Jarkko Oikarinen and
4 * University of Oulu, Computing Center
6 * See file AUTHORS in IRC package for additional names of
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)
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.
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.
27 * m_functions execute protocol messages on this server:
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...).
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.
39 * (!IsServer(cptr)) => (cptr == sptr), because
40 * prefixes are taken *only* from servers...
43 * (sptr == cptr) => the message didn't
46 * (sptr != cptr && IsServer(sptr) means
47 * the prefix specified servername. (?)
49 * (sptr != cptr && !IsServer(sptr) means
50 * that message originated from a remote
55 * (!IsServer(sptr)) means that, sptr can safely
56 * taken as defining the target structure of the
57 * message in this server.
59 * *Always* true (if 'parse' and others are working correct):
61 * 1) sptr->from == cptr (note: cptr->from == cptr)
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 ]
68 * parc number of variable parameter strings (if zero,
69 * parv is allowed to be NULL)
71 * parv a NULL terminated list of parameter pointers,
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*
79 * note: it is guaranteed that parv[0]..parv[parc-1] are all
88 #include "ircd_features.h"
90 #include "ircd_reply.h"
91 #include "ircd_string.h"
101 /* #include <assert.h> -- Now using assert in ircd_log.h */
105 #define PASTWATCH 157680000 /* number of seconds in 5 years */
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 ;)
115 #define abs_expire(exp) \
116 ((exp) >= CurrentTime - PASTWATCH ? (exp) : (exp) + CurrentTime)
119 * ms_gline - server message handler
121 * parv[0] = Sender prefix
122 * parv[1] = Target: server numeric
123 * parv[2] = (+|-)<G-line mask>
125 * For other parameters, see doc/readme.gline.
128 ms_gline(struct Client *cptr, struct Client *sptr, int parc, char *parv[])
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;
138 return need_more_params(sptr, "GLINE");
141 flags |= GLINE_FORCE;
145 flags |= GLINE_OPERFORCE; /* assume oper had WIDE_GLINE */
148 switch (*mask) { /* handle +, -, <, and > */
149 case '+': /* activate the G-line */
150 action = GLINE_ACTIVATE;
154 case '-': /* deactivate the G-line */
155 action = GLINE_DEACTIVATE;
159 case '>': /* locally activate the G-line */
160 action = GLINE_LOCAL_ACTIVATE;
164 case '<': /* locally deactivate the G-line */
165 action = GLINE_LOCAL_DEACTIVATE;
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;
175 flags |= GLINE_LOCAL;
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 */
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) &&
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 ? '>' : '<'));
190 sendcmdto_one(sptr, CMD_GLINE, acptr, "%C %s%c%s", acptr,
191 flags & GLINE_OPERFORCE ? "!" : "",
192 action == GLINE_LOCAL_ACTIVATE ? '>' : '<', mask);
194 return 0; /* all done */
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);
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.
205 /* Handle the local G-lines first... */
206 if (flags & GLINE_LOCAL) {
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;
215 if (action == GLINE_ACTIVATE) { /* get expiration and reason */
216 if (parc < 5) /* check parameter count... */
217 return need_more_params(sptr, "GLINE");
219 expire = atoi(parv[3]); /* get expiration... */
220 expire = abs_expire(expire); /* convert to absolute... */
221 reason = parv[parc - 1]; /* and reason */
224 if (agline) /* G-line already exists, so let's ignore it... */
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));
233 return gline_add(cptr, sptr, mask, reason, expire, lastmod,
234 lifetime, flags | GLINE_ACTIVE);
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);
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 ? "+" : "-"));
246 return gline_destroy(cptr, sptr, agline);
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.
255 assert(!IsMe(acptr));
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,
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);
269 return 0; /* all done */
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;
276 /* OK, let's figure out what other parameters we may have... */
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 */
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 */
289 return need_more_params(sptr, "GLINE");
290 else if (parc == 4) /* lastmod only form... */
291 lastmod = atoi(parv[3]);
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]);
300 flags |= GLINE_EXPIRE; /* we have an expiration time update */
302 if (parc > 6) { /* no question, have a lifetime and reason */
303 lifetime = atoi(parv[5]);
304 reason = parv[parc - 1];
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)) {
315 flags |= GLINE_REASON; /* have a reason update */
317 flags |= GLINE_LIFETIME; /* have a lifetime update */
322 if (!lastmod) /* must have a lastmod parameter by now */
323 return need_more_params(sptr, "GLINE");
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" : ""));
340 /* OK, at this point, we have converted all available parameters.
341 * Let's actually do the action!
344 return gline_modify(cptr, sptr, agline, action, reason, expire,
345 lastmod, lifetime, flags);
347 assert(action != GLINE_LOCAL_ACTIVATE);
348 assert(action != GLINE_LOCAL_DEACTIVATE);
349 assert(action != GLINE_MODIFY);
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"));
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 ? '+' : '-',
363 return gline_add(cptr, sptr, mask, reason, expire, lastmod, lifetime,
364 flags | ((action == GLINE_ACTIVATE) ? GLINE_ACTIVE : 0));
368 * mo_gline - oper message handler
370 * parv[0] = Sender prefix
371 * parv[1] = [[+|-]<G-line mask>]
373 * For other parameters, see doc/readme.gline.
376 mo_gline(struct Client *cptr, struct Client *sptr, int parc, char *parv[])
378 struct Client *acptr = 0;
379 struct Gline *agline = 0;
380 unsigned int flags = 0;
381 enum GlineAction action = GLINE_MODIFY;
383 char *mask = parv[1], *target = 0, *reason = 0, *end;
386 return gline_list(sptr, 0);
391 if (HasPriv(sptr, PRIV_WIDE_GLINE))
392 flags |= GLINE_OPERFORCE;
395 switch (*mask) { /* handle +, -, <, and > */
396 case '+': /* activate the G-line */
397 action = GLINE_ACTIVATE;
401 case '-': /* deactivate the G-line */
402 action = GLINE_DEACTIVATE;
406 case '>': /* locally activate the G-line */
407 action = GLINE_LOCAL_ACTIVATE;
411 case '<': /* locally deactivate the G-line */
412 action = GLINE_LOCAL_DEACTIVATE;
417 /* OK, let's figure out the parameters... */
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");
425 target = parv[2]; /* get the target... */
426 expire = strtol(parv[3], &end, 10) + CurrentTime; /* and the expiration */
428 return send_reply(sptr, SND_EXPLICIT | ERR_BADEXPIRE, "%s :Bad expire time", parv[3]);
430 flags |= GLINE_EXPIRE; /* remember that we got an expire time */
432 if (parc > 4) { /* also got a reason... */
433 reason = parv[parc - 1];
434 flags |= GLINE_REASON;
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");
442 action = GLINE_ACTIVATE;
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 */
450 if (target[0] == '*' && target[1] == '\0')
451 return send_reply(sptr, ERR_NOSUCHSERVER, target);
455 case GLINE_ACTIVATE: /* activating/adding a G-line */
456 case GLINE_DEACTIVATE: /* deactivating/removing a G-line */
458 return need_more_params(sptr, "GLINE");
461 /* get expiration and target */
462 reason = parv[parc - 1];
463 expire = strtol(parv[parc - 2], &end, 10) + CurrentTime;
465 return send_reply(sptr, SND_EXPLICIT | ERR_BADEXPIRE, "%s :Bad expire time", parv[parc - 2]);
467 flags |= GLINE_EXPIRE | GLINE_REASON; /* remember that we got 'em */
469 if (parc > 4) /* also have a target! */
472 target = parv[2]; /* target has to be present, and has to be '*' */
474 if (target[0] != '*' || target[1] != '\0')
475 return need_more_params(sptr, "GLINE");
480 /* Now let's figure out which is the target server */
481 if (!target) /* no target, has to be 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);
488 /* Now, is the G-line local or global? */
489 if (action == GLINE_LOCAL_ACTIVATE || action == GLINE_LOCAL_DEACTIVATE ||
491 flags |= GLINE_GLOBAL;
492 else /* it's some form of local G-line */
493 flags |= GLINE_LOCAL;
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) &&
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);
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 ? '>' : '<'));
509 sendcmdto_one(sptr, CMD_GLINE, acptr, "%C %s%c%s", acptr,
510 flags & GLINE_OPERFORCE ? "!" : "",
511 action == GLINE_LOCAL_ACTIVATE ? '>' : '<', mask);
513 return 0; /* all done */
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);
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.
524 /* Handle the local G-lines first... */
525 if (flags & GLINE_LOCAL) {
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;
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.
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);
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));
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);
559 return 0; /* all done */
562 /* check local G-line permissions... */
563 if (!HasPriv(sptr, PRIV_LOCAL_GLINE))
564 return send_reply(sptr, ERR_NOPRIVILEGES);
566 /* let's handle activation... */
567 if (action == GLINE_ACTIVATE) {
568 if (agline) /* G-line already exists, so let's ignore it... */
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));
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);
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 ? "+" : "-"));
589 return gline_destroy(cptr, sptr, agline);
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)
597 (action == GLINE_MODIFY || action == GLINE_LOCAL_ACTIVATE ||
598 action == GLINE_LOCAL_DEACTIVATE || !reason || !expire))
599 return send_reply(sptr, ERR_NOSUCHGLINE, mask);
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);
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" : ""));
625 if (agline) /* modifying an existing G-line */
626 return gline_modify(cptr, sptr, agline, action, reason, expire,
627 CurrentTime, 0, flags);
629 assert(action != GLINE_LOCAL_ACTIVATE);
630 assert(action != GLINE_LOCAL_DEACTIVATE);
631 assert(action != GLINE_MODIFY);
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));
639 * m_gline - user message handler
641 * parv[0] = Sender prefix
642 * parv[1] = [<server name>]
646 m_gline(struct Client *cptr, struct Client *sptr, int parc, char *parv[])
649 return send_reply(sptr, ERR_NOSUCHGLINE, "");
651 return gline_list(sptr, parv[1]);