ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/ircd-hybrid/branches/8.1.x/src/s_user.c
Revision: 889
Committed: Thu Nov 1 12:59:05 2007 UTC (16 years, 4 months ago) by michael
Content type: text/x-csrc
Original Path: ircd-hybrid-7.2/src/s_user.c
File size: 41658 byte(s)
Log Message:
- Got rid of Serv.dep_users and Serv.dep_servers

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

Properties

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