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: 1196
Committed: Sun Aug 21 10:09:23 2011 UTC (12 years, 7 months ago) by michael
Content type: text/x-csrc
Original Path: ircd-hybrid-8/src/s_user.c
File size: 41160 byte(s)
Log Message:
- implement NICK/UID servicestamps
- add "SVS" to server capabilities

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

Properties

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