modules/nickserv/info.C

/**
 * info.C: This file contains code for the NickServ 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-2006 William Pitcock, et al.
 * Rights to this code are as documented in doc/pod/license.pod.
 *
 * $Id: info.C,v 1.9 2007-09-16 18:54:43 pippijn Exp $
 */

#include "atheme.h"
#include <util/time.h>
#include <util/time.h>
#include <ermyth/module.h>
#include <account/mynick.h>
#include <account/myuser.h>

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

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

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

command_t const ns_info = { "INFO", N_("Displays information on registrations."), AC_NONE, 2, ns_cmd_info };

E cmdvec ns_cmdtree;
E helpvec ns_helptree;

bool
_modinit (module *m)
{
  ns_cmdtree << ns_info;
  help_addentry (ns_helptree, "INFO", "help/nickserv/info", NULL);

  return true;
}

void
_moddeinit ()
{
  ns_cmdtree >> ns_info;
  help_delentry (ns_helptree, "INFO");
}

static void
ns_cmd_info (sourceinfo_t *si, int parc, char *parv[])
{
  myuser_t *mu;
  mynick_t *mn = NULL;
  user_t *u;
  char *name = parv[0];
  char buf[BUFSIZE], strfbuf[32], lastlogin[32], *p;
  struct tm tm, tm2;
  metadata *md;
  node_t *n;

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

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

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

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

  command_success_nodata (si, _("Registered: %s (%s ago)"), strfbuf, time_ago (mu->registered));
  
  if ((md = mu->find_metadata ("private:host:vhost")))
    {
      strlcpy (buf, md->value, sizeof buf);
      if ((md = mu->find_metadata ("private:usercloak")))
        {
          p = strchr (buf, '@');
          if (p == NULL)
            p = buf;
          else
            p++;
          strlcpy (p, md->value, sizeof buf - (p - buf));
        }
      command_success_nodata (si, _("Last address: %s"), buf);
    }
  
  if (has_priv (si, PRIV_USER_AUSPEX))
    {
      if ((md = mu->find_metadata ("private:host:actual")))
        command_success_nodata (si, _("Last real address: %s"), md->value);
    }
  
  if (mu->logins.empty ())
    command_success_nodata (si, _("Last seen: %s (%s ago)"), lastlogin, time_ago (mu->lastlogin));
  else if (mu == si->smu || has_priv (si, PRIV_USER_AUSPEX))
    {
      myuser_t::login_vector::iterator it, it_end;
      buf[0] = '\0';
      for (it = mu->logins.begin (), it_end = mu->logins.end (); it != it_end; ++it)
        {
          if (strlen (buf) > 80)
            {
              command_success_nodata (si, _("Logins from: %s"), buf);
              buf[0] = '\0';
            }
          if (buf[0])
            strcat (buf, " ");
          strcat (buf, (*it)->nick);
        }
      if (buf[0])
        command_success_nodata (si, _("Logins from: %s"), buf);
    }
  else
    command_success_nodata (si, _("Logins from: <hidden>"));

  if (!nicksvs.no_nick_ownership)
    {
      /* describe queried nick */
      mn = mynick_t::find (*name == '=' ? name + 1 : name);
      if (mn != NULL && mn->owner == mu)
        {
          tm = *localtime (&mn->registered);
          strftime (strfbuf, sizeof (strfbuf) - 1, "%b %d %H:%M:%S %Y", &tm);
          command_success_nodata (si, _("Nick %s registered: %s (%s ago)"), mn->nick, strfbuf, time_ago (mn->registered));
          u = user_find_named (mn->nick);
          if (u != NULL && u->myuser == mu)
            command_success_nodata (si, _("Nick %s is currently online"), mn->nick);
          else
            {
              tm = *localtime (&mn->lastseen);
              strftime (strfbuf, sizeof (strfbuf) - 1, "%b %d %H:%M:%S %Y", &tm);
              command_success_nodata (si, _("Nick %s last seen: %s (%s ago)"), mn->nick, strfbuf, time_ago (mn->lastseen));
            }
        }
      /* list registered nicks if privileged */
      if (mu == si->smu || has_priv (si, PRIV_USER_AUSPEX))
        {
          buf[0] = '\0';
          LIST_FOREACH (n, mu->nicks.head)
          {
            if (strlen (buf) > 80)
              {
                command_success_nodata (si, _("Registered nicks: %s"), buf);
                buf[0] = '\0';
              }
            if (buf[0])
              strcat (buf, " ");
            strcat (buf, ((mynick_t *) (n->data))->nick);
          }
          if (buf[0])
            command_success_nodata (si, _("Registered nicks: %s"), buf);
        }
    }

  if (!(mu->flags & MU_HIDEMAIL) || (si->smu == mu || has_priv (si, PRIV_USER_AUSPEX)))
    command_success_nodata (si, _("Email: %s%s"), mu->email, (mu->flags & MU_HIDEMAIL) ? " (hidden)" : "");

  *buf = '\0';

  if (mu->flags & MU_HIDEMAIL)
    strcat (buf, "HideMail");

  if (mu->flags & MU_HOLD)
    {
      if (*buf)
        strcat (buf, ", ");

      strcat (buf, "Hold");
    }
  if (mu->flags & MU_NEVEROP)
    {
      if (*buf)
        strcat (buf, ", ");

      strcat (buf, "NeverOp");
    }
  if (mu->flags & MU_NOOP)
    {
      if (*buf)
        strcat (buf, ", ");

      strcat (buf, "NoOp");
    }
  if (mu->flags & MU_NOMEMO)
    {
      if (*buf)
        strcat (buf, ", ");

      strcat (buf, "NoMemo");
    }
  if (mu->flags & MU_EMAILMEMOS)
    {
      if (*buf)
        strcat (buf, ", ");

      strcat (buf, "EMailMemos");
    }

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

  if (mu->soper && (mu == si->smu || has_priv (si, PRIV_VIEWPRIVS)))
    {
      command_success_nodata (si, _("Oper class: %s"), mu->soper->operclass ? mu->soper->operclass->name : mu->soper->classname);
    }

  if (has_priv (si, PRIV_USER_AUSPEX) && (md = mu->find_metadata ("private:freeze:freezer")))
    {
      char const * const setter = md->value;
      time_t ts;

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

      md = mu->find_metadata ("private:freeze: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 \2FROZEN\2 by %s on %s (%s)"), mu->name, setter, strfbuf, reason);
    }

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

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

      md = mu->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)"), mu->name, setter, strfbuf, reason);
    }

  if (mu->flags & MU_WAITAUTH)
    command_success_nodata (si, _("%s has not completed registration verification"), mu->name);

  mn->callback.info (mn, mu, si);

  command_success_nodata (si, _("*** \2End of Info\2 ***"));

  logcommand (si, CMDLOG_GET, "INFO %s", mu->name);
}
Revision:	1.10
Committed:	Sat Sep 22 14:27:27 2007 UTC (16 years, 8 months ago) by pippijn
Content type:	text/plain
Branch:	MAIN
CVS Tags:	HEAD
Changes since 1.9:	+5 -3 lines
Log Message:	split up ermyth into ermyth-modules, libermyth (currently just ermyth-util) and ermyth-core
#	Content
1	/**
2	* info.C: This file contains code for the NickServ 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	* Copyright © 2005-2006 William Pitcock, et al.
10	* Rights to this code are as documented in doc/pod/license.pod.
11	*
12	* $Id: info.C,v 1.9 2007-09-16 18:54:43 pippijn Exp $
13	*/
14
15	#include "atheme.h"
16	#include <util/time.h>
17	#include <util/time.h>
18	#include <ermyth/module.h>
19	#include <account/mynick.h>
20	#include <account/myuser.h>
21
22	static char const rcsid[] = "$Id: info.C,v 1.9 2007-09-16 18:54:43 pippijn Exp $";
23
24	REGISTER_MODULE ("nickserv/info", false, "The Ermyth Team <http://ermyth.xinutec.org>");
25
26	static void ns_cmd_info (sourceinfo_t si, int parc, char parv[]);
27
28	command_t const ns_info = { "INFO", N_("Displays information on registrations."), AC_NONE, 2, ns_cmd_info };
29
30	E cmdvec ns_cmdtree;
31	E helpvec ns_helptree;
32
33	bool
34	_modinit (module *m)
35	{
36	ns_cmdtree << ns_info;
37	help_addentry (ns_helptree, "INFO", "help/nickserv/info", NULL);
38
39	return true;
40	}
41
42	void
43	_moddeinit ()
44	{
45	ns_cmdtree >> ns_info;
46	help_delentry (ns_helptree, "INFO");
47	}
48
49	static void
50	ns_cmd_info (sourceinfo_t si, int parc, char parv[])
51	{
52	myuser_t *mu;
53	mynick_t *mn = NULL;
54	user_t *u;
55	char *name = parv[0];
56	char buf[BUFSIZE], strfbuf[32], lastlogin[32], *p;
57	struct tm tm, tm2;
58	metadata *md;
59	node_t *n;
60
61	if (!name)
62	{
63	command_fail (si, fault::needmoreparams, STR_INSUFFICIENT_PARAMS, "INFO");
64	command_fail (si, fault::needmoreparams, _("Syntax: INFO <nickname>"));
65	return;
66	}
67
68	if (!(mu = myuser_t::find_ext (name)))
69	{
70	command_fail (si, fault::nosuch_target, _("\2%s\2 is not registered."), name);
71	return;
72	}
73
74	tm = *localtime (&mu->registered);
75	strftime (strfbuf, sizeof (strfbuf) - 1, "%b %d %H:%M:%S %Y", &tm);
76	tm2 = *localtime (&mu->lastlogin);
77	strftime (lastlogin, sizeof (lastlogin) - 1, "%b %d %H:%M:%S %Y", &tm2);
78
79	command_success_nodata (si, _("Information on \2%s\2:"), mu->name);
80
81	command_success_nodata (si, _("Registered: %s (%s ago)"), strfbuf, time_ago (mu->registered));
82
83	if ((md = mu->find_metadata ("private:host:vhost")))
84	{
85	strlcpy (buf, md->value, sizeof buf);
86	if ((md = mu->find_metadata ("private:usercloak")))
87	{
88	p = strchr (buf, '@');
89	if (p == NULL)
90	p = buf;
91	else
92	p++;
93	strlcpy (p, md->value, sizeof buf - (p - buf));
94	}
95	command_success_nodata (si, _("Last address: %s"), buf);
96	}
97
98	if (has_priv (si, PRIV_USER_AUSPEX))
99	{
100	if ((md = mu->find_metadata ("private:host:actual")))
101	command_success_nodata (si, _("Last real address: %s"), md->value);
102	}
103
104	if (mu->logins.empty ())
105	command_success_nodata (si, _("Last seen: %s (%s ago)"), lastlogin, time_ago (mu->lastlogin));
106	else if (mu == si->smu \|\| has_priv (si, PRIV_USER_AUSPEX))
107	{
108	myuser_t::login_vector::iterator it, it_end;
109	buf[0] = '\0';
110	for (it = mu->logins.begin (), it_end = mu->logins.end (); it != it_end; ++it)
111	{
112	if (strlen (buf) > 80)
113	{
114	command_success_nodata (si, _("Logins from: %s"), buf);
115	buf[0] = '\0';
116	}
117	if (buf[0])
118	strcat (buf, " ");
119	strcat (buf, (*it)->nick);
120	}
121	if (buf[0])
122	command_success_nodata (si, _("Logins from: %s"), buf);
123	}
124	else
125	command_success_nodata (si, _("Logins from: <hidden>"));
126
127	if (!nicksvs.no_nick_ownership)
128	{
129	/* describe queried nick */
130	mn = mynick_t::find (*name == '=' ? name + 1 : name);
131	if (mn != NULL && mn->owner == mu)
132	{
133	tm = *localtime (&mn->registered);
134	strftime (strfbuf, sizeof (strfbuf) - 1, "%b %d %H:%M:%S %Y", &tm);
135	command_success_nodata (si, _("Nick %s registered: %s (%s ago)"), mn->nick, strfbuf, time_ago (mn->registered));
136	u = user_find_named (mn->nick);
137	if (u != NULL && u->myuser == mu)
138	command_success_nodata (si, _("Nick %s is currently online"), mn->nick);
139	else
140	{
141	tm = *localtime (&mn->lastseen);
142	strftime (strfbuf, sizeof (strfbuf) - 1, "%b %d %H:%M:%S %Y", &tm);
143	command_success_nodata (si, _("Nick %s last seen: %s (%s ago)"), mn->nick, strfbuf, time_ago (mn->lastseen));
144	}
145	}
146	/* list registered nicks if privileged */
147	if (mu == si->smu \|\| has_priv (si, PRIV_USER_AUSPEX))
148	{
149	buf[0] = '\0';
150	LIST_FOREACH (n, mu->nicks.head)
151	{
152	if (strlen (buf) > 80)
153	{
154	command_success_nodata (si, _("Registered nicks: %s"), buf);
155	buf[0] = '\0';
156	}
157	if (buf[0])
158	strcat (buf, " ");
159	strcat (buf, ((mynick_t *) (n->data))->nick);
160	}
161	if (buf[0])
162	command_success_nodata (si, _("Registered nicks: %s"), buf);
163	}
164	}
165
166	if (!(mu->flags & MU_HIDEMAIL) \|\| (si->smu == mu \|\| has_priv (si, PRIV_USER_AUSPEX)))
167	command_success_nodata (si, _("Email: %s%s"), mu->email, (mu->flags & MU_HIDEMAIL) ? " (hidden)" : "");
168
169	*buf = '\0';
170
171	if (mu->flags & MU_HIDEMAIL)
172	strcat (buf, "HideMail");
173
174	if (mu->flags & MU_HOLD)
175	{
176	if (*buf)
177	strcat (buf, ", ");
178
179	strcat (buf, "Hold");
180	}
181	if (mu->flags & MU_NEVEROP)
182	{
183	if (*buf)
184	strcat (buf, ", ");
185
186	strcat (buf, "NeverOp");
187	}
188	if (mu->flags & MU_NOOP)
189	{
190	if (*buf)
191	strcat (buf, ", ");
192
193	strcat (buf, "NoOp");
194	}
195	if (mu->flags & MU_NOMEMO)
196	{
197	if (*buf)
198	strcat (buf, ", ");
199
200	strcat (buf, "NoMemo");
201	}
202	if (mu->flags & MU_EMAILMEMOS)
203	{
204	if (*buf)
205	strcat (buf, ", ");
206
207	strcat (buf, "EMailMemos");
208	}
209
210	if (*buf)
211	command_success_nodata (si, _("Flags: %s"), buf);
212
213	if (mu->soper && (mu == si->smu \|\| has_priv (si, PRIV_VIEWPRIVS)))
214	{
215	command_success_nodata (si, _("Oper class: %s"), mu->soper->operclass ? mu->soper->operclass->name : mu->soper->classname);
216	}
217
218	if (has_priv (si, PRIV_USER_AUSPEX) && (md = mu->find_metadata ("private:freeze:freezer")))
219	{
220	char const * const setter = md->value;
221	time_t ts;
222
223	md = mu->find_metadata ("private:freeze:reason");
224	char const * const reason = md != NULL ? md->value : "unknown";
225
226	md = mu->find_metadata ("private:freeze:timestamp");
227	ts = md != NULL ? atoi (md->value) : 0;
228
229	tm = *localtime (&ts);
230	strftime (strfbuf, sizeof (strfbuf) - 1, "%b %d %H:%M:%S %Y", &tm);
231
232	command_success_nodata (si, _("%s was \2FROZEN\2 by %s on %s (%s)"), mu->name, setter, strfbuf, reason);
233	}
234
235	if (has_priv (si, PRIV_USER_AUSPEX) && (md = mu->find_metadata ("private:mark:setter")))
236	{
237	char const * const setter = md->value;
238	time_t ts;
239
240	md = mu->find_metadata ("private:mark:reason");
241	char const * const reason = md != NULL ? md->value : "unknown";
242
243	md = mu->find_metadata ("private:mark:timestamp");
244	ts = md != NULL ? atoi (md->value) : 0;
245
246	tm = *localtime (&ts);
247	strftime (strfbuf, sizeof (strfbuf) - 1, "%b %d %H:%M:%S %Y", &tm);
248
249	command_success_nodata (si, _("%s was \2MARKED\2 by %s on %s (%s)"), mu->name, setter, strfbuf, reason);
250	}
251
252	if (mu->flags & MU_WAITAUTH)
253	command_success_nodata (si, _("%s has not completed registration verification"), mu->name);
254
255	mn->callback.info (mn, mu, si);
256
257	command_success_nodata (si, _("* \2End of Info\2 *"));
258
259	logcommand (si, CMDLOG_GET, "INFO %s", mu->name);
260	}