/[svn]/ircd-hybrid-7.2/src/s_user.c
ViewVC logotype

Contents of /ircd-hybrid-7.2/src/s_user.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 503 - (show annotations)
Fri Mar 3 19:53:47 2006 UTC (15 years, 1 month ago) by michael
File MIME type: text/x-chdr
File size: 43060 byte(s)
- Backported CAP changes from HEAD since it doesn't affect
  any of the ircd's core components and should be supported
  as soon as possible.

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

Properties

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

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