ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/ircd-hybrid-7.2/src/client.c
Revision: 889
Committed: Thu Nov 1 12:59:05 2007 UTC (16 years, 4 months ago) by michael
Content type: text/x-csrc
File size: 40729 byte(s)
Log Message:
- Got rid of Serv.dep_users and Serv.dep_servers

File Contents

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

Properties

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