modules/chanserv/info.C

/**
 * info.C: This file contains code for the ChanServ INFO functions.
 *
 * Copyright © 2007 Pippijn van Steenhoven / The Ermyth Team
 * Rights to this code are as documented in COPYING.
 *
 *
 * Portions of this file were derived from sources bearing the following license:
 * Copyright © 2005 William Pitcock, et al.
 * Rights to this code are as documented in doc/pod/license.pod.
 *
 * $Id: info.C,v 1.8 2007-09-16 18:54:42 pippijn Exp $
 */

#include "atheme.h"
#include <util/time.h>
#include <util/time.h>
#include <util/numeric.h>
#include <libermyth.h>
#include <ermyth/module.h>
#include <account/myuser.h>
#include <account/mychan.h>

static char const rcsid[] = "$Id: info.C,v 1.8 2007-09-16 18:54:42 pippijn Exp $";

REGISTER_MODULE ("chanserv/info", false, "The Ermyth Team <http://ermyth.xinutec.org>");

static void cs_cmd_info (sourceinfo_t *si, int parc, char *parv[]);

command_t const cs_info = { "INFO", N_("Displays information on registrations."), AC_NONE, 1, cs_cmd_info };

E cmdvec cs_cmdtree;
E helpvec cs_helptree;

bool
_modinit (module *m)
{
  cs_cmdtree << cs_info;
  help_addentry (cs_helptree, "INFO", "help/chanserv/info", NULL);

  return true;
}

void
_moddeinit ()
{
  cs_cmdtree >> cs_info;
  help_delentry (cs_helptree, "INFO");
}

static void
cs_cmd_info (sourceinfo_t *si, int parc, char *parv[])
{
  mychan_t *mc;
  char *name = parv[0];
  char buf[BUFSIZE], strfbuf[32];
  struct tm tm;
  metadata *md;
  char *p, *q, *qq;
  int dir;

  if (!name)
    {
      command_fail (si, fault::needmoreparams, STR_INSUFFICIENT_PARAMS, "INFO");
      command_fail (si, fault::needmoreparams, _("Syntax: INFO <#channel>"));
      return;
    }

  if (*name != '#')
    {
      command_fail (si, fault::badparams, STR_INVALID_PARAMS, "INFO");
      command_fail (si, fault::badparams, _("Syntax: INFO <#channel>"));
      return;
    }

  if (!(mc = mychan_t::find (name)))
    {
      command_fail (si, fault::nosuch_target, _("\2%s\2 is not registered."), name);
      return;
    }

  if (!has_priv (si, PRIV_CHAN_AUSPEX) && (md = mc->find_metadata ("private:close:closer")))
    {
      command_fail (si, fault::noprivs, _("\2%s\2 has been closed down by the %s administration."), mc->name, me.netname);
      return;
    }

  tm = *localtime (&mc->registered);
  strftime (strfbuf, sizeof (strfbuf) - 1, "%b %d %H:%M:%S %Y", &tm);

  command_success_nodata (si, _("Information on \2%s\2:"), mc->name);

  command_success_nodata (si, _("Founder    : %s"), mc->founder_names ());

  command_success_nodata (si, _("Registered : %s (%s ago)"), strfbuf, time_ago (mc->registered));

  if (NOW - mc->used >= 86400)
    {
      tm = *localtime (&mc->used);
      strftime (strfbuf, sizeof (strfbuf) - 1, "%b %d %H:%M:%S %Y", &tm);
      command_success_nodata (si, _("Last used  : %s (%s ago)"), strfbuf, time_ago (mc->used));
    }

  md = mc->find_metadata ("private:mlockext");
  if (mc->mlock_on || mc->mlock_off || mc->mlock_limit || mc->mlock_key || md)
    {
      char params[BUFSIZE];

      if (md != NULL && strlen (md->value) > 450)
        {
          /* Be safe */
          command_success_nodata (si, _("Mode lock is too long, not entirely shown"));
          md = NULL;
        }

      *buf = 0;
      *params = 0;
      dir = MTYPE_NUL;

      if (mc->mlock_on)
        {
          if (dir != MTYPE_ADD)
            dir = MTYPE_ADD, strcat (buf, "+");
          strcat (buf, flags_to_string (mc->mlock_on));

        }

      if (mc->mlock_limit)
        {
          if (dir != MTYPE_ADD)
            dir = MTYPE_ADD, strcat (buf, "+");
          strcat (buf, "l");
          strcat (params, " ");
          strcat (params, itoa (mc->mlock_limit));
        }

      if (mc->mlock_key)
        {
          if (dir != MTYPE_ADD)
            dir = MTYPE_ADD, strcat (buf, "+");
          strcat (buf, "k");
          strcat (params, " *");
        }

      if (md)
        {
          p = md->value;
          q = buf + strlen (buf);
          while (*p != '\0')
            {
              if (p[1] != ' ' && p[1] != '\0')
                {
                  if (dir != MTYPE_ADD)
                    dir = MTYPE_ADD, *q++ = '+';
                  *q++ = *p++;
                  strcat (params, " ");
                  qq = params + strlen (params);
                  while (*p != '\0' && *p != ' ')
                    *qq++ = *p++;
                  *qq = '\0';
                }
              else
                {
                  p++;
                  while (*p != '\0' && *p != ' ')
                    p++;
                }
              while (*p == ' ')
                p++;
            }
          *q = '\0';
        }

      if (mc->mlock_off)
        {
          if (dir != MTYPE_DEL)
            dir = MTYPE_DEL, strcat (buf, "-");
          strcat (buf, flags_to_string (mc->mlock_off));
          if (mc->mlock_off & CMODE_LIMIT)
            strcat (buf, "l");
          if (mc->mlock_off & CMODE_KEY)
            strcat (buf, "k");
        }

      if (md)
        {
          p = md->value;
          q = buf + strlen (buf);
          while (*p != '\0')
            {
              if (p[1] == ' ' || p[1] == '\0')
                {
                  if (dir != MTYPE_DEL)
                    dir = MTYPE_DEL, *q++ = '-';
                  *q++ = *p;
                }
              p++;
              while (*p != '\0' && *p != ' ')
                p++;
              while (*p == ' ')
                p++;
            }
          *q = '\0';
        }

      if (*buf)
        command_success_nodata (si, _("Mode lock  : %s%s"), buf, params);
    }


  if ((md = mc->find_metadata ("url")))
    command_success_nodata (si, "URL        : %s", md->value);

  if ((md = mc->find_metadata ("email")))
    command_success_nodata (si, "Email      : %s", md->value);

  *buf = '\0';

  if (MC_HOLD & mc->flags)
    strcat (buf, "HOLD");

  if (MC_SECURE & mc->flags)
    {
      if (*buf)
        strcat (buf, " ");

      strcat (buf, "SECURE");
    }

  if (MC_VERBOSE & mc->flags)
    {
      if (*buf)
        strcat (buf, " ");

      strcat (buf, "VERBOSE");
    }
  if (MC_VERBOSE_OPS & mc->flags)
    {
      if (*buf)
        strcat (buf, " ");

      strcat (buf, "VERBOSE_OPS");
    }

  if (MC_STAFFONLY & mc->flags)
    {
      if (*buf)
        strcat (buf, " ");

      strcat (buf, "STAFFONLY");
    }

  if (MC_KEEPTOPIC & mc->flags)
    {
      if (*buf)
        strcat (buf, " ");

      strcat (buf, "KEEPTOPIC");
    }

  if (MC_TOPICLOCK & mc->flags)
    {
      if (*buf)
        strcat (buf, " ");

      strcat (buf, "TOPICLOCK");
    }

  if (MC_GUARD & mc->flags)
    {
      if (*buf)
        strcat (buf, " ");

      strcat (buf, "GUARD");

      if (chansvs.fantasy && !mc->find_metadata ("disable_fantasy"))
        strcat (buf, " FANTASY");
    }

  if (*buf)
    command_success_nodata (si, _("Flags      : %s"), buf);

  if (has_priv (si, PRIV_CHAN_AUSPEX) && (md = mc->find_metadata ("private:mark:setter")))
    {
      char const * const setter = md->value;
      time_t ts;

      md = mc->find_metadata ("private:mark:reason");
      char const * const reason = md != NULL ? md->value : "unknown";

      md = mc->find_metadata ("private:mark:timestamp");
      ts = md != NULL ? atoi (md->value) : 0;

      tm = *localtime (&ts);
      strftime (strfbuf, sizeof (strfbuf) - 1, "%b %d %H:%M:%S %Y", &tm);

      command_success_nodata (si, _("%s was \2MARKED\2 by %s on %s (%s)"), mc->name, setter, strfbuf, reason);
    }

  if (has_priv (si, PRIV_CHAN_AUSPEX) && (MC_INHABIT & mc->flags))
    command_success_nodata (si, _("%s is temporarily holding this channel."), chansvs.nick);

  if (has_priv (si, PRIV_CHAN_AUSPEX) && (md = mc->find_metadata ("private:close:closer")))
    {
      char const * const setter = md->value;
      time_t ts;

      md = mc->find_metadata ("private:close:reason");
      char const * const reason = md != NULL ? md->value : "unknown";

      md = mc->find_metadata ("private:close:timestamp");
      ts = md != NULL ? atoi (md->value) : 0;

      tm = *localtime (&ts);
      strftime (strfbuf, sizeof (strfbuf) - 1, "%b %d %H:%M:%S %Y", &tm);

      command_success_nodata (si, _("%s was \2CLOSED\2 by %s on %s (%s)"), mc->name, setter, strfbuf, reason);
    }

  mc->callback.info (mc, si);

  command_success_nodata (si, _("\2*** End of Info ***\2"));
  logcommand (si, CMDLOG_GET, "%s INFO", mc->name);
}
Revision:	1.9
Committed:	Sat Sep 22 14:27:27 2007 UTC (19 years, 1 month ago) by pippijn
Content type:	text/plain
Branch:	MAIN
CVS Tags:	HEAD
Changes since 1.8:	+7 -3 lines
Log Message:	split up ermyth into ermyth-modules, libermyth (currently just ermyth-util) and ermyth-core
#	User	Rev	Content
1	pippijn	1.8	/**
2			* info.C: This file contains code for the ChanServ INFO functions.
3			*
4			* Copyright © 2007 Pippijn van Steenhoven / The Ermyth Team
5			* Rights to this code are as documented in COPYING.
6			*
7			*
8			* Portions of this file were derived from sources bearing the following license:
9	pippijn	1.5	* Copyright © 2005 William Pitcock, et al.
10	pippijn	1.2	* Rights to this code are as documented in doc/pod/license.pod.
11	pippijn	1.1	*
12	pippijn	1.9	* $Id: info.C,v 1.8 2007-09-16 18:54:42 pippijn Exp $
13	pippijn	1.1	*/
14
15			#include "atheme.h"
16	pippijn	1.9	#include <util/time.h>
17			#include <util/time.h>
18			#include <util/numeric.h>
19			#include <libermyth.h>
20	pippijn	1.5	#include <ermyth/module.h>
21	pippijn	1.1	#include <account/myuser.h>
22			#include <account/mychan.h>
23
24	pippijn	1.9	static char const rcsid[] = "$Id: info.C,v 1.8 2007-09-16 18:54:42 pippijn Exp $";
25	pippijn	1.1
26	pippijn	1.9	REGISTER_MODULE ("chanserv/info", false, "The Ermyth Team <http://ermyth.xinutec.org>");
27	pippijn	1.1
28			static void cs_cmd_info (sourceinfo_t si, int parc, char parv[]);
29
30	pippijn	1.5	command_t const cs_info = { "INFO", N_("Displays information on registrations."), AC_NONE, 1, cs_cmd_info };
31	pippijn	1.1
32	pippijn	1.5	E cmdvec cs_cmdtree;
33			E helpvec cs_helptree;
34	pippijn	1.1
35	pippijn	1.5	bool
36			_modinit (module *m)
37	pippijn	1.1	{
38			cs_cmdtree << cs_info;
39	pippijn	1.4	help_addentry (cs_helptree, "INFO", "help/chanserv/info", NULL);
40	pippijn	1.5
41			return true;
42	pippijn	1.1	}
43
44			void
45			_moddeinit ()
46			{
47			cs_cmdtree >> cs_info;
48			help_delentry (cs_helptree, "INFO");
49			}
50
51			static void
52			cs_cmd_info (sourceinfo_t si, int parc, char parv[])
53			{
54			mychan_t *mc;
55			char *name = parv[0];
56			char buf[BUFSIZE], strfbuf[32];
57			struct tm tm;
58	pippijn	1.7	metadata *md;
59	pippijn	1.1	char p, q, *qq;
60			int dir;
61
62			if (!name)
63			{
64	pippijn	1.6	command_fail (si, fault::needmoreparams, STR_INSUFFICIENT_PARAMS, "INFO");
65			command_fail (si, fault::needmoreparams, _("Syntax: INFO <#channel>"));
66	pippijn	1.1	return;
67			}
68
69			if (*name != '#')
70			{
71	pippijn	1.6	command_fail (si, fault::badparams, STR_INVALID_PARAMS, "INFO");
72			command_fail (si, fault::badparams, _("Syntax: INFO <#channel>"));
73	pippijn	1.1	return;
74			}
75
76	pippijn	1.6	if (!(mc = mychan_t::find (name)))
77	pippijn	1.1	{
78	pippijn	1.6	command_fail (si, fault::nosuch_target, _("\2%s\2 is not registered."), name);
79	pippijn	1.1	return;
80			}
81
82			if (!has_priv (si, PRIV_CHAN_AUSPEX) && (md = mc->find_metadata ("private:close:closer")))
83			{
84	pippijn	1.6	command_fail (si, fault::noprivs, _("\2%s\2 has been closed down by the %s administration."), mc->name, me.netname);
85	pippijn	1.1	return;
86			}
87
88			tm = *localtime (&mc->registered);
89			strftime (strfbuf, sizeof (strfbuf) - 1, "%b %d %H:%M:%S %Y", &tm);
90
91			command_success_nodata (si, _("Information on \2%s\2:"), mc->name);
92
93	pippijn	1.6	command_success_nodata (si, _("Founder : %s"), mc->founder_names ());
94	pippijn	1.1
95			command_success_nodata (si, _("Registered : %s (%s ago)"), strfbuf, time_ago (mc->registered));
96
97			if (NOW - mc->used >= 86400)
98			{
99			tm = *localtime (&mc->used);
100			strftime (strfbuf, sizeof (strfbuf) - 1, "%b %d %H:%M:%S %Y", &tm);
101			command_success_nodata (si, _("Last used : %s (%s ago)"), strfbuf, time_ago (mc->used));
102			}
103
104			md = mc->find_metadata ("private:mlockext");
105			if (mc->mlock_on \|\| mc->mlock_off \|\| mc->mlock_limit \|\| mc->mlock_key \|\| md)
106			{
107			char params[BUFSIZE];
108
109			if (md != NULL && strlen (md->value) > 450)
110			{
111			/* Be safe */
112			command_success_nodata (si, _("Mode lock is too long, not entirely shown"));
113			md = NULL;
114			}
115
116			*buf = 0;
117			*params = 0;
118			dir = MTYPE_NUL;
119
120			if (mc->mlock_on)
121			{
122			if (dir != MTYPE_ADD)
123			dir = MTYPE_ADD, strcat (buf, "+");
124			strcat (buf, flags_to_string (mc->mlock_on));
125
126			}
127
128			if (mc->mlock_limit)
129			{
130			if (dir != MTYPE_ADD)
131			dir = MTYPE_ADD, strcat (buf, "+");
132			strcat (buf, "l");
133			strcat (params, " ");
134			strcat (params, itoa (mc->mlock_limit));
135			}
136
137			if (mc->mlock_key)
138			{
139			if (dir != MTYPE_ADD)
140			dir = MTYPE_ADD, strcat (buf, "+");
141			strcat (buf, "k");
142			strcat (params, " *");
143			}
144
145			if (md)
146			{
147			p = md->value;
148			q = buf + strlen (buf);
149			while (*p != '\0')
150			{
151			if (p[1] != ' ' && p[1] != '\0')
152			{
153			if (dir != MTYPE_ADD)
154			dir = MTYPE_ADD, *q++ = '+';
155			q++ = p++;
156			strcat (params, " ");
157			qq = params + strlen (params);
158			while (p != '\0' && p != ' ')
159			qq++ = p++;
160			*qq = '\0';
161			}
162			else
163			{
164			p++;
165			while (p != '\0' && p != ' ')
166			p++;
167			}
168			while (*p == ' ')
169			p++;
170			}
171			*q = '\0';
172			}
173
174			if (mc->mlock_off)
175			{
176			if (dir != MTYPE_DEL)
177			dir = MTYPE_DEL, strcat (buf, "-");
178			strcat (buf, flags_to_string (mc->mlock_off));
179			if (mc->mlock_off & CMODE_LIMIT)
180			strcat (buf, "l");
181			if (mc->mlock_off & CMODE_KEY)
182			strcat (buf, "k");
183			}
184
185			if (md)
186			{
187			p = md->value;
188			q = buf + strlen (buf);
189			while (*p != '\0')
190			{
191			if (p[1] == ' ' \|\| p[1] == '\0')
192			{
193			if (dir != MTYPE_DEL)
194			dir = MTYPE_DEL, *q++ = '-';
195			q++ = p;
196			}
197			p++;
198			while (p != '\0' && p != ' ')
199			p++;
200			while (*p == ' ')
201			p++;
202			}
203			*q = '\0';
204			}
205
206			if (*buf)
207	pippijn	1.5	command_success_nodata (si, _("Mode lock : %s%s"), buf, params);
208	pippijn	1.1	}
209
210
211			if ((md = mc->find_metadata ("url")))
212			command_success_nodata (si, "URL : %s", md->value);
213
214			if ((md = mc->find_metadata ("email")))
215			command_success_nodata (si, "Email : %s", md->value);
216
217			*buf = '\0';
218
219			if (MC_HOLD & mc->flags)
220			strcat (buf, "HOLD");
221
222			if (MC_SECURE & mc->flags)
223			{
224			if (*buf)
225			strcat (buf, " ");
226
227			strcat (buf, "SECURE");
228			}
229
230			if (MC_VERBOSE & mc->flags)
231			{
232			if (*buf)
233			strcat (buf, " ");
234
235			strcat (buf, "VERBOSE");
236			}
237			if (MC_VERBOSE_OPS & mc->flags)
238			{
239			if (*buf)
240			strcat (buf, " ");
241
242			strcat (buf, "VERBOSE_OPS");
243			}
244
245			if (MC_STAFFONLY & mc->flags)
246			{
247			if (*buf)
248			strcat (buf, " ");
249
250			strcat (buf, "STAFFONLY");
251			}
252
253			if (MC_KEEPTOPIC & mc->flags)
254			{
255			if (*buf)
256			strcat (buf, " ");
257
258			strcat (buf, "KEEPTOPIC");
259			}
260
261			if (MC_TOPICLOCK & mc->flags)
262			{
263			if (*buf)
264			strcat (buf, " ");
265
266			strcat (buf, "TOPICLOCK");
267			}
268
269			if (MC_GUARD & mc->flags)
270			{
271			if (*buf)
272			strcat (buf, " ");
273
274			strcat (buf, "GUARD");
275
276			if (chansvs.fantasy && !mc->find_metadata ("disable_fantasy"))
277			strcat (buf, " FANTASY");
278			}
279
280			if (*buf)
281			command_success_nodata (si, _("Flags : %s"), buf);
282
283			if (has_priv (si, PRIV_CHAN_AUSPEX) && (md = mc->find_metadata ("private:mark:setter")))
284			{
285	pippijn	1.5	char const * const setter = md->value;
286	pippijn	1.1	time_t ts;
287
288			md = mc->find_metadata ("private:mark:reason");
289	pippijn	1.5	char const * const reason = md != NULL ? md->value : "unknown";
290	pippijn	1.1
291			md = mc->find_metadata ("private:mark:timestamp");
292			ts = md != NULL ? atoi (md->value) : 0;
293
294			tm = *localtime (&ts);
295			strftime (strfbuf, sizeof (strfbuf) - 1, "%b %d %H:%M:%S %Y", &tm);
296
297			command_success_nodata (si, _("%s was \2MARKED\2 by %s on %s (%s)"), mc->name, setter, strfbuf, reason);
298			}
299
300			if (has_priv (si, PRIV_CHAN_AUSPEX) && (MC_INHABIT & mc->flags))
301			command_success_nodata (si, _("%s is temporarily holding this channel."), chansvs.nick);
302
303			if (has_priv (si, PRIV_CHAN_AUSPEX) && (md = mc->find_metadata ("private:close:closer")))
304			{
305	pippijn	1.5	char const * const setter = md->value;
306	pippijn	1.1	time_t ts;
307
308			md = mc->find_metadata ("private:close:reason");
309	pippijn	1.5	char const * const reason = md != NULL ? md->value : "unknown";
310	pippijn	1.1
311			md = mc->find_metadata ("private:close:timestamp");
312			ts = md != NULL ? atoi (md->value) : 0;
313
314			tm = *localtime (&ts);
315			strftime (strfbuf, sizeof (strfbuf) - 1, "%b %d %H:%M:%S %Y", &tm);
316
317			command_success_nodata (si, _("%s was \2CLOSED\2 by %s on %s (%s)"), mc->name, setter, strfbuf, reason);
318			}
319
320	pippijn	1.5	mc->callback.info (mc, si);
321	pippijn	1.1
322			command_success_nodata (si, _("\2* End of Info *\2"));
323			logcommand (si, CMDLOG_GET, "%s INFO", mc->name);
324			}