ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/ircd-hybrid/trunk/src/parse.c
Revision: 1427
Committed: Thu Jun 7 11:36:21 2012 UTC (13 years, 2 months ago) by michael
Content type: text/x-csrc
Original Path: ircd-hybrid-8/src/parse.c
File size: 24524 byte(s)
Log Message:
- parse.c: make msg_tree_parse() only take one argument
- client.h: rearrange structures

File Contents

# User Rev Content
1 adx 30 /*
2     * ircd-hybrid: an advanced Internet Relay Chat Daemon(ircd).
3     * parse.c: The message parser.
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 1243 #include "client.h"
27 adx 30 #include "parse.h"
28     #include "channel.h"
29     #include "hash.h"
30     #include "irc_string.h"
31     #include "sprintf_irc.h"
32     #include "ircd.h"
33     #include "numeric.h"
34 michael 1309 #include "log.h"
35 adx 30 #include "send.h"
36 michael 1309 #include "conf.h"
37 adx 30 #include "memory.h"
38     #include "s_user.h"
39     #include "s_serv.h"
40    
41     /*
42     * (based on orabidoo's parser code)
43     *
44     * This has always just been a trie. Look at volume III of Knuth ACP
45     *
46     *
47     * ok, you start out with an array of pointers, each one corresponds
48     * to a letter at the current position in the command being examined.
49     *
50     * so roughly you have this for matching 'trie' or 'tie'
51     *
52     * 't' points -> [MessageTree *] 'r' -> [MessageTree *] -> 'i'
53     * -> [MessageTree *] -> [MessageTree *] -> 'e' and matches
54     *
55     * 'i' -> [MessageTree *] -> 'e' and matches
56     *
57     * BUGS (Limitations!)
58     *
59     * I designed this trie to parse ircd commands. Hence it currently
60     * casefolds. This is trivial to fix by increasing MAXPTRLEN.
61     * This trie also "folds" '{' etc. down. This means, the input to this
62     * trie must be alpha tokens only. This again, is a limitation that
63     * can be overcome by increasing MAXPTRLEN to include upper/lower case
64     * at the expense of more memory. At the extreme end, you could make
65     * MAXPTRLEN 128.
66     *
67     * This is also not a patricia trie. On short ircd tokens, this is
68     * not likely going to matter.
69     *
70     * Diane Bruce (Dianora), June 6 2003
71     */
72    
73     #define MAXPTRLEN 32
74     /* Must be a power of 2, and
75     * larger than 26 [a-z]|[A-Z]
76     * its used to allocate the set
77     * of pointers at each node of the tree
78     * There are MAXPTRLEN pointers at each node.
79     * Obviously, there have to be more pointers
80     * Than ASCII letters. 32 is a nice number
81     * since there is then no need to shift
82     * 'A'/'a' to base 0 index, at the expense
83     * of a few never used pointers. For a small
84     * parser like this, this is a good compromise
85     * and does make it somewhat faster.
86     *
87     * - Dianora
88     */
89    
90     struct MessageTree
91     {
92     int links; /* Count of all pointers (including msg) at this node
93     * used as reference count for deletion of _this_ node.
94     */
95     struct Message *msg;
96     struct MessageTree *pointers[MAXPTRLEN];
97     };
98    
99     static struct MessageTree msg_tree;
100    
101     /*
102     * NOTE: parse() should not be called recursively by other functions!
103     */
104     static char *sender;
105 michael 1322 static char *para[MAXPARA + 2]; /* <prefix> + <params> + NULL */
106 adx 30 static char buffer[1024];
107    
108     static int cancel_clients(struct Client *, struct Client *, char *);
109     static void remove_unknown(struct Client *, char *, char *);
110 michael 1178 static void handle_numeric(char[], struct Client *, struct Client *, int, char *[]);
111     static void handle_command(struct Message *, struct Client *, struct Client *, unsigned int, char *[]);
112 adx 30
113    
114     /*
115     * parse a buffer.
116     *
117     * NOTE: parse() should not be called recusively by any other functions!
118     */
119     void
120     parse(struct Client *client_p, char *pbuffer, char *bufend)
121     {
122     struct Client *from = client_p;
123 michael 1178 struct Message *msg_ptr = NULL;
124 michael 1246 char *ch = NULL;
125     char *s = NULL;
126     char *numeric = NULL;
127 michael 1178 unsigned int parc = 0;
128     unsigned int paramcount;
129 adx 30
130     if (IsDefunct(client_p))
131     return;
132    
133     assert(client_p->localClient->fd.flags.open);
134     assert((bufend - pbuffer) < 512);
135    
136 michael 1246 for (ch = pbuffer; *ch == ' '; ++ch) /* skip spaces */
137 adx 30 /* null statement */ ;
138    
139     if (*ch == ':')
140     {
141 michael 1178 /*
142     * Copy the prefix to 'sender' assuming it terminates
143 adx 30 * with SPACE (or NULL, which is an error, though).
144     */
145 michael 1178 sender = ++ch;
146 adx 30
147     if ((s = strchr(ch, ' ')) != NULL)
148     {
149     *s = '\0';
150 michael 1178 ch = ++s;
151 adx 30 }
152    
153     if (*sender && IsServer(client_p))
154     {
155     if ((from = find_person(client_p, sender)) == NULL)
156 michael 1169 from = hash_find_server(sender);
157 adx 30
158     /* Hmm! If the client corresponding to the
159     * prefix is not found--what is the correct
160     * action??? Now, I will ignore the message
161     * (old IRC just let it through as if the
162     * prefix just wasn't there...) --msa
163     */
164     if (from == NULL)
165     {
166 michael 896 ++ServerStats.is_unpf;
167 adx 30 remove_unknown(client_p, sender, pbuffer);
168     return;
169     }
170    
171     if (from->from != client_p)
172     {
173 michael 896 ++ServerStats.is_wrdi;
174 adx 30 cancel_clients(client_p, from, pbuffer);
175     return;
176     }
177     }
178    
179     while (*ch == ' ')
180 michael 1178 ++ch;
181 adx 30 }
182    
183     if (*ch == '\0')
184     {
185 michael 896 ++ServerStats.is_empt;
186 adx 30 return;
187     }
188    
189     /* Extract the command code from the packet. Point s to the end
190     * of the command code and calculate the length using pointer
191     * arithmetic. Note: only need length for numerics and *all*
192     * numerics must have parameters and thus a space after the command
193     * code. -avalon
194     */
195    
196     /* EOB is 3 chars long but is not a numeric */
197     if (*(ch + 3) == ' ' && /* ok, lets see if its a possible numeric.. */
198     IsDigit(*ch) && IsDigit(*(ch + 1)) && IsDigit(*(ch + 2)))
199     {
200     numeric = ch;
201     paramcount = MAXPARA;
202 michael 896 ++ServerStats.is_num;
203 adx 30 s = ch + 3; /* I know this is ' ' from above if */
204     *s++ = '\0'; /* blow away the ' ', and point s to next part */
205     }
206     else
207     {
208 michael 948 unsigned int ii = 0;
209 adx 30
210     if ((s = strchr(ch, ' ')) != NULL)
211     *s++ = '\0';
212    
213 michael 1178 if ((msg_ptr = find_command(ch)) == NULL)
214 adx 30 {
215     /* Note: Give error message *only* to recognized
216     * persons. It's a nightmare situation to have
217     * two programs sending "Unknown command"'s or
218     * equivalent to each other at full blast....
219     * If it has got to person state, it at least
220     * seems to be well behaving. Perhaps this message
221     * should never be generated, though... --msa
222     * Hm, when is the buffer empty -- if a command
223     * code has been found ?? -Armin
224     */
225 michael 1246 if (*pbuffer != '\0')
226 adx 30 {
227     if (IsClient(from))
228     sendto_one(from, form_str(ERR_UNKNOWNCOMMAND),
229     me.name, from->name, ch);
230     }
231    
232 michael 896 ++ServerStats.is_unco;
233 adx 30 return;
234     }
235    
236 michael 1178 assert(msg_ptr->cmd != NULL);
237 adx 30
238 michael 1178 paramcount = msg_ptr->args_max;
239 adx 30 ii = bufend - ((s) ? s : ch);
240 michael 1178 msg_ptr->bytes += ii;
241 adx 30 }
242    
243 michael 1178 /*
244     * Must the following loop really be so devious? On surface it
245     * splits the message to parameters from blank spaces. But, if
246     * paramcount has been reached, the rest of the message goes into
247     * this last parameter (about same effect as ":" has...) --msa
248     */
249    
250     /* Note initially true: s==NULL || *(s-1) == '\0' !! */
251    
252     para[parc] = from->name;
253    
254     if (s)
255 adx 30 {
256 michael 1178 if (paramcount > MAXPARA)
257     paramcount = MAXPARA;
258    
259     while (1)
260     {
261     while (*s == ' ')
262     *s++ = '\0';
263    
264     if (*s == '\0')
265     break;
266    
267     if (*s == ':')
268     {
269     /* The rest is a single parameter */
270     para[++parc] = s + 1;
271     break;
272     }
273    
274     para[++parc] = s;
275    
276     if (parc >= paramcount)
277     break;
278    
279     while (*s && *s != ' ')
280     ++s;
281     }
282 adx 30 }
283    
284 michael 1178 para[++parc] = NULL;
285    
286     if (msg_ptr != NULL)
287     handle_command(msg_ptr, client_p, from, parc, para);
288 adx 30 else
289 michael 1178 handle_numeric(numeric, client_p, from, parc, para);
290 adx 30 }
291    
292     /* handle_command()
293     *
294     * inputs - pointer to message block
295     * - pointer to client
296     * - pointer to client message is from
297     * - count of number of args
298     * - pointer to argv[] array
299     * output - -1 if error from server
300     * side effects -
301     */
302     static void
303     handle_command(struct Message *mptr, struct Client *client_p,
304 michael 1323 struct Client *from, unsigned int i, char *hpara[])
305 adx 30 {
306     MessageHandler handler = 0;
307    
308     if (IsServer(client_p))
309     mptr->rcount++;
310    
311     mptr->count++;
312    
313     /* New patch to avoid server flooding from unregistered connects
314     * - Pie-Man 07/27/2000 */
315     if (!IsRegistered(client_p))
316     {
317     /* if its from a possible server connection
318     * ignore it.. more than likely its a header thats sneaked through
319     */
320     if ((IsHandshake(client_p) || IsConnecting(client_p) ||
321     IsServer(client_p)) && !(mptr->flags & MFLG_UNREG))
322     return;
323     }
324    
325     handler = mptr->handlers[client_p->handler];
326    
327     /* check right amount of params is passed... --is */
328 michael 1178 if (i < mptr->args_min)
329 adx 30 {
330     if (!IsServer(client_p))
331     {
332     sendto_one(client_p, form_str(ERR_NEEDMOREPARAMS),
333     me.name, EmptyString(hpara[0]) ? "*" : hpara[0], mptr->cmd);
334     }
335     else
336     {
337     sendto_realops_flags(UMODE_ALL, L_ALL,
338     "Dropping server %s due to (invalid) command '%s' "
339     "with only %d arguments (expecting %d).",
340 michael 1178 client_p->name, mptr->cmd, i, mptr->args_min);
341 michael 1247 ilog(LOG_TYPE_IRCD, "Insufficient parameters (%d) for command '%s' from %s.",
342 adx 30 i, mptr->cmd, client_p->name);
343     exit_client(client_p, client_p,
344     "Not enough arguments to server command.");
345     }
346     }
347     else
348     (*handler)(client_p, from, i, hpara);
349     }
350    
351     /* add_msg_element()
352     *
353     * inputs - pointer to MessageTree
354     * - pointer to Message to add for given command
355     * - pointer to current portion of command being added
356     * output - NONE
357     * side effects - recursively build the Message Tree ;-)
358     */
359     /*
360     * How this works.
361     *
362     * The code first checks to see if its reached the end of the command
363     * If so, that struct MessageTree has a msg pointer updated and the links
364     * count incremented, since a msg pointer is a reference.
365     * Then the code descends recursively, building the trie.
366     * If a pointer index inside the struct MessageTree is NULL a new
367     * child struct MessageTree has to be allocated.
368     * The links (reference count) is incremented as they are created
369     * in the parent.
370     */
371     static void
372     add_msg_element(struct MessageTree *mtree_p,
373     struct Message *msg_p, const char *cmd)
374     {
375     struct MessageTree *ntree_p;
376    
377     if (*cmd == '\0')
378     {
379     mtree_p->msg = msg_p;
380     mtree_p->links++; /* Have msg pointer, so up ref count */
381     }
382     else
383     {
384     /* *cmd & (MAXPTRLEN-1)
385     * convert the char pointed to at *cmd from ASCII to an integer
386     * between 0 and MAXPTRLEN.
387     * Thus 'A' -> 0x1 'B' -> 0x2 'c' -> 0x3 etc.
388     */
389    
390 michael 1013 if ((ntree_p = mtree_p->pointers[*cmd & (MAXPTRLEN - 1)]) == NULL)
391 adx 30 {
392 michael 1013 ntree_p = MyMalloc(sizeof(struct MessageTree));
393     mtree_p->pointers[*cmd & (MAXPTRLEN - 1)] = ntree_p;
394 adx 30
395     mtree_p->links++; /* Have new pointer, so up ref count */
396     }
397 michael 896
398 michael 1013 add_msg_element(ntree_p, msg_p, cmd + 1);
399 adx 30 }
400     }
401    
402     /* del_msg_element()
403     *
404     * inputs - Pointer to MessageTree to delete from
405     * - pointer to command name to delete
406     * output - NONE
407     * side effects - recursively deletes a token from the Message Tree ;-)
408     */
409     /*
410     * How this works.
411     *
412     * Well, first off, the code recursively descends into the trie
413     * until it finds the terminating letter of the command being removed.
414     * Once it has done that, it marks the msg pointer as NULL then
415     * reduces the reference count on that allocated struct MessageTree
416     * since a command counts as a reference.
417     *
418     * Then it pops up the recurse stack. As it comes back up the recurse
419     * The code checks to see if the child now has no pointers or msg
420     * i.e. the links count has gone to zero. If its no longer used, the
421     * child struct MessageTree can be deleted. The parent reference
422     * to this child is then removed and the parents link count goes down.
423     * Thus, we continue to go back up removing all unused MessageTree(s)
424     */
425     static void
426     del_msg_element(struct MessageTree *mtree_p, const char *cmd)
427     {
428     struct MessageTree *ntree_p;
429    
430 michael 1246 /*
431     * In case this is called for a nonexistent command
432 adx 30 * check that there is a msg pointer here, else links-- goes -ve
433     * -db
434     */
435     if ((*cmd == '\0') && (mtree_p->msg != NULL))
436     {
437     mtree_p->msg = NULL;
438     mtree_p->links--;
439     }
440     else
441     {
442 michael 1013 if ((ntree_p = mtree_p->pointers[*cmd & (MAXPTRLEN - 1)]) != NULL)
443 adx 30 {
444 michael 1013 del_msg_element(ntree_p, cmd + 1);
445 michael 896
446 adx 30 if (ntree_p->links == 0)
447     {
448 michael 1013 mtree_p->pointers[*cmd & (MAXPTRLEN - 1)] = NULL;
449 adx 30 mtree_p->links--;
450     MyFree(ntree_p);
451     }
452     }
453     }
454     }
455    
456     /* msg_tree_parse()
457     *
458     * inputs - Pointer to command to find
459     * - Pointer to MessageTree root
460     * output - Find given command returning Message * if found NULL if not
461     * side effects - none
462     */
463     static struct Message *
464 michael 1427 msg_tree_parse(const char *cmd)
465 adx 30 {
466 michael 1427 struct MessageTree *mtree = &msg_tree;
467 adx 30 assert(cmd && *cmd);
468    
469 michael 522 while (IsAlpha(*cmd) && (mtree = mtree->pointers[*cmd & (MAXPTRLEN - 1)]))
470     if (*++cmd == '\0')
471     return mtree->msg;
472 adx 30
473 michael 522 return NULL;
474 adx 30 }
475    
476     /* mod_add_cmd()
477     *
478     * inputs - pointer to struct Message
479     * output - none
480     * side effects - load this one command name
481     * msg->count msg->bytes is modified in place, in
482     * modules address space. Might not want to do that...
483     */
484     void
485     mod_add_cmd(struct Message *msg)
486     {
487 michael 1246 assert(msg && msg->cmd);
488 adx 30
489     /* command already added? */
490 michael 1427 if (msg_tree_parse(msg->cmd))
491 adx 30 return;
492    
493     add_msg_element(&msg_tree, msg, msg->cmd);
494     msg->count = msg->rcount = msg->bytes = 0;
495     }
496    
497     /* mod_del_cmd()
498     *
499     * inputs - pointer to struct Message
500     * output - none
501     * side effects - unload this one command name
502     */
503     void
504     mod_del_cmd(struct Message *msg)
505     {
506 michael 1246 assert(msg && msg->cmd);
507 adx 30
508     del_msg_element(&msg_tree, msg->cmd);
509     }
510    
511     /* find_command()
512     *
513     * inputs - command name
514     * output - pointer to struct Message
515     * side effects - none
516     */
517     struct Message *
518     find_command(const char *cmd)
519     {
520 michael 1427 return msg_tree_parse(cmd);
521 adx 30 }
522    
523 michael 1246 static void
524     recurse_report_messages(struct Client *source_p, const struct MessageTree *mtree)
525     {
526     unsigned int i;
527    
528     if (mtree->msg != NULL)
529     sendto_one(source_p, form_str(RPL_STATSCOMMANDS),
530     me.name, source_p->name, mtree->msg->cmd,
531     mtree->msg->count, mtree->msg->bytes,
532     mtree->msg->rcount);
533    
534     for (i = 0; i < MAXPTRLEN; ++i)
535     if (mtree->pointers[i] != NULL)
536     recurse_report_messages(source_p, mtree->pointers[i]);
537     }
538    
539 adx 30 /* report_messages()
540     *
541     * inputs - pointer to client to report to
542     * output - NONE
543     * side effects - client is shown list of commands
544     */
545     void
546     report_messages(struct Client *source_p)
547     {
548 michael 1013 const struct MessageTree *mtree = &msg_tree;
549     unsigned int i;
550 adx 30
551 michael 1246 for (i = 0; i < MAXPTRLEN; ++i)
552 adx 30 if (mtree->pointers[i] != NULL)
553     recurse_report_messages(source_p, mtree->pointers[i]);
554     }
555    
556     /* cancel_clients()
557     *
558     * inputs -
559     * output -
560     * side effects -
561     */
562     static int
563     cancel_clients(struct Client *client_p, struct Client *source_p, char *cmd)
564     {
565     /* kill all possible points that are causing confusion here,
566     * I'm not sure I've got this all right...
567     * - avalon
568     *
569     * knowing avalon, probably not.
570     */
571    
572     /* with TS, fake prefixes are a common thing, during the
573     * connect burst when there's a nick collision, and they
574     * must be ignored rather than killed because one of the
575     * two is surviving.. so we don't bother sending them to
576     * all ops everytime, as this could send 'private' stuff
577     * from lagged clients. we do send the ones that cause
578     * servers to be dropped though, as well as the ones from
579     * non-TS servers -orabidoo
580     */
581     /* Incorrect prefix for a server from some connection. If it is a
582     * client trying to be annoying, just QUIT them, if it is a server
583     * then the same deal.
584     */
585     if (IsServer(source_p) || IsMe(source_p))
586     {
587     sendto_realops_flags(UMODE_DEBUG, L_ADMIN, "Message for %s[%s] from %s",
588     source_p->name, source_p->from->name,
589     get_client_name(client_p, SHOW_IP));
590     sendto_realops_flags(UMODE_DEBUG, L_OPER, "Message for %s[%s] from %s",
591     source_p->name, source_p->from->name,
592     get_client_name(client_p, MASK_IP));
593     sendto_realops_flags(UMODE_DEBUG, L_ALL,
594     "Not dropping server %s (%s) for Fake Direction",
595     client_p->name, source_p->name);
596 michael 896 return -1;
597 adx 30 /* return exit_client(client_p, client_p, &me, "Fake Direction");*/
598     }
599    
600     /* Ok, someone is trying to impose as a client and things are
601     * confused. If we got the wrong prefix from a server, send out a
602     * kill, else just exit the lame client.
603     */
604     /* If the fake prefix is coming from a TS server, discard it
605     * silently -orabidoo
606     *
607     * all servers must be TS these days --is
608     */
609     sendto_realops_flags(UMODE_DEBUG, L_ADMIN,
610     "Message for %s[%s@%s!%s] from %s (TS, ignored)",
611     source_p->name, source_p->username, source_p->host,
612     source_p->from->name, get_client_name(client_p, SHOW_IP));
613     sendto_realops_flags(UMODE_DEBUG, L_OPER,
614     "Message for %s[%s@%s!%s] from %s (TS, ignored)",
615     source_p->name, source_p->username, source_p->host,
616     source_p->from->name, get_client_name(client_p, MASK_IP));
617    
618 michael 896 return 0;
619 adx 30 }
620    
621     /* remove_unknown()
622     *
623     * inputs -
624     * output -
625     * side effects -
626     */
627     static void
628     remove_unknown(struct Client *client_p, char *lsender, char *lbuffer)
629     {
630     /* Do kill if it came from a server because it means there is a ghost
631     * user on the other server which needs to be removed. -avalon
632     * Tell opers about this. -Taner
633     */
634     /* '[0-9]something' is an ID (KILL/SQUIT depending on its length)
635     * 'nodots' is a nickname (KILL)
636     * 'no.dot.at.start' is a server (SQUIT)
637     */
638     if ((IsDigit(*lsender) && strlen(lsender) <= IRC_MAXSID) ||
639     strchr(lsender, '.') != NULL)
640     {
641     sendto_realops_flags(UMODE_DEBUG, L_ADMIN,
642     "Unknown prefix (%s) from %s, Squitting %s",
643     lbuffer, get_client_name(client_p, SHOW_IP), lsender);
644     sendto_realops_flags(UMODE_DEBUG, L_OPER,
645     "Unknown prefix (%s) from %s, Squitting %s",
646     lbuffer, client_p->name, lsender);
647     sendto_one(client_p, ":%s SQUIT %s :(Unknown prefix (%s) from %s)",
648     me.name, lsender, lbuffer, client_p->name);
649     }
650     else
651     sendto_one(client_p, ":%s KILL %s :%s (Unknown Client)",
652     me.name, lsender, me.name);
653     }
654    
655     /*
656     *
657     * parc number of arguments ('sender' counted as one!)
658     * parv[0] pointer to 'sender' (may point to empty string) (not used)
659     * parv[1]..parv[parc-1]
660     * pointers to additional parameters, this is a NULL
661     * terminated list (parv[parc] == NULL).
662     *
663     * *WARNING*
664     * Numerics are mostly error reports. If there is something
665     * wrong with the message, just *DROP* it! Don't even think of
666     * sending back a neat error message -- big danger of creating
667     * a ping pong error message...
668     */
669     static void
670 michael 1178 handle_numeric(char numeric[], struct Client *client_p, struct Client *source_p,
671     int parc, char *parv[])
672 adx 30 {
673     struct Client *target_p;
674     struct Channel *chptr;
675     char *t; /* current position within the buffer */
676     int i, tl; /* current length of presently being built string in t */
677    
678     if (parc < 2 || !IsServer(source_p))
679     return;
680    
681     /* Remap low number numerics. */
682     if (numeric[0] == '0')
683     numeric[0] = '1';
684    
685     /* Prepare the parameter portion of the message into 'buffer'.
686     * (Because the buffer is twice as large as the message buffer
687     * for the socket, no overflow can occur here... ...on current
688     * assumptions--bets are off, if these are changed --msa)
689     */
690     t = buffer;
691     for (i = 2; i < (parc - 1); i++)
692     {
693     tl = ircsprintf(t, " %s", parv[i]);
694     t += tl;
695     }
696    
697 michael 1298 ircsprintf(t, " :%s", parv[parc-1]);
698 adx 30
699     if (((target_p = find_person(client_p, parv[1])) != NULL) ||
700 michael 1169 ((target_p = hash_find_server(parv[1])) != NULL))
701 adx 30 {
702     if (IsMe(target_p))
703     {
704     int num;
705    
706     /*
707     * We shouldn't get numerics sent to us,
708     * any numerics we do get indicate a bug somewhere..
709     */
710     /* ugh. this is here because of nick collisions. when two servers
711     * relink, they burst each other their nicks, then perform collides.
712     * if there is a nick collision, BOTH servers will kill their own
713     * nicks, and BOTH will kill the other servers nick, which wont exist,
714     * because it will have been already killed by the local server.
715     *
716     * unfortunately, as we cant guarantee other servers will do the
717     * "right thing" on a nick collision, we have to keep both kills.
718     * ergo we need to ignore ERR_NOSUCHNICK. --fl_
719     */
720     /* quick comment. This _was_ tried. i.e. assume the other servers
721     * will do the "right thing" and kill a nick that is colliding.
722     * unfortunately, it did not work. --Dianora
723     */
724    
725     /* Yes, a good compiler would have optimised this, but
726     * this is probably easier to read. -db
727     */
728     num = atoi(numeric);
729    
730     if ((num != ERR_NOSUCHNICK))
731     sendto_realops_flags(UMODE_ALL, L_ADMIN,
732     "*** %s(via %s) sent a %s numeric to me: %s",
733     source_p->name, client_p->name, numeric, buffer);
734     return;
735     }
736     else if (target_p->from == client_p)
737     {
738     /* This message changed direction (nick collision?)
739     * ignore it.
740     */
741     return;
742     }
743    
744     /* csircd will send out unknown umode flag for +a (admin), drop it here. */
745     if ((atoi(numeric) == ERR_UMODEUNKNOWNFLAG) && MyClient(target_p))
746     return;
747    
748     /* Fake it for server hiding, if its our client */
749     if (ConfigServerHide.hide_servers &&
750 michael 1219 MyClient(target_p) && !HasUMode(target_p, UMODE_OPER))
751 adx 30 sendto_one(target_p, ":%s %s %s%s", me.name, numeric, target_p->name, buffer);
752 adx 753 else
753     sendto_one(target_p, ":%s %s %s%s", ID_or_name(source_p, target_p->from),
754     numeric, ID_or_name(target_p, target_p->from), buffer);
755 adx 30 return;
756     }
757     else if ((chptr = hash_find_channel(parv[1])) != NULL)
758 michael 1243 sendto_channel_local(ALL_MEMBERS, 0, chptr,
759 adx 30 ":%s %s %s %s",
760     source_p->name,
761     numeric, chptr->chname, buffer);
762     }
763    
764     /* m_not_oper()
765     * inputs -
766     * output -
767     * side effects - just returns a nastyogram to given user
768     */
769     void
770     m_not_oper(struct Client *client_p, struct Client *source_p,
771     int parc, char *parv[])
772     {
773     sendto_one(source_p, form_str(ERR_NOPRIVILEGES),
774 michael 948 me.name, source_p->name);
775 adx 30 }
776    
777     void
778     m_unregistered(struct Client *client_p, struct Client *source_p,
779     int parc, char *parv[])
780     {
781 michael 1235 sendto_one(source_p, form_str(ERR_NOTREGISTERED), me.name,
782     source_p->name[0] ? source_p->name : "*");
783 adx 30 }
784    
785     void
786     m_registered(struct Client *client_p, struct Client *source_p,
787     int parc, char *parv[])
788     {
789 michael 1235 sendto_one(source_p, form_str(ERR_ALREADYREGISTRED),
790 michael 1080 me.name, source_p->name);
791 adx 30 }
792    
793     void
794     m_ignore(struct Client *client_p, struct Client *source_p,
795     int parc, char *parv[])
796     {
797     return;
798     }
799    
800 michael 946 void
801     rfc1459_command_send_error(struct Client *client_p, struct Client *source_p,
802     int parc, char *parv[])
803     {
804 michael 948 const char *in_para;
805 michael 946
806 michael 948 in_para = (parc > 1 && *parv[1] != '\0') ? parv[1] : "<>";
807 michael 946
808 michael 1247 ilog(LOG_TYPE_IRCD, "Received ERROR message from %s: %s",
809 michael 948 source_p->name, in_para);
810 michael 946
811     if (client_p == source_p)
812     {
813     sendto_realops_flags(UMODE_ALL, L_ADMIN, "ERROR :from %s -- %s",
814 michael 948 get_client_name(client_p, HIDE_IP), in_para);
815 michael 946 sendto_realops_flags(UMODE_ALL, L_OPER, "ERROR :from %s -- %s",
816 michael 948 get_client_name(client_p, MASK_IP), in_para);
817 michael 946 }
818     else
819     {
820     sendto_realops_flags(UMODE_ALL, L_OPER, "ERROR :from %s via %s -- %s",
821 michael 948 source_p->name, get_client_name(client_p, MASK_IP), in_para);
822 michael 946 sendto_realops_flags(UMODE_ALL, L_ADMIN, "ERROR :from %s via %s -- %s",
823 michael 948 source_p->name, get_client_name(client_p, HIDE_IP), in_para);
824 michael 946 }
825    
826     if (MyClient(source_p))
827     exit_client(source_p, source_p, "ERROR");
828     }

Properties

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