ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/ircd-hybrid/trunk/src/s_user.c
Revision: 33
Committed: Sun Oct 2 20:50:00 2005 UTC (18 years, 5 months ago) by knight
Content type: text/x-csrc
Original Path: ircd-hybrid/src/s_user.c
File size: 42757 byte(s)
Log Message:
- svn:keywords

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

Properties

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