/[svn]/ircd-hybrid/branches/8.1.x/src/s_user.c
ViewVC logotype

Contents of /ircd-hybrid/branches/8.1.x/src/s_user.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 2024 - (show annotations)
Sun May 12 18:54:03 2013 UTC (7 years, 3 months ago) by michael
File MIME type: text/x-chdr
File size: 39761 byte(s)
- m_svsmode(), set_user_mode(): \n, \r, \t aren't treaded specially anymore

1 /*
2 * ircd-hybrid: an advanced Internet Relay Chat Daemon(ircd).
3 * s_user.c: User related functions.
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 * $Id$
23 */
24
25 #include "stdinc.h"
26 #include "list.h"
27 #include "s_user.h"
28 #include "s_misc.h"
29 #include "channel.h"
30 #include "channel_mode.h"
31 #include "client.h"
32 #include "fdlist.h"
33 #include "hash.h"
34 #include "irc_string.h"
35 #include "s_bsd.h"
36 #include "ircd.h"
37 #include "listener.h"
38 #include "motd.h"
39 #include "numeric.h"
40 #include "conf.h"
41 #include "log.h"
42 #include "s_serv.h"
43 #include "send.h"
44 #include "supported.h"
45 #include "whowas.h"
46 #include "memory.h"
47 #include "packet.h"
48 #include "rng_mt.h"
49 #include "userhost.h"
50 #include "hook.h"
51 #include "s_misc.h"
52 #include "parse.h"
53 #include "watch.h"
54
55
56 static char umode_buffer[IRCD_BUFSIZE];
57
58 static void user_welcome(struct Client *);
59 static void report_and_set_user_flags(struct Client *, const struct MaskItem *);
60 static int check_xline(struct Client *);
61 static void introduce_client(struct Client *);
62 static const char *uid_get(void);
63
64 /* Used for building up the isupport string,
65 * used with init_isupport, add_isupport, delete_isupport
66 */
67
68 struct Isupport
69 {
70 dlink_node node;
71 char *name;
72 char *options;
73 int number;
74 };
75
76 static dlink_list support_list = { NULL, NULL, 0 };
77 MessageFile *isupportFile;
78
79 /* memory is cheap. map 0-255 to equivalent mode */
80 const unsigned int user_modes[256] =
81 {
82 /* 0x00 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0x0F */
83 /* 0x10 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0x1F */
84 /* 0x20 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0x2F */
85 /* 0x30 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0x3F */
86 0, /* @ */
87 0, /* A */
88 0, /* B */
89 UMODE_CCONN_FULL, /* C */
90 UMODE_DEAF, /* D */
91 0, /* E */
92 UMODE_FARCONNECT, /* F */
93 UMODE_SOFTCALLERID, /* G */
94 UMODE_HIDDEN, /* H */
95 0, /* I */
96 0, /* J */
97 0, /* K */
98 0, /* L */
99 0, /* M */
100 0, /* N */
101 0, /* O */
102 0, /* P */
103 0, /* Q */
104 UMODE_REGONLY, /* R */
105 0, /* S */
106 0, /* T */
107 0, /* U */
108 0, /* V */
109 0, /* W */
110 0, /* X */
111 0, /* Y */
112 0, /* Z 0x5A */
113 0, 0, 0, 0, 0, /* 0x5F */
114 0, /* 0x60 */
115 UMODE_ADMIN, /* a */
116 UMODE_BOTS, /* b */
117 UMODE_CCONN, /* c */
118 UMODE_DEBUG, /* d */
119 UMODE_EXTERNAL, /* e */
120 UMODE_FULL, /* f */
121 UMODE_CALLERID, /* g */
122 0, /* h */
123 UMODE_INVISIBLE, /* i */
124 UMODE_REJ, /* j */
125 UMODE_SKILL, /* k */
126 UMODE_LOCOPS, /* l */
127 0, /* m */
128 UMODE_NCHANGE, /* n */
129 UMODE_OPER, /* o */
130 0, /* p */
131 0, /* q */
132 UMODE_REGISTERED, /* r */
133 UMODE_SERVNOTICE, /* s */
134 0, /* t */
135 UMODE_UNAUTH, /* u */
136 0, /* v */
137 UMODE_WALLOP, /* w */
138 0, /* x */
139 UMODE_SPY, /* y */
140 UMODE_OPERWALL, /* z 0x7A */
141 0,0,0,0,0, /* 0x7B - 0x7F */
142
143 /* 0x80 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0x8F */
144 /* 0x90 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0x9F */
145 /* 0xA0 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0xAF */
146 /* 0xB0 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0xBF */
147 /* 0xC0 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0xCF */
148 /* 0xD0 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0xDF */
149 /* 0xE0 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0xEF */
150 /* 0xF0 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 /* 0xFF */
151 };
152
153 void
154 assemble_umode_buffer(void)
155 {
156 unsigned int idx = 0;
157 char *umode_buffer_ptr = umode_buffer;
158
159 for (; idx < (sizeof(user_modes) / sizeof(user_modes[0])); ++idx)
160 if (user_modes[idx])
161 *umode_buffer_ptr++ = idx;
162
163 *umode_buffer_ptr = '\0';
164 }
165
166 /* show_lusers()
167 *
168 * inputs - pointer to client
169 * output - NONE
170 * side effects - display to client user counts etc.
171 */
172 void
173 show_lusers(struct Client *source_p)
174 {
175 const char *from, *to;
176
177 if (!MyConnect(source_p) && IsCapable(source_p->from, CAP_TS6) && HasID(source_p))
178 {
179 from = me.id;
180 to = source_p->id;
181 }
182 else
183 {
184 from = me.name;
185 to = source_p->name;
186 }
187
188 if (!ConfigServerHide.hide_servers || HasUMode(source_p, UMODE_OPER))
189 sendto_one(source_p, form_str(RPL_LUSERCLIENT),
190 from, to, (Count.total-Count.invisi),
191 Count.invisi, dlink_list_length(&global_serv_list));
192 else
193 sendto_one(source_p, form_str(RPL_LUSERCLIENT), from, to,
194 (Count.total-Count.invisi), Count.invisi, 1);
195
196 if (Count.oper > 0)
197 sendto_one(source_p, form_str(RPL_LUSEROP),
198 from, to, Count.oper);
199
200 if (dlink_list_length(&unknown_list) > 0)
201 sendto_one(source_p, form_str(RPL_LUSERUNKNOWN),
202 from, to, dlink_list_length(&unknown_list));
203
204 if (dlink_list_length(&global_channel_list) > 0)
205 sendto_one(source_p, form_str(RPL_LUSERCHANNELS),
206 from, to, dlink_list_length(&global_channel_list));
207
208 if (!ConfigServerHide.hide_servers || HasUMode(source_p, UMODE_OPER))
209 {
210 sendto_one(source_p, form_str(RPL_LUSERME),
211 from, to, Count.local, Count.myserver);
212 sendto_one(source_p, form_str(RPL_LOCALUSERS),
213 from, to, Count.local, Count.max_loc);
214 }
215 else
216 {
217 sendto_one(source_p, form_str(RPL_LUSERME),
218 from, to, Count.total, 0);
219 sendto_one(source_p, form_str(RPL_LOCALUSERS),
220 from, to, Count.total, Count.max_tot);
221 }
222
223 sendto_one(source_p, form_str(RPL_GLOBALUSERS),
224 from, to, Count.total, Count.max_tot);
225
226 if (!ConfigServerHide.hide_servers || HasUMode(source_p, UMODE_OPER))
227 sendto_one(source_p, form_str(RPL_STATSCONN), from, to,
228 Count.max_loc_con, Count.max_loc_cli, Count.totalrestartcount);
229
230 if (Count.local > Count.max_loc_cli)
231 Count.max_loc_cli = Count.local;
232
233 if ((Count.local + Count.myserver) > Count.max_loc_con)
234 Count.max_loc_con = Count.local + Count.myserver;
235 }
236
237 /* show_isupport()
238 *
239 * inputs - pointer to client
240 * output - NONE
241 * side effects - display to client what we support (for them)
242 */
243 void
244 show_isupport(struct Client *source_p)
245 {
246 send_message_file(source_p, isupportFile);
247 }
248
249 /*
250 ** register_local_user
251 ** This function is called when both NICK and USER messages
252 ** have been accepted for the client, in whatever order. Only
253 ** after this, is the USER message propagated.
254 **
255 ** NICK's must be propagated at once when received, although
256 ** it would be better to delay them too until full info is
257 ** available. Doing it is not so simple though, would have
258 ** to implement the following:
259 **
260 ** (actually it has been implemented already for a while) -orabidoo
261 **
262 ** 1) user telnets in and gives only "NICK foobar" and waits
263 ** 2) another user far away logs in normally with the nick
264 ** "foobar" (quite legal, as this server didn't propagate
265 ** it).
266 ** 3) now this server gets nick "foobar" from outside, but
267 ** has alread the same defined locally. Current server
268 ** would just issue "KILL foobar" to clean out dups. But,
269 ** this is not fair. It should actually request another
270 ** nick from local user or kill him/her...
271 */
272 void
273 register_local_user(struct Client *source_p)
274 {
275 const char *id = NULL;
276 const struct MaskItem *conf = NULL;
277
278 assert(source_p != NULL);
279 assert(source_p == source_p->from);
280 assert(MyConnect(source_p));
281 assert(!source_p->localClient->registration);
282
283 ClearCap(source_p, CAP_TS6);
284
285 if (ConfigFileEntry.ping_cookie)
286 {
287 if (!IsPingSent(source_p) && source_p->localClient->random_ping == 0)
288 {
289 do
290 source_p->localClient->random_ping = genrand_int32();
291 while (!source_p->localClient->random_ping);
292
293 sendto_one(source_p, "PING :%u",
294 source_p->localClient->random_ping);
295 SetPingSent(source_p);
296 return;
297 }
298
299 if (!HasPingCookie(source_p))
300 return;
301 }
302
303 source_p->localClient->last_privmsg = CurrentTime;
304 /* Straight up the maximum rate of flooding... */
305 source_p->localClient->allow_read = MAX_FLOOD_BURST;
306
307 if (!check_client(source_p))
308 return;
309
310 if (valid_hostname(source_p->host) == 0)
311 {
312 sendto_one(source_p, ":%s NOTICE %s :*** Notice -- You have an illegal "
313 "character in your hostname", me.name, source_p->name);
314 strlcpy(source_p->host, source_p->sockhost,
315 sizeof(source_p->host));
316 }
317
318 conf = source_p->localClient->confs.head->data;
319
320 if (!IsGotId(source_p))
321 {
322 char username[USERLEN + 1];
323 const char *p = username;
324 unsigned int i = 0;
325
326 if (IsNeedIdentd(conf))
327 {
328 ++ServerStats.is_ref;
329 sendto_one(source_p, ":%s NOTICE %s :*** Notice -- You need to install "
330 "identd to use this server", me.name, source_p->name);
331 exit_client(source_p, &me, "Install identd");
332 return;
333 }
334
335 strlcpy(username, source_p->username, sizeof(username));
336
337 if (!IsNoTilde(conf))
338 source_p->username[i++] = '~';
339
340 for (; *p && i < USERLEN; ++p)
341 if (*p != '[')
342 source_p->username[i++] = *p;
343
344 source_p->username[i] = '\0';
345 }
346
347 /* password check */
348 if (!EmptyString(conf->passwd))
349 {
350 const char *pass = source_p->localClient->passwd;
351
352 if (!match_conf_password(pass, conf))
353 {
354 ++ServerStats.is_ref;
355 sendto_one(source_p, form_str(ERR_PASSWDMISMATCH),
356 me.name, source_p->name);
357 exit_client(source_p, &me, "Bad Password");
358 return;
359 }
360 }
361
362 /* don't free source_p->localClient->passwd here - it can be required
363 * by masked /stats I if there are auth{} blocks with need_password = no;
364 * --adx
365 */
366
367 /* report if user has &^>= etc. and set flags as needed in source_p */
368 report_and_set_user_flags(source_p, conf);
369
370 if (IsDead(source_p))
371 return;
372
373 /* Limit clients -
374 * We want to be able to have servers and F-line clients
375 * connect, so save room for "buffer" connections.
376 * Smaller servers may want to decrease this, and it should
377 * probably be just a percentage of the MAXCLIENTS...
378 * -Taner
379 */
380 /* Except "F:" clients */
381 if ((Count.local >= ServerInfo.max_clients + MAX_BUFFER) ||
382 (Count.local >= ServerInfo.max_clients && !IsExemptLimits(source_p)))
383 {
384 sendto_realops_flags(UMODE_FULL, L_ALL, SEND_NOTICE,
385 "Too many clients, rejecting %s[%s].",
386 source_p->name, source_p->host);
387 ++ServerStats.is_ref;
388 exit_client(source_p, &me, "Sorry, server is full - try later");
389 return;
390 }
391
392 /* valid user name check */
393 if (valid_username(source_p->username) == 0)
394 {
395 char tmpstr2[IRCD_BUFSIZE];
396
397 sendto_realops_flags(UMODE_REJ, L_ALL, SEND_NOTICE,
398 "Invalid username: %s (%s@%s)",
399 source_p->name, source_p->username, source_p->host);
400 ++ServerStats.is_ref;
401 snprintf(tmpstr2, sizeof(tmpstr2), "Invalid username [%s]",
402 source_p->username);
403 exit_client(source_p, &me, tmpstr2);
404 return;
405 }
406
407 if (check_xline(source_p))
408 return;
409
410 while (hash_find_id((id = uid_get())) != NULL)
411 ;
412
413 strlcpy(source_p->id, id, sizeof(source_p->id));
414 hash_add_id(source_p);
415
416 sendto_realops_flags(UMODE_CCONN, L_ALL, SEND_NOTICE,
417 "Client connecting: %s (%s@%s) [%s] {%s} [%s] <%s>",
418 source_p->name, source_p->username, source_p->host,
419 ConfigFileEntry.hide_spoof_ips && IsIPSpoof(source_p) ?
420 "255.255.255.255" : source_p->sockhost,
421 get_client_class(&source_p->localClient->confs),
422 source_p->info, source_p->id);
423
424 sendto_realops_flags(UMODE_CCONN_FULL, L_ALL, SEND_NOTICE,
425 "CLICONN %s %s %s %s %s %s %s 0 %s",
426 source_p->name, source_p->username, source_p->host,
427 ConfigFileEntry.hide_spoof_ips && IsIPSpoof(source_p) ?
428 "255.255.255.255" : source_p->sockhost,
429 get_client_class(&source_p->localClient->confs),
430 ConfigFileEntry.hide_spoof_ips && IsIPSpoof(source_p) ?
431 "<hidden>" : source_p->localClient->client_host,
432 ConfigFileEntry.hide_spoof_ips && IsIPSpoof(source_p) ?
433 "<hidden>" : source_p->localClient->client_server,
434 source_p->info);
435
436
437 if (ConfigFileEntry.invisible_on_connect)
438 {
439 AddUMode(source_p, UMODE_INVISIBLE);
440 ++Count.invisi;
441 }
442
443 if ((++Count.local) > Count.max_loc)
444 {
445 Count.max_loc = Count.local;
446
447 if (!(Count.max_loc % 10))
448 sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
449 "New Max Local Clients: %d",
450 Count.max_loc);
451 }
452
453 /* Increment our total user count here */
454 if (++Count.total > Count.max_tot)
455 Count.max_tot = Count.total;
456 ++Count.totalrestartcount;
457
458 assert(source_p->servptr == &me);
459 SetClient(source_p);
460 dlinkAdd(source_p, &source_p->lnode, &source_p->servptr->serv->client_list);
461
462 source_p->localClient->allow_read = MAX_FLOOD_BURST;
463
464 assert(dlinkFind(&unknown_list, source_p));
465
466 dlink_move_node(&source_p->localClient->lclient_node,
467 &unknown_list, &local_client_list);
468
469 user_welcome(source_p);
470 add_user_host(source_p->username, source_p->host, 0);
471 SetUserHost(source_p);
472
473 introduce_client(source_p);
474 }
475
476 /* register_remote_user()
477 *
478 * inputs - source_p remote or directly connected client
479 * - username to register as
480 * - host name to register as
481 * - server name
482 * - realname (gecos)
483 * output - NONE
484 * side effects - This function is called when a remote client
485 * is introduced by a server.
486 */
487 void
488 register_remote_user(struct Client *source_p,
489 const char *username, const char *host, const char *server,
490 const char *realname)
491 {
492 struct Client *target_p = NULL;
493
494 assert(source_p != NULL);
495 assert(source_p->username != username);
496
497 strlcpy(source_p->host, host, sizeof(source_p->host));
498 strlcpy(source_p->username, username, sizeof(source_p->username));
499
500 /*
501 * coming from another server, take the servers word for it
502 */
503 source_p->servptr = hash_find_server(server);
504
505 /*
506 * Super GhostDetect:
507 * If we can't find the server the user is supposed to be on,
508 * then simply blow the user away. -Taner
509 */
510 if (source_p->servptr == NULL)
511 {
512 sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
513 "No server %s for user %s[%s@%s] from %s",
514 server, source_p->name, source_p->username,
515 source_p->host, source_p->from->name);
516 kill_client(source_p->from, source_p, "%s (Server doesn't exist)", me.name);
517
518 AddFlag(source_p, FLAGS_KILLED);
519 exit_client(source_p, &me, "Ghosted Client");
520 return;
521 }
522
523 if ((target_p = source_p->servptr) && target_p->from != source_p->from)
524 {
525 sendto_realops_flags(UMODE_DEBUG, L_ALL, SEND_NOTICE,
526 "Bad User [%s] :%s USER %s@%s %s, != %s[%s]",
527 source_p->from->name, source_p->name, source_p->username,
528 source_p->host, source_p->servptr->name,
529 target_p->name, target_p->from->name);
530 kill_client(source_p->from, source_p,
531 "%s (NICK from wrong direction (%s != %s))",
532 me.name, source_p->servptr->name, target_p->from->name);
533 AddFlag(source_p, FLAGS_KILLED);
534 exit_client(source_p, &me, "USER server wrong direction");
535 return;
536 }
537
538 /*
539 * If the nick has been introduced by a services server,
540 * make it a service as well.
541 */
542 if (HasFlag(source_p->servptr, FLAGS_SERVICE))
543 AddFlag(source_p, FLAGS_SERVICE);
544
545 /* Increment our total user count here */
546 if (++Count.total > Count.max_tot)
547 Count.max_tot = Count.total;
548
549 SetClient(source_p);
550 dlinkAdd(source_p, &source_p->lnode, &source_p->servptr->serv->client_list);
551 add_user_host(source_p->username, source_p->host, 1);
552 SetUserHost(source_p);
553
554 if (HasFlag(source_p->servptr, FLAGS_EOB))
555 sendto_realops_flags(UMODE_FARCONNECT, L_ALL, SEND_NOTICE,
556 "Client connecting at %s: %s (%s@%s) [%s] <%s>",
557 source_p->servptr->name,
558 source_p->name, source_p->username, source_p->host,
559 source_p->info, source_p->id);
560
561 introduce_client(source_p);
562 }
563
564 /* introduce_client()
565 *
566 * inputs - source_p
567 * output - NONE
568 * side effects - This common function introduces a client to the rest
569 * of the net, either from a local client connect or
570 * from a remote connect.
571 */
572 static void
573 introduce_client(struct Client *source_p)
574 {
575 dlink_node *server_node = NULL;
576 static char ubuf[12];
577
578 if (MyClient(source_p))
579 send_umode(source_p, source_p, 0, SEND_UMODES, ubuf);
580 else
581 send_umode(NULL, source_p, 0, SEND_UMODES, ubuf);
582
583 watch_check_hash(source_p, RPL_LOGON);
584
585 if (*ubuf == '\0')
586 {
587 ubuf[0] = '+';
588 ubuf[1] = '\0';
589 }
590
591 DLINK_FOREACH(server_node, serv_list.head)
592 {
593 struct Client *server = server_node->data;
594
595 if (server == source_p->from)
596 continue;
597
598 if (IsCapable(server, CAP_SVS))
599 {
600 if (IsCapable(server, CAP_TS6) && HasID(source_p))
601 sendto_one(server, ":%s UID %s %d %lu %s %s %s %s %s %s :%s",
602 source_p->servptr->id,
603 source_p->name, source_p->hopcount+1,
604 (unsigned long)source_p->tsinfo,
605 ubuf, source_p->username, source_p->host,
606 (MyClient(source_p) && IsIPSpoof(source_p)) ?
607 "0" : source_p->sockhost, source_p->id,
608 source_p->svid,
609 source_p->info);
610 else
611 sendto_one(server, "NICK %s %d %lu %s %s %s %s %s :%s",
612 source_p->name, source_p->hopcount+1,
613 (unsigned long)source_p->tsinfo,
614 ubuf, source_p->username, source_p->host,
615 source_p->servptr->name, source_p->svid,
616 source_p->info);
617
618 }
619 else
620 {
621 if (IsCapable(server, CAP_TS6) && HasID(source_p))
622 sendto_one(server, ":%s UID %s %d %lu %s %s %s %s %s :%s",
623 source_p->servptr->id,
624 source_p->name, source_p->hopcount+1,
625 (unsigned long)source_p->tsinfo,
626 ubuf, source_p->username, source_p->host,
627 (MyClient(source_p) && IsIPSpoof(source_p)) ?
628 "0" : source_p->sockhost, source_p->id, source_p->info);
629 else
630 sendto_one(server, "NICK %s %d %lu %s %s %s %s :%s",
631 source_p->name, source_p->hopcount+1,
632 (unsigned long)source_p->tsinfo,
633 ubuf, source_p->username, source_p->host,
634 source_p->servptr->name, source_p->info);
635 }
636 }
637 }
638
639 /* valid_hostname()
640 *
641 * Inputs - pointer to hostname
642 * Output - 1 if valid, 0 if not
643 * Side effects - check hostname for validity
644 *
645 * NOTE: this doesn't allow a hostname to begin with a dot and
646 * will not allow more dots than chars.
647 */
648 int
649 valid_hostname(const char *hostname)
650 {
651 const char *p = hostname;
652
653 assert(p != NULL);
654
655 if (*p == '.' || *p == ':')
656 return 0;
657
658 for (; *p; ++p)
659 if (!IsHostChar(*p))
660 return 0;
661
662 return p - hostname <= HOSTLEN;
663 }
664
665 /* valid_username()
666 *
667 * Inputs - pointer to user
668 * Output - 1 if valid, 0 if not
669 * Side effects - check username for validity
670 *
671 * Absolutely always reject any '*' '!' '?' '@' in an user name
672 * reject any odd control characters names.
673 * Allow '.' in username to allow for "first.last"
674 * style of username
675 */
676 int
677 valid_username(const char *username)
678 {
679 int dots = 0;
680 const char *p = username;
681
682 assert(p != NULL);
683
684 if (*p == '~')
685 ++p;
686
687 /* reject usernames that don't start with an alphanum
688 * i.e. reject jokers who have '-@somehost' or '.@somehost'
689 * or "-hi-@somehost", "h-----@somehost" would still be accepted.
690 */
691 if (!IsAlNum(*p))
692 return 0;
693
694 while (*++p)
695 {
696 if ((*p == '.') && ConfigFileEntry.dots_in_ident)
697 {
698 if (++dots > ConfigFileEntry.dots_in_ident)
699 return 0;
700 if (!IsUserChar(*(p + 1)))
701 return 0;
702 }
703 else if (!IsUserChar(*p))
704 return 0;
705 }
706
707 return 1;
708 }
709
710 /* clean_nick_name()
711 *
712 * input - nickname
713 * - whether it's a local nick (1) or remote (0)
714 * output - none
715 * side effects - walks through the nickname, returning 0 if erroneous
716 */
717 int
718 valid_nickname(const char *nickname, const int local)
719 {
720 const char *p = nickname;
721 assert(nickname && *nickname);
722
723 /* nicks can't start with a digit or - or be 0 length */
724 /* This closer duplicates behaviour of hybrid-6 */
725 if (*p == '-' || (IsDigit(*p) && local) || *p == '\0')
726 return 0;
727
728 for (; *p; ++p)
729 if (!IsNickChar(*p))
730 return 0;
731
732 return p - nickname <= NICKLEN;
733 }
734
735 /* report_and_set_user_flags()
736 *
737 * inputs - pointer to source_p
738 * - pointer to conf for this user
739 * output - NONE
740 * side effects - Report to user any special flags
741 * they are getting, and set them.
742 */
743 static void
744 report_and_set_user_flags(struct Client *source_p, const struct MaskItem *conf)
745 {
746 /* If this user is being spoofed, tell them so */
747 if (IsConfDoSpoofIp(conf))
748 {
749 sendto_one(source_p,
750 ":%s NOTICE %s :*** Spoofing your IP. congrats.",
751 me.name, source_p->name);
752 }
753
754 /* If this user is in the exception class, Set it "E lined" */
755 if (IsConfExemptKline(conf))
756 {
757 SetExemptKline(source_p);
758 sendto_one(source_p,
759 ":%s NOTICE %s :*** You are exempt from K/D/G lines. congrats.",
760 me.name, source_p->name);
761 }
762
763 /* The else here is to make sure that G line exempt users
764 * do not get noticed twice.
765 */
766 else if (IsConfExemptGline(conf))
767 {
768 SetExemptGline(source_p);
769 sendto_one(source_p, ":%s NOTICE %s :*** You are exempt from G lines.",
770 me.name, source_p->name);
771 }
772
773 if (IsConfExemptResv(conf))
774 {
775 SetExemptResv(source_p);
776 sendto_one(source_p, ":%s NOTICE %s :*** You are exempt from resvs.",
777 me.name, source_p->name);
778 }
779
780 /* If this user is exempt from user limits set it "F lined" */
781 if (IsConfExemptLimits(conf))
782 {
783 SetExemptLimits(source_p);
784 sendto_one(source_p,
785 ":%s NOTICE %s :*** You are exempt from user limits. congrats.",
786 me.name,source_p->name);
787 }
788
789 if (IsConfCanFlood(conf))
790 {
791 SetCanFlood(source_p);
792 sendto_one(source_p, ":%s NOTICE %s :*** You are exempt from flood "
793 "protection, aren't you fearsome.",
794 me.name, source_p->name);
795 }
796 }
797
798 /* set_user_mode()
799 *
800 * added 15/10/91 By Darren Reed.
801 * parv[0] - sender
802 * parv[1] - username to change mode for
803 * parv[2] - modes to change
804 */
805 void
806 set_user_mode(struct Client *client_p, struct Client *source_p,
807 const int parc, char *parv[])
808 {
809 unsigned int flag, setflags;
810 char **p, *m, buf[IRCD_BUFSIZE];
811 struct Client *target_p;
812 int what = MODE_ADD, badflag = 0, i;
813
814 assert(!(parc < 2));
815
816 if ((target_p = find_person(client_p, parv[1])) == NULL)
817 {
818 if (MyConnect(source_p))
819 sendto_one(source_p, form_str(ERR_NOSUCHCHANNEL),
820 me.name, source_p->name, parv[1]);
821 return;
822 }
823
824 if (source_p != target_p)
825 {
826 sendto_one(source_p, form_str(ERR_USERSDONTMATCH),
827 me.name, source_p->name);
828 return;
829 }
830
831 if (parc < 3)
832 {
833 m = buf;
834 *m++ = '+';
835
836 for (i = 0; i < 128; i++)
837 if (HasUMode(source_p, user_modes[i]))
838 *m++ = (char)i;
839 *m = '\0';
840
841 sendto_one(source_p, form_str(RPL_UMODEIS),
842 me.name, source_p->name, buf);
843 return;
844 }
845
846 /* find flags already set for user */
847 setflags = source_p->umodes;
848
849 /* parse mode change string(s) */
850 for (p = &parv[2]; p && *p; p++)
851 {
852 for (m = *p; *m; m++)
853 {
854 switch (*m)
855 {
856 case '+':
857 what = MODE_ADD;
858 break;
859 case '-':
860 what = MODE_DEL;
861 break;
862 case 'o':
863 if (what == MODE_ADD)
864 {
865 if (IsServer(client_p) && !HasUMode(source_p, UMODE_OPER))
866 {
867 ++Count.oper;
868 SetOper(source_p);
869 }
870 }
871 else
872 {
873 /* Only decrement the oper counts if an oper to begin with
874 * found by Pat Szuta, Perly , perly@xnet.com
875 */
876 if (!HasUMode(source_p, UMODE_OPER))
877 break;
878
879 ClearOper(source_p);
880 Count.oper--;
881
882 if (MyConnect(source_p))
883 {
884 dlink_node *dm;
885
886 detach_conf(source_p, CONF_OPER);
887 ClrOFlag(source_p);
888 DelUMode(source_p, ConfigFileEntry.oper_only_umodes);
889
890 if ((dm = dlinkFindDelete(&oper_list, source_p)) != NULL)
891 free_dlink_node(dm);
892 }
893 }
894
895 break;
896
897 case 'r': /* Only services may set +r */
898 break;
899
900 default:
901 if ((flag = user_modes[(unsigned char)*m]))
902 {
903 if (MyConnect(source_p) && !HasUMode(source_p, UMODE_OPER) &&
904 (ConfigFileEntry.oper_only_umodes & flag))
905 badflag = 1;
906 else
907 {
908 if (what == MODE_ADD)
909 AddUMode(source_p, flag);
910 else
911 DelUMode(source_p, flag);
912 }
913 }
914 else
915 {
916 if (MyConnect(source_p))
917 badflag = 1;
918 }
919
920 break;
921 }
922 }
923 }
924
925 if (badflag)
926 sendto_one(source_p, form_str(ERR_UMODEUNKNOWNFLAG),
927 me.name, source_p->name);
928
929 if (MyConnect(source_p) && HasUMode(source_p, UMODE_ADMIN) &&
930 !HasOFlag(source_p, OPER_FLAG_ADMIN))
931 {
932 sendto_one(source_p, ":%s NOTICE %s :*** You have no admin flag;",
933 me.name, source_p->name);
934 DelUMode(source_p, UMODE_ADMIN);
935 }
936
937 if (!(setflags & UMODE_INVISIBLE) && HasUMode(source_p, UMODE_INVISIBLE))
938 ++Count.invisi;
939 if ((setflags & UMODE_INVISIBLE) && !HasUMode(source_p, UMODE_INVISIBLE))
940 --Count.invisi;
941
942 /*
943 * compare new flags with old flags and send string which
944 * will cause servers to update correctly.
945 */
946 send_umode_out(client_p, source_p, setflags);
947 }
948
949 /* send_umode()
950 * send the MODE string for user (user) to connection client_p
951 * -avalon
952 *
953 * inputs - client_p
954 * - source_p
955 * - int old
956 * - sendmask mask of modes to send
957 * - suplied umode_buf
958 * output - NONE
959 */
960 void
961 send_umode(struct Client *client_p, struct Client *source_p,
962 unsigned int old, unsigned int sendmask, char *umode_buf)
963 {
964 char *m = umode_buf;
965 int what = 0;
966 unsigned int i;
967 unsigned int flag;
968
969 /*
970 * build a string in umode_buf to represent the change in the user's
971 * mode between the new (source_p->umodes) and 'old'.
972 */
973 for (i = 0; i < 128; i++)
974 {
975 flag = user_modes[i];
976 if (!flag)
977 continue;
978
979 if (MyClient(source_p) && !(flag & sendmask))
980 continue;
981
982 if ((flag & old) && !HasUMode(source_p, flag))
983 {
984 if (what == MODE_DEL)
985 *m++ = (char)i;
986 else
987 {
988 what = MODE_DEL;
989 *m++ = '-';
990 *m++ = (char)i;
991 }
992 }
993 else if (!(flag & old) && HasUMode(source_p, flag))
994 {
995 if (what == MODE_ADD)
996 *m++ = (char)i;
997 else
998 {
999 what = MODE_ADD;
1000 *m++ = '+';
1001 *m++ = (char)i;
1002 }
1003 }
1004 }
1005
1006 *m = '\0';
1007
1008 if (*umode_buf && client_p)
1009 sendto_one(client_p, ":%s!%s@%s MODE %s :%s",
1010 source_p->name, source_p->username,
1011 source_p->host, source_p->name, umode_buf);
1012 }
1013
1014 /* send_umode_out()
1015 *
1016 * inputs -
1017 * output - NONE
1018 * side effects - Only send ubuf out to servers that know about this client
1019 */
1020 void
1021 send_umode_out(struct Client *client_p, struct Client *source_p,
1022 unsigned int old)
1023 {
1024 char buf[IRCD_BUFSIZE] = { '\0' };
1025 dlink_node *ptr = NULL;
1026
1027 send_umode(NULL, source_p, old, SEND_UMODES, buf);
1028
1029 if (buf[0])
1030 {
1031 DLINK_FOREACH(ptr, serv_list.head)
1032 {
1033 struct Client *target_p = ptr->data;
1034
1035 if ((target_p != client_p) && (target_p != source_p))
1036 sendto_one(target_p, ":%s MODE %s :%s",
1037 ID_or_name(source_p, target_p),
1038 ID_or_name(source_p, target_p), buf);
1039 }
1040 }
1041
1042 if (client_p && MyClient(client_p))
1043 send_umode(client_p, source_p, old, 0xffffffff, buf);
1044 }
1045
1046 void
1047 user_set_hostmask(struct Client *target_p, const char *hostname)
1048 {
1049 if (!valid_hostname(hostname))
1050 return;
1051
1052 if (IsUserHostIp(target_p))
1053 delete_user_host(target_p->username, target_p->host, !MyConnect(target_p));
1054
1055 strlcpy(target_p->host, hostname, sizeof(target_p->host));
1056 SetIPSpoof(target_p);
1057
1058 add_user_host(target_p->username, target_p->host, !MyConnect(target_p));
1059 SetUserHost(target_p);
1060
1061 if (MyClient(target_p))
1062 clear_ban_cache_client(target_p);
1063 }
1064
1065 /* user_welcome()
1066 *
1067 * inputs - client pointer to client to welcome
1068 * output - NONE
1069 * side effects -
1070 */
1071 static void
1072 user_welcome(struct Client *source_p)
1073 {
1074 #if defined(__TIME__) && defined(__DATE__)
1075 static const char built_date[] = __DATE__ " at " __TIME__;
1076 #else
1077 static const char built_date[] = "unknown";
1078 #endif
1079
1080 #ifdef HAVE_LIBCRYPTO
1081 if (source_p->localClient->fd.ssl != NULL)
1082 sendto_one(source_p, ":%s NOTICE %s :*** Connected securely via %s",
1083 me.name, source_p->name,
1084 ssl_get_cipher(source_p->localClient->fd.ssl));
1085 #endif
1086
1087 sendto_one(source_p, form_str(RPL_WELCOME), me.name, source_p->name,
1088 ServerInfo.network_name, source_p->name,
1089 source_p->username, source_p->host);
1090 sendto_one(source_p, form_str(RPL_YOURHOST), me.name, source_p->name,
1091 get_listener_name(source_p->localClient->listener), ircd_version);
1092 sendto_one(source_p, form_str(RPL_CREATED),
1093 me.name, source_p->name, built_date);
1094 sendto_one(source_p, form_str(RPL_MYINFO),
1095 me.name, source_p->name, me.name, ircd_version, umode_buffer);
1096 show_isupport(source_p);
1097
1098 if (source_p->id[0] != '\0')
1099 sendto_one(source_p, form_str(RPL_YOURID), me.name,
1100 source_p->name, source_p->id);
1101
1102 show_lusers(source_p);
1103
1104 if (ConfigFileEntry.short_motd)
1105 {
1106 sendto_one(source_p, ":%s NOTICE %s :*** Notice -- motd was last changed at %s",
1107 me.name, source_p->name, ConfigFileEntry.motd.lastChangedDate);
1108 sendto_one(source_p,
1109 ":%s NOTICE %s :*** Notice -- Please read the motd if you haven't "
1110 "read it", me.name, source_p->name);
1111 sendto_one(source_p, form_str(RPL_MOTDSTART),
1112 me.name, source_p->name, me.name);
1113 sendto_one(source_p, form_str(RPL_MOTD),
1114 me.name, source_p->name,
1115 "*** This is the short motd ***");
1116 sendto_one(source_p, form_str(RPL_ENDOFMOTD),
1117 me.name, source_p->name);
1118 }
1119 else
1120 send_message_file(source_p, &ConfigFileEntry.motd);
1121 }
1122
1123 /* check_xline()
1124 *
1125 * inputs - pointer to client to test
1126 * outupt - 1 if exiting 0 if ok
1127 * side effects -
1128 */
1129 static int
1130 check_xline(struct Client *source_p)
1131 {
1132 struct MaskItem *conf = NULL;
1133 const char *reason = NULL;
1134
1135 if ((conf = find_matching_name_conf(CONF_XLINE, source_p->info, NULL, NULL, 0)))
1136 {
1137 ++conf->count;
1138
1139 if (conf->reason != NULL)
1140 reason = conf->reason;
1141 else
1142 reason = "No Reason";
1143
1144 sendto_realops_flags(UMODE_REJ, L_ALL, SEND_NOTICE,
1145 "X-line Rejecting [%s] [%s], user %s [%s]",
1146 source_p->info, reason,
1147 get_client_name(source_p, HIDE_IP),
1148 source_p->sockhost);
1149
1150 ++ServerStats.is_ref;
1151 exit_client(source_p, &me, "Bad user info");
1152 return 1;
1153 }
1154
1155 return 0;
1156 }
1157
1158 /* oper_up()
1159 *
1160 * inputs - pointer to given client to oper
1161 * output - NONE
1162 * side effects - Blindly opers up given source_p, using conf info
1163 * all checks on passwords have already been done.
1164 * This could also be used by rsa oper routines.
1165 */
1166 void
1167 oper_up(struct Client *source_p)
1168 {
1169 const unsigned int old = source_p->umodes;
1170 const struct MaskItem *conf = source_p->localClient->confs.head->data;
1171
1172 assert(source_p->localClient->confs.head);
1173
1174 ++Count.oper;
1175 SetOper(source_p);
1176
1177 if (conf->modes)
1178 AddUMode(source_p, conf->modes);
1179 else if (ConfigFileEntry.oper_umodes)
1180 AddUMode(source_p, ConfigFileEntry.oper_umodes);
1181
1182 if (!(old & UMODE_INVISIBLE) && HasUMode(source_p, UMODE_INVISIBLE))
1183 ++Count.invisi;
1184 if ((old & UMODE_INVISIBLE) && !HasUMode(source_p, UMODE_INVISIBLE))
1185 --Count.invisi;
1186
1187 assert(dlinkFind(&oper_list, source_p) == NULL);
1188 dlinkAdd(source_p, make_dlink_node(), &oper_list);
1189
1190 AddOFlag(source_p, conf->port);
1191
1192 if (HasOFlag(source_p, OPER_FLAG_ADMIN))
1193 AddUMode(source_p, UMODE_ADMIN);
1194
1195 sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE, "%s is now an operator",
1196 get_oper_name(source_p));
1197 send_umode_out(source_p, source_p, old);
1198 sendto_one(source_p, form_str(RPL_YOUREOPER), me.name, source_p->name);
1199 }
1200
1201 static char new_uid[TOTALSIDUID + 1]; /* allow for \0 */
1202
1203 int
1204 valid_sid(const char *sid)
1205 {
1206 if (strlen(sid) == IRC_MAXSID)
1207 if (IsDigit(*sid))
1208 if (IsAlNum(*(sid + 1)) && IsAlNum(*(sid + 2)))
1209 return 1;
1210
1211 return 0;
1212 }
1213
1214 /*
1215 * init_uid()
1216 *
1217 * inputs - NONE
1218 * output - NONE
1219 * side effects - new_uid is filled in with server id portion (sid)
1220 * (first 3 bytes) or defaulted to 'A'.
1221 * Rest is filled in with 'A'
1222 */
1223 void
1224 init_uid(void)
1225 {
1226 unsigned int i;
1227
1228 memset(new_uid, 0, sizeof(new_uid));
1229
1230 if (!EmptyString(ServerInfo.sid))
1231 strlcpy(new_uid, ServerInfo.sid, sizeof(new_uid));
1232
1233 for (i = 0; i < IRC_MAXSID; ++i)
1234 if (new_uid[i] == '\0')
1235 new_uid[i] = 'A';
1236
1237 /* NOTE: if IRC_MAXUID != 6, this will have to be rewritten */
1238 /* Yes nenolod, I have known it was off by one ever since I wrote it
1239 * But *JUST* for you, though, it really doesn't look as *pretty*
1240 * -Dianora
1241 */
1242 memcpy(new_uid + IRC_MAXSID, "AAAAA@", IRC_MAXUID);
1243 }
1244
1245 /*
1246 * add_one_to_uid
1247 *
1248 * inputs - index number into new_uid
1249 * output - NONE
1250 * side effects - new_uid is incremented by one
1251 * note this is a recursive function
1252 */
1253 static void
1254 add_one_to_uid(int i)
1255 {
1256 if (i != IRC_MAXSID) /* Not reached server SID portion yet? */
1257 {
1258 if (new_uid[i] == 'Z')
1259 new_uid[i] = '0';
1260 else if (new_uid[i] == '9')
1261 {
1262 new_uid[i] = 'A';
1263 add_one_to_uid(i-1);
1264 }
1265 else
1266 ++new_uid[i];
1267 }
1268 else
1269 {
1270 /* NOTE: if IRC_MAXUID != 6, this will have to be rewritten */
1271 if (new_uid[i] == 'Z')
1272 memcpy(new_uid + IRC_MAXSID, "AAAAAA", IRC_MAXUID);
1273 else
1274 ++new_uid[i];
1275 }
1276 }
1277
1278 /*
1279 * uid_get
1280 *
1281 * inputs - struct Client *
1282 * output - new UID is returned to caller
1283 * side effects - new_uid is incremented by one.
1284 */
1285 static const char *
1286 uid_get(void)
1287 {
1288 add_one_to_uid(TOTALSIDUID - 1); /* index from 0 */
1289 return new_uid;
1290 }
1291
1292 /*
1293 * init_isupport()
1294 *
1295 * input - NONE
1296 * output - NONE
1297 * side effects - Must be called before isupport is enabled
1298 */
1299 void
1300 init_isupport(void)
1301 {
1302 isupportFile = init_MessageLine();
1303
1304 add_isupport("CALLERID", NULL, -1);
1305 add_isupport("CASEMAPPING", CASEMAP, -1);
1306 add_isupport("DEAF", "D", -1);
1307 add_isupport("KICKLEN", NULL, KICKLEN);
1308 add_isupport("MODES", NULL, MAXMODEPARAMS);
1309 #ifdef HALFOPS
1310 add_isupport("PREFIX", "(ohv)@%+", -1);
1311 add_isupport("STATUSMSG", "@%+", -1);
1312 #else
1313 add_isupport("PREFIX", "(ov)@+", -1);
1314 add_isupport("STATUSMSG", "@+", -1);
1315 #endif
1316 }
1317
1318 /*
1319 * add_isupport()
1320 *
1321 * input - name of supported function
1322 * - options if any
1323 * - number if any
1324 * output - NONE
1325 * side effects - Each supported item must call this when activated
1326 */
1327 void
1328 add_isupport(const char *name, const char *options, int n)
1329 {
1330 dlink_node *ptr;
1331 struct Isupport *support;
1332
1333 DLINK_FOREACH(ptr, support_list.head)
1334 {
1335 support = ptr->data;
1336 if (irccmp(support->name, name) == 0)
1337 {
1338 MyFree(support->name);
1339 MyFree(support->options);
1340 break;
1341 }
1342 }
1343
1344 if (ptr == NULL)
1345 {
1346 support = MyMalloc(sizeof(*support));
1347 dlinkAddTail(support, &support->node, &support_list);
1348 }
1349
1350 support->name = xstrdup(name);
1351 if (options != NULL)
1352 support->options = xstrdup(options);
1353 support->number = n;
1354
1355 rebuild_isupport_message_line();
1356 }
1357
1358 /*
1359 * delete_isupport()
1360 *
1361 * input - name of supported function
1362 * output - NONE
1363 * side effects - Each supported item must call this when deactivated
1364 */
1365 void
1366 delete_isupport(const char *name)
1367 {
1368 dlink_node *ptr;
1369 struct Isupport *support;
1370
1371 DLINK_FOREACH(ptr, support_list.head)
1372 {
1373 support = ptr->data;
1374 if (irccmp(support->name, name) == 0)
1375 {
1376 dlinkDelete(ptr, &support_list);
1377 MyFree(support->name);
1378 MyFree(support->options);
1379 MyFree(support);
1380 break;
1381 }
1382 }
1383
1384 rebuild_isupport_message_line();
1385 }
1386
1387 /*
1388 * rebuild_isupport_message_line
1389 *
1390 * input - NONE
1391 * output - NONE
1392 * side effects - Destroy the isupport MessageFile lines, and rebuild.
1393 */
1394 void
1395 rebuild_isupport_message_line(void)
1396 {
1397 char isupportbuffer[IRCD_BUFSIZE];
1398 char *p = isupportbuffer;
1399 dlink_node *ptr = NULL;
1400 int n = 0;
1401 int tokens = 0;
1402 size_t len = 0;
1403 size_t reserve = strlen(me.name) + HOSTLEN + strlen(form_str(RPL_ISUPPORT));
1404
1405 destroy_MessageLine(isupportFile);
1406
1407 DLINK_FOREACH(ptr, support_list.head)
1408 {
1409 struct Isupport *support = ptr->data;
1410
1411 p += (n = sprintf(p, "%s", support->name));
1412 len += n;
1413
1414 if (support->options != NULL)
1415 {
1416 p += (n = sprintf(p, "=%s", support->options));
1417 len += n;
1418 }
1419
1420 if (support->number > 0)
1421 {
1422 p += (n = sprintf(p, "=%d", support->number));
1423 len += n;
1424 }
1425
1426 *p++ = ' ';
1427 len++;
1428 *p = '\0';
1429
1430 if (++tokens == (MAXPARA-2) || len >= (sizeof(isupportbuffer)-reserve))
1431 { /* arbritrary for now */
1432 if (*--p == ' ')
1433 *p = '\0';
1434
1435 addto_MessageLine(isupportFile, isupportbuffer);
1436 p = isupportbuffer;
1437 len = 0;
1438 n = tokens = 0;
1439 }
1440 }
1441
1442 if (len != 0)
1443 {
1444 if (*--p == ' ')
1445 *p = '\0';
1446 addto_MessageLine(isupportFile, isupportbuffer);
1447 }
1448 }

Properties

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

svnadmin@ircd-hybrid.org
ViewVC Help
Powered by ViewVC 1.1.28