ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/ircd-hybrid/trunk/src/user.c
Revision: 32
Committed: Sun Oct 2 20:41:23 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

# User Rev Content
1 adx 30 /*
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 knight 31 * $Id$
23 adx 30 */
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 Revision