]> jfr.im git - irc/evilnet/x3.git/blame - src/proto-p10.c
proto: add extra metadata to oper handler
[irc/evilnet/x3.git] / src / proto-p10.c
CommitLineData
d76ed9a9 1/* proto-p10.c - IRC protocol output
2 * Copyright 2000-2004 srvx Development Team
3 *
83ff05c3 4 * This file is part of x3.
d76ed9a9 5 *
d0f04f71 6 * x3 is free software; you can redistribute it and/or modify
d76ed9a9 7 * it under the terms of the GNU General Public License as published by
348683aa 8 * the Free Software Foundation; either version 3 of the License, or
d76ed9a9 9 * (at your option) any later version.
10 *
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License
17 * along with srvx; if not, write to the Free Software Foundation,
18 * Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
19 */
20
3fdd6a74 21#include "nickserv.h"
23475fc6 22#include "chanserv.h"
89d871d8 23#include "hash.h"
08895577 24#include "helpfile.h"
37ef8ee3 25#include "hosthiding.h"
d76ed9a9 26#include "proto-common.c"
47956fc5 27#include "opserv.h"
d76ed9a9 28
29/* Full commands. */
30#define CMD_ACCOUNT "ACCOUNT"
31#define CMD_ADMIN "ADMIN"
763de701 32#define CMD_ALIST "ALIST"
d76ed9a9 33#define CMD_ASLL "ASLL"
34#define CMD_AWAY "AWAY"
35#define CMD_BURST "BURST"
36#define CMD_CLEARMODE "CLEARMODE"
37#define CMD_CLOSE "CLOSE"
38#define CMD_CNOTICE "CNOTICE"
39#define CMD_CONNECT "CONNECT"
40#define CMD_CPRIVMSG "CPRIVMSG"
41#define CMD_CREATE "CREATE"
42#define CMD_DESTRUCT "DESTRUCT"
43#define CMD_DESYNCH "DESYNCH"
44#define CMD_DIE "DIE"
45#define CMD_DNS "DNS"
46#define CMD_EOB "END_OF_BURST"
47#define CMD_EOB_ACK "EOB_ACK"
48#define CMD_ERROR "ERROR"
49#define CMD_FAKEHOST "FAKE"
50#define CMD_GET "GET"
51#define CMD_GLINE "GLINE"
52#define CMD_HASH "HASH"
53#define CMD_HELP "HELP"
54#define CMD_INFO "INFO"
55#define CMD_INVITE "INVITE"
56#define CMD_ISON "ISON"
57#define CMD_JOIN "JOIN"
58#define CMD_JUPE "JUPE"
59#define CMD_KICK "KICK"
60#define CMD_KILL "KILL"
61#define CMD_LINKS "LINKS"
62#define CMD_LIST "LIST"
63#define CMD_LUSERS "LUSERS"
64#define CMD_MAP "MAP"
23475fc6 65#define CMD_MARK "MARK"
d76ed9a9 66#define CMD_MODE "MODE"
67#define CMD_MOTD "MOTD"
68#define CMD_NAMES "NAMES"
69#define CMD_NICK "NICK"
70#define CMD_NOTICE "NOTICE"
71#define CMD_OPER "OPER"
72#define CMD_OPMODE "OPMODE"
73#define CMD_PART "PART"
74#define CMD_PASS "PASS"
75#define CMD_PING "PING"
76#define CMD_PONG "PONG"
77#define CMD_POST "POST"
78#define CMD_PRIVMSG "PRIVMSG"
79#define CMD_PRIVS "PRIVS"
80#define CMD_PROTO "PROTO"
81#define CMD_QUIT "QUIT"
82#define CMD_REHASH "REHASH"
83#define CMD_RESET "RESET"
84#define CMD_RESTART "RESTART"
85#define CMD_RPING "RPING"
86#define CMD_RPONG "RPONG"
87#define CMD_SERVER "SERVER"
88#define CMD_SERVLIST "SERVLIST"
89#define CMD_SERVSET "SERVSET"
90#define CMD_SET "SET"
91#define CMD_SETTIME "SETTIME"
59b38cc0 92#define CMD_SGLINE "SGLINE"
d914d1cb 93#define CMD_SHUN "SHUN"
d76ed9a9 94#define CMD_SILENCE "SILENCE"
56b83e80 95#define CMD_SMO "SMO"
1c76f1b4 96#define CMD_SNO "SNO"
59b38cc0 97#define CMD_SSHUN "SSHUN"
4b2dcc0d 98#define CMD_SPAMFILTER "SPAMFILTER"
d76ed9a9 99#define CMD_SQUERY "SQUERY"
100#define CMD_SQUIT "SQUIT"
101#define CMD_STATS "STATS"
cd25f2e9 102#define CMD_SVSJOIN "SVSJOIN"
d76ed9a9 103#define CMD_SVSNICK "SVSNICK"
cd25f2e9 104#define CMD_SVSPART "SVSPART"
5e6460e4 105#define CMD_SVSQUIT "SVSQUIT"
56958740 106#define CMD_SWHOIS "SWHOIS"
d76ed9a9 107#define CMD_TIME "TIME"
108#define CMD_TOPIC "TOPIC"
109#define CMD_TRACE "TRACE"
110#define CMD_UPING "UPING"
111#define CMD_USER "USER"
112#define CMD_USERHOST "USERHOST"
113#define CMD_USERIP "USERIP"
114#define CMD_VERSION "VERSION"
115#define CMD_WALLCHOPS "WALLCHOPS"
116#define CMD_WALLOPS "WALLOPS"
55342ce8 117#define CMD_WALLHOPS "WALLHOPS"
d76ed9a9 118#define CMD_WALLUSERS "WALLUSERS"
119#define CMD_WALLVOICES "WALLVOICES"
55342ce8 120#define CMD_WALLHOPS "WALLHOPS"
d76ed9a9 121#define CMD_WHO "WHO"
122#define CMD_WHOIS "WHOIS"
123#define CMD_WHOWAS "WHOWAS"
124
125/* Tokenized commands. */
126#define TOK_ACCOUNT "AC"
127#define TOK_ADMIN "AD"
763de701 128#define TOK_ALIST "AL"
d76ed9a9 129#define TOK_ASLL "LL"
130#define TOK_AWAY "A"
131#define TOK_BURST "B"
132#define TOK_CLEARMODE "CM"
133#define TOK_CLOSE "CLOSE"
134#define TOK_CNOTICE "CN"
135#define TOK_CONNECT "CO"
136#define TOK_CPRIVMSG "CP"
137#define TOK_CREATE "C"
138#define TOK_DESTRUCT "DE"
139#define TOK_DESYNCH "DS"
140#define TOK_DIE "DIE"
141#define TOK_DNS "DNS"
142#define TOK_EOB "EB"
143#define TOK_EOB_ACK "EA"
144#define TOK_ERROR "Y"
fede8b64 145#define TOK_EXEMPT "EX"
d76ed9a9 146#define TOK_FAKEHOST "FA"
147#define TOK_GET "GET"
148#define TOK_GLINE "GL"
149#define TOK_HASH "HASH"
150#define TOK_HELP "HELP"
151#define TOK_INFO "F"
152#define TOK_INVITE "I"
153#define TOK_ISON "ISON"
154#define TOK_JOIN "J"
155#define TOK_JUPE "JU"
156#define TOK_KICK "K"
157#define TOK_KILL "D"
158#define TOK_LINKS "LI"
159#define TOK_LIST "LIST"
160#define TOK_LUSERS "LU"
161#define TOK_MAP "MAP"
23475fc6 162#define TOK_MARK "MK"
d76ed9a9 163#define TOK_MODE "M"
164#define TOK_MOTD "MO"
165#define TOK_NAMES "E"
166#define TOK_NICK "N"
167#define TOK_NOTICE "O"
168#define TOK_OPER "OPER"
169#define TOK_OPMODE "OM"
170#define TOK_PART "L"
171#define TOK_PASS "PA"
172#define TOK_PING "G"
173#define TOK_PONG "Z"
174#define TOK_POST "POST"
175#define TOK_PRIVMSG "P"
176#define TOK_PRIVS "PRIVS"
177#define TOK_PROTO "PROTO"
178#define TOK_QUIT "Q"
179#define TOK_REHASH "REHASH"
180#define TOK_RESET "RESET"
181#define TOK_RESTART "RESTART"
182#define TOK_RPING "RI"
183#define TOK_RPONG "RO"
184#define TOK_SERVER "S"
185#define TOK_SERVLIST "SERVSET"
186#define TOK_SERVSET "SERVSET"
187#define TOK_SET "SET"
188#define TOK_SETTIME "SE"
59b38cc0 189#define TOK_SGLINE "SGL"
d914d1cb 190#define TOK_SHUN "SU"
d76ed9a9 191#define TOK_SILENCE "U"
56b83e80 192#define TOK_SMO "SMO"
1c76f1b4 193#define TOK_SNO "SNO"
59b38cc0 194#define TOK_SSHUN "SSU"
4b2dcc0d 195#define TOK_SPAMFILTER "SF"
d76ed9a9 196#define TOK_SQUERY "SQUERY"
197#define TOK_SQUIT "SQ"
198#define TOK_STATS "R"
cd25f2e9 199#define TOK_SVSJOIN "SJ"
d76ed9a9 200#define TOK_SVSNICK "SN"
cd25f2e9 201#define TOK_SVSPART "SP"
5e6460e4 202#define TOK_SVSQUIT "SX"
56958740 203#define TOK_SWHOIS "SW"
d76ed9a9 204#define TOK_TIME "TI"
205#define TOK_TOPIC "T"
206#define TOK_TRACE "TR"
207#define TOK_UPING "UP"
208#define TOK_USER "USER"
209#define TOK_USERHOST "USERHOST"
210#define TOK_USERIP "USERIP"
211#define TOK_VERSION "V"
212#define TOK_WALLCHOPS "WC"
213#define TOK_WALLOPS "WA"
55342ce8 214#define TOK_WALLHOPS "WH"
d76ed9a9 215#define TOK_WALLUSERS "WU"
216#define TOK_WALLVOICES "WV"
55342ce8 217#define TOK_WALLHOPS "WH"
d76ed9a9 218#define TOK_WHO "H"
219#define TOK_WHOIS "W"
220#define TOK_WHOWAS "X"
221
222/* Protocol messages; aliased to full commands or tokens depending
223 on compile-time configuration. ircu prefers tokens WITH THE
224 EXCEPTION OF THE SERVER AND PASS COMMANDS, which cannot be
225 tokenized, because clients' (ie. a linking server) commands are
226 only checked against the full command list.
227*/
228#if defined(ENABLE_TOKENS)
229#define TYPE(NAME) TOK_ ## NAME
230#else /* !ENABLE_TOKENS */
231#define TYPE(NAME) CMD_ ## NAME
232#endif /* ENABLE_TOKENS */
233
234#define P10_ACCOUNT TYPE(ACCOUNT)
235#define P10_ADMIN TYPE(ADMIN)
236#define P10_ASLL TYPE(ASLL)
237#define P10_AWAY TYPE(AWAY)
238#define P10_BURST TYPE(BURST)
239#define P10_CLEARMODE TYPE(CLEARMODE)
240#define P10_CLOSE TYPE(CLOSE)
241#define P10_CNOTICE TYPE(CNOTICE)
242#define P10_CONNECT TYPE(CONNECT)
243#define P10_CPRIVMSG TYPE(CPRIVMSG)
244#define P10_CREATE TYPE(CREATE)
245#define P10_DESTRUCT TYPE(DESTRUCT)
246#define P10_DESYNCH TYPE(DESYNCH)
247#define P10_DIE TYPE(DIE)
248#define P10_DNS TYPE(DNS)
249#define P10_EOB TYPE(EOB)
250#define P10_EOB_ACK TYPE(EOB_ACK)
251#define P10_ERROR TYPE(ERROR)
252#define P10_FAKEHOST TYPE(FAKEHOST)
253#define P10_GET TYPE(GET)
254#define P10_GLINE TYPE(GLINE)
255#define P10_HASH TYPE(HASH)
256#define P10_HELP TYPE(HELP)
257#define P10_INFO TYPE(INFO)
258#define P10_INVITE TYPE(INVITE)
259#define P10_ISON TYPE(ISON)
260#define P10_JOIN TYPE(JOIN)
261#define P10_JUPE TYPE(JUPE)
262#define P10_KICK TYPE(KICK)
263#define P10_KILL TYPE(KILL)
264#define P10_LINKS TYPE(LINKS)
265#define P10_LIST TYPE(LIST)
266#define P10_LUSERS TYPE(LUSERS)
267#define P10_MAP TYPE(MAP)
23475fc6 268#define P10_MARK TYPE(MARK)
d76ed9a9 269#define P10_MODE TYPE(MODE)
270#define P10_MOTD TYPE(MOTD)
271#define P10_NAMES TYPE(NAMES)
272#define P10_NICK TYPE(NICK)
273#define P10_NOTICE TYPE(NOTICE)
274#define P10_OPER TYPE(OPER)
275#define P10_OPMODE TYPE(OPMODE)
276#define P10_PART TYPE(PART)
277#define P10_PASS CMD_PASS
278#define P10_PING TYPE(PING)
279#define P10_PONG TYPE(PONG)
280#define P10_POST TYPE(POST)
281#define P10_PRIVMSG TYPE(PRIVMSG)
282#define P10_PRIVS TYPE(PRIVS)
283#define P10_PROTO TYPE(PROTO)
284#define P10_QUIT TYPE(QUIT)
285#define P10_REHASH TYPE(REHASH)
286#define P10_RESET TYPE(RESET)
287#define P10_RESTART TYPE(RESTART)
288#define P10_RPING TYPE(RPING)
289#define P10_RPONG TYPE(RPONG)
290#define P10_SERVER CMD_SERVER
291#define P10_SERVLIST TYPE(SERVLIST)
292#define P10_SERVSET TYPE(SERVSET)
293#define P10_SET TYPE(SET)
294#define P10_SETTIME TYPE(SETTIME)
59b38cc0 295#define P10_SGLINE TYPE(SGLINE)
d914d1cb 296#define P10_SHUN TYPE(SHUN)
d76ed9a9 297#define P10_SILENCE TYPE(SILENCE)
56b83e80 298#define P10_SMO TYPE(SMO)
1c76f1b4 299#define P10_SNO TYPE(SNO)
59b38cc0 300#define P10_SSHUN TYPE(SSHUN)
4b2dcc0d 301#define P10_SPAMFILTER TYPE(SPAMFILTER)
d76ed9a9 302#define P10_SQUERY TYPE(SQUERY)
303#define P10_SQUIT TYPE(SQUIT)
304#define P10_STATS TYPE(STATS)
cd25f2e9 305#define P10_SVSJOIN TYPE(SVSJOIN)
d76ed9a9 306#define P10_SVSNICK TYPE(SVSNICK)
cd25f2e9 307#define P10_SVSPART TYPE(SVSPART)
5e6460e4 308#define P10_SVSQUIT TYPE(SVSQUIT)
56958740 309#define P10_SWHOIS TYPE(SWHOIS)
d76ed9a9 310#define P10_TIME TYPE(TIME)
311#define P10_TOPIC TYPE(TOPIC)
312#define P10_TRACE TYPE(TRACE)
313#define P10_UPING TYPE(UPING)
314#define P10_USER TYPE(USER)
315#define P10_USERHOST TYPE(USERHOST)
316#define P10_USERIP TYPE(USERIP)
317#define P10_VERSION TYPE(VERSION)
318#define P10_WALLCHOPS TYPE(WALLCHOPS)
319#define P10_WALLOPS TYPE(WALLOPS)
55342ce8 320#define P10_WALLHOPS TYPE(WALLHOPS)
d76ed9a9 321#define P10_WALLUSERS TYPE(WALLUSERS)
322#define P10_WALLVOICES TYPE(WALLVOICES)
323#define P10_WHO TYPE(WHO)
324#define P10_WHOIS TYPE(WHOIS)
325#define P10_WHOWAS TYPE(WHOWAS)
850bf0cf 326#define P10_EXEMPT TYPE(EXEMPT)
d76ed9a9 327
328/* Servers claiming to have a boot or link time before PREHISTORY
329 * trigger errors to the log. We hope no server has been running
330 * constantly since September 1994. :)
331 */
332#define PREHISTORY 780000000
333
08895577 334#define MODELEN 40 + KEYLEN
335
d76ed9a9 336static struct server *servers_num[64*64];
337static privmsg_func_t *privmsg_funcs;
338static unsigned int num_privmsg_funcs;
339static privmsg_func_t *notice_funcs;
340static unsigned int num_notice_funcs;
341static struct dict *unbursted_channels;
1136f709 342static const char *his_servername;
343static const char *his_servercomment;
805e7c7a 344static int extended_accounts;
d76ed9a9 345
57fdf922 346/* These correspond to 1 << X: 012345678901234567 */
347const char irc_user_mode_chars[] = "o iw dkgn I";
348
d76ed9a9 349static struct userNode *AddUser(struct server* uplink, const char *nick, const char *ident, const char *hostname, const char *modes, const char *numeric, const char *userinfo, time_t timestamp, const char *realip);
350
351extern int off_channel;
08895577 352extern int DefConLevel;
08895577 353extern int DefConTimeOut;
354extern char *DefConChanModes;
d76ed9a9 355
2f61d1d7 356static int parse_oplevel(char *str);
357
89d871d8 358char privbuf[512] = "";
359
d76ed9a9 360/* Numerics can be XYY, XYYY, or XXYYY; with X's identifying the
361 * server and Y's indentifying the client on that server. */
362struct server*
363GetServerN(const char *numeric)
364{
365 switch (strlen(numeric)) {
366 default:
367 return servers_num[base64toint(numeric, 2)];
368 case 4:
369 case 3:
370 case 1:
371 return servers_num[base64toint(numeric, 1)];
372 case 0:
373 return NULL;
374 }
375}
376
377struct userNode*
378GetUserN(const char *numeric) /* using numeric */
379{
380 struct userNode *un;
381 struct server *s;
382 int n, slen, ulen;
383
384 switch (strlen(numeric)) {
385 default:
386 log_module(MAIN_LOG, LOG_WARNING, "GetUserN(%s): numeric too long!", numeric);
387 return NULL;
388 case 5: slen = 2; ulen = 3; break;
389 case 4: slen = 1; ulen = 3; break;
390 case 3: slen = 1; ulen = 2; break;
391 case 2: case 1: case 0:
392 log_module(MAIN_LOG, LOG_WARNING, "GetUserN(%s): numeric too short!", numeric);
393 return NULL;
394 }
395 if (!(s = servers_num[base64toint(numeric, slen)])) {
396 log_module(MAIN_LOG, LOG_WARNING, "GetUserN(%s): couldn't find server (len=%d)!", numeric, slen);
397 return NULL;
398 }
399 n = base64toint(numeric+slen, ulen) & s->num_mask;
400 if (!(un = s->users[n])) {
401 log_module(MAIN_LOG, LOG_WARNING, "GetUserN(%s) couldn't find user!", numeric);
402 }
403 return un;
404}
405
da5b7dfc 406extern struct userNode *opserv;
407static void
408check_ctcp(struct userNode *user, struct userNode *bot, char *text, UNUSED_ARG(int server_qualified))
409{
410 char *cmd;
411 /* if its a version reply, do an alert check (only alerts with version=something) */
412 if(bot == opserv) {
413 if(text[0] == '\001') {
414 text++;
415 cmd = mysep(&text, " ");
416 if(!irccasecmp(cmd, "VERSION")) {
417 char *version = mysep(&text, "\n");
418 if(!version)
419 version = "";
420 /* opserv_debug("Opserv got CTCP VERSION Notice from %s: %s", user->nick, version); */
421 /* TODO: setup a ctcp_funcs thing to handle this and other CTCPS properly */
422 user->version_reply = strdup(version);
423 /* TODO: put this in the db */
424 if(match_ircglob(version, "WebTV;*"))
425 user->no_notice = true; /* webbies cant see notices */
426 }
427 }
428 }
429}
430
431
d76ed9a9 432static void
433privmsg_user_helper(struct userNode *un, void *data)
434{
435 struct privmsg_desc *pd = data;
436 unsigned int num = un->num_local;
437 if (!pd->is_notice) {
438 if ((num < num_privmsg_funcs) && privmsg_funcs[num]) {
439 privmsg_funcs[num](pd->user, un, pd->text, pd->is_qualified);
440 }
441 } else {
442 if ((num < num_notice_funcs) && notice_funcs[num]) {
da5b7dfc 443 check_ctcp(pd->user, un, pd->text, pd->is_qualified);
d76ed9a9 444 notice_funcs[num](pd->user, un, pd->text, pd->is_qualified);
445 }
446 }
447}
448
47956fc5 449/* equiv to user doing /connect server port target */
450void irc_connect(struct userNode *user, char *server, unsigned int port, struct server *target)
451{
452 putsock("%s " P10_CONNECT " %s %d %s", user->numeric, server, port, target->numeric);
453}
454
455void
456irc_squit_route(struct server *srv, const char *message, ...)
457{
458 va_list arg_list;
459 char buffer[MAXLEN];
460 va_start(arg_list, message);
461 vsnprintf(buffer, MAXLEN-2, message, arg_list);
462 buffer[MAXLEN-1] = 0;
463
464 /* When would we squit ourselves exactly?? -Rubin */
465 if(srv == self && cManager.uplink->state == CONNECTED ) {
466 unsigned int i;
467
468 /* Quit all clients linked to me. */
469 for(i = 0; i <= self->num_mask; i++) {
470 if(!self->users[i])
471 continue;
472 irc_quit(self->users[i], buffer);
473 }
474 }
475
476 putsock("%s " P10_SQUIT " %s %d :%s", self->numeric, srv->name, 0, buffer);
477
478 if(srv == self) {
479 /* Force a reconnect to the currently selected server. */
480 cManager.uplink->tries = 0;
481 log_module(MAIN_LOG, LOG_INFO, "Squitting from uplink: %s", buffer);
482 close_socket();
483 }
484}
485
d76ed9a9 486void
487irc_server(struct server *srv)
488{
489 char extranum[COMBO_NUMERIC_LEN+1];
490
491 inttobase64(extranum, srv->num_mask, (srv->numeric[1] || (srv->num_mask >= 64*64)) ? 3 : 2);
492 if (srv == self) {
a837dcf5 493 putsock(P10_SERVER " %s %d " FMT_TIME_T " " FMT_TIME_T " J10 %s%s +s6 :%s",
1136f709 494 srv->name, srv->hops+1, srv->boot, srv->link_time, srv->numeric, extranum, srv->description);
d76ed9a9 495 } else {
a837dcf5 496 putsock("%s " P10_SERVER " %s %d " FMT_TIME_T " " FMT_TIME_T " %c10 %s%s +s6 :%s",
1136f709 497 self->numeric, srv->name, srv->hops+1, srv->boot, srv->link_time, (srv->self_burst ? 'J' : 'P'), srv->numeric, extranum, srv->description);
d76ed9a9 498 }
499}
500
cf8bedff 501void
2f61d1d7 502irc_p10_pton(irc_in_addr_t *ip, const char *input)
503{
504 if (strlen(input) == 6) {
505 unsigned int value;
506 memset(ip, 0, 6 * sizeof(ip->in6[0]));
507 value = base64toint(input, 6);
508 if (value)
509 ip->in6[5] = htons(65535);
510 ip->in6[6] = htons(value >> 16);
511 ip->in6[7] = htons(value & 65535);
512 } else {
513 unsigned int pos = 0;
514 do {
515 if (*input == '_') {
516 unsigned int left;
517 for (left = (25 - strlen(input)) / 3; left; left--)
518 ip->in6[pos++] = 0;
519 input++;
520 } else {
521 ip->in6[pos++] = ntohs(base64toint(input, 3));
522 input += 3;
523 }
524 } while (pos < 8);
525 }
526}
527
cf8bedff 528void
2f61d1d7 529irc_p10_ntop(char *output, const irc_in_addr_t *ip)
530{
531 if (!irc_in_addr_is_valid(*ip)) {
532 strcpy(output, "AAAAAA");
533 } else if (irc_in_addr_is_ipv4(*ip)) {
534 unsigned int in4;
535 in4 = (ntohs(ip->in6[6]) << 16) | ntohs(ip->in6[7]);
536 inttobase64(output, in4, 6);
537 output[6] = '\0';
538 } else if (irc_in_addr_is_ipv6(*ip)) {
539 unsigned int max_start, max_zeros, curr_zeros, zero, ii;
540 /* Can start by printing out the leading non-zero parts. */
541 for (ii = 0; (ip->in6[ii]) && (ii < 8); ++ii) {
542 inttobase64(output, ntohs(ip->in6[ii]), 3);
543 output += 3;
544 }
545 /* Find the longest run of zeros. */
546 for (max_start = zero = ii, max_zeros = curr_zeros = 0; ii < 8; ++ii) {
547 if (!ip->in6[ii])
548 curr_zeros++;
549 else if (curr_zeros > max_zeros) {
550 max_start = ii - curr_zeros;
551 max_zeros = curr_zeros;
552 curr_zeros = 0;
553 }
554 }
555 if (curr_zeros > max_zeros) {
556 max_start = ii - curr_zeros;
557 max_zeros = curr_zeros;
558 curr_zeros = 0;
559 }
560 /* Print the rest of the address */
561 for (ii = zero; ii < 8; ) {
562 if ((ii == max_start) && max_zeros) {
563 *output++ = '_';
564 ii += max_zeros;
565 } else {
566 inttobase64(output, ntohs(ip->in6[ii]), 3);
567 output += 3;
568 }
569 }
570 *output = '\0';
571 } else {
572 strcpy(output, "???");
573 }
574}
575
d76ed9a9 576void
577irc_user(struct userNode *user)
578{
2f61d1d7 579 char b64ip[25];
1136f709 580 if (!user || IsDummy(user))
d76ed9a9 581 return;
2f61d1d7 582 irc_p10_ntop(b64ip, &user->ip);
d76ed9a9 583 if (user->modes) {
d76ed9a9 584 char modes[32];
585
57fdf922 586 irc_user_modes(user, modes, sizeof(modes));
d76ed9a9 587 /* we don't need to put the + in modes because it's in the format string. */
a837dcf5 588 putsock("%s " P10_NICK " %s %d " FMT_TIME_T " %s %s +%s %s %s :%s",
d76ed9a9 589 user->uplink->numeric, user->nick, user->uplink->hops+1, user->timestamp, user->ident, user->hostname, modes, b64ip, user->numeric, user->info);
590 } else {
a837dcf5 591 putsock("%s " P10_NICK " %s %d " FMT_TIME_T " %s %s %s %s :%s",
d76ed9a9 592 user->uplink->numeric, user->nick, user->uplink->hops+1, user->timestamp, user->ident, user->hostname, b64ip, user->numeric, user->info);
593 }
594}
595
a45e6ec7 596void
597irc_rename(struct userNode *user, const char *new_handle)
598{
805e7c7a 599 if(extended_accounts)
600 putsock("%s " P10_ACCOUNT " %s M %s", self->numeric, user->numeric, new_handle);
a45e6ec7 601}
602
603void
604irc_delete(struct userNode *user)
605{
805e7c7a 606 if(extended_accounts)
607 putsock("%s " P10_ACCOUNT " %s U", self->numeric, user->numeric);
a45e6ec7 608}
609
d76ed9a9 610void
b21e2cfe 611irc_account(struct userNode *user, const char *stamp, time_t timestamp)
d76ed9a9 612{
805e7c7a 613 if(extended_accounts)
a837dcf5 614 putsock("%s " P10_ACCOUNT " %s R %s "FMT_TIME_T, self->numeric, user->numeric, stamp, timestamp);
805e7c7a 615 else
a837dcf5 616 putsock("%s " P10_ACCOUNT " %s %s "FMT_TIME_T, self->numeric, user->numeric, stamp, timestamp);
d76ed9a9 617}
618
619void
620irc_fakehost(struct userNode *user, const char *host)
621{
622 putsock("%s " P10_FAKEHOST " %s %s", self->numeric, user->numeric, host);
623}
624
625void
626irc_regnick(UNUSED_ARG(struct userNode *user))
627{
628 /* no operation here */
629}
630
631void
632irc_nick(struct userNode *user, UNUSED_ARG(const char *old_nick))
633{
634 putsock("%s " P10_NICK " %s "FMT_TIME_T, user->numeric, user->nick, now);
635}
636
637void
638irc_fetchtopic(struct userNode *from, const char *to)
639{
640 if (!from || !to)
641 return;
642 putsock("%s " P10_TOPIC " %s", from->numeric, to);
643}
644
645void
646irc_squit(struct server *srv, const char *message, const char *service_message)
647{
648 if (!service_message)
649 service_message = message;
650
651 /* Are we leaving the network? */
652 if (srv == self && cManager.uplink->state == CONNECTED) {
653 unsigned int i;
654
655 /* Quit all clients linked to me. */
656 for (i = 0; i <= self->num_mask; i++) {
657 if (!self->users[i])
658 continue;
659 irc_quit(self->users[i], service_message);
660 }
661 }
662
663 putsock("%s " P10_SQUIT " %s %d :%s", self->numeric, srv->name, 0, message);
664
665 if (srv == self) {
666 /* Force a reconnect to the currently selected server. */
667 cManager.uplink->tries = 0;
668 log_module(MAIN_LOG, LOG_INFO, "Squitting from uplink: %s", message);
669 close_socket();
670 }
671}
672
673void
674irc_wallchops(struct userNode *from, const char *to, const char *message)
675{
676 putsock("%s " P10_WALLCHOPS " %s :%s", from->numeric, to, message);
677}
678
47956fc5 679void
680irc_wallops(const char *format, ...)
681{
682 va_list arg_list;
683 char buffer[MAXLEN];
684 va_start(arg_list, format);
685 vsnprintf(buffer, MAXLEN-2, format, arg_list);
686 buffer[MAXLEN-1] = 0;
687 putsock("%s " P10_WALLOPS " :%s", self->numeric, buffer);
688}
689
1136f709 690static int
691deliver_to_dummy(struct userNode *source, struct userNode *dest, const char *message, int type)
692{
693 unsigned int num;
694
695 if (!dest || !IsDummy(dest) || !IsLocal(dest))
696 return 0;
697 num = dest->num_local;
698 switch (type) {
699 default:
700 if ((num < num_notice_funcs) && notice_funcs[num])
701 notice_funcs[num](source, dest, message, 0);
702 break;
703 case 1:
704 if ((num < num_privmsg_funcs) && privmsg_funcs[num])
705 privmsg_funcs[num](source, dest, message, 0);
706 break;
707 }
708 return 1;
709}
0e08a8e0 710
d76ed9a9 711void
712irc_notice(struct userNode *from, const char *to, const char *message)
713{
1136f709 714 if (to[0] == '#' || to[0] == '$'
715 || !deliver_to_dummy(from, GetUserN(to), message, 0))
716 putsock("%s " P10_NOTICE " %s :%s", from->numeric, to, message);
d76ed9a9 717}
718
719void
720irc_notice_user(struct userNode *from, struct userNode *to, const char *message)
721{
1136f709 722 if (!deliver_to_dummy(from, to, message, 0))
723 putsock("%s " P10_NOTICE " %s :%s", from->numeric, to->numeric, message);
d76ed9a9 724}
725
726void
727irc_privmsg(struct userNode *from, const char *to, const char *message)
728{
1136f709 729 if (to[0] == '#' || to[0] == '$'
730 || !deliver_to_dummy(from, GetUserN(to), message, 1))
731 putsock("%s " P10_PRIVMSG " %s :%s", from->numeric, to, message);
d76ed9a9 732}
733
39c1a4ef 734void
0e08a8e0 735irc_privmsg_user(struct userNode *from, struct userNode *to, const char *message)
736{
737 putsock("%s " P10_PRIVMSG " %s :%s", from->numeric, to->numeric, message);
738}
739
740void
741irc_version_user(struct userNode *from, struct userNode *to)
742{
743 irc_privmsg_user(from, to, "\001VERSION\001");
744}
745
d76ed9a9 746void
747irc_eob(void)
748{
749 putsock("%s " P10_EOB, self->numeric);
750}
751
752void
753irc_eob_ack(void)
754{
755 putsock("%s " P10_EOB_ACK, self->numeric);
08895577 756
757 char *nick;
758 const char *str;
759 str = conf_get_data("services/opserv/nick", RECDB_QSTRING);
760 nick = strdup(str);
761
762 if (nick && (DefConLevel < 5)) {
763 DefConProcess(GetUserH(nick));
764
765 if (DefConTimeOut > 0)
766 timeq_add(now + DefConTimeOut, defcon_timeout, NULL);
767 }
d76ed9a9 768}
769
956ee72d 770void
771irc_rpong(const char *from1, const char *from2, const char *pingtime, const char *clientinfo)
772{
773 putsock("%s " P10_RPONG " %s %s %s :%s", self->numeric, from1, from2, pingtime, clientinfo);
774}
775
d76ed9a9 776void
777irc_ping(const char *payload)
778{
779 putsock("%s " P10_PING " :%s", self->numeric, payload);
780}
781
782void
783irc_pong(const char *who, const char *data)
784{
785 putsock("%s " P10_PONG " %s :%s", self->numeric, who, data);
786}
787
2f61d1d7 788void
789irc_pong_asll(const char *who, const char *orig_ts)
790{
791 char *delim;
792 struct timeval orig;
1136f709 793 struct timeval sys_now;
2f61d1d7 794 int diff;
795
796 orig.tv_sec = strtoul(orig_ts, &delim, 10);
797 orig.tv_usec = (*delim == '.') ? strtoul(delim + 1, NULL, 10) : 0;
1136f709 798 gettimeofday(&sys_now, NULL);
799 diff = (sys_now.tv_sec - orig.tv_sec) * 1000 + (sys_now.tv_usec - orig.tv_usec) / 1000;
800 putsock("%s " P10_PONG " %s %s %d %lu.%06lu", self->numeric, who, orig_ts, diff, (unsigned long)sys_now.tv_sec, (unsigned long)sys_now.tv_usec);
2f61d1d7 801}
802
d76ed9a9 803void
804irc_pass(const char *passwd)
805{
806 putsock(P10_PASS " :%s", passwd);
807}
808
809void
810irc_introduce(const char *passwd)
811{
812 void timed_send_ping(void *data);
813
814 self->self_burst = self->burst = 1;
815 irc_pass(passwd);
816 irc_server(self);
817 burst_length = 0;
818 timeq_add(now + ping_freq, timed_send_ping, 0);
819}
820
821void
9a75756e 822irc_gline(struct server *srv, struct gline *gline, int silent)
d76ed9a9 823{
995043b4 824 putsock("%s " P10_GLINE " %s +%s " FMT_TIME_T " " FMT_TIME_T " :%s<%s> %s",
825 self->numeric, (srv ? srv->numeric : "*"), gline->target, gline->expires-now, now, silent ? "AUTO " : "", gline->issuer, gline->reason);
d76ed9a9 826}
827
d914d1cb 828void
829irc_shun(struct server *srv, struct shun *shun)
830{
995043b4 831 putsock("%s " P10_SHUN " %s +%s " FMT_TIME_T " :<%s> %s",
832 self->numeric, (srv ? srv->numeric : "*"), shun->target, shun->expires-now, shun->issuer, shun->reason);
d914d1cb 833}
834
d76ed9a9 835void
836irc_settime(const char *srv_name_mask, time_t new_time)
837{
838 ioset_set_time(new_time);
839 if (!strcmp(srv_name_mask, "*"))
840 srv_name_mask = "";
841 putsock("%s " P10_SETTIME " " FMT_TIME_T " %s", self->numeric, new_time, srv_name_mask);
842}
843
844void
845irc_ungline(const char *mask)
846{
847 putsock("%s " P10_GLINE " * -%s", self->numeric, mask);
848}
849
d914d1cb 850void
851irc_unshun(const char *mask)
852{
853 putsock("%s " P10_SHUN " * -%s", self->numeric, mask);
854}
855
e206ed60 856void
d76ed9a9 857irc_burst(struct chanNode *chan)
858{
859 char burst_line[512];
860 int pos, base_len, len;
861 struct modeNode *mn;
862 struct banNode *bn;
2aef5f4b 863 struct exemptNode *en;
d76ed9a9 864 long last_mode=-1;
1136f709 865 unsigned int first_ban;
866 unsigned int first_exempt;
d76ed9a9 867 unsigned int n;
868
869 base_len = sprintf(burst_line, "%s " P10_BURST " %s " FMT_TIME_T " ",
870 self->numeric, chan->name, chan->timestamp);
871 len = irc_make_chanmode(chan, burst_line+base_len);
872 pos = base_len + len;
1136f709 873 if (len > 0 && chan->members.used > 0)
d76ed9a9 874 burst_line[pos++] = ' ';
875
d9d33535 876 if(chan->members.used < 1)
877 return; /* dont burst empty channels (created by discrims) */
d76ed9a9 878 /* dump the users */
879 for (n=0; n<chan->members.used; n++) {
880 mn = chan->members.list[n];
881 if (pos > 500) {
882 burst_line[pos-1] = 0; /* -1 to back up over the space or comma */
883 putsock("%s", burst_line);
884 pos = base_len;
885 last_mode = -1;
886 }
c99dcaf6 887
d76ed9a9 888 memcpy(burst_line+pos, mn->user->numeric, strlen(mn->user->numeric));
889 pos += strlen(mn->user->numeric);
890 if (mn->modes && (mn->modes != last_mode)) {
891 last_mode = mn->modes;
892 burst_line[pos++] = ':';
893 if (last_mode & MODE_CHANOP)
894 burst_line[pos++] = 'o';
55342ce8 895 if (last_mode & MODE_HALFOP)
896 burst_line[pos++] = 'h';
d76ed9a9 897 if (last_mode & MODE_VOICE)
898 burst_line[pos++] = 'v';
899 }
900 if ((n+1)<chan->members.used)
901 burst_line[pos++] = ',';
902 }
903 if (chan->banlist.used) {
904 /* dump the bans */
1136f709 905 first_ban = 1;
d76ed9a9 906
1136f709 907 for (n=0; n<chan->banlist.used; ) {
908 if (first_ban && (pos < 500)) {
909 burst_line[pos++] = ':';
910 burst_line[pos++] = '%';
911 }
d76ed9a9 912 bn = chan->banlist.list[n];
913 len = strlen(bn->ban);
1136f709 914 if (pos + 2 + len < 505) {
915 memcpy(burst_line + pos, bn->ban, len);
916 pos += len;
917 burst_line[pos++] = ' ';
918 first_ban = 0;
919 n++;
920 } else {
921 burst_line[pos-1] = 0;
d76ed9a9 922 putsock("%s", burst_line);
923 pos = base_len;
1136f709 924 first_ban = 1;
d76ed9a9 925 }
d76ed9a9 926 }
927 }
2aef5f4b 928 if (chan->exemptlist.used) {
1136f709 929 /* dump the exempts */
930 first_exempt = 1;
931
932 for (n=0; n<chan->exemptlist.used; ) {
933 if (first_exempt && (pos < 500)) {
934 burst_line[pos++] = ' ';
935 burst_line[pos++] = '~';
936 burst_line[pos++] = ' ';
937 }
2aef5f4b 938 en = chan->exemptlist.list[n];
939 len = strlen(en->exempt);
1136f709 940 if (pos + 2 + len < 505) {
941 memcpy(burst_line + pos, en->exempt, len);
942 pos += len;
943 burst_line[pos++] = ' ';
944 first_exempt = 0;
945 n++;
946 } else {
947 burst_line[pos-1] = 0;
2aef5f4b 948 putsock("%s", burst_line);
949 pos = base_len;
1136f709 950 first_exempt = 1;
2aef5f4b 951 }
2aef5f4b 952 }
953 }
d76ed9a9 954 /* print the last line */
955 burst_line[pos] = 0;
956 putsock("%s", burst_line);
957}
958
959void
960irc_quit(struct userNode *user, const char *message)
961{
962 putsock("%s " P10_QUIT " :%s", user->numeric, message);
963}
964
965void
966irc_error(const char *to, const char *message)
967{
968 if (to) {
969 putsock("%s " P10_ERROR " :%s", to, message);
970 } else {
971 putsock(":%s " P10_ERROR " :%s", self->name, message);
972 }
973}
974
975void
976irc_kill(struct userNode *from, struct userNode *target, const char *message)
977{
978 if (from) {
979 putsock("%s " P10_KILL " %s :%s!%s (%s)",
980 from->numeric, target->numeric, self->name, from->nick, message);
981 } else {
982 putsock("%s " P10_KILL " %s :%s (%s)",
983 self->numeric, target->numeric, self->name, message);
984 }
985}
986
987void
988irc_mode(struct userNode *from, struct chanNode *target, const char *modes)
989{
ec311f39 990 call_channel_mode_funcs(from, target, (char **)&modes, 0);
d76ed9a9 991 putsock("%s " P10_MODE " %s %s "FMT_TIME_T,
992 (from ? from->numeric : self->numeric),
993 target->name, modes, target->timestamp);
994}
995
5a1daaab 996/* Added to allow services to mode users
997 2005 - 8 - 10 by Life4Christ
998*/
999void
1000irc_umode(struct userNode *target, const char *modes)
1001{
1002 putsock("%s " P10_MODE " %s %s ",self->numeric,target->nick, modes);
1003}
1004
1005
d76ed9a9 1006void
1007irc_invite(struct userNode *from, struct userNode *who, struct chanNode *to)
1008{
1009 putsock("%s " P10_INVITE " %s %s", from->numeric, who->nick, to->name);
1010}
1011
5177fd21 1012void
1013irc_silence(struct userNode *who, const char *mask, int add)
1014{
668dc38e 1015 putsock("%s " P10_SILENCE " %s %s%s", self->numeric, who->numeric, add ? "+" : "-", mask);
5177fd21 1016}
1017
d76ed9a9 1018void
1019irc_join(struct userNode *who, struct chanNode *what)
1020{
1021 if (what->members.used == 1) {
a837dcf5 1022 putsock("%s " P10_CREATE " %s "FMT_TIME_T,
d76ed9a9 1023 who->numeric, what->name, what->timestamp);
1024 } else {
a837dcf5 1025 putsock("%s " P10_JOIN " %s "FMT_TIME_T, who->numeric, what->name, what->timestamp);
d76ed9a9 1026 }
1027}
1028
cd25f2e9 1029void
1030irc_svsjoin(struct userNode *from, struct userNode *who, struct chanNode *to)
1031{
1032 putsock("%s " P10_SVSJOIN " %s %s "FMT_TIME_T, from->uplink->numeric, who->numeric, to->name, now);
1033}
1034
39c1a4ef 1035void
1036irc_svspart(struct userNode *from, struct userNode *who, struct chanNode *to)
1037{
1038 putsock("%s " P10_SVSPART " %s %s", from->uplink->numeric, who->numeric, to->name);
1039}
1040
5e6460e4 1041void
f20f0ab5 1042irc_svsquit(struct userNode *from, struct userNode *who, char const *reason)
5e6460e4 1043{
1044 putsock("%s " P10_SVSQUIT " %s :%s", from->uplink->numeric, who->numeric, reason);
1045}
1046
d76ed9a9 1047void
1048irc_kick(struct userNode *who, struct userNode *target, struct chanNode *channel, const char *msg)
1049{
1050 const char *numeric;
1051 struct modeNode *mn = GetUserMode(channel, who);
1052 numeric = ((mn && (mn->modes & MODE_CHANOP)) || off_channel) ? who->numeric : self->numeric;
1053 putsock("%s " P10_KICK " %s %s :%s",
1054 numeric, channel->name, target->numeric, msg);
1055}
1056
1057void
1058irc_stats(struct userNode *from, struct server *target, char type)
1059{
1060 putsock("%s " P10_STATS " %c :%s", from->numeric, type, target->numeric);
1061}
1062
1063void
1064irc_svsnick(struct userNode *from, struct userNode *target, const char *newnick)
1065{
1066 putsock("%s " P10_SVSNICK " %s %s "FMT_TIME_T, from->uplink->numeric, target->numeric, newnick, now);
1067}
1068
56958740 1069void
1070irc_swhois(struct userNode *from, struct userNode *target, const char *message)
1071{
1072 putsock("%s " P10_SWHOIS " %s %s%s", from->uplink->numeric, target->numeric, message ? ":" : "",
1073 message ? message : "");
1074
1075}
1076
d76ed9a9 1077void
1078irc_part(struct userNode *who, struct chanNode *what, const char *reason)
1079{
1080 if (reason) {
1081 putsock("%s " P10_PART " %s :%s", who->numeric, what->name, reason);
1082 } else {
1083 putsock("%s " P10_PART " %s", who->numeric, what->name);
1084 }
1085}
1086
1087void
7fda2b52 1088irc_topic(struct userNode *service, struct userNode *who, struct chanNode *what, const char *topic)
d76ed9a9 1089{
7fda2b52 1090
da4f9236 1091 int type = 4, host_in_topic = 0, hasident = 0;
5006460e 1092 const char *hstr, *tstr;
eb43ca8c 1093 char *host, *hostmask;
1094 char shost[MAXLEN];
1095 char sident[MAXLEN];
5006460e 1096
1097 tstr = conf_get_data("server/type", RECDB_QSTRING);
1098 hstr = conf_get_data("server/host_in_topic", RECDB_QSTRING);
1099 if(tstr)
1100 type = atoi(tstr);
b5c80c61 1101 else
1102 type = 4;/* default to 040 style topics */
a20238a2 1103
eb43ca8c 1104 if (hstr) {
1105 if (IsFakeHost(who))
1106 safestrncpy(shost, who->fakehost, sizeof(shost));
1107 else if (IsSetHost(who)) {
1108 hostmask = strdup(who->sethost);
da4f9236 1109 if ((host = (strrchr(hostmask, '@')))) {
1110 hasident = 1;
eb43ca8c 1111 *host++ = '\0';
da4f9236 1112 } else
eb43ca8c 1113 host = hostmask;
1114
da4f9236 1115 if (hasident)
1116 safestrncpy(sident, hostmask, sizeof(shost));
1117 else
1118 safestrncpy(sident, who->ident, sizeof(shost));
1119
eb43ca8c 1120 safestrncpy(shost, host, sizeof(shost));
1121 } else
1122 safestrncpy(shost, who->hostname, sizeof(shost));
1123
1124 host_in_topic = atoi(hstr);
1125 }
5006460e 1126
dd019452 1127 if (type >= 5) {
5006460e 1128 putsock("%s " P10_TOPIC " %s %s%s%s%s%s " FMT_TIME_T " " FMT_TIME_T " :%s", service->numeric, what->name,
eb43ca8c 1129 who->nick, host_in_topic ? "!" : "", host_in_topic ? (IsSetHost(who) ? sident : who->ident) : "",
1130 host_in_topic ? "@" : "", host_in_topic ? shost : "", what->timestamp, now, topic);
a20238a2 1131 } else {
b5c80c61 1132 who = service;
a20238a2 1133 putsock("%s " P10_TOPIC " %s :%s", who->numeric, what->name, topic);
1134 }
d76ed9a9 1135}
1136
1137void
1138irc_raw(const char *what)
1139{
1140 putsock("%s", what);
1141}
1142
1143void
1144irc_numeric(struct userNode *user, unsigned int num, const char *format, ...)
1145{
1146 va_list arg_list;
1147 char buffer[MAXLEN];
1148 va_start(arg_list, format);
1149 vsnprintf(buffer, MAXLEN-2, format, arg_list);
1150 buffer[MAXLEN-1] = 0;
1151 putsock(":%s %03d %s %s", self->name, num, user->nick, buffer);
1152}
1153
d82cf2f0 1154void
1155irc_mark(struct userNode *user, char *mark)
1156{
1157 char *host = user->hostname;
2c00fbc2 1158
1159 /* TODO: Allow mark overwrite. If they are marked, and their fakehost is oldmark.hostname, update it to newmark.hostname so mark can be called multiple times. Probably requires ircd modification also */
1160 if(user->mark)
1161 return;
1162
d82cf2f0 1163 /* if the mark will put us over the host length, clip some off the left hand side
1164 * to make room...
1165 */
1166 if(strlen(host) + 1 + strlen(mark) > HOSTLEN)
1167 host += 1 + ( (strlen(host) + 1 + strlen(mark)) - HOSTLEN );
1168 putsock("%s " CMD_MARK " %s DNSBL +m %s.%s", self->numeric, user->nick, mark, host);
1169 putsock("%s " CMD_MARK " %s DNSBL_DATA %s", self->numeric, user->nick, mark);
2c00fbc2 1170
1171 /* Save it in the user */
1172 user->mark = strdup(mark);
1173
d82cf2f0 1174 /* If they are not otherwise marked, mark their host with fakehost */
537128ea 1175 if(!IsFakeHost(user) && !IsSetHost(user) && !(IsHiddenHost(user) && user->handle_info) )
d82cf2f0 1176 {
c99dcaf6 1177 struct modeNode *mn = NULL;
1178 char fakehost[HOSTLEN];
1179 unsigned int count = 0;
1180 unsigned int n = 0;
1181
d82cf2f0 1182 putsock("%s " CMD_FAKEHOST " %s %s.%s", self->numeric, user->numeric, mark, host);
1b6b5e2f 1183 putsock("%s " CMD_MODE " %s +x", self->numeric, user->nick);
c99dcaf6 1184
1185 snprintf(fakehost, sizeof(fakehost), "%s.%s", mark, host);
1186 safestrncpy(user->fakehost, fakehost, sizeof(user->fakehost));
1187
1188 for (n=count=0; n<user->channels.used; n++) {
1189 mn = user->channels.list[n];
1b6b5e2f 1190 if (strlen(mn->channel->name) >= 1) /* Sanity */
1191 check_bans(user, mn->channel->name);
c99dcaf6 1192 }
d82cf2f0 1193 }
1194}
1195
10be9be0 1196void irc_sno(unsigned int mask, char const* format, ...) {
1197 va_list arg_list;
1198 char buffer[MAXLEN];
1199 va_start(arg_list, format);
1200 vsnprintf(buffer, MAXLEN-2, format, arg_list);
1201 buffer[MAXLEN-1] = 0;
1202 putsock("%s " CMD_SNO " %d :%s", self->numeric, mask, buffer);
1203}
1204
d76ed9a9 1205static void send_burst(void);
1206
1207static void
1208change_nicklen(int new_nicklen)
1209{
1210 unsigned int nn;
1211 char new_nick[NICKLEN+1];
1212 struct userNode *user;
1213
1214 nicklen = new_nicklen;
1215 /* fix up any users we have here */
1216 for (nn=0; nn<=self->num_mask; nn++) {
1217 if (!(user = self->users[nn]))
1218 continue;
1219 safestrncpy(new_nick, user->nick, sizeof(new_nick));
1220 new_nick[nicklen] = 0;
1221 NickChange(user, new_nick, 1);
1222 }
1223}
1224
1225static CMD_FUNC(cmd_whois)
1226{
1227 struct userNode *from;
1228 struct userNode *who;
1136f709 1229 char buf[MAXLEN];
1230 unsigned int i, mlen, len;
d76ed9a9 1231
1232 if (argc < 3)
1233 return 0;
1234 if (!(from = GetUserH(origin))) {
1235 log_module(MAIN_LOG, LOG_ERROR, "Could not find WHOIS origin user %s", origin);
1236 return 0;
1237 }
1136f709 1238 if (!(who = GetUserH(argv[2]))) {
d76ed9a9 1239 irc_numeric(from, ERR_NOSUCHNICK, "%s@%s :No such nick", argv[2], self->name);
1240 return 1;
1241 }
1136f709 1242
1243 if (IsFakeHost(who) && IsHiddenHost(who))
1244 irc_numeric(from, RPL_WHOISUSER, "%s %s %s * :%s", who->nick, who->ident, who->fakehost, who->info);
1245 else if (IsHiddenHost(who) && who->handle_info && hidden_host_suffix)
1246 irc_numeric(from, RPL_WHOISUSER, "%s %s %s.%s * :%s", who->nick, who->ident, who->handle_info->handle, hidden_host_suffix, who->info);
1247 else
1248 irc_numeric(from, RPL_WHOISUSER, "%s %s %s * :%s", who->nick, who->ident, who->hostname, who->info);
1249
1250 if (IsService(who) || (from == who)) {
1251 struct modeNode *mn;
1252 mlen = strlen(self->name) + strlen(from->nick) + 12 + strlen(who->nick);
1253 len = 0;
1254 *buf = '\0';
1255 for (i = who->channels.used; i > 0; )
1256 {
1257 mn = who->channels.list[--i];
1258
1259 if (!IsOper(from) && (mn->channel->modes & (MODE_PRIVATE | MODE_SECRET)) && !GetUserMode(mn->channel, from))
1260 continue;
1261
1262 if (len + strlen(mn->channel->name) + mlen > MAXLEN - 5)
1263 {
1264 irc_numeric(from, RPL_WHOISCHANNELS, "%s :%s", who->nick, buf);
1265 *buf = '\0';
1266 len = 0;
1267 }
1268
1269 if (IsDeaf(who))
1270 *(buf + len++) = '-';
1271 if ((mn->channel->modes & (MODE_PRIVATE | MODE_SECRET)) && !GetUserMode(mn->channel, from))
1272 *(buf + len++) = '*';
1273 if (mn->modes & MODE_CHANOP)
1274 *(buf + len++) = '@';
1275 else if (mn->modes & MODE_HALFOP)
1276 *(buf + len++) = '%';
1277 else if (mn->modes & MODE_VOICE)
1278 *(buf + len++) = '+';
1279
1280 if (len)
1281 *(buf + len) = '\0';
1282 strcpy(buf + len, mn->channel->name);
1283 len += strlen(mn->channel->name);
1284 strcat(buf + len, " ");
1285 len++;
1286 }
1287 if (buf[0] != '\0')
1288 irc_numeric(from, RPL_WHOISCHANNELS, "%s :%s", who->nick, buf);
d76ed9a9 1289 }
1136f709 1290
1291 if (his_servername && his_servercomment && !IsOper(from) && from != who)
a32da4c7 1292 irc_numeric(from, RPL_WHOISSERVER, "%s %s :%s", who->nick, his_servername, his_servercomment);
d76ed9a9 1293 else
a32da4c7 1294 irc_numeric(from, RPL_WHOISSERVER, "%s %s :%s", who->nick, who->uplink->name, who->uplink->description);
1136f709 1295
1296 if (IsAway(who))
1297 irc_numeric(from, RPL_AWAY, "%s :Away", who->nick);
a32da4c7 1298 if (IsOper(who))
1136f709 1299 irc_numeric(from, RPL_WHOISOPERATOR, "%s :%s", who->nick, IsLocal(who) ? "is a megalomaniacal power hungry tyrant" : "is an IRC Operator");
1300 if (who->handle_info)
1301 irc_numeric(from, RPL_WHOISACCOUNT, "%s %s :is logged in as", who->nick, who->handle_info->handle);
1302 if (IsHiddenHost(who) && who->handle_info && (IsOper(from) || from == who))
1303 irc_numeric(from, RPL_WHOISACTUALLY, "%s %s@%s %s :Actual user@host, Actual IP", who->nick, who->ident, who->hostname, irc_ntoa(&who->ip));
1304 if (IsLocal(who) && !IsService(who) && (IsOper(from) || from == who))
1305 irc_numeric(from, RPL_WHOISIDLE, "%s %ld %ld :seconds idle, signon time", who->nick, now - who->idle_since, who->timestamp);
1306
d76ed9a9 1307 irc_numeric(from, RPL_ENDOFWHOIS, "%s :End of /WHOIS list", who->nick);
1308 return 1;
1309}
1310
1311static CMD_FUNC(cmd_server)
1312{
1313 struct server *srv;
1314 const char *str;
1315
1316 if (argc < 8)
1317 return 0;
a32da4c7 1318 if (self->uplink) {
d76ed9a9 1319 /* another server introduced us */
1320 srv = AddServer(GetServerH(origin), argv[1], atoi(argv[2]), atoi(argv[3]), atoi(argv[4]), argv[6], argv[argc-1]);
1321 if (!srv)
1322 return 0;
1323 srv->self_burst = argv[5][0] == 'J';
1324 srv->burst = 1;
1325 } else {
1326 /* this must be our uplink */
1327 srv = self->uplink = AddServer(self, argv[1], atoi(argv[2]), atoi(argv[3]), atoi(argv[4]), argv[6], argv[argc-1]);
1328 if (!srv)
1329 return 0;
1330 srv->self_burst = argv[5][0] == 'J';
1331 srv->burst = 1;
1332 if ((argv[7][0] == '+') && !force_n2k) {
1333 log_module(MAIN_LOG, LOG_WARNING, "Got Undernet-style SERVER message but \"force_n2k\" not on.");
1334 }
1335 send_burst();
1336 }
1337
1338 /* Fix up our timestamps if necessary. */
1339 if (srv->boot <= PREHISTORY) {
1340 /* Server from the mists of time.. */
1341 if (srv->hops == 1) {
1342 log_module(MAIN_LOG, LOG_ERROR, "Server %s claims to have booted at time "FMT_TIME_T". This is absurd.", srv->name, srv->boot);
1343 }
1344 } else if ((str = conf_get_data("server/reliable_clock", RECDB_QSTRING))
1345 && enabled_string(str)) {
1346 /* If we have a reliable clock, we just keep our current time. */
1347 } else {
1348 if (srv->boot <= self->boot) {
1349 /* The other server is older than us. Accept their timestamp.
1350 * Alternately, we are same age, but we accept their time
1351 * since we are linking to them. */
1352 self->boot = srv->boot;
1136f709 1353 ioset_set_time(srv->link_time
1354);
d76ed9a9 1355 }
1356 }
1357 if (srv == self->uplink) {
1358 extern time_t burst_begin;
1359 burst_begin = now;
1360 }
1361 return 1;
1362}
1363
47956fc5 1364
d76ed9a9 1365static CMD_FUNC(cmd_eob)
1366{
1367 struct server *sender;
1368 dict_iterator_t it;
d76ed9a9 1369
1370 if (!(sender = GetServerH(origin)))
1371 return 0;
1372 if (sender == self->uplink) {
1373 cManager.uplink->state = CONNECTED;
1374 for (it = dict_first(unbursted_channels); it; it = iter_next(it))
1375 irc_burst(iter_data(it));
1376 dict_delete(unbursted_channels);
1377 unbursted_channels = NULL;
1378 irc_eob();
1379 irc_eob_ack();
47956fc5 1380
1381 /* now that we know who our uplink is,
1382 * we can center the routing map and activate auto-routing.
1383 */
9079d26c 1384 //activate_routing(NULL, NULL, NULL);
1385 routing_init();
d76ed9a9 1386 }
1387 sender->self_burst = 0;
1388 recalc_bursts(sender);
9d59f196 1389 call_server_link_funcs(sender);
47956fc5 1390 /* let auto-routing figure out if we were
1391 * wating on this server to link a child to it */
1392 /* DONT call this if uplink is _US_ */
1393 if(sender->uplink != self)
1394 routing_handle_connect(sender->name, sender->uplink->name);
d76ed9a9 1395 return 1;
1396}
1397
1398static CMD_FUNC(cmd_eob_ack)
1399{
1400 extern time_t burst_begin;
1401
1402 if (GetServerH(origin) == self->uplink) {
1403 burst_length = now - burst_begin;
1404 self->self_burst = self->burst = 0;
1405 }
1406 cManager.uplink->state = CONNECTED;
1407 return 1;
1408}
1409
956ee72d 1410static CMD_FUNC(cmd_rping)
1411{
1412 struct server *dest;
1413
1414 if (!(dest = GetServerN(argv[1])))
74ac2349 1415 return 1; /* if its a jupe or something, return 1 so its silently ignored */
956ee72d 1416
1417 if (dest == self)
1418 irc_rpong(argv[2], argv[3], argv[4], argv[5]);
1419
1420 return 1;
1421}
1422
d76ed9a9 1423static CMD_FUNC(cmd_ping)
1424{
1425 struct server *srv;
1426 struct userNode *un;
1427
2f61d1d7 1428 if (argc > 3)
1429 irc_pong_asll(argv[2], argv[3]);
d76ed9a9 1430 else if ((srv = GetServerH(origin)))
1431 irc_pong(self->name, srv->numeric);
1432 else if ((un = GetUserH(origin)))
1433 irc_pong(self->name, un->numeric);
1434 else
1435 irc_pong(self->name, origin);
1436
1437 timeq_del(0, timed_send_ping, 0, TIMEQ_IGNORE_WHEN|TIMEQ_IGNORE_DATA);
1438 timeq_del(0, timed_ping_timeout, 0, TIMEQ_IGNORE_WHEN|TIMEQ_IGNORE_DATA);
1439 timeq_add(now + ping_freq, timed_send_ping, 0);
1440 received_ping();
1441 return 1;
1442}
1443
1444static CMD_FUNC(cmd_error_nick)
1445{
1446 /* Go back to original IRC length .. and try to reconnect :/ */
1447 change_nicklen(9);
1448 irc_squit(self, "Got erroneous nickname, truncating nicks.", NULL);
1449 return 1;
1450}
1451
1452struct create_desc {
1453 struct userNode *user;
1454 time_t when;
1455};
1456
1457static void
1458join_helper(struct chanNode *chan, void *data)
1459{
1460 struct create_desc *cd = data;
1461 AddChannelUser(cd->user, chan);
1462}
1463
1464static void
1465create_helper(char *name, void *data)
1466{
1467 struct create_desc *cd = data;
1468
1469 if (!strcmp(name, "0")) {
1470 while (cd->user->channels.used > 0)
1471 DelChannelUser(cd->user, cd->user->channels.list[0]->channel, 0, 0);
1472 return;
1473 }
1474
2aef5f4b 1475 AddChannelUser(cd->user, AddChannel(name, cd->when, NULL, NULL, NULL));
d76ed9a9 1476}
1477
1478static CMD_FUNC(cmd_create)
1479{
1480 struct create_desc cd;
1481 struct userNode *user;
1482
1483 if ((argc < 3) || !(user = GetUserH(origin)))
1484 return 0;
1485 cd.user = user;
1486 cd.when = atoi(argv[2]);
1487 parse_foreach(argv[1], join_helper, create_helper, NULL, NULL, &cd);
1488 return 1;
1489}
1490
1491static CMD_FUNC(cmd_join)
1492{
1493 struct create_desc cd;
1494
1495 if (!(cd.user = GetUserH(origin)))
1496 return 0;
1497 if (argc < 2)
1498 return 0;
1499 else if (argc < 3)
1500 cd.when = now;
1501 else
1502 cd.when = atoi(argv[2]);
1503 parse_foreach(argv[1], join_helper, create_helper, NULL, NULL, &cd);
1504 return 1;
1505}
1506
cd25f2e9 1507static CMD_FUNC(cmd_svsjoin)
1508{
1509 struct create_desc cd;
1510
1511 if (!(cd.user = GetUserH(argv[1])))
1512 return 0;
1513 if (argc < 3)
1514 return 0;
1515 else if (argc < 4)
1516 cd.when = now;
1517 else
1518 cd.when = atoi(argv[3]);
1519 parse_foreach(argv[2], join_helper, create_helper, NULL, NULL, &cd);
1520 return 1;
1521}
1522
d76ed9a9 1523static CMD_FUNC(cmd_pong)
1524{
1525 if (argc < 3)
1526 return 0;
1527 if (!strcmp(argv[2], self->name)) {
1528 timeq_del(0, timed_send_ping, 0, TIMEQ_IGNORE_WHEN|TIMEQ_IGNORE_DATA);
1529 timeq_del(0, timed_ping_timeout, 0, TIMEQ_IGNORE_WHEN|TIMEQ_IGNORE_DATA);
1530 timeq_add(now + ping_freq, timed_send_ping, 0);
1531 received_ping();
1532 }
1533 return 1;
1534}
1535
1536static CMD_FUNC(cmd_nick)
1537{
1538 struct userNode *user;
1539 if ((user = GetUserH(origin))) {
1540 /* nick change (since the source is a user numeric) */
1541 if (argc < 2)
1542 return 0;
1543 NickChange(user, argv[1], 1);
1544 } else {
1545 struct server *serv;
08895577 1546 struct userNode *nuser;
d76ed9a9 1547 char modes[MAXLEN];
1548 /* new nick */
1549 if (argc < 9)
1550 return 0;
1551 serv = GetServerH(origin);
1552 if (argc > 9)
1553 unsplit_string(argv+6, argc-9, modes);
1554 else
1555 strcpy(modes, "+");
08895577 1556 nuser = AddUser(serv, argv[1], argv[4], argv[5], modes, argv[argc-2], argv[argc-1], atoi(argv[3]), argv[argc-3]);
d76ed9a9 1557 }
1558 return 1;
1559}
1560
1561static CMD_FUNC(cmd_account)
1562{
1563 struct userNode *user;
d9cd0e9d 1564 struct server *server;
b21e2cfe 1565 struct handle_info *hi;
d76ed9a9 1566
d9cd0e9d 1567 if ((argc < 3) || !origin || !(server = GetServerH(origin)))
d76ed9a9 1568 return 0; /* Origin must be server. */
d9cd0e9d 1569
1570 /* This next line appears to tremple origin.. why? */
d76ed9a9 1571 user = GetUserN(argv[1]);
1572 if (!user)
1573 return 1; /* A QUIT probably passed the ACCOUNT. */
805e7c7a 1574
1575 if(!extended_accounts) /* any need for this function without? */
1576 return 1;
d9cd0e9d 1577
1578 if(!strcmp(argv[2],"C"))
1579 {
7dd05763 1580 if((hi = loc_auth(argv[4], argv[5], NULL)))
1581 {
1582 /* Return a AC A */
a837dcf5 1583 putsock("%s " P10_ACCOUNT " %s A %s "FMT_TIME_T, self->numeric, server->numeric , argv[3], hi->registered);
7dd05763 1584
50220e57 1585 log_module(MAIN_LOG, LOG_DEBUG, "loc_auth: %s\n", user->nick);
50220e57 1586 }
7dd05763 1587 else
1588 {
1589 /* Return a AC D */
1590 putsock("%s " P10_ACCOUNT " %s D %s", self->numeric, server->numeric , argv[3]);
1591 }
1592 return 1;
1593 }
1594 else if(!strcmp(argv[2],"H")) /* New enhanced (host) version of C */
1595 {
1596 if((hi = loc_auth(argv[5], argv[6], argv[4] )))
d9cd0e9d 1597 {
1598 /* Return a AC A */
a837dcf5 1599 putsock("%s " P10_ACCOUNT " %s A %s "FMT_TIME_T, self->numeric, server->numeric , argv[3], hi->registered);
d9cd0e9d 1600 }
1601 else
1602 {
1603 /* Return a AC D */
1604 putsock("%s " P10_ACCOUNT " %s D %s", self->numeric, server->numeric , argv[3]);
1605 }
1606 return 1;
1607 }
1608 else if(!strcmp(argv[2],"R"))
1609 call_account_func(user, argv[3]);
1610 else
1611 call_account_func(user, argv[2]); /* For backward compatability */
d76ed9a9 1612 return 1;
1613}
1614
1615static CMD_FUNC(cmd_fakehost)
1616{
1617 struct userNode *user;
1618
1619 if ((argc < 3) || !origin || !GetServerH(origin))
1620 return 0;
1621 if (!(user = GetUserN(argv[1])))
1622 return 1;
1623 assign_fakehost(user, argv[2], 0);
1624 return 1;
1625}
1626
89d871d8 1627static struct {
1628 char *name;
1629 unsigned int priv;
1630} privtab[] = {
1631#define P(priv) { #priv, PRIV_ ## priv }
1632 P(CHAN_LIMIT), P(MODE_LCHAN), P(WALK_LCHAN), P(DEOP_LCHAN),
1633 P(SHOW_INVIS), P(SHOW_ALL_INVIS), P(UNLIMIT_QUERY), P(KILL),
1634 P(LOCAL_KILL), P(REHASH), P(RESTART), P(DIE),
1635 P(GLINE), P(LOCAL_GLINE), P(JUPE), P(LOCAL_JUPE),
1636 P(OPMODE), P(LOCAL_OPMODE), P(SET), P(WHOX),
1637 P(BADCHAN), P(LOCAL_BADCHAN), P(SEE_CHAN), P(PROPAGATE),
1638 P(DISPLAY), P(SEE_OPERS), P(WIDE_GLINE), P(FORCE_OPMODE),
1639 P(FORCE_LOCAL_OPMODE), P(REMOTEREHASH), P(CHECK), P(SEE_SECRET_CHAN),
625ccd4e 1640 P(SHUN), P(LOCAL_SHUN), P(WIDE_SHUN), P(ZLINE),
055f3f30 1641 P(LOCAL_ZLINE), P(WIDE_ZLINE), P(LIST_CHAN), P(WHOIS_NOTICE),
c9aeceb5 1642 P(HIDE_IDLE), P(XTRAOP), P(HIDE_CHANNELS), P(DISPLAY_MODE),
1643 P(FREEFORM), P(REMOVE), P(SPAMFILTER),
89d871d8 1644#undef P
1645 { 0, 0 }
1646};
1647
1648char *client_report_privs(struct userNode *client)
1649{
1650 int i;
1651
1652 privbuf[0] = '\0';
1653 for (i = 0; privtab[i].name; i++) {
1654 if (HasPriv(client, privtab[i].priv)) {
1655 strcat(privbuf, privtab[i].name);
1656 strcat(privbuf, " ");
1657 }
1658 }
1659
1660 privbuf[strlen(privbuf)] = 0;
1661
1662 return privbuf;
1663}
1664
9c88eebe 1665int clear_privs(struct userNode *who) {
1666 int i = 0;
1667 assert(0 != who);
1668
1669 for (i = 0; privtab[i].name; i++)
1670 RevokePriv(who, privtab[i].priv);
1671
1672 return 0;
1673}
1674
89d871d8 1675int client_modify_priv_by_name(struct userNode *who, char *priv, int what) {
1676 int i = 0;
1677 assert(0 != priv);
1678 assert(0 != who);
1679
1680 for (i = 0; privtab[i].name; i++) {
1681 if (0 == strcmp(privtab[i].name, priv)) {
1682 if (what == PRIV_ADD)
1683 GrantPriv(who, privtab[i].priv);
1684 else if (what == PRIV_DEL) {
1685 RevokePriv(who, privtab[i].priv);
1686 }
1687 }
1688 }
1689 return 0;
1690}
1691
6c34bb5a 1692int check_priv(char *priv)
1693{
1694 int i;
1695
1696 for (i = 0; privtab[i].name; i++) {
1697 if (0 == strcmp(privtab[i].name, priv)) {
1698 return 1;
1699 }
1700 }
1701 return 0;
1702}
1703
1704void
1705irc_privs(struct userNode *target, char *flag, int add)
1706{
1707 client_modify_priv_by_name(target, flag, add);
1708 putsock("%s " P10_PRIVS " %s %s%s", self->numeric, target->numeric, (add == PRIV_ADD) ? "+" : "-", flag);
1709}
1710
69517d70 1711void
6ae87c77 1712irc_raw_privs(struct userNode *target, const char *privs)
69517d70 1713{
1714 putsock("%s " P10_PRIVS " %s %s", self->numeric, target->numeric, privs);
1715}
1716
89d871d8 1717static CMD_FUNC(cmd_privs)
1718{
9c88eebe 1719 char *tstr = NULL;
1720 char buf[512] = "";
1721 char *p = 0;
1722 char *tmp;
89d871d8 1723
9c88eebe 1724 int what = PRIV_ADD;
1725 int type = 0;
89d871d8 1726
9c88eebe 1727 unsigned int i;
89d871d8 1728
9c88eebe 1729 struct server *sender;
1730 struct userNode *user;
89d871d8 1731
89d871d8 1732
9c88eebe 1733 tstr = conf_get_data("server/type", RECDB_QSTRING);
1734 if(tstr)
1735 type = atoi(tstr);
89d871d8 1736
89d871d8 1737
9c88eebe 1738 if (!(sender = GetServerH(origin))) { /* from oper */
1739 return 1; /* ignore as no services have privs set */
1740 } else { /* from server */
1741 if (type < 5)
1742 return 1; /* silently ignore */
1743
1744 user = argc > 1 ? GetUserN(argv[1]) : NULL;
1745
1746 if (!user)
1747 return 0;
1748
1749 for (i=1; i<argc; i++) {
1750 strcat(buf, argv[i]);
1751 strcat(buf, " ");
1752 }
1753
1754 for (i = 2; i < argc; i++) {
1755 if (*argv[i] == '+') { what = PRIV_ADD; argv[i]++; }
1756 if (*argv[i] == '-') { what = PRIV_DEL; argv[i]++; }
1757 for (tmp = x3_strtok(&p, argv[i], ","); tmp;
1758 tmp = x3_strtok(&p, NULL, ",")) {
1759 if (!strcmp(tmp, "PRIV_NONE")) {
1760 clear_privs(user);
1761 break;
1762 } else
1763 client_modify_priv_by_name(user, tmp, what);
1764 }
1765 }
89d871d8 1766 }
9c88eebe 1767 return 1;
89d871d8 1768}
1769
d76ed9a9 1770static CMD_FUNC(cmd_burst)
1771{
1772 extern int rel_age;
2aef5f4b 1773 char modes[MAXLEN], *members = "";
1774 static char exemptlist[MAXLEN], banlist[MAXLEN];
a32da4c7 1775 unsigned int next = 3, res = 1;
2aef5f4b 1776 int ctype = 0, echeck = 0, bcheck = 0;
fa86a9e7 1777 struct chanData *cData;
d76ed9a9 1778 struct chanNode *cNode;
1779 struct userNode *un;
1780 struct modeNode *mNode;
1781 long mode;
2f61d1d7 1782 int oplevel = -1;
d76ed9a9 1783 char *user, *end, sep;
1784 time_t in_timestamp;
2aef5f4b 1785 char* parm = NULL;
d76ed9a9 1786
1787 if (argc < 3)
1788 return 0;
1789 modes[0] = 0;
2aef5f4b 1790
1791 exemptlist[0] = 0;
1792 banlist[0] = 0;
1793
d76ed9a9 1794 while (next < argc) {
1795 switch (argv[next][0]) {
1796 case '+': {
1797 const char *pos;
1798 int n_modes;
a32da4c7 1799 for (pos=argv[next], n_modes = 1; *pos; pos++)
2f61d1d7 1800 if ((*pos == 'k') || (*pos == 'l') || (*pos == 'A')
1801 || (*pos == 'U'))
d76ed9a9 1802 n_modes++;
1136f709 1803 if (next + n_modes > argc)
1804 n_modes = argc - next;
d76ed9a9 1805 unsplit_string(argv+next, n_modes, modes);
1806 next += n_modes;
1807 break;
1808 }
2aef5f4b 1809 case '%': {
1810 for(parm = mysep(&argv[next], " "); /* parm = first param */
1811 parm; /* While param is not null */
1812 parm = mysep(&argv[next], " ") /* parm = next param */
1813 )
1814 {
1815 switch (parm[0]) {
1816 case '%': {
1817 ctype = 1;
1818 break;
1819 }
1820 case '~': {
1821 ctype = 2;
1822 break;
1823 }
1824 default: {
1825 break;
1826 }
1827 }
1828 if (ctype == 1) {
1829 if (bcheck == 0) {
1830 /* strip % char off start of very first ban */
23475fc6 1831 if (strlen(parm) > 1) {
1832 strncat(banlist, strtok(parm, "%"), sizeof(banlist) - 1 - strlen(banlist));
1833 strncat(banlist, " ", sizeof(banlist) - 1 - strlen(banlist));
1834 }
2aef5f4b 1835 bcheck = 1;
1836 } else {
1837 strncat(banlist, parm, sizeof(banlist) - 1 - strlen(banlist));
1838 strncat(banlist, " ", sizeof(banlist) - 1 - strlen(banlist));
1839 }
1840 } else if (ctype == 2) {
1841 if (echeck == 0) {
1842 echeck = 1;
1843 } else {
1844 strncat(exemptlist, parm, sizeof(exemptlist) - 1 - strlen(exemptlist));
1845 strncat(exemptlist, " ", sizeof(exemptlist) - 1 - strlen(exemptlist));
1846 }
1847 }
1848 }
1849 next++;
1850 break;
1851 }
a32da4c7 1852 default: members = argv[next++]; break;
2aef5f4b 1853 }
d76ed9a9 1854 }
1855
1856 in_timestamp = atoi(argv[2]);
1857 if ((cNode = dict_find(unbursted_channels, argv[1], NULL))) {
1858 cNode->timestamp = in_timestamp;
1859 dict_remove(unbursted_channels, cNode->name);
1860 irc_burst(cNode);
1861 }
2aef5f4b 1862 cNode = AddChannel(argv[1], in_timestamp, modes, banlist, exemptlist);
fa86a9e7 1863 cData = cNode->channel_info;
1864
1865 if (!cData) {
1866 if (cNode->modes & MODE_REGISTERED) {
1867 irc_join(opserv, cNode);
1868 irc_mode(opserv, cNode, "-z");
1869 irc_part(opserv, cNode, "");
1870 }
1871 }
2aef5f4b 1872
a32da4c7 1873 /* Burst channel members in now. */
d76ed9a9 1874 for (user = members, sep = *members, mode = 0; sep; user = end) {
1875 for (end = user + 3; isalnum(*end) || *end == '[' || *end == ']'; end++) ;
1876 sep = *end++; end[-1] = 0;
1877 if (sep == ':') {
1878 mode = 0;
1879 while ((sep = *end++)) {
2f61d1d7 1880 if (sep == 'o') {
d76ed9a9 1881 mode |= MODE_CHANOP;
2f61d1d7 1882 oplevel = -1;
1883 } else if (sep == 'h') {
55342ce8 1884 mode |= MODE_HALFOP;
2f61d1d7 1885 oplevel = -1;
1886 } else if (sep == 'v') {
d76ed9a9 1887 mode |= MODE_VOICE;
2f61d1d7 1888 oplevel = -1;
1889 } else if (isdigit(sep)) {
1117fc5a 1890 mode |= MODE_CHANOP;
2f61d1d7 1891 if (oplevel >= 0)
1892 oplevel += parse_oplevel(end);
1893 else
1894 oplevel = parse_oplevel(end);
1117fc5a 1895 while (isdigit(*end)) end++;
1896 } else
d76ed9a9 1897 break;
1898 }
1899 if (rel_age < 0)
1900 mode = 0;
1901 }
1902 if (!(un = GetUserN(user))) {
1903 res = 0;
1904 continue;
1905 }
2f61d1d7 1906 if ((mNode = AddChannelUser(un, cNode))) {
d76ed9a9 1907 mNode->modes = mode;
2f61d1d7 1908 mNode->oplevel = oplevel;
1909 }
d76ed9a9 1910 }
1911
1912 return res;
1913}
1914
d82cf2f0 1915/* TODO:
1916 * This is a stub that doesn't actually do anything. It should be completed
1917 * so that bans on *!*@markname.* match users as it does in nefarious
1918 */
1919static CMD_FUNC(cmd_mark)
1920{
1921 struct userNode *target;
1922 /*
1923 * log_module(MAIN_LOG, LOG_ERROR, "DEBUG: mark, user %s, type %s, arg %s", argv[1], argv[2], argv[3]);
1924 */
1925
1926 if(argc < 4)
1927 return 0;
d82cf2f0 1928 if(!strcasecmp(argv[2], "DNSBL")) {
1929 /* DNSBL <modes> */
1930 return 1;
1931 }
1932 else if(!strcasecmp(argv[2], "DNSBL_DATA")) {
1933 /* DNSBL_DATA name */
bc06f607 1934 target = GetUserH(argv[1]);
1935 if(!target) {
6d58d26f 1936 log_module(MAIN_LOG, LOG_ERROR, "Unable to find user %s whose dnsbl mark is changing.", argv[1]);
bc06f607 1937 return 0;
1938 }
2c00fbc2 1939 target->mark = strdup(argv[3]);
d82cf2f0 1940 return 1;
1941
1942 }
6d58d26f 1943 else if(!strcasecmp(argv[2], "CVERSION")) {
1944 /* DNSBL_DATA name */
1945 target = GetUserH(argv[1]);
1946 if(!target) {
1947 log_module(MAIN_LOG, LOG_ERROR, "Unable to find user %s whose version mark is changing.", argv[1]);
1948 return 0;
1949 }
1950
fa3c07bb 1951 char *version = unsplit_string(argv + 3, argc - 3, NULL);
1952 if(!version)
1953 version = "";
1954
1955 target->version_reply = strdup(version);
1956
1957 if(match_ircglob(version, "WebTV;*"))
1958 target->no_notice = true; /* webbies cant see notices */
1959
6d58d26f 1960 return 1;
1961 }
d82cf2f0 1962 /* unknown type of mark */
1963 return 1;
1964}
1965
d76ed9a9 1966static CMD_FUNC(cmd_mode)
1967{
1968 struct chanNode *cn;
1969 struct userNode *un;
182dd032 1970 char *sethost; // sethost - reed/apples
1971 int i; // sethost - reed/apples
d76ed9a9 1972
1973 if (argc < 3)
1974 return 0;
1975 if (!IsChannelName(argv[1])) {
1976 un = GetUserH(argv[1]);
1977 if (!un) {
1978 log_module(MAIN_LOG, LOG_ERROR, "Unable to find user %s whose mode is changing.", argv[1]);
1979 return 0;
1980 }
182dd032 1981 // sethost - reed/apples
1982 if (argc == 3)
d76ed9a9 1983 mod_usermode(un, argv[2]);
182dd032 1984 else {
1985 sethost = malloc(strlen(argv[2]) + 1 + strlen(argv[3]) + 1);
1986 i = 0;
1987 while((sethost[i++] = *argv[2]++));
1988 i--;
1989 sethost[i++] = ' ';
1990 while((sethost[i++] = *argv[3]++));
1991 mod_usermode(un, sethost); // sethost - reed/apples
1992 }
1993
d76ed9a9 1994 return 1;
1995 }
1996
1997 if (!(cn = GetChannel(argv[1]))) {
1998 log_module(MAIN_LOG, LOG_ERROR, "Unable to find channel %s whose mode is changing.", argv[1]);
1999 return 0;
2000 }
2001 if ((un = GetUserH(origin))) {
2002 struct modeNode *mn;
2003 /* Update idle time for person setting the mode */
2004 if ((mn = GetUserMode(cn, un)))
2005 mn->idle_since = now;
2006 } else {
2007 /* If it came from a server, reset timestamp to re-sync. */
2008 cn->timestamp = atoi(argv[argc-1]);
2009 }
2010
08895577 2011 if (checkDefCon(DEFCON_NO_MODE_CHANGE) && !IsOper(un)) {
2012 const char *str;
2013 str = conf_get_data("services/opserv/nick", RECDB_QSTRING);
2014 if (str) {
2015 char modes[MODELEN];
2016 struct userNode *opserv = GetUserH(str);
2017
2018 send_message_type(4, un, opserv, "Channel modes cannot be changed due to DefCon level %d in effect, please try again soon", DefConLevel);
2019 irc_make_chanmode(cn, modes);
2020 irc_mode(opserv, cn, modes);
2021 irc_mode(opserv, cn, DefConChanModes);
2022 }
2023 return 1;
2024 }
2025
2026
d76ed9a9 2027 return mod_chanmode(un, cn, argv+2, argc-2, MCP_ALLOW_OVB|MCP_FROM_SERVER|(un ? MC_NOTIFY : 0));
2028}
2029
2030static CMD_FUNC(cmd_opmode)
2031{
2032 struct chanNode *cn;
2033 struct userNode *un;
2034
2035 if (argc < 3)
2036 return 0;
2037
2038 if (!(cn = GetChannel(argv[1]))) {
2039 log_module(MAIN_LOG, LOG_ERROR, "Unable to find channel %s whose mode is changing.", argv[1]);
2040 return 0;
2041 }
2042 if (!(un = GetUserH(origin))) {
2043 log_module(MAIN_LOG, LOG_ERROR, "Unable to find user %s requesting OPMODE.", origin);
2044 return 0;
2045 }
2046 if (!IsOper(un)) {
2047 log_module(MAIN_LOG, LOG_ERROR, "Non-privileged user %s using OPMODE.", un->nick);
2048 return 0;
2049 }
2050
2051 return mod_chanmode(un, cn, argv+2, argc-2, MCP_ALLOW_OVB|MCP_FROM_SERVER); /* do NOT announce opmode locally */
2052}
2053
2054static int clear_chanmode(struct chanNode *channel, const char *modes);
2055
2056static CMD_FUNC(cmd_clearmode)
2057{
2058 struct chanNode *cn;
2059 struct userNode *un;
2060
2061 if (argc < 3)
2062 return 0;
2063
2064 if (!(cn = GetChannel(argv[1]))) {
2065 log_module(MAIN_LOG, LOG_ERROR, "Unable to find channel %s whose mode is changing.", argv[1]);
2066 return 0;
2067 }
2068 if (!(un = GetUserH(origin))) {
2069 log_module(MAIN_LOG, LOG_ERROR, "Unable to find user %s requesting CLEARMODE.", origin);
2070 return 0;
2071 }
2072 if (!IsOper(un)) {
2073 log_module(MAIN_LOG, LOG_ERROR, "Non-privileged user %s using CLEARMODE.", un->nick);
2074 return 0;
2075 }
2076
2077 return clear_chanmode(cn, argv[2]);
2078}
2079
2080static CMD_FUNC(cmd_topic)
2081{
2082 struct chanNode *cn;
2083 time_t chan_ts, topic_ts;
7fda2b52 2084 struct userNode *user;
d76ed9a9 2085
2086 if (argc < 3)
2087 return 0;
2088 if (!(cn = GetChannel(argv[1]))) {
2089 log_module(MAIN_LOG, LOG_ERROR, "Unable to find channel %s whose topic is being set", argv[1]);
2090 return 0;
2091 }
7fda2b52 2092
2093
2094 if (argc == 5) { /* Asuka / Topic Bursting IRCu's */
2095 user = GetUserH(origin);
d76ed9a9 2096 chan_ts = atoi(argv[2]);
2097 topic_ts = atoi(argv[3]);
7fda2b52 2098 } else if (argc >= 6) { /* Nefarious 0.5.0 */
2099 user = GetUserH(strtok(argv[2], "!"));
2100 chan_ts = atoi(argv[3]);
2101 topic_ts = atoi(argv[4]);
2102 } else { /* Regular IRCu (No Topic Bursting)*/
2103 user = GetUserH(origin);
d76ed9a9 2104 chan_ts = cn->timestamp;
2105 topic_ts = now;
2106 }
7fda2b52 2107
2108 SetChannelTopic(cn, user, user, argv[argc-1], 0);
d76ed9a9 2109 cn->topic_time = topic_ts;
2110 return 1;
2111}
2112
2113static CMD_FUNC(cmd_num_topic)
2114{
2115 struct chanNode *cn;
2116
2117 if (!argv[0])
2118 return 0; /* huh? */
2119 if (argv[2]) {
2120 cn = GetChannel(argv[2]);
2121 if (!cn) {
2122 log_module(MAIN_LOG, LOG_ERROR, "Unable to find channel %s in topic reply", argv[2]);
2123 return 0;
2124 }
2125 } else
2126 return 0;
2127
2128 switch (atoi(argv[0])) {
2129 case 331:
2130 cn->topic_time = 0;
2131 break; /* no topic */
2132 case 332:
2133 if (argc < 4)
2134 return 0;
2135 safestrncpy(cn->topic, unsplit_string(argv+3, argc-3, NULL), sizeof(cn->topic));
2136 break;
2137 case 333:
2138 if (argc < 5)
2139 return 0;
2140 safestrncpy(cn->topic_nick, argv[3], sizeof(cn->topic_nick));
2141 cn->topic_time = atoi(argv[4]);
2142 break;
2143 default:
2144 return 0; /* should never happen */
2145 }
2146 return 1;
2147}
2148
2149static CMD_FUNC(cmd_num_gline)
2150{
cad8f3a7 2151 if (argc < 7) {
2152 if (argc < 6)
2153 return 0;
995043b4 2154 else
2155 gline_add(origin, argv[3], atoi(argv[4])-now, argv[5], now, 0, 0);
cad8f3a7 2156 } else {
995043b4 2157 if (!strcmp(argv[5], "+"))
2158 gline_add(origin, argv[3], atoi(argv[4])-now, argv[6], now, 0, 0);
cad8f3a7 2159 }
d76ed9a9 2160 return 1;
2161}
2162
d914d1cb 2163static CMD_FUNC(cmd_num_shun)
2164{
cad8f3a7 2165 if (argc < 7) {
2166 if (argc < 6)
2167 return 0;
2168 else
995043b4 2169 shun_add(origin, argv[3], atoi(argv[4])-now, argv[5], now, 0);
cad8f3a7 2170 } else {
4cb36ef0 2171 if (!strcmp(argv[5], "+"))
995043b4 2172 shun_add(origin, argv[3], atoi(argv[4])-now, argv[6], now, 0);
cad8f3a7 2173 }
d914d1cb 2174 return 1;
2175}
2176
d76ed9a9 2177static CMD_FUNC(cmd_quit)
2178{
2179 struct userNode *user;
2180 if (argc < 2)
2181 return 0;
2182 /* Sometimes we get a KILL then a QUIT or the like, so we don't want to
2183 * call DelUser unless we have the user in our grasp. */
2184 if ((user = GetUserH(origin)))
2185 DelUser(user, NULL, false, argv[1]);
2186 return 1;
2187}
2188
2189static CMD_FUNC(cmd_kill)
2190{
2191 struct userNode *user;
2192 if (argc < 2)
2193 return 0;
2194 user = GetUserN(argv[1]);
2195 if (!user) {
2196 /* If we get a KILL for a non-existent user, it could be a
2197 * Ghost response to a KILL we sent out earlier. So we only
2198 * whine if the target is local.
2199 */
2200 if (!strncmp(argv[1], self->numeric, strlen(self->numeric)))
2201 log_module(MAIN_LOG, LOG_ERROR, "Unable to find kill victim %s", argv[1]);
2202 return 0;
2203 }
2204
2205 if (IsLocal(user) && IsService(user)) {
2206 /* TODO: rate limit this so silly things don't happen. */
2207 ReintroduceUser(user);
2208 return 1;
2209 }
2210
2211 DelUser(user, NULL, false, argv[2]);
2212 return 1;
2213}
2214
cd25f2e9 2215static CMD_FUNC(cmd_svspart)
2216{
2217 struct userNode *user;
2218
2219 if (argc < 3)
2220 return 0;
c9ec8867 2221 user = GetUserN(argv[1]);
cd25f2e9 2222 if (!user)
2223 return 0;
2224 parse_foreach(argv[2], part_helper, NULL, NULL, NULL, user);
2225 return 1;
2226}
2227
a6a4707e 2228static CMD_FUNC(cmd_silence)
2229{
2230 struct userNode *user;
2231 char *mask;
f0b5157b 2232 char *new_mask;
a6a4707e 2233 unsigned int i;
2234
2235 if (argc < 2)
2236 return 0;
2237
2238 user = GetUserN(argv[1]);
2239
2240 /* Sanity, go nuts if this happens */
2241 if (!user)
2242 return 0;
2243
2244 /* We can safely ignore this if a user adding a silence is not
2245 * ignored. However this brings up a TODO. If a user logs in and
2246 * they have silences on the IRCd then we need to set them here
2247 * somehow
2248 */
2249 if (!user->handle_info)
2250 return 1;
2251
b6599cc2 2252 mask = argv[2];
a6a4707e 2253
2254 if (*mask == '-') {
2255 for (i=0; i<user->handle_info->ignores->used; i++) {
2256 if (!irccasecmp(mask+1, user->handle_info->ignores->list[i]))
2257 user->handle_info->ignores->list[i] = user->handle_info->ignores->list[--user->handle_info->ignores->used];
2258 }
2259 } else {
2260 for (i=0; i<user->handle_info->ignores->used; i++) {
2261 if (!strcmp(mask+1, user->handle_info->ignores->list[i]))
2262 return 1; /* Already on the users NickServ ignore list, safely ignore */
2263 }
2264
f0b5157b 2265 new_mask = strdup(mask+1);
b6599cc2 2266 string_list_append(user->handle_info->ignores, new_mask);
a6a4707e 2267 }
a6a4707e 2268 return 1;
2269}
2270
d76ed9a9 2271static CMD_FUNC(cmd_kick)
2272{
2273 if (argc < 3)
2274 return 0;
2275 ChannelUserKicked(GetUserH(origin), GetUserN(argv[2]), GetChannel(argv[1]));
2276 return 1;
2277}
2278
2279static CMD_FUNC(cmd_squit)
2280{
2281 struct server *server;
47956fc5 2282 char *uplink;
d76ed9a9 2283
2284 if (argc < 4)
2285 return 0;
2286 if (!(server = GetServerH(argv[1])))
2287 return 0;
2288
2289 if (server == self->uplink) {
2290 /* Force a reconnect to the currently selected server. */
2291 cManager.uplink->tries = 0;
2292 log_module(MAIN_LOG, LOG_INFO, "Squitting from uplink: %s", argv[3]);
2293 close_socket();
2294 return 1;
2295 }
2296
47956fc5 2297 uplink = strdup(server->uplink->name);
d76ed9a9 2298 DelServer(server, 0, argv[3]);
47956fc5 2299 /* if its a pingout and pingout connecting is enabled
2300 or its a read error and readerror connecting is enabled
2301 or were doing a "N" and i need to connect that server somewhere */
2302 routing_handle_squit(argv[1], uplink, argv[3]);
2303 free(uplink);
d76ed9a9 2304 return 1;
2305}
2306
2307static CMD_FUNC(cmd_privmsg)
2308{
2309 struct privmsg_desc pd;
1136f709 2310 if (argc < 3)
d76ed9a9 2311 return 0;
2312 pd.user = GetUserH(origin);
2313 if (!pd.user || (IsGagged(pd.user) && !IsOper(pd.user)))
2314 return 1;
08895577 2315
2316 if (checkDefCon(DEFCON_OPER_ONLY) && !IsOper(pd.user)) {
2317 const char *str;
2318 str = conf_get_data("services/opserv/nick", RECDB_QSTRING);
2319 if (str)
2320 send_message_type(4, pd.user, GetUserH(str), "Services are currently not available, please try again soon");
2321 return 1;
2322 }
2323
2324 if (checkDefCon(DEFCON_SILENT_OPER_ONLY) && !IsOper(pd.user))
2325 return 1; /* Silently Ignore */
2326
d76ed9a9 2327 pd.is_notice = 0;
1136f709 2328 pd.text = argv[argc - 1];
d76ed9a9 2329 parse_foreach(argv[1], privmsg_chan_helper, NULL, privmsg_user_helper, privmsg_invalid, &pd);
c99dcaf6 2330
d76ed9a9 2331 return 1;
2332}
2333
2334static CMD_FUNC(cmd_notice)
2335{
2336 struct privmsg_desc pd;
47956fc5 2337 struct server *srv;
2338 int nuser = 0;
2339
0f6fe38c 2340 if (argc != 3)
d76ed9a9 2341 return 0;
47956fc5 2342
d76ed9a9 2343 pd.user = GetUserH(origin);
47956fc5 2344 if(!pd.user)
2345 nuser = 1;
2346 if (!pd.user || (IsGagged(pd.user) && !IsOper(pd.user))) {
2347 }
2348 else {
2349 pd.is_notice = 1;
0f6fe38c 2350 pd.text = argv[2];
47956fc5 2351 parse_foreach(argv[1], privmsg_chan_helper, NULL, privmsg_user_helper, privmsg_invalid, &pd);
2352 }
2353
2354 srv = GetServerH(origin);
2355 if(srv) {
2356 char *sargv[MAXNUMPARAMS];
2357 int sargc;
2358
2359 sargc = split_line(argv[2], true, MAXNUMPARAMS, sargv);
2360
2361 if(!strcasecmp(sargv[0], "Connect:")) {
2362 /* :Connect: Host shoe.loxxin.net not listed in ircd.conf */
2363 if(!strcasecmp(sargv[3], "not") && !strcasecmp(sargv[4], "listed")) {
2364 routing_handle_connect_failure(srv, sargv[2], unsplit_string(sargv+3, sargc-3, NULL));
2365 }
2366 }
2367 else if(!strcasecmp(sargv[0], "Link")) {
2368 /* :Link with mephisto.etheria.cx cancelled: Server mephisto.etheria.cx[216.46.33.71]
2369 *
2370 * :Link with laptop.afternet.org cancelled: Connection refused
2371 */
2372 if(!strcasecmp(sargv[3], "cancelled:")) {
2373 routing_handle_connect_failure(srv, sargv[2], unsplit_string(sargv+4, sargc-4, NULL));
2374 }
2375 }
2376 }
d76ed9a9 2377 return 1;
2378}
2379
2380static CMD_FUNC(cmd_away)
2381{
2382 struct userNode *uNode;
2383
2384 uNode = GetUserH(origin);
2385 if (!uNode)
2386 return 1;
2387 if (argc < 2)
2388 uNode->modes &= ~FLAGS_AWAY;
2389 else
2390 uNode->modes |= FLAGS_AWAY;
2391 return 1;
2392}
2393
2394static CMD_FUNC(cmd_gline)
2395{
2396 if (argc < 3)
2397 return 0;
2398 if (argv[2][0] == '+') {
2399 if (argc < 5)
2400 return 0;
995043b4 2401 gline_add(origin, argv[2]+1, strtoul(argv[3], NULL, 0), argv[argc-1], now, 0, 0);
d76ed9a9 2402 return 1;
2403 } else if (argv[2][0] == '-') {
2404 gline_remove(argv[2]+1, 0);
2405 return 1;
2406 } else
2407 return 0;
2408}
2409
59b38cc0 2410static CMD_FUNC(cmd_sgline)
2411{
2412 struct server *sender;
2413
2414 if (argc < 4)
2415 return 0;
2416
2417 if (!(sender = GetServerH(origin)))
2418 return 0;
2419
995043b4 2420 gline_add(origin, argv[1], strtoul(argv[2], NULL, 0), argv[argc-1], now, 1, 0);
59b38cc0 2421 return 1;
2422}
2423
2424static CMD_FUNC(cmd_sshun)
2425{
2426 struct server *sender;
2427
2428 if (argc < 4)
2429 return 0;
2430
2431 if (!(sender = GetServerH(origin)))
2432 return 0;
2433
995043b4 2434 shun_add(origin, argv[1], strtoul(argv[2], NULL, 0), argv[argc-1], now, 1);
59b38cc0 2435 return 1;
2436}
2437
d914d1cb 2438static CMD_FUNC(cmd_shun)
2439{
2440 if (argc < 3)
2441 return 0;
2442 if (argv[2][0] == '+') {
2443 if (argc < 5)
2444 return 0;
995043b4 2445 shun_add(origin, argv[2]+1, strtoul(argv[3], NULL, 0), argv[argc-1], now, 0);
d914d1cb 2446 return 1;
2447 } else if (argv[2][0] == '-') {
2448 shun_remove(argv[2]+1, 0);
2449 return 1;
2450 } else
2451 return 0;
2452}
2453
d76ed9a9 2454static CMD_FUNC(cmd_svsnick)
2455{
2456 struct userNode *target, *dest;
2457 if ((argc < 4)
2458 || !(target = GetUserN(argv[1]))
2459 || !IsLocal(target)
2460 || (dest = GetUserH(argv[2])))
2461 return 0;
2462 NickChange(target, argv[2], 0);
2463 return 1;
2464}
2465
d76ed9a9 2466void
2467free_user(struct userNode *user)
2468{
2469 free(user->nick);
2470 free(user);
2471}
2472
2473static void
2474parse_cleanup(void)
2475{
2476 unsigned int nn;
2477 free(of_list);
e9b00805 2478 free(of_list_extra);
d76ed9a9 2479 free(privmsg_funcs);
1136f709 2480 num_privmsg_funcs = 0;
d76ed9a9 2481 free(notice_funcs);
1136f709 2482 num_notice_funcs = 0;
d76ed9a9 2483 free(mcf_list);
2484 dict_delete(irc_func_dict);
2485 for (nn=0; nn<dead_users.used; nn++)
2486 free_user(dead_users.list[nn]);
2487 userList_clean(&dead_users);
2488}
2489
2490static void
2491p10_conf_reload(void) {
2492 hidden_host_suffix = conf_get_data("server/hidden_host", RECDB_QSTRING);
1136f709 2493 his_servername = conf_get_data("server/his_servername", RECDB_QSTRING);
2494 his_servercomment = conf_get_data("server/his_servercomment", RECDB_QSTRING);
d76ed9a9 2495}
2496
2497static void
2498remove_unbursted_channel(struct chanNode *cNode) {
2499 if (unbursted_channels)
2500 dict_remove(unbursted_channels, cNode->name);
2501}
2502
2503void
2504init_parse(void)
2505{
2506 const char *str, *desc;
2507 int numnick, usermask, max_users;
2508 char numer[COMBO_NUMERIC_LEN+1];
2509
2510 /* read config items */
805e7c7a 2511 str = conf_get_data("server/extended_accounts", RECDB_QSTRING);
2512 extended_accounts = str ? enabled_string(str) : 1;
d76ed9a9 2513 str = conf_get_data("server/ping_freq", RECDB_QSTRING);
2514 ping_freq = str ? ParseInterval(str) : 120;
2515 str = conf_get_data("server/ping_timeout", RECDB_QSTRING);
2516 ping_timeout = str ? ParseInterval(str) : 30;
2517 str = conf_get_data("server/force_n2k", RECDB_QSTRING);
2518 force_n2k = str ? enabled_string(str) : 1;
2519 str = conf_get_data("server/numeric", RECDB_QSTRING);
2520 if (!str) {
2521 log_module(MAIN_LOG, LOG_ERROR, "No server/numeric entry in config file.");
2522 exit(1);
2523 }
2524 numnick = atoi(str);
2525 str = conf_get_data("server/max_users", RECDB_QSTRING);
2526 max_users = str ? atoi(str) : 4096;
2527 for (usermask = 4; usermask < max_users; usermask <<= 1) ;
2528 usermask--;
2529 if ((numnick < 64) && (usermask < 4096) && !force_n2k)
2530 inttobase64(numer, (numnick << 12) + (usermask & 0x00fff), 3);
2531 else
2532 inttobase64(numer, (numnick << 18) + (usermask & 0x3ffff), 5);
2533
d76ed9a9 2534 str = conf_get_data("server/hostname", RECDB_QSTRING);
2535 desc = conf_get_data("server/description", RECDB_QSTRING);
2536 if (!str || !desc) {
2537 log_module(MAIN_LOG, LOG_ERROR, "No server/hostname entry in config file.");
2538 exit(1);
2539 }
2540 self = AddServer(NULL, str, 0, boot_time, now, numer, desc);
2541 conf_register_reload(p10_conf_reload);
2542
2543 irc_func_dict = dict_new();
2544 dict_insert(irc_func_dict, CMD_BURST, cmd_burst);
2545 dict_insert(irc_func_dict, TOK_BURST, cmd_burst);
2546 dict_insert(irc_func_dict, CMD_CREATE, cmd_create);
2547 dict_insert(irc_func_dict, TOK_CREATE, cmd_create);
2548 dict_insert(irc_func_dict, CMD_EOB, cmd_eob);
2549 dict_insert(irc_func_dict, TOK_EOB, cmd_eob);
2550 dict_insert(irc_func_dict, CMD_EOB_ACK, cmd_eob_ack);
2551 dict_insert(irc_func_dict, TOK_EOB_ACK, cmd_eob_ack);
2552 dict_insert(irc_func_dict, CMD_MODE, cmd_mode);
2553 dict_insert(irc_func_dict, TOK_MODE, cmd_mode);
d82cf2f0 2554 dict_insert(irc_func_dict, CMD_MARK, cmd_mark);
2555 dict_insert(irc_func_dict, TOK_MARK, cmd_mark);
d76ed9a9 2556 dict_insert(irc_func_dict, CMD_NICK, cmd_nick);
2557 dict_insert(irc_func_dict, TOK_NICK, cmd_nick);
2558 dict_insert(irc_func_dict, CMD_ACCOUNT, cmd_account);
2559 dict_insert(irc_func_dict, TOK_ACCOUNT, cmd_account);
2560 dict_insert(irc_func_dict, CMD_FAKEHOST, cmd_fakehost);
2561 dict_insert(irc_func_dict, TOK_FAKEHOST, cmd_fakehost);
2562 dict_insert(irc_func_dict, CMD_PASS, cmd_pass);
2563 dict_insert(irc_func_dict, TOK_PASS, cmd_pass);
2564 dict_insert(irc_func_dict, CMD_PING, cmd_ping);
2565 dict_insert(irc_func_dict, TOK_PING, cmd_ping);
2566 dict_insert(irc_func_dict, CMD_PRIVMSG, cmd_privmsg);
2567 dict_insert(irc_func_dict, TOK_PRIVMSG, cmd_privmsg);
2568 dict_insert(irc_func_dict, CMD_PONG, cmd_pong);
2569 dict_insert(irc_func_dict, TOK_PONG, cmd_pong);
2570 dict_insert(irc_func_dict, CMD_QUIT, cmd_quit);
2571 dict_insert(irc_func_dict, TOK_QUIT, cmd_quit);
2572 dict_insert(irc_func_dict, CMD_SERVER, cmd_server);
2573 dict_insert(irc_func_dict, TOK_SERVER, cmd_server);
2574 dict_insert(irc_func_dict, CMD_JOIN, cmd_join);
2575 dict_insert(irc_func_dict, TOK_JOIN, cmd_join);
2576 dict_insert(irc_func_dict, CMD_PART, cmd_part);
2577 dict_insert(irc_func_dict, TOK_PART, cmd_part);
2578 dict_insert(irc_func_dict, CMD_ERROR, cmd_error);
2579 dict_insert(irc_func_dict, TOK_ERROR, cmd_error);
2580 dict_insert(irc_func_dict, CMD_TOPIC, cmd_topic);
2581 dict_insert(irc_func_dict, TOK_TOPIC, cmd_topic);
2582 dict_insert(irc_func_dict, CMD_AWAY, cmd_away);
2583 dict_insert(irc_func_dict, TOK_AWAY, cmd_away);
a6a4707e 2584 dict_insert(irc_func_dict, CMD_SILENCE, cmd_silence);
2585 dict_insert(irc_func_dict, TOK_SILENCE, cmd_silence);
d76ed9a9 2586 dict_insert(irc_func_dict, CMD_KICK, cmd_kick);
2587 dict_insert(irc_func_dict, TOK_KICK, cmd_kick);
2588 dict_insert(irc_func_dict, CMD_SQUIT, cmd_squit);
2589 dict_insert(irc_func_dict, TOK_SQUIT, cmd_squit);
2590 dict_insert(irc_func_dict, CMD_KILL, cmd_kill);
2591 dict_insert(irc_func_dict, TOK_KILL, cmd_kill);
2592 dict_insert(irc_func_dict, CMD_NOTICE, cmd_notice);
2593 dict_insert(irc_func_dict, TOK_NOTICE, cmd_notice);
2594 dict_insert(irc_func_dict, CMD_STATS, cmd_stats);
2595 dict_insert(irc_func_dict, TOK_STATS, cmd_stats);
cd25f2e9 2596 dict_insert(irc_func_dict, CMD_SVSJOIN, cmd_svsjoin);
2597 dict_insert(irc_func_dict, TOK_SVSJOIN, cmd_svsjoin);
d76ed9a9 2598 dict_insert(irc_func_dict, CMD_SVSNICK, cmd_svsnick);
2599 dict_insert(irc_func_dict, TOK_SVSNICK, cmd_svsnick);
cd25f2e9 2600 dict_insert(irc_func_dict, CMD_SVSPART, cmd_svspart);
2601 dict_insert(irc_func_dict, TOK_SVSPART, cmd_svspart);
56958740 2602 dict_insert(irc_func_dict, CMD_SWHOIS, cmd_dummy);
2603 dict_insert(irc_func_dict, TOK_SWHOIS, cmd_dummy);
d76ed9a9 2604 dict_insert(irc_func_dict, CMD_WHOIS, cmd_whois);
2605 dict_insert(irc_func_dict, TOK_WHOIS, cmd_whois);
2606 dict_insert(irc_func_dict, CMD_GLINE, cmd_gline);
2607 dict_insert(irc_func_dict, TOK_GLINE, cmd_gline);
59b38cc0 2608 dict_insert(irc_func_dict, CMD_SGLINE, cmd_sgline);
2609 dict_insert(irc_func_dict, TOK_SGLINE, cmd_sgline);
d914d1cb 2610 dict_insert(irc_func_dict, CMD_SHUN, cmd_shun);
2611 dict_insert(irc_func_dict, TOK_SHUN, cmd_shun);
59b38cc0 2612 dict_insert(irc_func_dict, CMD_SSHUN, cmd_sshun);
2613 dict_insert(irc_func_dict, TOK_SSHUN, cmd_sshun);
d76ed9a9 2614 dict_insert(irc_func_dict, CMD_OPMODE, cmd_opmode);
2615 dict_insert(irc_func_dict, TOK_OPMODE, cmd_opmode);
2616 dict_insert(irc_func_dict, CMD_CLEARMODE, cmd_clearmode);
2617 dict_insert(irc_func_dict, TOK_CLEARMODE, cmd_clearmode);
2618 dict_insert(irc_func_dict, CMD_VERSION, cmd_version);
2619 dict_insert(irc_func_dict, TOK_VERSION, cmd_version);
2620 dict_insert(irc_func_dict, CMD_ADMIN, cmd_admin);
2621 dict_insert(irc_func_dict, TOK_ADMIN, cmd_admin);
56b83e80 2622 dict_insert(irc_func_dict, CMD_SMO, cmd_dummy);
2623 dict_insert(irc_func_dict, TOK_SMO, cmd_dummy);
1c76f1b4 2624 dict_insert(irc_func_dict, CMD_SNO, cmd_dummy);
2625 dict_insert(irc_func_dict, TOK_SNO, cmd_dummy);
d76ed9a9 2626
956ee72d 2627 dict_insert(irc_func_dict, CMD_RPING, cmd_rping);
2628 dict_insert(irc_func_dict, TOK_RPING, cmd_rping);
8f9e3388 2629 dict_insert(irc_func_dict, CMD_RPONG, cmd_dummy);
2630 dict_insert(irc_func_dict, TOK_RPONG, cmd_dummy);
2631
d76ed9a9 2632 /* In P10, DESTRUCT doesn't do anything except be broadcast to servers.
2633 * Apparently to obliterate channels from any servers that think they
2634 * exist?
2635 */
2636 dict_insert(irc_func_dict, CMD_DESTRUCT, cmd_dummy);
2637 dict_insert(irc_func_dict, TOK_DESTRUCT, cmd_dummy);
2638 /* Ignore invites */
2639 dict_insert(irc_func_dict, CMD_INVITE, cmd_dummy);
2640 dict_insert(irc_func_dict, TOK_INVITE, cmd_dummy);
2641 /* DESYNCH is just informational, so ignore it */
2642 dict_insert(irc_func_dict, CMD_DESYNCH, cmd_dummy);
2643 dict_insert(irc_func_dict, TOK_DESYNCH, cmd_dummy);
2644 /* Ignore channel operator notices. */
2645 dict_insert(irc_func_dict, CMD_WALLCHOPS, cmd_dummy);
2646 dict_insert(irc_func_dict, TOK_WALLCHOPS, cmd_dummy);
2647 dict_insert(irc_func_dict, CMD_WALLVOICES, cmd_dummy);
2648 dict_insert(irc_func_dict, TOK_WALLVOICES, cmd_dummy);
55342ce8 2649 dict_insert(irc_func_dict, CMD_WALLHOPS, cmd_dummy);
2650 dict_insert(irc_func_dict, TOK_WALLHOPS, cmd_dummy);
d76ed9a9 2651 /* Ignore opers being silly. */
2652 dict_insert(irc_func_dict, CMD_WALLOPS, cmd_dummy);
2653 dict_insert(irc_func_dict, TOK_WALLOPS, cmd_dummy);
55342ce8 2654 dict_insert(irc_func_dict, CMD_WALLHOPS, cmd_dummy);
2655 dict_insert(irc_func_dict, TOK_WALLHOPS, cmd_dummy);
41fadebe 2656 dict_insert(irc_func_dict, TOK_WALLUSERS, cmd_dummy);
850bf0cf 2657 /* Ignore dnsbl exemptions */
2658 dict_insert(irc_func_dict, TOK_EXEMPT, cmd_dummy);
89d871d8 2659 dict_insert(irc_func_dict, CMD_PRIVS, cmd_privs);
2660 dict_insert(irc_func_dict, TOK_PRIVS, cmd_privs);
763de701 2661 /* ignore ALIST for now */
2662 dict_insert(irc_func_dict, TOK_ALIST, cmd_dummy);
2663 dict_insert(irc_func_dict, CMD_ALIST, cmd_dummy);
4b2dcc0d 2664 /* ignore SPAMFILTER */
2665 dict_insert(irc_func_dict, TOK_SPAMFILTER, cmd_dummy);
2666 dict_insert(irc_func_dict, CMD_SPAMFILTER, cmd_dummy);
a74c9eac 2667 /* Ignore remote luser */
0c835e0f 2668 dict_insert(irc_func_dict, TOK_LUSERS, cmd_dummy);
d76ed9a9 2669 /* We have reliable clock! Always! Wraaa! */
2670 dict_insert(irc_func_dict, CMD_SETTIME, cmd_dummy);
2671 dict_insert(irc_func_dict, TOK_SETTIME, cmd_dummy);
b34a7505 2672
2673 /* ignore /trace and /motd commands targetted at us */
2674 dict_insert(irc_func_dict, TOK_TRACE, cmd_dummy);
2675 dict_insert(irc_func_dict, TOK_MOTD, cmd_dummy);
74ac2349 2676 dict_insert(irc_func_dict, TOK_UPING, cmd_dummy);
b34a7505 2677
d76ed9a9 2678 /* handle topics */
2679 dict_insert(irc_func_dict, "331", cmd_num_topic);
2680 dict_insert(irc_func_dict, "332", cmd_num_topic);
2681 dict_insert(irc_func_dict, "333", cmd_num_topic);
2682 dict_insert(irc_func_dict, "345", cmd_dummy); /* blah has been invited to blah */
2683 dict_insert(irc_func_dict, "432", cmd_error_nick); /* Erroneus [sic] nickname */
2684 /* ban list resetting */
2685 /* "stats g" responses */
39b3b541 2686 dict_insert(irc_func_dict, "230", cmd_dummy); /* ignore stats headers */
d76ed9a9 2687 dict_insert(irc_func_dict, "247", cmd_num_gline);
d914d1cb 2688 dict_insert(irc_func_dict, "542", cmd_num_shun);
d76ed9a9 2689 dict_insert(irc_func_dict, "219", cmd_dummy); /* "End of /STATS report" */
2690 /* other numeric responses we might get */
2691 dict_insert(irc_func_dict, "401", cmd_dummy); /* target left network */
2692 dict_insert(irc_func_dict, "403", cmd_dummy); /* no such channel */
2693 dict_insert(irc_func_dict, "404", cmd_dummy); /* cannot send to channel */
0d16e639 2694 dict_insert(irc_func_dict, "439", cmd_dummy); /* target change too fast */
d76ed9a9 2695 dict_insert(irc_func_dict, "441", cmd_dummy); /* target isn't on that channel */
2696 dict_insert(irc_func_dict, "442", cmd_dummy); /* you aren't on that channel */
2697 dict_insert(irc_func_dict, "443", cmd_dummy); /* is already on channel (after invite?) */
2698 dict_insert(irc_func_dict, "461", cmd_dummy); /* Not enough parameters (after TOPIC w/ 0 args) */
2699 dict_insert(irc_func_dict, "467", cmd_dummy); /* Channel key already set */
2700
2701 num_privmsg_funcs = 16;
2702 privmsg_funcs = malloc(sizeof(privmsg_func_t)*num_privmsg_funcs);
2703 memset(privmsg_funcs, 0, sizeof(privmsg_func_t)*num_privmsg_funcs);
2704
2705 num_notice_funcs = 16;
2706 notice_funcs = malloc(sizeof(privmsg_func_t)*num_notice_funcs);
2707 memset(notice_funcs, 0, sizeof(privmsg_func_t)*num_notice_funcs);
2708
2709 userList_init(&dead_users);
2710 reg_del_channel_func(remove_unbursted_channel);
2711 reg_exit_func(parse_cleanup);
da5b7dfc 2712 // reg_notice_func(opserv, check_ctcp);
d76ed9a9 2713}
2714
2715int
2716parse_line(char *line, int recursive)
2717{
2718 char *argv[MAXNUMPARAMS], *origin;
2719 int argc, cmd, res=0;
2720 cmd_func_t *func;
2721
2722 argc = split_line(line, true, MAXNUMPARAMS, argv);
2723 cmd = self->uplink || !argv[0][1] || !argv[0][2];
2724 if (argc > cmd) {
2725 if (cmd) {
2726 if (argv[0][0] == ':') {
2727 origin = argv[0]+1;
2728 } else if (!argv[0][1] || !argv[0][2]) {
2729 struct server *sNode = GetServerN(argv[0]);
2730 origin = sNode ? sNode->name : 0;
2731 } else {
2732 struct userNode *uNode = GetUserN(argv[0]);
2733 origin = uNode ? uNode->nick : 0;
2734 }
2735 } else
2736 origin = 0;
2737 if ((func = dict_find(irc_func_dict, argv[cmd], NULL)))
2738 res = func(origin, argc-cmd, argv+cmd);
2739 }
2740 if (!res) {
2741 log_module(MAIN_LOG, LOG_ERROR, "PARSE ERROR on line: %s", unsplit_string(argv, argc, NULL));
2742 } else if (!recursive) {
2743 unsigned int i;
2744 for (i=0; i<dead_users.used; i++)
2745 free_user(dead_users.list[i]);
2746 dead_users.used = 0;
2747 }
2748 return res;
2749}
2750
2751static void
2752parse_foreach(char *target_list, foreach_chanfunc cf, foreach_nonchan nc, foreach_userfunc uf, foreach_nonuser nu, void *data)
2753{
2754 char *j, old;
2f61d1d7 2755
d76ed9a9 2756 do {
2757 j = target_list;
2758 while (*j != 0 && *j != ',')
2759 j++;
2760 old = *j;
2761 *j = 0;
2f61d1d7 2762
d76ed9a9 2763 if (IsChannelName(target_list)
2764 || (target_list[0] == '0' && target_list[1] == '\0')) {
2765 struct chanNode *chan = GetChannel(target_list);
2f61d1d7 2766
d76ed9a9 2767 if (chan) {
2768 if (cf)
2769 cf(chan, data);
2770 } else {
2771 if (nc)
2772 nc(target_list, data);
2773 }
2774 } else {
2775 struct userNode *user;
2776 struct privmsg_desc *pd = data;
2777
2778 pd->is_qualified = 0;
2779 if (*target_list == '@') {
2780 user = NULL;
2781 } else if (strchr(target_list, '@')) {
2782 struct server *server;
2783
2784 pd->is_qualified = 1;
2785 user = GetUserH(strtok(target_list, "@"));
2786 server = GetServerH(strtok(NULL, "@"));
2787
2788 if (user && (user->uplink != server)) {
2789 /* Don't attempt to index into any arrays
2790 using a user's numeric on another server. */
2791 user = NULL;
2792 }
2793 } else {
2794 user = GetUserN(target_list);
2795 }
2796
2797 if (user) {
2798 if (uf)
2799 uf(user, data);
2800 } else {
2801 if (nu)
2802 nu(target_list, data);
2803 }
2804 }
2805 target_list = j+1;
2806 } while (old == ',');
2807}
2808
2809static int
2810get_local_numeric(void)
2811{
2812 static unsigned int next_numeric = 0;
2813 if (self->clients > self->num_mask)
2814 return -1;
2815 while (self->users[next_numeric])
2816 if (++next_numeric > self->num_mask)
2817 next_numeric = 0;
2818 return next_numeric;
2819}
2820
2821static void
2822make_numeric(struct server *svr, int local_num, char *outbuf)
2823{
2824 int slen, llen;
2825
2826 if (force_n2k || svr->numeric[1]) {
2827 slen = 2;
2828 llen = 3;
2829 } else {
2830 slen = 1;
2831 llen = (local_num < 64*64) ? 2 : 3;
2832 }
2833 strncpy(outbuf, svr->numeric, slen);
2834 inttobase64(outbuf+slen, local_num, llen);
2835 outbuf[slen+llen] = 0;
2836}
2837
2838struct server *
1136f709 2839AddServer(struct server *uplink, const char *name, int hops, time_t boot, time_t link_time, const char *numeric, const char *description)
d76ed9a9 2840{
2841 struct server* sNode;
2842 int slen, mlen;
2843
2844 if ((sNode = GetServerN(numeric))) {
2845 /* This means we're trying to re-add an existant server.
2846 * To be safe, we should forget the previous incarnation.
2847 * (And all its linked servers.)
2848 *
2849 * It usually only happens in replays when the original
2850 * had a ping timeout and the replay didn't (because
2851 * replaying a ping timeout invariably gets things wrong).
2852 */
2853 DelServer(sNode, 0, NULL);
2854 }
2855
2856 switch (strlen(numeric)) {
2857 case 5: slen = 2; mlen = 3; break;
2858 case 4: slen = 1; mlen = 3; break;
2859 case 3: slen = 1; mlen = 2; break;
2860 default:
2861 log_module(MAIN_LOG, LOG_ERROR, "AddServer(\"%s\", \"%s\", ...): Numeric %s has invalid length.", uplink->name, name, numeric);
2862 return NULL;
2863 }
2864
2865 sNode = calloc(1, sizeof(*sNode));
2866 sNode->uplink = uplink;
2867 safestrncpy(sNode->name, name, sizeof(sNode->name));
2868 sNode->num_mask = base64toint(numeric+slen, mlen);
2869 sNode->hops = hops;
2870 sNode->boot = boot;
1136f709 2871 sNode->link_time = link_time;
d76ed9a9 2872 strncpy(sNode->numeric, numeric, slen);
2873 safestrncpy(sNode->description, description, sizeof(sNode->description));
2874 sNode->users = calloc(sNode->num_mask+1, sizeof(*sNode->users));
2875 serverList_init(&sNode->children);
2876 if (sNode->uplink) {
2877 /* uplink may be NULL if we're just building ourself */
2878 serverList_append(&sNode->uplink->children, sNode);
2879 }
2880 servers_num[base64toint(numeric, slen)] = sNode;
2881 dict_insert(servers, sNode->name, sNode);
2882 return sNode;
2883}
2884
2885void DelServer(struct server* serv, int announce, const char *message)
2886{
2887 unsigned int i;
2888
2889 /* If we receive an ERROR command before the SERVER
2890 * command a NULL server can be passed */
2891 if (!serv)
2892 return;
2893
2894 /* Hrm, what's the right way to SQUIT some other server?
2895 * (This code is only to handle killing juped servers.) */
2896 if (announce && (serv->uplink == self) && (serv != self->uplink))
2897 irc_squit(serv, message, NULL);
2898
2899 /* must recursively remove servers linked to this one first */
2900 for (i=serv->children.used;i>0;)
2901 if (serv->children.list[--i] != self)
2902 DelServer(serv->children.list[i], false, NULL);
2903
2904 /* clean up server's user hash tables */
2905 for (i=0;i<=serv->num_mask;i++)
2906 if (serv->users[i])
2907 DelUser(serv->users[i], NULL, false, "server delinked");
2908
2909 /* delete server */
2910 if (serv->uplink)
2911 serverList_remove(&serv->uplink->children, serv);
2912 if (serv == self->uplink)
2913 self->uplink = NULL;
2914 servers_num[base64toint(serv->numeric, strlen(serv->numeric))] = NULL;
2915 dict_remove(servers, serv->name);
2916 serverList_clean(&serv->children);
2917 free(serv->users);
2918 free(serv);
2919}
2920
2921struct userNode *
1136f709 2922AddLocalUser(const char *nick, const char *ident, const char *hostname, const char *desc, const char *modes)
d76ed9a9 2923{
2924 char numeric[COMBO_NUMERIC_LEN+1];
2925 int local_num = get_local_numeric();
2926 time_t timestamp = now;
2927 struct userNode *old_user = GetUserH(nick);
2928
1136f709 2929 if (!modes)
2930 modes = "+oik";
2931
d76ed9a9 2932 if (old_user) {
2933 if (IsLocal(old_user))
2934 return old_user;
2935 timestamp = old_user->timestamp - 1;
2936 }
2937 if (local_num == -1) {
2938 log_module(MAIN_LOG, LOG_ERROR, "Unable to allocate numnick for service %s", nick);
2939 return 0;
2940 }
2941 if (!hostname)
2942 hostname = self->name;
2943 make_numeric(self, local_num, numeric);
1136f709 2944 return AddUser(self, nick, ident, hostname, modes, numeric, desc, now, "AAAAAA");
d76ed9a9 2945}
2946
2947struct userNode *
2948AddClone(const char *nick, const char *ident, const char *hostname, const char *desc)
2949{
2950 char numeric[COMBO_NUMERIC_LEN+1];
2951 int local_num = get_local_numeric();
2952 time_t timestamp = now;
2953 struct userNode *old_user = GetUserH(nick);
2954
2955 if (old_user) {
2956 if (IsLocal(old_user))
2957 return old_user;
2958 timestamp = old_user->timestamp - 1;
2959 }
2960 if (local_num == -1) {
2961 log_module(MAIN_LOG, LOG_ERROR, "Unable to allocate numnick for clone %s", nick);
2962 return 0;
2963 }
2964 make_numeric(self, local_num, numeric);
2965 return AddUser(self, nick, ident, hostname, "+i", numeric, desc, timestamp, "AAAAAA");
2966}
2967
2968int
2969is_valid_nick(const char *nick) {
ec1a68c8 2970 unsigned int ii;
d76ed9a9 2971 /* IRC has some of The Most Fucked-Up ideas about character sets
2972 * in the world.. */
2973 if (!isalpha(*nick) && !strchr("{|}~[\\]^_`", *nick))
2974 return 0;
ec1a68c8 2975 for (ii = 0; nick[ii]; ++ii)
2976 if (!isalnum(nick[ii]) && !strchr("{|}~[\\]^-_`", nick[ii]))
d76ed9a9 2977 return 0;
2978 if (strlen(nick) > nicklen)
2979 return 0;
2980 return 1;
2981}
2982
2983static struct userNode*
2984AddUser(struct server* uplink, const char *nick, const char *ident, const char *hostname, const char *modes, const char *numeric, const char *userinfo, time_t timestamp, const char *realip)
2985{
2986 struct userNode *oldUser, *uNode;
f0fb2e2d 2987 unsigned int ignore_user, dummy;
412b1e16 2988 char *tstr;
2989 int type;
d76ed9a9 2990
2991 if ((strlen(numeric) < 3) || (strlen(numeric) > 5)) {
1136f709 2992 log_module(MAIN_LOG, LOG_WARNING, "AddUser(%p, %s, ...): numeric %s wrong length!", (void*)uplink, nick, numeric);
d76ed9a9 2993 return NULL;
2994 }
2995
2996 if (!uplink) {
1136f709 2997 log_module(MAIN_LOG, LOG_WARNING, "AddUser(%p, %s, ...): server for numeric %s doesn't exist!", (void*)uplink, nick, numeric);
d76ed9a9 2998 return NULL;
2999 }
3000
3001 if (uplink != GetServerN(numeric)) {
1136f709 3002 log_module(MAIN_LOG, LOG_WARNING, "AddUser(%p, %s, ...): server for numeric %s differs from nominal uplink %s.", (void*)uplink, nick, numeric, uplink->name);
d76ed9a9 3003 return NULL;
3004 }
3005
1136f709 3006 dummy = modes && modes[0] == '*';
3007 if (dummy) {
3008 ++modes;
3009 } else if (!is_valid_nick(nick)) {
3010 log_module(MAIN_LOG, LOG_WARNING, "AddUser(%p, %s, ...): invalid nickname detected.", (void*)uplink, nick);
d76ed9a9 3011 return NULL;
3012 }
3013
3014 ignore_user = 0;
3015 if ((oldUser = GetUserH(nick))) {
1136f709 3016 if (IsLocal(oldUser)
3017 && (IsService(oldUser) || IsPersistent(oldUser))) {
3018 /* The service should collide the new user off - but not
3019 * if the new user is coming in during a burst. (During a
3020 * burst, the bursting server will kill either our user --
3021 * triggering a ReintroduceUser() -- or its own.)
3022 */
d76ed9a9 3023 oldUser->timestamp = timestamp - 1;
1136f709 3024 ignore_user = 1;
3025 if (!uplink->burst)
3026 irc_user(oldUser);
3027 } else if (oldUser->timestamp > timestamp) {
d76ed9a9 3028 /* "Old" user is really newer; remove them */
3029 DelUser(oldUser, 0, 1, "Overruled by older nick");
3030 } else {
3031 /* User being added is too new; do not add them to
3032 * clients, but do add them to the server's list, since it
3033 * will send a KILL and QUIT soon. */
3034 ignore_user = 1;
3035 }
3036 }
3037
3038 /* create new usernode and set all values */
3039 uNode = calloc(1, sizeof(*uNode));
3040 uNode->nick = strdup(nick);
3041 safestrncpy(uNode->ident, ident, sizeof(uNode->ident));
3042 safestrncpy(uNode->info, userinfo, sizeof(uNode->info));
3043 safestrncpy(uNode->hostname, hostname, sizeof(uNode->hostname));
3044 safestrncpy(uNode->numeric, numeric, sizeof(uNode->numeric));
2f61d1d7 3045 irc_p10_pton(&uNode->ip, realip);
37ef8ee3 3046
412b1e16 3047 tstr = conf_get_data("server/type", RECDB_QSTRING);
3048 type = atoi(tstr);
3049 if (type > 6) {
3050 if (irc_in_addr_is_ipv4(uNode->ip)) {
3051 make_virtip((char*)irc_ntoa(&uNode->ip), (char*)irc_ntoa(&uNode->ip), uNode->cryptip);
3052 make_virthost((char*)irc_ntoa(&uNode->ip), uNode->hostname, uNode->crypthost);
3053 } else if (irc_in_addr_is_ipv6(uNode->ip)) {
3054 make_ipv6virthost((char*)irc_ntoa(&uNode->ip), uNode->hostname, uNode->crypthost);
3055 }
68b75482 3056 }
37ef8ee3 3057
f16ad9e7 3058 if (!uNode->crypthost && uNode->cryptip)
3059 snprintf(uNode->crypthost, sizeof(uNode->crypthost), "%s", strdup(uNode->cryptip));
1136f709 3060 uNode->idle_since = timestamp;
d76ed9a9 3061 uNode->timestamp = timestamp;
3062 modeList_init(&uNode->channels);
3063 uNode->uplink = uplink;
3064 if (++uNode->uplink->clients > uNode->uplink->max_clients) {
3065 uNode->uplink->max_clients = uNode->uplink->clients;
3066 }
3067 uNode->num_local = base64toint(numeric+strlen(uNode->uplink->numeric), 3) & uNode->uplink->num_mask;
3068 uNode->uplink->users[uNode->num_local] = uNode;
3069 mod_usermode(uNode, modes);
1136f709 3070 if (dummy)
3071 uNode->modes |= FLAGS_DUMMY;
21f6caee 3072
3073 set_geoip_info(uNode);
3074
d76ed9a9 3075 if (ignore_user)
3076 return uNode;
3077
3078 dict_insert(clients, uNode->nick, uNode);
3079 if (dict_size(clients) > max_clients) {
3080 max_clients = dict_size(clients);
3081 max_clients_time = now;
3082 }
3083 if (IsLocal(uNode))
3084 irc_user(uNode);
f0fb2e2d 3085 if (!uNode->dead)
3086 call_new_user_funcs(uNode);
3fdd6a74 3087
3088 if ((uNode->loc == 1) && (uNode->handle_info))
3089 send_func_list(uNode);
3090
d76ed9a9 3091 return uNode;
3092}
3093
3094/* removes user from it's server's hash table and nick hash table */
3095void
3096DelUser(struct userNode* user, struct userNode *killer, int announce, const char *why)
3097{
d76ed9a9 3098
ec1a68c8 3099 verify(user);
3100
d76ed9a9 3101 /* mark them as dead, in case anybody cares */
3102 user->dead = 1;
3103
ac3bdc8d 3104 /* remove pending adduser commands */
3105 wipe_adduser_pending(NULL, user);
3106
d76ed9a9 3107 /* remove user from all channels */
3108 while (user->channels.used > 0)
1136f709 3109 DelChannelUser(user, user->channels.list[user->channels.used-1]->channel, NULL, 0);
d76ed9a9 3110
3111 /* Call these in reverse order so ChanServ can update presence
3112 information before NickServ nukes the handle_info. */
a6bcc929 3113 call_del_user_funcs(user, killer, why);
d76ed9a9 3114
3115 user->uplink->clients--;
3116 user->uplink->users[user->num_local] = NULL;
3117 if (IsOper(user))
3118 userList_remove(&curr_opers, user);
3119 /* remove from global dictionary, but not if after a collide */
3120 if (user == dict_find(clients, user->nick, NULL))
3121 dict_remove(clients, user->nick);
3122
3123 if (IsInvisible(user))
3124 invis_clients--;
3125
3126 if (announce) {
3127 if (IsLocal(user))
3128 irc_quit(user, why);
3129 else
3130 irc_kill(killer, user, why);
3131 }
3132
1136f709 3133 if (IsLocal(user)) {
3134 unsigned int num = user->num_local;
3135 if (num < num_privmsg_funcs)
3136 privmsg_funcs[num] = NULL;
3137 if (num < num_notice_funcs)
3138 notice_funcs[num] = NULL;
3139 }
3140
d76ed9a9 3141 modeList_clean(&user->channels);
0e08a8e0 3142
3143 /* Clean up version data */
3144 if(user->version_reply) {
3145 free(user->version_reply);
3146 user->version_reply = NULL;
3147 }
3148
2c00fbc2 3149 /* clean up mark */
3150 if(user->mark) {
3151 free(user->mark);
3152 user->mark = NULL;
3153 }
3154
0e08a8e0 3155 /* clean up geoip data if any */
3156 if(user->country_code) free(user->country_code);
3157 if(user->city) free(user->city);
3158 if(user->region) free(user->region);
3159 if(user->postal_code) free(user->postal_code);
3160
d76ed9a9 3161 /* We don't free them, in case we try to privmsg them or something
3162 * (like when a stupid oper kills themself). We just put them onto
3163 * a list of clients that get freed after processing each line.
3164 */
3165 if (dead_users.size)
3166 userList_append(&dead_users, user);
3167 else
3168 free_user(user);
3169}
3170
697f4c9a 3171static void call_oper_funcs(struct userNode *user);
3172
d76ed9a9 3173void mod_usermode(struct userNode *user, const char *mode_change) {
d76ed9a9 3174 int add = 1;
3175 const char *word = mode_change;
3176
3177 if (!user || !mode_change)
3178 return;
ec311f39 3179
3180 call_user_mode_funcs(user, mode_change);
3181
a32da4c7 3182 while (*word != ' ' && *word) word++;
3183 while (*word == ' ') word++;
d76ed9a9 3184 while (1) {
3185#define do_user_mode(FLAG) do { if (add) user->modes |= FLAG; else user->modes &= ~FLAG; } while (0)
3186 switch (*mode_change++) {
3187 case 0: case ' ': return;
3188 case '+': add = 1; break;
3189 case '-': add = 0; break;
3190 case 'o':
3d0b24ce 3191 do_user_mode(FLAGS_OPER);
1136f709 3192 if (!add) {
3193 userList_remove(&curr_opers, user);
3194 } else if (!userList_contains(&curr_opers, user)) {
3195 userList_append(&curr_opers, user);
3196 call_oper_funcs(user);
3197 }
d76ed9a9 3198 break;
3199 case 'O': do_user_mode(FLAGS_LOCOP); break;
3200 case 'i': do_user_mode(FLAGS_INVISIBLE);
3201 if (add)
3202 invis_clients++;
3203 else
3204 invis_clients--;
3205 break;
3206 case 'w': do_user_mode(FLAGS_WALLOP); break;
d76ed9a9 3207 case 'd': do_user_mode(FLAGS_DEAF); break;
3208 case 'k': do_user_mode(FLAGS_SERVICE); break;
3209 case 'g': do_user_mode(FLAGS_GLOBAL); break;
cf8bedff 3210 case 'B': do_user_mode(FLAGS_BOT); break;
3211 case 'n': do_user_mode(FLAGS_HIDECHANS); break;
3212 case 'I': do_user_mode(FLAGS_HIDEIDLE); break;
3213 case 'X': do_user_mode(FLAGS_XTRAOP); break;
412b1e16 3214 case 'C': do_user_mode(FLAGS_CLOAKHOST);
3215 if (*word) {
3216 char cloakhost[MAXLEN];
3217 unsigned int ii;
3218 for (ii=0; (*word != ' ') && (*word != '\0'); )
3219 cloakhost[ii++] = *word++;
3220 cloakhost[ii] = 0;
3221 while (*word == ' ')
3222 word++;
3223 safestrncpy(user->crypthost, cloakhost, sizeof(user->crypthost));
3224 }
3225 break;
3226 case 'c': do_user_mode(FLAGS_CLOAKIP);
3227 if (*word) {
3228 char cloakip[MAXLEN];
3229 unsigned int ii;
3230 for (ii=0; (*word != ' ') && (*word != '\0'); )
3231 cloakip[ii++] = *word++;
3232 cloakip[ii] = 0;
3233 while (*word == ' ')
3234 word++;
3235 safestrncpy(user->cryptip, cloakip, sizeof(user->cryptip));
3236 }
3237 break;
cf8bedff 3238 // sethost - reed/apples
3239 // case 'h': do_user_mode(FLAGS_HELPER); break;
3240 // I check if there's an 'h' in the first part, and if there,
3241 // then everything after the space becomes their new host.
182dd032 3242 case 'h': do_user_mode(FLAGS_SETHOST);
3243 if (*word) {
3244 char sethost[MAXLEN];
3245 unsigned int ii;
3246 for (ii=0; (*word != ' ') && (*word != '\0'); )
3247 sethost[ii++] = *word++;
3248 sethost[ii] = 0;
3249 while (*word == ' ')
3250 word++;
3251 safestrncpy(user->sethost, sethost, sizeof(user->sethost));
3252 }
3253 break;
d76ed9a9 3254 case 'x': do_user_mode(FLAGS_HIDDEN_HOST); break;
3255 case 'r':
3256 if (*word) {
3257 char tag[MAXLEN];
3258 unsigned int ii;
3259 for (ii=0; (*word != ' ') && (*word != '\0'); )
3260 tag[ii++] = *word++;
3261 tag[ii] = 0;
3262 while (*word == ' ')
3263 word++;
3264 call_account_func(user, tag);
3265 }
3266 break;
3267 case 'f':
3268 if (*word) {
3269 char host[MAXLEN];
3270 unsigned int ii;
3271 for (ii=0; (*word != ' ') && (*word != '\0'); )
3272 host[ii++] = *word++;
3273 host[ii] = 0;
3274 while (*word == ' ')
3275 word++;
3276 assign_fakehost(user, host, 0);
3277 }
3278 break;
3279 }
3280#undef do_user_mode
3281 }
3282}
3283
1136f709 3284static int
3285keyncpy(char output[], char input[], size_t output_size)
3286{
3287 size_t ii;
3288
3289 if (input[0] == ':')
3290 {
3291 output[0] = '\0';
3292 return 1;
3293 }
3294
3295 for (ii = 0; (ii + 1 < output_size) && (input[ii] != '\0'); ++ii)
3296 {
3297 output[ii] = input[ii];
3298 }
3299
3300 output[ii] = '\0';
3301 return 0;
3302}
3303
d76ed9a9 3304struct mod_chanmode *
2f61d1d7 3305mod_chanmode_parse(struct chanNode *channel, char **modes, unsigned int argc, unsigned int flags, short base_oplevel)
d76ed9a9 3306{
3307 struct mod_chanmode *change;
3308 unsigned int ii, in_arg, ch_arg, add;
3309
3310 if (argc == 0)
3311 return NULL;
3312 if (!(change = mod_chanmode_alloc(argc - 1)))
3313 return NULL;
3314
3315 for (ii = ch_arg = 0, in_arg = add = 1;
3316 (modes[0][ii] != '\0') && (modes[0][ii] != ' ');
3317 ++ii) {
3318 switch (modes[0][ii]) {
3319 case '+':
3320 add = 1;
3321 break;
3322 case '-':
3323 add = 0;
3324 break;
3325#define do_chan_mode(FLAG) do { if (add) change->modes_set |= (FLAG), change->modes_clear &= ~(FLAG); else change->modes_clear |= (FLAG), change->modes_set &= ~(FLAG); } while(0)
3326 case 'C': do_chan_mode(MODE_NOCTCPS); break;
3327 case 'D': do_chan_mode(MODE_DELAYJOINS); break;
3328 case 'c': do_chan_mode(MODE_NOCOLORS); break;
3329 case 'i': do_chan_mode(MODE_INVITEONLY); break;
3330 case 'm': do_chan_mode(MODE_MODERATED); break;
3331 case 'n': do_chan_mode(MODE_NOPRIVMSGS); break;
3332 case 'p': do_chan_mode(MODE_PRIVATE); break;
3333 case 'r': do_chan_mode(MODE_REGONLY); break;
3334 case 's': do_chan_mode(MODE_SECRET); break;
3335 case 't': do_chan_mode(MODE_TOPICLIMIT); break;
d0cb2fb6 3336 case 'S': do_chan_mode(MODE_STRIPCOLOR); break;
3337 case 'M': do_chan_mode(MODE_MODUNREG); break;
3338 case 'N': do_chan_mode(MODE_NONOTICE); break;
3339 case 'Q': do_chan_mode(MODE_NOQUITMSGS); break;
3340 case 'T': do_chan_mode(MODE_NOAMSG); break;
3341 case 'O': do_chan_mode(MODE_OPERSONLY); break;
4648ded2 3342 case 'a': do_chan_mode(MODE_ADMINSONLY); break;
c8ca69a0 3343 case 'Z': do_chan_mode(MODE_SSLONLY); break;
88c7cb10 3344 case 'L': do_chan_mode(MODE_HIDEMODE); break;
ec1a68c8 3345 case 'z':
3346 if (!(flags & MCP_REGISTERED)) {
1136f709 3347 do_chan_mode(MODE_REGISTERED);
ec1a68c8 3348 } else {
1136f709 3349 mod_chanmode_free(change);
3350 return NULL;
ec1a68c8 3351 }
3352 break;
d76ed9a9 3353#undef do_chan_mode
3354 case 'l':
3355 if (add) {
3356 if (in_arg >= argc)
3357 goto error;
3358 change->modes_set |= MODE_LIMIT;
3359 change->new_limit = atoi(modes[in_arg++]);
3360 } else {
3361 change->modes_set &= ~MODE_LIMIT;
3362 change->modes_clear |= MODE_LIMIT;
3363 }
3364 break;
3365 case 'k':
3366 if (add) {
1136f709 3367 if ((in_arg >= argc)
3368 || keyncpy(change->new_key, modes[in_arg++], sizeof(change->new_key)))
d76ed9a9 3369 goto error;
3370 change->modes_set |= MODE_KEY;
d76ed9a9 3371 } else {
3372 change->modes_clear |= MODE_KEY;
3373 if (!(flags & MCP_KEY_FREE)) {
3374 if (in_arg >= argc)
3375 goto error;
3376 in_arg++;
3377 }
3378 }
3379 break;
2f61d1d7 3380 case 'U':
3381 if (add)
3382 {
1136f709 3383 if ((in_arg >= argc)
3384 || keyncpy(change->new_upass, modes[in_arg++], sizeof(change->new_upass)))
3385 goto error;
3386 change->modes_set |= MODE_UPASS;
2f61d1d7 3387 } else {
3388 change->modes_clear |= MODE_UPASS;
3389 if (!(flags & MCP_UPASS_FREE)) {
3390 if (in_arg >= argc)
3391 goto error;
3392 in_arg++;
3393 }
3394 }
3395 break;
3396 case 'A':
3397 if (add) {
1136f709 3398 if ((in_arg >= argc)
3399 || keyncpy(change->new_upass, modes[in_arg++], sizeof(change->new_upass)))
2f61d1d7 3400 change->modes_set |= MODE_APASS;
2f61d1d7 3401 } else {
3402 change->modes_clear |= MODE_APASS;
3403 if (!(flags & MCP_APASS_FREE)) {
3404 if (in_arg >= argc)
3405 goto error;
3406 in_arg++;
3407 }
3408 }
3409 break;
d76ed9a9 3410 case 'b':
3411 if (!(flags & MCP_ALLOW_OVB))
3412 goto error;
3413 if (in_arg >= argc)
3414 goto error;
3415 change->args[ch_arg].mode = MODE_BAN;
3416 if (!add)
3417 change->args[ch_arg].mode |= MODE_REMOVE;
a32da4c7 3418 change->args[ch_arg++].u.hostmask = modes[in_arg++];
d76ed9a9 3419 break;
2aef5f4b 3420 case 'e':
3421 if (!(flags & MCP_ALLOW_OVB))
3422 goto error;
3423 if (in_arg >= argc)
3424 goto error;
3425 change->args[ch_arg].mode = MODE_EXEMPT;
3426 if (!add)
3427 change->args[ch_arg].mode |= MODE_REMOVE;
a32da4c7 3428 change->args[ch_arg++].u.hostmask = modes[in_arg++];
2aef5f4b 3429 break;
55342ce8 3430 case 'o': case 'h': case 'v':
d76ed9a9 3431 {
3432 struct userNode *victim;
2f61d1d7 3433 char *oplevel_str;
3434 int oplevel;
3435
3436 if (in_arg >= argc)
3437 goto error;
3438 oplevel_str = strchr(modes[in_arg], ':');
3439 if (oplevel_str)
3440 {
3441 /* XXYYY M #channel +o XXYYY:<oplevel> */
3442 *oplevel_str++ = '\0';
3443 oplevel = parse_oplevel(oplevel_str);
3444 if (oplevel <= base_oplevel && !(flags & MCP_FROM_SERVER))
3445 oplevel = base_oplevel + 1;
3446 }
3447 else if (channel->modes & MODE_UPASS)
3448 oplevel = base_oplevel + 1;
3449 else
3450 oplevel = -1;
3451
3452 /* Check that oplevel is within bounds. */
3453 if (oplevel > MAXOPLEVEL)
3454 oplevel = MAXOPLEVEL;
3455
d76ed9a9 3456 if (!(flags & MCP_ALLOW_OVB))
3457 goto error;
3458 if (in_arg >= argc)
3459 goto error;
55342ce8 3460
3461 if (modes[0][ii] == 'o')
3462 change->args[ch_arg].mode = MODE_CHANOP;
3463 else if (modes[0][ii] == 'h')
3464 change->args[ch_arg].mode = MODE_HALFOP;
3465 else if (modes[0][ii] == 'v')
3466 change->args[ch_arg].mode = MODE_VOICE;
3467
d76ed9a9 3468 if (!add)
3469 change->args[ch_arg].mode |= MODE_REMOVE;
3470 if (flags & MCP_FROM_SERVER)
3471 victim = GetUserN(modes[in_arg++]);
3472 else
3473 victim = GetUserH(modes[in_arg++]);
3474 if (!victim)
3475 continue;
a32da4c7 3476 if ((change->args[ch_arg].u.member = GetUserMode(channel, victim)))
2f61d1d7 3477 {
3478 /* Apply the oplevel change */
3479 change->args[ch_arg].u.member->oplevel = oplevel;
d76ed9a9 3480 ch_arg++;
2f61d1d7 3481 }
d76ed9a9 3482 break;
3483 }
3484 default:
3485 if (!(flags & MCP_FROM_SERVER))
3486 goto error;
3487 break;
3488 }
3489 }
3490 change->argc = ch_arg; /* in case any turned out to be ignored */
3491 if (change->modes_set & MODE_SECRET) {
3492 change->modes_set &= ~(MODE_PRIVATE);
3493 change->modes_clear |= MODE_PRIVATE;
3494 } else if (change->modes_set & MODE_PRIVATE) {
3495 change->modes_set &= ~(MODE_SECRET);
3496 change->modes_clear |= MODE_SECRET;
3497 }
3498 return change;
3499 error:
3500 mod_chanmode_free(change);
3501 return NULL;
3502}
3503
3504struct chanmode_buffer {
3505 char modes[MAXLEN];
3506 char args[MAXLEN];
3507 struct chanNode *channel;
3508 struct userNode *actor;
3509 unsigned int modes_used;
3510 unsigned int args_used;
3511 size_t chname_len;
3512 unsigned int is_add : 1;
3513 unsigned int is_chanop : 1;
3514};
3515
3516static void
3517mod_chanmode_append(struct chanmode_buffer *buf, char ch, const char *arg)
3518{
3519 size_t arg_len = strlen(arg);
3520 if (buf->modes_used > (MAXMODEPARAMS) ||
3521 buf->modes_used + buf->args_used + buf->chname_len + arg_len > 450) {
3522 memcpy(buf->modes + buf->modes_used, buf->args, buf->args_used);
3523 buf->modes[buf->modes_used + buf->args_used] = '\0';
3524 irc_mode((buf->is_chanop ? buf->actor : NULL), buf->channel, buf->modes);
3525 buf->modes[0] = buf->is_add ? '+' : '-';
3526 buf->modes_used = 1;
3527 buf->args_used = 0;
3528 }
3529 buf->modes[buf->modes_used++] = ch;
3530 buf->args[buf->args_used++] = ' ';
3531 memcpy(buf->args + buf->args_used, arg, arg_len);
3532 buf->args_used += arg_len;
3533}
3534
3535void
3536mod_chanmode_announce(struct userNode *who, struct chanNode *channel, struct mod_chanmode *change)
3537{
3538 struct chanmode_buffer chbuf;
3539 unsigned int arg;
3540 struct modeNode *mn;
3541 char int_buff[32], mode = '\0';
3542
3543 assert(change->argc <= change->alloc_argc);
3544 memset(&chbuf, 0, sizeof(chbuf));
3545 chbuf.channel = channel;
3546 chbuf.actor = who;
3547 chbuf.chname_len = strlen(channel->name);
3548
3549 mn = GetUserMode(channel, who);
3550 if ((mn && (mn->modes & MODE_CHANOP)) || off_channel)
3551 chbuf.is_chanop = 1;
3552
3553 /* First remove modes */
3554 chbuf.is_add = 0;
3555 if (change->modes_clear) {
3556 if (mode != '-')
3557 chbuf.modes[chbuf.modes_used++] = mode = '-';
3558#define DO_MODE_CHAR(BIT, CHAR) if (change->modes_clear & MODE_##BIT) chbuf.modes[chbuf.modes_used++] = CHAR
3559 DO_MODE_CHAR(PRIVATE, 'p');
3560 DO_MODE_CHAR(SECRET, 's');
3561 DO_MODE_CHAR(MODERATED, 'm');
3562 DO_MODE_CHAR(TOPICLIMIT, 't');
3563 DO_MODE_CHAR(INVITEONLY, 'i');
3564 DO_MODE_CHAR(NOPRIVMSGS, 'n');
3565 DO_MODE_CHAR(LIMIT, 'l');
3566 DO_MODE_CHAR(DELAYJOINS, 'D');
3567 DO_MODE_CHAR(REGONLY, 'r');
3568 DO_MODE_CHAR(NOCOLORS, 'c');
3569 DO_MODE_CHAR(NOCTCPS, 'C');
d0cb2fb6 3570 DO_MODE_CHAR(STRIPCOLOR, 'S');
3571 DO_MODE_CHAR(MODUNREG, 'M');
3572 DO_MODE_CHAR(NONOTICE, 'N');
3573 DO_MODE_CHAR(NOQUITMSGS, 'Q');
3574 DO_MODE_CHAR(NOAMSG, 'T');
3575 DO_MODE_CHAR(OPERSONLY, 'O');
ec1a68c8 3576 DO_MODE_CHAR(REGISTERED, 'z');
c8ca69a0 3577 DO_MODE_CHAR(SSLONLY, 'Z');
88c7cb10 3578 DO_MODE_CHAR(HIDEMODE, 'L');
d76ed9a9 3579#undef DO_MODE_CHAR
3580 if (change->modes_clear & channel->modes & MODE_KEY)
3581 mod_chanmode_append(&chbuf, 'k', channel->key);
2f61d1d7 3582 if (change->modes_clear & channel->modes & MODE_UPASS)
3583 mod_chanmode_append(&chbuf, 'U', channel->upass);
1136f709 3584 if (change->modes_clear & channel->modes & MODE_APASS)
2f61d1d7 3585 mod_chanmode_append(&chbuf, 'A', channel->apass);
d76ed9a9 3586 }
3587 for (arg = 0; arg < change->argc; ++arg) {
3588 if (!(change->args[arg].mode & MODE_REMOVE))
3589 continue;
3590 if (mode != '-')
3591 chbuf.modes[chbuf.modes_used++] = mode = '-';
3592 switch (change->args[arg].mode & ~MODE_REMOVE) {
3593 case MODE_BAN:
a32da4c7 3594 mod_chanmode_append(&chbuf, 'b', change->args[arg].u.hostmask);
d76ed9a9 3595 break;
2aef5f4b 3596 case MODE_EXEMPT:
a32da4c7 3597 mod_chanmode_append(&chbuf, 'e', change->args[arg].u.hostmask);
2aef5f4b 3598 break;
d76ed9a9 3599 default:
3600 if (change->args[arg].mode & MODE_CHANOP)
a32da4c7 3601 mod_chanmode_append(&chbuf, 'o', change->args[arg].u.member->user->numeric);
55342ce8 3602 if (change->args[arg].mode & MODE_HALFOP)
a32da4c7 3603 mod_chanmode_append(&chbuf, 'h', change->args[arg].u.member->user->numeric);
d76ed9a9 3604 if (change->args[arg].mode & MODE_VOICE)
a32da4c7 3605 mod_chanmode_append(&chbuf, 'v', change->args[arg].u.member->user->numeric);
d76ed9a9 3606 break;
3607 }
3608 }
3609
3610 /* Then set them */
3611 chbuf.is_add = 1;
3612 if (change->modes_set) {
3613 if (mode != '+')
3614 chbuf.modes[chbuf.modes_used++] = mode = '+';
3615#define DO_MODE_CHAR(BIT, CHAR) if (change->modes_set & MODE_##BIT) chbuf.modes[chbuf.modes_used++] = CHAR
3616 DO_MODE_CHAR(PRIVATE, 'p');
3617 DO_MODE_CHAR(SECRET, 's');
3618 DO_MODE_CHAR(MODERATED, 'm');
3619 DO_MODE_CHAR(TOPICLIMIT, 't');
3620 DO_MODE_CHAR(INVITEONLY, 'i');
3621 DO_MODE_CHAR(NOPRIVMSGS, 'n');
3622 DO_MODE_CHAR(DELAYJOINS, 'D');
3623 DO_MODE_CHAR(REGONLY, 'r');
3624 DO_MODE_CHAR(NOCOLORS, 'c');
3625 DO_MODE_CHAR(NOCTCPS, 'C');
d0cb2fb6 3626 DO_MODE_CHAR(STRIPCOLOR, 'S');
3627 DO_MODE_CHAR(MODUNREG, 'M');
3628 DO_MODE_CHAR(NONOTICE, 'N');
3629 DO_MODE_CHAR(NOQUITMSGS, 'Q');
3630 DO_MODE_CHAR(NOAMSG, 'T');
3631 DO_MODE_CHAR(OPERSONLY, 'O');
ec1a68c8 3632 DO_MODE_CHAR(REGISTERED, 'z');
c8ca69a0 3633 DO_MODE_CHAR(SSLONLY, 'Z');
88c7cb10 3634 DO_MODE_CHAR(HIDEMODE, 'L');
d76ed9a9 3635#undef DO_MODE_CHAR
3636 if(change->modes_set & MODE_KEY)
3637 mod_chanmode_append(&chbuf, 'k', change->new_key);
2f61d1d7 3638 if (change->modes_set & MODE_UPASS)
3639 mod_chanmode_append(&chbuf, 'U', change->new_upass);
3640 if (change->modes_set & MODE_APASS)
3641 mod_chanmode_append(&chbuf, 'A', change->new_apass);
d76ed9a9 3642 if(change->modes_set & MODE_LIMIT) {
3643 sprintf(int_buff, "%d", change->new_limit);
3644 mod_chanmode_append(&chbuf, 'l', int_buff);
3645 }
3646 }
3647 for (arg = 0; arg < change->argc; ++arg) {
3648 if (change->args[arg].mode & MODE_REMOVE)
3649 continue;
3650 if (mode != '+')
3651 chbuf.modes[chbuf.modes_used++] = mode = '+';
3652 switch (change->args[arg].mode) {
3653 case MODE_BAN:
a32da4c7 3654 mod_chanmode_append(&chbuf, 'b', change->args[arg].u.hostmask);
d76ed9a9 3655 break;
2aef5f4b 3656 case MODE_EXEMPT:
a32da4c7 3657 mod_chanmode_append(&chbuf, 'e', change->args[arg].u.hostmask);
2aef5f4b 3658 break;
d76ed9a9 3659 default:
3660 if (change->args[arg].mode & MODE_CHANOP)
a32da4c7 3661 mod_chanmode_append(&chbuf, 'o', change->args[arg].u.member->user->numeric);
55342ce8 3662 if (change->args[arg].mode & MODE_HALFOP)
a32da4c7 3663 mod_chanmode_append(&chbuf, 'h', change->args[arg].u.member->user->numeric);
d76ed9a9 3664 if (change->args[arg].mode & MODE_VOICE)
a32da4c7 3665 mod_chanmode_append(&chbuf, 'v', change->args[arg].u.member->user->numeric);
d76ed9a9 3666 break;
3667 }
3668 }
3669
3670 /* Flush the buffer and apply changes locally */
3671 if (chbuf.modes_used > 0) {
3672 memcpy(chbuf.modes + chbuf.modes_used, chbuf.args, chbuf.args_used);
3673 chbuf.modes[chbuf.modes_used + chbuf.args_used] = '\0';
3674 irc_mode((chbuf.is_chanop ? chbuf.actor : NULL), chbuf.channel, chbuf.modes);
3675 }
3676 mod_chanmode_apply(who, channel, change);
3677}
3678
3679char *
3680mod_chanmode_format(struct mod_chanmode *change, char *outbuff)
3681{
3682 unsigned int used = 0;
3683 assert(change->argc <= change->alloc_argc);
3684 if (change->modes_clear) {
3685 outbuff[used++] = '-';
3686#define DO_MODE_CHAR(BIT, CHAR) if (change->modes_clear & MODE_##BIT) outbuff[used++] = CHAR
3687 DO_MODE_CHAR(PRIVATE, 'p');
3688 DO_MODE_CHAR(SECRET, 's');
3689 DO_MODE_CHAR(MODERATED, 'm');
3690 DO_MODE_CHAR(TOPICLIMIT, 't');
3691 DO_MODE_CHAR(INVITEONLY, 'i');
3692 DO_MODE_CHAR(NOPRIVMSGS, 'n');
3693 DO_MODE_CHAR(LIMIT, 'l');
3694 DO_MODE_CHAR(KEY, 'k');
2f61d1d7 3695 DO_MODE_CHAR(UPASS, 'U');
3696 DO_MODE_CHAR(APASS, 'A');
d76ed9a9 3697 DO_MODE_CHAR(DELAYJOINS, 'D');
3698 DO_MODE_CHAR(REGONLY, 'r');
3699 DO_MODE_CHAR(NOCOLORS, 'c');
3700 DO_MODE_CHAR(NOCTCPS, 'C');
d0cb2fb6 3701 DO_MODE_CHAR(STRIPCOLOR, 'S');
3702 DO_MODE_CHAR(MODUNREG, 'M');
3703 DO_MODE_CHAR(NONOTICE, 'N');
3704 DO_MODE_CHAR(NOQUITMSGS, 'Q');
3705 DO_MODE_CHAR(NOAMSG, 'T');
3706 DO_MODE_CHAR(OPERSONLY, 'O');
ec1a68c8 3707 DO_MODE_CHAR(REGISTERED, 'z');
c8ca69a0 3708 DO_MODE_CHAR(SSLONLY, 'Z');
88c7cb10 3709 DO_MODE_CHAR(HIDEMODE, 'L');
d76ed9a9 3710#undef DO_MODE_CHAR
3711 }
3712 if (change->modes_set) {
3713 outbuff[used++] = '+';
3714#define DO_MODE_CHAR(BIT, CHAR) if (change->modes_set & MODE_##BIT) outbuff[used++] = CHAR
3715 DO_MODE_CHAR(PRIVATE, 'p');
3716 DO_MODE_CHAR(SECRET, 's');
3717 DO_MODE_CHAR(MODERATED, 'm');
3718 DO_MODE_CHAR(TOPICLIMIT, 't');
3719 DO_MODE_CHAR(INVITEONLY, 'i');
3720 DO_MODE_CHAR(NOPRIVMSGS, 'n');
3721 DO_MODE_CHAR(DELAYJOINS, 'D');
3722 DO_MODE_CHAR(REGONLY, 'r');
3723 DO_MODE_CHAR(NOCOLORS, 'c');
3724 DO_MODE_CHAR(NOCTCPS, 'C');
d0cb2fb6 3725 DO_MODE_CHAR(STRIPCOLOR, 'S');
3726 DO_MODE_CHAR(MODUNREG, 'M');
3727 DO_MODE_CHAR(NONOTICE, 'N');
3728 DO_MODE_CHAR(NOQUITMSGS, 'Q');
3729 DO_MODE_CHAR(NOAMSG, 'T');
3730 DO_MODE_CHAR(OPERSONLY, 'O');
ec1a68c8 3731 DO_MODE_CHAR(REGISTERED, 'z');
c8ca69a0 3732 DO_MODE_CHAR(SSLONLY, 'Z');
88c7cb10 3733 DO_MODE_CHAR(HIDEMODE, 'L');
d76ed9a9 3734#undef DO_MODE_CHAR
2f61d1d7 3735 switch (change->modes_set & (MODE_KEY|MODE_LIMIT|MODE_APASS|MODE_UPASS)) {
3736 /* Doing this implementation has been a pain in the arse, I hope I didn't forget a possible combination */
3737 case MODE_KEY|MODE_LIMIT|MODE_APASS|MODE_UPASS:
3738 used += sprintf(outbuff+used, "lkAU %d %s %s %s", change->new_limit, change->new_key,change->new_apass, change->new_upass);
3739 break;
3740
3741 case MODE_KEY|MODE_LIMIT|MODE_APASS:
3742 used += sprintf(outbuff+used, "lkA %d %s %s", change->new_limit, change->new_key, change->new_apass);
3743 break;
3744 case MODE_KEY|MODE_LIMIT|MODE_UPASS:
3745 used += sprintf(outbuff+used, "lkU %d %s %s", change->new_limit, change->new_key, change->new_upass);
3746 break;
3747 case MODE_KEY|MODE_APASS|MODE_UPASS:
3748 used += sprintf(outbuff+used, "kAU %s %s %s", change->new_key, change->new_apass, change->new_upass);
3749 break;
3750
3751 case MODE_KEY|MODE_APASS:
3752 used += sprintf(outbuff+used, "kA %s %s", change->new_key, change->new_apass);
3753 break;
3754 case MODE_KEY|MODE_UPASS:
3755 used += sprintf(outbuff+used, "kU %s %s", change->new_key, change->new_upass);
3756 break;
d76ed9a9 3757 case MODE_KEY|MODE_LIMIT:
3758 used += sprintf(outbuff+used, "lk %d %s", change->new_limit, change->new_key);
3759 break;
2f61d1d7 3760
3761 case MODE_LIMIT|MODE_UPASS:
3762 used += sprintf(outbuff+used, "lU %d %s", change->new_limit, change->new_upass);
3763 break;
3764 case MODE_LIMIT|MODE_APASS:
3765 used += sprintf(outbuff+used, "lA %d %s", change->new_limit, change->new_apass);
3766 break;
3767 case MODE_APASS|MODE_UPASS:
3768 used += sprintf(outbuff+used, "AU %s %s", change->new_apass, change->new_upass);
3769
3770 case MODE_LIMIT|MODE_APASS|MODE_UPASS:
3771 used += sprintf(outbuff+used, "lAU %d %s %s", change->new_limit, change->new_apass, change->new_upass);
3772 break;
3773
3774 case MODE_APASS:
3775 used += sprintf(outbuff+used, "A %s", change->new_apass);
3776 break;
3777 case MODE_UPASS:
3778 used += sprintf(outbuff+used, "U %s", change->new_upass);
3779 break;
d76ed9a9 3780 case MODE_KEY:
3781 used += sprintf(outbuff+used, "k %s", change->new_key);
3782 break;
3783 case MODE_LIMIT:
3784 used += sprintf(outbuff+used, "l %d", change->new_limit);
3785 break;
3786 }
3787 }
3788 outbuff[used] = 0;
3789 return outbuff;
3790}
3791
3792static int
3793clear_chanmode(struct chanNode *channel, const char *modes)
3794{
1136f709 3795 unsigned int cleared;
d76ed9a9 3796
1136f709 3797 for (cleared = 0; *modes; modes++) {
d76ed9a9 3798 switch (*modes) {
1136f709 3799 case 'o': cleared |= MODE_CHANOP; break;
3800 case 'h': cleared |= MODE_HALFOP; break;
3801 case 'v': cleared |= MODE_VOICE; break;
3802 case 'p': cleared |= MODE_PRIVATE; break;
3803 case 's': cleared |= MODE_SECRET; break;
3804 case 'm': cleared |= MODE_MODERATED; break;
3805 case 't': cleared |= MODE_TOPICLIMIT; break;
3806 case 'i': cleared |= MODE_INVITEONLY; break;
3807 case 'n': cleared |= MODE_NOPRIVMSGS; break;
d76ed9a9 3808 case 'k':
1136f709 3809 cleared |= MODE_KEY;
d76ed9a9 3810 channel->key[0] = '\0';
3811 break;
2f61d1d7 3812 case 'A':
1136f709 3813 cleared |= MODE_APASS;
2f61d1d7 3814 channel->apass[0] = '\0';
3815 break;
3816 case 'U':
1136f709 3817 cleared |= MODE_UPASS;
2f61d1d7 3818 channel->upass[0] = '\0';
3819 break;
d76ed9a9 3820 case 'l':
1136f709 3821 cleared |= MODE_LIMIT;
d76ed9a9 3822 channel->limit = 0;
3823 break;
1136f709 3824 case 'b': cleared |= MODE_BAN; break;
3825 case 'e': cleared |= MODE_EXEMPT; break;
3826 case 'D': cleared |= MODE_DELAYJOINS; break;
3827 case 'r': cleared |= MODE_REGONLY; break;
3828 case 'c': cleared |= MODE_NOCOLORS; break;
3829 case 'C': cleared |= MODE_NOCTCPS; break;
3830 case 'S': cleared |= MODE_STRIPCOLOR; break;
3831 case 'M': cleared |= MODE_MODUNREG; break;
3832 case 'N': cleared |= MODE_NONOTICE; break;
3833 case 'Q': cleared |= MODE_NOQUITMSGS; break;
3834 case 'T': cleared |= MODE_NOAMSG; break;
3835 case 'O': cleared |= MODE_OPERSONLY; break;
3836 case 'a': cleared |= MODE_ADMINSONLY; break;
3837 case 'z': cleared |= MODE_REGISTERED; break;
3838 case 'Z': cleared |= MODE_SSLONLY; break;
3839 case 'L': cleared |= MODE_HIDEMODE; break;
d76ed9a9 3840 }
3841 }
3842
1136f709 3843 if (!cleared)
d76ed9a9 3844 return 1;
3845
3846 /* Remove simple modes. */
1136f709 3847 channel->modes &= ~cleared;
d76ed9a9 3848
3849 /* If removing bans, kill 'em all. */
1136f709 3850 if ((cleared & MODE_BAN) && channel->banlist.used) {
d76ed9a9 3851 unsigned int i;
3852 for (i=0; i<channel->banlist.used; i++)
3853 free(channel->banlist.list[i]);
3854 channel->banlist.used = 0;
3855 }
3856
2aef5f4b 3857 /* If removing exempts, kill 'em all. */
1136f709 3858 if ((cleared & MODE_EXEMPT) && channel->exemptlist.used) {
2aef5f4b 3859 unsigned int i;
3860 for (i=0; i<channel->exemptlist.used; i++)
3861 free(channel->exemptlist.list[i]);
3862 channel->exemptlist.used = 0;
3863 }
3864
1136f709 3865 /* Removed member modes. */
3866 if ((cleared & (MODE_CHANOP | MODE_HALFOP | MODE_VOICE)) && channel->members.used) {
3867 int mask = ~(cleared & (MODE_CHANOP | MODE_HALFOP | MODE_VOICE));
d76ed9a9 3868 unsigned int i;
3869
3870 for (i = 0; i < channel->members.used; i++)
3871 channel->members.list[i]->modes &= mask;
3872 }
3873
3874 return 1;
3875}
3876
3877void
3878reg_privmsg_func(struct userNode *user, privmsg_func_t handler)
3879{
3880 unsigned int numeric = user->num_local;
3881 if (numeric >= num_privmsg_funcs) {
1136f709 3882 int newnum = numeric + 8, ii;
d76ed9a9 3883 privmsg_funcs = realloc(privmsg_funcs, newnum*sizeof(privmsg_func_t));
1136f709 3884 for (ii = num_privmsg_funcs; ii < newnum; ++ii)
3885 privmsg_funcs[ii] = NULL;
d76ed9a9 3886 num_privmsg_funcs = newnum;
3887 }
3888 if (privmsg_funcs[numeric])
3889 log_module(MAIN_LOG, LOG_WARNING, "re-registering new privmsg handler for numeric %d", numeric);
3890 privmsg_funcs[numeric] = handler;
3891}
3892
3893void
1136f709 3894unreg_privmsg_func(struct userNode *user)
d76ed9a9 3895{
1136f709 3896 if (!IsLocal(user) || user->num_local >= num_privmsg_funcs)
3897 return; /* this really only works with users */
d76ed9a9 3898
1136f709 3899 privmsg_funcs[user->num_local] = NULL;
d76ed9a9 3900}
3901
3902
3903void
3904reg_notice_func(struct userNode *user, privmsg_func_t handler)
3905{
3906 unsigned int numeric = user->num_local;
3907 if (numeric >= num_notice_funcs) {
1136f709 3908 int newnum = numeric + 8, ii;
d76ed9a9 3909 notice_funcs = realloc(notice_funcs, newnum*sizeof(privmsg_func_t));
1136f709 3910 for (ii = num_privmsg_funcs; ii < newnum; ++ii)
3911 privmsg_funcs[ii] = NULL;
d76ed9a9 3912 num_notice_funcs = newnum;
3913 }
3914 if (notice_funcs[numeric])
3915 log_module(MAIN_LOG, LOG_WARNING, "re-registering new notice handler for numeric %d", numeric);
3916 notice_funcs[numeric] = handler;
3917}
3918
3919void
1136f709 3920unreg_notice_func(struct userNode *user)
d76ed9a9 3921{
1136f709 3922 if (!IsLocal(user) || user->num_local >= num_privmsg_funcs)
3923 return; /* this really only works with users */
d76ed9a9 3924
1136f709 3925 notice_funcs[user->num_local] = NULL;
d76ed9a9 3926}
3927
3928static void
3929send_burst(void)
3930{
3931 unsigned int i, hop, max_hop=1;
3932 dict_iterator_t it;
3933
3934 /* burst (juped) servers, closest first (except self, which is sent already) */
3935 for (i=0; i<ArrayLength(servers_num); i++)
3936 if (servers_num[i] && servers_num[i]->hops > max_hop)
3937 max_hop = servers_num[i]->hops;
3938 for (hop=1; hop<=max_hop; hop++) {
3939 for (i=0;i<ArrayLength(servers_num);i++) {
3940 if (servers_num[i]
3941 && (servers_num[i]->hops == hop)
3942 && (servers_num[i] != self->uplink))
3943 irc_server(servers_num[i]);
3944 }
3945 }
3946
3947 /* burst local nicks */
3948 for (i=0; i<=self->num_mask; i++)
3949 if (self->users[i])
3950 irc_user(self->users[i]);
3951
3952 /* build dict of unbursted channel names (just copy existing channels) */
3953 unbursted_channels = dict_new();
3954 for (it = dict_first(channels); it; it = iter_next(it))
3955 dict_insert(unbursted_channels, iter_key(it), iter_data(it));
3956}
2f61d1d7 3957
3958/*
3959 * Oplevel parsing
3960 */
3961static int
3962parse_oplevel(char *str)
3963{
3964 int oplevel = 0;
3965 while (isdigit(*str))
3966 oplevel = oplevel * 10 + *str++ - '0';
3967 return oplevel;
3968}
3969