On Fri, Nov 29, 2002 at 09:22:14PM -0500, Cliff Woolley wrote: hi,
> Cool, I'd love to see a copy of it. If you could post it on the web > somewhere and just submit a URL to the mailing list, that might be > easiest. If that's not possible for some reason, please do mail me a copy > individually. ok. i've attached it. currently it's only the file perchild.c, since i'm still working in the perchild module directory. how could i add an completely new module ? (i'm not family w/ automake, and dont really like it ...) > As for CVS ... no, there is no mail interface because the repository is > read-only except to the core development team. Commit access is granted > only after a fairly strict set of criteria have been met. i'm quite new to cvs, so i dont really know it. is there generally an cvs mail interface software out there ? i'd like to have an couple of servers which synchronize themselves by sending mail to each other. (i'm sitting behind an uucp link) also i imagine an revision system, which automatically makes snapshots in very short intervals (i.e. <1min), so you could use it as an general editing tracker. the system should also be able to have (sub-)branches for each developer and also for groups of developers. when the developer/group maintainer thinks it's time to make an release, he'd set an release point w/ some comments and let the system push it into the release tree. is this possible w/ the cvs in that way ? ~-n -- Bestes Mittel gegen Mailviren: Outlook l�schen. --------------------------------------------------------------------- Enrico Weigelt == metux ITS Webhosting ab 5 EUR/Monat. UUCP, rawIP und vieles mehr. phone: +49 36207 519931 www: http://www.metux.de/ fax: +49 36207 519932 email: [EMAIL PROTECTED] cellphone: +49 174 7066481 smsgate: [EMAIL PROTECTED] --------------------------------------------------------------------- Diese Mail wurde mit UUCP versandt. http://www.metux.de/uucp/
/* ==================================================================== * The Apache Software License, Version 1.1 * * Copyright (c) 2000-2002 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 [EMAIL PROTECTED] * * 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 * <http://www.apache.org/>. * * Portions of this software are based upon public domain software * originally written at the National Center for Supercomputing Applications, * University of Illinois, Urbana-Champaign. */ /* TODO: + replace pipe_of_death by an generic command interface + also use this interface for child->child communications + add support for runtime configuration over this if. + what to do w/ unassigned vhosts ? who should handle them ? perhaps we shoudda add an DefaultProcessor option ? + test, test, test, and test, especially under high load. + what about persistent links w/ changing vhost ? should the client then give it back to the multiplexer ? + add timeouts in multiplexer to prevent local dos attacks + think about possible vulnarabilities. note that the vhost's user could ptrace the processor child and play nice games with it. */ /* -- build configuration -- manly for debugging -- */ #define MPM_PERCHILD_DEBUG #define MPM_THREAD_ACCEPT_LOCK #include "apr_hash.h" #include "apr_strings.h" #include "apr_pools.h" #include "apr_portable.h" #include "apr_file_io.h" #include "apr_signal.h" #define APR_WANT_IOVEC #include "apr_want.h" #if APR_HAVE_UNISTD_H #include <unistd.h> #endif #if APR_HAVE_SYS_SOCKET_H #include <sys/socket.h> #endif #if !APR_HAS_THREADS #error The perchild MPM requires APR threads, but they are unavailable. #endif #define CORE_PRIVATE #include "ap_config.h" #include "httpd.h" #include "http_main.h" #include "http_log.h" #include "http_config.h" /* for read_config */ #include "http_core.h" /* for get_remote_host */ #include "http_protocol.h" #include "http_connection.h" #include "ap_mpm.h" #include "unixd.h" #include "mpm_common.h" #include "ap_listen.h" #include "mpm_default.h" #include "mpm.h" #include "scoreboard.h" #include "util_filter.h" #include "apr_poll.h" #ifdef HAVE_POLL_H #include <poll.h> #endif #ifdef HAVE_SYS_POLL_H #include <sys/poll.h> #endif /* ### should be APR-ized */ #include <grp.h> #include <pwd.h> #include <sys/stat.h> #include <sys/un.h> #include <setjmp.h> #ifdef HAVE_SYS_PROCESSOR_H #include <sys/processor.h> /* for bindprocessor() */ #endif #ifdef MPM_PERCHILD_DEBUG #define _DBG_REAL(text,par...) \ ap_log_error(APLOG_MARK, APLOG_WARNING, 0, NULL, "(perchild: pid=%d uid=%d) " text, getpid(), getuid(), ##par) #define _DBG(par...) _DBG_REAL(##par,0) #define _TRACE_CALL_REAL(src,dest,par...) \ ap_log_error(APLOG_MARK, APLOG_WARNING, 0, NULL, "(perchild: pid=%d uid=%d) " src "(): calling " dest, getpid(), getuid(), ##par) #define _TRACE_CALL(par...) _TRACE_CALL_REAL(##par,0) #define _TRACE_RET_REAL(src,dest,par...) \ ap_log_error(APLOG_MARK, APLOG_WARNING, 0, NULL, "(perchild: pid=%d uid=%d) " src "(): returned from " dest, getpid(), getuid(), ##par) #define _TRACE_RET(par...) _TRACE_RET_REAL(##par,0) #else #define _DBG(par...) #define _TRACE_RET(par...) #define _TRACE_CALL(par...) #endif /* char of death - for signalling children to die */ #define AP_PERCHILD_CHAR_OF_DEATH '!' #define PERCHILD_SERVER_CONF(cf) \ ((perchild_server_conf *) ap_get_module_config(cf,&mpm_perchild_module)) /* * Define some magic numbers that we use for the state of the incomming * request. These must be < 0 so they don't collide with a file descriptor. */ #define AP_PERCHILD_THISCHILD -1 #define AP_PERCHILD_OTHERCHILD -2 /* Limit on the threads per process. Clients will be locked out if more than * this * server_limit are needed. * * We keep this for one reason it keeps the size of the scoreboard file small * enough that we can read the whole thing without worrying too much about * the overhead. */ #ifndef DEFAULT_THREAD_LIMIT #define DEFAULT_THREAD_LIMIT 64 #endif /* Admin can't tune ThreadLimit beyond MAX_THREAD_LIMIT. We want * some sort of compile-time limit to help catch typos. */ #ifndef MAX_THREAD_LIMIT #define MAX_THREAD_LIMIT 20000 #endif /* Limit on the total --- clients will be locked out if more servers than * this are needed. It is intended solely to keep the server from crashing * when things get out of hand. * * We keep a hard maximum number of servers, for two reasons --- first off, * in case something goes seriously wrong, we want to stop the fork bomb * short of actually crashing the machine we're running on by filling some * kernel table. Secondly, it keeps the size of the scoreboard file small * enough that we can read the whole thing without worrying too much about * the overhead. */ #ifndef DEFAULT_SERVER_LIMIT #define DEFAULT_SERVER_LIMIT 8 #endif /* Admin can't tune ServerLimit beyond MAX_SERVER_LIMIT. We want * some sort of compile-time limit to help catch typos. */ #ifndef MAX_SERVER_LIMIT #define MAX_SERVER_LIMIT 20000 #endif /* * Actual definitions of config globals */ static int threads_to_start = 0; /* Worker threads per child */ static int min_spare_threads = 0; static int max_spare_threads = 0; static int max_threads = 0; static int server_limit = DEFAULT_SERVER_LIMIT; static int first_server_limit; static int thread_limit = DEFAULT_THREAD_LIMIT; static int first_thread_limit; static int changed_limit_at_restart; static int num_childs = 0; static int workers_may_exit = 0; static int requests_this_child; static int num_listensocks = 0; static ap_pod_t *pod; static jmp_buf jmpbuffer; static int thread_overflow_reported = 0; /* === configuration stuff === */ /* the server limit is also the size of the server table */ static int cf_server_limit = DEFAULT_SERVER_LIMIT; /* -- server process information -- */ typedef struct { uid_t uid; gid_t gid; int input; /* The socket descriptor */ int output; /* The socket descriptor */ int type; int id; /* index in child_info_table */ } child_info_t; #define CHILD_TYPE_MULTIPLEXER 1 #define CHILD_TYPE_PROCESSOR 2 typedef struct { const char *sockname; /* The base name for the socket */ const char *fullsockname; /* socket base name + extension */ child_info_t* child; /* The client which processes this server */ } perchild_server_conf; typedef struct { int sock_fd; int status; jmp_buf jmpbuffer; } thread_info_t; /* Tables used to determine the user and group each child process should * run as. The hash table is used to correlate a server name with a child * process. */ static int child_info_table_size; static child_info_t *child_info_table; static thread_info_t *thread_info_table; struct ap_ctable *ap_child_table; /* * The max child slot ever assigned, preserved across restarts. Necessary * to deal with NumServers changes across AP_SIG_GRACEFUL restarts. We * use this value to optimize routines that have to scan the entire child * table. * * XXX - It might not be worth keeping this code in. There aren't very * many child processes in this MPM. */ int ap_max_daemons_limit = -1; int ap_threads_per_child; /* XXX not part of API! axe it! */ module AP_MODULE_DECLARE_DATA mpm_perchild_module; /* -- replace the pipe-of-death by an control socket -- */ static apr_file_t *pipe_of_death_in = NULL; static apr_file_t *pipe_of_death_out = NULL; static apr_thread_mutex_t *pipe_of_death_mutex; /* *Non*-shared http_main globals... */ server_rec *ap_server_conf; /* one_process --- debugging mode variable; can be set from the command line * with the -X flag. If set, this gets you the child_main loop running * in the process which originally started up (no detach, no make_child), * which is a pretty nice debugging environment. (You'll get a SIGHUP * early in standalone_main; just continue through. This is the server * trying to kill off any child processes which it might have lying * around --- Apache doesn't keep track of their pids, it just sends * SIGHUP to the process group, ignoring it in the root process. * Continue through and you'll be fine.). */ static int one_process = 0; #ifdef DEBUG_SIGSTOP int raise_sigstop_flags; #endif static apr_pool_t *pconf; /* Pool for config stuff */ static apr_pool_t *pchild; /* Pool for httpd child stuff */ static apr_pool_t *thread_pool_parent; /* Parent of per-thread pools */ static apr_thread_mutex_t *thread_pool_parent_mutex; static int child_num; static unsigned int my_pid; /* Linux getpid() doesn't work except in main thread. Use this instead */ /* -- stack w/ free thread slot IDs */ static int *worker_thread_free_ids; static apr_threadattr_t *worker_thread_attr; /* Keep track of the number of idle worker threads */ static int idle_thread_count; static apr_thread_mutex_t *idle_thread_count_mutex; /* Locks for accept serialization */ #ifdef NO_SERIALIZED_ACCEPT #define ACCEPT_PROC_MUTEX_INIT APR_SUCCESS #define ACCEPT_PROC_MUTEX_LOCK APR_SUCCESS #define ACCEPT_PROC_MUTEX_UNLOCK APR_SUCCESS #define ACCEPT_PROC_MUTEX_CREATE APR_SUCCESS #else static apr_proc_mutex_t *process_accept_mutex; #define ACCEPT_PROC_MUTEX_LOCK (apr_proc_mutex_lock(process_accept_mutex)) #define ACCEPT_PROC_MUTEX_UNLOCK (apr_proc_mutex_unlock(process_accept_mutex)) #define ACCEPT_PROC_MUTEX_CREATE (apr_proc_mutex_create(&process_accept_mutex,ap_lock_fname, ap_accept_lock_mech,_pconf)) #define ACCEPT_PROC_MUTEX_INIT (apr_proc_mutex_child_init(&process_accept_mutex, ap_lock_fname, pchild)); #endif /* NO_SERIALIZED_ACCEPT */ static apr_thread_mutex_t *thread_accept_mutex; #ifdef MPM_PERCHILD_THREAD_ACCEPT_LOCK #define THREAD_ACCEPT_LOCK \ _FDBG("locking thread_accept_mutex"); \ apr_thread_mutex_lock(thread_accept_mutex); \ _FDBG("got thread_accept_mutex locked"); #define THREAD_ACCEPT_UNLOCK \ _FDBG("unlocking thread_accept_mutex"); \ apr_thread_mutex_unlock(thread_accept_mutex); \ _FDBG("got thread_accept_mutex unlocked"); #else #define THREAD_ACCEPT_LOCK \ _FDBG("omitted locking thread_accept_mutex"); #define THREAD_ACCEPT_UNLOCK \ _FDBG("omitted unlocking thread_accept_mutex"); #endif /* == Keep track of the number of worker threads currently active == */ static int worker_thread_count = 0; static apr_thread_mutex_t *worker_thread_count_mutex; static inline int worker_thread_count_get () { int x; apr_thread_mutex_lock(worker_thread_count_mutex); x = worker_thread_count; apr_thread_mutex_unlock(worker_thread_count_mutex); _DBG("worker_thread_count=%d", x); return x; } static inline int worker_thread_count_add ( int x ) { int y; apr_thread_mutex_lock(worker_thread_count_mutex); worker_thread_count += x; y = worker_thread_count; apr_thread_mutex_unlock(worker_thread_count_mutex); _DBG("worker_thread_count=%d (+%d)", y, x); return y; } /* ------------------------------------------------------------------- */ AP_DECLARE(apr_status_t) ap_mpm_query(int query_code, int *result) { switch(query_code){ case AP_MPMQ_MAX_DAEMON_USED: *result = ap_max_daemons_limit; return APR_SUCCESS; case AP_MPMQ_IS_THREADED: *result = AP_MPMQ_DYNAMIC; return APR_SUCCESS; case AP_MPMQ_IS_FORKED: *result = AP_MPMQ_STATIC; return APR_SUCCESS; case AP_MPMQ_HARD_LIMIT_DAEMONS: *result = cf_server_limit; return APR_SUCCESS; case AP_MPMQ_HARD_LIMIT_THREADS: *result = thread_limit; return APR_SUCCESS; case AP_MPMQ_MAX_THREADS: *result = max_threads; return APR_SUCCESS; case AP_MPMQ_MIN_SPARE_DAEMONS: *result = 0; return APR_SUCCESS; case AP_MPMQ_MIN_SPARE_THREADS: *result = min_spare_threads; return APR_SUCCESS; case AP_MPMQ_MAX_SPARE_DAEMONS: *result = 0; return APR_SUCCESS; case AP_MPMQ_MAX_SPARE_THREADS: *result = max_spare_threads; return APR_SUCCESS; case AP_MPMQ_MAX_REQUESTS_DAEMON: *result = ap_max_requests_per_child; return APR_SUCCESS; case AP_MPMQ_MAX_DAEMONS: *result = num_childs; return APR_SUCCESS; } return APR_ENOTIMPL; } /* a clean exit from a child with proper cleanup */ static inline int clean_child_exit(int code) { if (pchild) apr_pool_destroy(pchild); exit(code); } /* handle all varieties of core dumping signals */ static void sig_coredump(int sig) { chdir(ap_coredump_dir); apr_signal(sig, SIG_DFL); kill(getpid(), sig); /* At this point we've got sig blocked, because we're still inside * the signal handler. When we leave the signal handler it will * be unblocked, and we'll take the signal... and coredump or whatever * is appropriate for this particular Unix. In addition the parent * will see the real signal we received -- whereas if we called * abort() here, the parent would only see SIGABRT. */ } static void just_die(int sig) { clean_child_exit(0); } /***************************************************************** * Connection structures and accounting... */ /* volatile just in case */ static int volatile shutdown_pending; static int volatile restart_pending; static int volatile is_graceful; static int volatile child_fatal; /* we don't currently track ap_my_generation, but mod_status * references it so it must be defined */ ap_generation_t volatile ap_my_generation=0; /* * ap_start_shutdown() and ap_start_restart(), below, are a first stab at * functions to initiate shutdown or restart without relying on signals. * Previously this was initiated in sig_term() and restart() signal handlers, * but we want to be able to start a shutdown/restart from other sources -- * e.g. on Win32, from the service manager. Now the service manager can * call ap_start_shutdown() or ap_start_restart() as appropiate. Note that * these functions can also be called by the child processes, since global * variables are no longer used to pass on the required action to the parent. * * These should only be called from the parent process itself, since the * parent process will use the shutdown_pending and restart_pending variables * to determine whether to shutdown or restart. The child process should * call signal_parent() directly to tell the parent to die -- this will * cause neither of those variable to be set, which the parent will * assume means something serious is wrong (which it will be, for the * child to force an exit) and so do an exit anyway. */ static void ap_start_shutdown(void) { if (shutdown_pending == 1) { /* Um, is this _probably_ not an error, if the user has * tried to do a shutdown twice quickly, so we won't * worry about reporting it. */ return; } shutdown_pending = 1; } /* do a graceful restart if graceful == 1 */ static void ap_start_restart(int graceful) { if (restart_pending == 1) { /* Probably not an error - don't bother reporting it */ return; } restart_pending = 1; is_graceful = graceful; } static void sig_term(int sig) { ap_start_shutdown(); } static void restart(int sig) { ap_start_restart(sig == AP_SIG_GRACEFUL); } static void set_signals(void) { #ifndef NO_USE_SIGACTION struct sigaction sa; sigemptyset(&sa.sa_mask); sa.sa_flags = 0; if (!one_process) { sa.sa_handler = sig_coredump; #if defined(SA_ONESHOT) sa.sa_flags = SA_ONESHOT; #elif defined(SA_RESETHAND) sa.sa_flags = SA_RESETHAND; #endif if (sigaction(SIGSEGV, &sa, NULL) < 0) ap_log_error(APLOG_MARK, APLOG_WARNING, errno, ap_server_conf, "sigaction(SIGSEGV)"); #ifdef SIGBUS if (sigaction(SIGBUS, &sa, NULL) < 0) ap_log_error(APLOG_MARK, APLOG_WARNING, errno, ap_server_conf, "sigaction(SIGBUS)"); #endif #ifdef SIGABORT if (sigaction(SIGABORT, &sa, NULL) < 0) ap_log_error(APLOG_MARK, APLOG_WARNING, errno, ap_server_conf, "sigaction(SIGABORT)"); #endif #ifdef SIGABRT if (sigaction(SIGABRT, &sa, NULL) < 0) ap_log_error(APLOG_MARK, APLOG_WARNING, errno, ap_server_conf, "sigaction(SIGABRT)"); #endif #ifdef SIGILL if (sigaction(SIGILL, &sa, NULL) < 0) ap_log_error(APLOG_MARK, APLOG_WARNING, errno, ap_server_conf, "sigaction(SIGILL)"); #endif sa.sa_flags = 0; } sa.sa_handler = sig_term; if (sigaction(SIGTERM, &sa, NULL) < 0) ap_log_error(APLOG_MARK, APLOG_WARNING, errno, ap_server_conf, "sigaction(SIGTERM)"); #ifdef SIGINT if (sigaction(SIGINT, &sa, NULL) < 0) ap_log_error(APLOG_MARK, APLOG_WARNING, errno, ap_server_conf, "sigaction(SIGINT)"); #endif #ifdef SIGXCPU sa.sa_handler = SIG_DFL; if (sigaction(SIGXCPU, &sa, NULL) < 0) ap_log_error(APLOG_MARK, APLOG_WARNING, errno, ap_server_conf, "sigaction(SIGXCPU)"); #endif #ifdef SIGXFSZ sa.sa_handler = SIG_DFL; if (sigaction(SIGXFSZ, &sa, NULL) < 0) ap_log_error(APLOG_MARK, APLOG_WARNING, errno, ap_server_conf, "sigaction(SIGXFSZ)"); #endif #ifdef SIGPIPE sa.sa_handler = SIG_IGN; if (sigaction(SIGPIPE, &sa, NULL) < 0) ap_log_error(APLOG_MARK, APLOG_WARNING, errno, ap_server_conf, "sigaction(SIGPIPE)"); #endif /* we want to ignore HUPs and AP_SIG_GRACEFUL while we're busy * processing one */ sigaddset(&sa.sa_mask, SIGHUP); sigaddset(&sa.sa_mask, AP_SIG_GRACEFUL); sa.sa_handler = restart; if (sigaction(SIGHUP, &sa, NULL) < 0) ap_log_error(APLOG_MARK, APLOG_WARNING, errno, ap_server_conf, "sigaction(SIGHUP)"); if (sigaction(AP_SIG_GRACEFUL, &sa, NULL) < 0) ap_log_error(APLOG_MARK, APLOG_WARNING, errno, ap_server_conf, "sigaction(" AP_SIG_GRACEFUL_STRING ")"); #else if (!one_process) { apr_signal(SIGSEGV, sig_coredump); #ifdef SIGBUS apr_signal(SIGBUS, sig_coredump); #endif /* SIGBUS */ #ifdef SIGABORT apr_signal(SIGABORT, sig_coredump); #endif /* SIGABORT */ #ifdef SIGABRT apr_signal(SIGABRT, sig_coredump); #endif /* SIGABRT */ #ifdef SIGILL apr_signal(SIGILL, sig_coredump); #endif /* SIGILL */ #ifdef SIGXCPU apr_signal(SIGXCPU, SIG_DFL); #endif /* SIGXCPU */ #ifdef SIGXFSZ apr_signal(SIGXFSZ, SIG_DFL); #endif /* SIGXFSZ */ } apr_signal(SIGTERM, sig_term); #ifdef SIGHUP apr_signal(SIGHUP, restart); #endif /* SIGHUP */ #ifdef AP_SIG_GRACEFUL apr_signal(AP_SIG_GRACEFUL, restart); #endif /* AP_SIG_GRACEFUL */ #ifdef SIGPIPE apr_signal(SIGPIPE, SIG_IGN); #endif /* SIGPIPE */ #endif } /***************************************************************** * Here follows a long bunch of generic server bookkeeping stuff... */ int ap_graceful_stop_signalled(void) { /* XXX - Does this really work? - Manoj */ return is_graceful; } /***************************************************************** * Child process main loop. */ static void process_socket(apr_pool_t *p, apr_socket_t *sock, long conn_id, apr_bucket_alloc_t *bucket_alloc) { conn_rec *current_conn; int sock_fd; apr_status_t rv; int thread_num = conn_id % thread_limit; ap_sb_handle_t *sbh; if ((rv = apr_os_sock_get(&sock_fd, sock)) != APR_SUCCESS) { ap_log_error(APLOG_MARK, APLOG_ERR, rv, NULL, "apr_os_sock_get"); } _DBG ( "process_socket(thread_num=%d): sock=%ld sock_fd=%d\n", thread_num, sock, sock_fd ); switch (child_info_table[child_num].type) { case CHILD_TYPE_MULTIPLEXER: _DBG("process_socket(): type=MULTIPLEXER"); break; case CHILD_TYPE_PROCESSOR: _DBG("process_socket(): type=PROCESSOR"); break; default: _DBG("process_socket(): type UNKNOWN!"); } if (sock_fd >= FD_SETSIZE) { ap_log_error(APLOG_MARK, APLOG_WARNING, 0, NULL, "new file descriptor %d is too large; you probably need " "to rebuild Apache with a larger FD_SETSIZE " "(currently %d)", sock_fd, FD_SETSIZE); apr_socket_close(sock); _DBG ( "process_socket(thread_num=%d): exiting with error", thread_num ); return; } if (thread_info_table[thread_num].sock_fd < 0) { ap_sock_disable_nagle(sock); } ap_create_sb_handle(&sbh, p, conn_id / thread_limit, thread_num); _TRACE_CALL("process_socket", "ap_run_create_connection [thread_num=%d]", thread_num ); current_conn = ap_run_create_connection(p, ap_server_conf, sock, conn_id, sbh, bucket_alloc); _TRACE_RET("process_socket", "ap_run_create_connection [thread_num=%d]", thread_num ); if (current_conn) { _TRACE_CALL("process_socket", "ap_process_connection [thread_num=%d]", thread_num); ap_process_connection(current_conn, sock); _TRACE_RET("process_socket", "ap_process_connection [thread_num=%d]", thread_num); _TRACE_CALL("process_socket", "ap_lingering_close [thread_num=%d]", thread_num ); ap_lingering_close(current_conn); _TRACE_RET("process_socket", "ap_lingering_close [thread_num=%d]", thread_num); } } static perchild_process_connection(conn_rec *conn) { ap_filter_t *filter; apr_bucket_brigade *bb; core_net_rec *net; _DBG("perchild_process_connection() entered", 0); /* -- fetch our sockets from the pool -- */ apr_pool_userdata_get((void **)&bb, "PERCHILD_SOCKETS", conn->pool); if (bb != NULL) { /* -- find the 'core' filter and give the socket data to it -- */ for (filter = conn->output_filters; filter != NULL; filter = filter->next) { if (!strcmp(filter->frec->name, "core")) break; } if (filter != NULL) { net = filter->ctx; net->in_ctx = apr_palloc(conn->pool, sizeof(*net->in_ctx)); net->in_ctx->b = bb; } } _DBG("perchild_process_connection() leaving (DECLINED)", 0); return DECLINED; } static void *worker_thread_proc(apr_thread_t *, void *); /* Starts a thread as long as we're below max_threads */ static int start_thread(void) { #define _FDBG(par...) _DBG("start_thread(): " ##par) apr_thread_t *thread; int rc; int cnt; cnt = worker_thread_count_get (); _FDBG("thread count currently: %d", cnt); if (cnt < max_threads - 1) { _TRACE_CALL("start_thread()", "apr_thread_create()" ); rc = apr_thread_create(&thread, worker_thread_attr, worker_thread_proc, &worker_thread_free_ids[worker_thread_count], pchild); _TRACE_RET("start_thread()", "apr_thread_create()" ); if (rc != APR_SUCCESS) { ap_log_error(APLOG_MARK, APLOG_ALERT, rc, ap_server_conf, "apr_thread_create: unable to create worker thread"); /* In case system resources are maxxed out, we don't want Apache running away with the CPU trying to fork over and over and over again if we exit. */ sleep(10); workers_may_exit = 1; _FDBG("WATCH: workers_may_exit=%d", workers_may_exit); return 0; } worker_thread_count_add ( 1 ); _FDBG("WATCH: workers_may_exit=%d", workers_may_exit); _FDBG("ok"); return 1; } /* we already have too many threads running */ _DBG("start_thread(): too many running threads. aborting"); if (!thread_overflow_reported) { ap_log_error(APLOG_MARK, APLOG_ERR, 0, ap_server_conf, "server reached MaxThreadsPerChild setting, " "consider raising the MaxThreadsPerChild or " "NumServers settings"); thread_overflow_reported = 1; } _FDBG("WATCH: workers_may_exit=%d", workers_may_exit); return 0; #undef _FDBG } /* Sets workers_may_exit if we received a character on the pipe_of_death */ static apr_status_t check_pipe_of_death ( void **csd, ap_listen_rec *lr, apr_pool_t *ptrans ) { int ret; char pipe_read_char; apr_size_t n = 1; _DBG("check_pipe_of_death(): WATCH: workers_may_exit=%d", workers_may_exit); if (workers_may_exit) return APR_SUCCESS; apr_thread_mutex_lock(pipe_of_death_mutex); ret = apr_recv(lr->sd, &pipe_read_char, &n); if (APR_STATUS_IS_EAGAIN(ret)) { /* It lost the lottery. It must continue to suffer * through a life of servitude. */ } else { if (pipe_read_char != AP_PERCHILD_CHAR_OF_DEATH) { _DBG("check_pipe_of_death(): got wrong char %c", pipe_read_char); return APR_SUCCESS; } /* It won the lottery (or something else is very * wrong). Embrace death with open arms. */ workers_may_exit = 1; _DBG("check_pipe_of_death(): WATCH: workers_may_exit=%d", workers_may_exit); } apr_thread_mutex_unlock(pipe_of_death_mutex); return APR_SUCCESS; } static apr_status_t receive_from_multiplexer ( void **trans_sock, /* will be filled out w/ the received socket */ ap_listen_rec *lr, /* listener to receive from */ apr_pool_t *ptrans /* transaction wide pool */ ) { #define _FDBG(par...) _DBG("receive_from_multiplexer(): " ##par) struct msghdr msg; struct cmsghdr *cmsg; char headers[HUGE_STRING_LEN]; char request_body[HUGE_STRING_LEN]; struct iovec iov[2]; int ret, fd_tmp; apr_os_sock_t ctrl_sock_fd; apr_os_sock_t trans_sock_fd; /* -- bucket's, brigades and their allocators */ apr_bucket_alloc_t *alloc = apr_bucket_alloc_create(ptrans); apr_bucket_brigade *bb = apr_brigade_create(ptrans, alloc); apr_bucket *bucket; /* prepare the buffers for receiving data from remote side */ iov[0].iov_base = headers; iov[0].iov_len = HUGE_STRING_LEN; iov[1].iov_base = request_body; iov[1].iov_len = HUGE_STRING_LEN; cmsg = apr_palloc(ptrans, sizeof(*cmsg) + sizeof(trans_sock_fd)); cmsg->cmsg_len = sizeof(*cmsg) + sizeof(trans_sock_fd); msg.msg_name = NULL; msg.msg_namelen = 0; msg.msg_iov = iov; msg.msg_iovlen = 2; msg.msg_control = cmsg; msg.msg_controllen = cmsg->cmsg_len; /* -- receive data from socket -- */ apr_os_sock_get(&ctrl_sock_fd, lr->sd); _FDBG("receiving from sock_fd=%d", ctrl_sock_fd); ret = recvmsg(ctrl_sock_fd, &msg, 0); /* -- extract socket from the cmsg -- */ memcpy(&trans_sock_fd, CMSG_DATA(cmsg), sizeof(trans_sock_fd)); apr_os_sock_put((apr_socket_t **)trans_sock, &trans_sock_fd, ptrans); apr_os_sock_get(&fd_tmp, *trans_sock); _FDBG("trans_sock=%ld fdx=%d sock_fd=%d headers=\"%s\" body=\"%s\"", *trans_sock, trans_sock_fd, fd_tmp, &headers, &request_body); /* -- store received data into an brigade and add it to the current transaction's pool -- */ bucket = apr_bucket_eos_create(alloc); APR_BRIGADE_INSERT_HEAD(bb, bucket); bucket = apr_bucket_socket_create(*trans_sock, alloc); APR_BRIGADE_INSERT_HEAD(bb, bucket); bucket = apr_bucket_heap_create(iov[1].iov_base, iov[1].iov_len, NULL, alloc); APR_BRIGADE_INSERT_HEAD(bb, bucket); bucket = apr_bucket_heap_create(iov[0].iov_base, iov[0].iov_len, NULL, alloc); APR_BRIGADE_INSERT_HEAD(bb, bucket); apr_pool_userdata_set(bb, "PERCHILD_SOCKETS", NULL, ptrans); _FDBG("leaving", 0); return 0; #undef _FDBG } /* idle_thread_count should be incremented before starting a worker_thread */ static void *worker_thread_proc(apr_thread_t *thd, void *arg) { #define _FDBG(par...) _DBG("worker_thread_proc(): " ##par) apr_socket_t *sock; apr_pool_t *tpool; /* Pool for this thread */ apr_pool_t *ptrans; /* Pool for per-transaction stuff */ int srv; int thread_num = *((int *) arg); long conn_id = child_num * thread_limit + thread_num; apr_pollfd_t *pollset; apr_status_t rv; ap_listen_rec *lr_walk; int n; int thread_cnt; apr_bucket_alloc_t *bucket_alloc; _FDBG("starting"); /* === allocate thread pools etc === */ apr_thread_mutex_lock(thread_pool_parent_mutex); apr_pool_create(&tpool, thread_pool_parent); apr_thread_mutex_unlock(thread_pool_parent_mutex); apr_pool_create(&ptrans, tpool); (void) ap_update_child_status_from_indexes(child_num, thread_num, SERVER_STARTING, (request_rec *) NULL); bucket_alloc = apr_bucket_alloc_create(apr_thread_pool_get(thd)); apr_thread_mutex_lock(idle_thread_count_mutex); if (idle_thread_count < max_spare_threads) { idle_thread_count++; _FDBG("idle_thread_count: %d", idle_thread_count); apr_thread_mutex_unlock(idle_thread_count_mutex); } else { _FDBG("too many idle threads: %d (max %d)", idle_thread_count, max_spare_threads ); apr_thread_mutex_unlock(idle_thread_count_mutex); goto worker_out; } while (!workers_may_exit) { apr_int16_t event; _FDBG("loop. conn_id=%d req_max=%d req_remain=%d", conn_id, ap_max_requests_per_child, requests_this_child); ((ap_max_requests_per_child != 0) && (requests_this_child < 1) && (workers_may_exit=1)); _FDBG("WATCH: workers_may_exit=%d", workers_may_exit); if (workers_may_exit) goto worker_out; (void) ap_update_child_status_from_indexes(child_num, thread_num, SERVER_READY, (request_rec *) NULL); THREAD_ACCEPT_LOCK; /* -- setup pollset -- */ /* NOTE: we do _not_ do this upwards anylonger */ apr_poll_setup(&pollset, num_listensocks, tpool); for(lr_walk = ap_listeners; lr_walk != NULL; lr_walk = lr_walk->next) { int fd; apr_poll_socket_add(pollset, lr_walk->sd, APR_POLLIN); apr_os_sock_get(&fd, lr_walk->sd); _FDBG("adding fd %d to pollset", fd); } if (workers_may_exit) goto worker_out; _TRACE_CALL("worker_thread_proc", "apr_poll()", 0 ); srv = apr_poll(pollset, num_listensocks, &n, -1); _TRACE_RET("worker_thread_proc", "apr_poll()", 0 ); if (srv != APR_SUCCESS) { if (APR_STATUS_IS_EINTR(srv)) { _FDBG("apr_poll() has been interrupted", 0); THREAD_ACCEPT_UNLOCK; continue; } /* apr_poll() will only return errors in catastrophic * circumstances. Let's try exiting gracefully, for now. */ ap_log_error(APLOG_MARK, APLOG_ERR, srv, (const server_rec *) ap_server_conf, "apr_poll: (listen)"); workers_may_exit = 1; _FDBG("poll error!"); _FDBG("WATCH: workers_may_exit=%d", workers_may_exit); THREAD_ACCEPT_UNLOCK; goto worker_out; } /* find a listener */ _FDBG("looking for an listener", 0); for (lr_walk=ap_listeners; lr_walk!=NULL; lr_walk = lr_walk->next) { int fd_tmp; apr_os_sock_get(&fd_tmp, lr_walk->sd); _FDBG(" ... trying w/ fd=%d", fd_tmp); apr_poll_revents_get(&event, lr_walk->sd, pollset); if (event & (APR_POLLIN)) { THREAD_ACCEPT_UNLOCK; goto got_fd; } if (event & (APR_POLLERR)) { ap_log_error(APLOG_MARK, APLOG_EMERG, rv, ap_server_conf, "got POLLERR in line 870"); } } THREAD_ACCEPT_UNLOCK; _DBG("WARN: did not find the right listener"); sleep ( 1 ); continue; got_fd: _FDBG("input available ... resetting socket."); sock = NULL; /* important! */ _TRACE_CALL("worker_thread", "accept_func", 0); rv = lr_walk->accept_func((void*)&sock, lr_walk, ptrans); _TRACE_RET("worker_thread", "accept_func", 0); if (rv == APR_EGENERAL) { /* E[NM]FILE, ENOMEM, etc */ _FDBG("there was some error." ); workers_may_exit = 1; _FDBG("WATCH: workers_may_exit=%d", workers_may_exit); break; } apr_thread_mutex_lock(idle_thread_count_mutex); if (idle_thread_count > min_spare_threads) { idle_thread_count--; } else { if (!start_thread()) { idle_thread_count--; } } apr_thread_mutex_unlock(idle_thread_count_mutex); if (!setjmp(thread_info_table[thread_num].jmpbuffer)) { _FDBG("marked jmpbufffer",0); _TRACE_CALL("worker_thread", "process_socket()",0); process_socket(ptrans, sock, conn_id, bucket_alloc); _TRACE_RET("worker_thread", "process_socket()", 0); } else { _FDBG("landed from longjmp", 0 ); thread_info_table[thread_num].sock_fd = AP_PERCHILD_THISCHILD; } requests_this_child--; apr_pool_clear(ptrans); } _FDBG("thread loop finished"); worker_out: _FDBG("this thread's work is done ... workers_may_exit=%d"); /* == think about it == */ apr_thread_mutex_lock(idle_thread_count_mutex); idle_thread_count--; apr_thread_mutex_unlock(idle_thread_count_mutex); /* == */ apr_thread_mutex_lock(thread_pool_parent_mutex); ap_update_child_status_from_indexes(child_num, thread_num, SERVER_DEAD, (request_rec *) NULL); apr_pool_destroy(tpool); apr_thread_mutex_unlock(thread_pool_parent_mutex); thread_cnt = worker_thread_count_add ( -1 ); worker_thread_free_ids[thread_cnt] = thread_num; if (!thread_cnt) { /* All the threads have exited, now finish the shutdown process * by signalling the sigwait thread */ _FDBG("all workers have quit. killing myself (%d) with SIGTERM", my_pid); kill(my_pid, SIGTERM); } else { _FDBG("this is not the time to die - %d threads are still alive", thread_cnt); _FDBG("WATCH: workers_may_exit=%d", workers_may_exit); } apr_bucket_alloc_destroy(bucket_alloc); _FDBG("leaving. good bye"); return NULL; #undef _FDBG } /* Set group privileges. * * Note that we use the username as set in the config files, rather than * the lookup of to uid --- the same uid may have multiple passwd entries, * with different sets of groups for each. */ static int set_group_privs(uid_t uid, gid_t gid) { if (!geteuid()) { const char *name; /* Get username if passed as a uid */ struct passwd *ent; if ((ent = getpwuid(uid)) == NULL) { ap_log_error(APLOG_MARK, APLOG_ALERT, errno, NULL, "getpwuid: couldn't determine user name from uid %u, " "you probably need to modify the User directive", (unsigned)uid); return -1; } name = ent->pw_name; /* * Set the GID before initgroups(), since on some platforms * setgid() is known to zap the group list. */ if (setgid(gid) == -1) { ap_log_error(APLOG_MARK, APLOG_ALERT, errno, NULL, "setgid: unable to set group id to Group %u", (unsigned)gid); return -1; } /* Reset `groups' attributes. */ if (initgroups(name, gid) == -1) { ap_log_error(APLOG_MARK, APLOG_ALERT, errno, NULL, "initgroups: unable to set groups for User %s " "and Group %u", name, (unsigned)gid); return -1; } } return 0; } static int perchild_setup_child(int childnum) { child_info_t *ug = &child_info_table[childnum]; if (ug->uid == -1 && ug->gid == -1) { return unixd_setup_child(); } if (set_group_privs(ug->uid, ug->gid)) { return -1; } /* Only try to switch if we're running as root */ if (!geteuid() && ( #ifdef _OSD_POSIX os_init_job_environment(server_conf, unixd_config.user_name, one_process) != 0 || #endif setuid(ug->uid) == -1)) { ap_log_error(APLOG_MARK, APLOG_ALERT, errno, NULL, "setuid: unable to change to uid: %ld", (long) ug->uid); return -1; } return 0; } static int check_signal(int signum) { _DBG("check_signal() %d", signum); switch (signum) { case SIGTERM: case SIGINT: just_die(signum); return 1; } return 0; } typedef struct perchild_header { char *headers; apr_pool_t *p; } perchild_header; /* Send a single HTTP header field to the client. Note that this function * is used in calls to table_do(), so their interfaces are co-dependent. * In other words, don't change this one without checking table_do in alloc.c. * It returns true unless there was a write error of some kind. */ static int perchild_header_field(perchild_header *h, const char *fieldname, const char *fieldval) { apr_pstrcat(h->p, h->headers, fieldname, ": ", fieldval, CRLF, NULL); return 1; } static inline ap_listen_rec* listen_add ( apr_pool_t* pool, apr_socket_t *sock, void* accept_func ) { ap_listen_rec *lr_walk, *lr_new; _DBG("listen_add() ", 0); /* -- create an new listener for this child -- */ lr_new = apr_palloc(pool, sizeof(*lr_new)); lr_new->sd = sock; lr_new->active = 1; lr_new->accept_func = accept_func; lr_new->next = NULL; /* -- add the new listener_rec into the list -- */ /* FIXME: should we somehow lock this list ? */ if (lr_walk = ap_listeners) { while (lr_walk->next) lr_walk = lr_walk->next; lr_walk->next = lr_new; } else { ap_listeners = lr_walk = lr_new; } num_listensocks++; return lr_new; } static inline void listen_clear () { ap_listen_rec *lr_walk; _DBG("listen_clear() ", 0); /* FIXME: should we somehow lock this list ? */ while (ap_listeners) { lr_walk = ap_listeners->next; apr_socket_close(ap_listeners->sd); ap_listeners = lr_walk; } num_listensocks=0; } /* -- main routine of an child process -- */ static void child_main(int child_num_arg) { #define _FDBG(par...) _DBG("child_main(): " ##par) int i; apr_status_t rv; apr_socket_t *sock = NULL; my_pid = getpid(); child_num = child_num_arg; _FDBG("sock_fd_in=%d sock_fd_out=%d", child_info_table[child_num].input, child_info_table[child_num].output ); /* -- allocate an new pool for us -- */ apr_pool_create(&pchild, pconf); switch (child_info_table[child_num].type) { case CHILD_TYPE_MULTIPLEXER: _FDBG("MULTIPLEXER %d", child_num); break; case CHILD_TYPE_PROCESSOR: _FDBG("PROCESSOR %d", child_num); /* -- create new listener to receive from multiplexer -- */ apr_os_sock_put(&sock, &child_info_table[child_num].input, pconf); listen_clear (); listen_add ( pconf, sock, receive_from_multiplexer ); break; default: _FDBG("unspecified child type for %d sleeping a while ...", child_num); sleep ( 5 ); return; } /*stuff to do before we switch id's, so we have permissions.*/ /* -- init child process (uid switching etc) -- */ (perchild_setup_child(child_num) && clean_child_exit(APEXIT_CHILDFATAL)); ap_run_child_init(pchild, ap_server_conf); /*done with init critical section */ apr_setup_signal_thread(); requests_this_child = ap_max_requests_per_child; /* Setup worker threads */ _FDBG("setting up worker threads ... " ); ((threads_to_start > max_threads) && (threads_to_start = max_threads)); idle_thread_count = threads_to_start; workers_may_exit = 0; worker_thread_count = 0; worker_thread_free_ids = (int *)apr_pcalloc(pchild, thread_limit * sizeof(int)); for (i = 0; i < max_threads; i++) { worker_thread_free_ids[i] = i; } apr_pool_create(&thread_pool_parent, pchild); apr_thread_mutex_create(&thread_pool_parent_mutex, APR_THREAD_MUTEX_DEFAULT, pchild); apr_thread_mutex_create(&idle_thread_count_mutex, APR_THREAD_MUTEX_DEFAULT, pchild); apr_thread_mutex_create(&worker_thread_count_mutex, APR_THREAD_MUTEX_DEFAULT, pchild); apr_thread_mutex_create(&pipe_of_death_mutex, APR_THREAD_MUTEX_DEFAULT, pchild); apr_thread_mutex_create(&thread_accept_mutex, APR_THREAD_MUTEX_DEFAULT, pchild); apr_threadattr_create(&worker_thread_attr, pchild); apr_threadattr_detach_set(worker_thread_attr, 1); /* We are creating worker threads right now */ for (i=0; i < threads_to_start; i++) { /* start_thread shouldn't fail here */ _TRACE_CALL("child_main", "start_thread" ); if (!start_thread()) break; _TRACE_RET("child_main", "start_thread" ); } _TRACE_CALL("child_main", "apr_signal_tread" ); apr_signal_thread(check_signal); _TRACE_RET("child_main", "apr_signal_thread" ); #undef _FDBG } static int make_child(server_rec *s, int slot) { int pid; switch (child_info_table[slot].type) { case CHILD_TYPE_MULTIPLEXER: break; case CHILD_TYPE_PROCESSOR: break; default: _DBG("make_child() no valid client in slot %d", slot); sleep(1); return 0; } if (slot + 1 > ap_max_daemons_limit) { ap_max_daemons_limit = slot + 1; } (void) ap_update_child_status_from_indexes(slot, 0, SERVER_STARTING, (request_rec *) NULL); if ((pid = fork()) == -1) { ap_log_error(APLOG_MARK, APLOG_ERR, errno, s, "fork: Unable to fork new process"); /* In case system resources are maxxed out, we don't want * Apache running away with the CPU trying to fork over and * over and over again. */ sleep(10); return -1; } if (!pid) { #ifdef HAVE_BINDPROCESSOR /* By default, AIX binds to a single processor. This bit unbinds * children which will then bind to another CPU. */ int status = bindprocessor(BINDPROCESS, (int)getpid(), PROCESSOR_CLASS_ANY); if (status != OK) { ap_log_error(APLOG_MARK, APLOG_WARNING, errno, ap_server_conf, "processor unbind failed %d", status); } #endif RAISE_SIGSTOP(MAKE_CHILD); /* XXX - For an unthreaded server, a signal handler will be necessary * apr_signal(SIGTERM, just_die); */ child_main(slot); clean_child_exit(0); } /* else */ ap_child_table[slot].pid = pid; ap_child_table[slot].status = SERVER_ALIVE; return 0; } /* start up a bunch of children */ static int startup_children(int number_to_start) { int i; for (i = 0; number_to_start && i < num_childs; ++i) { if (ap_child_table[i].pid) continue; if (make_child(ap_server_conf, i) < 0) break; --number_to_start; } return number_to_start; } /* * spawn_rate is the number of children that will be spawned on the * next maintenance cycle if there aren't enough servers. It is * doubled up to MAX_SPAWN_RATE, and reset only when a cycle goes by * without the need to spawn. */ static int spawn_rate = 1; #ifndef MAX_SPAWN_RATE #define MAX_SPAWN_RATE (32) #endif static int hold_off_on_exponential_spawning; static void perform_child_maintenance(void) { #define _FDBG(par...) _DBG("perform_child_maintainance(): " ##par) int i; int free_length; int free_slots[MAX_SPAWN_RATE]; int last_non_dead = -1; /* initialize the free_list */ free_length = 0; for (i = 0; i < num_childs; ++i) { if (ap_child_table[i].pid == 0) { if (free_length < spawn_rate) { free_slots[free_length] = i; ++free_length; } } else { last_non_dead = i; } if (i >= ap_max_daemons_limit && free_length >= spawn_rate) { break; } } ap_max_daemons_limit = last_non_dead + 1; if (free_length > 0) { for (i = 0; i < free_length; ++i) { _FDBG("calling make_child() ..."); make_child(ap_server_conf, free_slots[i]); _FDBG("returned from make_child()"); } /* the next time around we want to spawn twice as many if this * wasn't good enough, but not if we've just done a graceful */ if (hold_off_on_exponential_spawning) { --hold_off_on_exponential_spawning; } else if (spawn_rate < MAX_SPAWN_RATE) { spawn_rate *= 2; } } else { spawn_rate = 1; } #undef _FDBG } static void server_main_loop(int remaining_children_to_start) { #define _FDBG(par...) _DBG("server_main_loop(): " ##par) apr_exit_why_e exitwhy; apr_proc_t pid; int child_slot; int status; int i; static int l=0; while (!restart_pending && !shutdown_pending) { ap_wait_or_timeout(&exitwhy, &status, &pid, pconf); if (pid.pid != -1) { if (ap_process_child_status(&pid, exitwhy, status)==APEXIT_CHILDFATAL) { _FDBG("shutdown pending ..."); shutdown_pending = 1; child_fatal = 1; return; } /* non-fatal death... note that it's gone in the child table and * clean out the status table. */ _FDBG("child has #%d died ...", child_slot); child_slot = -1; for (i = 0; i < ap_max_daemons_limit; ++i) { if (ap_child_table[i].pid == pid.pid) { child_slot = i; break; } } if (child_slot >= 0) { ap_child_table[child_slot].pid = 0; ap_update_child_status_from_indexes(child_slot, i, SERVER_DEAD, (request_rec *) NULL); if (remaining_children_to_start && (child_slot < num_childs)) { /* we're still doing a 1-for-1 replacement of dead * children with new children */ _FDBG("replacing by new child ..."); make_child(ap_server_conf, child_slot); --remaining_children_to_start; } #if APR_HAS_OTHER_CHILD } else if (apr_proc_other_child_read(&pid, status) == 0) { /* handled */ #endif } else if (is_graceful) { /* Great, we've probably just lost a slot in the * child table. Somehow we don't know about this * child. */ ap_log_error(APLOG_MARK, APLOG_WARNING, 0, ap_server_conf, "long lost child came home! (pid %ld)", (long)pid.pid); } /* Don't perform idle maintenance when a child dies, * only do it when there's a timeout. Remember only a * finite number of children can die, and it's pretty * pathological for a lot to die suddenly. */ continue; } else if (remaining_children_to_start) { /* we hit a 1 second timeout in which none of the previous * generation of children needed to be reaped... so assume * they're all done, and pick up the slack if any is left. */ _TRACE_CALL("server_main_loop", "startup_children", 0); remaining_children_to_start = startup_children(remaining_children_to_start); _TRACE_RET("server_main_loop", "startup_children", 0); /* In any event we really shouldn't do the code below because * few of the servers we just started are in the IDLE state * yet, so we'd mistakenly create an extra server. */ continue; } perform_child_maintenance(); } #undef _FDBG } int ap_mpm_run(apr_pool_t *_pconf, apr_pool_t *plog, server_rec *s) { int remaining_children_to_start; int i; int fd; apr_status_t rv; apr_size_t one = 1; apr_socket_t *sock = NULL; ap_log_pid(pconf, ap_pid_fname); first_server_limit = server_limit; first_thread_limit = thread_limit; if (changed_limit_at_restart) { ap_log_error(APLOG_MARK, APLOG_WARNING, 0, s, "WARNING: Attempt to change ServerLimit or ThreadLimit " "ignored during restart"); changed_limit_at_restart = 0; } ap_server_conf = s; /* Initialize cross-process accept lock */ ap_lock_fname = apr_psprintf(_pconf, "%s.%u", ap_server_root_relative(_pconf, ap_lock_fname), my_pid); rv = ACCEPT_PROC_MUTEX_CREATE; if (rv != APR_SUCCESS) { ap_log_error(APLOG_MARK, APLOG_EMERG, rv, s, "Couldn't create cross-process lock"); return 1; } if (!is_graceful) { if (ap_run_pre_mpm(s->process->pool, SB_SHARED) != OK) { return 1; } } /* Initialize the child table */ if (!is_graceful) { for (i = 0; i < server_limit; i++) { ap_child_table[i].pid = 0; } } /* We need to put the new listeners at the end of the ap_listeners * list. If we don't, then the pool will be cleared before the * open_logs phase is called for the second time, and ap_listeners * will have only invalid data. If that happens, then the sockets * that we opened using make_sock() will be lost, and the server * won't start. */ apr_os_file_get(&fd, pipe_of_death_in); apr_os_sock_put(&sock, &fd, pconf); listen_add ( pconf, sock, check_pipe_of_death ); set_signals(); /* If we're doing a graceful_restart then we're going to see a lot * of children exiting immediately when we get into the main loop * below (because we just sent them AP_SIG_GRACEFUL). This happens * pretty rapidly... and for each one that exits we'll start a new one * until we reach at least daemons_min_free. But we may be permitted to * start more than that, so we'll just keep track of how many we're * supposed to start up without the 1 second penalty between each fork. */ remaining_children_to_start = num_childs; if (!is_graceful) { remaining_children_to_start = \ startup_children(remaining_children_to_start); } else { /* give the system some time to recover before kicking into * exponential mode */ hold_off_on_exponential_spawning = 10; } ap_log_error(APLOG_MARK, APLOG_NOTICE, 0, ap_server_conf, "%s configured -- resuming normal operations", ap_get_server_version()); ap_log_error(APLOG_MARK, APLOG_INFO, 0, ap_server_conf, "Server built: %s", ap_get_server_built()); #ifdef AP_MPM_WANT_SET_ACCEPT_LOCK_MECH #ifdef NO_SERIALIZED_ACCEPT _DBG("AcceptMutex: n/a (compiled w/ NO_SERIALIZED_ACCEPT)", 0 ); ap_log_error(APLOG_MARK, APLOG_DEBUG, 0, ap_server_conf, "AcceptMutex: n/a (compiled w/ NO_SERIALIZED_ACCEPT)" ); #else ap_log_error(APLOG_MARK, APLOG_DEBUG, 0, ap_server_conf, "AcceptMutex: %s (default: %s)", apr_proc_mutex_name(process_accept_mutex), apr_proc_mutex_defname()); #endif #endif restart_pending = shutdown_pending = 0; server_main_loop(remaining_children_to_start); if (shutdown_pending) { /* Time to gracefully shut down: * Kill child processes, tell them to call child_exit, etc... */ if (unixd_killpg(getpgrp(), SIGTERM) < 0) { ap_log_error(APLOG_MARK, APLOG_WARNING, errno, ap_server_conf, "killpg SIGTERM"); } ap_reclaim_child_processes(1); /* Start with SIGTERM */ if (!child_fatal) { /* cleanup pid file on normal shutdown */ const char *pidfile = NULL; pidfile = ap_server_root_relative (pconf, ap_pid_fname); if (pidfile != NULL && unlink(pidfile) == 0) { ap_log_error(APLOG_MARK, APLOG_INFO, 0, ap_server_conf, "removed PID file %s (pid=%ld)", pidfile, (long)getpid()); } ap_log_error(APLOG_MARK, APLOG_NOTICE, 0, ap_server_conf, "caught SIGTERM, shutting down"); } return 1; } /* we've been told to restart */ apr_signal(SIGHUP, SIG_IGN); if (one_process) return 1; /* not worth thinking about */ if (is_graceful) { char char_of_death = AP_PERCHILD_CHAR_OF_DEATH; ap_log_error(APLOG_MARK, APLOG_NOTICE, 0, ap_server_conf, AP_SIG_GRACEFUL_STRING " received. " "Doing graceful restart"); /* This is mostly for debugging... so that we know what is still * gracefully dealing with existing request. */ for (i = 0; i < num_childs; ++i) { ((ap_child_table[i].pid) && (ap_child_table[i].status = SERVER_DYING)); } /* give the children the signal to die */ for (i = 0; i < num_childs;) { if ((rv = apr_file_write(pipe_of_death_out, &char_of_death,&one)) != APR_SUCCESS) { if (APR_STATUS_IS_EINTR(rv)) continue; ap_log_error(APLOG_MARK, APLOG_WARNING, rv, ap_server_conf, "write pipe_of_death"); } i++; } } else { /* Kill 'em all. Since the child acts the same on the parents SIGTERM * and a SIGHUP, we may as well use the same signal, because some user * pthreads are stealing signals from us left and right. */ if (unixd_killpg(getpgrp(), SIGTERM) < 0) { ap_log_error(APLOG_MARK, APLOG_WARNING, errno, ap_server_conf, "killpg SIGTERM"); } ap_reclaim_child_processes(1); /* Start with SIGTERM */ ap_log_error(APLOG_MARK, APLOG_NOTICE, 0, ap_server_conf, "SIGHUP received. Attempting to restart"); } return 0; } /* This really should be a post_config hook, but the error log is already * redirected by that point, so we need to do this in the open_logs phase. */ static int perchild_open_logs(apr_pool_t *p, apr_pool_t *plog, apr_pool_t *ptemp, server_rec *s) { apr_status_t rv; pconf = p; ap_server_conf = s; _DBG("perchild_open_logs() port=%d", ap_server_conf->port); if ((num_listensocks = ap_setup_listeners(ap_server_conf)) < 1) { ap_log_error(APLOG_MARK, APLOG_ALERT|APLOG_STARTUP, 0, NULL, "perchild_open_logs(): no listening sockets available, shutting down"); return DONE; } ap_log_pid(pconf, ap_pid_fname); if ((rv = ap_mpm_pod_open(pconf, &pod))) { ap_log_error(APLOG_MARK, APLOG_CRIT|APLOG_STARTUP, rv, NULL, "Could not open pipe-of-death."); return DONE; } if ((rv = apr_file_pipe_create(&pipe_of_death_in, &pipe_of_death_out, pconf)) != APR_SUCCESS) { ap_log_error(APLOG_MARK, APLOG_ERR, rv, (const server_rec*) ap_server_conf, "apr_file_pipe_create (apipe_of_death)"); exit(1); } if ((rv = apr_file_pipe_timeout_set(pipe_of_death_in, 0)) != APR_SUCCESS) { ap_log_error(APLOG_MARK, APLOG_ERR, rv, (const server_rec*) ap_server_conf, "apr_file_pipe_timeout_set (pipe_of_death)"); exit(1); } return OK; } static int perchild_pre_config(apr_pool_t *p, apr_pool_t *plog, apr_pool_t *ptemp) { static int restart_num = 0; int no_detach, debug, foreground; ap_directive_t *pdir; int i; int tmp_server_limit = DEFAULT_SERVER_LIMIT; int tmp_thread_limit = DEFAULT_THREAD_LIMIT; apr_status_t rv; debug = ap_exists_config_define("DEBUG"); if (debug) { foreground = one_process = 1; no_detach = 0; } else { one_process = ap_exists_config_define("ONE_PROCESS"); no_detach = ap_exists_config_define("NO_DETACH"); foreground = ap_exists_config_define("FOREGROUND"); } /* FIXME */ no_detach = 1; foreground = 1; /* sigh, want this only the second time around */ if (restart_num++ == 1) { is_graceful = 0; if (!one_process && !foreground) { rv = apr_proc_detach(no_detach ? APR_PROC_DETACH_FOREGROUND : APR_PROC_DETACH_DAEMONIZE); if (rv != APR_SUCCESS) { ap_log_error(APLOG_MARK, APLOG_CRIT, rv, NULL, "apr_proc_detach failed"); return HTTP_INTERNAL_SERVER_ERROR; } } my_pid = getpid(); } unixd_pre_config(ptemp); ap_listen_pre_config(); // num_childs = DEFAULT_NUM_DAEMON; num_childs = 0; threads_to_start = DEFAULT_START_THREAD; min_spare_threads = DEFAULT_MIN_SPARE_THREAD; max_spare_threads = DEFAULT_MAX_SPARE_THREAD; max_threads = thread_limit; ap_pid_fname = DEFAULT_PIDLOG; ap_lock_fname = DEFAULT_LOCKFILE; ap_max_requests_per_child = DEFAULT_MAX_REQUESTS_PER_CHILD; apr_cpystrn(ap_coredump_dir, ap_server_root, sizeof(ap_coredump_dir)); /* we need to know ServerLimit and ThreadLimit before we start processing * the tree because we need to already have allocated child_info_table */ for (pdir = ap_conftree; pdir != NULL; pdir = pdir->next) { if (!strcasecmp(pdir->directive, "ServerLimit")) { if (atoi(pdir->args) > tmp_server_limit) { tmp_server_limit = atoi(pdir->args); if (tmp_server_limit > MAX_SERVER_LIMIT) { tmp_server_limit = MAX_SERVER_LIMIT; } } } else if (!strcasecmp(pdir->directive, "ThreadLimit")) { if (atoi(pdir->args) > tmp_thread_limit) { tmp_thread_limit = atoi(pdir->args); if (tmp_thread_limit > MAX_THREAD_LIMIT) { tmp_thread_limit = MAX_THREAD_LIMIT; } } } } /* -- now setup the child information table -- */ child_info_table = (child_info_t *)apr_pcalloc(p, tmp_server_limit * sizeof(child_info_t)); child_info_table_size = tmp_server_limit; /* FIXME: remove tmp_server_limit */ for (i = 0; i < tmp_server_limit; i++) { child_info_table[i].uid = -1; child_info_table[i].gid = -1; child_info_table[i].input = -1; child_info_table[i].output = -1; child_info_table[i].type = -1; child_info_table[i].id = i; } return OK; } static int pass_request(request_rec *r) { int rv; struct msghdr msg; struct cmsghdr *cmsg; int sock_fd; struct iovec iov[2]; conn_rec *c = r->connection; apr_bucket_brigade *bb = apr_brigade_create(r->pool, c->bucket_alloc); apr_bucket_brigade *sockbb; char request_body[HUGE_STRING_LEN] = "\0"; apr_off_t len = 0; apr_size_t l = 0; perchild_header h; apr_bucket *sockbuck; apr_socket_t *thesock = ap_get_module_config(r->connection->conn_config, &core_module); perchild_server_conf *sconf = PERCHILD_SERVER_CONF(r->server->module_config); if ((!r->the_request) || (!strlen(r->the_request))) { _DBG("pass_request(): empty request. dropping it (%ld)", r->the_request); return -1; } if (!sconf->child) { _DBG("pass_request(): server %s in child %d has no child_info assiocated", r->hostname, child_num); return -1; } _DBG("pass_request(): passing request to another child. Vhost: %s, child %d %d", apr_table_get(r->headers_in, "Host"), child_num, sconf->child->output); _DBG("pass_request() r->the_request=\"%s\" len=%d", r->the_request, strlen(r->the_request)); _DBG("pass_request() r->hostname=\"%s\"", r->hostname); ap_get_brigade(r->connection->input_filters, bb, AP_MODE_EXHAUSTIVE, APR_NONBLOCK_READ,len); /* -- look for the bucket containing the client socket -- */ for (sockbuck = APR_BRIGADE_FIRST(bb); sockbuck != APR_BRIGADE_SENTINEL(bb); sockbuck = APR_BUCKET_NEXT(sockbuck)) { if (APR_BUCKET_IS_SOCKET(sockbuck)) break; } if (!sockbuck) _DBG("pass_request(): no sockbuck!", 0); sockbb = apr_brigade_split(bb, sockbuck); if (apr_brigade_flatten(bb, request_body, &l) != APR_SUCCESS) { ap_log_error(APLOG_MARK, APLOG_DEBUG, 0, ap_server_conf, "Unable to flatten brigade, declining request"); return DECLINED; } apr_os_sock_get(&sock_fd, thesock); h.p = r->pool; h.headers = apr_pstrcat(h.p, r->the_request, CRLF, "Host: ", r->hostname, CRLF, "X-AP-Perchild: passed between childs", CRLF, CRLF, NULL); iov[0].iov_base = h.headers; iov[0].iov_len = strlen(h.headers) + 1; iov[1].iov_base = request_body; iov[1].iov_len = len + 1; msg.msg_name = NULL; msg.msg_namelen = 0; msg.msg_iov = iov; msg.msg_iovlen = 2; cmsg = apr_palloc(r->pool, sizeof(*cmsg) + sizeof(sock_fd)); cmsg->cmsg_len = sizeof(*cmsg) + sizeof(sock_fd); cmsg->cmsg_level = SOL_SOCKET; cmsg->cmsg_type = SCM_RIGHTS; memcpy(CMSG_DATA(cmsg), &sock_fd, sizeof(sock_fd)); msg.msg_control = cmsg; msg.msg_controllen = cmsg->cmsg_len; _DBG("pass_request(): Writing message to %d, passing sock_fd: %d", sconf->child->output, sock_fd); _DBG("pass_request(): header=\"%s\" body=\"%s\" ", h.headers, request_body ); ap_log_error(APLOG_MARK, APLOG_DEBUG, 0, ap_server_conf, "Writing message to %d, passing sd: %d", sconf->child->output, sock_fd); if ((rv = sendmsg(sconf->child->output, &msg, 0)) == -1) { apr_pool_destroy(r->pool); ap_log_error(APLOG_MARK, APLOG_DEBUG, 0, ap_server_conf, "Writing message failed %d %d", rv, errno); return -1; } _DBG("pass_request(): Writing message succeeded %d", rv); ap_log_error(APLOG_MARK, APLOG_DEBUG, 0, ap_server_conf, "Writing message succeeded %d", rv); /* -- close the socket at our site -- */ apr_socket_close(thesock); _DBG("pass_request(): closing socket %d at our side", sock_fd); apr_pool_destroy(r->pool); return 1; } static int perchild_post_config(apr_pool_t *p, apr_pool_t *plog, apr_pool_t *ptemp, server_rec *server_list) { int i; server_rec *sr_walk; perchild_server_conf *sconf; for (sr_walk = server_list; sr_walk; sr_walk = sr_walk->next) { sconf = PERCHILD_SERVER_CONF(sr_walk->module_config); if (sconf->child) { _DBG("perchild_post_config(): server \"%s\" child=%d fd_in=%d fd_out=%d", sr_walk->server_hostname, sconf->child->id, sconf->child->input, sconf->child->output ); } else { _DBG("perchild_post_config(): server \"%s\" has no child assiocated.", sr_walk->server_hostname); } } thread_info_table = (thread_info_t *)apr_pcalloc(p, thread_limit * sizeof(thread_info_t)); for (i = 0; i < thread_limit; i++) { thread_info_table[i].sock_fd = AP_PERCHILD_THISCHILD; thread_info_table[i].status = 0; } ap_child_table = (ap_ctable *)apr_pcalloc(p, server_limit * sizeof(ap_ctable)); return OK; } static int perchild_post_read(request_rec *r) { #define _FDBG(par...) _DBG("perchild_post_read(): " ##par) int thread_num = r->connection->id % thread_limit; perchild_server_conf *sconf = PERCHILD_SERVER_CONF(r->server->module_config); if (!strlen(r->the_request)) { _FDBG("corrupt request. aborting"); return DECLINED; } if (thread_info_table[thread_num].sock_fd != AP_PERCHILD_THISCHILD) { apr_socket_t *sock = NULL; apr_os_sock_put(&sock, &thread_info_table[thread_num].sock_fd, r->connection->pool); ap_sock_disable_nagle(sock); ap_set_module_config(r->connection->conn_config, &core_module, sock); _FDBG("not the right socket? "); return OK; } switch (child_info_table[child_num].type) { case CHILD_TYPE_MULTIPLEXER: { _FDBG("MULTIPLEXER => Determining if request should be passed. " "Child Num: %d, dest-child: %d, hostname from server: %s r->hostname=%s r->the_request=\"%s\"", child_num, sconf->child->id, r->server->server_hostname, r->hostname, r->the_request); if (sconf->child->id != child_num) { _FDBG("Passing request.", 0); if (pass_request(r) == -1) { ap_log_error(APLOG_MARK, APLOG_ERR, 0, ap_server_conf, "Could not pass request to proper " "child, request will not be honoured."); return DECLINED; } _FDBG("doing longjmp", 0 ); longjmp(thread_info_table[thread_num].jmpbuffer, 1); _FDBG("request declined at our site"); return DECLINED; _FDBG("OUH! we should never reach this point", 0 ); } _FDBG("eeeh?! the server is assigned to the multiplexer! ... dropping request"); return DECLINED; } case CHILD_TYPE_PROCESSOR: { _FDBG("PROCESSOR %d", child_num ); if (sconf->child->id != child_num) { _FDBG("hmmpf! this server is not assigned to us! what did the mux have smoked ?!"); } _FDBG("request for %s / (server %s) seems to be for us", r->hostname, r->server->server_hostname ); return OK; } default: { _FDBG("unspecified child type %d in %d, dropping request", child_info_table[child_num].type, child_num ); return OK; } } _FDBG("THIS POINT SHOULD NOT BE REACHED!"); return OK; #undef _FDBG } static void perchild_hooks(apr_pool_t *p) { /* The perchild open_logs phase must run before the core's, or stderr * will be redirected to a file, and the messages won't print to the * console. */ static const char *const aszSucc[] = {"core.c", NULL}; one_process = 0; ap_hook_open_logs(perchild_open_logs, NULL, aszSucc, APR_HOOK_MIDDLE); ap_hook_pre_config(perchild_pre_config, NULL, NULL, APR_HOOK_MIDDLE); ap_hook_post_config(perchild_post_config, NULL, NULL, APR_HOOK_MIDDLE); /* Both of these must be run absolutely first. If this request isn't for * this server then we need to forward it to the proper child. No sense * tying up this server running more post_read request hooks if it is * just going to be forwarded along. The process_connection hook allows * perchild to receive the passed request correctly, by automatically * filling in the core_input_filter's ctx pointer. */ ap_hook_post_read_request(perchild_post_read, NULL, NULL, APR_HOOK_REALLY_FIRST); ap_hook_process_connection(perchild_process_connection, NULL, NULL, APR_HOOK_REALLY_FIRST); } //static const char *cf_NumServers(cmd_parms *cmd, void *dummy, // const char *arg) //{ // const char *err = ap_check_cmd_context(cmd, GLOBAL_ONLY); // if (err != NULL) return err; // // num_childs = atoi(arg); // if (num_childs > server_limit) { // ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, // "WARNING: NumServers of %d exceeds ServerLimit value " // "of %d servers,", num_childs, server_limit); // ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, // " lowering NumServers to %d. To increase, please " // "see the", server_limit); // ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, // " ServerLimit directive."); // num_childs = server_limit; // } // else if (num_childs < 1) // { // ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, // "WARNING: Require NumServers > 0, setting to 1"); // num_childs = 1; // } // return NULL; //} static const char *cf_StartThreads(cmd_parms *cmd, void *dummy, const char *arg) { const char *err = ap_check_cmd_context(cmd, GLOBAL_ONLY); if (err != NULL) return err; threads_to_start = atoi(arg); if (threads_to_start > thread_limit) { ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, "WARNING: StartThreads of %d exceeds ThreadLimit value" " of %d threads,", threads_to_start, thread_limit); ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, " lowering StartThreads to %d. To increase, please" " see the", thread_limit); ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, " ThreadLimit directive."); } else if (threads_to_start < 1) { ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, "WARNING: Require StartThreads > 0, setting to 1"); threads_to_start = 1; } return NULL; } static const char *cf_MinSpareThreads(cmd_parms *cmd, void *dummy, const char *arg) { const char *err = ap_check_cmd_context(cmd, GLOBAL_ONLY); if (err != NULL) return err; min_spare_threads = atoi(arg); if (min_spare_threads <= 0) { ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, "WARNING: detected MinSpareThreads set to non-positive."); ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, "Resetting to 1 to avoid almost certain Apache failure."); ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, "Please read the documentation."); min_spare_threads = 1; } return NULL; } static const char *cf_MaxSpareThreads(cmd_parms *cmd, void *dummy, const char *arg) { const char *err = ap_check_cmd_context(cmd, GLOBAL_ONLY); if (err != NULL) return err; max_spare_threads = atoi(arg); if (max_spare_threads >= thread_limit) { ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, "WARNING: detected MinSpareThreads set higher than"); ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, "ThreadLimit. Resetting to %d", thread_limit); max_spare_threads = thread_limit; } return NULL; } static const char *cf_MaxThreadsPerChild(cmd_parms *cmd, void *dummy, const char *arg) { const char *err = ap_check_cmd_context(cmd, GLOBAL_ONLY); if (err != NULL) return err; max_threads = atoi(arg); if (max_threads > thread_limit) { ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, "WARNING: detected MaxThreadsPerChild set higher than"); ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, "ThreadLimit. Resetting to %d", thread_limit); max_threads = thread_limit; } return NULL; } static const char* child_add ( int type, const char* user_name, const char* group_name ) { _DBG("child_add(): %d: %s.%s", num_childs, user_name, group_name); if (num_childs<server_limit) { int socks[2]; child_info_table[num_childs].uid = ap_uname2id(user_name); child_info_table[num_childs].gid = ap_gname2id(group_name); child_info_table[num_childs].type = type; socketpair(PF_UNIX, SOCK_STREAM, 0, socks); child_info_table[num_childs].input = socks[0]; child_info_table[num_childs].output = socks[1]; _DBG( "child_add(): [%d] uid=%d gid=%d type=%d fd_in=%d fd_out=%d", num_childs, child_info_table[num_childs].uid, child_info_table[num_childs].gid, child_info_table[num_childs].type, child_info_table[num_childs].input, child_info_table[num_childs].output ); if (child_info_table[num_childs].uid == 0 || child_info_table[num_childs].gid == 0) { _DBG("Assigning root user/group to a child.", 0); } num_childs++; return NULL; } return "Trying to use more child ID's than NumServers. " "Increase NumServers in your config file."; } /* we define an Processor w/ specific uid/gid */ static const char *cf_Processor( cmd_parms *cmd, void *dummy, const char *user_name, const char *group_name) { _DBG("cf_Processor(): %d: %s.%s", num_childs, user_name, group_name); return child_add ( CHILD_TYPE_PROCESSOR, user_name, group_name ); } /* we define an Multiplexer child w/ specific uid/gid */ static const char *cf_Multiplexer( cmd_parms *cmd, void *dummy, const char *user_name, const char *group_name) { _DBG("cf_Multiplexer(): %d: %s.%s", num_childs, user_name, group_name); return child_add ( CHILD_TYPE_MULTIPLEXER, user_name, group_name ); } /* process the config file option AssignUserId */ /* -- FIXME: perhaps we could add childs from here automatically -- */ static const char * cf_AssignUserId ( cmd_parms *cmd, void *dummy, const char *user_name, const char *group_name ) { int i; int matching = 0; int uid = ap_uname2id(user_name); int gid = ap_gname2id(group_name); const char *errstr; perchild_server_conf *sconf = PERCHILD_SERVER_CONF(cmd->server->module_config); sconf->fullsockname = apr_pstrcat(cmd->pool, sconf->sockname, ".", user_name,":", group_name, NULL); _DBG ("cf_AssignUserId(): user=\"%s\" (%d) group=\"%s\" (%d)", user_name, uid, group_name, gid ); for (i = 0; i < num_childs; i++) { _DBG ("cf_AssignUserId(): trying %d: %d.%d / %d", i, child_info_table[i].uid, child_info_table[i].gid, child_info_table[i].type ); if ((uid == child_info_table[i].uid) && (gid == child_info_table[i].gid) && (child_info_table[i].type == CHILD_TYPE_PROCESSOR)) { /* create an socket for this child, if it has no one */ /* FIXME: we should do it anywhere else, for _all_ childs */ sconf->child = &child_info_table[i]; ap_log_error( APLOG_MARK, APLOG_DEBUG, 0, cmd->server, "assigning server to child %d; UID: %d, GID: %d, " "input=%d, output=%d", i, uid, gid, sconf->child->input, sconf->child->output ); return NULL; } } return "Unable to find process with matching uid/gid."; } static const char *cf_ServerLimit (cmd_parms *cmd, void *dummy, const char *arg) { int tmp_server_limit; const char *err = ap_check_cmd_context(cmd, GLOBAL_ONLY); if (err != NULL) return err; tmp_server_limit = atoi(arg); /* you cannot change ServerLimit across a restart; ignore * any such attempts */ if (first_server_limit && tmp_server_limit != server_limit) { /* how do we log a message? the error log is a bit bucket at this * point; we'll just have to set a flag so that ap_mpm_run() * logs a warning later */ changed_limit_at_restart = 1; return NULL; } server_limit = tmp_server_limit; if (server_limit > MAX_SERVER_LIMIT) { ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, "WARNING: ServerLimit of %d exceeds compile time limit " "of %d servers,", server_limit, MAX_SERVER_LIMIT); ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, " lowering ServerLimit to %d.", MAX_SERVER_LIMIT); server_limit = MAX_SERVER_LIMIT; } else if (server_limit < 1) { ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, "WARNING: Require ServerLimit > 0, setting to 1"); server_limit = 1; } return NULL; } static const char *cf_ThreadLimit (cmd_parms *cmd, void *dummy, const char *arg) { int tmp_thread_limit; const char *err = ap_check_cmd_context(cmd, GLOBAL_ONLY); if (err != NULL) return err; tmp_thread_limit = atoi(arg); /* you cannot change ThreadLimit across a restart; ignore * any such attempts */ if (first_thread_limit && tmp_thread_limit != thread_limit) { /* how do we log a message? the error log is a bit bucket at this * point; we'll just have to set a flag so that ap_mpm_run() * logs a warning later */ changed_limit_at_restart = 1; return NULL; } thread_limit = tmp_thread_limit; if (thread_limit > MAX_THREAD_LIMIT) { ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, "WARNING: ThreadLimit of %d exceeds compile time limit " "of %d servers,", thread_limit, MAX_THREAD_LIMIT); ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, " lowering ThreadLimit to %d.", MAX_THREAD_LIMIT); thread_limit = MAX_THREAD_LIMIT; } else if (thread_limit < 1) { ap_log_error(APLOG_MARK, APLOG_STARTUP, 0, NULL, "WARNING: Require ThreadLimit > 0, setting to 1"); thread_limit = 1; } return NULL; } static const command_rec perchild_cmds[] = { UNIX_DAEMON_COMMANDS, LISTEN_COMMANDS, AP_INIT_TAKE1("StartThreads", cf_StartThreads, NULL, RSRC_CONF, "Number of threads each child creates"), AP_INIT_TAKE1("MinSpareThreads", cf_MinSpareThreads, NULL, RSRC_CONF, "Minimum number of idle threads per child, to handle " "request spikes"), AP_INIT_TAKE1("MaxSpareThreads", cf_MaxSpareThreads, NULL, RSRC_CONF, "Maximum number of idle threads per child"), AP_INIT_TAKE1("MaxThreadsPerChild", cf_MaxThreadsPerChild, NULL, RSRC_CONF, "Maximum number of threads per child"), AP_INIT_TAKE2("Multiplexer", cf_Multiplexer, NULL, RSRC_CONF, "Specify an Multiplexer Child configuration."), AP_INIT_TAKE2("Processor", cf_Processor, NULL, RSRC_CONF, "Specify a User and Group for a specific child process."), AP_INIT_TAKE2("AssignUserID", cf_AssignUserId, NULL, RSRC_CONF, "Tie a virtual host to a specific child process."), AP_INIT_TAKE1("ServerLimit", cf_ServerLimit, NULL, RSRC_CONF, "Maximum value of NumServers for this run of Apache"), AP_INIT_TAKE1("ThreadLimit", cf_ThreadLimit, NULL, RSRC_CONF, "Maximum worker threads in a server for this run of Apache"), { NULL } }; /* == allocate an private server config structure == */ static void *perchild_create_config(apr_pool_t *p, server_rec *s) { perchild_server_conf *c = (perchild_server_conf *) apr_pcalloc(p, sizeof(perchild_server_conf)); c->child = NULL; return c; } module AP_MODULE_DECLARE_DATA mpm_perchild_module = { MPM20_MODULE_STUFF, ap_mpm_rewrite_args, /* hook to run before apache parses args */ NULL, /* create per-directory config structure */ NULL, /* merge per-directory config structures */ perchild_create_config, /* create per-server config structure */ NULL, /* merge per-server config structures */ perchild_cmds, /* command apr_table_t */ perchild_hooks /* register_hooks */ };
