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 1636 by michael, Sun Nov 4 17:09:47 2012 UTC vs.
Revision 3136 by michael, Tue Mar 11 18:24:03 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 31 | Line 33
33   #include "channel.h"
34   #include "channel_mode.h"
35   #include "client.h"
34 #include "dbuf.h"
36   #include "event.h"
37   #include "fdlist.h"
38   #include "hash.h"
39   #include "irc_string.h"
39 #include "sprintf_irc.h"
40   #include "ircd.h"
41   #include "ircd_defs.h"
42   #include "s_bsd.h"
# Line 50 | Line 50
50   #include "s_user.h"
51   #include "send.h"
52   #include "memory.h"
53 < #include "channel.h" /* chcap_usage_counts stuff...*/
53 > #include "channel.h"
54   #include "parse.h"
55  
56   #define MIN_CONN_FREQ 300
57  
58 + dlink_list flatten_links;
59   static dlink_list cap_list = { NULL, NULL, 0 };
60   static void server_burst(struct Client *);
61   static void burst_all(struct Client *);
# Line 73 | Line 74 | static void burst_members(struct Client
74   *                but in no particular order.
75   */
76   void
77 < write_links_file(void* notused)
77 > write_links_file(void *notused)
78   {
79 <  MessageFileLine *next_mptr = NULL;
80 <  MessageFileLine *mptr = NULL;
81 <  MessageFileLine *currentMessageLine = NULL;
81 <  MessageFileLine *newMessageLine = NULL;
82 <  MessageFile *MessageFileptr = &ConfigFileEntry.linksfile;
83 <  FILE *file;
84 <  char buff[512];
85 <  dlink_node *ptr;
79 >  FILE *file = NULL;
80 >  dlink_node *ptr = NULL, *ptr_next = NULL;
81 >  char buff[IRCD_BUFSIZE] = { '\0' };
82  
83 <  if ((file = fopen(MessageFileptr->fileName, "w")) == NULL)
83 >  if ((file = fopen(LIPATH, "w")) == NULL)
84      return;
85  
86 <  for (mptr = MessageFileptr->contentsOfFile; mptr; mptr = next_mptr)
86 >  DLINK_FOREACH_SAFE(ptr, ptr_next, flatten_links.head)
87    {
88 <    next_mptr = mptr->next;
89 <    MyFree(mptr);
88 >    dlinkDelete(ptr, &flatten_links);
89 >    MyFree(ptr->data);
90 >    free_dlink_node(ptr);
91    }
92  
96  MessageFileptr->contentsOfFile = NULL;
97
93    DLINK_FOREACH(ptr, global_serv_list.head)
94    {
95      const struct Client *target_p = ptr->data;
96  
97 <    /* skip ourselves, we send ourselves in /links */
98 <    if (IsMe(target_p))
97 >    /*
98 >     * Skip hidden servers, aswell as ourselves, since we already send
99 >     * ourselves in /links
100 >     */
101 >    if (IsHidden(target_p) || IsMe(target_p))
102        continue;
103  
104 <    /* skip hidden servers */
107 <    if (IsHidden(target_p))
104 >    if (HasFlag(target_p, FLAGS_SERVICE) && ConfigServerHide.hide_services)
105        continue;
106  
110    newMessageLine = MyMalloc(sizeof(MessageFileLine));
111
107      /*
108       * Attempt to format the file in such a way it follows the usual links output
109       * ie  "servername uplink :hops info"
110       * Mostly for aesthetic reasons - makes it look pretty in mIRC ;)
111       * - madmax
112       */
113 <    snprintf(newMessageLine->line, sizeof(newMessageLine->line), "%s %s :1 %s",
114 <             target_p->name, me.name, target_p->info);
113 >    snprintf(buff, sizeof(buff), "%s %s :1 %s",   target_p->name,
114 >             me.name, target_p->info);
115 >    dlinkAddTail(xstrdup(buff), make_dlink_node(), &flatten_links);
116 >    snprintf(buff, sizeof(buff), "%s %s :1 %s\n", target_p->name,
117 >             me.name, target_p->info);
118  
121    if (MessageFileptr->contentsOfFile)
122    {
123      if (currentMessageLine)
124        currentMessageLine->next = newMessageLine;
125      currentMessageLine = newMessageLine;
126    }
127    else
128    {
129      MessageFileptr->contentsOfFile = newMessageLine;
130      currentMessageLine = newMessageLine;
131    }
132
133    snprintf(buff, sizeof(buff), "%s %s :1 %s\n",
134             target_p->name, me.name, target_p->info);
119      fputs(buff, file);
120    }
121  
122    fclose(file);
123   }
124  
125 + void
126 + read_links_file(void)
127 + {
128 +  FILE *file = NULL;
129 +  char *p = NULL;
130 +  char buff[IRCD_BUFSIZE] = { '\0' };
131 +
132 +  if ((file = fopen(LIPATH, "r")) == NULL)
133 +    return;
134 +
135 +  while (fgets(buff, sizeof(buff), file))
136 +  {
137 +    if ((p = strchr(buff, '\n')) != NULL)
138 +      *p = '\0';
139 +
140 +    dlinkAddTail(xstrdup(buff), make_dlink_node(), &flatten_links);
141 +  }
142 +
143 +  fclose(file);
144 + }
145 +
146   /* hunt_server()
147   *      Do the basic thing in delivering the message (command)
148   *      across the relays to the specific server (server) for
# Line 159 | Line 164 | write_links_file(void* notused)
164   */
165   int
166   hunt_server(struct Client *client_p, struct Client *source_p, const char *command,
167 <            int server, int parc, char *parv[])
167 >            const int server, const int parc, char *parv[])
168   {
169    struct Client *target_p = NULL;
170    struct Client *target_tmp = NULL;
# Line 170 | Line 175 | hunt_server(struct Client *client_p, str
175    if (parc <= server || EmptyString(parv[server]))
176      return HUNTED_ISME;
177  
178 <  if (!strcmp(parv[server], me.id) || match(parv[server], me.name))
178 >  if (!strcmp(parv[server], me.id) || !match(parv[server], me.name))
179      return HUNTED_ISME;
180  
181    /* These are to pickup matches that would cause the following
# Line 190 | Line 195 | hunt_server(struct Client *client_p, str
195      if (target_p->from == source_p->from && !MyConnect(target_p))
196        target_p = NULL;
197  
193  collapse(parv[server]);
198    wilds = has_wildcards(parv[server]);
199  
200    /* Again, if there are no wild cards involved in the server
# Line 202 | Line 206 | hunt_server(struct Client *client_p, str
206      {
207        if (!(target_p = hash_find_server(parv[server])))
208        {
209 <        sendto_one(source_p, form_str(ERR_NOSUCHSERVER),
210 <                   me.name, source_p->name, parv[server]);
207 <        return(HUNTED_NOSUCH);
209 >        sendto_one_numeric(source_p, &me, ERR_NOSUCHSERVER, parv[server]);
210 >        return HUNTED_NOSUCH;
211        }
212      }
213      else
# Line 213 | Line 216 | hunt_server(struct Client *client_p, str
216        {
217          target_tmp = ptr->data;
218  
219 <        if (match(parv[server], target_tmp->name))
219 >        if (!match(parv[server], target_tmp->name))
220          {
221            if (target_tmp->from == source_p->from && !MyConnect(target_tmp))
222              continue;
# Line 230 | Line 233 | hunt_server(struct Client *client_p, str
233    {
234      if(!IsRegistered(target_p))
235      {
236 <      sendto_one(source_p, form_str(ERR_NOSUCHSERVER),
234 <                 me.name, source_p->name, parv[server]);
236 >      sendto_one_numeric(source_p, &me, ERR_NOSUCHSERVER, parv[server]);
237        return HUNTED_NOSUCH;
238      }
239  
240      if (IsMe(target_p) || MyClient(target_p))
241        return HUNTED_ISME;
242  
243 <    if (!match(target_p->name, parv[server]))
243 >    if (match(target_p->name, parv[server]))
244        parv[server] = target_p->name;
245  
246      /* This is a little kludgy but should work... */
247 <    if (IsClient(source_p) &&
246 <        ((MyConnect(target_p) && IsCapable(target_p, CAP_TS6)) ||
247 <         (!MyConnect(target_p) && IsCapable(target_p->from, CAP_TS6))))
248 <      parv[0] = ID(source_p);
249 <
250 <    sendto_one(target_p, command, parv[0],
247 >    sendto_one(target_p, command, ID_or_name(source_p, target_p),
248                 parv[1], parv[2], parv[3], parv[4],
249                 parv[5], parv[6], parv[7], parv[8]);
250 <    return(HUNTED_PASS);
251 <  }
250 >    return HUNTED_PASS;
251 >  }
252  
253 <  sendto_one(source_p, form_str(ERR_NOSUCHSERVER),
254 <             me.name, source_p->name, parv[server]);
258 <  return(HUNTED_NOSUCH);
253 >  sendto_one_numeric(source_p, &me, ERR_NOSUCHSERVER, parv[server]);
254 >  return HUNTED_NOSUCH;
255   }
256  
257   /* try_connections()
# Line 285 | Line 281 | try_connections(void *unused)
281  
282      assert(conf->type == CONF_SERVER);
283  
284 <    /* Also when already connecting! (update holdtimes) --SRB
284 >    /* Also when already connecting! (update holdtimes) --SRB
285       */
286      if (!conf->port ||!IsConfAllowAutoConn(conf))
287        continue;
# Line 297 | Line 293 | try_connections(void *unused)
293       * made one successfull connection... [this algorithm is
294       * a bit fuzzy... -- msa >;) ]
295       */
296 <    if (conf->hold > CurrentTime)
296 >    if (conf->until > CurrentTime)
297        continue;
298  
299      if (conf->class == NULL)
# Line 306 | Line 302 | try_connections(void *unused)
302      {
303        confrq = conf->class->con_freq;
304        if (confrq < MIN_CONN_FREQ)
305 <        confrq = MIN_CONN_FREQ;
305 >        confrq = MIN_CONN_FREQ;
306      }
307  
308 <    conf->hold = CurrentTime + confrq;
308 >    conf->until = CurrentTime + confrq;
309  
310      /* Found a CONNECT config with port specified, scan clients
311       * and see if this server is already connected?
# Line 389 | Line 385 | check_server(const char *name, struct Cl
385    {
386      conf = ptr->data;
387  
388 <    if (!match(name, conf->name))
388 >    if (match(name, conf->name))
389        continue;
390  
391      error = -3;
392  
393      /* XXX: Fix me for IPv6                    */
394      /* XXX sockhost is the IPv4 ip as a string */
395 <    if (match(conf->host, client_p->host) ||
396 <        match(conf->host, client_p->sockhost))
395 >    if (!match(conf->host, client_p->host) ||
396 >        !match(conf->host, client_p->sockhost))
397      {
398        error = -2;
399  
400        if (!match_conf_password(client_p->localClient->passwd, conf))
401          return -2;
402  
403 +      if (!EmptyString(conf->certfp))
404 +        if (EmptyString(client_p->certfp) || strcasecmp(client_p->certfp, conf->certfp))
405 +          return -4;
406 +
407        server_conf = conf;
408      }
409    }
410  
411    if (server_conf == NULL)
412 <    return(error);
412 >    return error;
413  
414    attach_conf(client_p, server_conf);
415  
# Line 423 | Line 423 | check_server(const char *name, struct Cl
423      switch (server_conf->aftype)
424      {
425   #ifdef IPV6
426 <      case AF_INET6:
426 >      case AF_INET6:
427          v6 = (struct sockaddr_in6 *)&server_conf->addr;
428  
429          if (IN6_IS_ADDR_UNSPECIFIED(&v6->sin6_addr))
# Line 434 | Line 434 | check_server(const char *name, struct Cl
434          v4 = (struct sockaddr_in *)&server_conf->addr;
435  
436          if (v4->sin_addr.s_addr == INADDR_NONE)
437 <          memcpy(&server_conf->addr, &client_p->localClient->ip, sizeof(struct irc_ssaddr));
437 >          memcpy(&server_conf->addr, &client_p->localClient->ip, sizeof(struct irc_ssaddr));
438          break;
439      }
440    }
441  
442 <  return(0);
442 >  return 0;
443   }
444  
445   /* add_capability()
# Line 456 | Line 456 | add_capability(const char *capab_name, i
456   {
457    struct Capability *cap = MyMalloc(sizeof(*cap));
458  
459 <  DupString(cap->name, capab_name);
459 >  cap->name = xstrdup(capab_name);
460    cap->cap = cap_flag;
461    dlinkAdd(cap, &cap->node, &cap_list);
462  
# Line 485 | Line 485 | delete_capability(const char *capab_name
485      {
486        if (irccmp(cap->name, capab_name) == 0)
487        {
488 <        default_server_capabs &= ~(cap->cap);
489 <        dlinkDelete(ptr, &cap_list);
490 <        MyFree(cap->name);
491 <        cap->name = NULL;
492 <        MyFree(cap);
488 >        default_server_capabs &= ~(cap->cap);
489 >        dlinkDelete(ptr, &cap_list);
490 >        MyFree(cap->name);
491 >        MyFree(cap);
492        }
493      }
494    }
# Line 504 | Line 503 | delete_capability(const char *capab_name
503   * output       - 0 if not found CAPAB otherwise
504   * side effects - none
505   */
506 < int
506 > unsigned int
507   find_capability(const char *capab)
508   {
509    const dlink_node *ptr = NULL;
# Line 545 | Line 544 | send_capabilities(struct Client *client_
544  
545      if (cap->cap & (cap_can_send|default_server_capabs))
546      {
547 <      tl = ircsprintf(t, "%s ", cap->name);
547 >      tl = sprintf(t, "%s ", cap->name);
548        t += tl;
549      }
550    }
# Line 555 | Line 554 | send_capabilities(struct Client *client_
554   }
555  
556   /* sendnick_TS()
557 < *
557 > *
558   * inputs       - client (server) to send nick towards
559   *          - client to send nick for
560   * output       - NONE
# Line 564 | Line 563 | send_capabilities(struct Client *client_
563   void
564   sendnick_TS(struct Client *client_p, struct Client *target_p)
565   {
566 <  static char ubuf[12];
566 >  char ubuf[IRCD_BUFSIZE];
567  
568    if (!IsClient(target_p))
569      return;
# Line 578 | Line 577 | sendnick_TS(struct Client *client_p, str
577    }
578  
579    if (IsCapable(client_p, CAP_SVS))
580 <  {
581 <    if (HasID(target_p) && IsCapable(client_p, CAP_TS6))
582 <      sendto_one(client_p, ":%s UID %s %d %lu %s %s %s %s %s %s :%s",
583 <                 target_p->servptr->id,
584 <                 target_p->name, target_p->hopcount + 1,
585 <                 (unsigned long) target_p->tsinfo,
586 <                 ubuf, target_p->username, target_p->host,
587 <                 (MyClient(target_p) && IsIPSpoof(target_p)) ?
589 <                 "0" : target_p->sockhost, target_p->id,
590 <                 target_p->svid, target_p->info);
591 <    else
592 <      sendto_one(client_p, "NICK %s %d %lu %s %s %s %s %s :%s",
593 <                 target_p->name, target_p->hopcount + 1,
594 <                 (unsigned long) target_p->tsinfo,
595 <                 ubuf, target_p->username, target_p->host,
596 <                 target_p->servptr->name, target_p->svid,
597 <                 target_p->info);
598 <  }
580 >    sendto_one(client_p, ":%s UID %s %d %lu %s %s %s %s %s %s :%s",
581 >               target_p->servptr->id,
582 >               target_p->name, target_p->hopcount + 1,
583 >               (unsigned long) target_p->tsinfo,
584 >               ubuf, target_p->username, target_p->host,
585 >               (MyClient(target_p) && IsIPSpoof(target_p)) ?
586 >               "0" : target_p->sockhost, target_p->id,
587 >               target_p->svid, target_p->info);
588    else
589 <  {
590 <    if (HasID(target_p) && IsCapable(client_p, CAP_TS6))
591 <      sendto_one(client_p, ":%s UID %s %d %lu %s %s %s %s %s :%s",
592 <                 target_p->servptr->id,
593 <                 target_p->name, target_p->hopcount + 1,
594 <                 (unsigned long) target_p->tsinfo,
595 <                 ubuf, target_p->username, target_p->host,
596 <                 (MyClient(target_p) && IsIPSpoof(target_p)) ?
597 <                 "0" : target_p->sockhost, target_p->id, target_p->info);
598 <    else
599 <      sendto_one(client_p, "NICK %s %d %lu %s %s %s %s :%s",
611 <                 target_p->name, target_p->hopcount + 1,
612 <                 (unsigned long) target_p->tsinfo,
613 <                 ubuf, target_p->username, target_p->host,
614 <                 target_p->servptr->name, target_p->info);
615 <  }
589 >    sendto_one(client_p, ":%s UID %s %d %lu %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, target_p->info);
596 >
597 >  if (!EmptyString(target_p->certfp))
598 >    sendto_one(client_p, ":%s CERTFP %s",
599 >               ID_or_name(target_p, client_p), target_p->certfp);
600  
601    if (target_p->away[0])
602      sendto_one(client_p, ":%s AWAY :%s", ID_or_name(target_p, client_p),
# Line 628 | Line 612 | sendnick_TS(struct Client *client_p, str
612   * side effects - build up string representing capabilities of server listed
613   */
614   const char *
615 < show_capabilities(struct Client *target_p)
615 > show_capabilities(const struct Client *target_p)
616   {
617 <  static char msgbuf[IRCD_BUFSIZE];
618 <  char *t = msgbuf;
635 <  dlink_node *ptr;
617 >  static char msgbuf[IRCD_BUFSIZE] = "";
618 >  const dlink_node *ptr = NULL;
619  
620 <  t += ircsprintf(msgbuf, "TS ");
620 >  strlcpy(msgbuf, "TS", sizeof(msgbuf));
621  
622    DLINK_FOREACH(ptr, cap_list.head)
623    {
624      const struct Capability *cap = ptr->data;
625  
626 <    if (IsCapable(target_p, cap->cap))
627 <      t += ircsprintf(t, "%s ", cap->name);
626 >    if (!IsCapable(target_p, cap->cap))
627 >      continue;
628 >
629 >    strlcat(msgbuf,       " ", sizeof(msgbuf));
630 >    strlcat(msgbuf, cap->name, sizeof(msgbuf));
631    }
632  
647  *(t - 1) = '\0';
633    return msgbuf;
634   }
635  
# Line 710 | Line 695 | server_estab(struct Client *client_p)
695    /* If there is something in the serv_list, it might be this
696     * connecting server..
697     */
698 <  if (!ServerInfo.hub && serv_list.head)  
698 >  if (!ServerInfo.hub && serv_list.head)
699    {
700      if (client_p != serv_list.head->data || serv_list.head->next)
701      {
# Line 723 | Line 708 | server_estab(struct Client *client_p)
708  
709    if (IsUnknown(client_p))
710    {
711 <    /* jdc -- 1.  Use EmptyString(), not [0] index reference.
727 <     *        2.  Check conf->spasswd, not conf->passwd.
728 <     */
729 <    if (!EmptyString(conf->spasswd))
730 <      sendto_one(client_p, "PASS %s TS %d %s",
731 <                 conf->spasswd, TS_CURRENT, me.id);
711 >    sendto_one(client_p, "PASS %s TS %d %s", conf->spasswd, TS_CURRENT, me.id);
712  
713      send_capabilities(client_p, 0);
714  
# Line 739 | Line 719 | server_estab(struct Client *client_p)
719    sendto_one(client_p, "SVINFO %d %d 0 :%lu", TS_CURRENT, TS_MIN,
720               (unsigned long)CurrentTime);
721  
722 <  /* assumption here is if they passed the correct TS version, they also passed an SID */
743 <  if (IsCapable(client_p, CAP_TS6))
722 >  if (HasID(client_p))
723      hash_add_id(client_p);
724  
725    /* XXX Does this ever happen? I don't think so -db */
# Line 831 | Line 810 | server_estab(struct Client *client_p)
810  
811    fd_note(&client_p->localClient->fd, "Server: %s", client_p->name);
812  
813 <  /* Old sendto_serv_but_one() call removed because we now
814 <  ** need to send different names to different servers
815 <  ** (domain name matching) Send new server to other servers.
837 <  */
838 <  DLINK_FOREACH(ptr, serv_list.head)
839 <  {
840 <    target_p = ptr->data;
841 <
842 <    if (target_p == client_p)
843 <      continue;
813 >  sendto_server(client_p, NOCAPS, NOCAPS, ":%s SID %s 2 %s :%s%s",
814 >                me.id, client_p->name, client_p->id,
815 >                IsHidden(client_p) ? "(H) " : "", client_p->info);
816  
817 <    if (IsCapable(target_p, CAP_TS6) && HasID(client_p))
818 <      sendto_one(target_p, ":%s SID %s 2 %s :%s%s",
819 <                 me.id, client_p->name, client_p->id,
820 <                 IsHidden(client_p) ? "(H) " : "",
821 <                 client_p->info);
822 <    else
823 <      sendto_one(target_p,":%s SERVER %s 2 :%s%s",
824 <                 me.name, client_p->name,
825 <                 IsHidden(client_p) ? "(H) " : "",
826 <                 client_p->info);
827 <  }
828 <
829 <  /* Pass on my client information to the new server
830 <  **
831 <  ** First, pass only servers (idea is that if the link gets
832 <  ** cancelled beacause the server was already there,
833 <  ** there are no NICK's to be cancelled...). Of course,
834 <  ** if cancellation occurs, all this info is sent anyway,
863 <  ** and I guess the link dies when a read is attempted...? --msa
864 <  **
865 <  ** Note: Link cancellation to occur at this point means
866 <  ** that at least two servers from my fragment are building
867 <  ** up connection this other fragment at the same time, it's
868 <  ** a race condition, not the normal way of operation...
869 <  **
870 <  ** ALSO NOTE: using the get_client_name for server names--
871 <  **    see previous *WARNING*!!! (Also, original inpath
872 <  **    is destroyed...)
873 <  */
817 >  /*
818 >   * Pass on my client information to the new server
819 >   *
820 >   * First, pass only servers (idea is that if the link gets
821 >   * cancelled beacause the server was already there,
822 >   * there are no NICK's to be cancelled...). Of course,
823 >   * if cancellation occurs, all this info is sent anyway,
824 >   * and I guess the link dies when a read is attempted...? --msa
825 >   *
826 >   * Note: Link cancellation to occur at this point means
827 >   * that at least two servers from my fragment are building
828 >   * up connection this other fragment at the same time, it's
829 >   * a race condition, not the normal way of operation...
830 >   *
831 >   * ALSO NOTE: using the get_client_name for server names--
832 >   *    see previous *WARNING*!!! (Also, original inpath
833 >   *    is destroyed...)
834 >   */
835  
836    DLINK_FOREACH_PREV(ptr, global_serv_list.tail)
837    {
# Line 880 | Line 841 | server_estab(struct Client *client_p)
841      if (IsMe(target_p) || target_p->from == client_p)
842        continue;
843  
844 <    if (IsCapable(client_p, CAP_TS6))
845 <    {
846 <      if (HasID(target_p))
847 <        sendto_one(client_p, ":%s SID %s %d %s :%s%s",
848 <                   ID(target_p->servptr), target_p->name, target_p->hopcount+1,
849 <                   target_p->id, IsHidden(target_p) ? "(H) " : "",
850 <                   target_p->info);
890 <      else  /* introducing non-ts6 server */
891 <        sendto_one(client_p, ":%s SERVER %s %d :%s%s",
892 <                   ID(target_p->servptr), target_p->name, target_p->hopcount+1,
893 <                   IsHidden(target_p) ? "(H) " : "", target_p->info);
894 <    }
895 <    else
896 <      sendto_one(client_p, ":%s SERVER %s %d :%s%s",
897 <                 target_p->servptr->name, target_p->name, target_p->hopcount+1,
898 <                 IsHidden(target_p) ? "(H) " : "", target_p->info);
844 >    sendto_one(client_p, ":%s SID %s %d %s :%s%s",
845 >               ID(target_p->servptr), target_p->name, target_p->hopcount+1,
846 >               target_p->id, IsHidden(target_p) ? "(H) " : "",
847 >               target_p->info);
848 >
849 >    if (HasFlag(target_p, FLAGS_EOB))
850 >      sendto_one(client_p, ":%s EOB", ID_or_name(target_p, client_p));
851    }
852  
853    server_burst(client_p);
# Line 931 | Line 883 | server_burst(struct Client *client_p)
883  
884   /* burst_all()
885   *
886 < * inputs       - pointer to server to send burst to
886 > * inputs       - pointer to server to send burst to
887   * output       - NONE
888   * side effects - complete burst of channels/nicks is sent to client_p
889   */
# Line 950 | Line 902 | burst_all(struct Client *client_p)
902        send_channel_modes(client_p, chptr);
903  
904        if (IsCapable(client_p, CAP_TBURST))
905 <        send_tb(client_p, chptr);
905 >        send_tb(client_p, chptr);
906      }
907    }
908  
# Line 962 | Line 914 | burst_all(struct Client *client_p)
914  
915      if (!HasFlag(target_p, FLAGS_BURSTED) && target_p->from != client_p)
916        sendnick_TS(client_p, target_p);
917 <    
917 >
918      DelFlag(target_p, FLAGS_BURSTED);
919    }
920  
969  /* We send the time we started the burst, and let the remote host determine an EOB time,
970  ** as otherwise we end up sending a EOB of 0   Sending here means it gets sent last -- fl
971  */
972  /* Its simpler to just send EOB and use the time its been connected.. --fl_ */
921    if (IsCapable(client_p, CAP_EOB))
922      sendto_one(client_p, ":%s EOB", ID_or_name(&me, client_p));
923   }
# Line 1044 | Line 992 | burst_members(struct Client *client_p, s
992  
993   /* serv_connect() - initiate a server connection
994   *
995 < * inputs       - pointer to conf
995 > * inputs       - pointer to conf
996   *              - pointer to client doing the connect
997   * output       -
998   * side effects -
# Line 1096 | Line 1044 | serv_connect(struct MaskItem *conf, stru
1044     * Note: conf should ALWAYS be a valid C: line
1045     */
1046    if ((client_p = hash_find_server(conf->name)) != NULL)
1047 <  {
1047 >  {
1048      sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
1049 <                         "Server %s already present from %s",
1050 <                         conf->name, get_client_name(client_p, SHOW_IP));
1049 >                         "Server %s already present from %s",
1050 >                         conf->name, get_client_name(client_p, SHOW_IP));
1051      sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
1052 <                         "Server %s already present from %s",
1053 <                         conf->name, get_client_name(client_p, MASK_IP));
1052 >                         "Server %s already present from %s",
1053 >                         conf->name, get_client_name(client_p, MASK_IP));
1054      if (by && IsClient(by) && !MyClient(by))
1055 <      sendto_one(by, ":%s NOTICE %s :Server %s already present from %s",
1056 <                 me.name, by->name, conf->name,
1057 <                 get_client_name(client_p, MASK_IP));
1110 <    return (0);
1055 >      sendto_one_notice(by, &me, ":Server %s already present from %s",
1056 >                        conf->name, get_client_name(client_p, MASK_IP));
1057 >    return 0;
1058    }
1059 <    
1059 >
1060    /* Create a local client */
1061    client_p = make_client(NULL);
1062  
# Line 1120 | Line 1067 | serv_connect(struct MaskItem *conf, stru
1067    /* We already converted the ip once, so lets use it - stu */
1068    strlcpy(client_p->sockhost, buf, sizeof(client_p->sockhost));
1069  
1070 <  /* create a socket for the server connection */
1070 >  /* create a socket for the server connection */
1071    if (comm_open(&client_p->localClient->fd, conf->addr.ss.ss_family,
1072                  SOCK_STREAM, 0, NULL) < 0)
1073    {
1074      /* Eek, failure to create the socket */
1075 <    report_error(L_ALL,
1076 <                 "opening stream socket to %s: %s", conf->name, errno);
1075 >    report_error(L_ALL, "opening stream socket to %s: %s",
1076 >                 conf->name, errno);
1077      SetDead(client_p);
1078      exit_client(client_p, &me, "Connection failed");
1079 <    return (0);
1079 >    return 0;
1080    }
1081  
1082    /* servernames are always guaranteed under HOSTLEN chars */
# Line 1141 | Line 1088 | serv_connect(struct MaskItem *conf, stru
1088    if (!attach_connect_block(client_p, conf->name, conf->host))
1089    {
1090      sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
1091 <                         "Host %s is not enabled for connecting: no connect{} block",
1092 <                         conf->name);
1093 <    if (by && IsClient(by) && !MyClient(by))  
1094 <      sendto_one(by, ":%s NOTICE %s :Connect to host %s failed.",
1095 <                 me.name, by->name, client_p->name);
1091 >                         "Host %s is not enabled for connecting: no connect{} block",
1092 >                         conf->name);
1093 >    if (by && IsClient(by) && !MyClient(by))
1094 >      sendto_one_notice(by, &me, ":Connect to host %s failed.", client_p->name);
1095 >
1096      SetDead(client_p);
1097      exit_client(client_p, client_p, "Connection failed");
1098 <    return (0);
1098 >    return 0;
1099    }
1100  
1101    /* at this point we have a connection in progress and C/N lines
# Line 1170 | Line 1117 | serv_connect(struct MaskItem *conf, stru
1117    client_p->localClient->aftype = conf->aftype;
1118  
1119    /* Now, initiate the connection */
1120 <  /* XXX assume that a non 0 type means a specific bind address
1120 >  /* XXX assume that a non 0 type means a specific bind address
1121     * for this connect.
1122     */
1123    switch (conf->aftype)
# Line 1184 | Line 1131 | serv_connect(struct MaskItem *conf, stru
1131          ipn.ss.ss_family = AF_INET;
1132          ipn.ss_port = 0;
1133          memcpy(&ipn, &conf->bind, sizeof(struct irc_ssaddr));
1134 <        comm_connect_tcp(&client_p->localClient->fd, conf->host, conf->port,
1135 <                         (struct sockaddr *)&ipn, ipn.ss_len,
1136 <                         serv_connect_callback, client_p, conf->aftype,
1137 <                         CONNECTTIMEOUT);
1134 >        comm_connect_tcp(&client_p->localClient->fd, conf->host, conf->port,
1135 >                         (struct sockaddr *)&ipn, ipn.ss_len,
1136 >                         serv_connect_callback, client_p, conf->aftype,
1137 >                         CONNECTTIMEOUT);
1138        }
1139        else if (ServerInfo.specific_ipv4_vhost)
1140        {
# Line 1199 | Line 1146 | serv_connect(struct MaskItem *conf, stru
1146          comm_connect_tcp(&client_p->localClient->fd, conf->host, conf->port,
1147                           (struct sockaddr *)&ipn, ipn.ss_len,
1148                           serv_connect_callback, client_p, conf->aftype,
1149 <                         CONNECTTIMEOUT);
1149 >                         CONNECTTIMEOUT);
1150        }
1151        else
1152 <        comm_connect_tcp(&client_p->localClient->fd, conf->host, conf->port,
1153 <                         NULL, 0, serv_connect_callback, client_p, conf->aftype,
1152 >        comm_connect_tcp(&client_p->localClient->fd, conf->host, conf->port,
1153 >                         NULL, 0, serv_connect_callback, client_p, conf->aftype,
1154                           CONNECTTIMEOUT);
1155        break;
1156   #ifdef IPV6
1157      case AF_INET6:
1158        {
1159 <        struct irc_ssaddr ipn;
1160 <        struct sockaddr_in6 *v6;
1161 <        struct sockaddr_in6 *v6conf;
1162 <
1163 <        memset(&ipn, 0, sizeof(struct irc_ssaddr));
1164 <        v6conf = (struct sockaddr_in6 *)&conf->bind;
1165 <        v6 = (struct sockaddr_in6 *)&ipn;
1166 <
1167 <        if (memcmp(&v6conf->sin6_addr, &v6->sin6_addr,
1221 <                   sizeof(struct in6_addr)) != 0)
1222 <        {
1223 <          memcpy(&ipn, &conf->bind, sizeof(struct irc_ssaddr));
1224 <          ipn.ss.ss_family = AF_INET6;
1225 <          ipn.ss_port = 0;
1226 <          comm_connect_tcp(&client_p->localClient->fd,
1227 <                           conf->host, conf->port,
1228 <                           (struct sockaddr *)&ipn, ipn.ss_len,
1229 <                           serv_connect_callback, client_p,
1230 <                           conf->aftype, CONNECTTIMEOUT);
1231 <        }
1232 <        else if (ServerInfo.specific_ipv6_vhost)
1159 >        struct irc_ssaddr ipn;
1160 >        struct sockaddr_in6 *v6;
1161 >        struct sockaddr_in6 *v6conf;
1162 >
1163 >        memset(&ipn, 0, sizeof(struct irc_ssaddr));
1164 >        v6conf = (struct sockaddr_in6 *)&conf->bind;
1165 >        v6 = (struct sockaddr_in6 *)&ipn;
1166 >
1167 >        if (memcmp(&v6conf->sin6_addr, &v6->sin6_addr, sizeof(struct in6_addr)) != 0)
1168          {
1169 <          memcpy(&ipn, &ServerInfo.ip6, sizeof(struct irc_ssaddr));
1170 <          ipn.ss.ss_family = AF_INET6;
1171 <          ipn.ss_port = 0;
1172 <          comm_connect_tcp(&client_p->localClient->fd,
1173 <                           conf->host, conf->port,
1174 <                           (struct sockaddr *)&ipn, ipn.ss_len,
1175 <                           serv_connect_callback, client_p,
1176 <                           conf->aftype, CONNECTTIMEOUT);
1177 <        }
1178 <        else
1179 <          comm_connect_tcp(&client_p->localClient->fd,
1180 <                           conf->host, conf->port,
1181 <                           NULL, 0, serv_connect_callback, client_p,
1182 <                           conf->aftype, CONNECTTIMEOUT);
1169 >          memcpy(&ipn, &conf->bind, sizeof(struct irc_ssaddr));
1170 >          ipn.ss.ss_family = AF_INET6;
1171 >          ipn.ss_port = 0;
1172 >          comm_connect_tcp(&client_p->localClient->fd,
1173 >                           conf->host, conf->port,
1174 >                           (struct sockaddr *)&ipn, ipn.ss_len,
1175 >                           serv_connect_callback, client_p,
1176 >                           conf->aftype, CONNECTTIMEOUT);
1177 >        }
1178 >        else if (ServerInfo.specific_ipv6_vhost)
1179 >        {
1180 >          memcpy(&ipn, &ServerInfo.ip6, sizeof(struct irc_ssaddr));
1181 >          ipn.ss.ss_family = AF_INET6;
1182 >          ipn.ss_port = 0;
1183 >          comm_connect_tcp(&client_p->localClient->fd,
1184 >                           conf->host, conf->port,
1185 >                           (struct sockaddr *)&ipn, ipn.ss_len,
1186 >                           serv_connect_callback, client_p,
1187 >                           conf->aftype, CONNECTTIMEOUT);
1188 >        }
1189 >        else
1190 >          comm_connect_tcp(&client_p->localClient->fd,
1191 >                           conf->host, conf->port,
1192 >                           NULL, 0, serv_connect_callback, client_p,
1193 >                           conf->aftype, CONNECTTIMEOUT);
1194        }
1195   #endif
1196    }
1197 <  return (1);
1197 >  return 1;
1198   }
1199  
1200   #ifdef HAVE_LIBCRYPTO
# Line 1270 | Line 1216 | finish_ssl_server_handshake(struct Clien
1216      return;
1217    }
1218  
1219 <  /* jdc -- Check and send spasswd, not passwd. */
1274 <  if (!EmptyString(conf->spasswd))
1275 <    sendto_one(client_p, "PASS %s TS %d %s",
1276 <               conf->spasswd, TS_CURRENT, me.id);
1219 >  sendto_one(client_p, "PASS %s TS %d %s", conf->spasswd, TS_CURRENT, me.id);
1220  
1221    send_capabilities(client_p, 0);
1222  
# Line 1303 | Line 1246 | finish_ssl_server_handshake(struct Clien
1246   static void
1247   ssl_server_handshake(fde_t *fd, struct Client *client_p)
1248   {
1249 <  int ret;
1250 <  int err;
1308 <
1309 <  ret = SSL_connect(client_p->localClient->fd.ssl);
1249 >  X509 *cert = NULL;
1250 >  int ret = 0;
1251  
1252 <  if (ret <= 0)
1252 >  if ((ret = SSL_connect(client_p->localClient->fd.ssl)) <= 0)
1253    {
1254 <    switch ((err = SSL_get_error(client_p->localClient->fd.ssl, ret)))
1254 >    switch (SSL_get_error(client_p->localClient->fd.ssl, ret))
1255      {
1256        case SSL_ERROR_WANT_WRITE:
1257          comm_setselect(&client_p->localClient->fd, COMM_SELECT_WRITE,
# Line 1332 | Line 1273 | ssl_server_handshake(fde_t *fd, struct C
1273      }
1274    }
1275  
1276 +  if ((cert = SSL_get_peer_certificate(client_p->localClient->fd.ssl)))
1277 +  {
1278 +    int res = SSL_get_verify_result(client_p->localClient->fd.ssl);
1279 +    char buf[EVP_MAX_MD_SIZE * 2 + 1] = { '\0' };
1280 +    unsigned char md[EVP_MAX_MD_SIZE] = { '\0' };
1281 +
1282 +    if (res == X509_V_OK || res == X509_V_ERR_SELF_SIGNED_CERT_IN_CHAIN ||
1283 +        res == X509_V_ERR_UNABLE_TO_VERIFY_LEAF_SIGNATURE ||
1284 +        res == X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT)
1285 +    {
1286 +      unsigned int i = 0, n = 0;
1287 +
1288 +      if (X509_digest(cert, EVP_sha256(), md, &n))
1289 +      {
1290 +        for (; i < n; ++i)
1291 +          snprintf(buf + 2 * i, 3, "%02X", md[i]);
1292 +        client_p->certfp = xstrdup(buf);
1293 +      }
1294 +    }
1295 +    else
1296 +      ilog(LOG_TYPE_IRCD, "Server %s!%s@%s gave bad SSL client certificate: %d",
1297 +           client_p->name, client_p->username, client_p->host, res);
1298 +    X509_free(cert);
1299 +  }
1300 +
1301    finish_ssl_server_handshake(client_p);
1302   }
1303  
# Line 1357 | Line 1323 | ssl_connect_init(struct Client *client_p
1323   #endif
1324  
1325   /* serv_connect_callback() - complete a server connection.
1326 < *
1326 > *
1327   * This routine is called after the server connection attempt has
1328   * completed. If unsucessful, an error is sent to ops and the client
1329   * is closed. If sucessful, it goes through the initialisation/check
# Line 1389 | Line 1355 | serv_connect_callback(fde_t *fd, int sta
1355                              client_p->name, comm_errstr(status));
1356       else
1357         sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
1358 <                            "Error connecting to %s[%s]: %s", client_p->name,
1359 <                            client_p->host, comm_errstr(status));
1358 >                            "Error connecting to %s[%s]: %s", client_p->name,
1359 >                            client_p->host, comm_errstr(status));
1360  
1361       sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
1362 <                          "Error connecting to %s: %s",
1363 <                          client_p->name, comm_errstr(status));
1362 >                          "Error connecting to %s: %s",
1363 >                          client_p->name, comm_errstr(status));
1364  
1365       /* If a fd goes bad, call dead_link() the socket is no
1366        * longer valid for reading or writing.
# Line 1406 | Line 1372 | serv_connect_callback(fde_t *fd, int sta
1372    /* COMM_OK, so continue the connection procedure */
1373    /* Get the C/N lines */
1374    conf = find_conf_name(&client_p->localClient->confs,
1375 <                        client_p->name, CONF_SERVER);
1375 >                        client_p->name, CONF_SERVER);
1376    if (conf == NULL)
1377    {
1378      sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
1379 <                         "Lost connect{} block for %s", get_client_name(client_p, HIDE_IP));
1379 >                         "Lost connect{} block for %s", get_client_name(client_p, HIDE_IP));
1380      sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
1381 <                         "Lost connect{} block for %s", get_client_name(client_p, MASK_IP));
1381 >                         "Lost connect{} block for %s", get_client_name(client_p, MASK_IP));
1382  
1383      exit_client(client_p, &me, "Lost connect{} block");
1384      return;
# Line 1429 | Line 1395 | serv_connect_callback(fde_t *fd, int sta
1395    }
1396   #endif
1397  
1398 <  /* jdc -- Check and send spasswd, not passwd. */
1433 <  if (!EmptyString(conf->spasswd))
1434 <    sendto_one(client_p, "PASS %s TS %d %s",
1435 <               conf->spasswd, TS_CURRENT, me.id);
1398 >  sendto_one(client_p, "PASS %s TS %d %s", conf->spasswd, TS_CURRENT, me.id);
1399  
1400    send_capabilities(client_p, 0);
1401  
1402 <  sendto_one(client_p, "SERVER %s 1 :%s%s",
1403 <             me.name, ConfigServerHide.hidden ? "(H) " : "",
1441 <             me.info);
1402 >  sendto_one(client_p, "SERVER %s 1 :%s%s", me.name,
1403 >             ConfigServerHide.hidden ? "(H) " : "", me.info);
1404  
1405    /* If we've been marked dead because a send failed, just exit
1406     * here now and save everyone the trouble of us ever existing.
1407     */
1408 <  if (IsDead(client_p))
1408 >  if (IsDead(client_p))
1409    {
1410        sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
1411 <                           "%s[%s] went dead during handshake",
1411 >                           "%s[%s] went dead during handshake",
1412                             client_p->name,
1413 <                           client_p->host);
1413 >                           client_p->host);
1414        sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
1415 <                           "%s went dead during handshake", client_p->name);
1415 >                           "%s went dead during handshake", client_p->name);
1416        return;
1417    }
1418  
# Line 1470 | Line 1432 | find_servconn_in_progress(const char *na
1432      cptr = ptr->data;
1433  
1434      if (cptr && cptr->name[0])
1435 <      if (match(name, cptr->name))
1435 >      if (!match(name, cptr->name))
1436          return cptr;
1437    }
1438 <  
1438 >
1439    return NULL;
1440   }

Diff Legend

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