From 50b37d4a27d3295a29afca2286f1a5a086142cec Mon Sep 17 00:00:00 2001 From: Daniel Baumann Date: Sun, 28 Apr 2024 11:49:46 +0200 Subject: Adding upstream version 3.2.1+dfsg. Signed-off-by: Daniel Baumann --- src/modules/rlm_always/rlm_always.c | 234 ++++++++++++++++++++++++++++++++++++ 1 file changed, 234 insertions(+) create mode 100644 src/modules/rlm_always/rlm_always.c (limited to 'src/modules/rlm_always/rlm_always.c') diff --git a/src/modules/rlm_always/rlm_always.c b/src/modules/rlm_always/rlm_always.c new file mode 100644 index 0000000..228bff9 --- /dev/null +++ b/src/modules/rlm_always/rlm_always.c @@ -0,0 +1,234 @@ +/* + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program; if not, write to the Free Software + * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA + * + */ + +/** + * $Id$ + * @file rlm_always.c + * @brief Return preconfigured fixed rcodes. + * + * @copyright 2000,2006 The FreeRADIUS server project + */ +RCSID("$Id$") + +#include +#include +#include +#include + +/* + * The instance data for rlm_always is the list of fake values we are + * going to return. + */ +typedef struct rlm_always_t { + char const *name; //!< Name of this instance of the always module. + char const *rcode_str; //!< The base value. + char const *rcode_old; //!< Make changing the rcode work with %{poke:} and radmin. + + rlm_rcode_t rcode; //!< The integer constant representing rcode_str. + uint32_t simulcount; + bool mpp; +} rlm_always_t; + +/* + * A mapping of configuration file names to internal variables. + */ +static const CONF_PARSER module_config[] = { + { "rcode", FR_CONF_OFFSET(PW_TYPE_STRING, rlm_always_t, rcode_str), "fail" }, + { "simulcount", FR_CONF_OFFSET(PW_TYPE_INTEGER, rlm_always_t, simulcount), "0" }, + { "mpp", FR_CONF_OFFSET(PW_TYPE_BOOLEAN, rlm_always_t, mpp), "no" }, + CONF_PARSER_TERMINATOR +}; + +/** Set module status or rcode + * + * Look ma, no locks... + * + * Example: "%{db_status:dead}" + */ +static ssize_t always_xlat(void *instance, REQUEST *request, char const *fmt, char *out, size_t outlen) +{ + CONF_SECTION *cs; + module_instance_t *mi; + rlm_always_t *inst = instance; + char const *status = fmt; + char const *p; + size_t len; + + cs = cf_section_find("modules"); + if (!cs) return -1; + + mi = module_find(cs, inst->name); + if (!mi) { + RERROR("Can't find the module that registered this xlat: %s", inst->name); + return -1; + } + + /* + * Expand to the existing status + */ + p = "alive"; + if (mi->force) { + p = fr_int2str(mod_rcode_table, mi->code, ""); + } + + len = strlen(p); + if (outlen < len) { + RWARN("Output is too short!"); + *out = '\0'; + } else { + strncpy(out, p, outlen); + } + + if (*fmt == '\0') goto done; + + /* + * Set the module status + */ + if (strcmp(status, "alive") == 0) { + mi->force = false; + + } else if (strcmp(status, "dead") == 0) { + mi->code = RLM_MODULE_FAIL; + mi->force = true; + + } else { + int rcode; + + rcode = fr_str2int(mod_rcode_table, status, -1); + if (rcode < 0) { + RWARN("Unknown status \"%s\"", status); + return -1; + } + + mi->code = rcode; + mi->force = true; + + } + +done: + return strlen(out); +} + +static int mod_bootstrap(CONF_SECTION *conf, void *instance) +{ + rlm_always_t *inst = instance; + + inst->name = cf_section_name2(conf); + if (!inst->name) { + inst->name = cf_section_name1(conf); + } + + xlat_register(inst->name, always_xlat, NULL, inst); + + return 0; +} + +static int mod_instantiate(CONF_SECTION *conf, void *instance) +{ + rlm_always_t *inst = instance; + + /* + * Convert the rcode string to an int + */ + inst->rcode = fr_str2int(mod_rcode_table, inst->rcode_str, RLM_MODULE_UNKNOWN); + if (inst->rcode == RLM_MODULE_UNKNOWN) { + cf_log_err_cs(conf, "rcode value \"%s\" is invalid", inst->rcode_str); + return -1; + } + inst->rcode_old = NULL; /* Hack - forces the compiler not to optimise away rcode_old */ + + return 0; +} + +/** Reparse the rcode if it changed + * + * @note Look ma, no locks... + * + * @param inst Module instance. + */ +static void reparse_rcode(rlm_always_t *inst) +{ + rlm_rcode_t rcode; + + rcode = fr_str2int(mod_rcode_table, inst->rcode_str, RLM_MODULE_UNKNOWN); + if (rcode == RLM_MODULE_UNKNOWN) { + WARN("rlm_always (%s): Ignoring rcode change. rcode value \"%s\" is invalid ", inst->name, + inst->rcode_str); + return; + } + + inst->rcode = rcode; + inst->rcode_old = inst->rcode_str; +} + +/* + * Just return the rcode ... this function is autz, auth, acct, and + * preacct! + */ +static rlm_rcode_t CC_HINT(nonnull) mod_always_return(void *instance, UNUSED REQUEST *request) +{ + rlm_always_t *inst = instance; + + if (inst->rcode_old != inst->rcode_str) reparse_rcode(inst); + + return inst->rcode; +} + +#ifdef WITH_SESSION_MGMT +/* + * checksimul fakes some other variables besides the rcode... + */ +static rlm_rcode_t CC_HINT(nonnull) mod_checksimul(void *instance, REQUEST *request) +{ + struct rlm_always_t *inst = instance; + + if (inst->rcode_old != inst->rcode_str) reparse_rcode(inst); + + request->simul_count = inst->simulcount; + + if (inst->mpp) request->simul_mpp = 2; + + return inst->rcode; +} +#endif + +extern module_t rlm_always; +module_t rlm_always = { + .magic = RLM_MODULE_INIT, + .name = "always", + .type = RLM_TYPE_HUP_SAFE, + .inst_size = sizeof(rlm_always_t), + .config = module_config, + .bootstrap = mod_bootstrap, + .instantiate = mod_instantiate, + .methods = { + [MOD_AUTHENTICATE] = mod_always_return, + [MOD_AUTHORIZE] = mod_always_return, + [MOD_PREACCT] = mod_always_return, + [MOD_ACCOUNTING] = mod_always_return, +#ifdef WITH_SESSION_MGMT + [MOD_SESSION] = mod_checksimul, +#endif + [MOD_PRE_PROXY] = mod_always_return, + [MOD_POST_PROXY] = mod_always_return, + [MOD_POST_AUTH] = mod_always_return, +#ifdef WITH_COA + [MOD_RECV_COA] = mod_always_return, + [MOD_SEND_COA] = mod_always_return +#endif + }, +}; -- cgit v1.2.3