ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/cvsroot/ermyth/modules/protocol/dreamforge.C
Revision: 1.5
Committed: Wed Sep 5 11:23:14 2007 UTC (19 years, 1 month ago) by pippijn
Content type: text/plain
Branch: MAIN
Changes since 1.4: +3 -3 lines
Log Message:
removed GPLed code and put license back to BSD

File Contents

# User Rev Content
1 pippijn 1.1 /*
2 pippijn 1.4 * Copyright © 2003-2004 E. Will et al.
3     * Copyright © 2005-2006 Atheme Development Group
4 pippijn 1.2 * Rights to this code are documented in doc/pod/license.pod.
5 pippijn 1.1 *
6     * This file contains protocol support for bahamut-based ircd.
7     *
8 pippijn 1.5 * $Id: dreamforge.C,v 1.4 2007-08-28 17:08:11 pippijn Exp $
9 pippijn 1.1 */
10    
11     #include "atheme.h"
12     #include <account/mynick.h>
13     #include "uplink.h"
14     #include "pmodule.h"
15     #include "protocol/dreamforge.h"
16    
17 pippijn 1.5 static char const rcsid[] = "$Id: dreamforge.C,v 1.4 2007-08-28 17:08:11 pippijn Exp $";
18 pippijn 1.1
19     /* *INDENT-OFF* */
20    
21 pippijn 1.4 namespace protocol
22 pippijn 1.1 {
23 pippijn 1.4 static ircd_t DreamForge = {
24     "DreamForge 4.6.7 and later", /* IRCd name */
25     "$", /* TLD Prefix, used by Global. */
26     false, /* Whether or not we use IRCNet/TS6 UID */
27     false, /* Whether or not we use RCOMMAND */
28     false, /* Whether or not we support channel owners. */
29     false, /* Whether or not we support channel protection. */
30     false, /* Whether or not we support halfops. */
31     false, /* Whether or not we use P10 */
32     false, /* Whether or not we use vHosts. */
33     0, /* Oper-only cmodes */
34     0, /* Integer flag for owner channel flag. */
35     0, /* Integer flag for protect channel flag. */
36     0, /* Integer flag for halfops. */
37     "+", /* Mode we set for owner. */
38     "+", /* Mode we set for protect. */
39     "+", /* Mode we set for halfops. */
40     PROTOCOL_DREAMFORGE, /* Protocol type */
41     0, /* Permanent cmodes */
42     "b", /* Ban-like cmodes */
43     0, /* Except mchar */
44     0, /* Invex mchar */
45     0 /* Flags */
46     };
47    
48     struct dreamforge_handler : handler
49     {
50     dreamforge_handler ();
51     virtual ~dreamforge_handler ();
52    
53     virtual unsigned int server_login (void);
54     virtual void introduce_nick (user_t *u);
55     virtual void invite_sts (user_t *source, user_t *target, channel_t *channel);
56     virtual void quit_sts (user_t *u, char const * const reason);
57     virtual void wallops_sts (char const * const text);
58     virtual void join_sts (channel_t *c, user_t *u, bool isnew, char const * const modes);
59     virtual void kick (char const * const from, char const * const channel, char const * const to, char const * const reason);
60     virtual void privmsg (char const * const from, char const * const target, char const * const fmt, ...);
61     virtual void notice_user_sts (user_t *from, user_t *target, char const * const text);
62     virtual void notice_global_sts (user_t *from, char const * const mask, char const * const text);
63     virtual void notice_channel_sts (user_t *from, channel_t *target, char const * const text);
64     virtual void numeric_sts (char const * const from, int numeric, char const * const target, char const * const fmt, ...);
65     virtual void skill (char const * const from, char const * const nick, char const * const fmt, ...);
66     virtual void part_sts (channel_t *c, user_t *u);
67     virtual void kline_sts (char const * const server, char const * const user, char const * const host, long duration, char const * const reason);
68     virtual void unkline_sts (char const * const server, char const * const user, char const * const host);
69     virtual void topic_sts (channel_t *c, char const * const setter, time_t ts, time_t prevts, char const * const topic);
70     virtual void mode_sts (char const * const sender, channel_t *target, char const * const modes);
71     virtual void ping_sts (void);
72     virtual void ircd_on_login (char const * const origin, char const * const user, char const * const wantedhost);
73     virtual bool ircd_on_logout (char const * const origin, char const * const user, char const * const wantedhost);
74     virtual void jupe (char const * const server, char const * const reason);
75     };
76    
77     static cmode_t dreamforge_mode_list[] = {
78     { 'i', CMODE_INVITE },
79     { 'm', CMODE_MOD },
80     { 'n', CMODE_NOEXT },
81     { 'p', CMODE_PRIV },
82     { 's', CMODE_SEC },
83     { 't', CMODE_TOPIC },
84     { 'c', CMODE_NOCOLOR },
85     { 'R', CMODE_REGONLY },
86     { '\0', 0 }
87     };
88    
89 pippijn 1.5 static extmode_t dreamforge_ignore_mode_list[] = {
90 pippijn 1.4 { '\0', 0 }
91     };
92    
93     static cmode_t dreamforge_status_mode_list[] = {
94     { 'o', CMODE_OP },
95     { 'v', CMODE_VOICE },
96     { '\0', 0 }
97     };
98    
99     static cmode_t dreamforge_prefix_mode_list[] = {
100     { '@', CMODE_OP },
101     { '+', CMODE_VOICE },
102     { '\0', 0 }
103     };
104    
105     /* *INDENT-ON* */
106    
107     /* login to our uplink */
108     unsigned int
109     dreamforge_handler::server_login (void)
110     {
111     int ret;
112    
113     ret = sts ("PASS %s", curr_uplink->pass);
114     if (ret == 1)
115     return 1;
116    
117     me.bursting = true;
118    
119     sts ("PROTOCTL NOQUIT WATCH=128 SAFELIST");
120     sts ("SERVER %s 1 :%s", me.name, me.desc);
121    
122     services_init ();
123    
124     return 0;
125     }
126    
127     /* introduce a client */
128     void
129     dreamforge_handler::introduce_nick (user_t *u)
130     {
131     sts ("NICK %s 1 %ld %s %s %s 0 :%s", u->nick, u->ts, u->user, u->host, me.name, u->gecos);
132     sts (":%s MODE %s +%s", u->nick, u->nick, "io");
133     }
134    
135     /* invite a user to a channel */
136     void
137     dreamforge_handler::invite_sts (user_t *sender, user_t *target, channel_t *channel)
138     {
139     sts (":%s INVITE %s %s", sender->nick, target->nick, channel->name);
140     }
141    
142     void
143     dreamforge_handler::quit_sts (user_t *u, char const * const reason)
144     {
145     if (!me.connected)
146     return;
147    
148     sts (":%s QUIT :%s", u->nick, reason);
149     }
150    
151     /* WALLOPS wrapper */
152     void
153     dreamforge_handler::wallops_sts (char const * const text)
154     {
155     sts (":%s GLOBOPS :%s", me.name, text);
156     }
157    
158     /* join a channel */
159     void
160     dreamforge_handler::join_sts (channel_t *c, user_t *u, bool isnew, char const * const modes)
161     {
162     if (isnew)
163     {
164     sts (":%s JOIN %s", u->nick, c->name);
165     if (modes[0] && modes[1])
166     sts (":%s MODE %s %s", u->nick, c->name, modes);
167     }
168     else
169     {
170     sts (":%s JOIN %s", u->nick, c->name);
171     }
172     sts (":%s MODE %s +o %s %ld", u->nick, c->name, u->nick, c->ts);
173     }
174    
175     /* kicks a user from a channel */
176     void
177     dreamforge_handler::kick (char const * const from, char const * const channel, char const * const to, char const * const reason)
178     {
179     channel_t *chan = channel_find (channel);
180     user_t *user = user_find (to);
181    
182     if (!chan || !user)
183     return;
184    
185     sts (":%s KICK %s %s :%s", from, channel, to, reason);
186    
187     chanuser_delete (chan, user);
188     }
189    
190     /* PRIVMSG wrapper */
191     void
192     dreamforge_handler::privmsg (char const * const from, char const * const target, char const * const fmt, ...)
193     {
194     va_list ap;
195     char buf[BUFSIZE];
196    
197     va_start (ap, fmt);
198     vsnprintf (buf, BUFSIZE, fmt, ap);
199     va_end (ap);
200    
201     sts (":%s PRIVMSG %s :%s", from, target, buf);
202     }
203    
204     /* NOTICE wrapper */
205     void
206     dreamforge_handler::notice_user_sts (user_t *from, user_t *target, char const * const text)
207     {
208     sts (":%s NOTICE %s :%s", from ? from->nick : me.name, target->nick, text);
209     }
210    
211     void
212     dreamforge_handler::notice_global_sts (user_t *from, char const * const mask, char const * const text)
213     {
214     node_t *n;
215     tld_t *tld;
216    
217     if (!strcmp (mask, "*"))
218     {
219     LIST_FOREACH (n, tldlist.head)
220     {
221     tld = static_cast<tld_t *> (n->data);
222     sts (":%s NOTICE %s*%s :%s", from ? from->nick : me.name, ircd->tldprefix, tld->name, text);
223     }
224     }
225     else
226     sts (":%s NOTICE %s%s :%s", from ? from->nick : me.name, ircd->tldprefix, mask, text);
227     }
228    
229     void
230     dreamforge_handler::notice_channel_sts (user_t *from, channel_t *target, char const * const text)
231     {
232     sts (":%s NOTICE %s :%s", from ? from->nick : me.name, target->name, text);
233     }
234    
235     void
236     dreamforge_handler::numeric_sts (char const * const from, int numeric, char const * const target, char const * const fmt, ...)
237     {
238     va_list ap;
239     char buf[BUFSIZE];
240    
241     va_start (ap, fmt);
242     vsnprintf (buf, BUFSIZE, fmt, ap);
243     va_end (ap);
244    
245     sts (":%s %d %s %s", from, numeric, target, buf);
246     }
247    
248     /* KILL wrapper */
249     void
250     dreamforge_handler::skill (char const * const from, char const * const nick, char const * const fmt, ...)
251     {
252     va_list ap;
253     char buf[BUFSIZE];
254    
255     va_start (ap, fmt);
256     vsnprintf (buf, BUFSIZE, fmt, ap);
257     va_end (ap);
258    
259     sts (":%s KILL %s :%s!%s!%s (%s)", from, nick, from, from, from, buf);
260     }
261    
262     /* PART wrapper */
263     void
264     dreamforge_handler::part_sts (channel_t *c, user_t *u)
265     {
266     sts (":%s PART %s", u->nick, c->name);
267     }
268    
269     /* server-to-server KLINE wrapper */
270     void
271     dreamforge_handler::kline_sts (char const * const server, char const * const user, char const * const host, long duration, char const * const reason)
272     {
273     if (!me.connected)
274     return;
275    
276     sts (":%s AKILL %s %s %ld %s %ld :%s", me.name, host, user, duration, opersvs.nick, NOW, reason);
277     }
278    
279     /* server-to-server UNKLINE wrapper */
280     void
281     dreamforge_handler::unkline_sts (char const * const server, char const * const user, char const * const host)
282     {
283     if (!me.connected)
284     return;
285    
286     sts (":%s RAKILL %s %s", me.name, host, user);
287     }
288    
289     /* topic wrapper */
290     void
291     dreamforge_handler::topic_sts (channel_t *c, char const * const setter, time_t ts, time_t prevts, char const * const topic)
292     {
293     if (!me.connected)
294     return;
295    
296     if (ts < prevts || prevts == 0)
297     sts (":%s TOPIC %s %s %ld :%s", chansvs.nick, c->name, setter, ts, topic);
298     else if (prevts > 1)
299     {
300     ts = prevts - 1;
301     sts (":%s TOPIC %s %s %ld :%s", chansvs.nick, c->name, "topictime.wrong", ts, topic);
302     c->topicts = ts;
303     }
304     else
305     {
306     notice (chansvs.nick, c->name, "Unable to change topic to: %s", topic);
307     c->topicts = 1;
308     }
309     }
310    
311     /* mode wrapper */
312     void
313     dreamforge_handler::mode_sts (char const * const sender, channel_t *target, char const * const modes)
314     {
315     if (!me.connected)
316     return;
317    
318     sts (":%s MODE %s %s", sender, target->name, modes);
319     }
320    
321     /* ping wrapper */
322     void
323     dreamforge_handler::ping_sts (void)
324     {
325     if (!me.connected)
326     return;
327    
328     sts ("PING :%s", me.name);
329     }
330    
331     /* protocol-specific stuff to do on login */
332     void
333     dreamforge_handler::ircd_on_login (char const * const origin, char const * const user, char const * const wantedhost)
334     {
335     user_t *u = user_find (origin);
336    
337     if (!me.connected || u == NULL)
338     return;
339    
340     /* Can only do this for nickserv, and can only record identified
341     * state if logged in to correct nick, sorry -- jilles
342     */
343     if (should_reg_umode (u))
344     sts (":%s SVSMODE %s +rd %ld", nicksvs.nick, origin, NOW);
345     }
346    
347     /* protocol-specific stuff to do on login */
348     bool
349     dreamforge_handler::ircd_on_logout (char const * const origin, char const * const user, char const * const wantedhost)
350     {
351     if (!me.connected)
352     return false;
353    
354     if (!nicksvs.no_nick_ownership)
355     sts (":%s SVSMODE %s -r+d %ld", nicksvs.nick, origin, NOW);
356    
357 pippijn 1.1 return false;
358 pippijn 1.4 }
359    
360     void
361     dreamforge_handler::jupe (char const * const server, char const * const reason)
362     {
363     if (!me.connected)
364     return;
365    
366     server_delete (server);
367     sts (":%s SQUIT %s :%s", opersvs.nick, server, reason);
368     sts (":%s SERVER %s 2 :%s", me.name, server, reason);
369     }
370    
371     static void
372     m_topic (sourceinfo_t *si, int parc, char *parv[])
373     {
374     channel_t *c = channel_find (parv[0]);
375    
376     if (!c)
377     return;
378    
379     handle_topic_from (si, c, parv[1], atol (parv[2]), parv[3]);
380     }
381    
382     static void
383     m_ping (sourceinfo_t *si, int parc, char *parv[])
384     {
385     /* reply to PING's */
386     sts (":%s PONG %s %s", me.name, me.name, parv[0]);
387     }
388    
389     static void
390     m_pong (sourceinfo_t *si, int parc, char *parv[])
391     {
392     server_t *s;
393    
394     /* someone replied to our PING */
395     if (!parv[0])
396     return;
397     s = server_find (parv[0]);
398     if (s == NULL)
399 pippijn 1.1 return;
400 pippijn 1.4 handle_eob (s);
401    
402     if (irccasecmp (me.actual, parv[0]))
403 pippijn 1.1 return;
404 pippijn 1.4
405     me.uplinkpong = NOW;
406    
407     /* -> :test.projectxero.net PONG test.projectxero.net :shrike.malkier.net */
408     if (me.bursting)
409     {
410     #ifdef HAVE_GETTIMEOFDAY
411     e_time (burstime, &burstime);
412    
413     slog (LG_INFO, "m_pong(): finished synching with uplink (%d %s)", (tv2ms (&burstime) > 1000) ? (tv2ms (&burstime) / 1000) : tv2ms (&burstime), (tv2ms (&burstime) > 1000) ? "s" : "ms");
414    
415     wallops ("Finished synching to network in %d %s.", (tv2ms (&burstime) > 1000) ? (tv2ms (&burstime) / 1000) : tv2ms (&burstime), (tv2ms (&burstime) > 1000) ? "s" : "ms");
416     #else
417     slog (LG_INFO, "m_pong(): finished synching with uplink");
418     wallops ("Finished synching to network.");
419     #endif
420    
421     me.bursting = false;
422     }
423     }
424    
425     static void
426     m_privmsg (sourceinfo_t *si, int parc, char *parv[])
427     {
428     if (parc != 2)
429 pippijn 1.1 return;
430 pippijn 1.4
431     handle_message (si, parv[0], false, parv[1]);
432     }
433    
434     static void
435     m_notice (sourceinfo_t *si, int parc, char *parv[])
436     {
437     if (parc != 2)
438 pippijn 1.1 return;
439 pippijn 1.4
440     handle_message (si, parv[0], true, parv[1]);
441     }
442    
443     static void
444     m_part (sourceinfo_t *si, int parc, char *parv[])
445     {
446     int chanc;
447     char *chanv[256];
448     int i;
449    
450     chanc = sjtoken (parv[0], ',', chanv);
451     for (i = 0; i < chanc; i++)
452     {
453     slog (LG_DEBUG, "m_part(): user left channel: %s -> %s", si->su->nick, chanv[i]);
454    
455     chanuser_delete (channel_find (chanv[i]), si->su);
456     }
457     }
458    
459     static void
460     m_nick (sourceinfo_t *si, int parc, char *parv[])
461     {
462     server_t *s;
463     bool realchange;
464    
465     if (parc == 8)
466     {
467     s = server_find (parv[5]);
468     if (!s)
469     {
470     slog (LG_DEBUG, "m_nick(): new user on nonexistant server: %s", parv[6]);
471     return;
472     }
473    
474     slog (LG_DEBUG, "m_nick(): new user on `%s': %s", s->name, parv[0]);
475    
476     user_add (parv[0], parv[3], parv[4], NULL, NULL, NULL, parv[7], s, atoi (parv[2]));
477    
478     /* Note: cannot rely on umode +r to see if they're identified
479     * -- jilles */
480    
481     handle_nickchange (user_find (parv[0]));
482     }
483    
484     /* if it's only 2 then it's a nickname change */
485     else if (parc == 2)
486     {
487     if (!si->su)
488     {
489     slog (LG_DEBUG, "m_nick(): server trying to change nick: %s", si->s != NULL ? si->s->name : "<none>");
490     return;
491     }
492    
493     slog (LG_DEBUG, "m_nick(): nickname change from `%s': %s", si->su->nick, parv[0]);
494    
495     realchange = irccasecmp (si->su->nick, parv[0]);
496    
497     user_changenick (si->su, parv[0], atoi (parv[1]));
498    
499     /* fix up +r if necessary -- jilles */
500     if (realchange && !nicksvs.no_nick_ownership)
501     {
502     if (should_reg_umode (si->su))
503     /* changed nick to registered one, reset +r */
504     sts (":%s SVSMODE %s +rd %ld", nicksvs.nick, parv[0], NOW);
505     else
506     /* changed from registered nick, remove +r */
507     sts (":%s SVSMODE %s -r+d %ld", nicksvs.nick, parv[0], NOW);
508     }
509    
510     handle_nickchange (si->su);
511     }
512     else
513     {
514     int i;
515     slog (LG_DEBUG, "m_nick(): got NICK with wrong number of params");
516    
517     for (i = 0; i < parc; i++)
518     slog (LG_DEBUG, "m_nick(): parv[%d] = %s", i, parv[i]);
519     }
520     }
521    
522     static void
523     m_quit (sourceinfo_t *si, int parc, char *parv[])
524     {
525     if (si->su->server == me.me)
526     {
527     slog (LG_DEBUG, "m_quit(): not destroying own user %s (fake direction)", si->su->nick);
528     return;
529     }
530     slog (LG_DEBUG, "m_quit(): user leaving: %s", si->su->nick);
531    
532     /* user_delete() takes care of removing channels and so forth */
533     user_delete (si->su);
534     }
535    
536     static void
537     m_mode (sourceinfo_t *si, int parc, char *parv[])
538     {
539     if (*parv[0] == '#')
540     channel_mode (NULL, channel_find (parv[0]), parc - 1, &parv[1]);
541     else
542     user_mode (user_find (parv[0]), parv[1]);
543     }
544    
545     static void
546     m_kick (sourceinfo_t *si, int parc, char *parv[])
547     {
548     user_t *u = user_find (parv[1]);
549     channel_t *c = channel_find (parv[0]);
550    
551     /* -> :rakaur KICK #shrike rintaun :test */
552     slog (LG_DEBUG, "m_kick(): user was kicked: %s -> %s", parv[1], parv[0]);
553    
554     if (!u)
555     {
556     slog (LG_DEBUG, "m_kick(): got kick for nonexistant user %s", parv[1]);
557     return;
558     }
559    
560     if (!c)
561     {
562     slog (LG_DEBUG, "m_kick(): got kick in nonexistant channel: %s", parv[0]);
563     return;
564     }
565    
566     if (!chanuser_find (c, u))
567     {
568     slog (LG_DEBUG, "m_kick(): got kick for %s not in %s", u->nick, c->name);
569     return;
570     }
571    
572     chanuser_delete (c, u);
573    
574     /* if they kicked us, let's rejoin */
575     if (is_internal_client (u))
576     {
577     slog (LG_DEBUG, "m_kick(): %s got kicked from %s; rejoining", u->nick, parv[0]);
578     join (parv[0], u->nick);
579     }
580     }
581    
582     static void
583     m_kill (sourceinfo_t *si, int parc, char *parv[])
584     {
585     handle_kill (si, parv[0], parc > 1 ? parv[1] : "<No reason given>");
586     }
587    
588     static void
589     m_squit (sourceinfo_t *si, int parc, char *parv[])
590     {
591     slog (LG_DEBUG, "m_squit(): server leaving: %s from %s", parv[0], parv[1]);
592     server_delete (parv[0]);
593     }
594    
595     static void
596     m_server (sourceinfo_t *si, int parc, char *parv[])
597     {
598     server_t *s;
599    
600     slog (LG_DEBUG, "m_server(): new server: %s", parv[0]);
601     s = handle_server (si, parv[0], NULL, atoi (parv[1]), parv[2]);
602    
603     if (s != NULL && s->uplink != me.me)
604     {
605     /* elicit PONG for EOB detection; pinging uplink is
606     * already done elsewhere -- jilles
607     */
608     sts (":%s PING %s %s", me.name, me.name, s->name);
609     }
610     }
611    
612     static void
613     m_stats (sourceinfo_t *si, int parc, char *parv[])
614     {
615     handle_stats (si->su, parv[0][0]);
616     }
617    
618     static void
619     m_admin (sourceinfo_t *si, int parc, char *parv[])
620     {
621     handle_admin (si->su);
622     }
623    
624     static void
625     m_version (sourceinfo_t *si, int parc, char *parv[])
626     {
627     handle_version (si->su);
628     }
629    
630     static void
631     m_info (sourceinfo_t *si, int parc, char *parv[])
632     {
633     handle_info (si->su);
634     }
635    
636     static void
637     m_whois (sourceinfo_t *si, int parc, char *parv[])
638     {
639     handle_whois (si->su, parv[1]);
640     }
641    
642     static void
643     m_trace (sourceinfo_t *si, int parc, char *parv[])
644     {
645     handle_trace (si->su, parv[0], parc >= 2 ? parv[1] : NULL);
646     }
647    
648     static void
649     m_away (sourceinfo_t *si, int parc, char *parv[])
650     {
651     handle_away (si->su, parc >= 1 ? parv[0] : NULL);
652     }
653    
654     static void
655     m_join (sourceinfo_t *si, int parc, char *parv[])
656     {
657     chanuser_t *cu;
658     node_t *n, *tn;
659     int chanc;
660     char *chanv[256];
661     int i;
662    
663     /* JOIN 0 is really a part from all channels */
664     if (parv[0][0] == '0')
665     {
666     LIST_FOREACH_SAFE (n, tn, si->su->channels.head)
667     {
668     cu = (chanuser_t *) n->data;
669     chanuser_delete (cu->chan, si->su);
670     }
671     }
672     else
673     {
674     chanc = sjtoken (parv[0], ',', chanv);
675     for (i = 0; i < chanc; i++)
676     {
677     channel_t *c = channel_find (chanv[i]);
678    
679     if (!c)
680     {
681     slog (LG_DEBUG, "m_join(): new channel: %s", parv[0]);
682     c = channel_add (chanv[i], NOW, si->su->server);
683     /* Tell the core to check mode locks now,
684     * otherwise it may only happen after the next
685     * mode change.
686     * DreamForge does not allow any redundant modes
687     * so this will not look ugly. -- jilles */
688     /* If this is in a burst, a MODE with the
689     * simple modes will follow so we can skip
690     * this. -- jilles */
691     if (!me.bursting)
692     channel_mode (NULL, c, "+");
693     }
694     chanuser_add (c, si->su->nick);
695     }
696     }
697     }
698    
699     static void
700     m_pass (sourceinfo_t *si, int parc, char *parv[])
701     {
702     if (strcmp (curr_uplink->pass, parv[0]))
703     {
704     slog (LG_INFO, "m_pass(): password mismatch from uplink; aborting");
705     runflags |= RF_SHUTDOWN;
706     }
707     }
708    
709     static void
710     m_error (sourceinfo_t *si, int parc, char *parv[])
711     {
712     slog (LG_INFO, "m_error(): error from server: %s", parv[0]);
713     }
714    
715     static void
716     m_motd (sourceinfo_t *si, int parc, char *parv[])
717     {
718     handle_motd (si->su);
719     }
720    
721     static void
722     nick_group (mynick_t *mn, myuser_t *mu, sourceinfo_t *si)
723     {
724     user_t *u;
725    
726     if (si->su != NULL && !irccasecmp (si->su->nick, mn->nick))
727     u = si->su;
728     else
729     u = user_find_named (mn->nick);
730    
731     if (u != NULL && should_reg_umode (u))
732     sts (":%s SVSMODE %s +rd %ld", nicksvs.nick, u->nick, NOW);
733     }
734    
735     static void
736     nick_ungroup (mynick_t *mn, myuser_t *mu, sourceinfo_t *si)
737     {
738     user_t *u;
739    
740     if (si->su != NULL && !irccasecmp (si->su->nick, mn->nick))
741     u = si->su;
742     else
743     u = user_find_named (mn->nick);
744    
745     if (u != NULL && !nicksvs.no_nick_ownership)
746     sts (":%s SVSMODE %s -r+d %ld", nicksvs.nick, u->nick, NOW);
747     }
748    
749     static pcommand_t const pcommands[] = {
750     { "PING", m_ping, 1, MSRC_USER | MSRC_SERVER },
751     { "PONG", m_pong, 1, MSRC_SERVER },
752     { "PRIVMSG", m_privmsg, 2, MSRC_USER },
753     { "NOTICE", m_notice, 2, MSRC_UNREG | MSRC_USER | MSRC_SERVER },
754     { "PART", m_part, 1, MSRC_USER },
755     { "NICK", m_nick, 2, MSRC_USER | MSRC_SERVER },
756     { "QUIT", m_quit, 1, MSRC_USER },
757     { "MODE", m_mode, 2, MSRC_USER | MSRC_SERVER },
758     { "KICK", m_kick, 2, MSRC_USER | MSRC_SERVER },
759     { "KILL", m_kill, 1, MSRC_USER | MSRC_SERVER },
760     { "SQUIT", m_squit, 1, MSRC_USER | MSRC_SERVER },
761     { "SERVER", m_server, 3, MSRC_UNREG | MSRC_SERVER },
762     { "STATS", m_stats, 2, MSRC_USER },
763     { "ADMIN", m_admin, 1, MSRC_USER },
764     { "VERSION", m_version, 1, MSRC_USER },
765     { "INFO", m_info, 1, MSRC_USER },
766     { "WHOIS", m_whois, 2, MSRC_USER },
767     { "TRACE", m_trace, 1, MSRC_USER },
768     { "AWAY", m_away, 0, MSRC_USER },
769     { "JOIN", m_join, 1, MSRC_USER },
770     { "PASS", m_pass, 1, MSRC_UNREG },
771     { "ERROR", m_error, 1, MSRC_UNREG | MSRC_SERVER },
772     { "TOPIC", m_topic, 4, MSRC_USER | MSRC_SERVER },
773     { "MOTD", m_motd, 1, MSRC_USER },
774     };
775    
776     dreamforge_handler::dreamforge_handler ()
777     {
778     mode_list = dreamforge_mode_list;
779     ignore_mode_list = dreamforge_ignore_mode_list;
780     status_mode_list = dreamforge_status_mode_list;
781     prefix_mode_list = dreamforge_prefix_mode_list;
782    
783     ircd = &DreamForge;
784    
785     pcommand_add (&pcommands);
786    
787     mynick_t::callback.group.attach (nick_group);
788     mynick_t::callback.ungroup.attach (nick_ungroup);
789     }
790    
791     dreamforge_handler::~dreamforge_handler ()
792     {
793     mode_list = NULL;
794     ignore_mode_list = NULL;
795     status_mode_list = NULL;
796     prefix_mode_list = NULL;
797    
798     ircd = NULL;
799    
800     mynick_t::callback.group.detach (nick_group);
801     mynick_t::callback.ungroup.detach (nick_ungroup);
802    
803     pcommand_delete (&pcommands);
804     }
805     } // namespace protocol
806    
807     #define FACREG_TYPE protocol::dreamforge_handler
808     #define FACREG_TYPE_NAME "dreamforge"
809     #define FACREG_INTERFACE_TYPE protocol::handler
810     #include <ermyth/factory_reg.h>