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

Comparing:
ircd-hybrid/trunk/src/s_serv.c (file contents), Revision 2182 by michael, Tue Jun 4 12:19:04 2013 UTC vs.
ircd-hybrid/branches/8.2.x/src/server.c (file contents), Revision 3452 by michael, Thu May 1 19:20:08 2014 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-2014 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 18 | Line 17
17   *  along with this program; if not, write to the Free Software
18   *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307
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"
# Line 28 | Line 30
30   #include "rsa.h"
31   #endif
32   #include "list.h"
31 #include "channel.h"
32 #include "channel_mode.h"
33   #include "client.h"
34 #include "dbuf.h"
34   #include "event.h"
36 #include "fdlist.h"
35   #include "hash.h"
36   #include "irc_string.h"
37   #include "ircd.h"
# Line 41 | Line 39
39   #include "s_bsd.h"
40   #include "numeric.h"
41   #include "packet.h"
44 #include "irc_res.h"
42   #include "conf.h"
43 < #include "s_serv.h"
43 > #include "server.h"
44   #include "log.h"
45 < #include "s_misc.h"
49 < #include "s_user.h"
45 > #include "user.h"
46   #include "send.h"
47   #include "memory.h"
48 < #include "channel.h" /* chcap_usage_counts stuff...*/
48 > #include "channel.h"
49   #include "parse.h"
50  
51   #define MIN_CONN_FREQ 300
52  
53   dlink_list flatten_links;
54   static dlink_list cap_list = { NULL, NULL, 0 };
59 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);
62
55   static CNCB serv_connect_callback;
56  
65 static void burst_members(struct Client *, struct Channel *);
57  
58   /*
59   * write_links_file
# Line 76 | Line 67 | void
67   write_links_file(void *notused)
68   {
69    FILE *file = NULL;
70 <  dlink_node *ptr = NULL, *ptr_next = NULL;;
71 <  char buff[IRCD_BUFSIZE] = { '\0' };
70 >  dlink_node *ptr = NULL, *ptr_next = NULL;
71 >  char buff[IRCD_BUFSIZE] = "";
72  
73    if ((file = fopen(LIPATH, "w")) == NULL)
74      return;
# Line 111 | Line 102 | write_links_file(void *notused)
102       */
103      snprintf(buff, sizeof(buff), "%s %s :1 %s",   target_p->name,
104               me.name, target_p->info);
105 <    dlinkAdd(xstrdup(buff), make_dlink_node(), &flatten_links);
105 >    dlinkAddTail(xstrdup(buff), make_dlink_node(), &flatten_links);
106      snprintf(buff, sizeof(buff), "%s %s :1 %s\n", target_p->name,
107               me.name, target_p->info);
108  
# Line 121 | Line 112 | write_links_file(void *notused)
112    fclose(file);
113   }
114  
115 + void
116 + read_links_file(void)
117 + {
118 +  FILE *file = NULL;
119 +  char *p = NULL;
120 +  char buff[IRCD_BUFSIZE] = "";
121 +
122 +  if ((file = fopen(LIPATH, "r")) == NULL)
123 +    return;
124 +
125 +  while (fgets(buff, sizeof(buff), file))
126 +  {
127 +    if ((p = strchr(buff, '\n')))
128 +      *p = '\0';
129 +
130 +    dlinkAddTail(xstrdup(buff), make_dlink_node(), &flatten_links);
131 +  }
132 +
133 +  fclose(file);
134 + }
135 +
136   /* hunt_server()
137   *      Do the basic thing in delivering the message (command)
138   *      across the relays to the specific server (server) for
# Line 141 | Line 153 | write_links_file(void *notused)
153   *      returns: (see #defines)
154   */
155   int
156 < hunt_server(struct Client *client_p, struct Client *source_p, const char *command,
156 > hunt_server(struct Client *source_p, const char *command,
157              const int server, const int parc, char *parv[])
158   {
159    struct Client *target_p = NULL;
160    struct Client *target_tmp = NULL;
161    dlink_node *ptr;
150  int wilds;
162  
163    /* Assume it's me, if no server */
164    if (parc <= server || EmptyString(parv[server]))
# Line 163 | Line 174 | hunt_server(struct Client *client_p, str
174    if (MyClient(source_p))
175      target_p = hash_find_client(parv[server]);
176    else
177 <    target_p = find_person(client_p, parv[server]);
177 >    target_p = find_person(source_p, parv[server]);
178  
179    if (target_p)
180      if (target_p->from == source_p->from && !MyConnect(target_p))
# Line 173 | Line 184 | hunt_server(struct Client *client_p, str
184      if (target_p->from == source_p->from && !MyConnect(target_p))
185        target_p = NULL;
186  
176  wilds = has_wildcards(parv[server]);
177
187    /* Again, if there are no wild cards involved in the server
188     * name, use the hash lookup
189     */
190    if (target_p == NULL)
191    {
192 <    if (!wilds)
192 >    if (!has_wildcards(parv[server]))
193      {
194        if (!(target_p = hash_find_server(parv[server])))
195        {
196 <        sendto_one(source_p, form_str(ERR_NOSUCHSERVER),
188 <                   me.name, source_p->name, parv[server]);
196 >        sendto_one_numeric(source_p, &me, ERR_NOSUCHSERVER, parv[server]);
197          return HUNTED_NOSUCH;
198        }
199      }
# Line 201 | Line 209 | hunt_server(struct Client *client_p, str
209              continue;
210            target_p = ptr->data;
211  
212 <          if (IsRegistered(target_p) && (target_p != client_p))
212 >          if (IsRegistered(target_p) && (target_p != source_p->from))
213              break;
214          }
215        }
216      }
217    }
218  
219 <  if (target_p != NULL)
219 >  if (target_p)
220    {
221 <    if(!IsRegistered(target_p))
221 >    if (!IsRegistered(target_p))
222      {
223 <      sendto_one(source_p, form_str(ERR_NOSUCHSERVER),
216 <                 me.name, source_p->name, parv[server]);
223 >      sendto_one_numeric(source_p, &me, ERR_NOSUCHSERVER, parv[server]);
224        return HUNTED_NOSUCH;
225      }
226  
# Line 224 | Line 231 | hunt_server(struct Client *client_p, str
231        parv[server] = target_p->name;
232  
233      /* This is a little kludgy but should work... */
234 <    if (IsClient(source_p) &&
228 <        ((MyConnect(target_p) && IsCapable(target_p, CAP_TS6)) ||
229 <         (!MyConnect(target_p) && IsCapable(target_p->from, CAP_TS6))))
230 <      parv[0] = ID(source_p);
231 <
232 <    sendto_one(target_p, command, parv[0],
234 >    sendto_one(target_p, command, ID_or_name(source_p, target_p),
235                 parv[1], parv[2], parv[3], parv[4],
236                 parv[5], parv[6], parv[7], parv[8]);
237      return HUNTED_PASS;
238 <  }
238 >  }
239  
240 <  sendto_one(source_p, form_str(ERR_NOSUCHSERVER),
239 <             me.name, source_p->name, parv[server]);
240 >  sendto_one_numeric(source_p, &me, ERR_NOSUCHSERVER, parv[server]);
241    return HUNTED_NOSUCH;
242   }
243  
# Line 254 | Line 255 | void
255   try_connections(void *unused)
256   {
257    dlink_node *ptr = NULL;
258 <  struct MaskItem *conf;
258 <  int confrq;
258 >  int confrq = 0;
259  
260    /* TODO: change this to set active flag to 0 when added to event! --Habeeb */
261    if (GlobalSetOptions.autoconn == 0)
# Line 263 | Line 263 | try_connections(void *unused)
263  
264    DLINK_FOREACH(ptr, server_items.head)
265    {
266 <    conf = ptr->data;
266 >    struct MaskItem *conf = ptr->data;
267  
268      assert(conf->type == CONF_SERVER);
269  
270 <    /* Also when already connecting! (update holdtimes) --SRB
270 >    /* Also when already connecting! (update holdtimes) --SRB
271       */
272      if (!conf->port ||!IsConfAllowAutoConn(conf))
273        continue;
# Line 293 | Line 293 | try_connections(void *unused)
293  
294      conf->until = CurrentTime + confrq;
295  
296 <    /* Found a CONNECT config with port specified, scan clients
296 >    /*
297 >     * Found a CONNECT config with port specified, scan clients
298       * and see if this server is already connected?
299       */
300 <    if (hash_find_server(conf->name) != NULL)
300 >    if (hash_find_server(conf->name))
301        continue;
302  
303      if (conf->class->ref_count < conf->class->max_total)
304      {
305        /* Go to the end of the list, if not already last */
306 <      if (ptr->next != NULL)
306 >      if (ptr->next)
307        {
308          dlinkDelete(ptr, &server_items);
309          dlinkAddTail(conf, &conf->node, &server_items);
# Line 311 | Line 312 | try_connections(void *unused)
312        if (find_servconn_in_progress(conf->name))
313          return;
314  
315 <      /* We used to only print this if serv_connect() actually
315 >      /*
316 >       * We used to only print this if serv_connect() actually
317         * succeeded, but since comm_tcp_connect() can call the callback
318         * immediately if there is an error, we were getting error messages
319         * in the wrong order. SO, we just print out the activated line,
# Line 338 | Line 340 | try_connections(void *unused)
340   int
341   valid_servname(const char *name)
342   {
343 <  unsigned int length = 0;
342 <  unsigned int dots   = 0;
343 >  unsigned int dots = 0;
344    const char *p = name;
345  
346    for (; *p; ++p)
# Line 347 | Line 348 | valid_servname(const char *name)
348      if (!IsServChar(*p))
349        return 0;
350  
350    ++length;
351
351      if (*p == '.')
352        ++dots;
353    }
354  
355 <  return dots != 0 && length <= HOSTLEN;
355 >  return dots && (p - name) <= HOSTLEN;
356   }
357  
358   int
# Line 364 | Line 363 | check_server(const char *name, struct Cl
363    struct MaskItem *server_conf = NULL;
364    int error = -1;
365  
366 <  assert(client_p != NULL);
366 >  assert(client_p);
367  
368    /* loop through looking for all possible connect items that might work */
369    DLINK_FOREACH(ptr, server_items.head)
# Line 378 | Line 377 | check_server(const char *name, struct Cl
377  
378      /* XXX: Fix me for IPv6                    */
379      /* XXX sockhost is the IPv4 ip as a string */
380 <    if (!match(conf->host, client_p->host) ||
380 >    if (!match(conf->host, client_p->host) ||
381          !match(conf->host, client_p->sockhost))
382      {
383        error = -2;
# Line 386 | Line 385 | check_server(const char *name, struct Cl
385        if (!match_conf_password(client_p->localClient->passwd, conf))
386          return -2;
387  
388 +      if (!EmptyString(conf->certfp))
389 +        if (EmptyString(client_p->certfp) || strcasecmp(client_p->certfp, conf->certfp))
390 +          return -4;
391 +
392        server_conf = conf;
393      }
394    }
# Line 396 | Line 399 | check_server(const char *name, struct Cl
399    attach_conf(client_p, server_conf);
400  
401  
402 <  if (server_conf != NULL)
402 >  if (server_conf)
403    {
404      struct sockaddr_in *v4;
405   #ifdef IPV6
# Line 405 | Line 408 | check_server(const char *name, struct Cl
408      switch (server_conf->aftype)
409      {
410   #ifdef IPV6
411 <      case AF_INET6:
411 >      case AF_INET6:
412          v6 = (struct sockaddr_in6 *)&server_conf->addr;
413  
414          if (IN6_IS_ADDR_UNSPECIFIED(&v6->sin6_addr))
# Line 416 | Line 419 | check_server(const char *name, struct Cl
419          v4 = (struct sockaddr_in *)&server_conf->addr;
420  
421          if (v4->sin_addr.s_addr == INADDR_NONE)
422 <          memcpy(&server_conf->addr, &client_p->localClient->ip, sizeof(struct irc_ssaddr));
422 >          memcpy(&server_conf->addr, &client_p->localClient->ip, sizeof(struct irc_ssaddr));
423          break;
424      }
425    }
# Line 455 | Line 458 | add_capability(const char *capab_name, i
458   int
459   delete_capability(const char *capab_name)
460   {
461 <  dlink_node *ptr;
459 <  dlink_node *next_ptr;
460 <  struct Capability *cap;
461 >  dlink_node *ptr = NULL, *ptr_next = NULL;
462  
463 <  DLINK_FOREACH_SAFE(ptr, next_ptr, cap_list.head)
463 >  DLINK_FOREACH_SAFE(ptr, ptr_next, cap_list.head)
464    {
465 <    cap = ptr->data;
465 >    struct Capability *cap = ptr->data;
466  
467 <    if (cap->cap != 0)
467 >    if (cap->cap)
468      {
469 <      if (irccmp(cap->name, capab_name) == 0)
469 >      if (!irccmp(cap->name, capab_name))
470        {
471          default_server_capabs &= ~(cap->cap);
472          dlinkDelete(ptr, &cap_list);
# Line 512 | Line 513 | find_capability(const char *capab)
513   void
514   send_capabilities(struct Client *client_p, int cap_can_send)
515   {
516 <  struct Capability *cap=NULL;
517 <  char msgbuf[IRCD_BUFSIZE];
517 <  char *t;
516 >  char msgbuf[IRCD_BUFSIZE] = "";
517 >  char *t = msgbuf;
518    int tl;
519 <  dlink_node *ptr;
520 <
521 <  t = msgbuf;
519 >  dlink_node *ptr = NULL;
520  
521    DLINK_FOREACH(ptr, cap_list.head)
522    {
523 <    cap = ptr->data;
523 >    struct Capability *cap = ptr->data;
524  
525      if (cap->cap & (cap_can_send|default_server_capabs))
526      {
# Line 535 | Line 533 | send_capabilities(struct Client *client_
533    sendto_one(client_p, "CAPAB :%s", msgbuf);
534   }
535  
538 /* sendnick_TS()
539 *
540 * inputs       - client (server) to send nick towards
541 *          - client to send nick for
542 * output       - NONE
543 * side effects - NICK message is sent towards given client_p
544 */
545 void
546 sendnick_TS(struct Client *client_p, struct Client *target_p)
547 {
548  static char ubuf[12];
549
550  if (!IsClient(target_p))
551    return;
552
553  send_umode(NULL, target_p, 0, SEND_UMODES, ubuf);
554
555  if (ubuf[0] == '\0')
556  {
557    ubuf[0] = '+';
558    ubuf[1] = '\0';
559  }
560
561  if (IsCapable(client_p, CAP_SVS))
562  {
563    if (HasID(target_p) && IsCapable(client_p, CAP_TS6))
564      sendto_one(client_p, ":%s UID %s %d %lu %s %s %s %s %s %s :%s",
565                 target_p->servptr->id,
566                 target_p->name, target_p->hopcount + 1,
567                 (unsigned long) target_p->tsinfo,
568                 ubuf, target_p->username, target_p->host,
569                 (MyClient(target_p) && IsIPSpoof(target_p)) ?
570                 "0" : target_p->sockhost, target_p->id,
571                 target_p->svid, target_p->info);
572    else
573      sendto_one(client_p, "NICK %s %d %lu %s %s %s %s %s :%s",
574                 target_p->name, target_p->hopcount + 1,
575                 (unsigned long) target_p->tsinfo,
576                 ubuf, target_p->username, target_p->host,
577                 target_p->servptr->name, target_p->svid,
578                 target_p->info);
579  }
580  else
581  {
582    if (HasID(target_p) && IsCapable(client_p, CAP_TS6))
583      sendto_one(client_p, ":%s UID %s %d %lu %s %s %s %s %s :%s",
584                 target_p->servptr->id,
585                 target_p->name, target_p->hopcount + 1,
586                 (unsigned long) target_p->tsinfo,
587                 ubuf, target_p->username, target_p->host,
588                 (MyClient(target_p) && IsIPSpoof(target_p)) ?
589                 "0" : target_p->sockhost, target_p->id, target_p->info);
590    else
591      sendto_one(client_p, "NICK %s %d %lu %s %s %s %s :%s",
592                 target_p->name, target_p->hopcount + 1,
593                 (unsigned long) target_p->tsinfo,
594                 ubuf, target_p->username, target_p->host,
595                 target_p->servptr->name, target_p->info);
596  }
597
598  if (target_p->away[0])
599    sendto_one(client_p, ":%s AWAY :%s", ID_or_name(target_p, client_p),
600               target_p->away);
601
602 }
603
536   /*
537   * show_capabilities - show current server capabilities
538   *
# Line 609 | Line 541 | sendnick_TS(struct Client *client_p, str
541   * side effects - build up string representing capabilities of server listed
542   */
543   const char *
544 < show_capabilities(struct Client *target_p)
544 > show_capabilities(const struct Client *target_p)
545   {
546 <  static char msgbuf[IRCD_BUFSIZE];
547 <  char *t = msgbuf;
616 <  dlink_node *ptr;
546 >  static char msgbuf[IRCD_BUFSIZE] = "";
547 >  const dlink_node *ptr = NULL;
548  
549 <  t += sprintf(msgbuf, "TS ");
549 >  strlcpy(msgbuf, "TS", sizeof(msgbuf));
550  
551    DLINK_FOREACH(ptr, cap_list.head)
552    {
553      const struct Capability *cap = ptr->data;
554  
555 <    if (IsCapable(target_p, cap->cap))
556 <      t += sprintf(t, "%s ", cap->name);
555 >    if (!IsCapable(target_p, cap->cap))
556 >      continue;
557 >
558 >    strlcat(msgbuf,       " ", sizeof(msgbuf));
559 >    strlcat(msgbuf, cap->name, sizeof(msgbuf));
560    }
561  
628  *(t - 1) = '\0';
562    return msgbuf;
563   }
564  
# Line 645 | Line 578 | make_server(struct Client *client_p)
578    return client_p->serv;
579   }
580  
648 /* server_estab()
649 *
650 * inputs       - pointer to a struct Client
651 * output       -
652 * side effects -
653 */
654 void
655 server_estab(struct Client *client_p)
656 {
657  struct Client *target_p;
658  struct MaskItem *conf = NULL;
659  char *host;
660  const char *inpath;
661  static char inpath_ip[HOSTLEN * 2 + USERLEN + 6];
662  dlink_node *ptr;
663 #ifdef HAVE_LIBCRYPTO
664  const COMP_METHOD *compression = NULL, *expansion = NULL;
665 #endif
666
667  assert(client_p != NULL);
668
669  strlcpy(inpath_ip, get_client_name(client_p, SHOW_IP), sizeof(inpath_ip));
670
671  inpath = get_client_name(client_p, MASK_IP); /* "refresh" inpath with host */
672  host   = client_p->name;
673
674  if ((conf = find_conf_name(&client_p->localClient->confs, host, CONF_SERVER))
675      == NULL)
676  {
677    /* This shouldn't happen, better tell the ops... -A1kmm */
678    sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
679                         "Warning: Lost connect{} block "
680                         "for server %s(this shouldn't happen)!", host);
681    exit_client(client_p, &me, "Lost connect{} block!");
682    return;
683  }
684
685  MyFree(client_p->localClient->passwd);
686  client_p->localClient->passwd = NULL;
687
688  /* Its got identd, since its a server */
689  SetGotId(client_p);
690
691  /* If there is something in the serv_list, it might be this
692   * connecting server..
693   */
694  if (!ServerInfo.hub && serv_list.head)  
695  {
696    if (client_p != serv_list.head->data || serv_list.head->next)
697    {
698      ++ServerStats.is_ref;
699      sendto_one(client_p, "ERROR :I'm a leaf not a hub");
700      exit_client(client_p, &me, "I'm a leaf");
701      return;
702    }
703  }
704
705  if (IsUnknown(client_p))
706  {
707    sendto_one(client_p, "PASS %s TS %d %s", conf->spasswd, TS_CURRENT, me.id);
708
709    send_capabilities(client_p, 0);
710
711    sendto_one(client_p, "SERVER %s 1 :%s%s",
712               me.name, ConfigServerHide.hidden ? "(H) " : "", me.info);
713  }
714
715  sendto_one(client_p, "SVINFO %d %d 0 :%lu", TS_CURRENT, TS_MIN,
716             (unsigned long)CurrentTime);
717
718  /* assumption here is if they passed the correct TS version, they also passed an SID */
719  if (IsCapable(client_p, CAP_TS6))
720    hash_add_id(client_p);
721
722  /* XXX Does this ever happen? I don't think so -db */
723  detach_conf(client_p, CONF_OPER);
724
725  /* *WARNING*
726  **    In the following code in place of plain server's
727  **    name we send what is returned by get_client_name
728  **    which may add the "sockhost" after the name. It's
729  **    *very* *important* that there is a SPACE between
730  **    the name and sockhost (if present). The receiving
731  **    server will start the information field from this
732  **    first blank and thus puts the sockhost into info.
733  **    ...a bit tricky, but you have been warned, besides
734  **    code is more neat this way...  --msa
735  */
736  client_p->servptr = &me;
737
738  if (IsClosing(client_p))
739    return;
740
741  SetServer(client_p);
742
743  /* Update the capability combination usage counts. -A1kmm */
744  set_chcap_usage_counts(client_p);
745
746  /* Some day, all these lists will be consolidated *sigh* */
747  dlinkAdd(client_p, &client_p->lnode, &me.serv->server_list);
748
749  assert(dlinkFind(&unknown_list, client_p));
750
751  dlink_move_node(&client_p->localClient->lclient_node,
752                  &unknown_list, &serv_list);
753
754  Count.myserver++;
755
756  dlinkAdd(client_p, make_dlink_node(), &global_serv_list);
757  hash_add_client(client_p);
758
759  /* doesnt duplicate client_p->serv if allocated this struct already */
760  make_server(client_p);
761
762  /* fixing eob timings.. -gnp */
763  client_p->localClient->firsttime = CurrentTime;
764
765  if (find_matching_name_conf(CONF_SERVICE, client_p->name, NULL, NULL, 0))
766    AddFlag(client_p, FLAGS_SERVICE);
767
768  /* Show the real host/IP to admins */
769 #ifdef HAVE_LIBCRYPTO
770  if (client_p->localClient->fd.ssl)
771  {
772    compression = SSL_get_current_compression(client_p->localClient->fd.ssl);
773    expansion   = SSL_get_current_expansion(client_p->localClient->fd.ssl);
774
775    sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
776                         "Link with %s established: [SSL: %s, Compression/Expansion method: %s/%s] (Capabilities: %s)",
777                         inpath_ip, ssl_get_cipher(client_p->localClient->fd.ssl),
778                         compression ? SSL_COMP_get_name(compression) : "NONE",
779                         expansion ? SSL_COMP_get_name(expansion) : "NONE",
780                         show_capabilities(client_p));
781    /* Now show the masked hostname/IP to opers */
782    sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
783                         "Link with %s established: [SSL: %s, Compression/Expansion method: %s/%s] (Capabilities: %s)",
784                         inpath, ssl_get_cipher(client_p->localClient->fd.ssl),
785                         compression ? SSL_COMP_get_name(compression) : "NONE",
786                         expansion ? SSL_COMP_get_name(expansion) : "NONE",
787                         show_capabilities(client_p));
788    ilog(LOG_TYPE_IRCD, "Link with %s established: [SSL: %s, Compression/Expansion method: %s/%s] (Capabilities: %s)",
789         inpath_ip, ssl_get_cipher(client_p->localClient->fd.ssl),
790         compression ? SSL_COMP_get_name(compression) : "NONE",
791         expansion ? SSL_COMP_get_name(expansion) : "NONE",
792         show_capabilities(client_p));
793  }
794  else
795 #endif
796  {
797    sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
798                         "Link with %s established: (Capabilities: %s)",
799                         inpath_ip, show_capabilities(client_p));
800    /* Now show the masked hostname/IP to opers */
801    sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
802                         "Link with %s established: (Capabilities: %s)",
803                         inpath, show_capabilities(client_p));
804    ilog(LOG_TYPE_IRCD, "Link with %s established: (Capabilities: %s)",
805         inpath_ip, show_capabilities(client_p));
806  }
807
808  fd_note(&client_p->localClient->fd, "Server: %s", client_p->name);
809
810  /* Old sendto_serv_but_one() call removed because we now
811  ** need to send different names to different servers
812  ** (domain name matching) Send new server to other servers.
813  */
814  DLINK_FOREACH(ptr, serv_list.head)
815  {
816    target_p = ptr->data;
817
818    if (target_p == client_p)
819      continue;
820
821    if (IsCapable(target_p, CAP_TS6) && HasID(client_p))
822      sendto_one(target_p, ":%s SID %s 2 %s :%s%s",
823                 me.id, client_p->name, client_p->id,
824                 IsHidden(client_p) ? "(H) " : "",
825                 client_p->info);
826    else
827      sendto_one(target_p,":%s SERVER %s 2 :%s%s",
828                 me.name, client_p->name,
829                 IsHidden(client_p) ? "(H) " : "",
830                 client_p->info);
831  }
832
833  /* Pass on my client information to the new server
834  **
835  ** First, pass only servers (idea is that if the link gets
836  ** cancelled beacause the server was already there,
837  ** there are no NICK's to be cancelled...). Of course,
838  ** if cancellation occurs, all this info is sent anyway,
839  ** and I guess the link dies when a read is attempted...? --msa
840  **
841  ** Note: Link cancellation to occur at this point means
842  ** that at least two servers from my fragment are building
843  ** up connection this other fragment at the same time, it's
844  ** a race condition, not the normal way of operation...
845  **
846  ** ALSO NOTE: using the get_client_name for server names--
847  **    see previous *WARNING*!!! (Also, original inpath
848  **    is destroyed...)
849  */
850
851  DLINK_FOREACH_PREV(ptr, global_serv_list.tail)
852  {
853    target_p = ptr->data;
854
855    /* target_p->from == target_p for target_p == client_p */
856    if (IsMe(target_p) || target_p->from == client_p)
857      continue;
858
859    if (IsCapable(client_p, CAP_TS6))
860    {
861      if (HasID(target_p))
862        sendto_one(client_p, ":%s SID %s %d %s :%s%s",
863                   ID(target_p->servptr), target_p->name, target_p->hopcount+1,
864                   target_p->id, IsHidden(target_p) ? "(H) " : "",
865                   target_p->info);
866      else  /* introducing non-ts6 server */
867        sendto_one(client_p, ":%s SERVER %s %d :%s%s",
868                   ID(target_p->servptr), target_p->name, target_p->hopcount+1,
869                   IsHidden(target_p) ? "(H) " : "", target_p->info);
870    }
871    else
872      sendto_one(client_p, ":%s SERVER %s %d :%s%s",
873                 target_p->servptr->name, target_p->name, target_p->hopcount+1,
874                 IsHidden(target_p) ? "(H) " : "", target_p->info);
875
876    if (HasFlag(target_p, FLAGS_EOB))
877      sendto_one(client_p, ":%s EOB", ID_or_name(client_p, target_p));
878  }
879
880  server_burst(client_p);
881 }
882
883 /* server_burst()
884 *
885 * inputs       - struct Client pointer server
886 *              -
887 * output       - none
888 * side effects - send a server burst
889 * bugs         - still too long
890 */
891 static void
892 server_burst(struct Client *client_p)
893 {
894  /* Send it in the shortened format with the TS, if
895  ** it's a TS server; walk the list of channels, sending
896  ** all the nicks that haven't been sent yet for each
897  ** channel, then send the channel itself -- it's less
898  ** obvious than sending all nicks first, but on the
899  ** receiving side memory will be allocated more nicely
900  ** saving a few seconds in the handling of a split
901  ** -orabidoo
902  */
903
904  burst_all(client_p);
905
906  /* EOB stuff is now in burst_all */
907  /* Always send a PING after connect burst is done */
908  sendto_one(client_p, "PING :%s", ID_or_name(&me, client_p));
909 }
910
911 /* burst_all()
912 *
913 * inputs       - pointer to server to send burst to
914 * output       - NONE
915 * side effects - complete burst of channels/nicks is sent to client_p
916 */
917 static void
918 burst_all(struct Client *client_p)
919 {
920  dlink_node *ptr = NULL;
921
922  DLINK_FOREACH(ptr, global_channel_list.head)
923  {
924    struct Channel *chptr = ptr->data;
925
926    if (dlink_list_length(&chptr->members) != 0)
927    {
928      burst_members(client_p, chptr);
929      send_channel_modes(client_p, chptr);
930
931      if (IsCapable(client_p, CAP_TBURST))
932        send_tb(client_p, chptr);
933    }
934  }
935
936  /* also send out those that are not on any channel
937   */
938  DLINK_FOREACH(ptr, global_client_list.head)
939  {
940    struct Client *target_p = ptr->data;
941
942    if (!HasFlag(target_p, FLAGS_BURSTED) && target_p->from != client_p)
943      sendnick_TS(client_p, target_p);
944    
945    DelFlag(target_p, FLAGS_BURSTED);
946  }
947
948  if (IsCapable(client_p, CAP_EOB))
949    sendto_one(client_p, ":%s EOB", ID_or_name(&me, client_p));
950 }
951
952 /*
953 * send_tb
954 *
955 * inputs       - pointer to Client
956 *              - pointer to channel
957 * output       - NONE
958 * side effects - Called on a server burst when
959 *                server is CAP_TBURST capable
960 */
961 static void
962 send_tb(struct Client *client_p, struct Channel *chptr)
963 {
964  /*
965   * We may also send an empty topic here, but only if topic_time isn't 0,
966   * i.e. if we had a topic that got unset.  This is required for syncing
967   * topics properly.
968   *
969   * Imagine the following scenario: Our downlink introduces a channel
970   * to us with a TS that is equal to ours, but the channel topic on
971   * their side got unset while the servers were in splitmode, which means
972   * their 'topic' is newer.  They simply wanted to unset it, so we have to
973   * deal with it in a more sophisticated fashion instead of just resetting
974   * it to their old topic they had before.  Read m_tburst.c:ms_tburst
975   * for further information   -Michael
976   */
977  if (chptr->topic_time != 0)
978    sendto_one(client_p, ":%s TBURST %lu %s %lu %s :%s",
979               ID_or_name(&me, client_p),
980               (unsigned long)chptr->channelts, chptr->chname,
981               (unsigned long)chptr->topic_time,
982               chptr->topic_info,
983               chptr->topic);
984 }
985
986 /* burst_members()
987 *
988 * inputs       - pointer to server to send members to
989 *              - dlink_list pointer to membership list to send
990 * output       - NONE
991 * side effects -
992 */
993 static void
994 burst_members(struct Client *client_p, struct Channel *chptr)
995 {
996  struct Client *target_p;
997  struct Membership *ms;
998  dlink_node *ptr;
999
1000  DLINK_FOREACH(ptr, chptr->members.head)
1001  {
1002    ms       = ptr->data;
1003    target_p = ms->client_p;
1004
1005    if (!HasFlag(target_p, FLAGS_BURSTED))
1006    {
1007      AddFlag(target_p, FLAGS_BURSTED);
1008
1009      if (target_p->from != client_p)
1010        sendnick_TS(client_p, target_p);
1011    }
1012  }
1013 }
1014
581   /* New server connection code
582   * Based upon the stuff floating about in s_bsd.c
583   *   -- adrian
# Line 1019 | Line 585 | burst_members(struct Client *client_p, s
585  
586   /* serv_connect() - initiate a server connection
587   *
588 < * inputs       - pointer to conf
588 > * inputs       - pointer to conf
589   *              - pointer to client doing the connect
590   * output       -
591   * side effects -
# Line 1036 | Line 602 | burst_members(struct Client *client_p, s
602   int
603   serv_connect(struct MaskItem *conf, struct Client *by)
604   {
605 <  struct Client *client_p;
606 <  char buf[HOSTIPLEN + 1];
605 >  struct Client *client_p = NULL;
606 >  char buf[HOSTIPLEN + 1] = "";
607  
608    /* conversion structs */
609    struct sockaddr_in *v4;
1044  /* Make sure conf is useful */
1045  assert(conf != NULL);
610  
611 +  /* Make sure conf is useful */
612 +  assert(conf);
613  
614    getnameinfo((struct sockaddr *)&conf->addr, conf->addr.ss_len,
615                buf, sizeof(buf), NULL, 0, NI_NUMERICHOST);
# Line 1056 | Line 622 | serv_connect(struct MaskItem *conf, stru
622      sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
623                           "Error connecting to %s: DNS lookup for connect{} in progress.",
624                           conf->name);
625 <    return (0);
625 >    return 0;
626    }
627  
628    if (conf->dns_failed)
# Line 1064 | Line 630 | serv_connect(struct MaskItem *conf, stru
630      sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
631                           "Error connecting to %s: DNS lookup for connect{} failed.",
632                           conf->name);
633 <    return (0);
633 >    return 0;
634    }
635  
636    /* Make sure this server isn't already connected
637     * Note: conf should ALWAYS be a valid C: line
638     */
639 <  if ((client_p = hash_find_server(conf->name)) != NULL)
640 <  {
639 >  if ((client_p = hash_find_server(conf->name)))
640 >  {
641      sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
642                           "Server %s already present from %s",
643                           conf->name, get_client_name(client_p, SHOW_IP));
# Line 1079 | Line 645 | serv_connect(struct MaskItem *conf, stru
645                           "Server %s already present from %s",
646                           conf->name, get_client_name(client_p, MASK_IP));
647      if (by && IsClient(by) && !MyClient(by))
648 <      sendto_one(by, ":%s NOTICE %s :Server %s already present from %s",
649 <                 me.name, by->name, conf->name,
1084 <                 get_client_name(client_p, MASK_IP));
648 >      sendto_one_notice(by, &me, ":Server %s already present from %s",
649 >                        conf->name, get_client_name(client_p, MASK_IP));
650      return 0;
651    }
652 <    
652 >
653    /* Create a local client */
654    client_p = make_client(NULL);
655  
# Line 1095 | Line 660 | serv_connect(struct MaskItem *conf, stru
660    /* We already converted the ip once, so lets use it - stu */
661    strlcpy(client_p->sockhost, buf, sizeof(client_p->sockhost));
662  
663 <  /* create a socket for the server connection */
664 <  if (comm_open(&client_p->localClient->fd, conf->addr.ss.ss_family,
1100 <                SOCK_STREAM, 0, NULL) < 0)
663 >  /* create a socket for the server connection */
664 >  if (comm_open(&client_p->localClient->fd, conf->addr.ss.ss_family, SOCK_STREAM, 0, NULL) < 0)
665    {
666      /* Eek, failure to create the socket */
667 <    report_error(L_ALL, "opening stream socket to %s: %s",
668 <                 conf->name, errno);
667 >    report_error(L_ALL, "opening stream socket to %s: %s", conf->name, errno);
668 >
669      SetDead(client_p);
670 <    exit_client(client_p, &me, "Connection failed");
670 >    exit_client(client_p, "Connection failed");
671      return 0;
672    }
673  
# Line 1118 | Line 682 | serv_connect(struct MaskItem *conf, stru
682      sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
683                           "Host %s is not enabled for connecting: no connect{} block",
684                           conf->name);
685 <    if (by && IsClient(by) && !MyClient(by))  
686 <      sendto_one(by, ":%s NOTICE %s :Connect to host %s failed.",
687 <                 me.name, by->name, client_p->name);
685 >    if (by && IsClient(by) && !MyClient(by))
686 >      sendto_one_notice(by, &me, ":Connect to host %s failed.", client_p->name);
687 >
688      SetDead(client_p);
689 <    exit_client(client_p, client_p, "Connection failed");
689 >    exit_client(client_p, "Connection failed");
690      return 0;
691    }
692  
# Line 1141 | Line 705 | serv_connect(struct MaskItem *conf, stru
705  
706    SetConnecting(client_p);
707    dlinkAdd(client_p, &client_p->node, &global_client_list);
708 <  /* from def_fam */
708 >
709    client_p->localClient->aftype = conf->aftype;
710  
711    /* Now, initiate the connection */
712 <  /* XXX assume that a non 0 type means a specific bind address
712 >  /* XXX assume that a non 0 type means a specific bind address
713     * for this connect.
714     */
715    switch (conf->aftype)
716    {
717      case AF_INET:
718        v4 = (struct sockaddr_in*)&conf->bind;
719 <      if (v4->sin_addr.s_addr != 0)
719 >      if (v4->sin_addr.s_addr)
720        {
721          struct irc_ssaddr ipn;
722          memset(&ipn, 0, sizeof(struct irc_ssaddr));
# Line 1160 | Line 724 | serv_connect(struct MaskItem *conf, stru
724          ipn.ss_port = 0;
725          memcpy(&ipn, &conf->bind, sizeof(struct irc_ssaddr));
726          comm_connect_tcp(&client_p->localClient->fd, conf->host, conf->port,
727 <                         (struct sockaddr *)&ipn, ipn.ss_len,
727 >                         (struct sockaddr *)&ipn, ipn.ss_len,
728                           serv_connect_callback, client_p, conf->aftype,
729                           CONNECTTIMEOUT);
730        }
# Line 1177 | Line 741 | serv_connect(struct MaskItem *conf, stru
741                           CONNECTTIMEOUT);
742        }
743        else
744 <        comm_connect_tcp(&client_p->localClient->fd, conf->host, conf->port,
745 <                         NULL, 0, serv_connect_callback, client_p, conf->aftype,
744 >        comm_connect_tcp(&client_p->localClient->fd, conf->host, conf->port,
745 >                         NULL, 0, serv_connect_callback, client_p, conf->aftype,
746                           CONNECTTIMEOUT);
747        break;
748   #ifdef IPV6
# Line 1192 | Line 756 | serv_connect(struct MaskItem *conf, stru
756          v6conf = (struct sockaddr_in6 *)&conf->bind;
757          v6 = (struct sockaddr_in6 *)&ipn;
758  
759 <        if (memcmp(&v6conf->sin6_addr, &v6->sin6_addr, sizeof(struct in6_addr)) != 0)
759 >        if (memcmp(&v6conf->sin6_addr, &v6->sin6_addr, sizeof(struct in6_addr)))
760          {
761            memcpy(&ipn, &conf->bind, sizeof(struct irc_ssaddr));
762            ipn.ss.ss_family = AF_INET6;
763            ipn.ss_port = 0;
764            comm_connect_tcp(&client_p->localClient->fd,
765                             conf->host, conf->port,
766 <                           (struct sockaddr *)&ipn, ipn.ss_len,
766 >                           (struct sockaddr *)&ipn, ipn.ss_len,
767                             serv_connect_callback, client_p,
768                             conf->aftype, CONNECTTIMEOUT);
769          }
# Line 1216 | Line 780 | serv_connect(struct MaskItem *conf, stru
780          }
781          else
782            comm_connect_tcp(&client_p->localClient->fd,
783 <                           conf->host, conf->port,
783 >                           conf->host, conf->port,
784                             NULL, 0, serv_connect_callback, client_p,
785                             conf->aftype, CONNECTTIMEOUT);
786        }
# Line 1240 | Line 804 | finish_ssl_server_handshake(struct Clien
804      sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
805                           "Lost connect{} block for %s", get_client_name(client_p, MASK_IP));
806  
807 <    exit_client(client_p, &me, "Lost connect{} block");
807 >    exit_client(client_p, "Lost connect{} block");
808      return;
809    }
810  
# Line 1274 | Line 838 | finish_ssl_server_handshake(struct Clien
838   static void
839   ssl_server_handshake(fde_t *fd, struct Client *client_p)
840   {
841 <  int ret;
842 <  int err;
1279 <
1280 <  ret = SSL_connect(client_p->localClient->fd.ssl);
841 >  X509 *cert = NULL;
842 >  int ret = 0;
843  
844 <  if (ret <= 0)
844 >  if ((ret = SSL_connect(client_p->localClient->fd.ssl)) <= 0)
845    {
846 <    switch ((err = SSL_get_error(client_p->localClient->fd.ssl, ret)))
846 >    switch (SSL_get_error(client_p->localClient->fd.ssl, ret))
847      {
848        case SSL_ERROR_WANT_WRITE:
849          comm_setselect(&client_p->localClient->fd, COMM_SELECT_WRITE,
# Line 1297 | Line 859 | ssl_server_handshake(fde_t *fd, struct C
859          sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
860                               "Error connecting to %s: %s", client_p->name,
861                               sslerr ? sslerr : "unknown SSL error");
862 <        exit_client(client_p, client_p, "Error during SSL handshake");
862 >        exit_client(client_p, "Error during SSL handshake");
863          return;
864        }
865      }
866    }
867  
868 +  if ((cert = SSL_get_peer_certificate(client_p->localClient->fd.ssl)))
869 +  {
870 +    int res = SSL_get_verify_result(client_p->localClient->fd.ssl);
871 +    char buf[EVP_MAX_MD_SIZE * 2 + 1] = "";
872 +    unsigned char md[EVP_MAX_MD_SIZE] = "";
873 +
874 +    if (res == X509_V_OK || res == X509_V_ERR_SELF_SIGNED_CERT_IN_CHAIN ||
875 +        res == X509_V_ERR_UNABLE_TO_VERIFY_LEAF_SIGNATURE ||
876 +        res == X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT)
877 +    {
878 +      unsigned int n = 0;
879 +
880 +      if (X509_digest(cert, EVP_sha256(), md, &n))
881 +      {
882 +        for (unsigned int i = 0; i < n; ++i)
883 +          snprintf(buf + 2 * i, 3, "%02X", md[i]);
884 +        client_p->certfp = xstrdup(buf);
885 +      }
886 +    }
887 +    else
888 +      ilog(LOG_TYPE_IRCD, "Server %s!%s@%s gave bad SSL client certificate: %d",
889 +           client_p->name, client_p->username, client_p->host, res);
890 +    X509_free(cert);
891 +  }
892 +
893    finish_ssl_server_handshake(client_p);
894   }
895  
# Line 1314 | Line 901 | ssl_connect_init(struct Client *client_p
901      ilog(LOG_TYPE_IRCD, "SSL_new() ERROR! -- %s",
902           ERR_error_string(ERR_get_error(), NULL));
903      SetDead(client_p);
904 <    exit_client(client_p, client_p, "SSL_new failed");
904 >    exit_client(client_p, "SSL_new failed");
905      return;
906    }
907  
# Line 1328 | Line 915 | ssl_connect_init(struct Client *client_p
915   #endif
916  
917   /* serv_connect_callback() - complete a server connection.
918 < *
918 > *
919   * This routine is called after the server connection attempt has
920   * completed. If unsucessful, an error is sent to ops and the client
921   * is closed. If sucessful, it goes through the initialisation/check
# Line 1342 | Line 929 | serv_connect_callback(fde_t *fd, int sta
929    struct MaskItem *conf = NULL;
930  
931    /* First, make sure its a real client! */
932 <  assert(client_p != NULL);
932 >  assert(client_p);
933    assert(&client_p->localClient->fd == fd);
934  
935    /* Next, for backward purposes, record the ip of the server */
936    memcpy(&client_p->localClient->ip, &fd->connect.hostaddr,
937           sizeof(struct irc_ssaddr));
938 +
939    /* Check the status */
940    if (status != COMM_OK)
941    {
# Line 1385 | Line 973 | serv_connect_callback(fde_t *fd, int sta
973      sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
974                           "Lost connect{} block for %s", get_client_name(client_p, MASK_IP));
975  
976 <    exit_client(client_p, &me, "Lost connect{} block");
976 >    exit_client(client_p, "Lost connect{} block");
977      return;
978    }
979  
# Line 1410 | Line 998 | serv_connect_callback(fde_t *fd, int sta
998    /* If we've been marked dead because a send failed, just exit
999     * here now and save everyone the trouble of us ever existing.
1000     */
1001 <  if (IsDead(client_p))
1001 >  if (IsDead(client_p))
1002    {
1003        sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
1004                             "%s[%s] went dead during handshake",
# Line 1440 | Line 1028 | find_servconn_in_progress(const char *na
1028        if (!match(name, cptr->name))
1029          return cptr;
1030    }
1031 <  
1031 >
1032    return NULL;
1033   }

Diff Legend

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