/[svn]/ircd-hybrid-7.2/src/client.c
ViewVC logotype

Contents of /ircd-hybrid-7.2/src/client.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 317 - (show annotations)
Sat Dec 24 14:45:17 2005 UTC (13 years, 10 months ago) by michael
File MIME type: text/x-chdr
File size: 42237 byte(s)
- Backported revision 315 (trimmed memory usage by moving invited
  dlink_list to LocalUser struct)

1 /*
2 * ircd-hybrid: an advanced Internet Relay Chat Daemon(ircd).
3 * client.c: Controls clients.
4 *
5 * Copyright (C) 2002 by the past and present ircd coders, and others.
6 *
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 2 of the License, or
10 * (at your option) any later version.
11 *
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
20 * USA
21 *
22 * $Id$
23 */
24
25 #include "stdinc.h"
26 #include "tools.h"
27 #include "client.h"
28 #include "channel_mode.h"
29 #include "common.h"
30 #include "event.h"
31 #include "fdlist.h"
32 #include "hash.h"
33 #include "irc_string.h"
34 #include "sprintf_irc.h"
35 #include "ircd.h"
36 #include "list.h"
37 #include "s_gline.h"
38 #include "numeric.h"
39 #include "packet.h"
40 #include "s_auth.h"
41 #include "s_bsd.h"
42 #include "s_conf.h"
43 #include "s_log.h"
44 #include "s_misc.h"
45 #include "s_serv.h"
46 #include "send.h"
47 #include "whowas.h"
48 #include "s_user.h"
49 #include "dbuf.h"
50 #include "memory.h"
51 #include "hostmask.h"
52 #include "balloc.h"
53 #include "listener.h"
54 #include "irc_res.h"
55 #include "userhost.h"
56
57 dlink_list listing_client_list = { NULL, NULL, 0 };
58 /* Pointer to beginning of Client list */
59 dlink_list global_client_list = {NULL, NULL, 0};
60 /* unknown/client pointer lists */
61 dlink_list unknown_list = {NULL, NULL, 0};
62 dlink_list local_client_list = {NULL, NULL, 0};
63 dlink_list serv_list = {NULL, NULL, 0};
64 dlink_list global_serv_list = {NULL, NULL, 0};
65 dlink_list oper_list = {NULL, NULL, 0};
66
67 static EVH check_pings;
68
69 static BlockHeap *client_heap = NULL;
70 static BlockHeap *lclient_heap = NULL;
71
72 static dlink_list dead_list = { NULL, NULL, 0};
73 static dlink_list abort_list = { NULL, NULL, 0};
74
75 static dlink_node *eac_next; /* next aborted client to exit */
76
77 static void check_pings_list(dlink_list *);
78 static void check_unknowns_list(void);
79 static void ban_them(struct Client *client_p, struct ConfItem *conf);
80
81
82 /* init_client()
83 *
84 * inputs - NONE
85 * output - NONE
86 * side effects - initialize client free memory
87 */
88 void
89 init_client(void)
90 {
91 /* start off the check ping event .. -- adrian
92 * Every 30 seconds is plenty -- db
93 */
94 client_heap = BlockHeapCreate("client", sizeof(struct Client), CLIENT_HEAP_SIZE);
95 lclient_heap = BlockHeapCreate("local client", sizeof(struct LocalUser), LCLIENT_HEAP_SIZE);
96 eventAdd("check_pings", check_pings, NULL, 5);
97 }
98
99 /*
100 * make_client - create a new Client struct and set it to initial state.
101 *
102 * from == NULL, create local client (a client connected
103 * to a socket).
104 * WARNING: This leaves the client in a dangerous
105 * state where fd == -1, dead flag is not set and
106 * the client is on the unknown_list; therefore,
107 * the first thing to do after calling make_client(NULL)
108 * is setting fd to something reasonable. -adx
109 *
110 * from, create remote client (behind a socket
111 * associated with the client defined by
112 * 'from'). ('from' is a local client!!).
113 */
114 struct Client *
115 make_client(struct Client *from)
116 {
117 struct Client *client_p = BlockHeapAlloc(client_heap);
118
119 if (from == NULL)
120 {
121 client_p->from = client_p; /* 'from' of local client is self! */
122 client_p->since = client_p->lasttime = client_p->firsttime = CurrentTime;
123
124 client_p->localClient = BlockHeapAlloc(lclient_heap);
125 /* as good a place as any... */
126 dlinkAdd(client_p, make_dlink_node(), &unknown_list);
127 }
128 else
129 client_p->from = from; /* 'from' of local client is self! */
130
131 client_p->hnext = client_p;
132 client_p->status = STAT_UNKNOWN;
133 strcpy(client_p->username, "unknown");
134
135 return client_p;
136 }
137
138 /*
139 * free_client
140 *
141 * inputs - pointer to client
142 * output - NONE
143 * side effects - client pointed to has its memory freed
144 */
145 static void
146 free_client(struct Client *client_p)
147 {
148 assert(client_p != NULL);
149 assert(client_p != &me);
150 assert(client_p->hnext == client_p);
151 assert(client_p->channel.head == NULL);
152 assert(dlink_list_length(&client_p->channel) == 0);
153
154 MyFree(client_p->away);
155 MyFree(client_p->serv);
156
157 if (MyConnect(client_p))
158 {
159 assert(client_p->localClient->invited.head == NULL);
160 assert(dlink_list_length(&client_p->localClient->invited) == 0);
161 assert(IsClosing(client_p) && IsDead(client_p));
162
163 MyFree(client_p->localClient->response);
164 MyFree(client_p->localClient->auth_oper);
165
166 /*
167 * clean up extra sockets from P-lines which have been discarded.
168 */
169 if (client_p->localClient->listener)
170 {
171 assert(0 < client_p->localClient->listener->ref_count);
172 if (0 == --client_p->localClient->listener->ref_count &&
173 !client_p->localClient->listener->active)
174 free_listener(client_p->localClient->listener);
175 }
176
177 dbuf_clear(&client_p->localClient->buf_recvq);
178 dbuf_clear(&client_p->localClient->buf_sendq);
179
180 BlockHeapFree(lclient_heap, client_p->localClient);
181 }
182
183 BlockHeapFree(client_heap, client_p);
184 }
185
186 /*
187 * check_pings - go through the local client list and check activity
188 * kill off stuff that should die
189 *
190 * inputs - NOT USED (from event)
191 * output - next time_t when check_pings() should be called again
192 * side effects -
193 *
194 *
195 * A PING can be sent to clients as necessary.
196 *
197 * Client/Server ping outs are handled.
198 */
199
200 /*
201 * Addon from adrian. We used to call this after nextping seconds,
202 * however I've changed it to run once a second. This is only for
203 * PING timeouts, not K/etc-line checks (thanks dianora!). Having it
204 * run once a second makes life a lot easier - when a new client connects
205 * and they need a ping in 4 seconds, if nextping was set to 20 seconds
206 * we end up waiting 20 seconds. This is stupid. :-)
207 * I will optimise (hah!) check_pings() once I've finished working on
208 * tidying up other network IO evilnesses.
209 * -- adrian
210 */
211
212 static void
213 check_pings(void *notused)
214 {
215 check_pings_list(&local_client_list);
216 check_pings_list(&serv_list);
217 check_unknowns_list();
218 }
219
220 /* check_pings_list()
221 *
222 * inputs - pointer to list to check
223 * output - NONE
224 * side effects -
225 */
226 static void
227 check_pings_list(dlink_list *list)
228 {
229 char scratch[32]; /* way too generous but... */
230 struct Client *client_p; /* current local client_p being examined */
231 int ping, pingwarn; /* ping time value from client */
232 dlink_node *ptr, *next_ptr;
233
234 DLINK_FOREACH_SAFE(ptr, next_ptr, list->head)
235 {
236 client_p = ptr->data;
237
238 /*
239 ** Note: No need to notify opers here. It's
240 ** already done when "FLAGS_DEADSOCKET" is set.
241 */
242 if (IsDead(client_p))
243 {
244 /* Ignore it, its been exited already */
245 continue;
246 }
247
248 if (client_p->localClient->reject_delay > 0)
249 {
250 if (client_p->localClient->reject_delay <= CurrentTime)
251 exit_client(client_p, &me, "Rejected");
252 continue;
253 }
254
255 if (GlobalSetOptions.idletime && IsClient(client_p))
256 {
257 if (!IsExemptKline(client_p) && !IsOper(client_p) &&
258 !IsIdlelined(client_p) &&
259 ((CurrentTime - client_p->localClient->last) > GlobalSetOptions.idletime))
260 {
261 struct ConfItem *conf;
262 struct AccessItem *aconf;
263
264 conf = make_conf_item(KLINE_TYPE);
265 aconf = (struct AccessItem *)map_to_conf(conf);
266
267 DupString(aconf->host, client_p->host);
268 DupString(aconf->reason, "idle exceeder");
269 DupString(aconf->user, client_p->username);
270 aconf->hold = CurrentTime + 60;
271 add_temp_line(conf);
272
273 sendto_realops_flags(UMODE_ALL, L_ALL,
274 "Idle time limit exceeded for %s - temp k-lining",
275 get_client_name(client_p, HIDE_IP));
276 exit_client(client_p, &me, aconf->reason);
277 continue;
278 }
279 }
280
281 if (!IsRegistered(client_p))
282 ping = CONNECTTIMEOUT, pingwarn = 0;
283 else
284 ping = get_client_ping(client_p, &pingwarn);
285
286 if (ping < CurrentTime - client_p->lasttime)
287 {
288 if (!IsPingSent(client_p))
289 {
290 /*
291 * if we havent PINGed the connection and we havent
292 * heard from it in a while, PING it to make sure
293 * it is still alive.
294 */
295 SetPingSent(client_p);
296 ClearPingWarning(client_p);
297 client_p->lasttime = CurrentTime - ping;
298 sendto_one(client_p, "PING :%s", ID_or_name(&me, client_p));
299 }
300 else
301 {
302 if (CurrentTime - client_p->lasttime >= 2 * ping)
303 {
304 /*
305 * If the client/server hasn't talked to us in 2*ping seconds
306 * and it has a ping time, then close its connection.
307 */
308 if (IsServer(client_p) || IsHandshake(client_p))
309 {
310 sendto_realops_flags(UMODE_ALL, L_ADMIN,
311 "No response from %s, closing link",
312 get_client_name(client_p, HIDE_IP));
313 sendto_realops_flags(UMODE_ALL, L_OPER,
314 "No response from %s, closing link",
315 get_client_name(client_p, MASK_IP));
316 ilog(L_NOTICE, "No response from %s, closing link",
317 get_client_name(client_p, HIDE_IP));
318 }
319 ircsprintf(scratch, "Ping timeout: %d seconds",
320 (int)(CurrentTime - client_p->lasttime));
321
322 exit_client(client_p, &me, scratch);
323 }
324 else if (!IsPingWarning(client_p) && pingwarn > 0 &&
325 (IsServer(client_p) || IsHandshake(client_p)) &&
326 CurrentTime - client_p->lasttime >= ping + pingwarn)
327 {
328 /*
329 * If the server hasn't replied in pingwarn seconds after sending
330 * the PING, notify the opers so that they are aware of the problem.
331 */
332 SetPingWarning(client_p);
333 sendto_realops_flags(UMODE_ALL, L_ADMIN,
334 "Warning, no response from %s in %d seconds",
335 get_client_name(client_p, HIDE_IP), pingwarn);
336 sendto_realops_flags(UMODE_ALL, L_OPER,
337 "Warning, no response from %s in %d seconds",
338 get_client_name(client_p, MASK_IP), pingwarn);
339 ilog(L_NOTICE, "No response from %s in %d seconds",
340 get_client_name(client_p, HIDE_IP), pingwarn);
341 }
342 }
343 }
344 }
345 }
346
347 /* check_unknowns_list()
348 *
349 * inputs - pointer to list of unknown clients
350 * output - NONE
351 * side effects - unknown clients get marked for termination after n seconds
352 */
353 static void
354 check_unknowns_list(void)
355 {
356 dlink_node *ptr, *next_ptr;
357
358 DLINK_FOREACH_SAFE(ptr, next_ptr, unknown_list.head)
359 {
360 struct Client *client_p = ptr->data;
361
362 if (client_p->localClient->reject_delay > 0)
363 {
364 if (client_p->localClient->reject_delay <= CurrentTime)
365 exit_client(client_p, &me, "Rejected");
366 continue;
367 }
368
369 /* Check UNKNOWN connections - if they have been in this state
370 * for > 30s, close them.
371 */
372 if (client_p->firsttime ? ((CurrentTime - client_p->firsttime) > 30) : 0)
373 exit_client(client_p, &me, "Connection timed out");
374 }
375 }
376
377 /* check_conf_klines()
378 *
379 * inputs - NONE
380 * output - NONE
381 * side effects - Check all connections for a pending kline against the
382 * client, exit the client if a kline matches.
383 */
384 void
385 check_conf_klines(void)
386 {
387 struct Client *client_p = NULL; /* current local client_p being examined */
388 struct AccessItem *aconf = NULL;
389 struct ConfItem *conf = NULL;
390 dlink_node *ptr, *next_ptr;
391
392 DLINK_FOREACH_SAFE(ptr, next_ptr, local_client_list.head)
393 {
394 client_p = ptr->data;
395
396 /* If a client is already being exited
397 */
398 if (IsDead(client_p) || !IsClient(client_p))
399 continue;
400
401 /* if there is a returned struct ConfItem then kill it */
402 if ((aconf = find_dline_conf(&client_p->localClient->ip,
403 client_p->localClient->aftype)) != NULL)
404 {
405 if (aconf->status & CONF_EXEMPTDLINE)
406 continue;
407
408 conf = unmap_conf_item(aconf);
409 ban_them(client_p, conf);
410 continue; /* and go examine next fd/client_p */
411 }
412
413 if (ConfigFileEntry.glines && (aconf = find_gline(client_p)))
414 {
415 if (IsExemptKline(client_p) ||
416 IsExemptGline(client_p))
417 {
418 sendto_realops_flags(UMODE_ALL, L_ALL,
419 "GLINE over-ruled for %s, client is %sline_exempt",
420 get_client_name(client_p, HIDE_IP), IsExemptKline(client_p) ? "k" : "g");
421 continue;
422 }
423
424 conf = unmap_conf_item(aconf);
425 ban_them(client_p, conf);
426 /* and go examine next fd/client_p */
427 continue;
428 }
429
430 if ((aconf = find_kill(client_p)) != NULL)
431 {
432
433 /* if there is a returned struct AccessItem.. then kill it */
434 if (IsExemptKline(client_p))
435 {
436 sendto_realops_flags(UMODE_ALL, L_ALL,
437 "KLINE over-ruled for %s, client is kline_exempt",
438 get_client_name(client_p, HIDE_IP));
439 continue;
440 }
441
442 conf = unmap_conf_item(aconf);
443 ban_them(client_p, conf);
444 continue;
445 }
446
447 /* if there is a returned struct MatchItem then kill it */
448 if ((conf = find_matching_name_conf(XLINE_TYPE, client_p->info,
449 NULL, NULL, 0)) != NULL ||
450 (conf = find_matching_name_conf(RXLINE_TYPE, client_p->info,
451 NULL, NULL, 0)) != NULL)
452 {
453 ban_them(client_p, conf);
454 continue;
455 }
456 }
457
458 /* also check the unknowns list for new dlines */
459 DLINK_FOREACH_SAFE(ptr, next_ptr, unknown_list.head)
460 {
461 client_p = ptr->data;
462
463 if ((aconf = find_dline_conf(&client_p->localClient->ip,
464 client_p->localClient->aftype)))
465 {
466 if (aconf->status & CONF_EXEMPTDLINE)
467 continue;
468
469 exit_client(client_p, &me, "D-lined");
470 }
471 }
472 }
473
474 /*
475 * ban_them
476 *
477 * inputs - pointer to client to ban
478 * - pointer to ConfItem
479 * output - NONE
480 * side effects - given client_p is banned
481 */
482 static void
483 ban_them(struct Client *client_p, struct ConfItem *conf)
484 {
485 const char *user_reason = NULL; /* What is sent to user */
486 const char *channel_reason = NULL; /* What is sent to channel */
487 struct AccessItem *aconf = NULL;
488 struct MatchItem *xconf = NULL;
489 const char *type_string = NULL;
490 const char dline_string[] = "D-line";
491 const char kline_string[] = "K-line";
492 const char gline_string[] = "G-line";
493 const char xline_string[] = "X-line";
494
495 switch (conf->type)
496 {
497 case RKLINE_TYPE:
498 case KLINE_TYPE:
499 type_string = kline_string;
500 aconf = map_to_conf(conf);
501 break;
502 case DLINE_TYPE:
503 type_string = dline_string;
504 aconf = map_to_conf(conf);
505 break;
506 case GLINE_TYPE:
507 type_string = gline_string;
508 aconf = map_to_conf(conf);
509 break;
510 case RXLINE_TYPE:
511 case XLINE_TYPE:
512 type_string = xline_string;
513 xconf = map_to_conf(conf);
514 ++xconf->count;
515 break;
516 default:
517 assert(0);
518 break;
519 }
520
521 if (ConfigFileEntry.kline_with_reason)
522 {
523 if (aconf != NULL)
524 user_reason = aconf->reason ? aconf->reason : type_string;
525 if (xconf != NULL)
526 user_reason = xconf->reason ? xconf->reason : type_string;
527 }
528 else
529 user_reason = type_string;
530
531 if (ConfigFileEntry.kline_reason != NULL)
532 channel_reason = ConfigFileEntry.kline_reason;
533 else
534 channel_reason = user_reason;
535
536 sendto_realops_flags(UMODE_ALL, L_ALL, "%s active for %s",
537 type_string, get_client_name(client_p, HIDE_IP));
538
539 if (IsClient(client_p))
540 sendto_one(client_p, form_str(ERR_YOUREBANNEDCREEP),
541 me.name, client_p->name, user_reason);
542
543 exit_client(client_p, &me, channel_reason);
544 }
545
546 /* update_client_exit_stats()
547 *
548 * input - pointer to client
549 * output - NONE
550 * side effects -
551 */
552 static void
553 update_client_exit_stats(struct Client *client_p)
554 {
555 if (IsServer(client_p))
556 {
557 sendto_realops_flags(UMODE_EXTERNAL, L_ALL,
558 "Server %s split from %s",
559 client_p->name, client_p->servptr->name);
560 }
561 else if (IsClient(client_p))
562 {
563 --Count.total;
564 if (IsOper(client_p))
565 --Count.oper;
566 if (IsInvisible(client_p))
567 --Count.invisi;
568 }
569
570 if (splitchecking && !splitmode)
571 check_splitmode(NULL);
572 }
573
574 /* find_person()
575 *
576 * inputs - pointer to name
577 * output - return client pointer
578 * side effects - find person by (nick)name
579 */
580 /* XXX - ugly wrapper */
581 struct Client *
582 find_person(const struct Client *client_p, const char *name)
583 {
584 struct Client *c2ptr;
585
586 if (IsDigit(*name))
587 {
588 if ((c2ptr = hash_find_id(name)) != NULL)
589 {
590 /* invisible users shall not be found by UID guessing */
591 if (IsInvisible(c2ptr) && !IsServer(client_p))
592 c2ptr = NULL;
593 }
594 }
595 else
596 c2ptr = find_client(name);
597
598 return ((c2ptr != NULL && IsClient(c2ptr)) ? c2ptr : NULL);
599 }
600
601 /*
602 * find_chasing - find the client structure for a nick name (user)
603 * using history mechanism if necessary. If the client is not found,
604 * an error message (NO SUCH NICK) is generated. If the client was found
605 * through the history, chasing will be 1 and otherwise 0.
606 */
607 struct Client *
608 find_chasing(struct Client *client_p, struct Client *source_p, const char *user, int *chasing)
609 {
610 struct Client *who = find_person(client_p, user);
611
612 if (chasing)
613 *chasing = 0;
614
615 if (who)
616 return(who);
617
618 if (IsDigit(*user))
619 return(NULL);
620
621 if ((who = get_history(user,
622 (time_t)ConfigFileEntry.kill_chase_time_limit))
623 == NULL)
624 {
625 sendto_one(source_p, form_str(ERR_NOSUCHNICK),
626 me.name, source_p->name, user);
627 return(NULL);
628 }
629
630 if (chasing)
631 *chasing = 1;
632
633 return(who);
634 }
635
636 /*
637 * get_client_name - Return the name of the client
638 * for various tracking and
639 * admin purposes. The main purpose of this function is to
640 * return the "socket host" name of the client, if that
641 * differs from the advertised name (other than case).
642 * But, this can be used to any client structure.
643 *
644 * NOTE 1:
645 * Watch out the allocation of "nbuf", if either source_p->name
646 * or source_p->sockhost gets changed into pointers instead of
647 * directly allocated within the structure...
648 *
649 * NOTE 2:
650 * Function return either a pointer to the structure (source_p) or
651 * to internal buffer (nbuf). *NEVER* use the returned pointer
652 * to modify what it points!!!
653 */
654 const char *
655 get_client_name(struct Client *client, int showip)
656 {
657 static char nbuf[HOSTLEN * 2 + USERLEN + 5];
658
659 assert(client != NULL);
660
661 if (irccmp(client->name, client->host) == 0)
662 return(client->name);
663
664 if (ConfigServerHide.hide_server_ips)
665 if (IsServer(client) || IsConnecting(client) || IsHandshake(client))
666 showip = MASK_IP;
667
668 if (ConfigFileEntry.hide_spoof_ips)
669 if (showip == SHOW_IP && IsIPSpoof(client))
670 showip = MASK_IP;
671
672 /* And finally, let's get the host information, ip or name */
673 switch (showip)
674 {
675 case SHOW_IP:
676 if (MyConnect(client))
677 {
678 ircsprintf(nbuf, "%s[%s@%s]", client->name, client->username,
679 client->sockhost);
680 break;
681 }
682 case MASK_IP:
683 ircsprintf(nbuf, "%s[%s@255.255.255.255]", client->name,
684 client->username);
685 break;
686 default:
687 ircsprintf(nbuf, "%s[%s@%s]", client->name, client->username,
688 client->host);
689 }
690
691 return(nbuf);
692 }
693
694 void
695 free_exited_clients(void)
696 {
697 dlink_node *ptr, *next;
698 struct Client *target_p;
699
700 DLINK_FOREACH_SAFE(ptr, next, dead_list.head)
701 {
702 target_p = ptr->data;
703
704 if (ptr->data == NULL)
705 {
706 sendto_realops_flags(UMODE_ALL, L_ALL,
707 "Warning: null client on dead_list!");
708 dlinkDelete(ptr, &dead_list);
709 free_dlink_node(ptr);
710 continue;
711 }
712
713 free_client(target_p);
714 dlinkDelete(ptr, &dead_list);
715 free_dlink_node(ptr);
716 }
717 }
718
719 /*
720 * Exit one client, local or remote. Assuming all dependents have
721 * been already removed, and socket closed for local client.
722 *
723 * The only messages generated are QUITs on channels.
724 */
725 static void
726 exit_one_client(struct Client *source_p, const char *quitmsg)
727 {
728 dlink_node *lp = NULL, *next_lp = NULL;
729
730 assert(!IsMe(source_p));
731
732 if (IsServer(source_p))
733 {
734 dlinkDelete(&source_p->lnode, &source_p->servptr->serv->servers);
735
736 if ((lp = dlinkFindDelete(&global_serv_list, source_p)) != NULL)
737 free_dlink_node(lp);
738
739 if (!MyConnect(source_p))
740 {
741 source_p->from->serv->dep_servers--;
742 assert(source_p->from->serv->dep_servers > 0);
743 }
744 }
745 else if (IsClient(source_p))
746 {
747 if (source_p->servptr->serv != NULL)
748 dlinkDelete(&source_p->lnode, &source_p->servptr->serv->users);
749
750 /* If a person is on a channel, send a QUIT notice
751 ** to every client (person) on the same channel (so
752 ** that the client can show the "**signoff" message).
753 ** (Note: The notice is to the local clients *only*)
754 */
755 sendto_common_channels_local(source_p, 0, ":%s!%s@%s QUIT :%s",
756 source_p->name, source_p->username,
757 source_p->host, quitmsg);
758 DLINK_FOREACH_SAFE(lp, next_lp, source_p->channel.head)
759 remove_user_from_channel(lp->data);
760
761 /* Clean up allow lists */
762 del_all_accepts(source_p);
763 add_history(source_p, 0);
764 off_history(source_p);
765
766 if (!MyConnect(source_p))
767 {
768 source_p->from->serv->dep_users--;
769 assert(source_p->from->serv->dep_users >= 0);
770 }
771 else
772 {
773 /* Clean up invitefield */
774 DLINK_FOREACH_SAFE(lp, next_lp, source_p->localClient->invited.head)
775 del_invite(lp->data, source_p);
776 }
777 }
778
779 /* Remove source_p from the client lists */
780 if (HasID(source_p))
781 hash_del_id(source_p);
782 if (source_p->name[0])
783 hash_del_client(source_p);
784
785 if (IsUserHostIp(source_p))
786 delete_user_host(source_p->username, source_p->host, !MyConnect(source_p));
787
788 /* remove from global client list
789 * NOTE: source_p->node.next cannot be NULL if the client is added
790 * to global_client_list (there is always &me at its end)
791 */
792 if (source_p != NULL && source_p->node.next != NULL)
793 dlinkDelete(&source_p->node, &global_client_list);
794
795 update_client_exit_stats(source_p);
796
797 /* Check to see if the client isn't already on the dead list */
798 assert(dlinkFind(&dead_list, source_p) == NULL);
799
800 /* add to dead client dlist */
801 SetDead(source_p);
802 dlinkAdd(source_p, make_dlink_node(), &dead_list);
803 }
804
805 /* Recursively send QUITs and SQUITs for source_p and all its dependent clients
806 * and servers to those servers that need them. A server needs the client
807 * QUITs if it can't figure them out from the SQUIT (ie pre-TS4) or if it
808 * isn't getting the SQUIT because of @#(*&@)# hostmasking. With TS4, once
809 * a link gets a SQUIT, it doesn't need any QUIT/SQUITs for clients depending
810 * on that one -orabidoo
811 *
812 * This is now called on each local server -adx
813 */
814 static void
815 recurse_send_quits(struct Client *original_source_p, struct Client *source_p,
816 struct Client *from, struct Client *to, const char *comment,
817 const char *splitstr, const char *myname)
818 {
819 dlink_node *ptr, *next;
820 struct Client *target_p;
821 int hidden = match(myname, source_p->name);
822
823 assert(to != source_p); /* should be already removed from serv_list */
824
825 /* If this server can handle quit storm (QS) removal
826 * of dependents, just send the SQUIT
827 *
828 * Always check *all* dependent servers if some of them are
829 * hidden behind fakename. If so, send out the QUITs -adx
830 */
831 if (hidden || !IsCapable(to, CAP_QS))
832 DLINK_FOREACH_SAFE(ptr, next, source_p->serv->users.head)
833 {
834 target_p = ptr->data;
835 sendto_one(to, ":%s QUIT :%s", target_p->name, splitstr);
836 }
837
838 DLINK_FOREACH_SAFE(ptr, next, source_p->serv->servers.head)
839 recurse_send_quits(original_source_p, ptr->data, from, to,
840 comment, splitstr, myname);
841
842 if (!hidden && ((source_p == original_source_p && to != from) ||
843 !IsCapable(to, CAP_QS)))
844 {
845 /* don't use a prefix here - we have to be 100% sure the message
846 * will be accepted without Unknown prefix etc.. */
847 sendto_one(to, "SQUIT %s :%s", ID_or_name(source_p, to), comment);
848 }
849 }
850
851 /*
852 * Remove all clients that depend on source_p; assumes all (S)QUITs have
853 * already been sent. we make sure to exit a server's dependent clients
854 * and servers before the server itself; exit_one_client takes care of
855 * actually removing things off llists. tweaked from +CSr31 -orabidoo
856 */
857 static void
858 recurse_remove_clients(struct Client *source_p, const char *quitmsg)
859 {
860 dlink_node *ptr, *next;
861
862 DLINK_FOREACH_SAFE(ptr, next, source_p->serv->users.head)
863 exit_one_client(ptr->data, quitmsg);
864
865 DLINK_FOREACH_SAFE(ptr, next, source_p->serv->servers.head)
866 {
867 recurse_remove_clients(ptr->data, quitmsg);
868 exit_one_client(ptr->data, quitmsg);
869 }
870
871 assert(source_p->serv->dep_servers == 1);
872 assert(source_p->serv->dep_users == 0);
873 }
874
875 /*
876 ** Remove *everything* that depends on source_p, from all lists, and sending
877 ** all necessary QUITs and SQUITs. source_p itself is still on the lists,
878 ** and its SQUITs have been sent except for the upstream one -orabidoo
879 */
880 static void
881 remove_dependents(struct Client *source_p, struct Client *from,
882 const char *comment, const char *splitstr)
883 {
884 struct Client *to;
885 struct ConfItem *conf;
886 static char myname[HOSTLEN+1];
887 dlink_node *ptr;
888
889 DLINK_FOREACH(ptr, serv_list.head)
890 {
891 to = ptr->data;
892
893 if ((conf = to->serv->sconf) != NULL)
894 strlcpy(myname, my_name_for_link(conf), sizeof(myname));
895 else
896 strlcpy(myname, me.name, sizeof(myname));
897 recurse_send_quits(source_p, source_p, from, to,
898 comment, splitstr, myname);
899 }
900
901 recurse_remove_clients(source_p, splitstr);
902 }
903
904 /*
905 * exit_client - exit a client of any type. Generally, you can use
906 * this on any struct Client, regardless of its state.
907 *
908 * Note, you shouldn't exit remote _users_ without first doing
909 * SetKilled and propagating a kill or similar message. However,
910 * it is perfectly correct to call exit_client to force a _server_
911 * quit (either local or remote one).
912 *
913 * inputs: - a client pointer that is going to be exited
914 * - for servers, the second argument is a pointer to who
915 * is firing the server. This side won't get any generated
916 * messages. NEVER NULL!
917 * output: none
918 * side effects: the client is delinked from all lists, disconnected,
919 * and the rest of IRC network is notified of the exit.
920 * Client memory is scheduled to be freed
921 */
922 void
923 exit_client(struct Client *source_p, struct Client *from, const char *comment)
924 {
925 dlink_node *m;
926
927 if (MyConnect(source_p))
928 {
929 /* DO NOT REMOVE. exit_client can be called twice after a failed
930 * read/write.
931 */
932 if (IsClosing(source_p))
933 return;
934
935 SetClosing(source_p);
936
937 if (IsIpHash(source_p))
938 remove_one_ip(&source_p->localClient->ip);
939
940 delete_auth(source_p);
941
942 /* This source_p could have status of one of STAT_UNKNOWN, STAT_CONNECTING
943 * STAT_HANDSHAKE or STAT_UNKNOWN
944 * all of which are lumped together into unknown_list
945 *
946 * In all above cases IsRegistered() will not be true.
947 */
948 if (!IsRegistered(source_p))
949 {
950 if ((m = dlinkFindDelete(&unknown_list, source_p)) != NULL)
951 free_dlink_node(m);
952 }
953 else if (IsClient(source_p))
954 {
955 Count.local--;
956
957 if (IsOper(source_p))
958 {
959 if ((m = dlinkFindDelete(&oper_list, source_p)) != NULL)
960 free_dlink_node(m);
961 }
962
963 dlinkDelete(&source_p->localClient->lclient_node, &local_client_list);
964 if (source_p->localClient->list_task != NULL)
965 free_list_task(source_p->localClient->list_task, source_p);
966
967 sendto_realops_flags(UMODE_CCONN, L_ALL, "Client exiting: %s (%s@%s) [%s] [%s]",
968 source_p->name, source_p->username, source_p->host, comment,
969 ConfigFileEntry.hide_spoof_ips && IsIPSpoof(source_p) ?
970 "255.255.255.255" : source_p->sockhost);
971 }
972
973 /* As soon as a client is known to be a server of some sort
974 * it has to be put on the serv_list, or SJOIN's to this new server
975 * from the connect burst will not be seen.
976 */
977 if (IsServer(source_p) || IsConnecting(source_p) ||
978 IsHandshake(source_p))
979 {
980 if ((m = dlinkFindDelete(&serv_list, source_p)) != NULL)
981 {
982 free_dlink_node(m);
983 unset_chcap_usage_counts(source_p);
984 }
985
986 if (IsServer(source_p))
987 {
988 Count.myserver--;
989 if (ServerInfo.hub)
990 remove_lazylink_flags(source_p->localClient->serverMask);
991 else
992 uplink = NULL;
993 }
994 }
995
996 log_user_exit(source_p);
997
998 if (!IsDead(source_p))
999 {
1000 if (IsServer(source_p))
1001 {
1002 /* for them, we are exiting the network */
1003 sendto_one(source_p, ":%s SQUIT %s :%s",
1004 ID_or_name(from, source_p), me.name, comment);
1005 }
1006
1007 sendto_one(source_p, "ERROR :Closing Link: %s (%s)",
1008 source_p->host, comment);
1009 }
1010
1011 /*
1012 ** Currently only server connections can have
1013 ** depending remote clients here, but it does no
1014 ** harm to check for all local clients. In
1015 ** future some other clients than servers might
1016 ** have remotes too...
1017 **
1018 ** Close the Client connection first and mark it
1019 ** so that no messages are attempted to send to it.
1020 ** Remember it makes source_p->from == NULL.
1021 */
1022 close_connection(source_p);
1023 }
1024
1025 if (IsServer(source_p))
1026 {
1027 char splitstr[HOSTLEN + HOSTLEN + 2];
1028
1029 /* This shouldn't ever happen */
1030 assert(source_p->serv != NULL && source_p->servptr != NULL);
1031
1032 if (ConfigServerHide.hide_servers)
1033 /* set netsplit message to "*.net *.split" to still show
1034 * that its a split, but hide the servers splitting
1035 */
1036 strcpy(splitstr, "*.net *.split");
1037 else
1038 snprintf(splitstr, sizeof(splitstr), "%s %s",
1039 source_p->servptr->name, source_p->name);
1040
1041 remove_dependents(source_p, from->from, comment, splitstr);
1042
1043 if (source_p->servptr == &me)
1044 {
1045 sendto_realops_flags(UMODE_ALL, L_ALL,
1046 "%s was connected for %d seconds. %llu/%llu sendK/recvK.",
1047 source_p->name, (int)(CurrentTime - source_p->firsttime),
1048 source_p->localClient->send.bytes >> 10,
1049 source_p->localClient->recv.bytes >> 10);
1050 ilog(L_NOTICE, "%s was connected for %d seconds. %llu/%llu sendK/recvK.",
1051 source_p->name, (int)(CurrentTime - source_p->firsttime),
1052 source_p->localClient->send.bytes >> 10,
1053 source_p->localClient->recv.bytes >> 10);
1054 }
1055 }
1056 else if (IsClient(source_p) && !IsKilled(source_p))
1057 {
1058 sendto_server(NULL, source_p, NULL, CAP_TS6, NOCAPS, NOFLAGS,
1059 ":%s QUIT :%s", ID(source_p), comment);
1060 sendto_server(NULL, source_p, NULL, NOCAPS, CAP_TS6, NOFLAGS,
1061 ":%s QUIT :%s", source_p->name, comment);
1062 }
1063
1064 /* The client *better* be off all of the lists */
1065 assert(dlinkFind(&unknown_list, source_p) == NULL);
1066 assert(dlinkFind(&local_client_list, source_p) == NULL);
1067 assert(dlinkFind(&serv_list, source_p) == NULL);
1068 assert(dlinkFind(&oper_list, source_p) == NULL);
1069
1070 exit_one_client(source_p, comment);
1071 }
1072
1073 /*
1074 * dead_link_on_write - report a write error if not already dead,
1075 * mark it as dead then exit it
1076 */
1077 void
1078 dead_link_on_write(struct Client *client_p, int ierrno)
1079 {
1080 dlink_node *ptr;
1081
1082 if (IsDefunct(client_p))
1083 return;
1084
1085 dbuf_clear(&client_p->localClient->buf_recvq);
1086 dbuf_clear(&client_p->localClient->buf_sendq);
1087
1088 assert(dlinkFind(&abort_list, client_p) == NULL);
1089 ptr = make_dlink_node();
1090 /* don't let exit_aborted_clients() finish yet */
1091 dlinkAddTail(client_p, ptr, &abort_list);
1092
1093 if (eac_next == NULL)
1094 eac_next = ptr;
1095
1096 SetDead(client_p); /* You are dead my friend */
1097 }
1098
1099 /*
1100 * dead_link_on_read - report a read error if not already dead,
1101 * mark it as dead then exit it
1102 */
1103 void
1104 dead_link_on_read(struct Client *client_p, int error)
1105 {
1106 char errmsg[255];
1107 int current_error;
1108
1109 if (IsDefunct(client_p))
1110 return;
1111
1112 dbuf_clear(&client_p->localClient->buf_recvq);
1113 dbuf_clear(&client_p->localClient->buf_sendq);
1114
1115 current_error = get_sockerr(client_p->localClient->fd.fd);
1116
1117 if (IsServer(client_p) || IsHandshake(client_p))
1118 {
1119 int connected = CurrentTime - client_p->firsttime;
1120
1121 if (error == 0)
1122 {
1123 /* Admins get the real IP */
1124 sendto_realops_flags(UMODE_ALL, L_ADMIN,
1125 "Server %s closed the connection",
1126 get_client_name(client_p, SHOW_IP));
1127
1128 /* Opers get a masked IP */
1129 sendto_realops_flags(UMODE_ALL, L_OPER,
1130 "Server %s closed the connection",
1131 get_client_name(client_p, MASK_IP));
1132
1133 ilog(L_NOTICE, "Server %s closed the connection",
1134 get_client_name(client_p, SHOW_IP));
1135 }
1136 else
1137 {
1138 report_error(L_ADMIN, "Lost connection to %s: %d",
1139 get_client_name(client_p, SHOW_IP), current_error);
1140 report_error(L_OPER, "Lost connection to %s: %d",
1141 get_client_name(client_p, MASK_IP), current_error);
1142 }
1143
1144 sendto_realops_flags(UMODE_ALL, L_ALL,
1145 "%s had been connected for %d day%s, %2d:%02d:%02d",
1146 client_p->name, connected/86400,
1147 (connected/86400 == 1) ? "" : "s",
1148 (connected % 86400) / 3600, (connected % 3600) / 60,
1149 connected % 60);
1150 }
1151
1152 if (error == 0)
1153 strlcpy(errmsg, "Remote host closed the connection",
1154 sizeof(errmsg));
1155 else
1156 ircsprintf(errmsg, "Read error: %s",
1157 strerror(current_error));
1158
1159 exit_client(client_p, &me, errmsg);
1160 }
1161
1162 void
1163 exit_aborted_clients(void)
1164 {
1165 dlink_node *ptr;
1166 struct Client *target_p;
1167 const char *notice;
1168
1169 DLINK_FOREACH_SAFE(ptr, eac_next, abort_list.head)
1170 {
1171 target_p = ptr->data;
1172 eac_next = ptr->next;
1173
1174 if (target_p == NULL)
1175 {
1176 sendto_realops_flags(UMODE_ALL, L_ALL,
1177 "Warning: null client on abort_list!");
1178 dlinkDelete(ptr, &abort_list);
1179 free_dlink_node(ptr);
1180 continue;
1181 }
1182
1183 dlinkDelete(ptr, &abort_list);
1184
1185 if (IsSendQExceeded(target_p))
1186 notice = "Max SendQ exceeded";
1187 else
1188 notice = "Write error: connection closed";
1189
1190 exit_client(target_p, &me, notice);
1191 free_dlink_node(ptr);
1192 }
1193 }
1194
1195 /*
1196 * accept processing, this adds a form of "caller ID" to ircd
1197 *
1198 * If a client puts themselves into "caller ID only" mode,
1199 * only clients that match a client pointer they have put on
1200 * the accept list will be allowed to message them.
1201 *
1202 * [ source.on_allow_list ] -> [ target1 ] -> [ target2 ]
1203 *
1204 * [target.allow_list] -> [ source1 ] -> [source2 ]
1205 *
1206 * i.e. a target will have a link list of source pointers it will allow
1207 * each source client then has a back pointer pointing back
1208 * to the client that has it on its accept list.
1209 * This allows for exit_one_client to remove these now bogus entries
1210 * from any client having an accept on them.
1211 */
1212
1213 /* accept_message()
1214 *
1215 * inputs - pointer to source client
1216 * - pointer to target client
1217 * output - 1 if accept this message 0 if not
1218 * side effects - See if source is on target's allow list
1219 */
1220 int
1221 accept_message(struct Client *source, struct Client *target)
1222 {
1223 dlink_node *ptr;
1224
1225 DLINK_FOREACH(ptr, target->allow_list.head)
1226 {
1227 struct Client *target_p = ptr->data;
1228
1229 if (source == target_p)
1230 return (1);
1231 }
1232
1233 if (IsSoftCallerId(target))
1234 {
1235 DLINK_FOREACH(ptr, target->channel.head)
1236 if (IsMember(source, ptr->data))
1237 return (1);
1238 }
1239
1240 return (0);
1241 }
1242
1243 /* del_from_accept()
1244 *
1245 * inputs - pointer to source client
1246 * - pointer to target client
1247 * output - NONE
1248 * side effects - Delete's source pointer to targets allow list
1249 *
1250 * Walk through the target's accept list, remove if source is found,
1251 * Then walk through the source's on_accept_list remove target if found.
1252 */
1253 void
1254 del_from_accept(struct Client *source, struct Client *target)
1255 {
1256 dlink_node *ptr;
1257 dlink_node *ptr2;
1258 dlink_node *next_ptr;
1259 dlink_node *next_ptr2;
1260 struct Client *target_p;
1261
1262 DLINK_FOREACH_SAFE(ptr, next_ptr, target->allow_list.head)
1263 {
1264 target_p = ptr->data;
1265
1266 if (source == target_p)
1267 {
1268 dlinkDelete(ptr, &target->allow_list);
1269 free_dlink_node(ptr);
1270
1271 DLINK_FOREACH_SAFE(ptr2, next_ptr2, source->on_allow_list.head)
1272 {
1273 target_p = ptr2->data;
1274
1275 if (target == target_p)
1276 {
1277 dlinkDelete(ptr2, &source->on_allow_list);
1278 free_dlink_node(ptr2);
1279 }
1280 }
1281 }
1282 }
1283 }
1284
1285 /* del_all_accepts()
1286 *
1287 * inputs - pointer to exiting client
1288 * output - NONE
1289 * side effects - Walk through given clients allow_list and on_allow_list
1290 * remove all references to this client
1291 */
1292 void
1293 del_all_accepts(struct Client *client_p)
1294 {
1295 dlink_node *ptr, *next_ptr;
1296
1297 DLINK_FOREACH_SAFE(ptr, next_ptr, client_p->allow_list.head)
1298 del_from_accept(ptr->data, client_p);
1299
1300 DLINK_FOREACH_SAFE(ptr, next_ptr, client_p->on_allow_list.head)
1301 del_from_accept(client_p, ptr->data);
1302 }
1303
1304 /* del_all_their_accepts()
1305 *
1306 * inputs - pointer to exiting client
1307 * output - NONE
1308 * side effects - Walk through given clients on_allow_list
1309 * remove all references to this client,
1310 * allow this client to keep their own allow_list
1311 */
1312 void
1313 del_all_their_accepts(struct Client *client_p)
1314 {
1315 dlink_node *ptr, *next_ptr;
1316
1317 DLINK_FOREACH_SAFE(ptr, next_ptr, client_p->on_allow_list.head)
1318 del_from_accept(client_p, ptr->data);
1319 }
1320
1321 /* set_initial_nick()
1322 *
1323 * inputs
1324 * output
1325 * side effects -
1326 *
1327 * This function is only called to set up an initially registering
1328 * client.
1329 */
1330 void
1331 set_initial_nick(struct Client *client_p, struct Client *source_p,
1332 const char *nick)
1333 {
1334 char buf[USERLEN + 1];
1335
1336 /* Client setting NICK the first time */
1337
1338 /* This had to be copied here to avoid problems.. */
1339 source_p->tsinfo = CurrentTime;
1340
1341 if (source_p->name[0])
1342 hash_del_client(source_p);
1343
1344 strlcpy(source_p->name, nick, sizeof(source_p->name));
1345 hash_add_client(source_p);
1346
1347 /* fd_desc is long enough */
1348 fd_note(&client_p->localClient->fd, "Nick: %s", nick);
1349
1350 /* They have the nick they want now.. */
1351 client_p->llname[0] = '\0';
1352
1353 if (source_p->flags & FLAGS_GOTUSER)
1354 {
1355 strlcpy(buf, source_p->username, sizeof(buf));
1356
1357 /*
1358 * USER already received, now we have NICK.
1359 * *NOTE* For servers "NICK" *must* precede the
1360 * user message (giving USER before NICK is possible
1361 * only for local client connection!). register_user
1362 * may reject the client and call exit_client for it
1363 * --must test this and exit m_nick too!!!
1364 */
1365 register_local_user(client_p, source_p, nick, buf);
1366 }
1367 }
1368
1369 /* change_local_nick()
1370 *
1371 * inputs - pointer to server
1372 * - pointer to client
1373 * - nick
1374 * output -
1375 * side effects - changes nick of a LOCAL user
1376 */
1377 void
1378 change_local_nick(struct Client *client_p, struct Client *source_p, const char *nick)
1379 {
1380 /*
1381 ** Client just changing his/her nick. If he/she is
1382 ** on a channel, send note of change to all clients
1383 ** on that channel. Propagate notice to other servers.
1384 */
1385 if ((source_p->localClient->last_nick_change +
1386 ConfigFileEntry.max_nick_time) < CurrentTime)
1387 source_p->localClient->number_of_nick_changes = 0;
1388 source_p->localClient->last_nick_change = CurrentTime;
1389 source_p->localClient->number_of_nick_changes++;
1390
1391 if ((ConfigFileEntry.anti_nick_flood &&
1392 (source_p->localClient->number_of_nick_changes
1393 <= ConfigFileEntry.max_nick_changes)) ||
1394 !ConfigFileEntry.anti_nick_flood ||
1395 (IsOper(source_p) && ConfigFileEntry.no_oper_flood))
1396 {
1397 if (irccmp(source_p->name, nick))
1398 source_p->tsinfo = CurrentTime;
1399
1400 /* XXX - the format of this notice should eventually be changed
1401 * to either %s[%s@%s], or even better would be get_client_name() -bill
1402 */
1403 sendto_realops_flags(UMODE_NCHANGE, L_ALL, "Nick change: From %s to %s [%s@%s]",
1404 source_p->name, nick, source_p->username, source_p->host);
1405 sendto_common_channels_local(source_p, 1, ":%s!%s@%s NICK :%s",
1406 source_p->name, source_p->username,
1407 source_p->host, nick);
1408
1409 add_history(source_p, 1);
1410
1411 /* Only hubs care about lazy link nicks not being sent on yet
1412 * lazylink leafs/leafs always send their nicks up to hub,
1413 * hence must always propagate nick changes.
1414 * hubs might not propagate a nick change, if the leaf
1415 * does not know about that client yet.
1416 */
1417 sendto_server(client_p, source_p, NULL, CAP_TS6, NOCAPS, NOFLAGS,
1418 ":%s NICK %s :%lu",
1419 ID(source_p), nick, (unsigned long)source_p->tsinfo);
1420 sendto_server(client_p, source_p, NULL, NOCAPS, CAP_TS6, NOFLAGS,
1421 ":%s NICK %s :%lu",
1422 source_p->name, nick, (unsigned long)source_p->tsinfo);
1423 }
1424 else
1425 {
1426 sendto_one(source_p, form_str(ERR_NICKTOOFAST),
1427 me.name, source_p->name, source_p->name,
1428 nick, ConfigFileEntry.max_nick_time);
1429 return;
1430 }
1431
1432 /* Finally, add to hash */
1433 if (source_p->name[0])
1434 hash_del_client(source_p);
1435
1436 strcpy(source_p->name, nick);
1437 hash_add_client(source_p);
1438
1439 /* Make sure everyone that has this client on its accept list
1440 * loses that reference.
1441 */
1442 del_all_their_accepts(source_p);
1443
1444 /* fd_desc is long enough */
1445 fd_note(&client_p->localClient->fd, "Nick: %s", nick);
1446 }

Properties

Name Value
svn:eol-style native
svn:keywords Id Revision

svnadmin@ircd-hybrid.org
ViewVC Help
Powered by ViewVC 1.1.26