modules/nickserv/register.C

/*
 * Copyright © 2005 William Pitcock, et al.
 * Rights to this code are as documented in doc/pod/license.pod.
 *
 * This file contains code for the NickServ REGISTER function.
 *
 * $Id: register.C,v 1.6 2007-08-29 08:04:33 pippijn Exp $
 */

#include "atheme.h"
#include <ermyth/module.h>
#include <account/mynick.h>
#include <account/myuser.h>
#include <boost/foreach.hpp>

static char const rcsid[] = "$Id: register.C,v 1.6 2007-08-29 08:04:33 pippijn Exp $";

REGISTER_MODULE ("nickserv/register", false, "The Ermyth Team <http://ermyth.schmorp.de>");

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

command_t const ns_register = { "REGISTER", N_("Registers a nickname."), AC_NONE, 3, ns_cmd_register };

E cmdvec ns_cmdtree;
E helpvec ns_helptree;

static unsigned tcnt = 0;

static void
ns_cmd_register (sourceinfo_t *si, int parc, char *parv[])
{
  myuser_t *mu;
  myuser_t *tmu;
  mynick_t *mn;
  char *account;
  char *pass = parv[0];
  char *email = parv[1];
  char lau[BUFSIZE], lao[BUFSIZE];

  if (si->smu)
    {
      command_fail (si, fault::already_authed, _("You are already logged in."));
      return;
    }

  if (nicksvs.no_nick_ownership || si->su == NULL)
    account = parv[0], pass = parv[1], email = parv[2];
  else
    account = si->su->nick, pass = parv[0], email = parv[1];

  if (!account || !pass || !email)
    {
      command_fail (si, fault::needmoreparams, STR_INSUFFICIENT_PARAMS, "REGISTER");
      if (nicksvs.no_nick_ownership || si->su == NULL)
        command_fail (si, fault::needmoreparams, _("Syntax: REGISTER <account> <password> <email>"));
      else
        command_fail (si, fault::needmoreparams, _("Syntax: REGISTER <password> <email>"));
      return;
    }

  if ((strlen (pass) > 32) || (strlen (email) >= EMAILLEN))
    {
      command_fail (si, fault::badparams, STR_INVALID_PARAMS, "REGISTER");
      return;
    }

  if (!nicksvs.no_nick_ownership && si->su == NULL && user_find_named (account))
    {
      command_fail (si, fault::noprivs, _("A user matching this account is already on IRC."));
      return;
    }

  if (!nicksvs.no_nick_ownership && IsDigit (*account))
    {
      command_fail (si, fault::badparams, _("For security reasons, you can't register your UID."));
      command_fail (si, fault::badparams, _("Please change to a real nickname, and try again."));
      return;
    }

  if (nicksvs.no_nick_ownership || si->su == NULL)
    {
      if (strchr (account, ' ') || strchr (account, '\n') || strchr (account, '\r') || account[0] == '=' || account[0] == '#' || account[0] == '@' || account[0] == '+' || account[0] == '%' || account[0] == '!' || strchr (account, ','))
        {
          command_fail (si, fault::badparams, _("The account name \2%s\2 is invalid."), account);
          return;
        }
    }

  if ((si->su != NULL && !strcasecmp (pass, si->su->nick)) || !strcasecmp (pass, account))
    {
      command_fail (si, fault::badparams, _("You cannot use your nickname as a password."));
      if (nicksvs.no_nick_ownership || si->su == NULL)
        command_fail (si, fault::needmoreparams, _("Syntax: REGISTER <account> <password> <email>"));
      else
        command_fail (si, fault::needmoreparams, _("Syntax: REGISTER <password> <email>"));
      return;
    }

  if (!validemail (email))
    {
      command_fail (si, fault::badparams, _("\2%s\2 is not a valid email address."), email);
      return;
    }

  /* make sure it isn't registered already */
  if (nicksvs.no_nick_ownership ? myuser_t::find (account) != NULL : mynick_find (account) != NULL)
    {
      command_fail (si, fault::alreadyexists, _("\2%s\2 is already registered."), account);
      return;
    }

  if (!user_t::callback.can_register (si, account, email))
    return;

  /* make sure they're within limits */
  tcnt = 0;
  foreach (myuser_pair &mupair, mulist)
    {
      tmu = mupair.second;
      
      if (!strcasecmp (email, tmu->email))
        tcnt++;
      
      /* optimization: if tcnt >= me.maxusers, quit iterating. -nenolod */
      if (tcnt >= me.maxusers)
        break;
    }
  
  if (tcnt >= me.maxusers)
    {
      command_fail (si, fault::toomany, _("\2%s\2 has too many nicknames registered."), email);
      return;
    }

  mu = myuser_t::create (account, pass, email, config_options.defuflags | MU_NOBURSTLOGIN);
  mu->registered = NOW;
  mu->lastlogin = NOW;
  if (!nicksvs.no_nick_ownership)
    {
      mn = mynick_add (mu, mu->name);
      mn->registered = NOW;
      mn->lastseen = NOW;
    }

  if (me.auth == AUTH_EMAIL)
    {
      char *key = gen_pw (12);
      mu->flags |= MU_WAITAUTH;

      mu->add_metadata ("private:verify:register:key", key);
      mu->add_metadata ("private:verify:register:timestamp", itoa (NOW));

      if (!sendemail (si->su != NULL ? si->su : si->service->me, EMAIL_REGISTER, mu, key))
        {
          command_fail (si, fault::emailfail, _("Sending email failed, sorry! Registration aborted."));
          mu->refcnt_dec ();
          sfree (key);
          return;
        }

      command_success_nodata (si, _("An email containing nickname activation instructions has been sent to \2%s\2."), mu->email);
      command_success_nodata (si, _("If you do not complete registration within one day, your nickname will expire."));

      sfree (key);
    }

  if (si->su != NULL)
    {
      si->su->myuser = mu;
      mu->logins.insert (si->su);

      if (!(mu->flags & MU_WAITAUTH))
        /* only grant ircd registered status if it's verified */
        phandler->ircd_on_login (si->su->nick, mu->name, NULL);
    }

  if (!nicksvs.no_nick_ownership && si->su != NULL)
    snoop ("REGISTER: \2%s\2 to \2%s\2", account, email);
  else
    snoop ("REGISTER: \2%s\2 to \2%s\2 by \2%s\2", account, email, si->su != NULL ? si->su->nick : get_source_name (si));
  logcommand (si, CMDLOG_REGISTER, "REGISTER to %s", email);
  if (is_soper (mu))
    {
      wallops ("%s registered the nick \2%s\2 and gained services operator privileges.", get_oper_name (si), mu->name);
      snoop ("SOPER: \2%s\2 as \2%s\2", get_oper_name (si), mu->name);
    }

  command_success_nodata (si, _("\2%s\2 is now registered to \2%s\2."), mu->name, mu->email);
  command_success_nodata (si, _("The password is \2%s\2. Please write this down for future reference."), pass);
  mu->callback.registered (mu);

  if (si->su != NULL)
    {
      snprintf (lau, BUFSIZE, "%s@%s", si->su->user, si->su->vhost);
      mu->add_metadata ("private:host:vhost", lau);

      snprintf (lao, BUFSIZE, "%s@%s", si->su->user, si->su->host);
      mu->add_metadata ("private:host:actual", lao);
    }
}

bool
_modinit (module *m)
{
  ns_cmdtree << ns_register;
  help_addentry (ns_helptree, "REGISTER", "help/nickserv/register", NULL);

  return true;
}

void
_moddeinit ()
{
  ns_cmdtree >> ns_register;
  help_delentry (ns_helptree, "REGISTER");
}
Revision:	1.7
Committed:	Thu Aug 30 19:56:23 2007 UTC (19 years, 1 month ago) by pippijn
Content type:	text/plain
Branch:	MAIN
Changes since 1.6:	+18 -18 lines
Log Message:	- put faultcodes into their own namespace - removed old files - limited header garbage in atheme.h - macros to inline bools for connection_t::is_* - put some connection_t functions into the connection_t class
#	User	Rev	Content
1	pippijn	1.1	/*
2	pippijn	1.4	* Copyright © 2005 William Pitcock, et al.
3	pippijn	1.2	* Rights to this code are as documented in doc/pod/license.pod.
4	pippijn	1.1	*
5			* This file contains code for the NickServ REGISTER function.
6			*
7	pippijn	1.7	* $Id: register.C,v 1.6 2007-08-29 08:04:33 pippijn Exp $
8	pippijn	1.1	*/
9
10			#include "atheme.h"
11	pippijn	1.4	#include <ermyth/module.h>
12	pippijn	1.1	#include <account/mynick.h>
13			#include <account/myuser.h>
14	pippijn	1.4	#include <boost/foreach.hpp>
15	pippijn	1.1
16	pippijn	1.7	static char const rcsid[] = "$Id: register.C,v 1.6 2007-08-29 08:04:33 pippijn Exp $";
17	pippijn	1.1
18	pippijn	1.4	REGISTER_MODULE ("nickserv/register", false, "The Ermyth Team <http://ermyth.schmorp.de>");
19	pippijn	1.1
20			static void ns_cmd_register (sourceinfo_t si, int parc, char parv[]);
21
22	pippijn	1.4	command_t const ns_register = { "REGISTER", N_("Registers a nickname."), AC_NONE, 3, ns_cmd_register };
23	pippijn	1.1
24	pippijn	1.4	E cmdvec ns_cmdtree;
25			E helpvec ns_helptree;
26	pippijn	1.1
27	pippijn	1.4	static unsigned tcnt = 0;
28	pippijn	1.1
29			static void
30			ns_cmd_register (sourceinfo_t si, int parc, char parv[])
31			{
32			myuser_t *mu;
33	pippijn	1.4	myuser_t *tmu;
34	pippijn	1.1	mynick_t *mn;
35			char *account;
36			char *pass = parv[0];
37			char *email = parv[1];
38			char lau[BUFSIZE], lao[BUFSIZE];
39
40			if (si->smu)
41			{
42	pippijn	1.7	command_fail (si, fault::already_authed, _("You are already logged in."));
43	pippijn	1.1	return;
44			}
45
46			if (nicksvs.no_nick_ownership \|\| si->su == NULL)
47			account = parv[0], pass = parv[1], email = parv[2];
48			else
49			account = si->su->nick, pass = parv[0], email = parv[1];
50
51			if (!account \|\| !pass \|\| !email)
52			{
53	pippijn	1.7	command_fail (si, fault::needmoreparams, STR_INSUFFICIENT_PARAMS, "REGISTER");
54	pippijn	1.1	if (nicksvs.no_nick_ownership \|\| si->su == NULL)
55	pippijn	1.7	command_fail (si, fault::needmoreparams, _("Syntax: REGISTER <account> <password> <email>"));
56	pippijn	1.1	else
57	pippijn	1.7	command_fail (si, fault::needmoreparams, _("Syntax: REGISTER <password> <email>"));
58	pippijn	1.1	return;
59			}
60
61			if ((strlen (pass) > 32) \|\| (strlen (email) >= EMAILLEN))
62			{
63	pippijn	1.7	command_fail (si, fault::badparams, STR_INVALID_PARAMS, "REGISTER");
64	pippijn	1.1	return;
65			}
66
67			if (!nicksvs.no_nick_ownership && si->su == NULL && user_find_named (account))
68			{
69	pippijn	1.7	command_fail (si, fault::noprivs, _("A user matching this account is already on IRC."));
70	pippijn	1.1	return;
71			}
72
73			if (!nicksvs.no_nick_ownership && IsDigit (*account))
74			{
75	pippijn	1.7	command_fail (si, fault::badparams, _("For security reasons, you can't register your UID."));
76			command_fail (si, fault::badparams, _("Please change to a real nickname, and try again."));
77	pippijn	1.1	return;
78			}
79
80			if (nicksvs.no_nick_ownership \|\| si->su == NULL)
81			{
82			if (strchr (account, ' ') \|\| strchr (account, '\n') \|\| strchr (account, '\r') \|\| account[0] == '=' \|\| account[0] == '#' \|\| account[0] == '@' \|\| account[0] == '+' \|\| account[0] == '%' \|\| account[0] == '!' \|\| strchr (account, ','))
83			{
84	pippijn	1.7	command_fail (si, fault::badparams, _("The account name \2%s\2 is invalid."), account);
85	pippijn	1.1	return;
86			}
87			}
88
89			if ((si->su != NULL && !strcasecmp (pass, si->su->nick)) \|\| !strcasecmp (pass, account))
90			{
91	pippijn	1.7	command_fail (si, fault::badparams, _("You cannot use your nickname as a password."));
92	pippijn	1.1	if (nicksvs.no_nick_ownership \|\| si->su == NULL)
93	pippijn	1.7	command_fail (si, fault::needmoreparams, _("Syntax: REGISTER <account> <password> <email>"));
94	pippijn	1.1	else
95	pippijn	1.7	command_fail (si, fault::needmoreparams, _("Syntax: REGISTER <password> <email>"));
96	pippijn	1.1	return;
97			}
98
99			if (!validemail (email))
100			{
101	pippijn	1.7	command_fail (si, fault::badparams, _("\2%s\2 is not a valid email address."), email);
102	pippijn	1.1	return;
103			}
104
105			/* make sure it isn't registered already */
106	pippijn	1.5	if (nicksvs.no_nick_ownership ? myuser_t::find (account) != NULL : mynick_find (account) != NULL)
107	pippijn	1.1	{
108	pippijn	1.7	command_fail (si, fault::alreadyexists, _("\2%s\2 is already registered."), account);
109	pippijn	1.1	return;
110			}
111
112	pippijn	1.4	if (!user_t::callback.can_register (si, account, email))
113	pippijn	1.1	return;
114
115			/* make sure they're within limits */
116			tcnt = 0;
117	pippijn	1.4	foreach (myuser_pair &mupair, mulist)
118			{
119			tmu = mupair.second;
120
121			if (!strcasecmp (email, tmu->email))
122			tcnt++;
123
124			/* optimization: if tcnt >= me.maxusers, quit iterating. -nenolod */
125			if (tcnt >= me.maxusers)
126			break;
127			}
128
129	pippijn	1.1	if (tcnt >= me.maxusers)
130			{
131	pippijn	1.7	command_fail (si, fault::toomany, _("\2%s\2 has too many nicknames registered."), email);
132	pippijn	1.1	return;
133			}
134
135	pippijn	1.6	mu = myuser_t::create (account, pass, email, config_options.defuflags \| MU_NOBURSTLOGIN);
136	pippijn	1.1	mu->registered = NOW;
137			mu->lastlogin = NOW;
138			if (!nicksvs.no_nick_ownership)
139			{
140			mn = mynick_add (mu, mu->name);
141			mn->registered = NOW;
142			mn->lastseen = NOW;
143			}
144
145			if (me.auth == AUTH_EMAIL)
146			{
147			char *key = gen_pw (12);
148			mu->flags \|= MU_WAITAUTH;
149
150			mu->add_metadata ("private:verify:register:key", key);
151	pippijn	1.4	mu->add_metadata ("private:verify:register:timestamp", itoa (NOW));
152	pippijn	1.1
153			if (!sendemail (si->su != NULL ? si->su : si->service->me, EMAIL_REGISTER, mu, key))
154			{
155	pippijn	1.7	command_fail (si, fault::emailfail, _("Sending email failed, sorry! Registration aborted."));
156	pippijn	1.6	mu->refcnt_dec ();
157	pippijn	1.4	sfree (key);
158	pippijn	1.1	return;
159			}
160
161			command_success_nodata (si, _("An email containing nickname activation instructions has been sent to \2%s\2."), mu->email);
162			command_success_nodata (si, _("If you do not complete registration within one day, your nickname will expire."));
163
164	pippijn	1.4	sfree (key);
165	pippijn	1.1	}
166
167			if (si->su != NULL)
168			{
169			si->su->myuser = mu;
170			mu->logins.insert (si->su);
171
172			if (!(mu->flags & MU_WAITAUTH))
173			/* only grant ircd registered status if it's verified */
174	pippijn	1.4	phandler->ircd_on_login (si->su->nick, mu->name, NULL);
175	pippijn	1.1	}
176
177			if (!nicksvs.no_nick_ownership && si->su != NULL)
178			snoop ("REGISTER: \2%s\2 to \2%s\2", account, email);
179			else
180			snoop ("REGISTER: \2%s\2 to \2%s\2 by \2%s\2", account, email, si->su != NULL ? si->su->nick : get_source_name (si));
181			logcommand (si, CMDLOG_REGISTER, "REGISTER to %s", email);
182			if (is_soper (mu))
183			{
184			wallops ("%s registered the nick \2%s\2 and gained services operator privileges.", get_oper_name (si), mu->name);
185			snoop ("SOPER: \2%s\2 as \2%s\2", get_oper_name (si), mu->name);
186			}
187
188			command_success_nodata (si, _("\2%s\2 is now registered to \2%s\2."), mu->name, mu->email);
189			command_success_nodata (si, _("The password is \2%s\2. Please write this down for future reference."), pass);
190	pippijn	1.4	mu->callback.registered (mu);
191	pippijn	1.1
192			if (si->su != NULL)
193			{
194			snprintf (lau, BUFSIZE, "%s@%s", si->su->user, si->su->vhost);
195			mu->add_metadata ("private:host:vhost", lau);
196
197			snprintf (lao, BUFSIZE, "%s@%s", si->su->user, si->su->host);
198			mu->add_metadata ("private:host:actual", lao);
199			}
200			}
201	pippijn	1.4
202			bool
203			_modinit (module *m)
204			{
205			ns_cmdtree << ns_register;
206			help_addentry (ns_helptree, "REGISTER", "help/nickserv/register", NULL);
207
208			return true;
209			}
210
211			void
212			_moddeinit ()
213			{
214			ns_cmdtree >> ns_register;
215			help_delentry (ns_helptree, "REGISTER");
216			}