]>
Commit | Line | Data |
---|---|---|
212380e3 AC |
1 | /* |
2 | * ircd-ratbox: A slightly useful ircd. | |
3 | * s_serv.c: Server related functions. | |
4 | * | |
5 | * Copyright (C) 1990 Jarkko Oikarinen and University of Oulu, Co Center | |
6 | * Copyright (C) 1996-2002 Hybrid Development Team | |
7 | * Copyright (C) 2002-2005 ircd-ratbox development team | |
8 | * | |
9 | * This program is free software; you can redistribute it and/or modify | |
10 | * it under the terms of the GNU General Public License as published by | |
11 | * the Free Software Foundation; either version 2 of the License, or | |
12 | * (at your option) any later version. | |
13 | * | |
14 | * This program is distributed in the hope that it will be useful, | |
15 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
16 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
17 | * GNU General Public License for more details. | |
18 | * | |
19 | * You should have received a copy of the GNU General Public License | |
20 | * along with this program; if not, write to the Free Software | |
21 | * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 | |
22 | * USA | |
23 | * | |
cda8e9b8 | 24 | * $Id: s_serv.c 3550 2007-08-09 06:47:26Z nenolod $ |
212380e3 AC |
25 | */ |
26 | ||
27 | #include "stdinc.h" | |
28 | ||
29 | #ifdef HAVE_LIBCRYPTO | |
30 | #include <openssl/rsa.h> | |
31 | #endif | |
32 | ||
33 | #include "tools.h" | |
34 | #include "s_serv.h" | |
35 | #include "class.h" | |
36 | #include "client.h" | |
37 | #include "common.h" | |
38 | #include "event.h" | |
39 | #include "hash.h" | |
40 | #include "irc_string.h" | |
41 | #include "sprintf_irc.h" | |
42 | #include "ircd.h" | |
43 | #include "ircd_defs.h" | |
44 | #include "numeric.h" | |
45 | #include "packet.h" | |
46 | #include "res.h" | |
47 | #include "commio.h" | |
48 | #include "s_conf.h" | |
49 | #include "s_newconf.h" | |
50 | #include "s_log.h" | |
51 | #include "s_stats.h" | |
52 | #include "s_user.h" | |
53 | #include "scache.h" | |
54 | #include "send.h" | |
55 | #include "client.h" | |
56 | #include "memory.h" | |
57 | #include "channel.h" /* chcap_usage_counts stuff... */ | |
58 | #include "hook.h" | |
59 | #include "msg.h" | |
54015b5f | 60 | #include "reject.h" |
212380e3 AC |
61 | |
62 | extern char *crypt(); | |
63 | ||
64 | #ifndef INADDR_NONE | |
65 | #define INADDR_NONE ((unsigned int) 0xffffffff) | |
66 | #endif | |
67 | ||
68 | #ifndef HAVE_SOCKETPAIR | |
69 | static int inet_socketpair(int d, int type, int protocol, int sv[2]); | |
70 | #endif | |
71 | ||
72 | int MaxConnectionCount = 1; | |
73 | int MaxClientCount = 1; | |
74 | int refresh_user_links = 0; | |
75 | ||
76 | static char buf[BUFSIZE]; | |
77 | ||
78 | static void start_io(struct Client *server); | |
79 | ||
80 | static SlinkRplHnd slink_error; | |
81 | static SlinkRplHnd slink_zipstats; | |
82 | /* | |
83 | * list of recognized server capabilities. "TS" is not on the list | |
84 | * because all servers that we talk to already do TS, and the kludged | |
85 | * extra argument to "PASS" takes care of checking that. -orabidoo | |
86 | */ | |
87 | struct Capability captab[] = { | |
88 | /* name cap */ | |
89 | { "QS", CAP_QS }, | |
90 | { "EX", CAP_EX }, | |
91 | { "CHW", CAP_CHW}, | |
92 | { "IE", CAP_IE}, | |
93 | { "KLN", CAP_KLN}, | |
94 | { "GLN", CAP_GLN}, | |
95 | { "KNOCK", CAP_KNOCK}, | |
96 | { "ZIP", CAP_ZIP}, | |
97 | { "TB", CAP_TB}, | |
98 | { "UNKLN", CAP_UNKLN}, | |
99 | { "CLUSTER", CAP_CLUSTER}, | |
100 | { "ENCAP", CAP_ENCAP }, | |
101 | { "SERVICES", CAP_SERVICE }, | |
102 | { "RSFNC", CAP_RSFNC }, | |
103 | { "SAVE", CAP_SAVE }, | |
104 | { "EUID", CAP_EUID }, | |
105 | {0, 0} | |
106 | }; | |
107 | ||
108 | struct SlinkRplDef slinkrpltab[] = { | |
109 | {SLINKRPL_ERROR, slink_error, SLINKRPL_FLAG_DATA}, | |
110 | {SLINKRPL_ZIPSTATS, slink_zipstats, SLINKRPL_FLAG_DATA}, | |
111 | {0, 0, 0}, | |
112 | }; | |
113 | ||
114 | static int fork_server(struct Client *client_p); | |
115 | ||
116 | static CNCB serv_connect_callback; | |
117 | ||
118 | void | |
119 | slink_error(unsigned int rpl, unsigned int len, unsigned char *data, struct Client *server_p) | |
120 | { | |
121 | char squitreason[256]; | |
122 | ||
123 | s_assert(rpl == SLINKRPL_ERROR); | |
124 | ||
125 | s_assert(len < 256); | |
126 | data[len - 1] = '\0'; | |
127 | ||
128 | sendto_realops_snomask(SNO_GENERAL, L_ALL, "SlinkError for %s: %s", server_p->name, data); | |
129 | snprintf(squitreason, sizeof squitreason, "servlink error: %s", data); | |
130 | exit_client(server_p, server_p, &me, squitreason); | |
131 | } | |
132 | ||
133 | void | |
134 | slink_zipstats(unsigned int rpl, unsigned int len, unsigned char *data, struct Client *server_p) | |
135 | { | |
136 | struct ZipStats zipstats; | |
137 | u_int32_t in = 0, in_wire = 0, out = 0, out_wire = 0; | |
138 | int i = 0; | |
139 | ||
140 | s_assert(rpl == SLINKRPL_ZIPSTATS); | |
141 | s_assert(len == 16); | |
142 | s_assert(IsCapable(server_p, CAP_ZIP)); | |
143 | ||
144 | /* Yes, it needs to be done this way, no we cannot let the compiler | |
145 | * work with the pointer to the structure. This works around a GCC | |
146 | * bug on SPARC that affects all versions at the time of this writing. | |
147 | * I will feed you to the creatures living in RMS's beard if you do | |
148 | * not leave this as is, without being sure that you are not causing | |
149 | * regression for most of our installed SPARC base. | |
150 | * -jmallett, 04/27/2002 | |
151 | */ | |
152 | memcpy(&zipstats, &server_p->localClient->zipstats, sizeof(struct ZipStats)); | |
153 | ||
154 | in |= (data[i++] << 24); | |
155 | in |= (data[i++] << 16); | |
156 | in |= (data[i++] << 8); | |
157 | in |= (data[i++]); | |
158 | ||
159 | in_wire |= (data[i++] << 24); | |
160 | in_wire |= (data[i++] << 16); | |
161 | in_wire |= (data[i++] << 8); | |
162 | in_wire |= (data[i++]); | |
163 | ||
164 | out |= (data[i++] << 24); | |
165 | out |= (data[i++] << 16); | |
166 | out |= (data[i++] << 8); | |
167 | out |= (data[i++]); | |
168 | ||
169 | out_wire |= (data[i++] << 24); | |
170 | out_wire |= (data[i++] << 16); | |
171 | out_wire |= (data[i++] << 8); | |
172 | out_wire |= (data[i++]); | |
173 | ||
174 | zipstats.in += in; | |
175 | zipstats.inK += zipstats.in >> 10; | |
176 | zipstats.in &= 0x03ff; | |
177 | ||
178 | zipstats.in_wire += in_wire; | |
179 | zipstats.inK_wire += zipstats.in_wire >> 10; | |
180 | zipstats.in_wire &= 0x03ff; | |
181 | ||
182 | zipstats.out += out; | |
183 | zipstats.outK += zipstats.out >> 10; | |
184 | zipstats.out &= 0x03ff; | |
185 | ||
186 | zipstats.out_wire += out_wire; | |
187 | zipstats.outK_wire += zipstats.out_wire >> 10; | |
188 | zipstats.out_wire &= 0x03ff; | |
189 | ||
190 | if(zipstats.inK > 0) | |
191 | zipstats.in_ratio = | |
192 | (((double) (zipstats.inK - zipstats.inK_wire) / | |
193 | (double) zipstats.inK) * 100.00); | |
194 | else | |
195 | zipstats.in_ratio = 0; | |
196 | ||
197 | if(zipstats.outK > 0) | |
198 | zipstats.out_ratio = | |
199 | (((double) (zipstats.outK - zipstats.outK_wire) / | |
200 | (double) zipstats.outK) * 100.00); | |
201 | else | |
202 | zipstats.out_ratio = 0; | |
203 | ||
204 | memcpy(&server_p->localClient->zipstats, &zipstats, sizeof(struct ZipStats)); | |
205 | } | |
206 | ||
207 | void | |
208 | collect_zipstats(void *unused) | |
209 | { | |
210 | dlink_node *ptr; | |
211 | struct Client *target_p; | |
212 | ||
213 | DLINK_FOREACH(ptr, serv_list.head) | |
214 | { | |
215 | target_p = ptr->data; | |
216 | if(IsCapable(target_p, CAP_ZIP)) | |
217 | { | |
218 | /* only bother if we haven't already got something queued... */ | |
219 | if(!target_p->localClient->slinkq) | |
220 | { | |
221 | target_p->localClient->slinkq = MyMalloc(1); /* sigh.. */ | |
222 | target_p->localClient->slinkq[0] = SLINKCMD_ZIPSTATS; | |
223 | target_p->localClient->slinkq_ofs = 0; | |
224 | target_p->localClient->slinkq_len = 1; | |
225 | send_queued_slink_write(target_p->localClient->ctrlfd, target_p); | |
226 | } | |
227 | } | |
228 | } | |
229 | } | |
230 | ||
231 | /* | |
232 | * hunt_server - Do the basic thing in delivering the message (command) | |
233 | * across the relays to the specific server (server) for | |
234 | * actions. | |
235 | * | |
236 | * Note: The command is a format string and *MUST* be | |
237 | * of prefixed style (e.g. ":%s COMMAND %s ..."). | |
238 | * Command can have only max 8 parameters. | |
239 | * | |
240 | * server parv[server] is the parameter identifying the | |
241 | * target server. | |
242 | * | |
243 | * *WARNING* | |
244 | * parv[server] is replaced with the pointer to the | |
245 | * real servername from the matched client (I'm lazy | |
246 | * now --msa). | |
247 | * | |
248 | * returns: (see #defines) | |
249 | */ | |
250 | int | |
251 | hunt_server(struct Client *client_p, struct Client *source_p, | |
252 | const char *command, int server, int parc, const char *parv[]) | |
253 | { | |
254 | struct Client *target_p; | |
255 | int wilds; | |
256 | dlink_node *ptr; | |
257 | const char *old; | |
258 | char *new; | |
259 | ||
260 | /* | |
261 | * Assume it's me, if no server | |
262 | */ | |
263 | if(parc <= server || EmptyString(parv[server]) || | |
4d7a1ee5 | 264 | match(parv[server], me.name) || (strcmp(parv[server], me.id) == 0)) |
212380e3 AC |
265 | return (HUNTED_ISME); |
266 | ||
267 | new = LOCAL_COPY(parv[server]); | |
268 | ||
269 | /* | |
270 | * These are to pickup matches that would cause the following | |
271 | * message to go in the wrong direction while doing quick fast | |
272 | * non-matching lookups. | |
273 | */ | |
274 | if(MyClient(source_p)) | |
275 | target_p = find_named_client(new); | |
276 | else | |
277 | target_p = find_client(new); | |
278 | ||
279 | if(target_p) | |
280 | if(target_p->from == source_p->from && !MyConnect(target_p)) | |
281 | target_p = NULL; | |
282 | ||
212380e3 AC |
283 | collapse(new); |
284 | wilds = (strchr(new, '?') || strchr(new, '*')); | |
285 | ||
286 | /* | |
287 | * Again, if there are no wild cards involved in the server | |
288 | * name, use the hash lookup | |
289 | */ | |
290 | if(!target_p) | |
291 | { | |
292 | if(!wilds) | |
293 | { | |
294 | if(MyClient(source_p) || !IsDigit(parv[server][0])) | |
295 | sendto_one_numeric(source_p, ERR_NOSUCHSERVER, | |
296 | form_str(ERR_NOSUCHSERVER), | |
297 | parv[server]); | |
298 | return (HUNTED_NOSUCH); | |
299 | } | |
300 | else | |
301 | { | |
302 | target_p = NULL; | |
303 | ||
304 | DLINK_FOREACH(ptr, global_client_list.head) | |
305 | { | |
306 | if(match(new, ((struct Client *) (ptr->data))->name)) | |
307 | { | |
308 | target_p = ptr->data; | |
309 | break; | |
310 | } | |
311 | } | |
312 | } | |
313 | } | |
314 | ||
315 | if(target_p) | |
316 | { | |
317 | if(!IsRegistered(target_p)) | |
318 | { | |
319 | sendto_one_numeric(source_p, ERR_NOSUCHSERVER, | |
320 | form_str(ERR_NOSUCHSERVER), | |
321 | parv[server]); | |
322 | return HUNTED_NOSUCH; | |
323 | } | |
324 | ||
325 | if(IsMe(target_p) || MyClient(target_p)) | |
326 | return HUNTED_ISME; | |
327 | ||
328 | old = parv[server]; | |
329 | parv[server] = get_id(target_p, target_p); | |
330 | ||
331 | sendto_one(target_p, command, get_id(source_p, target_p), | |
332 | parv[1], parv[2], parv[3], parv[4], parv[5], parv[6], parv[7], parv[8]); | |
333 | parv[server] = old; | |
334 | return (HUNTED_PASS); | |
335 | } | |
336 | ||
95d36ef5 | 337 | if(MyClient(source_p) || !IsDigit(parv[server][0])) |
212380e3 AC |
338 | sendto_one_numeric(source_p, ERR_NOSUCHSERVER, |
339 | form_str(ERR_NOSUCHSERVER), parv[server]); | |
340 | return (HUNTED_NOSUCH); | |
341 | } | |
342 | ||
343 | /* | |
344 | * try_connections - scan through configuration and try new connections. | |
345 | * Returns the calendar time when the next call to this | |
346 | * function should be made latest. (No harm done if this | |
347 | * is called earlier or later...) | |
348 | */ | |
349 | void | |
350 | try_connections(void *unused) | |
351 | { | |
352 | struct Client *client_p; | |
353 | struct server_conf *server_p = NULL; | |
354 | struct server_conf *tmp_p; | |
355 | struct Class *cltmp; | |
356 | dlink_node *ptr; | |
357 | int connecting = FALSE; | |
358 | int confrq = 0; | |
359 | time_t next = 0; | |
360 | ||
361 | DLINK_FOREACH(ptr, server_conf_list.head) | |
362 | { | |
363 | tmp_p = ptr->data; | |
364 | ||
365 | if(ServerConfIllegal(tmp_p) || !ServerConfAutoconn(tmp_p)) | |
366 | continue; | |
367 | ||
368 | cltmp = tmp_p->class; | |
369 | ||
370 | /* | |
371 | * Skip this entry if the use of it is still on hold until | |
372 | * future. Otherwise handle this entry (and set it on hold | |
373 | * until next time). Will reset only hold times, if already | |
374 | * made one successfull connection... [this algorithm is | |
375 | * a bit fuzzy... -- msa >;) ] | |
376 | */ | |
377 | if(tmp_p->hold > CurrentTime) | |
378 | { | |
379 | if(next > tmp_p->hold || next == 0) | |
380 | next = tmp_p->hold; | |
381 | continue; | |
382 | } | |
383 | ||
384 | confrq = get_con_freq(cltmp); | |
385 | tmp_p->hold = CurrentTime + confrq; | |
386 | ||
387 | /* | |
388 | * Found a CONNECT config with port specified, scan clients | |
389 | * and see if this server is already connected? | |
390 | */ | |
391 | client_p = find_server(NULL, tmp_p->name); | |
392 | ||
393 | if(!client_p && (CurrUsers(cltmp) < MaxUsers(cltmp)) && !connecting) | |
394 | { | |
395 | server_p = tmp_p; | |
396 | ||
397 | /* We connect only one at time... */ | |
398 | connecting = TRUE; | |
399 | } | |
400 | ||
401 | if((next > tmp_p->hold) || (next == 0)) | |
402 | next = tmp_p->hold; | |
403 | } | |
404 | ||
405 | /* TODO: change this to set active flag to 0 when added to event! --Habeeb */ | |
406 | if(GlobalSetOptions.autoconn == 0) | |
407 | return; | |
408 | ||
409 | if(!connecting) | |
410 | return; | |
411 | ||
412 | /* move this connect entry to end.. */ | |
413 | dlinkDelete(&server_p->node, &server_conf_list); | |
414 | dlinkAddTail(server_p, &server_p->node, &server_conf_list); | |
415 | ||
416 | /* | |
417 | * We used to only print this if serv_connect() actually | |
418 | * suceeded, but since comm_tcp_connect() can call the callback | |
419 | * immediately if there is an error, we were getting error messages | |
420 | * in the wrong order. SO, we just print out the activated line, | |
421 | * and let serv_connect() / serv_connect_callback() print an | |
422 | * error afterwards if it fails. | |
423 | * -- adrian | |
424 | */ | |
425 | #ifndef HIDE_SERVERS_IPS | |
426 | sendto_realops_snomask(SNO_GENERAL, L_ALL, | |
427 | "Connection to %s[%s] activated.", | |
428 | server_p->name, server_p->host); | |
429 | #else | |
430 | sendto_realops_snomask(SNO_GENERAL, L_ALL, | |
431 | "Connection to %s activated", | |
432 | server_p->name); | |
433 | #endif | |
434 | ||
435 | serv_connect(server_p, 0); | |
436 | } | |
437 | ||
438 | int | |
439 | check_server(const char *name, struct Client *client_p) | |
440 | { | |
441 | struct server_conf *server_p = NULL; | |
442 | struct server_conf *tmp_p; | |
443 | dlink_node *ptr; | |
444 | int error = -1; | |
445 | ||
446 | s_assert(NULL != client_p); | |
447 | if(client_p == NULL) | |
448 | return error; | |
449 | ||
450 | if(!(client_p->localClient->passwd)) | |
451 | return -2; | |
452 | ||
453 | if(strlen(name) > HOSTLEN) | |
454 | return -4; | |
455 | ||
456 | DLINK_FOREACH(ptr, server_conf_list.head) | |
457 | { | |
458 | tmp_p = ptr->data; | |
459 | ||
460 | if(ServerConfIllegal(tmp_p)) | |
461 | continue; | |
462 | ||
463 | if(!match(tmp_p->name, name)) | |
464 | continue; | |
465 | ||
466 | error = -3; | |
467 | ||
468 | /* XXX: Fix me for IPv6 */ | |
469 | /* XXX sockhost is the IPv4 ip as a string */ | |
470 | if(match(tmp_p->host, client_p->host) || | |
471 | match(tmp_p->host, client_p->sockhost)) | |
472 | { | |
473 | error = -2; | |
474 | ||
475 | if(ServerConfEncrypted(tmp_p)) | |
476 | { | |
477 | if(!strcmp(tmp_p->passwd, crypt(client_p->localClient->passwd, | |
478 | tmp_p->passwd))) | |
479 | { | |
480 | server_p = tmp_p; | |
481 | break; | |
482 | } | |
483 | } | |
484 | else if(!strcmp(tmp_p->passwd, client_p->localClient->passwd)) | |
485 | { | |
486 | server_p = tmp_p; | |
487 | break; | |
488 | } | |
489 | } | |
490 | } | |
491 | ||
492 | if(server_p == NULL) | |
493 | return error; | |
494 | ||
495 | attach_server_conf(client_p, server_p); | |
496 | ||
497 | /* clear ZIP/TB if they support but we dont want them */ | |
498 | #ifdef HAVE_LIBZ | |
499 | if(!ServerConfCompressed(server_p)) | |
500 | #endif | |
501 | ClearCap(client_p, CAP_ZIP); | |
502 | ||
503 | if(!ServerConfTb(server_p)) | |
504 | ClearCap(client_p, CAP_TB); | |
505 | ||
506 | return 0; | |
507 | } | |
508 | ||
509 | /* | |
510 | * send_capabilities | |
511 | * | |
512 | * inputs - Client pointer to send to | |
513 | * - int flag of capabilities that this server has | |
514 | * output - NONE | |
515 | * side effects - send the CAPAB line to a server -orabidoo | |
516 | * | |
517 | */ | |
518 | void | |
519 | send_capabilities(struct Client *client_p, int cap_can_send) | |
520 | { | |
521 | struct Capability *cap; | |
522 | char msgbuf[BUFSIZE]; | |
523 | char *t; | |
524 | int tl; | |
525 | ||
526 | t = msgbuf; | |
527 | ||
528 | for (cap = captab; cap->name; ++cap) | |
529 | { | |
530 | if(cap->cap & cap_can_send) | |
531 | { | |
532 | tl = ircsprintf(t, "%s ", cap->name); | |
533 | t += tl; | |
534 | } | |
535 | } | |
536 | ||
537 | t--; | |
538 | *t = '\0'; | |
539 | ||
540 | sendto_one(client_p, "CAPAB :%s", msgbuf); | |
541 | } | |
542 | ||
543 | /* burst_modes_TS5() | |
544 | * | |
545 | * input - client to burst to, channel name, list to burst, mode flag | |
546 | * output - | |
547 | * side effects - client is sent a list of +b, or +e, or +I modes | |
548 | */ | |
549 | static void | |
550 | burst_modes_TS5(struct Client *client_p, char *chname, dlink_list *list, char flag) | |
551 | { | |
552 | dlink_node *ptr; | |
553 | struct Ban *banptr; | |
554 | char mbuf[MODEBUFLEN]; | |
555 | char pbuf[BUFSIZE]; | |
556 | int tlen; | |
557 | int mlen; | |
558 | int cur_len; | |
559 | char *mp; | |
560 | char *pp; | |
561 | int count = 0; | |
562 | ||
563 | mlen = ircsprintf(buf, ":%s MODE %s +", me.name, chname); | |
564 | cur_len = mlen; | |
565 | ||
566 | mp = mbuf; | |
567 | pp = pbuf; | |
568 | ||
569 | DLINK_FOREACH(ptr, list->head) | |
570 | { | |
571 | banptr = ptr->data; | |
572 | tlen = strlen(banptr->banstr) + 3; | |
573 | ||
574 | /* uh oh */ | |
575 | if(tlen > MODEBUFLEN) | |
576 | continue; | |
577 | ||
578 | if((count >= MAXMODEPARAMS) || ((cur_len + tlen + 2) > (BUFSIZE - 3))) | |
579 | { | |
580 | sendto_one(client_p, "%s%s %s", buf, mbuf, pbuf); | |
581 | ||
582 | mp = mbuf; | |
583 | pp = pbuf; | |
584 | cur_len = mlen; | |
585 | count = 0; | |
586 | } | |
587 | ||
588 | *mp++ = flag; | |
589 | *mp = '\0'; | |
590 | pp += ircsprintf(pp, "%s ", banptr->banstr); | |
591 | cur_len += tlen; | |
592 | count++; | |
593 | } | |
594 | ||
595 | if(count != 0) | |
596 | sendto_one(client_p, "%s%s %s", buf, mbuf, pbuf); | |
597 | } | |
598 | ||
599 | /* burst_modes_TS6() | |
600 | * | |
601 | * input - client to burst to, channel name, list to burst, mode flag | |
602 | * output - | |
603 | * side effects - client is sent a list of +b, +e, or +I modes | |
604 | */ | |
605 | static void | |
606 | burst_modes_TS6(struct Client *client_p, struct Channel *chptr, | |
607 | dlink_list *list, char flag) | |
608 | { | |
609 | dlink_node *ptr; | |
610 | struct Ban *banptr; | |
611 | char *t; | |
612 | int tlen; | |
613 | int mlen; | |
614 | int cur_len; | |
615 | ||
616 | cur_len = mlen = ircsprintf(buf, ":%s BMASK %ld %s %c :", | |
617 | me.id, (long) chptr->channelts, chptr->chname, flag); | |
618 | t = buf + mlen; | |
619 | ||
620 | DLINK_FOREACH(ptr, list->head) | |
621 | { | |
622 | banptr = ptr->data; | |
623 | ||
624 | tlen = strlen(banptr->banstr) + 1; | |
625 | ||
626 | /* uh oh */ | |
627 | if(cur_len + tlen > BUFSIZE - 3) | |
628 | { | |
629 | /* the one we're trying to send doesnt fit at all! */ | |
630 | if(cur_len == mlen) | |
631 | { | |
632 | s_assert(0); | |
633 | continue; | |
634 | } | |
635 | ||
636 | /* chop off trailing space and send.. */ | |
637 | *(t-1) = '\0'; | |
638 | sendto_one(client_p, "%s", buf); | |
639 | cur_len = mlen; | |
640 | t = buf + mlen; | |
641 | } | |
642 | ||
643 | ircsprintf(t, "%s ", banptr->banstr); | |
644 | t += tlen; | |
645 | cur_len += tlen; | |
646 | } | |
647 | ||
648 | /* cant ever exit the loop above without having modified buf, | |
649 | * chop off trailing space and send. | |
650 | */ | |
651 | *(t-1) = '\0'; | |
652 | sendto_one(client_p, "%s", buf); | |
653 | } | |
654 | ||
655 | /* | |
656 | * burst_TS5 | |
657 | * | |
658 | * inputs - client (server) to send nick towards | |
659 | * - client to send nick for | |
660 | * output - NONE | |
661 | * side effects - NICK message is sent towards given client_p | |
662 | */ | |
663 | static void | |
664 | burst_TS5(struct Client *client_p) | |
665 | { | |
666 | static char ubuf[12]; | |
667 | struct Client *target_p; | |
668 | struct Channel *chptr; | |
669 | struct membership *msptr; | |
670 | hook_data_client hclientinfo; | |
671 | hook_data_channel hchaninfo; | |
672 | dlink_node *ptr; | |
673 | dlink_node *uptr; | |
674 | char *t; | |
675 | int tlen, mlen; | |
676 | int cur_len = 0; | |
677 | ||
678 | hclientinfo.client = hchaninfo.client = client_p; | |
679 | ||
680 | DLINK_FOREACH(ptr, global_client_list.head) | |
681 | { | |
682 | target_p = ptr->data; | |
683 | ||
684 | if(!IsPerson(target_p)) | |
685 | continue; | |
686 | ||
687 | send_umode(NULL, target_p, 0, 0, ubuf); | |
688 | if(!*ubuf) | |
689 | { | |
690 | ubuf[0] = '+'; | |
691 | ubuf[1] = '\0'; | |
692 | } | |
693 | ||
694 | sendto_one(client_p, "NICK %s %d %ld %s %s %s %s :%s", | |
695 | target_p->name, target_p->hopcount + 1, | |
696 | (long) target_p->tsinfo, ubuf, | |
697 | target_p->username, target_p->host, | |
c88cdb00 | 698 | target_p->servptr->name, target_p->info); |
212380e3 AC |
699 | |
700 | if(IsDynSpoof(target_p)) | |
701 | sendto_one(client_p, ":%s ENCAP * REALHOST %s", | |
702 | target_p->name, target_p->orighost); | |
703 | if(!EmptyString(target_p->user->suser)) | |
704 | sendto_one(client_p, ":%s ENCAP * LOGIN %s", | |
705 | target_p->name, target_p->user->suser); | |
706 | ||
707 | if(ConfigFileEntry.burst_away && !EmptyString(target_p->user->away)) | |
708 | sendto_one(client_p, ":%s AWAY :%s", | |
709 | target_p->name, target_p->user->away); | |
710 | ||
711 | hclientinfo.target = target_p; | |
712 | call_hook(h_burst_client, &hclientinfo); | |
713 | } | |
714 | ||
715 | DLINK_FOREACH(ptr, global_channel_list.head) | |
716 | { | |
717 | chptr = ptr->data; | |
718 | ||
719 | if(*chptr->chname != '#') | |
720 | continue; | |
721 | ||
722 | cur_len = mlen = ircsprintf(buf, ":%s SJOIN %ld %s %s :", me.name, | |
723 | (long) chptr->channelts, chptr->chname, | |
724 | channel_modes(chptr, client_p)); | |
725 | ||
726 | t = buf + mlen; | |
727 | ||
728 | DLINK_FOREACH(uptr, chptr->members.head) | |
729 | { | |
730 | msptr = uptr->data; | |
731 | ||
732 | tlen = strlen(msptr->client_p->name) + 1; | |
733 | if(is_chanop(msptr)) | |
734 | tlen++; | |
735 | if(is_voiced(msptr)) | |
736 | tlen++; | |
737 | ||
738 | if(cur_len + tlen >= BUFSIZE - 3) | |
739 | { | |
740 | t--; | |
741 | *t = '\0'; | |
742 | sendto_one(client_p, "%s", buf); | |
743 | cur_len = mlen; | |
744 | t = buf + mlen; | |
745 | } | |
746 | ||
747 | ircsprintf(t, "%s%s ", find_channel_status(msptr, 1), | |
748 | msptr->client_p->name); | |
749 | ||
750 | cur_len += tlen; | |
751 | t += tlen; | |
752 | } | |
753 | ||
754 | if (dlink_list_length(&chptr->members) > 0) | |
755 | { | |
756 | /* remove trailing space */ | |
757 | t--; | |
758 | *t = '\0'; | |
759 | } | |
760 | sendto_one(client_p, "%s", buf); | |
761 | ||
762 | burst_modes_TS5(client_p, chptr->chname, &chptr->banlist, 'b'); | |
763 | ||
764 | if(IsCapable(client_p, CAP_EX)) | |
765 | burst_modes_TS5(client_p, chptr->chname, &chptr->exceptlist, 'e'); | |
766 | ||
767 | if(IsCapable(client_p, CAP_IE)) | |
768 | burst_modes_TS5(client_p, chptr->chname, &chptr->invexlist, 'I'); | |
769 | ||
770 | burst_modes_TS5(client_p, chptr->chname, &chptr->quietlist, 'q'); | |
771 | ||
772 | if(IsCapable(client_p, CAP_TB) && chptr->topic != NULL) | |
773 | sendto_one(client_p, ":%s TB %s %ld %s%s:%s", | |
774 | me.name, chptr->chname, (long) chptr->topic_time, | |
775 | ConfigChannel.burst_topicwho ? chptr->topic_info : "", | |
776 | ConfigChannel.burst_topicwho ? " " : "", | |
777 | chptr->topic); | |
778 | ||
779 | hchaninfo.chptr = chptr; | |
780 | call_hook(h_burst_channel, &hchaninfo); | |
781 | } | |
782 | ||
783 | hclientinfo.target = NULL; | |
784 | call_hook(h_burst_finished, &hclientinfo); | |
785 | } | |
786 | ||
787 | /* | |
788 | * burst_TS6 | |
789 | * | |
790 | * inputs - client (server) to send nick towards | |
791 | * - client to send nick for | |
792 | * output - NONE | |
793 | * side effects - NICK message is sent towards given client_p | |
794 | */ | |
795 | static void | |
796 | burst_TS6(struct Client *client_p) | |
797 | { | |
798 | static char ubuf[12]; | |
799 | struct Client *target_p; | |
800 | struct Channel *chptr; | |
801 | struct membership *msptr; | |
802 | hook_data_client hclientinfo; | |
803 | hook_data_channel hchaninfo; | |
804 | dlink_node *ptr; | |
805 | dlink_node *uptr; | |
806 | char *t; | |
807 | int tlen, mlen; | |
808 | int cur_len = 0; | |
809 | ||
810 | hclientinfo.client = hchaninfo.client = client_p; | |
811 | ||
812 | DLINK_FOREACH(ptr, global_client_list.head) | |
813 | { | |
814 | target_p = ptr->data; | |
815 | ||
816 | if(!IsPerson(target_p)) | |
817 | continue; | |
818 | ||
819 | send_umode(NULL, target_p, 0, 0, ubuf); | |
820 | if(!*ubuf) | |
821 | { | |
822 | ubuf[0] = '+'; | |
823 | ubuf[1] = '\0'; | |
824 | } | |
825 | ||
826 | if(has_id(target_p) && IsCapable(client_p, CAP_EUID)) | |
827 | sendto_one(client_p, ":%s EUID %s %d %ld %s %s %s %s %s %s %s :%s", | |
828 | target_p->servptr->id, target_p->name, | |
829 | target_p->hopcount + 1, | |
830 | (long) target_p->tsinfo, ubuf, | |
831 | target_p->username, target_p->host, | |
832 | IsIPSpoof(target_p) ? "0" : target_p->sockhost, | |
833 | target_p->id, | |
834 | IsDynSpoof(target_p) ? target_p->orighost : "*", | |
835 | EmptyString(target_p->user->suser) ? "*" : target_p->user->suser, | |
836 | target_p->info); | |
837 | else if(has_id(target_p)) | |
838 | sendto_one(client_p, ":%s UID %s %d %ld %s %s %s %s %s :%s", | |
839 | target_p->servptr->id, target_p->name, | |
840 | target_p->hopcount + 1, | |
841 | (long) target_p->tsinfo, ubuf, | |
842 | target_p->username, target_p->host, | |
843 | IsIPSpoof(target_p) ? "0" : target_p->sockhost, | |
844 | target_p->id, target_p->info); | |
845 | else | |
846 | sendto_one(client_p, "NICK %s %d %ld %s %s %s %s :%s", | |
847 | target_p->name, | |
848 | target_p->hopcount + 1, | |
849 | (long) target_p->tsinfo, | |
850 | ubuf, | |
851 | target_p->username, target_p->host, | |
c88cdb00 | 852 | target_p->servptr->name, target_p->info); |
212380e3 AC |
853 | |
854 | if(!has_id(target_p) || !IsCapable(client_p, CAP_EUID)) | |
855 | { | |
856 | if(IsDynSpoof(target_p)) | |
857 | sendto_one(client_p, ":%s ENCAP * REALHOST %s", | |
858 | use_id(target_p), target_p->orighost); | |
859 | if(!EmptyString(target_p->user->suser)) | |
860 | sendto_one(client_p, ":%s ENCAP * LOGIN %s", | |
861 | use_id(target_p), target_p->user->suser); | |
862 | } | |
863 | ||
864 | if(ConfigFileEntry.burst_away && !EmptyString(target_p->user->away)) | |
865 | sendto_one(client_p, ":%s AWAY :%s", | |
866 | use_id(target_p), | |
867 | target_p->user->away); | |
868 | ||
869 | hclientinfo.target = target_p; | |
870 | call_hook(h_burst_client, &hclientinfo); | |
871 | } | |
872 | ||
873 | DLINK_FOREACH(ptr, global_channel_list.head) | |
874 | { | |
875 | chptr = ptr->data; | |
876 | ||
877 | if(*chptr->chname != '#') | |
878 | continue; | |
879 | ||
880 | cur_len = mlen = ircsprintf(buf, ":%s SJOIN %ld %s %s :", me.id, | |
881 | (long) chptr->channelts, chptr->chname, | |
882 | channel_modes(chptr, client_p)); | |
883 | ||
884 | t = buf + mlen; | |
885 | ||
886 | DLINK_FOREACH(uptr, chptr->members.head) | |
887 | { | |
888 | msptr = uptr->data; | |
889 | ||
890 | tlen = strlen(use_id(msptr->client_p)) + 1; | |
891 | if(is_chanop(msptr)) | |
892 | tlen++; | |
893 | if(is_voiced(msptr)) | |
894 | tlen++; | |
895 | ||
896 | if(cur_len + tlen >= BUFSIZE - 3) | |
897 | { | |
898 | *(t-1) = '\0'; | |
899 | sendto_one(client_p, "%s", buf); | |
900 | cur_len = mlen; | |
901 | t = buf + mlen; | |
902 | } | |
903 | ||
904 | ircsprintf(t, "%s%s ", find_channel_status(msptr, 1), | |
905 | use_id(msptr->client_p)); | |
906 | ||
907 | cur_len += tlen; | |
908 | t += tlen; | |
909 | } | |
910 | ||
911 | if (dlink_list_length(&chptr->members) > 0) | |
912 | { | |
913 | /* remove trailing space */ | |
914 | *(t-1) = '\0'; | |
915 | } | |
916 | sendto_one(client_p, "%s", buf); | |
917 | ||
918 | if(dlink_list_length(&chptr->banlist) > 0) | |
919 | burst_modes_TS6(client_p, chptr, &chptr->banlist, 'b'); | |
920 | ||
921 | if(IsCapable(client_p, CAP_EX) && | |
922 | dlink_list_length(&chptr->exceptlist) > 0) | |
923 | burst_modes_TS6(client_p, chptr, &chptr->exceptlist, 'e'); | |
924 | ||
925 | if(IsCapable(client_p, CAP_IE) && | |
926 | dlink_list_length(&chptr->invexlist) > 0) | |
927 | burst_modes_TS6(client_p, chptr, &chptr->invexlist, 'I'); | |
928 | ||
929 | if(dlink_list_length(&chptr->quietlist) > 0) | |
930 | burst_modes_TS6(client_p, chptr, &chptr->quietlist, 'q'); | |
931 | ||
932 | if(IsCapable(client_p, CAP_TB) && chptr->topic != NULL) | |
933 | sendto_one(client_p, ":%s TB %s %ld %s%s:%s", | |
934 | me.id, chptr->chname, (long) chptr->topic_time, | |
935 | ConfigChannel.burst_topicwho ? chptr->topic_info : "", | |
936 | ConfigChannel.burst_topicwho ? " " : "", | |
937 | chptr->topic); | |
938 | ||
939 | hchaninfo.chptr = chptr; | |
940 | call_hook(h_burst_channel, &hchaninfo); | |
941 | } | |
942 | ||
943 | hclientinfo.target = NULL; | |
944 | call_hook(h_burst_finished, &hclientinfo); | |
945 | } | |
946 | ||
947 | /* | |
948 | * show_capabilities - show current server capabilities | |
949 | * | |
950 | * inputs - pointer to an struct Client | |
951 | * output - pointer to static string | |
952 | * side effects - build up string representing capabilities of server listed | |
953 | */ | |
954 | const char * | |
955 | show_capabilities(struct Client *target_p) | |
956 | { | |
957 | static char msgbuf[BUFSIZE]; | |
958 | struct Capability *cap; | |
959 | char *t; | |
960 | int tl; | |
961 | ||
962 | t = msgbuf; | |
963 | tl = ircsprintf(msgbuf, "TS "); | |
964 | t += tl; | |
965 | ||
966 | if(!IsServer(target_p) || !target_p->serv->caps) /* short circuit if no caps */ | |
967 | { | |
968 | msgbuf[2] = '\0'; | |
969 | return msgbuf; | |
970 | } | |
971 | ||
972 | for (cap = captab; cap->cap; ++cap) | |
973 | { | |
974 | if(cap->cap & target_p->serv->caps) | |
975 | { | |
976 | tl = ircsprintf(t, "%s ", cap->name); | |
977 | t += tl; | |
978 | } | |
979 | } | |
980 | ||
981 | t--; | |
982 | *t = '\0'; | |
983 | ||
984 | return msgbuf; | |
985 | } | |
986 | ||
987 | /* | |
988 | * server_estab | |
989 | * | |
990 | * inputs - pointer to a struct Client | |
991 | * output - | |
992 | * side effects - | |
993 | */ | |
994 | int | |
995 | server_estab(struct Client *client_p) | |
996 | { | |
997 | struct Client *target_p; | |
998 | struct server_conf *server_p; | |
999 | hook_data_client hdata; | |
1000 | char *host; | |
1001 | dlink_node *ptr; | |
1002 | ||
1003 | s_assert(NULL != client_p); | |
1004 | if(client_p == NULL) | |
1005 | return -1; | |
212380e3 AC |
1006 | |
1007 | host = client_p->name; | |
1008 | ||
1009 | if((server_p = client_p->localClient->att_sconf) == NULL) | |
1010 | { | |
1011 | /* This shouldn't happen, better tell the ops... -A1kmm */ | |
1012 | sendto_realops_snomask(SNO_GENERAL, is_remote_connect(client_p) ? L_NETWIDE : L_ALL, | |
1013 | "Warning: Lost connect{} block for server %s!", host); | |
1014 | return exit_client(client_p, client_p, client_p, "Lost connect{} block!"); | |
1015 | } | |
1016 | ||
1017 | /* We shouldn't have to check this, it should already done before | |
1018 | * server_estab is called. -A1kmm | |
1019 | */ | |
1020 | if(client_p->localClient->passwd) | |
1021 | { | |
1022 | memset(client_p->localClient->passwd, 0, strlen(client_p->localClient->passwd)); | |
1023 | MyFree(client_p->localClient->passwd); | |
1024 | client_p->localClient->passwd = NULL; | |
1025 | } | |
1026 | ||
1027 | /* Its got identd , since its a server */ | |
1028 | SetGotId(client_p); | |
1029 | ||
1030 | /* If there is something in the serv_list, it might be this | |
1031 | * connecting server.. | |
1032 | */ | |
1033 | if(!ServerInfo.hub && serv_list.head) | |
1034 | { | |
1035 | if(client_p != serv_list.head->data || serv_list.head->next) | |
1036 | { | |
1037 | ServerStats->is_ref++; | |
1038 | sendto_one(client_p, "ERROR :I'm a leaf not a hub"); | |
1039 | return exit_client(client_p, client_p, client_p, "I'm a leaf"); | |
1040 | } | |
1041 | } | |
1042 | ||
1043 | if(IsUnknown(client_p)) | |
1044 | { | |
1045 | /* | |
1046 | * jdc -- 1. Use EmptyString(), not [0] index reference. | |
1047 | * 2. Check ->spasswd, not ->passwd. | |
1048 | */ | |
1049 | if(!EmptyString(server_p->spasswd)) | |
1050 | { | |
cda8e9b8 AC |
1051 | sendto_one(client_p, "PASS %s TS %d :%s", |
1052 | server_p->spasswd, TS_CURRENT, me.id); | |
212380e3 AC |
1053 | } |
1054 | ||
1055 | /* pass info to new server */ | |
1056 | send_capabilities(client_p, default_server_capabs | |
1057 | | (ServerConfCompressed(server_p) ? CAP_ZIP_SUPPORTED : 0) | |
1058 | | (ServerConfTb(server_p) ? CAP_TB : 0)); | |
1059 | ||
1060 | sendto_one(client_p, "SERVER %s 1 :%s%s", | |
1061 | me.name, | |
1062 | ConfigServerHide.hidden ? "(H) " : "", | |
1063 | (me.info[0]) ? (me.info) : "IRCers United"); | |
1064 | } | |
1065 | ||
c5c2f506 | 1066 | if(!comm_set_buffers(client_p->localClient->F->fd, READBUF_SIZE)) |
212380e3 AC |
1067 | report_error(SETBUF_ERROR_MSG, |
1068 | get_server_name(client_p, SHOW_IP), | |
1069 | log_client_name(client_p, SHOW_IP), errno); | |
1070 | ||
1071 | /* Hand the server off to servlink now */ | |
1072 | if(IsCapable(client_p, CAP_ZIP)) | |
1073 | { | |
1074 | if(fork_server(client_p) < 0) | |
1075 | { | |
1076 | sendto_realops_snomask(SNO_GENERAL, is_remote_connect(client_p) ? L_NETWIDE : L_ALL, | |
1077 | "Warning: fork failed for server %s -- check servlink_path (%s)", | |
1078 | get_server_name(client_p, HIDE_IP), | |
1079 | ConfigFileEntry.servlink_path); | |
1080 | return exit_client(client_p, client_p, client_p, "Fork failed"); | |
1081 | } | |
1082 | start_io(client_p); | |
1083 | SetServlink(client_p); | |
1084 | } | |
1085 | ||
1086 | sendto_one(client_p, "SVINFO %d %d 0 :%ld", TS_CURRENT, TS_MIN, CurrentTime); | |
1087 | ||
1088 | client_p->servptr = &me; | |
1089 | ||
1090 | if(IsAnyDead(client_p)) | |
1091 | return CLIENT_EXITED; | |
1092 | ||
1093 | SetServer(client_p); | |
1094 | ||
1095 | /* Update the capability combination usage counts */ | |
1096 | set_chcap_usage_counts(client_p); | |
1097 | ||
1098 | dlinkAdd(client_p, &client_p->lnode, &me.serv->servers); | |
54015b5f | 1099 | del_unknown_ip(client_p); |
212380e3 AC |
1100 | dlinkMoveNode(&client_p->localClient->tnode, &unknown_list, &serv_list); |
1101 | dlinkAddTailAlloc(client_p, &global_serv_list); | |
1102 | ||
1103 | if(has_id(client_p)) | |
1104 | add_to_id_hash(client_p->id, client_p); | |
1105 | ||
1106 | add_to_client_hash(client_p->name, client_p); | |
1107 | /* doesnt duplicate client_p->serv if allocated this struct already */ | |
1108 | make_server(client_p); | |
212380e3 AC |
1109 | |
1110 | client_p->serv->caps = client_p->localClient->caps; | |
1111 | ||
1112 | if(client_p->localClient->fullcaps) | |
1113 | { | |
1114 | DupString(client_p->serv->fullcaps, client_p->localClient->fullcaps); | |
1115 | MyFree(client_p->localClient->fullcaps); | |
1116 | client_p->localClient->fullcaps = NULL; | |
1117 | } | |
1118 | ||
994544c2 | 1119 | client_p->serv->nameinfo = scache_connect(client_p->name, client_p->info, IsHidden(client_p)); |
212380e3 AC |
1120 | client_p->localClient->firsttime = CurrentTime; |
1121 | /* fixing eob timings.. -gnp */ | |
1122 | ||
2f15f871 JT |
1123 | if((dlink_list_length(&lclient_list) + dlink_list_length(&serv_list)) > |
1124 | (unsigned long)MaxConnectionCount) | |
1125 | MaxConnectionCount = dlink_list_length(&lclient_list) + | |
1126 | dlink_list_length(&serv_list); | |
1127 | ||
212380e3 AC |
1128 | /* Show the real host/IP to admins */ |
1129 | sendto_realops_snomask(SNO_GENERAL, L_ALL, | |
1130 | "Link with %s established: (%s) link", | |
1131 | get_server_name(client_p, SHOW_IP), | |
1132 | show_capabilities(client_p)); | |
1133 | ||
1134 | ilog(L_SERVER, "Link with %s established: (%s) link", | |
1135 | log_client_name(client_p, SHOW_IP), show_capabilities(client_p)); | |
1136 | ||
1137 | hdata.client = &me; | |
1138 | hdata.target = client_p; | |
1139 | call_hook(h_server_introduced, &hdata); | |
1140 | ||
1141 | if(HasServlink(client_p)) | |
1142 | { | |
1143 | /* we won't overflow FD_DESC_SZ here, as it can hold | |
1144 | * client_p->name + 64 | |
1145 | */ | |
c5c2f506 | 1146 | comm_note(client_p->localClient->F->fd, "slink data: %s", client_p->name); |
212380e3 AC |
1147 | comm_note(client_p->localClient->ctrlfd, "slink ctrl: %s", client_p->name); |
1148 | } | |
1149 | else | |
c5c2f506 | 1150 | comm_note(client_p->localClient->F->fd, "Server: %s", client_p->name); |
212380e3 AC |
1151 | |
1152 | /* | |
1153 | ** Old sendto_serv_but_one() call removed because we now | |
1154 | ** need to send different names to different servers | |
1155 | ** (domain name matching) Send new server to other servers. | |
1156 | */ | |
1157 | DLINK_FOREACH(ptr, serv_list.head) | |
1158 | { | |
1159 | target_p = ptr->data; | |
1160 | ||
1161 | if(target_p == client_p) | |
1162 | continue; | |
1163 | ||
1164 | if(has_id(target_p) && has_id(client_p)) | |
1165 | { | |
1166 | sendto_one(target_p, ":%s SID %s 2 %s :%s%s", | |
1167 | me.id, client_p->name, client_p->id, | |
1168 | IsHidden(client_p) ? "(H) " : "", client_p->info); | |
1169 | ||
1170 | if(IsCapable(target_p, CAP_ENCAP) && | |
1171 | !EmptyString(client_p->serv->fullcaps)) | |
1172 | sendto_one(target_p, ":%s ENCAP * GCAP :%s", | |
1173 | client_p->id, client_p->serv->fullcaps); | |
1174 | } | |
1175 | else | |
1176 | { | |
1177 | sendto_one(target_p, ":%s SERVER %s 2 :%s%s", | |
1178 | me.name, client_p->name, | |
1179 | IsHidden(client_p) ? "(H) " : "", client_p->info); | |
1180 | ||
1181 | if(IsCapable(target_p, CAP_ENCAP) && | |
1182 | !EmptyString(client_p->serv->fullcaps)) | |
1183 | sendto_one(target_p, ":%s ENCAP * GCAP :%s", | |
1184 | client_p->name, client_p->serv->fullcaps); | |
1185 | } | |
1186 | } | |
1187 | ||
1188 | /* | |
1189 | ** Pass on my client information to the new server | |
1190 | ** | |
1191 | ** First, pass only servers (idea is that if the link gets | |
1192 | ** cancelled beacause the server was already there, | |
1193 | ** there are no NICK's to be cancelled...). Of course, | |
1194 | ** if cancellation occurs, all this info is sent anyway, | |
1195 | ** and I guess the link dies when a read is attempted...? --msa | |
1196 | ** | |
1197 | ** Note: Link cancellation to occur at this point means | |
1198 | ** that at least two servers from my fragment are building | |
1199 | ** up connection this other fragment at the same time, it's | |
1200 | ** a race condition, not the normal way of operation... | |
1201 | ** | |
1202 | ** ALSO NOTE: using the get_client_name for server names-- | |
1203 | ** see previous *WARNING*!!! (Also, original inpath | |
1204 | ** is destroyed...) | |
1205 | */ | |
1206 | DLINK_FOREACH(ptr, global_serv_list.head) | |
1207 | { | |
1208 | target_p = ptr->data; | |
1209 | ||
1210 | /* target_p->from == target_p for target_p == client_p */ | |
1211 | if(IsMe(target_p) || target_p->from == client_p) | |
1212 | continue; | |
1213 | ||
1214 | /* presumption, if target has an id, so does its uplink */ | |
1215 | if(has_id(client_p) && has_id(target_p)) | |
1216 | sendto_one(client_p, ":%s SID %s %d %s :%s%s", | |
66c8fdd2 | 1217 | target_p->servptr->id, target_p->name, |
212380e3 AC |
1218 | target_p->hopcount + 1, target_p->id, |
1219 | IsHidden(target_p) ? "(H) " : "", target_p->info); | |
1220 | else | |
1221 | sendto_one(client_p, ":%s SERVER %s %d :%s%s", | |
66c8fdd2 | 1222 | target_p->servptr->name, |
212380e3 AC |
1223 | target_p->name, target_p->hopcount + 1, |
1224 | IsHidden(target_p) ? "(H) " : "", target_p->info); | |
1225 | ||
1226 | if(IsCapable(client_p, CAP_ENCAP) && | |
1227 | !EmptyString(target_p->serv->fullcaps)) | |
1228 | sendto_one(client_p, ":%s ENCAP * GCAP :%s", | |
1229 | get_id(target_p, client_p), | |
1230 | target_p->serv->fullcaps); | |
1231 | } | |
1232 | ||
1233 | if(has_id(client_p)) | |
1234 | burst_TS6(client_p); | |
1235 | else | |
1236 | burst_TS5(client_p); | |
1237 | ||
1238 | /* Always send a PING after connect burst is done */ | |
1239 | sendto_one(client_p, "PING :%s", get_id(&me, client_p)); | |
1240 | ||
1241 | free_pre_client(client_p); | |
1242 | ||
1243 | return 0; | |
1244 | } | |
1245 | ||
1246 | static void | |
1247 | start_io(struct Client *server) | |
1248 | { | |
1249 | unsigned char *iobuf; | |
1250 | int c = 0; | |
1251 | int linecount = 0; | |
1252 | int linelen; | |
1253 | ||
1254 | iobuf = MyMalloc(256); /* XXX: This seems arbitrary. Perhaps make it IRCD_BUFSIZE? --nenolod */ | |
1255 | ||
1256 | if(IsCapable(server, CAP_ZIP)) | |
1257 | { | |
1258 | /* ziplink */ | |
1259 | iobuf[c++] = SLINKCMD_SET_ZIP_OUT_LEVEL; | |
1260 | iobuf[c++] = 0; /* | */ | |
1261 | iobuf[c++] = 1; /* \ len is 1 */ | |
1262 | iobuf[c++] = ConfigFileEntry.compression_level; | |
1263 | iobuf[c++] = SLINKCMD_START_ZIP_IN; | |
1264 | iobuf[c++] = SLINKCMD_START_ZIP_OUT; | |
1265 | } | |
1266 | ||
1267 | while (MyConnect(server)) | |
1268 | { | |
1269 | linecount++; | |
1270 | ||
1271 | iobuf = MyRealloc(iobuf, (c + READBUF_SIZE + 64)); | |
1272 | ||
1273 | /* store data in c+3 to allow for SLINKCMD_INJECT_RECVQ and len u16 */ | |
1274 | linelen = linebuf_get(&server->localClient->buf_recvq, (char *) (iobuf + c + 3), READBUF_SIZE, LINEBUF_PARTIAL, LINEBUF_RAW); /* include partial lines */ | |
1275 | ||
1276 | if(linelen) | |
1277 | { | |
1278 | iobuf[c++] = SLINKCMD_INJECT_RECVQ; | |
1279 | iobuf[c++] = (linelen >> 8); | |
1280 | iobuf[c++] = (linelen & 0xff); | |
1281 | c += linelen; | |
1282 | } | |
1283 | else | |
1284 | break; | |
1285 | } | |
1286 | ||
1287 | while (MyConnect(server)) | |
1288 | { | |
1289 | linecount++; | |
1290 | ||
1291 | iobuf = MyRealloc(iobuf, (c + BUF_DATA_SIZE + 64)); | |
1292 | ||
1293 | /* store data in c+3 to allow for SLINKCMD_INJECT_RECVQ and len u16 */ | |
1294 | linelen = linebuf_get(&server->localClient->buf_sendq, | |
1295 | (char *) (iobuf + c + 3), READBUF_SIZE, | |
1296 | LINEBUF_PARTIAL, LINEBUF_PARSED); /* include partial lines */ | |
1297 | ||
1298 | if(linelen) | |
1299 | { | |
1300 | iobuf[c++] = SLINKCMD_INJECT_SENDQ; | |
1301 | iobuf[c++] = (linelen >> 8); | |
1302 | iobuf[c++] = (linelen & 0xff); | |
1303 | c += linelen; | |
1304 | } | |
1305 | else | |
1306 | break; | |
1307 | } | |
1308 | ||
1309 | /* start io */ | |
1310 | iobuf[c++] = SLINKCMD_INIT; | |
1311 | ||
1312 | server->localClient->slinkq = iobuf; | |
1313 | server->localClient->slinkq_ofs = 0; | |
1314 | server->localClient->slinkq_len = c; | |
1315 | ||
1316 | /* schedule a write */ | |
1317 | send_queued_slink_write(server->localClient->ctrlfd, server); | |
1318 | } | |
1319 | ||
1320 | /* | |
1321 | * fork_server | |
1322 | * | |
1323 | * inputs - struct Client *server | |
1324 | * output - success: 0 / failure: -1 | |
1325 | * side effect - fork, and exec SERVLINK to handle this connection | |
1326 | */ | |
1327 | static int | |
1328 | fork_server(struct Client *server) | |
1329 | { | |
1330 | int ret; | |
1331 | int i; | |
1332 | int ctrl_fds[2]; | |
1333 | int data_fds[2]; | |
1334 | ||
1335 | char fd_str[4][6]; | |
1336 | char *kid_argv[7]; | |
1337 | char slink[] = "-slink"; | |
1338 | ||
1339 | ||
1340 | /* ctrl */ | |
1341 | #ifdef HAVE_SOCKETPAIR | |
1342 | if(socketpair(AF_UNIX, SOCK_STREAM, 0, ctrl_fds) < 0) | |
1343 | #else | |
1344 | if(inet_socketpair(AF_INET,SOCK_STREAM, 0, ctrl_fds) < 0) | |
1345 | #endif | |
1346 | goto fork_error; | |
1347 | ||
1348 | ||
1349 | ||
1350 | /* data */ | |
1351 | #ifdef HAVE_SOCKETPAIR | |
1352 | if(socketpair(AF_UNIX, SOCK_STREAM, 0, data_fds) < 0) | |
1353 | #else | |
1354 | if(inet_socketpair(AF_INET,SOCK_STREAM, 0, data_fds) < 0) | |
1355 | #endif | |
1356 | goto fork_error; | |
1357 | ||
1358 | ||
1359 | #ifdef __CYGWIN__ | |
1360 | if((ret = vfork()) < 0) | |
1361 | #else | |
1362 | if((ret = fork()) < 0) | |
1363 | #endif | |
1364 | goto fork_error; | |
1365 | else if(ret == 0) | |
1366 | { | |
6fcb8629 AC |
1367 | int maxconn = comm_get_maxconnections(); |
1368 | ||
212380e3 | 1369 | /* set our fds as non blocking and close everything else */ |
6fcb8629 | 1370 | for (i = 0; i < maxconn; i++) |
212380e3 AC |
1371 | { |
1372 | ||
1373 | ||
c5c2f506 | 1374 | if((i == ctrl_fds[1]) || (i == data_fds[1]) || (i == server->localClient->F->fd)) |
212380e3 AC |
1375 | { |
1376 | comm_set_nb(i); | |
1377 | } | |
1378 | else | |
1379 | { | |
1380 | #ifdef __CYGWIN__ | |
1381 | if(i > 2) /* don't close std* */ | |
1382 | #endif | |
1383 | close(i); | |
1384 | } | |
1385 | } | |
1386 | ||
1387 | ircsnprintf(fd_str[0], sizeof(fd_str[0]), "%d", ctrl_fds[1]); | |
1388 | ircsnprintf(fd_str[1], sizeof(fd_str[1]), "%d", data_fds[1]); | |
c5c2f506 | 1389 | ircsnprintf(fd_str[2], sizeof(fd_str[2]), "%d", server->localClient->F->fd); |
212380e3 AC |
1390 | kid_argv[0] = slink; |
1391 | kid_argv[1] = fd_str[0]; | |
1392 | kid_argv[2] = fd_str[1]; | |
1393 | kid_argv[3] = fd_str[2]; | |
1394 | kid_argv[4] = NULL; | |
1395 | ||
1396 | /* exec servlink program */ | |
1397 | execv(ConfigFileEntry.servlink_path, kid_argv); | |
1398 | ||
1399 | /* We're still here, abort. */ | |
1400 | _exit(1); | |
1401 | } | |
1402 | else | |
1403 | { | |
c5c2f506 | 1404 | comm_close(server->localClient->F->fd); |
212380e3 AC |
1405 | |
1406 | /* close the childs end of the pipes */ | |
1407 | close(ctrl_fds[1]); | |
1408 | close(data_fds[1]); | |
1409 | ||
1410 | s_assert(server->localClient); | |
1411 | server->localClient->ctrlfd = ctrl_fds[0]; | |
f56fdec2 | 1412 | server->localClient->F = comm_add_fd(data_fds[0]); |
212380e3 | 1413 | |
c5c2f506 | 1414 | if(!comm_set_nb(server->localClient->F->fd)) |
212380e3 AC |
1415 | { |
1416 | report_error(NONB_ERROR_MSG, | |
1417 | get_server_name(server, SHOW_IP), | |
1418 | log_client_name(server, SHOW_IP), | |
1419 | errno); | |
1420 | } | |
1421 | ||
1422 | if(!comm_set_nb(server->localClient->ctrlfd)) | |
1423 | { | |
1424 | report_error(NONB_ERROR_MSG, | |
1425 | get_server_name(server, SHOW_IP), | |
1426 | log_client_name(server, SHOW_IP), | |
1427 | errno); | |
1428 | } | |
1429 | ||
1430 | comm_open(server->localClient->ctrlfd, FD_SOCKET, NULL); | |
c5c2f506 | 1431 | comm_open(server->localClient->F->fd, FD_SOCKET, NULL); |
212380e3 AC |
1432 | |
1433 | read_ctrl_packet(server->localClient->ctrlfd, server); | |
c5c2f506 | 1434 | read_packet(server->localClient->F->fd, server); |
212380e3 AC |
1435 | } |
1436 | ||
1437 | return 0; | |
1438 | ||
1439 | fork_error: | |
1440 | /* this is ugly, but nicer than repeating | |
1441 | * about 50 close() statements everywhre... */ | |
1442 | close(data_fds[0]); | |
1443 | close(data_fds[1]); | |
1444 | close(ctrl_fds[0]); | |
1445 | close(ctrl_fds[1]); | |
1446 | return -1; | |
1447 | } | |
1448 | ||
1449 | /* | |
1450 | * New server connection code | |
1451 | * Based upon the stuff floating about in s_bsd.c | |
1452 | * -- adrian | |
1453 | */ | |
1454 | ||
1455 | /* | |
1456 | * serv_connect() - initiate a server connection | |
1457 | * | |
1458 | * inputs - pointer to conf | |
1459 | * - pointer to client doing the connet | |
1460 | * output - | |
1461 | * side effects - | |
1462 | * | |
1463 | * This code initiates a connection to a server. It first checks to make | |
1464 | * sure the given server exists. If this is the case, it creates a socket, | |
1465 | * creates a client, saves the socket information in the client, and | |
1466 | * initiates a connection to the server through comm_connect_tcp(). The | |
1467 | * completion of this goes through serv_completed_connection(). | |
1468 | * | |
1469 | * We return 1 if the connection is attempted, since we don't know whether | |
1470 | * it suceeded or not, and 0 if it fails in here somewhere. | |
1471 | */ | |
1472 | int | |
1473 | serv_connect(struct server_conf *server_p, struct Client *by) | |
1474 | { | |
1475 | struct Client *client_p; | |
1476 | struct irc_sockaddr_storage myipnum; | |
1477 | int fd; | |
17648928 | 1478 | char vhoststr[HOSTIPLEN]; |
212380e3 AC |
1479 | |
1480 | s_assert(server_p != NULL); | |
1481 | if(server_p == NULL) | |
1482 | return 0; | |
1483 | ||
1484 | /* | |
1485 | * Make sure this server isn't already connected | |
1486 | */ | |
1487 | if((client_p = find_server(NULL, server_p->name))) | |
1488 | { | |
1489 | sendto_realops_snomask(SNO_GENERAL, L_ALL, | |
1490 | "Server %s already present from %s", | |
1491 | server_p->name, get_server_name(client_p, SHOW_IP)); | |
1492 | if(by && IsPerson(by) && !MyClient(by)) | |
1493 | sendto_one_notice(by, ":Server %s already present from %s", | |
1494 | server_p->name, get_server_name(client_p, SHOW_IP)); | |
1495 | return 0; | |
1496 | } | |
1497 | ||
1498 | /* create a socket for the server connection */ | |
1499 | if((fd = comm_socket(server_p->aftype, SOCK_STREAM, 0, NULL)) < 0) | |
1500 | { | |
1501 | /* Eek, failure to create the socket */ | |
1502 | report_error("opening stream socket to %s: %s", | |
1503 | server_p->name, server_p->name, errno); | |
1504 | return 0; | |
1505 | } | |
1506 | ||
1507 | /* servernames are always guaranteed under HOSTLEN chars */ | |
1508 | comm_note(fd, "Server: %s", server_p->name); | |
1509 | ||
1510 | /* Create a local client */ | |
1511 | client_p = make_client(NULL); | |
1512 | ||
1513 | /* Copy in the server, hostname, fd | |
1514 | * The sockhost may be a hostname, this will be corrected later | |
1515 | * -- jilles | |
1516 | */ | |
1517 | strlcpy(client_p->name, server_p->name, sizeof(client_p->name)); | |
1518 | strlcpy(client_p->host, server_p->host, sizeof(client_p->host)); | |
1519 | strlcpy(client_p->sockhost, server_p->host, sizeof(client_p->sockhost)); | |
f56fdec2 | 1520 | client_p->localClient->F = comm_add_fd(fd); |
212380e3 AC |
1521 | |
1522 | /* | |
1523 | * Set up the initial server evilness, ripped straight from | |
1524 | * connect_server(), so don't blame me for it being evil. | |
1525 | * -- adrian | |
1526 | */ | |
1527 | ||
c5c2f506 | 1528 | if(!comm_set_buffers(client_p->localClient->F->fd, READBUF_SIZE)) |
212380e3 AC |
1529 | { |
1530 | report_error(SETBUF_ERROR_MSG, | |
1531 | get_server_name(client_p, SHOW_IP), | |
1532 | log_client_name(client_p, SHOW_IP), | |
1533 | errno); | |
1534 | } | |
1535 | ||
1536 | /* | |
1537 | * Attach config entries to client here rather than in | |
1538 | * serv_connect_callback(). This to avoid null pointer references. | |
1539 | */ | |
1540 | attach_server_conf(client_p, server_p); | |
1541 | ||
1542 | /* | |
1543 | * at this point we have a connection in progress and C/N lines | |
1544 | * attached to the client, the socket info should be saved in the | |
1545 | * client and it should either be resolved or have a valid address. | |
1546 | * | |
1547 | * The socket has been connected or connect is in progress. | |
1548 | */ | |
1549 | make_server(client_p); | |
1550 | if(by && IsPerson(by)) | |
1551 | { | |
1552 | strcpy(client_p->serv->by, by->name); | |
1553 | if(client_p->serv->user) | |
1554 | free_user(client_p->serv->user, NULL); | |
1555 | client_p->serv->user = by->user; | |
1556 | by->user->refcnt++; | |
1557 | } | |
1558 | else | |
1559 | { | |
1560 | strcpy(client_p->serv->by, "AutoConn."); | |
1561 | if(client_p->serv->user) | |
1562 | free_user(client_p->serv->user, NULL); | |
1563 | client_p->serv->user = NULL; | |
1564 | } | |
212380e3 AC |
1565 | SetConnecting(client_p); |
1566 | dlinkAddTail(client_p, &client_p->node, &global_client_list); | |
1567 | ||
212380e3 AC |
1568 | if(ServerConfVhosted(server_p)) |
1569 | { | |
1570 | memcpy(&myipnum, &server_p->my_ipnum, sizeof(myipnum)); | |
1571 | ((struct sockaddr_in *)&myipnum)->sin_port = 0; | |
1572 | myipnum.ss_family = server_p->aftype; | |
1573 | ||
1574 | } | |
1575 | else if(server_p->aftype == AF_INET && ServerInfo.specific_ipv4_vhost) | |
1576 | { | |
1577 | memcpy(&myipnum, &ServerInfo.ip, sizeof(myipnum)); | |
1578 | ((struct sockaddr_in *)&myipnum)->sin_port = 0; | |
1579 | myipnum.ss_family = AF_INET; | |
1580 | SET_SS_LEN(myipnum, sizeof(struct sockaddr_in)); | |
1581 | } | |
1582 | ||
1583 | #ifdef IPV6 | |
1584 | else if((server_p->aftype == AF_INET6) && ServerInfo.specific_ipv6_vhost) | |
1585 | { | |
1586 | memcpy(&myipnum, &ServerInfo.ip6, sizeof(myipnum)); | |
1587 | ((struct sockaddr_in6 *)&myipnum)->sin6_port = 0; | |
1588 | myipnum.ss_family = AF_INET6; | |
1589 | SET_SS_LEN(myipnum, sizeof(struct sockaddr_in6)); | |
1590 | } | |
1591 | #endif | |
1592 | else | |
1593 | { | |
17648928 JT |
1594 | /* log */ |
1595 | ilog(L_SERVER, "Connecting to %s[%s] port %d (%s)", server_p->name, server_p->host, server_p->port, | |
1596 | #ifdef IPV6 | |
1597 | server_p->aftype == AF_INET6 ? "IPv6" : | |
1598 | #endif | |
1599 | (server_p->aftype == AF_INET ? "IPv4" : "?")); | |
1600 | ||
c5c2f506 | 1601 | comm_connect_tcp(client_p->localClient->F->fd, server_p->host, |
212380e3 AC |
1602 | server_p->port, NULL, 0, serv_connect_callback, |
1603 | client_p, server_p->aftype, | |
1604 | ConfigFileEntry.connect_timeout); | |
1605 | return 1; | |
1606 | } | |
1607 | ||
17648928 JT |
1608 | /* log */ |
1609 | inetntop_sock((struct sockaddr *)&myipnum, vhoststr, sizeof vhoststr); | |
1610 | ilog(L_SERVER, "Connecting to %s[%s] port %d (%s) (vhost %s)", server_p->name, server_p->host, server_p->port, | |
1611 | #ifdef IPV6 | |
1612 | server_p->aftype == AF_INET6 ? "IPv6" : | |
1613 | #endif | |
1614 | (server_p->aftype == AF_INET ? "IPv4" : "?"), vhoststr); | |
1615 | ||
1616 | ||
c5c2f506 | 1617 | comm_connect_tcp(client_p->localClient->F->fd, server_p->host, |
212380e3 AC |
1618 | server_p->port, (struct sockaddr *) &myipnum, |
1619 | GET_SS_LEN(myipnum), serv_connect_callback, client_p, | |
1620 | myipnum.ss_family, ConfigFileEntry.connect_timeout); | |
1621 | ||
1622 | return 1; | |
1623 | } | |
1624 | ||
1625 | /* | |
1626 | * serv_connect_callback() - complete a server connection. | |
1627 | * | |
1628 | * This routine is called after the server connection attempt has | |
1629 | * completed. If unsucessful, an error is sent to ops and the client | |
1630 | * is closed. If sucessful, it goes through the initialisation/check | |
1631 | * procedures, the capabilities are sent, and the socket is then | |
1632 | * marked for reading. | |
1633 | */ | |
1634 | static void | |
1635 | serv_connect_callback(int fd, int status, void *data) | |
1636 | { | |
1637 | struct Client *client_p = data; | |
1638 | struct server_conf *server_p; | |
1639 | char *errstr; | |
c961476e | 1640 | fde_t *F = comm_locate_fd(fd); |
212380e3 AC |
1641 | |
1642 | /* First, make sure its a real client! */ | |
1643 | s_assert(client_p != NULL); | |
c5c2f506 | 1644 | s_assert(client_p->localClient->F->fd == fd); |
212380e3 AC |
1645 | |
1646 | if(client_p == NULL) | |
1647 | return; | |
1648 | ||
1649 | /* while we were waiting for the callback, its possible this already | |
1650 | * linked in.. --fl | |
1651 | */ | |
1652 | if(find_server(NULL, client_p->name) != NULL) | |
1653 | { | |
1654 | exit_client(client_p, client_p, &me, "Server Exists"); | |
1655 | return; | |
1656 | } | |
1657 | ||
1658 | /* Next, for backward purposes, record the ip of the server */ | |
c961476e | 1659 | memcpy(&client_p->localClient->ip, &F->connect.hostaddr, sizeof client_p->localClient->ip); |
212380e3 | 1660 | /* Set sockhost properly now -- jilles */ |
c961476e | 1661 | inetntop_sock((struct sockaddr *)&F->connect.hostaddr, |
212380e3 AC |
1662 | client_p->sockhost, sizeof client_p->sockhost); |
1663 | ||
1664 | /* Check the status */ | |
1665 | if(status != COMM_OK) | |
1666 | { | |
1667 | /* COMM_ERR_TIMEOUT wont have an errno associated with it, | |
1668 | * the others will.. --fl | |
1669 | */ | |
1670 | if(status == COMM_ERR_TIMEOUT) | |
1671 | { | |
1672 | sendto_realops_snomask(SNO_GENERAL, is_remote_connect(client_p) ? L_NETWIDE : L_ALL, | |
1673 | "Error connecting to %s[%s]: %s", | |
1674 | client_p->name, | |
1675 | #ifdef HIDE_SERVERS_IPS | |
1676 | "255.255.255.255", | |
1677 | #else | |
1678 | client_p->host, | |
1679 | #endif | |
1680 | comm_errstr(status)); | |
1681 | ilog(L_SERVER, "Error connecting to %s[%s]: %s", | |
1682 | client_p->name, client_p->sockhost, | |
1683 | comm_errstr(status)); | |
1684 | } | |
1685 | else | |
1686 | { | |
1687 | errstr = strerror(comm_get_sockerr(fd)); | |
1688 | sendto_realops_snomask(SNO_GENERAL, is_remote_connect(client_p) ? L_NETWIDE : L_ALL, | |
1689 | "Error connecting to %s[%s]: %s (%s)", | |
1690 | client_p->name, | |
1691 | #ifdef HIDE_SERVERS_IPS | |
1692 | "255.255.255.255", | |
1693 | #else | |
1694 | client_p->host, | |
1695 | #endif | |
1696 | comm_errstr(status), errstr); | |
1697 | ilog(L_SERVER, "Error connecting to %s[%s]: %s (%s)", | |
1698 | client_p->name, client_p->sockhost, | |
1699 | comm_errstr(status), errstr); | |
1700 | } | |
1701 | ||
1702 | exit_client(client_p, client_p, &me, comm_errstr(status)); | |
1703 | return; | |
1704 | } | |
1705 | ||
1706 | /* COMM_OK, so continue the connection procedure */ | |
1707 | /* Get the C/N lines */ | |
1708 | if((server_p = client_p->localClient->att_sconf) == NULL) | |
1709 | { | |
1710 | sendto_realops_snomask(SNO_GENERAL, is_remote_connect(client_p) ? L_NETWIDE : L_ALL, "Lost connect{} block for %s", | |
1711 | get_server_name(client_p, HIDE_IP)); | |
1712 | exit_client(client_p, client_p, &me, "Lost connect{} block"); | |
1713 | return; | |
1714 | } | |
1715 | ||
1716 | /* Next, send the initial handshake */ | |
1717 | SetHandshake(client_p); | |
1718 | ||
1719 | /* kludge, if we're not using TS6, dont ever send | |
1720 | * ourselves as being TS6 capable. | |
1721 | */ | |
1722 | if(!EmptyString(server_p->spasswd)) | |
1723 | { | |
cda8e9b8 AC |
1724 | sendto_one(client_p, "PASS %s TS %d :%s", |
1725 | server_p->spasswd, TS_CURRENT, me.id); | |
212380e3 AC |
1726 | } |
1727 | ||
1728 | /* pass my info to the new server */ | |
1729 | send_capabilities(client_p, default_server_capabs | |
1730 | | (ServerConfCompressed(server_p) ? CAP_ZIP_SUPPORTED : 0) | |
1731 | | (ServerConfTb(server_p) ? CAP_TB : 0)); | |
1732 | ||
1733 | sendto_one(client_p, "SERVER %s 1 :%s%s", | |
1734 | me.name, | |
1735 | ConfigServerHide.hidden ? "(H) " : "", me.info); | |
1736 | ||
1737 | /* | |
1738 | * If we've been marked dead because a send failed, just exit | |
1739 | * here now and save everyone the trouble of us ever existing. | |
1740 | */ | |
1741 | if(IsAnyDead(client_p)) | |
1742 | { | |
1743 | sendto_realops_snomask(SNO_GENERAL, is_remote_connect(client_p) ? L_NETWIDE : L_ALL, | |
1744 | "%s went dead during handshake", client_p->name); | |
1745 | exit_client(client_p, client_p, &me, "Went dead during handshake"); | |
1746 | return; | |
1747 | } | |
1748 | ||
1749 | /* don't move to serv_list yet -- we haven't sent a burst! */ | |
1750 | ||
1751 | /* If we get here, we're ok, so lets start reading some data */ | |
1752 | read_packet(fd, client_p); | |
1753 | } | |
1754 | ||
1755 | #ifndef HAVE_SOCKETPAIR | |
1756 | static int | |
1757 | inet_socketpair(int d, int type, int protocol, int sv[2]) | |
1758 | { | |
1759 | struct sockaddr_in addr1, addr2, addr3; | |
1760 | int addr3_len = sizeof(addr3); | |
1761 | int fd, rc; | |
1762 | int port_no = 20000; | |
1763 | ||
1764 | if(d != AF_INET || type != SOCK_STREAM || protocol) | |
1765 | { | |
1766 | errno = EAFNOSUPPORT; | |
1767 | return -1; | |
1768 | } | |
1769 | if(((sv[0] = socket(AF_INET, SOCK_STREAM, 0)) < 0) || ((sv[1] = socket(AF_INET, SOCK_STREAM, 0)) < 0)) | |
1770 | return -1; | |
1771 | ||
1772 | addr1.sin_port = htons(port_no); | |
1773 | addr1.sin_family = AF_INET; | |
1774 | addr1.sin_addr.s_addr = htonl(INADDR_LOOPBACK); | |
1775 | while ((rc = bind (sv[0], (struct sockaddr *) &addr1, sizeof (addr1))) < 0 && errno == EADDRINUSE) | |
1776 | addr1.sin_port = htons(++port_no); | |
1777 | ||
1778 | if(rc < 0) | |
1779 | return -1; | |
1780 | ||
1781 | if(listen(sv[0], 1) < 0) | |
1782 | { | |
1783 | close(sv[0]); | |
1784 | close(sv[1]); | |
1785 | return -1; | |
1786 | } | |
1787 | ||
1788 | addr2.sin_port = htons(port_no); | |
1789 | addr2.sin_family = AF_INET; | |
1790 | addr2.sin_addr.s_addr = htonl(INADDR_LOOPBACK); | |
1791 | if(connect (sv[1], (struct sockaddr *) &addr2, sizeof (addr2)) < 0) | |
1792 | { | |
1793 | close(sv[0]); | |
1794 | close(sv[1]); | |
1795 | return -1; | |
1796 | } | |
1797 | ||
1798 | if((fd = accept(sv[1], (struct sockaddr *) &addr3, &addr3_len)) < 0) | |
1799 | { | |
1800 | close(sv[0]); | |
1801 | close(sv[1]); | |
1802 | return -1; | |
1803 | } | |
1804 | close(sv[0]); | |
1805 | sv[0] = fd; | |
1806 | ||
1807 | return(0); | |
1808 | ||
1809 | } | |
1810 | #endif |