ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/ircd-hybrid-7.2/src/client.c
Revision: 31
Committed: Sun Oct 2 20:34:05 2005 UTC (18 years, 5 months ago) by knight
Content type: text/x-csrc
Original Path: ircd-hybrid/src/client.c
File size: 42168 byte(s)
Log Message:
- Fix svn:keywords

File Contents

# User Rev Content
1 adx 30 /*
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 knight 31 * $Id$
23 adx 30 */
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->invited.head == NULL);
152     assert(client_p->channel.head == NULL);
153     assert(dlink_list_length(&client_p->invited) == 0);
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(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 invitefield */
762     DLINK_FOREACH_SAFE(lp, next_lp, source_p->invited.head)
763     del_invite(lp->data, source_p);
764    
765     /* Clean up allow lists */
766     del_all_accepts(source_p);
767     add_history(source_p, 0);
768     off_history(source_p);
769    
770     if (!MyConnect(source_p))
771     {
772     source_p->from->serv->dep_users--;
773     assert(source_p->from->serv->dep_users >= 0);
774     }
775     }
776    
777     /* Remove source_p from the client lists */
778     if (HasID(source_p))
779     hash_del_id(source_p);
780     if (source_p->name[0])
781     hash_del_client(source_p);
782    
783     if (IsUserHostIp(source_p))
784     delete_user_host(source_p->username, source_p->host, !MyConnect(source_p));
785    
786     /* remove from global client list
787     * NOTE: source_p->node.next cannot be NULL if the client is added
788     * to global_client_list (there is always &me at its end)
789     */
790     if (source_p != NULL && source_p->node.next != NULL)
791     dlinkDelete(&source_p->node, &global_client_list);
792    
793     update_client_exit_stats(source_p);
794    
795     /* Check to see if the client isn't already on the dead list */
796     assert(dlinkFind(&dead_list, source_p) == NULL);
797    
798     /* add to dead client dlist */
799     SetDead(source_p);
800     dlinkAdd(source_p, make_dlink_node(), &dead_list);
801     }
802    
803     /* Recursively send QUITs and SQUITs for source_p and all its dependent clients
804     * and servers to those servers that need them. A server needs the client
805     * QUITs if it can't figure them out from the SQUIT (ie pre-TS4) or if it
806     * isn't getting the SQUIT because of @#(*&@)# hostmasking. With TS4, once
807     * a link gets a SQUIT, it doesn't need any QUIT/SQUITs for clients depending
808     * on that one -orabidoo
809     *
810     * This is now called on each local server -adx
811     */
812     static void
813     recurse_send_quits(struct Client *original_source_p, struct Client *source_p,
814     struct Client *from, struct Client *to, const char *comment,
815     const char *splitstr, const char *myname)
816     {
817     dlink_node *ptr, *next;
818     struct Client *target_p;
819     int hidden = match(myname, source_p->name);
820    
821     assert(to != source_p); /* should be already removed from serv_list */
822    
823     /* If this server can handle quit storm (QS) removal
824     * of dependents, just send the SQUIT
825     *
826     * Always check *all* dependent servers if some of them are
827     * hidden behind fakename. If so, send out the QUITs -adx
828     */
829     if (hidden || !IsCapable(to, CAP_QS))
830     DLINK_FOREACH_SAFE(ptr, next, source_p->serv->users.head)
831     {
832     target_p = ptr->data;
833     sendto_one(to, ":%s QUIT :%s", target_p->name, splitstr);
834     }
835    
836     DLINK_FOREACH_SAFE(ptr, next, source_p->serv->servers.head)
837     recurse_send_quits(original_source_p, ptr->data, from, to,
838     comment, splitstr, myname);
839    
840     if (!hidden && ((source_p == original_source_p && to != from) ||
841     !IsCapable(to, CAP_QS)))
842     {
843     /* don't use a prefix here - we have to be 100% sure the message
844     * will be accepted without Unknown prefix etc.. */
845     sendto_one(to, "SQUIT %s :%s", ID_or_name(source_p, to), comment);
846     }
847     }
848    
849     /*
850     * Remove all clients that depend on source_p; assumes all (S)QUITs have
851     * already been sent. we make sure to exit a server's dependent clients
852     * and servers before the server itself; exit_one_client takes care of
853     * actually removing things off llists. tweaked from +CSr31 -orabidoo
854     */
855     static void
856     recurse_remove_clients(struct Client *source_p, const char *quitmsg)
857     {
858     dlink_node *ptr, *next;
859    
860     DLINK_FOREACH_SAFE(ptr, next, source_p->serv->users.head)
861     exit_one_client(ptr->data, quitmsg);
862    
863     DLINK_FOREACH_SAFE(ptr, next, source_p->serv->servers.head)
864     {
865     recurse_remove_clients(ptr->data, quitmsg);
866     exit_one_client(ptr->data, quitmsg);
867     }
868    
869     assert(source_p->serv->dep_servers == 1);
870     assert(source_p->serv->dep_users == 0);
871     }
872    
873     /*
874     ** Remove *everything* that depends on source_p, from all lists, and sending
875     ** all necessary QUITs and SQUITs. source_p itself is still on the lists,
876     ** and its SQUITs have been sent except for the upstream one -orabidoo
877     */
878     static void
879     remove_dependents(struct Client *source_p, struct Client *from,
880     const char *comment, const char *splitstr)
881     {
882     struct Client *to;
883     struct ConfItem *conf;
884     static char myname[HOSTLEN+1];
885     dlink_node *ptr;
886    
887     DLINK_FOREACH(ptr, serv_list.head)
888     {
889     to = ptr->data;
890    
891     if ((conf = to->serv->sconf) != NULL)
892     strlcpy(myname, my_name_for_link(conf), sizeof(myname));
893     else
894     strlcpy(myname, me.name, sizeof(myname));
895     recurse_send_quits(source_p, source_p, from, to,
896     comment, splitstr, myname);
897     }
898    
899     recurse_remove_clients(source_p, splitstr);
900     }
901    
902     /*
903     * exit_client - exit a client of any type. Generally, you can use
904     * this on any struct Client, regardless of its state.
905     *
906     * Note, you shouldn't exit remote _users_ without first doing
907     * SetKilled and propagating a kill or similar message. However,
908     * it is perfectly correct to call exit_client to force a _server_
909     * quit (either local or remote one).
910     *
911     * inputs: - a client pointer that is going to be exited
912     * - for servers, the second argument is a pointer to who
913     * is firing the server. This side won't get any generated
914     * messages. NEVER NULL!
915     * output: none
916     * side effects: the client is delinked from all lists, disconnected,
917     * and the rest of IRC network is notified of the exit.
918     * Client memory is scheduled to be freed
919     */
920     void
921     exit_client(struct Client *source_p, struct Client *from, const char *comment)
922     {
923     dlink_node *m;
924    
925     if (MyConnect(source_p))
926     {
927     /* DO NOT REMOVE. exit_client can be called twice after a failed
928     * read/write.
929     */
930     if (IsClosing(source_p))
931     return;
932    
933     SetClosing(source_p);
934    
935     if (IsIpHash(source_p))
936     remove_one_ip(&source_p->localClient->ip);
937    
938     delete_auth(source_p);
939    
940     /* This source_p could have status of one of STAT_UNKNOWN, STAT_CONNECTING
941     * STAT_HANDSHAKE or STAT_UNKNOWN
942     * all of which are lumped together into unknown_list
943     *
944     * In all above cases IsRegistered() will not be true.
945     */
946     if (!IsRegistered(source_p))
947     {
948     if ((m = dlinkFindDelete(&unknown_list, source_p)) != NULL)
949     free_dlink_node(m);
950     }
951     else if (IsClient(source_p))
952     {
953     Count.local--;
954    
955     if (IsOper(source_p))
956     {
957     if ((m = dlinkFindDelete(&oper_list, source_p)) != NULL)
958     free_dlink_node(m);
959     }
960    
961     dlinkDelete(&source_p->localClient->lclient_node, &local_client_list);
962     if (source_p->localClient->list_task != NULL)
963     free_list_task(source_p->localClient->list_task, source_p);
964    
965     sendto_realops_flags(UMODE_CCONN, L_ALL, "Client exiting: %s (%s@%s) [%s] [%s]",
966     source_p->name, source_p->username, source_p->host, comment,
967     ConfigFileEntry.hide_spoof_ips && IsIPSpoof(source_p) ?
968     "255.255.255.255" : source_p->sockhost);
969     }
970    
971     /* As soon as a client is known to be a server of some sort
972     * it has to be put on the serv_list, or SJOIN's to this new server
973     * from the connect burst will not be seen.
974     */
975     if (IsServer(source_p) || IsConnecting(source_p) ||
976     IsHandshake(source_p))
977     {
978     if ((m = dlinkFindDelete(&serv_list, source_p)) != NULL)
979     {
980     free_dlink_node(m);
981     unset_chcap_usage_counts(source_p);
982     }
983    
984     if (IsServer(source_p))
985     {
986     Count.myserver--;
987     if (ServerInfo.hub)
988     remove_lazylink_flags(source_p->localClient->serverMask);
989     else
990     uplink = NULL;
991     }
992     }
993    
994     log_user_exit(source_p);
995    
996     if (!IsDead(source_p))
997     {
998     if (IsServer(source_p))
999     {
1000     /* for them, we are exiting the network */
1001     sendto_one(source_p, ":%s SQUIT %s :%s",
1002     ID_or_name(from, source_p), me.name, comment);
1003     }
1004    
1005     sendto_one(source_p, "ERROR :Closing Link: %s (%s)",
1006     source_p->host, comment);
1007     }
1008    
1009     /*
1010     ** Currently only server connections can have
1011     ** depending remote clients here, but it does no
1012     ** harm to check for all local clients. In
1013     ** future some other clients than servers might
1014     ** have remotes too...
1015     **
1016     ** Close the Client connection first and mark it
1017     ** so that no messages are attempted to send to it.
1018     ** Remember it makes source_p->from == NULL.
1019     */
1020     close_connection(source_p);
1021     }
1022    
1023     if (IsServer(source_p))
1024     {
1025     char splitstr[HOSTLEN + HOSTLEN + 2];
1026    
1027     /* This shouldn't ever happen */
1028     assert(source_p->serv != NULL && source_p->servptr != NULL);
1029    
1030     if (ConfigServerHide.hide_servers)
1031     /* set netsplit message to "*.net *.split" to still show
1032     * that its a split, but hide the servers splitting
1033     */
1034     strcpy(splitstr, "*.net *.split");
1035     else
1036     snprintf(splitstr, sizeof(splitstr), "%s %s",
1037     source_p->servptr->name, source_p->name);
1038    
1039     remove_dependents(source_p, from->from, comment, splitstr);
1040    
1041     if (source_p->servptr == &me)
1042     {
1043     sendto_realops_flags(UMODE_ALL, L_ALL,
1044     "%s was connected for %d seconds. %llu/%llu sendK/recvK.",
1045     source_p->name, (int)(CurrentTime - source_p->firsttime),
1046     source_p->localClient->send.bytes >> 10,
1047     source_p->localClient->recv.bytes >> 10);
1048     ilog(L_NOTICE, "%s was connected for %d seconds. %llu/%llu sendK/recvK.",
1049     source_p->name, (int)(CurrentTime - source_p->firsttime),
1050     source_p->localClient->send.bytes >> 10,
1051     source_p->localClient->recv.bytes >> 10);
1052     }
1053     }
1054     else if (IsClient(source_p) && !IsKilled(source_p))
1055     {
1056     sendto_server(NULL, source_p, NULL, CAP_TS6, NOCAPS, NOFLAGS,
1057     ":%s QUIT :%s", ID(source_p), comment);
1058     sendto_server(NULL, source_p, NULL, NOCAPS, CAP_TS6, NOFLAGS,
1059     ":%s QUIT :%s", source_p->name, comment);
1060     }
1061    
1062     /* The client *better* be off all of the lists */
1063     assert(dlinkFind(&unknown_list, source_p) == NULL);
1064     assert(dlinkFind(&local_client_list, source_p) == NULL);
1065     assert(dlinkFind(&serv_list, source_p) == NULL);
1066     assert(dlinkFind(&oper_list, source_p) == NULL);
1067    
1068     exit_one_client(source_p, comment);
1069     }
1070    
1071     /*
1072     * dead_link_on_write - report a write error if not already dead,
1073     * mark it as dead then exit it
1074     */
1075     void
1076     dead_link_on_write(struct Client *client_p, int ierrno)
1077     {
1078     dlink_node *ptr;
1079    
1080     if (IsDefunct(client_p))
1081     return;
1082    
1083     dbuf_clear(&client_p->localClient->buf_recvq);
1084     dbuf_clear(&client_p->localClient->buf_sendq);
1085    
1086     assert(dlinkFind(&abort_list, client_p) == NULL);
1087     ptr = make_dlink_node();
1088     /* don't let exit_aborted_clients() finish yet */
1089     dlinkAddTail(client_p, ptr, &abort_list);
1090    
1091     if (eac_next == NULL)
1092     eac_next = ptr;
1093    
1094     SetDead(client_p); /* You are dead my friend */
1095     }
1096    
1097     /*
1098     * dead_link_on_read - report a read error if not already dead,
1099     * mark it as dead then exit it
1100     */
1101     void
1102     dead_link_on_read(struct Client *client_p, int error)
1103     {
1104     char errmsg[255];
1105     int current_error;
1106    
1107     if (IsDefunct(client_p))
1108     return;
1109    
1110     dbuf_clear(&client_p->localClient->buf_recvq);
1111     dbuf_clear(&client_p->localClient->buf_sendq);
1112    
1113     current_error = get_sockerr(client_p->localClient->fd.fd);
1114    
1115     if (IsServer(client_p) || IsHandshake(client_p))
1116     {
1117     int connected = CurrentTime - client_p->firsttime;
1118    
1119     if (error == 0)
1120     {
1121     /* Admins get the real IP */
1122     sendto_realops_flags(UMODE_ALL, L_ADMIN,
1123     "Server %s closed the connection",
1124     get_client_name(client_p, SHOW_IP));
1125    
1126     /* Opers get a masked IP */
1127     sendto_realops_flags(UMODE_ALL, L_OPER,
1128     "Server %s closed the connection",
1129     get_client_name(client_p, MASK_IP));
1130    
1131     ilog(L_NOTICE, "Server %s closed the connection",
1132     get_client_name(client_p, SHOW_IP));
1133     }
1134     else
1135     {
1136     report_error(L_ADMIN, "Lost connection to %s: %d",
1137     get_client_name(client_p, SHOW_IP), current_error);
1138     report_error(L_OPER, "Lost connection to %s: %d",
1139     get_client_name(client_p, MASK_IP), current_error);
1140     }
1141    
1142     sendto_realops_flags(UMODE_ALL, L_ALL,
1143     "%s had been connected for %d day%s, %2d:%02d:%02d",
1144     client_p->name, connected/86400,
1145     (connected/86400 == 1) ? "" : "s",
1146     (connected % 86400) / 3600, (connected % 3600) / 60,
1147     connected % 60);
1148     }
1149    
1150     if (error == 0)
1151     strlcpy(errmsg, "Remote host closed the connection",
1152     sizeof(errmsg));
1153     else
1154     ircsprintf(errmsg, "Read error: %s",
1155     strerror(current_error));
1156    
1157     exit_client(client_p, &me, errmsg);
1158     }
1159    
1160     void
1161     exit_aborted_clients(void)
1162     {
1163     dlink_node *ptr;
1164     struct Client *target_p;
1165     const char *notice;
1166    
1167     DLINK_FOREACH_SAFE(ptr, eac_next, abort_list.head)
1168     {
1169     target_p = ptr->data;
1170     eac_next = ptr->next;
1171    
1172     if (target_p == NULL)
1173     {
1174     sendto_realops_flags(UMODE_ALL, L_ALL,
1175     "Warning: null client on abort_list!");
1176     dlinkDelete(ptr, &abort_list);
1177     free_dlink_node(ptr);
1178     continue;
1179     }
1180    
1181     dlinkDelete(ptr, &abort_list);
1182    
1183     if (IsSendQExceeded(target_p))
1184     notice = "Max SendQ exceeded";
1185     else
1186     notice = "Write error: connection closed";
1187    
1188     exit_client(target_p, &me, notice);
1189     free_dlink_node(ptr);
1190     }
1191     }
1192    
1193     /*
1194     * accept processing, this adds a form of "caller ID" to ircd
1195     *
1196     * If a client puts themselves into "caller ID only" mode,
1197     * only clients that match a client pointer they have put on
1198     * the accept list will be allowed to message them.
1199     *
1200     * [ source.on_allow_list ] -> [ target1 ] -> [ target2 ]
1201     *
1202     * [target.allow_list] -> [ source1 ] -> [source2 ]
1203     *
1204     * i.e. a target will have a link list of source pointers it will allow
1205     * each source client then has a back pointer pointing back
1206     * to the client that has it on its accept list.
1207     * This allows for exit_one_client to remove these now bogus entries
1208     * from any client having an accept on them.
1209     */
1210    
1211     /* accept_message()
1212     *
1213     * inputs - pointer to source client
1214     * - pointer to target client
1215     * output - 1 if accept this message 0 if not
1216     * side effects - See if source is on target's allow list
1217     */
1218     int
1219     accept_message(struct Client *source, struct Client *target)
1220     {
1221     dlink_node *ptr;
1222    
1223     DLINK_FOREACH(ptr, target->allow_list.head)
1224     {
1225     struct Client *target_p = ptr->data;
1226    
1227     if (source == target_p)
1228     return (1);
1229     }
1230    
1231     if (IsSoftCallerId(target))
1232     {
1233     DLINK_FOREACH(ptr, target->channel.head)
1234     if (IsMember(source, ptr->data))
1235     return (1);
1236     }
1237    
1238     return (0);
1239     }
1240    
1241     /* del_from_accept()
1242     *
1243     * inputs - pointer to source client
1244     * - pointer to target client
1245     * output - NONE
1246     * side effects - Delete's source pointer to targets allow list
1247     *
1248     * Walk through the target's accept list, remove if source is found,
1249     * Then walk through the source's on_accept_list remove target if found.
1250     */
1251     void
1252     del_from_accept(struct Client *source, struct Client *target)
1253     {
1254     dlink_node *ptr;
1255     dlink_node *ptr2;
1256     dlink_node *next_ptr;
1257     dlink_node *next_ptr2;
1258     struct Client *target_p;
1259    
1260     DLINK_FOREACH_SAFE(ptr, next_ptr, target->allow_list.head)
1261     {
1262     target_p = ptr->data;
1263    
1264     if (source == target_p)
1265     {
1266     dlinkDelete(ptr, &target->allow_list);
1267     free_dlink_node(ptr);
1268    
1269     DLINK_FOREACH_SAFE(ptr2, next_ptr2, source->on_allow_list.head)
1270     {
1271     target_p = ptr2->data;
1272    
1273     if (target == target_p)
1274     {
1275     dlinkDelete(ptr2, &source->on_allow_list);
1276     free_dlink_node(ptr2);
1277     }
1278     }
1279     }
1280     }
1281     }
1282    
1283     /* del_all_accepts()
1284     *
1285     * inputs - pointer to exiting client
1286     * output - NONE
1287     * side effects - Walk through given clients allow_list and on_allow_list
1288     * remove all references to this client
1289     */
1290     void
1291     del_all_accepts(struct Client *client_p)
1292     {
1293     dlink_node *ptr, *next_ptr;
1294    
1295     DLINK_FOREACH_SAFE(ptr, next_ptr, client_p->allow_list.head)
1296     del_from_accept(ptr->data, client_p);
1297    
1298     DLINK_FOREACH_SAFE(ptr, next_ptr, client_p->on_allow_list.head)
1299     del_from_accept(client_p, ptr->data);
1300     }
1301    
1302     /* del_all_their_accepts()
1303     *
1304     * inputs - pointer to exiting client
1305     * output - NONE
1306     * side effects - Walk through given clients on_allow_list
1307     * remove all references to this client,
1308     * allow this client to keep their own allow_list
1309     */
1310     void
1311     del_all_their_accepts(struct Client *client_p)
1312     {
1313     dlink_node *ptr, *next_ptr;
1314    
1315     DLINK_FOREACH_SAFE(ptr, next_ptr, client_p->on_allow_list.head)
1316     del_from_accept(client_p, ptr->data);
1317     }
1318    
1319     /* set_initial_nick()
1320     *
1321     * inputs
1322     * output
1323     * side effects -
1324     *
1325     * This function is only called to set up an initially registering
1326     * client.
1327     */
1328     void
1329     set_initial_nick(struct Client *client_p, struct Client *source_p,
1330     const char *nick)
1331     {
1332     char buf[USERLEN + 1];
1333    
1334     /* Client setting NICK the first time */
1335    
1336     /* This had to be copied here to avoid problems.. */
1337     source_p->tsinfo = CurrentTime;
1338    
1339     if (source_p->name[0])
1340     hash_del_client(source_p);
1341    
1342     strlcpy(source_p->name, nick, sizeof(source_p->name));
1343     hash_add_client(source_p);
1344    
1345     /* fd_desc is long enough */
1346     fd_note(&client_p->localClient->fd, "Nick: %s", nick);
1347    
1348     /* They have the nick they want now.. */
1349     client_p->llname[0] = '\0';
1350    
1351     if (source_p->flags & FLAGS_GOTUSER)
1352     {
1353     strlcpy(buf, source_p->username, sizeof(buf));
1354    
1355     /*
1356     * USER already received, now we have NICK.
1357     * *NOTE* For servers "NICK" *must* precede the
1358     * user message (giving USER before NICK is possible
1359     * only for local client connection!). register_user
1360     * may reject the client and call exit_client for it
1361     * --must test this and exit m_nick too!!!
1362     */
1363     register_local_user(client_p, source_p, nick, buf);
1364     }
1365     }
1366    
1367     /* change_local_nick()
1368     *
1369     * inputs - pointer to server
1370     * - pointer to client
1371     * - nick
1372     * output -
1373     * side effects - changes nick of a LOCAL user
1374     */
1375     void
1376     change_local_nick(struct Client *client_p, struct Client *source_p, const char *nick)
1377     {
1378     /*
1379     ** Client just changing his/her nick. If he/she is
1380     ** on a channel, send note of change to all clients
1381     ** on that channel. Propagate notice to other servers.
1382     */
1383     if ((source_p->localClient->last_nick_change +
1384     ConfigFileEntry.max_nick_time) < CurrentTime)
1385     source_p->localClient->number_of_nick_changes = 0;
1386     source_p->localClient->last_nick_change = CurrentTime;
1387     source_p->localClient->number_of_nick_changes++;
1388    
1389     if ((ConfigFileEntry.anti_nick_flood &&
1390     (source_p->localClient->number_of_nick_changes
1391     <= ConfigFileEntry.max_nick_changes)) ||
1392     !ConfigFileEntry.anti_nick_flood ||
1393     (IsOper(source_p) && ConfigFileEntry.no_oper_flood))
1394     {
1395     if (irccmp(source_p->name, nick))
1396     source_p->tsinfo = CurrentTime;
1397    
1398     /* XXX - the format of this notice should eventually be changed
1399     * to either %s[%s@%s], or even better would be get_client_name() -bill
1400     */
1401     sendto_realops_flags(UMODE_NCHANGE, L_ALL, "Nick change: From %s to %s [%s@%s]",
1402     source_p->name, nick, source_p->username, source_p->host);
1403     sendto_common_channels_local(source_p, 1, ":%s!%s@%s NICK :%s",
1404     source_p->name, source_p->username,
1405     source_p->host, nick);
1406    
1407     add_history(source_p, 1);
1408    
1409     /* Only hubs care about lazy link nicks not being sent on yet
1410     * lazylink leafs/leafs always send their nicks up to hub,
1411     * hence must always propagate nick changes.
1412     * hubs might not propagate a nick change, if the leaf
1413     * does not know about that client yet.
1414     */
1415     sendto_server(client_p, source_p, NULL, CAP_TS6, NOCAPS, NOFLAGS,
1416     ":%s NICK %s :%lu",
1417     ID(source_p), nick, (unsigned long)source_p->tsinfo);
1418     sendto_server(client_p, source_p, NULL, NOCAPS, CAP_TS6, NOFLAGS,
1419     ":%s NICK %s :%lu",
1420     source_p->name, nick, (unsigned long)source_p->tsinfo);
1421     }
1422     else
1423     {
1424     sendto_one(source_p, form_str(ERR_NICKTOOFAST),
1425     me.name, source_p->name, source_p->name,
1426     nick, ConfigFileEntry.max_nick_time);
1427     return;
1428     }
1429    
1430     /* Finally, add to hash */
1431     if (source_p->name[0])
1432     hash_del_client(source_p);
1433    
1434     strcpy(source_p->name, nick);
1435     hash_add_client(source_p);
1436    
1437     /* Make sure everyone that has this client on its accept list
1438     * loses that reference.
1439     */
1440     del_all_their_accepts(source_p);
1441    
1442     /* fd_desc is long enough */
1443     fd_note(&client_p->localClient->fd, "Nick: %s", nick);
1444     }

Properties

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