src/ngircd/numeric.c

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