]> jfr.im git - irc/rqf/shadowircd.git/blob - src/s_user.c
Remove dot_in_ip6_addr config option.
[irc/rqf/shadowircd.git] / src / s_user.c
1 /*
2 * ircd-ratbox: A slightly useful ircd.
3 * s_user.c: User related functions.
4 *
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 *
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version.
13 *
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
18 *
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
22 * USA
23 *
24 * $Id: s_user.c 3586 2007-11-20 11:16:43Z nenolod $
25 */
26
27 #include "stdinc.h"
28 #include "tools.h"
29 #include "s_user.h"
30 #include "channel.h"
31 #include "class.h"
32 #include "client.h"
33 #include "common.h"
34 #include "hash.h"
35 #include "irc_string.h"
36 #include "sprintf_irc.h"
37 #include "ircd.h"
38 #include "listener.h"
39 #include "msg.h"
40 #include "numeric.h"
41 #include "commio.h"
42 #include "s_conf.h"
43 #include "s_newconf.h"
44 #include "s_log.h"
45 #include "s_serv.h"
46 #include "s_stats.h"
47 #include "scache.h"
48 #include "send.h"
49 #include "supported.h"
50 #include "whowas.h"
51 #include "memory.h"
52 #include "packet.h"
53 #include "reject.h"
54 #include "cache.h"
55 #include "hook.h"
56 #include "monitor.h"
57 #include "snomask.h"
58 #include "blacklist.h"
59 #include "substitution.h"
60
61 static void report_and_set_user_flags(struct Client *, struct ConfItem *);
62 void user_welcome(struct Client *source_p);
63
64 extern char *crypt();
65
66 char umodebuf[128];
67
68 static int orphaned_umodes = 0;
69 int user_modes[256] = {
70 /* 0x00 */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x0F */
71 /* 0x10 */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x1F */
72 /* 0x20 */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x2F */
73 /* 0x30 */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x3F */
74 0, /* @ */
75 0, /* A */
76 0, /* B */
77 0, /* C */
78 UMODE_DEAF, /* D */
79 0, /* E */
80 0, /* F */
81 0, /* G */
82 0, /* H */
83 0, /* I */
84 0, /* J */
85 0, /* K */
86 0, /* L */
87 0, /* M */
88 0, /* N */
89 0, /* O */
90 0, /* P */
91 UMODE_NOFORWARD, /* Q */
92 UMODE_REGONLYMSG, /* R */
93 UMODE_SERVICE, /* S */
94 0, /* T */
95 0, /* U */
96 0, /* V */
97 0, /* W */
98 0, /* X */
99 0, /* Y */
100 0, /* Z */
101 /* 0x5B */ 0, 0, 0, 0, 0, 0, /* 0x60 */
102 UMODE_ADMIN, /* a */
103 0, /* b */
104 0, /* c */
105 0, /* d */
106 0, /* e */
107 0, /* f */
108 UMODE_CALLERID, /* g */
109 0, /* h */
110 UMODE_INVISIBLE, /* i */
111 0, /* j */
112 0, /* k */
113 UMODE_LOCOPS, /* l */
114 0, /* m */
115 0, /* n */
116 UMODE_OPER, /* o */
117 0, /* p */
118 0, /* q */
119 0, /* r */
120 UMODE_SERVNOTICE, /* s */
121 0, /* t */
122 0, /* u */
123 0, /* v */
124 UMODE_WALLOP, /* w */
125 0, /* x */
126 0, /* y */
127 UMODE_OPERWALL, /* z */
128 /* 0x7B */ 0, 0, 0, 0, 0, /* 0x7F */
129 /* 0x80 */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x9F */
130 /* 0x90 */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x9F */
131 /* 0xA0 */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0xAF */
132 /* 0xB0 */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0xBF */
133 /* 0xC0 */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0xCF */
134 /* 0xD0 */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0xDF */
135 /* 0xE0 */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0xEF */
136 /* 0xF0 */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 /* 0xFF */
137 };
138 /* *INDENT-ON* */
139
140 /*
141 * show_lusers -
142 *
143 * inputs - pointer to client
144 * output -
145 * side effects - display to client user counts etc.
146 */
147 int
148 show_lusers(struct Client *source_p)
149 {
150 if(dlink_list_length(&lclient_list) > (unsigned long)MaxClientCount)
151 MaxClientCount = dlink_list_length(&lclient_list);
152
153 if((dlink_list_length(&lclient_list) + dlink_list_length(&serv_list)) >
154 (unsigned long)MaxConnectionCount)
155 MaxConnectionCount = dlink_list_length(&lclient_list) +
156 dlink_list_length(&serv_list);
157
158 sendto_one_numeric(source_p, RPL_LUSERCLIENT, form_str(RPL_LUSERCLIENT),
159 (Count.total - Count.invisi),
160 Count.invisi, dlink_list_length(&global_serv_list));
161
162 if(dlink_list_length(&oper_list) > 0)
163 sendto_one_numeric(source_p, RPL_LUSEROP,
164 form_str(RPL_LUSEROP), dlink_list_length(&oper_list));
165
166 if(dlink_list_length(&unknown_list) > 0)
167 sendto_one_numeric(source_p, RPL_LUSERUNKNOWN,
168 form_str(RPL_LUSERUNKNOWN),
169 dlink_list_length(&unknown_list));
170
171 if(dlink_list_length(&global_channel_list) > 0)
172 sendto_one_numeric(source_p, RPL_LUSERCHANNELS,
173 form_str(RPL_LUSERCHANNELS),
174 dlink_list_length(&global_channel_list));
175
176 sendto_one_numeric(source_p, RPL_LUSERME, form_str(RPL_LUSERME),
177 dlink_list_length(&lclient_list),
178 dlink_list_length(&serv_list));
179
180 sendto_one_numeric(source_p, RPL_LOCALUSERS,
181 form_str(RPL_LOCALUSERS),
182 dlink_list_length(&lclient_list),
183 Count.max_loc,
184 dlink_list_length(&lclient_list),
185 Count.max_loc);
186
187 sendto_one_numeric(source_p, RPL_GLOBALUSERS, form_str(RPL_GLOBALUSERS),
188 Count.total, Count.max_tot,
189 Count.total, Count.max_tot);
190
191 sendto_one_numeric(source_p, RPL_STATSCONN,
192 form_str(RPL_STATSCONN),
193 MaxConnectionCount, MaxClientCount,
194 Count.totalrestartcount);
195
196 return 0;
197 }
198
199 /*
200 ** register_local_user
201 ** This function is called when both NICK and USER messages
202 ** have been accepted for the client, in whatever order. Only
203 ** after this, is the USER message propagated.
204 **
205 ** NICK's must be propagated at once when received, although
206 ** it would be better to delay them too until full info is
207 ** available. Doing it is not so simple though, would have
208 ** to implement the following:
209 **
210 ** (actually it has been implemented already for a while) -orabidoo
211 **
212 ** 1) user telnets in and gives only "NICK foobar" and waits
213 ** 2) another user far away logs in normally with the nick
214 ** "foobar" (quite legal, as this server didn't propagate
215 ** it).
216 ** 3) now this server gets nick "foobar" from outside, but
217 ** has alread the same defined locally. Current server
218 ** would just issue "KILL foobar" to clean out dups. But,
219 ** this is not fair. It should actually request another
220 ** nick from local user or kill him/her...
221 */
222
223 int
224 register_local_user(struct Client *client_p, struct Client *source_p, const char *username)
225 {
226 struct ConfItem *aconf, *xconf;
227 struct User *user = source_p->user;
228 char tmpstr2[IRCD_BUFSIZE];
229 char ipaddr[HOSTIPLEN];
230 char myusername[USERLEN+1];
231 int status;
232
233 s_assert(NULL != source_p);
234 s_assert(MyConnect(source_p));
235 s_assert(source_p->username != username);
236
237 if(source_p == NULL)
238 return -1;
239
240 if(IsAnyDead(source_p))
241 return -1;
242
243 if(ConfigFileEntry.ping_cookie)
244 {
245 if(!(source_p->flags & FLAGS_PINGSENT) && source_p->localClient->random_ping == 0)
246 {
247 source_p->localClient->random_ping = (unsigned long) (rand() * rand()) << 1;
248 sendto_one(source_p, "PING :%08lX",
249 (unsigned long) source_p->localClient->random_ping);
250 source_p->flags |= FLAGS_PINGSENT;
251 return -1;
252 }
253 if(!(source_p->flags2 & FLAGS2_PING_COOKIE))
254 {
255 return -1;
256 }
257 }
258
259 /* hasnt finished client cap negotiation */
260 if(source_p->flags2 & FLAGS2_CLICAP)
261 return -1;
262
263 /* still has DNSbls to validate against */
264 if(dlink_list_length(&source_p->preClient->dnsbl_queries) > 0)
265 return -1;
266
267 client_p->localClient->last = CurrentTime;
268 /* Straight up the maximum rate of flooding... */
269 source_p->localClient->allow_read = MAX_FLOOD_BURST;
270
271 /* XXX - fixme. we shouldnt have to build a users buffer twice.. */
272 if(!IsGotId(source_p) && (strchr(username, '[') != NULL))
273 {
274 const char *p;
275 int i = 0;
276
277 p = username;
278
279 while(*p && i < USERLEN)
280 {
281 if(*p != '[')
282 myusername[i++] = *p;
283 p++;
284 }
285
286 myusername[i] = '\0';
287 username = myusername;
288 }
289
290 if((status = check_client(client_p, source_p, username)) < 0)
291 return (CLIENT_EXITED);
292
293 /* Apply nick override */
294 if(*source_p->preClient->spoofnick)
295 {
296 del_from_client_hash(source_p->name, source_p);
297 strlcpy(source_p->name, source_p->preClient->spoofnick, NICKLEN + 1);
298 add_to_client_hash(source_p->name, source_p);
299 comm_note(source_p->localClient->fd, "Nick: %s", source_p->name);
300 }
301
302 if(!valid_hostname(source_p->host))
303 {
304 sendto_one_notice(source_p, ":*** Notice -- You have an illegal character in your hostname");
305
306 strlcpy(source_p->host, source_p->sockhost, sizeof(source_p->host));
307 }
308
309
310 aconf = source_p->localClient->att_conf;
311
312 if(aconf == NULL)
313 {
314 exit_client(client_p, source_p, &me, "*** Not Authorised");
315 return (CLIENT_EXITED);
316 }
317
318 if(!IsGotId(source_p))
319 {
320 const char *p;
321 int i = 0;
322
323 if(IsNeedIdentd(aconf))
324 {
325 ServerStats->is_ref++;
326 sendto_one_notice(source_p, ":*** Notice -- You need to install identd to use this server");
327 exit_client(client_p, source_p, &me, "Install identd");
328 return (CLIENT_EXITED);
329 }
330
331 /* dont replace username if its supposed to be spoofed --fl */
332 if(!IsConfDoSpoofIp(aconf) || !strchr(aconf->name, '@'))
333 {
334 p = username;
335
336 if(!IsNoTilde(aconf))
337 source_p->username[i++] = '~';
338
339 while (*p && i < USERLEN)
340 {
341 if(*p != '[')
342 source_p->username[i++] = *p;
343 p++;
344 }
345
346 source_p->username[i] = '\0';
347 }
348 }
349
350 if(IsNeedSasl(aconf) && !*user->suser)
351 {
352 ServerStats->is_ref++;
353 sendto_one_notice(source_p, ":*** Notice -- You need to identify via SASL to use this server");
354 exit_client(client_p, source_p, &me, "SASL access only");
355 return (CLIENT_EXITED);
356 }
357
358 /* password check */
359 if(!EmptyString(aconf->passwd))
360 {
361 const char *encr;
362
363 if(EmptyString(source_p->localClient->passwd))
364 encr = "";
365 else if(IsConfEncrypted(aconf))
366 encr = crypt(source_p->localClient->passwd, aconf->passwd);
367 else
368 encr = source_p->localClient->passwd;
369
370 if(strcmp(encr, aconf->passwd))
371 {
372 ServerStats->is_ref++;
373 sendto_one(source_p, form_str(ERR_PASSWDMISMATCH), me.name, source_p->name);
374 exit_client(client_p, source_p, &me, "Bad Password");
375 return (CLIENT_EXITED);
376 }
377
378 /* clear password only if used now, otherwise send it
379 * to services -- jilles */
380 if(source_p->localClient->passwd)
381 {
382 memset(source_p->localClient->passwd, 0, strlen(source_p->localClient->passwd));
383 MyFree(source_p->localClient->passwd);
384 source_p->localClient->passwd = NULL;
385 }
386 }
387
388 /* report if user has &^>= etc. and set flags as needed in source_p */
389 report_and_set_user_flags(source_p, aconf);
390
391 /* Limit clients */
392 /*
393 * We want to be able to have servers and F-line clients
394 * connect, so save room for "buffer" connections.
395 * Smaller servers may want to decrease this, and it should
396 * probably be just a percentage of the MAXCLIENTS...
397 * -Taner
398 */
399 /* Except "F:" clients */
400 if(dlink_list_length(&lclient_list) >=
401 (unsigned long)GlobalSetOptions.maxclients && !IsExemptLimits(source_p))
402 {
403 sendto_realops_snomask(SNO_FULL, L_ALL,
404 "Too many clients, rejecting %s[%s].", source_p->name, source_p->host);
405
406 ServerStats->is_ref++;
407 exit_client(client_p, source_p, &me, "Sorry, server is full - try later");
408 return (CLIENT_EXITED);
409 }
410
411 /* kline exemption extends to xline too */
412 if(!IsExemptKline(source_p) &&
413 (xconf = find_xline(source_p->info, 1)) != NULL)
414 {
415 ServerStats->is_ref++;
416 add_reject(source_p, xconf->name, NULL);
417 exit_client(client_p, source_p, &me, "Bad user info");
418 return CLIENT_EXITED;
419 }
420
421 /* dnsbl check */
422 if (source_p->preClient->dnsbl_listed != NULL)
423 {
424 if (IsExemptKline(source_p) || IsConfExemptDNSBL(aconf))
425 sendto_one_notice(source_p, ":*** Your IP address %s is listed in %s, but you are exempt",
426 source_p->sockhost, source_p->preClient->dnsbl_listed->host);
427 else
428 {
429 dlink_list varlist = { NULL, NULL, 0 };
430
431 substitution_append_var(&varlist, "nick", source_p->name);
432 substitution_append_var(&varlist, "ip", source_p->sockhost);
433 substitution_append_var(&varlist, "host", source_p->host);
434 substitution_append_var(&varlist, "dnsbl-host", source_p->preClient->dnsbl_listed->host);
435 substitution_append_var(&varlist, "network-name", ServerInfo.network_name);
436
437 ServerStats->is_ref++;
438
439 sendto_one(source_p, form_str(ERR_YOUREBANNEDCREEP),
440 me.name, source_p->name,
441 substitution_parse(source_p->preClient->dnsbl_listed->reject_reason, &varlist));
442
443 substitution_free(&varlist);
444
445 sendto_one_notice(source_p, ":*** Your IP address %s is listed in %s",
446 source_p->sockhost, source_p->preClient->dnsbl_listed->host);
447 source_p->preClient->dnsbl_listed->hits++;
448 add_reject(source_p, NULL, NULL);
449 exit_client(client_p, source_p, &me, "*** Banned (DNS blacklist)");
450 return CLIENT_EXITED;
451 }
452 }
453
454 /* valid user name check */
455
456 if(!valid_username(source_p->username))
457 {
458 sendto_realops_snomask(SNO_REJ, L_ALL,
459 "Invalid username: %s (%s@%s)",
460 source_p->name, source_p->username, source_p->host);
461 ServerStats->is_ref++;
462 sendto_one_notice(source_p, ":*** Your username is invalid. Please make sure that your username contains "
463 "only alphanumeric characters.");
464 ircsprintf(tmpstr2, "Invalid username [%s]", source_p->username);
465 exit_client(client_p, source_p, &me, tmpstr2);
466 return (CLIENT_EXITED);
467 }
468
469 /* end of valid user name check */
470
471 /* Store original hostname -- jilles */
472 strlcpy(source_p->orighost, source_p->host, HOSTLEN + 1);
473
474 /* Spoof user@host */
475 if(*source_p->preClient->spoofuser)
476 strlcpy(source_p->username, source_p->preClient->spoofuser, USERLEN + 1);
477 if(*source_p->preClient->spoofhost)
478 {
479 strlcpy(source_p->host, source_p->preClient->spoofhost, HOSTLEN + 1);
480 if (irccmp(source_p->host, source_p->orighost))
481 SetDynSpoof(source_p);
482 }
483
484 source_p->umodes |= ConfigFileEntry.default_umodes & ~ConfigFileEntry.oper_only_umodes & ~orphaned_umodes;
485
486 call_hook(h_new_local_user, source_p);
487
488 /* If they have died in send_* or were thrown out by the
489 * new_local_user hook don't do anything. */
490 if(IsAnyDead(source_p))
491 return CLIENT_EXITED;
492
493 /* To avoid inconsistencies, do not abort the registration
494 * starting from this point -- jilles
495 */
496 inetntop_sock((struct sockaddr *)&source_p->localClient->ip, ipaddr, sizeof(ipaddr));
497
498 sendto_realops_snomask(SNO_CCONN, L_ALL,
499 "Client connecting: %s (%s@%s) [%s] {%s} [%s]",
500 source_p->name, source_p->username, source_p->orighost,
501 show_ip(NULL, source_p) ? ipaddr : "255.255.255.255",
502 get_client_class(source_p), source_p->info);
503
504 sendto_realops_snomask(SNO_CCONNEXT, L_ALL,
505 "CLICONN %s %s %s %s %s %s 0 %s",
506 source_p->name, source_p->username, source_p->orighost,
507 show_ip(NULL, source_p) ? ipaddr : "255.255.255.255",
508 get_client_class(source_p),
509 /* mirc can sometimes send ips here */
510 show_ip(NULL, source_p) ? source_p->localClient->fullcaps : "<hidden> <hidden>",
511 source_p->info);
512
513 add_to_hostname_hash(source_p->orighost, source_p);
514
515 /* Allocate a UID if it was not previously allocated.
516 * If this already occured, it was probably during SASL auth...
517 */
518 if(!*source_p->id)
519 {
520 strcpy(source_p->id, generate_uid());
521 add_to_id_hash(source_p->id, source_p);
522 }
523
524 if (source_p->umodes & UMODE_INVISIBLE)
525 Count.invisi++;
526
527 s_assert(!IsClient(source_p));
528 del_unknown_ip(source_p);
529 dlinkMoveNode(&source_p->localClient->tnode, &unknown_list, &lclient_list);
530 SetClient(source_p);
531
532 source_p->servptr = &me;
533 dlinkAdd(source_p, &source_p->lnode, &source_p->servptr->serv->users);
534
535 /* Increment our total user count here */
536 if(++Count.total > Count.max_tot)
537 Count.max_tot = Count.total;
538
539 source_p->localClient->allow_read = MAX_FLOOD_BURST;
540
541 Count.totalrestartcount++;
542
543 s_assert(source_p->localClient != NULL);
544
545 if(dlink_list_length(&lclient_list) > (unsigned long)Count.max_loc)
546 {
547 Count.max_loc = dlink_list_length(&lclient_list);
548 if(!(Count.max_loc % 10))
549 sendto_realops_snomask(SNO_GENERAL, L_ALL,
550 "New Max Local Clients: %d", Count.max_loc);
551 }
552
553 /* they get a reduced limit */
554 if(find_tgchange(source_p->sockhost))
555 USED_TARGETS(source_p) = 6;
556
557 monitor_signon(source_p);
558 user_welcome(source_p);
559
560 free_pre_client(source_p);
561
562 return (introduce_client(client_p, source_p, user, source_p->name, 1));
563 }
564
565 /*
566 * introduce_clients
567 *
568 * inputs -
569 * output -
570 * side effects - This common function introduces a client to the rest
571 * of the net, either from a local client connect or
572 * from a remote connect.
573 */
574 int
575 introduce_client(struct Client *client_p, struct Client *source_p, struct User *user, const char *nick, int use_euid)
576 {
577 static char ubuf[12];
578 struct Client *identifyservice_p;
579 char *p;
580 hook_data_umode_changed hdata;
581 hook_data_client hdata2;
582
583 if(MyClient(source_p))
584 send_umode(source_p, source_p, 0, 0, ubuf);
585 else
586 send_umode(NULL, source_p, 0, 0, ubuf);
587
588 if(!*ubuf)
589 {
590 ubuf[0] = '+';
591 ubuf[1] = '\0';
592 }
593
594 /* if it has an ID, introduce it with its id to TS6 servers,
595 * otherwise introduce it normally to all.
596 */
597 if(has_id(source_p))
598 {
599 char sockhost[HOSTLEN];
600 if(source_p->sockhost[0] == ':')
601 {
602 sockhost[0] = '0';
603 sockhost[1] = '\0';
604 strlcat(sockhost, source_p->sockhost, sizeof(sockhost));
605 } else
606 strcpy(sockhost, source_p->sockhost);
607
608 if (use_euid)
609 sendto_server(client_p, NULL, CAP_EUID | CAP_TS6, NOCAPS,
610 ":%s EUID %s %d %ld %s %s %s %s %s %s %s :%s",
611 source_p->servptr->id, nick,
612 source_p->hopcount + 1,
613 (long) source_p->tsinfo, ubuf,
614 source_p->username, source_p->host,
615 IsIPSpoof(source_p) ? "0" : sockhost,
616 source_p->id,
617 IsDynSpoof(source_p) ? source_p->orighost : "*",
618 EmptyString(source_p->user->suser) ? "*" : source_p->user->suser,
619 source_p->info);
620
621 sendto_server(client_p, NULL, CAP_TS6, use_euid ? CAP_EUID : NOCAPS,
622 ":%s UID %s %d %ld %s %s %s %s %s :%s",
623 source_p->servptr->id, nick,
624 source_p->hopcount + 1,
625 (long) source_p->tsinfo, ubuf,
626 source_p->username, source_p->host,
627 IsIPSpoof(source_p) ? "0" : sockhost,
628 source_p->id, source_p->info);
629
630 sendto_server(client_p, NULL, NOCAPS, CAP_TS6,
631 "NICK %s %d %ld %s %s %s %s :%s",
632 nick, source_p->hopcount + 1,
633 (long) source_p->tsinfo,
634 ubuf, source_p->username, source_p->host,
635 source_p->servptr->name, source_p->info);
636 }
637 else
638 sendto_server(client_p, NULL, NOCAPS, NOCAPS,
639 "NICK %s %d %ld %s %s %s %s :%s",
640 nick, source_p->hopcount + 1,
641 (long) source_p->tsinfo,
642 ubuf, source_p->username, source_p->host,
643 source_p->servptr->name, source_p->info);
644
645 if (IsDynSpoof(source_p))
646 {
647 sendto_server(client_p, NULL, CAP_TS6, use_euid ? CAP_EUID : NOCAPS, ":%s ENCAP * REALHOST %s",
648 use_id(source_p), source_p->orighost);
649 sendto_server(client_p, NULL, NOCAPS, CAP_TS6, ":%s ENCAP * REALHOST %s",
650 source_p->name, source_p->orighost);
651 }
652 if (!EmptyString(source_p->user->suser))
653 {
654 sendto_server(client_p, NULL, CAP_TS6, use_euid ? CAP_EUID : NOCAPS, ":%s ENCAP * LOGIN %s",
655 use_id(source_p), source_p->user->suser);
656 sendto_server(client_p, NULL, NOCAPS, CAP_TS6, ":%s ENCAP * LOGIN %s",
657 source_p->name, source_p->user->suser);
658 }
659
660 if(MyConnect(source_p) && source_p->localClient->passwd)
661 {
662 if (ConfigFileEntry.identifyservice[0] != '\0' &&
663 ConfigFileEntry.identifycommand[0] != '\0')
664 {
665 /* use user@server */
666 p = strchr(ConfigFileEntry.identifyservice, '@');
667 if (p != NULL)
668 identifyservice_p = find_named_client(p + 1);
669 else
670 identifyservice_p = NULL;
671 if (identifyservice_p != NULL)
672 sendto_one(identifyservice_p, ":%s PRIVMSG %s :%s %s",
673 get_id(source_p, identifyservice_p),
674 ConfigFileEntry.identifyservice,
675 ConfigFileEntry.identifycommand,
676 source_p->localClient->passwd);
677 }
678 memset(source_p->localClient->passwd, 0, strlen(source_p->localClient->passwd));
679 MyFree(source_p->localClient->passwd);
680 source_p->localClient->passwd = NULL;
681 }
682
683 /* let modules providing usermodes know that we've got a new user,
684 * why is this here? -- well, some modules need to be able to send out new
685 * information about a client, so this was the best place to do it
686 * --nenolod
687 */
688 hdata.client = source_p;
689 hdata.oldumodes = 0;
690 hdata.oldsnomask = 0;
691 call_hook(h_umode_changed, &hdata);
692
693 /* On the other hand, some modules need to know when a client is
694 * being introduced, period.
695 * --gxti
696 */
697 hdata2.client = client_p;
698 hdata2.target = source_p;
699 call_hook(h_introduce_client, &hdata2);
700
701 return 0;
702 }
703
704 /*
705 * valid_hostname - check hostname for validity
706 *
707 * Inputs - pointer to user
708 * Output - YES if valid, NO if not
709 * Side effects - NONE
710 *
711 * NOTE: this doesn't allow a hostname to begin with a dot and
712 * will not allow more dots than chars.
713 */
714 int
715 valid_hostname(const char *hostname)
716 {
717 const char *p = hostname;
718 int found_sep = 0;
719
720 s_assert(NULL != p);
721
722 if(hostname == NULL)
723 return NO;
724
725 if('.' == *p || ':' == *p)
726 return NO;
727
728 while (*p)
729 {
730 if(!IsHostChar(*p))
731 return NO;
732 if(*p == '.' || *p == ':')
733 found_sep++;
734 p++;
735 }
736
737 if(found_sep == 0)
738 return(NO);
739
740 return (YES);
741 }
742
743 /*
744 * valid_username - check username for validity
745 *
746 * Inputs - pointer to user
747 * Output - YES if valid, NO if not
748 * Side effects - NONE
749 *
750 * Absolutely always reject any '*' '!' '?' '@' in an user name
751 * reject any odd control characters names.
752 * Allow '.' in username to allow for "first.last"
753 * style of username
754 */
755 int
756 valid_username(const char *username)
757 {
758 int dots = 0;
759 const char *p = username;
760
761 s_assert(NULL != p);
762
763 if(username == NULL)
764 return NO;
765
766 if('~' == *p)
767 ++p;
768
769 /* reject usernames that don't start with an alphanum
770 * i.e. reject jokers who have '-@somehost' or '.@somehost'
771 * or "-hi-@somehost", "h-----@somehost" would still be accepted.
772 */
773 if(!IsAlNum(*p))
774 return NO;
775
776 while (*++p)
777 {
778 if((*p == '.') && ConfigFileEntry.dots_in_ident)
779 {
780 dots++;
781 if(dots > ConfigFileEntry.dots_in_ident)
782 return NO;
783 if(!IsUserChar(p[1]))
784 return NO;
785 }
786 else if(!IsUserChar(*p))
787 return NO;
788 }
789 return YES;
790 }
791
792 /* report_and_set_user_flags
793 *
794 * Inputs - pointer to source_p
795 * - pointer to aconf for this user
796 * Output - NONE
797 * Side effects -
798 * Report to user any special flags they are getting, and set them.
799 */
800
801 static void
802 report_and_set_user_flags(struct Client *source_p, struct ConfItem *aconf)
803 {
804 /* If this user is being spoofed, tell them so */
805 if(IsConfDoSpoofIp(aconf))
806 {
807 sendto_one_notice(source_p, ":*** Spoofing your IP. congrats.");
808 }
809
810 /* If this user is in the exception class, Set it "E lined" */
811 if(IsConfExemptKline(aconf))
812 {
813 SetExemptKline(source_p);
814 sendto_one_notice(source_p, ":*** You are exempt from K/D/G/X lines. congrats.");
815 }
816
817 if(IsConfExemptGline(aconf))
818 {
819 SetExemptGline(source_p);
820
821 /* dont send both a kline and gline exempt notice */
822 if(!IsConfExemptKline(aconf))
823 sendto_one_notice(source_p, ":*** You are exempt from G lines.");
824 }
825
826 if(IsConfExemptDNSBL(aconf))
827 /* kline exempt implies this, don't send both */
828 if(!IsConfExemptKline(aconf))
829 sendto_one_notice(source_p, ":*** You are exempt from DNS blacklists.");
830
831 /* If this user is exempt from user limits set it F lined" */
832 if(IsConfExemptLimits(aconf))
833 {
834 SetExemptLimits(source_p);
835 sendto_one_notice(source_p, "*** You are exempt from user limits. congrats.");
836 }
837
838 /* If this user is exempt from idle time outs */
839 if(IsConfIdlelined(aconf))
840 {
841 SetIdlelined(source_p);
842 sendto_one_notice(source_p, ":*** You are exempt from idle limits. congrats.");
843 }
844
845 if(IsConfExemptFlood(aconf))
846 {
847 SetExemptFlood(source_p);
848 sendto_one_notice(source_p, ":*** You are exempt from flood limits.");
849 }
850
851 if(IsConfExemptSpambot(aconf))
852 {
853 SetExemptSpambot(source_p);
854 sendto_one_notice(source_p, ":*** You are exempt from spambot checks.");
855 }
856
857 if(IsConfExemptJupe(aconf))
858 {
859 SetExemptJupe(source_p);
860 sendto_one_notice(source_p, ":*** You are exempt from juped channel warnings.");
861 }
862
863 if(IsConfExemptResv(aconf))
864 {
865 SetExemptResv(source_p);
866 sendto_one_notice(source_p, ":*** You are exempt from resvs.");
867 }
868
869 if(IsConfExemptShide(aconf))
870 {
871 SetExemptShide(source_p);
872 sendto_one_notice(source_p, ":*** You are exempt from serverhiding.");
873 }
874 }
875
876 /*
877 * user_mode - set get current users mode
878 *
879 * m_umode() added 15/10/91 By Darren Reed.
880 * parv[0] - sender
881 * parv[1] - username to change mode for
882 * parv[2] - modes to change
883 */
884 int
885 user_mode(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
886 {
887 int flag;
888 int i;
889 char *m;
890 const char *pm;
891 struct Client *target_p;
892 int what, setflags;
893 int badflag = NO; /* Only send one bad flag notice */
894 int showsnomask = NO;
895 unsigned int setsnomask;
896 char buf[BUFSIZE];
897 hook_data_umode_changed hdata;
898
899 what = MODE_ADD;
900
901 if(parc < 2)
902 {
903 sendto_one(source_p, form_str(ERR_NEEDMOREPARAMS), me.name, source_p->name, "MODE");
904 return 0;
905 }
906
907 if((target_p = MyClient(source_p) ? find_named_person(parv[1]) : find_person(parv[1])) == NULL)
908 {
909 if(MyConnect(source_p))
910 sendto_one_numeric(source_p, ERR_NOSUCHCHANNEL,
911 form_str(ERR_NOSUCHCHANNEL), parv[1]);
912 return 0;
913 }
914
915 /* Dont know why these were commented out..
916 * put them back using new sendto() funcs
917 */
918
919 if(IsServer(source_p))
920 {
921 sendto_realops_snomask(SNO_GENERAL, L_ADMIN,
922 "*** Mode for User %s from %s", parv[1], source_p->name);
923 return 0;
924 }
925
926 if(source_p != target_p || target_p->from != source_p->from)
927 {
928 sendto_one(source_p, form_str(ERR_USERSDONTMATCH), me.name, source_p->name);
929 return 0;
930 }
931
932 if(parc < 3)
933 {
934 m = buf;
935 *m++ = '+';
936
937 for (i = 0; i < 128; i++) /* >= 127 is extended ascii */
938 if (source_p->umodes & user_modes[i])
939 *m++ = (char) i;
940
941 *m = '\0';
942 sendto_one_numeric(source_p, RPL_UMODEIS, form_str(RPL_UMODEIS), buf);
943
944 if (source_p->snomask != 0)
945 sendto_one_numeric(source_p, RPL_SNOMASK, form_str(RPL_SNOMASK),
946 construct_snobuf(source_p->snomask));
947
948 return 0;
949 }
950
951 /* find flags already set for user */
952 setflags = source_p->umodes;
953 setsnomask = source_p->snomask;
954
955 /*
956 * parse mode change string(s)
957 */
958 for (pm = parv[2]; *pm; pm++)
959 switch (*pm)
960 {
961 case '+':
962 what = MODE_ADD;
963 break;
964 case '-':
965 what = MODE_DEL;
966 break;
967
968 case 'o':
969 if(what == MODE_ADD)
970 {
971 if(IsServer(client_p) && !IsOper(source_p))
972 {
973 ++Count.oper;
974 SetOper(source_p);
975 dlinkAddAlloc(source_p, &oper_list);
976 }
977 }
978 else
979 {
980 /* Only decrement the oper counts if an oper to begin with
981 * found by Pat Szuta, Perly , perly@xnet.com
982 */
983
984 if(!IsOper(source_p))
985 break;
986
987 ClearOper(source_p);
988
989 Count.oper--;
990
991 if(MyConnect(source_p))
992 {
993 source_p->umodes &= ~ConfigFileEntry.oper_only_umodes;
994 if (!(source_p->umodes & UMODE_SERVNOTICE) && source_p->snomask != 0)
995 {
996 source_p->snomask = 0;
997 showsnomask = YES;
998 }
999 source_p->flags2 &= ~OPER_FLAGS;
1000
1001 MyFree(source_p->localClient->opername);
1002 source_p->localClient->opername = NULL;
1003
1004 dlinkFindDestroy(source_p, &local_oper_list);
1005 }
1006
1007 dlinkFindDestroy(source_p, &oper_list);
1008 }
1009 break;
1010
1011 /* we may not get these,
1012 * but they shouldnt be in default
1013 */
1014
1015 /* can only be set on burst */
1016 case 'S':
1017 case ' ':
1018 case '\n':
1019 case '\r':
1020 case '\t':
1021 break;
1022
1023 case 's':
1024 if (MyConnect(source_p))
1025 {
1026 if(!IsOper(source_p)
1027 && (ConfigFileEntry.oper_only_umodes & UMODE_SERVNOTICE))
1028 {
1029 if (what == MODE_ADD || source_p->umodes & UMODE_SERVNOTICE)
1030 badflag = YES;
1031 continue;
1032 }
1033 showsnomask = YES;
1034 if(what == MODE_ADD)
1035 {
1036 if (parc > 3)
1037 source_p->snomask = parse_snobuf_to_mask(source_p->snomask, parv[3]);
1038 else
1039 source_p->snomask |= SNO_GENERAL;
1040 }
1041 else
1042 source_p->snomask = 0;
1043 if (source_p->snomask != 0)
1044 source_p->umodes |= UMODE_SERVNOTICE;
1045 else
1046 source_p->umodes &= ~UMODE_SERVNOTICE;
1047 break;
1048 }
1049 /* FALLTHROUGH */
1050 default:
1051 if (MyConnect(source_p) && *pm == 'Q' && !ConfigChannel.use_forward) {
1052 badflag = YES;
1053 break;
1054 }
1055
1056 if((flag = user_modes[(unsigned char) *pm]))
1057 {
1058 if(MyConnect(source_p)
1059 && ((!IsOper(source_p)
1060 && (ConfigFileEntry.oper_only_umodes & flag))
1061 || (orphaned_umodes & flag)))
1062 {
1063 if (what == MODE_ADD || source_p->umodes & flag)
1064 badflag = YES;
1065 }
1066 else
1067 {
1068 if(what == MODE_ADD)
1069 source_p->umodes |= flag;
1070 else
1071 source_p->umodes &= ~flag;
1072 }
1073 }
1074 else
1075 {
1076 if(MyConnect(source_p))
1077 badflag = YES;
1078 }
1079 break;
1080 }
1081
1082 if(badflag)
1083 sendto_one(source_p, form_str(ERR_UMODEUNKNOWNFLAG), me.name, source_p->name);
1084
1085 if(MyClient(source_p) && (source_p->snomask & SNO_NCHANGE) && !IsOperN(source_p))
1086 {
1087 sendto_one_notice(source_p, ":*** You need oper and N flag for +s +n");
1088 source_p->snomask &= ~SNO_NCHANGE; /* only tcm's really need this */
1089 }
1090
1091 if(MyClient(source_p) && (source_p->umodes & UMODE_OPERWALL) && !IsOperOperwall(source_p))
1092 {
1093 sendto_one_notice(source_p, ":*** You need oper and operwall flag for +z");
1094 source_p->umodes &= ~UMODE_OPERWALL;
1095 }
1096
1097 if(MyConnect(source_p) && (source_p->umodes & UMODE_ADMIN) &&
1098 (!IsOperAdmin(source_p) || IsOperHiddenAdmin(source_p)))
1099 {
1100 sendto_one_notice(source_p, ":*** You need oper and A flag for +a");
1101 source_p->umodes &= ~UMODE_ADMIN;
1102 }
1103
1104 /* let modules providing usermodes know that we've changed our usermode --nenolod */
1105 hdata.client = source_p;
1106 hdata.oldumodes = setflags;
1107 hdata.oldsnomask = setsnomask;
1108 call_hook(h_umode_changed, &hdata);
1109
1110 if(!(setflags & UMODE_INVISIBLE) && IsInvisible(source_p))
1111 ++Count.invisi;
1112 if((setflags & UMODE_INVISIBLE) && !IsInvisible(source_p))
1113 --Count.invisi;
1114 /*
1115 * compare new flags with old flags and send string which
1116 * will cause servers to update correctly.
1117 */
1118 send_umode_out(client_p, source_p, setflags);
1119 if (showsnomask && MyConnect(source_p))
1120 sendto_one_numeric(source_p, RPL_SNOMASK, form_str(RPL_SNOMASK),
1121 construct_snobuf(source_p->snomask));
1122
1123 return (0);
1124 }
1125
1126 /*
1127 * send the MODE string for user (user) to connection client_p
1128 * -avalon
1129 */
1130 void
1131 send_umode(struct Client *client_p, struct Client *source_p, int old, int sendmask, char *umode_buf)
1132 {
1133 int i;
1134 int flag;
1135 char *m;
1136 int what = 0;
1137
1138 /*
1139 * build a string in umode_buf to represent the change in the user's
1140 * mode between the new (source_p->flag) and 'old'.
1141 */
1142 m = umode_buf;
1143 *m = '\0';
1144
1145 for (i = 0; i < 128; i++)
1146 {
1147 flag = user_modes[i];
1148
1149 if((flag & old) && !(source_p->umodes & flag))
1150 {
1151 if(what == MODE_DEL)
1152 *m++ = (char) i;
1153 else
1154 {
1155 what = MODE_DEL;
1156 *m++ = '-';
1157 *m++ = (char) i;
1158 }
1159 }
1160 else if(!(flag & old) && (source_p->umodes & flag))
1161 {
1162 if(what == MODE_ADD)
1163 *m++ = (char) i;
1164 else
1165 {
1166 what = MODE_ADD;
1167 *m++ = '+';
1168 *m++ = (char) i;
1169 }
1170 }
1171 }
1172 *m = '\0';
1173
1174 if(*umode_buf && client_p)
1175 sendto_one(client_p, ":%s MODE %s :%s", source_p->name, source_p->name, umode_buf);
1176 }
1177
1178 /*
1179 * send_umode_out
1180 *
1181 * inputs -
1182 * output - NONE
1183 * side effects -
1184 */
1185 void
1186 send_umode_out(struct Client *client_p, struct Client *source_p, int old)
1187 {
1188 struct Client *target_p;
1189 char buf[BUFSIZE];
1190 dlink_node *ptr;
1191
1192 send_umode(NULL, source_p, old, 0, buf);
1193
1194 DLINK_FOREACH(ptr, serv_list.head)
1195 {
1196 target_p = ptr->data;
1197
1198 if((target_p != client_p) && (target_p != source_p) && (*buf))
1199 {
1200 sendto_one(target_p, ":%s MODE %s :%s",
1201 get_id(source_p, target_p),
1202 get_id(source_p, target_p), buf);
1203 }
1204 }
1205
1206 if(client_p && MyClient(client_p))
1207 send_umode(client_p, source_p, old, 0, buf);
1208 }
1209
1210 /*
1211 * user_welcome
1212 *
1213 * inputs - client pointer to client to welcome
1214 * output - NONE
1215 * side effects -
1216 */
1217 void
1218 user_welcome(struct Client *source_p)
1219 {
1220 sendto_one_numeric(source_p, RPL_WELCOME, form_str(RPL_WELCOME), ServerInfo.network_name, source_p->name);
1221 sendto_one_numeric(source_p, RPL_YOURHOST, form_str(RPL_YOURHOST),
1222 get_listener_name(source_p->localClient->listener), ircd_version);
1223 sendto_one_numeric(source_p, RPL_CREATED, form_str(RPL_CREATED), creation);
1224 sendto_one_numeric(source_p, RPL_MYINFO, form_str(RPL_MYINFO), me.name, ircd_version, umodebuf);
1225
1226 show_isupport(source_p);
1227
1228 show_lusers(source_p);
1229
1230 if(ConfigFileEntry.short_motd)
1231 {
1232 sendto_one_notice(source_p, ":*** Notice -- motd was last changed at %s", user_motd_changed);
1233 sendto_one_notice(source_p, ":*** Notice -- Please read the motd if you haven't read it");
1234
1235 sendto_one(source_p, form_str(RPL_MOTDSTART),
1236 me.name, source_p->name, me.name);
1237
1238 sendto_one(source_p, form_str(RPL_MOTD),
1239 me.name, source_p->name, "*** This is the short motd ***");
1240
1241 sendto_one(source_p, form_str(RPL_ENDOFMOTD), me.name, source_p->name);
1242 }
1243 else
1244 send_user_motd(source_p);
1245 }
1246
1247 /* oper_up()
1248 *
1249 * inputs - pointer to given client to oper
1250 * - pointer to ConfItem to use
1251 * output - none
1252 * side effects - opers up source_p using aconf for reference
1253 */
1254 int
1255 oper_up(struct Client *source_p, struct oper_conf *oper_p)
1256 {
1257 unsigned int old = source_p->umodes, oldsnomask = source_p->snomask;
1258 hook_data_umode_changed hdata;
1259
1260 SetOper(source_p);
1261
1262 if(oper_p->umodes)
1263 source_p->umodes |= oper_p->umodes;
1264 else if(ConfigFileEntry.oper_umodes)
1265 source_p->umodes |= ConfigFileEntry.oper_umodes;
1266 else
1267 source_p->umodes |= DEFAULT_OPER_UMODES;
1268
1269 if (oper_p->snomask)
1270 {
1271 source_p->snomask |= oper_p->snomask;
1272 source_p->umodes |= UMODE_SERVNOTICE;
1273 }
1274 else if (source_p->umodes & UMODE_SERVNOTICE)
1275 {
1276 /* Only apply these if +s is already set -- jilles */
1277 if (ConfigFileEntry.oper_snomask)
1278 source_p->snomask |= ConfigFileEntry.oper_snomask;
1279 else
1280 source_p->snomask |= DEFAULT_OPER_SNOMASK;
1281 }
1282
1283 Count.oper++;
1284
1285 SetExemptKline(source_p);
1286
1287 source_p->flags2 |= oper_p->flags;
1288 DupString(source_p->localClient->opername, oper_p->name);
1289
1290 dlinkAddAlloc(source_p, &local_oper_list);
1291 dlinkAddAlloc(source_p, &oper_list);
1292
1293 if(IsOperAdmin(source_p) && !IsOperHiddenAdmin(source_p))
1294 source_p->umodes |= UMODE_ADMIN;
1295 if(!IsOperN(source_p))
1296 source_p->snomask &= ~SNO_NCHANGE;
1297 if(!IsOperOperwall(source_p))
1298 source_p->umodes &= ~UMODE_OPERWALL;
1299 hdata.client = source_p;
1300 hdata.oldumodes = old;
1301 hdata.oldsnomask = oldsnomask;
1302 call_hook(h_umode_changed, &hdata);
1303
1304 sendto_realops_snomask(SNO_GENERAL, L_ALL,
1305 "%s (%s@%s) is now an operator", source_p->name,
1306 source_p->username, source_p->host);
1307 if(!(old & UMODE_INVISIBLE) && IsInvisible(source_p))
1308 ++Count.invisi;
1309 if((old & UMODE_INVISIBLE) && !IsInvisible(source_p))
1310 --Count.invisi;
1311 send_umode_out(source_p, source_p, old);
1312 sendto_one_numeric(source_p, RPL_SNOMASK, form_str(RPL_SNOMASK),
1313 construct_snobuf(source_p->snomask));
1314 sendto_one(source_p, form_str(RPL_YOUREOPER), me.name, source_p->name);
1315 sendto_one_notice(source_p, ":*** Oper privs are %s", get_oper_privs(oper_p->flags));
1316 send_oper_motd(source_p);
1317
1318 return (1);
1319 }
1320
1321 /*
1322 * find_umode_slot
1323 *
1324 * inputs - NONE
1325 * outputs - an available umode bitmask or
1326 * 0 if no umodes are available
1327 * side effects - NONE
1328 */
1329 unsigned int
1330 find_umode_slot(void)
1331 {
1332 unsigned int all_umodes = 0, my_umode = 0, i;
1333
1334 for (i = 0; i < 128; i++)
1335 all_umodes |= user_modes[i];
1336
1337 for (my_umode = 1; my_umode && (all_umodes & my_umode);
1338 my_umode <<= 1);
1339
1340 return my_umode;
1341 }
1342
1343 void
1344 construct_umodebuf(void)
1345 {
1346 int i;
1347 char *ptr = umodebuf;
1348 static int prev_user_modes[128];
1349
1350 *ptr = '\0';
1351
1352 for (i = 0; i < 128; i++)
1353 {
1354 if (prev_user_modes[i] != 0 && prev_user_modes[i] != user_modes[i])
1355 {
1356 if (user_modes[i] == 0)
1357 {
1358 orphaned_umodes |= prev_user_modes[i];
1359 sendto_realops_snomask(SNO_DEBUG, L_ALL, "Umode +%c is now orphaned", i);
1360 }
1361 else
1362 {
1363 orphaned_umodes &= ~prev_user_modes[i];
1364 sendto_realops_snomask(SNO_DEBUG, L_ALL, "Orphaned umode +%c is picked up by module", i);
1365 }
1366 user_modes[i] = prev_user_modes[i];
1367 }
1368 else
1369 prev_user_modes[i] = user_modes[i];
1370 if (user_modes[i])
1371 *ptr++ = (char) i;
1372 }
1373
1374 *ptr++ = '\0';
1375 }
1376
1377 void
1378 change_nick_user_host(struct Client *target_p, const char *nick, const char *user,
1379 const char *host, int newts, char *format, ...)
1380 {
1381 dlink_node *ptr;
1382 struct Channel *chptr;
1383 struct membership *mscptr;
1384 int changed = irccmp(target_p->name, nick);
1385 int changed_case = strcmp(target_p->name, nick);
1386 int do_qjm = irccmp(target_p->username, user) || irccmp(target_p->host, host);
1387 char mode[10], modeval[NICKLEN * 2 + 2], reason[256], *mptr;
1388 va_list ap;
1389
1390 modeval[0] = '\0';
1391
1392 if(changed)
1393 {
1394 target_p->tsinfo = newts;
1395 monitor_signoff(target_p);
1396 }
1397 invalidate_bancache_user(target_p);
1398
1399 if(do_qjm)
1400 {
1401 va_start(ap, format);
1402 vsnprintf(reason, 255, format, ap);
1403 va_end(ap);
1404
1405 sendto_common_channels_local_butone(target_p, ":%s!%s@%s QUIT :%s",
1406 target_p->name, target_p->username, target_p->host,
1407 reason);
1408
1409 DLINK_FOREACH(ptr, target_p->user->channel.head)
1410 {
1411 mscptr = ptr->data;
1412 chptr = mscptr->chptr;
1413 mptr = mode;
1414
1415 if(is_chanop(mscptr))
1416 {
1417 *mptr++ = 'o';
1418 strcat(modeval, nick);
1419 strcat(modeval, " ");
1420 }
1421
1422 if(is_voiced(mscptr))
1423 {
1424 *mptr++ = 'v';
1425 strcat(modeval, nick);
1426 }
1427
1428 *mptr = '\0';
1429
1430 sendto_channel_local_butone(target_p, ALL_MEMBERS, chptr, ":%s!%s@%s JOIN :%s",
1431 nick, user, host, chptr->chname);
1432 if(*mode)
1433 sendto_channel_local_butone(target_p, ALL_MEMBERS, chptr,
1434 ":%s MODE %s +%s %s",
1435 target_p->servptr->name,
1436 chptr->chname, mode, modeval);
1437
1438 *modeval = '\0';
1439 }
1440
1441 if(MyClient(target_p) && changed_case)
1442 sendto_one(target_p, ":%s!%s@%s NICK %s",
1443 target_p->name, target_p->username, target_p->host, nick);
1444 }
1445 else if(changed_case)
1446 {
1447 sendto_common_channels_local(target_p, ":%s!%s@%s NICK :%s",
1448 target_p->name, target_p->username,
1449 target_p->host, nick);
1450 }
1451
1452 strlcpy(target_p->username, user, sizeof target_p->username);
1453 strlcpy(target_p->host, host, sizeof target_p->host);
1454
1455 if (changed)
1456 add_history(target_p, 1);
1457
1458 del_from_client_hash(target_p->name, target_p);
1459 strlcpy(target_p->name, nick, NICKLEN);
1460 add_to_client_hash(target_p->name, target_p);
1461
1462 if(changed)
1463 {
1464 monitor_signon(target_p);
1465 del_all_accepts(target_p);
1466 }
1467 }