]>
jfr.im git - irc/evilnet/x3.git/blob - src/proto-p10.c
1 /* proto-p10.c - IRC protocol output
2 * Copyright 2000-2004 srvx Development Team
4 * This file is part of x3.
6 * x3 is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 3 of the License, or
9 * (at your option) any later version.
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.
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.
25 #include "hosthiding.h"
26 #include "proto-common.c"
30 #define CMD_ACCOUNT "ACCOUNT"
31 #define CMD_ADMIN "ADMIN"
32 #define CMD_ALIST "ALIST"
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"
46 #define CMD_EOB "END_OF_BURST"
47 #define CMD_EOB_ACK "EOB_ACK"
48 #define CMD_ERROR "ERROR"
49 #define CMD_FAKEHOST "FAKE"
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"
65 #define CMD_MARK "MARK"
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"
91 #define CMD_SETTIME "SETTIME"
92 #define CMD_SHUN "SHUN"
93 #define CMD_SILENCE "SILENCE"
94 #define CMD_SQUERY "SQUERY"
95 #define CMD_SQUIT "SQUIT"
96 #define CMD_STATS "STATS"
97 #define CMD_SVSJOIN "SVSJOIN"
98 #define CMD_SVSNICK "SVSNICK"
99 #define CMD_SVSPART "SVSPART"
100 #define CMD_SWHOIS "SWHOIS"
101 #define CMD_TIME "TIME"
102 #define CMD_TOPIC "TOPIC"
103 #define CMD_TRACE "TRACE"
104 #define CMD_UPING "UPING"
105 #define CMD_USER "USER"
106 #define CMD_USERHOST "USERHOST"
107 #define CMD_USERIP "USERIP"
108 #define CMD_VERSION "VERSION"
109 #define CMD_WALLCHOPS "WALLCHOPS"
110 #define CMD_WALLOPS "WALLOPS"
111 #define CMD_WALLHOPS "WALLHOPS"
112 #define CMD_WALLUSERS "WALLUSERS"
113 #define CMD_WALLVOICES "WALLVOICES"
114 #define CMD_WALLHOPS "WALLHOPS"
115 #define CMD_WHO "WHO"
116 #define CMD_WHOIS "WHOIS"
117 #define CMD_WHOWAS "WHOWAS"
119 /* Tokenized commands. */
120 #define TOK_ACCOUNT "AC"
121 #define TOK_ADMIN "AD"
122 #define TOK_ALIST "AL"
123 #define TOK_ASLL "LL"
125 #define TOK_BURST "B"
126 #define TOK_CLEARMODE "CM"
127 #define TOK_CLOSE "CLOSE"
128 #define TOK_CNOTICE "CN"
129 #define TOK_CONNECT "CO"
130 #define TOK_CPRIVMSG "CP"
131 #define TOK_CREATE "C"
132 #define TOK_DESTRUCT "DE"
133 #define TOK_DESYNCH "DS"
134 #define TOK_DIE "DIE"
135 #define TOK_DNS "DNS"
137 #define TOK_EOB_ACK "EA"
138 #define TOK_ERROR "Y"
139 #define TOK_EXEMPT "EX"
140 #define TOK_FAKEHOST "FA"
141 #define TOK_GET "GET"
142 #define TOK_GLINE "GL"
143 #define TOK_HASH "HASH"
144 #define TOK_HELP "HELP"
146 #define TOK_INVITE "I"
147 #define TOK_ISON "ISON"
149 #define TOK_JUPE "JU"
152 #define TOK_LINKS "LI"
153 #define TOK_LIST "LIST"
154 #define TOK_LUSERS "LU"
155 #define TOK_MAP "MAP"
156 #define TOK_MARK "MK"
158 #define TOK_MOTD "MO"
159 #define TOK_NAMES "E"
161 #define TOK_NOTICE "O"
162 #define TOK_OPER "OPER"
163 #define TOK_OPMODE "OM"
165 #define TOK_PASS "PA"
168 #define TOK_POST "POST"
169 #define TOK_PRIVMSG "P"
170 #define TOK_PRIVS "PRIVS"
171 #define TOK_PROTO "PROTO"
173 #define TOK_REHASH "REHASH"
174 #define TOK_RESET "RESET"
175 #define TOK_RESTART "RESTART"
176 #define TOK_RPING "RI"
177 #define TOK_RPONG "RO"
178 #define TOK_SERVER "S"
179 #define TOK_SERVLIST "SERVSET"
180 #define TOK_SERVSET "SERVSET"
181 #define TOK_SET "SET"
182 #define TOK_SETTIME "SE"
183 #define TOK_SHUN "SU"
184 #define TOK_SILENCE "U"
185 #define TOK_SQUERY "SQUERY"
186 #define TOK_SQUIT "SQ"
187 #define TOK_STATS "R"
188 #define TOK_SVSJOIN "SJ"
189 #define TOK_SVSNICK "SN"
190 #define TOK_SVSPART "SP"
191 #define TOK_SWHOIS "SW"
192 #define TOK_TIME "TI"
193 #define TOK_TOPIC "T"
194 #define TOK_TRACE "TR"
195 #define TOK_UPING "UP"
196 #define TOK_USER "USER"
197 #define TOK_USERHOST "USERHOST"
198 #define TOK_USERIP "USERIP"
199 #define TOK_VERSION "V"
200 #define TOK_WALLCHOPS "WC"
201 #define TOK_WALLOPS "WA"
202 #define TOK_WALLHOPS "WH"
203 #define TOK_WALLUSERS "WU"
204 #define TOK_WALLVOICES "WV"
205 #define TOK_WALLHOPS "WH"
207 #define TOK_WHOIS "W"
208 #define TOK_WHOWAS "X"
210 /* Protocol messages; aliased to full commands or tokens depending
211 on compile-time configuration. ircu prefers tokens WITH THE
212 EXCEPTION OF THE SERVER AND PASS COMMANDS, which cannot be
213 tokenized, because clients' (ie. a linking server) commands are
214 only checked against the full command list.
216 #if defined(ENABLE_TOKENS)
217 #define TYPE(NAME) TOK_ ## NAME
218 #else /* !ENABLE_TOKENS */
219 #define TYPE(NAME) CMD_ ## NAME
220 #endif /* ENABLE_TOKENS */
222 #define P10_ACCOUNT TYPE(ACCOUNT)
223 #define P10_ADMIN TYPE(ADMIN)
224 #define P10_ASLL TYPE(ASLL)
225 #define P10_AWAY TYPE(AWAY)
226 #define P10_BURST TYPE(BURST)
227 #define P10_CLEARMODE TYPE(CLEARMODE)
228 #define P10_CLOSE TYPE(CLOSE)
229 #define P10_CNOTICE TYPE(CNOTICE)
230 #define P10_CONNECT TYPE(CONNECT)
231 #define P10_CPRIVMSG TYPE(CPRIVMSG)
232 #define P10_CREATE TYPE(CREATE)
233 #define P10_DESTRUCT TYPE(DESTRUCT)
234 #define P10_DESYNCH TYPE(DESYNCH)
235 #define P10_DIE TYPE(DIE)
236 #define P10_DNS TYPE(DNS)
237 #define P10_EOB TYPE(EOB)
238 #define P10_EOB_ACK TYPE(EOB_ACK)
239 #define P10_ERROR TYPE(ERROR)
240 #define P10_FAKEHOST TYPE(FAKEHOST)
241 #define P10_GET TYPE(GET)
242 #define P10_GLINE TYPE(GLINE)
243 #define P10_HASH TYPE(HASH)
244 #define P10_HELP TYPE(HELP)
245 #define P10_INFO TYPE(INFO)
246 #define P10_INVITE TYPE(INVITE)
247 #define P10_ISON TYPE(ISON)
248 #define P10_JOIN TYPE(JOIN)
249 #define P10_JUPE TYPE(JUPE)
250 #define P10_KICK TYPE(KICK)
251 #define P10_KILL TYPE(KILL)
252 #define P10_LINKS TYPE(LINKS)
253 #define P10_LIST TYPE(LIST)
254 #define P10_LUSERS TYPE(LUSERS)
255 #define P10_MAP TYPE(MAP)
256 #define P10_MARK TYPE(MARK)
257 #define P10_MODE TYPE(MODE)
258 #define P10_MOTD TYPE(MOTD)
259 #define P10_NAMES TYPE(NAMES)
260 #define P10_NICK TYPE(NICK)
261 #define P10_NOTICE TYPE(NOTICE)
262 #define P10_OPER TYPE(OPER)
263 #define P10_OPMODE TYPE(OPMODE)
264 #define P10_PART TYPE(PART)
265 #define P10_PASS CMD_PASS
266 #define P10_PING TYPE(PING)
267 #define P10_PONG TYPE(PONG)
268 #define P10_POST TYPE(POST)
269 #define P10_PRIVMSG TYPE(PRIVMSG)
270 #define P10_PRIVS TYPE(PRIVS)
271 #define P10_PROTO TYPE(PROTO)
272 #define P10_QUIT TYPE(QUIT)
273 #define P10_REHASH TYPE(REHASH)
274 #define P10_RESET TYPE(RESET)
275 #define P10_RESTART TYPE(RESTART)
276 #define P10_RPING TYPE(RPING)
277 #define P10_RPONG TYPE(RPONG)
278 #define P10_SERVER CMD_SERVER
279 #define P10_SERVLIST TYPE(SERVLIST)
280 #define P10_SERVSET TYPE(SERVSET)
281 #define P10_SET TYPE(SET)
282 #define P10_SETTIME TYPE(SETTIME)
283 #define P10_SHUN TYPE(SHUN)
284 #define P10_SILENCE TYPE(SILENCE)
285 #define P10_SQUERY TYPE(SQUERY)
286 #define P10_SQUIT TYPE(SQUIT)
287 #define P10_STATS TYPE(STATS)
288 #define P10_SVSJOIN TYPE(SVSJOIN)
289 #define P10_SVSNICK TYPE(SVSNICK)
290 #define P10_SVSPART TYPE(SVSPART)
291 #define P10_SWHOIS TYPE(SWHOIS)
292 #define P10_TIME TYPE(TIME)
293 #define P10_TOPIC TYPE(TOPIC)
294 #define P10_TRACE TYPE(TRACE)
295 #define P10_UPING TYPE(UPING)
296 #define P10_USER TYPE(USER)
297 #define P10_USERHOST TYPE(USERHOST)
298 #define P10_USERIP TYPE(USERIP)
299 #define P10_VERSION TYPE(VERSION)
300 #define P10_WALLCHOPS TYPE(WALLCHOPS)
301 #define P10_WALLOPS TYPE(WALLOPS)
302 #define P10_WALLHOPS TYPE(WALLHOPS)
303 #define P10_WALLUSERS TYPE(WALLUSERS)
304 #define P10_WALLVOICES TYPE(WALLVOICES)
305 #define P10_WHO TYPE(WHO)
306 #define P10_WHOIS TYPE(WHOIS)
307 #define P10_WHOWAS TYPE(WHOWAS)
308 #define P10_EXEMPT TYPE(EXEMPT)
310 /* Servers claiming to have a boot or link time before PREHISTORY
311 * trigger errors to the log. We hope no server has been running
312 * constantly since September 1994. :)
314 #define PREHISTORY 780000000
316 #define MODELEN 40 + KEYLEN
318 static struct server
* servers_num
[ 64 * 64 ];
319 static privmsg_func_t
* privmsg_funcs
;
320 static unsigned int num_privmsg_funcs
;
321 static privmsg_func_t
* notice_funcs
;
322 static unsigned int num_notice_funcs
;
323 static struct dict
* unbursted_channels
;
324 static char * his_servername
;
325 static char * his_servercomment
;
326 static int extended_accounts
;
328 static 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
);
330 extern int off_channel
;
331 extern int DefConLevel
;
332 extern int DefConTimeOut
;
333 extern char * DefConChanModes
;
335 static int parse_oplevel ( char * str
);
337 char privbuf
[ 512 ] = "" ;
339 /* Numerics can be XYY, XYYY, or XXYYY; with X's identifying the
340 * server and Y's indentifying the client on that server. */
342 GetServerN ( const char * numeric
)
344 switch ( strlen ( numeric
)) {
346 return servers_num
[ base64toint ( numeric
, 2 )];
350 return servers_num
[ base64toint ( numeric
, 1 )];
357 GetUserN ( const char * numeric
) /* using numeric */
363 switch ( strlen ( numeric
)) {
365 log_module ( MAIN_LOG
, LOG_WARNING
, "GetUserN( %s ): numeric too long!" , numeric
);
367 case 5 : slen
= 2 ; ulen
= 3 ; break ;
368 case 4 : slen
= 1 ; ulen
= 3 ; break ;
369 case 3 : slen
= 1 ; ulen
= 2 ; break ;
370 case 2 : case 1 : case 0 :
371 log_module ( MAIN_LOG
, LOG_WARNING
, "GetUserN( %s ): numeric too short!" , numeric
);
374 if (!( s
= servers_num
[ base64toint ( numeric
, slen
)])) {
375 log_module ( MAIN_LOG
, LOG_WARNING
, "GetUserN( %s ): couldn't find server (len= %d )!" , numeric
, slen
);
378 n
= base64toint ( numeric
+ slen
, ulen
) & s
-> num_mask
;
379 if (!( un
= s
-> users
[ n
])) {
380 log_module ( MAIN_LOG
, LOG_WARNING
, "GetUserN( %s ) couldn't find user!" , numeric
);
385 extern struct userNode
* opserv
;
387 check_ctcp ( struct userNode
* user
, struct userNode
* bot
, char * text
, UNUSED_ARG ( int server_qualified
))
390 /* if its a version reply, do an alert check (only alerts with version=something) */
392 if ( text
[ 0 ] == ' \001 ' ) {
394 cmd
= mysep (& text
, " " );
395 if (! irccasecmp ( cmd
, "VERSION" )) {
396 char * version
= mysep (& text
, " \n " );
399 /* opserv_debug("Opserv got CTCP VERSION Notice from %s: %s", user->nick, version); */
400 /* TODO: setup a ctcp_funcs thing to handle this and other CTCPS properly */
401 user
-> version_reply
= strdup ( version
);
402 /* TODO: put this in the db */
403 if ( match_ircglob ( version
, "WebTV;*" ))
404 user
-> no_notice
= true ; /* webbies cant see notices */
412 privmsg_user_helper ( struct userNode
* un
, void * data
)
414 struct privmsg_desc
* pd
= data
;
415 unsigned int num
= un
-> num_local
;
416 if (! pd
-> is_notice
) {
417 if (( num
< num_privmsg_funcs
) && privmsg_funcs
[ num
]) {
418 privmsg_funcs
[ num
]( pd
-> user
, un
, pd
-> text
, pd
-> is_qualified
);
421 if (( num
< num_notice_funcs
) && notice_funcs
[ num
]) {
422 check_ctcp ( pd
-> user
, un
, pd
-> text
, pd
-> is_qualified
);
423 notice_funcs
[ num
]( pd
-> user
, un
, pd
-> text
, pd
-> is_qualified
);
428 /* equiv to user doing /connect server port target */
429 void irc_connect ( struct userNode
* user
, char * server
, unsigned int port
, struct server
* target
)
431 putsock ( " %s " P10_CONNECT
" %s %d %s " , user
-> numeric
, server
, port
, target
-> numeric
);
435 irc_squit_route ( struct server
* srv
, const char * message
, ...)
439 va_start ( arg_list
, message
);
440 vsnprintf ( buffer
, MAXLEN
- 2 , message
, arg_list
);
441 buffer
[ MAXLEN
- 1 ] = 0 ;
443 /* When would we squit ourselves exactly?? -Rubin */
444 if ( srv
== self
&& cManager
. uplink
-> state
== CONNECTED
) {
447 /* Quit all clients linked to me. */
448 for ( i
= 0 ; i
<= self
-> num_mask
; i
++) {
451 irc_quit ( self
-> users
[ i
], buffer
);
455 putsock ( " %s " P10_SQUIT
" %s %d : %s " , self
-> numeric
, srv
-> name
, 0 , buffer
);
458 /* Force a reconnect to the currently selected server. */
459 cManager
. uplink
-> tries
= 0 ;
460 log_module ( MAIN_LOG
, LOG_INFO
, "Squitting from uplink: %s " , buffer
);
466 irc_server ( struct server
* srv
)
468 char extranum
[ COMBO_NUMERIC_LEN
+ 1 ];
470 inttobase64 ( extranum
, srv
-> num_mask
, ( srv
-> numeric
[ 1 ] || ( srv
-> num_mask
>= 64 * 64 )) ? 3 : 2 );
472 putsock ( P10_SERVER
" %s %d %l i %l i J10 %s%s +s6 : %s " ,
473 srv
-> name
, srv
-> hops
+ 1 , srv
-> boot
, srv
-> link
, srv
-> numeric
, extranum
, srv
-> description
);
475 putsock ( " %s " P10_SERVER
" %s %d %l i %l i %c 10 %s%s +s6 : %s " ,
476 self
-> numeric
, srv
-> name
, srv
-> hops
+ 1 , srv
-> boot
, srv
-> link
, ( srv
-> self_burst
? 'J' : 'P' ), srv
-> numeric
, extranum
, srv
-> description
);
481 irc_p10_pton ( irc_in_addr_t
* ip
, const char * input
)
483 if ( strlen ( input
) == 6 ) {
485 memset ( ip
, 0 , 6 * sizeof ( ip
-> in6
[ 0 ]));
486 value
= base64toint ( input
, 6 );
488 ip
-> in6
[ 5 ] = htons ( 65535 );
489 ip
-> in6
[ 6 ] = htons ( value
>> 16 );
490 ip
-> in6
[ 7 ] = htons ( value
& 65535 );
492 unsigned int pos
= 0 ;
496 for ( left
= ( 25 - strlen ( input
)) / 3 ; left
; left
--)
500 ip
-> in6
[ pos
++] = ntohs ( base64toint ( input
, 3 ));
508 irc_p10_ntop ( char * output
, const irc_in_addr_t
* ip
)
510 if (! irc_in_addr_is_valid (* ip
)) {
511 strcpy ( output
, "AAAAAA" );
512 } else if ( irc_in_addr_is_ipv4 (* ip
)) {
514 in4
= ( ntohs ( ip
-> in6
[ 6 ]) << 16 ) | ntohs ( ip
-> in6
[ 7 ]);
515 inttobase64 ( output
, in4
, 6 );
517 } else if ( irc_in_addr_is_ipv6 (* ip
)) {
518 unsigned int max_start
, max_zeros
, curr_zeros
, zero
, ii
;
519 /* Can start by printing out the leading non-zero parts. */
520 for ( ii
= 0 ; ( ip
-> in6
[ ii
]) && ( ii
< 8 ); ++ ii
) {
521 inttobase64 ( output
, ntohs ( ip
-> in6
[ ii
]), 3 );
524 /* Find the longest run of zeros. */
525 for ( max_start
= zero
= ii
, max_zeros
= curr_zeros
= 0 ; ii
< 8 ; ++ ii
) {
528 else if ( curr_zeros
> max_zeros
) {
529 max_start
= ii
- curr_zeros
;
530 max_zeros
= curr_zeros
;
534 if ( curr_zeros
> max_zeros
) {
535 max_start
= ii
- curr_zeros
;
536 max_zeros
= curr_zeros
;
539 /* Print the rest of the address */
540 for ( ii
= zero
; ii
< 8 ; ) {
541 if (( ii
== max_start
) && max_zeros
) {
545 inttobase64 ( output
, ntohs ( ip
-> in6
[ ii
]), 3 );
551 strcpy ( output
, "???" );
556 irc_user ( struct userNode
* user
)
561 irc_p10_ntop ( b64ip
, & user
-> ip
);
568 modes
[ modelen
++] = 'o' ;
569 if ( IsInvisible ( user
))
570 modes
[ modelen
++] = 'i' ;
572 modes
[ modelen
++] = 'w' ;
574 modes
[ modelen
++] = 'k' ;
575 if ( IsServNotice ( user
))
576 modes
[ modelen
++] = 's' ;
578 modes
[ modelen
++] = 'd' ;
580 modes
[ modelen
++] = 'g' ;
581 // sethost - reed/apples
582 // if (IsHelperIrcu(user))
584 modes
[ modelen
++] = 'h' ;
585 if ( IsFakeHost ( user
))
586 modes
[ modelen
++] = 'f' ;
587 if ( IsHiddenHost ( user
))
588 modes
[ modelen
++] = 'x' ;
591 /* we don't need to put the + in modes because it's in the format string. */
592 putsock ( " %s " P10_NICK
" %s %d %l i %s %s + %s %s %s : %s " ,
593 user
-> uplink
-> numeric
, user
-> nick
, user
-> uplink
-> hops
+ 1 , user
-> timestamp
, user
-> ident
, user
-> hostname
, modes
, b64ip
, user
-> numeric
, user
-> info
);
595 putsock ( " %s " P10_NICK
" %s %d %l i %s %s %s %s : %s " ,
596 user
-> uplink
-> numeric
, user
-> nick
, user
-> uplink
-> hops
+ 1 , user
-> timestamp
, user
-> ident
, user
-> hostname
, b64ip
, user
-> numeric
, user
-> info
);
601 irc_rename ( struct userNode
* user
, const char * new_handle
)
603 if ( extended_accounts
)
604 putsock ( " %s " P10_ACCOUNT
" %s M %s " , self
-> numeric
, user
-> numeric
, new_handle
);
608 irc_delete ( struct userNode
* user
)
610 if ( extended_accounts
)
611 putsock ( " %s " P10_ACCOUNT
" %s U" , self
-> numeric
, user
-> numeric
);
615 irc_account ( struct userNode
* user
, const char * stamp
, time_t timestamp
)
617 if ( extended_accounts
)
618 putsock ( " %s " P10_ACCOUNT
" %s R %s %l u" , self
-> numeric
, user
-> numeric
, stamp
, timestamp
);
620 putsock ( " %s " P10_ACCOUNT
" %s %s %l u" , self
-> numeric
, user
-> numeric
, stamp
, timestamp
);
624 irc_fakehost ( struct userNode
* user
, const char * host
)
626 putsock ( " %s " P10_FAKEHOST
" %s %s " , self
-> numeric
, user
-> numeric
, host
);
630 irc_regnick ( UNUSED_ARG ( struct userNode
* user
))
632 /* no operation here */
636 irc_nick ( struct userNode
* user
, UNUSED_ARG ( const char * old_nick
))
638 putsock ( " %s " P10_NICK
" %s " FMT_TIME_T
, user
-> numeric
, user
-> nick
, now
);
642 irc_fetchtopic ( struct userNode
* from
, const char * to
)
646 putsock ( " %s " P10_TOPIC
" %s " , from
-> numeric
, to
);
650 irc_squit ( struct server
* srv
, const char * message
, const char * service_message
)
652 if (! service_message
)
653 service_message
= message
;
655 /* Are we leaving the network? */
656 if ( srv
== self
&& cManager
. uplink
-> state
== CONNECTED
) {
659 /* Quit all clients linked to me. */
660 for ( i
= 0 ; i
<= self
-> num_mask
; i
++) {
663 irc_quit ( self
-> users
[ i
], service_message
);
667 putsock ( " %s " P10_SQUIT
" %s %d : %s " , self
-> numeric
, srv
-> name
, 0 , message
);
670 /* Force a reconnect to the currently selected server. */
671 cManager
. uplink
-> tries
= 0 ;
672 log_module ( MAIN_LOG
, LOG_INFO
, "Squitting from uplink: %s " , message
);
678 irc_wallchops ( struct userNode
* from
, const char * to
, const char * message
)
680 putsock ( " %s " P10_WALLCHOPS
" %s : %s " , from
-> numeric
, to
, message
);
684 irc_wallops ( const char * format
, ...)
688 va_start ( arg_list
, format
);
689 vsnprintf ( buffer
, MAXLEN
- 2 , format
, arg_list
);
690 buffer
[ MAXLEN
- 1 ] = 0 ;
691 putsock ( " %s " P10_WALLOPS
" : %s " , self
-> numeric
, buffer
);
696 irc_notice ( struct userNode
* from
, const char * to
, const char * message
)
698 putsock ( " %s " P10_NOTICE
" %s : %s " , from
-> numeric
, to
, message
);
702 irc_notice_user ( struct userNode
* from
, struct userNode
* to
, const char * message
)
704 putsock ( " %s " P10_NOTICE
" %s : %s " , from
-> numeric
, to
-> numeric
, message
);
708 irc_privmsg ( struct userNode
* from
, const char * to
, const char * message
)
710 putsock ( " %s " P10_PRIVMSG
" %s : %s " , from
-> numeric
, to
, message
);
714 irc_privmsg_user ( struct userNode
* from
, struct userNode
* to
, const char * message
)
716 putsock ( " %s " P10_PRIVMSG
" %s : %s " , from
-> numeric
, to
-> numeric
, message
);
720 irc_version_user ( struct userNode
* from
, struct userNode
* to
)
722 irc_privmsg_user ( from
, to
, " \001 VERSION \001 " );
728 putsock ( " %s " P10_EOB
, self
-> numeric
);
734 putsock ( " %s " P10_EOB_ACK
, self
-> numeric
);
738 str
= conf_get_data ( "services/opserv/nick" , RECDB_QSTRING
);
741 if ( nick
&& ( DefConLevel
< 5 )) {
742 DefConProcess ( GetUserH ( nick
));
744 if ( DefConTimeOut
> 0 )
745 timeq_add ( now
+ DefConTimeOut
, defcon_timeout
, NULL
);
750 irc_rpong ( const char * from1
, const char * from2
, const char * pingtime
, const char * clientinfo
)
752 putsock ( " %s " P10_RPONG
" %s %s %s : %s " , self
-> numeric
, from1
, from2
, pingtime
, clientinfo
);
756 irc_ping ( const char * payload
)
758 putsock ( " %s " P10_PING
" : %s " , self
-> numeric
, payload
);
762 irc_pong ( const char * who
, const char * data
)
764 putsock ( " %s " P10_PONG
" %s : %s " , self
-> numeric
, who
, data
);
768 irc_pong_asll ( const char * who
, const char * orig_ts
)
775 orig
. tv_sec
= strtoul ( orig_ts
, & delim
, 10 );
776 orig
. tv_usec
= (* delim
== '.' ) ? strtoul ( delim
+ 1 , NULL
, 10 ) : 0 ;
777 gettimeofday (& now
, NULL
);
778 diff
= ( now
. tv_sec
- orig
. tv_sec
) * 1000 + ( now
. tv_usec
- orig
. tv_usec
) / 1000 ;
779 putsock ( " %s " P10_PONG
" %s %s %d " FMT_TIME_T
". %0 6u" , self
-> numeric
, who
, orig_ts
, diff
, now
. tv_sec
, ( unsigned ) now
. tv_usec
);
783 irc_pass ( const char * passwd
)
785 putsock ( P10_PASS
" : %s " , passwd
);
789 irc_introduce ( const char * passwd
)
791 void timed_send_ping ( void * data
);
793 self
-> self_burst
= self
-> burst
= 1 ;
797 timeq_add ( now
+ ping_freq
, timed_send_ping
, 0 );
801 irc_gline ( struct server
* srv
, struct gline
* gline
, int silent
)
803 putsock ( " %s " P10_GLINE
" %s + %s %l d : %s < %s > %s " ,
804 self
-> numeric
, ( srv
? srv
-> numeric
: "*" ), gline
-> target
, gline
-> expires
- now
, silent
? "AUTO " : "" , gline
-> issuer
, gline
-> reason
);
808 irc_shun ( struct server
* srv
, struct shun
* shun
)
810 putsock ( " %s " P10_SHUN
" %s + %s %l d :< %s > %s " ,
811 self
-> numeric
, ( srv
? srv
-> numeric
: "*" ), shun
-> target
, shun
-> expires
- now
, shun
-> issuer
, shun
-> reason
);
815 irc_settime ( const char * srv_name_mask
, time_t new_time
)
817 ioset_set_time ( new_time
);
818 if (! strcmp ( srv_name_mask
, "*" ))
820 putsock ( " %s " P10_SETTIME
" " FMT_TIME_T
" %s " , self
-> numeric
, new_time
, srv_name_mask
);
824 irc_ungline ( const char * mask
)
826 putsock ( " %s " P10_GLINE
" * - %s " , self
-> numeric
, mask
);
830 irc_unshun ( const char * mask
)
832 putsock ( " %s " P10_SHUN
" * - %s " , self
-> numeric
, mask
);
836 irc_burst ( struct chanNode
* chan
)
838 char burst_line
[ 512 ];
839 int pos
, base_len
, len
;
842 struct exemptNode
* en
;
846 base_len
= sprintf ( burst_line
, " %s " P10_BURST
" %s " FMT_TIME_T
" " ,
847 self
-> numeric
, chan
-> name
, chan
-> timestamp
);
848 len
= irc_make_chanmode ( chan
, burst_line
+ base_len
);
849 pos
= base_len
+ len
;
851 burst_line
[ pos
++] = ' ' ;
853 if ( chan
-> members
. used
< 1 )
854 return ; /* dont burst empty channels (created by discrims) */
856 for ( n
= 0 ; n
< chan
-> members
. used
; n
++) {
857 mn
= chan
-> members
. list
[ n
];
859 burst_line
[ pos
- 1 ] = 0 ; /* -1 to back up over the space or comma */
860 putsock ( " %s " , burst_line
);
865 memcpy ( burst_line
+ pos
, mn
-> user
-> numeric
, strlen ( mn
-> user
-> numeric
));
866 pos
+= strlen ( mn
-> user
-> numeric
);
867 if ( mn
-> modes
&& ( mn
-> modes
!= last_mode
)) {
868 last_mode
= mn
-> modes
;
869 burst_line
[ pos
++] = ':' ;
870 if ( last_mode
& MODE_CHANOP
)
871 burst_line
[ pos
++] = 'o' ;
872 if ( last_mode
& MODE_HALFOP
)
873 burst_line
[ pos
++] = 'h' ;
874 if ( last_mode
& MODE_VOICE
)
875 burst_line
[ pos
++] = 'v' ;
877 if (( n
+ 1 )< chan
-> members
. used
)
878 burst_line
[ pos
++] = ',' ;
880 if ( chan
-> banlist
. used
) {
882 if ( pos
+ 2 + strlen ( chan
-> banlist
. list
[ 0 ]-> ban
) > 505 ) {
883 burst_line
[ pos
- 1 ] = 0 ;
884 putsock ( " %s " , burst_line
);
887 burst_line
[ pos
++] = ' ' ;
890 burst_line
[ pos
++] = ':' ;
891 burst_line
[ pos
++] = '%' ;
893 for ( n
= 0 ; n
< chan
-> banlist
. used
; n
++) {
894 bn
= chan
-> banlist
. list
[ n
];
895 len
= strlen ( bn
-> ban
);
896 if ( pos
+ len
+ 1 > 510 ) {
897 burst_line
[ pos
- 1 ] = 0 ; /* -1 to back up over the space or comma */
898 putsock ( " %s " , burst_line
);
901 memcpy ( burst_line
+ pos
, bn
-> ban
, len
);
903 burst_line
[ pos
++] = ' ' ;
906 if ( chan
-> exemptlist
. used
) {
907 /* dump the exempt */
908 if ( pos
+ 2 + strlen ( chan
-> exemptlist
. list
[ 0 ]-> exempt
) > 505 ) {
909 burst_line
[ pos
- 1 ] = 0 ;
910 putsock ( " %s " , burst_line
);
913 burst_line
[ pos
++] = ' ' ;
916 burst_line
[ pos
++] = ' ' ;
917 burst_line
[ pos
++] = '~' ;
918 burst_line
[ pos
++] = ' ' ;
920 for ( n
= 0 ; n
< chan
-> exemptlist
. used
; n
++) {
921 en
= chan
-> exemptlist
. list
[ n
];
922 len
= strlen ( en
-> exempt
);
923 if ( pos
+ len
+ 1 > 510 ) {
924 burst_line
[ pos
- 1 ] = 0 ; /* -1 to back up over the space or comma */
925 putsock ( " %s " , burst_line
);
928 memcpy ( burst_line
+ pos
, en
-> exempt
, len
);
930 burst_line
[ pos
++] = ' ' ;
933 /* print the last line */
935 putsock ( " %s " , burst_line
);
939 irc_quit ( struct userNode
* user
, const char * message
)
941 putsock ( " %s " P10_QUIT
" : %s " , user
-> numeric
, message
);
945 irc_error ( const char * to
, const char * message
)
948 putsock ( " %s " P10_ERROR
" : %s " , to
, message
);
950 putsock ( ": %s " P10_ERROR
" : %s " , self
-> name
, message
);
955 irc_kill ( struct userNode
* from
, struct userNode
* target
, const char * message
)
958 putsock ( " %s " P10_KILL
" %s : %s ! %s ( %s )" ,
959 from
-> numeric
, target
-> numeric
, self
-> name
, from
-> nick
, message
);
961 putsock ( " %s " P10_KILL
" %s : %s ( %s )" ,
962 self
-> numeric
, target
-> numeric
, self
-> name
, message
);
967 irc_mode ( struct userNode
* from
, struct chanNode
* target
, const char * modes
)
969 call_channel_mode_funcs ( from
, target
, ( char **)& modes
, 0 );
970 putsock ( " %s " P10_MODE
" %s %s " FMT_TIME_T
,
971 ( from
? from
-> numeric
: self
-> numeric
),
972 target
-> name
, modes
, target
-> timestamp
);
975 /* Added to allow services to mode users
976 2005 - 8 - 10 by Life4Christ
979 irc_umode ( struct userNode
* target
, const char * modes
)
981 putsock ( " %s " P10_MODE
" %s %s " , self
-> numeric
, target
-> nick
, modes
);
986 irc_invite ( struct userNode
* from
, struct userNode
* who
, struct chanNode
* to
)
988 putsock ( " %s " P10_INVITE
" %s %s " , from
-> numeric
, who
-> nick
, to
-> name
);
992 irc_silence ( struct userNode
* who
, const char * mask
, int add
)
994 putsock ( " %s " P10_SILENCE
" %s %s%s " , self
-> numeric
, who
-> numeric
, add
? "+" : "-" , mask
);
998 irc_join ( struct userNode
* who
, struct chanNode
* what
)
1000 if ( what
-> members
. used
== 1 ) {
1001 putsock ( " %s " P10_CREATE
" %s %l u" ,
1002 who
-> numeric
, what
-> name
, what
-> timestamp
);
1004 putsock ( " %s " P10_JOIN
" %s %l u" , who
-> numeric
, what
-> name
, what
-> timestamp
);
1009 irc_svsjoin ( struct userNode
* from
, struct userNode
* who
, struct chanNode
* to
)
1011 putsock ( " %s " P10_SVSJOIN
" %s %s " FMT_TIME_T
, from
-> uplink
-> numeric
, who
-> numeric
, to
-> name
, now
);
1015 irc_svspart ( struct userNode
* from
, struct userNode
* who
, struct chanNode
* to
)
1017 putsock ( " %s " P10_SVSPART
" %s %s " , from
-> uplink
-> numeric
, who
-> numeric
, to
-> name
);
1021 irc_kick ( struct userNode
* who
, struct userNode
* target
, struct chanNode
* channel
, const char * msg
)
1023 const char * numeric
;
1024 struct modeNode
* mn
= GetUserMode ( channel
, who
);
1025 numeric
= (( mn
&& ( mn
-> modes
& MODE_CHANOP
)) || off_channel
) ? who
-> numeric
: self
-> numeric
;
1026 putsock ( " %s " P10_KICK
" %s %s : %s " ,
1027 numeric
, channel
-> name
, target
-> numeric
, msg
);
1031 irc_stats ( struct userNode
* from
, struct server
* target
, char type
)
1033 putsock ( " %s " P10_STATS
" %c : %s " , from
-> numeric
, type
, target
-> numeric
);
1037 irc_svsnick ( struct userNode
* from
, struct userNode
* target
, const char * newnick
)
1039 putsock ( " %s " P10_SVSNICK
" %s %s " FMT_TIME_T
, from
-> uplink
-> numeric
, target
-> numeric
, newnick
, now
);
1043 irc_swhois ( struct userNode
* from
, struct userNode
* target
, const char * message
)
1045 putsock ( " %s " P10_SWHOIS
" %s %s%s " , from
-> uplink
-> numeric
, target
-> numeric
, message
? ":" : "" ,
1046 message
? message
: "" );
1051 irc_part ( struct userNode
* who
, struct chanNode
* what
, const char * reason
)
1054 putsock ( " %s " P10_PART
" %s : %s " , who
-> numeric
, what
-> name
, reason
);
1056 putsock ( " %s " P10_PART
" %s " , who
-> numeric
, what
-> name
);
1061 irc_topic ( struct userNode
* service
, struct userNode
* who
, struct chanNode
* what
, const char * topic
)
1065 int host_in_topic
= 0 ;
1066 const char * hstr
, * tstr
;
1067 char * host
, * hostmask
;
1069 char sident
[ MAXLEN
];
1071 tstr
= conf_get_data ( "server/type" , RECDB_QSTRING
);
1072 hstr
= conf_get_data ( "server/host_in_topic" , RECDB_QSTRING
);
1076 type
= 4 ; /* default to 040 style topics */
1079 if ( IsFakeHost ( who
))
1080 safestrncpy ( shost
, who
-> fakehost
, sizeof ( shost
));
1081 else if ( IsSetHost ( who
)) {
1082 hostmask
= strdup ( who
-> sethost
);
1083 if (( host
= ( strrchr ( hostmask
, '@' ))))
1088 safestrncpy ( sident
, hostmask
, sizeof ( shost
));
1089 safestrncpy ( shost
, host
, sizeof ( shost
));
1091 safestrncpy ( shost
, who
-> hostname
, sizeof ( shost
));
1093 host_in_topic
= atoi ( hstr
);
1097 putsock ( " %s " P10_TOPIC
" %s %s%s%s%s%s " FMT_TIME_T
" " FMT_TIME_T
" : %s " , service
-> numeric
, what
-> name
,
1098 who
-> nick
, host_in_topic
? "!" : "" , host_in_topic
? ( IsSetHost ( who
) ? sident
: who
-> ident
) : "" ,
1099 host_in_topic
? "@" : "" , host_in_topic
? shost
: "" , what
-> timestamp
, now
, topic
);
1102 putsock ( " %s " P10_TOPIC
" %s : %s " , who
-> numeric
, what
-> name
, topic
);
1107 irc_raw ( const char * what
)
1109 putsock ( " %s " , what
);
1113 irc_numeric ( struct userNode
* user
, unsigned int num
, const char * format
, ...)
1116 char buffer
[ MAXLEN
];
1117 va_start ( arg_list
, format
);
1118 vsnprintf ( buffer
, MAXLEN
- 2 , format
, arg_list
);
1119 buffer
[ MAXLEN
- 1 ] = 0 ;
1120 putsock ( ": %s %0 3d %s %s " , self
-> name
, num
, user
-> nick
, buffer
);
1124 irc_mark ( struct userNode
* user
, char * mark
)
1126 char * host
= user
-> hostname
;
1128 /* 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 */
1132 /* if the mark will put us over the host length, clip some off the left hand side
1135 if ( strlen ( host
) + 1 + strlen ( mark
) > HOSTLEN
)
1136 host
+= 1 + ( ( strlen ( host
) + 1 + strlen ( mark
)) - HOSTLEN
);
1137 putsock ( " %s " CMD_MARK
" %s DNSBL +m %s . %s " , self
-> numeric
, user
-> nick
, mark
, host
);
1138 putsock ( " %s " CMD_MARK
" %s DNSBL_DATA %s " , self
-> numeric
, user
-> nick
, mark
);
1140 /* Save it in the user */
1141 user
-> mark
= strdup ( mark
);
1143 /* If they are not otherwise marked, mark their host with fakehost */
1144 if (! IsFakeHost ( user
) && ! IsSetHost ( user
) && !( IsHiddenHost ( user
) && user
-> handle_info
) )
1146 struct modeNode
* mn
= NULL
;
1147 char fakehost
[ HOSTLEN
];
1148 unsigned int count
= 0 ;
1151 putsock ( " %s " CMD_FAKEHOST
" %s %s . %s " , self
-> numeric
, user
-> numeric
, mark
, host
);
1152 putsock ( " %s " CMD_MODE
" %s +x" , self
-> numeric
, user
-> nick
);
1154 snprintf ( fakehost
, sizeof ( fakehost
), " %s . %s " , mark
, host
);
1155 safestrncpy ( user
-> fakehost
, fakehost
, sizeof ( user
-> fakehost
));
1157 for ( n
= count
= 0 ; n
< user
-> channels
. used
; n
++) {
1158 mn
= user
-> channels
. list
[ n
];
1159 if ( strlen ( mn
-> channel
-> name
) >= 1 ) /* Sanity */
1160 check_bans ( user
, mn
-> channel
-> name
);
1165 static void send_burst ( void );
1168 change_nicklen ( int new_nicklen
)
1171 char new_nick
[ NICKLEN
+ 1 ];
1172 struct userNode
* user
;
1174 nicklen
= new_nicklen
;
1175 /* fix up any users we have here */
1176 for ( nn
= 0 ; nn
<= self
-> num_mask
; nn
++) {
1177 if (!( user
= self
-> users
[ nn
]))
1179 safestrncpy ( new_nick
, user
-> nick
, sizeof ( new_nick
));
1180 new_nick
[ nicklen
] = 0 ;
1181 NickChange ( user
, new_nick
, 1 );
1185 static CMD_FUNC ( cmd_whois
)
1187 struct userNode
* from
;
1188 struct userNode
* who
;
1192 if (!( from
= GetUserH ( origin
))) {
1193 log_module ( MAIN_LOG
, LOG_ERROR
, "Could not find WHOIS origin user %s " , origin
);
1196 if (!( who
= GetUserH ( argv
[ 2 ]))) {
1197 irc_numeric ( from
, ERR_NOSUCHNICK
, " %s @ %s :No such nick" , argv
[ 2 ], self
-> name
);
1200 if ( IsHiddenHost ( who
) && ! IsOper ( from
)) {
1201 /* Just stay quiet. */
1204 irc_numeric ( from
, RPL_WHOISUSER
, " %s %s %s * : %s " , who
-> nick
, who
-> ident
, who
-> hostname
, who
-> info
);
1205 if ( his_servername
&& his_servercomment
)
1206 irc_numeric ( from
, RPL_WHOISSERVER
, " %s %s : %s " , who
-> nick
, his_servername
, his_servercomment
);
1208 irc_numeric ( from
, RPL_WHOISSERVER
, " %s %s : %s " , who
-> nick
, who
-> uplink
-> name
, who
-> uplink
-> description
);
1210 irc_numeric ( from
, RPL_WHOISOPERATOR
, " %s :is a megalomaniacal power hungry tyrant" , who
-> nick
);
1211 irc_numeric ( from
, RPL_ENDOFWHOIS
, " %s :End of /WHOIS list" , who
-> nick
);
1215 static CMD_FUNC ( cmd_server
)
1223 /* another server introduced us */
1224 srv
= AddServer ( GetServerH ( origin
), argv
[ 1 ], atoi ( argv
[ 2 ]), atoi ( argv
[ 3 ]), atoi ( argv
[ 4 ]), argv
[ 6 ], argv
[ argc
- 1 ]);
1227 srv
-> self_burst
= argv
[ 5 ][ 0 ] == 'J' ;
1230 /* this must be our uplink */
1231 srv
= self
-> uplink
= AddServer ( self
, argv
[ 1 ], atoi ( argv
[ 2 ]), atoi ( argv
[ 3 ]), atoi ( argv
[ 4 ]), argv
[ 6 ], argv
[ argc
- 1 ]);
1234 srv
-> self_burst
= argv
[ 5 ][ 0 ] == 'J' ;
1236 if (( argv
[ 7 ][ 0 ] == '+' ) && ! force_n2k
) {
1237 log_module ( MAIN_LOG
, LOG_WARNING
, "Got Undernet-style SERVER message but \" force_n2k \" not on." );
1242 /* Fix up our timestamps if necessary. */
1243 if ( srv
-> boot
<= PREHISTORY
) {
1244 /* Server from the mists of time.. */
1245 if ( srv
-> hops
== 1 ) {
1246 log_module ( MAIN_LOG
, LOG_ERROR
, "Server %s claims to have booted at time " FMT_TIME_T
". This is absurd." , srv
-> name
, srv
-> boot
);
1248 } else if (( str
= conf_get_data ( "server/reliable_clock" , RECDB_QSTRING
))
1249 && enabled_string ( str
)) {
1250 /* If we have a reliable clock, we just keep our current time. */
1252 if ( srv
-> boot
<= self
-> boot
) {
1253 /* The other server is older than us. Accept their timestamp.
1254 * Alternately, we are same age, but we accept their time
1255 * since we are linking to them. */
1256 self
-> boot
= srv
-> boot
;
1257 ioset_set_time ( srv
-> link
);
1260 if ( srv
== self
-> uplink
) {
1261 extern time_t burst_begin
;
1268 static CMD_FUNC ( cmd_eob
)
1270 struct server
* sender
;
1274 if (!( sender
= GetServerH ( origin
)))
1276 if ( sender
== self
-> uplink
) {
1277 cManager
. uplink
-> state
= CONNECTED
;
1278 for ( it
= dict_first ( unbursted_channels
); it
; it
= iter_next ( it
))
1279 irc_burst ( iter_data ( it
));
1280 dict_delete ( unbursted_channels
);
1281 unbursted_channels
= NULL
;
1285 /* now that we know who our uplink is,
1286 * we can center the routing map and activate auto-routing.
1288 //activate_routing(NULL, NULL, NULL);
1291 sender
-> self_burst
= 0 ;
1292 recalc_bursts ( sender
);
1293 for ( ii
= 0 ; ii
< slf_used
; ii
++)
1294 slf_list
[ ii
]( sender
);
1295 /* let auto-routing figure out if we were
1296 * wating on this server to link a child to it */
1297 /* DONT call this if uplink is _US_ */
1298 if ( sender
-> uplink
!= self
)
1299 routing_handle_connect ( sender
-> name
, sender
-> uplink
-> name
);
1303 static CMD_FUNC ( cmd_eob_ack
)
1305 extern time_t burst_begin
;
1307 if ( GetServerH ( origin
) == self
-> uplink
) {
1308 burst_length
= now
- burst_begin
;
1309 self
-> self_burst
= self
-> burst
= 0 ;
1311 cManager
. uplink
-> state
= CONNECTED
;
1315 static CMD_FUNC ( cmd_rping
)
1317 struct server
* dest
;
1319 if (!( dest
= GetServerN ( argv
[ 1 ])))
1323 irc_rpong ( argv
[ 2 ], argv
[ 3 ], argv
[ 4 ], argv
[ 5 ]);
1328 static CMD_FUNC ( cmd_ping
)
1331 struct userNode
* un
;
1334 irc_pong_asll ( argv
[ 2 ], argv
[ 3 ]);
1335 else if (( srv
= GetServerH ( origin
)))
1336 irc_pong ( self
-> name
, srv
-> numeric
);
1337 else if (( un
= GetUserH ( origin
)))
1338 irc_pong ( self
-> name
, un
-> numeric
);
1340 irc_pong ( self
-> name
, origin
);
1342 timeq_del ( 0 , timed_send_ping
, 0 , TIMEQ_IGNORE_WHEN
| TIMEQ_IGNORE_DATA
);
1343 timeq_del ( 0 , timed_ping_timeout
, 0 , TIMEQ_IGNORE_WHEN
| TIMEQ_IGNORE_DATA
);
1344 timeq_add ( now
+ ping_freq
, timed_send_ping
, 0 );
1349 static CMD_FUNC ( cmd_error_nick
)
1351 /* Go back to original IRC length .. and try to reconnect :/ */
1353 irc_squit ( self
, "Got erroneous nickname, truncating nicks." , NULL
);
1357 struct create_desc
{
1358 struct userNode
* user
;
1363 join_helper ( struct chanNode
* chan
, void * data
)
1365 struct create_desc
* cd
= data
;
1366 AddChannelUser ( cd
-> user
, chan
);
1370 create_helper ( char * name
, void * data
)
1372 struct create_desc
* cd
= data
;
1374 if (! strcmp ( name
, "0" )) {
1375 while ( cd
-> user
-> channels
. used
> 0 )
1376 DelChannelUser ( cd
-> user
, cd
-> user
-> channels
. list
[ 0 ]-> channel
, 0 , 0 );
1380 AddChannelUser ( cd
-> user
, AddChannel ( name
, cd
-> when
, NULL
, NULL
, NULL
));
1383 static CMD_FUNC ( cmd_create
)
1385 struct create_desc cd
;
1386 struct userNode
* user
;
1388 if (( argc
< 3 ) || !( user
= GetUserH ( origin
)))
1391 cd
. when
= atoi ( argv
[ 2 ]);
1392 parse_foreach ( argv
[ 1 ], join_helper
, create_helper
, NULL
, NULL
, & cd
);
1396 static CMD_FUNC ( cmd_join
)
1398 struct create_desc cd
;
1400 if (!( cd
. user
= GetUserH ( origin
)))
1407 cd
. when
= atoi ( argv
[ 2 ]);
1408 parse_foreach ( argv
[ 1 ], join_helper
, create_helper
, NULL
, NULL
, & cd
);
1412 static CMD_FUNC ( cmd_svsjoin
)
1414 struct create_desc cd
;
1416 if (!( cd
. user
= GetUserH ( argv
[ 1 ])))
1423 cd
. when
= atoi ( argv
[ 3 ]);
1424 parse_foreach ( argv
[ 2 ], join_helper
, create_helper
, NULL
, NULL
, & cd
);
1428 static CMD_FUNC ( cmd_pong
)
1432 if (! strcmp ( argv
[ 2 ], self
-> name
)) {
1433 timeq_del ( 0 , timed_send_ping
, 0 , TIMEQ_IGNORE_WHEN
| TIMEQ_IGNORE_DATA
);
1434 timeq_del ( 0 , timed_ping_timeout
, 0 , TIMEQ_IGNORE_WHEN
| TIMEQ_IGNORE_DATA
);
1435 timeq_add ( now
+ ping_freq
, timed_send_ping
, 0 );
1441 static CMD_FUNC ( cmd_nick
)
1443 struct userNode
* user
;
1444 if (( user
= GetUserH ( origin
))) {
1445 /* nick change (since the source is a user numeric) */
1448 NickChange ( user
, argv
[ 1 ], 1 );
1450 struct server
* serv
;
1451 struct userNode
* nuser
;
1456 serv
= GetServerH ( origin
);
1458 unsplit_string ( argv
+ 6 , argc
- 9 , modes
);
1461 nuser
= AddUser ( serv
, argv
[ 1 ], argv
[ 4 ], argv
[ 5 ], modes
, argv
[ argc
- 2 ], argv
[ argc
- 1 ], atoi ( argv
[ 3 ]), argv
[ argc
- 3 ]);
1466 static CMD_FUNC ( cmd_account
)
1468 struct userNode
* user
;
1469 struct server
* server
;
1470 struct handle_info
* hi
;
1472 if (( argc
< 3 ) || ! origin
|| !( server
= GetServerH ( origin
)))
1473 return 0 ; /* Origin must be server. */
1475 /* This next line appears to tremple origin.. why? */
1476 user
= GetUserN ( argv
[ 1 ]);
1478 return 1 ; /* A QUIT probably passed the ACCOUNT. */
1480 if (! extended_accounts
) /* any need for this function without? */
1483 if (! strcmp ( argv
[ 2 ], "C" ))
1485 if (( hi
= loc_auth ( argv
[ 4 ], argv
[ 5 ])))
1488 putsock ( " %s " P10_ACCOUNT
" %s A %s %l u" , self
-> numeric
, server
-> numeric
, argv
[ 3 ], hi
-> registered
);
1494 putsock ( " %s " P10_ACCOUNT
" %s D %s " , self
-> numeric
, server
-> numeric
, argv
[ 3 ]);
1498 else if (! strcmp ( argv
[ 2 ], "R" ))
1499 call_account_func ( user
, argv
[ 3 ]);
1501 call_account_func ( user
, argv
[ 2 ]); /* For backward compatability */
1505 static CMD_FUNC ( cmd_fakehost
)
1507 struct userNode
* user
;
1509 if (( argc
< 3 ) || ! origin
|| ! GetServerH ( origin
))
1511 if (!( user
= GetUserN ( argv
[ 1 ])))
1513 assign_fakehost ( user
, argv
[ 2 ], 0 );
1521 #define P(priv) { #priv, PRIV_ ## priv }
1522 P ( CHAN_LIMIT
), P ( MODE_LCHAN
), P ( WALK_LCHAN
), P ( DEOP_LCHAN
),
1523 P ( SHOW_INVIS
), P ( SHOW_ALL_INVIS
), P ( UNLIMIT_QUERY
), P ( KILL
),
1524 P ( LOCAL_KILL
), P ( REHASH
), P ( RESTART
), P ( DIE
),
1525 P ( GLINE
), P ( LOCAL_GLINE
), P ( JUPE
), P ( LOCAL_JUPE
),
1526 P ( OPMODE
), P ( LOCAL_OPMODE
), P ( SET
), P ( WHOX
),
1527 P ( BADCHAN
), P ( LOCAL_BADCHAN
), P ( SEE_CHAN
), P ( PROPAGATE
),
1528 P ( DISPLAY
), P ( SEE_OPERS
), P ( WIDE_GLINE
), P ( FORCE_OPMODE
),
1529 P ( FORCE_LOCAL_OPMODE
), P ( REMOTEREHASH
), P ( CHECK
), P ( SEE_SECRET_CHAN
),
1530 P ( SHUN
), P ( LOCAL_SHUN
), P ( WIDE_SHUN
),
1535 char * client_report_privs ( struct userNode
* client
)
1540 for ( i
= 0 ; privtab
[ i
]. name
; i
++) {
1541 if ( HasPriv ( client
, privtab
[ i
]. priv
)) {
1542 strcat ( privbuf
, privtab
[ i
]. name
);
1543 strcat ( privbuf
, " " );
1547 privbuf
[ strlen ( privbuf
)] = 0 ;
1552 int client_modify_priv_by_name ( struct userNode
* who
, char * priv
, int what
) {
1557 for ( i
= 0 ; privtab
[ i
]. name
; i
++) {
1558 if ( 0 == strcmp ( privtab
[ i
]. name
, priv
)) {
1559 if ( what
== PRIV_ADD
)
1560 GrantPriv ( who
, privtab
[ i
]. priv
);
1561 else if ( what
== PRIV_DEL
) {
1562 RevokePriv ( who
, privtab
[ i
]. priv
);
1569 int check_priv ( char * priv
)
1573 for ( i
= 0 ; privtab
[ i
]. name
; i
++) {
1574 if ( 0 == strcmp ( privtab
[ i
]. name
, priv
)) {
1582 irc_privs ( struct userNode
* target
, char * flag
, int add
)
1584 client_modify_priv_by_name ( target
, flag
, add
);
1585 putsock ( " %s " P10_PRIVS
" %s %s%s " , self
-> numeric
, target
-> numeric
, ( add
== PRIV_ADD
) ? "+" : "-" , flag
);
1588 static CMD_FUNC ( cmd_privs
)
1593 tstr
= conf_get_data ( "server/type" , RECDB_QSTRING
);
1598 return 1 ; /* silently ignore */
1600 struct userNode
* user
= argc
> 1 ? GetUserN ( argv
[ 1 ]) : NULL
;
1602 int what
= PRIV_ADD
;
1613 for ( i
= 1 ; i
< argc
; i
++) {
1614 strcat ( buf
, argv
[ i
]);
1618 for ( i
= 2 ; i
< argc
; i
++) {
1619 if (* argv
[ i
] == '+' ) { what
= PRIV_ADD
; argv
[ i
]++; }
1620 if (* argv
[ i
] == '-' ) { what
= PRIV_DEL
; argv
[ i
]++; }
1621 for ( tmp
= x3_strtok (& p
, argv
[ i
], "," ); tmp
;
1622 tmp
= x3_strtok (& p
, NULL
, "," )) {
1623 client_modify_priv_by_name ( user
, tmp
, what
);
1629 static CMD_FUNC ( cmd_burst
)
1632 char modes
[ MAXLEN
], * members
= "" ;
1633 static char exemptlist
[ MAXLEN
], banlist
[ MAXLEN
];
1634 unsigned int next
= 3 , res
= 1 ;
1635 int ctype
= 0 , echeck
= 0 , bcheck
= 0 ;
1636 struct chanData
* cData
;
1637 struct chanNode
* cNode
;
1638 struct userNode
* un
;
1639 struct modeNode
* mNode
;
1642 char * user
, * end
, sep
;
1643 time_t in_timestamp
;
1653 while ( next
< argc
) {
1654 switch ( argv
[ next
][ 0 ]) {
1658 for ( pos
= argv
[ next
], n_modes
= 1 ; * pos
; pos
++)
1659 if ((* pos
== 'k' ) || (* pos
== 'l' ) || (* pos
== 'A' )
1662 unsplit_string ( argv
+ next
, n_modes
, modes
);
1667 for ( parm
= mysep (& argv
[ next
], " " ); /* parm = first param */
1668 parm
; /* While param is not null */
1669 parm
= mysep (& argv
[ next
], " " ) /* parm = next param */
1687 /* strip % char off start of very first ban */
1688 if ( strlen ( parm
) > 1 ) {
1689 strncat ( banlist
, strtok ( parm
, "%" ), sizeof ( banlist
) - 1 - strlen ( banlist
));
1690 strncat ( banlist
, " " , sizeof ( banlist
) - 1 - strlen ( banlist
));
1694 strncat ( banlist
, parm
, sizeof ( banlist
) - 1 - strlen ( banlist
));
1695 strncat ( banlist
, " " , sizeof ( banlist
) - 1 - strlen ( banlist
));
1697 } else if ( ctype
== 2 ) {
1701 strncat ( exemptlist
, parm
, sizeof ( exemptlist
) - 1 - strlen ( exemptlist
));
1702 strncat ( exemptlist
, " " , sizeof ( exemptlist
) - 1 - strlen ( exemptlist
));
1709 default : members
= argv
[ next
++]; break ;
1713 in_timestamp
= atoi ( argv
[ 2 ]);
1714 if (( cNode
= dict_find ( unbursted_channels
, argv
[ 1 ], NULL
))) {
1715 cNode
-> timestamp
= in_timestamp
;
1716 dict_remove ( unbursted_channels
, cNode
-> name
);
1719 cNode
= AddChannel ( argv
[ 1 ], in_timestamp
, modes
, banlist
, exemptlist
);
1720 cData
= cNode
-> channel_info
;
1723 if ( cNode
-> modes
& MODE_REGISTERED
) {
1724 irc_join ( opserv
, cNode
);
1725 irc_mode ( opserv
, cNode
, "-z" );
1726 irc_part ( opserv
, cNode
, "" );
1730 /* Burst channel members in now. */
1731 for ( user
= members
, sep
= * members
, mode
= 0 ; sep
; user
= end
) {
1732 for ( end
= user
+ 3 ; isalnum (* end
) || * end
== '[' || * end
== ']' ; end
++) ;
1733 sep
= * end
++; end
[- 1 ] = 0 ;
1736 while (( sep
= * end
++)) {
1738 mode
|= MODE_CHANOP
;
1740 } else if ( sep
== 'h' ) {
1741 mode
|= MODE_HALFOP
;
1743 } else if ( sep
== 'v' ) {
1746 } else if ( isdigit ( sep
)) {
1747 mode
|= MODE_CHANOP
;
1749 oplevel
+= parse_oplevel ( end
);
1751 oplevel
= parse_oplevel ( end
);
1752 while ( isdigit (* end
)) end
++;
1759 if (!( un
= GetUserN ( user
))) {
1763 if (( mNode
= AddChannelUser ( un
, cNode
))) {
1764 mNode
-> modes
= mode
;
1765 mNode
-> oplevel
= oplevel
;
1773 * This is a stub that doesn't actually do anything. It should be completed
1774 * so that bans on *!*@markname.* match users as it does in nefarious
1776 static CMD_FUNC ( cmd_mark
)
1778 struct userNode
* target
;
1780 * log_module(MAIN_LOG, LOG_ERROR, "DEBUG: mark, user %s, type %s, arg %s", argv[1], argv[2], argv[3]);
1785 if (! strcasecmp ( argv
[ 2 ], "DNSBL" )) {
1789 else if (! strcasecmp ( argv
[ 2 ], "DNSBL_DATA" )) {
1790 /* DNSBL_DATA name */
1791 target
= GetUserH ( argv
[ 1 ]);
1793 log_module ( MAIN_LOG
, LOG_ERROR
, "Unable to find user %s whose dnsbl mark is changing." , argv
[ 1 ]);
1796 target
-> mark
= strdup ( argv
[ 3 ]);
1800 else if (! strcasecmp ( argv
[ 2 ], "CVERSION" )) {
1801 /* DNSBL_DATA name */
1802 target
= GetUserH ( argv
[ 1 ]);
1804 log_module ( MAIN_LOG
, LOG_ERROR
, "Unable to find user %s whose version mark is changing." , argv
[ 1 ]);
1808 target
-> version_reply
= strdup ( unsplit_string ( argv
+ 3 , argc
- 3 , NULL
));
1811 /* unknown type of mark */
1815 static CMD_FUNC ( cmd_mode
)
1817 struct chanNode
* cn
;
1818 struct userNode
* un
;
1819 char * sethost
; // sethost - reed/apples
1820 int i
; // sethost - reed/apples
1824 if (! IsChannelName ( argv
[ 1 ])) {
1825 un
= GetUserH ( argv
[ 1 ]);
1827 log_module ( MAIN_LOG
, LOG_ERROR
, "Unable to find user %s whose mode is changing." , argv
[ 1 ]);
1830 // sethost - reed/apples
1832 mod_usermode ( un
, argv
[ 2 ]);
1834 sethost
= malloc ( strlen ( argv
[ 2 ]) + 1 + strlen ( argv
[ 3 ]) + 1 );
1836 while (( sethost
[ i
++] = * argv
[ 2 ]++));
1839 while (( sethost
[ i
++] = * argv
[ 3 ]++));
1840 mod_usermode ( un
, sethost
); // sethost - reed/apples
1846 if (!( cn
= GetChannel ( argv
[ 1 ]))) {
1847 log_module ( MAIN_LOG
, LOG_ERROR
, "Unable to find channel %s whose mode is changing." , argv
[ 1 ]);
1850 if (( un
= GetUserH ( origin
))) {
1851 struct modeNode
* mn
;
1852 /* Update idle time for person setting the mode */
1853 if (( mn
= GetUserMode ( cn
, un
)))
1854 mn
-> idle_since
= now
;
1856 /* If it came from a server, reset timestamp to re-sync. */
1857 cn
-> timestamp
= atoi ( argv
[ argc
- 1 ]);
1860 if ( checkDefCon ( DEFCON_NO_MODE_CHANGE
) && ! IsOper ( un
)) {
1862 str
= conf_get_data ( "services/opserv/nick" , RECDB_QSTRING
);
1864 char modes
[ MODELEN
];
1865 struct userNode
* opserv
= GetUserH ( str
);
1867 send_message_type ( 4 , un
, opserv
, "Channel modes cannot be changed due to DefCon level %d in effect, please try again soon" , DefConLevel
);
1868 irc_make_chanmode ( cn
, modes
);
1869 irc_mode ( opserv
, cn
, modes
);
1870 irc_mode ( opserv
, cn
, DefConChanModes
);
1876 return mod_chanmode ( un
, cn
, argv
+ 2 , argc
- 2 , MCP_ALLOW_OVB
| MCP_FROM_SERVER
|( un
? MC_NOTIFY
: 0 ));
1879 static CMD_FUNC ( cmd_opmode
)
1881 struct chanNode
* cn
;
1882 struct userNode
* un
;
1887 if (!( cn
= GetChannel ( argv
[ 1 ]))) {
1888 log_module ( MAIN_LOG
, LOG_ERROR
, "Unable to find channel %s whose mode is changing." , argv
[ 1 ]);
1891 if (!( un
= GetUserH ( origin
))) {
1892 log_module ( MAIN_LOG
, LOG_ERROR
, "Unable to find user %s requesting OPMODE." , origin
);
1896 log_module ( MAIN_LOG
, LOG_ERROR
, "Non-privileged user %s using OPMODE." , un
-> nick
);
1900 return mod_chanmode ( un
, cn
, argv
+ 2 , argc
- 2 , MCP_ALLOW_OVB
| MCP_FROM_SERVER
); /* do NOT announce opmode locally */
1903 static int clear_chanmode ( struct chanNode
* channel
, const char * modes
);
1905 static CMD_FUNC ( cmd_clearmode
)
1907 struct chanNode
* cn
;
1908 struct userNode
* un
;
1913 if (!( cn
= GetChannel ( argv
[ 1 ]))) {
1914 log_module ( MAIN_LOG
, LOG_ERROR
, "Unable to find channel %s whose mode is changing." , argv
[ 1 ]);
1917 if (!( un
= GetUserH ( origin
))) {
1918 log_module ( MAIN_LOG
, LOG_ERROR
, "Unable to find user %s requesting CLEARMODE." , origin
);
1922 log_module ( MAIN_LOG
, LOG_ERROR
, "Non-privileged user %s using CLEARMODE." , un
-> nick
);
1926 return clear_chanmode ( cn
, argv
[ 2 ]);
1929 static CMD_FUNC ( cmd_topic
)
1931 struct chanNode
* cn
;
1932 time_t chan_ts
, topic_ts
;
1933 struct userNode
* user
;
1937 if (!( cn
= GetChannel ( argv
[ 1 ]))) {
1938 log_module ( MAIN_LOG
, LOG_ERROR
, "Unable to find channel %s whose topic is being set" , argv
[ 1 ]);
1943 if ( argc
== 5 ) { /* Asuka / Topic Bursting IRCu's */
1944 user
= GetUserH ( origin
);
1945 chan_ts
= atoi ( argv
[ 2 ]);
1946 topic_ts
= atoi ( argv
[ 3 ]);
1947 } else if ( argc
>= 6 ) { /* Nefarious 0.5.0 */
1948 user
= GetUserH ( strtok ( argv
[ 2 ], "!" ));
1949 chan_ts
= atoi ( argv
[ 3 ]);
1950 topic_ts
= atoi ( argv
[ 4 ]);
1951 } else { /* Regular IRCu (No Topic Bursting)*/
1952 user
= GetUserH ( origin
);
1953 chan_ts
= cn
-> timestamp
;
1957 SetChannelTopic ( cn
, user
, user
, argv
[ argc
- 1 ], 0 );
1958 cn
-> topic_time
= topic_ts
;
1962 static CMD_FUNC ( cmd_num_topic
)
1964 struct chanNode
* cn
;
1967 return 0 ; /* huh? */
1969 cn
= GetChannel ( argv
[ 2 ]);
1971 log_module ( MAIN_LOG
, LOG_ERROR
, "Unable to find channel %s in topic reply" , argv
[ 2 ]);
1977 switch ( atoi ( argv
[ 0 ])) {
1980 break ; /* no topic */
1984 safestrncpy ( cn
-> topic
, unsplit_string ( argv
+ 3 , argc
- 3 , NULL
), sizeof ( cn
-> topic
));
1989 safestrncpy ( cn
-> topic_nick
, argv
[ 3 ], sizeof ( cn
-> topic_nick
));
1990 cn
-> topic_time
= atoi ( argv
[ 4 ]);
1993 return 0 ; /* should never happen */
1998 static CMD_FUNC ( cmd_num_gline
)
2002 gline_add ( origin
, argv
[ 3 ], atoi ( argv
[ 4 ])- now
, argv
[ 5 ], now
, 0 , 0 );
2006 static CMD_FUNC ( cmd_num_shun
)
2010 shun_add ( origin
, argv
[ 3 ], atoi ( argv
[ 4 ])- now
, argv
[ 5 ], now
, 0 );
2014 static CMD_FUNC ( cmd_quit
)
2016 struct userNode
* user
;
2019 /* Sometimes we get a KILL then a QUIT or the like, so we don't want to
2020 * call DelUser unless we have the user in our grasp. */
2021 if (( user
= GetUserH ( origin
)))
2022 DelUser ( user
, NULL
, false , argv
[ 1 ]);
2026 static CMD_FUNC ( cmd_kill
)
2028 struct userNode
* user
;
2031 user
= GetUserN ( argv
[ 1 ]);
2033 /* If we get a KILL for a non-existent user, it could be a
2034 * Ghost response to a KILL we sent out earlier. So we only
2035 * whine if the target is local.
2037 if (! strncmp ( argv
[ 1 ], self
-> numeric
, strlen ( self
-> numeric
)))
2038 log_module ( MAIN_LOG
, LOG_ERROR
, "Unable to find kill victim %s " , argv
[ 1 ]);
2042 if ( IsLocal ( user
) && IsService ( user
)) {
2043 /* TODO: rate limit this so silly things don't happen. */
2044 ReintroduceUser ( user
);
2048 DelUser ( user
, NULL
, false , argv
[ 2 ]);
2052 static CMD_FUNC ( cmd_part
)
2054 struct userNode
* user
;
2058 user
= GetUserH ( origin
);
2061 parse_foreach ( argv
[ 1 ], part_helper
, NULL
, NULL
, NULL
, user
);
2065 static CMD_FUNC ( cmd_svspart
)
2067 struct userNode
* user
;
2071 user
= GetUserN ( argv
[ 1 ]);
2074 parse_foreach ( argv
[ 2 ], part_helper
, NULL
, NULL
, NULL
, user
);
2078 static CMD_FUNC ( cmd_silence
)
2080 struct userNode
* user
;
2088 user
= GetUserN ( argv
[ 1 ]);
2090 /* Sanity, go nuts if this happens */
2094 /* We can safely ignore this if a user adding a silence is not
2095 * ignored. However this brings up a TODO. If a user logs in and
2096 * they have silences on the IRCd then we need to set them here
2099 if (! user
-> handle_info
)
2105 for ( i
= 0 ; i
< user
-> handle_info
-> ignores
-> used
; i
++) {
2106 if (! irccasecmp ( mask
+ 1 , user
-> handle_info
-> ignores
-> list
[ i
]))
2107 user
-> handle_info
-> ignores
-> list
[ i
] = user
-> handle_info
-> ignores
-> list
[-- user
-> handle_info
-> ignores
-> used
];
2110 for ( i
= 0 ; i
< user
-> handle_info
-> ignores
-> used
; i
++) {
2111 if (! strcmp ( mask
+ 1 , user
-> handle_info
-> ignores
-> list
[ i
]))
2112 return 1 ; /* Already on the users NickServ ignore list, safely ignore */
2115 new_mask
= strdup ( mask
+ 1 );
2116 string_list_append ( user
-> handle_info
-> ignores
, new_mask
);
2121 static CMD_FUNC ( cmd_kick
)
2125 ChannelUserKicked ( GetUserH ( origin
), GetUserN ( argv
[ 2 ]), GetChannel ( argv
[ 1 ]));
2129 static CMD_FUNC ( cmd_squit
)
2131 struct server
* server
;
2136 if (!( server
= GetServerH ( argv
[ 1 ])))
2139 if ( server
== self
-> uplink
) {
2140 /* Force a reconnect to the currently selected server. */
2141 cManager
. uplink
-> tries
= 0 ;
2142 log_module ( MAIN_LOG
, LOG_INFO
, "Squitting from uplink: %s " , argv
[ 3 ]);
2147 uplink
= strdup ( server
-> uplink
-> name
);
2148 DelServer ( server
, 0 , argv
[ 3 ]);
2149 /* if its a pingout and pingout connecting is enabled
2150 or its a read error and readerror connecting is enabled
2151 or were doing a "N" and i need to connect that server somewhere */
2152 routing_handle_squit ( argv
[ 1 ], uplink
, argv
[ 3 ]);
2157 static CMD_FUNC ( cmd_privmsg
)
2159 struct privmsg_desc pd
;
2162 pd
. user
= GetUserH ( origin
);
2163 if (! pd
. user
|| ( IsGagged ( pd
. user
) && ! IsOper ( pd
. user
)))
2166 if ( checkDefCon ( DEFCON_OPER_ONLY
) && ! IsOper ( pd
. user
)) {
2168 str
= conf_get_data ( "services/opserv/nick" , RECDB_QSTRING
);
2170 send_message_type ( 4 , pd
. user
, GetUserH ( str
), "Services are currently not available, please try again soon" );
2174 if ( checkDefCon ( DEFCON_SILENT_OPER_ONLY
) && ! IsOper ( pd
. user
))
2175 return 1 ; /* Silently Ignore */
2179 parse_foreach ( argv
[ 1 ], privmsg_chan_helper
, NULL
, privmsg_user_helper
, privmsg_invalid
, & pd
);
2184 static CMD_FUNC ( cmd_notice
)
2186 struct privmsg_desc pd
;
2193 pd
. user
= GetUserH ( origin
);
2196 if (! pd
. user
|| ( IsGagged ( pd
. user
) && ! IsOper ( pd
. user
))) {
2201 parse_foreach ( argv
[ 1 ], privmsg_chan_helper
, NULL
, privmsg_user_helper
, privmsg_invalid
, & pd
);
2204 srv
= GetServerH ( origin
);
2206 char * sargv
[ MAXNUMPARAMS
];
2209 sargc
= split_line ( argv
[ 2 ], true , MAXNUMPARAMS
, sargv
);
2211 if (! strcasecmp ( sargv
[ 0 ], "Connect:" )) {
2212 /* :Connect: Host shoe.loxxin.net not listed in ircd.conf */
2213 if (! strcasecmp ( sargv
[ 3 ], "not" ) && ! strcasecmp ( sargv
[ 4 ], "listed" )) {
2214 routing_handle_connect_failure ( srv
, sargv
[ 2 ], unsplit_string ( sargv
+ 3 , sargc
- 3 , NULL
));
2217 else if (! strcasecmp ( sargv
[ 0 ], "Link" )) {
2218 /* :Link with mephisto.etheria.cx cancelled: Server mephisto.etheria.cx[216.46.33.71]
2220 * :Link with laptop.afternet.org cancelled: Connection refused
2222 if (! strcasecmp ( sargv
[ 3 ], "cancelled:" )) {
2223 routing_handle_connect_failure ( srv
, sargv
[ 2 ], unsplit_string ( sargv
+ 4 , sargc
- 4 , NULL
));
2230 static CMD_FUNC ( cmd_away
)
2232 struct userNode
* uNode
;
2234 uNode
= GetUserH ( origin
);
2238 uNode
-> modes
&= ~ FLAGS_AWAY
;
2240 uNode
-> modes
|= FLAGS_AWAY
;
2244 static CMD_FUNC ( cmd_gline
)
2248 if ( argv
[ 2 ][ 0 ] == '+' ) {
2251 gline_add ( origin
, argv
[ 2 ]+ 1 , strtoul ( argv
[ 3 ], NULL
, 0 ), argv
[ argc
- 1 ], now
, 0 , 0 );
2253 } else if ( argv
[ 2 ][ 0 ] == '-' ) {
2254 gline_remove ( argv
[ 2 ]+ 1 , 0 );
2260 static CMD_FUNC ( cmd_shun
)
2264 if ( argv
[ 2 ][ 0 ] == '+' ) {
2267 shun_add ( origin
, argv
[ 2 ]+ 1 , strtoul ( argv
[ 3 ], NULL
, 0 ), argv
[ argc
- 1 ], now
, 0 );
2269 } else if ( argv
[ 2 ][ 0 ] == '-' ) {
2270 shun_remove ( argv
[ 2 ]+ 1 , 0 );
2276 static CMD_FUNC ( cmd_svsnick
)
2278 struct userNode
* target
, * dest
;
2280 || !( target
= GetUserN ( argv
[ 1 ]))
2282 || ( dest
= GetUserH ( argv
[ 2 ])))
2284 NickChange ( target
, argv
[ 2 ], 0 );
2288 static oper_func_t
* of_list
;
2289 static unsigned int of_size
= 0 , of_used
= 0 ;
2292 free_user ( struct userNode
* user
)
2303 free ( privmsg_funcs
);
2306 dict_delete ( irc_func_dict
);
2307 for ( nn
= 0 ; nn
< dead_users
. used
; nn
++)
2308 free_user ( dead_users
. list
[ nn
]);
2309 userList_clean (& dead_users
);
2313 p10_conf_reload ( void ) {
2314 hidden_host_suffix
= conf_get_data ( "server/hidden_host" , RECDB_QSTRING
);
2318 remove_unbursted_channel ( struct chanNode
* cNode
) {
2319 if ( unbursted_channels
)
2320 dict_remove ( unbursted_channels
, cNode
-> name
);
2326 const char * str
, * desc
;
2327 int numnick
, usermask
, max_users
;
2328 char numer
[ COMBO_NUMERIC_LEN
+ 1 ];
2330 /* read config items */
2331 str
= conf_get_data ( "server/extended_accounts" , RECDB_QSTRING
);
2332 extended_accounts
= str
? enabled_string ( str
) : 1 ;
2333 str
= conf_get_data ( "server/ping_freq" , RECDB_QSTRING
);
2334 ping_freq
= str
? ParseInterval ( str
) : 120 ;
2335 str
= conf_get_data ( "server/ping_timeout" , RECDB_QSTRING
);
2336 ping_timeout
= str
? ParseInterval ( str
) : 30 ;
2337 str
= conf_get_data ( "server/force_n2k" , RECDB_QSTRING
);
2338 force_n2k
= str
? enabled_string ( str
) : 1 ;
2339 str
= conf_get_data ( "server/numeric" , RECDB_QSTRING
);
2341 log_module ( MAIN_LOG
, LOG_ERROR
, "No server/numeric entry in config file." );
2344 numnick
= atoi ( str
);
2345 str
= conf_get_data ( "server/max_users" , RECDB_QSTRING
);
2346 max_users
= str
? atoi ( str
) : 4096 ;
2347 for ( usermask
= 4 ; usermask
< max_users
; usermask
<<= 1 ) ;
2349 if (( numnick
< 64 ) && ( usermask
< 4096 ) && ! force_n2k
)
2350 inttobase64 ( numer
, ( numnick
<< 12 ) + ( usermask
& 0x00fff ), 3 );
2352 inttobase64 ( numer
, ( numnick
<< 18 ) + ( usermask
& 0x3ffff ), 5 );
2354 str
= conf_get_data ( "server/his_servername" , RECDB_QSTRING
);
2355 his_servername
= str
? strdup ( str
) : NULL
;
2356 str
= conf_get_data ( "server/his_servercomment" , RECDB_QSTRING
);
2357 his_servercomment
= str
? strdup ( str
) : NULL
;
2359 str
= conf_get_data ( "server/hostname" , RECDB_QSTRING
);
2360 desc
= conf_get_data ( "server/description" , RECDB_QSTRING
);
2361 if (! str
|| ! desc
) {
2362 log_module ( MAIN_LOG
, LOG_ERROR
, "No server/hostname entry in config file." );
2365 self
= AddServer ( NULL
, str
, 0 , boot_time
, now
, numer
, desc
);
2366 conf_register_reload ( p10_conf_reload
);
2368 irc_func_dict
= dict_new ();
2369 dict_insert ( irc_func_dict
, CMD_BURST
, cmd_burst
);
2370 dict_insert ( irc_func_dict
, TOK_BURST
, cmd_burst
);
2371 dict_insert ( irc_func_dict
, CMD_CREATE
, cmd_create
);
2372 dict_insert ( irc_func_dict
, TOK_CREATE
, cmd_create
);
2373 dict_insert ( irc_func_dict
, CMD_EOB
, cmd_eob
);
2374 dict_insert ( irc_func_dict
, TOK_EOB
, cmd_eob
);
2375 dict_insert ( irc_func_dict
, CMD_EOB_ACK
, cmd_eob_ack
);
2376 dict_insert ( irc_func_dict
, TOK_EOB_ACK
, cmd_eob_ack
);
2377 dict_insert ( irc_func_dict
, CMD_MODE
, cmd_mode
);
2378 dict_insert ( irc_func_dict
, TOK_MODE
, cmd_mode
);
2379 dict_insert ( irc_func_dict
, CMD_MARK
, cmd_mark
);
2380 dict_insert ( irc_func_dict
, TOK_MARK
, cmd_mark
);
2381 dict_insert ( irc_func_dict
, CMD_NICK
, cmd_nick
);
2382 dict_insert ( irc_func_dict
, TOK_NICK
, cmd_nick
);
2383 dict_insert ( irc_func_dict
, CMD_ACCOUNT
, cmd_account
);
2384 dict_insert ( irc_func_dict
, TOK_ACCOUNT
, cmd_account
);
2385 dict_insert ( irc_func_dict
, CMD_FAKEHOST
, cmd_fakehost
);
2386 dict_insert ( irc_func_dict
, TOK_FAKEHOST
, cmd_fakehost
);
2387 dict_insert ( irc_func_dict
, CMD_PASS
, cmd_pass
);
2388 dict_insert ( irc_func_dict
, TOK_PASS
, cmd_pass
);
2389 dict_insert ( irc_func_dict
, CMD_PING
, cmd_ping
);
2390 dict_insert ( irc_func_dict
, TOK_PING
, cmd_ping
);
2391 dict_insert ( irc_func_dict
, CMD_PRIVMSG
, cmd_privmsg
);
2392 dict_insert ( irc_func_dict
, TOK_PRIVMSG
, cmd_privmsg
);
2393 dict_insert ( irc_func_dict
, CMD_PONG
, cmd_pong
);
2394 dict_insert ( irc_func_dict
, TOK_PONG
, cmd_pong
);
2395 dict_insert ( irc_func_dict
, CMD_QUIT
, cmd_quit
);
2396 dict_insert ( irc_func_dict
, TOK_QUIT
, cmd_quit
);
2397 dict_insert ( irc_func_dict
, CMD_SERVER
, cmd_server
);
2398 dict_insert ( irc_func_dict
, TOK_SERVER
, cmd_server
);
2399 dict_insert ( irc_func_dict
, CMD_JOIN
, cmd_join
);
2400 dict_insert ( irc_func_dict
, TOK_JOIN
, cmd_join
);
2401 dict_insert ( irc_func_dict
, CMD_PART
, cmd_part
);
2402 dict_insert ( irc_func_dict
, TOK_PART
, cmd_part
);
2403 dict_insert ( irc_func_dict
, CMD_ERROR
, cmd_error
);
2404 dict_insert ( irc_func_dict
, TOK_ERROR
, cmd_error
);
2405 dict_insert ( irc_func_dict
, CMD_TOPIC
, cmd_topic
);
2406 dict_insert ( irc_func_dict
, TOK_TOPIC
, cmd_topic
);
2407 dict_insert ( irc_func_dict
, CMD_AWAY
, cmd_away
);
2408 dict_insert ( irc_func_dict
, TOK_AWAY
, cmd_away
);
2409 dict_insert ( irc_func_dict
, CMD_SILENCE
, cmd_silence
);
2410 dict_insert ( irc_func_dict
, TOK_SILENCE
, cmd_silence
);
2411 dict_insert ( irc_func_dict
, CMD_KICK
, cmd_kick
);
2412 dict_insert ( irc_func_dict
, TOK_KICK
, cmd_kick
);
2413 dict_insert ( irc_func_dict
, CMD_SQUIT
, cmd_squit
);
2414 dict_insert ( irc_func_dict
, TOK_SQUIT
, cmd_squit
);
2415 dict_insert ( irc_func_dict
, CMD_KILL
, cmd_kill
);
2416 dict_insert ( irc_func_dict
, TOK_KILL
, cmd_kill
);
2417 dict_insert ( irc_func_dict
, CMD_NOTICE
, cmd_notice
);
2418 dict_insert ( irc_func_dict
, TOK_NOTICE
, cmd_notice
);
2419 dict_insert ( irc_func_dict
, CMD_STATS
, cmd_stats
);
2420 dict_insert ( irc_func_dict
, TOK_STATS
, cmd_stats
);
2421 dict_insert ( irc_func_dict
, CMD_SVSJOIN
, cmd_svsjoin
);
2422 dict_insert ( irc_func_dict
, TOK_SVSJOIN
, cmd_svsjoin
);
2423 dict_insert ( irc_func_dict
, CMD_SVSNICK
, cmd_svsnick
);
2424 dict_insert ( irc_func_dict
, TOK_SVSNICK
, cmd_svsnick
);
2425 dict_insert ( irc_func_dict
, CMD_SVSPART
, cmd_svspart
);
2426 dict_insert ( irc_func_dict
, TOK_SVSPART
, cmd_svspart
);
2427 dict_insert ( irc_func_dict
, CMD_SWHOIS
, cmd_dummy
);
2428 dict_insert ( irc_func_dict
, TOK_SWHOIS
, cmd_dummy
);
2429 dict_insert ( irc_func_dict
, CMD_WHOIS
, cmd_whois
);
2430 dict_insert ( irc_func_dict
, TOK_WHOIS
, cmd_whois
);
2431 dict_insert ( irc_func_dict
, CMD_GLINE
, cmd_gline
);
2432 dict_insert ( irc_func_dict
, TOK_GLINE
, cmd_gline
);
2433 dict_insert ( irc_func_dict
, CMD_SHUN
, cmd_shun
);
2434 dict_insert ( irc_func_dict
, TOK_SHUN
, cmd_shun
);
2435 dict_insert ( irc_func_dict
, CMD_OPMODE
, cmd_opmode
);
2436 dict_insert ( irc_func_dict
, TOK_OPMODE
, cmd_opmode
);
2437 dict_insert ( irc_func_dict
, CMD_CLEARMODE
, cmd_clearmode
);
2438 dict_insert ( irc_func_dict
, TOK_CLEARMODE
, cmd_clearmode
);
2439 dict_insert ( irc_func_dict
, CMD_VERSION
, cmd_version
);
2440 dict_insert ( irc_func_dict
, TOK_VERSION
, cmd_version
);
2441 dict_insert ( irc_func_dict
, CMD_ADMIN
, cmd_admin
);
2442 dict_insert ( irc_func_dict
, TOK_ADMIN
, cmd_admin
);
2444 dict_insert ( irc_func_dict
, CMD_RPING
, cmd_rping
);
2445 dict_insert ( irc_func_dict
, TOK_RPING
, cmd_rping
);
2446 dict_insert ( irc_func_dict
, CMD_RPONG
, cmd_dummy
);
2447 dict_insert ( irc_func_dict
, TOK_RPONG
, cmd_dummy
);
2449 /* In P10, DESTRUCT doesn't do anything except be broadcast to servers.
2450 * Apparently to obliterate channels from any servers that think they
2453 dict_insert ( irc_func_dict
, CMD_DESTRUCT
, cmd_dummy
);
2454 dict_insert ( irc_func_dict
, TOK_DESTRUCT
, cmd_dummy
);
2455 /* Ignore invites */
2456 dict_insert ( irc_func_dict
, CMD_INVITE
, cmd_dummy
);
2457 dict_insert ( irc_func_dict
, TOK_INVITE
, cmd_dummy
);
2458 /* DESYNCH is just informational, so ignore it */
2459 dict_insert ( irc_func_dict
, CMD_DESYNCH
, cmd_dummy
);
2460 dict_insert ( irc_func_dict
, TOK_DESYNCH
, cmd_dummy
);
2461 /* Ignore channel operator notices. */
2462 dict_insert ( irc_func_dict
, CMD_WALLCHOPS
, cmd_dummy
);
2463 dict_insert ( irc_func_dict
, TOK_WALLCHOPS
, cmd_dummy
);
2464 dict_insert ( irc_func_dict
, CMD_WALLVOICES
, cmd_dummy
);
2465 dict_insert ( irc_func_dict
, TOK_WALLVOICES
, cmd_dummy
);
2466 dict_insert ( irc_func_dict
, CMD_WALLHOPS
, cmd_dummy
);
2467 dict_insert ( irc_func_dict
, TOK_WALLHOPS
, cmd_dummy
);
2468 /* Ignore opers being silly. */
2469 dict_insert ( irc_func_dict
, CMD_WALLOPS
, cmd_dummy
);
2470 dict_insert ( irc_func_dict
, TOK_WALLOPS
, cmd_dummy
);
2471 dict_insert ( irc_func_dict
, CMD_WALLHOPS
, cmd_dummy
);
2472 dict_insert ( irc_func_dict
, TOK_WALLHOPS
, cmd_dummy
);
2473 dict_insert ( irc_func_dict
, TOK_WALLUSERS
, cmd_dummy
);
2474 /* Ignore dnsbl exemptions */
2475 dict_insert ( irc_func_dict
, TOK_EXEMPT
, cmd_dummy
);
2476 dict_insert ( irc_func_dict
, CMD_PRIVS
, cmd_privs
);
2477 dict_insert ( irc_func_dict
, TOK_PRIVS
, cmd_privs
);
2478 /* ignore ALIST for now */
2479 dict_insert ( irc_func_dict
, TOK_ALIST
, cmd_dummy
);
2480 dict_insert ( irc_func_dict
, CMD_ALIST
, cmd_dummy
);
2481 /* Ignore remote luser */
2482 dict_insert ( irc_func_dict
, TOK_LUSERS
, cmd_dummy
);
2483 /* We have reliable clock! Always! Wraaa! */
2484 dict_insert ( irc_func_dict
, CMD_SETTIME
, cmd_dummy
);
2485 dict_insert ( irc_func_dict
, TOK_SETTIME
, cmd_dummy
);
2487 /* ignore /trace and /motd commands targetted at us */
2488 dict_insert ( irc_func_dict
, TOK_TRACE
, cmd_dummy
);
2489 dict_insert ( irc_func_dict
, TOK_MOTD
, cmd_dummy
);
2492 dict_insert ( irc_func_dict
, "331" , cmd_num_topic
);
2493 dict_insert ( irc_func_dict
, "332" , cmd_num_topic
);
2494 dict_insert ( irc_func_dict
, "333" , cmd_num_topic
);
2495 dict_insert ( irc_func_dict
, "345" , cmd_dummy
); /* blah has been invited to blah */
2496 dict_insert ( irc_func_dict
, "432" , cmd_error_nick
); /* Erroneus [sic] nickname */
2497 /* ban list resetting */
2498 /* "stats g" responses */
2499 dict_insert ( irc_func_dict
, "247" , cmd_num_gline
);
2500 dict_insert ( irc_func_dict
, "542" , cmd_num_shun
);
2501 dict_insert ( irc_func_dict
, "219" , cmd_dummy
); /* "End of /STATS report" */
2502 /* other numeric responses we might get */
2503 dict_insert ( irc_func_dict
, "401" , cmd_dummy
); /* target left network */
2504 dict_insert ( irc_func_dict
, "403" , cmd_dummy
); /* no such channel */
2505 dict_insert ( irc_func_dict
, "404" , cmd_dummy
); /* cannot send to channel */
2506 dict_insert ( irc_func_dict
, "439" , cmd_dummy
); /* target change too fast */
2507 dict_insert ( irc_func_dict
, "441" , cmd_dummy
); /* target isn't on that channel */
2508 dict_insert ( irc_func_dict
, "442" , cmd_dummy
); /* you aren't on that channel */
2509 dict_insert ( irc_func_dict
, "443" , cmd_dummy
); /* is already on channel (after invite?) */
2510 dict_insert ( irc_func_dict
, "461" , cmd_dummy
); /* Not enough parameters (after TOPIC w/ 0 args) */
2511 dict_insert ( irc_func_dict
, "467" , cmd_dummy
); /* Channel key already set */
2513 num_privmsg_funcs
= 16 ;
2514 privmsg_funcs
= malloc ( sizeof ( privmsg_func_t
)* num_privmsg_funcs
);
2515 memset ( privmsg_funcs
, 0 , sizeof ( privmsg_func_t
)* num_privmsg_funcs
);
2517 num_notice_funcs
= 16 ;
2518 notice_funcs
= malloc ( sizeof ( privmsg_func_t
)* num_notice_funcs
);
2519 memset ( notice_funcs
, 0 , sizeof ( privmsg_func_t
)* num_notice_funcs
);
2521 userList_init (& dead_users
);
2522 reg_del_channel_func ( remove_unbursted_channel
);
2523 reg_exit_func ( parse_cleanup
);
2524 // reg_notice_func(opserv, check_ctcp);
2528 parse_line ( char * line
, int recursive
)
2530 char * argv
[ MAXNUMPARAMS
], * origin
;
2531 int argc
, cmd
, res
= 0 ;
2534 argc
= split_line ( line
, true , MAXNUMPARAMS
, argv
);
2535 cmd
= self
-> uplink
|| ! argv
[ 0 ][ 1 ] || ! argv
[ 0 ][ 2 ];
2538 if ( argv
[ 0 ][ 0 ] == ':' ) {
2540 } else if (! argv
[ 0 ][ 1 ] || ! argv
[ 0 ][ 2 ]) {
2541 struct server
* sNode
= GetServerN ( argv
[ 0 ]);
2542 origin
= sNode
? sNode
-> name
: 0 ;
2544 struct userNode
* uNode
= GetUserN ( argv
[ 0 ]);
2545 origin
= uNode
? uNode
-> nick
: 0 ;
2549 if (( func
= dict_find ( irc_func_dict
, argv
[ cmd
], NULL
)))
2550 res
= func ( origin
, argc
- cmd
, argv
+ cmd
);
2553 log_module ( MAIN_LOG
, LOG_ERROR
, "PARSE ERROR on line: %s " , unsplit_string ( argv
, argc
, NULL
));
2554 } else if (! recursive
) {
2556 for ( i
= 0 ; i
< dead_users
. used
; i
++)
2557 free_user ( dead_users
. list
[ i
]);
2558 dead_users
. used
= 0 ;
2564 parse_foreach ( char * target_list
, foreach_chanfunc cf
, foreach_nonchan nc
, foreach_userfunc uf
, foreach_nonuser nu
, void * data
)
2570 while (* j
!= 0 && * j
!= ',' )
2575 if ( IsChannelName ( target_list
)
2576 || ( target_list
[ 0 ] == '0' && target_list
[ 1 ] == '\0' )) {
2577 struct chanNode
* chan
= GetChannel ( target_list
);
2584 nc ( target_list
, data
);
2587 struct userNode
* user
;
2588 struct privmsg_desc
* pd
= data
;
2590 pd
-> is_qualified
= 0 ;
2591 if (* target_list
== '@' ) {
2593 } else if ( strchr ( target_list
, '@' )) {
2594 struct server
* server
;
2596 pd
-> is_qualified
= 1 ;
2597 user
= GetUserH ( strtok ( target_list
, "@" ));
2598 server
= GetServerH ( strtok ( NULL
, "@" ));
2600 if ( user
&& ( user
-> uplink
!= server
)) {
2601 /* Don't attempt to index into any arrays
2602 using a user's numeric on another server. */
2606 user
= GetUserN ( target_list
);
2614 nu ( target_list
, data
);
2618 } while ( old
== ',' );
2622 get_local_numeric ( void )
2624 static unsigned int next_numeric
= 0 ;
2625 if ( self
-> clients
> self
-> num_mask
)
2627 while ( self
-> users
[ next_numeric
])
2628 if (++ next_numeric
> self
-> num_mask
)
2630 return next_numeric
;
2634 make_numeric ( struct server
* svr
, int local_num
, char * outbuf
)
2638 if ( force_n2k
|| svr
-> numeric
[ 1 ]) {
2643 llen
= ( local_num
< 64 * 64 ) ? 2 : 3 ;
2645 strncpy ( outbuf
, svr
-> numeric
, slen
);
2646 inttobase64 ( outbuf
+ slen
, local_num
, llen
);
2647 outbuf
[ slen
+ llen
] = 0 ;
2651 AddServer ( struct server
* uplink
, const char * name
, int hops
, time_t boot
, time_t link
, const char * numeric
, const char * description
)
2653 struct server
* sNode
;
2656 if (( sNode
= GetServerN ( numeric
))) {
2657 /* This means we're trying to re-add an existant server.
2658 * To be safe, we should forget the previous incarnation.
2659 * (And all its linked servers.)
2661 * It usually only happens in replays when the original
2662 * had a ping timeout and the replay didn't (because
2663 * replaying a ping timeout invariably gets things wrong).
2665 DelServer ( sNode
, 0 , NULL
);
2668 switch ( strlen ( numeric
)) {
2669 case 5 : slen
= 2 ; mlen
= 3 ; break ;
2670 case 4 : slen
= 1 ; mlen
= 3 ; break ;
2671 case 3 : slen
= 1 ; mlen
= 2 ; break ;
2673 log_module ( MAIN_LOG
, LOG_ERROR
, "AddServer( \" %s \" , \" %s \" , ...): Numeric %s has invalid length." , uplink
-> name
, name
, numeric
);
2677 sNode
= calloc ( 1 , sizeof (* sNode
));
2678 sNode
-> uplink
= uplink
;
2679 safestrncpy ( sNode
-> name
, name
, sizeof ( sNode
-> name
));
2680 sNode
-> num_mask
= base64toint ( numeric
+ slen
, mlen
);
2684 strncpy ( sNode
-> numeric
, numeric
, slen
);
2685 safestrncpy ( sNode
-> description
, description
, sizeof ( sNode
-> description
));
2686 sNode
-> users
= calloc ( sNode
-> num_mask
+ 1 , sizeof (* sNode
-> users
));
2687 serverList_init (& sNode
-> children
);
2688 if ( sNode
-> uplink
) {
2689 /* uplink may be NULL if we're just building ourself */
2690 serverList_append (& sNode
-> uplink
-> children
, sNode
);
2692 servers_num
[ base64toint ( numeric
, slen
)] = sNode
;
2693 dict_insert ( servers
, sNode
-> name
, sNode
);
2697 void DelServer ( struct server
* serv
, int announce
, const char * message
)
2701 /* If we receive an ERROR command before the SERVER
2702 * command a NULL server can be passed */
2706 /* Hrm, what's the right way to SQUIT some other server?
2707 * (This code is only to handle killing juped servers.) */
2708 if ( announce
&& ( serv
-> uplink
== self
) && ( serv
!= self
-> uplink
))
2709 irc_squit ( serv
, message
, NULL
);
2711 /* must recursively remove servers linked to this one first */
2712 for ( i
= serv
-> children
. used
; i
> 0 ;)
2713 if ( serv
-> children
. list
[-- i
] != self
)
2714 DelServer ( serv
-> children
. list
[ i
], false , NULL
);
2716 /* clean up server's user hash tables */
2717 for ( i
= 0 ; i
<= serv
-> num_mask
; i
++)
2719 DelUser ( serv
-> users
[ i
], NULL
, false , "server delinked" );
2723 serverList_remove (& serv
-> uplink
-> children
, serv
);
2724 if ( serv
== self
-> uplink
)
2725 self
-> uplink
= NULL
;
2726 servers_num
[ base64toint ( serv
-> numeric
, strlen ( serv
-> numeric
))] = NULL
;
2727 dict_remove ( servers
, serv
-> name
);
2728 serverList_clean (& serv
-> children
);
2734 AddService ( const char * nick
, const char * modes
, const char * desc
, const char * hostname
)
2736 char numeric
[ COMBO_NUMERIC_LEN
+ 1 ];
2737 int local_num
= get_local_numeric ();
2738 time_t timestamp
= now
;
2739 struct userNode
* old_user
= GetUserH ( nick
);
2742 if ( IsLocal ( old_user
))
2744 timestamp
= old_user
-> timestamp
- 1 ;
2746 if ( local_num
== - 1 ) {
2747 log_module ( MAIN_LOG
, LOG_ERROR
, "Unable to allocate numnick for service %s " , nick
);
2751 hostname
= self
-> name
;
2752 make_numeric ( self
, local_num
, numeric
);
2753 /* TODO: Make these modes part of the conf file */
2754 return AddUser ( self
, nick
, nick
, hostname
, modes
? modes
: "+oik" , numeric
, desc
, now
, "AAAAAA" );
2758 AddClone ( const char * nick
, const char * ident
, const char * hostname
, const char * desc
)
2760 char numeric
[ COMBO_NUMERIC_LEN
+ 1 ];
2761 int local_num
= get_local_numeric ();
2762 time_t timestamp
= now
;
2763 struct userNode
* old_user
= GetUserH ( nick
);
2766 if ( IsLocal ( old_user
))
2768 timestamp
= old_user
-> timestamp
- 1 ;
2770 if ( local_num
== - 1 ) {
2771 log_module ( MAIN_LOG
, LOG_ERROR
, "Unable to allocate numnick for clone %s " , nick
);
2774 make_numeric ( self
, local_num
, numeric
);
2775 return AddUser ( self
, nick
, ident
, hostname
, "+i" , numeric
, desc
, timestamp
, "AAAAAA" );
2779 is_valid_nick ( const char * nick
) {
2781 /* IRC has some of The Most Fucked-Up ideas about character sets
2783 if (! isalpha (* nick
) && ! strchr ( "{|}~[ \\ ]^_`" , * nick
))
2785 for ( ii
= 0 ; nick
[ ii
]; ++ ii
)
2786 if (! isalnum ( nick
[ ii
]) && ! strchr ( "{|}~[ \\ ]^-_`" , nick
[ ii
]))
2788 if ( strlen ( nick
) > nicklen
)
2793 static struct userNode
*
2794 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
)
2796 struct userNode
* oldUser
, * uNode
;
2797 unsigned int n
, ignore_user
;
2801 if (( strlen ( numeric
) < 3 ) || ( strlen ( numeric
) > 5 )) {
2802 log_module ( MAIN_LOG
, LOG_WARNING
, "AddUser( %p , %s , ...): numeric %s wrong length!" , uplink
, nick
, numeric
);
2807 log_module ( MAIN_LOG
, LOG_WARNING
, "AddUser( %p , %s , ...): server for numeric %s doesn't exist!" , uplink
, nick
, numeric
);
2811 if ( uplink
!= GetServerN ( numeric
)) {
2812 log_module ( MAIN_LOG
, LOG_WARNING
, "AddUser( %p , %s , ...): server for numeric %s differs from nominal uplink %s ." , uplink
, nick
, numeric
, uplink
-> name
);
2816 if (! is_valid_nick ( nick
)) {
2817 log_module ( MAIN_LOG
, LOG_WARNING
, "AddUser( %p , %s , ...): invalid nickname detected." , uplink
, nick
);
2822 if (( oldUser
= GetUserH ( nick
))) {
2823 if ( IsLocal ( oldUser
) && ( IsService ( oldUser
) || IsPersistent ( oldUser
))) {
2824 /* The service should collide the new user off. */
2825 oldUser
-> timestamp
= timestamp
- 1 ;
2828 if ( oldUser
-> timestamp
> timestamp
) {
2829 /* "Old" user is really newer; remove them */
2830 DelUser ( oldUser
, 0 , 1 , "Overruled by older nick" );
2832 /* User being added is too new; do not add them to
2833 * clients, but do add them to the server's list, since it
2834 * will send a KILL and QUIT soon. */
2839 /* create new usernode and set all values */
2840 uNode
= calloc ( 1 , sizeof (* uNode
));
2841 uNode
-> nick
= strdup ( nick
);
2842 safestrncpy ( uNode
-> ident
, ident
, sizeof ( uNode
-> ident
));
2843 safestrncpy ( uNode
-> info
, userinfo
, sizeof ( uNode
-> info
));
2844 safestrncpy ( uNode
-> hostname
, hostname
, sizeof ( uNode
-> hostname
));
2845 safestrncpy ( uNode
-> numeric
, numeric
, sizeof ( uNode
-> numeric
));
2846 irc_p10_pton (& uNode
-> ip
, realip
);
2848 tstr
= conf_get_data ( "server/type" , RECDB_QSTRING
);
2851 if ( irc_in_addr_is_ipv4 ( uNode
-> ip
)) {
2852 make_virtip (( char *) irc_ntoa (& uNode
-> ip
), ( char *) irc_ntoa (& uNode
-> ip
), uNode
-> cryptip
);
2853 make_virthost (( char *) irc_ntoa (& uNode
-> ip
), uNode
-> hostname
, uNode
-> crypthost
);
2854 } else if ( irc_in_addr_is_ipv6 ( uNode
-> ip
)) {
2855 make_ipv6virthost (( char *) irc_ntoa (& uNode
-> ip
), uNode
-> hostname
, uNode
-> crypthost
);
2859 if (! uNode
-> crypthost
&& uNode
-> cryptip
)
2860 snprintf ( uNode
-> crypthost
, sizeof ( uNode
-> crypthost
), " %s " , strdup ( uNode
-> cryptip
));
2862 uNode
-> timestamp
= timestamp
;
2863 modeList_init (& uNode
-> channels
);
2864 uNode
-> uplink
= uplink
;
2865 if (++ uNode
-> uplink
-> clients
> uNode
-> uplink
-> max_clients
) {
2866 uNode
-> uplink
-> max_clients
= uNode
-> uplink
-> clients
;
2868 uNode
-> num_local
= base64toint ( numeric
+ strlen ( uNode
-> uplink
-> numeric
), 3 ) & uNode
-> uplink
-> num_mask
;
2869 uNode
-> uplink
-> users
[ uNode
-> num_local
] = uNode
;
2870 mod_usermode ( uNode
, modes
);
2872 set_geoip_info ( uNode
);
2877 dict_insert ( clients
, uNode
-> nick
, uNode
);
2878 if ( dict_size ( clients
) > max_clients
) {
2879 max_clients
= dict_size ( clients
);
2880 max_clients_time
= now
;
2884 for ( n
= 0 ; n
< nuf_used
; n
++)
2885 if ( nuf_list
[ n
]( uNode
))
2888 if (( uNode
-> loc
== 1 ) && ( uNode
-> handle_info
))
2889 send_func_list ( uNode
);
2894 /* removes user from it's server's hash table and nick hash table */
2896 DelUser ( struct userNode
* user
, struct userNode
* killer
, int announce
, const char * why
)
2902 /* mark them as dead, in case anybody cares */
2905 /* remove pending adduser commands */
2906 wipe_adduser_pending ( NULL
, user
);
2908 /* remove user from all channels */
2909 while ( user
-> channels
. used
> 0 )
2910 DelChannelUser ( user
, user
-> channels
. list
[ user
-> channels
. used
- 1 ]-> channel
, false , 0 );
2912 /* Call these in reverse order so ChanServ can update presence
2913 information before NickServ nukes the handle_info. */
2914 for ( n
= duf_used
; n
> 0 ; )
2915 duf_list
[-- n
]( user
, killer
, why
);
2917 user
-> uplink
-> clients
--;
2918 user
-> uplink
-> users
[ user
-> num_local
] = NULL
;
2920 userList_remove (& curr_opers
, user
);
2921 /* remove from global dictionary, but not if after a collide */
2922 if ( user
== dict_find ( clients
, user
-> nick
, NULL
))
2923 dict_remove ( clients
, user
-> nick
);
2925 if ( IsInvisible ( user
))
2930 irc_quit ( user
, why
);
2932 irc_kill ( killer
, user
, why
);
2935 modeList_clean (& user
-> channels
);
2937 /* Clean up version data */
2938 if ( user
-> version_reply
) {
2939 free ( user
-> version_reply
);
2940 user
-> version_reply
= NULL
;
2949 /* clean up geoip data if any */
2950 if ( user
-> country_code
) free ( user
-> country_code
);
2951 if ( user
-> city
) free ( user
-> city
);
2952 if ( user
-> region
) free ( user
-> region
);
2953 if ( user
-> postal_code
) free ( user
-> postal_code
);
2955 /* We don't free them, in case we try to privmsg them or something
2956 * (like when a stupid oper kills themself). We just put them onto
2957 * a list of clients that get freed after processing each line.
2959 if ( dead_users
. size
)
2960 userList_append (& dead_users
, user
);
2965 static void call_oper_funcs ( struct userNode
* user
);
2967 void mod_usermode ( struct userNode
* user
, const char * mode_change
) {
2969 const char * word
= mode_change
;
2971 if (! user
|| ! mode_change
)
2974 call_user_mode_funcs ( user
, mode_change
);
2976 while (* word
!= ' ' && * word
) word
++;
2977 while (* word
== ' ' ) word
++;
2979 #define do_user_mode(FLAG) do { if (add) user->modes |= FLAG; else user->modes &= ~FLAG; } while (0)
2980 switch (* mode_change
++) {
2981 case 0 : case ' ' : return ;
2982 case '+' : add
= 1 ; break ;
2983 case '-' : add
= 0 ; break ;
2986 if (! IsOper ( user
)) { /* Dont re-oper an oper */
2987 userList_append (& curr_opers
, user
);
2988 call_oper_funcs ( user
);
2991 userList_remove (& curr_opers
, user
);
2993 do_user_mode ( FLAGS_OPER
);
2995 case 'O' : do_user_mode ( FLAGS_LOCOP
); break ;
2996 case 'i' : do_user_mode ( FLAGS_INVISIBLE
);
3002 case 'w' : do_user_mode ( FLAGS_WALLOP
); break ;
3003 case 's' : do_user_mode ( FLAGS_SERVNOTICE
); break ;
3004 case 'd' : do_user_mode ( FLAGS_DEAF
); break ;
3005 case 'k' : do_user_mode ( FLAGS_SERVICE
); break ;
3006 case 'g' : do_user_mode ( FLAGS_GLOBAL
); break ;
3007 // sethost - reed/apples
3008 // case 'h': do_user_mode(FLAGS_HELPER); break;
3009 // I check if there's an 'h' in the first part, and if there,
3010 // then everything after the space becomes their new host.
3011 case 'C' : do_user_mode ( FLAGS_CLOAKHOST
);
3013 char cloakhost
[ MAXLEN
];
3015 for ( ii
= 0 ; (* word
!= ' ' ) && (* word
!= '\0' ); )
3016 cloakhost
[ ii
++] = * word
++;
3018 while (* word
== ' ' )
3020 safestrncpy ( user
-> crypthost
, cloakhost
, sizeof ( user
-> crypthost
));
3023 case 'c' : do_user_mode ( FLAGS_CLOAKIP
);
3025 char cloakip
[ MAXLEN
];
3027 for ( ii
= 0 ; (* word
!= ' ' ) && (* word
!= '\0' ); )
3028 cloakip
[ ii
++] = * word
++;
3030 while (* word
== ' ' )
3032 safestrncpy ( user
-> cryptip
, cloakip
, sizeof ( user
-> cryptip
));
3035 case 'h' : do_user_mode ( FLAGS_SETHOST
);
3037 char sethost
[ MAXLEN
];
3039 for ( ii
= 0 ; (* word
!= ' ' ) && (* word
!= '\0' ); )
3040 sethost
[ ii
++] = * word
++;
3042 while (* word
== ' ' )
3044 safestrncpy ( user
-> sethost
, sethost
, sizeof ( user
-> sethost
));
3047 case 'x' : do_user_mode ( FLAGS_HIDDEN_HOST
); break ;
3052 for ( ii
= 0 ; (* word
!= ' ' ) && (* word
!= '\0' ); )
3053 tag
[ ii
++] = * word
++;
3055 while (* word
== ' ' )
3057 call_account_func ( user
, tag
);
3064 for ( ii
= 0 ; (* word
!= ' ' ) && (* word
!= '\0' ); )
3065 host
[ ii
++] = * word
++;
3067 while (* word
== ' ' )
3069 assign_fakehost ( user
, host
, 0 );
3077 struct mod_chanmode
*
3078 mod_chanmode_parse ( struct chanNode
* channel
, char ** modes
, unsigned int argc
, unsigned int flags
, short base_oplevel
)
3080 struct mod_chanmode
* change
;
3081 unsigned int ii
, in_arg
, ch_arg
, add
;
3085 if (!( change
= mod_chanmode_alloc ( argc
- 1 )))
3088 for ( ii
= ch_arg
= 0 , in_arg
= add
= 1 ;
3089 ( modes
[ 0 ][ ii
] != '\0' ) && ( modes
[ 0 ][ ii
] != ' ' );
3091 switch ( modes
[ 0 ][ ii
]) {
3098 #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)
3099 case 'C' : do_chan_mode ( MODE_NOCTCPS
); break ;
3100 case 'D' : do_chan_mode ( MODE_DELAYJOINS
); break ;
3101 case 'c' : do_chan_mode ( MODE_NOCOLORS
); break ;
3102 case 'i' : do_chan_mode ( MODE_INVITEONLY
); break ;
3103 case 'm' : do_chan_mode ( MODE_MODERATED
); break ;
3104 case 'n' : do_chan_mode ( MODE_NOPRIVMSGS
); break ;
3105 case 'p' : do_chan_mode ( MODE_PRIVATE
); break ;
3106 case 'r' : do_chan_mode ( MODE_REGONLY
); break ;
3107 case 's' : do_chan_mode ( MODE_SECRET
); break ;
3108 case 't' : do_chan_mode ( MODE_TOPICLIMIT
); break ;
3109 case 'S' : do_chan_mode ( MODE_STRIPCOLOR
); break ;
3110 case 'M' : do_chan_mode ( MODE_MODUNREG
); break ;
3111 case 'N' : do_chan_mode ( MODE_NONOTICE
); break ;
3112 case 'Q' : do_chan_mode ( MODE_NOQUITMSGS
); break ;
3113 case 'T' : do_chan_mode ( MODE_NOAMSG
); break ;
3114 case 'O' : do_chan_mode ( MODE_OPERSONLY
); break ;
3115 case 'Z' : do_chan_mode ( MODE_SSLONLY
); break ;
3116 case 'L' : do_chan_mode ( MODE_HIDEMODE
); break ;
3118 if (!( flags
& MCP_REGISTERED
)) {
3119 do_chan_mode ( MODE_REGISTERED
);
3121 mod_chanmode_free ( change
);
3130 change
-> modes_set
|= MODE_LIMIT
;
3131 change
-> new_limit
= atoi ( modes
[ in_arg
++]);
3133 change
-> modes_set
&= ~ MODE_LIMIT
;
3134 change
-> modes_clear
|= MODE_LIMIT
;
3141 change
-> modes_set
|= MODE_KEY
;
3142 safestrncpy ( change
-> new_key
, modes
[ in_arg
++], sizeof ( change
-> new_key
));
3144 change
-> modes_clear
|= MODE_KEY
;
3145 if (!( flags
& MCP_KEY_FREE
)) {
3157 change
-> modes_set
|= MODE_UPASS
;
3158 safestrncpy ( change
-> new_upass
, modes
[ in_arg
++], sizeof ( change
-> new_upass
));
3160 change
-> modes_clear
|= MODE_UPASS
;
3161 if (!( flags
& MCP_UPASS_FREE
)) {
3172 change
-> modes_set
|= MODE_APASS
;
3173 safestrncpy ( change
-> new_apass
, modes
[ in_arg
++], sizeof ( change
-> new_apass
));
3175 change
-> modes_clear
|= MODE_APASS
;
3176 if (!( flags
& MCP_APASS_FREE
)) {
3184 if (!( flags
& MCP_ALLOW_OVB
))
3188 change
-> args
[ ch_arg
]. mode
= MODE_BAN
;
3190 change
-> args
[ ch_arg
]. mode
|= MODE_REMOVE
;
3191 change
-> args
[ ch_arg
++]. u
. hostmask
= modes
[ in_arg
++];
3194 if (!( flags
& MCP_ALLOW_OVB
))
3198 change
-> args
[ ch_arg
]. mode
= MODE_EXEMPT
;
3200 change
-> args
[ ch_arg
]. mode
|= MODE_REMOVE
;
3201 change
-> args
[ ch_arg
++]. u
. hostmask
= modes
[ in_arg
++];
3203 case 'o' : case 'h' : case 'v' :
3205 struct userNode
* victim
;
3211 oplevel_str
= strchr ( modes
[ in_arg
], ':' );
3214 /* XXYYY M #channel +o XXYYY:<oplevel> */
3215 * oplevel_str
++ = '\0' ;
3216 oplevel
= parse_oplevel ( oplevel_str
);
3217 if ( oplevel
<= base_oplevel
&& !( flags
& MCP_FROM_SERVER
))
3218 oplevel
= base_oplevel
+ 1 ;
3220 else if ( channel
-> modes
& MODE_UPASS
)
3221 oplevel
= base_oplevel
+ 1 ;
3225 /* Check that oplevel is within bounds. */
3226 if ( oplevel
> MAXOPLEVEL
)
3227 oplevel
= MAXOPLEVEL
;
3229 if (!( flags
& MCP_ALLOW_OVB
))
3234 if ( modes
[ 0 ][ ii
] == 'o' )
3235 change
-> args
[ ch_arg
]. mode
= MODE_CHANOP
;
3236 else if ( modes
[ 0 ][ ii
] == 'h' )
3237 change
-> args
[ ch_arg
]. mode
= MODE_HALFOP
;
3238 else if ( modes
[ 0 ][ ii
] == 'v' )
3239 change
-> args
[ ch_arg
]. mode
= MODE_VOICE
;
3242 change
-> args
[ ch_arg
]. mode
|= MODE_REMOVE
;
3243 if ( flags
& MCP_FROM_SERVER
)
3244 victim
= GetUserN ( modes
[ in_arg
++]);
3246 victim
= GetUserH ( modes
[ in_arg
++]);
3249 if (( change
-> args
[ ch_arg
]. u
. member
= GetUserMode ( channel
, victim
)))
3251 /* Apply the oplevel change */
3252 change
-> args
[ ch_arg
]. u
. member
-> oplevel
= oplevel
;
3258 if (!( flags
& MCP_FROM_SERVER
))
3263 change
-> argc
= ch_arg
; /* in case any turned out to be ignored */
3264 if ( change
-> modes_set
& MODE_SECRET
) {
3265 change
-> modes_set
&= ~( MODE_PRIVATE
);
3266 change
-> modes_clear
|= MODE_PRIVATE
;
3267 } else if ( change
-> modes_set
& MODE_PRIVATE
) {
3268 change
-> modes_set
&= ~( MODE_SECRET
);
3269 change
-> modes_clear
|= MODE_SECRET
;
3273 mod_chanmode_free ( change
);
3277 struct chanmode_buffer
{
3280 struct chanNode
* channel
;
3281 struct userNode
* actor
;
3282 unsigned int modes_used
;
3283 unsigned int args_used
;
3285 unsigned int is_add
: 1 ;
3286 unsigned int is_chanop
: 1 ;
3290 mod_chanmode_append ( struct chanmode_buffer
* buf
, char ch
, const char * arg
)
3292 size_t arg_len
= strlen ( arg
);
3293 if ( buf
-> modes_used
> ( MAXMODEPARAMS
) ||
3294 buf
-> modes_used
+ buf
-> args_used
+ buf
-> chname_len
+ arg_len
> 450 ) {
3295 memcpy ( buf
-> modes
+ buf
-> modes_used
, buf
-> args
, buf
-> args_used
);
3296 buf
-> modes
[ buf
-> modes_used
+ buf
-> args_used
] = '\0' ;
3297 irc_mode (( buf
-> is_chanop
? buf
-> actor
: NULL
), buf
-> channel
, buf
-> modes
);
3298 buf
-> modes
[ 0 ] = buf
-> is_add
? '+' : '-' ;
3299 buf
-> modes_used
= 1 ;
3302 buf
-> modes
[ buf
-> modes_used
++] = ch
;
3303 buf
-> args
[ buf
-> args_used
++] = ' ' ;
3304 memcpy ( buf
-> args
+ buf
-> args_used
, arg
, arg_len
);
3305 buf
-> args_used
+= arg_len
;
3309 mod_chanmode_announce ( struct userNode
* who
, struct chanNode
* channel
, struct mod_chanmode
* change
)
3311 struct chanmode_buffer chbuf
;
3313 struct modeNode
* mn
;
3314 char int_buff
[ 32 ], mode
= '\0' ;
3316 assert ( change
-> argc
<= change
-> alloc_argc
);
3317 memset (& chbuf
, 0 , sizeof ( chbuf
));
3318 chbuf
. channel
= channel
;
3320 chbuf
. chname_len
= strlen ( channel
-> name
);
3322 mn
= GetUserMode ( channel
, who
);
3323 if (( mn
&& ( mn
-> modes
& MODE_CHANOP
)) || off_channel
)
3324 chbuf
. is_chanop
= 1 ;
3326 /* First remove modes */
3328 if ( change
-> modes_clear
) {
3330 chbuf
. modes
[ chbuf
. modes_used
++] = mode
= '-' ;
3331 #define DO_MODE_CHAR(BIT, CHAR) if (change->modes_clear & MODE_##BIT) chbuf.modes[chbuf.modes_used++] = CHAR
3332 DO_MODE_CHAR ( PRIVATE
, 'p' );
3333 DO_MODE_CHAR ( SECRET
, 's' );
3334 DO_MODE_CHAR ( MODERATED
, 'm' );
3335 DO_MODE_CHAR ( TOPICLIMIT
, 't' );
3336 DO_MODE_CHAR ( INVITEONLY
, 'i' );
3337 DO_MODE_CHAR ( NOPRIVMSGS
, 'n' );
3338 DO_MODE_CHAR ( LIMIT
, 'l' );
3339 DO_MODE_CHAR ( DELAYJOINS
, 'D' );
3340 DO_MODE_CHAR ( REGONLY
, 'r' );
3341 DO_MODE_CHAR ( NOCOLORS
, 'c' );
3342 DO_MODE_CHAR ( NOCTCPS
, 'C' );
3343 DO_MODE_CHAR ( STRIPCOLOR
, 'S' );
3344 DO_MODE_CHAR ( MODUNREG
, 'M' );
3345 DO_MODE_CHAR ( NONOTICE
, 'N' );
3346 DO_MODE_CHAR ( NOQUITMSGS
, 'Q' );
3347 DO_MODE_CHAR ( NOAMSG
, 'T' );
3348 DO_MODE_CHAR ( OPERSONLY
, 'O' );
3349 DO_MODE_CHAR ( REGISTERED
, 'z' );
3350 DO_MODE_CHAR ( SSLONLY
, 'Z' );
3351 DO_MODE_CHAR ( HIDEMODE
, 'L' );
3353 if ( change
-> modes_clear
& channel
-> modes
& MODE_KEY
)
3354 mod_chanmode_append (& chbuf
, 'k' , channel
-> key
);
3355 if ( change
-> modes_clear
& channel
-> modes
& MODE_UPASS
)
3356 mod_chanmode_append (& chbuf
, 'U' , channel
-> upass
);
3357 if ( change
-> modes_clear
* channel
-> modes
& MODE_APASS
)
3358 mod_chanmode_append (& chbuf
, 'A' , channel
-> apass
);
3360 for ( arg
= 0 ; arg
< change
-> argc
; ++ arg
) {
3361 if (!( change
-> args
[ arg
]. mode
& MODE_REMOVE
))
3364 chbuf
. modes
[ chbuf
. modes_used
++] = mode
= '-' ;
3365 switch ( change
-> args
[ arg
]. mode
& ~ MODE_REMOVE
) {
3367 mod_chanmode_append (& chbuf
, 'b' , change
-> args
[ arg
]. u
. hostmask
);
3370 mod_chanmode_append (& chbuf
, 'e' , change
-> args
[ arg
]. u
. hostmask
);
3373 if ( change
-> args
[ arg
]. mode
& MODE_CHANOP
)
3374 mod_chanmode_append (& chbuf
, 'o' , change
-> args
[ arg
]. u
. member
-> user
-> numeric
);
3375 if ( change
-> args
[ arg
]. mode
& MODE_HALFOP
)
3376 mod_chanmode_append (& chbuf
, 'h' , change
-> args
[ arg
]. u
. member
-> user
-> numeric
);
3377 if ( change
-> args
[ arg
]. mode
& MODE_VOICE
)
3378 mod_chanmode_append (& chbuf
, 'v' , change
-> args
[ arg
]. u
. member
-> user
-> numeric
);
3385 if ( change
-> modes_set
) {
3387 chbuf
. modes
[ chbuf
. modes_used
++] = mode
= '+' ;
3388 #define DO_MODE_CHAR(BIT, CHAR) if (change->modes_set & MODE_##BIT) chbuf.modes[chbuf.modes_used++] = CHAR
3389 DO_MODE_CHAR ( PRIVATE
, 'p' );
3390 DO_MODE_CHAR ( SECRET
, 's' );
3391 DO_MODE_CHAR ( MODERATED
, 'm' );
3392 DO_MODE_CHAR ( TOPICLIMIT
, 't' );
3393 DO_MODE_CHAR ( INVITEONLY
, 'i' );
3394 DO_MODE_CHAR ( NOPRIVMSGS
, 'n' );
3395 DO_MODE_CHAR ( DELAYJOINS
, 'D' );
3396 DO_MODE_CHAR ( REGONLY
, 'r' );
3397 DO_MODE_CHAR ( NOCOLORS
, 'c' );
3398 DO_MODE_CHAR ( NOCTCPS
, 'C' );
3399 DO_MODE_CHAR ( STRIPCOLOR
, 'S' );
3400 DO_MODE_CHAR ( MODUNREG
, 'M' );
3401 DO_MODE_CHAR ( NONOTICE
, 'N' );
3402 DO_MODE_CHAR ( NOQUITMSGS
, 'Q' );
3403 DO_MODE_CHAR ( NOAMSG
, 'T' );
3404 DO_MODE_CHAR ( OPERSONLY
, 'O' );
3405 DO_MODE_CHAR ( REGISTERED
, 'z' );
3406 DO_MODE_CHAR ( SSLONLY
, 'Z' );
3407 DO_MODE_CHAR ( HIDEMODE
, 'L' );
3409 if ( change
-> modes_set
& MODE_KEY
)
3410 mod_chanmode_append (& chbuf
, 'k' , change
-> new_key
);
3411 if ( change
-> modes_set
& MODE_UPASS
)
3412 mod_chanmode_append (& chbuf
, 'U' , change
-> new_upass
);
3413 if ( change
-> modes_set
& MODE_APASS
)
3414 mod_chanmode_append (& chbuf
, 'A' , change
-> new_apass
);
3415 if ( change
-> modes_set
& MODE_LIMIT
) {
3416 sprintf ( int_buff
, " %d " , change
-> new_limit
);
3417 mod_chanmode_append (& chbuf
, 'l' , int_buff
);
3420 for ( arg
= 0 ; arg
< change
-> argc
; ++ arg
) {
3421 if ( change
-> args
[ arg
]. mode
& MODE_REMOVE
)
3424 chbuf
. modes
[ chbuf
. modes_used
++] = mode
= '+' ;
3425 switch ( change
-> args
[ arg
]. mode
) {
3427 mod_chanmode_append (& chbuf
, 'b' , change
-> args
[ arg
]. u
. hostmask
);
3430 mod_chanmode_append (& chbuf
, 'e' , change
-> args
[ arg
]. u
. hostmask
);
3433 if ( change
-> args
[ arg
]. mode
& MODE_CHANOP
)
3434 mod_chanmode_append (& chbuf
, 'o' , change
-> args
[ arg
]. u
. member
-> user
-> numeric
);
3435 if ( change
-> args
[ arg
]. mode
& MODE_HALFOP
)
3436 mod_chanmode_append (& chbuf
, 'h' , change
-> args
[ arg
]. u
. member
-> user
-> numeric
);
3437 if ( change
-> args
[ arg
]. mode
& MODE_VOICE
)
3438 mod_chanmode_append (& chbuf
, 'v' , change
-> args
[ arg
]. u
. member
-> user
-> numeric
);
3443 /* Flush the buffer and apply changes locally */
3444 if ( chbuf
. modes_used
> 0 ) {
3445 memcpy ( chbuf
. modes
+ chbuf
. modes_used
, chbuf
. args
, chbuf
. args_used
);
3446 chbuf
. modes
[ chbuf
. modes_used
+ chbuf
. args_used
] = '\0' ;
3447 irc_mode (( chbuf
. is_chanop
? chbuf
. actor
: NULL
), chbuf
. channel
, chbuf
. modes
);
3449 mod_chanmode_apply ( who
, channel
, change
);
3453 mod_chanmode_format ( struct mod_chanmode
* change
, char * outbuff
)
3455 unsigned int used
= 0 ;
3456 assert ( change
-> argc
<= change
-> alloc_argc
);
3457 if ( change
-> modes_clear
) {
3458 outbuff
[ used
++] = '-' ;
3459 #define DO_MODE_CHAR(BIT, CHAR) if (change->modes_clear & MODE_##BIT) outbuff[used++] = CHAR
3460 DO_MODE_CHAR ( PRIVATE
, 'p' );
3461 DO_MODE_CHAR ( SECRET
, 's' );
3462 DO_MODE_CHAR ( MODERATED
, 'm' );
3463 DO_MODE_CHAR ( TOPICLIMIT
, 't' );
3464 DO_MODE_CHAR ( INVITEONLY
, 'i' );
3465 DO_MODE_CHAR ( NOPRIVMSGS
, 'n' );
3466 DO_MODE_CHAR ( LIMIT
, 'l' );
3467 DO_MODE_CHAR ( KEY
, 'k' );
3468 DO_MODE_CHAR ( UPASS
, 'U' );
3469 DO_MODE_CHAR ( APASS
, 'A' );
3470 DO_MODE_CHAR ( DELAYJOINS
, 'D' );
3471 DO_MODE_CHAR ( REGONLY
, 'r' );
3472 DO_MODE_CHAR ( NOCOLORS
, 'c' );
3473 DO_MODE_CHAR ( NOCTCPS
, 'C' );
3474 DO_MODE_CHAR ( STRIPCOLOR
, 'S' );
3475 DO_MODE_CHAR ( MODUNREG
, 'M' );
3476 DO_MODE_CHAR ( NONOTICE
, 'N' );
3477 DO_MODE_CHAR ( NOQUITMSGS
, 'Q' );
3478 DO_MODE_CHAR ( NOAMSG
, 'T' );
3479 DO_MODE_CHAR ( OPERSONLY
, 'O' );
3480 DO_MODE_CHAR ( REGISTERED
, 'z' );
3481 DO_MODE_CHAR ( SSLONLY
, 'Z' );
3482 DO_MODE_CHAR ( HIDEMODE
, 'L' );
3485 if ( change
-> modes_set
) {
3486 outbuff
[ used
++] = '+' ;
3487 #define DO_MODE_CHAR(BIT, CHAR) if (change->modes_set & MODE_##BIT) outbuff[used++] = CHAR
3488 DO_MODE_CHAR ( PRIVATE
, 'p' );
3489 DO_MODE_CHAR ( SECRET
, 's' );
3490 DO_MODE_CHAR ( MODERATED
, 'm' );
3491 DO_MODE_CHAR ( TOPICLIMIT
, 't' );
3492 DO_MODE_CHAR ( INVITEONLY
, 'i' );
3493 DO_MODE_CHAR ( NOPRIVMSGS
, 'n' );
3494 DO_MODE_CHAR ( DELAYJOINS
, 'D' );
3495 DO_MODE_CHAR ( REGONLY
, 'r' );
3496 DO_MODE_CHAR ( NOCOLORS
, 'c' );
3497 DO_MODE_CHAR ( NOCTCPS
, 'C' );
3498 DO_MODE_CHAR ( STRIPCOLOR
, 'S' );
3499 DO_MODE_CHAR ( MODUNREG
, 'M' );
3500 DO_MODE_CHAR ( NONOTICE
, 'N' );
3501 DO_MODE_CHAR ( NOQUITMSGS
, 'Q' );
3502 DO_MODE_CHAR ( NOAMSG
, 'T' );
3503 DO_MODE_CHAR ( OPERSONLY
, 'O' );
3504 DO_MODE_CHAR ( REGISTERED
, 'z' );
3505 DO_MODE_CHAR ( SSLONLY
, 'Z' );
3506 DO_MODE_CHAR ( HIDEMODE
, 'L' );
3508 switch ( change
-> modes_set
& ( MODE_KEY
| MODE_LIMIT
| MODE_APASS
| MODE_UPASS
)) {
3509 /* Doing this implementation has been a pain in the arse, I hope I didn't forget a possible combination */
3510 case MODE_KEY
| MODE_LIMIT
| MODE_APASS
| MODE_UPASS
:
3511 used
+= sprintf ( outbuff
+ used
, "lkAU %d %s %s %s " , change
-> new_limit
, change
-> new_key
, change
-> new_apass
, change
-> new_upass
);
3514 case MODE_KEY
| MODE_LIMIT
| MODE_APASS
:
3515 used
+= sprintf ( outbuff
+ used
, "lkA %d %s %s " , change
-> new_limit
, change
-> new_key
, change
-> new_apass
);
3517 case MODE_KEY
| MODE_LIMIT
| MODE_UPASS
:
3518 used
+= sprintf ( outbuff
+ used
, "lkU %d %s %s " , change
-> new_limit
, change
-> new_key
, change
-> new_upass
);
3520 case MODE_KEY
| MODE_APASS
| MODE_UPASS
:
3521 used
+= sprintf ( outbuff
+ used
, "kAU %s %s %s " , change
-> new_key
, change
-> new_apass
, change
-> new_upass
);
3524 case MODE_KEY
| MODE_APASS
:
3525 used
+= sprintf ( outbuff
+ used
, "kA %s %s " , change
-> new_key
, change
-> new_apass
);
3527 case MODE_KEY
| MODE_UPASS
:
3528 used
+= sprintf ( outbuff
+ used
, "kU %s %s " , change
-> new_key
, change
-> new_upass
);
3530 case MODE_KEY
| MODE_LIMIT
:
3531 used
+= sprintf ( outbuff
+ used
, "lk %d %s " , change
-> new_limit
, change
-> new_key
);
3534 case MODE_LIMIT
| MODE_UPASS
:
3535 used
+= sprintf ( outbuff
+ used
, "lU %d %s " , change
-> new_limit
, change
-> new_upass
);
3537 case MODE_LIMIT
| MODE_APASS
:
3538 used
+= sprintf ( outbuff
+ used
, "lA %d %s " , change
-> new_limit
, change
-> new_apass
);
3540 case MODE_APASS
| MODE_UPASS
:
3541 used
+= sprintf ( outbuff
+ used
, "AU %s %s " , change
-> new_apass
, change
-> new_upass
);
3543 case MODE_LIMIT
| MODE_APASS
| MODE_UPASS
:
3544 used
+= sprintf ( outbuff
+ used
, "lAU %d %s %s " , change
-> new_limit
, change
-> new_apass
, change
-> new_upass
);
3548 used
+= sprintf ( outbuff
+ used
, "A %s " , change
-> new_apass
);
3551 used
+= sprintf ( outbuff
+ used
, "U %s " , change
-> new_upass
);
3554 used
+= sprintf ( outbuff
+ used
, "k %s " , change
-> new_key
);
3557 used
+= sprintf ( outbuff
+ used
, "l %d " , change
-> new_limit
);
3566 clear_chanmode ( struct chanNode
* channel
, const char * modes
)
3568 unsigned int remove
;
3570 for ( remove
= 0 ; * modes
; modes
++) {
3572 case 'o' : remove
|= MODE_CHANOP
; break ;
3573 case 'h' : remove
|= MODE_HALFOP
; break ;
3574 case 'v' : remove
|= MODE_VOICE
; break ;
3575 case 'p' : remove
|= MODE_PRIVATE
; break ;
3576 case 's' : remove
|= MODE_SECRET
; break ;
3577 case 'm' : remove
|= MODE_MODERATED
; break ;
3578 case 't' : remove
|= MODE_TOPICLIMIT
; break ;
3579 case 'i' : remove
|= MODE_INVITEONLY
; break ;
3580 case 'n' : remove
|= MODE_NOPRIVMSGS
; break ;
3583 channel
-> key
[ 0 ] = '\0' ;
3586 remove
|= MODE_APASS
;
3587 channel
-> apass
[ 0 ] = '\0' ;
3590 remove
|= MODE_UPASS
;
3591 channel
-> upass
[ 0 ] = '\0' ;
3594 remove
|= MODE_LIMIT
;
3597 case 'b' : remove
|= MODE_BAN
; break ;
3598 case 'e' : remove
|= MODE_EXEMPT
; break ;
3599 case 'D' : remove
|= MODE_DELAYJOINS
; break ;
3600 case 'r' : remove
|= MODE_REGONLY
; break ;
3601 case 'c' : remove
|= MODE_NOCOLORS
; break ;
3602 case 'C' : remove
|= MODE_NOCTCPS
; break ;
3603 case 'S' : remove
|= MODE_STRIPCOLOR
; break ;
3604 case 'M' : remove
|= MODE_MODUNREG
; break ;
3605 case 'N' : remove
|= MODE_NONOTICE
; break ;
3606 case 'Q' : remove
|= MODE_NOQUITMSGS
; break ;
3607 case 'T' : remove
|= MODE_NOAMSG
; break ;
3608 case 'O' : remove
|= MODE_OPERSONLY
; break ;
3609 case 'z' : remove
|= MODE_REGISTERED
; break ;
3610 case 'Z' : remove
|= MODE_SSLONLY
; break ;
3611 case 'L' : remove
|= MODE_HIDEMODE
; break ;
3618 /* Remove simple modes. */
3619 channel
-> modes
&= ~ remove
;
3621 /* If removing bans, kill 'em all. */
3622 if (( remove
& MODE_BAN
) && channel
-> banlist
. used
) {
3624 for ( i
= 0 ; i
< channel
-> banlist
. used
; i
++)
3625 free ( channel
-> banlist
. list
[ i
]);
3626 channel
-> banlist
. used
= 0 ;
3629 /* If removing exempts, kill 'em all. */
3630 if (( remove
& MODE_EXEMPT
) && channel
-> exemptlist
. used
) {
3632 for ( i
= 0 ; i
< channel
-> exemptlist
. used
; i
++)
3633 free ( channel
-> exemptlist
. list
[ i
]);
3634 channel
-> exemptlist
. used
= 0 ;
3637 /* Remove member modes. */
3638 if (( remove
& ( MODE_CHANOP
| MODE_HALFOP
| MODE_VOICE
)) && channel
-> members
. used
) {
3639 int mask
= ~( remove
& ( MODE_CHANOP
| MODE_HALFOP
| MODE_VOICE
));
3642 for ( i
= 0 ; i
< channel
-> members
. used
; i
++)
3643 channel
-> members
. list
[ i
]-> modes
&= mask
;
3650 reg_privmsg_func ( struct userNode
* user
, privmsg_func_t handler
)
3652 unsigned int numeric
= user
-> num_local
;
3653 if ( numeric
>= num_privmsg_funcs
) {
3654 int newnum
= numeric
+ 8 ;
3655 privmsg_funcs
= realloc ( privmsg_funcs
, newnum
* sizeof ( privmsg_func_t
));
3656 memset ( privmsg_funcs
+ num_privmsg_funcs
, 0 , ( newnum
- num_privmsg_funcs
)* sizeof ( privmsg_func_t
));
3657 num_privmsg_funcs
= newnum
;
3659 if ( privmsg_funcs
[ numeric
])
3660 log_module ( MAIN_LOG
, LOG_WARNING
, "re-registering new privmsg handler for numeric %d " , numeric
);
3661 privmsg_funcs
[ numeric
] = handler
;
3665 unreg_privmsg_func ( struct userNode
* user
, privmsg_func_t handler
)
3669 if (! user
|| handler
)
3670 return ; /* this really only works with users */
3672 memset ( privmsg_funcs
+ user
-> num_local
, 0 , sizeof ( privmsg_func_t
));
3674 for ( x
= user
-> num_local
+ 1 ; x
< num_privmsg_funcs
; x
++)
3675 memmove ( privmsg_funcs
+ x
- 1 , privmsg_funcs
+ x
, sizeof ( privmsg_func_t
));
3677 privmsg_funcs
= realloc ( privmsg_funcs
, num_privmsg_funcs
* sizeof ( privmsg_func_t
));
3678 num_privmsg_funcs
--;
3683 reg_notice_func ( struct userNode
* user
, privmsg_func_t handler
)
3685 unsigned int numeric
= user
-> num_local
;
3686 if ( numeric
>= num_notice_funcs
) {
3687 int newnum
= numeric
+ 8 ;
3688 notice_funcs
= realloc ( notice_funcs
, newnum
* sizeof ( privmsg_func_t
));
3689 memset ( notice_funcs
+ num_notice_funcs
, 0 , ( newnum
- num_notice_funcs
)* sizeof ( privmsg_func_t
));
3690 num_notice_funcs
= newnum
;
3692 if ( notice_funcs
[ numeric
])
3693 log_module ( MAIN_LOG
, LOG_WARNING
, "re-registering new notice handler for numeric %d " , numeric
);
3694 notice_funcs
[ numeric
] = handler
;
3698 unreg_notice_func ( struct userNode
* user
, privmsg_func_t handler
)
3702 if (! user
|| handler
)
3703 return ; /* this really only works with users */
3705 memset ( notice_funcs
+ user
-> num_local
, 0 , sizeof ( privmsg_func_t
));
3707 for ( x
= user
-> num_local
+ 1 ; x
< num_notice_funcs
; x
++)
3708 memmove ( notice_funcs
+ x
- 1 , notice_funcs
+ x
, sizeof ( privmsg_func_t
));
3710 memset ( notice_funcs
+ user
-> num_local
, 0 , sizeof ( privmsg_func_t
));
3711 notice_funcs
= realloc ( notice_funcs
, num_notice_funcs
* sizeof ( privmsg_func_t
));
3716 reg_oper_func ( oper_func_t handler
)
3718 if ( of_used
== of_size
) {
3721 of_list
= realloc ( of_list
, of_size
* sizeof ( oper_func_t
));
3724 of_list
= malloc ( of_size
* sizeof ( oper_func_t
));
3727 of_list
[ of_used
++] = handler
;
3731 call_oper_funcs ( struct userNode
* user
)
3736 for ( n
= 0 ; n
< of_used
; n
++)
3743 unsigned int i
, hop
, max_hop
= 1 ;
3746 /* burst (juped) servers, closest first (except self, which is sent already) */
3747 for ( i
= 0 ; i
< ArrayLength ( servers_num
); i
++)
3748 if ( servers_num
[ i
] && servers_num
[ i
]-> hops
> max_hop
)
3749 max_hop
= servers_num
[ i
]-> hops
;
3750 for ( hop
= 1 ; hop
<= max_hop
; hop
++) {
3751 for ( i
= 0 ; i
< ArrayLength ( servers_num
); i
++) {
3753 && ( servers_num
[ i
]-> hops
== hop
)
3754 && ( servers_num
[ i
] != self
-> uplink
))
3755 irc_server ( servers_num
[ i
]);
3759 /* burst local nicks */
3760 for ( i
= 0 ; i
<= self
-> num_mask
; i
++)
3762 irc_user ( self
-> users
[ i
]);
3764 /* build dict of unbursted channel names (just copy existing channels) */
3765 unbursted_channels
= dict_new ();
3766 for ( it
= dict_first ( channels
); it
; it
= iter_next ( it
))
3767 dict_insert ( unbursted_channels
, iter_key ( it
), iter_data ( it
));
3774 parse_oplevel ( char * str
)
3777 while ( isdigit (* str
))
3778 oplevel
= oplevel
* 10 + * str
++ - '0' ;