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/src/s_serv.c (file contents), Revision 30 by adx, Sun Oct 2 20:03:27 2005 UTC vs.
ircd-hybrid/trunk/src/s_serv.c (file contents), Revision 1793 by michael, Sun Mar 31 14:06:08 2013 UTC

# Line 19 | Line 19
19   *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307
20   *  USA
21   *
22 < *  $Id: s_serv.c,v 7.439 2005/09/29 06:35:41 metalrock Exp $
22 > *  $Id$
23   */
24  
25   #include "stdinc.h"
# Line 27 | Line 27
27   #include <openssl/rsa.h>
28   #include "rsa.h"
29   #endif
30 < #include "tools.h"
30 > #include "list.h"
31   #include "channel.h"
32   #include "channel_mode.h"
33   #include "client.h"
34 #include "common.h"
34   #include "dbuf.h"
35   #include "event.h"
36   #include "fdlist.h"
37   #include "hash.h"
38   #include "irc_string.h"
40 #include "inet_misc.h"
41 #include "sprintf_irc.h"
39   #include "ircd.h"
40   #include "ircd_defs.h"
41   #include "s_bsd.h"
45 #include "irc_getnameinfo.h"
46 #include "list.h"
42   #include "numeric.h"
43   #include "packet.h"
44   #include "irc_res.h"
45 < #include "s_conf.h"
45 > #include "conf.h"
46   #include "s_serv.h"
47 < #include "s_log.h"
48 < #include "s_stats.h"
47 > #include "log.h"
48 > #include "s_misc.h"
49   #include "s_user.h"
50   #include "send.h"
51   #include "memory.h"
52   #include "channel.h" /* chcap_usage_counts stuff...*/
53 + #include "parse.h"
54  
55   #define MIN_CONN_FREQ 300
56  
61 struct Client *uplink  = NULL;
62
63
57   static dlink_list cap_list = { NULL, NULL, 0 };
65 static unsigned long freeMask;
58   static void server_burst(struct Client *);
67 static int fork_server(struct Client *);
59   static void burst_all(struct Client *);
69 static void cjoin_all(struct Client *);
60   static void send_tb(struct Client *client_p, struct Channel *chptr);
61  
62   static CNCB serv_connect_callback;
63  
74 static void start_io(struct Client *);
64   static void burst_members(struct Client *, struct Channel *);
76 static void burst_ll_members(struct Client *, struct Channel *);
77 static void add_lazylinkchannel(struct Client *, struct Channel *);
78
79 static SlinkRplHnd slink_error;
80 static SlinkRplHnd slink_zipstats;
81
82
83 #ifdef HAVE_LIBCRYPTO
84 struct EncCapability CipherTable[] =
85 {
86 #ifdef HAVE_EVP_BF_CFB
87  { "BF/168",     CAP_ENC_BF_168,     24, CIPHER_BF     },
88  { "BF/128",     CAP_ENC_BF_128,     16, CIPHER_BF     },
89 #endif
90 #ifdef HAVE_EVP_CAST5_CFB
91  { "CAST/128",   CAP_ENC_CAST_128,   16, CIPHER_CAST   },
92 #endif
93 #ifdef HAVE_EVP_IDEA_CFB
94  { "IDEA/128",   CAP_ENC_IDEA_128,   16, CIPHER_IDEA   },
95 #endif
96 #ifdef HAVE_EVP_RC5_32_12_16_CFB
97  { "RC5.16/128", CAP_ENC_RC5_16_128, 16, CIPHER_RC5_16 },
98  { "RC5.12/128", CAP_ENC_RC5_12_128, 16, CIPHER_RC5_12 },
99  { "RC5.8/128",  CAP_ENC_RC5_8_128,  16, CIPHER_RC5_8  },
100 #endif
101 #ifdef HAVE_EVP_DES_EDE3_CFB
102  { "3DES/168",   CAP_ENC_3DES_168,   24, CIPHER_3DES   },
103 #endif
104 #ifdef HAVE_EVP_DES_CFB
105  { "DES/56",     CAP_ENC_DES_56,      8, CIPHER_DES    },
106 #endif
107  { 0,            0,                   0, 0             }
108 };
109 #endif
110
111 struct SlinkRplDef slinkrpltab[] = {
112  { SLINKRPL_ERROR,    slink_error,    SLINKRPL_FLAG_DATA },
113  { SLINKRPL_ZIPSTATS, slink_zipstats, SLINKRPL_FLAG_DATA },
114  { 0,                 0,              0 },
115 };
116
117
118 void
119 slink_error(unsigned int rpl, unsigned int len, unsigned char *data,
120            struct Client *server_p)
121 {
122  assert(rpl == SLINKRPL_ERROR);
123  assert(len < 256);
124
125  data[len-1] = '\0';
126
127  sendto_realops_flags(UMODE_ALL, L_ALL, "SlinkError for %s: %s",
128                       server_p->name, data);
129  /* XXX should this be exit_client? */
130  exit_client(server_p, &me, "servlink error -- terminating link");
131 }
132
133 void
134 slink_zipstats(unsigned int rpl, unsigned int len, unsigned char *data,
135               struct Client *server_p)
136 {
137  struct ZipStats zipstats;
138  unsigned long in = 0, in_wire = 0, out = 0, out_wire = 0;
139  int i = 0;
140
141  assert(rpl == SLINKRPL_ZIPSTATS);
142  assert(len == 16);
143  assert(IsCapable(server_p, CAP_ZIP));
144
145  /* Yes, it needs to be done this way, no we cannot let the compiler
146   * work with the pointer to the structure.  This works around a GCC
147   * bug on SPARC that affects all versions at the time of this writing.
148   * I will feed you to the creatures living in RMS's beard if you do
149   * not leave this as is, without being sure that you are not causing
150   * regression for most of our installed SPARC base.
151   * -jmallett, 04/27/2002
152   */
153  memcpy(&zipstats, &server_p->localClient->zipstats, sizeof(struct ZipStats));
154
155  in |= (data[i++] << 24);
156  in |= (data[i++] << 16);
157  in |= (data[i++] <<  8);
158  in |= (data[i++]      );
159
160  in_wire |= (data[i++] << 24);
161  in_wire |= (data[i++] << 16);
162  in_wire |= (data[i++] <<  8);
163  in_wire |= (data[i++]      );
164
165  out |= (data[i++] << 24);
166  out |= (data[i++] << 16);
167  out |= (data[i++] <<  8);
168  out |= (data[i++]      );
169
170  out_wire |= (data[i++] << 24);
171  out_wire |= (data[i++] << 16);
172  out_wire |= (data[i++] <<  8);
173  out_wire |= (data[i++]      );
174
175  /* This macro adds b to a if a plus b is not an overflow, and sets the
176   * value of a to b if it is.
177   * Add and Set if No Overflow.
178   */
179 #define ASNO(a, b) a = (a + b >= a ? a + b : b)
180
181  ASNO(zipstats.in, in);
182  ASNO(zipstats.out, out);
183  ASNO(zipstats.in_wire, in_wire);
184  ASNO(zipstats.out_wire, out_wire);
185
186  if (zipstats.in > 0)
187    zipstats.in_ratio = (((double)(zipstats.in - zipstats.in_wire) /
188                         (double)zipstats.in) * 100.00);
189  else
190    zipstats.in_ratio = 0;
191
192  if (zipstats.out > 0)
193    zipstats.out_ratio = (((double)(zipstats.out - zipstats.out_wire) /
194                          (double)zipstats.out) * 100.00);
195  else
196    zipstats.out_ratio = 0;
197
198  memcpy(&server_p->localClient->zipstats, &zipstats, sizeof (struct ZipStats));
199 }
200
201 void
202 collect_zipstats(void *unused)
203 {
204  dlink_node *ptr;
205  struct Client *target_p;
206
207  DLINK_FOREACH(ptr, serv_list.head)
208  {
209    target_p = ptr->data;
210
211    if (IsCapable(target_p, CAP_ZIP))
212    {
213      /* only bother if we haven't already got something queued... */
214      if (!target_p->localClient->slinkq)
215      {
216        target_p->localClient->slinkq     = MyMalloc(1); /* sigh.. */
217        target_p->localClient->slinkq[0]  = SLINKCMD_ZIPSTATS;
218        target_p->localClient->slinkq_ofs = 0;
219        target_p->localClient->slinkq_len = 1;
220        send_queued_slink_write(target_p);
221      }
222    }
223  }
224 }
225
226 #ifdef HAVE_LIBCRYPTO
227 struct EncCapability *
228 check_cipher(struct Client *client_p, struct AccessItem *aconf)
229 {
230  struct EncCapability *epref;
231
232  /* Use connect{} specific info if available */
233  if (aconf->cipher_preference)
234    epref = aconf->cipher_preference;
235  else
236    epref = ConfigFileEntry.default_cipher_preference;
237
238  /* If the server supports the capability in hand, return the matching
239   * conf struct.  Otherwise, return NULL (an error).
240   */
241  if (IsCapableEnc(client_p, epref->cap))
242    return(epref);
243
244  return(NULL);
245 }
246 #endif /* HAVE_LIBCRYPTO */
247
248 /* my_name_for_link()
249 * return wildcard name of my server name
250 * according to given config entry --Jto
251 */
252 const char *
253 my_name_for_link(struct ConfItem *conf)
254 {
255  struct AccessItem *aconf;
256
257  aconf = (struct AccessItem *)map_to_conf(conf);
258  if (aconf->fakename != NULL)
259    return(aconf->fakename);
260  else
261    return(me.name);
262 }
65  
66   /*
67   * write_links_file
# Line 272 | Line 74 | my_name_for_link(struct ConfItem *conf)
74   void
75   write_links_file(void* notused)
76   {
77 <  MessageFileLine *next_mptr = 0;
78 <  MessageFileLine *mptr = 0;
79 <  MessageFileLine *currentMessageLine = 0;
80 <  MessageFileLine *newMessageLine = 0;
81 <  MessageFile *MessageFileptr;
82 <  const char *p;
281 <  FBFILE *file;
77 >  MessageFileLine *next_mptr = NULL;
78 >  MessageFileLine *mptr = NULL;
79 >  MessageFileLine *currentMessageLine = NULL;
80 >  MessageFileLine *newMessageLine = NULL;
81 >  MessageFile *MessageFileptr = &ConfigFileEntry.linksfile;
82 >  FILE *file;
83    char buff[512];
84    dlink_node *ptr;
85  
86 <  MessageFileptr = &ConfigFileEntry.linksfile;
286 <
287 <  if ((file = fbopen(MessageFileptr->fileName, "w")) == NULL)
86 >  if ((file = fopen(MessageFileptr->fileName, "w")) == NULL)
87      return;
88  
89    for (mptr = MessageFileptr->contentsOfFile; mptr; mptr = next_mptr)
# Line 294 | Line 93 | write_links_file(void* notused)
93    }
94  
95    MessageFileptr->contentsOfFile = NULL;
297  currentMessageLine             = NULL;
96  
97    DLINK_FOREACH(ptr, global_serv_list.head)
98    {
99 <    size_t nbytes = 0;
302 <    struct Client *target_p = ptr->data;
99 >    const struct Client *target_p = ptr->data;
100  
101      /* skip ourselves, we send ourselves in /links */
102      if (IsMe(target_p))
103        continue;
104  
105      /* skip hidden servers */
106 <    if (IsHidden(target_p) && !ConfigServerHide.disable_hidden)
106 >    if (IsHidden(target_p))
107        continue;
108  
312    if (target_p->info[0])
313      p = target_p->info;
314    else
315      p = "(Unknown Location)";
316
109      newMessageLine = MyMalloc(sizeof(MessageFileLine));
110  
111 <    /* Attempt to format the file in such a way it follows the usual links output
111 >    /*
112 >     * Attempt to format the file in such a way it follows the usual links output
113       * ie  "servername uplink :hops info"
114       * Mostly for aesthetic reasons - makes it look pretty in mIRC ;)
115       * - madmax
116       */
117 <
118 <    /*
326 <     * For now, check this ircsprintf wont overflow - it shouldnt on a
327 <     * default config but it is configurable..
328 <     * This should be changed to an snprintf at some point, but I'm wanting to
329 <     * know if this is a cause of a bug - cryogen
330 <     */
331 <    assert(strlen(target_p->name) + strlen(me.name) + 6 + strlen(p) <=
332 <            MESSAGELINELEN);
333 <    ircsprintf(newMessageLine->line, "%s %s :1 %s",
334 <               target_p->name, me.name, p);
335 <    newMessageLine->next = NULL;
117 >    snprintf(newMessageLine->line, sizeof(newMessageLine->line), "%s %s :1 %s",
118 >             target_p->name, me.name, target_p->info);
119  
120      if (MessageFileptr->contentsOfFile)
121      {
# Line 346 | Line 129 | write_links_file(void* notused)
129        currentMessageLine = newMessageLine;
130      }
131  
132 <    nbytes = ircsprintf(buff, "%s %s :1 %s\n", target_p->name, me.name, p);
133 <    fbputs(buff, file, nbytes);
132 >    snprintf(buff, sizeof(buff), "%s %s :1 %s\n",
133 >             target_p->name, me.name, target_p->info);
134 >    fputs(buff, file);
135    }
136  
137 <  fbclose(file);
137 >  fclose(file);
138   }
139  
140   /* hunt_server()
# Line 381 | Line 165 | hunt_server(struct Client *client_p, str
165    dlink_node *ptr;
166    int wilds;
167  
168 <  /* Assume it's me, if no server
169 <   */
170 <  if (parc <= server || EmptyString(parv[server]) ||
171 <      match(me.name, parv[server]) ||
172 <      match(parv[server], me.name) ||
173 <      !strcmp(parv[server], me.id))
390 <    return(HUNTED_ISME);
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;
174  
175    /* These are to pickup matches that would cause the following
176     * message to go in the wrong direction while doing quick fast
177     * non-matching lookups.
178     */
179    if (MyClient(source_p))
180 <    target_p = find_client(parv[server]);
180 >    target_p = hash_find_client(parv[server]);
181    else
182      target_p = find_person(client_p, parv[server]);
183  
# Line 402 | Line 185 | hunt_server(struct Client *client_p, str
185      if (target_p->from == source_p->from && !MyConnect(target_p))
186        target_p = NULL;
187  
188 <  if (target_p == NULL && (target_p = find_server(parv[server])))
188 >  if (target_p == NULL && (target_p = hash_find_server(parv[server])))
189      if (target_p->from == source_p->from && !MyConnect(target_p))
190        target_p = NULL;
191  
192    collapse(parv[server]);
193 <  wilds = (strchr(parv[server], '?') || strchr(parv[server], '*'));
193 >  wilds = has_wildcards(parv[server]);
194  
195    /* Again, if there are no wild cards involved in the server
196     * name, use the hash lookup
# Line 416 | Line 199 | hunt_server(struct Client *client_p, str
199    {
200      if (!wilds)
201      {
202 <      if (!(target_p = find_server(parv[server])))
202 >      if (!(target_p = hash_find_server(parv[server])))
203        {
204          sendto_one(source_p, form_str(ERR_NOSUCHSERVER),
205 <                   me.name, parv[0], parv[server]);
205 >                   me.name, source_p->name, parv[server]);
206          return(HUNTED_NOSUCH);
207        }
208      }
# Line 429 | Line 212 | hunt_server(struct Client *client_p, str
212        {
213          target_tmp = ptr->data;
214  
215 <        if (match(parv[server], target_tmp->name))
215 >        if (!match(parv[server], target_tmp->name))
216          {
217            if (target_tmp->from == source_p->from && !MyConnect(target_tmp))
218              continue;
# Line 447 | Line 230 | hunt_server(struct Client *client_p, str
230      if(!IsRegistered(target_p))
231      {
232        sendto_one(source_p, form_str(ERR_NOSUCHSERVER),
233 <                 me.name, parv[0], parv[server]);
233 >                 me.name, source_p->name, parv[server]);
234        return HUNTED_NOSUCH;
235      }
236  
237      if (IsMe(target_p) || MyClient(target_p))
238        return HUNTED_ISME;
239  
240 <    if (!match(target_p->name, parv[server]))
240 >    if (match(target_p->name, parv[server]))
241        parv[server] = target_p->name;
242  
460    /* Deal with lazylinks */
461    client_burst_if_needed(target_p, source_p);
462
243      /* This is a little kludgy but should work... */
244      if (IsClient(source_p) &&
245          ((MyConnect(target_p) && IsCapable(target_p, CAP_TS6)) ||
# Line 473 | Line 253 | hunt_server(struct Client *client_p, str
253    }
254  
255    sendto_one(source_p, form_str(ERR_NOSUCHSERVER),
256 <             me.name, parv[0], parv[server]);
256 >             me.name, source_p->name, parv[server]);
257    return(HUNTED_NOSUCH);
258   }
259  
# Line 490 | Line 270 | hunt_server(struct Client *client_p, str
270   void
271   try_connections(void *unused)
272   {
273 <  dlink_node *ptr;
274 <  struct ConfItem *conf;
495 <  struct AccessItem *aconf;
496 <  struct ClassItem *cltmp;
273 >  dlink_node *ptr = NULL;
274 >  struct MaskItem *conf;
275    int confrq;
276  
277    /* TODO: change this to set active flag to 0 when added to event! --Habeeb */
# Line 503 | Line 281 | try_connections(void *unused)
281    DLINK_FOREACH(ptr, server_items.head)
282    {
283      conf = ptr->data;
284 <    aconf = (struct AccessItem *)map_to_conf(conf);
284 >
285 >    assert(conf->type == CONF_SERVER);
286  
287      /* Also when already connecting! (update holdtimes) --SRB
288       */
289 <    if (!(aconf->status & CONF_SERVER) || aconf->port <= 0 ||
511 <        !(IsConfAllowAutoConn(aconf)))
289 >    if (!conf->port ||!IsConfAllowAutoConn(conf))
290        continue;
291  
514    cltmp = (struct ClassItem *)map_to_conf(aconf->class_ptr);
292  
293      /* Skip this entry if the use of it is still on hold until
294       * future. Otherwise handle this entry (and set it on hold
# Line 519 | Line 296 | try_connections(void *unused)
296       * made one successfull connection... [this algorithm is
297       * a bit fuzzy... -- msa >;) ]
298       */
299 <    if (aconf->hold > CurrentTime)
299 >    if (conf->until > CurrentTime)
300        continue;
301  
302 <    if (cltmp == NULL)
302 >    if (conf->class == NULL)
303        confrq = DEFAULT_CONNECTFREQUENCY;
304      else
305      {
306 <      confrq = ConFreq(cltmp);
307 <      if (confrq < MIN_CONN_FREQ )
306 >      confrq = conf->class->con_freq;
307 >      if (confrq < MIN_CONN_FREQ)
308          confrq = MIN_CONN_FREQ;
309      }
310  
311 <    aconf->hold = CurrentTime + confrq;
311 >    conf->until = CurrentTime + confrq;
312  
313      /* Found a CONNECT config with port specified, scan clients
314       * and see if this server is already connected?
315       */
316 <    if (find_server(conf->name) != NULL)
316 >    if (hash_find_server(conf->name) != NULL)
317        continue;
318  
319 <    if (CurrUserCount(cltmp) < MaxTotal(cltmp))
319 >    if (conf->class->ref_count < conf->class->max_total)
320      {
321        /* Go to the end of the list, if not already last */
322        if (ptr->next != NULL)
# Line 560 | Line 337 | try_connections(void *unused)
337         *   -- adrian
338         */
339        if (ConfigServerHide.hide_server_ips)
340 <        sendto_realops_flags(UMODE_ALL, L_ALL, "Connection to %s activated.",
340 >        sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
341 >                             "Connection to %s activated.",
342                               conf->name);
343        else
344 <        sendto_realops_flags(UMODE_ALL, L_ALL, "Connection to %s[%s] activated.",
345 <                             conf->name, aconf->host);
344 >        sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
345 >                             "Connection to %s[%s] activated.",
346 >                             conf->name, conf->host);
347  
348 <      serv_connect(aconf, NULL);
348 >      serv_connect(conf, NULL);
349        /* We connect only one at time... */
350        return;
351      }
# Line 574 | Line 353 | try_connections(void *unused)
353   }
354  
355   int
356 < check_server(const char *name, struct Client *client_p, int cryptlink)
356 > valid_servname(const char *name)
357 > {
358 >  unsigned int length = 0;
359 >  unsigned int dots   = 0;
360 >  const char *p = name;
361 >
362 >  for (; *p; ++p)
363 >  {
364 >    if (!IsServChar(*p))
365 >      return 0;
366 >
367 >    ++length;
368 >
369 >    if (*p == '.')
370 >      ++dots;
371 >  }
372 >
373 >  return dots != 0 && length <= HOSTLEN;
374 > }
375 >
376 > int
377 > check_server(const char *name, struct Client *client_p)
378   {
379    dlink_node *ptr;
380 <  struct ConfItem *conf           = NULL;
381 <  struct ConfItem *server_conf    = NULL;
582 <  struct AccessItem *server_aconf = NULL;
583 <  struct AccessItem *aconf        = NULL;
380 >  struct MaskItem *conf        = NULL;
381 >  struct MaskItem *server_conf = NULL;
382    int error = -1;
383  
384    assert(client_p != NULL);
385  
588  if (client_p == NULL)
589    return(error);
590
591  if (strlen(name) > HOSTLEN)
592    return(-4);
593
386    /* loop through looking for all possible connect items that might work */
387    DLINK_FOREACH(ptr, server_items.head)
388    {
389      conf = ptr->data;
598    aconf = (struct AccessItem *)map_to_conf(conf);
390  
391 <    if (!match(name, conf->name))
391 >    if (match(name, conf->name))
392        continue;
393  
394      error = -3;
395  
396      /* XXX: Fix me for IPv6                    */
397      /* XXX sockhost is the IPv4 ip as a string */
398 <    if (match(aconf->host, client_p->host) ||
399 <        match(aconf->host, client_p->sockhost))
398 >    if (!match(conf->host, client_p->host) ||
399 >        !match(conf->host, client_p->sockhost))
400      {
401        error = -2;
611 #ifdef HAVE_LIBCRYPTO
612      if (cryptlink && IsConfCryptLink(aconf))
613      {
614        if (aconf->rsa_public_key)
615          server_conf = conf;
616      }
617      else if (!(cryptlink || IsConfCryptLink(aconf)))
618 #endif /* HAVE_LIBCRYPTO */
619      {
620        /* A NULL password is as good as a bad one */
621        if (EmptyString(client_p->localClient->passwd))
622          return(-2);
623
624        /* code in s_conf.c should not have allowed this to be NULL */
625        if (aconf->passwd == NULL)
626          return(-2);
402  
403 <        if (IsConfEncrypted(aconf))
404 <        {
405 <          if (strcmp(aconf->passwd,
406 <              (const char *)crypt(client_p->localClient->passwd,
632 <                                  aconf->passwd)) == 0)
633 <            server_conf = conf;
634 <        }
635 <        else
636 <        {
637 <          if (strcmp(aconf->passwd, client_p->localClient->passwd) == 0)
638 <            server_conf = conf;
639 <        }
640 <      }
403 >      if (!match_conf_password(client_p->localClient->passwd, conf))
404 >        return -2;
405 >
406 >      server_conf = conf;
407      }
408    }
409  
# Line 646 | Line 412 | check_server(const char *name, struct Cl
412  
413    attach_conf(client_p, server_conf);
414  
649  /* Now find all leaf or hub config items for this server */
650  DLINK_FOREACH(ptr, hub_items.head)
651  {
652    conf = ptr->data;
415  
416 <    if (!match(name, conf->name))
655 <      continue;
656 <    attach_conf(client_p, conf);
657 <  }
658 <
659 <  DLINK_FOREACH(ptr, leaf_items.head)
660 <  {
661 <    conf = ptr->data;
662 <
663 <    if (!match(name, conf->name))
664 <      continue;
665 <    attach_conf(client_p, conf);
666 <  }
667 <
668 <  server_aconf = (struct AccessItem *)map_to_conf(server_conf);
669 <
670 <  if (!IsConfLazyLink(server_aconf))
671 <    ClearCap(client_p, CAP_LL);
672 < #ifdef HAVE_LIBZ /* otherwise, clear it unconditionally */
673 <  if (!IsConfCompressed(server_aconf))
674 < #endif
675 <    ClearCap(client_p, CAP_ZIP);
676 <  if (!IsConfCryptLink(server_aconf))
677 <    ClearCap(client_p, CAP_ENC);
678 <  if (!IsConfTopicBurst(server_aconf))
679 <    ClearCap(client_p, CAP_TB);
680 <
681 <  /* Don't unset CAP_HUB here even if the server isn't a hub,
682 <   * it only indicates if the server thinks it's lazylinks are
683 <   * leafs or not.. if you unset it, bad things will happen
684 <   */
685 <  if (aconf != NULL)
416 >  if (server_conf != NULL)
417    {
418      struct sockaddr_in *v4;
419   #ifdef IPV6
420      struct sockaddr_in6 *v6;
421   #endif
422 <    switch (aconf->aftype)
422 >    switch (server_conf->aftype)
423      {
424   #ifdef IPV6
425        case AF_INET6:
426 <        v6 = (struct sockaddr_in6 *)&aconf->ipnum;
426 >        v6 = (struct sockaddr_in6 *)&server_conf->addr;
427  
428          if (IN6_IS_ADDR_UNSPECIFIED(&v6->sin6_addr))
429 <          memcpy(&aconf->ipnum, &client_p->localClient->ip, sizeof(struct irc_ssaddr));
429 >          memcpy(&server_conf->addr, &client_p->localClient->ip, sizeof(struct irc_ssaddr));
430          break;
431   #endif
432        case AF_INET:
433 <        v4 = (struct sockaddr_in *)&aconf->ipnum;
433 >        v4 = (struct sockaddr_in *)&server_conf->addr;
434  
435          if (v4->sin_addr.s_addr == INADDR_NONE)
436 <          memcpy(&aconf->ipnum, &client_p->localClient->ip, sizeof(struct irc_ssaddr));
436 >          memcpy(&server_conf->addr, &client_p->localClient->ip, sizeof(struct irc_ssaddr));
437          break;
438      }
439    }
# Line 722 | Line 453 | check_server(const char *name, struct Cl
453   void
454   add_capability(const char *capab_name, int cap_flag, int add_to_default)
455   {
456 <  struct Capability *cap;
456 >  struct Capability *cap = MyMalloc(sizeof(*cap));
457  
458 <  cap = (struct Capability *)MyMalloc(sizeof(*cap));
728 <  DupString(cap->name, capab_name);
458 >  cap->name = xstrdup(capab_name);
459    cap->cap = cap_flag;
460    dlinkAdd(cap, &cap->node, &cap_list);
461 +
462    if (add_to_default)
463      default_server_capabs |= cap_flag;
464   }
# Line 762 | Line 493 | delete_capability(const char *capab_name
493      }
494    }
495  
496 <  return(0);
496 >  return 0;
497   }
498  
499   /*
# Line 775 | Line 506 | delete_capability(const char *capab_name
506   int
507   find_capability(const char *capab)
508   {
509 <  dlink_node *ptr;
779 <  struct Capability *cap;
509 >  const dlink_node *ptr = NULL;
510  
511    DLINK_FOREACH(ptr, cap_list.head)
512    {
513 <    cap = ptr->data;
513 >    const struct Capability *cap = ptr->data;
514  
515 <    if (cap->cap != 0)
516 <    {
787 <      if (irccmp(cap->name, capab) == 0)
788 <        return(cap->cap);
789 <    }
515 >    if (cap->cap && !irccmp(cap->name, capab))
516 >      return cap->cap;
517    }
518 <  return(0);
518 >
519 >  return 0;
520   }
521  
522   /* send_capabilities()
523   *
524   * inputs       - Client pointer to send to
797 *              - Pointer to AccessItem (for crypt)
525   *              - int flag of capabilities that this server can send
799 *              - int flag of encryption capabilities
526   * output       - NONE
527   * side effects - send the CAPAB line to a server  -orabidoo
528   *
529   */
530   void
531 < send_capabilities(struct Client *client_p, struct AccessItem *aconf,
806 <                  int cap_can_send, int enc_can_send)
531 > send_capabilities(struct Client *client_p, int cap_can_send)
532   {
533    struct Capability *cap=NULL;
534    char msgbuf[IRCD_BUFSIZE];
535    char *t;
536    int tl;
537    dlink_node *ptr;
813 #ifdef HAVE_LIBCRYPTO
814  struct EncCapability *epref;
815  char *capend;
816  int sent_cipher = 0;
817 #endif
538  
539    t = msgbuf;
540  
# Line 824 | 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    }
831 #ifdef HAVE_LIBCRYPTO
832  if (enc_can_send)
833  {
834    capend = t;
835    strcpy(t, "ENC:");
836    t += 4;
837
838    /* use connect{} specific info if available */
839    if (aconf->cipher_preference)
840      epref = aconf->cipher_preference;
841    else
842      epref = ConfigFileEntry.default_cipher_preference;
843
844    if ((epref->cap & enc_can_send))
845    {
846      /* Leave the space -- it is removed later. */
847      tl = ircsprintf(t, "%s ", epref->name);
848      t += tl;
849      sent_cipher = 1;
850    }
551  
552 <    if (!sent_cipher)
853 <      t = capend; /* truncate string before ENC:, below */
854 <  }
855 < #endif
856 <  *(t-1) = '\0';
552 >  *(t - 1) = '\0';
553    sendto_one(client_p, "CAPAB :%s", msgbuf);
554   }
555  
556   /* sendnick_TS()
557   *
558   * inputs       - client (server) to send nick towards
559 < *              - client to send nick for
559 > *          - client to send nick for
560   * output       - NONE
561   * side effects - NICK message is sent towards given client_p
562   */
# Line 872 | Line 568 | sendnick_TS(struct Client *client_p, str
568    if (!IsClient(target_p))
569      return;
570  
571 <  send_umode(NULL, target_p, 0, IsOperHiddenAdmin(target_p) ?
876 <    SEND_UMODES & ~UMODE_ADMIN : SEND_UMODES, ubuf);
571 >  send_umode(NULL, target_p, 0, SEND_UMODES, ubuf);
572  
573    if (ubuf[0] == '\0')
574    {
# Line 881 | Line 576 | sendnick_TS(struct Client *client_p, str
576      ubuf[1] = '\0';
577    }
578  
579 <  /* XXX Both of these need to have a :me.name or :mySID!?!?! */
580 <  if (HasID(target_p) && IsCapable(client_p, CAP_TS6))
581 <    sendto_one(client_p, ":%s UID %s %d %lu %s %s %s %s %s :%s",
582 <               target_p->servptr->id,
583 <               target_p->name, target_p->hopcount + 1,
584 <               (unsigned long) target_p->tsinfo,
585 <               ubuf, target_p->username, target_p->host,
586 <           ((MyClient(target_p)&&!IsIPSpoof(target_p))?target_p->sockhost:"0"),
587 <           target_p->id, target_p->info);
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)) ?
588 >                 "0" : target_p->sockhost, target_p->id,
589 >                 target_p->svid, target_p->info);
590 >    else
591 >      sendto_one(client_p, "NICK %s %d %lu %s %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->svid,
596 >                 target_p->info);
597 >  }
598    else
894    sendto_one(client_p, "NICK %s %d %lu %s %s %s %s :%s",
895               target_p->name, target_p->hopcount + 1,
896               (unsigned long) target_p->tsinfo,
897               ubuf, target_p->username, target_p->host,
898               target_p->servptr->name, target_p->info);
899  if (IsConfAwayBurst((struct AccessItem *)map_to_conf(client_p->serv->sconf)))
900    if (!EmptyString(target_p->away))
901      sendto_one(client_p, ":%s AWAY :%s", target_p->name,
902                 target_p->away);
903
904 }
905
906 /* client_burst_if_needed()
907 *
908 * inputs       - pointer to server
909 *              - pointer to client to add
910 * output       - NONE
911 * side effects - If this client is not known by this lazyleaf, send it
912 */
913 void
914 client_burst_if_needed(struct Client *client_p, struct Client *target_p)
915 {
916  if (!ServerInfo.hub)
917    return;
918  if (!MyConnect(client_p))
919    return;
920  if (!IsCapable(client_p,CAP_LL))
921    return;
922
923  if ((target_p->lazyLinkClientExists & client_p->localClient->serverMask) == 0)
599    {
600 <    sendnick_TS(client_p, target_p);
601 <    add_lazylinkclient(client_p,target_p);
600 >    if (HasID(target_p) && IsCapable(client_p, CAP_TS6))
601 >      sendto_one(client_p, ":%s UID %s %d %lu %s %s %s %s %s :%s",
602 >                 target_p->servptr->id,
603 >                 target_p->name, target_p->hopcount + 1,
604 >                 (unsigned long) target_p->tsinfo,
605 >                 ubuf, target_p->username, target_p->host,
606 >                 (MyClient(target_p) && IsIPSpoof(target_p)) ?
607 >                 "0" : target_p->sockhost, target_p->id, target_p->info);
608 >    else
609 >      sendto_one(client_p, "NICK %s %d %lu %s %s %s %s :%s",
610 >                 target_p->name, target_p->hopcount + 1,
611 >                 (unsigned long) target_p->tsinfo,
612 >                 ubuf, target_p->username, target_p->host,
613 >                 target_p->servptr->name, target_p->info);
614    }
615 +
616 +  if (target_p->away[0])
617 +    sendto_one(client_p, ":%s AWAY :%s", ID_or_name(target_p, client_p),
618 +               target_p->away);
619 +
620   }
621  
622   /*
# Line 941 | Line 633 | show_capabilities(struct Client *target_
633    char *t = msgbuf;
634    dlink_node *ptr;
635  
636 <  t += ircsprintf(msgbuf, "TS ");
636 >  t += sprintf(msgbuf, "TS ");
637  
638    DLINK_FOREACH(ptr, cap_list.head)
639    {
640      const struct Capability *cap = ptr->data;
641  
642      if (IsCapable(target_p, cap->cap))
643 <      t += ircsprintf(t, "%s ", cap->name);
643 >      t += sprintf(t, "%s ", cap->name);
644    }
953 #ifdef HAVE_LIBCRYPTO
954  if (IsCapable(target_p, CAP_ENC) &&
955      target_p->localClient->in_cipher &&
956      target_p->localClient->out_cipher)
957    t += ircsprintf(t, "ENC:%s ",
958                    target_p->localClient->in_cipher->name);
959 #endif
960  *(t - 1) = '\0';
645  
646 <  return(msgbuf);
646 >  *(t - 1) = '\0';
647 >  return msgbuf;
648   }
649  
650   /* make_server()
# Line 973 | Line 658 | struct Server *
658   make_server(struct Client *client_p)
659   {
660    if (client_p->serv == NULL)
976  {
661      client_p->serv = MyMalloc(sizeof(struct Server));
978    client_p->serv->dep_servers = 1;
979  }
662  
663    return client_p->serv;
664   }
# Line 991 | Line 673 | void
673   server_estab(struct Client *client_p)
674   {
675    struct Client *target_p;
676 <  struct ConfItem *conf;
995 <  struct AccessItem *aconf=NULL;
676 >  struct MaskItem *conf = NULL;
677    char *host;
678    const char *inpath;
679    static char inpath_ip[HOSTLEN * 2 + USERLEN + 6];
999  dlink_node *m;
680    dlink_node *ptr;
681 + #ifdef HAVE_LIBCRYPTO
682 +  const COMP_METHOD *compression = NULL, *expansion = NULL;
683 + #endif
684  
685    assert(client_p != NULL);
686  
# Line 1006 | Line 689 | server_estab(struct Client *client_p)
689    inpath = get_client_name(client_p, MASK_IP); /* "refresh" inpath with host */
690    host   = client_p->name;
691  
692 <  if ((conf = find_conf_name(&client_p->localClient->confs, host, SERVER_TYPE))
692 >  if ((conf = find_conf_name(&client_p->localClient->confs, host, CONF_SERVER))
693        == NULL)
694    {
695      /* This shouldn't happen, better tell the ops... -A1kmm */
696 <    sendto_realops_flags(UMODE_ALL, L_ALL, "Warning: Lost connect{} block "
696 >    sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
697 >                         "Warning: Lost connect{} block "
698                           "for server %s(this shouldn't happen)!", host);
699      exit_client(client_p, &me, "Lost connect{} block!");
700      return;
# Line 1029 | Line 713 | server_estab(struct Client *client_p)
713    {
714      if (client_p != serv_list.head->data || serv_list.head->next)
715      {
716 <      ServerStats->is_ref++;
716 >      ++ServerStats.is_ref;
717        sendto_one(client_p, "ERROR :I'm a leaf not a hub");
718        exit_client(client_p, &me, "I'm a leaf");
719        return;
720      }
721    }
722  
723 <  aconf = (struct AccessItem *)map_to_conf(conf);
1040 <
1041 <  if (IsUnknown(client_p) && !IsConfCryptLink(aconf))
723 >  if (IsUnknown(client_p))
724    {
725      /* jdc -- 1.  Use EmptyString(), not [0] index reference.
726 <     *        2.  Check aconf->spasswd, not aconf->passwd.
726 >     *        2.  Check conf->spasswd, not conf->passwd.
727       */
728 <    if (!EmptyString(aconf->spasswd))
729 <    {
730 <      /* only send ts6 format PASS if we have ts6 enabled */
1049 <    if (me.id[0] != '\0')               /* Send TS 6 form only if id */
1050 <        sendto_one(client_p, "PASS %s TS %d %s",
1051 <                   aconf->spasswd, TS_CURRENT, me.id);
1052 <      else
1053 <        sendto_one(client_p, "PASS %s TS 5",
1054 <                   aconf->spasswd);
1055 <    }
728 >    if (!EmptyString(conf->spasswd))
729 >      sendto_one(client_p, "PASS %s TS %d %s",
730 >                 conf->spasswd, TS_CURRENT, me.id);
731  
732 <    /* Pass my info to the new server
1058 <     *
1059 <     * If trying to negotiate LazyLinks, pass on CAP_LL
1060 <     * If this is a HUB, pass on CAP_HUB
1061 <     * Pass on ZIP if supported
1062 <     * Pass on TB if supported.
1063 <     * - Dianora
1064 <     */
732 >    send_capabilities(client_p, 0);
733  
1066     send_capabilities(client_p, aconf,
1067       (IsConfLazyLink(aconf) ? find_capability("LL") : 0)
1068       | (IsConfCompressed(aconf) ? find_capability("ZIP") : 0)
1069       | (IsConfTopicBurst(aconf) ? find_capability("TB") : 0)
1070       , 0);
1071
1072    /* SERVER is the last command sent before switching to ziplinks.
1073     * We set TCPNODELAY on the socket to make sure it gets sent out
1074     * on the wire immediately.  Otherwise, it could be sitting in
1075     * a kernel buffer when we start sending zipped data, and the
1076     * parser on the receiving side can't hand both unzipped and zipped
1077     * data in one packet. --Rodder
1078     *
1079     * currently we only need to call send_queued_write,
1080     * Nagle is already disabled at this point --adx
1081     */
734      sendto_one(client_p, "SERVER %s 1 :%s%s",
735 <               my_name_for_link(conf),
1084 <               ConfigServerHide.hidden ? "(H) " : "",
1085 <               (me.info[0]) ? (me.info) : "IRCers United");
1086 <    send_queued_write(client_p);
735 >               me.name, ConfigServerHide.hidden ? "(H) " : "", me.info);
736    }
737  
738 <  /* Hand the server off to servlink now */
1090 <  if (IsCapable(client_p, CAP_ENC) || IsCapable(client_p, CAP_ZIP))
1091 <  {
1092 <    if (fork_server(client_p) < 0)
1093 <    {
1094 <      sendto_realops_flags(UMODE_ALL, L_ADMIN,
1095 <                           "Warning: fork failed for server %s -- check servlink_path (%s)",
1096 <                           get_client_name(client_p, HIDE_IP), ConfigFileEntry.servlink_path);
1097 <      sendto_realops_flags(UMODE_ALL, L_OPER, "Warning: fork failed for server "
1098 <                           "%s -- check servlink_path (%s)",
1099 <                           get_client_name(client_p, MASK_IP),
1100 <                           ConfigFileEntry.servlink_path);
1101 <      exit_client(client_p, &me, "fork failed");
1102 <      return;
1103 <    }
1104 <
1105 <    start_io(client_p);
1106 <    SetServlink(client_p);
1107 <  }
1108 <
1109 <  /* only send ts6 format SVINFO if we have ts6 enabled */
1110 <  sendto_one(client_p, "SVINFO %d %d 0 :%lu",
1111 <             (me.id[0] ? TS_CURRENT : 5), TS_MIN,
738 >  sendto_one(client_p, "SVINFO %d %d 0 :%lu", TS_CURRENT, TS_MIN,
739               (unsigned long)CurrentTime);
740  
741    /* assumption here is if they passed the correct TS version, they also passed an SID */
# Line 1116 | Line 743 | server_estab(struct Client *client_p)
743      hash_add_id(client_p);
744  
745    /* XXX Does this ever happen? I don't think so -db */
746 <  detach_conf(client_p, OPER_TYPE);
746 >  detach_conf(client_p, CONF_OPER);
747  
748    /* *WARNING*
749    **    In the following code in place of plain server's
# Line 1140 | Line 767 | server_estab(struct Client *client_p)
767    set_chcap_usage_counts(client_p);
768  
769    /* Some day, all these lists will be consolidated *sigh* */
770 <  dlinkAdd(client_p, &client_p->lnode, &me.serv->servers);
770 >  dlinkAdd(client_p, &client_p->lnode, &me.serv->server_list);
771  
772 <  m = dlinkFind(&unknown_list, client_p);
1146 <  assert(NULL != m);
772 >  assert(dlinkFind(&unknown_list, client_p));
773  
774 <  dlinkDelete(m, &unknown_list);
775 <  dlinkAdd(client_p, m, &serv_list);
774 >  dlink_move_node(&client_p->localClient->lclient_node,
775 >                  &unknown_list, &serv_list);
776  
777    Count.myserver++;
778  
# Line 1157 | Line 783 | server_estab(struct Client *client_p)
783    make_server(client_p);
784  
785    /* fixing eob timings.. -gnp */
786 <  client_p->firsttime = CurrentTime;
786 >  client_p->localClient->firsttime = CurrentTime;
787  
788 <  /* Show the real host/IP to admins */
789 <  sendto_realops_flags(UMODE_ALL, L_ADMIN,
1164 <                       "Link with %s established: (%s) link",
1165 <                       inpath_ip,show_capabilities(client_p));
1166 <  /* Now show the masked hostname/IP to opers */
1167 <  sendto_realops_flags(UMODE_ALL, L_OPER,
1168 <                       "Link with %s established: (%s) link",
1169 <                       inpath,show_capabilities(client_p));
1170 <  ilog(L_NOTICE, "Link with %s established: (%s) link",
1171 <       inpath_ip, show_capabilities(client_p));
1172 <
1173 <  client_p->serv->sconf = conf;
788 >  if (find_matching_name_conf(CONF_SERVICE, client_p->name, NULL, NULL, 0))
789 >    AddFlag(client_p, FLAGS_SERVICE);
790  
791 <  if (HasServlink(client_p))
791 >  /* Show the real host/IP to admins */
792 > #ifdef HAVE_LIBCRYPTO
793 >  if (client_p->localClient->fd.ssl)
794    {
795 <    /* we won't overflow FD_DESC_SZ here, as it can hold
796 <     * client_p->name + 64
797 <     */
798 <    fd_note(&client_p->localClient->fd, "slink data: %s", client_p->name);
799 <    fd_note(&client_p->localClient->ctrlfd, "slink ctrl: %s", client_p->name);
795 >    compression = SSL_get_current_compression(client_p->localClient->fd.ssl);
796 >    expansion   = SSL_get_current_expansion(client_p->localClient->fd.ssl);
797 >
798 >    sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
799 >                         "Link with %s established: [SSL: %s, Compression/Expansion method: %s/%s] (Capabilities: %s)",
800 >                         inpath_ip, ssl_get_cipher(client_p->localClient->fd.ssl),
801 >                         compression ? SSL_COMP_get_name(compression) : "NONE",
802 >                         expansion ? SSL_COMP_get_name(expansion) : "NONE",
803 >                         show_capabilities(client_p));
804 >    /* Now show the masked hostname/IP to opers */
805 >    sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
806 >                         "Link with %s established: [SSL: %s, Compression/Expansion method: %s/%s] (Capabilities: %s)",
807 >                         inpath, 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 >    ilog(LOG_TYPE_IRCD, "Link with %s established: [SSL: %s, Compression/Expansion method: %s/%s] (Capabilities: %s)",
812 >         inpath_ip, ssl_get_cipher(client_p->localClient->fd.ssl),
813 >         compression ? SSL_COMP_get_name(compression) : "NONE",
814 >         expansion ? SSL_COMP_get_name(expansion) : "NONE",
815 >         show_capabilities(client_p));
816    }
817    else
818 <    fd_note(&client_p->localClient->fd, "Server: %s", client_p->name);
818 > #endif
819 >  {
820 >    sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
821 >                         "Link with %s established: (Capabilities: %s)",
822 >                         inpath_ip, show_capabilities(client_p));
823 >    /* Now show the masked hostname/IP to opers */
824 >    sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
825 >                         "Link with %s established: (Capabilities: %s)",
826 >                         inpath, show_capabilities(client_p));
827 >    ilog(LOG_TYPE_IRCD, "Link with %s established: (Capabilities: %s)",
828 >         inpath_ip, show_capabilities(client_p));
829 >  }
830 >
831 >  fd_note(&client_p->localClient->fd, "Server: %s", client_p->name);
832  
833    /* Old sendto_serv_but_one() call removed because we now
834    ** need to send different names to different servers
# Line 1194 | Line 841 | server_estab(struct Client *client_p)
841      if (target_p == client_p)
842        continue;
843  
1197    if ((conf = target_p->serv->sconf) &&
1198         match(my_name_for_link(conf), client_p->name))
1199      continue;
1200
844      if (IsCapable(target_p, CAP_TS6) && HasID(client_p))
845        sendto_one(target_p, ":%s SID %s 2 %s :%s%s",
846                   me.id, client_p->name, client_p->id,
# Line 1228 | Line 871 | server_estab(struct Client *client_p)
871    **    is destroyed...)
872    */
873  
1231  conf = client_p->serv->sconf;
1232
874    DLINK_FOREACH_PREV(ptr, global_serv_list.tail)
875    {
876      target_p = ptr->data;
877  
878      /* target_p->from == target_p for target_p == client_p */
879 <    if (target_p->from == client_p)
1239 <      continue;
1240 <
1241 <    if (match(my_name_for_link(conf), target_p->name))
879 >    if (IsMe(target_p) || target_p->from == client_p)
880        continue;
881  
882      if (IsCapable(client_p, CAP_TS6))
# Line 1259 | Line 897 | server_estab(struct Client *client_p)
897                   IsHidden(target_p) ? "(H) " : "", target_p->info);
898    }
899  
1262  if ((ServerInfo.hub == 0) && MyConnect(client_p))
1263    uplink = client_p;
1264
900    server_burst(client_p);
901   }
902  
1268 static void
1269 start_io(struct Client *server)
1270 {
1271  struct LocalUser *lserver = server->localClient;
1272  int alloclen = 1;
1273  char *buf;
1274  dlink_node *ptr;
1275  struct dbuf_block *block;
1276
1277  /* calculate how many bytes to allocate */
1278  if (IsCapable(server, CAP_ZIP))
1279    alloclen += 6;
1280 #ifdef HAVE_LIBCRYPTO
1281  if (IsCapable(server, CAP_ENC))
1282    alloclen += 16 + lserver->in_cipher->keylen + lserver->out_cipher->keylen;
1283 #endif
1284  alloclen += dbuf_length(&lserver->buf_recvq);
1285  alloclen += dlink_list_length(&lserver->buf_recvq.blocks) * 3;
1286  alloclen += dbuf_length(&lserver->buf_sendq);
1287  alloclen += dlink_list_length(&lserver->buf_sendq.blocks) * 3;
1288
1289  /* initialize servlink control sendq */
1290  lserver->slinkq = buf = MyMalloc(alloclen);
1291  lserver->slinkq_ofs = 0;
1292  lserver->slinkq_len = alloclen;
1293
1294  if (IsCapable(server, CAP_ZIP))
1295  {
1296    /* ziplink */
1297    *buf++ = SLINKCMD_SET_ZIP_OUT_LEVEL;
1298    *buf++ = 0; /* |          */
1299    *buf++ = 1; /* \ len is 1 */
1300    *buf++ = ConfigFileEntry.compression_level;
1301    *buf++ = SLINKCMD_START_ZIP_IN;
1302    *buf++ = SLINKCMD_START_ZIP_OUT;
1303  }
1304 #ifdef HAVE_LIBCRYPTO
1305  if (IsCapable(server, CAP_ENC))
1306  {
1307    /* Decryption settings */
1308    *buf++ = SLINKCMD_SET_CRYPT_IN_CIPHER;
1309    *buf++ = 0; /* /                     (upper 8-bits of len) */
1310    *buf++ = 1; /* \ cipher id is 1 byte (lower 8-bits of len) */
1311    *buf++ = lserver->in_cipher->cipherid;
1312    *buf++ = SLINKCMD_SET_CRYPT_IN_KEY;
1313    *buf++ = 0; /* keylen < 256 */
1314    *buf++ = lserver->in_cipher->keylen;
1315    memcpy(buf, lserver->in_key, lserver->in_cipher->keylen);
1316    buf += lserver->in_cipher->keylen;
1317    /* Encryption settings */
1318    *buf++ = SLINKCMD_SET_CRYPT_OUT_CIPHER;
1319    *buf++ = 0; /* /                     (upper 8-bits of len) */
1320    *buf++ = 1; /* \ cipher id is 1 byte (lower 8-bits of len) */
1321    *buf++ = lserver->out_cipher->cipherid;
1322    *buf++ = SLINKCMD_SET_CRYPT_OUT_KEY;
1323    *buf++ = 0; /* keylen < 256 */
1324    *buf++ = lserver->out_cipher->keylen;
1325    memcpy(buf, lserver->out_key, lserver->out_cipher->keylen);
1326    buf += lserver->out_cipher->keylen;
1327    *buf++ = SLINKCMD_START_CRYPT_IN;
1328    *buf++ = SLINKCMD_START_CRYPT_OUT;
1329  }
1330 #endif
1331
1332  /* pass the whole recvq to servlink */
1333  DLINK_FOREACH (ptr, lserver->buf_recvq.blocks.head)
1334  {
1335    block = ptr->data;
1336    *buf++ = SLINKCMD_INJECT_RECVQ;
1337    *buf++ = (block->size >> 8);
1338    *buf++ = (block->size & 0xff);
1339    memcpy(buf, &block->data[0], block->size);
1340    buf += block->size;
1341  }
1342  dbuf_clear(&lserver->buf_recvq);
1343
1344  /* pass the whole sendq to servlink */
1345  DLINK_FOREACH (ptr, lserver->buf_sendq.blocks.head)
1346  {
1347    block = ptr->data;
1348    *buf++ = SLINKCMD_INJECT_SENDQ;
1349    *buf++ = (block->size >> 8);
1350    *buf++ = (block->size & 0xff);
1351    memcpy(buf, &block->data[0], block->size);
1352    buf += block->size;
1353  }
1354  dbuf_clear(&lserver->buf_sendq);
1355
1356  /* start io */
1357  *buf++ = SLINKCMD_INIT;
1358
1359  /* schedule a write */
1360  send_queued_slink_write(server);
1361 }
1362
1363 /* fork_server()
1364 *
1365 * inputs       - struct Client *server
1366 * output       - success: 0 / failure: -1
1367 * side effect  - fork, and exec SERVLINK to handle this connection
1368 */
1369 static int
1370 fork_server(struct Client *server)
1371 {
1372 #ifndef HAVE_SOCKETPAIR
1373  return -1;
1374 #else
1375  int i;
1376  int slink_fds[2][2];
1377  /* 0? - ctrl  | 1? - data  
1378   * ?0 - child | ?1 - parent */
1379
1380  if (socketpair(AF_UNIX, SOCK_STREAM, 0, slink_fds[0]) < 0)
1381    return -1;
1382  if (socketpair(AF_UNIX, SOCK_STREAM, 0, slink_fds[1]) < 0)
1383    goto free_ctrl_fds;
1384
1385  if ((i = fork()) < 0)
1386  {
1387    close(slink_fds[1][0]);  close(slink_fds[1][1]);
1388    free_ctrl_fds:
1389    close(slink_fds[0][0]);  close(slink_fds[0][1]);
1390    return -1;
1391  }
1392
1393  if (i == 0)
1394  {
1395    char fd_str[3][6];   /* store 3x sizeof("65535") */
1396    char *kid_argv[7];
1397
1398 #ifdef O_ASYNC
1399    fcntl(server->localClient->fd.fd, F_SETFL,
1400          fcntl(server->localClient->fd.fd, F_GETFL, 0) & ~O_ASYNC);
1401 #endif
1402    close_fds(&server->localClient->fd);
1403    close(slink_fds[0][1]);
1404    close(slink_fds[1][1]);
1405
1406    sprintf(fd_str[0], "%d", slink_fds[0][0]);
1407    sprintf(fd_str[1], "%d", slink_fds[1][0]);
1408    sprintf(fd_str[2], "%d", server->localClient->fd.fd);
1409
1410    kid_argv[0] = "-slink";
1411    kid_argv[1] = kid_argv[2] = fd_str[0];  /* ctrl */
1412    kid_argv[3] = kid_argv[4] = fd_str[1];  /* data */
1413    kid_argv[5] = fd_str[2];    /* network */
1414    kid_argv[6] = NULL;
1415
1416    execv(ConfigFileEntry.servlink_path, kid_argv);
1417
1418    _exit(1);
1419  }
1420
1421  /* close the network fd and the child ends of the pipes */
1422  fd_close(&server->localClient->fd);
1423  close(slink_fds[0][0]);
1424  close(slink_fds[1][0]);
1425
1426  execute_callback(setup_socket_cb, slink_fds[0][1]);
1427  execute_callback(setup_socket_cb, slink_fds[1][1]);
1428
1429  fd_open(&server->localClient->ctrlfd, slink_fds[0][1], 1, "slink ctrl");
1430  fd_open(&server->localClient->fd, slink_fds[1][1], 1, "slink data");
1431
1432  read_ctrl_packet(&server->localClient->ctrlfd, server);
1433  read_packet(&server->localClient->fd, server);
1434
1435  return 0;
1436 #endif
1437 }
1438
903   /* server_burst()
904   *
905   * inputs       - struct Client pointer server
# Line 1457 | Line 921 | server_burst(struct Client *client_p)
921    ** -orabidoo
922    */
923  
924 <  /* On a "lazy link" hubs send nothing.
1461 <   * Leafs always have to send nicks plus channels
1462 <   */
1463 <  if (IsCapable(client_p, CAP_LL))
1464 <  {
1465 <    if (!ServerInfo.hub)
1466 <    {
1467 <      /* burst all our info */
1468 <      burst_all(client_p);
1469 <
1470 <      /* Now, ask for channel info on all our current channels */
1471 <      cjoin_all(client_p);
1472 <    }
1473 <  }
1474 <  else
1475 <  {
1476 <    burst_all(client_p);
1477 <  }
924 >  burst_all(client_p);
925  
926    /* EOB stuff is now in burst_all */
927    /* Always send a PING after connect burst is done */
# Line 1490 | Line 937 | server_burst(struct Client *client_p)
937   static void
938   burst_all(struct Client *client_p)
939   {
940 <  struct Client *target_p;
1494 <  struct Channel *chptr;
1495 <  dlink_node *gptr;
1496 <  dlink_node *ptr;
940 >  dlink_node *ptr = NULL;
941  
942 <  DLINK_FOREACH(gptr, global_channel_list.head)
942 >  DLINK_FOREACH(ptr, global_channel_list.head)
943    {
944 <    chptr = gptr->data;
944 >    struct Channel *chptr = ptr->data;
945  
946      if (dlink_list_length(&chptr->members) != 0)
947      {
948        burst_members(client_p, chptr);
949        send_channel_modes(client_p, chptr);
950 <      if (IsCapable(client_p, CAP_TB))
950 >
951 >      if (IsCapable(client_p, CAP_TBURST))
952          send_tb(client_p, chptr);
953      }
954    }
# Line 1512 | Line 957 | burst_all(struct Client *client_p)
957     */
958    DLINK_FOREACH(ptr, global_client_list.head)
959    {
960 <    target_p = ptr->data;
960 >    struct Client *target_p = ptr->data;
961  
962 <    if (!IsBursted(target_p) && target_p->from != client_p)
962 >    if (!HasFlag(target_p, FLAGS_BURSTED) && target_p->from != client_p)
963        sendnick_TS(client_p, target_p);
964      
965 <    ClearBursted(target_p);
965 >    DelFlag(target_p, FLAGS_BURSTED);
966    }
967  
968    /* We send the time we started the burst, and let the remote host determine an EOB time,
# Line 1531 | Line 976 | burst_all(struct Client *client_p)
976   /*
977   * send_tb
978   *
979 < * inputs       - pointer to Client
980 < *              - pointer to channel
1536 < * output       - NONE
1537 < * side effects - Called on a server burst when
1538 < *                server is CAP_TB capable
1539 < */
1540 < static void
1541 < send_tb(struct Client *client_p, struct Channel *chptr)
1542 < {
1543 <  if (chptr->topic != NULL && IsCapable(client_p, CAP_TB))
1544 <  {
1545 <    if (ConfigChannel.burst_topicwho)
1546 <    {
1547 <      sendto_one(client_p, ":%s TB %s %lu %s :%s",
1548 <                 me.name, chptr->chname,
1549 <                 (unsigned long)chptr->topic_time,
1550 <                 chptr->topic_info, chptr->topic);
1551 <    }
1552 <    else
1553 <    {
1554 <      sendto_one(client_p, ":%s TB %s %lu :%s",
1555 <                 me.name, chptr->chname,
1556 <                 (unsigned long)chptr->topic_time, chptr->topic);
1557 <    }
1558 <  }
1559 < }
1560 <
1561 < /* cjoin_all()
1562 < *
1563 < * inputs       - server to ask for channel info from
979 > * inputs       - pointer to Client
980 > *              - pointer to channel
981   * output       - NONE
982 < * side effects - CJOINS for all the leafs known channels is sent
982 > * side effects - Called on a server burst when
983 > *                server is CAP_TBURST capable
984   */
985   static void
986 < cjoin_all(struct Client *client_p)
1569 < {
1570 <  const dlink_node *gptr = NULL;
1571 <
1572 <  DLINK_FOREACH(gptr, global_channel_list.head)
1573 <  {
1574 <    const struct Channel *chptr = gptr->data;
1575 <    sendto_one(client_p, ":%s CBURST %s",
1576 <               me.name, chptr->chname);
1577 <  }
1578 < }
1579 <
1580 < /* burst_channel()
1581 < *
1582 < * inputs       - pointer to server to send sjoins to
1583 < *              - channel pointer
1584 < * output       - none
1585 < * side effects - All sjoins for channel(s) given by chptr are sent
1586 < *                for all channel members. ONLY called by hub on
1587 < *                behalf of a lazylink so client_p is always guarunteed
1588 < *                to be a LL leaf.
1589 < */
1590 < void
1591 < burst_channel(struct Client *client_p, struct Channel *chptr)
1592 < {
1593 <  burst_ll_members(client_p, chptr);
1594 <
1595 <  send_channel_modes(client_p, chptr);
1596 <  add_lazylinkchannel(client_p,chptr);
1597 <
1598 <  if (chptr->topic != NULL && chptr->topic_info != NULL)
1599 <  {
1600 <    sendto_one(client_p, ":%s TOPIC %s %s %lu :%s",
1601 <               me.name, chptr->chname, chptr->topic_info,
1602 <               (unsigned long)chptr->topic_time, chptr->topic);
1603 <  }
1604 < }
1605 <
1606 < /* add_lazlinkchannel()
1607 < *
1608 < * inputs       - pointer to directly connected leaf server
1609 < *                being introduced to this hub
1610 < *              - pointer to channel structure being introduced
1611 < * output       - NONE
1612 < * side effects - The channel pointed to by chptr is now known
1613 < *                to be on lazyleaf server given by local_server_p.
1614 < *                mark that in the bit map and add to the list
1615 < *                of channels to examine after this newly introduced
1616 < *                server is squit off.
1617 < */
1618 < static void
1619 < add_lazylinkchannel(struct Client *local_server_p, struct Channel *chptr)
1620 < {
1621 <  assert(MyConnect(local_server_p));
1622 <
1623 <  chptr->lazyLinkChannelExists |= local_server_p->localClient->serverMask;
1624 <  dlinkAdd(chptr, make_dlink_node(), &lazylink_channels);
1625 < }
1626 <
1627 < /* add_lazylinkclient()
1628 < *
1629 < * inputs       - pointer to directly connected leaf server
1630 < *                being introduced to this hub
1631 < *              - pointer to client being introduced
1632 < * output       - NONE
1633 < * side effects - The client pointed to by client_p is now known
1634 < *                to be on lazyleaf server given by local_server_p.
1635 < *                mark that in the bit map and add to the list
1636 < *                of clients to examine after this newly introduced
1637 < *                server is squit off.
1638 < */
1639 < void
1640 < add_lazylinkclient(struct Client *local_server_p, struct Client *client_p)
1641 < {
1642 <  assert(MyConnect(local_server_p));
1643 <  client_p->lazyLinkClientExists |= local_server_p->localClient->serverMask;
1644 < }
1645 <
1646 < /* remove_lazylink_flags()
1647 < *
1648 < * inputs       - pointer to server quitting
1649 < * output       - NONE
1650 < * side effects - All the channels on the lazylink channel list are examined
1651 < *                If they hold a bit corresponding to the servermask
1652 < *                attached to client_p, clear that bit. If this bitmask
1653 < *                goes to 0, then the channel is no longer known to
1654 < *                be on any lazylink server, and can be removed from the
1655 < *                link list.
1656 < *
1657 < *                Similar is done for lazylink clients
1658 < *
1659 < *                This function must be run by the HUB on any exiting
1660 < *                lazylink leaf server, while the pointer is still valid.
1661 < *                Hence must be run from client.c in exit_one_client()
1662 < *
1663 < *                The old code scanned all channels, this code only
1664 < *                scans channels/clients on the lazylink_channels
1665 < *                lazylink_clients lists.
1666 < */
1667 < void
1668 < remove_lazylink_flags(unsigned long mask)
986 > send_tb(struct Client *client_p, struct Channel *chptr)
987   {
988 <  dlink_node *ptr;
989 <  dlink_node *next_ptr;
990 <  struct Channel *chptr;
991 <  struct Client *target_p;
992 <  unsigned long clear_mask;
993 <
994 <  if (!mask) /* On 0 mask, don't do anything */
995 <   return;
996 <
997 <  clear_mask = ~mask;
998 <  freeMask |= mask;
999 <
1000 <  DLINK_FOREACH_SAFE(ptr, next_ptr, lazylink_channels.head)
1001 <  {
1002 <    chptr = ptr->data;
1003 <
1004 <    chptr->lazyLinkChannelExists &= clear_mask;
1005 <
1006 <    if (chptr->lazyLinkChannelExists == 0)
1007 <    {
1690 <      dlinkDelete(ptr, &lazylink_channels);
1691 <      free_dlink_node(ptr);
1692 <    }
1693 <  }
1694 <
1695 <  DLINK_FOREACH(ptr, global_client_list.head)
1696 <  {
1697 <    target_p = ptr->data;
1698 <    target_p->lazyLinkClientExists &= clear_mask;
1699 <  }
988 >  /*
989 >   * We may also send an empty topic here, but only if topic_time isn't 0,
990 >   * i.e. if we had a topic that got unset.  This is required for syncing
991 >   * topics properly.
992 >   *
993 >   * Imagine the following scenario: Our downlink introduces a channel
994 >   * to us with a TS that is equal to ours, but the channel topic on
995 >   * their side got unset while the servers were in splitmode, which means
996 >   * their 'topic' is newer.  They simply wanted to unset it, so we have to
997 >   * deal with it in a more sophisticated fashion instead of just resetting
998 >   * it to their old topic they had before.  Read m_tburst.c:ms_tburst
999 >   * for further information   -Michael
1000 >   */
1001 >  if (chptr->topic_time != 0)
1002 >    sendto_one(client_p, ":%s TBURST %lu %s %lu %s :%s",
1003 >               ID_or_name(&me, client_p),
1004 >               (unsigned long)chptr->channelts, chptr->chname,
1005 >               (unsigned long)chptr->topic_time,
1006 >               chptr->topic_info,
1007 >               chptr->topic);
1008   }
1009  
1010   /* burst_members()
# Line 1718 | Line 1026 | burst_members(struct Client *client_p, s
1026      ms       = ptr->data;
1027      target_p = ms->client_p;
1028  
1029 <    if (!IsBursted(target_p))
1029 >    if (!HasFlag(target_p, FLAGS_BURSTED))
1030      {
1031 <      SetBursted(target_p);
1031 >      AddFlag(target_p, FLAGS_BURSTED);
1032  
1033        if (target_p->from != client_p)
1034          sendnick_TS(client_p, target_p);
# Line 1728 | Line 1036 | burst_members(struct Client *client_p, s
1036    }
1037   }
1038  
1731 /* burst_ll_members()
1732 *
1733 * inputs       - pointer to server to send members to
1734 *              - dlink_list pointer to membership list to send
1735 * output       - NONE
1736 * side effects - This version also has to check the bitmap for lazylink
1737 */
1738 static void
1739 burst_ll_members(struct Client *client_p, struct Channel *chptr)
1740 {
1741  struct Client *target_p;
1742  struct Membership *ms;
1743  dlink_node *ptr;
1744
1745  DLINK_FOREACH(ptr, chptr->members.head)
1746  {
1747    ms       = ptr->data;
1748    target_p = ms->client_p;
1749
1750    if ((target_p->lazyLinkClientExists & client_p->localClient->serverMask) == 0)
1751    {
1752      if (target_p->from != client_p)
1753      {
1754        add_lazylinkclient(client_p,target_p);
1755        sendnick_TS(client_p, target_p);
1756      }
1757    }
1758  }
1759 }
1760
1761 /* set_autoconn()
1762 *
1763 * inputs       - struct Client pointer to oper requesting change
1764 * output       - none
1765 * side effects - set autoconnect mode
1766 */
1767 void
1768 set_autoconn(struct Client *source_p, const char *name, int newval)
1769 {
1770  struct ConfItem *conf;
1771  struct AccessItem *aconf;
1772
1773  if (name != NULL)
1774  {
1775    conf = find_exact_name_conf(SERVER_TYPE, name, NULL, NULL);
1776    if (conf != NULL)
1777    {
1778      aconf = (struct AccessItem *)map_to_conf(conf);
1779      if (newval)
1780        SetConfAllowAutoConn(aconf);
1781      else
1782        ClearConfAllowAutoConn(aconf);
1783
1784      sendto_realops_flags(UMODE_ALL, L_ALL,
1785                           "%s has changed AUTOCONN for %s to %i",
1786                           source_p->name, name, newval);
1787      sendto_one(source_p,
1788                 ":%s NOTICE %s :AUTOCONN for %s is now set to %i",
1789                 me.name, source_p->name, name, newval);
1790    }
1791    else
1792    {
1793      sendto_one(source_p, ":%s NOTICE %s :Can't find %s",
1794                 me.name, source_p->name, name);
1795    }
1796  }
1797  else
1798  {
1799    sendto_one(source_p, ":%s NOTICE %s :Please specify a server name!",
1800               me.name, source_p->name);
1801  }
1802 }
1803
1804 void
1805 initServerMask(void)
1806 {
1807  freeMask = 0xFFFFFFFFUL;
1808 }
1809
1810 /* nextFreeMask()
1811 *
1812 * inputs       - NONE
1813 * output       - unsigned long next unused mask for use in LL
1814 * side effects -
1815 */
1816 unsigned long
1817 nextFreeMask(void)
1818 {
1819  int i;
1820  unsigned long mask = 1;
1821
1822  for (i = 0; i < 32; i++)
1823  {
1824    if (mask & freeMask)
1825    {
1826      freeMask &= ~mask;
1827      return(mask);
1828    }
1829
1830    mask <<= 1;
1831  }
1832
1833  return(0L); /* watch this special case ... */
1834 }
1835
1039   /* New server connection code
1040   * Based upon the stuff floating about in s_bsd.c
1041   *   -- adrian
# Line 1855 | Line 1058 | nextFreeMask(void)
1058   * it suceeded or not, and 0 if it fails in here somewhere.
1059   */
1060   int
1061 < serv_connect(struct AccessItem *aconf, struct Client *by)
1061 > serv_connect(struct MaskItem *conf, struct Client *by)
1062   {
1860  struct ConfItem *conf;
1063    struct Client *client_p;
1064 <  char buf[HOSTIPLEN];
1064 >  char buf[HOSTIPLEN + 1];
1065  
1066    /* conversion structs */
1067    struct sockaddr_in *v4;
1068 <  /* Make sure aconf is useful */
1069 <  assert(aconf != NULL);
1868 <
1869 <  if(aconf == NULL)
1870 <    return (0);
1068 >  /* Make sure conf is useful */
1069 >  assert(conf != NULL);
1070  
1872  /* XXX should be passing struct ConfItem in the first place */
1873  conf = unmap_conf_item(aconf);
1071  
1072 <  /* log */
1073 <  irc_getnameinfo((struct sockaddr*)&aconf->ipnum, aconf->ipnum.ss_len,
1074 <                  buf, HOSTIPLEN, NULL, 0, NI_NUMERICHOST);
1878 <  ilog(L_NOTICE, "Connect to %s[%s] @%s", aconf->user, aconf->host,
1072 >  getnameinfo((struct sockaddr *)&conf->addr, conf->addr.ss_len,
1073 >              buf, sizeof(buf), NULL, 0, NI_NUMERICHOST);
1074 >  ilog(LOG_TYPE_IRCD, "Connect to %s[%s] @%s", conf->name, conf->host,
1075         buf);
1076  
1077    /* Still processing a DNS lookup? -> exit */
1078 <  if (aconf->dns_query != NULL)
1078 >  if (conf->dns_pending)
1079    {
1080 <    sendto_realops_flags(UMODE_ALL, L_OPER,
1081 <                         "Error connecting to %s: Error during DNS lookup", conf->name);
1080 >    sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
1081 >                         "Error connecting to %s: DNS lookup for connect{} in progress.",
1082 >                         conf->name);
1083 >    return (0);
1084 >  }
1085 >
1086 >  if (conf->dns_failed)
1087 >  {
1088 >    sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
1089 >                         "Error connecting to %s: DNS lookup for connect{} failed.",
1090 >                         conf->name);
1091      return (0);
1092    }
1093  
1094    /* Make sure this server isn't already connected
1095 <   * Note: aconf should ALWAYS be a valid C: line
1095 >   * Note: conf should ALWAYS be a valid C: line
1096     */
1097 <  if ((client_p = find_server(conf->name)) != NULL)
1097 >  if ((client_p = hash_find_server(conf->name)) != NULL)
1098    {
1099 <    sendto_realops_flags(UMODE_ALL, L_ADMIN,
1099 >    sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
1100                           "Server %s already present from %s",
1101                           conf->name, get_client_name(client_p, SHOW_IP));
1102 <    sendto_realops_flags(UMODE_ALL, L_OPER,
1102 >    sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
1103                           "Server %s already present from %s",
1104                           conf->name, get_client_name(client_p, MASK_IP));
1105      if (by && IsClient(by) && !MyClient(by))
# Line 1909 | Line 1114 | serv_connect(struct AccessItem *aconf, s
1114  
1115    /* Copy in the server, hostname, fd */
1116    strlcpy(client_p->name, conf->name, sizeof(client_p->name));
1117 <  strlcpy(client_p->host, aconf->host, sizeof(client_p->host));
1117 >  strlcpy(client_p->host, conf->host, sizeof(client_p->host));
1118  
1119    /* We already converted the ip once, so lets use it - stu */
1120 <  strlcpy(client_p->sockhost, buf, HOSTIPLEN);
1120 >  strlcpy(client_p->sockhost, buf, sizeof(client_p->sockhost));
1121  
1122    /* create a socket for the server connection */
1123 <  if (comm_open(&client_p->localClient->fd, aconf->ipnum.ss.ss_family,
1123 >  if (comm_open(&client_p->localClient->fd, conf->addr.ss.ss_family,
1124                  SOCK_STREAM, 0, NULL) < 0)
1125    {
1126      /* Eek, failure to create the socket */
# Line 1932 | Line 1137 | serv_connect(struct AccessItem *aconf, s
1137    /* Attach config entries to client here rather than in
1138     * serv_connect_callback(). This to avoid null pointer references.
1139     */
1140 <  if (!attach_connect_block(client_p, conf->name, aconf->host))
1140 >  if (!attach_connect_block(client_p, conf->name, conf->host))
1141    {
1142 <    sendto_realops_flags(UMODE_ALL, L_ALL,
1143 <                         "Host %s is not enabled for connecting:no C/N-line",
1142 >    sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
1143 >                         "Host %s is not enabled for connecting: no connect{} block",
1144                           conf->name);
1145      if (by && IsClient(by) && !MyClient(by))  
1146        sendto_one(by, ":%s NOTICE %s :Connect to host %s failed.",
# Line 1961 | Line 1166 | serv_connect(struct AccessItem *aconf, s
1166    SetConnecting(client_p);
1167    dlinkAdd(client_p, &client_p->node, &global_client_list);
1168    /* from def_fam */
1169 <  client_p->localClient->aftype = aconf->aftype;
1169 >  client_p->localClient->aftype = conf->aftype;
1170  
1171    /* Now, initiate the connection */
1172    /* XXX assume that a non 0 type means a specific bind address
1173     * for this connect.
1174     */
1175 <  switch (aconf->aftype)
1175 >  switch (conf->aftype)
1176    {
1177      case AF_INET:
1178 <      v4 = (struct sockaddr_in*)&aconf->my_ipnum;
1178 >      v4 = (struct sockaddr_in*)&conf->bind;
1179        if (v4->sin_addr.s_addr != 0)
1180        {
1181          struct irc_ssaddr ipn;
1182          memset(&ipn, 0, sizeof(struct irc_ssaddr));
1183          ipn.ss.ss_family = AF_INET;
1184          ipn.ss_port = 0;
1185 <        memcpy(&ipn, &aconf->my_ipnum, sizeof(struct irc_ssaddr));
1186 <        comm_connect_tcp(&client_p->localClient->fd, aconf->host, aconf->port,
1185 >        memcpy(&ipn, &conf->bind, sizeof(struct irc_ssaddr));
1186 >        comm_connect_tcp(&client_p->localClient->fd, conf->host, conf->port,
1187                           (struct sockaddr *)&ipn, ipn.ss_len,
1188 <                         serv_connect_callback, client_p, aconf->aftype,
1188 >                         serv_connect_callback, client_p, conf->aftype,
1189                           CONNECTTIMEOUT);
1190        }
1191        else if (ServerInfo.specific_ipv4_vhost)
# Line 1990 | Line 1195 | serv_connect(struct AccessItem *aconf, s
1195          ipn.ss.ss_family = AF_INET;
1196          ipn.ss_port = 0;
1197          memcpy(&ipn, &ServerInfo.ip, sizeof(struct irc_ssaddr));
1198 <        comm_connect_tcp(&client_p->localClient->fd, aconf->host, aconf->port,
1198 >        comm_connect_tcp(&client_p->localClient->fd, conf->host, conf->port,
1199                           (struct sockaddr *)&ipn, ipn.ss_len,
1200 <                         serv_connect_callback, client_p, aconf->aftype,
1200 >                         serv_connect_callback, client_p, conf->aftype,
1201                           CONNECTTIMEOUT);
1202        }
1203        else
1204 <        comm_connect_tcp(&client_p->localClient->fd, aconf->host, aconf->port,
1205 <                         NULL, 0, serv_connect_callback, client_p, aconf->aftype,
1204 >        comm_connect_tcp(&client_p->localClient->fd, conf->host, conf->port,
1205 >                         NULL, 0, serv_connect_callback, client_p, conf->aftype,
1206                           CONNECTTIMEOUT);
1207        break;
1208   #ifdef IPV6
# Line 2008 | Line 1213 | serv_connect(struct AccessItem *aconf, s
1213          struct sockaddr_in6 *v6conf;
1214  
1215          memset(&ipn, 0, sizeof(struct irc_ssaddr));
1216 <        v6conf = (struct sockaddr_in6 *)&aconf->my_ipnum;
1216 >        v6conf = (struct sockaddr_in6 *)&conf->bind;
1217          v6 = (struct sockaddr_in6 *)&ipn;
1218  
1219          if (memcmp(&v6conf->sin6_addr, &v6->sin6_addr,
1220                     sizeof(struct in6_addr)) != 0)
1221          {
1222 <          memcpy(&ipn, &aconf->my_ipnum, sizeof(struct irc_ssaddr));
1222 >          memcpy(&ipn, &conf->bind, sizeof(struct irc_ssaddr));
1223            ipn.ss.ss_family = AF_INET6;
1224            ipn.ss_port = 0;
1225            comm_connect_tcp(&client_p->localClient->fd,
1226 <                           aconf->host, aconf->port,
1226 >                           conf->host, conf->port,
1227                             (struct sockaddr *)&ipn, ipn.ss_len,
1228                             serv_connect_callback, client_p,
1229 <                           aconf->aftype, CONNECTTIMEOUT);
1229 >                           conf->aftype, CONNECTTIMEOUT);
1230          }
1231          else if (ServerInfo.specific_ipv6_vhost)
1232          {
# Line 2029 | Line 1234 | serv_connect(struct AccessItem *aconf, s
1234            ipn.ss.ss_family = AF_INET6;
1235            ipn.ss_port = 0;
1236            comm_connect_tcp(&client_p->localClient->fd,
1237 <                           aconf->host, aconf->port,
1237 >                           conf->host, conf->port,
1238                             (struct sockaddr *)&ipn, ipn.ss_len,
1239                             serv_connect_callback, client_p,
1240 <                           aconf->aftype, CONNECTTIMEOUT);
1240 >                           conf->aftype, CONNECTTIMEOUT);
1241          }
1242          else
1243            comm_connect_tcp(&client_p->localClient->fd,
1244 <                           aconf->host, aconf->port,
1244 >                           conf->host, conf->port,
1245                             NULL, 0, serv_connect_callback, client_p,
1246 <                           aconf->aftype, CONNECTTIMEOUT);
1246 >                           conf->aftype, CONNECTTIMEOUT);
1247        }
1248   #endif
1249    }
1250    return (1);
1251   }
1252  
1253 + #ifdef HAVE_LIBCRYPTO
1254 + static void
1255 + finish_ssl_server_handshake(struct Client *client_p)
1256 + {
1257 +  struct MaskItem *conf = NULL;
1258 +
1259 +  conf = find_conf_name(&client_p->localClient->confs,
1260 +                        client_p->name, CONF_SERVER);
1261 +  if (conf == NULL)
1262 +  {
1263 +    sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
1264 +                         "Lost connect{} block for %s", get_client_name(client_p, HIDE_IP));
1265 +    sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
1266 +                         "Lost connect{} block for %s", get_client_name(client_p, MASK_IP));
1267 +
1268 +    exit_client(client_p, &me, "Lost connect{} block");
1269 +    return;
1270 +  }
1271 +
1272 +  /* jdc -- Check and send spasswd, not passwd. */
1273 +  if (!EmptyString(conf->spasswd))
1274 +    sendto_one(client_p, "PASS %s TS %d %s",
1275 +               conf->spasswd, TS_CURRENT, me.id);
1276 +
1277 +  send_capabilities(client_p, 0);
1278 +
1279 +  sendto_one(client_p, "SERVER %s 1 :%s%s",
1280 +             me.name, ConfigServerHide.hidden ? "(H) " : "",
1281 +             me.info);
1282 +
1283 +  /* If we've been marked dead because a send failed, just exit
1284 +   * here now and save everyone the trouble of us ever existing.
1285 +   */
1286 +  if (IsDead(client_p))
1287 +  {
1288 +      sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
1289 +                           "%s[%s] went dead during handshake",
1290 +                           client_p->name,
1291 +                           client_p->host);
1292 +      sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
1293 +                           "%s went dead during handshake", client_p->name);
1294 +      return;
1295 +  }
1296 +
1297 +  /* don't move to serv_list yet -- we haven't sent a burst! */
1298 +  /* If we get here, we're ok, so lets start reading some data */
1299 +  comm_setselect(&client_p->localClient->fd, COMM_SELECT_READ, read_packet, client_p, 0);
1300 + }
1301 +
1302 + static void
1303 + ssl_server_handshake(fde_t *fd, struct Client *client_p)
1304 + {
1305 +  int ret;
1306 +  int err;
1307 +
1308 +  ret = SSL_connect(client_p->localClient->fd.ssl);
1309 +
1310 +  if (ret <= 0)
1311 +  {
1312 +    switch ((err = SSL_get_error(client_p->localClient->fd.ssl, ret)))
1313 +    {
1314 +      case SSL_ERROR_WANT_WRITE:
1315 +        comm_setselect(&client_p->localClient->fd, COMM_SELECT_WRITE,
1316 +                       (PF *)ssl_server_handshake, client_p, 0);
1317 +        return;
1318 +      case SSL_ERROR_WANT_READ:
1319 +        comm_setselect(&client_p->localClient->fd, COMM_SELECT_READ,
1320 +                       (PF *)ssl_server_handshake, client_p, 0);
1321 +        return;
1322 +      default:
1323 +      {
1324 +        const char *sslerr = ERR_error_string(ERR_get_error(), NULL);
1325 +        sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
1326 +                             "Error connecting to %s: %s", client_p->name,
1327 +                             sslerr ? sslerr : "unknown SSL error");
1328 +        exit_client(client_p, client_p, "Error during SSL handshake");
1329 +        return;
1330 +      }
1331 +    }
1332 +  }
1333 +
1334 +  finish_ssl_server_handshake(client_p);
1335 + }
1336 +
1337 + static void
1338 + ssl_connect_init(struct Client *client_p, struct MaskItem *conf, fde_t *fd)
1339 + {
1340 +  if ((client_p->localClient->fd.ssl = SSL_new(ServerInfo.client_ctx)) == NULL)
1341 +  {
1342 +    ilog(LOG_TYPE_IRCD, "SSL_new() ERROR! -- %s",
1343 +         ERR_error_string(ERR_get_error(), NULL));
1344 +    SetDead(client_p);
1345 +    exit_client(client_p, client_p, "SSL_new failed");
1346 +    return;
1347 +  }
1348 +
1349 +  SSL_set_fd(fd->ssl, fd->fd);
1350 +
1351 +  if (!EmptyString(conf->cipher_list))
1352 +    SSL_set_cipher_list(client_p->localClient->fd.ssl, conf->cipher_list);
1353 +
1354 +  ssl_server_handshake(NULL, client_p);
1355 + }
1356 + #endif
1357 +
1358   /* serv_connect_callback() - complete a server connection.
1359   *
1360   * This routine is called after the server connection attempt has
# Line 2057 | Line 1367 | static void
1367   serv_connect_callback(fde_t *fd, int status, void *data)
1368   {
1369    struct Client *client_p = data;
1370 <  struct ConfItem *conf=NULL;
2061 <  struct AccessItem *aconf=NULL;
1370 >  struct MaskItem *conf = NULL;
1371  
1372    /* First, make sure its a real client! */
1373    assert(client_p != NULL);
# Line 2074 | Line 1383 | serv_connect_callback(fde_t *fd, int sta
1383       * Admins get to see any IP, mere opers don't *sigh*
1384       */
1385       if (ConfigServerHide.hide_server_ips)
1386 <       sendto_realops_flags(UMODE_ALL, L_ADMIN,
1386 >       sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
1387                              "Error connecting to %s: %s",
1388                              client_p->name, comm_errstr(status));
1389       else
1390 <       sendto_realops_flags(UMODE_ALL, L_ADMIN,
1390 >       sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
1391                              "Error connecting to %s[%s]: %s", client_p->name,
1392                              client_p->host, comm_errstr(status));
1393  
1394 <     sendto_realops_flags(UMODE_ALL, L_OPER,
1394 >     sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
1395                            "Error connecting to %s: %s",
1396                            client_p->name, comm_errstr(status));
1397  
# Line 2096 | Line 1405 | serv_connect_callback(fde_t *fd, int sta
1405    /* COMM_OK, so continue the connection procedure */
1406    /* Get the C/N lines */
1407    conf = find_conf_name(&client_p->localClient->confs,
1408 <                        client_p->name, SERVER_TYPE);
1408 >                        client_p->name, CONF_SERVER);
1409    if (conf == NULL)
1410    {
1411 <    sendto_realops_flags(UMODE_ALL, L_ADMIN,
1411 >    sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
1412                           "Lost connect{} block for %s", get_client_name(client_p, HIDE_IP));
1413 <    sendto_realops_flags(UMODE_ALL, L_OPER,
1413 >    sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
1414                           "Lost connect{} block for %s", get_client_name(client_p, MASK_IP));
1415  
1416      exit_client(client_p, &me, "Lost connect{} block");
1417      return;
1418    }
1419  
2111  aconf = (struct AccessItem *)map_to_conf(conf);
1420    /* Next, send the initial handshake */
1421    SetHandshake(client_p);
1422  
1423   #ifdef HAVE_LIBCRYPTO
1424 <  /* Handle all CRYPTLINK links in cryptlink_init */
2117 <  if (IsConfCryptLink(aconf))
1424 >  if (IsConfSSL(conf))
1425    {
1426 <    cryptlink_init(client_p, conf, fd);
1426 >    ssl_connect_init(client_p, conf, fd);
1427      return;
1428    }
1429   #endif
1430  
1431    /* jdc -- Check and send spasswd, not passwd. */
1432 <  if (!EmptyString(aconf->spasswd) && (me.id[0] != '\0'))
2126 <      /* Send TS 6 form only if id */
1432 >  if (!EmptyString(conf->spasswd))
1433      sendto_one(client_p, "PASS %s TS %d %s",
1434 <               aconf->spasswd, TS_CURRENT, me.id);
2129 <  else
2130 <    sendto_one(client_p, "PASS %s TS 5",
2131 <               aconf->spasswd);
1434 >               conf->spasswd, TS_CURRENT, me.id);
1435  
1436 <  /* Pass my info to the new server
2134 <   *
2135 <   * If trying to negotiate LazyLinks, pass on CAP_LL
2136 <   * If this is a HUB, pass on CAP_HUB
2137 <   * Pass on ZIP if supported
2138 <   * Pass on TB if supported.
2139 <   * - Dianora
2140 <   */
2141 <  send_capabilities(client_p, aconf,
2142 <                    (IsConfLazyLink(aconf) ? find_capability("LL") : 0)
2143 <                    | (IsConfCompressed(aconf) ? find_capability("ZIP") : 0)
2144 <                    | (IsConfTopicBurst(aconf) ? find_capability("TB") : 0)
2145 <                    , 0);
1436 >  send_capabilities(client_p, 0);
1437  
1438    sendto_one(client_p, "SERVER %s 1 :%s%s",
1439 <             my_name_for_link(conf),
2149 <             ConfigServerHide.hidden ? "(H) " : "",
1439 >             me.name, ConfigServerHide.hidden ? "(H) " : "",
1440               me.info);
1441  
1442    /* If we've been marked dead because a send failed, just exit
# Line 2154 | Line 1444 | serv_connect_callback(fde_t *fd, int sta
1444     */
1445    if (IsDead(client_p))
1446    {
1447 <      sendto_realops_flags(UMODE_ALL, L_ADMIN,
1447 >      sendto_realops_flags(UMODE_ALL, L_ADMIN, SEND_NOTICE,
1448                             "%s[%s] went dead during handshake",
1449                             client_p->name,
1450                             client_p->host);
1451 <      sendto_realops_flags(UMODE_ALL, L_OPER,
1451 >      sendto_realops_flags(UMODE_ALL, L_OPER, SEND_NOTICE,
1452                             "%s went dead during handshake", client_p->name);
1453        return;
1454    }
# Line 2179 | Line 1469 | find_servconn_in_progress(const char *na
1469      cptr = ptr->data;
1470  
1471      if (cptr && cptr->name[0])
1472 <      if (match(cptr->name, name) || match(name, cptr->name))
1472 >      if (!match(name, cptr->name))
1473          return cptr;
1474    }
1475    
1476    return NULL;
1477   }
2188
2189 #ifdef HAVE_LIBCRYPTO
2190 /*
2191 * sends a CRYPTLINK SERV command.
2192 */
2193 void
2194 cryptlink_init(struct Client *client_p, struct ConfItem *conf, fde_t *fd)
2195 {
2196  struct AccessItem *aconf;
2197  char *encrypted;
2198  unsigned char *key_to_send;
2199  char randkey[CIPHERKEYLEN];
2200  int enc_len;
2201
2202  /* get key */
2203  if ((!ServerInfo.rsa_private_key) ||
2204      (!RSA_check_key(ServerInfo.rsa_private_key)) )
2205  {
2206    cryptlink_error(client_p, "SERV", "Invalid RSA private key",
2207                                      "Invalid RSA private key");
2208    return;
2209  }
2210
2211  aconf = (struct AccessItem *)map_to_conf(conf);
2212
2213  if (aconf->rsa_public_key == NULL)
2214  {
2215    cryptlink_error(client_p, "SERV", "Invalid RSA public key",
2216                                      "Invalid RSA public key");
2217    return;
2218  }
2219
2220  if (get_randomness((unsigned char *)randkey, CIPHERKEYLEN) != 1)
2221  {
2222    cryptlink_error(client_p, "SERV", "Couldn't generate keyphrase",
2223                                      "Couldn't generate keyphrase");
2224    return;
2225  }
2226
2227  encrypted = MyMalloc(RSA_size(ServerInfo.rsa_private_key));
2228  enc_len   = RSA_public_encrypt(CIPHERKEYLEN,
2229                                 (unsigned char *)randkey,
2230                                 (unsigned char *)encrypted,
2231                                 aconf->rsa_public_key,
2232                                 RSA_PKCS1_PADDING);
2233
2234  memcpy(client_p->localClient->in_key, randkey, CIPHERKEYLEN);
2235
2236  if (enc_len <= 0)
2237  {
2238    report_crypto_errors();
2239    MyFree(encrypted);
2240    cryptlink_error(client_p, "SERV", "Couldn't encrypt data",
2241                                      "Couldn't encrypt data");
2242    return;
2243  }
2244
2245  if (!(base64_block(&key_to_send, encrypted, enc_len)))
2246  {
2247    MyFree(encrypted);
2248    cryptlink_error(client_p, "SERV", "Couldn't base64 encode key",
2249                                      "Couldn't base64 encode key");
2250    return;
2251  }
2252
2253  send_capabilities(client_p, aconf,
2254                    (IsConfLazyLink(aconf) ? find_capability("LL") : 0)
2255                    | (IsConfCompressed(aconf) ? find_capability("ZIP") : 0)
2256                    | (IsConfTopicBurst(aconf) ? find_capability("TB") : 0)
2257                    , CAP_ENC_MASK);
2258
2259  sendto_one(client_p, "CRYPTLINK SERV %s %s :%s%s",
2260             my_name_for_link(conf), key_to_send,
2261             ConfigServerHide.hidden ? "(H) " : "", me.info);
2262
2263  SetHandshake(client_p);
2264  SetWaitAuth(client_p);
2265
2266  MyFree(encrypted);
2267  MyFree(key_to_send);
2268
2269  if (IsDead(client_p))
2270    cryptlink_error(client_p, "SERV", "Went dead during handshake",
2271                                      "Went dead during handshake");
2272  else if (fd != NULL)
2273    /* If we get here, we're ok, so lets start reading some data */
2274    comm_setselect(fd, COMM_SELECT_READ, read_packet, client_p, 0);
2275 }
2276
2277 void
2278 cryptlink_error(struct Client *client_p, const char *type,
2279                const char *reason, const char *client_reason)
2280 {
2281  sendto_realops_flags(UMODE_ALL, L_ADMIN, "%s: CRYPTLINK %s error - %s",
2282                       get_client_name(client_p, SHOW_IP), type, reason);
2283  sendto_realops_flags(UMODE_ALL, L_OPER,  "%s: CRYPTLINK %s error - %s",
2284                       get_client_name(client_p, MASK_IP), type, reason);
2285  ilog(L_ERROR, "%s: CRYPTLINK %s error - %s",
2286       get_client_name(client_p, SHOW_IP), type, reason);
2287
2288  /* If client_reason isn't NULL, then exit the client with the message
2289   * defined in the call.
2290   */
2291  if ((client_reason != NULL) && (!IsDead(client_p)))
2292    exit_client(client_p, &me, client_reason);
2293 }
2294
2295 static char base64_chars[] =
2296        "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=";
2297
2298 static char base64_values[] =
2299 {
2300 /* 00-15   */ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
2301 /* 16-31   */ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
2302 /* 32-47   */ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 62, -1, -1, -1, 63,
2303 /* 48-63   */ 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, -1, -1, -1,  0, -1, -1,
2304 /* 64-79   */ -1,  0,  1,  2,  3,  4,  5,  6,  7,  8,  9, 10, 11, 12, 13, 14,
2305 /* 80-95   */ 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, -1, -1, -1, -1, -1,
2306 /* 96-111  */ -1, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40,
2307 /* 112-127 */ 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, -1, -1, -1, -1, -1,
2308 /* 128-143 */ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
2309 /* 144-159 */ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
2310 /* 160-175 */ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
2311 /* 186-191 */ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
2312 /* 192-207 */ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
2313 /* 208-223 */ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
2314 /* 224-239 */ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
2315 /* 240-255 */ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1
2316 };
2317
2318 /*
2319 * base64_block will allocate and return a new block of memory
2320 * using MyMalloc().  It should be freed after use.
2321 */
2322 int
2323 base64_block(unsigned char **output, char *data, int len)
2324 {
2325  unsigned char *out;
2326  unsigned char *in = (unsigned char*)data;
2327  unsigned long int q_in;
2328  int i;
2329  int count = 0;
2330
2331  out = MyMalloc(((((len + 2) - ((len + 2) % 3)) / 3) * 4) + 1);
2332
2333  /* process 24 bits at a time */
2334  for( i = 0; i < len; i += 3)
2335  {
2336    q_in = 0;
2337
2338    if ( i + 2 < len )
2339    {
2340      q_in  = (in[i+2] & 0xc0) << 2;
2341      q_in |=  in[i+2];
2342    }
2343
2344    if ( i + 1 < len )
2345    {
2346      q_in |= (in[i+1] & 0x0f) << 10;
2347      q_in |= (in[i+1] & 0xf0) << 12;
2348    }
2349
2350    q_in |= (in[i]   & 0x03) << 20;
2351    q_in |=  in[i]           << 22;
2352
2353    q_in &= 0x3f3f3f3f;
2354
2355    out[count++] = base64_chars[((q_in >> 24)       )];
2356    out[count++] = base64_chars[((q_in >> 16) & 0xff)];
2357    out[count++] = base64_chars[((q_in >>  8) & 0xff)];
2358    out[count++] = base64_chars[((q_in      ) & 0xff)];
2359  }
2360  if ( (i - len) > 0 )
2361  {
2362    out[count-1] = '=';
2363    if ( (i - len) > 1 )
2364      out[count-2] = '=';
2365  }
2366
2367  out[count] = '\0';
2368  *output = out;
2369  return (count);
2370 }
2371
2372 /*
2373 * unbase64_block will allocate and return a new block of memory
2374 * using MyMalloc().  It should be freed after use.
2375 */
2376 int
2377 unbase64_block(unsigned char **output, char *data, int len)
2378 {
2379  unsigned char *out;
2380  unsigned char *in = (unsigned char*)data;
2381  unsigned long int q_in;
2382  int i;
2383  int count = 0;
2384
2385  if ((len % 4) != 0)
2386    return (0);
2387
2388  out = MyMalloc(((len / 4) * 3) + 1);
2389
2390  /* process 32 bits at a time */
2391  for( i = 0; (i + 3) < len; i+=4)
2392  {
2393    /* compress input (chars a, b, c and d) as follows:
2394     * (after converting ascii -> base64 value)
2395     *
2396     * |00000000aaaaaabbbbbbccccccdddddd|
2397     * |  765432  107654  321076  543210|
2398     */
2399
2400    q_in = 0;
2401
2402    if (base64_values[in[i+3]] > -1)
2403      q_in |= base64_values[in[i+3]]      ;
2404    if (base64_values[in[i+2]] > -1)
2405      q_in |= base64_values[in[i+2]] <<  6;
2406    if (base64_values[in[i+1]] > -1)
2407      q_in |= base64_values[in[i+1]] << 12;
2408    if (base64_values[in[i  ]] > -1)
2409      q_in |= base64_values[in[i  ]] << 18;
2410
2411    out[count++] = (q_in >> 16) & 0xff;
2412    out[count++] = (q_in >>  8) & 0xff;
2413    out[count++] = (q_in      ) & 0xff;
2414  }
2415
2416  if (in[i-1] == '=') count--;
2417  if (in[i-2] == '=') count--;
2418
2419  out[count] = '\0';
2420  *output = out;
2421  return (count);
2422 }
2423
2424 #endif /* HAVE_LIBCRYPTO */
2425

Comparing:
ircd-hybrid/src/s_serv.c (property svn:keywords), Revision 30 by adx, Sun Oct 2 20:03:27 2005 UTC vs.
ircd-hybrid/trunk/src/s_serv.c (property svn:keywords), Revision 1793 by michael, Sun Mar 31 14:06:08 2013 UTC

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

Diff Legend

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