src/ngircd/numeric.c

   1 /*
   2  * ngIRCd -- The Next Generation IRC Daemon
   3  * Copyright (c)2001-2008 Alexander Barton (alex@barton.de)
   4  *
   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.
  10  *
  11  * Handlers for IRC numerics sent to the server
  12  */
  13
  14 #include "portab.h"
  15
  16 #include "imp.h"
  17 #include <assert.h>
  18 #include <stdio.h>
  19 #include <stdlib.h>
  20 #include <string.h>
  21
  22 #include "defines.h"
  23 #include "conn.h"
  24 #include "conf.h"
  25 #include "conn.h"
  26 #include "conn-func.h"
  27 #include "client.h"
  28 #include "channel.h"
  29 #include "irc-write.h"
  30 #include "lists.h"
  31 #include "log.h"
  32 #include "messages.h"
  33 #include "parse.h"
  34
  35 #include "exp.h"
  36 #include "numeric.h"
  37
  38
  39 /**
  40  * Announce a channel and its users in the network.
  41  */
  42 static bool
  43 Announce_Channel(CLIENT *Client, CHANNEL *Chan)
  44 {
  45         CL2CHAN *cl2chan;
  46         CLIENT *cl;
  47         char str[LINE_LEN], *ptr;
  48         bool njoin;
  49
  50         if (Conn_Options(Client_Conn(Client)) & CONN_RFC1459)
  51                 njoin = false;
  52         else
  53                 njoin = true;
  54
  55         /* Get all the members of this channel */
  56         cl2chan = Channel_FirstMember(Chan);
  57         snprintf(str, sizeof(str), "NJOIN %s :", Channel_Name(Chan));
  58         while (cl2chan) {
  59                 cl = Channel_GetClient(cl2chan);
  60                 assert(cl != NULL);
  61
  62                 if (njoin) {
  63                         /* RFC 2813: send NJOIN with nick names and modes
  64                          * (if user is channel operator or has voice) */
  65                         if (str[strlen(str) - 1] != ':')
  66                                 strlcat(str, ",", sizeof(str));
  67                         if (strchr(Channel_UserModes(Chan, cl), 'v'))
  68                                 strlcat(str, "+", sizeof(str));
  69                         if (strchr(Channel_UserModes(Chan, cl), 'o'))
  70                                 strlcat(str, "@", sizeof(str));
  71                         strlcat(str, Client_ID(cl), sizeof(str));
  72
  73                         /* Send the data if the buffer is "full" */
  74                         if (strlen(str) > (LINE_LEN - CLIENT_NICK_LEN - 8)) {
  75                                 if (!IRC_WriteStrClient(Client, "%s", str))
  76                                         return DISCONNECTED;
  77                                 snprintf(str, sizeof(str), "NJOIN %s :",
  78                                          Channel_Name(Chan));
  79                         }
  80                 } else {
  81                         /* RFC 1459: no NJOIN, send JOIN and MODE */
  82                         if (!IRC_WriteStrClientPrefix(Client, cl, "JOIN %s",
  83                                                 Channel_Name(Chan)))
  84                                 return DISCONNECTED;
  85                         ptr = Channel_UserModes(Chan, cl);
  86                         while (*ptr) {
  87                                 if (!IRC_WriteStrClientPrefix(Client, cl,
  88                                                    "MODE %s +%c %s",
  89                                                    Channel_Name(Chan), ptr[0],
  90                                                    Client_ID(cl)))
  91                                         return DISCONNECTED;
  92                                 ptr++;
  93                         }
  94                 }
  95
  96                 cl2chan = Channel_NextMember(Chan, cl2chan);
  97         }
  98
  99         /* Data left in the buffer? */
 100         if (str[strlen(str) - 1] != ':') {
 101                 /* Yes, send it ... */
 102                 if (!IRC_WriteStrClient(Client, "%s", str))
 103                         return DISCONNECTED;
 104         }
 105
 106         return CONNECTED;
 107 } /* Announce_Channel */
 108
 109
 110 /**
 111  * Announce new server in the network
 112  * @param Client New server
 113  * @param Server Existing server in the network
 114  */
 115 static bool
 116 Announce_Server(CLIENT * Client, CLIENT * Server)
 117 {
 118         CLIENT *c;
 119
 120         if (Client_Conn(Server) > NONE) {
 121                 /* Announce the new server to the one already registered
 122                  * which is directly connected to the local server */
 123                 if (!IRC_WriteStrClient
 124                     (Server, "SERVER %s %d %d :%s", Client_ID(Client),
 125                      Client_Hops(Client) + 1, Client_MyToken(Client),
 126                      Client_Info(Client)))
 127                         return DISCONNECTED;
 128         }
 129
 130         if (Client_Hops(Server) == 1)
 131                 c = Client_ThisServer();
 132         else
 133                 c = Client_TopServer(Server);
 134
 135         /* Inform new server about the one already registered in the network */
 136         return IRC_WriteStrClientPrefix(Client, c, "SERVER %s %d %d :%s",
 137                 Client_ID(Server), Client_Hops(Server) + 1,
 138                 Client_MyToken(Server), Client_Info(Server));
 139 } /* Announce_Server */
 140
 141
 142 /**
 143  * Announce existing user to a new server
 144  * @param Client New server
 145  * @param User Existing user in the network
 146  */
 147 static bool
 148 Announce_User(CLIENT * Client, CLIENT * User)
 149 {
 150         CONN_ID conn;
 151         char *modes;
 152
 153         conn = Client_Conn(Client);
 154         if (Conn_Options(conn) & CONN_RFC1459) {
 155                 /* RFC 1459 mode: separate NICK and USER commands */
 156                 if (! Conn_WriteStr(conn, "NICK %s :%d",
 157                                     Client_ID(User), Client_Hops(User) + 1))
 158                         return DISCONNECTED;
 159                 if (! Conn_WriteStr(conn, ":%s USER %s %s %s :%s",
 160                                      Client_ID(User), Client_User(User),
 161                                      Client_Hostname(User),
 162                                      Client_ID(Client_Introducer(User)),
 163                                      Client_Info(User)))
 164                         return DISCONNECTED;
 165                 modes = Client_Modes(User);
 166                 if (modes[0]) {
 167                         return Conn_WriteStr(conn, ":%s MODE %s +%s",
 168                                      Client_ID(User), Client_ID(User),
 169                                      modes);
 170                 }
 171                 return CONNECTED;
 172         } else {
 173                 /* RFC 2813 mode: one combined NICK or SERVICE command */
 174                 if (Client_Type(User) == CLIENT_SERVICE
 175                     && strchr(Client_Flags(Client), 'S'))
 176                         return IRC_WriteStrClient(Client,
 177                                 "SERVICE %s %d * +%s %d :%s", Client_Mask(User),
 178                                 Client_MyToken(Client_Introducer(User)),
 179                                 Client_Modes(User), Client_Hops(User) + 1,
 180                                 Client_Info(User));
 181                 else
 182                         return IRC_WriteStrClient(Client,
 183                                 "NICK %s %d %s %s %d +%s :%s",
 184                                 Client_ID(User), Client_Hops(User) + 1,
 185                                 Client_User(User), Client_Hostname(User),
 186                                 Client_MyToken(Client_Introducer(User)),
 187                                 Client_Modes(User), Client_Info(User));
 188         }
 189 } /* Announce_User */
 190
 191
 192 #ifdef IRCPLUS
 193
 194 /**
 195  * Synchronize invite and ban lists between servers
 196  * @param Client New server
 197  */
 198 static bool
 199 Synchronize_Lists(CLIENT * Client)
 200 {
 201         CHANNEL *c;
 202         struct list_head *head;
 203         struct list_elem *elem;
 204
 205         assert(Client != NULL);
 206
 207         c = Channel_First();
 208         while (c) {
 209                 /* ban list */
 210                 head = Channel_GetListBans(c);
 211                 elem = Lists_GetFirst(head);
 212                 while (elem) {
 213                         if (!IRC_WriteStrClient(Client, "MODE %s +b %s",
 214                                                 Channel_Name(c),
 215                                                 Lists_GetMask(elem))) {
 216                                 return DISCONNECTED;
 217                         }
 218                         elem = Lists_GetNext(elem);
 219                 }
 220
 221                 /* invite list */
 222                 head = Channel_GetListInvites(c);
 223                 elem = Lists_GetFirst(head);
 224                 while (elem) {
 225                         if (!IRC_WriteStrClient(Client, "MODE %s +I %s",
 226                                                 Channel_Name(c),
 227                                                 Lists_GetMask(elem))) {
 228                                 return DISCONNECTED;
 229                         }
 230                         elem = Lists_GetNext(elem);
 231                 }
 232
 233                 c = Channel_Next(c);
 234         }
 235         return CONNECTED;
 236 }
 237
 238
 239 /**
 240  * Send CHANINFO commands to a new server (inform it about existing channels).
 241  * @param Client New server
 242  * @param Chan Channel
 243  */
 244 static bool
 245 Send_CHANINFO(CLIENT * Client, CHANNEL * Chan)
 246 {
 247         char *modes, *topic;
 248         bool has_k, has_l;
 249
 250 #ifdef DEBUG
 251         Log(LOG_DEBUG, "Sending CHANINFO commands ...");
 252 #endif
 253
 254         modes = Channel_Modes(Chan);
 255         topic = Channel_Topic(Chan);
 256
 257         if (!*modes && !*topic)
 258                 return CONNECTED;
 259
 260         has_k = strchr(modes, 'k') != NULL;
 261         has_l = strchr(modes, 'l') != NULL;
 262
 263         /* send CHANINFO */
 264         if (!has_k && !has_l) {
 265                 if (!*topic) {
 266                         /* "CHANINFO <chan> +<modes>" */
 267                         return IRC_WriteStrClient(Client, "CHANINFO %s +%s",
 268                                                   Channel_Name(Chan), modes);
 269                 }
 270                 /* "CHANINFO <chan> +<modes> :<topic>" */
 271                 return IRC_WriteStrClient(Client, "CHANINFO %s +%s :%s",
 272                                           Channel_Name(Chan), modes, topic);
 273         }
 274         /* "CHANINFO <chan> +<modes> <key> <limit> :<topic>" */
 275         return IRC_WriteStrClient(Client, "CHANINFO %s +%s %s %lu :%s",
 276                                   Channel_Name(Chan), modes,
 277                                   has_k ? Channel_Key(Chan) : "*",
 278                                   has_l ? Channel_MaxUsers(Chan) : 0, topic);
 279 } /* Send_CHANINFO */
 280
 281 #endif /* IRCPLUS */
 282
 283
 284 /**
 285  * Handle ENDOFMOTD (376) numeric and login remote server.
 286  * The peer is either an IRC server (no IRC+ protocol), or we got the
 287  * ENDOFMOTD numeric from an IRC+ server. We have to register the new server.
 288  */
 289 GLOBAL bool
 290 IRC_Num_ENDOFMOTD(CLIENT * Client, UNUSED REQUEST * Req)
 291 {
 292         int max_hops, i;
 293         CLIENT *c;
 294         CHANNEL *chan;
 295
 296         Client_SetType(Client, CLIENT_SERVER);
 297
 298         Log(LOG_NOTICE | LOG_snotice,
 299             "Server \"%s\" registered (connection %d, 1 hop - direct link).",
 300             Client_ID(Client), Client_Conn(Client));
 301
 302         /* Get highest hop count */
 303         max_hops = 0;
 304         c = Client_First();
 305         while (c) {
 306                 if (Client_Hops(c) > max_hops)
 307                         max_hops = Client_Hops(c);
 308                 c = Client_Next(c);
 309         }
 310
 311         /* Inform the new server about all other servers, and announce the
 312          * new server to all the already registered ones. Important: we have
 313          * to do this "in order" and can't introduce servers of which the
 314          * "toplevel server" isn't known already. */
 315         for (i = 0; i < (max_hops + 1); i++) {
 316                 for (c = Client_First(); c != NULL; c = Client_Next(c)) {
 317                         if (Client_Type(c) != CLIENT_SERVER)
 318                                 continue;       /* not a server */
 319                         if (Client_Hops(c) != i)
 320                                 continue;       /* not actual "nesting level" */
 321                         if (c == Client || c == Client_ThisServer())
 322                                 continue;       /* that's us or the peer! */
 323
 324                         if (!Announce_Server(Client, c))
 325                                 return DISCONNECTED;
 326                 }
 327         }
 328
 329         /* Announce all the users to the new server */
 330         c = Client_First();
 331         while (c) {
 332                 if (Client_Type(c) == CLIENT_USER ||
 333                     Client_Type(c) == CLIENT_SERVICE) {
 334                         if (!Announce_User(Client, c))
 335                                 return DISCONNECTED;
 336                 }
 337                 c = Client_Next(c);
 338         }
 339
 340         /* Announce all channels to the new server */
 341         chan = Channel_First();
 342         while (chan) {
 343                 if (Channel_IsLocal(chan)) {
 344                         chan = Channel_Next(chan);
 345                         continue;
 346                 }
 347 #ifdef IRCPLUS
 348                 /* Send CHANINFO if the peer supports it */
 349                 if (strchr(Client_Flags(Client), 'C')) {
 350                         if (!Send_CHANINFO(Client, chan))
 351                                 return DISCONNECTED;
 352                 }
 353 #endif
 354
 355                 if (!Announce_Channel(Client, chan))
 356                         return DISCONNECTED;
 357
 358                 /* Get next channel ... */
 359                 chan = Channel_Next(chan);
 360         }
 361
 362 #ifdef IRCPLUS
 363         if (strchr(Client_Flags(Client), 'L')) {
 364                 LogDebug("Synchronizing INVITE- and BAN-lists ...");
 365                 if (!Synchronize_Lists(Client))
 366                         return DISCONNECTED;
 367         }
 368 #endif
 369
 370         return CONNECTED;
 371 } /* IRC_Num_ENDOFMOTD */
 372
 373
 374 /**
 375  * Handle ISUPPORT (005) numeric.
 376  */
 377 GLOBAL bool
 378 IRC_Num_ISUPPORT(CLIENT * Client, REQUEST * Req)
 379 {
 380         int i;
 381         char *key, *value;
 382
 383         for (i = 1; i < Req->argc - 1; i++) {
 384                 key = Req->argv[i];
 385                 value = strchr(key, '=');
 386                 if (value)
 387                         *value++ = '\0';
 388                 else
 389                         value = "";
 390
 391                 if (strcmp("NICKLEN", key) == 0) {
 392                         if ((unsigned int)atol(value) == Conf_MaxNickLength - 1)
 393                                 continue;
 394
 395                         /* Nick name length settings are different! */
 396                         Log(LOG_ERR,
 397                             "Peer uses incompatible nick name length (%d/%d)! Disconnecting ...",
 398                             Conf_MaxNickLength - 1, atoi(value));
 399                         Conn_Close(Client_Conn(Client),
 400                                    "Incompatible nick name length",
 401                                    NULL, false);
 402                         return DISCONNECTED;
 403                 }
 404         }
 405
 406         return CONNECTED;
 407 } /* IRC_Num_ISUPPORT */
 408
 409
 410 /* -eof- */