2 * ngIRCd -- The Next Generation IRC Daemon
3 * Copyright (c)2001-2012 Alexander Barton (alex@barton.de) and Contributors.
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
9 * Please read the file COPYING, README and AUTHORS for more information.
28 #include "conn-func.h"
41 #include "irc-write.h"
42 #include "client-cap.h"
49 IRC_ADMIN(CLIENT *Client, REQUEST *Req )
51 CLIENT *target, *prefix;
53 assert( Client != NULL );
54 assert( Req != NULL );
56 if(( Req->argc > 1 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
59 if( Req->argc == 1 ) target = Client_Search( Req->argv[0] );
60 else target = Client_ThisServer( );
63 if( Client_Type( Client ) == CLIENT_SERVER ) prefix = Client_Search( Req->prefix );
65 if( ! prefix ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
67 /* forwad message to another server? */
68 if( target != Client_ThisServer( ))
70 if(( ! target ) || ( Client_Type( target ) != CLIENT_SERVER )) return IRC_WriteStrClient( prefix, ERR_NOSUCHSERVER_MSG, Client_ID( prefix ), Req->argv[0] );
73 IRC_WriteStrClientPrefix( target, prefix, "ADMIN %s", Req->argv[0] );
77 /* mit Versionsinfo antworten */
78 if( ! IRC_WriteStrClient( Client, RPL_ADMINME_MSG, Client_ID( prefix ), Conf_ServerName )) return DISCONNECTED;
79 if( ! IRC_WriteStrClient( Client, RPL_ADMINLOC1_MSG, Client_ID( prefix ), Conf_ServerAdmin1 )) return DISCONNECTED;
80 if( ! IRC_WriteStrClient( Client, RPL_ADMINLOC2_MSG, Client_ID( prefix ), Conf_ServerAdmin2 )) return DISCONNECTED;
81 if( ! IRC_WriteStrClient( Client, RPL_ADMINEMAIL_MSG, Client_ID( prefix ), Conf_ServerAdminMail )) return DISCONNECTED;
83 IRC_SetPenalty( Client, 1 );
89 * Handler for the IRC command "INFO".
90 * See RFC 2812 section 3.4.10.
93 IRC_INFO(CLIENT * Client, REQUEST * Req)
95 CLIENT *target, *prefix;
98 assert(Client != NULL);
101 /* Wrong number of parameters? */
103 return IRC_WriteStrClient(Client, ERR_NEEDMOREPARAMS_MSG,
104 Client_ID(Client), Req->command);
106 /* Determine prefix */
107 if (Client_Type(Client) == CLIENT_SERVER)
108 prefix = Client_Search(Req->prefix);
112 return IRC_WriteStrClient(Client, ERR_NOSUCHNICK_MSG,
113 Client_ID(Client), Req->prefix);
115 /* Look for a target */
117 target = Client_Search(Req->argv[0]);
119 target = Client_ThisServer();
121 /* Make sure that the target is a server */
122 if (target && Client_Type(target) != CLIENT_SERVER)
123 target = Client_Introducer(target);
126 return IRC_WriteStrClient(prefix, ERR_NOSUCHSERVER_MSG,
127 Client_ID(prefix), Req->argv[0]);
129 /* Pass on to another server? */
130 if (target != Client_ThisServer()) {
131 IRC_WriteStrClientPrefix(target, prefix, "INFO %s",
136 if (!IRC_WriteStrClient(Client, RPL_INFO_MSG, Client_ID(prefix),
140 #if defined(__DATE__) && defined(__TIME__)
141 snprintf(msg, sizeof(msg), "Birth Date: %s at %s", __DATE__, __TIME__);
142 if (!IRC_WriteStrClient(Client, RPL_INFO_MSG, Client_ID(prefix), msg))
146 strlcpy(msg, "On-line since ", sizeof(msg));
147 strlcat(msg, NGIRCd_StartStr, sizeof(msg));
148 if (!IRC_WriteStrClient(Client, RPL_INFO_MSG, Client_ID(prefix), msg))
151 if (!IRC_WriteStrClient(Client, RPL_ENDOFINFO_MSG, Client_ID(prefix)))
154 IRC_SetPenalty(Client, 2);
160 * Handler for the IRC "ISON" command.
162 * See RFC 2812, 4.9 "Ison message".
164 * @param Client The client from which this command has been received.
165 * @param Req Request structure with prefix and all parameters.
166 * @return CONNECTED or DISCONNECTED.
169 IRC_ISON( CLIENT *Client, REQUEST *Req )
171 char rpl[COMMAND_LEN];
176 assert(Client != NULL);
179 /* Bad number of arguments? */
181 return IRC_WriteStrClient(Client, ERR_NEEDMOREPARAMS_MSG,
182 Client_ID(Client), Req->command);
184 strlcpy(rpl, RPL_ISON_MSG, sizeof rpl);
185 for (i = 0; i < Req->argc; i++) {
186 /* "All" ircd even parse ":<x> <y> ..." arguments and split
187 * them up; so we do the same ... */
188 ptr = strtok(Req->argv[i], " ");
191 c = Client_Search(ptr);
192 if (c && Client_Type(c) == CLIENT_USER) {
193 strlcat(rpl, Client_ID(c), sizeof(rpl));
194 strlcat(rpl, " ", sizeof(rpl));
196 ptr = strtok(NULL, " ");
199 ngt_TrimLastChr(rpl, ' ');
201 return IRC_WriteStrClient(Client, rpl, Client_ID(Client));
206 * Handler for the IRC "LINKS" command.
208 * See RFC 2812, 3.4.5 "Links message".
210 * @param Client The client from which this command has been received.
211 * @param Req Request structure with prefix and all parameters.
212 * @return CONNECTED or DISCONNECTED.
215 IRC_LINKS(CLIENT *Client, REQUEST *Req)
217 CLIENT *target, *from, *c;
220 assert(Client != NULL);
223 IRC_SetPenalty(Client, 1);
226 return IRC_WriteStrClient(Client, ERR_NEEDMOREPARAMS_MSG,
227 Client_ID(Client), Req->command);
229 /* Get pointer to server mask or "*", if none given */
231 mask = Req->argv[Req->argc - 1];
235 if (Client_Type(Client) == CLIENT_SERVER)
236 from = Client_Search(Req->prefix);
240 return IRC_WriteStrClient(Client, ERR_NOSUCHNICK_MSG,
241 Client_ID(Client), Req->prefix);
244 if (Req->argc == 2) {
245 target = Client_Search(Req->argv[0]);
246 if (! target || Client_Type(target) != CLIENT_SERVER)
247 return IRC_WriteStrClient(from, ERR_NOSUCHSERVER_MSG,
251 if (target != Client_ThisServer())
252 return IRC_WriteStrClientPrefix(target, from,
253 "LINKS %s %s", Req->argv[0],
259 if (Client_Type(c) == CLIENT_SERVER
260 && MatchCaseInsensitive(mask, Client_ID(c))) {
261 if (!IRC_WriteStrClient(from, RPL_LINKS_MSG,
262 Client_ID(from), Client_ID(c),
263 Client_ID(Client_TopServer(c)
264 ? Client_TopServer(c)
265 : Client_ThisServer()),
266 Client_Hops(c), Client_Info(c)))
271 return IRC_WriteStrClient(from, RPL_ENDOFLINKS_MSG,
272 Client_ID(from), mask);
277 IRC_LUSERS( CLIENT *Client, REQUEST *Req )
279 CLIENT *target, *from;
281 assert( Client != NULL );
282 assert( Req != NULL );
284 if(( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
286 /* Absender ermitteln */
287 if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
289 if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
291 /* An anderen Server forwarden? */
294 target = Client_Search( Req->argv[1] );
295 if(( ! target ) || ( Client_Type( target ) != CLIENT_SERVER )) return IRC_WriteStrClient( from, ERR_NOSUCHSERVER_MSG, Client_ID( from ), Req->argv[1] );
296 else if( target != Client_ThisServer( )) return IRC_WriteStrClientPrefix( target, from, "LUSERS %s %s", Req->argv[0], Req->argv[1] );
299 /* Wer ist der Absender? */
300 if( Client_Type( Client ) == CLIENT_SERVER ) target = Client_Search( Req->prefix );
301 else target = Client;
302 if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
304 IRC_Send_LUSERS( target );
306 IRC_SetPenalty( target, 1 );
312 * Handler for the IRC command "SERVLIST".
313 * List registered services, see RFC 2811, section 3.5.1: the syntax is
314 * "SERVLIST [<mask> [<type>]]".
317 IRC_SERVLIST(CLIENT *Client, REQUEST *Req)
321 assert(Client != NULL);
325 return IRC_WriteStrClient(Client, ERR_NEEDMOREPARAMS_MSG,
326 Client_ID(Client), Req->command);
328 if (Req->argc < 2 || strcmp(Req->argv[1], "0") == 0) {
329 for (c = Client_First(); c!= NULL; c = Client_Next(c)) {
330 if (Client_Type(c) != CLIENT_SERVICE)
332 if (Req->argc > 0 && !MatchCaseInsensitive(Req->argv[0],
335 if (!IRC_WriteStrClient(Client, RPL_SERVLIST_MSG,
336 Client_ID(Client), Client_Mask(c),
337 Client_Mask(Client_Introducer(c)), "*",
338 0, Client_Hops(c), Client_Info(c)))
343 return IRC_WriteStrClient(Client, RPL_SERVLISTEND_MSG, Client_ID(Client),
344 Req->argc > 0 ? Req->argv[0] : "*",
345 Req->argc > 1 ? Req->argv[1] : "0");
350 IRC_MOTD( CLIENT *Client, REQUEST *Req )
352 CLIENT *from, *target;
354 assert( Client != NULL );
355 assert( Req != NULL );
357 if( Req->argc > 1 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
359 /* From aus Prefix ermitteln */
360 if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
362 if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
367 target = Client_Search( Req->argv[0] );
368 if(( ! target ) || ( Client_Type( target ) != CLIENT_SERVER )) return IRC_WriteStrClient( from, ERR_NOSUCHSERVER_MSG, Client_ID( from ), Req->argv[0] );
370 if( target != Client_ThisServer( ))
372 /* Ok, anderer Server ist das Ziel: forwarden */
373 return IRC_WriteStrClientPrefix( target, from, "MOTD %s", Req->argv[0] );
377 IRC_SetPenalty( from, 3 );
378 return IRC_Show_MOTD( from );
383 IRC_NAMES( CLIENT *Client, REQUEST *Req )
385 char rpl[COMMAND_LEN], *ptr;
386 CLIENT *target, *from, *c;
389 assert( Client != NULL );
390 assert( Req != NULL );
392 if( Req->argc > 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
394 /* use prefix to determine "From" */
395 if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
397 if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
401 /* forward to another server? */
402 target = Client_Search( Req->argv[1] );
403 if(( ! target ) || ( Client_Type( target ) != CLIENT_SERVER )) return IRC_WriteStrClient( from, ERR_NOSUCHSERVER_MSG, Client_ID( from ), Req->argv[1] );
405 if( target != Client_ThisServer( )) {
406 /* target is another server, forward */
407 return IRC_WriteStrClientPrefix( target, from, "NAMES %s :%s", Req->argv[0], Req->argv[1] );
413 /* bestimmte Channels durchgehen */
414 ptr = strtok( Req->argv[0], "," );
417 chan = Channel_Search( ptr );
421 if( ! IRC_Send_NAMES( from, chan )) return DISCONNECTED;
423 if( ! IRC_WriteStrClient( from, RPL_ENDOFNAMES_MSG, Client_ID( from ), ptr )) return DISCONNECTED;
425 /* get next channel name */
426 ptr = strtok( NULL, "," );
431 chan = Channel_First( );
434 if( ! IRC_Send_NAMES( from, chan )) return DISCONNECTED;
436 chan = Channel_Next( chan );
439 /* Now print all clients which are not in any channel */
441 snprintf( rpl, sizeof( rpl ), RPL_NAMREPLY_MSG, Client_ID( from ), "*", "*" );
444 if(( Client_Type( c ) == CLIENT_USER ) && ( Channel_FirstChannelOf( c ) == NULL ) && ( ! strchr( Client_Modes( c ), 'i' )))
446 /* its a user, concatenate ... */
447 if( rpl[strlen( rpl ) - 1] != ':' ) strlcat( rpl, " ", sizeof( rpl ));
448 strlcat( rpl, Client_ID( c ), sizeof( rpl ));
450 if( strlen( rpl ) > ( LINE_LEN - CLIENT_NICK_LEN - 4 ))
452 /* Line is gwoing too long, send now */
453 if( ! IRC_WriteStrClient( from, "%s", rpl )) return DISCONNECTED;
454 snprintf( rpl, sizeof( rpl ), RPL_NAMREPLY_MSG, Client_ID( from ), "*", "*" );
458 c = Client_Next( c );
460 if( rpl[strlen( rpl ) - 1] != ':')
462 if( ! IRC_WriteStrClient( from, "%s", rpl )) return DISCONNECTED;
465 IRC_SetPenalty( from, 1 );
466 return IRC_WriteStrClient( from, RPL_ENDOFNAMES_MSG, Client_ID( from ), "*" );
471 t_diff(time_t *t, const time_t d)
479 return (unsigned int)diff;
484 uptime_days(time_t *now)
486 return t_diff(now, 60 * 60 * 24);
491 uptime_hrs(time_t *now)
493 return t_diff(now, 60 * 60);
498 uptime_mins(time_t *now)
500 return t_diff(now, 60);
505 * Handler for the IRC command "STATS".
506 * See RFC 2812 section 3.4.4.
509 IRC_STATS( CLIENT *Client, REQUEST *Req )
511 CLIENT *from, *target, *cl;
516 unsigned int days, hrs, mins;
517 struct list_head *list;
518 struct list_elem *list_item;
520 assert(Client != NULL);
524 return IRC_WriteStrClient(Client, ERR_NEEDMOREPARAMS_MSG,
525 Client_ID(Client), Req->command);
527 /* use prefix to determine "From" */
528 if (Client_Type(Client) == CLIENT_SERVER)
529 from = Client_Search(Req->prefix);
534 return IRC_WriteStrClient(Client, ERR_NOSUCHNICK_MSG,
535 Client_ID(Client), Req->prefix);
537 if (Req->argc == 2) {
538 /* forward to another server? */
539 target = Client_Search(Req->argv[1]);
540 if ((!target) || (Client_Type(target) != CLIENT_SERVER))
541 return IRC_WriteStrClient(from, ERR_NOSUCHSERVER_MSG,
542 Client_ID(from), Req->argv[1]);
544 if (target != Client_ThisServer()) {
545 /* forward to another server */
546 return IRC_WriteStrClientPrefix(target, from,
547 "STATS %s %s", Req->argv[0], Req->argv[1]);
552 query = Req->argv[0][0] ? Req->argv[0][0] : '*';
557 case 'g': /* Network-wide bans ("G-Lines") */
559 case 'k': /* Server-local bans ("K-Lines") */
561 if (!Client_HasMode(from, 'o'))
562 return IRC_WriteStrClient(from, ERR_NOPRIVILEGES_MSG,
564 if (query == 'g' || query == 'G')
565 list = Class_GetList(CLASS_GLINE);
567 list = Class_GetList(CLASS_KLINE);
568 list_item = Lists_GetFirst(list);
570 if (!IRC_WriteStrClient(from, RPL_STATSXLINE_MSG,
571 Client_ID(from), query,
572 Lists_GetMask(list_item),
573 Lists_GetValidity(list_item),
574 Lists_GetReason(list_item)))
576 list_item = Lists_GetNext(list_item);
579 case 'l': /* Link status (servers and own link) */
581 time_now = time(NULL);
582 for (con = Conn_First(); con != NONE; con = Conn_Next(con)) {
583 cl = Conn_GetClient(con);
586 if ((Client_Type(cl) == CLIENT_SERVER)
588 /* Server link or our own connection */
590 if (Conn_Options(con) & CONN_ZIP) {
591 if (!IRC_WriteStrClient
592 (from, RPL_STATSLINKINFOZIP_MSG,
593 Client_ID(from), Client_Mask(cl),
594 Conn_SendQ(con), Conn_SendMsg(con),
600 (long)(time_now - Conn_StartTime(con))))
605 if (!IRC_WriteStrClient
606 (from, RPL_STATSLINKINFO_MSG,
607 Client_ID(from), Client_Mask(cl),
608 Conn_SendQ(con), Conn_SendMsg(con),
609 Conn_SendBytes(con), Conn_RecvMsg(con),
611 (long)(time_now - Conn_StartTime(con))))
616 case 'm': /* IRC command status (usage count) */
618 cmd = Parse_GetCommandStruct();
619 for (; cmd->name; cmd++) {
620 if (cmd->lcount == 0 && cmd->rcount == 0)
622 if (!IRC_WriteStrClient
623 (from, RPL_STATSCOMMANDS_MSG, Client_ID(from),
624 cmd->name, cmd->lcount, cmd->bytes, cmd->rcount))
628 case 'u': /* Server uptime */
630 time_now = time(NULL) - NGIRCd_Start;
631 days = uptime_days(&time_now);
632 hrs = uptime_hrs(&time_now);
633 mins = uptime_mins(&time_now);
634 if (!IRC_WriteStrClient(from, RPL_STATSUPTIME, Client_ID(from),
635 days, hrs, mins, (unsigned int)time_now))
640 IRC_SetPenalty(from, 2);
641 return IRC_WriteStrClient(from, RPL_ENDOFSTATS_MSG,
642 Client_ID(from), query);
647 * Handler for the IRC command "SUMMON".
648 * See RFC 2812 section 4.5. ngIRCd doesn't implement this functionality and
649 * therefore answers with ERR_SUMMONDISABLED.
652 IRC_SUMMON(CLIENT * Client, UNUSED REQUEST * Req)
654 return IRC_WriteStrClient(Client, ERR_SUMMONDISABLED_MSG,
660 IRC_TIME( CLIENT *Client, REQUEST *Req )
662 CLIENT *from, *target;
666 assert( Client != NULL );
667 assert( Req != NULL );
669 if( Req->argc > 1 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
671 if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
673 if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
677 target = Client_Search( Req->argv[0] );
678 if(( ! target ) || ( Client_Type( target ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[0] );
680 if( target != Client_ThisServer( ))
682 return IRC_WriteStrClientPrefix( target, from, "TIME %s", Req->argv[0] );
687 (void)strftime( t_str, 60, "%A %B %d %Y -- %H:%M %Z", localtime( &t ));
688 return IRC_WriteStrClient( from, RPL_TIME_MSG, Client_ID( from ), Client_ID( Client_ThisServer( )), t_str );
693 * Handler for the IRC command "USERHOST".
694 * See RFC 2812 section 4.8.
697 IRC_USERHOST(CLIENT *Client, REQUEST *Req)
699 char rpl[COMMAND_LEN];
703 assert(Client != NULL);
707 return IRC_WriteStrClient(Client, ERR_NEEDMOREPARAMS_MSG,
708 Client_ID(Client), Req->command);
715 strlcpy(rpl, RPL_USERHOST_MSG, sizeof rpl);
716 for (i = 0; i < max; i++) {
717 c = Client_Search(Req->argv[i]);
718 if (c && (Client_Type(c) == CLIENT_USER)) {
719 /* This Nick is "online" */
720 strlcat(rpl, Client_ID(c), sizeof(rpl));
721 if (Client_HasMode(c, 'o'))
722 strlcat(rpl, "*", sizeof(rpl));
723 strlcat(rpl, "=", sizeof(rpl));
724 if (Client_HasMode(c, 'a'))
725 strlcat(rpl, "-", sizeof(rpl));
727 strlcat(rpl, "+", sizeof(rpl));
728 strlcat(rpl, Client_User(c), sizeof(rpl));
729 strlcat(rpl, "@", sizeof(rpl));
730 strlcat(rpl, Client_HostnameCloaked(c), sizeof(rpl));
731 strlcat(rpl, " ", sizeof(rpl));
734 ngt_TrimLastChr(rpl, ' ');
736 return IRC_WriteStrClient(Client, rpl, Client_ID(Client));
741 * Handler for the IRC command "USERS".
742 * See RFC 2812 section 4.6. As suggested there the command is disabled.
745 IRC_USERS(CLIENT * Client, UNUSED REQUEST * Req)
747 return IRC_WriteStrClient(Client, ERR_USERSDISABLED_MSG,
753 IRC_VERSION( CLIENT *Client, REQUEST *Req )
755 CLIENT *target, *prefix;
757 assert( Client != NULL );
758 assert( Req != NULL );
760 if(( Req->argc > 1 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
763 if( Req->argc == 1 ) target = Client_Search( Req->argv[0] );
764 else target = Client_ThisServer( );
766 /* Prefix ermitteln */
767 if( Client_Type( Client ) == CLIENT_SERVER ) prefix = Client_Search( Req->prefix );
768 else prefix = Client;
769 if( ! prefix ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
771 /* An anderen Server weiterleiten? */
772 if( target != Client_ThisServer( ))
774 if(( ! target ) || ( Client_Type( target ) != CLIENT_SERVER )) return IRC_WriteStrClient( prefix, ERR_NOSUCHSERVER_MSG, Client_ID( prefix ), Req->argv[0] );
777 IRC_WriteStrClientPrefix( target, prefix, "VERSION %s", Req->argv[0] );
781 /* send version information */
782 IRC_SetPenalty(Client, 1);
783 return IRC_WriteStrClient(Client, RPL_VERSION_MSG, Client_ID(prefix),
784 PACKAGE_NAME, PACKAGE_VERSION,
785 NGIRCd_DebugLevel, Conf_ServerName,
786 NGIRCd_VersionAddition);
791 write_whoreply(CLIENT *Client, CLIENT *c, const char *channelname, const char *flags)
793 return IRC_WriteStrClient(Client, RPL_WHOREPLY_MSG, Client_ID(Client),
794 channelname, Client_User(c),
795 Client_HostnameCloaked(c),
796 Client_ID(Client_Introducer(c)), Client_ID(c),
797 flags, Client_Hops(c), Client_Info(c));
802 who_flags_status(const char *client_modes)
804 if (strchr(client_modes, 'a'))
805 return "G"; /* away */
811 who_flags_qualifier(CLIENT *Client, const char *chan_user_modes)
813 assert(Client != NULL);
815 if (Client_Cap(Client) & CLIENT_CAP_MULTI_PREFIX) {
816 if (strchr(chan_user_modes, 'o') &&
817 strchr(chan_user_modes, 'v'))
821 if (strchr(chan_user_modes, 'o'))
823 else if (strchr(chan_user_modes, 'v'))
830 * Send WHO reply for a "channel target" ("WHO #channel").
832 * @param Client Client requesting the information.
833 * @param Chan Channel being requested.
834 * @param OnlyOps Only display IRC operators.
835 * @return CONNECTED or DISCONNECTED.
838 IRC_WHO_Channel(CLIENT *Client, CHANNEL *Chan, bool OnlyOps)
840 bool is_visible, is_member, is_ircop;
842 const char *client_modes;
843 const char *chan_user_modes;
848 assert( Client != NULL );
849 assert( Chan != NULL );
851 is_member = Channel_IsMemberOf(Chan, Client);
853 /* Secret channel? */
854 if (!is_member && strchr(Channel_Modes(Chan), 's'))
855 return IRC_WriteStrClient(Client, RPL_ENDOFWHO_MSG,
856 Client_ID(Client), Channel_Name(Chan));
858 cl2chan = Channel_FirstMember(Chan);
859 for (; cl2chan ; cl2chan = Channel_NextMember(Chan, cl2chan)) {
860 c = Channel_GetClient(cl2chan);
862 client_modes = Client_Modes(c);
863 is_ircop = strchr(client_modes, 'o') != NULL;
864 if (OnlyOps && !is_ircop)
867 is_visible = strchr(client_modes, 'i') == NULL;
868 if (is_member || is_visible) {
869 if (IRC_CheckListTooBig(Client, count, MAX_RPL_WHO, "WHO"))
872 strcpy(flags, who_flags_status(client_modes));
874 strlcat(flags, "*", sizeof(flags));
876 chan_user_modes = Channel_UserModes(Chan, c);
877 strlcat(flags, who_flags_qualifier(c, chan_user_modes),
880 if (!write_whoreply(Client, c, Channel_Name(Chan),
886 return IRC_WriteStrClient(Client, RPL_ENDOFWHO_MSG, Client_ID(Client),
892 * Send WHO reply for a "mask target" ("WHO m*sk").
894 * @param Client Client requesting the information.
895 * @param Mask Mask being requested or NULL for "all" clients.
896 * @param OnlyOps Only display IRC operators.
897 * @return CONNECTED or DISCONNECTED.
900 IRC_WHO_Mask(CLIENT *Client, char *Mask, bool OnlyOps)
905 bool client_match, is_visible;
909 assert (Client != NULL);
914 for (c = Client_First(); c != NULL; c = Client_Next(c)) {
915 if (Client_Type(c) != CLIENT_USER)
918 if (OnlyOps && !Client_HasMode(c, 'o'))
922 /* Match pattern against user host/server/name/nick */
923 client_match = MatchCaseInsensitive(Mask,
926 client_match = MatchCaseInsensitive(Mask,
927 Client_ID(Client_Introducer(c)));
929 client_match = MatchCaseInsensitive(Mask,
932 client_match = MatchCaseInsensitive(Mask,
935 continue; /* no match: skip this client */
938 is_visible = !Client_HasMode(c, 'i');
940 /* Target client is invisible, but mask matches exactly? */
941 if (!is_visible && Mask && strcasecmp(Client_ID(c), Mask) == 0)
944 /* Target still invisible, but are both on the same channel? */
946 cl2chan = Channel_FirstChannelOf(Client);
947 while (cl2chan && !is_visible) {
948 chan = Channel_GetChannel(cl2chan);
949 if (Channel_IsMemberOf(chan, c))
951 cl2chan = Channel_NextChannelOf(Client, cl2chan);
955 if (!is_visible) /* target user is not visible */
958 if (IRC_CheckListTooBig(Client, count, MAX_RPL_WHO, "WHO"))
961 strcpy(flags, who_flags_status(Client_Modes(c)));
962 if (strchr(Client_Modes(c), 'o'))
963 strlcat(flags, "*", sizeof(flags));
965 if (!write_whoreply(Client, c, "*", flags))
970 return IRC_WriteStrClient(Client, RPL_ENDOFWHO_MSG, Client_ID(Client),
976 * Handler for the IRC "WHO" command.
978 * See RFC 2812, 3.6.1 "Who query".
980 * @param Client The client from which this command has been received.
981 * @param Req Request structure with prefix and all parameters.
982 * @return CONNECTED or DISCONNECTED.
985 IRC_WHO(CLIENT *Client, REQUEST *Req)
990 assert (Client != NULL);
991 assert (Req != NULL);
994 return IRC_WriteStrClient(Client, ERR_NEEDMOREPARAMS_MSG,
995 Client_ID(Client), Req->command);
999 if (Req->argc == 2) {
1000 if (strcmp(Req->argv[1], "o") == 0)
1004 return IRC_WriteStrClient(Client,
1005 ERR_NEEDMOREPARAMS_MSG,
1011 IRC_SetPenalty(Client, 1);
1012 if (Req->argc >= 1) {
1013 /* Channel or mask given */
1014 chan = Channel_Search(Req->argv[0]);
1016 /* Members of a channel have been requested */
1017 IRC_SetPenalty(Client, 1);
1018 return IRC_WHO_Channel(Client, chan, only_ops);
1020 if (strcmp(Req->argv[0], "0") != 0) {
1021 /* A mask has been given. But please note this RFC
1022 * stupidity: "0" is same as no arguments ... */
1023 IRC_SetPenalty(Client, 3);
1024 return IRC_WHO_Mask(Client, Req->argv[0], only_ops);
1028 /* No channel or (valid) mask given */
1029 IRC_SetPenalty(Client, 2);
1030 return IRC_WHO_Mask(Client, NULL, only_ops);
1035 * Generate WHOIS reply of one actual client.
1037 * @param Client The client from which this command has been received.
1038 * @param from The client requesting the information ("originator").
1039 * @param c The client of which information should be returned.
1040 * @return CONNECTED or DISCONNECTED.
1043 IRC_WHOIS_SendReply(CLIENT *Client, CLIENT *from, CLIENT *c)
1045 char str[LINE_LEN + 1];
1049 assert(Client != NULL);
1050 assert(from != NULL);
1053 /* Nick, user, hostname and client info */
1054 if (!IRC_WriteStrClient(from, RPL_WHOISUSER_MSG, Client_ID(from),
1055 Client_ID(c), Client_User(c),
1056 Client_HostnameCloaked(c), Client_Info(c)))
1057 return DISCONNECTED;
1060 if (!IRC_WriteStrClient(from, RPL_WHOISSERVER_MSG, Client_ID(from),
1061 Client_ID(c), Client_ID(Client_Introducer(c)),
1062 Client_Info(Client_Introducer(c))))
1063 return DISCONNECTED;
1066 snprintf(str, sizeof(str), RPL_WHOISCHANNELS_MSG,
1067 Client_ID(from), Client_ID(c));
1068 cl2chan = Channel_FirstChannelOf(c);
1070 chan = Channel_GetChannel(cl2chan);
1071 assert(chan != NULL);
1074 cl2chan = Channel_NextChannelOf(c, cl2chan);
1076 /* Secret channel? */
1077 if (strchr(Channel_Modes(chan), 's')
1078 && !Channel_IsMemberOf(chan, Client))
1081 /* Local channel and request is not from a user? */
1082 if (Client_Type(Client) == CLIENT_SERVER
1083 && Channel_IsLocal(chan))
1086 /* Concatenate channel names */
1087 if (str[strlen(str) - 1] != ':')
1088 strlcat(str, " ", sizeof(str));
1090 strlcat(str, who_flags_qualifier(c, Channel_UserModes(chan, c)),
1092 strlcat(str, Channel_Name(chan), sizeof(str));
1094 if (strlen(str) > (LINE_LEN - CHANNEL_NAME_LEN - 4)) {
1095 /* Line becomes too long: send it! */
1096 if (!IRC_WriteStrClient(Client, "%s", str))
1097 return DISCONNECTED;
1098 snprintf(str, sizeof(str), RPL_WHOISCHANNELS_MSG,
1099 Client_ID(from), Client_ID(c));
1102 if(str[strlen(str) - 1] != ':') {
1103 /* There is data left to send: */
1104 if (!IRC_WriteStrClient(Client, "%s", str))
1105 return DISCONNECTED;
1109 if (Client_HasMode(c, 'o') &&
1110 !IRC_WriteStrClient(from, RPL_WHOISOPERATOR_MSG,
1111 Client_ID(from), Client_ID(c)))
1112 return DISCONNECTED;
1114 /* Connected using SSL? */
1115 if (Conn_UsesSSL(Client_Conn(c)) &&
1116 !IRC_WriteStrClient(from, RPL_WHOISSSL_MSG, Client_ID(from),
1118 return DISCONNECTED;
1120 /* Registered nick name? */
1121 if (Client_HasMode(c, 'R') &&
1122 !IRC_WriteStrClient(from, RPL_WHOISREGNICK_MSG,
1123 Client_ID(from), Client_ID(c)))
1124 return DISCONNECTED;
1126 if (Client_Conn(c) > NONE && (Client_OperByMe(from) || from == c) &&
1127 !IRC_WriteStrClient(from, RPL_WHOISHOST_MSG, Client_ID(from),
1128 Client_ID(c), Client_Hostname(c),
1129 Conn_GetIPAInfo(Client_Conn(c))))
1130 return DISCONNECTED;
1132 /* Idle and signon time (local clients only!) */
1133 if (!Conf_MorePrivacy && Client_Conn(c) > NONE &&
1134 !IRC_WriteStrClient(from, RPL_WHOISIDLE_MSG,
1135 Client_ID(from), Client_ID(c),
1136 (unsigned long)Conn_GetIdle(Client_Conn(c)),
1137 (unsigned long)Conn_GetSignon(Client_Conn(c))))
1138 return DISCONNECTED;
1141 if (Client_HasMode(c, 'a') &&
1142 !IRC_WriteStrClient(from, RPL_AWAY_MSG,
1143 Client_ID(from), Client_ID(c), Client_Away(c)))
1144 return DISCONNECTED;
1147 } /* IRC_WHOIS_SendReply */
1151 * Handler for the IRC "WHOIS" command.
1153 * See RFC 2812, 3.6.2 "Whois query".
1155 * @param Client The client from which this command has been received.
1156 * @param Req Request structure with prefix and all parameters.
1157 * @return CONNECTED or DISCONNECTED.
1160 IRC_WHOIS( CLIENT *Client, REQUEST *Req )
1162 CLIENT *from, *target, *c;
1163 unsigned int match_count = 0, found = 0;
1164 bool has_wildcards, is_remote;
1165 bool got_wildcard = false;
1166 char mask[COMMAND_LEN], *query;
1168 assert( Client != NULL );
1169 assert( Req != NULL );
1171 /* Bad number of parameters? */
1172 if (Req->argc < 1 || Req->argc > 2)
1173 return IRC_WriteStrClient(Client, ERR_NEEDMOREPARAMS_MSG,
1174 Client_ID(Client), Req->command);
1176 /* Search sender of the WHOIS */
1177 if (Client_Type(Client) == CLIENT_SERVER) {
1178 from = Client_Search(Req->prefix);
1180 IRC_SetPenalty(Client, 1);
1184 return IRC_WriteStrClient(Client, ERR_NOSUCHNICK_MSG,
1185 Client_ID(Client), Req->prefix);
1187 /* Get target server for this command */
1188 if (Req->argc > 1) {
1189 /* Search the target server, which can be specified as a
1190 * nick name on that server as well: */
1191 target = Client_Search(Req->argv[0]);
1193 return IRC_WriteStrClient(from, ERR_NOSUCHSERVER_MSG,
1194 Client_ID(from), Req->argv[0]);
1196 target = Client_ThisServer();
1197 assert(target != NULL);
1199 /* Forward to other server? */
1200 if (Client_NextHop(target) != Client_ThisServer() &&
1201 Client_Type(Client_NextHop(target)) == CLIENT_SERVER)
1202 return IRC_WriteStrClientPrefix(target, from,
1204 Req->argv[0], Req->argv[1]);
1206 is_remote = Client_Conn(from) < 0;
1207 strlcpy(mask, Req->argv[Req->argc - 1], sizeof(mask));
1208 for (query = strtok(ngt_LowerStr(mask), ",");
1210 query = strtok(NULL, ","), found++)
1212 has_wildcards = query[strcspn(query, "*?")] != 0;
1214 * follows ircd 2.10 implementation:
1215 * - handle up to 3 targets
1216 * - no wildcards for remote clients
1217 * - only one wildcard target per local client
1219 * Also, at most MAX_RPL_WHOIS matches are returned.
1221 if (!has_wildcards || is_remote) {
1222 c = Client_Search(query);
1223 if (c && Client_Type(c) == CLIENT_USER) {
1224 if (!IRC_WHOIS_SendReply(Client, from, c))
1225 return DISCONNECTED;
1227 if (!IRC_WriteStrClient(Client,
1231 return DISCONNECTED;
1236 /* we already handled one wildcard query */
1237 if (!IRC_WriteStrClient(Client, ERR_NOSUCHNICK_MSG,
1238 Client_ID(Client), query))
1239 return DISCONNECTED;
1242 got_wildcard = true;
1243 IRC_SetPenalty(Client, 3);
1245 for (c = Client_First(); c; c = Client_Next(c)) {
1246 if (IRC_CheckListTooBig(Client, match_count,
1247 MAX_RPL_WHOIS, "WHOIS"))
1250 if (Client_Type(c) != CLIENT_USER)
1252 if (!MatchCaseInsensitive(query, Client_ID(c)))
1254 if (!IRC_WHOIS_SendReply(Client, from, c))
1255 return DISCONNECTED;
1260 if (match_count == 0)
1261 IRC_WriteStrClient(Client, ERR_NOSUCHNICK_MSG,
1263 Req->argv[Req->argc - 1]);
1265 return IRC_WriteStrClient(from, RPL_ENDOFWHOIS_MSG,
1266 Client_ID(from), Req->argv[Req->argc - 1]);
1271 WHOWAS_EntryWrite(CLIENT *prefix, WHOWAS *entry)
1275 (void)strftime(t_str, sizeof(t_str), "%a %b %d %H:%M:%S %Y",
1276 localtime(&entry->time));
1278 if (!IRC_WriteStrClient(prefix, RPL_WHOWASUSER_MSG, Client_ID(prefix),
1279 entry->id, entry->user, entry->host, entry->info))
1280 return DISCONNECTED;
1282 return IRC_WriteStrClient(prefix, RPL_WHOISSERVER_MSG, Client_ID(prefix),
1283 entry->id, entry->server, t_str);
1287 * IRC "WHOWAS" function.
1288 * This function implements the IRC command "WHOWHAS". It handles local
1289 * requests and request that should be forwarded to other servers.
1292 IRC_WHOWAS( CLIENT *Client, REQUEST *Req )
1294 CLIENT *target, *prefix;
1296 char tok_buf[COMMAND_LEN];
1297 int max, last, count, i, nc;
1300 assert( Client != NULL );
1301 assert( Req != NULL );
1303 /* Do not reveal any info on disconnected users? */
1304 if (Conf_MorePrivacy)
1307 /* Wrong number of parameters? */
1309 return IRC_WriteStrClient(Client, ERR_NEEDMOREPARAMS_MSG,
1310 Client_ID(Client), Req->command);
1312 return IRC_WriteStrClient(Client, ERR_NONICKNAMEGIVEN_MSG, Client_ID(Client));
1316 target = Client_Search(Req->argv[2]);
1318 target = Client_ThisServer();
1321 if (Client_Type(Client) == CLIENT_SERVER)
1322 prefix = Client_Search(Req->prefix);
1327 return IRC_WriteStrClient(Client, ERR_NOSUCHNICK_MSG,
1328 Client_ID(Client), Req->prefix);
1330 /* Forward to other server? */
1331 if (target != Client_ThisServer()) {
1332 if (!target || (Client_Type(target) != CLIENT_SERVER))
1333 return IRC_WriteStrClient(prefix, ERR_NOSUCHSERVER_MSG,
1334 Client_ID(prefix), Req->argv[2]);
1337 IRC_WriteStrClientPrefix( target, prefix, "WHOWAS %s %s %s",
1338 Req->argv[0], Req->argv[1],
1343 whowas = Client_GetWhowas( );
1344 last = Client_GetLastWhowasIndex( );
1348 max = DEF_RPL_WHOWAS;
1349 if (Req->argc > 1) {
1350 max = atoi(Req->argv[1]);
1352 max = MAX_RPL_WHOWAS;
1356 * Break up the nick argument into a list of nicks, if applicable
1357 * Can't modify Req->argv[0] because we need it for RPL_ENDOFWHOWAS_MSG.
1359 strlcpy(tok_buf, Req->argv[0], sizeof(tok_buf));
1360 nick = strtok(tok_buf, ",");
1362 for (i=last, count=0; nick != NULL ; nick = strtok(NULL, ",")) {
1366 if (whowas[i].time > 0 && strcasecmp(nick, whowas[i].id) == 0) {
1367 if (!WHOWAS_EntryWrite(prefix, &whowas[i]))
1368 return DISCONNECTED;
1372 /* previous entry */
1375 /* "underflow", wrap around */
1379 if (nc && count >= max)
1381 } while (i != last);
1383 if (nc == 0 && !IRC_WriteStrClient(prefix, ERR_WASNOSUCHNICK_MSG,
1384 Client_ID(prefix), nick))
1385 return DISCONNECTED;
1387 return IRC_WriteStrClient(prefix, RPL_ENDOFWHOWAS_MSG, Client_ID(prefix), Req->argv[0]);
1392 * Send LUSERS reply to a client.
1394 * @param Client The receipient of the information.
1395 * @return CONNECTED or DISCONNECTED.
1398 IRC_Send_LUSERS(CLIENT *Client)
1405 assert(Client != NULL);
1407 /* Users, services and serevers in the network */
1408 if (!IRC_WriteStrClient(Client, RPL_LUSERCLIENT_MSG, Client_ID(Client),
1409 Client_UserCount(), Client_ServiceCount(),
1410 Client_ServerCount()))
1411 return DISCONNECTED;
1413 /* Number of IRC operators */
1414 cnt = Client_OperCount( );
1416 if (!IRC_WriteStrClient(Client, RPL_LUSEROP_MSG,
1417 Client_ID(Client), cnt))
1418 return DISCONNECTED;
1421 /* Unknown connections */
1422 cnt = Client_UnknownCount( );
1424 if (!IRC_WriteStrClient(Client, RPL_LUSERUNKNOWN_MSG,
1425 Client_ID(Client), cnt))
1426 return DISCONNECTED;
1429 /* Number of created channels */
1430 if (!IRC_WriteStrClient(Client, RPL_LUSERCHANNELS_MSG,
1432 Channel_CountVisible(Client)))
1433 return DISCONNECTED;
1435 /* Number of local users, services and servers */
1436 if (!IRC_WriteStrClient(Client, RPL_LUSERME_MSG, Client_ID(Client),
1437 Client_MyUserCount(), Client_MyServiceCount(),
1438 Client_MyServerCount()))
1439 return DISCONNECTED;
1442 /* Maximum number of local users */
1443 cnt = Client_MyUserCount();
1444 max = Client_MyMaxUserCount();
1445 if (! IRC_WriteStrClient(Client, RPL_LOCALUSERS_MSG, Client_ID(Client),
1446 cnt, max, cnt, max))
1447 return DISCONNECTED;
1448 /* Maximum number of users in the network */
1449 cnt = Client_UserCount();
1450 max = Client_MaxUserCount();
1451 if(! IRC_WriteStrClient(Client, RPL_NETUSERS_MSG, Client_ID(Client),
1452 cnt, max, cnt, max))
1453 return DISCONNECTED;
1454 /* Connection counters */
1455 if (! IRC_WriteStrClient(Client, RPL_STATSCONN_MSG, Client_ID(Client),
1456 Conn_CountMax(), Conn_CountAccepted()))
1457 return DISCONNECTED;
1461 } /* IRC_Send_LUSERS */
1465 Show_MOTD_Start(CLIENT *Client)
1467 return IRC_WriteStrClient(Client, RPL_MOTDSTART_MSG,
1468 Client_ID( Client ), Client_ID( Client_ThisServer( )));
1472 Show_MOTD_Sendline(CLIENT *Client, const char *msg)
1474 return IRC_WriteStrClient(Client, RPL_MOTD_MSG, Client_ID( Client ), msg);
1478 Show_MOTD_End(CLIENT *Client)
1480 return IRC_WriteStrClient( Client, RPL_ENDOFMOTD_MSG, Client_ID( Client ));
1484 static bool Show_MOTD_SSLInfo(CLIENT *Client)
1487 char buf[COMMAND_LEN] = "Connected using Cipher ";
1489 if (!Conn_GetCipherInfo(Client_Conn(Client), buf + 23, sizeof buf - 23))
1492 if (!Show_MOTD_Sendline(Client, buf))
1499 Show_MOTD_SSLInfo(UNUSED CLIENT *c)
1504 IRC_Show_MOTD( CLIENT *Client )
1507 size_t len_tot, len_str;
1509 assert( Client != NULL );
1511 len_tot = array_bytes(&Conf_Motd);
1512 if (len_tot == 0 && !Conn_UsesSSL(Client_Conn(Client)))
1513 return IRC_WriteStrClient(Client, ERR_NOMOTD_MSG, Client_ID(Client));
1515 if (!Show_MOTD_Start(Client))
1516 return DISCONNECTED;
1518 line = array_start(&Conf_Motd);
1519 while (len_tot > 0) {
1520 len_str = strlen(line) + 1;
1522 assert(len_tot >= len_str);
1525 if (!Show_MOTD_Sendline(Client, line))
1526 return DISCONNECTED;
1530 if (!Show_MOTD_SSLInfo(Client))
1531 return DISCONNECTED;
1532 return Show_MOTD_End(Client);
1533 } /* IRC_Show_MOTD */
1537 * Send NAMES reply for a specific client and channel.
1539 * @param Client The client requesting the NAMES information.
1540 * @param Chan The channel
1541 * @return CONNECTED or DISCONNECTED.
1544 IRC_Send_NAMES(CLIENT * Client, CHANNEL * Chan)
1546 bool is_visible, is_member;
1547 char str[LINE_LEN + 1];
1551 assert(Client != NULL);
1552 assert(Chan != NULL);
1554 if (Channel_IsMemberOf(Chan, Client))
1559 /* Do not print info on channel memberships to anyone that is not member? */
1560 if (Conf_MorePrivacy && !is_member)
1563 /* Secret channel? */
1564 if (!is_member && strchr(Channel_Modes(Chan), 's'))
1567 snprintf(str, sizeof(str), RPL_NAMREPLY_MSG, Client_ID(Client), "=",
1568 Channel_Name(Chan));
1569 cl2chan = Channel_FirstMember(Chan);
1571 cl = Channel_GetClient(cl2chan);
1573 if (strchr(Client_Modes(cl), 'i'))
1578 if (is_member || is_visible) {
1579 if (str[strlen(str) - 1] != ':')
1580 strlcat(str, " ", sizeof(str));
1581 if (Client_Cap(cl) & CLIENT_CAP_MULTI_PREFIX) {
1582 if (strchr(Channel_UserModes(Chan, cl), 'o') &&
1583 strchr(Channel_UserModes(Chan, cl), 'v'))
1584 strlcat(str, "@+", sizeof(str));
1586 if (strchr(Channel_UserModes(Chan, cl), 'o'))
1587 strlcat(str, "@", sizeof(str));
1588 else if (strchr(Channel_UserModes(Chan, cl), 'v'))
1589 strlcat(str, "+", sizeof(str));
1591 strlcat(str, Client_ID(cl), sizeof(str));
1593 if (strlen(str) > (LINE_LEN - CLIENT_NICK_LEN - 4)) {
1594 if (!IRC_WriteStrClient(Client, "%s", str))
1595 return DISCONNECTED;
1596 snprintf(str, sizeof(str), RPL_NAMREPLY_MSG,
1597 Client_ID(Client), "=",
1598 Channel_Name(Chan));
1602 cl2chan = Channel_NextMember(Chan, cl2chan);
1604 if (str[strlen(str) - 1] != ':') {
1605 if (!IRC_WriteStrClient(Client, "%s", str))
1606 return DISCONNECTED;
1610 } /* IRC_Send_NAMES */
1614 * Send the ISUPPORT numeric (005).
1615 * This numeric indicates the features that are supported by this server.
1616 * See <http://www.irc.org/tech_docs/005.html> for details.
1619 IRC_Send_ISUPPORT(CLIENT * Client)
1621 if (!IRC_WriteStrClient(Client, RPL_ISUPPORT1_MSG, Client_ID(Client),
1623 return DISCONNECTED;
1624 return IRC_WriteStrClient(Client, RPL_ISUPPORT2_MSG, Client_ID(Client),
1625 CHANNEL_NAME_LEN - 1, Conf_MaxNickLength - 1,
1626 COMMAND_LEN - 23, CLIENT_AWAY_LEN - 1,
1627 COMMAND_LEN - 113, MAX_HNDL_MODES_ARG,
1628 MAX_HNDL_CHANNEL_LISTS);
1629 } /* IRC_Send_ISUPPORT */