ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/branches/newio/src/s_user.c
Revision: 1115
Committed: Tue Dec 21 14:42:54 2010 UTC (13 years, 3 months ago) by michael
Content type: text/x-csrc
Original Path: ircd-hybrid-7.3/src/s_user.c
File size: 39704 byte(s)
Log Message:
- Rename bogus_host() found in several modules to check_servname() and move
  it to s_serv.c
- serverinfo::sid is now mandatory and must be specified.
  ircd won't start otherwise

File Contents

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

Properties

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