ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/ircd-hybrid-7.2/src/s_user.c
Revision: 386
Committed: Tue Jan 31 12:40:56 2006 UTC (18 years, 1 month ago) by adx
Content type: text/x-csrc
File size: 42980 byte(s)
Log Message:
+ this should fix sockhost relaying (ThaPrince #1)

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, 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
298 if (ConfigFileEntry.ping_cookie)
299 {
300 if (!IsPingSent(source_p) &&
301 source_p->localClient->random_ping == 0)
302 {
303 source_p->localClient->random_ping = (unsigned long)rand();
304 sendto_one(source_p, "PING :%lu",
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, 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 const char *p = NULL;
335 unsigned int i = 0;
336
337 if (IsNeedIdentd(aconf))
338 {
339 ServerStats->is_ref++;
340 sendto_one(source_p, ":%s NOTICE %s :*** Notice -- You need to install "
341 "identd to use this server", me.name, source_p->name);
342 exit_client(source_p, &me, "Install identd");
343 return;
344 }
345
346 p = username;
347
348 if (!IsNoTilde(aconf))
349 source_p->username[i++] = '~';
350
351 while (*p && i < USERLEN)
352 {
353 if (*p != '[')
354 source_p->username[i++] = *p;
355 p++;
356 }
357
358 source_p->username[i] = '\0';
359 }
360
361 /* password check */
362 if (!EmptyString(aconf->passwd))
363 {
364 const char *pass = source_p->localClient->passwd;
365
366 if (!match_conf_password(pass, aconf))
367 {
368 ServerStats->is_ref++;
369 sendto_one(source_p, form_str(ERR_PASSWDMISMATCH),
370 me.name, source_p->name);
371 exit_client(source_p, &me, "Bad Password");
372 return;
373 }
374 }
375
376 /* don't free source_p->localClient->passwd here - it can be required
377 * by masked /stats I if there are auth{} blocks with need_password = no;
378 * --adx
379 */
380
381 /* report if user has &^>= etc. and set flags as needed in source_p */
382 report_and_set_user_flags(source_p, aconf);
383
384 /* Limit clients -
385 * We want to be able to have servers and F-line clients
386 * connect, so save room for "buffer" connections.
387 * Smaller servers may want to decrease this, and it should
388 * probably be just a percentage of the MAXCLIENTS...
389 * -Taner
390 */
391 /* Except "F:" clients */
392 if ((Count.local >= ServerInfo.max_clients + MAX_BUFFER) ||
393 (Count.local >= ServerInfo.max_clients && !IsExemptLimits(source_p)))
394 {
395 sendto_realops_flags(UMODE_FULL, L_ALL,
396 "Too many clients, rejecting %s[%s].",
397 nick, source_p->host);
398 ServerStats->is_ref++;
399 exit_client(source_p, &me, "Sorry, server is full - try later");
400 return;
401 }
402
403 /* valid user name check */
404 if (valid_username(source_p->username) == 0)
405 {
406 char tmpstr2[IRCD_BUFSIZE];
407
408 sendto_realops_flags(UMODE_REJ, L_ALL, "Invalid username: %s (%s@%s)",
409 nick, source_p->username, source_p->host);
410 ServerStats->is_ref++;
411 ircsprintf(tmpstr2, "Invalid username [%s]", source_p->username);
412 exit_client(source_p, &me, tmpstr2);
413 return;
414 }
415
416 assert(source_p == client_p);
417
418 /* end of valid user name check */
419 if (check_xline(source_p) || check_regexp_xline(source_p))
420 return;
421
422 if (IsDead(client_p))
423 return;
424
425 if (source_p->id[0] == '\0' && me.id[0])
426 {
427 char *id = (char *)execute_callback(uid_get_cb, source_p);
428 while (hash_find_id(id) != NULL)
429 id = uid_get(NULL);
430
431 strlcpy(source_p->id, id, sizeof(source_p->id));
432 hash_add_id(source_p);
433 }
434
435 irc_getnameinfo((struct sockaddr *)&source_p->localClient->ip,
436 source_p->localClient->ip.ss_len, ipaddr,
437 HOSTIPLEN, NULL, 0, NI_NUMERICHOST);
438
439 sendto_realops_flags(UMODE_CCONN, L_ALL,
440 "Client connecting: %s (%s@%s) [%s] {%s} [%s]",
441 nick, source_p->username, source_p->host,
442 ConfigFileEntry.hide_spoof_ips && IsIPSpoof(source_p) ?
443 "255.255.255.255" : ipaddr, get_client_class(source_p),
444 source_p->info);
445
446 /* If they have died in send_* don't do anything. */
447 if (IsDead(source_p))
448 return;
449
450 if (ConfigFileEntry.invisible_on_connect)
451 {
452 source_p->umodes |= UMODE_INVISIBLE;
453 Count.invisi++;
454 }
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 = NULL;
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 = NULL;
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 "0" : source_p->sockhost, source_p->id, source_p->info);
624 }
625 else
626 {
627 sendto_one(uplink, "NICK %s %d %lu %s %s %s %s :%s",
628 source_p->name, source_p->hopcount+1,
629 (unsigned long)source_p->tsinfo,
630 ubuf, source_p->username, source_p->host,
631 source_p->servptr->name, source_p->info);
632 }
633 }
634 else
635 {
636 DLINK_FOREACH(server_node, serv_list.head)
637 {
638 struct Client *server = server_node->data;
639
640 if (IsCapable(server, CAP_LL) || server == client_p)
641 continue;
642
643 if (IsCapable(server, CAP_TS6) && HasID(source_p))
644 sendto_one(server, ":%s UID %s %d %lu %s %s %s %s %s :%s",
645 source_p->servptr->id,
646 source_p->name, source_p->hopcount+1,
647 (unsigned long)source_p->tsinfo,
648 ubuf, source_p->username, source_p->host,
649 (MyClient(source_p) && IsIPSpoof(source_p)) ?
650 "0" : source_p->sockhost, source_p->id, source_p->info);
651 else
652 sendto_one(server, "NICK %s %d %lu %s %s %s %s :%s",
653 source_p->name, source_p->hopcount+1,
654 (unsigned long)source_p->tsinfo,
655 ubuf, source_p->username, source_p->host,
656 source_p->servptr->name, source_p->info);
657 }
658 }
659 }
660
661 /* valid_hostname()
662 *
663 * Inputs - pointer to hostname
664 * Output - 1 if valid, 0 if not
665 * Side effects - check hostname for validity
666 *
667 * NOTE: this doesn't allow a hostname to begin with a dot and
668 * will not allow more dots than chars.
669 */
670 int
671 valid_hostname(const char *hostname)
672 {
673 const char *p = hostname;
674
675 assert(p != NULL);
676
677 if ('.' == *p || ':' == *p)
678 return 0;
679
680 while (*p)
681 {
682 if (!IsHostChar(*p))
683 return 0;
684 p++;
685 }
686
687 return 1;
688 }
689
690 /* valid_username()
691 *
692 * Inputs - pointer to user
693 * Output - 1 if valid, 0 if not
694 * Side effects - check username for validity
695 *
696 * Absolutely always reject any '*' '!' '?' '@' in an user name
697 * reject any odd control characters names.
698 * Allow '.' in username to allow for "first.last"
699 * style of username
700 */
701 int
702 valid_username(const char *username)
703 {
704 int dots = 0;
705 const char *p = username;
706
707 assert(p != NULL);
708
709 if ('~' == *p)
710 ++p;
711
712 /* reject usernames that don't start with an alphanum
713 * i.e. reject jokers who have '-@somehost' or '.@somehost'
714 * or "-hi-@somehost", "h-----@somehost" would still be accepted.
715 */
716 if (!IsAlNum(*p))
717 return 0;
718
719 while (*++p)
720 {
721 if ((*p == '.') && ConfigFileEntry.dots_in_ident)
722 {
723 dots++;
724
725 if (dots > ConfigFileEntry.dots_in_ident)
726 return 0;
727 if (!IsUserChar(p[1]))
728 return 0;
729 }
730 else if (!IsUserChar(*p))
731 return 0;
732 }
733
734 return 1;
735 }
736
737 /* report_and_set_user_flags()
738 *
739 * inputs - pointer to source_p
740 * - pointer to aconf for this user
741 * output - NONE
742 * side effects - Report to user any special flags
743 * they are getting, and set them.
744 */
745 static void
746 report_and_set_user_flags(struct Client *source_p, const struct AccessItem *aconf)
747 {
748 /* If this user is being spoofed, tell them so */
749 if (IsConfDoSpoofIp(aconf))
750 {
751 sendto_one(source_p,
752 ":%s NOTICE %s :*** Spoofing your IP. congrats.",
753 me.name, source_p->name);
754 }
755
756 /* If this user is in the exception class, Set it "E lined" */
757 if (IsConfExemptKline(aconf))
758 {
759 SetExemptKline(source_p);
760 sendto_one(source_p,
761 ":%s NOTICE %s :*** You are exempt from K/D/G lines. congrats.",
762 me.name, source_p->name);
763 }
764
765 /* The else here is to make sure that G line exempt users
766 * do not get noticed twice.
767 */
768 else if (IsConfExemptGline(aconf))
769 {
770 SetExemptGline(source_p);
771 sendto_one(source_p, ":%s NOTICE %s :*** You are exempt from G lines.",
772 me.name, source_p->name);
773 }
774
775 if (IsConfExemptResv(aconf))
776 {
777 SetExemptResv(source_p);
778 sendto_one(source_p, ":%s NOTICE %s :*** You are exempt from resvs.",
779 me.name, source_p->name);
780 }
781
782 /* If this user is exempt from user limits set it "F lined" */
783 if (IsConfExemptLimits(aconf))
784 {
785 SetExemptLimits(source_p);
786 sendto_one(source_p,
787 ":%s NOTICE %s :*** You are exempt from user limits. congrats.",
788 me.name,source_p->name);
789 }
790
791 /* If this user is exempt from idle time outs */
792 if (IsConfIdlelined(aconf))
793 {
794 SetIdlelined(source_p);
795 sendto_one(source_p,
796 ":%s NOTICE %s :*** You are exempt from idle limits. congrats.",
797 me.name, source_p->name);
798 }
799
800 if (IsConfCanFlood(aconf))
801 {
802 SetCanFlood(source_p);
803 sendto_one(source_p, ":%s NOTICE %s :*** You are exempt from flood "
804 "protection, aren't you fearsome.",
805 me.name, source_p->name);
806 }
807 }
808
809 /* do_local_user()
810 *
811 * inputs -
812 * output - NONE
813 * side effects -
814 */
815 void
816 do_local_user(const char *nick, struct Client *client_p, struct Client *source_p,
817 const char *username, const char *host, const char *server,
818 const char *realname)
819 {
820 assert(source_p != NULL);
821 assert(source_p->username != username);
822
823 if (source_p == NULL)
824 return;
825
826 if (!IsUnknown(source_p))
827 {
828 sendto_one(source_p, form_str(ERR_ALREADYREGISTRED),
829 me.name, nick);
830 return;
831 }
832
833 source_p->flags |= FLAGS_GOTUSER;
834
835 /*
836 * don't take the clients word for it, ever
837 */
838 source_p->servptr = &me;
839
840 strlcpy(source_p->info, realname, sizeof(source_p->info));
841
842 if (!IsGotId(source_p))
843 {
844 /* save the username in the client
845 * If you move this you'll break ping cookies..you've been warned
846 */
847 strlcpy(source_p->username, username, sizeof(source_p->username));
848 }
849
850 if (source_p->name[0])
851 {
852 /* NICK already received, now I have USER... */
853 register_local_user(client_p, source_p, source_p->name, username);
854 }
855 }
856
857 /* change_simple_umode()
858 *
859 * this callback can be hooked to allow special handling of
860 * certain usermodes
861 */
862 static void *
863 change_simple_umode(va_list args)
864 {
865 struct Client *source_p;
866 int what;
867 unsigned int flag;
868
869 va_arg(args, struct Client *);
870 source_p = va_arg(args, struct Client *);
871 what = va_arg(args, int);
872 flag = va_arg(args, unsigned int);
873
874 if (what == MODE_ADD)
875 source_p->umodes |= flag;
876 else
877 source_p->umodes &= ~flag;
878
879 return NULL;
880 }
881
882 /* set_user_mode()
883 *
884 * added 15/10/91 By Darren Reed.
885 * parv[0] - sender
886 * parv[1] - username to change mode for
887 * parv[2] - modes to change
888 */
889 void
890 set_user_mode(struct Client *client_p, struct Client *source_p,
891 int parc, char *parv[])
892 {
893 unsigned int flag, setflags;
894 char **p, *m, buf[IRCD_BUFSIZE];
895 struct Client *target_p;
896 int what = MODE_ADD, badflag = 0, i;
897
898 assert(!(parc < 2));
899
900 if ((target_p = find_person(client_p, parv[1])) == NULL)
901 {
902 if (MyConnect(source_p))
903 sendto_one(source_p, form_str(ERR_NOSUCHCHANNEL),
904 me.name, source_p->name, parv[1]);
905 return;
906 }
907
908 if (IsServer(source_p))
909 {
910 sendto_realops_flags(UMODE_ALL, L_ADMIN, "*** Mode for User %s from %s",
911 parv[1], source_p->name);
912 return;
913 }
914
915 if (source_p != target_p || target_p->from != source_p->from)
916 {
917 sendto_one(source_p, form_str(ERR_USERSDONTMATCH),
918 me.name, source_p->name);
919 return;
920 }
921
922 if (parc < 3)
923 {
924 m = buf;
925 *m++ = '+';
926
927 for (i = 0; i < 128; i++)
928 if (source_p->umodes & user_modes[i])
929 *m++ = (char)i;
930 *m = '\0';
931
932 sendto_one(source_p, form_str(RPL_UMODEIS),
933 me.name, source_p->name, buf);
934 return;
935 }
936
937 execute_callback(entering_umode_cb, client_p, source_p);
938
939 /* find flags already set for user */
940 setflags = source_p->umodes;
941
942 /* parse mode change string(s) */
943 for (p = &parv[2]; p && *p; p++)
944 {
945 for (m = *p; *m; m++)
946 {
947 switch (*m)
948 {
949 case '+':
950 what = MODE_ADD;
951 break;
952 case '-':
953 what = MODE_DEL;
954 break;
955 case 'o':
956 if (what == MODE_ADD)
957 {
958 if (IsServer(client_p) && !IsOper(source_p))
959 {
960 ++Count.oper;
961 SetOper(source_p);
962 }
963 }
964 else
965 {
966 /* Only decrement the oper counts if an oper to begin with
967 * found by Pat Szuta, Perly , perly@xnet.com
968 */
969 if (!IsOper(source_p))
970 break;
971
972 ClearOper(source_p);
973 source_p->umodes &= ~ConfigFileEntry.oper_only_umodes;
974 Count.oper--;
975
976 if (MyConnect(source_p))
977 {
978 dlink_node *dm;
979
980 detach_conf(source_p, OPER_TYPE);
981 ClearOperFlags(source_p);
982
983 if ((dm = dlinkFindDelete(&oper_list, source_p)) != NULL)
984 free_dlink_node(dm);
985 }
986 }
987
988 break;
989
990 /* we may not get these,
991 * but they shouldnt be in default
992 */
993 case ' ' :
994 case '\n':
995 case '\r':
996 case '\t':
997 break;
998
999 default:
1000 if ((flag = user_modes[(unsigned char)*m]))
1001 {
1002 if (MyConnect(source_p) && !IsOper(source_p) &&
1003 (ConfigFileEntry.oper_only_umodes & flag))
1004 {
1005 badflag = 1;
1006 }
1007 else
1008 execute_callback(umode_cb, client_p, source_p, what, flag);
1009 }
1010 else
1011 {
1012 if (MyConnect(source_p))
1013 badflag = 1;
1014 }
1015
1016 break;
1017 }
1018 }
1019 }
1020
1021 if (badflag)
1022 sendto_one(source_p, form_str(ERR_UMODEUNKNOWNFLAG),
1023 me.name, source_p->name);
1024
1025 if ((source_p->umodes & UMODE_NCHANGE) && !IsOperN(source_p))
1026 {
1027 sendto_one(source_p, ":%s NOTICE %s :*** You have no admin flag;",
1028 me.name, source_p->name);
1029 source_p->umodes &= ~UMODE_NCHANGE; /* only tcm's really need this */
1030 }
1031
1032 if (MyConnect(source_p) && (source_p->umodes & UMODE_ADMIN) &&
1033 !IsOperAdmin(source_p) && !IsOperHiddenAdmin(source_p))
1034 {
1035 sendto_one(source_p, ":%s NOTICE %s :*** You have no admin flag;",
1036 me.name, source_p->name);
1037 source_p->umodes &= ~UMODE_ADMIN;
1038 }
1039
1040 if (!(setflags & UMODE_INVISIBLE) && IsInvisible(source_p))
1041 ++Count.invisi;
1042 if ((setflags & UMODE_INVISIBLE) && !IsInvisible(source_p))
1043 --Count.invisi;
1044
1045 /*
1046 * compare new flags with old flags and send string which
1047 * will cause servers to update correctly.
1048 */
1049 send_umode_out(client_p, source_p, setflags);
1050 }
1051
1052 /* send_umode()
1053 * send the MODE string for user (user) to connection client_p
1054 * -avalon
1055 */
1056 void
1057 send_umode(struct Client *client_p, struct Client *source_p,
1058 unsigned int old, unsigned int sendmask, char *umode_buf)
1059 {
1060 int what = 0;
1061 unsigned int i;
1062 unsigned int flag;
1063 char *m = umode_buf;
1064
1065 /*
1066 * build a string in umode_buf to represent the change in the user's
1067 * mode between the new (source_p->umodes) and 'old'.
1068 */
1069 for (i = 0; i < 128; i++)
1070 {
1071 flag = user_modes[i];
1072 if (!flag)
1073 continue;
1074
1075 if (MyClient(source_p) && !(flag & sendmask))
1076 continue;
1077
1078 if ((flag & old) && !(source_p->umodes & flag))
1079 {
1080 if (what == MODE_DEL)
1081 *m++ = (char)i;
1082 else
1083 {
1084 what = MODE_DEL;
1085 *m++ = '-';
1086 *m++ = (char)i;
1087 }
1088 }
1089 else if (!(flag & old) && (source_p->umodes & flag))
1090 {
1091 if (what == MODE_ADD)
1092 *m++ = (char)i;
1093 else
1094 {
1095 what = MODE_ADD;
1096 *m++ = '+';
1097 *m++ = (char)i;
1098 }
1099 }
1100 }
1101
1102 *m = '\0';
1103
1104 if (*umode_buf && client_p)
1105 sendto_one(client_p, ":%s MODE %s :%s",
1106 source_p->name, source_p->name, umode_buf);
1107 }
1108
1109 /* send_umode_out()
1110 *
1111 * inputs -
1112 * output - NONE
1113 * side effects - Only send ubuf out to servers that know about this client
1114 */
1115 void
1116 send_umode_out(struct Client *client_p, struct Client *source_p,
1117 unsigned int old)
1118 {
1119 char buf[IRCD_BUFSIZE];
1120 dlink_node *ptr = NULL;
1121
1122 send_umode(NULL, source_p, old, IsOperHiddenAdmin(source_p) ?
1123 SEND_UMODES & ~UMODE_ADMIN : SEND_UMODES, buf);
1124
1125 if (*buf)
1126 {
1127 DLINK_FOREACH(ptr, serv_list.head)
1128 {
1129 struct Client *target_p = ptr->data;
1130
1131 if ((target_p != client_p) && (target_p != source_p))
1132 {
1133 if ((!(ServerInfo.hub && IsCapable(target_p, CAP_LL))) ||
1134 (target_p->localClient->serverMask &
1135 source_p->lazyLinkClientExists))
1136 sendto_one(target_p, ":%s MODE %s :%s",
1137 ID_or_name(source_p, target_p),
1138 ID_or_name(source_p, target_p), buf);
1139 }
1140 }
1141 }
1142
1143 if (client_p && MyClient(client_p))
1144 send_umode(client_p, source_p, old, 0xffffffff, buf);
1145 }
1146
1147 /* user_welcome()
1148 *
1149 * inputs - client pointer to client to welcome
1150 * output - NONE
1151 * side effects -
1152 */
1153 static void
1154 user_welcome(struct Client *source_p)
1155 {
1156 #if defined(__TIME__) && defined(__DATE__)
1157 static const char built_date[] = __DATE__ " at " __TIME__;
1158 #else
1159 static const char built_date[] = "unknown";
1160 #endif
1161
1162 #ifdef HAVE_LIBCRYPTO
1163 if (source_p->localClient->fd.ssl != NULL)
1164 sendto_one(source_p, ":%s NOTICE %s :*** Connected securely via %s",
1165 me.name, source_p->name,
1166 ssl_get_cipher(source_p->localClient->fd.ssl));
1167 #endif
1168
1169 sendto_one(source_p, form_str(RPL_WELCOME), me.name, source_p->name,
1170 ServerInfo.network_name, source_p->name);
1171 sendto_one(source_p, form_str(RPL_YOURHOST), me.name, source_p->name,
1172 get_listener_name(source_p->localClient->listener), ircd_version);
1173 sendto_one(source_p, form_str(RPL_CREATED),
1174 me.name, source_p->name, built_date);
1175 sendto_one(source_p, form_str(RPL_MYINFO),
1176 me.name, source_p->name, me.name, ircd_version, umode_buffer);
1177 show_isupport(source_p);
1178
1179 if (source_p->id[0] != '\0')
1180 sendto_one(source_p, form_str(RPL_YOURID), me.name,
1181 source_p->name, source_p->id);
1182
1183 show_lusers(source_p);
1184
1185 if (ConfigFileEntry.short_motd)
1186 {
1187 sendto_one(source_p, "NOTICE %s :*** Notice -- motd was last changed at %s",
1188 source_p->name, ConfigFileEntry.motd.lastChangedDate);
1189 sendto_one(source_p,
1190 "NOTICE %s :*** Notice -- Please read the motd if you haven't "
1191 "read it", source_p->name);
1192 sendto_one(source_p, form_str(RPL_MOTDSTART),
1193 me.name, source_p->name, me.name);
1194 sendto_one(source_p, form_str(RPL_MOTD),
1195 me.name, source_p->name,
1196 "*** This is the short motd ***");
1197 sendto_one(source_p, form_str(RPL_ENDOFMOTD),
1198 me.name, source_p->name);
1199 }
1200 else
1201 send_message_file(source_p, &ConfigFileEntry.motd);
1202 }
1203
1204 /* check_xline()
1205 *
1206 * inputs - pointer to client to test
1207 * outupt - 1 if exiting 0 if ok
1208 * side effects -
1209 */
1210 static int
1211 check_xline(struct Client *source_p)
1212 {
1213 struct ConfItem *conf;
1214 struct MatchItem *xconf;
1215 const char *reason;
1216
1217 if ((conf = find_matching_name_conf(XLINE_TYPE, source_p->info,
1218 NULL, NULL, 0)) != NULL)
1219 {
1220 xconf = map_to_conf(conf);
1221 xconf->count++;
1222
1223 if (xconf->reason != NULL)
1224 reason = xconf->reason;
1225 else
1226 reason = "No Reason";
1227
1228 sendto_realops_flags(UMODE_REJ, L_ALL,
1229 "X-line Rejecting [%s] [%s], user %s [%s]",
1230 source_p->info, reason,
1231 get_client_name(source_p, HIDE_IP),
1232 source_p->sockhost);
1233
1234 ServerStats->is_ref++;
1235 if (REJECT_HOLD_TIME > 0)
1236 {
1237 sendto_one(source_p, ":%s NOTICE %s :Bad user info",
1238 me.name, source_p->name);
1239 source_p->localClient->reject_delay = CurrentTime + REJECT_HOLD_TIME;
1240 SetCaptured(source_p);
1241 }
1242 else
1243 exit_client(source_p, &me, "Bad user info");
1244 return 1;
1245 }
1246
1247 return 0;
1248 }
1249
1250 static int
1251 check_regexp_xline(struct Client *source_p)
1252 {
1253 struct ConfItem *conf = NULL;
1254 const char *reason = NULL;
1255
1256 if ((conf = find_matching_name_conf(RXLINE_TYPE, source_p->info, NULL, NULL, 0)))
1257 {
1258 struct MatchItem *reg = map_to_conf(conf);
1259
1260 ++reg->count;
1261
1262 if (reg->reason != NULL)
1263 reason = reg->reason;
1264 else
1265 reason = "No Reason";
1266
1267 sendto_realops_flags(UMODE_REJ, L_ALL,
1268 "X-line (REGEX) Rejecting [%s] [%s], user %s [%s]",
1269 source_p->info, reason,
1270 get_client_name(source_p, HIDE_IP),
1271 source_p->sockhost);
1272
1273 ServerStats->is_ref++;
1274 exit_client(source_p, &me, "Bad user info");
1275 return 1;
1276 }
1277
1278 return 0;
1279 }
1280
1281 /* oper_up()
1282 *
1283 * inputs - pointer to given client to oper
1284 * output - NONE
1285 * side effects - Blindly opers up given source_p, using aconf info
1286 * all checks on passwords have already been done.
1287 * This could also be used by rsa oper routines.
1288 */
1289 void
1290 oper_up(struct Client *source_p)
1291 {
1292 unsigned int old = source_p->umodes;
1293 const char *operprivs = "";
1294 const struct AccessItem *oconf = NULL;
1295
1296 assert(source_p->localClient->confs.head);
1297 oconf = map_to_conf((source_p->localClient->confs.head)->data);
1298
1299 ++Count.oper;
1300 SetOper(source_p);
1301
1302 if (oconf->modes)
1303 source_p->umodes |= oconf->modes;
1304 else if (ConfigFileEntry.oper_umodes)
1305 source_p->umodes |= ConfigFileEntry.oper_umodes;
1306 else
1307 source_p->umodes |= (UMODE_SERVNOTICE|UMODE_OPERWALL|
1308 UMODE_WALLOP|UMODE_LOCOPS);
1309
1310 assert(dlinkFind(&oper_list, source_p) == NULL);
1311 dlinkAdd(source_p, make_dlink_node(), &oper_list);
1312
1313 operprivs = oper_privs_as_string(oconf->port);
1314
1315 SetOFlag(source_p, oconf->port);
1316
1317 if (IsOperAdmin(source_p) || IsOperHiddenAdmin(source_p))
1318 source_p->umodes |= UMODE_ADMIN;
1319 if (!IsOperN(source_p))
1320 source_p->umodes &= ~UMODE_NCHANGE;
1321
1322 sendto_realops_flags(UMODE_ALL, L_ALL, "%s (%s@%s) is now an operator",
1323 source_p->name, source_p->username, source_p->host);
1324 send_umode_out(source_p, source_p, old);
1325 sendto_one(source_p, form_str(RPL_YOUREOPER), me.name, source_p->name);
1326 sendto_one(source_p, ":%s NOTICE %s :*** Oper privs are %s",
1327 me.name, source_p->name, operprivs);
1328 send_message_file(source_p, &ConfigFileEntry.opermotd);
1329 }
1330
1331 /*
1332 * Quick and dirty UID code for new proposed SID on EFnet
1333 *
1334 */
1335
1336 static char new_uid[TOTALSIDUID+1]; /* allow for \0 */
1337 static void add_one_to_uid(int i);
1338
1339 /*
1340 * init_uid()
1341 *
1342 * inputs - NONE
1343 * output - NONE
1344 * side effects - new_uid is filled in with server id portion (sid)
1345 * (first 3 bytes) or defaulted to 'A'.
1346 * Rest is filled in with 'A'
1347 */
1348 void
1349 init_uid(void)
1350 {
1351 int i;
1352
1353 memset(new_uid, 0, sizeof(new_uid));
1354
1355 if (ServerInfo.sid != NULL)
1356 {
1357 memcpy(new_uid, ServerInfo.sid, IRCD_MIN(strlen(ServerInfo.sid),
1358 IRC_MAXSID));
1359 memcpy(&me.id, ServerInfo.sid, IRCD_MIN(strlen(ServerInfo.sid),
1360 IRC_MAXSID));
1361 hash_add_id(&me);
1362 }
1363
1364 for (i = 0; i < IRC_MAXSID; i++)
1365 if (new_uid[i] == '\0')
1366 new_uid[i] = 'A';
1367
1368 /* XXX if IRC_MAXUID != 6, this will have to be rewritten */
1369 /* Yes nenolod, I have known it was off by one ever since I wrote it
1370 * But *JUST* for you, though, it really doesn't look as *pretty*
1371 * -Dianora
1372 */
1373 memcpy(new_uid+IRC_MAXSID, "AAAAA@", IRC_MAXUID);
1374
1375 entering_umode_cb = register_callback("entering_umode", NULL);
1376 umode_cb = register_callback("changing_umode", change_simple_umode);
1377 uid_get_cb = register_callback("uid_get", uid_get);
1378 }
1379
1380 /*
1381 * uid_get
1382 *
1383 * inputs - struct Client *
1384 * output - new UID is returned to caller
1385 * side effects - new_uid is incremented by one.
1386 */
1387 static void *
1388 uid_get(va_list args)
1389 {
1390 add_one_to_uid(TOTALSIDUID-1); /* index from 0 */
1391 return ((void *) new_uid);
1392 }
1393
1394 /*
1395 * add_one_to_uid
1396 *
1397 * inputs - index number into new_uid
1398 * output - NONE
1399 * side effects - new_uid is incremented by one
1400 * note this is a recursive function
1401 */
1402 static void
1403 add_one_to_uid(int i)
1404 {
1405 if (i != IRC_MAXSID) /* Not reached server SID portion yet? */
1406 {
1407 if (new_uid[i] == 'Z')
1408 new_uid[i] = '0';
1409 else if (new_uid[i] == '9')
1410 {
1411 new_uid[i] = 'A';
1412 add_one_to_uid(i-1);
1413 }
1414 else new_uid[i] = new_uid[i] + 1;
1415 }
1416 else
1417 {
1418 /* XXX if IRC_MAXUID != 6, this will have to be rewritten */
1419 if (new_uid[i] == 'Z')
1420 memcpy(new_uid+IRC_MAXSID, "AAAAAA", IRC_MAXUID);
1421 else
1422 new_uid[i] = new_uid[i] + 1;
1423 }
1424 }
1425
1426 /*
1427 * init_isupport()
1428 *
1429 * input - NONE
1430 * output - NONE
1431 * side effects - Must be called before isupport is enabled
1432 */
1433 void
1434 init_isupport(void)
1435 {
1436 isupportFile = init_MessageLine();
1437
1438 add_isupport("CALLERID", NULL, -1);
1439 add_isupport("CASEMAPPING", CASEMAP, -1);
1440 add_isupport("KICKLEN", NULL, KICKLEN);
1441 add_isupport("MODES", NULL, MAXMODEPARAMS);
1442 add_isupport("NICKLEN", NULL, NICKLEN-1);
1443 #ifdef HALFOPS
1444 add_isupport("PREFIX", "(ohv)@%+", -1);
1445 add_isupport("STATUSMSG", "@%+", -1);
1446 #else
1447 add_isupport("PREFIX", "(ov)@+", -1);
1448 add_isupport("STATUSMSG", "@+", -1);
1449 #endif
1450 add_isupport("TOPICLEN", NULL, TOPICLEN);
1451 }
1452
1453 /*
1454 * add_isupport()
1455 *
1456 * input - name of supported function
1457 * - options if any
1458 * - number if any
1459 * output - NONE
1460 * side effects - Each supported item must call this when activated
1461 */
1462 void
1463 add_isupport(const char *name, const char *options, int n)
1464 {
1465 dlink_node *ptr;
1466 struct Isupport *support;
1467
1468 DLINK_FOREACH(ptr, support_list.head)
1469 {
1470 support = ptr->data;
1471 if (irccmp(support->name, name) == 0)
1472 {
1473 MyFree(support->name);
1474 MyFree(support->options);
1475 break;
1476 }
1477 }
1478
1479 if (ptr == NULL)
1480 {
1481 support = MyMalloc(sizeof(*support));
1482 dlinkAddTail(support, &support->node, &support_list);
1483 }
1484
1485 DupString(support->name, name);
1486 if (options != NULL)
1487 DupString(support->options, options);
1488 support->number = n;
1489
1490 rebuild_isupport_message_line();
1491 }
1492
1493 /*
1494 * delete_isupport()
1495 *
1496 * input - name of supported function
1497 * output - NONE
1498 * side effects - Each supported item must call this when deactivated
1499 */
1500 void
1501 delete_isupport(const char *name)
1502 {
1503 dlink_node *ptr;
1504 struct Isupport *support;
1505
1506 DLINK_FOREACH(ptr, support_list.head)
1507 {
1508 support = ptr->data;
1509 if (irccmp(support->name, name) == 0)
1510 {
1511 dlinkDelete(ptr, &support_list);
1512 MyFree(support->name);
1513 MyFree(support->options);
1514 MyFree(support);
1515 break;
1516 }
1517 }
1518
1519 rebuild_isupport_message_line();
1520 }
1521
1522 /*
1523 * rebuild_isupport_message_line
1524 *
1525 * input - NONE
1526 * output - NONE
1527 * side effects - Destroy the isupport MessageFile lines, and rebuild.
1528 */
1529 void
1530 rebuild_isupport_message_line(void)
1531 {
1532 char isupportbuffer[IRCD_BUFSIZE];
1533 char *p = isupportbuffer;
1534 dlink_node *ptr = NULL;
1535 int n = 0;
1536 int tokens = 0;
1537 size_t len = 0;
1538 size_t reserve = strlen(me.name) + HOSTLEN + strlen(form_str(RPL_ISUPPORT));
1539
1540 destroy_MessageLine(isupportFile);
1541
1542 DLINK_FOREACH(ptr, support_list.head)
1543 {
1544 struct Isupport *support = ptr->data;
1545
1546 p += (n = ircsprintf(p, "%s", support->name));
1547 len += n;
1548
1549 if (support->options != NULL)
1550 {
1551 p += (n = ircsprintf(p, "=%s", support->options));
1552 len += n;
1553 }
1554
1555 if (support->number > 0)
1556 {
1557 p += (n = ircsprintf(p, "=%d", support->number));
1558 len += n;
1559 }
1560
1561 *p++ = ' ';
1562 len++;
1563 *p = '\0';
1564
1565 if (++tokens == (MAXPARA-2) || len >= (sizeof(isupportbuffer)-reserve))
1566 { /* arbritrary for now */
1567 if (*--p == ' ')
1568 *p = '\0';
1569
1570 addto_MessageLine(isupportFile, isupportbuffer);
1571 p = isupportbuffer;
1572 len = 0;
1573 n = tokens = 0;
1574 }
1575 }
1576
1577 if (len != 0)
1578 {
1579 if (*--p == ' ')
1580 *p = '\0';
1581 addto_MessageLine(isupportFile, isupportbuffer);
1582 }
1583 }

Properties

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