ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/ircd-hybrid/trunk/src/server.c
(Generate patch)

Comparing:
ircd-hybrid/trunk/src/s_serv.c (file contents), Revision 2691 by michael, Tue Dec 17 18:55:59 2013 UTC vs.
ircd-hybrid/trunk/src/server.c (file contents), Revision 7668 by michael, Wed Jul 20 17:09:49 2016 UTC

# Line 1 | Line 1
1   /*
2 < *  ircd-hybrid: an advanced Internet Relay Chat Daemon(ircd).
3 < *  s_serv.c: Server related functions.
2 > *  ircd-hybrid: an advanced, lightweight Internet Relay Chat Daemon (ircd)
3   *
4 < *  Copyright (C) 2005 by the past and present ircd coders, and others.
4 > *  Copyright (c) 1997-2016 ircd-hybrid development team
5   *
6   *  This program is free software; you can redistribute it and/or modify
7   *  it under the terms of the GNU General Public License as published by
# Line 16 | Line 15
15   *
16   *  You should have received a copy of the GNU General Public License
17   *  along with this program; if not, write to the Free Software
18 < *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307
18 > *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301
19   *  USA
20 < *
21 < *  $Id$
20 > */
21 >
22 > /*! \file s_serv.c
23 > * \brief Server related functions.
24 > * \version $Id$
25   */
26  
27   #include "stdinc.h"
26 #ifdef HAVE_LIBCRYPTO
27 #include <openssl/rsa.h>
28 #include "rsa.h"
29 #endif
28   #include "list.h"
31 #include "channel.h"
32 #include "channel_mode.h"
29   #include "client.h"
34 #include "dbuf.h"
30   #include "event.h"
36 #include "fdlist.h"
31   #include "hash.h"
32   #include "irc_string.h"
33   #include "ircd.h"
34   #include "ircd_defs.h"
35   #include "s_bsd.h"
42 #include "numeric.h"
36   #include "packet.h"
44 #include "irc_res.h"
37   #include "conf.h"
38 < #include "s_serv.h"
38 > #include "server.h"
39   #include "log.h"
48 #include "s_misc.h"
49 #include "s_user.h"
40   #include "send.h"
41   #include "memory.h"
52 #include "channel.h" /* chcap_usage_counts stuff...*/
42   #include "parse.h"
43  
55 #define MIN_CONN_FREQ 300
44  
45   dlink_list flatten_links;
46 < static dlink_list cap_list = { NULL, NULL, 0 };
47 < static void server_burst(struct Client *);
60 < static void burst_all(struct Client *);
61 < static void send_tb(struct Client *client_p, struct Channel *chptr);
46 > static dlink_list server_capabilities_list;
47 > static void serv_connect_callback(fde_t *, int, void *);
48  
63 static CNCB serv_connect_callback;
64
65 static void burst_members(struct Client *, struct Channel *);
49  
50   /*
51   * write_links_file
# Line 73 | Line 56 | static void burst_members(struct Client
56   *                but in no particular order.
57   */
58   void
59 < write_links_file(void *notused)
59 > write_links_file(void *unused)
60   {
61    FILE *file = NULL;
62 <  dlink_node *ptr = NULL, *ptr_next = NULL;
63 <  char buff[IRCD_BUFSIZE] = { '\0' };
62 >  dlink_node *node = NULL, *node_next = NULL;
63 >  char buff[IRCD_BUFSIZE] = "";
64  
65 <  if ((file = fopen(LIPATH, "w")) == NULL)
65 >  if (EmptyString(ConfigServerHide.flatten_links_file))
66      return;
67  
68 <  DLINK_FOREACH_SAFE(ptr, ptr_next, flatten_links.head)
68 >  if ((file = fopen(ConfigServerHide.flatten_links_file, "w")) == NULL)
69    {
70 <    dlinkDelete(ptr, &flatten_links);
71 <    MyFree(ptr->data);
72 <    free_dlink_node(ptr);
70 >    ilog(LOG_TYPE_IRCD, "Couldn't open \"%s\": %s", ConfigServerHide.flatten_links_file,
71 >         strerror(errno));
72 >    return;
73    }
74  
75 <  DLINK_FOREACH(ptr, global_serv_list.head)
75 >  DLINK_FOREACH_SAFE(node, node_next, flatten_links.head)
76    {
77 <    const struct Client *target_p = ptr->data;
77 >    dlinkDelete(node, &flatten_links);
78 >    xfree(node->data);
79 >    free_dlink_node(node);
80 >  }
81 >
82 >  DLINK_FOREACH(node, global_server_list.head)
83 >  {
84 >    const struct Client *target_p = node->data;
85  
86      /*
87       * Skip hidden servers, aswell as ourselves, since we already send
# Line 126 | Line 116 | read_links_file(void)
116   {
117    FILE *file = NULL;
118    char *p = NULL;
119 <  char buff[IRCD_BUFSIZE] = { '\0' };
119 >  char buff[IRCD_BUFSIZE] = "";
120  
121 <  if ((file = fopen(LIPATH, "r")) == NULL)
121 >  if (EmptyString(ConfigServerHide.flatten_links_file))
122      return;
123  
124 +  if ((file = fopen(ConfigServerHide.flatten_links_file, "r")) == NULL)
125 +  {
126 +    ilog(LOG_TYPE_IRCD, "Couldn't open \"%s\": %s", ConfigServerHide.flatten_links_file,
127 +         strerror(errno));
128 +    return;
129 +  }
130 +
131    while (fgets(buff, sizeof(buff), file))
132    {
133 <    if ((p = strchr(buff, '\n')) != NULL)
133 >    if ((p = strchr(buff, '\n')))
134        *p = '\0';
135  
136      dlinkAddTail(xstrdup(buff), make_dlink_node(), &flatten_links);
# Line 162 | Line 159 | read_links_file(void)
159   *      returns: (see #defines)
160   */
161   int
162 < hunt_server(struct Client *client_p, struct Client *source_p, const char *command,
162 > hunt_server(struct Client *source_p, const char *command,
163              const int server, const int parc, char *parv[])
164   {
165    struct Client *target_p = NULL;
166 <  struct Client *target_tmp = NULL;
170 <  dlink_node *ptr;
171 <  int wilds;
166 >  dlink_node *node = NULL;
167  
168    /* Assume it's me, if no server */
169    if (parc <= server || EmptyString(parv[server]))
170      return HUNTED_ISME;
171  
172 <  if (!strcmp(parv[server], me.id) || !match(parv[server], me.name))
173 <    return HUNTED_ISME;
172 >  if ((target_p = find_person(source_p, parv[server])) == NULL)
173 >    target_p = hash_find_server(parv[server]);
174  
175 <  /* These are to pickup matches that would cause the following
175 >  /*
176 >   * These are to pickup matches that would cause the following
177     * message to go in the wrong direction while doing quick fast
178     * non-matching lookups.
179     */
184  if (MyClient(source_p))
185    target_p = hash_find_client(parv[server]);
186  else
187    target_p = find_person(client_p, parv[server]);
188
180    if (target_p)
181      if (target_p->from == source_p->from && !MyConnect(target_p))
182        target_p = NULL;
183  
184 <  if (target_p == NULL && (target_p = hash_find_server(parv[server])))
194 <    if (target_p->from == source_p->from && !MyConnect(target_p))
195 <      target_p = NULL;
196 <
197 <  wilds = has_wildcards(parv[server]);
198 <
199 <  /* Again, if there are no wild cards involved in the server
200 <   * name, use the hash lookup
201 <   */
202 <  if (target_p == NULL)
184 >  if (!target_p && has_wildcards(parv[server]))
185    {
186 <    if (!wilds)
186 >    DLINK_FOREACH(node, global_server_list.head)
187      {
188 <      if (!(target_p = hash_find_server(parv[server])))
188 >      struct Client *tmp = node->data;
189 >
190 >      assert(IsMe(tmp) || IsServer(tmp));
191 >      if (!match(parv[server], tmp->name))
192        {
193 <        sendto_one(source_p, form_str(ERR_NOSUCHSERVER),
194 <                   me.name, source_p->name, parv[server]);
195 <        return HUNTED_NOSUCH;
193 >        if (tmp->from == source_p->from && !MyConnect(tmp))
194 >          continue;
195 >
196 >        target_p = node->data;
197 >        break;
198        }
199      }
200 <    else
200 >
201 >    if (!target_p)
202      {
203 <      DLINK_FOREACH(ptr, global_client_list.head)
203 >      DLINK_FOREACH(node, global_client_list.head)
204        {
205 <        target_tmp = ptr->data;
205 >        struct Client *tmp = node->data;
206  
207 <        if (!match(parv[server], target_tmp->name))
207 >        assert(IsMe(tmp) || IsServer(tmp) || IsClient(tmp));
208 >        if (!match(parv[server], tmp->name))
209          {
210 <          if (target_tmp->from == source_p->from && !MyConnect(target_tmp))
210 >          if (tmp->from == source_p->from && !MyConnect(tmp))
211              continue;
223          target_p = ptr->data;
212  
213 <          if (IsRegistered(target_p) && (target_p != client_p))
214 <            break;
213 >          target_p = node->data;
214 >          break;
215          }
216        }
217      }
218    }
219  
220 <  if (target_p != NULL)
220 >  if (target_p)
221    {
222 <    if(!IsRegistered(target_p))
235 <    {
236 <      sendto_one(source_p, form_str(ERR_NOSUCHSERVER),
237 <                 me.name, source_p->name, parv[server]);
238 <      return HUNTED_NOSUCH;
239 <    }
240 <
222 >    assert(IsMe(target_p) || IsServer(target_p) || IsClient(target_p));
223      if (IsMe(target_p) || MyClient(target_p))
224        return HUNTED_ISME;
225  
226 <    if (match(target_p->name, parv[server]))
227 <      parv[server] = target_p->name;
246 <
247 <    /* This is a little kludgy but should work... */
248 <    if (IsClient(source_p) &&
249 <        ((MyConnect(target_p) && IsCapable(target_p, CAP_TS6)) ||
250 <         (!MyConnect(target_p) && IsCapable(target_p->from, CAP_TS6))))
251 <      parv[0] = ID(source_p);
252 <
253 <    sendto_one(target_p, command, parv[0],
226 >    parv[server] = target_p->id;
227 >    sendto_one(target_p, command, source_p->id,
228                 parv[1], parv[2], parv[3], parv[4],
229                 parv[5], parv[6], parv[7], parv[8]);
230      return HUNTED_PASS;
231    }
232  
233 <  sendto_one(source_p, form_str(ERR_NOSUCHSERVER),
260 <             me.name, source_p->name, parv[server]);
233 >  sendto_one_numeric(source_p, &me, ERR_NOSUCHSERVER, parv[server]);
234    return HUNTED_NOSUCH;
235   }
236  
# Line 274 | Line 247 | hunt_server(struct Client *client_p, str
247   void
248   try_connections(void *unused)
249   {
250 <  dlink_node *ptr = NULL;
278 <  struct MaskItem *conf;
279 <  int confrq;
250 >  dlink_node *node = NULL;
251  
281  /* TODO: change this to set active flag to 0 when added to event! --Habeeb */
252    if (GlobalSetOptions.autoconn == 0)
253      return;
254  
255 <  DLINK_FOREACH(ptr, server_items.head)
255 >  DLINK_FOREACH(node, connect_items.head)
256    {
257 <    conf = ptr->data;
257 >    struct MaskItem *conf = node->data;
258  
259      assert(conf->type == CONF_SERVER);
260  
261 <    /* Also when already connecting! (update holdtimes) --SRB
262 <     */
293 <    if (!conf->port ||!IsConfAllowAutoConn(conf))
261 >    /* Also when already connecting! (update holdtimes) --SRB */
262 >    if (!conf->port || !IsConfAllowAutoConn(conf))
263        continue;
264  
265 <
266 <    /* Skip this entry if the use of it is still on hold until
265 >    /*
266 >     * Skip this entry if the use of it is still on hold until
267       * future. Otherwise handle this entry (and set it on hold
268       * until next time). Will reset only hold times, if already
269       * made one successfull connection... [this algorithm is
# Line 303 | Line 272 | try_connections(void *unused)
272      if (conf->until > CurrentTime)
273        continue;
274  
275 <    if (conf->class == NULL)
307 <      confrq = DEFAULT_CONNECTFREQUENCY;
308 <    else
309 <    {
310 <      confrq = conf->class->con_freq;
311 <      if (confrq < MIN_CONN_FREQ)
312 <        confrq = MIN_CONN_FREQ;
313 <    }
275 >    assert(conf->class);
276  
277 <    conf->until = CurrentTime + confrq;
277 >    conf->until = CurrentTime + conf->class->con_freq;
278  
279 <    /* Found a CONNECT config with port specified, scan clients
279 >    /*
280 >     * Found a CONNECT config with port specified, scan clients
281       * and see if this server is already connected?
282       */
283 <    if (hash_find_server(conf->name) != NULL)
283 >    if (hash_find_server(conf->name))
284        continue;
285  
286      if (conf->class->ref_count < conf->class->max_total)
287      {
288 <      /* Go to the end of the list, if not already last */
289 <      if (ptr->next != NULL)
288 >      /* Move this entry to the end of the list, if not already last */
289 >      if (node->next)
290        {
291 <        dlinkDelete(ptr, &server_items);
292 <        dlinkAddTail(conf, &conf->node, &server_items);
291 >        dlinkDelete(node, &connect_items);
292 >        dlinkAddTail(conf, &conf->node, &connect_items);
293        }
294  
295        if (find_servconn_in_progress(conf->name))
296          return;
297  
298 <      /* We used to only print this if serv_connect() actually
298 >      /*
299 >       * We used to only print this if serv_connect() actually
300         * succeeded, but since comm_tcp_connect() can call the callback
301         * immediately if there is an error, we were getting error messages
302         * in the wrong order. SO, we just print out the activated line,
# Line 341 | Line 305 | try_connections(void *unused)
305         *   -- adrian
306         */
307        if (ConfigServerHide.hide_server_ips)
308 <        sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
308 >        sendto_realops_flags(UMODE_SERVNOTICE, L_ALL, SEND_NOTICE,
309                               "Connection to %s activated.",
310                               conf->name);
311        else
312 <        sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
312 >        sendto_realops_flags(UMODE_SERVNOTICE, L_ALL, SEND_NOTICE,
313                               "Connection to %s[%s] activated.",
314                               conf->name, conf->host);
315  
# Line 359 | Line 323 | try_connections(void *unused)
323   int
324   valid_servname(const char *name)
325   {
326 <  unsigned int length = 0;
363 <  unsigned int dots   = 0;
326 >  unsigned int dots = 0;
327    const char *p = name;
328  
329    for (; *p; ++p)
# Line 368 | Line 331 | valid_servname(const char *name)
331      if (!IsServChar(*p))
332        return 0;
333  
371    ++length;
372
334      if (*p == '.')
335        ++dots;
336    }
337  
338 <  return dots != 0 && length <= HOSTLEN;
338 >  return dots && (p - name) <= HOSTLEN;
339   }
340  
341   int
342   check_server(const char *name, struct Client *client_p)
343   {
344 <  dlink_node *ptr;
384 <  struct MaskItem *conf        = NULL;
344 >  dlink_node *node = NULL;
345    struct MaskItem *server_conf = NULL;
346    int error = -1;
347  
348 <  assert(client_p != NULL);
348 >  assert(client_p);
349  
350 <  /* loop through looking for all possible connect items that might work */
351 <  DLINK_FOREACH(ptr, server_items.head)
350 >  /* Loop through looking for all possible connect items that might work */
351 >  DLINK_FOREACH(node, connect_items.head)
352    {
353 <    conf = ptr->data;
353 >    struct MaskItem *conf = node->data;
354  
355 <    if (match(name, conf->name))
355 >    if (irccmp(name, conf->name))
356        continue;
357  
358      error = -3;
359  
360 <    /* XXX: Fix me for IPv6                    */
361 <    /* XXX sockhost is the IPv4 ip as a string */
402 <    if (!match(conf->host, client_p->host) ||
403 <        !match(conf->host, client_p->sockhost))
360 >    if (!irccmp(conf->host, client_p->host) ||
361 >        !irccmp(conf->host, client_p->sockhost))
362      {
363        error = -2;
364  
365 <      if (!match_conf_password(client_p->localClient->passwd, conf))
365 >      if (!match_conf_password(client_p->connection->password, conf))
366          return -2;
367  
368        if (!EmptyString(conf->certfp))
# Line 420 | Line 378 | check_server(const char *name, struct Cl
378  
379    attach_conf(client_p, server_conf);
380  
381 <
424 <  if (server_conf != NULL)
381 >  switch (server_conf->aftype)
382    {
383 <    struct sockaddr_in *v4;
427 < #ifdef IPV6
428 <    struct sockaddr_in6 *v6;
429 < #endif
430 <    switch (server_conf->aftype)
383 >    case AF_INET6:
384      {
385 < #ifdef IPV6
433 <      case AF_INET6:
434 <        v6 = (struct sockaddr_in6 *)&server_conf->addr;
385 >      const struct sockaddr_in6 *v6 = (struct sockaddr_in6 *)&server_conf->addr;
386  
387 <        if (IN6_IS_ADDR_UNSPECIFIED(&v6->sin6_addr))
388 <          memcpy(&server_conf->addr, &client_p->localClient->ip, sizeof(struct irc_ssaddr));
389 <        break;
390 < #endif
391 <      case AF_INET:
392 <        v4 = (struct sockaddr_in *)&server_conf->addr;
387 >      if (IN6_IS_ADDR_UNSPECIFIED(&v6->sin6_addr))
388 >        memcpy(&server_conf->addr, &client_p->connection->ip, sizeof(struct irc_ssaddr));
389 >      break;
390 >    }
391 >    case AF_INET:
392 >    {
393 >      const struct sockaddr_in *v4 = (struct sockaddr_in *)&server_conf->addr;
394  
395 <        if (v4->sin_addr.s_addr == INADDR_NONE)
396 <          memcpy(&server_conf->addr, &client_p->localClient->ip, sizeof(struct irc_ssaddr));
397 <        break;
395 >      if (v4->sin_addr.s_addr == INADDR_NONE)
396 >        memcpy(&server_conf->addr, &client_p->connection->ip, sizeof(struct irc_ssaddr));
397 >      break;
398      }
399    }
400  
401    return 0;
402   }
403  
404 + /* server_capab_init()
405 + *
406 + * inputs       - none
407 + * output       - none
408 + */
409 + void
410 + server_capab_init(void)
411 + {
412 +  add_capability("QS", CAPAB_QS);
413 +  add_capability("EOB", CAPAB_EOB);
414 +  add_capability("CLUSTER", CAPAB_CLUSTER);
415 +  add_capability("SVS", CAPAB_SVS);
416 +  add_capability("CHW", CAPAB_CHW);
417 +  add_capability("HOPS", CAPAB_HOPS);
418 + }
419 +
420   /* add_capability()
421   *
422   * inputs       - string name of CAPAB
# Line 459 | Line 427 | check_server(const char *name, struct Cl
427   *                modules to dynamically add or subtract their capability.
428   */
429   void
430 < add_capability(const char *capab_name, int cap_flag, int add_to_default)
430 > add_capability(const char *name, unsigned int flag)
431   {
432 <  struct Capability *cap = MyMalloc(sizeof(*cap));
465 <
466 <  cap->name = xstrdup(capab_name);
467 <  cap->cap = cap_flag;
468 <  dlinkAdd(cap, &cap->node, &cap_list);
432 >  struct Capability *cap = xcalloc(sizeof(*cap));
433  
434 <  if (add_to_default)
435 <    default_server_capabs |= cap_flag;
434 >  cap->name = xstrdup(name);
435 >  cap->cap = flag;
436 >  dlinkAdd(cap, &cap->node, &server_capabilities_list);
437   }
438  
439   /* delete_capability()
# Line 477 | Line 442 | add_capability(const char *capab_name, i
442   * output       - NONE
443   * side effects - delete given capability from ones known.
444   */
445 < int
446 < delete_capability(const char *capab_name)
445 > void
446 > delete_capability(const char *name)
447   {
448 <  dlink_node *ptr;
484 <  dlink_node *next_ptr;
485 <  struct Capability *cap;
448 >  dlink_node *node = NULL, *node_next = NULL;
449  
450 <  DLINK_FOREACH_SAFE(ptr, next_ptr, cap_list.head)
450 >  DLINK_FOREACH_SAFE(node, node_next, server_capabilities_list.head)
451    {
452 <    cap = ptr->data;
452 >    struct Capability *cap = node->data;
453  
454 <    if (cap->cap != 0)
454 >    if (!irccmp(cap->name, name))
455      {
456 <      if (irccmp(cap->name, capab_name) == 0)
457 <      {
458 <        default_server_capabs &= ~(cap->cap);
496 <        dlinkDelete(ptr, &cap_list);
497 <        MyFree(cap->name);
498 <        MyFree(cap);
499 <      }
456 >      dlinkDelete(node, &server_capabilities_list);
457 >      xfree(cap->name);
458 >      xfree(cap);
459      }
460    }
502
503  return 0;
461   }
462  
463   /*
# Line 511 | Line 468 | delete_capability(const char *capab_name
468   * side effects - none
469   */
470   unsigned int
471 < find_capability(const char *capab)
471 > find_capability(const char *name)
472   {
473 <  const dlink_node *ptr = NULL;
473 >  const dlink_node *node = NULL;
474  
475 <  DLINK_FOREACH(ptr, cap_list.head)
475 >  DLINK_FOREACH(node, server_capabilities_list.head)
476    {
477 <    const struct Capability *cap = ptr->data;
477 >    const struct Capability *cap = node->data;
478  
479 <    if (cap->cap && !irccmp(cap->name, capab))
479 >    if (!irccmp(cap->name, name))
480        return cap->cap;
481    }
482  
483    return 0;
484   }
485  
529 /* send_capabilities()
530 *
531 * inputs       - Client pointer to send to
532 *              - int flag of capabilities that this server can send
533 * output       - NONE
534 * side effects - send the CAPAB line to a server  -orabidoo
535 *
536 */
537 void
538 send_capabilities(struct Client *client_p, int cap_can_send)
539 {
540  struct Capability *cap=NULL;
541  char msgbuf[IRCD_BUFSIZE];
542  char *t;
543  int tl;
544  dlink_node *ptr;
545
546  t = msgbuf;
547
548  DLINK_FOREACH(ptr, cap_list.head)
549  {
550    cap = ptr->data;
551
552    if (cap->cap & (cap_can_send|default_server_capabs))
553    {
554      tl = sprintf(t, "%s ", cap->name);
555      t += tl;
556    }
557  }
558
559  *(t - 1) = '\0';
560  sendto_one(client_p, "CAPAB :%s", msgbuf);
561 }
562
563 /* sendnick_TS()
564 *
565 * inputs       - client (server) to send nick towards
566 *          - client to send nick for
567 * output       - NONE
568 * side effects - NICK message is sent towards given client_p
569 */
570 void
571 sendnick_TS(struct Client *client_p, struct Client *target_p)
572 {
573  char ubuf[IRCD_BUFSIZE];
574
575  if (!IsClient(target_p))
576    return;
577
578  send_umode(NULL, target_p, 0, SEND_UMODES, ubuf);
579
580  if (ubuf[0] == '\0')
581  {
582    ubuf[0] = '+';
583    ubuf[1] = '\0';
584  }
585
586  if (IsCapable(client_p, CAP_SVS))
587  {
588    if (HasID(target_p) && IsCapable(client_p, CAP_TS6))
589      sendto_one(client_p, ":%s UID %s %d %lu %s %s %s %s %s %s :%s",
590                 target_p->servptr->id,
591                 target_p->name, target_p->hopcount + 1,
592                 (unsigned long) target_p->tsinfo,
593                 ubuf, target_p->username, target_p->host,
594                 (MyClient(target_p) && IsIPSpoof(target_p)) ?
595                 "0" : target_p->sockhost, target_p->id,
596                 target_p->svid, target_p->info);
597    else
598      sendto_one(client_p, "NICK %s %d %lu %s %s %s %s %s :%s",
599                 target_p->name, target_p->hopcount + 1,
600                 (unsigned long) target_p->tsinfo,
601                 ubuf, target_p->username, target_p->host,
602                 target_p->servptr->name, target_p->svid,
603                 target_p->info);
604  }
605  else
606  {
607    if (HasID(target_p) && IsCapable(client_p, CAP_TS6))
608      sendto_one(client_p, ":%s UID %s %d %lu %s %s %s %s %s :%s",
609                 target_p->servptr->id,
610                 target_p->name, target_p->hopcount + 1,
611                 (unsigned long) target_p->tsinfo,
612                 ubuf, target_p->username, target_p->host,
613                 (MyClient(target_p) && IsIPSpoof(target_p)) ?
614                 "0" : target_p->sockhost, target_p->id, target_p->info);
615    else
616      sendto_one(client_p, "NICK %s %d %lu %s %s %s %s :%s",
617                 target_p->name, target_p->hopcount + 1,
618                 (unsigned long) target_p->tsinfo,
619                 ubuf, target_p->username, target_p->host,
620                 target_p->servptr->name, target_p->info);
621  }
622
623  if (!EmptyString(target_p->certfp))
624    sendto_one(client_p, ":%s CERTFP %s",
625               ID_or_name(target_p, client_p), target_p->certfp);
626
627  if (target_p->away[0])
628    sendto_one(client_p, ":%s AWAY :%s", ID_or_name(target_p, client_p),
629               target_p->away);
630
631 }
632
486   /*
487   * show_capabilities - show current server capabilities
488   *
# Line 638 | Line 491 | sendnick_TS(struct Client *client_p, str
491   * side effects - build up string representing capabilities of server listed
492   */
493   const char *
494 < show_capabilities(const struct Client *target_p)
494 > get_capabilities(const struct Client *client_p)
495   {
496 <  static char msgbuf[IRCD_BUFSIZE] = "";
497 <  const dlink_node *ptr = NULL;
496 >  static char buf[IRCD_BUFSIZE] = "";
497 >  const dlink_node *node = NULL;
498  
499 <  strlcpy(msgbuf, "TS", sizeof(msgbuf));
499 >  buf[0] = '\0';
500  
501 <  DLINK_FOREACH(ptr, cap_list.head)
501 >  DLINK_FOREACH(node, server_capabilities_list.head)
502    {
503 <    const struct Capability *cap = ptr->data;
503 >    const struct Capability *cap = node->data;
504  
505 <    if (!IsCapable(target_p, cap->cap))
505 >    if (client_p && !IsCapable(client_p, cap->cap))
506        continue;
507  
508 <    strlcat(msgbuf,       " ", sizeof(msgbuf));
509 <    strlcat(msgbuf, cap->name, sizeof(msgbuf));
508 >    strlcat(buf, cap->name, sizeof(buf));
509 >
510 >    if (node->next)
511 >      strlcat(buf, " ", sizeof(buf));
512    }
513  
514 <  return msgbuf;
514 >  return buf;
515   }
516  
517   /* make_server()
# Line 670 | Line 525 | struct Server *
525   make_server(struct Client *client_p)
526   {
527    if (client_p->serv == NULL)
528 <    client_p->serv = MyMalloc(sizeof(struct Server));
528 >    client_p->serv = xcalloc(sizeof(struct Server));
529  
530    return client_p->serv;
531   }
532  
678 /* server_estab()
679 *
680 * inputs       - pointer to a struct Client
681 * output       -
682 * side effects -
683 */
684 void
685 server_estab(struct Client *client_p)
686 {
687  struct Client *target_p;
688  struct MaskItem *conf = NULL;
689  char *host;
690  const char *inpath;
691  static char inpath_ip[HOSTLEN * 2 + USERLEN + 6];
692  dlink_node *ptr;
693 #ifdef HAVE_LIBCRYPTO
694  const COMP_METHOD *compression = NULL, *expansion = NULL;
695 #endif
696
697  assert(client_p != NULL);
698
699  strlcpy(inpath_ip, get_client_name(client_p, SHOW_IP), sizeof(inpath_ip));
700
701  inpath = get_client_name(client_p, MASK_IP); /* "refresh" inpath with host */
702  host   = client_p->name;
703
704  if ((conf = find_conf_name(&client_p->localClient->confs, host, CONF_SERVER))
705      == NULL)
706  {
707    /* This shouldn't happen, better tell the ops... -A1kmm */
708    sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
709                         "Warning: Lost connect{} block "
710                         "for server %s(this shouldn't happen)!", host);
711    exit_client(client_p, &me, "Lost connect{} block!");
712    return;
713  }
714
715  MyFree(client_p->localClient->passwd);
716  client_p->localClient->passwd = NULL;
717
718  /* Its got identd, since its a server */
719  SetGotId(client_p);
720
721  /* If there is something in the serv_list, it might be this
722   * connecting server..
723   */
724  if (!ServerInfo.hub && serv_list.head)
725  {
726    if (client_p != serv_list.head->data || serv_list.head->next)
727    {
728      ++ServerStats.is_ref;
729      sendto_one(client_p, "ERROR :I'm a leaf not a hub");
730      exit_client(client_p, &me, "I'm a leaf");
731      return;
732    }
733  }
734
735  if (IsUnknown(client_p))
736  {
737    sendto_one(client_p, "PASS %s TS %d %s", conf->spasswd, TS_CURRENT, me.id);
738
739    send_capabilities(client_p, 0);
740
741    sendto_one(client_p, "SERVER %s 1 :%s%s",
742               me.name, ConfigServerHide.hidden ? "(H) " : "", me.info);
743  }
744
745  sendto_one(client_p, "SVINFO %d %d 0 :%lu", TS_CURRENT, TS_MIN,
746             (unsigned long)CurrentTime);
747
748  /* assumption here is if they passed the correct TS version, they also passed an SID */
749  if (IsCapable(client_p, CAP_TS6))
750    hash_add_id(client_p);
751
752  /* XXX Does this ever happen? I don't think so -db */
753  detach_conf(client_p, CONF_OPER);
754
755  /* *WARNING*
756  **    In the following code in place of plain server's
757  **    name we send what is returned by get_client_name
758  **    which may add the "sockhost" after the name. It's
759  **    *very* *important* that there is a SPACE between
760  **    the name and sockhost (if present). The receiving
761  **    server will start the information field from this
762  **    first blank and thus puts the sockhost into info.
763  **    ...a bit tricky, but you have been warned, besides
764  **    code is more neat this way...  --msa
765  */
766  client_p->servptr = &me;
767
768  if (IsClosing(client_p))
769    return;
770
771  SetServer(client_p);
772
773  /* Update the capability combination usage counts. -A1kmm */
774  set_chcap_usage_counts(client_p);
775
776  /* Some day, all these lists will be consolidated *sigh* */
777  dlinkAdd(client_p, &client_p->lnode, &me.serv->server_list);
778
779  assert(dlinkFind(&unknown_list, client_p));
780
781  dlink_move_node(&client_p->localClient->lclient_node,
782                  &unknown_list, &serv_list);
783
784  Count.myserver++;
785
786  dlinkAdd(client_p, make_dlink_node(), &global_serv_list);
787  hash_add_client(client_p);
788
789  /* doesnt duplicate client_p->serv if allocated this struct already */
790  make_server(client_p);
791
792  /* fixing eob timings.. -gnp */
793  client_p->localClient->firsttime = CurrentTime;
794
795  if (find_matching_name_conf(CONF_SERVICE, client_p->name, NULL, NULL, 0))
796    AddFlag(client_p, FLAGS_SERVICE);
797
798  /* Show the real host/IP to admins */
799 #ifdef HAVE_LIBCRYPTO
800  if (client_p->localClient->fd.ssl)
801  {
802    compression = SSL_get_current_compression(client_p->localClient->fd.ssl);
803    expansion   = SSL_get_current_expansion(client_p->localClient->fd.ssl);
804
805    sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
806                         "Link with %s established: [SSL: %s, Compression/Expansion method: %s/%s] (Capabilities: %s)",
807                         inpath_ip, ssl_get_cipher(client_p->localClient->fd.ssl),
808                         compression ? SSL_COMP_get_name(compression) : "NONE",
809                         expansion ? SSL_COMP_get_name(expansion) : "NONE",
810                         show_capabilities(client_p));
811    /* Now show the masked hostname/IP to opers */
812    sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
813                         "Link with %s established: [SSL: %s, Compression/Expansion method: %s/%s] (Capabilities: %s)",
814                         inpath, ssl_get_cipher(client_p->localClient->fd.ssl),
815                         compression ? SSL_COMP_get_name(compression) : "NONE",
816                         expansion ? SSL_COMP_get_name(expansion) : "NONE",
817                         show_capabilities(client_p));
818    ilog(LOG_TYPE_IRCD, "Link with %s established: [SSL: %s, Compression/Expansion method: %s/%s] (Capabilities: %s)",
819         inpath_ip, ssl_get_cipher(client_p->localClient->fd.ssl),
820         compression ? SSL_COMP_get_name(compression) : "NONE",
821         expansion ? SSL_COMP_get_name(expansion) : "NONE",
822         show_capabilities(client_p));
823  }
824  else
825 #endif
826  {
827    sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
828                         "Link with %s established: (Capabilities: %s)",
829                         inpath_ip, show_capabilities(client_p));
830    /* Now show the masked hostname/IP to opers */
831    sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
832                         "Link with %s established: (Capabilities: %s)",
833                         inpath, show_capabilities(client_p));
834    ilog(LOG_TYPE_IRCD, "Link with %s established: (Capabilities: %s)",
835         inpath_ip, show_capabilities(client_p));
836  }
837
838  fd_note(&client_p->localClient->fd, "Server: %s", client_p->name);
839
840  /* Old sendto_serv_but_one() call removed because we now
841  ** need to send different names to different servers
842  ** (domain name matching) Send new server to other servers.
843  */
844  DLINK_FOREACH(ptr, serv_list.head)
845  {
846    target_p = ptr->data;
847
848    if (target_p == client_p)
849      continue;
850
851    if (IsCapable(target_p, CAP_TS6) && HasID(client_p))
852      sendto_one(target_p, ":%s SID %s 2 %s :%s%s",
853                 me.id, client_p->name, client_p->id,
854                 IsHidden(client_p) ? "(H) " : "",
855                 client_p->info);
856    else
857      sendto_one(target_p,":%s SERVER %s 2 :%s%s",
858                 me.name, client_p->name,
859                 IsHidden(client_p) ? "(H) " : "",
860                 client_p->info);
861  }
862
863  /*
864   * Pass on my client information to the new server
865   *
866   * First, pass only servers (idea is that if the link gets
867   * cancelled beacause the server was already there,
868   * there are no NICK's to be cancelled...). Of course,
869   * if cancellation occurs, all this info is sent anyway,
870   * and I guess the link dies when a read is attempted...? --msa
871   *
872   * Note: Link cancellation to occur at this point means
873   * that at least two servers from my fragment are building
874   * up connection this other fragment at the same time, it's
875   * a race condition, not the normal way of operation...
876   *
877   * ALSO NOTE: using the get_client_name for server names--
878   *    see previous *WARNING*!!! (Also, original inpath
879   *    is destroyed...)
880   */
881
882  DLINK_FOREACH_PREV(ptr, global_serv_list.tail)
883  {
884    target_p = ptr->data;
885
886    /* target_p->from == target_p for target_p == client_p */
887    if (IsMe(target_p) || target_p->from == client_p)
888      continue;
889
890    if (IsCapable(client_p, CAP_TS6))
891    {
892      if (HasID(target_p))
893        sendto_one(client_p, ":%s SID %s %d %s :%s%s",
894                   ID(target_p->servptr), target_p->name, target_p->hopcount+1,
895                   target_p->id, IsHidden(target_p) ? "(H) " : "",
896                   target_p->info);
897      else  /* introducing non-ts6 server */
898        sendto_one(client_p, ":%s SERVER %s %d :%s%s",
899                   ID(target_p->servptr), target_p->name, target_p->hopcount+1,
900                   IsHidden(target_p) ? "(H) " : "", target_p->info);
901    }
902    else
903      sendto_one(client_p, ":%s SERVER %s %d :%s%s",
904                 target_p->servptr->name, target_p->name, target_p->hopcount+1,
905                 IsHidden(target_p) ? "(H) " : "", target_p->info);
906
907    if (HasFlag(target_p, FLAGS_EOB))
908      sendto_one(client_p, ":%s EOB", ID_or_name(client_p, target_p));
909  }
910
911  server_burst(client_p);
912 }
913
914 /* server_burst()
915 *
916 * inputs       - struct Client pointer server
917 *              -
918 * output       - none
919 * side effects - send a server burst
920 * bugs         - still too long
921 */
922 static void
923 server_burst(struct Client *client_p)
924 {
925  /* Send it in the shortened format with the TS, if
926  ** it's a TS server; walk the list of channels, sending
927  ** all the nicks that haven't been sent yet for each
928  ** channel, then send the channel itself -- it's less
929  ** obvious than sending all nicks first, but on the
930  ** receiving side memory will be allocated more nicely
931  ** saving a few seconds in the handling of a split
932  ** -orabidoo
933  */
934
935  burst_all(client_p);
936
937  /* EOB stuff is now in burst_all */
938  /* Always send a PING after connect burst is done */
939  sendto_one(client_p, "PING :%s", ID_or_name(&me, client_p));
940 }
941
942 /* burst_all()
943 *
944 * inputs       - pointer to server to send burst to
945 * output       - NONE
946 * side effects - complete burst of channels/nicks is sent to client_p
947 */
948 static void
949 burst_all(struct Client *client_p)
950 {
951  dlink_node *ptr = NULL;
952
953  DLINK_FOREACH(ptr, global_channel_list.head)
954  {
955    struct Channel *chptr = ptr->data;
956
957    if (dlink_list_length(&chptr->members) != 0)
958    {
959      burst_members(client_p, chptr);
960      send_channel_modes(client_p, chptr);
961
962      if (IsCapable(client_p, CAP_TBURST))
963        send_tb(client_p, chptr);
964    }
965  }
966
967  /* also send out those that are not on any channel
968   */
969  DLINK_FOREACH(ptr, global_client_list.head)
970  {
971    struct Client *target_p = ptr->data;
972
973    if (!HasFlag(target_p, FLAGS_BURSTED) && target_p->from != client_p)
974      sendnick_TS(client_p, target_p);
975
976    DelFlag(target_p, FLAGS_BURSTED);
977  }
978
979  if (IsCapable(client_p, CAP_EOB))
980    sendto_one(client_p, ":%s EOB", ID_or_name(&me, client_p));
981 }
982
983 /*
984 * send_tb
985 *
986 * inputs       - pointer to Client
987 *              - pointer to channel
988 * output       - NONE
989 * side effects - Called on a server burst when
990 *                server is CAP_TBURST capable
991 */
992 static void
993 send_tb(struct Client *client_p, struct Channel *chptr)
994 {
995  /*
996   * We may also send an empty topic here, but only if topic_time isn't 0,
997   * i.e. if we had a topic that got unset.  This is required for syncing
998   * topics properly.
999   *
1000   * Imagine the following scenario: Our downlink introduces a channel
1001   * to us with a TS that is equal to ours, but the channel topic on
1002   * their side got unset while the servers were in splitmode, which means
1003   * their 'topic' is newer.  They simply wanted to unset it, so we have to
1004   * deal with it in a more sophisticated fashion instead of just resetting
1005   * it to their old topic they had before.  Read m_tburst.c:ms_tburst
1006   * for further information   -Michael
1007   */
1008  if (chptr->topic_time != 0)
1009    sendto_one(client_p, ":%s TBURST %lu %s %lu %s :%s",
1010               ID_or_name(&me, client_p),
1011               (unsigned long)chptr->channelts, chptr->chname,
1012               (unsigned long)chptr->topic_time,
1013               chptr->topic_info,
1014               chptr->topic);
1015 }
1016
1017 /* burst_members()
1018 *
1019 * inputs       - pointer to server to send members to
1020 *              - dlink_list pointer to membership list to send
1021 * output       - NONE
1022 * side effects -
1023 */
1024 static void
1025 burst_members(struct Client *client_p, struct Channel *chptr)
1026 {
1027  struct Client *target_p;
1028  struct Membership *ms;
1029  dlink_node *ptr;
1030
1031  DLINK_FOREACH(ptr, chptr->members.head)
1032  {
1033    ms       = ptr->data;
1034    target_p = ms->client_p;
1035
1036    if (!HasFlag(target_p, FLAGS_BURSTED))
1037    {
1038      AddFlag(target_p, FLAGS_BURSTED);
1039
1040      if (target_p->from != client_p)
1041        sendnick_TS(client_p, target_p);
1042    }
1043  }
1044 }
1045
533   /* New server connection code
534   * Based upon the stuff floating about in s_bsd.c
535   *   -- adrian
# Line 1067 | Line 554 | burst_members(struct Client *client_p, s
554   int
555   serv_connect(struct MaskItem *conf, struct Client *by)
556   {
557 <  struct Client *client_p;
558 <  char buf[HOSTIPLEN + 1];
557 >  struct Client *client_p = NULL;
558 >  char buf[HOSTIPLEN + 1] = "";
559  
560    /* conversion structs */
561    struct sockaddr_in *v4;
1075  /* Make sure conf is useful */
1076  assert(conf != NULL);
562  
563 +  /* Make sure conf is useful */
564 +  assert(conf);
565  
566 <  getnameinfo((struct sockaddr *)&conf->addr, conf->addr.ss_len,
566 >  getnameinfo((const struct sockaddr *)&conf->addr, conf->addr.ss_len,
567                buf, sizeof(buf), NULL, 0, NI_NUMERICHOST);
568    ilog(LOG_TYPE_IRCD, "Connect to %s[%s] @%s", conf->name, conf->host,
569         buf);
# Line 1084 | Line 571 | serv_connect(struct MaskItem *conf, stru
571    /* Still processing a DNS lookup? -> exit */
572    if (conf->dns_pending)
573    {
574 <    sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
574 >    sendto_realops_flags(UMODE_SERVNOTICE, L_ALL, SEND_NOTICE,
575                           "Error connecting to %s: DNS lookup for connect{} in progress.",
576                           conf->name);
577 <    return (0);
577 >    return 0;
578    }
579  
580    if (conf->dns_failed)
581    {
582 <    sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
582 >    sendto_realops_flags(UMODE_SERVNOTICE, L_ALL, SEND_NOTICE,
583                           "Error connecting to %s: DNS lookup for connect{} failed.",
584                           conf->name);
585 <    return (0);
585 >    return 0;
586    }
587  
588 <  /* Make sure this server isn't already connected
589 <   * Note: conf should ALWAYS be a valid C: line
588 >  /*
589 >   * Make sure this server isn't already connected.
590 >   * Note: conf should ALWAYS be a valid connect {} block
591     */
592 <  if ((client_p = hash_find_server(conf->name)) != NULL)
592 >  if ((client_p = hash_find_server(conf->name)))
593    {
594 <    sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
594 >    sendto_realops_flags(UMODE_SERVNOTICE, L_ADMIN, SEND_NOTICE,
595                           "Server %s already present from %s",
596                           conf->name, get_client_name(client_p, SHOW_IP));
597 <    sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
597 >    sendto_realops_flags(UMODE_SERVNOTICE, L_OPER, SEND_NOTICE,
598                           "Server %s already present from %s",
599                           conf->name, get_client_name(client_p, MASK_IP));
600      if (by && IsClient(by) && !MyClient(by))
601 <      sendto_one(by, ":%s NOTICE %s :Server %s already present from %s",
602 <                 me.name, by->name, conf->name,
1115 <                 get_client_name(client_p, MASK_IP));
601 >      sendto_one_notice(by, &me, ":Server %s already present from %s",
602 >                        conf->name, get_client_name(client_p, MASK_IP));
603      return 0;
604    }
605  
# Line 1126 | Line 613 | serv_connect(struct MaskItem *conf, stru
613    /* We already converted the ip once, so lets use it - stu */
614    strlcpy(client_p->sockhost, buf, sizeof(client_p->sockhost));
615  
616 <  /* create a socket for the server connection */
617 <  if (comm_open(&client_p->localClient->fd, conf->addr.ss.ss_family,
1131 <                SOCK_STREAM, 0, NULL) < 0)
616 >  /* Create a socket for the server connection */
617 >  if (comm_open(&client_p->connection->fd, conf->addr.ss.ss_family, SOCK_STREAM, 0, NULL) < 0)
618    {
619      /* Eek, failure to create the socket */
620 <    report_error(L_ALL, "opening stream socket to %s: %s",
621 <                 conf->name, errno);
620 >    report_error(L_ALL, "opening stream socket to %s: %s", conf->name, errno);
621 >
622      SetDead(client_p);
623 <    exit_client(client_p, &me, "Connection failed");
623 >    exit_client(client_p, "Connection failed");
624      return 0;
625    }
626  
627 <  /* servernames are always guaranteed under HOSTLEN chars */
628 <  fd_note(&client_p->localClient->fd, "Server: %s", conf->name);
627 >  /* Server names are always guaranteed under HOSTLEN chars */
628 >  fd_note(&client_p->connection->fd, "Server: %s", client_p->name);
629  
630 <  /* Attach config entries to client here rather than in
631 <   * serv_connect_callback(). This to avoid null pointer references.
630 >  /*
631 >   * Attach config entries to client here rather than in serv_connect_callback().
632 >   * This to avoid null pointer references.
633     */
634    if (!attach_connect_block(client_p, conf->name, conf->host))
635    {
636 <    sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
637 <                         "Host %s is not enabled for connecting: no connect{} block",
636 >    sendto_realops_flags(UMODE_SERVNOTICE, L_ALL, SEND_NOTICE,
637 >                         "Host %s is not enabled for connecting: no connect {} block",
638                           conf->name);
639      if (by && IsClient(by) && !MyClient(by))
640 <      sendto_one(by, ":%s NOTICE %s :Connect to host %s failed.",
641 <                 me.name, by->name, client_p->name);
640 >      sendto_one_notice(by, &me, ":Connect to host %s failed: no connect {} block", client_p->name);
641 >
642      SetDead(client_p);
643 <    exit_client(client_p, client_p, "Connection failed");
643 >    exit_client(client_p, "Connection failed");
644      return 0;
645    }
646  
647 <  /* at this point we have a connection in progress and C/N lines
648 <   * attached to the client, the socket info should be saved in the
649 <   * client and it should either be resolved or have a valid address.
647 >  /*
648 >   * At this point we have a connection in progress and a connect {} block
649 >   * attached to the client, the socket info should be saved in the client
650 >   * and it should either be resolved or have a valid address.
651     *
652     * The socket has been connected or connect is in progress.
653     */
# Line 1171 | Line 659 | serv_connect(struct MaskItem *conf, stru
659      strlcpy(client_p->serv->by, "AutoConn.", sizeof(client_p->serv->by));
660  
661    SetConnecting(client_p);
662 <  dlinkAdd(client_p, &client_p->node, &global_client_list);
1175 <  /* from def_fam */
1176 <  client_p->localClient->aftype = conf->aftype;
662 >  client_p->connection->aftype = conf->aftype;
663  
664    /* Now, initiate the connection */
665    /* XXX assume that a non 0 type means a specific bind address
# Line 1183 | Line 669 | serv_connect(struct MaskItem *conf, stru
669    {
670      case AF_INET:
671        v4 = (struct sockaddr_in*)&conf->bind;
672 <      if (v4->sin_addr.s_addr != 0)
672 >      if (v4->sin_addr.s_addr)
673        {
674          struct irc_ssaddr ipn;
675          memset(&ipn, 0, sizeof(struct irc_ssaddr));
676          ipn.ss.ss_family = AF_INET;
677          ipn.ss_port = 0;
678          memcpy(&ipn, &conf->bind, sizeof(struct irc_ssaddr));
679 <        comm_connect_tcp(&client_p->localClient->fd, conf->host, conf->port,
679 >        comm_connect_tcp(&client_p->connection->fd, conf->host, conf->port,
680                           (struct sockaddr *)&ipn, ipn.ss_len,
681                           serv_connect_callback, client_p, conf->aftype,
682                           CONNECTTIMEOUT);
683        }
684 <      else if (ServerInfo.specific_ipv4_vhost)
684 >      else if (ConfigServerInfo.specific_ipv4_vhost)
685        {
686          struct irc_ssaddr ipn;
687          memset(&ipn, 0, sizeof(struct irc_ssaddr));
688          ipn.ss.ss_family = AF_INET;
689          ipn.ss_port = 0;
690 <        memcpy(&ipn, &ServerInfo.ip, sizeof(struct irc_ssaddr));
691 <        comm_connect_tcp(&client_p->localClient->fd, conf->host, conf->port,
690 >        memcpy(&ipn, &ConfigServerInfo.ip, sizeof(struct irc_ssaddr));
691 >        comm_connect_tcp(&client_p->connection->fd, conf->host, conf->port,
692                           (struct sockaddr *)&ipn, ipn.ss_len,
693                           serv_connect_callback, client_p, conf->aftype,
694                           CONNECTTIMEOUT);
695        }
696        else
697 <        comm_connect_tcp(&client_p->localClient->fd, conf->host, conf->port,
697 >        comm_connect_tcp(&client_p->connection->fd, conf->host, conf->port,
698                           NULL, 0, serv_connect_callback, client_p, conf->aftype,
699                           CONNECTTIMEOUT);
700        break;
1215 #ifdef IPV6
701      case AF_INET6:
702        {
703          struct irc_ssaddr ipn;
# Line 1223 | Line 708 | serv_connect(struct MaskItem *conf, stru
708          v6conf = (struct sockaddr_in6 *)&conf->bind;
709          v6 = (struct sockaddr_in6 *)&ipn;
710  
711 <        if (memcmp(&v6conf->sin6_addr, &v6->sin6_addr, sizeof(struct in6_addr)) != 0)
711 >        if (memcmp(&v6conf->sin6_addr, &v6->sin6_addr, sizeof(struct in6_addr)))
712          {
713            memcpy(&ipn, &conf->bind, sizeof(struct irc_ssaddr));
714            ipn.ss.ss_family = AF_INET6;
715            ipn.ss_port = 0;
716 <          comm_connect_tcp(&client_p->localClient->fd,
716 >          comm_connect_tcp(&client_p->connection->fd,
717                             conf->host, conf->port,
718                             (struct sockaddr *)&ipn, ipn.ss_len,
719                             serv_connect_callback, client_p,
720                             conf->aftype, CONNECTTIMEOUT);
721          }
722 <        else if (ServerInfo.specific_ipv6_vhost)
722 >        else if (ConfigServerInfo.specific_ipv6_vhost)
723          {
724 <          memcpy(&ipn, &ServerInfo.ip6, sizeof(struct irc_ssaddr));
724 >          memcpy(&ipn, &ConfigServerInfo.ip6, sizeof(struct irc_ssaddr));
725            ipn.ss.ss_family = AF_INET6;
726            ipn.ss_port = 0;
727 <          comm_connect_tcp(&client_p->localClient->fd,
727 >          comm_connect_tcp(&client_p->connection->fd,
728                             conf->host, conf->port,
729                             (struct sockaddr *)&ipn, ipn.ss_len,
730                             serv_connect_callback, client_p,
731                             conf->aftype, CONNECTTIMEOUT);
732          }
733          else
734 <          comm_connect_tcp(&client_p->localClient->fd,
734 >          comm_connect_tcp(&client_p->connection->fd,
735                             conf->host, conf->port,
736                             NULL, 0, serv_connect_callback, client_p,
737                             conf->aftype, CONNECTTIMEOUT);
738        }
1254 #endif
739    }
740 +
741    return 1;
742   }
743  
1259 #ifdef HAVE_LIBCRYPTO
744   static void
745   finish_ssl_server_handshake(struct Client *client_p)
746   {
747 <  struct MaskItem *conf = NULL;
748 <
749 <  conf = find_conf_name(&client_p->localClient->confs,
750 <                        client_p->name, CONF_SERVER);
751 <  if (conf == NULL)
752 <  {
753 <    sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
1270 <                         "Lost connect{} block for %s", get_client_name(client_p, HIDE_IP));
1271 <    sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
747 >  const struct MaskItem *conf = find_conf_name(&client_p->connection->confs,
748 >                                                client_p->name, CONF_SERVER);
749 >  if (!conf)
750 >  {
751 >    sendto_realops_flags(UMODE_SERVNOTICE, L_ADMIN, SEND_NOTICE,
752 >                         "Lost connect{} block for %s", get_client_name(client_p, SHOW_IP));
753 >    sendto_realops_flags(UMODE_SERVNOTICE, L_OPER, SEND_NOTICE,
754                           "Lost connect{} block for %s", get_client_name(client_p, MASK_IP));
755  
756 <    exit_client(client_p, &me, "Lost connect{} block");
756 >    exit_client(client_p, "Lost connect{} block");
757      return;
758    }
759  
760 <  sendto_one(client_p, "PASS %s TS %d %s", conf->spasswd, TS_CURRENT, me.id);
760 >  sendto_one(client_p, "PASS %s TS %u %s", conf->spasswd, TS_CURRENT, me.id);
761  
762 <  send_capabilities(client_p, 0);
762 >  sendto_one(client_p, "CAPAB :%s", get_capabilities(NULL));
763  
764    sendto_one(client_p, "SERVER %s 1 :%s%s",
765               me.name, ConfigServerHide.hidden ? "(H) " : "",
766               me.info);
767  
768 <  /* If we've been marked dead because a send failed, just exit
768 >  /*
769 >   * If we've been marked dead because a send failed, just exit
770     * here now and save everyone the trouble of us ever existing.
771     */
772    if (IsDead(client_p))
773    {
774 <      sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
775 <                           "%s[%s] went dead during handshake",
776 <                           client_p->name,
777 <                           client_p->host);
778 <      sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
1296 <                           "%s went dead during handshake", client_p->name);
1297 <      return;
774 >    sendto_realops_flags(UMODE_SERVNOTICE, L_ADMIN, SEND_NOTICE,
775 >                         "%s went dead during handshake", get_client_name(client_p, SHOW_IP));
776 >    sendto_realops_flags(UMODE_SERVNOTICE, L_OPER, SEND_NOTICE,
777 >                         "%s went dead during handshake", get_client_name(client_p, MASK_IP));
778 >    return;
779    }
780  
781    /* don't move to serv_list yet -- we haven't sent a burst! */
782    /* If we get here, we're ok, so lets start reading some data */
783 <  comm_setselect(&client_p->localClient->fd, COMM_SELECT_READ, read_packet, client_p, 0);
783 >  comm_setselect(&client_p->connection->fd, COMM_SELECT_READ, read_packet, client_p, 0);
784   }
785  
786   static void
787 < ssl_server_handshake(fde_t *fd, struct Client *client_p)
787 > ssl_server_handshake(fde_t *fd, void *data)
788   {
789 <  X509 *cert = NULL;
790 <  int ret = 0;
789 >  struct Client *client_p = data;
790 >  const char *sslerr = NULL;
791  
792 <  if ((ret = SSL_connect(client_p->localClient->fd.ssl)) <= 0)
792 >  tls_handshake_status_t ret = tls_handshake(&client_p->connection->fd.ssl, TLS_ROLE_CLIENT, &sslerr);
793 >  if (ret != TLS_HANDSHAKE_DONE)
794    {
795 <    switch (SSL_get_error(client_p->localClient->fd.ssl, ret))
795 >    if ((CurrentTime - client_p->connection->firsttime) > CONNECTTIMEOUT)
796 >    {
797 >      exit_client(client_p, "Timeout during TLS handshake");
798 >      return;
799 >    }
800 >
801 >    switch (ret)
802      {
803 <      case SSL_ERROR_WANT_WRITE:
804 <        comm_setselect(&client_p->localClient->fd, COMM_SELECT_WRITE,
805 <                       (PF *)ssl_server_handshake, client_p, 0);
803 >      case TLS_HANDSHAKE_WANT_WRITE:
804 >        comm_setselect(&client_p->connection->fd, COMM_SELECT_WRITE,
805 >                       ssl_server_handshake, client_p, CONNECTTIMEOUT);
806          return;
807 <      case SSL_ERROR_WANT_READ:
808 <        comm_setselect(&client_p->localClient->fd, COMM_SELECT_READ,
809 <                       (PF *)ssl_server_handshake, client_p, 0);
807 >      case TLS_HANDSHAKE_WANT_READ:
808 >        comm_setselect(&client_p->connection->fd, COMM_SELECT_READ,
809 >                       ssl_server_handshake, client_p, CONNECTTIMEOUT);
810          return;
811        default:
812        {
813 <        const char *sslerr = ERR_error_string(ERR_get_error(), NULL);
1326 <        sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
813 >        sendto_realops_flags(UMODE_SERVNOTICE, L_ALL, SEND_NOTICE,
814                               "Error connecting to %s: %s", client_p->name,
815 <                             sslerr ? sslerr : "unknown SSL error");
816 <        exit_client(client_p, client_p, "Error during SSL handshake");
815 >                             sslerr ? sslerr : "unknown TLS error");
816 >        exit_client(client_p, "Error during TLS handshake");
817          return;
818        }
819      }
820    }
821  
822 <  if ((cert = SSL_get_peer_certificate(client_p->localClient->fd.ssl)))
1336 <  {
1337 <    int res = SSL_get_verify_result(client_p->localClient->fd.ssl);
1338 <    char buf[EVP_MAX_MD_SIZE * 2 + 1] = { '\0' };
1339 <    unsigned char md[EVP_MAX_MD_SIZE] = { '\0' };
1340 <
1341 <    if (res == X509_V_OK || res == X509_V_ERR_SELF_SIGNED_CERT_IN_CHAIN ||
1342 <        res == X509_V_ERR_UNABLE_TO_VERIFY_LEAF_SIGNATURE ||
1343 <        res == X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT)
1344 <    {
1345 <      unsigned int i = 0, n = 0;
822 >  comm_settimeout(&client_p->connection->fd, 0, NULL, NULL);
823  
824 <      if (X509_digest(cert, EVP_sha256(), md, &n))
825 <      {
826 <        for (; i < n; ++i)
1350 <          snprintf(buf + 2 * i, 3, "%02X", md[i]);
1351 <        client_p->certfp = xstrdup(buf);
1352 <      }
1353 <    }
1354 <    else
1355 <      ilog(LOG_TYPE_IRCD, "Server %s!%s@%s gave bad SSL client certificate: %d",
1356 <           client_p->name, client_p->username, client_p->host, res);
1357 <    X509_free(cert);
1358 <  }
824 >  if (!tls_verify_cert(&client_p->connection->fd.ssl, ConfigServerInfo.message_digest_algorithm, &client_p->certfp))
825 >    ilog(LOG_TYPE_IRCD, "Server %s!%s@%s gave bad TLS client certificate",
826 >         client_p->name, client_p->username, client_p->host);
827  
828    finish_ssl_server_handshake(client_p);
829   }
830  
831   static void
832 < ssl_connect_init(struct Client *client_p, struct MaskItem *conf, fde_t *fd)
832 > ssl_connect_init(struct Client *client_p, const struct MaskItem *conf, fde_t *fd)
833   {
834 <  if ((client_p->localClient->fd.ssl = SSL_new(ServerInfo.client_ctx)) == NULL)
834 >  if (!tls_new(&client_p->connection->fd.ssl, fd->fd, TLS_ROLE_CLIENT))
835    {
1368    ilog(LOG_TYPE_IRCD, "SSL_new() ERROR! -- %s",
1369         ERR_error_string(ERR_get_error(), NULL));
836      SetDead(client_p);
837 <    exit_client(client_p, client_p, "SSL_new failed");
837 >    exit_client(client_p, "TLS context initialization failed");
838      return;
839    }
840  
1375  SSL_set_fd(fd->ssl, fd->fd);
1376
841    if (!EmptyString(conf->cipher_list))
842 <    SSL_set_cipher_list(client_p->localClient->fd.ssl, conf->cipher_list);
842 >    tls_set_ciphers(&client_p->connection->fd.ssl, conf->cipher_list);
843  
844    ssl_server_handshake(NULL, client_p);
845   }
1382 #endif
846  
847   /* serv_connect_callback() - complete a server connection.
848   *
# Line 1392 | Line 855 | ssl_connect_init(struct Client *client_p
855   static void
856   serv_connect_callback(fde_t *fd, int status, void *data)
857   {
858 <  struct Client *client_p = data;
1396 <  struct MaskItem *conf = NULL;
858 >  struct Client *const client_p = data;
859  
860 <  /* First, make sure its a real client! */
861 <  assert(client_p != NULL);
862 <  assert(&client_p->localClient->fd == fd);
860 >  /* First, make sure it's a real client! */
861 >  assert(client_p);
862 >  assert(&client_p->connection->fd == fd);
863  
864    /* Next, for backward purposes, record the ip of the server */
865 <  memcpy(&client_p->localClient->ip, &fd->connect.hostaddr,
866 <         sizeof(struct irc_ssaddr));
865 >  memcpy(&client_p->connection->ip, &fd->connect.hostaddr, sizeof(struct irc_ssaddr));
866 >
867    /* Check the status */
868    if (status != COMM_OK)
869    {
870 <    /* We have an error, so report it and quit
871 <     * Admins get to see any IP, mere opers don't *sigh*
870 >    /* We have an error, so report it and quit */
871 >    sendto_realops_flags(UMODE_SERVNOTICE, L_ADMIN, SEND_NOTICE,
872 >                         "Error connecting to %s: %s",
873 >                         get_client_name(client_p, SHOW_IP), comm_errstr(status));
874 >    sendto_realops_flags(UMODE_SERVNOTICE, L_OPER, SEND_NOTICE,
875 >                         "Error connecting to %s: %s",
876 >                         get_client_name(client_p, MASK_IP), comm_errstr(status));
877 >
878 >    /*
879 >     * If a fd goes bad, call dead_link() the socket is no
880 >     * longer valid for reading or writing.
881       */
882 <     if (ConfigServerHide.hide_server_ips)
883 <       sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
1413 <                            "Error connecting to %s: %s",
1414 <                            client_p->name, comm_errstr(status));
1415 <     else
1416 <       sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
1417 <                            "Error connecting to %s[%s]: %s", client_p->name,
1418 <                            client_p->host, comm_errstr(status));
1419 <
1420 <     sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
1421 <                          "Error connecting to %s: %s",
1422 <                          client_p->name, comm_errstr(status));
1423 <
1424 <     /* If a fd goes bad, call dead_link() the socket is no
1425 <      * longer valid for reading or writing.
1426 <      */
1427 <     dead_link_on_write(client_p, 0);
1428 <     return;
882 >    dead_link_on_write(client_p, 0);
883 >    return;
884    }
885  
886    /* COMM_OK, so continue the connection procedure */
887 <  /* Get the C/N lines */
888 <  conf = find_conf_name(&client_p->localClient->confs,
889 <                        client_p->name, CONF_SERVER);
890 <  if (conf == NULL)
891 <  {
892 <    sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
893 <                         "Lost connect{} block for %s", get_client_name(client_p, HIDE_IP));
894 <    sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
887 >  /* Get the connect {} block */
888 >  const struct MaskItem *conf = find_conf_name(&client_p->connection->confs,
889 >                                                client_p->name, CONF_SERVER);
890 >  if (!conf)
891 >  {
892 >    sendto_realops_flags(UMODE_SERVNOTICE, L_ADMIN, SEND_NOTICE,
893 >                         "Lost connect{} block for %s", get_client_name(client_p, SHOW_IP));
894 >    sendto_realops_flags(UMODE_SERVNOTICE, L_OPER, SEND_NOTICE,
895                           "Lost connect{} block for %s", get_client_name(client_p, MASK_IP));
896  
897 <    exit_client(client_p, &me, "Lost connect{} block");
897 >    exit_client(client_p, "Lost connect{} block");
898      return;
899    }
900  
901    /* Next, send the initial handshake */
902    SetHandshake(client_p);
903  
1449 #ifdef HAVE_LIBCRYPTO
904    if (IsConfSSL(conf))
905    {
906      ssl_connect_init(client_p, conf, fd);
907      return;
908    }
1455 #endif
909  
910 <  sendto_one(client_p, "PASS %s TS %d %s", conf->spasswd, TS_CURRENT, me.id);
910 >  sendto_one(client_p, "PASS %s TS %u %s", conf->spasswd, TS_CURRENT, me.id);
911  
912 <  send_capabilities(client_p, 0);
912 >  sendto_one(client_p, "CAPAB :%s", get_capabilities(NULL));
913  
914    sendto_one(client_p, "SERVER %s 1 :%s%s", me.name,
915               ConfigServerHide.hidden ? "(H) " : "", me.info);
916  
917 <  /* If we've been marked dead because a send failed, just exit
917 >  /*
918 >   * If we've been marked dead because a send failed, just exit
919     * here now and save everyone the trouble of us ever existing.
920     */
921    if (IsDead(client_p))
922    {
923 <      sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
924 <                           "%s[%s] went dead during handshake",
925 <                           client_p->name,
926 <                           client_p->host);
927 <      sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
1474 <                           "%s went dead during handshake", client_p->name);
1475 <      return;
923 >    sendto_realops_flags(UMODE_SERVNOTICE, L_ADMIN, SEND_NOTICE,
924 >                         "%s went dead during handshake", get_client_name(client_p, SHOW_IP));
925 >    sendto_realops_flags(UMODE_SERVNOTICE, L_OPER, SEND_NOTICE,
926 >                         "%s went dead during handshake", get_client_name(client_p, MASK_IP));
927 >    return;
928    }
929  
930    /* don't move to serv_list yet -- we haven't sent a burst! */
# Line 1484 | Line 936 | struct Client *
936   find_servconn_in_progress(const char *name)
937   {
938    dlink_node *ptr;
1487  struct Client *cptr;
939  
940    DLINK_FOREACH(ptr, unknown_list.head)
941    {
942 <    cptr = ptr->data;
942 >    struct Client *cptr = ptr->data;
943  
944 <    if (cptr && cptr->name[0])
945 <      if (!match(name, cptr->name))
944 >    if (cptr->name[0])
945 >      if (!irccmp(name, cptr->name))
946          return cptr;
947    }
948  

Comparing:
ircd-hybrid/trunk/src/s_serv.c (property svn:keywords), Revision 2691 by michael, Tue Dec 17 18:55:59 2013 UTC vs.
ircd-hybrid/trunk/src/server.c (property svn:keywords), Revision 7668 by michael, Wed Jul 20 17:09:49 2016 UTC

# Line 1 | Line 1
1 < Id Revision
1 > Id

Diff Legend

Removed lines
+ Added lines
< Changed lines (old)
> Changed lines (new)