ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/ircd-hybrid/branches/8.2.x/src/user.c
Revision: 1029
Committed: Sun Nov 8 13:10:50 2009 UTC (14 years, 4 months ago) by michael
Content type: text/x-csrc
Original Path: ircd-hybrid-7.3/src/s_user.c
File size: 41392 byte(s)
Log Message:
- branch off trunk to create 7.3 branch

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

Properties

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