ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/ircd-hybrid/trunk/src/client.c
Revision: 1618
Committed: Tue Oct 30 21:04:38 2012 UTC (11 years, 4 months ago) by michael
Content type: text/x-csrc
File size: 36568 byte(s)
Log Message:
- Made m_globops() and ms_globops() use sendto_realops_flags()
- Added message-type parameter to sendto_realops_flags() which can be one of
  SEND_NOTICE, SEND_GLOBAL, SEND_LOCOPS
- Forward-port -r1617

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

Properties

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