The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more

/* ====================================================================
* The Apache Software License, Version 1.1
*
* Copyright (c) 2000 The Apache Software Foundation. All rights
* reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
*
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
*
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in
* the documentation and/or other materials provided with the
* distribution.
*
* 3. The end-user documentation included with the redistribution,
* if any, must include the following acknowledgment:
* "This product includes software developed by the
* Apache Software Foundation (http://www.apache.org/)."
* Alternately, this acknowledgment may appear in the software itself,
* if and wherever such third-party acknowledgments normally appear.
*
* 4. The names "Apache" and "Apache Software Foundation" must
* not be used to endorse or promote products derived from this
* software without prior written permission. For written
* permission, please contact apache@apache.org.
*
* 5. Products derived from this software may not be called "Apache",
* nor may "Apache" appear in their name, without prior written
* permission of the Apache Software Foundation.
*
* THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED
* WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
* DISCLAIMED. IN NO EVENT SHALL THE APACHE SOFTWARE FOUNDATION OR
* ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
* LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
* USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
* OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
* OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
* ====================================================================
*
* This software consists of voluntary contributions made by many
* individuals on behalf of the Apache Software Foundation. For more
* information on the Apache Software Foundation, please see
*
* Portions of this software are based upon public domain software
* originally written at the National Center for Supercomputing Applications,
* University of Illinois, Urbana-Champaign.
*/
#include "httpd.h"
#include "http_config.h"
#include <nwadv.h>
module MODULE_VAR_EXPORT nlm_module;
static int been_there_done_that = 0; /* Loaded the modules yet? */
static const char *load_module(cmd_parms *cmd, void *dummy, char *modname, char *filename)
{
module *modp;
int nlmHandle;
const char *szModuleFile = ap_server_root_relative(cmd->pool, filename);
if (been_there_done_that)
return NULL;
nlmHandle = FindNLMHandle(filename);
if (nlmHandle == NULL) {
spawnlp(P_NOWAIT, szModuleFile, NULL);
nlmHandle = FindNLMHandle(filename);
if (nlmHandle == NULL)
return ap_pstrcat(cmd->pool, "Cannot load ", szModuleFile,
" into server", NULL);
}
modp = (module *) ImportSymbol(nlmHandle, modname);
if (!modp)
return ap_pstrcat(cmd->pool, "Can't find module ", modname,
" in file ", filename, NULL);
ap_add_module(modp);
if (modp->create_server_config)
((void**)cmd->server->module_config)[modp->module_index] =
(*modp->create_server_config)(cmd->pool, cmd->server);
if (modp->create_dir_config)
((void**)cmd->server->lookup_defaults)[modp->module_index] =
(*modp->create_dir_config)(cmd->pool, NULL);
return NULL;
}
static const char *load_file(cmd_parms *cmd, void *dummy, char *filename)
{
if (been_there_done_that)
return NULL;
if (spawnlp(P_NOWAIT, ap_server_root_relative(cmd->pool, filename), NULL))
return ap_pstrcat(cmd->pool, "Cannot load ", filename, " into server", NULL);
return NULL;
}
void check_loaded_modules(server_rec *dummy, pool *p)
{
if (been_there_done_that)
return;
been_there_done_that = 1;
}
command_rec nlm_cmds[] = {
{ "LoadModule", load_module, NULL, RSRC_CONF, TAKE2,
"a module name, and the name of a file to load it from"},
{ "LoadFile", load_file, NULL, RSRC_CONF, ITERATE,
"files or libraries to link into the server at runtime"},
{ NULL }
};
module nlm_module = {
STANDARD_MODULE_STUFF,
check_loaded_modules, /* initializer */
NULL, /* create per-dir config */
NULL, /* merge per-dir config */
NULL, /* server config */
NULL, /* merge server config */
nlm_cmds, /* command table */
NULL, /* handlers */
NULL, /* filename translation */
NULL, /* check_user_id */
NULL, /* check auth */
NULL, /* check access */
NULL, /* type_checker */
NULL, /* logger */
NULL /* header parser */
};