ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/ircd-hybrid/branches/8.2.x/src/client.c
Revision: 1118
Committed: Thu Jan 6 13:39:10 2011 UTC (13 years, 2 months ago) by michael
Content type: text/x-csrc
Original Path: ircd-hybrid-7.3/src/client.c
File size: 39404 byte(s)
Log Message:
- cleanup and sanitize m_server.c. remove hostmasking. Improve TS6 suppport

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

Properties

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