added gnutls backend and moved backend code into new files
[ircu2.10.12-pk.git] / ircd / m_oper.c
1 /*
2  * IRC - Internet Relay Chat, ircd/m_oper.c
3  * Copyright (C) 1990 Jarkko Oikarinen and
4  *                    University of Oulu, Computing Center
5  *
6  * See file AUTHORS in IRC package for additional names of
7  * the programmers.
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 1, or (at your option)
12  * any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22  *
23  * $Id$
24  */
25
26 /*
27  * m_functions execute protocol messages on this server:
28  *
29  *    cptr    is always NON-NULL, pointing to a *LOCAL* client
30  *            structure (with an open socket connected!). This
31  *            identifies the physical socket where the message
32  *            originated (or which caused the m_function to be
33  *            executed--some m_functions may call others...).
34  *
35  *    sptr    is the source of the message, defined by the
36  *            prefix part of the message if present. If not
37  *            or prefix not found, then sptr==cptr.
38  *
39  *            (!IsServer(cptr)) => (cptr == sptr), because
40  *            prefixes are taken *only* from servers...
41  *
42  *            (IsServer(cptr))
43  *                    (sptr == cptr) => the message didn't
44  *                    have the prefix.
45  *
46  *                    (sptr != cptr && IsServer(sptr) means
47  *                    the prefix specified servername. (?)
48  *
49  *                    (sptr != cptr && !IsServer(sptr) means
50  *                    that message originated from a remote
51  *                    user (not local).
52  *
53  *            combining
54  *
55  *            (!IsServer(sptr)) means that, sptr can safely
56  *            taken as defining the target structure of the
57  *            message in this server.
58  *
59  *    *Always* true (if 'parse' and others are working correct):
60  *
61  *    1)      sptr->from == cptr  (note: cptr->from == cptr)
62  *
63  *    2)      MyConnect(sptr) <=> sptr == cptr (e.g. sptr
64  *            *cannot* be a local connection, unless it's
65  *            actually cptr!). [MyConnect(x) should probably
66  *            be defined as (x == x->from) --msa ]
67  *
68  *    parc    number of variable parameter strings (if zero,
69  *            parv is allowed to be NULL)
70  *
71  *    parv    a NULL terminated list of parameter pointers,
72  *
73  *                    parv[0], sender (prefix string), if not present
74  *                            this points to an empty string.
75  *                    parv[1]...parv[parc-1]
76  *                            pointers to additional parameters
77  *                    parv[parc] == NULL, *always*
78  *
79  *            note:   it is guaranteed that parv[0]..parv[parc-1] are all
80  *                    non-NULL pointers.
81  */
82 #include "config.h"
83
84 #include "client.h"
85 #include "hash.h"
86 #include "ircd.h"
87 #include "ircd_alloc.h"
88 #include "ircd_features.h"
89 #include "ircd_log.h"
90 #include "ircd_reply.h"
91 #include "ircd_string.h"
92 #include "ircd_crypt.h"
93 #include "msg.h"
94 #include "numeric.h"
95 #include "numnicks.h"
96 #include "querycmds.h"
97 #include "s_conf.h"
98 #include "s_debug.h"
99 #include "s_user.h"
100 #include "s_misc.h"
101 #include "send.h"
102
103 /* #include <assert.h> -- Now using assert in ircd_log.h */
104 #include <stdlib.h>
105 #include <string.h>
106
107 int oper_password_match(const char* to_match, const char* passwd)
108 {
109   char *crypted;
110   int res;
111   /*
112    * use first two chars of the password they send in as salt
113    *
114    * passwd may be NULL. Head it off at the pass...
115    */
116   if (!to_match || !passwd)
117     return 0;
118
119   /* we no longer do a CRYPT_OPER_PASSWORD check because a clear 
120      text passwords just handled by a fallback mechanism called 
121      crypt_clear if it's enabled -- hikari */
122   crypted = ircd_crypt(to_match, passwd);
123
124   if (!crypted)
125    return 0;
126   res = strcmp(crypted, passwd);
127   MyFree(crypted);
128   return 0 == res;
129 }
130
131 /*
132  * m_oper - generic message handler
133  */
134 int m_oper(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
135 {
136   struct ConfItem* aconf;
137   char*            name;
138   char*            password;
139
140   assert(0 != cptr);
141   assert(cptr == sptr);
142
143   name     = parc > 1 ? parv[1] : 0;
144   password = parc > 2 ? parv[2] : 0;
145
146   if (EmptyString(name) || EmptyString(password))
147     return need_more_params(sptr, "OPER");
148
149   aconf = find_conf_exact(name, sptr, CONF_OPERATOR);
150   if (!aconf || IsIllegal(aconf))
151   {
152     send_reply(sptr, ERR_NOOPERHOST);
153     sendto_opmask_butone(0, SNO_OLDREALOP, "Failed OPER attempt by %s (%s@%s)",
154                          parv[0], cli_user(sptr)->username, cli_sockhost(sptr));
155     return 0;
156   }
157   assert(0 != (aconf->status & CONF_OPERATOR));
158
159   if (oper_password_match(password, aconf->passwd))
160   {
161     struct Flags old_mode = cli_flags(sptr);
162
163     if (ACR_OK != attach_conf(sptr, aconf)) {
164       send_reply(sptr, ERR_NOOPERHOST);
165       sendto_opmask_butone(0, SNO_OLDREALOP, "Failed OPER attempt by %s "
166                            "(%s@%s)", parv[0], cli_user(sptr)->username,
167                            cli_sockhost(sptr));
168       return 0;
169     }
170     SetLocOp(sptr);
171     client_set_privs(sptr, aconf);
172     if (HasPriv(sptr, PRIV_PROPAGATE))
173     {
174       ClearLocOp(sptr);
175       SetOper(sptr);
176       ++UserStats.opers;
177     }
178     cli_handler(cptr) = OPER_HANDLER;
179
180     SetFlag(sptr, FLAG_WALLOP);
181     SetFlag(sptr, FLAG_SERVNOTICE);
182     SetFlag(sptr, FLAG_DEBUG);
183     
184     set_snomask(sptr, SNO_OPERDEFAULT, SNO_ADD);
185     cli_max_sendq(sptr) = 0; /* Get the sendq from the oper's class */
186     send_umode_out(cptr, sptr, &old_mode, HasPriv(sptr, PRIV_PROPAGATE));
187     send_reply(sptr, RPL_YOUREOPER);
188
189     sendto_opmask_butone(0, SNO_OLDSNO, "%s (%s@%s) is now operator (%c)",
190                          parv[0], cli_user(sptr)->username, cli_sockhost(sptr),
191                          IsOper(sptr) ? 'O' : 'o');
192
193     log_write(LS_OPER, L_INFO, 0, "OPER (%s) by (%#C)", name, sptr);
194   }
195   else
196   {
197     send_reply(sptr, ERR_PASSWDMISMATCH);
198     sendto_opmask_butone(0, SNO_OLDREALOP, "Failed OPER attempt by %s (%s@%s)",
199                          parv[0], cli_user(sptr)->username, cli_sockhost(sptr));
200   }
201   return 0;
202 }
203
204 /*
205  * ms_oper - server message handler
206  */
207 int ms_oper(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
208 {
209   assert(0 != cptr);
210   assert(IsServer(cptr));
211   /*
212    * if message arrived from server, trust it, and set to oper
213    */
214   if (!IsServer(sptr) && !IsOper(sptr))
215   {
216     ++UserStats.opers;
217     SetFlag(sptr, FLAG_OPER);
218     sendcmdto_serv_butone(sptr, CMD_MODE, cptr, "%s :+o", parv[0]);
219   }
220   return 0;
221 }
222
223 /*
224  * mo_oper - oper message handler
225  */
226 int mo_oper(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
227 {
228   assert(0 != cptr);
229   assert(cptr == sptr);
230   send_reply(sptr, RPL_YOUREOPER);
231   return 0;
232 }