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
32 #include "s_newconf.h"
42 static int m_oper(struct MsgBuf
*, struct Client
*, struct Client
*, int, const char **);
44 struct Message oper_msgtab
= {
46 {mg_unreg
, {m_oper
, 3}, mg_ignore
, mg_ignore
, mg_ignore
, {m_oper
, 3}}
49 mapi_clist_av1 oper_clist
[] = { &oper_msgtab
, NULL
};
51 static const char oper_desc
[] = "Provides the OPER command to become an IRC operator";
53 DECLARE_MODULE_AV2(oper
, NULL
, NULL
, oper_clist
, NULL
, NULL
, NULL
, NULL
, oper_desc
);
55 static int match_oper_password(const char *password
, struct oper_conf
*oper_p
);
60 * parv[2] = oper password
63 m_oper(struct MsgBuf
*msgbuf_p
, struct Client
*client_p
, struct Client
*source_p
, int parc
, const char *parv
[])
65 struct oper_conf
*oper_p
;
74 sendto_one(source_p
, form_str(RPL_YOUREOPER
), me
.name
, source_p
->name
);
75 send_oper_motd(source_p
);
79 /* end the grace period */
80 if(!IsFloodDone(source_p
))
81 flood_endgrace(source_p
);
83 oper_p
= find_oper_conf(source_p
->username
, source_p
->orighost
,
84 source_p
->sockhost
, name
);
88 sendto_one_numeric(source_p
, ERR_NOOPERHOST
, form_str(ERR_NOOPERHOST
));
89 ilog(L_FOPER
, "FAILED OPER (%s) by (%s!%s@%s) (%s)",
91 source_p
->username
, source_p
->host
, source_p
->sockhost
);
93 if(ConfigFileEntry
.failed_oper_notice
)
95 sendto_realops_snomask(SNO_GENERAL
, L_NETWIDE
,
96 "Failed OPER attempt - host mismatch by %s (%s@%s)",
97 source_p
->name
, source_p
->username
, source_p
->host
);
103 if(IsOperConfNeedSSL(oper_p
) && !IsSSLClient(source_p
))
105 sendto_one_numeric(source_p
, ERR_NOOPERHOST
, form_str(ERR_NOOPERHOST
));
106 ilog(L_FOPER
, "FAILED OPER (%s) by (%s!%s@%s) (%s) -- requires SSL/TLS",
107 name
, source_p
->name
,
108 source_p
->username
, source_p
->host
, source_p
->sockhost
);
110 if(ConfigFileEntry
.failed_oper_notice
)
112 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
113 "Failed OPER attempt - missing SSL/TLS by %s (%s@%s)",
114 source_p
->name
, source_p
->username
, source_p
->host
);
119 if (oper_p
->certfp
!= NULL
)
121 if (source_p
->certfp
== NULL
|| strcasecmp(source_p
->certfp
, oper_p
->certfp
))
123 sendto_one_numeric(source_p
, ERR_NOOPERHOST
, form_str(ERR_NOOPERHOST
));
124 ilog(L_FOPER
, "FAILED OPER (%s) by (%s!%s@%s) (%s) -- client certificate fingerprint mismatch",
125 name
, source_p
->name
,
126 source_p
->username
, source_p
->host
, source_p
->sockhost
);
128 if(ConfigFileEntry
.failed_oper_notice
)
130 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
131 "Failed OPER attempt - client certificate fingerprint mismatch by %s (%s@%s)",
132 source_p
->name
, source_p
->username
, source_p
->host
);
138 if(match_oper_password(password
, oper_p
))
140 oper_up(source_p
, oper_p
);
142 ilog(L_OPERED
, "OPER %s by %s!%s@%s (%s)",
143 name
, source_p
->name
, source_p
->username
, source_p
->host
,
149 sendto_one(source_p
, form_str(ERR_PASSWDMISMATCH
),
150 me
.name
, source_p
->name
);
152 ilog(L_FOPER
, "FAILED OPER (%s) by (%s!%s@%s) (%s)",
153 name
, source_p
->name
, source_p
->username
, source_p
->host
,
156 if(ConfigFileEntry
.failed_oper_notice
)
158 sendto_realops_snomask(SNO_GENERAL
, L_NETWIDE
,
159 "Failed OPER attempt by %s (%s@%s)",
160 source_p
->name
, source_p
->username
, source_p
->host
);
168 * match_oper_password
170 * inputs - pointer to given password
172 * output - YES or NO if match
173 * side effects - none
176 match_oper_password(const char *password
, struct oper_conf
*oper_p
)
180 /* passwd may be NULL pointer. Head it off at the pass... */
181 if(EmptyString(oper_p
->passwd
))
184 if(IsOperConfEncrypted(oper_p
))
186 /* use first two chars of the password they send in as salt */
187 /* If the password in the conf is MD5, and ircd is linked
188 * to scrypt on FreeBSD, or the standard crypt library on
189 * glibc Linux, then this code will work fine on generating
190 * the proper encrypted hash for comparison.
192 if(!EmptyString(password
))
193 encr
= rb_crypt(password
, oper_p
->passwd
);
200 if(encr
!= NULL
&& strcmp(encr
, oper_p
->passwd
) == 0)