ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/branches/newio/src/client.c
Revision: 1834
Committed: Fri Apr 19 19:50:27 2013 UTC (10 years, 11 months ago) by michael
Content type: text/x-csrc
Original Path: ircd-hybrid/trunk/src/client.c
File size: 35878 byte(s)
Log Message:
- Revert to -r1831

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

Properties

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