2 * charybdis: an advanced ircd.
3 * client.c: Controls clients.
5 * Copyright (C) 1990 Jarkko Oikarinen and University of Oulu, Co Center
6 * Copyright (C) 1996-2002 Hybrid Development Team
7 * Copyright (C) 2002-2005 ircd-ratbox development team
8 * Copyright (C) 2007 William Pitcock
10 * This program is free software; you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation; either version 2 of the License, or
13 * (at your option) any later version.
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
25 * $Id: client.c 3514 2007-06-06 16:25:21Z nenolod $
40 #include "s_newconf.h"
53 #include "blacklist.h"
56 #include "irc_dictionary.h"
59 #define DEBUG_EXITED_CLIENTS
61 static void check_pings_list(rb_dlink_list
* list
);
62 static void check_unknowns_list(rb_dlink_list
* list
);
63 static void free_exited_clients(void *unused
);
64 static void exit_aborted_clients(void *unused
);
66 static int exit_remote_client(struct Client
*, struct Client
*, struct Client
*,const char *);
67 static int exit_remote_server(struct Client
*, struct Client
*, struct Client
*,const char *);
68 static int exit_local_client(struct Client
*, struct Client
*, struct Client
*,const char *);
69 static int exit_unknown_client(struct Client
*, struct Client
*, struct Client
*,const char *);
70 static int exit_local_server(struct Client
*, struct Client
*, struct Client
*,const char *);
71 static int qs_server(struct Client
*, struct Client
*, struct Client
*, const char *comment
);
73 static EVH check_pings
;
75 static rb_bh
*client_heap
= NULL
;
76 static rb_bh
*lclient_heap
= NULL
;
77 static rb_bh
*pclient_heap
= NULL
;
78 static rb_bh
*user_heap
= NULL
;
79 static rb_bh
*metadata_heap
= NULL
;
80 static char current_uid
[IDLEN
];
82 struct Dictionary
*nd_dict
= NULL
;
90 rb_dlink_list dead_list
;
91 #ifdef DEBUG_EXITED_CLIENTS
92 static rb_dlink_list dead_remote_list
;
98 struct Client
*client
;
99 char notice
[REASONLEN
];
102 static rb_dlink_list abort_list
;
110 * side effects - initialize client free memory
116 * start off the check ping event .. -- adrian
117 * Every 30 seconds is plenty -- db
119 client_heap
= rb_bh_create(sizeof(struct Client
), CLIENT_HEAP_SIZE
, "client_heap");
120 lclient_heap
= rb_bh_create(sizeof(struct LocalUser
), LCLIENT_HEAP_SIZE
, "lclient_heap");
121 pclient_heap
= rb_bh_create(sizeof(struct PreClient
), PCLIENT_HEAP_SIZE
, "pclient_heap");
122 user_heap
= rb_bh_create(sizeof(struct User
), USER_HEAP_SIZE
, "user_heap");
123 metadata_heap
= rb_bh_create(sizeof(struct MetadataEntry
), USER_HEAP_SIZE
, "metadata_heap");
125 rb_event_addish("check_pings", check_pings
, NULL
, 30);
126 rb_event_addish("free_exited_clients", &free_exited_clients
, NULL
, 4);
127 rb_event_addish("exit_aborted_clients", exit_aborted_clients
, NULL
, 1);
128 rb_event_add("flood_recalc", flood_recalc
, NULL
, 1);
130 nd_dict
= irc_dictionary_create(irccmp
);
135 * make_client - create a new Client struct and set it to initial state.
137 * from == NULL, create local client (a client connected
140 * from, create remote client (behind a socket
141 * associated with the client defined by
142 * 'from'). ('from' is a local client!!).
145 make_client(struct Client
*from
)
147 struct Client
*client_p
= NULL
;
148 struct LocalUser
*localClient
;
150 client_p
= rb_bh_alloc(client_heap
);
154 client_p
->from
= client_p
; /* 'from' of local client is self! */
156 localClient
= rb_bh_alloc(lclient_heap
);
157 SetMyConnect(client_p
);
158 client_p
->localClient
= localClient
;
160 client_p
->localClient
->lasttime
= client_p
->localClient
->firsttime
= rb_current_time();
162 client_p
->localClient
->F
= NULL
;
164 client_p
->preClient
= rb_bh_alloc(pclient_heap
);;
166 /* as good a place as any... */
167 rb_dlinkAdd(client_p
, &client_p
->localClient
->tnode
, &unknown_list
);
170 { /* from is not NULL */
171 client_p
->localClient
= NULL
;
172 client_p
->preClient
= NULL
;
173 client_p
->from
= from
; /* 'from' of local client is self! */
176 SetUnknown(client_p
);
177 strcpy(client_p
->username
, "unknown");
183 free_pre_client(struct Client
*client_p
)
185 struct Blacklist
*blptr
;
187 s_assert(NULL
!= client_p
);
189 if(client_p
->preClient
== NULL
)
192 blptr
= client_p
->preClient
->dnsbl_listed
;
194 unref_blacklist(blptr
);
195 abort_blacklist_queries(client_p
);
196 rb_bh_free(pclient_heap
, client_p
->preClient
);
197 client_p
->preClient
= NULL
;
201 free_local_client(struct Client
*client_p
)
203 s_assert(NULL
!= client_p
);
204 s_assert(&me
!= client_p
);
206 if(client_p
->localClient
== NULL
)
210 * clean up extra sockets from P-lines which have been discarded.
212 if(client_p
->localClient
->listener
)
214 s_assert(0 < client_p
->localClient
->listener
->ref_count
);
215 if(0 == --client_p
->localClient
->listener
->ref_count
216 && !client_p
->localClient
->listener
->active
)
217 free_listener(client_p
->localClient
->listener
);
218 client_p
->localClient
->listener
= 0;
221 if(client_p
->localClient
->F
!= NULL
)
223 del_from_cli_fd_hash(client_p
);
224 rb_close(client_p
->localClient
->F
);
227 if(client_p
->localClient
->passwd
)
229 memset(client_p
->localClient
->passwd
, 0,
230 strlen(client_p
->localClient
->passwd
));
231 rb_free(client_p
->localClient
->passwd
);
234 rb_free(client_p
->localClient
->challenge
);
235 rb_free(client_p
->localClient
->fullcaps
);
236 rb_free(client_p
->localClient
->opername
);
237 rb_free(client_p
->localClient
->mangledhost
);
238 if (client_p
->localClient
->privset
)
239 privilegeset_unref(client_p
->localClient
->privset
);
242 ssld_decrement_clicount(client_p
->localClient
->ssl_ctl
);
244 if(IsCapable(client_p
, CAP_ZIP
))
245 ssld_decrement_clicount(client_p
->localClient
->z_ctl
);
247 rb_bh_free(lclient_heap
, client_p
->localClient
);
248 client_p
->localClient
= NULL
;
252 free_client(struct Client
*client_p
)
254 s_assert(NULL
!= client_p
);
255 s_assert(&me
!= client_p
);
256 free_local_client(client_p
);
257 free_pre_client(client_p
);
258 rb_bh_free(client_heap
, client_p
);
262 * check_pings - go through the local client list and check activity
263 * kill off stuff that should die
265 * inputs - NOT USED (from event)
266 * output - next time_t when check_pings() should be called again
270 * A PING can be sent to clients as necessary.
272 * Client/Server ping outs are handled.
276 * Addon from adrian. We used to call this after nextping seconds,
277 * however I've changed it to run once a second. This is only for
278 * PING timeouts, not K/etc-line checks (thanks dianora!). Having it
279 * run once a second makes life a lot easier - when a new client connects
280 * and they need a ping in 4 seconds, if nextping was set to 20 seconds
281 * we end up waiting 20 seconds. This is stupid. :-)
282 * I will optimise (hah!) check_pings() once I've finished working on
283 * tidying up other network IO evilnesses.
288 check_pings(void *notused
)
290 check_pings_list(&lclient_list
);
291 check_pings_list(&serv_list
);
292 check_unknowns_list(&unknown_list
);
298 * inputs - pointer to list to check
303 check_pings_list(rb_dlink_list
* list
)
305 char scratch
[32]; /* way too generous but... */
306 struct Client
*client_p
; /* current local client_p being examined */
307 int ping
= 0; /* ping time value from client */
308 rb_dlink_node
*ptr
, *next_ptr
;
310 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, list
->head
)
312 client_p
= ptr
->data
;
314 if(!MyConnect(client_p
) || IsDead(client_p
))
317 ping
= get_client_ping(client_p
);
319 if(ping
< (rb_current_time() - client_p
->localClient
->lasttime
))
322 * If the client/server hasnt talked to us in 2*ping seconds
323 * and it has a ping time, then close its connection.
325 if(((rb_current_time() - client_p
->localClient
->lasttime
) >= (2 * ping
)
326 && (client_p
->flags
& FLAGS_PINGSENT
)))
328 if(IsServer(client_p
))
330 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
331 "No response from %s, closing link",
334 "No response from %s, closing link",
335 log_client_name(client_p
, HIDE_IP
));
337 (void) rb_snprintf(scratch
, sizeof(scratch
),
338 "Ping timeout: %d seconds",
339 (int) (rb_current_time() - client_p
->localClient
->lasttime
));
341 exit_client(client_p
, client_p
, &me
, scratch
);
344 else if((client_p
->flags
& FLAGS_PINGSENT
) == 0)
347 * if we havent PINGed the connection and we havent
348 * heard from it in a while, PING it to make sure
351 client_p
->flags
|= FLAGS_PINGSENT
;
352 /* not nice but does the job */
353 client_p
->localClient
->lasttime
= rb_current_time() - ping
;
354 sendto_one(client_p
, "PING :%s", me
.name
);
363 * check_unknowns_list
365 * inputs - pointer to list of unknown clients
367 * side effects - unknown clients get marked for termination after n seconds
370 check_unknowns_list(rb_dlink_list
* list
)
372 rb_dlink_node
*ptr
, *next_ptr
;
373 struct Client
*client_p
;
376 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, list
->head
)
378 client_p
= ptr
->data
;
380 if(IsDead(client_p
) || IsClosing(client_p
))
383 /* still has DNSbls to validate against */
384 if(client_p
->preClient
!= NULL
&&
385 rb_dlink_list_length(&client_p
->preClient
->dnsbl_queries
) > 0)
389 * Check UNKNOWN connections - if they have been in this state
390 * for > 30s, close them.
393 timeout
= IsAnyServer(client_p
) ? ConfigFileEntry
.connect_timeout
: 30;
394 if((rb_current_time() - client_p
->localClient
->firsttime
) > timeout
)
396 if(IsAnyServer(client_p
))
398 sendto_realops_snomask(SNO_GENERAL
, is_remote_connect(client_p
) ? L_NETWIDE
: L_ALL
,
399 "No response from %s, closing link",
402 "No response from %s, closing link",
403 log_client_name(client_p
, HIDE_IP
));
405 exit_client(client_p
, client_p
, &me
, "Connection timed out");
411 notify_banned_client(struct Client
*client_p
, struct ConfItem
*aconf
, int ban
)
413 static const char conn_closed
[] = "Connection closed";
414 static const char d_lined
[] = "D-lined";
415 static const char k_lined
[] = "K-lined";
416 const char *reason
= NULL
;
417 const char *exit_reason
= conn_closed
;
419 if(ConfigFileEntry
.kline_with_reason
&& !EmptyString(aconf
->passwd
))
421 reason
= aconf
->passwd
;
422 exit_reason
= aconf
->passwd
;
426 reason
= aconf
->status
== D_LINED
? d_lined
: k_lined
;
429 if(ban
== D_LINED
&& !IsPerson(client_p
))
430 sendto_one(client_p
, "NOTICE DLINE :*** You have been D-lined");
432 sendto_one(client_p
, form_str(ERR_YOUREBANNEDCREEP
),
433 me
.name
, client_p
->name
, reason
);
435 exit_client(client_p
, client_p
, &me
,
436 EmptyString(ConfigFileEntry
.kline_reason
) ? exit_reason
:
437 ConfigFileEntry
.kline_reason
);
444 * side effects - Check all connections for a pending k/dline against the
445 * client, exit the client if found.
448 check_banned_lines(void)
455 /* check_klines_event()
459 * side effects - check_klines() is called, kline_queued unset
462 check_klines_event(void *unused
)
472 * side effects - all clients will be checked for klines
477 struct Client
*client_p
;
478 struct ConfItem
*aconf
;
480 rb_dlink_node
*next_ptr
;
482 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, lclient_list
.head
)
484 client_p
= ptr
->data
;
486 if(IsMe(client_p
) || !IsPerson(client_p
))
489 if((aconf
= find_kline(client_p
)) != NULL
)
491 if(IsExemptKline(client_p
))
493 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
494 "KLINE over-ruled for %s, client is kline_exempt [%s@%s]",
495 get_client_name(client_p
, HIDE_IP
),
496 aconf
->user
, aconf
->host
);
500 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
501 "KLINE active for %s",
502 get_client_name(client_p
, HIDE_IP
));
504 notify_banned_client(client_p
, aconf
, K_LINED
);
514 * side effects - all clients will be checked for dlines
519 struct Client
*client_p
;
520 struct ConfItem
*aconf
;
522 rb_dlink_node
*next_ptr
;
524 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, lclient_list
.head
)
526 client_p
= ptr
->data
;
531 if((aconf
= find_dline((struct sockaddr
*)&client_p
->localClient
->ip
,client_p
->localClient
->ip
.ss_family
)) != NULL
)
533 if(aconf
->status
& CONF_EXEMPTDLINE
)
536 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
537 "DLINE active for %s",
538 get_client_name(client_p
, HIDE_IP
));
540 notify_banned_client(client_p
, aconf
, D_LINED
);
545 /* dlines need to be checked against unknowns too */
546 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, unknown_list
.head
)
548 client_p
= ptr
->data
;
550 if((aconf
= find_dline((struct sockaddr
*)&client_p
->localClient
->ip
,client_p
->localClient
->ip
.ss_family
)) != NULL
)
552 if(aconf
->status
& CONF_EXEMPTDLINE
)
555 notify_banned_client(client_p
, aconf
, D_LINED
);
564 * side effects - all clients will be checked for xlines
569 struct Client
*client_p
;
570 struct ConfItem
*aconf
;
572 rb_dlink_node
*next_ptr
;
574 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, lclient_list
.head
)
576 client_p
= ptr
->data
;
578 if(IsMe(client_p
) || !IsPerson(client_p
))
581 if((aconf
= find_xline(client_p
->info
, 1)) != NULL
)
583 if(IsExemptKline(client_p
))
585 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
586 "XLINE over-ruled for %s, client is kline_exempt [%s]",
587 get_client_name(client_p
, HIDE_IP
),
592 sendto_realops_snomask(SNO_GENERAL
, L_ALL
, "XLINE active for %s",
593 get_client_name(client_p
, HIDE_IP
));
595 (void) exit_client(client_p
, client_p
, &me
, "Bad user info");
602 * update_client_exit_stats
604 * input - pointer to client
609 update_client_exit_stats(struct Client
*client_p
)
611 if(IsServer(client_p
))
613 sendto_realops_snomask(SNO_EXTERNAL
, L_ALL
,
614 "Server %s split from %s",
615 client_p
->name
, client_p
->servptr
->name
);
616 if(HasSentEob(client_p
))
619 else if(IsClient(client_p
))
624 if(IsInvisible(client_p
))
628 if(splitchecking
&& !splitmode
)
629 check_splitmode(NULL
);
633 * release_client_state
635 * input - pointer to client to release
640 release_client_state(struct Client
*client_p
)
642 if(client_p
->user
!= NULL
)
644 free_user(client_p
->user
, client_p
); /* try this here */
648 if(client_p
->serv
->user
!= NULL
)
649 free_user(client_p
->serv
->user
, client_p
);
650 if(client_p
->serv
->fullcaps
)
651 rb_free(client_p
->serv
->fullcaps
);
652 rb_free(client_p
->serv
);
657 * remove_client_from_list
658 * inputs - point to client to remove
660 * side effects - taken the code from ExitOneClient() for this
661 * and placed it here. - avalon
664 remove_client_from_list(struct Client
*client_p
)
666 s_assert(NULL
!= client_p
);
671 /* A client made with make_client()
672 * is on the unknown_list until removed.
673 * If it =does= happen to exit before its removed from that list
674 * and its =not= on the global_client_list, it will core here.
675 * short circuit that case now -db
677 if(client_p
->node
.prev
== NULL
&& client_p
->node
.next
== NULL
)
680 rb_dlinkDelete(&client_p
->node
, &global_client_list
);
682 update_client_exit_stats(client_p
);
687 * find_person - find person by (nick)name.
688 * inputs - pointer to name
689 * output - return client pointer
693 find_person(const char *name
)
695 struct Client
*c2ptr
;
697 c2ptr
= find_client(name
);
699 if(c2ptr
&& IsPerson(c2ptr
))
705 find_named_person(const char *name
)
707 struct Client
*c2ptr
;
709 c2ptr
= find_named_client(name
);
711 if(c2ptr
&& IsPerson(c2ptr
))
718 * find_chasing - find the client structure for a nick name (user)
719 * using history mechanism if necessary. If the client is not found,
720 * an error message (NO SUCH NICK) is generated. If the client was found
721 * through the history, chasing will be 1 and otherwise 0.
724 find_chasing(struct Client
*source_p
, const char *user
, int *chasing
)
728 if(MyClient(source_p
))
729 who
= find_named_person(user
);
731 who
= find_person(user
);
736 if(who
|| IsDigit(*user
))
739 if(!(who
= get_history(user
, (long) KILLCHASETIMELIMIT
)))
741 sendto_one_numeric(source_p
, ERR_NOSUCHNICK
,
742 form_str(ERR_NOSUCHNICK
), user
);
751 * get_client_name - Return the name of the client
752 * for various tracking and
753 * admin purposes. The main purpose of this function is to
754 * return the "socket host" name of the client, if that
755 * differs from the advertised name (other than case).
756 * But, this can be used to any client structure.
759 * Watch out the allocation of "nbuf", if either source_p->name
760 * or source_p->sockhost gets changed into pointers instead of
761 * directly allocated within the structure...
764 * Function return either a pointer to the structure (source_p) or
765 * to internal buffer (nbuf). *NEVER* use the returned pointer
766 * to modify what it points!!!
770 get_client_name(struct Client
*client
, int showip
)
772 static char nbuf
[HOSTLEN
* 2 + USERLEN
+ 5];
774 s_assert(NULL
!= client
);
778 if(MyConnect(client
))
780 if(!irccmp(client
->name
, client
->host
))
783 if(ConfigFileEntry
.hide_spoof_ips
&&
784 showip
== SHOW_IP
&& IsIPSpoof(client
))
786 if(IsAnyServer(client
))
789 /* And finally, let's get the host information, ip or name */
793 rb_snprintf(nbuf
, sizeof(nbuf
), "%s[%s@%s]",
794 client
->name
, client
->username
,
798 rb_snprintf(nbuf
, sizeof(nbuf
), "%s[%s@255.255.255.255]",
799 client
->name
, client
->username
);
802 rb_snprintf(nbuf
, sizeof(nbuf
), "%s[%s@%s]",
803 client
->name
, client
->username
, client
->host
);
808 /* As pointed out by Adel Mezibra
809 * Neph|l|m@EFnet. Was missing a return here.
816 * This version is the same as get_client_name, but doesnt contain the
817 * code that will hide IPs always. This should be used for logfiles.
820 log_client_name(struct Client
*target_p
, int showip
)
822 static char nbuf
[HOSTLEN
* 2 + USERLEN
+ 5];
827 if(MyConnect(target_p
))
829 if(irccmp(target_p
->name
, target_p
->host
) == 0)
830 return target_p
->name
;
835 rb_snprintf(nbuf
, sizeof(nbuf
), "%s[%s@%s]", target_p
->name
,
836 target_p
->username
, target_p
->sockhost
);
840 rb_snprintf(nbuf
, sizeof(nbuf
), "%s[%s@255.255.255.255]",
841 target_p
->name
, target_p
->username
);
844 rb_snprintf(nbuf
, sizeof(nbuf
), "%s[%s@%s]", target_p
->name
,
845 target_p
->username
, target_p
->host
);
851 return target_p
->name
;
854 /* is_remote_connect - Returns whether a server was /connect'ed by a remote
855 * oper (send notices netwide) */
857 is_remote_connect(struct Client
*client_p
)
861 if (client_p
->serv
== NULL
)
863 oper
= find_named_person(client_p
->serv
->by
);
864 return oper
!= NULL
&& IsOper(oper
) && !MyConnect(oper
);
868 free_exited_clients(void *unused
)
870 rb_dlink_node
*ptr
, *next
;
871 struct Client
*target_p
;
873 RB_DLINK_FOREACH_SAFE(ptr
, next
, dead_list
.head
)
875 target_p
= ptr
->data
;
877 #ifdef DEBUG_EXITED_CLIENTS
879 struct abort_client
*abt
;
883 RB_DLINK_FOREACH(aptr
, abort_list
.head
)
886 if(abt
->client
== target_p
)
889 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
890 "On abort_list: %s stat: %u flags: %u/%u handler: %c",
891 target_p
->name
, (unsigned int) target_p
->status
,
892 target_p
->flags
, target_p
->flags2
, target_p
->handler
);
893 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
894 "Please report this to the charybdis developers!");
901 rb_dlinkDestroy(ptr
, &dead_list
);
907 if(ptr
->data
== NULL
)
909 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
910 "Warning: null client on dead_list!");
911 rb_dlinkDestroy(ptr
, &dead_list
);
914 release_client_state(target_p
);
915 free_client(target_p
);
916 rb_dlinkDestroy(ptr
, &dead_list
);
919 #ifdef DEBUG_EXITED_CLIENTS
920 RB_DLINK_FOREACH_SAFE(ptr
, next
, dead_remote_list
.head
)
922 target_p
= ptr
->data
;
924 if(ptr
->data
== NULL
)
926 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
927 "Warning: null client on dead_list!");
928 rb_dlinkDestroy(ptr
, &dead_list
);
931 release_client_state(target_p
);
932 free_client(target_p
);
933 rb_dlinkDestroy(ptr
, &dead_remote_list
);
940 ** Recursively send QUITs and SQUITs for source_p and all its dependent clients
941 ** and servers to those servers that need them. A server needs the client
942 ** QUITs if it can't figure them out from the SQUIT (ie pre-TS4) or if it
943 ** isn't getting the SQUIT because of @#(*&@)# hostmasking. With TS4, once
944 ** a link gets a SQUIT, it doesn't need any QUIT/SQUITs for clients depending
945 ** on that one -orabidoo
948 recurse_send_quits(struct Client
*client_p
, struct Client
*source_p
,
949 struct Client
*to
, const char *comment1
,
952 struct Client
*target_p
;
953 rb_dlink_node
*ptr
, *ptr_next
;
954 /* If this server can handle quit storm (QS) removal
955 * of dependents, just send the SQUIT
958 if(IsCapable(to
, CAP_QS
))
960 sendto_one(to
, "SQUIT %s :%s",
961 get_id(source_p
, to
), comment
);
965 RB_DLINK_FOREACH_SAFE(ptr
, ptr_next
, source_p
->serv
->users
.head
)
967 target_p
= ptr
->data
;
968 sendto_one(to
, ":%s QUIT :%s", target_p
->name
, comment1
);
970 RB_DLINK_FOREACH_SAFE(ptr
, ptr_next
, source_p
->serv
->servers
.head
)
972 target_p
= ptr
->data
;
973 recurse_send_quits(client_p
, target_p
, to
, comment1
, comment
);
975 sendto_one(to
, "SQUIT %s :%s", source_p
->name
, comment
);
980 ** Remove all clients that depend on source_p; assumes all (S)QUITs have
981 ** already been sent. we make sure to exit a server's dependent clients
982 ** and servers before the server itself; exit_one_client takes care of
983 ** actually removing things off llists. tweaked from +CSr31 -orabidoo
986 * added sanity test code.... source_p->serv might be NULL...
989 recurse_remove_clients(struct Client
*source_p
, const char *comment
)
991 struct Client
*target_p
;
992 rb_dlink_node
*ptr
, *ptr_next
;
997 if(source_p
->serv
== NULL
) /* oooops. uh this is actually a major bug */
1000 /* this is very ugly, but it saves cpu :P */
1001 if(ConfigFileEntry
.nick_delay
> 0)
1003 RB_DLINK_FOREACH_SAFE(ptr
, ptr_next
, source_p
->serv
->users
.head
)
1005 target_p
= ptr
->data
;
1006 target_p
->flags
|= FLAGS_KILLED
;
1007 add_nd_entry(target_p
->name
);
1009 if(!IsDead(target_p
) && !IsClosing(target_p
))
1010 exit_remote_client(NULL
, target_p
, &me
, comment
);
1015 RB_DLINK_FOREACH_SAFE(ptr
, ptr_next
, source_p
->serv
->users
.head
)
1017 target_p
= ptr
->data
;
1018 target_p
->flags
|= FLAGS_KILLED
;
1020 if(!IsDead(target_p
) && !IsClosing(target_p
))
1021 exit_remote_client(NULL
, target_p
, &me
, comment
);
1025 RB_DLINK_FOREACH_SAFE(ptr
, ptr_next
, source_p
->serv
->servers
.head
)
1027 target_p
= ptr
->data
;
1028 recurse_remove_clients(target_p
, comment
);
1029 qs_server(NULL
, target_p
, &me
, comment
);
1034 ** Remove *everything* that depends on source_p, from all lists, and sending
1035 ** all necessary QUITs and SQUITs. source_p itself is still on the lists,
1036 ** and its SQUITs have been sent except for the upstream one -orabidoo
1039 remove_dependents(struct Client
*client_p
,
1040 struct Client
*source_p
,
1041 struct Client
*from
, const char *comment
, const char *comment1
)
1044 rb_dlink_node
*ptr
, *next
;
1046 RB_DLINK_FOREACH_SAFE(ptr
, next
, serv_list
.head
)
1050 if(IsMe(to
) || to
== source_p
->from
||
1051 (to
== client_p
&& IsCapable(to
, CAP_QS
)))
1054 recurse_send_quits(client_p
, source_p
, to
, comment1
, comment
);
1057 recurse_remove_clients(source_p
, comment1
);
1061 exit_aborted_clients(void *unused
)
1063 struct abort_client
*abt
;
1064 rb_dlink_node
*ptr
, *next
;
1065 RB_DLINK_FOREACH_SAFE(ptr
, next
, abort_list
.head
)
1069 #ifdef DEBUG_EXITED_CLIENTS
1071 if(rb_dlinkFind(abt
->client
, &dead_list
))
1074 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
1075 "On dead_list: %s stat: %u flags: %u/%u handler: %c",
1076 abt
->client
->name
, (unsigned int) abt
->client
->status
,
1077 abt
->client
->flags
, abt
->client
->flags2
, abt
->client
->handler
);
1078 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
1079 "Please report this to the charybdis developers!");
1085 s_assert(*((unsigned long*)abt
->client
) != 0xdeadbeef); /* This is lame but its a debug thing */
1086 rb_dlinkDelete(ptr
, &abort_list
);
1088 if(IsAnyServer(abt
->client
))
1089 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
1090 "Closing link to %s: %s",
1091 abt
->client
->name
, abt
->notice
);
1093 /* its no longer on abort list - we *must* remove
1094 * FLAGS_CLOSING otherwise exit_client() will not run --fl
1096 abt
->client
->flags
&= ~FLAGS_CLOSING
;
1097 exit_client(abt
->client
, abt
->client
, &me
, abt
->notice
);
1104 * dead_link - Adds client to a list of clients that need an exit_client()
1108 dead_link(struct Client
*client_p
)
1110 struct abort_client
*abt
;
1112 s_assert(!IsMe(client_p
));
1113 if(IsDead(client_p
) || IsClosing(client_p
) || IsMe(client_p
))
1116 abt
= (struct abort_client
*) rb_malloc(sizeof(struct abort_client
));
1118 if(client_p
->flags
& FLAGS_SENDQEX
)
1119 rb_strlcpy(abt
->notice
, "Max SendQ exceeded", sizeof(abt
->notice
));
1121 rb_snprintf(abt
->notice
, sizeof(abt
->notice
), "Write error: %s", strerror(errno
));
1123 abt
->client
= client_p
;
1124 SetIOError(client_p
);
1126 SetClosing(client_p
);
1127 rb_dlinkAdd(abt
, &abt
->node
, &abort_list
);
1131 /* This does the remove of the user from channels..local or remote */
1133 exit_generic_client(struct Client
*client_p
, struct Client
*source_p
, struct Client
*from
,
1134 const char *comment
)
1136 rb_dlink_node
*ptr
, *next_ptr
;
1138 if(IsOper(source_p
))
1139 rb_dlinkFindDestroy(source_p
, &oper_list
);
1141 sendto_common_channels_local(source_p
, ":%s!%s@%s QUIT :%s",
1143 source_p
->username
, source_p
->host
, comment
);
1145 remove_user_from_channels(source_p
);
1147 /* Should not be in any channels now */
1148 s_assert(source_p
->user
->channel
.head
== NULL
);
1150 /* Clean up invitefield */
1151 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, source_p
->user
->invited
.head
)
1153 del_invite(ptr
->data
, source_p
);
1156 /* Clean up allow lists */
1157 del_all_accepts(source_p
);
1159 add_history(source_p
, 0);
1160 off_history(source_p
);
1162 monitor_signoff(source_p
);
1164 if(has_id(source_p
))
1165 del_from_id_hash(source_p
->id
, source_p
);
1167 del_from_hostname_hash(source_p
->orighost
, source_p
);
1168 del_from_client_hash(source_p
->name
, source_p
);
1169 remove_client_from_list(source_p
);
1173 * Assumes IsPerson(source_p) && !MyConnect(source_p)
1177 exit_remote_client(struct Client
*client_p
, struct Client
*source_p
, struct Client
*from
,
1178 const char *comment
)
1180 exit_generic_client(client_p
, source_p
, from
, comment
);
1182 if(source_p
->servptr
&& source_p
->servptr
->serv
)
1184 rb_dlinkDelete(&source_p
->lnode
, &source_p
->servptr
->serv
->users
);
1187 if((source_p
->flags
& FLAGS_KILLED
) == 0)
1189 sendto_server(client_p
, NULL
, CAP_TS6
, NOCAPS
,
1190 ":%s QUIT :%s", use_id(source_p
), comment
);
1194 #ifdef DEBUG_EXITED_CLIENTS
1195 rb_dlinkAddAlloc(source_p
, &dead_remote_list
);
1197 rb_dlinkAddAlloc(source_p
, &dead_list
);
1199 return(CLIENT_EXITED
);
1203 * This assumes IsUnknown(source_p) == TRUE and MyConnect(source_p) == TRUE
1207 exit_unknown_client(struct Client
*client_p
, struct Client
*source_p
, struct Client
*from
,
1208 const char *comment
)
1210 delete_auth_queries(source_p
);
1211 if (source_p
->localClient
->dnsquery
)
1213 delete_resolver_queries(source_p
->localClient
->dnsquery
);
1214 rb_free(source_p
->localClient
->dnsquery
);
1216 rb_dlinkDelete(&source_p
->localClient
->tnode
, &unknown_list
);
1218 if(!IsIOError(source_p
))
1219 sendto_one(source_p
, "ERROR :Closing Link: %s (%s)",
1220 source_p
->user
!= NULL
? source_p
->host
: "127.0.0.1",
1223 close_connection(source_p
);
1225 if(has_id(source_p
))
1226 del_from_id_hash(source_p
->id
, source_p
);
1228 del_from_hostname_hash(source_p
->host
, source_p
);
1229 del_from_client_hash(source_p
->name
, source_p
);
1230 remove_client_from_list(source_p
);
1232 rb_dlinkAddAlloc(source_p
, &dead_list
);
1234 /* Note that we don't need to add unknowns to the dead_list */
1235 return(CLIENT_EXITED
);
1239 exit_remote_server(struct Client
*client_p
, struct Client
*source_p
, struct Client
*from
,
1240 const char *comment
)
1242 static char comment1
[(HOSTLEN
*2)+2];
1243 static char newcomment
[BUFSIZE
];
1244 struct Client
*target_p
;
1246 if(ConfigServerHide
.flatten_links
)
1247 strcpy(comment1
, "*.net *.split");
1250 strcpy(comment1
, source_p
->servptr
->name
);
1251 strcat(comment1
, " ");
1252 strcat(comment1
, source_p
->name
);
1255 rb_snprintf(newcomment
, sizeof(newcomment
), "by %s: %s",
1256 from
->name
, comment
);
1258 if(source_p
->serv
!= NULL
)
1259 remove_dependents(client_p
, source_p
, from
, IsPerson(from
) ? newcomment
: comment
, comment1
);
1261 if(source_p
->servptr
&& source_p
->servptr
->serv
)
1262 rb_dlinkDelete(&source_p
->lnode
, &source_p
->servptr
->serv
->servers
);
1266 rb_dlinkFindDestroy(source_p
, &global_serv_list
);
1267 target_p
= source_p
->from
;
1269 if(target_p
!= NULL
&& IsServer(target_p
) && target_p
!= client_p
&&
1270 !IsMe(target_p
) && (source_p
->flags
& FLAGS_KILLED
) == 0)
1272 sendto_one(target_p
, ":%s SQUIT %s :%s",
1273 get_id(from
, target_p
), get_id(source_p
, target_p
),
1277 if(has_id(source_p
))
1278 del_from_id_hash(source_p
->id
, source_p
);
1280 del_from_client_hash(source_p
->name
, source_p
);
1281 remove_client_from_list(source_p
);
1282 scache_split(source_p
->serv
->nameinfo
);
1285 #ifdef DEBUG_EXITED_CLIENTS
1286 rb_dlinkAddAlloc(source_p
, &dead_remote_list
);
1288 rb_dlinkAddAlloc(source_p
, &dead_list
);
1294 qs_server(struct Client
*client_p
, struct Client
*source_p
, struct Client
*from
,
1295 const char *comment
)
1297 if(source_p
->servptr
&& source_p
->servptr
->serv
)
1298 rb_dlinkDelete(&source_p
->lnode
, &source_p
->servptr
->serv
->servers
);
1302 rb_dlinkFindDestroy(source_p
, &global_serv_list
);
1304 if(has_id(source_p
))
1305 del_from_id_hash(source_p
->id
, source_p
);
1307 del_from_client_hash(source_p
->name
, source_p
);
1308 remove_client_from_list(source_p
);
1309 scache_split(source_p
->serv
->nameinfo
);
1312 rb_dlinkAddAlloc(source_p
, &dead_list
);
1317 exit_local_server(struct Client
*client_p
, struct Client
*source_p
, struct Client
*from
,
1318 const char *comment
)
1320 static char comment1
[(HOSTLEN
*2)+2];
1321 static char newcomment
[BUFSIZE
];
1322 unsigned int sendk
, recvk
;
1324 rb_dlinkDelete(&source_p
->localClient
->tnode
, &serv_list
);
1325 rb_dlinkFindDestroy(source_p
, &global_serv_list
);
1327 unset_chcap_usage_counts(source_p
);
1328 sendk
= source_p
->localClient
->sendK
;
1329 recvk
= source_p
->localClient
->receiveK
;
1331 /* Always show source here, so the server notices show
1332 * which side initiated the split -- jilles
1334 rb_snprintf(newcomment
, sizeof(newcomment
), "by %s: %s",
1335 from
== source_p
? me
.name
: from
->name
, comment
);
1336 if (!IsIOError(source_p
))
1337 sendto_one(source_p
, "SQUIT %s :%s", use_id(source_p
),
1339 if(client_p
!= NULL
&& source_p
!= client_p
&& !IsIOError(source_p
))
1341 sendto_one(source_p
, "ERROR :Closing Link: 127.0.0.1 %s (%s)",
1342 source_p
->name
, comment
);
1345 if(source_p
->servptr
&& source_p
->servptr
->serv
)
1346 rb_dlinkDelete(&source_p
->lnode
, &source_p
->servptr
->serv
->servers
);
1351 close_connection(source_p
);
1353 if(ConfigServerHide
.flatten_links
)
1354 strcpy(comment1
, "*.net *.split");
1357 strcpy(comment1
, source_p
->servptr
->name
);
1358 strcat(comment1
, " ");
1359 strcat(comment1
, source_p
->name
);
1362 if(source_p
->serv
!= NULL
)
1363 remove_dependents(client_p
, source_p
, from
, IsPerson(from
) ? newcomment
: comment
, comment1
);
1365 sendto_realops_snomask(SNO_GENERAL
, L_ALL
, "%s was connected"
1366 " for %ld seconds. %d/%d sendK/recvK.",
1367 source_p
->name
, (long) rb_current_time() - source_p
->localClient
->firsttime
, sendk
, recvk
);
1369 ilog(L_SERVER
, "%s was connected for %ld seconds. %d/%d sendK/recvK.",
1370 source_p
->name
, (long) rb_current_time() - source_p
->localClient
->firsttime
, sendk
, recvk
);
1372 if(has_id(source_p
))
1373 del_from_id_hash(source_p
->id
, source_p
);
1375 del_from_client_hash(source_p
->name
, source_p
);
1376 remove_client_from_list(source_p
);
1377 scache_split(source_p
->serv
->nameinfo
);
1380 rb_dlinkAddAlloc(source_p
, &dead_list
);
1386 * This assumes IsPerson(source_p) == TRUE && MyConnect(source_p) == TRUE
1390 exit_local_client(struct Client
*client_p
, struct Client
*source_p
, struct Client
*from
,
1391 const char *comment
)
1393 unsigned long on_for
;
1396 exit_generic_client(client_p
, source_p
, from
, comment
);
1397 clear_monitor(source_p
);
1399 s_assert(IsPerson(source_p
));
1400 rb_dlinkDelete(&source_p
->localClient
->tnode
, &lclient_list
);
1401 rb_dlinkDelete(&source_p
->lnode
, &me
.serv
->users
);
1403 if(IsOper(source_p
))
1404 rb_dlinkFindDestroy(source_p
, &local_oper_list
);
1406 sendto_realops_snomask(SNO_CCONN
, L_ALL
,
1407 "Client exiting: %s (%s@%s) [%s] [%s]",
1409 source_p
->username
, source_p
->host
, comment
,
1410 show_ip(NULL
, source_p
) ? source_p
->sockhost
: "255.255.255.255");
1412 sendto_realops_snomask(SNO_CCONNEXT
, L_ALL
,
1413 "CLIEXIT %s %s %s %s 0 %s",
1414 source_p
->name
, source_p
->username
, source_p
->host
,
1415 show_ip(NULL
, source_p
) ? source_p
->sockhost
: "255.255.255.255",
1418 on_for
= rb_current_time() - source_p
->localClient
->firsttime
;
1420 ilog(L_USER
, "%s (%3lu:%02lu:%02lu): %s!%s@%s %s %d/%d",
1421 rb_ctime(rb_current_time(), tbuf
, sizeof(tbuf
)), on_for
/ 3600,
1422 (on_for
% 3600) / 60, on_for
% 60,
1423 source_p
->name
, source_p
->username
, source_p
->host
,
1425 source_p
->localClient
->sendK
, source_p
->localClient
->receiveK
);
1427 sendto_one(source_p
, "ERROR :Closing Link: %s (%s)", source_p
->host
, comment
);
1428 close_connection(source_p
);
1430 if((source_p
->flags
& FLAGS_KILLED
) == 0)
1432 sendto_server(client_p
, NULL
, CAP_TS6
, NOCAPS
,
1433 ":%s QUIT :%s", use_id(source_p
), comment
);
1437 rb_dlinkAddAlloc(source_p
, &dead_list
);
1438 return(CLIENT_EXITED
);
1443 ** exit_client - This is old "m_bye". Name changed, because this is not a
1444 ** protocol function, but a general server utility function.
1446 ** This function exits a client of *any* type (user, server, etc)
1447 ** from this server. Also, this generates all necessary prototol
1448 ** messages that this exit may cause.
1450 ** 1) If the client is a local client, then this implicitly
1451 ** exits all other clients depending on this connection (e.g.
1452 ** remote clients having 'from'-field that points to this.
1454 ** 2) If the client is a remote client, then only this is exited.
1456 ** For convenience, this function returns a suitable value for
1457 ** m_function return value:
1459 ** CLIENT_EXITED if (client_p == source_p)
1460 ** 0 if (client_p != source_p)
1463 exit_client(struct Client
*client_p
, /* The local client originating the
1464 * exit or NULL, if this exit is
1465 * generated by this server for
1467 * This will not get any of the
1468 * generated messages. */
1469 struct Client
*source_p
, /* Client exiting */
1470 struct Client
*from
, /* Client firing off this Exit,
1472 const char *comment
/* Reason for the exit */
1475 hook_data_client_exit hdata
;
1476 if(IsClosing(source_p
))
1479 /* note, this HAS to be here, when we exit a client we attempt to
1480 * send them data, if this generates a write error we must *not* add
1481 * them to the abort list --fl
1483 SetClosing(source_p
);
1485 hdata
.local_link
= client_p
;
1486 hdata
.target
= source_p
;
1488 hdata
.comment
= comment
;
1489 call_hook(h_client_exit
, &hdata
);
1491 if(MyConnect(source_p
))
1493 /* Local clients of various types */
1494 if(IsPerson(source_p
))
1495 return exit_local_client(client_p
, source_p
, from
, comment
);
1496 else if(IsServer(source_p
))
1497 return exit_local_server(client_p
, source_p
, from
, comment
);
1498 /* IsUnknown || IsConnecting || IsHandShake */
1499 else if(!IsReject(source_p
))
1500 return exit_unknown_client(client_p
, source_p
, from
, comment
);
1505 if(IsPerson(source_p
))
1506 return exit_remote_client(client_p
, source_p
, from
, comment
);
1507 else if(IsServer(source_p
))
1508 return exit_remote_server(client_p
, source_p
, from
, comment
);
1515 * Count up local client memory
1518 /* XXX one common Client list now */
1520 count_local_client_memory(size_t * count
, size_t * local_client_memory_used
)
1523 rb_bh_usage(lclient_heap
, count
, NULL
, &lusage
, NULL
);
1524 *local_client_memory_used
= lusage
+ (*count
* (sizeof(void *) + sizeof(struct Client
)));
1528 * Count up remote client memory
1531 count_remote_client_memory(size_t * count
, size_t * remote_client_memory_used
)
1533 size_t lcount
, rcount
;
1534 rb_bh_usage(lclient_heap
, &lcount
, NULL
, NULL
, NULL
);
1535 rb_bh_usage(client_heap
, &rcount
, NULL
, NULL
, NULL
);
1536 *count
= rcount
- lcount
;
1537 *remote_client_memory_used
= *count
* (sizeof(void *) + sizeof(struct Client
));
1542 * accept processing, this adds a form of "caller ID" to ircd
1544 * If a client puts themselves into "caller ID only" mode,
1545 * only clients that match a client pointer they have put on
1546 * the accept list will be allowed to message them.
1548 * [ source.on_allow_list ] -> [ target1 ] -> [ target2 ]
1550 * [target.allow_list] -> [ source1 ] -> [source2 ]
1552 * i.e. a target will have a link list of source pointers it will allow
1553 * each source client then has a back pointer pointing back
1554 * to the client that has it on its accept list.
1555 * This allows for exit_one_client to remove these now bogus entries
1556 * from any client having an accept on them.
1561 * inputs - pointer to exiting client
1563 * side effects - Walk through given clients allow_list and on_allow_list
1564 * remove all references to this client
1567 del_all_accepts(struct Client
*client_p
)
1570 rb_dlink_node
*next_ptr
;
1571 struct Client
*target_p
;
1573 if(MyClient(client_p
) && client_p
->localClient
->allow_list
.head
)
1575 /* clear this clients accept list, and remove them from
1576 * everyones on_accept_list
1578 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, client_p
->localClient
->allow_list
.head
)
1580 target_p
= ptr
->data
;
1581 rb_dlinkFindDestroy(client_p
, &target_p
->on_allow_list
);
1582 rb_dlinkDestroy(ptr
, &client_p
->localClient
->allow_list
);
1586 /* remove this client from everyones accept list */
1587 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, client_p
->on_allow_list
.head
)
1589 target_p
= ptr
->data
;
1590 rb_dlinkFindDestroy(client_p
, &target_p
->localClient
->allow_list
);
1591 rb_dlinkDestroy(ptr
, &client_p
->on_allow_list
);
1596 * show_ip() - asks if the true IP shoudl be shown when source is
1597 * askin for info about target
1599 * Inputs - source_p who is asking
1600 * - target_p who do we want the info on
1601 * Output - returns 1 if clear IP can be showed, otherwise 0
1602 * Side Effects - none
1606 show_ip(struct Client
*source_p
, struct Client
*target_p
)
1608 if(IsAnyServer(target_p
))
1612 else if(IsIPSpoof(target_p
))
1614 /* source == NULL indicates message is being sent
1617 if(!ConfigFileEntry
.hide_spoof_ips
&&
1618 (source_p
== NULL
|| MyOper(source_p
)))
1622 else if(IsDynSpoof(target_p
) && (source_p
!= NULL
&& !IsOper(source_p
)))
1629 show_ip_conf(struct ConfItem
*aconf
, struct Client
*source_p
)
1631 if(IsConfDoSpoofIp(aconf
))
1633 if(!ConfigFileEntry
.hide_spoof_ips
&& MyOper(source_p
))
1645 * inputs - pointer to client struct
1646 * output - pointer to struct User
1647 * side effects - add's an User information block to a client
1648 * if it was not previously allocated.
1651 make_user(struct Client
*client_p
)
1655 user
= client_p
->user
;
1658 user
= (struct User
*) rb_bh_alloc(user_heap
);
1660 user
->metadata
= irc_dictionary_create(irccmp
);
1661 client_p
->user
= user
;
1670 * inputs - pointer to client struct
1671 * output - pointer to server_t
1672 * side effects - add's an Server information block to a client
1673 * if it was not previously allocated.
1676 make_server(struct Client
*client_p
)
1678 server_t
*serv
= client_p
->serv
;
1682 serv
= (server_t
*) rb_malloc(sizeof(server_t
));
1683 client_p
->serv
= serv
;
1685 return client_p
->serv
;
1691 * inputs - pointer to user struct
1692 * - pointer to client struct
1694 * side effects - Decrease user reference count by one and release block,
1695 * if count reaches 0
1698 free_user(struct User
*user
, struct Client
*client_p
)
1700 if(--user
->refcnt
<= 0)
1705 if(user
->refcnt
< 0 || user
->invited
.head
|| user
->channel
.head
)
1707 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
1708 "* %#lx user (%s!%s@%s) %#lx %#lx %#lx %lu %d *",
1709 (unsigned long) client_p
,
1710 client_p
? client_p
->
1714 (unsigned long) user
,
1715 (unsigned long) user
->invited
.head
,
1716 (unsigned long) user
->channel
.head
,
1717 rb_dlink_list_length(&user
->channel
),
1719 s_assert(!user
->refcnt
);
1720 s_assert(!user
->invited
.head
);
1721 s_assert(!user
->channel
.head
);
1724 rb_bh_free(user_heap
, user
);
1729 get_metadata(struct Client
*client_p
, const char *key
)
1731 struct MetadataEntry
*md
;
1733 if (client_p
->user
!= NULL
)
1735 md
= irc_dictionary_retrieve(client_p
->user
->metadata
, key
);
1746 set_metadata(struct Client
*client_p
, const char *key
, const char *value
)
1748 struct MetadataEntry
*md
;
1750 if(client_p
->user
!= NULL
)
1752 md
= irc_dictionary_retrieve(client_p
->user
->metadata
, key
);
1755 md
= rb_bh_alloc(metadata_heap
);
1756 rb_strlcpy(md
->key
, key
, sizeof md
->key
);
1757 irc_dictionary_add(client_p
->user
->metadata
, md
->key
, md
);
1759 else if (!strcmp(md
->key
, key
) && !strcmp(md
->value
, value
))
1762 rb_strlcpy(md
->key
, key
, sizeof md
->key
);
1764 rb_strlcpy(md
->value
, value
, sizeof md
->value
);
1767 sendto_common_channels_local_with_capability(client_p
, CLICAP_PRESENCE
, form_str(RPL_METADATACHG
), me
.name
, client_p
->name
, key
, value
);
1771 delete_metadata(struct Client
*client_p
, const char *key
)
1773 struct MetadataEntry
*md
;
1775 if(client_p
->user
!= NULL
)
1777 md
= irc_dictionary_delete(client_p
->user
->metadata
, key
);
1781 rb_bh_free(metadata_heap
, md
);
1784 sendto_common_channels_local_with_capability(client_p
, CLICAP_PRESENCE
, form_str(RPL_METADATACHG
), me
.name
, client_p
->name
, key
, "");
1792 for(i
= 0; i
< 3; i
++)
1793 current_uid
[i
] = me
.id
[i
];
1795 for(i
= 3; i
< 9; i
++)
1796 current_uid
[i
] = 'A';
1798 current_uid
[9] = '\0';
1807 for(i
= 8; i
> 3; i
--)
1809 if(current_uid
[i
] == 'Z')
1811 current_uid
[i
] = '0';
1814 else if(current_uid
[i
] != '9')
1820 current_uid
[i
] = 'A';
1823 /* if this next if() triggers, we're fucked. */
1824 if(current_uid
[3] == 'Z')
1826 current_uid
[i
] = 'A';
1837 * Close the physical connection. This function must make
1838 * MyConnect(client_p) == FALSE, and set client_p->from == NULL.
1841 close_connection(struct Client
*client_p
)
1843 s_assert(client_p
!= NULL
);
1844 if(client_p
== NULL
)
1847 s_assert(MyConnect(client_p
));
1848 if(!MyConnect(client_p
))
1851 if(IsServer(client_p
))
1853 struct server_conf
*server_p
;
1855 ServerStats
.is_sv
++;
1856 ServerStats
.is_sbs
+= client_p
->localClient
->sendB
;
1857 ServerStats
.is_sbr
+= client_p
->localClient
->receiveB
;
1858 ServerStats
.is_sti
+= (unsigned long long)(rb_current_time() - client_p
->localClient
->firsttime
);
1861 * If the connection has been up for a long amount of time, schedule
1862 * a 'quick' reconnect, else reset the next-connect cycle.
1864 if((server_p
= find_server_conf(client_p
->name
)) != NULL
)
1867 * Reschedule a faster reconnect, if this was a automatically
1868 * connected configuration entry. (Note that if we have had
1869 * a rehash in between, the status has been changed to
1870 * CONF_ILLEGAL). But only do this if it was a "good" link.
1872 server_p
->hold
= time(NULL
);
1874 (server_p
->hold
- client_p
->localClient
->lasttime
>
1875 HANGONGOODLINK
) ? HANGONRETRYDELAY
: ConFreq(server_p
->class);
1879 else if(IsClient(client_p
))
1881 ServerStats
.is_cl
++;
1882 ServerStats
.is_cbs
+= client_p
->localClient
->sendB
;
1883 ServerStats
.is_cbr
+= client_p
->localClient
->receiveB
;
1884 ServerStats
.is_cti
+= (unsigned long long)(rb_current_time() - client_p
->localClient
->firsttime
);
1887 ServerStats
.is_ni
++;
1889 if(client_p
->localClient
->F
!= NULL
)
1891 /* attempt to flush any pending dbufs. Evil, but .. -- adrian */
1892 if(!IsIOError(client_p
))
1893 send_queued(client_p
);
1895 del_from_cli_fd_hash(client_p
);
1896 rb_close(client_p
->localClient
->F
);
1897 client_p
->localClient
->F
= NULL
;
1900 rb_linebuf_donebuf(&client_p
->localClient
->buf_sendq
);
1901 rb_linebuf_donebuf(&client_p
->localClient
->buf_recvq
);
1902 detach_conf(client_p
);
1904 /* XXX shouldnt really be done here. */
1905 detach_server_conf(client_p
);
1907 client_p
->from
= NULL
; /* ...this should catch them! >:) --msa */
1908 ClearMyConnect(client_p
);
1909 SetIOError(client_p
);
1915 error_exit_client(struct Client
*client_p
, int error
)
1918 * ...hmm, with non-blocking sockets we might get
1919 * here from quite valid reasons, although.. why
1920 * would select report "data available" when there
1921 * wasn't... so, this must be an error anyway... --msa
1922 * actually, EOF occurs when read() returns 0 and
1923 * in due course, select() returns that fd as ready
1924 * for reading even though it ends up being an EOF. -avalon
1927 int current_error
= rb_get_sockerr(client_p
->localClient
->F
);
1929 SetIOError(client_p
);
1931 if(IsServer(client_p
) || IsHandshake(client_p
))
1935 sendto_realops_snomask(SNO_GENERAL
, is_remote_connect(client_p
) && !IsServer(client_p
) ? L_NETWIDE
: L_ALL
,
1936 "Server %s closed the connection",
1939 ilog(L_SERVER
, "Server %s closed the connection",
1940 log_client_name(client_p
, SHOW_IP
));
1944 sendto_realops_snomask(SNO_GENERAL
, is_remote_connect(client_p
) && !IsServer(client_p
) ? L_NETWIDE
: L_ALL
,
1945 "Lost connection to %s: %s",
1946 client_p
->name
, strerror(current_error
));
1947 ilog(L_SERVER
, "Lost connection to %s: %s",
1948 log_client_name(client_p
, SHOW_IP
), strerror(current_error
));
1953 rb_strlcpy(errmsg
, "Remote host closed the connection", sizeof(errmsg
));
1955 rb_snprintf(errmsg
, sizeof(errmsg
), "Read error: %s", strerror(current_error
));
1957 exit_client(client_p
, client_p
, &me
, errmsg
);