2 * ircd-ratbox: A slightly useful ircd.
3 * m_oper.c: Makes a user an IRC Operator.
5 * Copyright (C) 1990 Jarkko Oikarinen and University of Oulu, Co Center
6 * Copyright (C) 1996-2002 Hybrid Development Team
7 * Copyright (C) 2002-2005 ircd-ratbox development team
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 2 of the License, or
12 * (at your option) any later version.
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.
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., 59 Temple Place, Suite 330, Boston, MA 02111-1307
31 #include "s_newconf.h"
42 static const char oper_desc
[] = "Provides the OPER command to become an IRC operator";
44 static void m_oper(struct MsgBuf
*, struct Client
*, struct Client
*, int, const char **);
45 static void mc_oper(struct MsgBuf
*, struct Client
*, struct Client
*, int, const char **);
47 static bool match_oper_password(const char *password
, struct oper_conf
*oper_p
);
49 struct Message oper_msgtab
= {
51 {mg_unreg
, {m_oper
, 3}, {mc_oper
, 3}, mg_ignore
, mg_ignore
, {m_oper
, 3}}
54 mapi_clist_av1 oper_clist
[] = { &oper_msgtab
, NULL
};
56 DECLARE_MODULE_AV2(oper
, NULL
, NULL
, oper_clist
, NULL
, NULL
, NULL
, NULL
, oper_desc
);
61 * parv[2] = oper password
64 m_oper(struct MsgBuf
*msgbuf_p
, struct Client
*client_p
, struct Client
*source_p
, int parc
, const char *parv
[])
66 struct oper_conf
*oper_p
;
75 sendto_one(source_p
, form_str(RPL_YOUREOPER
), me
.name
, source_p
->name
);
76 send_oper_motd(source_p
);
80 /* end the grace period */
81 if(!IsFloodDone(source_p
))
82 flood_endgrace(source_p
);
84 oper_p
= find_oper_conf(source_p
->username
, source_p
->orighost
,
85 source_p
->sockhost
, name
);
89 sendto_one_numeric(source_p
, ERR_NOOPERHOST
, form_str(ERR_NOOPERHOST
));
90 ilog(L_FOPER
, "FAILED OPER (%s) by (%s!%s@%s) (%s)",
92 source_p
->username
, source_p
->host
, source_p
->sockhost
);
94 if(ConfigFileEntry
.failed_oper_notice
)
96 sendto_realops_snomask(SNO_GENERAL
, L_NETWIDE
,
97 "Failed OPER attempt - host mismatch by %s (%s@%s)",
98 source_p
->name
, source_p
->username
, source_p
->host
);
104 if(IsOperConfNeedSSL(oper_p
) && !IsSSLClient(source_p
))
106 sendto_one_numeric(source_p
, ERR_NOOPERHOST
, form_str(ERR_NOOPERHOST
));
107 ilog(L_FOPER
, "FAILED OPER (%s) by (%s!%s@%s) (%s) -- requires SSL/TLS",
108 name
, source_p
->name
,
109 source_p
->username
, source_p
->host
, source_p
->sockhost
);
111 if(ConfigFileEntry
.failed_oper_notice
)
113 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
114 "Failed OPER attempt - missing SSL/TLS by %s (%s@%s)",
115 source_p
->name
, source_p
->username
, source_p
->host
);
120 if (oper_p
->certfp
!= NULL
)
122 if (source_p
->certfp
== NULL
|| rb_strcasecmp(source_p
->certfp
, oper_p
->certfp
))
124 sendto_one_numeric(source_p
, ERR_NOOPERHOST
, form_str(ERR_NOOPERHOST
));
125 ilog(L_FOPER
, "FAILED OPER (%s) by (%s!%s@%s) (%s) -- client certificate fingerprint mismatch",
126 name
, source_p
->name
,
127 source_p
->username
, source_p
->host
, source_p
->sockhost
);
129 if(ConfigFileEntry
.failed_oper_notice
)
131 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
132 "Failed OPER attempt - client certificate fingerprint mismatch by %s (%s@%s)",
133 source_p
->name
, source_p
->username
, source_p
->host
);
139 if(match_oper_password(password
, oper_p
))
141 oper_up(source_p
, oper_p
);
143 ilog(L_OPERED
, "OPER %s by %s!%s@%s (%s)",
144 name
, source_p
->name
, source_p
->username
, source_p
->host
,
150 sendto_one(source_p
, form_str(ERR_PASSWDMISMATCH
),
151 me
.name
, source_p
->name
);
153 ilog(L_FOPER
, "FAILED OPER (%s) by (%s!%s@%s) (%s)",
154 name
, source_p
->name
, source_p
->username
, source_p
->host
,
157 if(ConfigFileEntry
.failed_oper_notice
)
159 sendto_realops_snomask(SNO_GENERAL
, L_NETWIDE
,
160 "Failed OPER attempt by %s (%s@%s)",
161 source_p
->name
, source_p
->username
, source_p
->host
);
167 * mc_oper - server-to-server OPER propagation
172 mc_oper(struct MsgBuf
*msgbuf_p
, struct Client
*client_p
, struct Client
*source_p
, int parc
, const char *parv
[])
174 struct PrivilegeSet
*privset
;
175 sendto_server(client_p
, NULL
, CAP_TS6
, NOCAPS
, ":%s OPER %s %s", use_id(source_p
), parv
[1], parv
[2]);
177 privset
= privilegeset_get(parv
[2]);
180 /* if we don't have a matching privset, we'll create an empty one and
181 * mark it illegal, so it gets picked up on a rehash later */
182 sendto_realops_snomask(SNO_GENERAL
, L_NETWIDE
, "Received OPER for %s with unknown privset %s", source_p
->name
, parv
[2]);
183 privset
= privilegeset_set_new(parv
[2], "", 0);
184 privset
->status
|= CONF_ILLEGAL
;
187 privset
= privilegeset_ref(privset
);
188 if (source_p
->user
->privset
!= NULL
)
189 privilegeset_unref(source_p
->user
->privset
);
191 source_p
->user
->privset
= privset
;
192 source_p
->user
->opername
= rb_strdup(parv
[1]);
196 * match_oper_password
198 * inputs - pointer to given password
200 * output - true if match, false otherwise
201 * side effects - none
204 match_oper_password(const char *password
, struct oper_conf
*oper_p
)
208 /* passwd may be NULL pointer. Head it off at the pass... */
209 if(EmptyString(oper_p
->passwd
))
212 if(IsOperConfEncrypted(oper_p
))
214 /* use first two chars of the password they send in as salt */
215 /* If the password in the conf is MD5, and ircd is linked
216 * to scrypt on FreeBSD, or the standard crypt library on
217 * glibc Linux, then this code will work fine on generating
218 * the proper encrypted hash for comparison.
220 if(!EmptyString(password
))
221 encr
= rb_crypt(password
, oper_p
->passwd
);
228 if(encr
!= NULL
&& strcmp(encr
, oper_p
->passwd
) == 0)