modules/chanserv/list.C

/**
 * list.C: This file contains code for the ChanServ LIST function.
 *
 * 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 Robin Burchell, et al.
 * Rights to this code are as documented in doc/pod/license.pod.
 *
 * $Id: list.C,v 1.8 2007-09-16 18:54:43 pippijn Exp $
 */

#include <boost/foreach.hpp>

#include "atheme.h"
#include <ermyth/module.h>
#include <account/myuser.h>
#include <account/mychan.h>

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

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

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

command_t const cs_list = { "LIST", N_("Lists channels registered matching a given pattern."), PRIV_CHAN_AUSPEX, 1, cs_cmd_list };

E cmdvec cs_cmdtree;
E helpvec cs_helptree;

bool
_modinit (module *m)
{
  cs_cmdtree << cs_list;
  help_addentry (cs_helptree, "LIST", "help/chanserv/list", NULL);

  return true;
}

void
_moddeinit ()
{
  cs_cmdtree >> cs_list;
  help_delentry (cs_helptree, "LIST");
}

static void
cs_cmd_list (sourceinfo_t *si, int parc, char *parv[])
{
  mychan_t *mc;
  char *chanpattern = parv[0];
  char buf[BUFSIZE];
  unsigned int matches = 0;

  if (!chanpattern)
    {
      command_fail (si, fault::needmoreparams, STR_INSUFFICIENT_PARAMS, "LIST");
      command_fail (si, fault::needmoreparams, _("Syntax: LIST <channel pattern>"));
      return;
    }

  snoop ("LIST:CHANNELS: \2%s\2 by \2%s\2", chanpattern, get_oper_name (si));
  command_success_nodata (si, _("Channels matching pattern \2%s\2:"), chanpattern);

  foreach (mychan_t::pair_type &mp, mychan_t::map)
    {
      mc = mp.second;
      if (!match (chanpattern, mc->name))
        {
          /* in the future we could add a LIMIT parameter */
          *buf = '\0';

          if (mc->find_metadata ("private:mark:setter"))
            strlcat (buf, "\2[marked]\2", BUFSIZE);
          if (mc->find_metadata ("private:close:closer"))
            {
              if (*buf)
                strlcat (buf, " ", BUFSIZE);
              
              strlcat (buf, "\2[closed]\2", BUFSIZE);
            }
          if (mc->flags & MC_HOLD)
            {
              if (*buf)
                strlcat (buf, " ", BUFSIZE);
              
              strlcat (buf, "\2[held]\2", BUFSIZE);
            }
          
          command_success_nodata (si, "- %s (%s) %s", mc->name, mc->founder_names (), buf);
          matches++;
        }
    }

  logcommand (si, CMDLOG_ADMIN, "LIST %s (%d matches)", chanpattern, matches);
  if (matches == 0)
    command_success_nodata (si, _("No channel matched pattern \2%s\2"), chanpattern);
  else
    command_success_nodata (si, ngettext (N_("\2%d\2 match for pattern \2%s\2"), N_("\2%d\2 matches for pattern \2%s\2"), matches), matches, chanpattern);
}
Revision:	1.9
Committed:	Sat Sep 22 14:27:27 2007 UTC (19 years ago) by pippijn
Content type:	text/plain
Branch:	MAIN
CVS Tags:	HEAD
Changes since 1.8:	+3 -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			* list.C: This file contains code for the ChanServ LIST function.
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 Robin Burchell, 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: list.C,v 1.8 2007-09-16 18:54:43 pippijn Exp $
13	pippijn	1.1	*/
14
15	pippijn	1.6	#include <boost/foreach.hpp>
16
17	pippijn	1.1	#include "atheme.h"
18	pippijn	1.5	#include <ermyth/module.h>
19	pippijn	1.1	#include <account/myuser.h>
20			#include <account/mychan.h>
21
22	pippijn	1.9	static char const rcsid[] = "$Id: list.C,v 1.8 2007-09-16 18:54:43 pippijn Exp $";
23	pippijn	1.1
24	pippijn	1.9	REGISTER_MODULE ("chanserv/list", false, "The Ermyth Team <http://ermyth.xinutec.org>");
25	pippijn	1.1
26			static void cs_cmd_list (sourceinfo_t si, int parc, char parv[]);
27
28	pippijn	1.5	command_t const cs_list = { "LIST", N_("Lists channels registered matching a given pattern."), PRIV_CHAN_AUSPEX, 1, cs_cmd_list };
29	pippijn	1.1
30	pippijn	1.5	E cmdvec cs_cmdtree;
31			E helpvec cs_helptree;
32	pippijn	1.1
33	pippijn	1.5	bool
34			_modinit (module *m)
35	pippijn	1.1	{
36			cs_cmdtree << cs_list;
37	pippijn	1.4	help_addentry (cs_helptree, "LIST", "help/chanserv/list", NULL);
38	pippijn	1.5
39			return true;
40	pippijn	1.1	}
41
42			void
43			_moddeinit ()
44			{
45			cs_cmdtree >> cs_list;
46			help_delentry (cs_helptree, "LIST");
47			}
48
49			static void
50			cs_cmd_list (sourceinfo_t si, int parc, char parv[])
51			{
52			mychan_t *mc;
53			char *chanpattern = parv[0];
54			char buf[BUFSIZE];
55			unsigned int matches = 0;
56
57			if (!chanpattern)
58			{
59	pippijn	1.6	command_fail (si, fault::needmoreparams, STR_INSUFFICIENT_PARAMS, "LIST");
60			command_fail (si, fault::needmoreparams, _("Syntax: LIST <channel pattern>"));
61	pippijn	1.1	return;
62			}
63
64			snoop ("LIST:CHANNELS: \2%s\2 by \2%s\2", chanpattern, get_oper_name (si));
65			command_success_nodata (si, _("Channels matching pattern \2%s\2:"), chanpattern);
66
67	pippijn	1.7	foreach (mychan_t::pair_type &mp, mychan_t::map)
68	pippijn	1.6	{
69			mc = mp.second;
70			if (!match (chanpattern, mc->name))
71			{
72			/* in the future we could add a LIMIT parameter */
73			*buf = '\0';
74
75			if (mc->find_metadata ("private:mark:setter"))
76			strlcat (buf, "\2[marked]\2", BUFSIZE);
77			if (mc->find_metadata ("private:close:closer"))
78			{
79			if (*buf)
80			strlcat (buf, " ", BUFSIZE);
81
82			strlcat (buf, "\2[closed]\2", BUFSIZE);
83			}
84			if (mc->flags & MC_HOLD)
85			{
86			if (*buf)
87			strlcat (buf, " ", BUFSIZE);
88
89			strlcat (buf, "\2[held]\2", BUFSIZE);
90			}
91
92			command_success_nodata (si, "- %s (%s) %s", mc->name, mc->founder_names (), buf);
93			matches++;
94			}
95			}
96	pippijn	1.1
97			logcommand (si, CMDLOG_ADMIN, "LIST %s (%d matches)", chanpattern, matches);
98			if (matches == 0)
99			command_success_nodata (si, _("No channel matched pattern \2%s\2"), chanpattern);
100			else
101			command_success_nodata (si, ngettext (N_("\2%d\2 match for pattern \2%s\2"), N_("\2%d\2 matches for pattern \2%s\2"), matches), matches, chanpattern);
102			}