added support for cache backing store

Try to use LIBDIR instead of PREFIX as directory where to look for
python libraries to link with.

.hgtags

@@ -8,3 +8,7 @@ a83e7a482e65befcfbb0e24af8cd5d15190acdd7 0.9.6-rc1
 b8f67c6cd0d62f864db9b2b265b4e260ad7d873c 0.9.6-rc2
 35918dd4b3771158b2b57410613ef029e08bbd60 0.9.6
 5f25d1f97f9dde3e391a668c1c610a52a5db8244 0.9.6.1
+ef31fc61ac48018c464f28ebfdf865b96bf83f18 0.9.6.2
+9e100c1f085034396cec586f0c76ad3f9800d1a5 0.9.7-beta1
+ff4111eb8f55b958ec91c70163e10f3372a9b94d 0.9.7-rc1
+eb8aff2926230bb114fb90f67203440a2c534bf1 0.9.7-rc2

ChangeLog

@@ -1,5 +1,126 @@
+*** march 2011 ***
+
+ * 0.9.7-rc2 [20010309]
+
+- added cron-like interface to signal framework
+- improved Linux namespaces support
+- fixed multithreading + --max-requests
+- added support for reference in configuration files
+
+ * 0.9.7-rc1 [20110307]
+
+- export %v in emperor mode
+- fixed signal race condition in server reload
+- fixed http router post handling bug
+- added uwsgi.erlang_register_process in pyerl plugin
+- fixed unix socket inherit
+- fixed linux namespace support in recent kernel/gcc
+- ported threading to python 3.2
+- add build date to uWSGI startup info
+- do not allow clustering without defining a socket
+- kill all the gateways/daemons on startup errors
+- fixed vacuum after chdir()
+- fixed gateways reload
+- re-added support for OpenBSD and NetBSD
+- fixed post-buffering in python
+- use erlang binary for python string
+- fixed memory leak in pyerl plugin
+- removed broken log rotation (post-poned)
+- fixed no_argument options in ini and yaml parsing
+
+ * 0.9.7-beta1 [20110301]
+
+- fully modular re-design
+- advanced build system with presets
+- threading support
+- emperor mode for massive auto-hosting
+- caching subsystem
+- message queue (even stacked) support
+- improved server reloading system
+- support for Linux Cgroups and Namespaces
+- integrated upload progress
+- Clustering infrastructure via multicast, broadcast or subscriptions
+- support for attaching/monitoring external apps to the master process
+- improved virtualhosting mode
+- extremely improved Python support with better usage of multiple interpreters
+- improved multiple apps support
+- Production ready, evented HTTP router/proxy/load-balancer
+- Production ready, evented uwsgi router/proxy/load-balancer
+- new Erlang stack
+- Internal signal subsystem
+- support for RubyOnRails and Rack apps
+- A huge series of fixes and optimizations
+
+*** february 2011 ***
+
+ * 0.9.6.8 [20110207]
+
+- fixed a bug when using --limit-as
+- fixed a erlang buffer initialization
+- added --ignore-sigpipe
+- added --master-as-root
+
+*** january 2011 ***
+
+ * 0.9.6.7 [20110130]
+
+- a huge amount of async optimizations and fixes
+- --logdate takes an optional strftime-like value
+- follow $PATH on reloading
+- uwsgi.core is exported in WSGI env
+- uwsgi.log() respect for --logdate
+- initial banner respect for --logdate
+- fixed --post-buffering
+- default listen backlog queue is now 100
+- Python 3 support is no more marked as experimental
+- Python 3.2 support
+- new option --chroot-reload will force a reload of the uWSGI stack after a chroot
+- fixed a typo in INI parsing
+
+*** december 2010 ***
+
+ * 0.9.6.6 [20101230]
+
+- support for YAML configuration files
+- backported python module aliasing from 0.9.7-dev
+- better apache2 module (support for SetEnv directive, fixed REQUEST_URI and improved connection handling)
+- uwsgi.post_fork_hook implementation (to execute function after fork()) (thanks George Kollias)
+- option --gid calls setgroups() after setgid() (thanks Jorge Cardona)
+- fixed uGreen compilation (and uGreen is now built by default)
+- fixed timeout and thundering herd problem in async modes (many thanks to Test157 for giving us a good async-test-app)
+- disable TCP_INFO in older Linux kernels (thanks Bo Shi)
+- enable TCP_INFO in FreeBSD (limited usage due to FreeBSD kernel support)
+- fixed static virtualhosting mode using xml files (thanks Guido Notari of Link I.T. spa)
+- new option --close-on-exec (thanks Jean-Baptiste Quenot)
+- use HTTP_HOST var (and fallback to SERVER_NAME) in virtual hosting mode
+- fixed a buffer overflow in automatic socket_name allocation (spotted by Riccardo Magliocchetti)
+- Official support for Nexenta
+
+
 *** september 2010 ***
 
+ * 0.9.6.5 [20100929]
+
+- PEP 3333 support
+- fix --pythonpath with --wsgi-file
+- x-wsgiorg.uwsgi.version renamed to uwsgi.version
+
+ * 0.9.6.4 [20100925]
+
+- fix a stupid bug in conditional logging backport
+
+ * 0.9.6.3 [20100925]
+
+- fix a buffer overflow in .ini parsing (it throws a glibc error on malloc)
+- backport of conditional logging from 0.9.7-dev
+- backport of backlog queue monitor from 0.9.7-dev (only Linux)
+
+ * 0.9.6.2 [20100915]
+
+- fix a regression in virtual hosting mode
+- fix pythonpath usage in --ini and --ini-paste
+- new uwsgi packet var: UWSGI_CHDIR
+
  * 0.9.6.1 [20100912]
 
 - print the request uri during SIGPIPE or HARAKIRI

Makefile.Py32

@@ -0,0 +1,2 @@
+all:
+	python3.2 uwsgiconfig.py --build

Makefile.PyLua

@@ -0,0 +1,2 @@
+all:
+	python uwsgiconfig.py --build pylua

apache2/mod_uwsgi.c

@@ -1,18 +1,18 @@
 /* 
         
-    *** uWSGI/mod_uwsgi ***
+*** uWSGI/mod_uwsgi ***
 
-    Copyright 2009-2010 Unbit S.a.s. <info@unbit.it>
-        
-    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.
+Copyright 2009-2010 Unbit S.a.s. <info@unbit.it>
+     
+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.
+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
@@ -264,7 +264,6 @@ static int uwsgi_handler(request_rec *r) {
 	char uwsgi_http_status[13] ;
 	int uwsgi_http_status_read = 0;
 	
-
 	apr_bucket_brigade *bb;
 
 	if (strcmp(r->handler, "uwsgi-handler"))
@@ -287,7 +286,6 @@ static int uwsgi_handler(request_rec *r) {
 		return HTTP_INTERNAL_SERVER_ERROR;
 	}
 
-
 	if ( (ret = timed_connect(&uwsgi_poll, (struct sockaddr *) &c->s_addr, c->addr_size, c->socket_timeout, r) ) != 0) {
 
 		close(uwsgi_poll.fd);
@@ -323,7 +321,7 @@ static int uwsgi_handler(request_rec *r) {
 	vecptr = uwsgi_add_var(uwsgi_vars, vecptr, "SERVER_NAME", (char *) ap_get_server_name(r), &pkt_size) ;
 	vecptr = uwsgi_add_var(uwsgi_vars, vecptr, "SERVER_PORT", apr_psprintf(r->pool, "%u",ap_get_server_port(r)), &pkt_size) ;
 	vecptr = uwsgi_add_var(uwsgi_vars, vecptr, "SERVER_PROTOCOL", r->protocol, &pkt_size) ;
-	vecptr = uwsgi_add_var(uwsgi_vars, vecptr, "REQUEST_URI", r->uri, &pkt_size) ;
+	vecptr = uwsgi_add_var(uwsgi_vars, vecptr, "REQUEST_URI", r->unparsed_uri, &pkt_size) ;
 	vecptr = uwsgi_add_var(uwsgi_vars, vecptr, "REMOTE_ADDR", r->connection->remote_ip, &pkt_size) ;
 	vecptr = uwsgi_add_var(uwsgi_vars, vecptr, "REMOTE_USER", r->user ? r->user : "", &pkt_size) ;
 	if (r->user) {
@@ -394,6 +392,13 @@ static int uwsgi_handler(request_rec *r) {
 			}
 		}
 	}
+
+	/* environment variables */
+	headers = apr_table_elts(r->subprocess_env);
+	h = (apr_table_entry_t*) headers->elts;
+	for (i = 0; i < headers->nelts; ++i) {
+		vecptr = uwsgi_add_var(uwsgi_vars, vecptr, h[i].key, h[i].val, &pkt_size) ;
+	}	
 	
 
 	uwsgi_vars[0].iov_base = pkt_header;
@@ -456,12 +461,17 @@ static int uwsgi_handler(request_rec *r) {
 			return HTTP_INTERNAL_SERVER_ERROR;
 		}
 		else if (cnt > 0) {
-			if (uwsgi_poll.revents & POLLIN) {
+			if (uwsgi_poll.revents & POLLIN || uwsgi_poll.revents & POLLHUP) {
 				cnt = recv(uwsgi_poll.fd, buf, 4096, 0) ;
 				if (cnt < 0) {
-					ap_log_rerror(APLOG_MARK, APLOG_ERR, 0, r, "uwsgi: recv() %s", strerror(errno));
-					apr_brigade_destroy(bb);
-					return HTTP_INTERNAL_SERVER_ERROR;
+					if (errno != ECONNRESET) {
+						ap_log_rerror(APLOG_MARK, APLOG_ERR, 0, r, "uwsgi: recv() %s", strerror(errno));
+						apr_brigade_destroy(bb);
+						return HTTP_INTERNAL_SERVER_ERROR;
+					}
+					else {
+						break;
+					}
 				}
 				else if (cnt > 0) {
 					if (!c->cgi_mode && uwsgi_http_status_read < 12) {
@@ -482,21 +492,17 @@ static int uwsgi_handler(request_rec *r) {
 						return HTTP_INTERNAL_SERVER_ERROR;
 					}
 					apr_brigade_write(bb, NULL, NULL, buf, cnt);
-					hret = ap_fflush(r->output_filters, bb) ;
-					if (hret != APR_SUCCESS) {
-						close(uwsgi_poll.fd);
-						apr_brigade_destroy(bb);
-						return hret;
-					}
 				}
 				else {
+					// EOF
 					break;
 				}
 			}
 
-			if (uwsgi_poll.revents & POLLHUP || uwsgi_poll.revents & POLLERR || uwsgi_poll.revents & POLLNVAL) {
-				break;
-			}
+			// error
+			if (uwsgi_poll.revents & POLLERR || uwsgi_poll.revents & POLLNVAL) {
+                                break;
+                        }
 		}
 		else {
 			ap_log_rerror(APLOG_MARK, APLOG_ERR, 0, r, "uwsgi: poll() %s", strerror(errno));

async.c

@@ -1,292 +1,22 @@
-#ifdef UWSGI_ASYNC
-
 #include "uwsgi.h"
 
+extern struct uwsgi_server uwsgi;
 
-#ifdef __linux__
+int async_get_timeout() {
 
-#include <sys/epoll.h>
-
-int async_queue_init(int serverfd) {
-	int epfd ;
-	struct epoll_event ee;
-
-	epfd = epoll_create(256);	
-
-	if (epfd < 0) {
-		uwsgi_error("epoll_create()");
-		return -1 ;
-	}
-
-	memset(&ee, 0, sizeof(struct epoll_event));
-	ee.events = EPOLLIN;
-        ee.data.fd = serverfd;
-
-        if (epoll_ctl(epfd, EPOLL_CTL_ADD, serverfd, &ee)) {
-                uwsgi_error("epoll_ctl()");
-		close(epfd);
-		return -1;
-        }
-
-	return epfd;
-}
-
-int async_wait(int queuefd, void *events, int nevents, int block, int timeout) {
-
-	int ret ;
-
-	if (timeout <= 0) {
-		timeout = block;
-	}
-	else {
-		timeout = timeout*1000;
-	}
-
-	//uwsgi_log("waiting with timeout %d nevents %d\n", timeout, nevents);
-	ret = epoll_wait(queuefd, (struct epoll_event *) events, nevents, timeout);
-	if (ret < 0) {
-		uwsgi_error("epoll_wait()");
-	}
-	return ret ;
-}
-
-int async_add(int queuefd, int fd, int etype) {
-	struct epoll_event ee;
-
-	memset(&ee, 0, sizeof(struct epoll_event));
-	ee.events = etype;
-        ee.data.fd = fd;
-
-        if (epoll_ctl(queuefd, EPOLL_CTL_ADD, fd, &ee)) {
-                uwsgi_error("epoll_ctl()");
-		return -1;
-        }
-
-	return 0;
-}
-
-int async_mod(int queuefd, int fd, int etype) {
-	struct epoll_event ee;
-
-	memset(&ee, 0, sizeof(struct epoll_event));
-	ee.events = etype;
-        ee.data.fd = fd;
-
-        if (epoll_ctl(queuefd, EPOLL_CTL_MOD, fd, &ee)) {
-                uwsgi_error("epoll_ctl()");
-		return -1;
-        }
-
-	return 0;
-}
-
-int async_del(int queuefd, int fd, int etype) {
-	struct epoll_event ee;
-
-	memset(&ee, 0, sizeof(struct epoll_event));
-	ee.events = etype;
-        ee.data.fd = fd;
-
-        if (epoll_ctl(queuefd, EPOLL_CTL_DEL, fd, &ee)) {
-                uwsgi_error("epoll_ctl()");
-		return -1;
-        }
-
-	return 0;
-}
-
-#elif defined(__sun__)
-
-int async_queue_init(int serverfd) {
-        int dpfd ;
-        struct pollfd dpev;
-
-
-        dpfd = open("/dev/poll", O_RDWR);
-
-        if (dpfd < 0) {
-                uwsgi_error("open()");
-                return -1 ;
-        }
-
-
-	dpev.fd = serverfd;
-	dpev.events = POLLIN ;
-	dpev.revents = 0;
-
-        if (write(dpfd, &dpev, sizeof(struct pollfd)) < 0) {
-                uwsgi_error("write()");
-                return -1;
-        }
-
-
-        return dpfd;
-}
-
-int async_wait(int queuefd, void *events, int nevents, int block, int timeout) {
-
-	int ret ;
-	struct dvpoll dv ;
-
-	if (timeout <= 0) {
-		timeout = block;
-	}
-	else {
-		timeout = timeout*1000;
-	}
-
-	dv.dp_fds = (struct pollfd *) events;
-	dv.dp_nfds = nevents;
-	dv.dp_timeout = timeout;
-
-	//uwsgi_log("waiting with timeout %d nevents %d\n", timeout, nevents);
-	ret = ioctl(queuefd, DP_POLL, &dv);
-	if (ret < 0) {
-		uwsgi_error("ioctl()");
-	}
-	return ret ;
-}
-
-int async_add(int queuefd, int fd, int etype) {
-	struct pollfd pl;
-
-	pl.fd = fd ;
-	pl.events = etype ;
-	pl.revents = 0 ;
-
-        if (write(queuefd, &pl, sizeof(struct pollfd)) < 0) {
-                uwsgi_error("write()");
-		return -1;
-        }
-
-	return 0;
-}
-
-int async_mod(int queuefd, int fd, int etype) {
-	// using the same fd will overwrite existing rule
-	return async_add(queuefd, fd, etype);
-}
-
-int async_del(int queuefd, int fd, int etype) {
-	// use POLLREMOVE to remove an fd
-	return async_add(queuefd, fd, POLLREMOVE);
-}
-
-#else
-int async_queue_init(int serverfd) {
-	int kfd ;
-	struct kevent kev;
-
-	kfd = kqueue();	
-
-	if (kfd < 0) {
-		uwsgi_error("kqueue()");
-		return -1 ;
-	}
-
-	EV_SET(&kev, serverfd, EVFILT_READ, EV_ADD, 0, 0, 0);
-        if (kevent(kfd, &kev, 1, NULL, 0, NULL) < 0) {
-                uwsgi_error("kevent()");
-                return -1;
-        }
-
-	return kfd;
-}
-
-int async_wait(int queuefd, void *events, int nevents, int block, int timeout) {
-
-        int ret;
-	struct timespec ts ;
-
-
-	if (timeout <= 0) {
-		if (!block) {
-			memset(&ts, 0, sizeof(struct timespec));
-			ts.tv_sec = timeout ;
-			ret = kevent(queuefd, NULL, 0, events, nevents, &ts);
-		}
-		else {
-			ret = kevent(queuefd, NULL, 0, events, nevents, NULL);
-		}
-	}
-	else {
-		memset(&ts, 0, sizeof(struct timespec));
-		ts.tv_sec = timeout ;
-		ret = kevent(queuefd, NULL, 0, events, nevents, &ts);
-	}
-
-	if (ret < 0) {
-		uwsgi_error("kevent()");
-	}
-	
-	return ret;
-}
-
-int async_add(int queuefd, int fd, int etype) {
-	struct kevent kev;
-
-
-	EV_SET(&kev, fd, etype, EV_ADD, 0, 0, 0);
-        if (kevent(queuefd, &kev, 1, NULL, 0, NULL) < 0) {
-                uwsgi_error("kevent()");
-                return -1;
-        }
-	return 0;
-}
-
-int async_mod(int queuefd, int fd, int etype) {
-	struct kevent kev;
-
-	EV_SET(&kev, fd, ASYNC_OUT, EV_DISABLE, 0, 0, 0);
-        if (kevent(queuefd, &kev, 1, NULL, 0, NULL) < 0) {
-                uwsgi_error("kevent()");
-                return -1;
-        }
-
-	EV_SET(&kev, fd, etype, EV_ADD, 0, 0, 0);
-        if (kevent(queuefd, &kev, 1, NULL, 0, NULL) < 0) {
-                uwsgi_error("kevent()");
-                return -1;
-        }
-	return 0;
-}
-
-int async_del(int queuefd, int fd, int etype) {
-	struct kevent kev;
-
-	EV_SET(&kev, fd, etype, EV_DELETE, 0, 0, 0);
-        if (kevent(queuefd, &kev, 1, NULL, 0, NULL) < 0) {
-                uwsgi_error("kevent()");
-                return -1;
-        }
-
-	return 0;
-}
-
-#endif
-
-inline struct wsgi_request *next_wsgi_req(struct uwsgi_server *uwsgi, struct wsgi_request *wsgi_req) {
-
-        uint8_t *ptr = (uint8_t *) wsgi_req ;
-
-        ptr += sizeof(struct wsgi_request) ;
-
-        return (struct wsgi_request *) ptr ;
-}
-
-int async_get_timeout(struct uwsgi_server *uwsgi) {
-
-
-        struct wsgi_request* wsgi_req = uwsgi->wsgi_requests ;
+        struct wsgi_request* wsgi_req ;
         int i ;
 	time_t curtime, tdelta = 0 ;
 	int ret = 0 ;
 
-	if (!uwsgi->async_running) return 0;
+	// do not wait if there are cores running
+	if (!uwsgi.async_running) return 0;
 
-        for(i=0;i<uwsgi->async;i++) {
+        for(i=0;i<uwsgi.async_current_max;i++) {
+		wsgi_req = uwsgi.wsgi_requests[i];
                 if (wsgi_req->async_status == UWSGI_AGAIN) {
 			if (wsgi_req->async_timeout_expired) {
+				// do not wait if there are timeout expired
 				return 0;
 			}
 			if (wsgi_req->async_timeout > 0) {
@@ -295,7 +25,6 @@ int async_get_timeout(struct uwsgi_server *uwsgi) {
 				}
 			}
                 }
-                wsgi_req = next_wsgi_req(uwsgi, wsgi_req) ;
         }
 
 	curtime = time(NULL);
@@ -305,72 +34,70 @@ int async_get_timeout(struct uwsgi_server *uwsgi) {
 		return ret;
 	}
 	
-	return 0;
+	return -1;
 }
 
-void async_expire_timeouts(struct uwsgi_server *uwsgi) {
+void async_expire_timeouts() {
 
-        struct wsgi_request* wsgi_req = uwsgi->wsgi_requests ;
+        struct wsgi_request* wsgi_req ;
         int i ;
 	time_t deadline = time(NULL);
 
 
-        for(i=0;i<uwsgi->async;i++) {
+        for(i=0;i<uwsgi.async_current_max;i++) {
+                wsgi_req = uwsgi.wsgi_requests[i] ;
+
                 if (wsgi_req->async_status == UWSGI_AGAIN && wsgi_req->async_timeout > 0) {
 			if (wsgi_req->async_timeout <= deadline) {
 				wsgi_req->async_timeout = 0 ;
 				wsgi_req->async_timeout_expired = 1 ;
+				if (wsgi_req->async_waiting_fd != -1) {
+                                        event_queue_del_fd(uwsgi.async_queue, wsgi_req->async_waiting_fd);
+					uwsgi.async_waiting_fd_table[wsgi_req->async_waiting_fd] = -1;
+                                        wsgi_req->async_waiting_fd = -1;
+                                        wsgi_req->async_waiting_fd_monitored = 0;
+                                }
 			}	
                 }
-                wsgi_req = next_wsgi_req(uwsgi, wsgi_req) ;
         }
 }
 
-struct wsgi_request *find_first_available_wsgi_req(struct uwsgi_server *uwsgi) {
+struct wsgi_request *find_first_available_wsgi_req() {
 
-        struct wsgi_request* wsgi_req = uwsgi->wsgi_requests ;
+        struct wsgi_request* wsgi_req;
         int i ;
 
-        for(i=0;i<uwsgi->async;i++) {
+	// optimization
+	if (uwsgi.async_current_max > 1) {
+		if (uwsgi.wsgi_requests[uwsgi.async_current_max-1]->async_status == UWSGI_OK) {
+			//uwsgi_log("decreasing current max cores\n");
+			uwsgi.async_current_max--;
+		}
+	}
+
+        for(i=0;i<uwsgi.async;i++) {
+                wsgi_req = uwsgi.wsgi_requests[i] ;
                 if (wsgi_req->async_status == UWSGI_OK) {
+			// optimization
+			if (i > uwsgi.async_current_max-1) uwsgi.async_current_max = i+1;
+			wsgi_req->async_id = i;
                         return wsgi_req ;
                 }
-                wsgi_req = next_wsgi_req(uwsgi, wsgi_req) ;
         }
 
         return NULL ;
 }
 
-struct wsgi_request *find_wsgi_req_by_id(struct uwsgi_server *uwsgi, int async_id) {
+struct wsgi_request *find_wsgi_req_by_fd(int fd) {
 
-	uint8_t *ptr = (uint8_t *) uwsgi->wsgi_requests ;
+        struct wsgi_request* wsgi_req = NULL ;
+	int core_id = uwsgi.async_waiting_fd_table[fd];
 
-        ptr += sizeof(struct wsgi_request) * async_id ;
+	if (core_id == -1) return NULL;
 
-        return (struct wsgi_request *) ptr ;
-}
-
-struct wsgi_request *find_wsgi_req_by_fd(struct uwsgi_server *uwsgi, int fd, int etype) {
-
-        struct wsgi_request* wsgi_req = uwsgi->wsgi_requests ;
-        int i ;
-
-	if (etype != -1) {
-        	for(i=0;i<uwsgi->async;i++) {
-                	if (wsgi_req->async_waiting_fd == fd && wsgi_req->async_waiting_fd_type == etype) {
-                        	return wsgi_req ;
-                	}
-                	wsgi_req = next_wsgi_req(uwsgi, wsgi_req) ;
-        	}
-	}
-	else {
-        	for(i=0;i<uwsgi->async;i++) {
-                	if (wsgi_req->async_waiting_fd == fd) {
-                        	return wsgi_req ;
-                	}
-                	wsgi_req = next_wsgi_req(uwsgi, wsgi_req) ;
-        	}
-	}
+	wsgi_req = uwsgi.wsgi_requests[core_id];
+        //if (wsgi_req->async_waiting_fd_type == etype) return wsgi_req ;
+	return wsgi_req;
 
         return NULL ;
 
@@ -384,13 +111,14 @@ void async_set_timeout(struct wsgi_request *wsgi_req, time_t timeout) {
 	
 }
 
-void async_write_all(struct uwsgi_server *uwsgi, char *data, size_t len) {
+void async_write_all(char *data, size_t len) {
 	
-	struct wsgi_request *wsgi_req = uwsgi->wsgi_requests ;
+	struct wsgi_request *wsgi_req;
 	int i;
 	ssize_t rlen ;
 
-	for(i=0;i<uwsgi->async;i++) {
+	for(i=0;i<uwsgi.async_current_max;i++) {
+		wsgi_req = uwsgi.wsgi_requests[i];
                 if (wsgi_req->async_status == UWSGI_PAUSED) {
 			rlen = write(wsgi_req->poll.fd, data, len);
 			if (rlen < 0) {
@@ -403,57 +131,71 @@ void async_write_all(struct uwsgi_server *uwsgi, char *data, size_t len) {
 	}
 }
 
-void async_unpause_all(struct uwsgi_server *uwsgi) {
+void async_unpause_all() {
 	
-	struct wsgi_request *wsgi_req = uwsgi->wsgi_requests ;
+	struct wsgi_request *wsgi_req ;
 	int i;
 
-	for(i=0;i<uwsgi->async;i++) {
+	for(i=0;i<uwsgi.async_current_max;i++) {
+		wsgi_req = uwsgi.wsgi_requests[i];
                 if (wsgi_req->async_status == UWSGI_PAUSED) {
 			wsgi_req->async_status = UWSGI_AGAIN;
 		}
 	}
 }
 
-struct wsgi_request * async_loop(struct uwsgi_server *uwsgi) {
+struct wsgi_request * async_loop() {
 
 	struct wsgi_request *wsgi_req ;
 	int i ;
+	int ret;
 
-	uwsgi->async_running = -1 ;
-        wsgi_req = uwsgi->wsgi_requests ;
+	uwsgi.async_running = -1 ;
 
-
-	for(i=0;i<uwsgi->async;i++) {
+	for(i=0;i<uwsgi.async_current_max;i++) {
+		wsgi_req = uwsgi.wsgi_requests[i];
         	if (wsgi_req->async_status == UWSGI_AGAIN) {
-                	if (wsgi_req->async_waiting_fd != -1 && !wsgi_req->async_waiting_fd_monitored) {
+			if (wsgi_req->sigwait) {
+				uwsgi_log("waiting for signal\n");
+				continue;
+			}
+                	else if (wsgi_req->async_waiting_fd != -1 && !wsgi_req->async_waiting_fd_monitored) {
 				// add fd to monitoring
-				if (async_add(uwsgi->async_queue, wsgi_req->async_waiting_fd, wsgi_req->async_waiting_fd_type)) {
+				ret = -1;
+				if (wsgi_req->async_waiting_fd_type == ASYNC_IN) {
+					ret = event_queue_add_fd_read(uwsgi.async_queue, wsgi_req->async_waiting_fd);
+				}
+				else if (wsgi_req->async_waiting_fd_type == ASYNC_OUT) {
+					ret = event_queue_add_fd_write(uwsgi.async_queue, wsgi_req->async_waiting_fd);
+				}
+
+				if (ret < 0) {
 					// error adding fd to the async queue, better to close it...
 					close(wsgi_req->async_waiting_fd);
 					wsgi_req->async_status = UWSGI_OK ;
 					return wsgi_req;
 				}
+				uwsgi.async_waiting_fd_table[wsgi_req->async_waiting_fd] = wsgi_req->async_id;
 				wsgi_req->async_waiting_fd_monitored = 1;
 				wsgi_req->async_status = UWSGI_AGAIN;
 			}
 			else if (wsgi_req->async_waiting_fd == -1 && wsgi_req->async_timeout <= 0) {
-                		uwsgi->async_running = 0 ;
-				// st global wsgi_req for python functions
-				uwsgi->wsgi_req = wsgi_req ;
-				wsgi_req->async_status = (*uwsgi->shared->hooks[wsgi_req->uh.modifier1]) (uwsgi, wsgi_req);
+                		uwsgi.async_running = 0 ;
+				// st global wsgi_req
+				uwsgi.wsgi_req = wsgi_req ;
 
-				wsgi_req->async_switches++;
+				uwsgi_log("!!! getting new part\n");
+				wsgi_req->async_status = uwsgi.p[wsgi_req->uh.modifier1]->request(wsgi_req);;
+
+				wsgi_req->switches++;
 
 				if (wsgi_req->async_status < UWSGI_AGAIN) {
 					return wsgi_req;
 				}
 			}
 		}
-		wsgi_req = next_wsgi_req(uwsgi, wsgi_req) ;
 	}
 
 	return NULL;
 
 }
-#endif

buildconf/core.ini

@@ -0,0 +1,3 @@
+[uwsgi]
+inherit = default
+embedded_plugins = null

buildconf/default.ini

@@ -0,0 +1,33 @@
+[uwsgi]
+xml = true
+ini = true
+yaml = true
+snmp = true
+sctp = false
+spooler = true
+embedded = true
+udp = true
+multicast = true
+threading = true
+sendfile = true
+minterpreters = true
+async = true
+evdis = false
+ldap = auto
+pcre = auto
+debug = false
+unbit = false
+xml_implementation = libxml2
+plugins =
+bin_name = uwsgi
+plugin_dir = .
+embedded_plugins = python, ping, nagios, rpc, fastrouter, http
+
+locking = auto
+event = auto
+timer = auto
+filemonitor = auto
+
+[python]
+paste = true
+web3 = true

buildconf/erlang.ini

@@ -0,0 +1,3 @@
+[uwsgi]
+inherit = default
+embedded_plugins = +,erlang

buildconf/lua.ini

@@ -0,0 +1,3 @@
+[uwsgi]
+inherit = default
+embedded_plugins = lua

buildconf/luap.ini

@@ -0,0 +1,3 @@
+[uwsgi]
+inherit = default
+plugins = lua

buildconf/modular.ini

@@ -0,0 +1,33 @@
+[uwsgi]
+xml = true
+ini = true
+snmp = true
+sctp = false
+erlang = false
+spooler = false
+embedded = false
+udp = true
+multicast = false
+threading = true
+sendfile = true
+nagios = true
+proxy = true
+minterpreters = true
+async = true
+ugreen = false
+http = true
+evdis = false
+ldap = true
+routing = false
+stackless = false
+debug = false
+unbit = false
+xml_implementation = libxml2
+plugins = python, ping, rack
+bin_name = uwsgi
+plugin_dir = .
+embedded_plugins =
+
+[python]
+paste = true
+web3 = true

buildconf/psgi.ini

@@ -0,0 +1,3 @@
+[uwsgi]
+inherit = default
+embedded_plugins = psgi

buildconf/pyerl.ini

@@ -0,0 +1,3 @@
+[uwsgi]
+inherit = default
+embedded_plugins = +,erlang,pyerl

buildconf/pylua.ini

@@ -0,0 +1,7 @@
+[uwsgi]
+inherit = default
+embedded_plugins = +,lua
+
+[python]
+paste = true
+web3 = true

buildconf/pyrb.ini

@@ -0,0 +1,31 @@
+[uwsgi]
+xml = true
+ini = true
+snmp = true
+sctp = false
+erlang = false
+spooler = true
+embedded = true
+udp = true
+multicast = true
+threading = true
+sendfile = true
+proxy = true
+minterpreters = true
+async = true
+http = true
+evdis = false
+ldap = false
+routing = false
+stackless = false
+debug = false
+unbit = false
+xml_implementation = libxml2
+plugins =
+bin_name = uwsgi
+plugin_dir = .
+embedded_plugins = python, ping, nagios, rack
+
+[python]
+paste = true
+web3 = true

buildconf/rack.ini

@@ -0,0 +1,3 @@
+[uwsgi]
+inherit = default
+embedded_plugins = rack, ping, nagios, rpc

buildconf/rackp.ini

@@ -0,0 +1,30 @@
+[uwsgi]
+xml = true
+ini = true
+yaml = true
+snmp = true
+sctp = false
+erlang = false
+spooler = false
+embedded = false
+udp = true
+multicast = false
+threading = true
+sendfile = true
+nagios = true
+proxy = true
+minterpreters = true
+async = true
+ugreen = false
+http = true
+evdis = false
+ldap = false
+routing = false
+stackless = false
+debug = false
+unbit = false
+xml_implementation = libxml2
+plugins = rack
+bin_name = uwsgi
+plugin_dir = .
+embedded_plugins =

buildconf/unbit.ini

@@ -0,0 +1,23 @@
+[uwsgi]
+xml = true
+ini = true
+yaml = true
+snmp = false
+sctp = false
+spooler = true
+embedded = true
+udp = true
+multicast = false
+threading = true
+sendfile = true
+nagios = false
+minterpreters = true
+async = true
+ldap = true
+debug = false
+unbit = true
+xml_implementation = libxml2
+plugins =
+bin_name = /opt/unbit/bin/uwsgi
+plugin_dir = /opt/unbit/uwsgi_plugins
+embedded_plugins =

buildconf/unbitstaff.ini

@@ -0,0 +1,4 @@
+[uwsgi]
+inherit = unbit
+bin_name = ../bin/uwsgi
+plugin_dir = ../bin/uwsgi_plugins

cache.c

@@ -0,0 +1,588 @@
+#include "uwsgi.h"
+
+extern struct uwsgi_server uwsgi;
+
+struct uwsgi_subscriber_name *uwsgi_get_subscriber(struct uwsgi_dict *udict, char *key, uint16_t keylen) {
+
+	uint64_t ovl;
+	struct uwsgi_subscriber *usub;
+	struct uwsgi_subscriber_name *ret = NULL;
+	
+	usub = (struct uwsgi_subscriber *) uwsgi_dict_get(udict, key, keylen, &ovl);
+
+	if (usub == NULL || !ovl) return NULL;
+
+	if (!usub->nodes) return NULL;
+
+	if (usub && ovl) {
+		ret = &usub->names[usub->current];
+		// dead node
+		if (ret->len == 0) {
+			if (usub->current == usub->nodes-1) {
+				usub->nodes--;
+			}
+			// retry with another node (if available)
+			if (usub->nodes > 0) {
+				usub->current++;
+				if (usub->current >= usub->nodes) usub->current = 0;
+				return uwsgi_get_subscriber(udict, key, keylen);
+			}
+		}
+
+		if (usub->nodes > 1) {
+			usub->current++;
+			if (usub->current >= usub->nodes) usub->current = 0;
+		}
+
+	}
+
+	return ret;
+}
+
+void uwsgi_add_subscriber(struct uwsgi_dict *udict, char *key, uint16_t keylen, char *address, uint64_t address_len) {
+
+	char *ptr;
+	uint64_t vallen = 0;
+	struct uwsgi_subscriber *usub, nusub;
+	int found = 0;
+	int i;
+	
+	ptr = uwsgi_dict_get(udict, key, keylen, &vallen);
+	if (ptr && vallen) {
+		usub = (struct uwsgi_subscriber *) ptr;
+		for(i=0;i<(int)usub->nodes;i++) {
+			if (!uwsgi_strncmp(usub->names[i].name, usub->names[i].len, address, address_len)) {
+				found = 1;
+				break;
+			}
+		}
+		if (!found) {
+			found = usub->nodes;
+			// check for unallocated slot
+			for(i=0;i<(int)usub->nodes;i++) {
+				if (usub->names[i].len == 0) {
+					found = i;
+					break;
+				}
+			}
+			usub->names[found].len = address_len;
+			memcpy(usub->names[found].name, address, address_len);
+			if (found == (int) usub->nodes) {
+				usub->nodes++;
+			}
+		}
+		return;
+	}
+	else {
+		nusub.nodes = 1;
+		nusub.current = 0;
+		memcpy(nusub.names[0].name, address, address_len);
+		uwsgi_dict_set(udict, key, keylen, (char *) &nusub, sizeof(struct uwsgi_subscriber));
+	}
+
+}
+
+struct uwsgi_dict *uwsgi_dict_create(uint64_t items, uint64_t blocksize) {
+
+	int i;
+
+	struct uwsgi_dict *udict = (struct uwsgi_dict *) mmap(NULL, sizeof(uint64_t) * UMAX16, PROT_READ | PROT_WRITE, MAP_SHARED | MAP_ANON, -1, 0);
+	if (!udict) {
+        	uwsgi_error("mmap()");
+                exit(1);
+	}
+
+	if (!blocksize) blocksize = 4096;
+
+        if (blocksize % uwsgi.page_size != 0) {
+        	uwsgi_log("invalid shared dictionary blocksize %llu: must be a multiple of memory page size (%d bytes)\n", (unsigned long long) udict->blocksize, uwsgi.page_size);
+        	exit(1);
+	}
+
+	udict->blocksize = blocksize;
+	udict->max_items = items;
+
+        udict->hashtable = (uint64_t *) mmap(NULL, sizeof(uint64_t) * UMAX16, PROT_READ | PROT_WRITE, MAP_SHARED | MAP_ANON, -1, 0);
+        if (!udict->hashtable) {
+        	uwsgi_error("mmap()");
+                exit(1);
+	}
+
+        memset(udict->hashtable, 0, sizeof(uint64_t) * UMAX16);
+
+        udict->unused_stack = (uint64_t *) mmap(NULL, sizeof(uint64_t) * udict->max_items, PROT_READ | PROT_WRITE, MAP_SHARED | MAP_ANON, -1, 0);
+        if (!udict->unused_stack) {
+        	uwsgi_error("mmap()");
+                exit(1);
+	}
+
+        memset(udict->unused_stack, 0, sizeof(uint64_t) * udict->max_items);
+
+        udict->items = (struct uwsgi_dict_item *) mmap(NULL, sizeof(struct uwsgi_dict_item) * udict->max_items, PROT_READ | PROT_WRITE, MAP_SHARED | MAP_ANON, -1, 0);
+        if (!udict->items) {
+        	uwsgi_error("mmap()");
+                exit(1);
+        }
+
+        udict->data = mmap(NULL, udict->blocksize * udict->max_items, PROT_READ | PROT_WRITE, MAP_SHARED | MAP_ANON, -1, 0);
+        if (!udict->data) {
+        	uwsgi_error("mmap()");
+                exit(1);
+        }
+
+        for(i=0;i< (int) udict->max_items;i++) {
+        	memset(&udict->items[i], 0, sizeof(struct uwsgi_dict_item));
+        }
+
+        udict->first_available_item = 1;
+        udict->unused_stack_ptr = 0;
+
+        udict->lock = uwsgi_mmap_shared_lock();
+        uwsgi_lock_init(udict->lock);
+
+	return udict;
+}
+
+uint32_t djb33x_hash(char *key, int keylen) {
+
+	register uint32_t hash = 5381;
+	int i;
+
+	for(i=0;i<keylen;i++) {
+		hash = ((hash << 5) + hash) ^ key[i];
+	}
+
+	return hash;
+}
+
+
+inline uint64_t uwsgi_dict_get_index(struct uwsgi_dict *udict, char *key, uint16_t keylen) {
+
+        uint32_t hash = djb33x_hash(key, keylen);
+
+        int hash_key = hash % 0xffff;
+
+        uint64_t slot = udict->hashtable[hash_key];
+
+        struct uwsgi_dict_item *udi;
+
+        udi = &udict->items[slot];
+
+        // first round
+        if (udi->djbhash != hash) goto cycle;
+        if (udi->keysize != keylen) goto cycle;
+        if (memcmp(udi->key, key, keylen)) goto cycle;
+
+        return slot;
+
+cycle:
+        while(udi->next) {
+                slot = udi->next;
+                udi = &udict->items[slot];
+                if (udi->djbhash != hash) continue;
+                if (udi->keysize != keylen) continue;
+                if (!memcmp(udi->key, key, keylen)) return slot;
+        }
+
+        return 0;
+}
+
+char *uwsgi_dict_get(struct uwsgi_dict *udict, char *key, uint16_t keylen, uint64_t *valsize) {
+
+        uint64_t index = uwsgi_dict_get_index(udict, key, keylen);
+
+        if (index) {
+                *valsize = udict->items[index].valsize;
+                udict->items[index].hits++;
+                return udict->data+(index*udict->blocksize);
+        }
+
+        return NULL;
+}
+
+int uwsgi_dict_del(struct uwsgi_dict *udict, char *key, uint16_t keylen) {
+
+        uint64_t index = 0;
+        struct uwsgi_dict_item *udi;
+        int ret = -1;
+
+        index = uwsgi_dict_get_index(udict, key, keylen);
+        if (index) {
+                udi = &udict->items[index] ;
+                udi->keysize = 0;
+                udi->valsize = 0;
+                udict->unused_stack_ptr++;
+                udict->unused_stack[udict->unused_stack_ptr] = index;
+                // try to return to initial condition...
+                if (index == udict->first_available_item-1) {
+                        udict->first_available_item--;
+                }
+                ret = 0;
+                // relink collisioned entry
+                if (udi->prev) {
+                        udict->items[udi->prev].next = udi->next;
+                }
+                if (udi->next) {
+                        udict->items[udi->next].prev = udi->prev;
+                }
+                if (!udi->prev && !udi->next) {
+                        // reset hashtable entry
+                        udict->hashtable[udi->djbhash % 0xffff] = 0;
+                }
+                udi->djbhash = 0;
+                udi->prev = 0;
+                udi->next = 0;
+        }
+
+        return ret;
+}
+
+
+
+inline uint64_t uwsgi_cache_get_index(char *key, uint16_t keylen) {
+
+	uint32_t hash = djb33x_hash(key, keylen);
+	
+	int hash_key = hash % 0xffff;
+
+	uint64_t slot = uwsgi.cache_hashtable[hash_key];
+
+	struct uwsgi_cache_item *uci;
+
+	//uwsgi_log("found slot %d for key %d\n", slot, hash_key);
+
+	uci = &uwsgi.cache_items[slot];
+
+	// first round
+	if (uci->djbhash != hash) goto cycle;
+	if (uci->keysize != keylen) goto cycle;
+	if (memcmp(uci->key, key, keylen)) goto cycle;
+
+	return slot;
+
+cycle:
+	while(uci->next) {
+		slot = uci->next;
+		uci = &uwsgi.cache_items[slot];
+		if (uci->djbhash != hash) continue;
+		if (uci->keysize != keylen) continue;
+		if (!memcmp(uci->key, key, keylen)) return slot;
+	}
+
+	return 0;
+}
+
+uint32_t uwsgi_cache_exists(char *key, uint16_t keylen) {
+
+	return uwsgi_cache_get_index(key, keylen);
+}
+
+char *uwsgi_cache_get(char *key, uint16_t keylen, uint64_t *valsize) {
+
+	uint64_t index = uwsgi_cache_get_index(key, keylen);
+
+	if (index) {
+		if (uwsgi.cache_items[index].flags & UWSGI_CACHE_FLAG_UNGETTABLE) return NULL;
+		*valsize = uwsgi.cache_items[index].valsize;
+		uwsgi.cache_items[index].hits++;
+		return uwsgi.cache+(index*uwsgi.cache_blocksize);
+	}
+
+	return NULL;
+}
+
+int uwsgi_cache_del(char *key, uint16_t keylen) {
+
+	uint64_t index = 0;
+	struct uwsgi_cache_item *uci;
+	int ret = -1;
+
+	index = uwsgi_cache_get_index(key, keylen);
+	if (index) {
+		uci = &uwsgi.cache_items[index] ;
+		uci->keysize = 0;
+		uci->valsize = 0;
+		uwsgi.shared->cache_unused_stack_ptr++;
+		uwsgi.cache_unused_stack[uwsgi.shared->cache_unused_stack_ptr] = index;
+		// try to return to initial condition...
+		if (index == uwsgi.shared->cache_first_available_item-1) {
+			uwsgi.shared->cache_first_available_item--;
+			//uwsgi_log("FACI: %llu STACK PTR: %llu\n", (unsigned long long) uwsgi.shared->cache_first_available_item, (unsigned long long) uwsgi.shared->cache_unused_stack_ptr);
+		}
+		ret = 0;
+		// relink collisioned entry
+		if (uci->prev) {
+			uwsgi.cache_items[uci->prev].next = uci->next;	
+		}
+		if (uci->next) {
+			uwsgi.cache_items[uci->next].prev = uci->prev;	
+		}
+		if (!uci->prev && !uci->next) {
+			// reset hashtable entry
+			//uwsgi_log("!!! resetted hashtable entry !!!\n");
+			uwsgi.cache_hashtable[uci->djbhash % 0xffff] = 0;
+		}
+		uci->djbhash = 0;
+		uci->prev = 0;
+		uci->next = 0;
+	}
+
+	return ret;
+}
+
+void uwsgi_cache_fix() {
+
+	uint64_t i;
+
+	for(i=0;i< uwsgi.cache_max_items;i++) {
+		// valid record ?
+		if (uwsgi.cache_items[i].keysize) {
+			if (!uwsgi.cache_items[i].prev) {
+				// put value in hash_table
+				uwsgi.cache_hashtable[ uwsgi.cache_items[i].djbhash % 0xffff] = i;
+			}
+		}
+		else {
+			// put this record in unused stack
+			uwsgi.shared->cache_first_available_item = i;
+			uwsgi.shared->cache_unused_stack_ptr++;
+			uwsgi.cache_unused_stack[uwsgi.shared->cache_unused_stack_ptr] = i;
+		}
+	}
+}
+
+int uwsgi_cache_set(char *key, uint16_t keylen, char *val, uint64_t vallen, uint64_t expires, uint16_t flags) {
+
+	uint64_t index = 0, last_index = 0 ;
+
+	struct uwsgi_cache_item *uci, *ucii;
+
+	int ret = -1;
+	int slot;
+
+	if (!keylen || !vallen) return -1;
+
+	if (keylen > UWSGI_CACHE_MAX_KEY_SIZE) return -1;	
+
+	if (uwsgi.shared->cache_first_available_item >= uwsgi.cache_max_items && !uwsgi.shared->cache_unused_stack_ptr) {
+		uwsgi_log("*** DANGER cache is FULL !!! ***\n");
+		goto end;
+	}
+
+	//uwsgi_log("putting cache data in key %.*s %d\n", keylen, key, vallen);
+	index = uwsgi_cache_get_index(key, keylen);
+	if (!index) {
+		if (uwsgi.shared->cache_unused_stack_ptr) {
+			//uwsgi_log("!!! REUSING CACHE SLOT !!! (faci: %llu)\n", (unsigned long long) uwsgi.shared->cache_first_available_item);
+			index = uwsgi.cache_unused_stack[uwsgi.shared->cache_unused_stack_ptr];
+			uwsgi.shared->cache_unused_stack_ptr--;
+		}
+		else {
+			index = uwsgi.shared->cache_first_available_item;	
+			if (uwsgi.shared->cache_first_available_item < uwsgi.cache_max_items) {
+				uwsgi.shared->cache_first_available_item++;
+			}
+		}
+		uci = &uwsgi.cache_items[index] ;
+		if (expires) expires += time(NULL);
+		uci->expires = expires;
+		uci->djbhash = djb33x_hash(key, keylen);
+		uci->hits = 0;
+		uci->flags = flags;
+		memcpy(uci->key, key, keylen);
+		memcpy(uwsgi.cache+(index*uwsgi.cache_blocksize), val, vallen);
+
+		// set this as late as possibile (to reduce races risk)
+
+		uci->valsize = vallen;
+		uci->keysize = keylen;	
+		ret = 0;
+		// now put the value in the 16bit hashtable
+		slot = uci->djbhash % 0xffff;
+
+		if (uwsgi.cache_hashtable[slot] == 0) {
+			uwsgi.cache_hashtable[slot] = index;
+		}
+		else {
+			//uwsgi_log("HASH COLLISION !!!!\n");
+			// append to first available next
+			last_index = uwsgi.cache_hashtable[slot];
+			ucii = &uwsgi.cache_items[ last_index ];
+			while(ucii->next) {
+				last_index = ucii->next;
+				ucii = &uwsgi.cache_items[ last_index ];
+			}
+			ucii->next = index;
+			uci->prev = last_index;
+		}
+	}
+
+end:
+	return ret;
+	
+}
+
+int uwsgi_dict_set(struct uwsgi_dict *udict, char *key, uint16_t keylen, char *val, uint64_t vallen) {
+
+        uint64_t index = 0, last_index = 0 ;
+
+        struct uwsgi_dict_item *udi, *udii;
+
+        int ret = -1;
+        int slot;
+
+        if (!keylen || !vallen) return -1;
+
+        if (keylen > UWSGI_CACHE_MAX_KEY_SIZE) return -1;
+
+        if (udict->first_available_item >= udict->max_items && !udict->unused_stack_ptr) {
+                uwsgi_log("*** DANGER dictionary %p is FULL !!! ***\n", udict);
+                goto end;
+        }
+
+        index = uwsgi_dict_get_index(udict, key, keylen);
+        if (!index) {
+                if (udict->unused_stack_ptr) {
+                        index = udict->unused_stack[udict->unused_stack_ptr];
+                        udict->unused_stack_ptr--;
+                }
+                else {
+                        index = udict->first_available_item;
+                        if (udict->first_available_item < udict->max_items) {
+                                udict->first_available_item++;
+                        }
+                }
+                udi = &udict->items[index] ;
+                udi->djbhash = djb33x_hash(key, keylen);
+                udi->hits = 0;
+                memcpy(udi->key, key, keylen);
+                memcpy(udict->data+(index*udict->blocksize), val, vallen);
+
+                // set this as late as possibile (to reduce races risk)
+
+                udi->valsize = vallen;
+                udi->keysize = keylen;
+                ret = 0;
+                // now put the value in the 16bit hashtable
+                slot = udi->djbhash % 0xffff;
+
+                if (udict->hashtable[slot] == 0) {
+                        udict->hashtable[slot] = index;
+                }
+                else {
+                        // append to first available next
+                        last_index = udict->hashtable[slot];
+                        udii = &udict->items[ last_index ];
+                        while(udii->next) {
+                                last_index = udii->next;
+                                udii = &udict->items[ last_index ];
+                        }
+                        udii->next = index;
+                        udi->prev = last_index;
+                }
+        }
+
+end:
+        return ret;
+
+}
+
+
+void cache_command(char *key, uint16_t keylen, char *val, uint16_t vallen, void *data) {
+
+	struct wsgi_request *wsgi_req = (struct wsgi_request *) data;
+	uint64_t tmp_vallen = 0;
+
+	if (vallen > 0) {
+		if (!uwsgi_strncmp(key, keylen, "key", 3)) {
+			val = uwsgi_cache_get(val, vallen, &tmp_vallen);
+                        if (val && tmp_vallen > 0) {
+                        	wsgi_req->response_size = write(wsgi_req->poll.fd, val, tmp_vallen);
+                        }
+
+		}		
+		else if (!uwsgi_strncmp(key, keylen, "get", 3)) {
+			val = uwsgi_cache_get(val, vallen, &tmp_vallen);
+			if (val && vallen > 0) {
+                        	wsgi_req->response_size = write(wsgi_req->poll.fd, val, tmp_vallen);
+			}
+			else {
+				wsgi_req->response_size = write(wsgi_req->poll.fd, "HTTP/1.0 404 Not Found\r\n\r\n<h1>Not Found</h1>", 44);
+			}
+		}
+	}
+}
+
+int uwsgi_cache_request(struct wsgi_request *wsgi_req) {
+
+	uint64_t vallen = 0;
+	char *value;
+	char *argv[3];
+	uint8_t argc = 0;
+
+	switch(wsgi_req->uh.modifier2) {
+		case 0:
+			// get
+			if (wsgi_req->uh.pktsize > 0) {
+				value = uwsgi_cache_get(wsgi_req->buffer, wsgi_req->uh.pktsize, &vallen);
+				if (value && vallen > 0) {
+					wsgi_req->uh.pktsize = vallen;
+					wsgi_req->response_size = write(wsgi_req->poll.fd, &wsgi_req->uh, 4);
+					wsgi_req->response_size += write(wsgi_req->poll.fd, value, vallen);
+				}
+			}
+			break;		
+		case 1:
+			// set
+			if (wsgi_req->uh.pktsize > 0) {
+				argc = 3;
+				if (!uwsgi_parse_array(wsgi_req->buffer, wsgi_req->uh.pktsize, argv, &argc)) {
+					if (argc > 1) {
+						uwsgi_cache_set(argv[0], strlen(argv[0]), argv[1], strlen(argv[1]), 0, 0);
+					}
+				}
+			}
+			break;
+		case 2:
+			// del
+			if (wsgi_req->uh.pktsize > 0) {
+				uwsgi_cache_del(wsgi_req->buffer, wsgi_req->uh.pktsize);
+			}
+			break;
+		case 3:
+		case 4:
+			// dict
+			if (wsgi_req->uh.pktsize > 0) {
+				uwsgi_hooked_parse(wsgi_req->buffer, wsgi_req->uh.pktsize, cache_command, (void *) wsgi_req);
+			}
+			break;
+		case 5:
+			// get (uwsgi + stream)
+			if (wsgi_req->uh.pktsize > 0) {
+				value = uwsgi_cache_get(wsgi_req->buffer, wsgi_req->uh.pktsize, &vallen);
+				if (value && vallen > 0) {
+					wsgi_req->uh.pktsize = 0;
+					wsgi_req->uh.modifier2 = 1;
+					wsgi_req->response_size = write(wsgi_req->poll.fd, &wsgi_req->uh, 4);
+					wsgi_req->response_size += write(wsgi_req->poll.fd, value, vallen);
+				}
+				else {
+					wsgi_req->uh.pktsize = 0;
+					wsgi_req->uh.modifier2 = 0;
+					wsgi_req->response_size = write(wsgi_req->poll.fd, &wsgi_req->uh, 4);
+				}
+			}
+			break;		
+	}
+
+	return 0;
+}
+
+struct uwsgi_plugin uwsgi_cache_plugin = {
+
+        .name = "cache",
+        .modifier1 = 111, 
+        .request = uwsgi_cache_request,
+
+};
+

config.ru

@@ -0,0 +1,18 @@
+require 'fiber'
+require 'sinatra'
+
+get '/hi' do
+
+   class Response
+	def each
+		for i in 1..10
+			yield "ciao<br/>"
+			Fiber.yield
+		end
+	end
+   end
+
+   Response.new
+end
+
+run Sinatra::Application

config2.ru

@@ -0,0 +1,7 @@
+require 'sinatra'
+
+get '/hi' do
+	"Hello World"
+end
+
+run Sinatra::Application

contrib/Uwsgi.pm

@@ -17,10 +17,10 @@ sub new {
 sub run {
     my ($self, $app) = @_;
 
-    my $server ;
+    my $server;
 
     if (exists($ENV{'UWSGI_FD'})) {
-	$server = IO::Socket::UNIX->new_from_fd($ENV{'UWSGI_FD'}, '+<');
+        $server = IO::Socket::UNIX->new_from_fd($ENV{'UWSGI_FD'}, '+<');
     }
     else {	
         $server = IO::Socket::INET->new(LocalPort => $self->{port}, LocalAddr => $self->{host}, Listen => 100, ReuseAddr => 1);
@@ -28,62 +28,62 @@ sub run {
 
     while ( my $client = $server->accept ) {
 
-	my $head = '';
-	my $remains = 4 ;
+        my $head = '';
+        my $remains = 4;
 
-	while($remains) {
-		$client->recv(my $buf, $remains);	
-		last unless $buf;
-		$head.=$buf;
-		$remains -= length($buf);
-	}
+        while($remains) {
+            $client->recv(my $buf, $remains);	
+            last unless $buf;
+            $head.=$buf;
+            $remains -= length($buf);
+        }
 
-	if (length($head) != 4) {
-		$client->close ;
-		next;
-	}
+        if (length($head) != 4) {
+            $client->close;
+            next;
+        }
 
-	my ($mod1, $envsize, $mod2) = unpack('CvC', $head) ;
+        my ($mod1, $envsize, $mod2) = unpack('CvC', $head);
 
-	unless ($envsize) {
-		$client->close ;
-		next;
-	}
+        unless ($envsize) {
+            $client->close;
+            next;
+        }
 
-	$remains = $envsize ;
-	my $envbuf = '' ;
-	while($remains) {
-		my $buf ;
-		if ($remains >= 4096) {
-			$client->recv($buf, 4096);	
-		}
-		else {
-			$client->recv($buf, $remains);	
-		}
+        $remains = $envsize;
+        my $envbuf = '';
+        while($remains) {
+            my $buf;
+            if ($remains >= 4096) {
+                $client->recv($buf, 4096);	
+            }
+            else {
+                $client->recv($buf, $remains);	
+            }
 
-		unless($buf) {
-			$client->close ;
-			next;
-		}
+            unless($buf) {
+                $client->close;
+                next;
+            }
 
-		$envbuf.=$buf;
-		$remains -= length($buf);
-	}
+            $envbuf.=$buf;
+            $remains -= length($buf);
+        }
 
-	if (length($envbuf) != $envsize ) {
-		$client->close ;
-		next;
-	}
+        if (length($envbuf) != $envsize ) {
+            $client->close;
+            next;
+        }
 
-	my %env ;
+        my %env;
 
-	my $i = 0;
-	while($i < $envsize) {
-		my $kl = unpack('v', substr($envbuf, $i, 2)) ; $i+=2;
-		my $key = substr($envbuf, $i, $kl); $i+=$kl;
-		my $vl = unpack('v', substr($envbuf, $i, 2)) ; $i+=2;
-		$env{$key} = substr($envbuf, $i, $vl); $i+=$vl;
-	}
+        my $i = 0;
+        while($i < $envsize) {
+            my $kl = unpack('v', substr($envbuf, $i, 2)); $i+=2;
+            my $key = substr($envbuf, $i, $kl); $i+=$kl;
+            my $vl = unpack('v', substr($envbuf, $i, 2)); $i+=2;
+            $env{$key} = substr($envbuf, $i, $vl); $i+=$vl;
+        }
 
         my $env = {
             %env,
@@ -105,40 +105,40 @@ sub run {
         }
         elsif (ref $res eq 'CODE') {
             $res->(sub {
-                $self->_handle_response($client, $env{'SERVER_PROTOCOL'}, $_[0]);
-            });
+                    $self->_handle_response($client, $env{'SERVER_PROTOCOL'}, $_[0]);
+                });
         }
         else {
             die "Bad response $res";
         }
 
-	$client->close ;
+        $client->close;
 
     }
 }
 
 sub _handle_response {
-	my ($self, $client, $protocol, $res) = @_;
+    my ($self, $client, $protocol, $res) = @_;
 
-	$client->send($protocol.' '.$res->[0].' '.HTTP::Status::status_message( $res->[0] )."\r\n");
+    $client->send($protocol.' '.$res->[0].' '.HTTP::Status::status_message( $res->[0] )."\r\n");
 
-	my $headers = $res->[1];
-	my $hdrs = '';
-	while (my ($k, $v) = splice @$headers, 0, 2) {
-        	$hdrs .= "$k: $v\r\n";
-	}
-	$hdrs .= "\r\n";
+    my $headers = $res->[1];
+    my $hdrs = '';
+    while (my ($k, $v) = splice @$headers, 0, 2) {
+        $hdrs .= "$k: $v\r\n";
+    }
+    $hdrs .= "\r\n";
 
-	$client->send($hdrs);
+    $client->send($hdrs);
 
-	my $cb = sub { $client->send($_[0]) };
-	my $body = $res->[2];
-	if (defined $body) {
-        	Plack::Util::foreach($body, $cb);
-    	}
-	else {
-		return Plack::Util::inline_object write => $cb,close => sub { };
-    	}
+    my $cb = sub { $client->send($_[0]) };
+    my $body = $res->[2];
+    if (defined $body) {
+        Plack::Util::foreach($body, $cb);
+    }
+    else {
+        return Plack::Util::inline_object write => $cb,close => sub { };
+    }
 }
 
 1;

contrib/urack.rb

@@ -9,6 +9,7 @@ require 'optparse'
 
 options = {
         :processes => 1,
+        :threads => 1,
         :master => false,
         :logging => true,
         :static => true,
@@ -19,6 +20,7 @@ options = {
 opts = OptionParser.new do |opts|
 
         opts.on("-p", "--processes=nproc", Integer, '') { |p| options[:processes] = p }
+        opts.on("-t", "--threads=nthreads", Integer, '') { |t| options[:threads] = t }
         opts.on("-M", "--master", '') { options[:master] = true }
         opts.on("-L", "--no-logging", '') { options[:logging] = false }
         opts.on("-S", "--no-static", '') { options[:static] = false }
@@ -37,6 +39,7 @@ end
 
 $requests = 0
 $workers = Array.new
+$mywid = 0
 
 module Rack
 
@@ -74,12 +77,14 @@ module Rack
                         ulog("spawned worker 1 (pid: #{$workers[1]})")
                 elsif $workers[1].to_i == 0
                         $0 = "uRack worker 1"
+			$mywid = 1
                         can_spawn = false
                 end
         else
                 $0 = 'uRack worker 1'
                 $workers[0] = nil
                 $workers[1] = Process.pid
+		$mywid = 1
                 ulog("spawned worker 1 (pid: #{$workers[1]})")
         end
 
@@ -88,6 +93,7 @@ module Rack
                         $workers[p] = Process.fork
                         if $workers[p].to_i == 0
                                 $0 = "uRack worker #{p}"
+				$mywid = p
                                 break
                         elsif $workers[p].to_i > 0
                                 ulog("spawned worker #{p} (pid: #{$workers[p]})")
@@ -107,6 +113,7 @@ module Rack
                                         if $workers[wid].to_i == 0
                                                 $0 = "uRack worker #{wid}"
                                                 i_am_a_child = true
+						$mywid = wid
                                                 break
                                         elsif $workers[wid].to_i > 0
                                                 ulog("respawned worker #{wid} (pid: #{$workers[wid]})")
@@ -118,9 +125,21 @@ module Rack
                 end
         end
         
+	if options[:threads] > 2
+		for t in 2..options[:threads]
+			wt = Thread.new do
+			    ulog("spawning thread #{t} on worker #{$mywid}")
+            		    while client = server.accept
+                		serve client, app, options
+            		    end
+			end
+		end
+	end
+
         while client = server.accept
-          serve client, app, options
+        	serve client, app, options
         end
+
       end
 
       def self.serve(client, app, options)

contrib/uwsgi.erl

@@ -0,0 +1,30 @@
+-module(uwsgi).
+-export([encode/1,send/3]).
+
+	
+encode(Vars) ->
+	Body = lists:map(fun(X) -> Len = length(X), lists:append( binary_to_list(<<Len:16/little-unsigned-integer>>), X) end, Vars),
+	lists:flatten(Body).
+	
+response(Sock, Output) ->
+	case gen_tcp:recv(Sock,0) of
+		{ ok, Data } ->
+			response(Sock, lists:append(Output, binary_to_list(Data)));
+		{ error, closed } ->
+			gen_tcp:close(Sock),
+			Output
+	end.
+
+send(Host, Port, Message) ->
+	{ ok, Sock } = gen_tcp:connect( Host, Port, [ binary, { active, false} ]),
+
+	Body = encode(Message),
+
+	Len = length(Body),
+
+	ok = gen_tcp:send(Sock, << 0, Len:16/little-unsigned-integer, 0>>),
+
+	ok = gen_tcp:send(Sock, Body),
+
+	response(Sock, []).
+

contrib/uwsgi.java

@@ -6,7 +6,6 @@ import java.util.Enumeration;
 import org.apache.catalina.util.IOTools;
 
 public class uwsgi extends HttpServlet {
-
 	private String mountpoint = null;
 
 	public void init(ServletConfig config) throws ServletException {
@@ -22,34 +21,34 @@ public class uwsgi extends HttpServlet {
 		if (getServletConfig().getInitParameter("mountpoint") != null) {
 			mountpoint = getServletConfig().getInitParameter("mountpoint");
 			if (mountpoint.length() <= 1) {
-				mountpoint = null ;
+				mountpoint = null;
 			}
 		}
 	}
 
-	
+
 	public void doPost(HttpServletRequest request, HttpServletResponse response)
-	throws IOException, ServletException {
+		throws IOException, ServletException {
 		uWSGIHandler(request, response);
 	}
 
 	public void doGet(HttpServletRequest request, HttpServletResponse response)
-	throws IOException, ServletException {
+		throws IOException, ServletException {
 		uWSGIHandler(request, response);
 	}
 
-	
+
 	private void uWSGIHandler(HttpServletRequest request, HttpServletResponse response)
-	throws IOException, ServletException {
+		throws IOException, ServletException {
 
 		Socket client = new Socket("localhost",3017);
-		ByteArrayOutputStream uwsgi_request = new ByteArrayOutputStream() ;
+		ByteArrayOutputStream uwsgi_request = new ByteArrayOutputStream();
 		DataOutputStream wos = new DataOutputStream(uwsgi_request); 
 
 		DataOutputStream os = new DataOutputStream(client.getOutputStream());
 		DataInputStream is = new DataInputStream( client.getInputStream() );
 
-	
+
 		ServletOutputStream out = response.getOutputStream();
 
 		boolean hasBody = false;
@@ -104,14 +103,14 @@ public class uwsgi extends HttpServlet {
 
 		if (mountpoint != null) {
 			wos.writeShort(swapShort( (short) 11));
-                	wos.writeBytes("SCRIPT_NAME");
-			wos.writeShort(swapShort( (short) mountpoint.length() ) ) ;
-			wos.writeBytes( mountpoint ) ;
+			wos.writeBytes("SCRIPT_NAME");
+			wos.writeShort(swapShort( (short) mountpoint.length() ) );
+			wos.writeBytes( mountpoint );
 		}
-		
+
 
 		wos.writeShort(swapShort( (short) 9));
-                wos.writeBytes("PATH_INFO");
+		wos.writeBytes("PATH_INFO");
 		if (mountpoint != null) {
 			wos.writeShort(swapShort( (short) (request.getRequestURI().length() - mountpoint.length()) ) );
 			wos.writeBytes( request.getRequestURI().substring(mountpoint.length())  );
@@ -149,14 +148,14 @@ public class uwsgi extends HttpServlet {
 			hasBody = true;
 		}
 
-		
+
 		// taken from CGI servlet
 
 		Enumeration headers = request.getHeaderNames();
 		String header = null;
 		while (headers.hasMoreElements()) {
-                	header = null;
-                	header = ((String) headers.nextElement()).toUpperCase();
+			header = null;
+			header = ((String) headers.nextElement()).toUpperCase();
 			wos.writeShort(swapShort( (short) ("HTTP_" + header.replace('-', '_')).length() ));
 			wos.writeBytes("HTTP_" + header.replace('-', '_'));
 			wos.writeShort(swapShort( (short) request.getHeader(header).length() ));
@@ -175,16 +174,16 @@ public class uwsgi extends HttpServlet {
 			IOTools.flow(request.getInputStream(), os);
 		}
 
-		boolean statusParsed = false ;
+		boolean statusParsed = false;
 		for(;;) {
-			String line = byte_readline(is) ;
+			String line = byte_readline(is);
 			if (line == "") {
 				break;
 			}
 			if (statusParsed == false) {
 				String[] status = line.split(" ",3);
 				response.setStatus( Integer.parseInt(status[1]) );
-				statusParsed = true ;
+				statusParsed = true;
 			}
 			else {
 				String[] keyval = line.split(": ",2);
@@ -200,7 +199,7 @@ public class uwsgi extends HttpServlet {
 		byte cb[] = new byte[4096];
 		int len = 0;
 		for(;;) {
-			len = is.read(cb,0,4096) ;
+			len = is.read(cb,0,4096);
 			if ( len > 0) {
 				out.write(cb,0,len);	
 			}
@@ -208,7 +207,7 @@ public class uwsgi extends HttpServlet {
 				break;
 			}
 		}
-		
+
 
 	}
 
@@ -218,19 +217,19 @@ public class uwsgi extends HttpServlet {
 		for(;;) {
 			byte b = is.readByte();
 			if (b == 10) {
-				break ;
+				break;
 			}
-			line.write(b) ;
+			line.write(b);
 		}
 
 		return line.toString("ASCII").replaceAll("\\n","").replaceAll("\\r","");
 	}
 
 	private short swapShort(short x) {
-	
-		short tmp1 = (short) (x>>8) ;
-		short tmp2 = (short) (x<<8) ;
-		return (short) (tmp1 | tmp2)  ;
+
+		short tmp1 = (short) (x>>8);
+		short tmp2 = (short) (x<<8);
+		return (short) (tmp1 | tmp2);
 	}	
 
 }

contrib/uwsgi_client.c

@@ -2,8 +2,8 @@
 
  *** uWSGI cgi client ***
 
-to compile:
-        gcc -Wall -o uwsgi_client.cgi uwsgi_client.c
+ to compile:
+ gcc -Wall -o uwsgi_client.cgi uwsgi_client.c
 
 */
 
@@ -18,79 +18,79 @@ to compile:
 #define UWSGI_SOCK "/tmp/uwsgi.sock"
 
 int main() {
-        extern char **environ;
-        char *env ;
-        struct sockaddr_un s_addr ;
-        int uwsgi_socket ;
-        int res, cnt;
-        char *place_holder;
-        
-        unsigned short len ;
-        char message[4096];
-        char *mptr;
+	extern char **environ;
+	char *env;
+	struct sockaddr_un s_addr;
+	int uwsgi_socket;
+	int res, cnt;
+	char *place_holder;
+
+	unsigned short len;
+	char message[4096];
+	char *mptr;
 	char *content_length;
 
-        memset(&s_addr, 0, sizeof(struct sockaddr_un)) ;
+	memset(&s_addr, 0, sizeof(struct sockaddr_un));
 
-        s_addr.sun_family = AF_UNIX;
-        strcpy(s_addr.sun_path, UWSGI_SOCK);
+	s_addr.sun_family = AF_UNIX;
+	strcpy(s_addr.sun_path, UWSGI_SOCK);
 
-        uwsgi_socket = socket(AF_UNIX, SOCK_STREAM, 0);
-        if (uwsgi_socket < 0) {
-                perror("socket()");
-                exit(1);
-        }
+	uwsgi_socket = socket(AF_UNIX, SOCK_STREAM, 0);
+	if (uwsgi_socket < 0) {
+		perror("socket()");
+		exit(1);
+	}
 
-        if (connect(uwsgi_socket, (struct sockaddr *) &s_addr, strlen(UWSGI_SOCK) + ( (void *)&s_addr.sun_path - (void *)&s_addr) ) != 0) {
-                perror("connect()");
-                exit(1);
-        }
+	if (connect(uwsgi_socket, (struct sockaddr *) &s_addr, strlen(UWSGI_SOCK) + ( (void *)&s_addr.sun_path - (void *)&s_addr) ) != 0) {
+		perror("connect()");
+		exit(1);
+	}
 
-        memset(message, 0, 4096);
+	memset(message, 0, 4096);
 
-        mptr = message+4;
+	mptr = message+4;
 
-        if (**environ) {
-                while( (env = *environ) ) {
-                        place_holder = strchr(env,'=');
-                        // key
-                        len = place_holder-env ;
-                        memcpy(mptr, &len, 2);
-                        mptr+=2;
-                        memcpy(mptr, env, len);
-                        mptr+=len ;
-                        // value
-                        len = (unsigned short) (env+strlen(env) - (place_holder+1)) ;
-                        memcpy(mptr, &len, 2);
-                        mptr+=2;
-                        memcpy(mptr, place_holder+1, len);
-                        mptr+= len ;    
-                        *environ++;
-                }
-        }
-
-        message[0] = 0;
-        len = (mptr-message)-4 ;
-        memcpy(message+1, &len, 2) ;
-        message[3] = 0 ;
-
-        res = send(uwsgi_socket, message, mptr-message, 0);
-
-	if ( (content_length = getenv("CONTENT_LENGTH")) != NULL) {
-		if (atoi(content_length) > 0) {
-        		while( (cnt = read(0, message, 4096)) ) {
-               			send(uwsgi_socket, message, cnt, 0) ; 
-        		}
+	if (**environ) {
+		while( (env = *environ) ) {
+			place_holder = strchr(env,'=');
+			// key
+			len = place_holder-env;
+			memcpy(mptr, &len, 2);
+			mptr+=2;
+			memcpy(mptr, env, len);
+			mptr+=len;
+			// value
+			len = (unsigned short) (env+strlen(env) - (place_holder+1));
+			memcpy(mptr, &len, 2);
+			mptr+=2;
+			memcpy(mptr, place_holder+1, len);
+			mptr+= len;
+			*environ++;
 		}
 	}
 
-        if (res == mptr-message) {
-                while( (res = recv(uwsgi_socket, message, 4096,0)) ) {
-                        write(1, message, res) ;
-                }
-        }
-        
-        return 0;
-        
+	message[0] = 0;
+	len = (mptr-message)-4;
+	memcpy(message+1, &len, 2);
+	message[3] = 0;
+
+	res = send(uwsgi_socket, message, mptr-message, 0);
+
+	if ( (content_length = getenv("CONTENT_LENGTH")) != NULL) {
+		if (atoi(content_length) > 0) {
+			while( (cnt = read(0, message, 4096)) ) {
+				send(uwsgi_socket, message, cnt, 0);
+			}
+		}
+	}
+
+	if (res == mptr-message) {
+		while( (res = recv(uwsgi_socket, message, 4096,0)) ) {
+			write(1, message, res);
+		}
+	}
+
+	return 0;
+
 }
 

contrib/uwsgi_dynamic_client.c

@@ -2,8 +2,8 @@
 
  *** uWSGI cgi client ***
 
-to compile:
-        gcc -Wall -o uwsgi_client.cgi uwsgi_dynamic_client.c
+ to compile:
+ gcc -Wall -o uwsgi_client.cgi uwsgi_dynamic_client.c
 
 */
 
@@ -19,77 +19,77 @@ to compile:
 #define UWSGI_SCRIPT "myapp_wsgi"
 
 int main() {
-        extern char **environ;
-        char *env ;
-        struct sockaddr_un s_addr ;
-        int uwsgi_socket ;
-        int res, cnt;
-        char *place_holder;
-        
-        unsigned short len ;
-        char message[4096];
-        char *mptr;
+	extern char **environ;
+	char *env;
+	struct sockaddr_un s_addr;
+	int uwsgi_socket;
+	int res, cnt;
+	char *place_holder;
 
-        memset(&s_addr, 0, sizeof(struct sockaddr_un)) ;
+	unsigned short len;
+	char message[4096];
+	char *mptr;
 
-        s_addr.sun_family = AF_UNIX;
-        strcpy(s_addr.sun_path, UWSGI_SOCK);
+	memset(&s_addr, 0, sizeof(struct sockaddr_un));
 
-        uwsgi_socket = socket(AF_UNIX, SOCK_STREAM, 0);
-        if (uwsgi_socket < 0) {
-                perror("socket()");
-                exit(1);
-        }
+	s_addr.sun_family = AF_UNIX;
+	strcpy(s_addr.sun_path, UWSGI_SOCK);
 
-        if (connect(uwsgi_socket, (struct sockaddr *) &s_addr, strlen(UWSGI_SOCK) + ( (void *)&s_addr.sun_path - (void *)&s_addr) ) != 0) {
-                perror("connect()");
-                exit(1);
-        }
+	uwsgi_socket = socket(AF_UNIX, SOCK_STREAM, 0);
+	if (uwsgi_socket < 0) {
+		perror("socket()");
+		exit(1);
+	}
 
-        memset(message, 0, 4096);
+	if (connect(uwsgi_socket, (struct sockaddr *) &s_addr, strlen(UWSGI_SOCK) + ( (void *)&s_addr.sun_path - (void *)&s_addr) ) != 0) {
+		perror("connect()");
+		exit(1);
+	}
 
-        mptr = message+4;
-        if (setenv("UWSGI_SCRIPT", UWSGI_SCRIPT, 1) != 0) {
-                perror("setenv()");
-                exit(1);
-        }
-        if (**environ) {
-                while( (env = *environ) ) {
-                        place_holder = strchr(env,'=');
-                        // key
-                        len = place_holder-env ;
-                        memcpy(mptr, &len, 2);
-                        mptr+=2;
-                        memcpy(mptr, env, len);
-                        mptr+=len ;
-                        // value
-                        len = (unsigned short) (env+strlen(env) - (place_holder+1)) ;
-                        memcpy(mptr, &len, 2);
-                        mptr+=2;
-                        memcpy(mptr, place_holder+1, len);
-                        mptr+= len ;    
-                        *environ++;
-                }
-        }
+	memset(message, 0, 4096);
 
-        message[0] = 0;
-        len = (mptr-message)-4 ;
-        memcpy(message+1, &len, 2) ;
-        message[3] = 0 ;
+	mptr = message+4;
+	if (setenv("UWSGI_SCRIPT", UWSGI_SCRIPT, 1) != 0) {
+		perror("setenv()");
+		exit(1);
+	}
+	if (**environ) {
+		while( (env = *environ) ) {
+			place_holder = strchr(env,'=');
+			// key
+			len = place_holder-env;
+			memcpy(mptr, &len, 2);
+			mptr+=2;
+			memcpy(mptr, env, len);
+			mptr+=len;
+			// value
+			len = (unsigned short) (env+strlen(env) - (place_holder+1));
+			memcpy(mptr, &len, 2);
+			mptr+=2;
+			memcpy(mptr, place_holder+1, len);
+			mptr+= len;
+			*environ++;
+		}
+	}
 
-        res = send(uwsgi_socket, message, mptr-message, 0);
+	message[0] = 0;
+	len = (mptr-message)-4;
+	memcpy(message+1, &len, 2);
+	message[3] = 0;
 
-        while( (cnt = read(0, message, 4096)) ) {
-                send(uwsgi_socket, message, cnt, 0) ; 
-        }
+	res = send(uwsgi_socket, message, mptr-message, 0);
+
+	while( (cnt = read(0, message, 4096)) ) {
+		send(uwsgi_socket, message, cnt, 0);
+	}
+
+	if (res == mptr-message) {
+		while( (res = recv(uwsgi_socket, message, 4096,0)) ) {
+			write(1, message, res);
+		}
+	}
+
+	return 0;
 
-        if (res == mptr-message) {
-                while( (res = recv(uwsgi_socket, message, 4096,0)) ) {
-                        write(1, message, res) ;
-                }
-        }
-        
-        return 0;
-        
 }
 

django/uwsgi_admin/templates/uwsgi.html

@@ -56,6 +56,26 @@
 </table>
 </div>
 
+<div class="module" style="width:860px">
+<table>
+	<caption style="width:860px">spooler jobs</caption>
+	<thead>
+		<tr>
+			<th scope="row">job filename</th>
+			<th scope="row">environment</th>
+		</tr>
+	</thead>
+	<tbody>
+{% for j in jobs %}
+	<tr>
+		<td align="left">{{j.file}}</td>
+		<td align="left">{{j.env}}</td>
+	</tr>
+{% endfor %}
+	</tbody>
+</table>
+</div>
+
 {% if masterpid %}
 <br/>
 <form {% if has_file_field %}enctype="multipart/form-data" {% endif %}action="reload/" method="post">

django/uwsgi_admin/views.py

@@ -14,12 +14,18 @@ def index(request):
 		w['load'] = (100 * (w['running_time']/1000))/total_load
 		w['last_spawn_str'] = time.ctime(w['last_spawn'])
 
+	spooler_jobs = uwsgi.spooler_jobs()
+	jobs = []
+	for j in spooler_jobs:
+		jobs.append({'file': j, 'env': uwsgi.parsefile(j)})
+
 	return render_to_response('uwsgi.html', {'masterpid': uwsgi.masterpid(),
 						'started_on': time.ctime(uwsgi.started_on),
 						'buffer_size': uwsgi.buffer_size,
 						'total_requests': uwsgi.total_requests(),
 						'numproc': uwsgi.numproc,
 						'workers': workers,
+						'jobs': jobs,
 						}, RequestContext(request, {}))
 index = staff_member_required(index)
 

emperor.c

@@ -0,0 +1,348 @@
+#include "uwsgi.h"
+#include <glob.h>
+
+
+extern struct uwsgi_server uwsgi;
+extern char **environ;
+
+struct uwsgi_instance {
+	struct uwsgi_instance *ui_prev;
+	struct uwsgi_instance *ui_next;
+
+	char name[0xff];
+	pid_t pid ;
+
+	int status;
+	time_t born;
+	time_t last_mod;
+
+	uint64_t respawns;
+
+	int pipe[2];
+};
+
+struct uwsgi_instance *ui;
+
+struct uwsgi_instance *emperor_get(char *name) {
+	
+	struct uwsgi_instance *c_ui = ui;
+	
+	while(c_ui->ui_next) {
+		c_ui = c_ui->ui_next;
+
+		if (!strcmp(c_ui->name, name)) {
+			return c_ui;
+		}
+	}
+	return NULL;
+}
+
+void emperor_del(struct uwsgi_instance *c_ui) {
+
+	struct uwsgi_instance *parent_ui = c_ui->ui_prev;
+	struct uwsgi_instance *child_ui = c_ui->ui_next;
+
+	parent_ui->ui_next = child_ui;
+	if (child_ui) {
+		child_ui->ui_prev = parent_ui;
+	}
+
+	// this will destroy the whole uWSGI instance (and workers)
+	close(c_ui->pipe[0]);
+
+	uwsgi_log("removed uwsgi instance %s\n", c_ui->name);
+
+	free(c_ui);
+
+}
+
+void emperor_stop(struct uwsgi_instance *c_ui) {
+	// remove uWSGI instance
+
+	if (write(c_ui->pipe[0], "\0", 1) != 1) {
+		uwsgi_error("write()");
+	}
+
+	c_ui->status = 1;
+
+	uwsgi_log("stop the uwsgi instance %s\n", c_ui->name);
+}
+
+void emperor_respawn(struct uwsgi_instance *c_ui, time_t mod) {
+
+	// reload the uWSGI instance
+	if (write(c_ui->pipe[0], "\1", 1) != 1) {
+                uwsgi_error("write()");
+        }
+
+        c_ui->respawns++;
+	c_ui->last_mod = mod;
+
+        uwsgi_log("reload the uwsgi instance %s\n", c_ui->name);
+}
+
+void emperor_add(char *name, time_t born) {
+
+	struct uwsgi_instance *c_ui = ui;
+	struct uwsgi_instance *n_ui = NULL;
+	pid_t pid ;
+	char *argv[4];
+	char *uef ;
+	char **uenvs;
+
+        while(c_ui->ui_next) {
+                c_ui = c_ui->ui_next;
+        }
+
+	n_ui = uwsgi_malloc(sizeof(struct uwsgi_instance));
+	memset(n_ui, 0, sizeof(struct uwsgi_instance));
+
+	c_ui->ui_next = n_ui;
+	uwsgi_log("c_ui->ui_next = %p\n", c_ui->ui_next);
+	n_ui->ui_prev = c_ui;
+	memcpy(n_ui->name, name, strlen(name));
+	n_ui->born = born;
+	n_ui->last_mod = born;
+
+	if (socketpair(AF_UNIX, SOCK_STREAM, 0, n_ui->pipe)) {
+		uwsgi_error("socketpair()");
+		goto clear;
+	}
+
+	// a new uWSGI instance will start 
+	pid = fork();
+	if (pid < 0) {
+		uwsgi_error("fork()")
+	}
+	else if (pid > 0) {
+		n_ui->pid = pid;
+		// close the right side of the pipe
+		close(n_ui->pipe[1]);
+		return;
+	}
+	else {
+
+		unsetenv("UWSGI_RELOADS");
+
+		uef = uwsgi_num2str(n_ui->pipe[1]);
+		if (setenv("UWSGI_EMPEROR_FD", uef, 1)) {
+			uwsgi_error("setenv()");
+			exit(1);
+		}
+		free(uef);
+
+		uenvs = environ;
+		while(*uenvs) {
+			if (!strncmp(*uenvs, "UWSGI_VASSAL_", 13)) {
+				char *ne = uwsgi_concat2("UWSGI_", *uenvs+13);
+				char *oe = uwsgi_concat2n(*uenvs, strchr(*uenvs, '=') - *uenvs, "", 0);
+				if (unsetenv(oe)) {
+					uwsgi_error("unsetenv()");
+					break;
+				}
+				free(oe);
+				uwsgi_log("putenv %s\n", ne);
+
+				if (putenv(ne)) {
+					uwsgi_error("putenv()");
+				}
+				// do not free ne as putenv will add it to the environ
+				uenvs = environ;
+				continue;
+			}
+			uenvs++;
+		}
+
+		// close the left side of the pipe
+		close(n_ui->pipe[0]);
+
+
+		// set args
+		argv[0] = uwsgi.binary_path;
+		if (!strcmp(name+(strlen(name)-4), ".xml")) argv[1] = "--xml";
+		if (!strcmp(name+(strlen(name)-4), ".ini")) argv[1] = "--ini";
+		if (!strcmp(name+(strlen(name)-4), ".yml")) argv[1] = "--yaml";
+		if (!strcmp(name+(strlen(name)-5), ".yaml")) argv[1] = "--yaml";
+		argv[2] = name;
+		argv[3] = NULL;
+		// start !!!
+		if (execvp(argv[0], argv)) {
+			uwsgi_error("execvp()");
+		}
+		// never here
+		exit(1);
+	}
+
+clear:
+
+	free(n_ui);
+	c_ui->ui_next = NULL;
+
+}
+
+void emperor_loop() {
+
+	// monitor a directory
+
+	struct uwsgi_instance ui_base;
+	struct uwsgi_instance *ui_current;
+	struct stat st;
+
+	pid_t diedpid;
+	int waitpid_status;
+	int has_children = 0;
+	int i_am_alone = 0;
+	int simple_mode = 0;
+	glob_t g;
+	int i;
+	struct dirent *de;
+
+	memset(&ui_base, 0, sizeof(struct uwsgi_instance));
+
+	uwsgi_log("*** starting uWSGI Emperor ***\n");
+
+	if (!glob(uwsgi.emperor_dir, GLOB_MARK, NULL, &g)) {
+		if (g.gl_pathc == 1 && g.gl_pathv[0][strlen(g.gl_pathv[0])-1] == '/' ) {
+			simple_mode = 1;
+			if (chdir(uwsgi.emperor_dir)) {
+				uwsgi_error("chdir()");
+				exit(1);
+			}
+		}
+	}
+	else {
+		uwsgi_error("glob()");
+		exit(1);
+	}
+
+	ui = &ui_base;
+
+	for(;;) {
+
+
+		if (!i_am_alone) {
+			diedpid = waitpid(uwsgi.emperor_pid, &waitpid_status, WNOHANG);
+			if (diedpid < 0 || diedpid > 0) {
+				i_am_alone = 1;
+			}
+		}
+
+		if (simple_mode) {
+			DIR *dir = opendir(".");
+			while((de = readdir(dir)) != NULL) {
+				if (!strcmp(de->d_name+(strlen(de->d_name)-4), ".xml") ||
+					!strcmp(de->d_name+(strlen(de->d_name)-4), ".ini") ||
+					!strcmp(de->d_name+(strlen(de->d_name)-4), ".yml") ||
+					!strcmp(de->d_name+(strlen(de->d_name)-5), ".yaml")
+					) {
+
+				
+					if (strlen(de->d_name) >= 0xff) continue;
+
+					if (stat(de->d_name, &st)) continue;
+
+					if (!S_ISREG(st.st_mode)) continue;
+		
+					ui_current = emperor_get(de->d_name);
+
+					if (ui_current) {
+						// check if mtime is changed and the uWSGI instance must be reloaded
+						if (st.st_mtime > ui_current->last_mod) {
+							emperor_respawn(ui_current, st.st_mtime);
+						}
+					}
+					else {
+						emperor_add(de->d_name, st.st_mtime);
+					}
+				}
+			}
+			closedir(dir);
+		}
+		else {
+			if (glob(uwsgi.emperor_dir, GLOB_MARK, NULL, &g)) {
+				uwsgi_error("glob()");
+				continue;
+			}
+
+			for(i=0;i<(int)g.gl_pathc;i++) {
+				if (!strcmp(g.gl_pathv[i]+(strlen(g.gl_pathv[i])-4), ".xml") ||
+                                        !strcmp(g.gl_pathv[i]+(strlen(g.gl_pathv[i])-4), ".ini") ||
+                                        !strcmp(g.gl_pathv[i]+(strlen(g.gl_pathv[i])-4), ".yml") ||
+                                        !strcmp(g.gl_pathv[i]+(strlen(g.gl_pathv[i])-5), ".yaml")
+                                        ) {
+
+
+                                        if (strlen(g.gl_pathv[i]) >= 0xff) continue;
+
+                                        if (stat(g.gl_pathv[i], &st)) continue;
+
+                                        if (!S_ISREG(st.st_mode)) continue;
+
+                                        ui_current = emperor_get(g.gl_pathv[i]);
+
+                                        if (ui_current) {
+                                                // check if mtime is changed and the uWSGI instance must be reloaded
+                                                if (st.st_mtime > ui_current->last_mod) {
+                                                        emperor_respawn(ui_current, st.st_mtime);
+                                                }
+                                        }
+                                        else {
+                                                emperor_add(g.gl_pathv[i], st.st_mtime);
+                                        }
+                                }
+	
+			}
+		}
+
+		// check for removed instances
+
+		ui_current = ui;
+		has_children = 0;
+                while(ui_current->ui_next) {
+                	ui_current = ui_current->ui_next;
+			has_children++;
+		}
+
+		if (has_children) {
+			diedpid = waitpid(WAIT_ANY, &waitpid_status, WNOHANG);
+		}
+		else {
+			diedpid = 0;
+		}
+		if (diedpid < 0) {
+			uwsgi_error("waitpid()");
+		}
+		ui_current = ui;
+        	while(ui_current->ui_next) {
+                	ui_current = ui_current->ui_next;
+			if (ui_current->pid == diedpid) {
+				if (ui_current->status == 0) {
+					// respawn an accidentally dead instance
+					emperor_add(ui_current->name, ui_current->last_mod);
+					emperor_del(ui_current);
+					break;
+				}
+				else if (ui_current->status == 1) {
+					// remove 'marked for dead' instance
+					emperor_del(ui_current);
+					break;
+				}
+			}
+			else if (ui_current->status == 1) {
+				emperor_del(ui_current);
+				break;
+			}
+			else if (stat(ui_current->name, &st)) {
+				emperor_stop(ui_current);
+			}
+        	}
+
+		sleep(3);
+		
+	}
+	
+}
+
+
+
+

erlang.c

@@ -1,702 +0,0 @@
-#ifdef UWSGI_ERLANG
-
-#include "uwsgi.h"
-
-extern struct uwsgi_server uwsgi;
-
-static void erlang_log(void);
-
-PyObject *py_erlang_connect(PyObject * self, PyObject * args) {
-
-	char *erlang_node;
-	int fd;
-
-
-	if (!PyArg_ParseTuple(args, "s:erlang_connect", &erlang_node)) {
-		return NULL;
-	}
-
-	UWSGI_SET_BLOCKING;
-	fd = erl_connect(erlang_node);
-	UWSGI_UNSET_BLOCKING;
-	return PyInt_FromLong(fd);
-}
-
-PyObject *py_erlang_recv_message(PyObject * self, PyObject * args) {
-	int erfd;
-	struct pollfd erpoll;
-	ErlMessage emsg;
-	PyObject *pyer = NULL;
-	unsigned char erlang_buffer[8192];
-	int eret;
-	int timeout = uwsgi.shared->options[UWSGI_OPTION_SOCKET_TIMEOUT];
-
-	if (!PyArg_ParseTuple(args, "i|i:erlang_recv_message", &erfd, &timeout)) {
-		return NULL;
-	}
-
-	if (erfd < 0) {
-		goto clear;
-	}
-
-	erpoll.fd = erfd;
-	erpoll.events = POLLIN;
-      cycle:
-	memset(&emsg, 0, sizeof(ErlMessage));
-	UWSGI_SET_BLOCKING;
-	if (timeout > 0) {
-		eret = poll(&erpoll, 1, timeout * 1000);
-		if (eret < 0) {
-			uwsgi_error("poll()");
-			goto clear;
-		}
-		else if (eret == 0) {
-			goto clear;
-		}
-	}
-	if (erl_receive_msg(erfd, erlang_buffer, 8192, &emsg) == ERL_MSG) {
-		if (emsg.type == ERL_TICK) {
-			goto cycle;
-		}
-		if (emsg.msg) {
-			pyer = eterm_to_py(emsg.msg);
-		}
-		if (emsg.msg) {
-			erl_free_compound(emsg.msg);
-		}
-		if (emsg.to) {
-			erl_free_compound(emsg.to);
-		}
-		if (emsg.from) {
-			erl_free_compound(emsg.from);
-		}
-		if (!pyer) {
-			goto clear;
-		}
-		UWSGI_UNSET_BLOCKING;
-		return pyer;
-	}
-
-      clear:
-	UWSGI_UNSET_BLOCKING;
-	Py_INCREF(Py_None);
-	return Py_None;
-
-}
-
-PyObject *py_erlang_send_message(PyObject * self, PyObject * args) {
-
-	ETERM *pymessage;
-	ETERM *pid;
-	int erfd;
-	PyObject *ermessage, *erdest, *zero;
-
-	int er_number, er_serial, er_creation;
-	char *er_node;
-
-	if (!PyArg_ParseTuple(args, "iOO|i:erlang_send_message", &erfd, &erdest, &ermessage)) {
-		return NULL;
-	}
-
-	if (erfd < 0) {
-		goto clear;
-	}
-
-	if (!PyString_Check(erdest) && !PyDict_Check(erdest)) {
-		goto clear;
-	}
-
-	pymessage = py_to_eterm(ermessage);
-	if (!pymessage) {
-		goto clear;
-	}
-
-
-	if (PyString_Check(erdest)) {
-		if (!erl_reg_send(erfd, PyString_AsString(erdest), pymessage)) {
-			erl_err_msg("erl_reg_send()");
-			goto clear2;
-		}
-	}
-	else if (PyDict_Check(erdest)) {
-		zero = PyDict_GetItemString(erdest, "node");
-		if (!zero) {
-			goto clear2;
-		}
-		if (!PyString_Check(zero)) {
-			goto clear2;
-		}
-		er_node = PyString_AsString(zero);
-
-		zero = PyDict_GetItemString(erdest, "number");
-		if (!zero) {
-			goto clear2;
-		}
-		if (!PyInt_Check(zero)) {
-			goto clear2;
-		}
-		er_number = PyInt_AsLong(zero);
-
-		zero = PyDict_GetItemString(erdest, "serial");
-		if (!zero) {
-			goto clear2;
-		}
-		if (!PyInt_Check(zero)) {
-			goto clear2;
-		}
-		er_serial = PyInt_AsLong(zero);
-
-		zero = PyDict_GetItemString(erdest, "creation");
-		if (!zero) {
-			goto clear2;
-		}
-		if (!PyInt_Check(zero)) {
-			goto clear2;
-		}
-		er_creation = PyInt_AsLong(zero);
-
-		pid = erl_mk_pid((const char *) er_node, er_number, er_serial, er_creation);
-
-		if (!pid) {
-			goto clear2;
-		}
-
-		if (!erl_send(erfd, pid, pymessage)) {
-			erl_err_msg("erl_send()");
-			erl_free_term(pid);
-			goto clear2;
-		}
-
-		erl_free_term(pid);
-	}
-	else {
-		goto clear;
-	}
-
-	erl_free_compound(pymessage);
-
-	Py_INCREF(Py_True);
-	return Py_True;
-
-      clear2:
-	erl_free_compound(pymessage);
-      clear:
-	PyErr_Print();
-	Py_INCREF(Py_None);
-	return Py_None;
-}
-
-PyObject *py_erlang_rpc(PyObject * self, PyObject * args) {
-
-	int fd, timeout = uwsgi.shared->options[UWSGI_OPTION_SOCKET_TIMEOUT];
-	char *emod, *efun;
-	PyObject *eargs, *pyer = NULL;
-	ETERM *pyargs, *rex;
-	ErlMessage emsg;
-	int eret;
-
-	if (!PyArg_ParseTuple(args, "issO|i:erlang_rpc", &fd, &emod, &efun, &eargs, &timeout)) {
-		return NULL;
-	}
-
-	if (fd < 0) {
-		goto clear;
-	}
-
-	pyargs = py_to_eterm(eargs);
-	if (!pyargs) {
-		goto clear;
-	}
-
-
-	if (erl_rpc_to(fd, emod, efun, pyargs)) {
-		erl_err_msg("erl_rpc_to()");
-		goto clear2;
-	}
-
-
-      cycle:
-	memset(&emsg, 0, sizeof(ErlMessage));
-	UWSGI_SET_BLOCKING;
-	eret = erl_rpc_from(fd, timeout * 1000, &emsg);
-	if (eret == ERL_TICK) {
-		goto cycle;
-	}
-	else if (eret == ERL_MSG) {
-		if (emsg.msg) {
-			if (ERL_IS_TUPLE(emsg.msg)) {
-				rex = erl_element(1, emsg.msg);
-				if (!rex) {
-					goto clear2;
-				}
-				if (!strncmp("rex", ERL_ATOM_PTR(rex), ERL_ATOM_SIZE(rex))) {
-					erl_free_term(rex);
-					rex = erl_element(2, emsg.msg);
-					if (!rex) {
-						goto clear2;
-					}
-					pyer = eterm_to_py(rex);
-					erl_free_term(rex);
-				}
-				else {
-					erl_free_term(rex);
-				}
-			}
-		}
-		if (emsg.msg) {
-			erl_free_compound(emsg.msg);
-		}
-		if (emsg.to) {
-			erl_free_compound(emsg.to);
-		}
-		if (emsg.from) {
-			erl_free_compound(emsg.from);
-		}
-		if (!pyer) {
-			goto clear2;
-		}
-		erl_free_compound(pyargs);
-		UWSGI_UNSET_BLOCKING;
-		return pyer;
-	}
-	else {
-		erl_err_msg("erl_rpc_from()");
-	}
-
-      clear2:
-	UWSGI_UNSET_BLOCKING;
-	erl_free_compound(pyargs);
-
-      clear:
-	Py_INCREF(Py_None);
-	return Py_None;
-}
-
-PyObject *py_erlang_close(PyObject * self, PyObject * args) {
-
-	int fd;
-
-	if (!PyArg_ParseTuple(args, "i:erlang_close", &fd)) {
-		return NULL;
-	}
-
-
-	if (fd >= 0) {
-		erl_close_connection(fd);
-	}
-
-	Py_INCREF(Py_True);
-	return Py_True;
-}
-
-static PyMethodDef uwsgi_erlang_methods[] = {
-	{"erlang_connect", py_erlang_connect, METH_VARARGS, ""},
-	{"erlang_send_message", py_erlang_send_message, METH_VARARGS, ""},
-	{"erlang_recv_message", py_erlang_recv_message, METH_VARARGS, ""},
-	{"erlang_rpc", py_erlang_rpc, METH_VARARGS, ""},
-	{"erlang_close", py_erlang_close, METH_VARARGS, ""},
-	{NULL, NULL},
-};
-
-
-int init_erlang(char *nodename, char *cookie) {
-
-	struct sockaddr_in e_addr;
-
-	char *ip;
-	char *node;
-	int efd;
-	int rlen;
-	char *cookiefile;
-	char *cookiehome;
-	char cookievalue[128];
-	int cookiefd;
-
-	PyMethodDef *uwsgi_function;
-
-
-	ip = strchr(nodename, '@');
-
-	if (ip == NULL) {
-		uwsgi_log( "*** invalid erlang node name ***\n");
-		return -1;
-	}
-
-	if (cookie == NULL) {
-		// get the cookie from the home
-		cookiehome = getenv("HOME");
-		if (!cookiehome) {
-			uwsgi_log( "unable to get erlang cookie from your home.\n");
-			return -1;
-		}
-		cookiefile = malloc(strlen(cookiehome) + 1 + strlen(".erlang.cookie") + 1);
-		if (!cookiefile) {
-			uwsgi_error("malloc()");
-		}
-		cookiefile[0] = 0;
-		strcat(cookiefile, cookiehome);
-		strcat(cookiefile, "/.erlang.cookie");
-
-		cookiefd = open(cookiefile, O_RDONLY);
-		if (cookiefd < 0) {
-			uwsgi_error("open()");
-			free(cookiefile);
-			return -1;
-		}
-
-		memset(cookievalue, 0, 128);
-		if (read(cookiefd, cookievalue, 127) < 1) {
-			uwsgi_log( "invalid cookie found in %s\n", cookiefile);
-			close(cookiefd);
-			free(cookiefile);
-			return -1;
-		}
-		cookie = cookievalue;
-		close(cookiefd);
-		free(cookiefile);
-	}
-
-	node = malloc((ip - nodename) + 1);
-	if (node == NULL) {
-		uwsgi_error("malloc()");
-		return -1;
-	}
-	memset(node, 0, (ip - nodename) + 1);
-	memcpy(node, nodename, ip - nodename);
-
-	erl_init(NULL, 0);
-
-	if (erl_connect_xinit(ip + 1, node, nodename, NULL, cookie, 0) == -1) {
-		uwsgi_log( "*** unable to initialize erlang c-node ***\n");
-		return -1;
-	}
-
-	efd = socket(AF_INET, SOCK_STREAM, 0);
-	if (efd < 0) {
-		uwsgi_error("socket()");
-		return -1;
-	}
-
-
-	memset(&e_addr, 0, sizeof(struct sockaddr_in));
-	e_addr.sin_family = AF_INET;
-	e_addr.sin_addr.s_addr = inet_addr(ip + 1);
-
-	rlen = 1;
-	if (setsockopt(efd, SOL_SOCKET, SO_REUSEADDR, &rlen, sizeof(rlen))) {
-		uwsgi_error("setsockopt()");
-		close(efd);
-		return -1;
-	}
-
-	if (bind(efd, (struct sockaddr *) &e_addr, sizeof(struct sockaddr_in)) < 0) {
-		uwsgi_error("bind()");
-		close(efd);
-		return -1;
-	}
-
-	rlen = sizeof(struct sockaddr_in);
-	if (getsockname(efd, (struct sockaddr *) &e_addr, (socklen_t *) & rlen)) {
-		uwsgi_error("getsockname()");
-		close(efd);
-		return -1;
-	}
-
-	if (listen(efd, uwsgi.listen_queue)) {
-		uwsgi_error("listen()");
-		close(efd);
-		return -1;
-	}
-
-	if (erl_publish(ntohs(e_addr.sin_port)) < 0) {
-		uwsgi_log( "*** unable to subscribe with EPMD ***\n");
-		close(efd);
-		return -1;
-	}
-
-	uwsgi_log( "Erlang C-Node initialized on port %d you can access it with name %s\n", ntohs(e_addr.sin_port), nodename);
-
-	for (uwsgi_function = uwsgi_erlang_methods; uwsgi_function->ml_name != NULL; uwsgi_function++) {
-		PyObject *func = PyCFunction_New(uwsgi_function, NULL);
-		PyDict_SetItemString(uwsgi.embedded_dict, uwsgi_function->ml_name, func);
-		Py_DECREF(func);
-	}
-
-	return efd;
-
-}
-
-ETERM *py_to_eterm(PyObject * pobj) {
-	int i;
-	int count;
-	PyObject *pobj2;
-	ETERM *eobj = NULL;
-	ETERM *eobj2 = NULL;
-	ETERM **eobj3;
-
-	if (pobj == NULL) {
-		return erl_mk_empty_list();
-	}
-
-	if (PyString_Check(pobj)) {
-		eobj = erl_mk_atom(PyString_AsString(pobj));
-	}
-	else if (PyInt_Check(pobj)) {
-		eobj = erl_mk_int(PyInt_AsLong(pobj));
-	}
-	else if (PyList_Check(pobj)) {
-		eobj = erl_mk_empty_list();
-		for (i = PyList_Size(pobj) - 1; i >= 0; i--) {
-			pobj2 = PyList_GetItem(pobj, i);
-			eobj2 = py_to_eterm(pobj2);
-			eobj = erl_cons(eobj2, eobj);
-		}
-	}
-	else if (PyDict_Check(pobj)) {
-		// a pid
-		char *er_node;
-		int er_number, er_serial, er_creation;
-		pobj2 = PyDict_GetItemString(pobj, "node");
-		if (!pobj2) {
-			PyErr_Print();
-			goto clear;
-		}
-		if (!PyString_Check(pobj2)) {
-			goto clear;
-		}
-		er_node = PyString_AsString(pobj2);
-
-		pobj2 = PyDict_GetItemString(pobj, "number");
-		if (!pobj2) {
-			PyErr_Print();
-			goto clear;
-		}
-		if (!PyInt_Check(pobj2)) {
-			goto clear;
-		}
-		er_number = PyInt_AsLong(pobj2);
-
-		pobj2 = PyDict_GetItemString(pobj, "serial");
-		if (!pobj2) {
-			PyErr_Print();
-			goto clear;
-		}
-		if (!PyInt_Check(pobj2)) {
-			goto clear;
-		}
-		er_serial = PyInt_AsLong(pobj2);
-
-		pobj2 = PyDict_GetItemString(pobj, "creation");
-		if (!pobj2) {
-			PyErr_Print();
-			goto clear;
-		}
-		if (!PyInt_Check(pobj2)) {
-			goto clear;
-		}
-		er_creation = PyInt_AsLong(pobj2);
-
-		eobj = erl_mk_pid(er_node, er_number, er_serial, er_creation);
-	}
-	else if (PyTuple_Check(pobj)) {
-		count = PyTuple_Size(pobj);
-		eobj3 = malloc(sizeof(ETERM *) * count);
-		for (i = 0; i < count; i++) {
-			pobj2 = PyTuple_GetItem(pobj, i);
-			if (!pobj2) {
-				break;
-			}
-			eobj3[i] = py_to_eterm(pobj2);
-		}
-		eobj = erl_mk_tuple(eobj3, count);
-		free(eobj3);
-	}
-	else {
-		uwsgi_log( "UNMANAGED PYTHON TYPE: %s\n", pobj->ob_type->tp_name);
-	}
-
-      clear:
-	if (eobj == NULL) {
-		return erl_mk_empty_list();
-	}
-
-	return eobj;
-}
-
-PyObject *eterm_to_py(ETERM * obj) {
-	int i;
-	int count;
-	ETERM *obj2;
-	PyObject *eobj = NULL;
-
-	if (obj == NULL) {
-		Py_INCREF(Py_None);
-		return Py_None;
-	}
-
-	switch (ERL_TYPE(obj)) {
-
-	case ERL_CONS:
-	case ERL_NIL:
-		count = erl_length(obj);
-		eobj = PyList_New(0);
-		for (i = 0; i < count; i++) {
-			obj2 = erl_hd(obj);
-			PyList_Append(eobj, eterm_to_py(obj2));
-			obj = erl_tl(obj);
-		}
-		break;
-	case ERL_TUPLE:
-		eobj = PyTuple_New(erl_size(obj));
-		for (i = 1; i <= erl_size(obj); i++) {
-			obj2 = erl_element(i, obj);
-			PyTuple_SetItem(eobj, i - 1, eterm_to_py(obj2));
-		}
-		break;
-	case ERL_ATOM:
-		eobj = PyString_FromStringAndSize(ERL_ATOM_PTR(obj), ERL_ATOM_SIZE(obj));
-		break;
-	case ERL_INTEGER:
-		eobj = PyInt_FromLong(ERL_INT_VALUE(obj));
-		break;
-	case ERL_BINARY:
-		uwsgi_log( "FOUND A BINARY %.*s\n", ERL_BIN_SIZE(obj), ERL_BIN_PTR(obj));
-		break;
-	case ERL_PID:
-		eobj = PyDict_New();
-		if (PyDict_SetItemString(eobj, "node", PyString_FromString(ERL_PID_NODE(obj)))) {
-			PyErr_Print();
-			break;
-		}
-		if (PyDict_SetItemString(eobj, "number", PyInt_FromLong(ERL_PID_NUMBER(obj)))) {
-			PyErr_Print();
-			break;
-		}
-		if (PyDict_SetItemString(eobj, "serial", PyInt_FromLong(ERL_PID_SERIAL(obj)))) {
-			PyErr_Print();
-			break;
-		}
-		if (PyDict_SetItemString(eobj, "creation", PyInt_FromLong(ERL_PID_CREATION(obj)))) {
-			PyErr_Print();
-			break;
-		}
-	default:
-		uwsgi_log( "UNMANAGED ETERM TYPE: %d\n", ERL_TYPE(obj));
-		break;
-
-	}
-
-	if (eobj == NULL) {
-		Py_INCREF(Py_None);
-		return Py_None;
-	}
-
-	return eobj;
-}
-
-void erlang_loop(struct wsgi_request *wsgi_req) {
-
-	ErlConnect econn;
-	ErlMessage em;
-	ETERM *eresponse;
-
-	PyObject *callable = PyDict_GetItemString(uwsgi.embedded_dict, "erlang_func");
-	if (!callable) {
-		PyErr_Print();
-		uwsgi_log( "- you have not defined a uwsgi.erlang_func callable, Erlang message manager will be disabled until you define it -\n");
-	}
-
-	PyObject *pargs = PyTuple_New(1);
-	if (!pargs) {
-		PyErr_Print();
-		uwsgi_log( "- error preparing arg tuple for uwsgi.erlang_func callable, Erlang message manager will be disabled -\n");
-	}
-
-	while (uwsgi.workers[uwsgi.mywid].manage_next_request) {
-
-
-		UWSGI_CLEAR_STATUS;
-
-		wsgi_req->poll.fd = erl_accept(uwsgi.erlangfd, &econn);
-
-		if (wsgi_req->poll.fd >= 0) {
-
-			UWSGI_SET_ERLANGING;
-			for (;;) {
-				if (erl_receive_msg(wsgi_req->poll.fd, (unsigned char *) wsgi_req->buffer, uwsgi.buffer_size, &em) == ERL_MSG) {
-					if (em.type == ERL_TICK)
-						continue;
-
-					if (!callable) {
-						callable = PyDict_GetItemString(uwsgi.embedded_dict, "erlang_func");
-					}
-
-					if (!callable) {
-						uwsgi_log( "- you still have not defined a uwsgi.erlang_func callable, Erlang message rejected -\n");
-					}
-
-					PyObject *zero = eterm_to_py(em.msg);
-					if (em.msg) {
-						erl_free_compound(em.msg);
-					}
-					if (em.to) {
-						erl_free_compound(em.to);
-					}
-
-					if (!zero) {
-						PyErr_Print();
-						continue;
-					}
-
-					if (PyTuple_SetItem(pargs, 0, zero)) {
-						PyErr_Print();
-						continue;
-					}
-
-					PyObject *erlang_result = PyEval_CallObject(callable, pargs);
-
-					//Py_DECREF(zero);
-
-					if (erlang_result) {
-						eresponse = py_to_eterm(erlang_result);
-						if (eresponse) {
-							erl_send(wsgi_req->poll.fd, em.from, eresponse);
-							erl_free_compound(eresponse);
-						}
-						Py_DECREF(erlang_result);
-					}
-
-					if (em.from) {
-						erl_free_compound(em.from);
-					}
-
-					uwsgi.workers[0].requests++;
-					uwsgi.workers[uwsgi.mywid].requests++;
-					if (uwsgi.shared->options[UWSGI_OPTION_LOGGING])
-						erlang_log();
-				}
-				else {
-					break;
-				}
-			}
-			erl_close_connection(wsgi_req->poll.fd);
-
-			UWSGI_UNSET_ERLANGING;
-		}
-	}
-}
-
-static void erlang_log() {
-	if (uwsgi.shared->options[UWSGI_OPTION_MEMORY_DEBUG]) {
-		get_memusage();
-	}
-	else {
-		uwsgi.workers[uwsgi.mywid].rss_size = 0;
-		uwsgi.workers[uwsgi.mywid].vsz_size = 0;
-	}
-	uwsgi_log( "[Erlang worker %d pid %d] request %llu done {rss: %llu vsz: %llu}\n", uwsgi.mywid, uwsgi.mypid, uwsgi.workers[uwsgi.mywid].requests, uwsgi.workers[uwsgi.mywid].rss_size, uwsgi.workers[uwsgi.mywid].vsz_size);
-}
-
-#else
-#warning "*** Erlang support is disabled ***"
-#endif

event.c

@@ -0,0 +1,833 @@
+#include "uwsgi.h"
+
+extern struct uwsgi_server uwsgi;
+
+#ifdef UWSGI_EVENT_USE_PORT
+
+#include <port.h>
+
+int event_queue_init() {
+
+        int port = port_create();
+
+        if (port < 0) {
+                uwsgi_error("port_create()");
+                return -1;
+        }
+
+        return port;
+}
+
+int event_queue_del_fd(int eq, int fd) {
+
+        if (port_dissociate(eq, PORT_SOURCE_FD, fd)) {
+                uwsgi_error("port_disassociate");
+                return -1;
+        }
+
+        return fd;
+}
+
+
+int event_queue_interesting_fd_has_error(void *events, int id) {
+	port_event_t *pe = (port_event_t *) events;
+	if (pe[id].portev_events == POLLHUP || pe[id].portev_events == POLLERR) {
+                return 1;
+        }
+        return 0;
+}
+
+
+
+int event_queue_add_fd_read(int eq, int fd) {
+
+        if (port_associate(eq, PORT_SOURCE_FD, fd, POLLIN, NULL)) {
+                uwsgi_error("port_associate");
+                return -1;
+        }
+
+        return fd;
+}
+
+int event_queue_add_fd_write(int eq, int fd) {
+
+        if (port_associate(eq, PORT_SOURCE_FD, fd, POLLOUT, NULL)) {
+                uwsgi_error("port_associate");
+                return -1;
+        }
+
+        return fd;
+}
+
+void *event_queue_alloc(int nevents) {
+
+        return uwsgi_malloc(sizeof(port_event_t) * nevents);
+}
+
+int event_queue_interesting_fd(void *events, int id) {
+	port_event_t *pe = (port_event_t *) events;
+	if (pe[id].portev_source == PORT_SOURCE_FILE || pe[id].portev_source == PORT_SOURCE_TIMER) {
+                return (int) pe[id].portev_user;
+        }
+
+	return (int) pe[id].portev_object;
+}
+
+int event_queue_wait_multi(int eq, int timeout, void *events, int nevents) {
+
+        int ret;
+	uint_t nget;
+	int i;
+	timespec_t ts;
+	port_event_t *pe;
+
+	if (timeout > 0) {
+                ts.tv_sec = timeout;
+                ts.tv_nsec = 0;
+                ret = port_getn(eq, events, nevents, &nget, &ts);
+        }
+        else {
+                ret = port_getn(eq, events, nevents, &nget, NULL);
+        }
+
+	if (ret < 0) {
+                if (errno != ETIME) {
+                        uwsgi_error("port_getn()");
+                        return -1;
+                }
+                return 0;
+        }
+
+	pe = (port_event_t *) events;
+	for(i=0;i<nget;i++) {
+		if (pe[i].portev_source == PORT_SOURCE_FD) {
+			if (port_associate(eq, pe[i].portev_source, pe[i].portev_object, pe[i].portev_events, NULL)) {
+                		uwsgi_error("port_associate");
+        		}
+		}
+	}
+
+        return nget;
+}
+
+
+
+int event_queue_wait(int eq, int timeout, int *interesting_fd) {
+
+        int ret;
+	port_event_t pe;
+	timespec_t ts;
+
+        if (timeout > 0) {
+		ts.tv_sec = timeout;
+		ts.tv_nsec = 0;
+        	ret = port_get(eq, &pe, &ts);
+        }
+	else {
+        	ret = port_get(eq, &pe, NULL);
+	}
+        if (ret < 0) {
+		if (errno != ETIME) {
+                	uwsgi_error("port_get()");
+			return -1;
+		}
+		return 0;
+        }
+
+	if (pe.portev_source == PORT_SOURCE_FD) {
+		// event must be readded (damn Oracle/Sun why the fu*k you made such a horrible choice ???? why not adding a ONESHOT flag ???)
+		if (port_associate(eq, pe.portev_source, pe.portev_object, pe.portev_events, NULL)) {
+                	uwsgi_error("port_associate");
+        	}
+	}
+
+
+	if (pe.portev_source == PORT_SOURCE_FILE || pe.portev_source == PORT_SOURCE_TIMER) {
+        	*interesting_fd = (int) pe.portev_user;
+		uwsgi_log("port event interesting_fd: %d\n", *interesting_fd);
+	}
+	else {
+		*interesting_fd = (int) pe.portev_object;
+	}
+
+        return 1;
+}
+
+#endif
+
+
+#ifdef UWSGI_EVENT_USE_EPOLL
+
+#include <sys/epoll.h>
+
+int event_queue_init() {
+
+        int epfd;
+
+        epfd = epoll_create(256);
+
+        if (epfd < 0) {
+                uwsgi_error("epoll_create()");
+                return -1;
+        }
+
+        return epfd;
+}
+
+
+int event_queue_add_fd_read(int eq, int fd) {
+
+        struct epoll_event ee;
+
+        memset(&ee, 0, sizeof(struct epoll_event));
+        ee.events = EPOLLIN;
+        ee.data.fd = fd;
+
+        if (epoll_ctl(eq, EPOLL_CTL_ADD, fd, &ee)) {
+                uwsgi_error("epoll_ctl()");
+                return -1;
+        }
+
+        return fd;
+}
+
+int event_queue_fd_write_to_read(int eq, int fd) {
+
+        struct epoll_event ee;
+
+        memset(&ee, 0, sizeof(struct epoll_event));
+        ee.events = EPOLLIN;
+        ee.data.fd = fd;
+
+        if (epoll_ctl(eq, EPOLL_CTL_MOD, fd, &ee)) {
+                uwsgi_error("epoll_ctl()");
+                return -1;
+        }
+
+        return fd;
+}
+
+int event_queue_del_fd(int eq, int fd) {
+
+        struct epoll_event ee;
+
+        memset(&ee, 0, sizeof(struct epoll_event));
+        ee.data.fd = fd;
+
+        if (epoll_ctl(eq, EPOLL_CTL_DEL, fd, &ee)) {
+                uwsgi_error("epoll_ctl()");
+                return -1;
+        }
+
+        return fd;
+}
+
+int event_queue_add_fd_write(int eq, int fd) {
+
+        struct epoll_event ee;
+
+        memset(&ee, 0, sizeof(struct epoll_event));
+        ee.events = EPOLLOUT;
+        ee.data.fd = fd;
+
+        if (epoll_ctl(eq, EPOLL_CTL_ADD, fd, &ee)) {
+                uwsgi_error("epoll_ctl()");
+                return -1;
+        }
+
+        return fd;
+}
+
+void *event_queue_alloc(int nevents) {
+
+	return uwsgi_malloc(sizeof(struct epoll_event) * nevents);
+}
+
+int event_queue_interesting_fd(void *events, int id) {
+	struct epoll_event *ee = (struct epoll_event *) events;
+	return ee[id].data.fd;
+}
+
+int event_queue_interesting_fd_has_error(void *events, int id) {
+	struct epoll_event *ee = (struct epoll_event *) events;
+	if (ee[id].events == EPOLLHUP || ee[id].events == EPOLLERR || (ee[id].events == (EPOLLERR|EPOLLHUP))) {
+		return 1;
+	}
+	return 0;
+}
+
+int event_queue_wait_multi(int eq, int timeout, void *events, int nevents) {
+
+	int ret;
+
+	if (timeout > 0) {
+                timeout = timeout*1000;
+        }
+
+        ret = epoll_wait(eq, (struct epoll_event *) events, nevents, timeout);
+        if (ret < 0) {
+		if (errno != EINTR)
+                	uwsgi_error("epoll_wait()");
+        }
+
+        return ret;
+}
+
+int event_queue_wait(int eq, int timeout, int *interesting_fd) {
+
+        int ret;
+	struct epoll_event ee;
+
+        if (timeout > 0) {
+                timeout = timeout*1000;
+        }
+
+        ret = epoll_wait(eq, &ee, 1, timeout);
+        if (ret < 0) {
+		if (errno != EINTR)
+                	uwsgi_error("epoll_wait()");
+        }
+
+	if (ret > 0) {
+                *interesting_fd = ee.data.fd;
+        }
+
+        return ret;
+}
+
+#endif
+
+#ifdef UWSGI_EVENT_USE_KQUEUE
+int event_queue_init() {
+
+	int kfd = kqueue();
+
+        if (kfd < 0) {
+                uwsgi_error("kqueue()");
+                return -1;
+        }
+
+	return kfd;
+}
+
+int event_queue_fd_write_to_read(int eq, int fd) {
+
+	struct kevent kev;
+
+        EV_SET(&kev, fd, EVFILT_WRITE, EV_DISABLE, 0, 0, 0);
+        if (kevent(eq, &kev, 1, NULL, 0, NULL) < 0) {
+                uwsgi_error("kevent()");
+                return -1;
+        }
+
+        EV_SET(&kev, fd, EVFILT_READ, EV_ADD, 0, 0, 0);
+        if (kevent(eq, &kev, 1, NULL, 0, NULL) < 0) {
+                uwsgi_error("kevent()");
+                return -1;
+        }
+	
+	return fd;
+}
+
+int event_queue_del_fd(int eq, int fd) {
+
+	struct kevent kev;
+
+        EV_SET(&kev, fd, EVFILT_READ, EV_DELETE, 0, 0, 0);
+        if (kevent(eq, &kev, 1, NULL, 0, NULL) < 0) {
+                uwsgi_error("kevent()");
+                return -1;
+        }
+	
+	return fd;
+}
+
+int event_queue_add_fd_read(int eq, int fd) {
+
+	struct kevent kev;
+
+        EV_SET(&kev, fd, EVFILT_READ, EV_ADD, 0, 0, 0);
+        if (kevent(eq, &kev, 1, NULL, 0, NULL) < 0) {
+                uwsgi_error("kevent()");
+                return -1;
+        }
+	
+	return fd;
+}
+
+int event_queue_add_fd_write(int eq, int fd) {
+
+	struct kevent kev;
+
+        EV_SET(&kev, fd, EVFILT_WRITE, EV_ADD, 0, 0, 0);
+        if (kevent(eq, &kev, 1, NULL, 0, NULL) < 0) {
+                uwsgi_error("kevent()");
+                return -1;
+        }
+	
+	return 0;
+}
+
+void *event_queue_alloc(int nevents) {
+
+        return uwsgi_malloc(sizeof(struct kevent) * nevents);
+}
+
+int event_queue_wait_multi(int eq, int timeout, void *events, int nevents) {
+
+        int ret;
+        struct timespec ts;
+
+        if (timeout < 0) {
+                ret = kevent(eq, NULL, 0, events, nevents, NULL);
+        }
+        else {
+                memset(&ts, 0, sizeof(struct timespec));
+                ts.tv_sec = timeout;
+                ret = kevent(eq, NULL, 0, (struct kevent *)events, nevents, &ts);
+        }
+
+        if (ret < 0) {
+                uwsgi_error("kevent()");
+        }
+
+        return ret;
+
+}
+
+int event_queue_interesting_fd(void *events, int id) {
+
+	struct kevent *ev = (struct kevent *) events;
+	return ev[id].ident;
+}
+
+int event_queue_interesting_fd_has_error(void *events, int id) {
+	struct kevent *ev = (struct kevent *) events;
+
+        if (  ( (ev[id].flags == EV_ERROR) || (ev[id].flags == EV_EOF) || (ev[id].flags == (EV_EOF|EV_ERROR))) ) {
+                return 1;
+        }
+        return 0;
+}
+
+
+
+int event_queue_wait(int eq, int timeout, int *interesting_fd) {
+
+	int ret;
+	struct timespec ts;
+	struct kevent ev;
+
+	if (timeout <= 0) {
+        	ret = kevent(eq, NULL, 0, &ev, 1, NULL);
+        }
+        else {
+                memset(&ts, 0, sizeof(struct timespec));
+                ts.tv_sec = timeout;
+                ret = kevent(eq, NULL, 0, &ev, 1, &ts);
+        }
+
+        if (ret < 0) {
+                uwsgi_error("kevent()");
+        }
+
+	if (ret > 0) {
+		*interesting_fd = ev.ident;
+	}
+
+	return ret;
+
+}
+#endif
+
+#ifdef UWSGI_EVENT_FILEMONITOR_USE_NONE
+int event_queue_add_file_monitor(int eq, char *filename, int *id) { return -1;}
+struct uwsgi_fmon *event_queue_ack_file_monitor(int eq, int id) {return NULL;}
+#endif
+
+#ifdef UWSGI_EVENT_FILEMONITOR_USE_PORT
+int event_queue_add_file_monitor(int eq, char *filename, int *id) {
+
+	struct file_obj fo;
+	struct stat st;
+	static int fmon_id = 0xffffee00;
+
+	if (stat(filename, &st)) {
+		uwsgi_error("stat()");
+		return -1;
+	}
+
+	fo.fo_name = filename;
+	fo.fo_atime = st.st_atim;
+	fo.fo_mtime = st.st_mtim;
+	fo.fo_ctime = st.st_ctim;
+	
+	fmon_id++;
+	if (port_associate(eq, PORT_SOURCE_FILE, (uintptr_t) &fo, FILE_MODIFIED|FILE_ATTRIB, (void *) fmon_id)) {
+		uwsgi_error("port_associate()");
+		return -1;
+	}
+
+
+	*id = fmon_id;
+
+        uwsgi_log("added new file to monitor %s [%d]\n", filename, *id);
+
+        return *id;
+}
+
+struct uwsgi_fmon *event_queue_ack_file_monitor(int eq, int id) {
+
+        int i;
+	struct file_obj fo;
+        struct stat st;
+
+        for(i=0;i<ushared->files_monitored_cnt;i++) {
+                if (ushared->files_monitored[i].registered) {
+                        if (ushared->files_monitored[i].fd == id) {
+				if (stat(ushared->files_monitored[i].filename, &st)) {
+                			uwsgi_error("stat()");
+                			return NULL;
+        			}			
+				fo.fo_name = ushared->files_monitored[i].filename;
+        			fo.fo_atime = st.st_atim;
+        			fo.fo_mtime = st.st_mtim;
+        			fo.fo_ctime = st.st_ctim;
+				if (port_associate(eq, PORT_SOURCE_FILE, (uintptr_t) &fo, FILE_MODIFIED|FILE_ATTRIB, (void *)id)) {
+                			uwsgi_error("port_associate()");
+                			return NULL;
+        			}
+                                return &ushared->files_monitored[i];
+                        }
+                }
+        }
+
+        return NULL;
+
+}
+
+#endif
+
+
+#ifdef UWSGI_EVENT_FILEMONITOR_USE_KQUEUE
+int event_queue_add_file_monitor(int eq, char *filename, int *id) {
+
+	struct kevent kev;
+
+	int fd = open(filename, O_RDONLY);
+	if (fd < 0) {
+		uwsgi_error("open()");
+		return -1;
+	}
+	
+        EV_SET(&kev, fd, EVFILT_VNODE, EV_ADD|EV_CLEAR, NOTE_WRITE|NOTE_DELETE|NOTE_EXTEND|NOTE_ATTRIB|NOTE_RENAME|NOTE_REVOKE, 0, 0);
+        if (kevent(eq, &kev, 1, NULL, 0, NULL) < 0) {
+                uwsgi_error("kevent()");
+                return -1;
+        }
+
+	*id = fd;
+
+	uwsgi_log("added new file to monitor %s\n", filename);
+	
+	return fd;
+}
+
+struct uwsgi_fmon *event_queue_ack_file_monitor(int eq, int id) {
+
+	int i;
+
+        for(i=0;i<ushared->files_monitored_cnt;i++) {
+        	if (ushared->files_monitored[i].registered) {
+                	if (ushared->files_monitored[i].fd == id) {
+                        	return &ushared->files_monitored[i];
+			}
+		}
+        }
+
+        return NULL;
+
+}
+
+#endif
+
+#ifdef UWSGI_EVENT_FILEMONITOR_USE_INOTIFY
+#include <sys/inotify.h>
+
+int event_queue_add_file_monitor(int eq, char *filename, int *id) {
+
+	int ifd = -1;
+	int i;
+	int add_to_queue = 0;
+
+	for (i=0;i<ushared->files_monitored_cnt;i++) {
+		if (ushared->files_monitored[i].registered) {
+			ifd = ushared->files_monitored[0].fd;
+			break;
+		}
+	}
+
+	if (ifd == -1) {
+		ifd = inotify_init();
+		if (ifd < 0) {
+			uwsgi_error("inotify_init()");
+			return -1;
+		}		
+		add_to_queue = 1;
+	}
+
+	*id = inotify_add_watch(ifd, filename, IN_ATTRIB|IN_CREATE|IN_DELETE|IN_DELETE_SELF|IN_MODIFY|IN_MOVE_SELF|IN_MOVED_FROM|IN_MOVED_TO);
+		
+	uwsgi_log("added watch %d for filename %s\n", *id, filename);
+
+	if (add_to_queue) {
+		return event_queue_add_fd_read(eq, ifd);
+	}
+	else {
+		return ifd;
+	}
+}
+
+struct uwsgi_fmon *event_queue_ack_file_monitor(int eq, int id) {
+
+	ssize_t rlen = 0;
+	struct inotify_event ie, *bie, *iie;
+	int i,j;
+	int items = 0;
+
+	unsigned int isize = sizeof(struct inotify_event);
+	struct uwsgi_fmon *uf = NULL;
+
+	if (ioctl(id, FIONREAD, &isize) < 0) {
+		uwsgi_error("ioctl()");
+		return NULL;
+	}
+
+	if (isize > sizeof(struct inotify_event)) {
+		bie = uwsgi_malloc(isize);
+		rlen = read(id, bie, isize);
+	}
+	else {
+		rlen = read(id, &ie, sizeof(struct inotify_event));
+		bie = &ie;
+	}
+
+	if (rlen < 0) {
+		uwsgi_error("read()");
+	}
+	else {
+		items = isize/(sizeof(struct inotify_event));
+		uwsgi_log("inotify returned %d items\n", items);
+		for(j=0;j<items;j++) {	
+			iie = &bie[j];
+			for(i=0;i<ushared->files_monitored_cnt;i++) {
+				if (ushared->files_monitored[i].registered) {
+					if (ushared->files_monitored[i].fd == id && ushared->files_monitored[i].id == iie->wd) {
+						uf = &ushared->files_monitored[i];
+					}
+				}
+			}
+
+		}	
+
+		if (items > 1) {
+			free(bie);
+		}
+
+		return uf;
+	}
+	
+	return NULL;
+	
+}
+#endif
+
+#ifdef UWSGI_EVENT_TIMER_USE_TIMERFD
+
+#ifndef UWSGI_EVENT_TIMER_USE_TIMERFD_NOINC
+#include <sys/timerfd.h>
+#endif
+
+#ifndef TFD_CLOEXEC
+
+// timerfd support
+
+enum
+  {
+    TFD_CLOEXEC = 02000000,
+#define TFD_CLOEXEC TFD_CLOEXEC
+    TFD_NONBLOCK = 04000
+#define TFD_NONBLOCK TFD_NONBLOCK
+  };
+
+
+/* Bits to be set in the FLAGS parameter of `timerfd_settime'.  */
+enum
+  {
+    TFD_TIMER_ABSTIME = 1 << 0
+#define TFD_TIMER_ABSTIME TFD_TIMER_ABSTIME
+  };
+
+
+static int timerfd_create (clockid_t __clock_id, int __flags) {
+	return syscall(322, __clock_id, __flags);
+}
+
+static int timerfd_settime (int __ufd, int __flags,
+                            __const struct itimerspec *__utmr,
+                            struct itimerspec *__otmr) {
+	return syscall(325, __ufd, __flags, __utmr, __otmr);
+}
+#endif
+
+int event_queue_add_timer(int eq, int *id, int sec) {
+
+	struct itimerspec it;
+	int tfd = timerfd_create(CLOCK_REALTIME, TFD_CLOEXEC);
+
+	if (tfd < 0) {
+		uwsgi_error("timerfd_create()");
+		return -1;
+	}
+
+	it.it_value.tv_sec = sec;
+	it.it_value.tv_nsec = 0;
+
+	it.it_interval.tv_sec = sec;
+	it.it_interval.tv_nsec = 0;
+
+	if (timerfd_settime(tfd, 0, &it, NULL)) {
+		uwsgi_error("timerfd_settime()");
+		close(tfd);
+		return -1;
+	}
+	
+	*id = tfd;
+	return event_queue_add_fd_read(eq, tfd);
+}
+
+struct uwsgi_timer *event_queue_ack_timer(int id) {
+	
+	int i;
+	ssize_t rlen;
+	uint64_t counter;
+	struct uwsgi_timer *ut = NULL;
+
+	for(i=0;i<ushared->timers_cnt;i++) {
+		if (ushared->timers[i].registered) {
+			if (ushared->timers[i].id == id) {
+				ut = &ushared->timers[i];
+			}
+		}
+	}
+
+	rlen = read(id, &counter, sizeof(uint64_t));
+
+	if (rlen < 0) {
+		uwsgi_error("read()");
+	}
+	
+	return ut;
+}
+#endif
+
+#ifdef UWSGI_EVENT_TIMER_USE_NONE
+int event_queue_add_timer(int eq, int *id, int sec) { return -1; }
+struct uwsgi_timer *event_queue_ack_timer(int id) { return NULL;}
+#endif
+
+#ifdef UWSGI_EVENT_TIMER_USE_PORT
+int event_queue_add_timer(int eq, int *id, int sec) {
+
+	static int timer_id = 0xffffff00;
+	port_notify_t		pnotif;
+	struct sigevent		sigev;
+	itimerspec_t it;
+	timer_t tid;
+
+	timer_id++;
+
+	pnotif.portnfy_port = eq;
+	pnotif.portnfy_user = (void *) timer_id;
+
+	sigev.sigev_notify = SIGEV_PORT;
+	sigev.sigev_value.sival_ptr = &pnotif;
+
+	if (timer_create(CLOCK_REALTIME, &sigev, &tid) < 0) {
+		uwsgi_error("timer_create()");
+		return -1;
+	}
+
+	
+	it.it_value.tv_sec = sec;
+        it.it_value.tv_nsec = 0;
+
+        it.it_interval.tv_sec = sec;
+        it.it_interval.tv_nsec = 0;
+
+	if (timer_settime(tid, 0, &it, NULL) < 0) {
+		uwsgi_error("timer_settime()");
+		return -1;
+	}
+
+	*id = timer_id;
+
+	return *id;
+
+}
+
+struct uwsgi_timer *event_queue_ack_timer(int id) {
+
+	int i;
+	struct uwsgi_timer *ut = NULL;
+
+	for(i=0;i<uwsgi.shared->timers_cnt;i++) {
+		if (uwsgi.shared->timers[i].registered) {
+			if (uwsgi.shared->timers[i].id == id) {
+				ut = &uwsgi.shared->timers[i];
+			}
+		}
+	}
+
+	return ut;
+}
+#endif
+
+
+#ifdef UWSGI_EVENT_TIMER_USE_KQUEUE
+int event_queue_add_timer(int eq, int *id, int sec) {
+
+	static int timer_id = 0xffffff00;
+	struct kevent kev;
+
+	*id = timer_id ;
+	timer_id++;	
+
+	uwsgi_log("registering timer %d\n", sec);
+	
+        EV_SET(&kev, *id, EVFILT_TIMER, EV_ADD, 0, sec*1000, 0);
+        if (kevent(eq, &kev, 1, NULL, 0, NULL) < 0) {
+                uwsgi_error("kevent()");
+                return -1;
+        }
+	
+	return *id;
+}
+
+struct uwsgi_timer *event_queue_ack_timer(int id) {
+
+	int i;
+	struct uwsgi_timer *ut = NULL;
+
+	for(i=0;i<uwsgi.shared->timers_cnt;i++) {
+		if (uwsgi.shared->timers[i].registered) {
+			if (uwsgi.shared->timers[i].id == id) {
+				ut = &uwsgi.shared->timers[i];
+			}
+		}
+	}
+
+	return ut;
+
+}
+#endif

fibers.ru

@@ -0,0 +1,21 @@
+require 'fiber'
+class SuspendingBody
+
+	def each
+		for i in 1..10
+			yield "number: #{i}\n"
+			Fiber.yield
+		end
+	end
+
+end
+
+class RackFoo
+
+	def call(env)
+		[200, { 'Content-Type' => 'text/plain'}, SuspendingBody.new]
+	end
+
+end
+
+run RackFoo.new

fibers.yml

@@ -0,0 +1,8 @@
+uwsgi:
+  plugins:		rack
+  socket:		127.0.0.1:3031
+  rack:			fibers.ru
+  post-buffering:	4096
+  async:		10
+  loop:			fiber
+  

filemonitor.c

@@ -4,28 +4,28 @@
 
 int uwsgi_file_monitor_new() {
 
-	int inotify_fd ;
+	int inotify_fd;
+
 
-	
 	inotify_fd = inotify_init();
-	
+
 	if (inotify_fd < 0) {
 		uwsgi_error("inotify_init()");
-		return -1;	
+		return -1;
 	}
-	
-	return inotify_fd ;
+
+	return inotify_fd;
 }
 
 int uwsgi_file_monitor_add(int fd, char *what) {
 
-	int inotify_watch_fd ;
+	int inotify_watch_fd;
 
 	inotify_watch_fd = inotify_add_watch(fd, what, IN_ALL_EVENTS);
-	
+
 	if (inotify_watch_fd < 0) {
 		uwsgi_error("inotify_add_watch()");
-		return -1;	
+		return -1;
 	}
 
 	return inotify_watch_fd;

gateway.c

@@ -0,0 +1,122 @@
+#include "uwsgi.h"
+
+extern struct uwsgi_server uwsgi;
+
+struct uwsgi_gateway *register_fat_gateway(char *name, void (*loop)(void)) {
+
+        struct uwsgi_gateway *ug;
+        int num=1,i;
+
+        if (uwsgi.gateways_cnt >= MAX_GATEWAYS) {
+                uwsgi_log("you can register max %d gateways\n", MAX_GATEWAYS);
+                return NULL;
+        }
+
+        for(i=0;i<uwsgi.gateways_cnt;i++) {
+                if (!strcmp(name, uwsgi.gateways[i].name)) {
+                        num++;
+                }
+        }
+
+        ug = &uwsgi.gateways[uwsgi.gateways_cnt];
+        ug->pid = 0;
+        ug->name = name;
+        ug->loop = loop;
+        ug->num = num;
+
+        uwsgi.gateways_cnt++;
+
+        return ug;
+}
+
+struct uwsgi_gateway *register_gateway(char *name, void (*loop)(void)) {
+
+	pid_t gw_pid;
+	pid_t orig_pid = getpid();
+	struct uwsgi_gateway *ug;
+	int num=1,i;
+
+	if (uwsgi.gateways_cnt >= MAX_GATEWAYS) {
+		uwsgi_log("you can register max %d gateways\n", MAX_GATEWAYS);
+		return NULL;
+	}
+
+	for(i=0;i<uwsgi.gateways_cnt;i++) {
+		if (!strcmp(name, uwsgi.gateways[i].name)) {
+			num++;
+		}
+	}
+
+	gw_pid = fork();
+	if (gw_pid < 0) {
+		uwsgi_error("fork()");
+		return NULL;
+	}
+
+	if (!uwsgi.master_process) {
+		if (gw_pid > 0) {
+#ifdef __linux__
+                if (prctl(PR_SET_PDEATHSIG, SIGKILL, 0,0,0)) {
+                        uwsgi_error("prctl()");
+                }
+#endif
+			loop();
+			// never here !!! (i hope)
+			exit(1);	
+		}
+
+		ug = &uwsgi.gateways[uwsgi.gateways_cnt];
+		ug->pid = orig_pid;
+	}
+	else {
+		if (gw_pid == 0) {
+			if (uwsgi.master_as_root) uwsgi_as_root();
+			loop();
+			// never here !!! (i hope)
+			exit(1);	
+		}
+
+		ug = &uwsgi.gateways[uwsgi.gateways_cnt];
+		ug->pid = gw_pid;
+	}
+
+
+	ug->name = name;
+	ug->loop = loop;
+	ug->num = num;
+
+	uwsgi_log( "spawned uWSGI %s %d (pid: %d)\n", ug->name, ug->num, (int) ug->pid);
+
+	uwsgi.gateways_cnt++;
+
+	return ug;
+		
+}
+
+void gateway_respawn(int id) {
+
+	pid_t gw_pid;
+	struct uwsgi_gateway *ug = &uwsgi.gateways[id];
+	
+	gw_pid = fork();
+	if (gw_pid < 0) {
+                uwsgi_error("fork()");
+		return;
+	}
+
+	if (gw_pid == 0) {
+		if (uwsgi.master_as_root) uwsgi_as_root();
+#ifdef __linux__
+                if (prctl(PR_SET_PDEATHSIG, SIGKILL, 0,0,0)) {
+                        uwsgi_error("prctl()");
+                }
+#endif
+		ug->loop();
+		// never here !!! (i hope)
+		exit(1);	
+	}
+
+	ug->pid = gw_pid;
+	uwsgi_log( "respawned uWSGI %s %d (pid: %d)\n", ug->name, ug->num, (int) gw_pid);
+	
+}

healthcheck/http.c

@@ -0,0 +1,9 @@
+// http:3:GET / HTTP/1.1:192.168.173.10:80,192.168.173.11:80,192.168.173.12:80,192.168.173.13:80
+
+/*
+write(arg1);
+
+wait_for_fd()
+
+get_data() == 200
+*/

healthcheck/uwsgi.c

@@ -0,0 +1 @@
+// uwsgi:3::192.168.173.1:3031,192.168.173.2:3031,192.168.173.3:3031,192.168.173.4:3031

hello_world_rrdtool.py

@@ -6,20 +6,18 @@ import rrdtool
 
 s_freq = 10
 
-# this is a cron emulator done with the Spooler :)
-def rrdtool_updater(env):
-	uwsgi.set_spooler_frequency(s_freq)
-	rrdtool.update('../test.rrd', str(int(time.time()))+':'+str(uwsgi.total_requests()))
-	uwsgi.send_to_spooler({})
+# this task will be executed every s_freq seconds
+def rrdtool_updater(sig, sec):
+	rrdtool.update('test.rrd', str(int(time.time()))+':'+str(uwsgi.total_requests()))
 
 	
-uwsgi.spooler = rrdtool_updater
+uwsgi.register_timer(0, s_freq, uwsgi.KIND_WORKER, rrdtool_updater)
 	
 
 
 def hello_world(env, start_response):
 	start_response('200 Ok', [('Content-type', 'text/plain')])
-	yield 'Hello world !'
+	return 'Hello world !'
 
 
 def graph(env, start_response):
@@ -27,12 +25,7 @@ def graph(env, start_response):
 	now = int(time.time())
 	graph_range = (3600*24)
 	rrdtool.graph('uwsgi_graph.png', '--start', str(now - graph_range), '--end', str(now), 'DEF:urequests=test.rrd:requests:AVERAGE', 'LINE2:urequests#00FF00')
-	fd = open('uwsgi_graph.png', 'r')
-	# send file to browser
-	return env['wsgi.file_wrapper'](fd, 4096)
-
-# start the simil-cron
-uwsgi.send_to_spooler({})
-
+	# send file to client
+	uwsgi.sendfile('uwsgi_graph.png')
 
 uwsgi.applications = {'/': hello_world, '/graph':graph}

http.c

@@ -1,397 +0,0 @@
-#include "uwsgi.h"
-
-struct uwsgi_server uwsgi;
-
-struct uwsgi_http_req {
-	
-	pthread_t a_new_thread;
-	int fd;
-	struct sockaddr_in c_addr;
-	socklen_t c_len;
-};
-
-enum {
-	uwsgi_http_method,
-	uwsgi_http_uri,
-	uwsgi_http_protocol,
-	uwsgi_http_protocol_r,
-
-	uwsgi_http_header_key,
-	uwsgi_http_header_key_colon,
-
-	uwsgi_http_header_val,
-	uwsgi_http_header_val_r,
-
-	uwsgi_http_end
-};
-
-void http_end() {
-	uwsgi_log("closing uWSGI embedded HTTP server.\n");
-	exit(0);
-}
-
-void http_wait_end() {
-	pid_t wp_p;
-	int wp_c;
-	wp_p = waitpid(-1, &wp_c, 0); 
-	uwsgi_log("closing uWSGI embedded HTTP server.\n");
-	exit(0);
-}
-
-static char *add_uwsgi_var(char *up, char *key, uint16_t keylen, char *val, uint16_t vallen, int header, char *watermark)
-{
-
-	int i;
-
-	if (!header) {
-
-		if ( (up + 2 + keylen + 2 + vallen) > watermark ) return up ;
-
-		*up++ = (unsigned char) (keylen & 0xff);
-		*up++ = (unsigned char) ((keylen >> 8) & 0xff);
-
-		memcpy(up, key, keylen);
-		up += keylen;
-	} else {
-
-
-		for (i = 0; i < keylen; i++) {
-			if (key[i] == '-') {
-				key[i] = '_';
-			} else {
-				key[i] = toupper( (int) key[i]);
-			}
-		}
-
-		if (strncmp("CONTENT_TYPE", key, keylen) && strncmp("CONTENT_LENGTH", key, keylen)) {
-			if ( (up + 2 + keylen + 5 + 2 + vallen) > watermark ) return up ;
-			*up++ = (unsigned char) (((uint16_t) keylen + 5) & 0xff);
-			*up++ = (unsigned char) ((((uint16_t) keylen + 5) >> 8) & 0xff);
-			memcpy(up, "HTTP_", 5);
-			up += 5;
-		} else {
-			if ( (up + 2 + keylen + 2 + vallen) > watermark ) return up ;
-			*up++ = (unsigned char) (keylen & 0xff);
-			*up++ = (unsigned char) ((keylen >> 8) & 0xff);
-		}
-
-
-		memcpy(up, key, keylen);
-		up += keylen;
-	}
-
-	*up++ = (unsigned char) (vallen & 0xff);
-	*up++ = (unsigned char) ((vallen >> 8) & 0xff);
-	memcpy(up, val, vallen);
-	up += vallen;
-
-	return up;
-}
-
-static void *http_request(void *);
-
-void http_loop(struct uwsgi_server * uwsgi)
-{
-
-
-	struct uwsgi_http_req *ur;
-	int ret;
-	pthread_attr_t pa;
-	int stat_loc ;
-
-	ret = pthread_attr_init(&pa);
-	if (ret) {
-		uwsgi_log("pthread_attr_init() = %d\n", ret);
-		exit(1);
-	}
-
-	ret = pthread_attr_setdetachstate(&pa, PTHREAD_CREATE_DETACHED);
-	if (ret) {
-		uwsgi_log("pthread_attr_setdetachstate() = %d\n", ret);
-		exit(1);
-	}
-
-	// ignore broken pipes;
-	signal(SIGPIPE, SIG_IGN);
-	if (!uwsgi->http_only) {
-		signal(SIGCHLD, &http_end);
-		signal(SIGINT, &http_wait_end);
-	}
-	else {
-		signal(SIGINT, &http_end);
-	}
-
-	uwsgi->http_server_name = malloc(256);
-	if (!uwsgi->http_server_name) {
-		uwsgi_error("malloc()");
-		exit(1);
-	}
-
-	memset(uwsgi->http_server_name, 0, 256);
-	if (gethostname(uwsgi->http_server_name, 255)) {
-		uwsgi_error("gethostname()");
-		memcpy(uwsgi->http_server_name, "localhost", 9);
-	}
-
-	uwsgi_log("starting HTTP loop on %s (pid: %d)\n", uwsgi->http_server_name, (int) getpid());
-	for(;;) {
-
-		if (!uwsgi->http_only) {
-			if (waitpid(-1, &stat_loc, WNOHANG) != 0) {
-				http_end();
-			}
-		}
-		ur = malloc(sizeof(struct uwsgi_http_req));
-		if (!ur) {
-			uwsgi_error("malloc()");
-			sleep(1);
-			continue;
-		}
-		ur->c_len = sizeof(struct sockaddr_in) ;
-		ur->fd = accept(uwsgi->http_fd, (struct sockaddr *) &ur->c_addr, &ur->c_len);
-
-		if (ur->fd < 0) {
-			uwsgi_error("accept()");
-			free(ur);
-			continue;
-		}
-
-		ret = pthread_create(&ur->a_new_thread, &pa, http_request, (void *) ur);
-		if (ret) {
-			uwsgi_log("pthread_create() = %d\n", ret);
-			free(ur);
-			// sleep a bit to allow some resource gaining
-			sleep(1);
-			continue;
-		}
-	}
-}
-
-
-static void *http_request(void *u_h_r)
-{
-
-	char buf[4096];
-
-	char tmp_buf[4096];
-
-	char uwsgipkt[4096];
-
-	struct uwsgi_http_req *ur = (struct uwsgi_http_req *) u_h_r ;
-
-	int clientfd = ur->fd;
-	int uwsgi_fd = -1;
-
-	int need_to_read = 1;
-	int state = uwsgi_http_method;
-
-	int http_body_len = 0;
-
-	size_t len;
-
-	int i, j;
-
-	char HTTP_header_key[1024];
-
-	uint16_t ulen;
-
-	char *ptr = tmp_buf;
-
-	int qs = 0;
-
-	char *up = uwsgipkt;
-
-	char *watermark = up + 4096 ;
-	char *watermark2 = tmp_buf + 4096 ;
-	
-	int path_info_len;
-	char *ip;
-
-	up[0] = 0;
-	up[3] = 0;
-	up += 4;
-
-	while (need_to_read) {
-		len = read(clientfd, buf, 4096);
-		if (len <= 0) {
-			uwsgi_error("read()");
-			break;
-		}
-		for (i = 0; i < (int) len; i++) {
-
-			if (buf[i] == ' ') {
-
-				if (state == uwsgi_http_method) {
-
-					up = add_uwsgi_var(up, "REQUEST_METHOD", 14, tmp_buf, ptr - tmp_buf, 0, watermark);
-					ptr = tmp_buf;
-					state = uwsgi_http_uri;
-
-				} else if (state == uwsgi_http_uri) {
-
-					up = add_uwsgi_var(up, "REQUEST_URI", 11, tmp_buf, ptr - tmp_buf, 0, watermark);
-
-					path_info_len = ptr - tmp_buf;
-					for (j = 0; j < ptr - tmp_buf; j++) {
-						if (tmp_buf[j] == '?') {
-							path_info_len = j;
-							if (j + 1 < (ptr - tmp_buf)) {
-								up = add_uwsgi_var(up, "QUERY_STRING", 12, tmp_buf + j + 1, (ptr - tmp_buf) - (j + 1), 0, watermark);
-								qs = 1 ;
-							}
-							break;
-						}
-					}
-
-					if (!qs) {
-						up = add_uwsgi_var(up, "QUERY_STRING", 12, NULL, 0, 0, watermark);
-					}
-					up = add_uwsgi_var(up, "PATH_INFO", 9, tmp_buf, path_info_len, 0, watermark);
-
-					ptr = tmp_buf;
-					state = uwsgi_http_protocol;
-
-				} else if (state == uwsgi_http_header_key_colon) {
-
-					if (ptr+1 > watermark2) { close(uwsgi_fd); goto clear;}
-					*ptr++ = 0;
-
-					memset(HTTP_header_key, 0, sizeof(HTTP_header_key));
-					memcpy(HTTP_header_key, tmp_buf, strlen(tmp_buf));
-					ptr = tmp_buf;
-					state = uwsgi_http_header_val;
-				} else {
-					//check for overflow
-					if (ptr+1 > watermark2) { close(uwsgi_fd); goto clear;}
-					*ptr++ = buf[i];
-				}
-
-			} else if (buf[i] == '\r') {
-
-				if (state == uwsgi_http_protocol) {
-					state = uwsgi_http_protocol_r;
-				}
-				if (state == uwsgi_http_header_val) {
-					state = uwsgi_http_header_val_r;
-				} else if (state == uwsgi_http_header_key) {
-					state = uwsgi_http_end;
-				}
-			} else if (buf[i] == '\n') {
-
-				if (state == uwsgi_http_header_val_r) {
-
-					up = add_uwsgi_var(up, HTTP_header_key, strlen(HTTP_header_key), tmp_buf, ptr - tmp_buf, 1, watermark);
-					if (!strcmp("CONTENT_LENGTH", HTTP_header_key)) {
-						if (ptr+1 > watermark2) { close(uwsgi_fd); goto clear;}
-						*ptr++ = 0;
-						http_body_len = atoi(tmp_buf);
-					}
-					ptr = tmp_buf;
-					state = uwsgi_http_header_key;
-				} else if (state == uwsgi_http_protocol_r) {
-
-					up = add_uwsgi_var(up, "SERVER_PROTOCOL", 15, tmp_buf, ptr - tmp_buf, 0, watermark);
-					ptr = tmp_buf;
-					state = uwsgi_http_header_key;
-				} else if (state == uwsgi_http_end) {
-					need_to_read = 0;
-
-
-					up = add_uwsgi_var(up, "SERVER_NAME", 11, uwsgi.http_server_name, strlen(uwsgi.http_server_name), 0, watermark);
-					up = add_uwsgi_var(up, "SERVER_PORT", 11, uwsgi.http_server_port, strlen(uwsgi.http_server_port), 0, watermark);
-
-					up = add_uwsgi_var(up, "SCRIPT_NAME", 11, "", 0, 0, watermark);
-
-					ip = inet_ntoa(ur->c_addr.sin_addr);
-					up = add_uwsgi_var(up, "REMOTE_ADDR", 11, ip, strlen(ip), 0, watermark);
-
-					//up = add_uwsgi_var(up, "REMOTE_ADDR", 11, "127.0.0.1", 9, 0, watermark);
-					//up = add_uwsgi_var(up, "REMOTE_USER", 11, "unknown", 7, 0);
-
-					for(j=0;j<uwsgi.http_vars_cnt;j++) {
-						char *separator;
-						
-						separator = strchr(uwsgi.http_vars[j], '=');
-						if (separator) {
-							up = add_uwsgi_var(up, uwsgi.http_vars[j], separator - uwsgi.http_vars[j], separator + 1, strlen(separator + 1), 0, watermark);
-						}
-						else {
-							up = add_uwsgi_var(up, uwsgi.http_vars[j], strlen(uwsgi.http_vars[j]), NULL, 0, 0, watermark);
-						}
-					}
-
-					uwsgi_fd = uwsgi_connect(uwsgi.socket_name, 10);
-					if (uwsgi_fd >= 0) {
-						ulen = (up - uwsgipkt) - 4;
-						uwsgipkt[1] = (unsigned char) (ulen & 0xff);
-						uwsgipkt[2] = (unsigned char) ((ulen >> 8) & 0xff);
-
-						if (write(uwsgi_fd, uwsgipkt, ulen + 4) < 0) {
-							uwsgi_error("write()");
-						}
-
-						if (http_body_len > 0) {
-							if (http_body_len >= (int) len - (i + 1)) {
-								if (write(uwsgi_fd, buf + i + 1, len - (i + 1)) < 0) {
-									uwsgi_error("write()");
-								}
-								http_body_len -= len - (i + 1);
-							} else {
-								if (write(uwsgi_fd, buf + i, http_body_len) < 0) {
-									uwsgi_error("write()");
-								}
-								http_body_len = 0;
-							}
-
-							while (http_body_len > 0) {
-								int to_read = 4096;
-								if (http_body_len < to_read) {
-									to_read = http_body_len;
-								}
-								len = read(clientfd, uwsgipkt, to_read);
-								if (write(uwsgi_fd, uwsgipkt, len) < 0) {
-									uwsgi_error("write()");
-								}
-								http_body_len -= len;
-							}
-						}
-						while ((len = read(uwsgi_fd, uwsgipkt, 4096)) > 0) {
-							if (write(clientfd, uwsgipkt, len) < 0) {
-								uwsgi_error("write()");
-							}
-						}
-						close(uwsgi_fd);
-					}
-					else {
-						close(uwsgi_fd);
-						goto clear;
-					}
-				}
-			} else if (buf[i] == ':') {
-
-				if (state == uwsgi_http_header_key) {
-					state = uwsgi_http_header_key_colon;
-				} else {
-					//check for overflow
-					if (ptr+1 > watermark2) { close(uwsgi_fd); goto clear;}
-					*ptr++ = buf[i];
-				}
-			} else {
-
-				//check for overflow
-				if (ptr+1 > watermark2) { close(uwsgi_fd); goto clear;}
-				*ptr++ = buf[i];
-			}
-
-		}
-
-	}
-
-clear:
-	close(clientfd);
-
-	free(ur);
-	pthread_exit(NULL);
-	
-	return NULL;
-}

ini.c

@@ -2,19 +2,16 @@
 
 #include "uwsgi.h"
 
-/*
-	ini file must be read ALL into memory.
-	This memory must not be freed for all the server lifecycle
-*/
+extern struct uwsgi_server uwsgi;
 
-enum {
-	ini_key_start,
-	ini_val_start,
-};
+/*
+   ini file must be read ALL into memory.
+   This memory must not be freed for all the server lifecycle
+   */
 
 void ini_rstrip(char *line) {
 
-	off_t i ;
+	off_t i;
 
 	for(i = strlen(line)-1;i>=0; i--) {
 		if (line[i] == ' ' || line[i] == '\t') {
@@ -22,12 +19,12 @@ void ini_rstrip(char *line) {
 			continue;
 		}
 		break;
-	} 
+	}
 }
 
 char *ini_lstrip(char *line) {
-	
-	off_t i ;
+
+	off_t i;
 	char *ptr = line;
 
 	for(i=0;i< (int) strlen(line);i++) {
@@ -44,10 +41,10 @@ char *ini_lstrip(char *line) {
 char *ini_get_key(char *key) {
 
 	off_t i;
-	char *ptr = key ;
+	char *ptr = key;
 
 	for(i=0;i< (int) strlen(key);i++) {
-		ptr++ ;	
+		ptr++;
 		if (key[i] == '=') {
 			key[i] = 0;
 			return ptr;
@@ -59,9 +56,9 @@ char *ini_get_key(char *key) {
 
 char *ini_get_line(char *ini, off_t size) {
 
-	off_t i ;
+	off_t i;
 	char *ptr = ini;
-	
+
 	for(i=0;i<size;i++) {
 		ptr++;
 		if (ini[i] == '\n') {
@@ -71,15 +68,13 @@ char *ini_get_line(char *ini, off_t size) {
 	}
 
 	return NULL;
-	
+
 }
 
-void uwsgi_ini_config(char *file, struct option *long_options) {
+void uwsgi_ini_config(char *file, char *magic_table[]) {
 
-	int fd;
-	ssize_t len;
+	int len = 0;
 	char *ini;
-	struct stat sb;
 
 	char *ini_line;
 
@@ -87,48 +82,25 @@ void uwsgi_ini_config(char *file, struct option *long_options) {
 	char *key;
 	char *val;
 
-	int lines = 1 ;
+	int lines = 1;
 
-	struct option *lopt, *aopt;
 	char *section_asked = "uwsgi";
-	char *colon ;
+	char *colon;
 
-	colon = strchr(file, ':');
+	colon = uwsgi_get_last_char(file, ':');
 	if (colon) {
 		colon[0] = 0;
 		if (colon[1] != 0) {
-			section_asked = colon+1 ;
+			section_asked = colon+1;
 		}
 	}
 
-	fd = open(file, O_RDONLY);
-	if (fd < 0) {
-		uwsgi_error("open()");
-		exit(1);
-	}
-	
-	if (fstat(fd, &sb)) {
-		uwsgi_error("fstat()");
-		exit(1);
-	}
+	uwsgi_log("[uWSGI] getting INI configuration from %s\n", file);
 
-	ini = malloc(sb.st_size+1);
+	ini = uwsgi_open_and_read(file, &len, 1, magic_table);
 
-	if (!ini) {
-		uwsgi_error("malloc()");
-		exit(1);
-	}
-
-	len = read(fd, ini, sb.st_size);
-	if (len != sb.st_size) {
-		uwsgi_error("read()");
-		exit(1);
-	}
-
-	ini[sb.st_size+1] = 0 ;
-
-	while(sb.st_size) {
-		ini_line = ini_get_line(ini, sb.st_size);
+	while(len) {
+		ini_line = ini_get_line(ini, len);
 		if (ini_line == NULL) {
 			break;
 		}
@@ -153,33 +125,17 @@ void uwsgi_ini_config(char *file, struct option *long_options) {
 					ini_rstrip(key);
 					val = ini_lstrip(val);
 					ini_rstrip(val);
-					lopt = long_options;
-                                	while ((aopt = lopt)) {
-                                       		if (!aopt->name)
-                                               	break;
-                                       		if (!strcmp(key, aopt->name)) {
-                                               		if (aopt->flag) {
-                                                       		*aopt->flag = aopt->val;
-                                              		}
-                                               		else {
-                                                              		manage_opt(aopt->val, val);
-                                               		}
-                                       		}
-                                       		lopt++;
-                                	}
+					add_exported_option((char *)key, val, 0);
 				}
 			}
 		}
-		
 
-		sb.st_size -= (ini_line - ini);
+
+		len -= (ini_line - ini);
 		ini += (ini_line - ini);
 
 	}
 
-	close(fd);
-	
 }
 
-
 #endif

ldap.c

@@ -1,22 +1,23 @@
-#ifdef UWSGI_LDAP 
+#ifdef UWSGI_LDAP
 
 #include "uwsgi.h"
 
+extern struct uwsgi_server uwsgi;
+
 #include <ldap.h>
 
 void ldap2uwsgi(char *ldapname, char *uwsginame) {
-
-	char *ptr = uwsginame ;
+	char *ptr = uwsginame;
 
 	int i;
 
 	for(i=0;i< (int) strlen(ldapname);i++) {
 		if (isupper( (int)ldapname[i])) {
-			*ptr++= '-';
-			*ptr++= tolower( (int) ldapname[i]);
+			*ptr++ = '-';
+			*ptr++ = tolower( (int) ldapname[i]);
 		}
 		else {
-			*ptr++= ldapname[i] ;
+			*ptr++ = ldapname[i];
 		}
 	}
 
@@ -24,7 +25,6 @@ void ldap2uwsgi(char *ldapname, char *uwsginame) {
 }
 
 int calc_ldap_name(char *name) {
-	
 	int i;
 	int counter = 0;
 
@@ -34,192 +34,223 @@ int calc_ldap_name(char *name) {
 		}
 	}
 
-	return strlen(name) + counter ;
+	return strlen(name) + counter;
 }
 
-void uwsgi_ldap_schema_dump_ldif(struct option *lo) {
+struct uwsgi_ldap_entry {
+	int num;
+	char names[1024];
+	int has_arg;
+};
 
-        struct option *aopt, *lopt ;
 
-        lopt = lo;
-        int i;
-        int counter = 30000;
+void uwsgi_name_to_ldap(char *src, char *dst) {	
 
-	int pythonpath_found = 0 ;
+	int i;
+	char *ptr = dst;
+
+	memset(dst, 0, 1024);
+
+	strcat(dst, " 'uWSGI");
+
+	ptr+= 7;
+
+	for(i=0;i< (int)strlen(src);i++) {
+        	if (src[i] == '-') {
+                	i++;
+                        *ptr++= toupper( (int) src[i]);
+                }
+                else {
+                	*ptr++= src[i];
+                }
+	}
+
+	strcat(dst, "'");
+
+}
+
+struct uwsgi_ldap_entry *get_ldap_by_num(struct uwsgi_ldap_entry *root, int num, int count) {
+
+	int i;
+	struct uwsgi_ldap_entry *ule;
+
+	for(i=0;i<count;i++) {
+		ule = &root[i];
+		if (ule->num == num) {
+			return ule;
+		}
+	}
+
+	return NULL;
+}
+
+struct uwsgi_ldap_entry *search_ldap_cache(struct uwsgi_ldap_entry *root, char *name, int count) {
+	int i;
+	struct uwsgi_ldap_entry *ule;
+
+	for(i=0;i<count;i++) {
+		ule = &root[i];
+		if (uwsgi_list_has_str(ule->names, name+1)) {
+			return ule;
+		}
+	}
+
+	return NULL;
+}
+
+struct uwsgi_ldap_entry *get_ldap_names(int *count) {
+
+	struct option *aopt, *lopt;
+	struct uwsgi_ldap_entry *ule, *entry;
+	char ldap_name[1024];
+	static int counter = 30000000;
+
+	*count = 0;
+	lopt = uwsgi.long_options;
+
+	ule = uwsgi_malloc(sizeof(struct uwsgi_ldap_entry)*count_options(lopt));
+
+	while( (aopt = lopt) ) {
+                if (!aopt->name)
+                        break;
+
+		uwsgi_name_to_ldap((char *)aopt->name, ldap_name);
+
+		entry = search_ldap_cache(ule, ldap_name, *count);
+
+		if (entry) goto next;
+
+		if (aopt->flag) {
+			entry = &ule[*count] ;
+			entry->num = counter;
+			strcpy(entry->names, ldap_name);
+			counter++;
+			*count = *count+1;
+		}
+		else {
+			entry = get_ldap_by_num(ule, aopt->val, *count);
+			if (entry) {
+				strcat(entry->names, ldap_name);
+			}
+			else {
+				entry = &ule[*count] ;
+				entry->num = aopt->val;
+				strcpy(entry->names, ldap_name);
+				*count = *count+1;
+			}
+		}
+
+		entry->has_arg = aopt->has_arg;
+		
+next:
+		lopt++;
+	}
+
+	return ule;
+}
+
+void uwsgi_ldap_schema_dump_ldif() {
+
+	int i;
+	int items;
 
 	uwsgi_log("\n");
 	uwsgi_log("dn: cn=uwsgi,cn=schema,cn=config\n");
 	uwsgi_log("objectClass: olcSchemaConfig\n");
 	uwsgi_log("cn: uwsgi\n");
 
-        while( (aopt = lopt) ) {
-                if (!aopt->name)
-                        break;
+	struct uwsgi_ldap_entry *entry, *ule = get_ldap_names(&items);
 
-		if (aopt->val == LONG_ARGS_PYTHONPATH) {
-			if (pythonpath_found) {
-				goto next;				
-			}
-			pythonpath_found = 1;
+	for(i=0;i<items;i++) {
+
+		entry = &ule[i];
+		uwsgi_log("olcAttributeTypes: ( 1.3.6.1.4.1.35156.17.4.%d NAME (%s", entry->num, entry->names);
+
+		if (entry->has_arg) {
+			uwsgi_log(" ) SYNTAX 1.3.6.1.4.1.1466.115.121.1.26 )\n");
 		}
-
-                if (aopt->flag) {
-                        uwsgi_log("olcAttributeTypes: ( 1.3.6.1.4.1.35156.17.4.%d NAME 'uWSGI", counter) ;
-                        counter++;
-                }
-                else {
-                        uwsgi_log("olcAttributeTypes: ( 1.3.6.1.4.1.35156.17.4.%d NAME 'uWSGI", aopt->val) ;
-                }
-                for(i=0;i< (int)strlen(aopt->name);i++) {
-                        if (aopt->name[i] == '-') {
-                                i++;
-                                uwsgi_log("%c", toupper( (int) aopt->name[i]));
-                        }
-                        else {
-                                uwsgi_log("%c", aopt->name[i]);
-                        }
-                }
-
-                if (aopt->has_arg) {
-                        uwsgi_log("' SYNTAX 1.3.6.1.4.1.1466.115.121.1.26 )\n");
-                }
-                else {
-                        uwsgi_log("' SYNTAX 1.3.6.1.4.1.1466.115.121.1.7 )\n");
-                }
-next:
-                lopt++;
-        }
-
-        uwsgi_log("olcAttributeTypes: ( 1.3.6.1.4.1.35156.17.4.50000 NAME 'uWSGInull' SYNTAX 1.3.6.1.4.1.1466.115.121.1.7 )\n") ;
-
-        lopt = lo;
-
-        uwsgi_log("olcObjectClasses: ( 1.3.6.1.4.1.35156.17.3.1 NAME 'uWSGIConfig' SUP top AUXILIARY DESC 'uWSGI configuration' MAY ( ");
-
-	pythonpath_found = 0;
-        while( (aopt = lopt) ) {
-                if (!aopt->name)
-                        break;
-
-		if (aopt->val == LONG_ARGS_PYTHONPATH) {
-			if (pythonpath_found) {
-				goto next2;				
-			}
-			pythonpath_found = 1;
+		else {
+			uwsgi_log(" ) SYNTAX 1.3.6.1.4.1.1466.115.121.1.7 )\n");
 		}
+	}
 
-                uwsgi_log("uWSGI");
+	uwsgi_log("olcAttributeTypes: ( 1.3.6.1.4.1.35156.17.4.50000 NAME 'uWSGInull' SYNTAX 1.3.6.1.4.1.1466.115.121.1.7 )\n");
 
-                for(i=0;i< (int)strlen(aopt->name);i++) {
-                        if (aopt->name[i] == '-') {
-                                i++;
-                                uwsgi_log("%c", toupper( (int) aopt->name[i]));
-                        }
-                        else {
-                                uwsgi_log("%c", aopt->name[i]);
-                        }
-                }
-                uwsgi_log(" $ ");
-next2:
-                lopt++;
-        }
 
-        uwsgi_log("uWSGInull ))\n");
+	uwsgi_log("olcObjectClasses: ( 1.3.6.1.4.1.35156.17.3.1 NAME 'uWSGIConfig' SUP top AUXILIARY DESC 'uWSGI configuration' MAY ( ");
+
+	
+	for(i=0;i<items;i++) {
+
+                entry = &ule[i];
+
+		char *list2 = uwsgi_concat2(entry->names+1, "");
+		char *p = strtok(list2, " ");
+        	while (p != NULL) {
+			uwsgi_log("%.*s $ ", strlen(p)-2, p+1);
+                	p = strtok(NULL, " ");
+        	}
+
+        	free(list2);
+
+	}
+
+	uwsgi_log("uWSGInull ))\n");
 
 	uwsgi_log("\n");
 
-        exit(0);
+	exit(0);
 }
 
+void uwsgi_ldap_schema_dump() {
 
-void uwsgi_ldap_schema_dump(struct option *lo) {
-
-	struct option *aopt, *lopt ;
-
-	lopt = lo;
 	int i;
-	int counter = 30000;
-	int pythonpath_found = 0;
+	int items;
 
-	while( (aopt = lopt) ) {
-		if (!aopt->name)
-			break;
+	struct uwsgi_ldap_entry *entry, *ule = get_ldap_names(&items);
+
+        for(i=0;i<items;i++) {
+
+                entry = &ule[i];
+                uwsgi_log("attributetype ( 1.3.6.1.4.1.35156.17.4.%d NAME (%s", entry->num, entry->names);
+
+                if (entry->has_arg) {
+                        uwsgi_log(" ) SYNTAX 1.3.6.1.4.1.1466.115.121.1.26 )\n");
+                }
+                else {
+                        uwsgi_log(" ) SYNTAX 1.3.6.1.4.1.1466.115.121.1.7 )\n");
+                }
+        }
 
 
-		if (aopt->val == LONG_ARGS_PYTHONPATH) {
-			if (pythonpath_found) {
-				goto next;				
-			}
-			pythonpath_found = 1;
-		}
-
-		if (aopt->flag) {
-			uwsgi_log("attributetype ( 1.3.6.1.4.1.35156.17.4.%d NAME 'uWSGI", counter) ;
-			counter++;
-		}
-		else {
-			uwsgi_log("attributetype ( 1.3.6.1.4.1.35156.17.4.%d NAME 'uWSGI", aopt->val) ;
-		}
-		for(i=0;i< (int)strlen(aopt->name);i++) {
-			if (aopt->name[i] == '-') {
-				i++;
-				uwsgi_log("%c", toupper( (int) aopt->name[i]));
-			}
-			else {
-				uwsgi_log("%c", aopt->name[i]);
-			}
-		}
-
-		if (aopt->has_arg) {
-			uwsgi_log("' SYNTAX 1.3.6.1.4.1.1466.115.121.1.26 )\n");
-		}
-		else {
-			uwsgi_log("' SYNTAX 1.3.6.1.4.1.1466.115.121.1.7 )\n");
-		}
-next:
-		lopt++;			
-	}
-
-	uwsgi_log("attributetype ( 1.3.6.1.4.1.35156.17.4.50000 NAME 'uWSGInull' SYNTAX 1.3.6.1.4.1.1466.115.121.1.7 )\n") ;
-
-	lopt = lo;
+	uwsgi_log("attributetype ( 1.3.6.1.4.1.35156.17.4.50000 NAME 'uWSGInull' SYNTAX 1.3.6.1.4.1.1466.115.121.1.7 )\n");
 
 	uwsgi_log("objectclass ( 1.3.6.1.4.1.35156.17.3.1 NAME 'uWSGIConfig' SUP top AUXILIARY DESC 'uWSGI configuration' MAY ( ");
 
-	pythonpath_found = 0;
-	while( (aopt = lopt) ) {
-		if (!aopt->name)
-			break;
+	for(i=0;i<items;i++) {
+
+                entry = &ule[i];
+
+                char *list2 = uwsgi_concat2(entry->names+1, "");
+                char *p = strtok(list2, " ");
+                while (p != NULL) {
+                        uwsgi_log("%.*s $ ", strlen(p)-2, p+1);
+                        p = strtok(NULL, " ");
+                }
+
+                free(list2);
+
+        }
 
-		if (aopt->val == LONG_ARGS_PYTHONPATH) {
-			if (pythonpath_found) {
-				goto next2;				
-			}
-			pythonpath_found = 1;
-		}
 
-		uwsgi_log("uWSGI");
 
-		for(i=0;i< (int)strlen(aopt->name);i++) {
-			if (aopt->name[i] == '-') {
-				i++;
-				uwsgi_log("%c", toupper( (int) aopt->name[i]));
-			}
-			else {
-				uwsgi_log("%c", aopt->name[i]);
-			}
-		}
-		uwsgi_log(" $ ");
-next2:
-		lopt++;			
-	}
 
 	uwsgi_log("uWSGInull ))\n");
 
 	exit(0);
 }
 
-void uwsgi_ldap_config(struct uwsgi_server *uwsgi, struct option *long_options) {
+void uwsgi_ldap_config() {
 
 	LDAP *ldp;
 	LDAPMessage *results, *entry;
@@ -234,12 +265,10 @@ void uwsgi_ldap_config(struct uwsgi_server *uwsgi, struct option *long_options)
 	int desired_version = LDAP_VERSION3;
 	int ret;
 
-	struct option *aopt, *lopt;
-
 	LDAPURLDesc *ldap_url;
 
-	if (uwsgi->ldap) {
-		url = uwsgi->ldap;
+	if (uwsgi.ldap) {
+		url = uwsgi.ldap;
 	}
 
 	if (!ldap_is_ldap_url(url)) {
@@ -251,6 +280,8 @@ void uwsgi_ldap_config(struct uwsgi_server *uwsgi, struct option *long_options)
 		uwsgi_log("unable to parse LDAP url.\n");
 		exit(1);
 	}
+	
+	uwsgi_log("[uWSGI] getting LDAP configuration from %s\n", url);
 
 	url_slash = strchr(url, '/');
 	url_slash = strchr(url_slash + 1, '/');
@@ -273,13 +304,13 @@ void uwsgi_ldap_config(struct uwsgi_server *uwsgi, struct option *long_options)
 
 	if ( (ret = ldap_set_option(ldp, LDAP_OPT_PROTOCOL_VERSION, &desired_version)) != LDAP_OPT_SUCCESS) {
 		uwsgi_log("LDAP: %s\n", ldap_err2string(ret));
-    		exit(1);
+		exit(1);
 	}
 
 
 	if ( (ret = ldap_search_ext_s(ldp, ldap_url->lud_dn, ldap_url->lud_scope, ldap_url->lud_filter, NULL, 0, NULL, NULL, NULL, 1, &results)) != LDAP_SUCCESS) {
 		uwsgi_log("LDAP: %s\n", ldap_err2string(ret));
-    		exit(1);
+		exit(1);
 	}
 
 #ifdef UWSGI_DEBUG
@@ -287,7 +318,7 @@ void uwsgi_ldap_config(struct uwsgi_server *uwsgi, struct option *long_options)
 #endif
 
 	free(ldap_url);
-	
+
 	if (ldap_count_entries(ldp, results) < 1) {
 		uwsgi_log("no LDAP entry found\n");
 		exit(1);
@@ -295,9 +326,11 @@ void uwsgi_ldap_config(struct uwsgi_server *uwsgi, struct option *long_options)
 
 	entry = ldap_first_entry(ldp, results);
 
+	int found = 0;
 	for( attr = ldap_first_attribute(ldp, entry, &ber); attr != NULL; attr = ldap_next_attribute(ldp, entry, ber)) {
 		if (!strncmp(attr,"uWSGI",5)) {
-		
+
+			found = 1;
 			uwsgi_attr = malloc( calc_ldap_name(attr) + 1 );
 			if (!uwsgi_attr) {
 				uwsgi_error("malloc()");
@@ -311,7 +344,7 @@ void uwsgi_ldap_config(struct uwsgi_server *uwsgi, struct option *long_options)
 #endif
 			bervalues = ldap_get_values_len(ldp, entry, attr);
 			if (bervalues) {
-				// do not free uwsgi_val;	
+				// do not free uwsgi_attr/uwsgi_val;
 				char *uwsgi_val = malloc( bervalues[0]->bv_len + 1 );
 				if (!uwsgi_val) {
 					uwsgi_error("malloc()");
@@ -321,32 +354,25 @@ void uwsgi_ldap_config(struct uwsgi_server *uwsgi, struct option *long_options)
 				memcpy(uwsgi_val, bervalues[0]->bv_val, bervalues[0]->bv_len);
 				uwsgi_val[bervalues[0]->bv_len] = 0;
 
-				lopt = long_options;
-                                while ((aopt = lopt)) {
-                                	if (!aopt->name)
-                                        	break;
-                                        if (!strcmp(uwsgi_attr, aopt->name)) {
-                                        	if (aopt->flag) {
-                                                	*aopt->flag = aopt->val;
-                                       		} 
-                                                else {
-                                                	manage_opt(aopt->val, uwsgi_val);
-                                                }
-                                        }
-                                        lopt++;
-                                }
+				add_exported_option((char*) uwsgi_attr, uwsgi_val, 0);
+				free(bervalues);
+			}
+			else {
+				free(uwsgi_attr);
 			}
-
-			free(bervalues);
-			free(uwsgi_attr);
 		}
 		free(attr);
 	}
 
+	if (!found) {
+		uwsgi_log("no uWSGI LDAP entry found\n");
+		exit(1);
+	}
+
 	free(ber);
 	free(results);
-	
+
 	ldap_unbind_ext_s(ldp, NULL, NULL);
-	
+
 }
 #endif

lib/rbtree.c

@@ -0,0 +1,284 @@
+/*
+
+  *** uWSGI, stripped down version of Linux rbtree ***
+
+
+  Red Black Trees
+  (C) 1999  Andrea Arcangeli <andrea@suse.de>
+  (C) 2002  David Woodhouse <dwmw2@infradead.org>
+  
+  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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#include "../uwsgi.h"
+
+static void __rb_rotate_left(struct rb_node *node, struct rb_root *root)
+{
+	struct rb_node *right = node->rb_right;
+	struct rb_node *parent = rb_parent(node);
+
+	if ((node->rb_right = right->rb_left))
+		rb_set_parent(right->rb_left, node);
+	right->rb_left = node;
+
+	rb_set_parent(right, parent);
+
+	if (parent)
+	{
+		if (node == parent->rb_left)
+			parent->rb_left = right;
+		else
+			parent->rb_right = right;
+	}
+	else
+		root->rb_node = right;
+	rb_set_parent(node, right);
+}
+
+static void __rb_rotate_right(struct rb_node *node, struct rb_root *root)
+{
+	struct rb_node *left = node->rb_left;
+	struct rb_node *parent = rb_parent(node);
+
+	if ((node->rb_left = left->rb_right))
+		rb_set_parent(left->rb_right, node);
+	left->rb_right = node;
+
+	rb_set_parent(left, parent);
+
+	if (parent)
+	{
+		if (node == parent->rb_right)
+			parent->rb_right = left;
+		else
+			parent->rb_left = left;
+	}
+	else
+		root->rb_node = left;
+	rb_set_parent(node, left);
+}
+
+void rb_insert_color(struct rb_node *node, struct rb_root *root)
+{
+	struct rb_node *parent, *gparent;
+
+	while ((parent = rb_parent(node)) && rb_is_red(parent))
+	{
+		gparent = rb_parent(parent);
+
+		if (parent == gparent->rb_left)
+		{
+			{
+				register struct rb_node *uncle = gparent->rb_right;
+				if (uncle && rb_is_red(uncle))
+				{
+					rb_set_black(uncle);
+					rb_set_black(parent);
+					rb_set_red(gparent);
+					node = gparent;
+					continue;
+				}
+			}
+
+			if (parent->rb_right == node)
+			{
+				register struct rb_node *tmp;
+				__rb_rotate_left(parent, root);
+				tmp = parent;
+				parent = node;
+				node = tmp;
+			}
+
+			rb_set_black(parent);
+			rb_set_red(gparent);
+			__rb_rotate_right(gparent, root);
+		} else {
+			{
+				register struct rb_node *uncle = gparent->rb_left;
+				if (uncle && rb_is_red(uncle))
+				{
+					rb_set_black(uncle);
+					rb_set_black(parent);
+					rb_set_red(gparent);
+					node = gparent;
+					continue;
+				}
+			}
+
+			if (parent->rb_left == node)
+			{
+				register struct rb_node *tmp;
+				__rb_rotate_right(parent, root);
+				tmp = parent;
+				parent = node;
+				node = tmp;
+			}
+
+			rb_set_black(parent);
+			rb_set_red(gparent);
+			__rb_rotate_left(gparent, root);
+		}
+	}
+
+	rb_set_black(root->rb_node);
+}
+
+static void __rb_erase_color(struct rb_node *node, struct rb_node *parent,
+			     struct rb_root *root)
+{
+	struct rb_node *other;
+
+	while ((!node || rb_is_black(node)) && node != root->rb_node)
+	{
+		if (parent->rb_left == node)
+		{
+			other = parent->rb_right;
+			if (rb_is_red(other))
+			{
+				rb_set_black(other);
+				rb_set_red(parent);
+				__rb_rotate_left(parent, root);
+				other = parent->rb_right;
+			}
+			if ((!other->rb_left || rb_is_black(other->rb_left)) &&
+			    (!other->rb_right || rb_is_black(other->rb_right)))
+			{
+				rb_set_red(other);
+				node = parent;
+				parent = rb_parent(node);
+			}
+			else
+			{
+				if (!other->rb_right || rb_is_black(other->rb_right))
+				{
+					rb_set_black(other->rb_left);
+					rb_set_red(other);
+					__rb_rotate_right(other, root);
+					other = parent->rb_right;
+				}
+				rb_set_color(other, rb_color(parent));
+				rb_set_black(parent);
+				rb_set_black(other->rb_right);
+				__rb_rotate_left(parent, root);
+				node = root->rb_node;
+				break;
+			}
+		}
+		else
+		{
+			other = parent->rb_left;
+			if (rb_is_red(other))
+			{
+				rb_set_black(other);
+				rb_set_red(parent);
+				__rb_rotate_right(parent, root);
+				other = parent->rb_left;
+			}
+			if ((!other->rb_left || rb_is_black(other->rb_left)) &&
+			    (!other->rb_right || rb_is_black(other->rb_right)))
+			{
+				rb_set_red(other);
+				node = parent;
+				parent = rb_parent(node);
+			}
+			else
+			{
+				if (!other->rb_left || rb_is_black(other->rb_left))
+				{
+					rb_set_black(other->rb_right);
+					rb_set_red(other);
+					__rb_rotate_left(other, root);
+					other = parent->rb_left;
+				}
+				rb_set_color(other, rb_color(parent));
+				rb_set_black(parent);
+				rb_set_black(other->rb_left);
+				__rb_rotate_right(parent, root);
+				node = root->rb_node;
+				break;
+			}
+		}
+	}
+	if (node)
+		rb_set_black(node);
+}
+
+void rb_erase(struct rb_node *node, struct rb_root *root)
+{
+	struct rb_node *child, *parent;
+	int color;
+
+	if (!node->rb_left)
+		child = node->rb_right;
+	else if (!node->rb_right)
+		child = node->rb_left;
+	else
+	{
+		struct rb_node *old = node, *left;
+
+		node = node->rb_right;
+		while ((left = node->rb_left) != NULL)
+			node = left;
+
+		if (rb_parent(old)) {
+			if (rb_parent(old)->rb_left == old)
+				rb_parent(old)->rb_left = node;
+			else
+				rb_parent(old)->rb_right = node;
+		} else
+			root->rb_node = node;
+
+		child = node->rb_right;
+		parent = rb_parent(node);
+		color = rb_color(node);
+
+		if (parent == old) {
+			parent = node;
+		} else {
+			if (child)
+				rb_set_parent(child, parent);
+			parent->rb_left = child;
+
+			node->rb_right = old->rb_right;
+			rb_set_parent(old->rb_right, node);
+		}
+
+		node->rb_parent_color = old->rb_parent_color;
+		node->rb_left = old->rb_left;
+		rb_set_parent(old->rb_left, node);
+
+		goto color;
+	}
+
+	parent = rb_parent(node);
+	color = rb_color(node);
+
+	if (child)
+		rb_set_parent(child, parent);
+	if (parent)
+	{
+		if (parent->rb_left == node)
+			parent->rb_left = child;
+		else
+			parent->rb_right = child;
+	}
+	else
+		root->rb_node = child;
+
+ color:
+	if (color == RB_BLACK)
+		__rb_erase_color(child, parent, root);
+}

lib/rbtree.h

@@ -0,0 +1,68 @@
+/*
+
+  *** uWSGI, stripped down version of Linux rbtree ***
+
+
+  Red Black Trees
+  (C) 1999  Andrea Arcangeli <andrea@suse.de>
+  
+  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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+struct rb_node
+{
+	unsigned long  rb_parent_color;
+#define	RB_RED		0
+#define	RB_BLACK	1
+	struct rb_node *rb_right;
+	struct rb_node *rb_left;
+} __attribute__((aligned(sizeof(long))));
+    /* The alignment might seem pointless, but allegedly CRIS needs it */
+
+struct rb_root
+{
+	struct rb_node *rb_node;
+};
+
+
+#define rb_parent(r)   ((struct rb_node *)((r)->rb_parent_color & ~3))
+#define rb_color(r)   ((r)->rb_parent_color & 1)
+#define rb_is_red(r)   (!rb_color(r))
+#define rb_is_black(r) rb_color(r)
+#define rb_set_red(r)  do { (r)->rb_parent_color &= ~1; } while (0)
+#define rb_set_black(r)  do { (r)->rb_parent_color |= 1; } while (0)
+
+static inline void rb_set_parent(struct rb_node *rb, struct rb_node *p)
+{
+	rb->rb_parent_color = (rb->rb_parent_color & 3) | (unsigned long)p;
+}
+static inline void rb_set_color(struct rb_node *rb, int color)
+{
+	rb->rb_parent_color = (rb->rb_parent_color & ~1) | color;
+}
+
+void rb_insert_color(struct rb_node *, struct rb_root *);
+void rb_erase(struct rb_node *, struct rb_root *);
+
+static inline void rb_link_node(struct rb_node * node, struct rb_node * parent,
+                                struct rb_node ** rb_link)
+{
+        node->rb_parent_color = (unsigned long )parent;
+        node->rb_left = node->rb_right = NULL;
+
+        *rb_link = node;
+}
+

lighttpd/mod_uwsgi.c

@@ -47,7 +47,7 @@
 
 #ifdef __BIG_ENDIAN__
 static uint16_t uwsgi_swap16(uint16_t x) {
-        return (uint16_t) ((x & 0xff) << 8 | (x & 0xff00) >> 8);
+	return (uint16_t) ((x & 0xff) << 8 | (x & 0xff00) >> 8);
 }
 #endif
 
@@ -64,7 +64,7 @@ typedef struct __attribute__((packed)) {
 	uint8_t		modifier1;
 	uint16_t	pktsize;
 	uint8_t		modifier2;
-} uwsgi_header ;
+} uwsgi_header;
 
 typedef struct {
 	array *extensions;
@@ -394,7 +394,7 @@ static int uwsgi_establish_connection(server *srv, handler_ctx *hctx) {
 static void uwsgi_add_var(buffer *b, char * key, uint16_t keylen, char *val, uint16_t vallen) {
 
 #ifdef __BIG_ENDIAN__
-	uint16_t uwlen ;
+	uint16_t uwlen;
 
 	uwlen = uwsgi_swap16(keylen);
 	buffer_append_memory(b, (char *) &uwlen, 2); buffer_append_memory(b, key, keylen);
@@ -405,19 +405,19 @@ static void uwsgi_add_var(buffer *b, char * key, uint16_t keylen, char *val, uin
 	buffer_append_memory(b, (char *) &vallen, 2); buffer_append_memory(b, val, vallen);
 #endif
 
-	
+
 }
 
 static int uwsgi_create_env(server *srv, handler_ctx *hctx) {
 	size_t i;
 
 	char buf[32];
-	uwsgi_header *uh ;
+	uwsgi_header *uh;
 	const char *s;
 #ifdef HAVE_IPV6
 	char b2[INET6_ADDRSTRLEN + 1];
 #endif
-	
+
 
 	connection *con   = hctx->remote_conn;
 	server_socket *srv_sock = con->srv_socket;
@@ -436,57 +436,57 @@ static int uwsgi_create_env(server *srv, handler_ctx *hctx) {
 
 	if (!buffer_is_empty(con->uri.query)) {
 		uwsgi_add_var(b, "QUERY_STRING", 12, con->uri.query->ptr, con->uri.query->used-1);
-        } else {
+	} else {
 		uwsgi_add_var(b, "QUERY_STRING", 12, "", 0);
-        }
+	}
 
 	s = get_http_version_name(con->request.http_version);
 	uwsgi_add_var(b, "SERVER_PROTOCOL", 15, (char *) s, strlen(s));
 
 
 	if (con->server_name->used) {
-                size_t len = con->server_name->used - 1;
-                char *colon = strchr(con->server_name->ptr, ':');
-                if (colon) len = colon - con->server_name->ptr;
+		size_t len = con->server_name->used - 1;
+		char *colon = strchr(con->server_name->ptr, ':');
+		if (colon) len = colon - con->server_name->ptr;
 		uwsgi_add_var(b, "SERVER_NAME", 11, con->server_name->ptr, len);
 
-        } else {
+	} else {
 #ifdef HAVE_IPV6
-                s = inet_ntop(srv_sock->addr.plain.sa_family,
-                              srv_sock->addr.plain.sa_family == AF_INET6 ?
-                              (const void *) &(srv_sock->addr.ipv6.sin6_addr) :
-                              (const void *) &(srv_sock->addr.ipv4.sin_addr),
-                              b2, sizeof(b2)-1);
+		s = inet_ntop(srv_sock->addr.plain.sa_family,
+				srv_sock->addr.plain.sa_family == AF_INET6 ?
+				(const void *) &(srv_sock->addr.ipv6.sin6_addr) :
+				(const void *) &(srv_sock->addr.ipv4.sin_addr),
+				b2, sizeof(b2)-1);
 #else
-                s = inet_ntoa(srv_sock->addr.ipv4.sin_addr);
+		s = inet_ntoa(srv_sock->addr.ipv4.sin_addr);
 #endif
 		uwsgi_add_var(b, "SERVER_NAME", 11, (char *)s, strlen(s));
-        }	
+	}
 
 	LI_ltostr(buf,
 #ifdef HAVE_IPV6
-               ntohs(srv_sock->addr.plain.sa_family ? srv_sock->addr.ipv6.sin6_port : srv_sock->addr.ipv4.sin_port)
+			ntohs(srv_sock->addr.plain.sa_family ? srv_sock->addr.ipv6.sin6_port : srv_sock->addr.ipv4.sin_port)
 #else
-               ntohs(srv_sock->addr.ipv4.sin_port)
+			ntohs(srv_sock->addr.ipv4.sin_port)
 #endif
-               );
+			);
 
 	uwsgi_add_var(b, "SERVER_PORT", 11, buf, strlen(buf));
 	uwsgi_add_var(b, "REQUEST_URI", 11, con->request.orig_uri->ptr, con->request.orig_uri->used-1);
 
 	LI_ltostr(buf,
 #ifdef HAVE_IPV6
-               ntohs(con->dst_addr.plain.sa_family ? con->dst_addr.ipv6.sin6_port : con->dst_addr.ipv4.sin_port)
+			ntohs(con->dst_addr.plain.sa_family ? con->dst_addr.ipv6.sin6_port : con->dst_addr.ipv4.sin_port)
 #else
-               ntohs(con->dst_addr.ipv4.sin_port)
+			ntohs(con->dst_addr.ipv4.sin_port)
 #endif
-               );	
+			);
 	uwsgi_add_var(b, "REMOTE_PORT", 11, buf, strlen(buf));
 
 	if (!buffer_is_empty(con->authed_user)) {
-                uwsgi_add_var(b, "REMOTE_USER", 11,
-                              CONST_BUF_LEN(con->authed_user));
-        }
+		uwsgi_add_var(b, "REMOTE_USER", 11,
+				CONST_BUF_LEN(con->authed_user));
+	}
 
 
 
@@ -503,11 +503,11 @@ static int uwsgi_create_env(server *srv, handler_ctx *hctx) {
 		}
 	}
 	else {
-		uwsgi_add_var(b, "SCRIPT_NAME", 11, "", 0) ;
-		uwsgi_add_var(b, "PATH_INFO", 9, con->uri.path->ptr, strlen(con->uri.path->ptr)) ;
+		uwsgi_add_var(b, "SCRIPT_NAME", 11, "", 0);
+		uwsgi_add_var(b, "PATH_INFO", 9, con->uri.path->ptr, strlen(con->uri.path->ptr));
 	}
-	
-	
+
+
 	for (i = 0; i < con->request.headers->used; i++) {
 		data_string *ds;
 		ds = (data_string *)con->request.headers->data[i];
@@ -524,7 +524,7 @@ static int uwsgi_create_env(server *srv, handler_ctx *hctx) {
 			}
 			for (j = 0; j < ds->key->used - 1; j++) {
 				srv->tmp_buf->ptr[srv->tmp_buf->used++] = light_isalpha(ds->key->ptr[j]) ? ds->key->ptr[j] & ~32 : '_';
-			}	
+			}
 			srv->tmp_buf->ptr[srv->tmp_buf->used++] = '\0';
 			uwsgi_add_var(b, srv->tmp_buf->ptr, srv->tmp_buf->used-1, ds->value->ptr, ds->value->used-1);
 		}
@@ -546,19 +546,19 @@ static int uwsgi_create_env(server *srv, handler_ctx *hctx) {
 		}
 	}
 
-	
-	uh = (uwsgi_header *) b->ptr ;
-	uh->modifier1 = (uint8_t) 0 ;
+
+	uh = (uwsgi_header *) b->ptr;
+	uh->modifier1 = (uint8_t) 0;
 #ifdef __BIG_ENDIAN__
-	uh->pktsize = uwsgi_swap16((uint16_t) b->used - 4) ;
+	uh->pktsize = uwsgi_swap16((uint16_t) b->used - 4);
 #else
-	uh->pktsize = b->used - 4 ;
+	uh->pktsize = b->used - 4;
 #endif
-	uh->modifier2 = (uint8_t) 0 ;
+	uh->modifier2 = (uint8_t) 0;
 
 	b->used++; /* fix size */
 
-	hctx->wb->bytes_in += b->used -1   ;
+	hctx->wb->bytes_in += b->used -1;
 	/* body */
 
 	if (con->request.content_length) {
@@ -576,37 +576,37 @@ static int uwsgi_create_env(server *srv, handler_ctx *hctx) {
 			 * */
 
 			switch (req_c->type) {
-			case FILE_CHUNK:
-				weHave = req_c->file.length - req_c->offset;
+				case FILE_CHUNK:
+					weHave = req_c->file.length - req_c->offset;
 
-				if (weHave > weWant) weHave = weWant;
+					if (weHave > weWant) weHave = weWant;
 
-				chunkqueue_append_file(hctx->wb, req_c->file.name, req_c->offset, weHave);
+					chunkqueue_append_file(hctx->wb, req_c->file.name, req_c->offset, weHave);
 
-				req_c->offset += weHave;
-				req_cq->bytes_out += weHave;
+					req_c->offset += weHave;
+					req_cq->bytes_out += weHave;
 
-				hctx->wb->bytes_in += weHave;
+					hctx->wb->bytes_in += weHave;
 
-				break;
-			case MEM_CHUNK:
-				/* append to the buffer */
-				weHave = req_c->mem->used - 1 - req_c->offset;
+					break;
+				case MEM_CHUNK:
+					/* append to the buffer */
+					weHave = req_c->mem->used - 1 - req_c->offset;
 
-				if (weHave > weWant) weHave = weWant;
+					if (weHave > weWant) weHave = weWant;
 
-				b = chunkqueue_get_append_buffer(hctx->wb);
-				buffer_append_memory(b, req_c->mem->ptr + req_c->offset, weHave);
-				b->used++; /* add virtual \0 */
+					b = chunkqueue_get_append_buffer(hctx->wb);
+					buffer_append_memory(b, req_c->mem->ptr + req_c->offset, weHave);
+					b->used++; /* add virtual \0 */
 
-				req_c->offset += weHave;
-				req_cq->bytes_out += weHave;
+					req_c->offset += weHave;
+					req_cq->bytes_out += weHave;
 
-				hctx->wb->bytes_in += weHave;
+					hctx->wb->bytes_in += weHave;
 
-				break;
-			default:
-				break;
+					break;
+				default:
+					break;
 			}
 
 			offset += weHave;
@@ -677,29 +677,29 @@ static int uwsgi_response_parse(server *srv, connection *con, plugin_data *p, bu
 		copy_header = 1;
 
 		switch(key_len) {
-		case 4:
-			if (0 == strncasecmp(key, "Date", key_len)) {
-				con->parsed_response |= HTTP_DATE;
-			}
-			break;
-		case 8:
-			if (0 == strncasecmp(key, "Location", key_len)) {
-				con->parsed_response |= HTTP_LOCATION;
-			}
-			break;
-		case 10:
-			if (0 == strncasecmp(key, "Connection", key_len)) {
-				copy_header = 0;
-			}
-			break;
-		case 14:
-			if (0 == strncasecmp(key, "Content-Length", key_len)) {
-				con->response.content_length = strtol(value, NULL, 10);
-				con->parsed_response |= HTTP_CONTENT_LENGTH;
-			}
-			break;
-		default:
-			break;
+			case 4:
+				if (0 == strncasecmp(key, "Date", key_len)) {
+					con->parsed_response |= HTTP_DATE;
+				}
+				break;
+			case 8:
+				if (0 == strncasecmp(key, "Location", key_len)) {
+					con->parsed_response |= HTTP_LOCATION;
+				}
+				break;
+			case 10:
+				if (0 == strncasecmp(key, "Connection", key_len)) {
+					copy_header = 0;
+				}
+				break;
+			case 14:
+				if (0 == strncasecmp(key, "Content-Length", key_len)) {
+					con->response.content_length = strtol(value, NULL, 10);
+					con->parsed_response |= HTTP_CONTENT_LENGTH;
+				}
+				break;
+			default:
+				break;
 		}
 
 		if (copy_header) {
@@ -737,7 +737,7 @@ static int uwsgi_demux_response(server *srv, handler_ctx *hctx) {
 
 	if (p->conf.debug) {
 		log_error_write(srv, __FILE__, __LINE__, "sd",
-			       "uwsgi - have to read:", b);
+				"uwsgi - have to read:", b);
 	}
 
 	if (b > 0) {
@@ -791,7 +791,7 @@ static int uwsgi_demux_response(server *srv, handler_ctx *hctx) {
 
 				/* enable chunked-transfer-encoding */
 				if (con->request.http_version == HTTP_VERSION_1_1 &&
-				    !(con->parsed_response & HTTP_CONTENT_LENGTH)) {
+						!(con->parsed_response & HTTP_CONTENT_LENGTH)) {
 					con->response.transfer_encoding = HTTP_TRANSFER_ENCODING_CHUNKED;
 				}
 
@@ -830,127 +830,127 @@ static handler_t uwsgi_write_request(server *srv, handler_ctx *hctx) {
 	int ret;
 
 	if (!host ||
-	    (!host->host->used || !host->port)) return -1;
+			(!host->host->used || !host->port)) return -1;
 
 	switch(hctx->state) {
-	case UWSGI_STATE_INIT:
+		case UWSGI_STATE_INIT:
 #if defined(HAVE_IPV6) && defined(HAVE_INET_PTON)
-		if (strstr(host->host->ptr,":")) {
-		    if (-1 == (hctx->fd = socket(AF_INET6, SOCK_STREAM, 0))) {
-			log_error_write(srv, __FILE__, __LINE__, "ss", "socket failed: ", strerror(errno));
-			return HANDLER_ERROR;
-		    }
-		} else
+			if (strstr(host->host->ptr,":")) {
+				if (-1 == (hctx->fd = socket(AF_INET6, SOCK_STREAM, 0))) {
+					log_error_write(srv, __FILE__, __LINE__, "ss", "socket failed: ", strerror(errno));
+					return HANDLER_ERROR;
+				}
+			} else
 #endif
-		{
-		    if (-1 == (hctx->fd = socket(AF_INET, SOCK_STREAM, 0))) {
-			log_error_write(srv, __FILE__, __LINE__, "ss", "socket failed: ", strerror(errno));
-			return HANDLER_ERROR;
-		    }
-		}
-		hctx->fde_ndx = -1;
+			{
+				if (-1 == (hctx->fd = socket(AF_INET, SOCK_STREAM, 0))) {
+					log_error_write(srv, __FILE__, __LINE__, "ss", "socket failed: ", strerror(errno));
+					return HANDLER_ERROR;
+				}
+			}
+			hctx->fde_ndx = -1;
 
-		srv->cur_fds++;
+			srv->cur_fds++;
 
-		fdevent_register(srv->ev, hctx->fd, uwsgi_handle_fdevent, hctx);
+			fdevent_register(srv->ev, hctx->fd, uwsgi_handle_fdevent, hctx);
 
-		if (-1 == fdevent_fcntl_set(srv->ev, hctx->fd)) {
-			log_error_write(srv, __FILE__, __LINE__, "ss", "fcntl failed: ", strerror(errno));
-
-			return HANDLER_ERROR;
-		}
-
-		/* fall through */
-
-	case UWSGI_STATE_CONNECT:
-		/* try to finish the connect() */
-		if (hctx->state == UWSGI_STATE_INIT) {
-			/* first round */
-			switch (uwsgi_establish_connection(srv, hctx)) {
-			case 1:
-				uwsgi_set_state(srv, hctx, UWSGI_STATE_CONNECT);
-
-				/* connection is in progress, wait for an event and call getsockopt() below */
-
-				fdevent_event_add(srv->ev, &(hctx->fde_ndx), hctx->fd, FDEVENT_OUT);
-
-				return HANDLER_WAIT_FOR_EVENT;
-			case -1:
-				/* if ECONNREFUSED choose another connection -> FIXME */
-				hctx->fde_ndx = -1;
+			if (-1 == fdevent_fcntl_set(srv->ev, hctx->fd)) {
+				log_error_write(srv, __FILE__, __LINE__, "ss", "fcntl failed: ", strerror(errno));
 
 				return HANDLER_ERROR;
-			default:
-				/* everything is ok, go on */
-				break;
 			}
-		} else {
-			int socket_error;
-			socklen_t socket_error_len = sizeof(socket_error);
 
-			/* we don't need it anymore */
-			fdevent_event_del(srv->ev, &(hctx->fde_ndx), hctx->fd);
+			/* fall through */
 
+		case UWSGI_STATE_CONNECT:
 			/* try to finish the connect() */
-			if (0 != getsockopt(hctx->fd, SOL_SOCKET, SO_ERROR, &socket_error, &socket_error_len)) {
-				log_error_write(srv, __FILE__, __LINE__, "ss",
-						"getsockopt failed:", strerror(errno));
+			if (hctx->state == UWSGI_STATE_INIT) {
+				/* first round */
+				switch (uwsgi_establish_connection(srv, hctx)) {
+					case 1:
+						uwsgi_set_state(srv, hctx, UWSGI_STATE_CONNECT);
 
-				return HANDLER_ERROR;
+						/* connection is in progress, wait for an event and call getsockopt() below */
+
+						fdevent_event_add(srv->ev, &(hctx->fde_ndx), hctx->fd, FDEVENT_OUT);
+
+						return HANDLER_WAIT_FOR_EVENT;
+					case -1:
+						/* if ECONNREFUSED choose another connection -> FIXME */
+						hctx->fde_ndx = -1;
+
+						return HANDLER_ERROR;
+					default:
+						/* everything is ok, go on */
+						break;
+				}
+			} else {
+				int socket_error;
+				socklen_t socket_error_len = sizeof(socket_error);
+
+				/* we don't need it anymore */
+				fdevent_event_del(srv->ev, &(hctx->fde_ndx), hctx->fd);
+
+				/* try to finish the connect() */
+				if (0 != getsockopt(hctx->fd, SOL_SOCKET, SO_ERROR, &socket_error, &socket_error_len)) {
+					log_error_write(srv, __FILE__, __LINE__, "ss",
+							"getsockopt failed:", strerror(errno));
+
+					return HANDLER_ERROR;
+				}
+				if (socket_error != 0) {
+					log_error_write(srv, __FILE__, __LINE__, "ss",
+							"establishing connection failed:", strerror(socket_error),
+							"port:", hctx->host->port);
+
+					return HANDLER_ERROR;
+				}
+				if (p->conf.debug) {
+					log_error_write(srv, __FILE__, __LINE__,  "s", "uwsgi - connect - delayed success");
+				}
 			}
-			if (socket_error != 0) {
-				log_error_write(srv, __FILE__, __LINE__, "ss",
-						"establishing connection failed:", strerror(socket_error),
-						"port:", hctx->host->port);
 
-				return HANDLER_ERROR;
-			}
-			if (p->conf.debug) {
-				log_error_write(srv, __FILE__, __LINE__,  "s", "uwsgi - connect - delayed success");
-			}
-		}
+			uwsgi_set_state(srv, hctx, UWSGI_STATE_PREPARE_WRITE);
+			/* fall through */
+		case UWSGI_STATE_PREPARE_WRITE:
+			uwsgi_create_env(srv, hctx);
 
-		uwsgi_set_state(srv, hctx, UWSGI_STATE_PREPARE_WRITE);
-		/* fall through */
-	case UWSGI_STATE_PREPARE_WRITE:
-		uwsgi_create_env(srv, hctx);
+			uwsgi_set_state(srv, hctx, UWSGI_STATE_WRITE);
 
-		uwsgi_set_state(srv, hctx, UWSGI_STATE_WRITE);
+			/* fall through */
+		case UWSGI_STATE_WRITE:;
+							   ret = srv->network_backend_write(srv, con, hctx->fd, hctx->wb);
 
-		/* fall through */
-	case UWSGI_STATE_WRITE:;
-		ret = srv->network_backend_write(srv, con, hctx->fd, hctx->wb);
+							   chunkqueue_remove_finished_chunks(hctx->wb);
 
-		chunkqueue_remove_finished_chunks(hctx->wb);
+							   if (-1 == ret) { /* error on our side */
+								   log_error_write(srv, __FILE__, __LINE__, "ssd", "write failed:", strerror(errno), errno);
 
-		if (-1 == ret) { /* error on our side */
-			log_error_write(srv, __FILE__, __LINE__, "ssd", "write failed:", strerror(errno), errno);
+								   return HANDLER_WAIT_FOR_EVENT;
+							   } else if (-2 == ret) { /* remote close */
+								   log_error_write(srv, __FILE__, __LINE__, "ssd", "write failed, remote connection close:", strerror(errno), errno);
 
-			return HANDLER_WAIT_FOR_EVENT;
-		} else if (-2 == ret) { /* remote close */
-			log_error_write(srv, __FILE__, __LINE__, "ssd", "write failed, remote connection close:", strerror(errno), errno);
+								   return HANDLER_WAIT_FOR_EVENT;
+							   }
 
-			return HANDLER_WAIT_FOR_EVENT;
-		}
+							   if (hctx->wb->bytes_out == hctx->wb->bytes_in) {
+								   uwsgi_set_state(srv, hctx, UWSGI_STATE_READ);
 
-		if (hctx->wb->bytes_out == hctx->wb->bytes_in) {
-			uwsgi_set_state(srv, hctx, UWSGI_STATE_READ);
+								   fdevent_event_del(srv->ev, &(hctx->fde_ndx), hctx->fd);
+								   fdevent_event_add(srv->ev, &(hctx->fde_ndx), hctx->fd, FDEVENT_IN);
+							   } else {
+								   fdevent_event_add(srv->ev, &(hctx->fde_ndx), hctx->fd, FDEVENT_OUT);
 
-			fdevent_event_del(srv->ev, &(hctx->fde_ndx), hctx->fd);
-			fdevent_event_add(srv->ev, &(hctx->fde_ndx), hctx->fd, FDEVENT_IN);
-		} else {
-			fdevent_event_add(srv->ev, &(hctx->fde_ndx), hctx->fd, FDEVENT_OUT);
+								   return HANDLER_WAIT_FOR_EVENT;
+							   }
 
-			return HANDLER_WAIT_FOR_EVENT;
-		}
-
-		return HANDLER_WAIT_FOR_EVENT;
-	case UWSGI_STATE_READ:
-		/* waiting for a response */
-		return HANDLER_WAIT_FOR_EVENT;
-	default:
-		log_error_write(srv, __FILE__, __LINE__, "s", "(debug) unknown state");
-		return HANDLER_ERROR;
+							   return HANDLER_WAIT_FOR_EVENT;
+		case UWSGI_STATE_READ:
+							   /* waiting for a response */
+							   return HANDLER_WAIT_FOR_EVENT;
+		default:
+							   log_error_write(srv, __FILE__, __LINE__, "s", "(debug) unknown state");
+							   return HANDLER_ERROR;
 	}
 
 	return HANDLER_GO_ON;
@@ -1006,36 +1006,36 @@ SUBREQUEST_FUNC(mod_uwsgi_handle_subrequest) {
 
 	/* ok, create the request */
 	switch(uwsgi_write_request(srv, hctx)) {
-	case HANDLER_ERROR:
-		log_error_write(srv, __FILE__, __LINE__,  "sbdd", "uwsgi-server disabled:",
-				host->host,
-				host->port,
-				hctx->fd);
+		case HANDLER_ERROR:
+			log_error_write(srv, __FILE__, __LINE__,  "sbdd", "uwsgi-server disabled:",
+					host->host,
+					host->port,
+					hctx->fd);
 
-		/* disable this server */
-		host->is_disabled = 1;
-		host->disable_ts = srv->cur_ts;
+			/* disable this server */
+			host->is_disabled = 1;
+			host->disable_ts = srv->cur_ts;
 
-		uwsgi_connection_close(srv, hctx);
+			uwsgi_connection_close(srv, hctx);
 
-		/* reset the enviroment and restart the sub-request */
-		buffer_reset(con->physical.path);
-		con->mode = DIRECT;
+			/* reset the enviroment and restart the sub-request */
+			buffer_reset(con->physical.path);
+			con->mode = DIRECT;
 
-		joblist_append(srv, con);
+			joblist_append(srv, con);
 
-		/* mis-using HANDLER_WAIT_FOR_FD to break out of the loop
-		 * and hope that the childs will be restarted
-		 *
-		 */
+			/* mis-using HANDLER_WAIT_FOR_FD to break out of the loop
+			 * and hope that the childs will be restarted
+			 *
+			 */
 
-		return HANDLER_WAIT_FOR_FD;
-	case HANDLER_WAIT_FOR_EVENT:
-		return HANDLER_WAIT_FOR_EVENT;
-	case HANDLER_WAIT_FOR_FD:
-		return HANDLER_WAIT_FOR_FD;
-	default:
-		break;
+			return HANDLER_WAIT_FOR_FD;
+		case HANDLER_WAIT_FOR_EVENT:
+			return HANDLER_WAIT_FOR_EVENT;
+		case HANDLER_WAIT_FOR_FD:
+			return HANDLER_WAIT_FOR_FD;
+		default:
+			break;
 	}
 
 	if (con->file_started == 1) {
@@ -1053,7 +1053,7 @@ static handler_t uwsgi_handle_fdevent(void *s, void *ctx, int revents) {
 
 
 	if ((revents & FDEVENT_IN) &&
-	    hctx->state == UWSGI_STATE_READ) {
+			hctx->state == UWSGI_STATE_READ) {
 
 		if (p->conf.debug) {
 			log_error_write(srv, __FILE__, __LINE__, "sd",
@@ -1061,29 +1061,29 @@ static handler_t uwsgi_handle_fdevent(void *s, void *ctx, int revents) {
 		}
 
 		switch (uwsgi_demux_response(srv, hctx)) {
-		case 0:
-			break;
-		case 1:
-			hctx->host->usage--;
+			case 0:
+				break;
+			case 1:
+				hctx->host->usage--;
 
-			/* we are done */
-			uwsgi_connection_close(srv, hctx);
+				/* we are done */
+				uwsgi_connection_close(srv, hctx);
 
-			joblist_append(srv, con);
-			return HANDLER_FINISHED;
-		case -1:
-			if (con->file_started == 0) {
-				/* nothing has been send out yet, send a 500 */
-				connection_set_state(srv, con, CON_STATE_HANDLE_REQUEST);
-				con->http_status = 500;
-				con->mode = DIRECT;
-			} else {
-				/* response might have been already started, kill the connection */
-				connection_set_state(srv, con, CON_STATE_ERROR);
-			}
+				joblist_append(srv, con);
+				return HANDLER_FINISHED;
+			case -1:
+				if (con->file_started == 0) {
+					/* nothing has been send out yet, send a 500 */
+					connection_set_state(srv, con, CON_STATE_HANDLE_REQUEST);
+					con->http_status = 500;
+					con->mode = DIRECT;
+				} else {
+					/* response might have been already started, kill the connection */
+					connection_set_state(srv, con, CON_STATE_ERROR);
+				}
 
-			joblist_append(srv, con);
-			return HANDLER_FINISHED;
+				joblist_append(srv, con);
+				return HANDLER_FINISHED;
 		}
 	}
 
@@ -1094,7 +1094,7 @@ static handler_t uwsgi_handle_fdevent(void *s, void *ctx, int revents) {
 		}
 
 		if (hctx->state == UWSGI_STATE_CONNECT ||
-		    hctx->state == UWSGI_STATE_WRITE) {
+				hctx->state == UWSGI_STATE_WRITE) {
 			/* we are allowed to send something out
 			 *
 			 * 1. in a unfinished connect() call
@@ -1195,7 +1195,7 @@ static handler_t mod_uwsgi_check_extension(server *srv, connection *con, void *p
 		/* check extension in the form "/uwsgi_pattern" */
 		if (*(ext->key->ptr) == '/') {
 			if (strncmp(fn->ptr, ext->key->ptr, ct_len) == 0) {
-				path_info_offset = ct_len ;
+				path_info_offset = ct_len;
 				extension = ext;
 				break;
 			}
@@ -1320,7 +1320,7 @@ TRIGGER_FUNC(mod_uwsgi_trigger) {
 					data_uwsgi *host = (data_uwsgi *)extension->value->data[n];
 
 					if (!host->is_disabled ||
-					    srv->cur_ts - host->disable_ts < 5) continue;
+							srv->cur_ts - host->disable_ts < 5) continue;
 
 					log_error_write(srv, __FILE__, __LINE__,  "sbd",
 							"uwsgi - re-enabled:",

lock.c

@@ -0,0 +1,199 @@
+#include "uwsgi.h"
+
+
+#ifdef UWSGI_LOCK_USE_MUTEX
+
+#define UWSGI_LOCK_SIZE	sizeof(pthread_mutexattr_t) + sizeof(pthread_mutex_t)
+#define UWSGI_RWLOCK_SIZE	sizeof(pthread_rwlockattr_t) + sizeof(pthread_rwlock_t)
+
+// REMEMBER lock must contains space for both pthread_mutex_t and pthread_mutexattr_t !!! 
+void uwsgi_lock_init(void *lock) {
+
+	if (pthread_mutexattr_init((pthread_mutexattr_t *) lock)) {
+        	uwsgi_log("unable to allocate mutexattr structure\n");
+                exit(1);
+	}
+        if (pthread_mutexattr_setpshared((pthread_mutexattr_t *) lock, PTHREAD_PROCESS_SHARED)) {
+        	uwsgi_log("unable to share mutex\n");
+                exit(1);
+        }
+
+        if (pthread_mutex_init((pthread_mutex_t *) lock + sizeof(pthread_mutexattr_t), (pthread_mutexattr_t *) lock)) {
+        	uwsgi_log("unable to initialize mutex\n");
+                exit(1);
+        }
+
+
+}
+
+void uwsgi_rlock(void *lock) {
+	pthread_rwlock_rdlock((pthread_rwlock_t *) lock + sizeof(pthread_rwlockattr_t));
+}
+
+void uwsgi_wlock(void *lock) {
+	pthread_rwlock_wrlock((pthread_rwlock_t *) lock + sizeof(pthread_rwlockattr_t));
+}
+
+void uwsgi_rwunlock(void *lock) {
+	pthread_rwlock_unlock((pthread_rwlock_t *) lock + sizeof(pthread_rwlockattr_t));
+}
+
+void uwsgi_lock(void *lock) {
+
+	pthread_mutex_lock((pthread_mutex_t *) lock + sizeof(pthread_mutexattr_t));
+}
+
+void uwsgi_unlock(void *lock) {
+
+	pthread_mutex_unlock((pthread_mutex_t *) lock + sizeof(pthread_mutexattr_t));
+}
+
+void uwsgi_rwlock_init(void *lock) {
+
+        if (pthread_rwlockattr_init((pthread_rwlockattr_t *) lock)) {
+                uwsgi_log("unable to allocate rwlock structure\n");
+                exit(1);
+        }
+        if (pthread_rwlockattr_setpshared((pthread_rwlockattr_t *) lock, PTHREAD_PROCESS_SHARED)) {
+                uwsgi_log("unable to share rwlock\n");
+                exit(1);
+        }
+
+        if (pthread_rwlock_init((pthread_rwlock_t *) lock + sizeof(pthread_rwlockattr_t), (pthread_rwlockattr_t *) lock)) {
+                uwsgi_log("unable to initialize rwlock\n");
+                exit(1);
+        }
+
+
+}
+
+
+
+#endif
+
+#ifdef UWSGI_LOCK_USE_UMTX
+
+#include <machine/atomic.h>
+#include <sys/umtx.h>
+
+#define UWSGI_LOCK_SIZE		sizeof(struct umtx)
+#define UWSGI_RWLOCK_SIZE	sizeof(struct umtx)
+
+void uwsgi_rwlock_init(void *lock) { uwsgi_lock_init(lock) ;}
+void uwsgi_rlock(void *lock) { uwsgi_lock(lock);}
+void uwsgi_wlock(void *lock) { uwsgi_lock(lock);}
+void uwsgi_rwunlock(void *lock) { uwsgi_unlock(lock); }
+
+void uwsgi_lock_init(void *lock) {
+	umtx_init((struct umtx*) lock);
+}
+
+void uwsgi_lock(void *lock) {
+	umtx_lock(lock, 1);
+}
+
+void uwsgi_unlock(void *lock) {
+	umtx_unlock(lock, 1);
+}
+
+#endif
+
+
+#ifdef UWSGI_LOCK_USE_OSX_SPINLOCK
+
+#define UWSGI_LOCK_SIZE		sizeof(OSSpinLock)
+#define UWSGI_RWLOCK_SIZE	sizeof(OSSpinLock)
+
+
+void uwsgi_lock_init(void *lock) {
+
+	memset(lock, 0, sizeof(OSSpinLock));
+}
+
+void uwsgi_lock(void *lock) {
+
+	OSSpinLockLock((OSSpinLock *) lock);
+}
+
+void uwsgi_unlock(void *lock) {
+
+	OSSpinLockUnlock((OSSpinLock *) lock);
+}
+
+void uwsgi_rwlock_init(void *lock) { uwsgi_lock_init(lock) ;}
+void uwsgi_rlock(void *lock) { uwsgi_lock(lock);}
+void uwsgi_wlock(void *lock) { uwsgi_lock(lock);}
+void uwsgi_rwunlock(void *lock) { uwsgi_unlock(lock); }
+
+
+#endif
+
+
+#ifdef UWSGI_LOCK_USE_FLOCK
+
+#define UWSGI_LOCK_SIZE 8
+#define UWSGI_RWLOCK_SIZE 8
+
+static int lock_counter = 0;
+
+void uwsgi_lock_init(void *lock) {
+
+	char filename[17];
+
+	if (snprintf(filename, 17, ".uwsgiflock%d", lock_counter) < 0) {
+		uwsgi_log("unable to create lock %d\n", lock_counter);
+	}
+	
+	int fd = open(filename, O_CREAT|O_RDWR|O_TRUNC);
+	if (fd < 0) {
+		uwsgi_error("open()");
+		exit(1);
+	}
+
+	memcpy(lock, &fd, sizeof(int));
+}
+
+void uwsgi_lock(void *lock) {
+
+	int fd;
+	memcpy(&fd, lock, sizeof(int));
+	if (flock(fd, LOCK_EX)) { uwsgi_error("flock()"); }
+}
+
+void uwsgi_unlock(void *lock) {
+	int fd;
+	memcpy(&fd, lock, sizeof(int));
+	if (flock(fd, LOCK_UN)) { uwsgi_error("flock()"); }
+}
+
+void uwsgi_rwlock_init(void *lock) { uwsgi_lock_init(lock) ;}
+void uwsgi_rlock(void *lock) { uwsgi_lock(lock);}
+void uwsgi_wlock(void *lock) { uwsgi_lock(lock);}
+void uwsgi_rwunlock(void *lock) { uwsgi_unlock(lock); }
+
+#endif
+
+
+void *uwsgi_mmap_shared_lock() {
+	void *addr = NULL;
+	addr = mmap(NULL, UWSGI_LOCK_SIZE, PROT_READ | PROT_WRITE, MAP_SHARED | MAP_ANON, -1, 0);
+
+	if (addr == NULL) {
+		uwsgi_error("mmap()");
+		exit(1);
+	}
+
+	return addr;
+}
+
+void *uwsgi_mmap_shared_rwlock() {
+	void *addr = NULL;
+	addr = mmap(NULL, UWSGI_RWLOCK_SIZE, PROT_READ | PROT_WRITE, MAP_SHARED | MAP_ANON, -1, 0);
+
+	if (addr == NULL) {
+		uwsgi_error("mmap()");
+		exit(1);
+	}
+
+	return addr;
+}

logging.c

@@ -1,3 +1,4 @@
+#define _NO_UWSGI_RB
 #include "uwsgi.h"
 
 #if defined(__FreeBSD__) || defined(__NetBSD__) || defined(__DragonFly__) || defined(__OpenBSD__)
@@ -31,21 +32,29 @@ void log_request(struct wsgi_request *wsgi_req) {
 	char mempkt[4096];
 	char logpkt[4096];
 
-	struct iovec logvec[4] ;
-	int logvecpos = 0 ;
+	struct iovec logvec[4];
+	int logvecpos = 0;
+
+	const char *msecs = "msecs";
+	const char *micros = "micros";
+
+	long int rt;
+	char *tsize = (char *) msecs;
 
 #ifdef UWSGI_SENDFILE
 	char *msg1 = " via sendfile() ";
+#endif
 
 	struct uwsgi_app *wi;
 
 	if (wsgi_req->app_id >= 0) {
-		wi = &uwsgi.wsgi_apps[wsgi_req->app_id];
+		wi = &uwsgi.apps[wsgi_req->app_id];
 		if (wi->requests > 0) {
 			app_req = wi->requests;
 		}
 	}
 
+#ifdef UWSGI_SENDFILE
 	if (wsgi_req->sendfile_fd > -1 && wsgi_req->sendfile_obj == wsgi_req->async_result) { //wsgi_req->sendfile_fd_size > 0 ) {
 		via = msg1;
 	}
@@ -55,61 +64,67 @@ void log_request(struct wsgi_request *wsgi_req) {
 	microseconds = wsgi_req->end_of_request.tv_sec * 1000000 + wsgi_req->end_of_request.tv_usec;
 	microseconds2 = wsgi_req->start_of_request.tv_sec * 1000000 + wsgi_req->start_of_request.tv_usec;
 
-	if (uwsgi.vhost) {
-		logvec[logvecpos].iov_base = wsgi_req->host ;
-                logvec[logvecpos].iov_len = wsgi_req->host_len ;
-                logvecpos++;
+	rt = (long int) (microseconds - microseconds2);
 
-		logvec[logvecpos].iov_base = " " ;
-                logvec[logvecpos].iov_len = 1 ;
-                logvecpos++;
+	if (uwsgi.log_micros) {
+		tsize = (char *) micros;
+	}
+	else {
+		rt /= 1000;
+	}
+
+	if (uwsgi.vhost) {
+		logvec[logvecpos].iov_base = wsgi_req->host;
+		logvec[logvecpos].iov_len = wsgi_req->host_len;
+		logvecpos++;
+
+		logvec[logvecpos].iov_base = " ";
+		logvec[logvecpos].iov_len = 1;
+		logvecpos++;
 	}
 
 	if (uwsgi.shared->options[UWSGI_OPTION_MEMORY_DEBUG] == 1) {
 #ifndef UNBIT
 		rlen = snprintf(mempkt, 4096, "{address space usage: %lld bytes/%lluMB} {rss usage: %llu bytes/%lluMB} ",
-			(unsigned long long) uwsgi.workers[uwsgi.mywid].vsz_size, (unsigned long long ) uwsgi.workers[uwsgi.mywid].vsz_size / 1024 / 1024,
-			(unsigned long long) uwsgi.workers[uwsgi.mywid].rss_size, (unsigned long long ) uwsgi.workers[uwsgi.mywid].rss_size / 1024 / 1024);
+				(unsigned long long) uwsgi.workers[uwsgi.mywid].vsz_size, (unsigned long long ) uwsgi.workers[uwsgi.mywid].vsz_size / 1024 / 1024,
+				(unsigned long long) uwsgi.workers[uwsgi.mywid].rss_size, (unsigned long long ) uwsgi.workers[uwsgi.mywid].rss_size / 1024 / 1024);
 #else
 		rlen = snprintf(mempkt, 4096, "{address space usage: %lld bytes/%lluMB} ",
-			(unsigned long long) uwsgi.workers[uwsgi.mywid].vsz_size, (unsigned long long) uwsgi.workers[uwsgi.mywid].vsz_size / 1024 / 1024);
+				(unsigned long long) uwsgi.workers[uwsgi.mywid].vsz_size, (unsigned long long) uwsgi.workers[uwsgi.mywid].vsz_size / 1024 / 1024);
 #endif
 
-	
-		logvec[logvecpos].iov_base = mempkt ;
-		logvec[logvecpos].iov_len = rlen ;
+		logvec[logvecpos].iov_base = mempkt;
+		logvec[logvecpos].iov_len = rlen;
 		logvecpos++;
 
-
 	}
 
-	rlen = snprintf(logpkt, 4096, "[pid: %d|app: %d|req: %d/%llu] %.*s (%.*s) {%d vars in %d bytes} [%.*s] %.*s %.*s => generated %llu bytes in %ld msecs%s(%.*s %d) %d headers in %d bytes (%d async switches on async core %d)\n",
-		(int) uwsgi.mypid,
-		wsgi_req->app_id,
-		app_req,
-		(unsigned long long ) uwsgi.workers[0].requests,
-		wsgi_req->remote_addr_len, wsgi_req->remote_addr,
-		wsgi_req->remote_user_len, wsgi_req->remote_user,
-		wsgi_req->var_cnt,
-		wsgi_req->uh.pktsize,
-		24, time_request,
-		wsgi_req->method_len, wsgi_req->method,
-		wsgi_req->uri_len, wsgi_req->uri,
-		(unsigned long long) wsgi_req->response_size,
-		(long int) (microseconds - microseconds2) / 1000,
-		via,
-		wsgi_req->protocol_len, wsgi_req->protocol,
-		wsgi_req->status,
-		wsgi_req->header_cnt,
-		wsgi_req->headers_size, 
-		wsgi_req->async_switches, wsgi_req->async_id);
+	rlen = snprintf(logpkt, 4096, "[pid: %d|app: %d|req: %d/%llu] %.*s (%.*s) {%d vars in %d bytes} [%.*s] %.*s %.*s => generated %llu bytes in %ld %s%s(%.*s %d) %d headers in %llu bytes (%d switches on core %d)\n",
+			(int) uwsgi.mypid,
+			wsgi_req->app_id,
+			app_req,
+			(unsigned long long ) uwsgi.workers[0].requests,
+			wsgi_req->remote_addr_len, wsgi_req->remote_addr,
+			wsgi_req->remote_user_len, wsgi_req->remote_user,
+			wsgi_req->var_cnt,
+			wsgi_req->uh.pktsize,
+			24, time_request,
+			wsgi_req->method_len, wsgi_req->method,
+			wsgi_req->uri_len, wsgi_req->uri,
+			(unsigned long long) wsgi_req->response_size,
+			rt, tsize,
+			via,
+			wsgi_req->protocol_len, wsgi_req->protocol,
+			wsgi_req->status,
+			wsgi_req->header_cnt,
+			(unsigned long long) wsgi_req->headers_size,
+			wsgi_req->switches, wsgi_req->async_id);
 
-	logvec[logvecpos].iov_base = logpkt ;
-	logvec[logvecpos].iov_len = rlen ;
+	logvec[logvecpos].iov_base = logpkt;
+	logvec[logvecpos].iov_len = rlen;
 
 	// do not check for errors
 	rlen = writev(2, logvec, logvecpos+1);
-
 }
 
 void get_memusage() {
@@ -130,18 +145,18 @@ void get_memusage() {
 	uwsgi.workers[uwsgi.mywid].rss_size = uwsgi.workers[uwsgi.mywid].rss_size * uwsgi.page_size;
 #elif defined (__sun__)
 	psinfo_t info;
-	int procfd ;
+	int procfd;
 
 	procfd = open("/proc/self/psinfo", O_RDONLY);
 	if (procfd >= 0) {
 		if ( read(procfd, (char *) &info, sizeof(info)) > 0) {
-			uwsgi.workers[uwsgi.mywid].rss_size = (uint64_t) info.pr_rssize * 1024 ;
-			uwsgi.workers[uwsgi.mywid].vsz_size = (uint64_t) info.pr_size * 1024 ;
+			uwsgi.workers[uwsgi.mywid].rss_size = (uint64_t) info.pr_rssize * 1024;
+			uwsgi.workers[uwsgi.mywid].vsz_size = (uint64_t) info.pr_size * 1024;
 		}
 		close(procfd);
 	}
-	
-#elif defined( __APPLE__)
+
+#elif defined(__APPLE__)
 	/* darwin documentation says that the value are in pages, but they are bytes !!! */
 	struct task_basic_info t_info;
 	mach_msg_type_number_t t_size = sizeof(struct task_basic_info);
@@ -166,7 +181,7 @@ void get_memusage() {
 		}
 #elif defined(__NetBSD__) || defined(__OpenBSD__)
 		struct kinfo_proc2 *kproc2;
-		
+
 		kproc2 = kvm_getproc2(kv, KERN_PROC_PID, uwsgi.mypid, sizeof(struct kinfo_proc2), &cnt);
 		if (kproc2 && cnt > 0) {
 #ifdef __OpenBSD__
@@ -183,9 +198,9 @@ void get_memusage() {
 #elif defined(__HAIKU__)
 	area_info ai;
 	int32 cookie;
-	
-	uwsgi.workers[uwsgi.mywid].vsz_size = 0 ;
-	uwsgi.workers[uwsgi.mywid].rss_size = 0 ;
+
+	uwsgi.workers[uwsgi.mywid].vsz_size = 0;
+	uwsgi.workers[uwsgi.mywid].rss_size = 0;
 	while(get_next_area_info(0, &cookie, &ai) == B_OK) {
 		uwsgi.workers[uwsgi.mywid].vsz_size += ai.ram_size;
 		if ( (ai.protection & B_WRITE_AREA) != 0) {

loop.c

@@ -0,0 +1,192 @@
+#include "uwsgi.h"
+
+extern struct uwsgi_server uwsgi;
+
+struct wsgi_request* threaded_current_wsgi_req() { return pthread_getspecific(uwsgi.tur_key); }
+struct wsgi_request* simple_current_wsgi_req() { return uwsgi.wsgi_req; }
+
+
+void uwsgi_register_loop(char *name, void *loop) {
+	
+	if (uwsgi.loops_cnt >= MAX_LOOPS) {
+		uwsgi_log("you can define %d loops at max\n", MAX_LOOPS);
+		exit(1);
+	}
+
+	uwsgi.loops[uwsgi.loops_cnt].name = name;
+	uwsgi.loops[uwsgi.loops_cnt].loop = loop;
+	uwsgi.loops_cnt++;
+}
+
+void *uwsgi_get_loop(char *name) {
+
+	int i;
+	
+	for(i=0;i<uwsgi.loops_cnt;i++) {
+		if (!strcmp(name, uwsgi.loops[i].name)) {
+			return uwsgi.loops[i].loop;
+		}
+	}
+
+	return NULL;
+}
+
+void *simple_loop(void *arg1) {
+
+	long core_id = (long) arg1;
+
+	struct wsgi_request *wsgi_req = uwsgi.wsgi_requests[core_id];
+	int i;
+
+#ifdef UWSGI_THREADING
+	//PyThreadState *pts;
+	sigset_t smask;
+
+	if (uwsgi.threads > 1) {
+
+		pthread_setspecific(uwsgi.tur_key, (void *) wsgi_req);
+
+		if (core_id > 0) {
+			// block all signals on new threads
+			sigfillset(&smask);
+			pthread_sigmask(SIG_BLOCK, &smask, NULL);
+			for(i=0;i<0xFF;i++) {
+				if (uwsgi.p[i]->init_thread) {
+					uwsgi.p[i]->init_thread(core_id);
+				}
+			}
+			/*
+			   pts = PyThreadState_New(uwsgi.main_thread->interp);
+			   pthread_setspecific(uwsgi.ut_save_key, (void *) pts);
+			   */
+		}
+	}
+#endif
+
+	while (uwsgi.workers[uwsgi.mywid].manage_next_request) {
+
+
+		UWSGI_CLEAR_STATUS;
+
+
+		wsgi_req_setup(wsgi_req, core_id);
+
+		if (wsgi_req_accept(wsgi_req)) {
+			continue;
+		}
+
+		if (wsgi_req_recv(wsgi_req)) {
+			continue;
+		}
+
+		uwsgi_close_request(wsgi_req);
+	}
+
+	pthread_exit(NULL);
+	
+	//never here
+	return NULL;
+}
+
+#ifdef UWSGI_ASYNC
+void complex_loop() {
+	int current_async_timeout = 0;
+	int i, j;
+	int interesting_fd;
+
+	struct wsgi_request *wsgi_req;
+
+	while (uwsgi.workers[uwsgi.mywid].manage_next_request) {
+
+		current_async_timeout = async_get_timeout();
+
+		uwsgi.async_nevents = event_queue_wait_multi(uwsgi.async_queue, current_async_timeout, uwsgi.async_events, 64);
+		async_expire_timeouts();
+
+		if (uwsgi.async_nevents < 0) {
+			continue;
+		}
+
+
+		
+		for(i=0; i<uwsgi.async_nevents;i++) {
+
+			interesting_fd = event_queue_interesting_fd(uwsgi.async_events, i);
+
+			if ( interesting_fd == uwsgi.sockets[0].fd) {
+
+				uwsgi.wsgi_req = find_first_available_wsgi_req();
+				if (uwsgi.wsgi_req == NULL) {
+					// async system is full !!!
+					goto cycle;
+				}
+
+				wsgi_req_setup(uwsgi.wsgi_req, uwsgi.wsgi_req->async_id );
+
+                                if (wsgi_req_simple_accept(uwsgi.wsgi_req, interesting_fd)) {
+                                        continue;
+                                }
+
+// on linux we do not need to reset the socket to blocking state
+#ifndef __linux__
+                                if (uwsgi.numproc > 1) {
+                                        /* re-set blocking socket */
+                                        if (fcntl(uwsgi.wsgi_req->poll.fd, F_SETFL, uwsgi.sockets[0].arg) < 0) {
+                                                uwsgi_error("fcntl()");
+						continue;
+                                        }
+                                }
+#endif
+
+				if (wsgi_req_recv(uwsgi.wsgi_req)) {
+					continue;
+				}
+
+				if (uwsgi.wsgi_req->async_status == UWSGI_OK) {
+					goto reqclear;
+				}
+
+			}
+			else if (  interesting_fd == uwsgi.sockets_poll[uwsgi.sockets_cnt].fd) {
+				// wake up cores waiting for signal
+				char byte;
+				if (read(uwsgi.sockets_poll[uwsgi.sockets_cnt].fd, &byte, 1) == 1) {
+				}
+				else {
+					uwsgi_error("read()");
+				}
+				for(j=0;j<uwsgi.async_current_max;j++) {
+                			wsgi_req = uwsgi.wsgi_requests[j] ;
+                			if (wsgi_req->sigwait) {
+						wsgi_req->signal_received = byte;
+						wsgi_req->sigwait = 0;
+					}
+				}
+			}
+			else {
+				uwsgi.wsgi_req = find_wsgi_req_by_fd(interesting_fd);
+				if (uwsgi.wsgi_req) {
+					uwsgi.wsgi_req->async_status = UWSGI_AGAIN;
+					uwsgi.wsgi_req->async_waiting_fd = -1;
+					uwsgi.wsgi_req->async_waiting_fd_monitored = 0;
+					uwsgi.wsgi_req->async_timeout = 0;
+				}
+
+				event_queue_del_fd(uwsgi.async_queue, interesting_fd);
+			}
+		}
+
+cycle:
+
+		uwsgi.wsgi_req = async_loop();
+
+		if (uwsgi.wsgi_req == NULL)
+			continue;
+		uwsgi.wsgi_req->async_status = UWSGI_OK;
+
+reqclear:
+		uwsgi_close_request(uwsgi.wsgi_req);
+
+	}
+}
+#endif

multi.ini

@@ -0,0 +1,13 @@
+[uwsgi]
+socket = :3033
+socket = :3034
+vacuum = true
+socket = pippo1.sock
+socket = pippo2.sock
+socket = 127.0.0.1:1717
+memory-report = true
+master = true
+processes = 10
+mount = /app1=werkzeug.testapp:test_app
+mount = /app2=config:/Users/roberta/uwsgi/my.ini
+mount = /app3=pinaxsite/deploy/pinax.wsgi

multi.xml

@@ -0,0 +1,50 @@
+<uwsgi>
+
+	<plugins>rack</plugins>
+
+	<http>:9090</http>
+
+	<socket>:3031</socket>
+	<socket>127.0.0.1:3032</socket>
+
+	<manage-script-name/>
+	
+	<master/>
+	<processes>8</processes>
+
+<!--
+	<vhost/>
+	<vhost-host/>
+-->
+
+	<env>TRAC_ENV=utrac</env>
+
+
+	<app mountpoint="/">
+		<module>werkzeug.testapp:test_app</module>
+	</app>
+
+	<app mountpoint="/trac">
+		<module>trac.web.main:dispatch_request</module>
+	</app>
+
+	<app mountpoint="/trac/foo">
+		<module>werkzeug.testapp:test_app</module>
+	</app>
+
+	<app mountpoint="/bzr">
+<eval>
+from bzrlib.transport.http import wsgi
+application = wsgi.make_app("mybzr", "/bzr", readonly=False)
+</eval>
+	</app>
+
+	<app domain="sirius002:9090">
+		<module>trac.web.main:dispatch_request</module>
+	</app>
+
+	<app domain="sirius003:9090">
+		<rack>config2.ru</rack>
+	</app>
+
+</uwsgi>

multiapp.py

@@ -0,0 +1,27 @@
+import werkzeug
+
+def web3_app(environ):
+    status = b'200 OK'
+    headers = [(b'Content-type', b'text/plain')]
+    body = [b'I am a Web3 app\n']
+    return body, status, headers
+
+def zero_app(e,s):
+    s('200 OK', [ ('Content-Type', 'text/plain') ])
+    return ""
+
+def not_found(e,s):
+    s('404 Not Found', [ ('Content-Type', 'text/plain') ])
+    return ""
+
+
+def wsgi_app(e, s):
+    s('200 OK', [ ('Content-Type', 'text/plain') ])
+    yield "I am a WSGI app\n"
+
+
+def internal_server_error(e, s):
+    s('500 Internal Server Error', [ ('Content-Type', 'text/plain') ])
+    return ""
+
+applications = {'':web3_app, '/wsgi':wsgi_app, '/test':werkzeug.test_app, '/zero':zero_app, '/notfound':not_found, '/ise':internal_server_error}

nagios.c

@@ -1,52 +0,0 @@
-#include "uwsgi.h"
-
-void nagios(struct uwsgi_server *uwsgi) {
-
-	char *tcp_port;
-	struct pollfd nagios_poll;
-// connect and send
-	if (uwsgi->socket_name == NULL) {
-		fprintf(stdout, "UWSGI UNKNOWN: you have specified an invalid socket\n");
-		exit(3);
-	}
-	tcp_port = strchr(uwsgi->socket_name, ':');
-	if (tcp_port == NULL) {
-		fprintf(stdout, "UWSGI UNKNOWN: you have specified an invalid socket\n");
-		exit(3);
-	}
-
-	tcp_port[0] = 0;
-
-	nagios_poll.fd = connect_to_tcp(uwsgi->socket_name, atoi(tcp_port + 1), uwsgi->shared->options[UWSGI_OPTION_SOCKET_TIMEOUT]);
-	if (nagios_poll.fd < 0) {
-		fprintf(stdout, "UWSGI CRITICAL: could not connect() to workers\n");
-		exit(2);
-	}
-	uwsgi->wsgi_req->uh.modifier1 = UWSGI_MODIFIER_PING;
-	uwsgi->wsgi_req->uh.pktsize = 0;
-	uwsgi->wsgi_req->uh.modifier2 = 0;
-	if (write(nagios_poll.fd, uwsgi->wsgi_req, 4) != 4) {
-		uwsgi_error("write()");
-		fprintf(stdout, "UWSGI CRITICAL: could not send ping packet to workers\n");
-		exit(2);
-	}
-	nagios_poll.events = POLLIN;
-	if (!uwsgi_parse_response(&nagios_poll, uwsgi->shared->options[UWSGI_OPTION_SOCKET_TIMEOUT], (struct uwsgi_header *) uwsgi->wsgi_req, uwsgi->wsgi_req->buffer)) {
-		fprintf(stdout, "UWSGI CRITICAL: timed out waiting for response\n");
-		exit(2);
-	}
-	else {
-		if (uwsgi->wsgi_req->uh.pktsize > 0) {
-			fprintf(stdout, "UWSGI WARNING: %.*s\n", uwsgi->wsgi_req->uh.pktsize, uwsgi->wsgi_req->buffer);
-			exit(1);
-		}
-		else {
-			fprintf(stdout, "UWSGI OK: armed and ready\n");
-			exit(0);
-		}
-	}
-
-	// never here
-	fprintf(stdout, "UWSGI UNKNOWN: probably you hit a bug of uWSGI !!!\n");
-	exit(3);
-}

plugins.c

@@ -1,46 +1,40 @@
 #include "uwsgi.h"
 
-void embed_plugins(struct uwsgi_server *uwsgi) {
+extern struct uwsgi_server uwsgi;
+
+void embed_plugins() {
 
 #ifdef UWSGI_EMBED_PLUGIN_PSGI
-	if (uwsgi->plugin_arg_psgi)
-		ret = uwsgi_load_plugin(uwsgi, 5, "psgi_plugin.so", uwsgi->plugin_arg_psgi, 0);
+	if (uwsgi.plugin_arg_psgi)
+		uwsgi_load_plugin(5, "psgi_plugin.so", uwsgi.plugin_arg_psgi, 0);
 #endif
 
 #ifdef UWSGI_EMBED_PLUGIN_LUA
-	if (uwsgi->plugin_arg_lua)
-		ret = uwsgi_load_plugin(uwsgi, 6, "lua_plugin.so", uwsgi->plugin_arg_lua, 0);
+	if (uwsgi.plugin_arg_lua)
+		uwsgi_load_plugin(6, "lua_plugin.so", uwsgi.plugin_arg_lua, 0);
 #endif
 
 #ifdef UWSGI_EMBED_PLUGIN_RACK
-	if (uwsgi->plugin_arg_rack)
-		ret = uwsgi_load_plugin(uwsgi, 7, "rack_plugin.so", uwsgi->plugin_arg_rack, 0);
+	if (uwsgi.plugin_arg_rack)
+		uwsgi_load_plugin(7, "rack_plugin.so", uwsgi.plugin_arg_rack, 0);
 #endif
 
 }
 
-int uwsgi_load_plugin(struct uwsgi_server *uwsgi, int modifier, char *plugin, char *pargs, int absolute) {
-
-	char *plugin_name ;
+int uwsgi_load_plugin(int modifier, char *plugin, char *pargs, int absolute) {
 
 	void *plugin_handle;
-        int (*plugin_init) (struct uwsgi_server *, char *);
-        int (*plugin_request) (struct uwsgi_server *, struct wsgi_request *);
-        void (*plugin_after_request) (struct uwsgi_server *, struct wsgi_request *);
-	
+
+	char *plugin_name;
+	char *plugin_entry_symbol;
+	struct uwsgi_plugin *up;
+
 	if (absolute) {
 		plugin_name = malloc(strlen(plugin) + 1);
 		memcpy(plugin_name, plugin, strlen(plugin) + 1);
 	}	
 	else {
-		plugin_name = malloc(strlen(UWSGI_PLUGIN_DIR) + 1 + strlen(plugin) + 1);
-		if (!plugin_name) {
-			uwsgi_error("malloc()");
-			return -1 ;
-		}
-		memcpy(plugin_name, UWSGI_PLUGIN_DIR, strlen(UWSGI_PLUGIN_DIR));
-		memcpy(plugin_name + strlen(UWSGI_PLUGIN_DIR) , "/", 1);
-		memcpy(plugin_name + strlen(UWSGI_PLUGIN_DIR) + 1, plugin, strlen(plugin) + 1);
+		plugin_name = uwsgi_concat4(UWSGI_PLUGIN_DIR, "/", plugin, "_plugin.so");
 	}
 	plugin_handle = dlopen(plugin_name, RTLD_NOW | RTLD_GLOBAL);
 	free(plugin_name);
@@ -49,33 +43,22 @@ int uwsgi_load_plugin(struct uwsgi_server *uwsgi, int modifier, char *plugin, ch
                 uwsgi_log( "%s\n", dlerror());
         }
         else {
-                plugin_init = dlsym(plugin_handle, "uwsgi_init");
-                if (plugin_init) {
-                        if ((*plugin_init) (uwsgi, pargs)) {
-                                uwsgi_log( "plugin initialization returned error\n");
-                                if (dlclose(plugin_handle)) {
-                                        uwsgi_log( "unable to unload plugin\n");
-                                }
-
-				return -1;
-                        }
-                }
-
-                plugin_request = dlsym(plugin_handle, "uwsgi_request");
-                if (plugin_request) {
-                        uwsgi->shared->hooks[modifier] = plugin_request;
-                        plugin_after_request = dlsym(plugin_handle, "uwsgi_after_request");
-                        if (plugin_after_request) {
-                                uwsgi->shared->after_hooks[modifier] = plugin_after_request;
-                        }
-			return 0;
-
-                }
-                else {
-                        uwsgi_log( "%s\n", dlerror());
+		plugin_entry_symbol = uwsgi_concat2(plugin, "_plugin");
+                up = dlsym(plugin_handle, plugin_entry_symbol);
+                if (up) {
+			if (modifier != -1) {
+				fill_plugin_table(modifier, up);			
+			}
+			else {
+				fill_plugin_table(up->modifier1, up);			
+			}
+			return 1;
                 }
+                uwsgi_log( "%s\n", dlerror());
         }
 
+	return 0;
+
 
 	return -1;
 }

plugins/admin/admin_plugin.c

@@ -0,0 +1,28 @@
+/* uwsgi ADMIN|10 */
+int uwsgi_request_admin(struct wsgi_request *wsgi_req) {
+        uint32_t opt_value = 0;
+        int i;
+
+        if (wsgi_req->uh.pktsize >= 4) {
+                memcpy(&opt_value, wsgi_req->buffer, 4);
+                // TODO: check endianess ?
+        }
+
+        uwsgi_log( "setting internal option %d to %d\n", wsgi_req->uh.modifier2, opt_value);
+        uwsgi.shared->options[wsgi_req->uh.modifier2] = opt_value;
+
+        // ACK
+        wsgi_req->uh.modifier1 = 255;
+        wsgi_req->uh.pktsize = 0;
+        wsgi_req->uh.modifier2 = 1;
+
+        i = write(wsgi_req->poll.fd, wsgi_req, 4);
+        if (i != 4) {
+                uwsgi_error("write()");
+        }
+
+
+
+        return UWSGI_OK;
+}
+

plugins/cgi/cgi_plugin.c

@@ -0,0 +1,139 @@
+#include "../../uwsgi.h"
+
+#include <wordexp.h>
+
+extern struct uwsgi_server uwsgi;
+
+char *cgi_docroot;
+
+#define LONG_ARGS_CGI_BASE	17000 + ((9 + 1) * 100)
+#define LONG_ARGS_CGI		LONG_ARGS_CGI_BASE + 1
+
+struct option uwsgi_cgi_options[] = {
+
+        {"cgi", required_argument, 0, LONG_ARGS_CGI},
+        {0, 0, 0, 0},
+
+};
+
+int uwsgi_cgi_init(){
+
+
+	uwsgi_log("initialized CGI engine\n");
+
+	return 1;
+
+}
+
+int uwsgi_cgi_request(struct wsgi_request *wsgi_req) {
+
+	int i;
+	pid_t cgi_pid;
+	int waitpid_status;
+	char *argv[2];
+	char full_path[PATH_MAX];
+
+	/* Standard CGI request */
+	if (!wsgi_req->uh.pktsize) {
+		uwsgi_log("Invalid CGI request. skip.\n");
+		return -1;
+	}
+
+
+	if (uwsgi_parse_vars(wsgi_req)) {
+		uwsgi_log("Invalid CGI request. skip.\n");
+		return -1;
+	}
+
+	// check for file availability (and 'runnability')
+
+	cgi_pid = fork();
+
+	if (cgi_pid < 0) {
+		uwsgi_error("fork()");
+		return -1;
+	}
+
+	if (cgi_pid > 0) {
+		// close input
+		close(wsgi_req->poll.fd);
+		wsgi_req->fd_closed = 1;
+
+		// now wait for fd	
+		if (waitpid(cgi_pid, &waitpid_status ,0) > 0) {
+			uwsgi_log("CGI FINISHED\n");
+		}
+		return 0;
+	}
+
+	// close all the fd except wsgi_req->poll.fd and 2;
+
+	for(i=0;i< (int)uwsgi.max_fd;i++) {
+		if (i != wsgi_req->poll.fd && i != 2) {
+			close(i);
+		}
+	}
+
+	// now map wsgi_req->poll.fd to 0 && 1
+	if (wsgi_req->poll.fd != 0) {
+		dup2(wsgi_req->poll.fd, 0);
+		close(wsgi_req->poll.fd);
+	}
+
+	dup2(0,1);
+	
+
+	// fill cgi env
+	for(i=0;i<wsgi_req->var_cnt;i++) {
+		// no need to free the putenv() memory
+		if (putenv(uwsgi_concat3n(wsgi_req->hvec[i].iov_base, wsgi_req->hvec[i].iov_len, "=", 1, wsgi_req->hvec[i+1].iov_base, wsgi_req->hvec[i+1].iov_len))) {
+			uwsgi_error("putenv()");
+		}
+		i++;
+	}
+
+	char *path_info = uwsgi_concat4n(cgi_docroot, strlen(cgi_docroot), "/", 1,wsgi_req->path_info, wsgi_req->path_info_len, "", 0);
+	uwsgi_log("requested %s %s\n", path_info, realpath(path_info, full_path));
+
+	argv[0] = full_path;
+	argv[1] = NULL;
+	if (execv(argv[0], argv)) {
+		uwsgi_error("execv()");
+	}
+
+	// never here
+	exit(1);
+
+	return 0;
+}
+
+
+void uwsgi_cgi_after_request(struct wsgi_request *wsgi_req) {
+
+	if (uwsgi.shared->options[UWSGI_OPTION_LOGGING])
+		log_request(wsgi_req);
+}
+
+int uwsgi_cgi_manage_options(int i, char *optarg) {
+
+        switch(i) {
+                case LONG_ARGS_CGI:
+                        cgi_docroot = optarg;
+                        return 1;
+        }
+
+        return 0;
+}
+
+
+struct uwsgi_plugin cgi_plugin = {
+
+	.name = "cgi",
+	.modifier1 = 9,
+	.init = uwsgi_cgi_init,
+	.options = uwsgi_cgi_options,
+	.manage_opt = uwsgi_cgi_manage_options,
+	.request = uwsgi_cgi_request,
+	.after_request = uwsgi_cgi_after_request,
+
+};

plugins/cgi/uwsgiplugin.py

@@ -0,0 +1,5 @@
+NAME='cgi'
+CFLAGS = []
+LDFLAGS = []
+LIBS = []
+GCC_LIST = ['cgi_plugin']

plugins/echo/echo_plugin.c

@@ -0,0 +1,19 @@
+#include "../../uwsgi.h"
+
+extern struct uwsgi_server uwsgi;
+
+
+int uwsgi_echo_request(struct wsgi_request *wsgi_req) {
+
+	wsgi_req->response_size = write(wsgi_req->poll.fd, wsgi_req->buffer, wsgi_req->uh.pktsize);
+	
+	return 0;
+}
+
+struct uwsgi_plugin echo_plugin = {
+
+	.name = "echo",
+	.modifier1 = 101,
+	
+	.request = uwsgi_echo_request,
+};

plugins/echo/uwsgiplugin.py

@@ -0,0 +1,6 @@
+NAME='echo'
+
+CFLAGS = []
+LDFLAGS = []
+LIBS = []
+GCC_LIST = ['echo_plugin']

plugins/erlang/erlang.c

@@ -0,0 +1,454 @@
+#include "../../uwsgi.h"
+#include "erlang.h"
+
+extern struct uwsgi_server uwsgi;
+struct uwsgi_erlang uerl;
+
+struct option erlang_options[] = {
+	{"erlang", required_argument, 0, LONG_ARGS_ERLANG},
+        {"erlang-cookie", required_argument, 0, LONG_ARGS_ERLANG_COOKIE},
+	{0, 0, 0, 0},
+};
+
+
+void dump_eterm(ei_x_buff *x) {
+
+	int etype, esize, arity;
+	long long num;
+	char *atom;
+	int i;
+	char *binary;
+	long bin_size;
+	double fnum;
+
+	ei_get_type(x->buff, &x->index, &etype, &esize);
+        uwsgi_log("etype: %d/%c esize: %d\n", etype, etype, esize);
+
+	switch(etype) {
+		case ERL_SMALL_INTEGER_EXT:		
+		case ERL_INTEGER_EXT:
+		case ERL_SMALL_BIG_EXT:
+		case ERL_LARGE_BIG_EXT:
+			ei_decode_longlong(x->buff, &x->index, &num);
+			uwsgi_log("num: %lu\n", num);
+			break;
+		case ERL_FLOAT_EXT:
+			ei_decode_double(x->buff, &x->index, &fnum);
+			uwsgi_log("float: %f\n", fnum);
+			break;
+		case ERL_STRING_EXT:
+			atom = uwsgi_malloc(esize+1);
+			ei_decode_string(x->buff, &x->index, atom);
+			uwsgi_log("string: %s\n", atom);
+			free(atom);
+			break;
+		case ERL_ATOM_EXT:
+			atom = uwsgi_malloc(esize+1);
+			ei_decode_atom(x->buff, &x->index, atom);
+			uwsgi_log("atom: %s\n", atom);
+			free(atom);
+			break;
+		case ERL_SMALL_TUPLE_EXT:
+		case ERL_LARGE_TUPLE_EXT:
+			ei_decode_tuple_header(x->buff, &x->index, &arity);
+			for(i=0;i<arity;i++) {
+				dump_eterm(x);
+			}
+			break;
+		case ERL_LIST_EXT:
+		case ERL_NIL_EXT:
+			ei_decode_list_header(x->buff, &x->index, &arity);
+			if (arity == 0) {
+				uwsgi_log("nil value\n");
+				break;
+			}
+                        for(i=0;i<arity+1;i++) {
+                                dump_eterm(x);
+                        }
+                        break;
+		case ERL_BINARY_EXT:
+			binary = uwsgi_malloc(esize);
+			ei_decode_binary(x->buff, &x->index, binary, &bin_size);
+			uwsgi_log("binary data of %d bytes\n", bin_size);
+			free(binary);
+			break;
+		default:
+			uwsgi_log("ignored...\n");
+			ei_skip_term(x->buff, &x->index);
+			break;
+			
+			
+			
+	}
+	
+	
+}
+
+void uwsgi_erlang_rpc(int fd, erlang_pid *from, ei_x_buff *x) {
+
+	int etype, esize;
+	int arity;
+
+	char *gen_call;
+	char *module;
+	char *call;
+	char buffer[0xffff];
+
+	char *argv[0xff] ;
+	int argc;
+	uint16_t ret;
+	ei_x_buff xr;
+
+	erlang_ref eref;
+
+	ei_get_type(x->buff, &x->index, &etype, &esize);
+
+	uwsgi_log("%d %c %c %c\n", etype, etype, ERL_SMALL_TUPLE_EXT, ERL_LARGE_TUPLE_EXT);
+	if (etype != ERL_SMALL_TUPLE_EXT && etype != ERL_LARGE_TUPLE_EXT) return;
+
+	uwsgi_log("decode tuple\n");
+	ei_decode_tuple_header(x->buff, &x->index, &arity);
+
+	uwsgi_log("rpc arity %d\n", arity);
+	if (arity != 3) return ;
+
+	ei_get_type(x->buff, &x->index, &etype, &esize);
+
+	uwsgi_log("%d %c\n", etype, etype);
+
+	if (etype != ERL_ATOM_EXT && etype != ERL_STRING_EXT) return ;
+
+	gen_call = uwsgi_malloc(esize);
+
+	if (etype == ERL_ATOM_EXT) {
+                ei_decode_atom(x->buff, &x->index, gen_call);
+        }
+        else {
+                ei_decode_string(x->buff, &x->index, gen_call);
+        }
+
+	uwsgi_log("gen call = %s\n", gen_call);
+
+	ei_get_type(x->buff, &x->index, &etype, &esize);
+	
+	if (etype != ERL_SMALL_TUPLE_EXT) return ;
+
+	ei_decode_tuple_header(x->buff, &x->index, &arity);
+	if (arity != 2) return ;
+
+	ei_get_type(x->buff, &x->index, &etype, &esize);
+	ei_skip_term(x->buff, &x->index);
+	uwsgi_log("skip0 %d %c\n", etype, etype);
+	ei_get_type(x->buff, &x->index, &etype, &esize);
+	uwsgi_log("skip1 %d %c\n", etype, etype);
+	ei_decode_ref(x->buff, &x->index, &eref);
+
+	ei_get_type(x->buff, &x->index, &etype, &esize);
+	uwsgi_log("%d %c\n", etype, etype);
+
+	module = uwsgi_malloc(esize);
+
+	if (etype == ERL_ATOM_EXT) {
+		ei_decode_atom(x->buff, &x->index, module);
+	}
+	else {
+		ei_decode_string(x->buff, &x->index, module);
+	}
+
+	ei_get_type(x->buff, &x->index, &etype, &esize);
+
+	uwsgi_log("%d %c\n", etype, etype);
+
+	if (etype != ERL_SMALL_TUPLE_EXT) return ;
+
+	ei_decode_tuple_header(x->buff, &x->index, &arity);
+
+	uwsgi_log("arity: %d\n", arity);
+	if (arity != 5) return ;
+
+	ei_get_type(x->buff, &x->index, &etype, &esize);
+        uwsgi_log("%d %c\n", etype, etype);
+
+        char *method = uwsgi_malloc(esize);
+
+        if (etype == ERL_ATOM_EXT) {
+                ei_decode_atom(x->buff, &x->index, method);
+        }
+        else {
+                ei_decode_string(x->buff, &x->index, method);
+        }
+
+        if (strcmp(method, "call")) return;
+
+        ei_get_type(x->buff, &x->index, &etype, &esize);
+        uwsgi_log("%d %c\n", etype, etype);
+
+	if (etype != ERL_ATOM_EXT && etype != ERL_STRING_EXT) return ;
+
+	module = uwsgi_malloc(esize);
+
+	if (etype == ERL_ATOM_EXT) {
+		ei_decode_atom(x->buff, &x->index, module);
+	}
+	else {
+		ei_decode_string(x->buff, &x->index, module);
+	}
+
+	ei_get_type(x->buff, &x->index, &etype, &esize);
+
+	if (etype != ERL_ATOM_EXT && etype != ERL_STRING_EXT) return ;
+
+	call = uwsgi_malloc(esize);
+
+	if (etype == ERL_ATOM_EXT) {
+		ei_decode_atom(x->buff, &x->index, call);
+	}
+	else {
+		ei_decode_string(x->buff, &x->index, call);
+	}
+
+	uwsgi_log("RPC %s %s\n", module, call);
+
+	ei_get_type(x->buff, &x->index, &etype, &esize);
+
+	if (etype == ERL_ATOM_EXT) {
+		argc = 1;
+		argv[0] = uwsgi_malloc(esize+1);
+		ei_decode_atom(x->buff, &x->index, argv[0]);	
+	}
+	else if (etype == ERL_STRING_EXT) {
+		argc = 1;
+		argv[0] = uwsgi_malloc(esize+1);
+		ei_decode_string(x->buff, &x->index, argv[0]);	
+	}
+
+	ret = uwsgi_rpc(call, argc, argv, buffer);
+
+	uwsgi_log("buffer: %.*s\n", ret, buffer);
+
+	ei_x_new_with_version(&xr);
+
+	ei_x_encode_tuple_header(&xr, 2);
+	//ei_x_encode_atom(&xr, "rex");
+	ei_x_encode_ref(&xr, &eref);
+	ei_x_encode_string_len(&xr, buffer, ret);
+
+	uwsgi_log("ei_send to %d %s %d %d %d: %d %d\n", fd, from->node, from->num , from->serial, from->creation, xr.index, ei_send(fd, from, xr.buff, xr.index));
+	//uwsgi_log("ei_send to %d %s %d %d %d: %d %d\n", fd, from->node, from->num , from->serial, from->creation, xr.index, ei_reg_send(&uerl.cnode, fd, "rex", xr.buff, xr.index));
+	
+	
+}
+
+void erlang_loop() {
+
+	ErlConnect econn;
+	//ErlMessage em;
+	erlang_msg em;
+	int fd;
+
+	int eversion;
+	int i;
+
+	ei_x_buff x, xr;
+
+	ei_x_new(&x); 
+	ei_x_new(&xr); 
+
+	
+	/*
+	int fd0 = ei_connect(&uerl.cnode, "anothernode@maverick64");
+	uwsgi_log("fd0: %d\n", fd0);
+
+	ei_x_encode_list_header(&x, 0);
+
+	ei_rpc_to(&uerl.cnode, fd0, "erlang", "node", x.buff, x.index);
+
+	ei_rpc_from(&uerl.cnode, fd0, 10000, &em, &xr);
+
+	uwsgi_log("From: %s To: %s RegName: %s\n", em.from.node, em.to.node, em.toname);
+
+	xr.index = 0;
+	ei_decode_version(xr.buff, &xr.index, &eversion);
+        uwsgi_log("eversion: %d\n", eversion);
+
+	dump_eterm(&xr);	
+	*/
+
+	for(;;) {
+
+		fd = ei_accept(&uerl.cnode, uerl.fd, &econn);
+
+		if (fd >= 0) {
+
+			for (;;) {
+				if (ei_xreceive_msg(fd, &em, &x) == ERL_MSG) {
+
+					if (em.msgtype == ERL_TICK)
+						continue;
+
+					uwsgi_log("From: %s To: %s RegName: %s\n", em.from.node, em.to.node, em.toname);
+
+
+					
+					x.index = 0;
+					ei_decode_version(x.buff, &x.index, &eversion);
+#ifdef UWSGI_DEBUG
+					uwsgi_log("eversion: %d\n", eversion);
+#endif
+
+					if (!strcmp(em.toname, "rex")) {
+						uwsgi_erlang_rpc(fd, &em.from, &x);
+					}
+					else {
+						int uep = -1;
+						for(i=0;i<uerl.uep_cnt;i++) {
+							if (!strcmp(uerl.uep[i].name, em.toname)) {
+								uep = i;
+								break;
+							}
+						}
+
+						if (uep > -1) {
+							if (uerl.uep[uep].plugin) {
+								uerl.uep[uep].plugin( uerl.uep[uep].func, &x );
+							}
+						}
+						else {
+							uwsgi_log("!!! unregistered erlang process requested, dumping it !!!\n");
+							dump_eterm(&x);
+						}
+					}
+					
+					
+
+/*
+
+					if (em.msgtype) {
+						dump_erl_obj(em.msg);
+						erl_free_compound(em.msg);
+					}
+					if (em.to) {
+						uwsgi_log("*** TO ***\n");
+						dump_erl_obj(em.to);
+						erl_free_compound(em.to);
+					}
+
+					if (em.from) {
+						uwsgi_log("*** FROM ***\n");
+						dump_erl_obj(em.from);
+						erl_free_compound(em.from);
+					}
+*/
+
+				}
+				else {
+					break;
+				}
+			}
+
+			close(fd);
+
+		}
+	}
+}
+
+int erlang_init() {
+
+	char *host;
+	struct sockaddr_in sin;
+	socklen_t slen = sizeof(struct sockaddr_in);
+	char *ip = NULL;
+	char *nodename;
+	struct in_addr addr;
+
+	uerl.lock = uwsgi_mmap_shared_lock();
+        uwsgi_lock_init(uerl.lock);
+
+        if (uerl.name) {
+
+		uwsgi.master_process = 1;
+
+		host = strchr(uerl.name, '@');
+
+		if (!host) {
+			if (ei_connect_init(&uerl.cnode, uerl.name, uerl.cookie, 0) < 0) {
+				uwsgi_log("unable to initialize erlang connection\n");
+				exit(1);
+			}
+		}
+		else {
+			nodename = uwsgi_concat2n(uerl.name, host-uerl.name, "",0);
+			ip = uwsgi_resolve_ip(host+1);
+			if (ip) {
+#ifdef UWSGI_DEBUG
+				uwsgi_log("ip: %s\n", ip);
+#endif
+				addr.s_addr = inet_addr(ip);
+				if (ei_connect_xinit(&uerl.cnode, host+1, nodename, uerl.name, &addr, uerl.cookie, 0) < 0) {
+					uwsgi_log("unable to initialize erlang connection\n");
+					exit(1);
+				}
+			}
+			else {
+				if (ei_connect_init(&uerl.cnode, nodename, uerl.cookie, 0) < 0) {
+					uwsgi_log("unable to initialize erlang connection\n");
+					exit(1);
+				}
+			}
+			free(nodename);
+		}
+
+		if (ip) {
+			uerl.fd = bind_to_tcp(ip, uwsgi.listen_queue, NULL);
+		}
+		else {
+			uerl.fd = bind_to_tcp("", uwsgi.listen_queue, NULL);
+		}
+
+		if (uerl.fd < 0) {
+			exit(1);
+		}
+
+        	if (getsockname(uerl.fd, (struct sockaddr *) &sin, &slen)) {
+                	uwsgi_error("getsockname()");
+			exit(1);
+        	}
+
+		if (ei_publish(&uerl.cnode, ntohs(sin.sin_port)) < 0) {
+                	uwsgi_log( "*** unable to subscribe with EPMD ***\n");
+			exit(1);
+		}
+
+		uwsgi_log("Erlang C-Node %s registered on port %d\n", ei_thisnodename(&uerl.cnode), ntohs(sin.sin_port));
+
+	
+                if (register_fat_gateway("erlang", erlang_loop) == NULL) {
+                        uwsgi_log("unable to register the erlang gateway\n");
+                        exit(1);
+                }
+        }
+
+        return 0;
+}
+
+int erlang_opt(int i, char *optarg) {
+
+        switch(i) {
+                case LONG_ARGS_ERLANG:
+                        uerl.name = optarg;
+                        return 1;
+                case LONG_ARGS_ERLANG_COOKIE:
+			uerl.cookie = optarg;
+                        return 1;
+        }
+        return 0;
+}
+
+
+struct uwsgi_plugin erlang_plugin = {
+
+        .options = erlang_options,
+        .manage_opt = erlang_opt,
+        .init = erlang_init,
+};
+

plugins/erlang/erlang.h

@@ -0,0 +1,30 @@
+#include <ei.h>
+
+#define MAX_UWSGI_ERLANG_PROCESSES 64
+
+#define LONG_ARGS_ERLANG                17012
+#define LONG_ARGS_ERLANG_COOKIE         17013
+
+
+
+struct uwsgi_erlang_process {
+	
+	char name[0xff];
+	void (*plugin)(void *, ei_x_buff *);
+	void *func;
+};
+
+struct uwsgi_erlang {
+
+        ei_cnode cnode;
+        char *name;
+        char *cookie;
+
+        int fd;
+
+	void *lock;
+
+	struct uwsgi_erlang_process uep[MAX_UWSGI_ERLANG_PROCESSES];
+	int uep_cnt;
+};
+

plugins/erlang/uwsgiplugin.py

@@ -0,0 +1,7 @@
+
+NAME='erlang'
+CFLAGS = []
+LDFLAGS = []
+LIBS = ['-lei']
+
+GCC_LIST = ['erlang']

plugins/example/example_plugin.c

@@ -1,13 +1,15 @@
 #include "../../uwsgi.h"
 
-int uwsgi_init(struct uwsgi_server *uwsgi, char *args){
+extern struct uwsgi_server uwsgi;
+
+int uwsgi_init(char *args){
 	uwsgi_log("i am the example plugin initialization function with arg: %s\n", args);
 	return 0;
 }
 
-int uwsgi_request(struct uwsgi_server *uwsgi, struct wsgi_request *wsgi_req) {
+int uwsgi_request(struct wsgi_request *wsgi_req) {
 
-	char *http = "HTTP/1.1 200 Ok\r\nContent-type: text/html\r\n\r\n<h1>Hello World</h1>" ;
+	char *http = "HTTP/1.1 200 Ok\r\nContent-type: text/html\r\n\r\n<h1>Hello World</h1>";
 
 	wsgi_req->response_size += write(wsgi_req->poll.fd, http, strlen(http));
 
@@ -15,6 +17,6 @@ int uwsgi_request(struct uwsgi_server *uwsgi, struct wsgi_request *wsgi_req) {
 }
 
 
-void uwsgi_after_request(struct uwsgi_server *uwsgi, struct wsgi_request *wsgi_req) {
+void uwsgi_after_request(struct wsgi_request *wsgi_req) {
 	uwsgi_log("i am the example plugin after request function\n");
 }

plugins/fastrouter/fastrouter.c

@@ -0,0 +1,484 @@
+/*
+
+   uWSGI fastrouter
+
+   requires:
+
+   - async
+   - caching
+   - pcre (optional)
+
+*/
+
+#include "../../uwsgi.h"
+
+#define LONG_ARGS_FASTROUTER			150001
+#define LONG_ARGS_FASTROUTER_EVENTS		150002
+#define LONG_ARGS_FASTROUTER_USE_PATTERN	150003
+#define LONG_ARGS_FASTROUTER_USE_BASE		150004
+
+#define FASTROUTER_STATUS_FREE 0
+#define FASTROUTER_STATUS_CONNECTING 1
+#define FASTROUTER_STATUS_RECV_HDR 2
+#define FASTROUTER_STATUS_RECV_VARS 3
+#define FASTROUTER_STATUS_RESPONSE 4
+
+struct uwsgi_fastrouter {
+	char *socket_name;
+	int use_cache;
+	int nevents;
+
+	char *pattern;
+	int pattern_len;
+
+	char *base;
+	int base_len;
+} ufr;
+
+struct option fastrouter_options[] = {
+	{"fastrouter", required_argument, 0, LONG_ARGS_FASTROUTER},
+	{"fastrouter-use-cache", no_argument, &ufr.use_cache, 1},
+	{"fastrouter-use-pattern", required_argument, 0, LONG_ARGS_FASTROUTER_USE_PATTERN},
+	{"fastrouter-use-base", required_argument, 0, LONG_ARGS_FASTROUTER_USE_BASE},
+	{"fastrouter-events", required_argument, 0, LONG_ARGS_FASTROUTER_EVENTS},
+	{0, 0, 0, 0},	
+};
+
+extern struct uwsgi_server uwsgi;
+
+struct fastrouter_session {
+
+	int fd;
+	int instance_fd;
+	int status;
+	struct uwsgi_header uh;
+	uint8_t h_pos;
+	char buffer[0xffff];
+	uint16_t pos;
+
+	char *hostname;
+	uint16_t hostname_len;
+
+	char *instance_address;
+	uint64_t instance_address_len;
+
+	int pass_fd;
+};
+
+void fr_get_hostname(char *key, uint16_t keylen, char *val, uint16_t vallen, void *data) {
+
+	struct fastrouter_session *fr_session = (struct fastrouter_session *) data;
+
+	//uwsgi_log("%.*s = %.*s\n", keylen, key, vallen, val);
+	if (!uwsgi_strncmp("SERVER_NAME", 11, key, keylen) && !fr_session->hostname_len) {
+		fr_session->hostname = val;
+		fr_session->hostname_len = vallen;
+		return;
+	}
+
+	if (!uwsgi_strncmp("HTTP_HOST", 9, key, keylen)) {
+		fr_session->hostname = val;
+		fr_session->hostname_len = vallen;
+		return;
+	}
+}
+
+struct fastrouter_session *alloc_fr_session() {
+	
+	return uwsgi_malloc(sizeof(struct fastrouter_session));
+}
+
+void fastrouter_loop() {
+
+	int fr_queue;
+	int fr_server;
+	int nevents;
+	int interesting_fd;
+	int new_connection;
+	ssize_t len;
+	int i;
+
+	char *tmp_socket_name;
+	int tmp_socket_name_len;
+
+	char *magic_table[0xff];
+
+	void *events;
+	struct msghdr msg;
+	union {
+                struct cmsghdr cmsg;
+                char control [CMSG_SPACE (sizeof (int))];
+        } msg_control;
+        struct cmsghdr *cmsg;
+
+	struct sockaddr_un fr_addr;
+        socklen_t fr_addr_len = sizeof(struct sockaddr_un);
+	
+	struct fastrouter_session *fr_session;
+
+	struct fastrouter_session *fr_table[2048];
+
+	struct iovec iov[2];
+
+	int soopt;
+        socklen_t solen = sizeof(int);
+
+	for(i=0;i<2048;i++) {
+		fr_table[i] = NULL;
+	}
+
+	fr_server = bind_to_tcp(ufr.socket_name, uwsgi.listen_queue, ufr.socket_name);
+
+	fr_queue = event_queue_init();
+
+	events = event_queue_alloc(ufr.nevents);
+
+	event_queue_add_fd_read(fr_queue, fr_server);
+
+	if (ufr.pattern) {
+		init_magic_table(magic_table);
+	}
+
+	for (;;) {
+
+		nevents = event_queue_wait_multi(fr_queue, -1, events, ufr.nevents);
+
+		for (i=0;i<nevents;i++) {
+
+			tmp_socket_name = NULL;
+			interesting_fd = event_queue_interesting_fd(events, i);
+
+
+			if (interesting_fd == fr_server) {
+				new_connection = accept(fr_server, (struct sockaddr *) &fr_addr, &fr_addr_len);
+				if (new_connection < 0) {
+					continue;
+				}
+
+				fr_table[new_connection] = alloc_fr_session();
+				fr_table[new_connection]->fd = new_connection;
+				fr_table[new_connection]->instance_fd = -1; 
+				fr_table[new_connection]->status = FASTROUTER_STATUS_RECV_HDR;
+				fr_table[new_connection]->h_pos = 0;
+				fr_table[new_connection]->pos = 0;
+				fr_table[new_connection]->instance_address_len = 0;
+
+				event_queue_add_fd_read(fr_queue, new_connection);
+				
+			}	
+			else {
+				fr_session = fr_table[interesting_fd];
+
+				// something is going wrong...
+				if (fr_session == NULL) continue;
+
+				if (event_queue_interesting_fd_has_error(events, i)) {
+					close(fr_session->fd);
+                                        fr_table[fr_session->fd] = NULL;
+                                        if (fr_session->instance_fd != -1) {
+                                        	close(fr_session->instance_fd);
+                                                fr_table[fr_session->instance_fd] = NULL;
+                                        }
+                                        free(fr_session);
+					continue;
+				}
+
+				switch(fr_session->status) {
+
+					case FASTROUTER_STATUS_RECV_HDR:
+						len = recv(fr_session->fd, (char *)(&fr_session->uh) + fr_session->h_pos, 4-fr_session->h_pos, 0);
+						if (len <= 0) {
+							uwsgi_error("recv()");
+							close(fr_session->fd);
+							fr_table[fr_session->fd] = NULL;
+							free(fr_session);
+							break;
+						}
+						fr_session->h_pos += len;
+						if (fr_session->h_pos == 4) {
+#ifdef UWSGI_DEBUG
+							uwsgi_log("modifier1: %d pktsize: %d modifier2: %d\n", fr_session->uh.modifier1, fr_session->uh.pktsize, fr_session->uh.modifier2);
+#endif
+							fr_session->status = FASTROUTER_STATUS_RECV_VARS;
+						}
+						break;
+
+
+					case FASTROUTER_STATUS_RECV_VARS:
+                                                len = recv(fr_session->fd, fr_session->buffer + fr_session->pos, fr_session->uh.pktsize - fr_session->pos, 0);
+                                                if (len <= 0) {
+                                                        uwsgi_error("recv()");
+							close(fr_session->fd);
+							fr_table[fr_session->fd] = NULL;
+							free(fr_session);
+                                                        break;
+                                                }
+                                                fr_session->pos += len;
+                                                if (fr_session->pos == fr_session->uh.pktsize) {
+							if (uwsgi_hooked_parse(fr_session->buffer, fr_session->uh.pktsize, fr_get_hostname, (void *) fr_session)) {
+								close(fr_session->fd);
+								fr_table[fr_session->fd] = NULL;
+								free(fr_session);
+                                                        	break;
+							}
+
+							if (fr_session->hostname_len == 0) {
+								close(fr_session->fd);
+								fr_table[fr_session->fd] = NULL;
+								free(fr_session);
+                                                        	break;
+							}
+
+							//uwsgi_log("requested domain %.*s\n", fr_session->hostname_len, fr_session->hostname);
+							if (ufr.use_cache) {
+								fr_session->instance_address = uwsgi_cache_get(fr_session->hostname, fr_session->hostname_len, &fr_session->instance_address_len);
+							}
+							else if (ufr.pattern) {
+								magic_table['s'] = uwsgi_concat2n(fr_session->hostname, fr_session->hostname_len, "", 0);	
+								tmp_socket_name = magic_sub(ufr.pattern, ufr.pattern_len, &tmp_socket_name_len, magic_table);
+								free(magic_table['s']);
+								fr_session->instance_address_len = tmp_socket_name_len;
+								fr_session->instance_address = tmp_socket_name;
+							}
+							else if (ufr.base) {
+								tmp_socket_name = uwsgi_concat2nn(ufr.base, ufr.base_len, fr_session->hostname, fr_session->hostname_len, &tmp_socket_name_len);
+								fr_session->instance_address_len = tmp_socket_name_len;
+								fr_session->instance_address = tmp_socket_name;
+							}
+
+							// no address found
+							if (!fr_session->instance_address_len) {
+								close(fr_session->fd);
+								fr_table[fr_session->fd] = NULL;
+								free(fr_session);
+                                                        	break;
+							}
+
+
+							fr_session->pass_fd = is_unix(fr_session->instance_address, fr_session->instance_address_len);
+
+							fr_session->instance_fd = uwsgi_connectn(fr_session->instance_address, fr_session->instance_address_len, 0, 1);
+
+							if (tmp_socket_name) free(tmp_socket_name);
+
+							if (fr_session->instance_fd < 0) {
+								close(fr_session->fd);
+								fr_table[fr_session->fd] = NULL;
+								free(fr_session);
+                                                        	break;
+							}
+
+
+							fr_session->status = FASTROUTER_STATUS_CONNECTING;
+							fr_table[fr_session->instance_fd] = fr_session;
+							event_queue_add_fd_write(fr_queue, fr_session->instance_fd);
+                                                }
+                                                break;
+
+
+
+					case FASTROUTER_STATUS_CONNECTING:
+						
+						if (interesting_fd == fr_session->instance_fd) {
+
+							if (getsockopt(fr_session->instance_fd, SOL_SOCKET, SO_ERROR, (void *) (&soopt), &solen) < 0) {
+                                                		uwsgi_error("getsockopt()");
+								close(fr_session->fd);
+								close(fr_session->instance_fd);
+								fr_table[fr_session->fd] = NULL;
+								fr_table[fr_session->instance_fd] = NULL;
+								free(fr_session);
+                                                        	break;
+                                        		}
+
+							if (soopt) {
+								uwsgi_log("unable to connect() to uwsgi instance: %s\n", strerror(soopt));
+								close(fr_session->fd);
+								close(fr_session->instance_fd);
+								fr_table[fr_session->fd] = NULL;
+								fr_table[fr_session->instance_fd] = NULL;
+								free(fr_session);
+                                                        	break;
+							}
+
+							iov[0].iov_base = &fr_session->uh;
+							iov[0].iov_len = 4;
+							iov[1].iov_base = fr_session->buffer;
+							iov[1].iov_len = fr_session->uh.pktsize;
+
+							// fd passing: PERFORMANCE EXTREME BOOST !!!
+							if (fr_session->pass_fd) {
+								msg.msg_name    = NULL;
+                						msg.msg_namelen = 0;
+                						msg.msg_iov     = iov;
+                						msg.msg_iovlen  = 2;
+                						msg.msg_flags   = 0;
+                						msg.msg_control    = &msg_control;
+                						msg.msg_controllen = sizeof (msg_control);
+
+                						cmsg = CMSG_FIRSTHDR (&msg);
+                						cmsg->cmsg_len   = CMSG_LEN (sizeof (int));
+                						cmsg->cmsg_level = SOL_SOCKET;
+                						cmsg->cmsg_type  = SCM_RIGHTS;
+
+								memcpy(CMSG_DATA(cmsg), &fr_session->fd, sizeof(int));
+
+                						if (sendmsg(fr_session->instance_fd, &msg, 0) < 0) {
+									uwsgi_error("sendmsg()");
+								}
+
+								close(fr_session->fd);
+                                                                close(fr_session->instance_fd);
+                                                                fr_table[fr_session->fd] = NULL;
+                                                                fr_table[fr_session->instance_fd] = NULL;
+                                                                free(fr_session);
+                                                                break;
+							}
+
+							if (writev(fr_session->instance_fd, iov, 2) < 0) {
+								uwsgi_error("writev()");
+								close(fr_session->fd);
+								close(fr_session->instance_fd);
+								fr_table[fr_session->fd] = NULL;
+								fr_table[fr_session->instance_fd] = NULL;
+								free(fr_session);
+                                                        	break;
+							}
+
+							event_queue_del_fd(fr_queue, fr_session->instance_fd);
+							event_queue_add_fd_read(fr_queue, fr_session->instance_fd);
+							fr_session->status = FASTROUTER_STATUS_RESPONSE;
+						}
+
+						break;
+
+					case FASTROUTER_STATUS_RESPONSE:
+						
+						// data from instance
+						if (interesting_fd == fr_session->instance_fd) {
+							len = recv(fr_session->instance_fd, fr_session->buffer, 0xffff, 0);
+							if (len <= 0) {
+								if (len < 0) uwsgi_error("recv()");
+								close(fr_session->fd);
+								close(fr_session->instance_fd);
+								fr_table[fr_session->fd] = NULL;
+								fr_table[fr_session->instance_fd] = NULL;
+								free(fr_session);
+                                                        	break;
+							}
+
+							len = send(fr_session->fd, fr_session->buffer, len, 0);
+							
+							if (len <= 0) {
+								if (len < 0) uwsgi_error("send()");
+								close(fr_session->fd);
+								close(fr_session->instance_fd);
+								fr_table[fr_session->fd] = NULL;
+								fr_table[fr_session->instance_fd] = NULL;
+								free(fr_session);
+                                                        	break;
+							}
+						}
+						// body from client
+						else if (interesting_fd == fr_session->fd) {
+
+							//uwsgi_log("receiving body...\n");
+							len = recv(fr_session->fd, fr_session->buffer, 0xffff, 0);
+							if (len <= 0) {
+								if (len < 0) uwsgi_error("recv()");
+								close(fr_session->fd);
+								close(fr_session->instance_fd);
+								fr_table[fr_session->fd] = NULL;
+								fr_table[fr_session->instance_fd] = NULL;
+								free(fr_session);
+                                                        	break;
+							}
+
+
+							len = send(fr_session->instance_fd, fr_session->buffer, len, 0);
+							
+							if (len <= 0) {
+								if (len < 0) uwsgi_error("send()");
+								close(fr_session->fd);
+								close(fr_session->instance_fd);
+								fr_table[fr_session->fd] = NULL;
+								fr_table[fr_session->instance_fd] = NULL;
+								free(fr_session);
+                                                        	break;
+							}
+						}
+
+						break;
+
+
+
+					// fallback to destroy !!!
+					default:
+						uwsgi_log("default action\n");
+						close(fr_session->fd);
+						fr_table[fr_session->fd] = NULL;
+						if (fr_session->instance_fd != -1) {
+							close(fr_session->instance_fd);
+							fr_table[fr_session->instance_fd] = NULL;
+						}
+						free(fr_session);
+						break;
+					
+				}
+			}
+
+		}
+	}
+}
+
+int fastrouter_init() {
+
+	if (ufr.socket_name) {
+
+		if (ufr.use_cache && !uwsgi.cache_max_items) {
+			uwsgi_log("you need to create a uwsgi cache to use the fastrouter (add --cache <n>)\n");
+			exit(1);
+		}
+
+		if (!ufr.nevents) ufr.nevents = 64;
+
+		if (register_gateway("fastrouter", fastrouter_loop) == NULL) {
+			uwsgi_log("unable to register the fastrouter gateway\n");
+			exit(1);
+		}
+	}
+
+	return 0;
+}
+	
+int fastrouter_opt(int i, char *optarg) {
+
+	switch(i) {
+		case LONG_ARGS_FASTROUTER:
+			ufr.socket_name = optarg;
+			return 1;
+		case LONG_ARGS_FASTROUTER_EVENTS:
+			ufr.nevents = atoi(optarg);
+			return 1;
+		case LONG_ARGS_FASTROUTER_USE_PATTERN:
+			ufr.pattern = optarg;
+			// optimization
+			ufr.pattern_len = strlen(ufr.pattern);
+			return 1;
+		case LONG_ARGS_FASTROUTER_USE_BASE:
+			ufr.base = optarg;
+			// optimization
+			ufr.base_len = strlen(ufr.base);
+			return 1;
+	}
+	return 0;
+}
+
+
+struct uwsgi_plugin fastrouter_plugin = {
+
+        .options = fastrouter_options,
+        .manage_opt = fastrouter_opt,
+        .init = fastrouter_init,
+};
+

plugins/fastrouter/uwsgiplugin.py

@@ -0,0 +1,7 @@
+
+NAME='fastrouter'
+CFLAGS = []
+LDFLAGS = []
+LIBS = []
+
+GCC_LIST = ['fastrouter']

plugins/http/http.c

@@ -0,0 +1,899 @@
+/*
+
+   uWSGI http
+
+   requires:
+
+   - async
+   - caching
+   - pcre (optional)
+
+*/
+
+#include "../../uwsgi.h"
+
+#define MAX_HTTP_VEC 128
+#define MAX_HTTP_EXTRA_VARS 64
+
+#define LONG_ARGS_HTTP_EVENTS			300001
+#define LONG_ARGS_HTTP_USE_PATTERN		300002
+#define LONG_ARGS_HTTP_USE_BASE			300003
+#define LONG_ARGS_HTTP_USE_TO			300004
+#define LONG_ARGS_HTTP_SUBSCRIPTION_SERVER	300005
+#define LONG_ARGS_HTTP_TIMEOUT			300006
+
+#define HTTP_STATUS_FREE 0
+#define HTTP_STATUS_CONNECTING 1
+#define HTTP_STATUS_RECV 2
+#define HTTP_STATUS_RESPONSE 4
+
+#define add_timeout(x) uwsgi_add_rb_timer(uhttp.timeouts, time(NULL)+uhttp.socket_timeout, x)
+#define del_timeout(x) rb_erase(&x->timeout->rbt, uhttp.timeouts); free(x->timeout);
+
+struct uwsgi_http {
+	char *socket_name;
+	int use_cache;
+	int use_cluster;
+	int nevents;
+
+	int server;
+
+	char *subscription_server;
+
+	char *pattern;
+	int pattern_len;
+
+	char *base;
+	int base_len;
+
+	char *port;
+	int port_len;
+
+	char *to;
+	int to_len;
+
+	char *http_vars[MAX_HTTP_EXTRA_VARS];
+	int http_vars_cnt;
+
+	uint8_t modifier1;
+	int load;
+
+	int socket_timeout;
+
+	struct uwsgi_dict *subscription_dict;
+
+	struct rb_root *timeouts;
+} uhttp;
+
+struct option http_options[] = {
+	{"http", required_argument, 0, LONG_ARGS_HTTP},
+        {"http-var", required_argument, 0, LONG_ARGS_HTTP_VAR},
+        {"http-to", required_argument, 0, LONG_ARGS_HTTP_USE_TO},
+        {"http-modifier1", required_argument, 0, LONG_ARGS_HTTP_MODIFIER1},
+	{"http-use-cache", no_argument, &uhttp.use_cache, 1},
+	{"http-use-pattern", required_argument, 0, LONG_ARGS_HTTP_USE_PATTERN},
+	{"http-use-base", required_argument, 0, LONG_ARGS_HTTP_USE_BASE},
+	{"http-use-cluster", no_argument, &uhttp.use_cluster, 1},
+	{"http-events", required_argument, 0, LONG_ARGS_HTTP_EVENTS},
+	{"http-subscription-server", required_argument, 0, LONG_ARGS_HTTP_SUBSCRIPTION_SERVER},
+	{"http-timeout", required_argument, 0, LONG_ARGS_HTTP_TIMEOUT},
+	{0, 0, 0, 0},	
+};
+
+extern struct uwsgi_server uwsgi;
+
+
+void http_manage_subscription(char *key, uint16_t keylen, char *val, uint16_t vallen, void *data) {
+
+	struct uwsgi_subscribe_req *usr = (struct uwsgi_subscribe_req *) data;
+
+        if (!uwsgi_strncmp("key", 3, key, keylen)) {
+		usr->key = val;
+		usr->keylen = vallen;
+        }
+
+        else if (!uwsgi_strncmp("auth", 4, key, keylen)) {
+		usr->auth = val;
+		usr->auth_len = vallen;
+        }
+
+        else if (!uwsgi_strncmp("address", 7, key, keylen)) {
+		usr->address = val;
+		usr->address_len = vallen;
+        }
+
+}
+
+
+struct http_session {
+
+	int fd;
+	int instance_fd;
+	int status;
+	struct uwsgi_header uh;
+	uint8_t h_pos;
+	uint16_t pos;
+	uint16_t parse_pos;
+	char *ptr;
+
+	int rnrn;
+
+	char *hostname;
+	uint16_t hostname_len;
+
+	char *instance_address;
+	uint64_t instance_address_len;
+
+	int instance_failed;
+
+	int pass_fd;
+
+	int remains;
+
+	struct iovec iov[MAX_HTTP_VEC];
+	int iov_len;
+
+	char uss[MAX_HTTP_VEC*2];
+
+	char buffer[UMAX16];
+
+	struct uwsgi_subscriber_name *un;
+	
+	in_addr_t ip_addr;
+	char ip[INET_ADDRSTRLEN];
+
+	struct uwsgi_rb_timer *timeout;
+};
+
+struct uwsgi_rb_timer *reset_timeout(struct http_session *uhttp_session) {
+
+	del_timeout(uhttp_session);
+	return add_timeout(uhttp_session);
+}
+
+void close_session(struct http_session **uhttp_table, struct http_session *uhttp_session) {
+
+	close(uhttp_session->fd);
+        uhttp_table[uhttp_session->fd] = NULL;
+        if (uhttp_session->instance_fd != -1) {
+        	if (uhttp.subscription_server && (uhttp_session->instance_failed || uhttp_session->status == HTTP_STATUS_CONNECTING)) {
+                	uwsgi_log("marking %.*s as failed\n", (int) uhttp_session->instance_address_len,uhttp_session->instance_address);
+                        uhttp_session->un->len = 0;
+                }
+                close(uhttp_session->instance_fd);
+                uhttp_table[uhttp_session->instance_fd] = NULL;
+	}
+
+        uhttp.load--;
+	del_timeout(uhttp_session);	
+	free(uhttp_session);
+
+}
+
+void expire_timeouts(struct http_session **uhttp_table) {
+
+        time_t current = time(NULL);
+        struct uwsgi_rb_timer *urbt;
+
+        for(;;) {
+
+                urbt = uwsgi_min_rb_timer(uhttp.timeouts);
+
+		if (urbt == NULL) return;
+
+                if (urbt->key <= current) {
+                        close_session(uhttp_table, (struct http_session *)urbt->data);
+			uwsgi_log("timeout !!!\n");
+			continue;
+                }
+
+		break;
+        }
+}
+
+
+struct http_session *alloc_uhttp_session() {
+	
+	return uwsgi_malloc(sizeof(struct http_session));
+}
+
+uint16_t http_add_uwsgi_header(struct http_session *h_session, struct iovec *iov, char *strsize1, char *strsize2, char *hh, uint16_t hhlen, int *c) {
+
+	int i;
+	int status = 0;
+	char *val = hh;
+	uint16_t keylen = 0, vallen = 0;
+	int prefix = 0;
+
+	if (*c >= MAX_HTTP_VEC) return 0;
+
+	for(i=0;i<hhlen;i++) {
+		if (!status) {
+			hh[i] = toupper((int)hh[i]);
+			if (hh[i] == '-') hh[i] = '_';
+			if (hh[i] == ':') {
+				status = 1;
+				keylen = i;
+			}
+		}
+		else if (status == 1 && hh[i] != ' ') {
+			status = 2;
+			val += i;
+			vallen++;
+		}
+		else if (status == 2) {
+			vallen++;
+		}
+	}
+
+	if (!keylen) return 0;
+
+	if ((*c) + 4  >= MAX_HTTP_VEC) return 0;
+
+	if (!uwsgi_strncmp("HOST", 4, hh, keylen)) {
+                h_session->hostname = val;
+                h_session->hostname_len = vallen;
+        }
+
+	if (uwsgi_strncmp("CONTENT_TYPE", 12, hh, keylen) && uwsgi_strncmp("CONTENT_LENGTH", 14, hh, keylen)) {
+		keylen += 5;	
+		prefix = 1;
+		if ((*c) + 5  >= MAX_HTTP_VEC) return 0;
+	}
+
+        strsize1[0] = (uint8_t) (keylen & 0xff);
+        strsize1[1] = (uint8_t) ((keylen >> 8) & 0xff);
+
+        iov[*c].iov_base = strsize1 ;
+        iov[*c].iov_len = 2 ;
+        *c+=1;
+
+	if (prefix) {
+        	iov[*c].iov_base = "HTTP_" ;
+        	iov[*c].iov_len = 5 ;
+        	*c+=1;
+	}
+
+        iov[*c].iov_base = hh ;
+        iov[*c].iov_len = keylen - (prefix*5) ;
+        *c+=1;
+
+        strsize2[0] = (uint8_t) (vallen & 0xff);
+        strsize2[1] = (uint8_t) ((vallen >> 8) & 0xff);
+
+        iov[*c].iov_base = strsize2 ;
+        iov[*c].iov_len = 2 ;
+        *c+=1;
+
+        iov[*c].iov_base = val ;
+        iov[*c].iov_len = vallen ;
+        *c+=1;
+
+        return 2+keylen+2+vallen;
+}
+
+
+uint16_t http_add_uwsgi_var(struct iovec *iov, char *strsize1, char *strsize2, char *key, uint16_t keylen, char *val, uint16_t vallen, int *c) {
+
+	if ((*c) + 4  >= MAX_HTTP_VEC) return 0;
+
+	strsize1[0] = (uint8_t) (keylen & 0xff);
+        strsize1[1] = (uint8_t) ((keylen >> 8) & 0xff);
+
+	iov[*c].iov_base = strsize1 ;
+        iov[*c].iov_len = 2 ;
+        *c+=1;
+
+	iov[*c].iov_base = key ;
+        iov[*c].iov_len = keylen ;
+        *c+=1;
+
+	strsize2[0] = (uint8_t) (vallen & 0xff);
+        strsize2[1] = (uint8_t) ((vallen >> 8) & 0xff);
+
+	iov[*c].iov_base = strsize2 ;
+        iov[*c].iov_len = 2 ;
+        *c+=1;
+
+	iov[*c].iov_base = val ;
+        iov[*c].iov_len = vallen ;
+	*c+=1;
+	
+	return 2+keylen+2+vallen;
+}
+
+int http_parse(struct http_session *h_session) {
+
+	char *ptr = h_session->buffer;
+	char *watermark = h_session->ptr;
+	char *base = ptr;
+	// leave a slot for uwsgi header
+	int c = 1;
+	char *query_string = NULL;
+
+	// REQUEST_METHOD 
+	while(ptr < watermark) {
+		if (*ptr == ' ') {
+			h_session->uh.pktsize += http_add_uwsgi_var(h_session->iov, h_session->uss+c, h_session->uss+c+2, "REQUEST_METHOD", 14, base, ptr-base, &c);
+			ptr++;
+			break;
+		}
+		ptr++;
+	}
+
+	// REQUEST_URI / PATH_INFO / QUERY_STRING
+	base = ptr;
+	while(ptr < watermark) {
+                if (*ptr == '?' && !query_string) {
+			h_session->uh.pktsize += http_add_uwsgi_var(h_session->iov, h_session->uss+c, h_session->uss+c+2, "PATH_INFO", 9, base, ptr-base, &c);
+			query_string = ptr+1;
+		}
+                else if (*ptr == ' ') {
+			h_session->uh.pktsize += http_add_uwsgi_var(h_session->iov, h_session->uss+c, h_session->uss+c+2, "REQUEST_URI", 11, base, ptr-base, &c);
+			if (!query_string) {
+				h_session->uh.pktsize += http_add_uwsgi_var(h_session->iov, h_session->uss+c, h_session->uss+c+2, "PATH_INFO", 9, base, ptr-base, &c);
+				h_session->uh.pktsize += http_add_uwsgi_var(h_session->iov, h_session->uss+c, h_session->uss+c+2, "QUERY_STRING", 12, "", 0, &c);
+			}	
+			else {
+				h_session->uh.pktsize += http_add_uwsgi_var(h_session->iov, h_session->uss+c, h_session->uss+c+2, "QUERY_STRING", 12, query_string, ptr-query_string, &c);
+			}
+			ptr++;
+                        break;
+                }
+                ptr++;
+        }
+
+	// SERVER_PROTOCOL
+	base = ptr;
+	while(ptr < watermark) {
+		if (*ptr == '\r') {
+			if (ptr + 1 >= watermark) return 0;
+			if (*(ptr+1) != '\n') return 0;
+			h_session->uh.pktsize += http_add_uwsgi_var(h_session->iov, h_session->uss+c, h_session->uss+c+2, "SERVER_PROTOCOL", 15, base, ptr-base, &c);
+			ptr+=2;
+			break;
+		}
+		ptr++;
+	}
+
+	// SCRIPT_NAME
+	h_session->uh.pktsize += http_add_uwsgi_var(h_session->iov, h_session->uss+c, h_session->uss+c+2, "SCRIPT_NAME", 11, "", 0, &c);
+
+	// SERVER_NAME
+	h_session->uh.pktsize += http_add_uwsgi_var(h_session->iov, h_session->uss+c, h_session->uss+c+2, "SERVER_NAME", 11, uwsgi.hostname, uwsgi.hostname_len, &c);
+	h_session->hostname = uwsgi.hostname;
+	h_session->hostname_len = uwsgi.hostname_len;
+
+	// SERVER_PORT
+	h_session->uh.pktsize += http_add_uwsgi_var(h_session->iov, h_session->uss+c, h_session->uss+c+2, "SERVER_PORT", 11, uhttp.port, uhttp.port_len, &c);
+	h_session->hostname = uwsgi.hostname;
+	h_session->hostname_len = uwsgi.hostname_len;
+
+	// UWSGI_ROUTER
+	h_session->uh.pktsize += http_add_uwsgi_var(h_session->iov, h_session->uss+c, h_session->uss+c+2, "UWSGI_ROUTER", 12, "http", 4, &c);
+
+	// REMOTE_ADDR
+	if (inet_ntop(AF_INET, &h_session->ip_addr, h_session->ip, INET_ADDRSTRLEN)) {
+		h_session->uh.pktsize += http_add_uwsgi_var(h_session->iov, h_session->uss+c, h_session->uss+c+2, "REMOTE_ADDR", 11, h_session->ip, strlen(h_session->ip), &c);
+	}
+	else {
+		uwsgi_error("inet_ntop()");
+	}
+
+
+	//HEADERS
+
+	base = ptr;
+
+	while(ptr < watermark) {
+		if (*ptr == '\r') {
+			if (ptr + 1 >= watermark) return 0;
+			if (*(ptr+1) != '\n') return 0;
+			// multiline header ?
+			if (ptr+2 < watermark) {
+				if (*(ptr+2) == ' ' || *(ptr+2) == '\t') {
+					ptr+=2;
+					continue;
+				}
+			}
+			h_session->uh.pktsize += http_add_uwsgi_header(h_session, h_session->iov, h_session->uss+c, h_session->uss+c+2, base, ptr-base, &c);
+			ptr++;
+			base = ptr+1;
+		}
+		ptr++;
+	}
+
+#ifdef UWSGI_DEBUG
+	uwsgi_log("vec size: %d pkt size: %d load %d\n", c, h_session->uh.pktsize, uhttp.load);
+#endif
+
+	return c;
+	
+}
+
+void http_loop() {
+
+	int uhttp_queue;
+	int uhttp_subserver = -1;
+	int nevents;
+	int interesting_fd;
+	int new_connection;
+	ssize_t len;
+	int i,j;
+
+	char *magic_table[0xff];
+
+	char bbuf[UMAX16];
+
+	time_t delta;
+
+	struct uwsgi_rb_timer *min_timeout;
+	void *events;
+	struct msghdr msg;
+	union {
+                struct cmsghdr cmsg;
+                char control [CMSG_SPACE (sizeof (int))];
+        } msg_control;
+        struct cmsghdr *cmsg;
+
+	union uwsgi_sockaddr uhttp_addr;
+        socklen_t uhttp_addr_len = sizeof(struct sockaddr_un);
+	
+	struct http_session *uhttp_session;
+
+	struct http_session *uhttp_table[2048];
+	struct uwsgi_subscribe_req usr;
+
+	int soopt;
+        socklen_t solen = sizeof(int);
+
+	for(i=0;i<2048;i++) {
+		uhttp_table[i] = NULL;
+	}
+
+
+	uhttp.port = strchr(uhttp.socket_name,':')+1;
+	uhttp.port_len = strlen(uhttp.port);
+
+	uhttp_queue = event_queue_init();
+
+	events = event_queue_alloc(uhttp.nevents);
+
+	event_queue_add_fd_read(uhttp_queue, uhttp.server);
+
+	if (uhttp.subscription_server) {
+		uhttp_subserver = bind_to_udp(uhttp.subscription_server, 0, 0);
+		event_queue_add_fd_read(uhttp_queue, uhttp_subserver);
+		uhttp.subscription_dict = uwsgi_dict_create(100, 0);
+	}
+
+	if (uhttp.pattern) {
+		init_magic_table(magic_table);
+	}
+
+	uhttp.timeouts = uwsgi_init_rb_timer();
+	if (!uhttp.socket_timeout) uhttp.socket_timeout = 30;
+
+	for (;;) {
+
+		min_timeout = uwsgi_min_rb_timer(uhttp.timeouts);
+		if (min_timeout == NULL ) {
+			delta = -1;
+		}
+		else {
+			delta = min_timeout->key - time(NULL);
+			if (delta <= 0) {
+				expire_timeouts(uhttp_table);
+				delta = 0;
+			}
+		}
+		nevents = event_queue_wait_multi(uhttp_queue, delta, events, uhttp.nevents);
+
+		if (nevents == 0) {
+			// manage timeout
+			expire_timeouts(uhttp_table);
+		}
+
+		for (i=0;i<nevents;i++) {
+
+			interesting_fd = event_queue_interesting_fd(events, i);
+
+
+			if (interesting_fd == uhttp.server) {
+				new_connection = accept(uhttp.server, (struct sockaddr *) &uhttp_addr, &uhttp_addr_len);
+				if (new_connection < 0) {
+					continue;
+				}
+
+				uhttp_table[new_connection] = alloc_uhttp_session();
+				uhttp_table[new_connection]->fd = new_connection;
+				uhttp_table[new_connection]->instance_fd = -1; 
+				uhttp_table[new_connection]->status = HTTP_STATUS_RECV;
+				uhttp_table[new_connection]->h_pos = 0;
+				uhttp_table[new_connection]->pos = 0;
+				uhttp_table[new_connection]->rnrn = 0;
+				uhttp_table[new_connection]->parse_pos = 0;
+				uhttp_table[new_connection]->pass_fd = 0;
+				uhttp_table[new_connection]->ptr = uhttp_table[new_connection]->buffer;
+				uhttp_table[new_connection]->instance_address_len = 0;
+				uhttp_table[new_connection]->uh.modifier1 = uhttp.modifier1;
+				uhttp_table[new_connection]->uh.pktsize = 0;
+				uhttp_table[new_connection]->uh.modifier2 = 0;
+				uhttp_table[new_connection]->ip_addr = ((struct sockaddr_in *) &uhttp_addr)->sin_addr.s_addr;
+				uhttp_table[new_connection]->instance_failed = 0; 
+
+				uhttp_table[new_connection]->timeout = add_timeout(uhttp_table[new_connection]);
+
+				uhttp.load++;
+
+				event_queue_add_fd_read(uhttp_queue, new_connection);
+				
+			}	
+			else if (interesting_fd == uhttp_subserver) {
+				len = recv(uhttp_subserver, bbuf, 4096, 0);
+				if (len > 0) {
+					memset(&usr, 0, sizeof(struct uwsgi_subscribe_req));
+					uwsgi_hooked_parse(bbuf+4, len-4, http_manage_subscription, &usr);
+					uwsgi_add_subscriber(uhttp.subscription_dict, usr.key, usr.keylen, usr.address, usr.address_len);
+				}
+			}
+			else {
+				uhttp_session = uhttp_table[interesting_fd];
+
+				// something is going wrong...
+				if (uhttp_session == NULL) continue;
+
+				if (event_queue_interesting_fd_has_error(events, i)) {
+					close_session(uhttp_table, uhttp_session);
+					continue;
+				}
+
+				uhttp_session->timeout = reset_timeout(uhttp_session);
+
+				switch(uhttp_session->status) {
+
+
+					case HTTP_STATUS_RECV:
+						len = recv(uhttp_session->fd, uhttp_session->buffer + uhttp_session->h_pos, UMAX16-uhttp_session->h_pos, 0);
+						if (len <= 0) {
+							uwsgi_error("recv()");
+							close_session(uhttp_table, uhttp_session);
+							break;
+						}
+
+						uhttp_session->h_pos += len;
+
+						for(j=0;j<len;j++) {
+							//uwsgi_log("%d %d %d\n", j, *uhttp_session->ptr, uhttp_session->rnrn);
+							if (*uhttp_session->ptr == '\r' && (uhttp_session->rnrn == 0 || uhttp_session->rnrn == 2)) {
+								uhttp_session->rnrn++;
+							}
+							else if (*uhttp_session->ptr == '\r') {
+								uhttp_session->rnrn = 1;
+							}
+							else if (*uhttp_session->ptr == '\n' && uhttp_session->rnrn == 1) {
+								uhttp_session->rnrn = 2;
+							}
+							else if (*uhttp_session->ptr == '\n' && uhttp_session->rnrn == 3) {
+								uhttp_session->ptr++;
+								uhttp_session->remains = len-(j+1);
+								uhttp_session->iov_len = http_parse(uhttp_session);
+
+								if (uhttp_session->iov_len == 0) {
+									close_session(uhttp_table, uhttp_session);
+                                                                	break;
+								}
+
+
+								if (uhttp.use_cluster) {
+									uhttp_session->instance_address = uwsgi_cluster_best_node();
+									if (uhttp_session->instance_address) {
+										uhttp_session->instance_address_len = strlen(uhttp_session->instance_address);
+									}
+								}
+								else if (uhttp.use_cache) {
+									uhttp_session->instance_address = uwsgi_cache_get(uhttp_session->hostname, uhttp_session->hostname_len, &uhttp_session->instance_address_len);
+								}
+								else if (uhttp.base) {
+									uhttp_session->instance_address = uwsgi_concat2n(uhttp.base, uhttp.base_len, uhttp_session->hostname, uhttp_session->hostname_len);
+									uhttp_session->instance_address_len = uhttp.base_len + uhttp_session->hostname_len;
+								}
+								else if (uhttp.pattern) {
+									magic_table['s'] = uwsgi_concat2n(uhttp_session->hostname, uhttp_session->hostname_len, "", 0);       
+									int tmp_addr_len = 0;
+	                                                                uhttp_session->instance_address = magic_sub(uhttp.pattern, uhttp.pattern_len, &tmp_addr_len, magic_table);
+									uhttp_session->instance_address_len = tmp_addr_len;
+	                                                                free(magic_table['s']);	
+								}
+								else if (uhttp.to) {
+									uhttp_session->instance_address = uhttp.to;
+									uhttp_session->instance_address_len = uhttp.to_len;
+								}
+								else if (uhttp.subscription_server) {
+									uhttp_session->un = uwsgi_get_subscriber(uhttp.subscription_dict, uhttp_session->hostname, uhttp_session->hostname_len);
+									if (uhttp_session->un && uhttp_session->un->len) {
+										uhttp_session->instance_address = uhttp_session->un->name;
+										uhttp_session->instance_address_len = uhttp_session->un->len;
+									}
+								}
+								else if (uwsgi.sockets_cnt > 0) {
+									uhttp_session->instance_address = uwsgi.sockets[0].name;
+									uhttp_session->instance_address_len = strlen(uwsgi.sockets[0].name);
+								}
+
+								if (!uhttp_session->instance_address_len) {
+									close_session(uhttp_table, uhttp_session);
+                                                                	break;
+								}
+
+
+								uhttp_session->pass_fd = is_unix(uhttp_session->instance_address, uhttp_session->instance_address_len);
+
+								uhttp_session->instance_fd = uwsgi_connectn(uhttp_session->instance_address, uhttp_session->instance_address_len, 0, 1);
+
+#ifdef UWSGI_DEBUG
+								uwsgi_log("uwsgi backend: %.*s\n", (int) uhttp_session->instance_address_len,uhttp_session->instance_address);
+#endif
+
+								if (uhttp.pattern || uhttp.base ) {
+									free(uhttp_session->instance_address);
+								}
+
+								if (uhttp_session->instance_fd < 0) {
+									if (uhttp.subscription_server) {
+										uwsgi_log("marking %.*s as failed\n", (int) uhttp_session->instance_address_len,uhttp_session->instance_address);
+										uhttp_session->un->len = 0;
+									}
+									close_session(uhttp_table, uhttp_session);
+                                                                	break;
+                                                        	}
+
+
+                                                        	uhttp_session->status = HTTP_STATUS_CONNECTING;
+                                                        	uhttp_table[uhttp_session->instance_fd] = uhttp_session;
+                                                        	event_queue_add_fd_write(uhttp_queue, uhttp_session->instance_fd);
+								break;
+							}
+							else {
+								uhttp_session->rnrn = 0;
+							}
+							uhttp_session->ptr++;
+						}
+
+
+						break;
+
+
+					case HTTP_STATUS_CONNECTING:
+						
+						if (interesting_fd == uhttp_session->instance_fd) {
+
+							if (getsockopt(uhttp_session->instance_fd, SOL_SOCKET, SO_ERROR, (void *) (&soopt), &solen) < 0) {
+                                                		uwsgi_error("getsockopt()");
+								uhttp_session->instance_failed = 1;
+								close_session(uhttp_table, uhttp_session);
+                                                        	break;
+                                        		}
+
+							if (soopt) {
+								uwsgi_log("unable to connect() to uwsgi instance: %s\n", strerror(soopt));
+								uhttp_session->instance_failed = 1;
+								close_session(uhttp_table, uhttp_session);
+                                                        	break;
+							}
+
+#ifdef __BIG_ENDIAN__
+        						uhttp_session->uh.pktsize = uwsgi_swap16(uhttp_session->uh.pktsize);
+#endif
+
+							uhttp_session->iov[0].iov_base = &uhttp_session->uh;
+							uhttp_session->iov[0].iov_len = 4;
+
+							if (uhttp_session->remains > 0) {
+								uhttp_session->iov[uhttp_session->iov_len].iov_base = uhttp_session->ptr;
+								uhttp_session->iov[uhttp_session->iov_len].iov_len = uhttp_session->remains;
+								uhttp_session->iov_len++;
+							}
+
+							// fd passing: PERFORMANCE EXTREME BOOST !!!
+							if (uhttp_session->pass_fd && !uhttp_session->remains) {
+								msg.msg_name    = NULL;
+                						msg.msg_namelen = 0;
+                						msg.msg_iov     = uhttp_session->iov;
+                						msg.msg_iovlen  = uhttp_session->iov_len;
+                						msg.msg_flags   = 0;
+                						msg.msg_control    = &msg_control;
+                						msg.msg_controllen = sizeof (msg_control);
+
+                						cmsg = CMSG_FIRSTHDR (&msg);
+                						cmsg->cmsg_len   = CMSG_LEN (sizeof (int));
+                						cmsg->cmsg_level = SOL_SOCKET;
+                						cmsg->cmsg_type  = SCM_RIGHTS;
+
+								memcpy(CMSG_DATA(cmsg), &uhttp_session->fd, sizeof(int));
+
+                						if (sendmsg(uhttp_session->instance_fd, &msg, 0) < 0) {
+									uwsgi_error("sendmsg()");
+								}
+
+								close(uhttp_session->fd);
+                                                                close(uhttp_session->instance_fd);
+                                                                uhttp_table[uhttp_session->fd] = NULL;
+                                                                uhttp_table[uhttp_session->instance_fd] = NULL;
+								uhttp.load--;
+								del_timeout(uhttp_session);
+                                                                free(uhttp_session);
+                                                                break;
+							}
+
+							if (writev(uhttp_session->instance_fd, uhttp_session->iov, uhttp_session->iov_len) <= 0) {
+								uwsgi_error("writev()");
+								close_session(uhttp_table, uhttp_session);
+                                                        	break;
+							}
+
+							event_queue_fd_write_to_read(uhttp_queue, uhttp_session->instance_fd);
+							uhttp_session->status = HTTP_STATUS_RESPONSE;
+						}
+
+						break;
+
+					case HTTP_STATUS_RESPONSE:
+						
+						// data from instance
+						if (interesting_fd == uhttp_session->instance_fd) {
+							len = recv(uhttp_session->instance_fd, bbuf, UMAX16, 0);
+							if (len <= 0) {
+								if (len < 0) uwsgi_error("recv()");
+								close_session(uhttp_table, uhttp_session);
+                                                        	break;
+							}
+
+							len = send(uhttp_session->fd, bbuf, len, 0);
+							
+							if (len <= 0) {
+								if (len < 0) uwsgi_error("send()");
+								close(uhttp_session->fd);
+								close(uhttp_session->instance_fd);
+								uhttp_table[uhttp_session->fd] = NULL;
+								uhttp_table[uhttp_session->instance_fd] = NULL;
+								uhttp.load--;
+								del_timeout(uhttp_session);
+								free(uhttp_session);
+                                                        	break;
+							}
+						}
+						// body from client
+						else if (interesting_fd == uhttp_session->fd) {
+
+							//uwsgi_log("receiving body...\n");
+							len = recv(uhttp_session->fd, bbuf, UMAX16, 0);
+							if (len <= 0) {
+								if (len < 0) uwsgi_error("recv()");
+								close(uhttp_session->fd);
+								close(uhttp_session->instance_fd);
+								uhttp_table[uhttp_session->fd] = NULL;
+								uhttp_table[uhttp_session->instance_fd] = NULL;
+								uhttp.load--;
+								del_timeout(uhttp_session);
+								free(uhttp_session);
+                                                        	break;
+							}
+
+
+							len = send(uhttp_session->instance_fd, bbuf, len, 0);
+							
+							if (len <= 0) {
+								if (len < 0) uwsgi_error("send()");
+								close_session(uhttp_table, uhttp_session);
+                                                        	break;
+							}
+						}
+
+						break;
+
+
+
+					// fallback to destroy !!!
+					default:
+						uwsgi_log("default action\n");
+						close(uhttp_session->fd);
+						uhttp_table[uhttp_session->fd] = NULL;
+						if (uhttp_session->instance_fd != -1) {
+							close(uhttp_session->instance_fd);
+							uhttp_table[uhttp_session->instance_fd] = NULL;
+						}
+						uhttp.load--;
+						del_timeout(uhttp_session);
+						free(uhttp_session);
+						break;
+					
+				}
+			}
+
+		}
+	}
+}
+
+int http_init() {
+
+	if (uhttp.socket_name) {
+
+		if (uhttp.use_cache && !uwsgi.cache_max_items) {
+			uwsgi_log("you need to create a uwsgi cache to use the http (add --cache <n>)\n");
+			exit(1);
+		}
+
+		if (!uhttp.nevents) uhttp.nevents = 64;
+
+		if (!uhttp.base && !uhttp.use_cache && !uhttp.to && !uwsgi.sockets_cnt && !uhttp.subscription_server && !uhttp.use_cluster) {
+			uwsgi.sockets[0].name = uwsgi_malloc(64);
+			uwsgi.sockets_cnt++;
+			snprintf(uwsgi.sockets[0].name, 64, "%d_%d.sock", (int) time(NULL), (int) getpid());
+		}
+
+		uhttp.server = bind_to_tcp(uhttp.socket_name, uwsgi.listen_queue, strchr(uhttp.socket_name,':'));
+
+		if (register_gateway("http", http_loop) == NULL) {
+			uwsgi_log("unable to register the http gateway\n");
+			exit(1);
+		}
+	}
+
+	return 0;
+}
+	
+int http_opt(int i, char *optarg) {
+
+	switch(i) {
+		case LONG_ARGS_HTTP:
+			uhttp.socket_name = optarg;
+			return 1;
+		case LONG_ARGS_HTTP_SUBSCRIPTION_SERVER:
+			uhttp.subscription_server = optarg;
+			return 1;
+		case LONG_ARGS_HTTP_EVENTS:
+			uhttp.nevents = atoi(optarg);
+			return 1;
+		case LONG_ARGS_HTTP_USE_PATTERN:
+			uhttp.pattern = optarg;
+			// optimization
+			uhttp.pattern_len = strlen(uhttp.pattern);
+			return 1;
+		case LONG_ARGS_HTTP_USE_BASE:
+			uhttp.base = optarg;
+			// optimization
+			uhttp.base_len = strlen(uhttp.base);
+			return 1;
+		case LONG_ARGS_HTTP_USE_TO:
+			uhttp.to = optarg;
+			// optimization
+			uhttp.to_len = strlen(uhttp.to);
+			return 1;
+		case LONG_ARGS_HTTP_VAR:
+                        if (uhttp.http_vars_cnt < MAX_HTTP_EXTRA_VARS) {
+                                uhttp.http_vars[uhttp.http_vars_cnt] = optarg;
+                                uhttp.http_vars_cnt++;
+                        } else {
+                                uwsgi_log("you can specify at most 64 --http-var options\n");
+                        }
+                        return 1;
+                case LONG_ARGS_HTTP_MODIFIER1:
+                        uhttp.modifier1 = (uint8_t) atoi(optarg);
+                        return 1;
+                case LONG_ARGS_HTTP_TIMEOUT:
+                        uhttp.socket_timeout = atoi(optarg);
+                        return 1;
+	}
+	return 0;
+}
+
+
+
+struct uwsgi_plugin http_plugin = {
+
+        .options = http_options,
+        .manage_opt = http_opt,
+        .init = http_init,
+};
+

plugins/http/uwsgiplugin.py

@@ -0,0 +1,7 @@
+
+NAME='http'
+CFLAGS = []
+LDFLAGS = []
+LIBS = []
+
+GCC_LIST = ['http']

plugins/jvm/jvm.h

@@ -0,0 +1,41 @@
+#include "../../uwsgi.h"
+#include <jni.h>
+
+#define MAX_CLASSPATH 64
+
+#define LONG_ARGS_JVM_BASE      17000 + (300 * 100)
+#define LONG_ARGS_JVM_CLASS     LONG_ARGS_JVM_BASE + 1
+#define LONG_ARGS_JVM_CLASSPATH LONG_ARGS_JVM_BASE + 2
+
+struct uwsgi_jvm {
+
+        char *classpath[MAX_CLASSPATH];
+        int classpath_cnt;
+
+        JNIEnv  *env;
+        char *class;
+        jclass main_class;
+
+	jclass str_class;
+	jclass ht_class;
+	jclass fd_class;
+};
+
+
+jmethodID uwsgi_jvm_get_method_id(jclass, char *, char *);
+jmethodID uwsgi_jvm_get_static_method_id(jclass, char *, char *);
+jclass uwsgi_jvm_get_class(char *);
+jclass uwsgi_jvm_get_object_class(jobject);
+int uwsgi_jvm_exception(void);
+
+jobject uwsgi_jvm_str_new(char *, int );
+jobject uwsgi_jvm_str(char *);
+
+jobject uwsgi_jvm_array_get(jobject , int );
+jobject uwsgi_jvm_ht_new(void);
+jobject uwsgi_jvm_ht_put(jobject, jobject, jobject);
+
+jobject uwsgi_jvm_fd(int);
+
+char *uwsgi_jvm_str2c(jobject);
+int uwsgi_jvm_strlen2c(jobject);

plugins/jvm/jvm_plugin.c

@@ -0,0 +1,230 @@
+#include "jvm.h"
+
+/*
+
+with javap -s -p <class>
+you can get method signatures
+
+*/
+
+struct uwsgi_jvm ujvm;
+
+struct option uwsgi_jvm_options[] = {
+        {"jvm-main-class", required_argument, 0, LONG_ARGS_JVM_CLASS},
+        {"jvm-classpath", required_argument, 0, LONG_ARGS_JVM_CLASSPATH},
+        {0, 0, 0, 0},
+};
+
+int uwsgi_jvm_exception(void) {
+
+	if ((*ujvm.env)->ExceptionOccurred(ujvm.env)) {
+                (*ujvm.env)->ExceptionDescribe(ujvm.env);
+                (*ujvm.env)->ExceptionClear(ujvm.env);
+                return 1;
+        }
+	
+	return 0;
+}
+
+jclass uwsgi_jvm_get_object_class(jobject obj) {
+	return (*ujvm.env)->GetObjectClass(ujvm.env, obj);
+}
+
+jclass uwsgi_jvm_get_class(char *name) {
+
+	jclass my_class = (*ujvm.env)->FindClass(ujvm.env, name);
+	
+	if (uwsgi_jvm_exception()) {
+		return NULL;
+        }
+
+	return my_class;
+}
+
+jmethodID uwsgi_jvm_get_method_id(jclass cls, char *name, char *signature) {
+
+	jmethodID mid;
+
+	mid = (*ujvm.env)->GetMethodID(ujvm.env, cls, name, signature);
+
+	return mid;
+}
+
+jmethodID uwsgi_jvm_get_static_method_id(jclass cls, char *name, char *signature) {
+
+	jmethodID mid;
+
+	mid = (*ujvm.env)->GetStaticMethodID(ujvm.env, cls, name, signature);
+
+	return mid;
+}
+
+jobject uwsgi_jvm_str_new(char *str, int len) {
+
+	jbyteArray ba;
+	static jmethodID str_new_mid = 0;
+
+	if (!str_new_mid) {
+		str_new_mid = uwsgi_jvm_get_method_id(ujvm.str_class, "<init>", "([BLjava/lang/String;)V");
+	}
+
+	ba = (*ujvm.env)->NewByteArray(ujvm.env, len);
+        (*ujvm.env)->SetByteArrayRegion(ujvm.env, ba, 0, len, (jbyte *) str);
+        return (*ujvm.env)->NewObject(ujvm.env, ujvm.str_class, str_new_mid, ba,
+        		(*ujvm.env)->NewStringUTF(ujvm.env, "UTF-8"));
+}
+
+jobject uwsgi_jvm_str(char *str) {
+	return (*ujvm.env)->NewStringUTF(ujvm.env, str);
+}
+
+
+int jvm_init(void) {
+
+        jint res;
+        JavaVM          *jvm;
+        JavaVMInitArgs  vm_args;
+        JavaVMOption    options[1];
+	jmethodID mmid;
+
+	int i;
+	char *old_cp = NULL ;
+
+
+        vm_args.version = JNI_VERSION_1_2;
+
+        JNI_GetDefaultJavaVMInitArgs(&vm_args);
+
+        options[0].optionString = "-Djava.class.path=.";
+
+	if (ujvm.classpath_cnt > 0) {
+		for(i=0;i<ujvm.classpath_cnt;i++) {
+			if (old_cp) {
+				options[0].optionString = uwsgi_concat3(old_cp, ":", ujvm.classpath[i]);
+				free(old_cp);
+			}	
+			else {
+				options[0].optionString = uwsgi_concat3(options[0].optionString, ":", ujvm.classpath[i]);
+			}
+			old_cp = options[0].optionString ;
+		}
+	}
+
+        vm_args.options  = options;
+        vm_args.nOptions = 1;
+
+        res = JNI_CreateJavaVM(&jvm, (void **) &ujvm.env, &vm_args);
+
+	if (res) {
+		uwsgi_log("unable to initialize JVM\n");
+		exit(1);
+	}
+
+	uwsgi_log("JVM initialized\n");
+
+	if (ujvm.class) {
+		ujvm.main_class = uwsgi_jvm_get_class(ujvm.class);
+		if (!ujvm.main_class) {
+			exit(1);
+		}
+
+		mmid = uwsgi_jvm_get_static_method_id(ujvm.main_class, "main", "([Ljava/lang/String;)V");
+		if (mmid) {
+			(*ujvm.env)->CallStaticVoidMethod(ujvm.env, ujvm.main_class, mmid);
+			uwsgi_jvm_exception();
+		}
+	}
+
+	ujvm.str_class = uwsgi_jvm_get_class("java/lang/String");
+	ujvm.ht_class = uwsgi_jvm_get_class("java/util/Hashtable");
+	ujvm.fd_class = uwsgi_jvm_get_class("java/io/FileDescriptor");
+
+	return 1;
+
+}
+
+jobject uwsgi_jvm_array_get(jobject obj, int index) {
+	return (*ujvm.env)->GetObjectArrayElement(ujvm.env, obj, index);
+}
+
+jobject uwsgi_jvm_ht_new() {
+	static jmethodID htimid = 0;
+
+	if (!htimid) {
+		htimid = uwsgi_jvm_get_method_id(ujvm.ht_class, "<init>", "()V");
+	}
+
+	return (*ujvm.env)->NewObject(ujvm.env, ujvm.ht_class, htimid);
+}
+
+jobject uwsgi_jvm_ht_put(jobject obj, jobject key, jobject val) {
+	
+	static jmethodID htpmid = 0 ;
+
+	if (!htpmid) {
+		htpmid = uwsgi_jvm_get_method_id(ujvm.ht_class, "put", "(Ljava/lang/Object;Ljava/lang/Object;)Ljava/lang/Object;");
+	}
+
+        return (*ujvm.env)->CallObjectMethod(ujvm.env, obj, htpmid, key, val);
+}
+
+jobject uwsgi_jvm_fd(int fd) {
+
+	jobject fd_obj;
+	static jmethodID fd_mid = 0;
+	static jfieldID fd_field = 0 ;
+
+	if (!fd_mid) {
+		fd_mid = uwsgi_jvm_get_method_id( ujvm.fd_class, "<init>", "()V");	
+	}
+
+        fd_obj = (*ujvm.env)->NewObject(ujvm.env, ujvm.fd_class, fd_mid);
+
+	if (!fd_field) {
+        	fd_field = (*ujvm.env)->GetFieldID(ujvm.env, ujvm.fd_class, "fd", "I");
+	}
+
+        (*ujvm.env)->SetIntField(ujvm.env, fd_obj, fd_field, fd);
+
+	return fd_obj;
+}
+
+char *uwsgi_jvm_str2c(jobject obj) {
+
+	return (char *) (*ujvm.env)->GetStringUTFChars(ujvm.env, obj, NULL);
+}
+
+int uwsgi_jvm_strlen2c(jobject obj) {
+
+	return (*ujvm.env)->GetStringUTFLength(ujvm.env, obj);
+}
+
+int uwsgi_jvm_manage_opt(int i, char *optarg) {
+
+	switch(i) {
+		case LONG_ARGS_JVM_CLASS:
+			ujvm.class = optarg;
+			return 1;
+		case LONG_ARGS_JVM_CLASSPATH:
+                	if (ujvm.classpath_cnt < MAX_CLASSPATH) {
+                        	ujvm.classpath[ujvm.classpath_cnt] = optarg;
+                                ujvm.classpath_cnt++;
+                        }
+                        else {
+                        	uwsgi_log( "you can specify at most %d --jvm-classpath options\n", MAX_CLASSPATH);
+                        }
+                        return 1;
+	}
+
+	return 0;
+}
+
+struct uwsgi_plugin jvm_plugin = {
+
+	.name = "jvm",
+	.init = jvm_init,
+	.options = uwsgi_jvm_options,
+	.manage_opt = uwsgi_jvm_manage_opt,
+};
+
+

plugins/jvm/uwsgiplugin.py

@@ -0,0 +1,37 @@
+import os,sys
+
+NAME='jvm'
+
+# Snow Leopard
+#JVM_INCPATH = "/Developer/SDKs/MacOSX10.6.sdk/System/Library/Frameworks/JavaVM.framework/Versions/1.6.0/Headers/"
+#JVM_LIBPATH = "/Developer/SDKs/MacOSX10.6.sdk/System/Library/Frameworks/JavaVM.framework/Versions/1.6.0/Libraries/ -framework JavaVM"
+
+# FreeBSD openjdk7 example
+# env UWSGICONFIG_JVM_INCPATH="/usr/local/openjdk7/include -I/usr/local/openjdk7/include/freebsd/" UWSGICONFIG_JVM_LIBPATH="/usr/local/openjdk7/jre/lib/amd64/server" python uwsgiconfig.py --plugin plugins/jvm
+
+# NexentaOS example
+# UWSGICONFIG_JVM_INCPATH="/usr/java/include -I /usr/java/include/solaris" UWSGICONFIG_JVM_LIBPATH="/usr/java/jre/lib/i386/" python uwsgiconfig.py --plugin plugins/jvm
+
+# Ubuntu
+JVM_INCPATH = "/usr/lib/jvm/java-6-sun-1.6.0.15/include/ -I/usr/lib/jvm/java-6-sun-1.6.0.15/include/linux"
+JVM_LIBPATH = "/usr/lib/jvm/java-6-sun-1.6.0.15/jre/lib/i386/server/"
+
+try:
+    JVM_INCPATH = os.environ['UWSGICONFIG_JVM_INCPATH']
+except:
+    pass
+
+try:
+    JVM_LIBPATH = os.environ['UWSGICONFIG_JVM_LIBPATH']
+except:
+    pass
+
+CFLAGS = ['-I' + JVM_INCPATH]
+LDFLAGS = ['-L' + JVM_LIBPATH]
+LIBS = ['-ljvm']
+GCC_LIST = ['jvm_plugin']
+
+if os.environ.has_key('LD_RUN_PATH'):
+	os.environ['LD_RUN_PATH'] += ':' + JVM_LIBPATH
+else:
+	os.environ['LD_RUN_PATH'] = JVM_LIBPATH

plugins/jwsgi/jwsgi_plugin.c

@@ -0,0 +1,117 @@
+#include "../jvm/jvm.h"
+
+extern struct uwsgi_server uwsgi;
+extern struct uwsgi_jvm ujvm;
+
+void uwsgi_jwsgi_init(void) {
+
+
+}
+
+int uwsgi_jwsgi_request(struct wsgi_request *wsgi_req) {
+
+	jmethodID jmid;
+	int i;
+	jobject env;
+	jobject hkey, hval;
+	jobject response;
+
+	jobject status;
+	jobject headers, header;
+	jobject body;
+
+	jclass hc;
+
+	jmethodID hh_size, hh_get;
+	int hlen;
+
+	if (!wsgi_req->uh.pktsize) {
+                uwsgi_log("Invalid JWSGI request. skip.\n");
+                return -1;
+        }
+
+
+        if (uwsgi_parse_vars(wsgi_req)) {
+                uwsgi_log("Invalid JWSGI request. skip.\n");
+                return -1;
+        }
+
+	
+	jmid = uwsgi_jvm_get_static_method_id(ujvm.main_class, "jwsgi", "(Ljava/util/Hashtable;)[Ljava/lang/Object;");
+
+	uwsgi_log("jwsgi method id = %d\n", jmid);
+
+	env = uwsgi_jvm_ht_new();
+	uwsgi_jvm_exception();
+
+	for(i=0;i<wsgi_req->var_cnt;i++) {
+		
+		uwsgi_jvm_ht_put(env,
+				uwsgi_jvm_str_new(wsgi_req->hvec[i].iov_base, wsgi_req->hvec[i].iov_len),
+				uwsgi_jvm_str_new(wsgi_req->hvec[i+1].iov_base, wsgi_req->hvec[i+1].iov_len)
+				);
+
+		// check if something is going wrong during hashtable fill
+		uwsgi_jvm_exception();
+
+                i++;
+        }
+
+	uwsgi_log("env created\n");
+	
+	uwsgi_jvm_ht_put(env, uwsgi_jvm_str("jwsgi.input"), uwsgi_jvm_fd(wsgi_req->poll.fd));
+
+	uwsgi_log("jwsgi.input created\n");
+	
+	response = (*ujvm.env)->CallObjectMethod(ujvm.env, ujvm.main_class, jmid, env);
+	uwsgi_jvm_exception();
+
+	uwsgi_log("RESPONSE SIZE %d\n", (*ujvm.env)->GetArrayLength(ujvm.env, response));
+
+	status = uwsgi_jvm_array_get(response, 0);
+	uwsgi_jvm_exception();
+
+	wsgi_req->headers_size += write(wsgi_req->poll.fd, wsgi_req->protocol, wsgi_req->protocol_len);
+	wsgi_req->headers_size += write(wsgi_req->poll.fd, " ", 1);
+	wsgi_req->headers_size += write(wsgi_req->poll.fd, uwsgi_jvm_str2c(status), uwsgi_jvm_strlen2c(status));
+	wsgi_req->headers_size += write(wsgi_req->poll.fd, "\r\n", 2);
+
+	
+	headers = uwsgi_jvm_array_get(response, 1);
+	hc = uwsgi_jvm_get_object_class(headers);
+	hh_size = uwsgi_jvm_get_method_id(hc, "size","()I");
+	hh_get = uwsgi_jvm_get_method_id(hc, "get","(I)Ljava/lang/Object;");
+
+	hlen = (*ujvm.env)->CallIntMethod(ujvm.env, headers, hh_size);
+
+	for(i=0;i<hlen;i++) {
+		header = (*ujvm.env)->CallObjectMethod(ujvm.env, headers, hh_get, i);
+		hkey = uwsgi_jvm_array_get(header, 0);		
+		hval = uwsgi_jvm_array_get(header, 1);		
+
+		wsgi_req->headers_size += write(wsgi_req->poll.fd, uwsgi_jvm_str2c(hkey), uwsgi_jvm_strlen2c(hkey));
+		wsgi_req->headers_size += write(wsgi_req->poll.fd, ": ", 2);
+		wsgi_req->headers_size += write(wsgi_req->poll.fd, uwsgi_jvm_str2c(hval), uwsgi_jvm_strlen2c(hval));
+		wsgi_req->headers_size += write(wsgi_req->poll.fd, "\r\n", 2);
+	}
+
+	wsgi_req->headers_size += write(wsgi_req->poll.fd, "\r\n", 2);
+
+	body = uwsgi_jvm_array_get(response, 2);
+
+	wsgi_req->response_size = write(wsgi_req->poll.fd, (*ujvm.env)->GetStringUTFChars(ujvm.env, body, NULL), (*ujvm.env)->GetStringUTFLength(ujvm.env, body));
+
+	return 1;
+}
+
+void uwsgi_jwsgi_after_request(struct wsgi_request *wsgi_req) {
+	log_request(wsgi_req);
+}
+
+struct uwsgi_plugin jwsgi_plugin = {
+
+	.name = "jwsgi",
+	.modifier1 = 8,
+	.request = uwsgi_jwsgi_request,
+	.after_request = uwsgi_jwsgi_after_request,
+};

plugins/jwsgi/uwsgiplugin.py

@@ -0,0 +1,22 @@
+import os,sys
+
+NAME='jwsgi'
+
+# Snow Leopard
+#JVM_INCPATH = "/Developer/SDKs/MacOSX10.6.sdk/System/Library/Frameworks/JavaVM.framework/Versions/1.6.0/Headers/"
+#JVM_LIBPATH = "/Developer/SDKs/MacOSX10.6.sdk/System/Library/Frameworks/JavaVM.framework/Versions/1.6.0/Libraries/ -framework JavaVM"
+
+# Ubuntu
+JVM_INCPATH = "/usr/lib/jvm/java-6-sun-1.6.0.15/include/ -I/usr/lib/jvm/java-6-sun-1.6.0.15/include/linux"
+JVM_LIBPATH = "/usr/lib/jvm/java-6-sun-1.6.0.15/jre/lib/i386/server/"
+
+
+CFLAGS = ['-I' + JVM_INCPATH]
+LDFLAGS = ['-L' + JVM_LIBPATH]
+LIBS = ['-ljvm']
+GCC_LIST = ['jwsgi_plugin']
+
+if os.environ.has_key('LD_RUN_PATH'):
+	os.environ['LD_RUN_PATH'] += ':' + JVM_LIBPATH
+else:
+	os.environ['LD_RUN_PATH'] = JVM_LIBPATH

plugins/lua/lua_plugin.c

@@ -1,213 +1,670 @@
-#include <uwsgi.h>
-
-/* gcc -fPIC -shared -o lua_plugin.so `python2.5-config --cflags` -I /usr/include/lua5.1 -llua5.1 lua_plugin.c */
+#include "../../uwsgi.h"
 
 #include <lua.h>
 #include <lualib.h>
+#include <lauxlib.h>
 
+extern struct uwsgi_server uwsgi;
 
-static struct uwsgi_lua {
-	struct lua_State *L ;
-	struct uwsgi_server *uwsgi;
+struct uwsgi_lua {
+	struct lua_State **L;
+
+	char *filename;
 } ulua;
 
-static void *uwsgi_lua_alloc(void *ud, void *ptr, size_t osize, size_t nsize) {
-	if(nsize == 0) {
-		free(ptr);
-		return NULL;
-	}
+#define LONG_ARGS_LUA_BASE	17000 + (6 * 100)
+#define LONG_ARGS_LUA		LONG_ARGS_LUA_BASE + 1
 
-	return realloc(ptr, nsize);
+#define lca(L, n)		ulua_check_args(L, __FUNCTION__, n)
+
+struct option uwsgi_lua_options[] = {
+
+	{"lua", required_argument, 0, LONG_ARGS_LUA},
+
+	{0, 0, 0, 0},
+
+};
+
+static void ulua_check_args(lua_State *L, const char *func, int n) {
+	int args = lua_gettop(L);
+	char error[4096];
+	if (args != n) {
+		if (n == 1) {
+			snprintf(error, 4096, "uwsgi.%s takes 1 parameter", func+10);
+		}
+		else {
+			snprintf(error, 4096, "uwsgi.%s takes %d parameters", func+10, n);
+		}
+		lua_pushstring(L, error);
+        	lua_error(L);
+	}
 }
 
-static const char *uwsgi_read_lua(lua_State *L, void *data, size_t *size) {
-
-	int fd = *(int *)data;
-	static char buf[4096];
-
-	*size = read(fd, buf, 4096);
+static int uwsgi_api_log(lua_State *L) {
 	
-	if (size == 0) {
-		return NULL;
+	const char *logline ;
+
+	lca(L, 1);
+
+	if (lua_isstring(L, 1)) {
+		logline = lua_tolstring(L, 1, NULL);
+                uwsgi_log( "%s\n", logline);
+	}
+
+	return 0;
+}
+
+static int uwsgi_api_register_rpc(lua_State *L) {
+
+        uint8_t argc = lua_gettop(L);
+	const char *name;
+	// a hack for 64bit;
+	int func;
+	long lfunc;
+
+	if (argc < 2) {
+		lua_pushnil(L);
+		return 1;
+	}
+
+	name = lua_tolstring(L, 1, NULL);
+
+	lua_pushvalue(L, 2);
+        func = luaL_ref(L, LUA_REGISTRYINDEX);
+
+	uwsgi_log("registered function %d in global table\n", func);
+	lfunc = func;
+
+        if (uwsgi_register_rpc((char *)name, 6, 0, (void *) lfunc)) {
+		lua_pushnil(L);
+        }
+	else {
+		lua_pushboolean(L, 1);
+	}
+
+	return 1;
+}
+
+
+
+static char *encode_lua_table(lua_State *L, int index, uint16_t *size) {
+
+	char *buf, *ptrbuf;
+	char *key;
+	char *value;
+	size_t keylen;
+	size_t vallen;
+
+	*size = 0;
+
+	lua_pushnil(L);
+	while (lua_next(L, index) != 0) {
+		if (lua_isstring(L, -2) && lua_isstring(L, -1)) {
+			key = (char *) lua_tolstring(L, -2, &keylen);
+			value = (char *) lua_tolstring(L, -1, &vallen);
+			if (keylen > 0xffff || vallen > 0xffff) continue;
+			*size += (2+keylen+2+vallen);
+		}
+		lua_pop(L, 1);
+	}
+
+	buf = malloc(*size);
+	if (!buf) {
+		uwsgi_error("malloc()");
+		exit(1);
+	}
+
+	ptrbuf = buf;
+	lua_pushnil(L);
+	while (lua_next(L, index) != 0) {
+		if (lua_isstring(L, -2) && lua_isstring(L, -1)) {
+			key = (char *) lua_tolstring(L, -2, &keylen);
+			value = (char *) lua_tolstring(L, -1, &vallen);
+
+			if (keylen > 0xffff || vallen > 0xffff) continue;
+
+			*ptrbuf++ = (uint8_t) (keylen  & 0xff);
+                        *ptrbuf++ = (uint8_t) ((keylen >>8) & 0xff);
+			memcpy(ptrbuf, key, keylen); ptrbuf += keylen;
+			*ptrbuf++ = (uint8_t) (vallen  & 0xff);
+                        *ptrbuf++ = (uint8_t) ((vallen >>8) & 0xff);
+			memcpy(ptrbuf, value, vallen); ptrbuf += vallen;
+		}
+		lua_pop(L, 1);
 	}
 
 	return buf;
 }
 
-static int uwsgi_lua_input(lua_State *L) {
+static int uwsgi_api_cache_set(lua_State *L) {
 
-        int n = lua_gettop(L);
+	int args = lua_gettop(L);
+        const char *key ;
+        const char *value ;
+        uint64_t expires = 0;
+	size_t vallen;
 
-	static char *buf = "" ;
 
-	fprintf(stderr,"richiesti %d bytes\n", n);
+	if (args > 1) {
 
-	//sum = read(ulua.uwsgi->poll.fd,); 
+		key = lua_tolstring(L, 1, NULL);
+		value = lua_tolstring(L, 2, &vallen);
+		if (args > 2) {
+			expires = lua_tonumber(L, 3);
+		}
 
-        lua_pushlstring(L, buf, 0);
+        	uwsgi_cache_set((char *)key, strlen(key), (char *)value, (uint16_t) vallen, expires, 0);
+		
+	}
 
+	lua_pushnil(L);
+	return 1;
+
+}
+
+static int uwsgi_api_register_signal(lua_State *L) {
+
+	int args = lua_gettop(L);
+	uint8_t sig;
+	long lhandler;
+	const char *who;
+	
+	if (args >= 3) {
+
+		sig = lua_tonumber(L, 1);
+		who = lua_tostring(L, 2);
+		lua_pushvalue(L, 3);
+		lhandler = luaL_ref(L, LUA_REGISTRYINDEX);
+
+		uwsgi_register_signal(sig, (char *)who, (void *) lhandler, 6);
+	}
+
+	lua_pushnil(L);
         return 1;
 }
 
-int uwsgi_init(struct uwsgi_server *uwsgi, char *args){
 
-	int fd, i;
+static int uwsgi_api_cache_get(lua_State *L) {
 
-	fprintf(stderr,"Initializing Lua environment...\n");
+        char *value ;
+        uint64_t valsize;
+	const char *key ;
 
-	
-	
+        lca(L, 1);
 
-	ulua.L = lua_newstate(uwsgi_lua_alloc, NULL);
+	if (lua_isstring(L, 1)) {
 
-	luaL_openlibs(ulua.L);
+		key = lua_tolstring(L, 1, NULL);
+        	value = uwsgi_cache_get((char *)key, strlen(key), &valsize);
+
+        	if (value) {
+                	lua_pushlstring(L, value, valsize);
+			return 1;
+        	}
 
-	
-	fd = open(args, O_RDONLY) ;
-	if (fd < 0) {
-		perror("open()");
-		return -1 ;
 	}
-	
-	
-	i = lua_load(ulua.L, uwsgi_read_lua, &fd, "uwsgi");
 
-	fprintf(stderr,"lua_load: %d\n" ,i);
+	lua_pushnil(L);
 
-	// use a pcall
-	lua_call(ulua.L, 0, 1);
+        return 1;
 
-	fprintf(stderr,"%s\n", lua_typename(ulua.L, lua_type(ulua.L, -1)));
-
-	// ok the lua engine is ready
-	return 0 ;
-	
-	
 }
 
-int uwsgi_request(struct uwsgi_server *uwsgi, struct wsgi_request *wsgi_req) {
+
+static int uwsgi_api_send_message(lua_State *L) {
+
+	int args = lua_gettop(L);
+	const char *host;
+	int uwsgi_fd;
+	uint8_t modifier1, modifier2;
+	char *pkt = NULL;
+	uint16_t pktsize = 0 ;
+	char buf[4096];
+	int rlen;
+	int items = 0;
+	int input_fd = -1, timeout = -1, input_size = 0;
+	
+	// is this an fd ?
+	if (lua_isnumber(L, 1)) {
+		args = 1;
+	}
+	else if (lua_isstring(L, 1)) {
+		host = lua_tolstring(L, 1, NULL);	
+		uwsgi_fd = uwsgi_connect((char *)host, timeout, 0);
+		modifier1 = lua_tonumber(L, 2);	
+		modifier2 = lua_tonumber(L, 3);	
+		if (args > 4) {
+			timeout = lua_tonumber(L, 5);
+			if (args == 7) {
+				input_fd = lua_tonumber(L, 6);	
+				input_size = lua_tonumber(L, 7);	
+			}
+		}
+		if (lua_istable(L,4)) {
+			// passed a table
+			pkt = encode_lua_table(L, 4, &pktsize);
+		}
+	 	if (uwsgi_send_message(uwsgi_fd, modifier1, modifier2, pkt, pktsize, input_fd, input_size, timeout) == -1) {
+			free(pkt);
+			lua_pushnil(L);
+			return 1;
+		}
+		free(pkt);
+
+		for(;;) {
+        		rlen = uwsgi_waitfd(uwsgi_fd, timeout);
+        		if (rlen > 0) {
+                		rlen = read(uwsgi_fd, buf, 4096);
+                		if (rlen < 0) {
+                        		uwsgi_error("read()");
+					break;
+                		}
+                		else if (rlen > 0) {
+					lua_pushlstring(L, buf, rlen);	
+					items++;
+                		}
+				else {
+					break;
+				}
+			}
+        		else if (rlen == 0) {
+                		uwsgi_log("uwsgi request timed out waiting for response\n");
+				break;
+        		}
+		}
+
+                close(uwsgi_fd);
+
+	}
+	
+	return items;
+}
+
+static int uwsgi_api_cl(lua_State *L) {
+
+	struct wsgi_request *wsgi_req = current_wsgi_req();
+	
+	lua_pushnumber(L, wsgi_req->post_cl);
+	return 1;
+}
+
+static int uwsgi_api_req_fd(lua_State *L) {
+
+	struct wsgi_request *wsgi_req = current_wsgi_req();
+	
+	lua_pushnumber(L, wsgi_req->poll.fd);
+	return 1;
+}
+
+static const luaL_reg uwsgi_api[] = {
+  {"log", uwsgi_api_log},
+  {"cl", uwsgi_api_cl},
+  {"req_fd", uwsgi_api_req_fd},
+  {"send_message", uwsgi_api_send_message},
+  {"cache_get", uwsgi_api_cache_get},
+  {"cache_set", uwsgi_api_cache_set},
+  {"register_signal", uwsgi_api_register_signal},
+  {"register_rpc", uwsgi_api_register_rpc},
+  {NULL, NULL}
+};
+
+
+
+static int uwsgi_lua_input(lua_State *L) {
+
+	struct wsgi_request *wsgi_req = current_wsgi_req();
+	ssize_t sum, len, total;
+	char *buf, *ptr;
+
+	int n = lua_gettop(L);
+
+	if (!wsgi_req->post_cl) {
+		lua_pushlstring(L, "", 0);
+		return 1;
+	}
+
+	sum = lua_tonumber(L, 2);
+
+	if (n > 1) {
+		uwsgi_log("requested %d bytes\n", sum);
+	}
+
+	buf = malloc(sum);
+	if (!buf) {
+		uwsgi_error("malloc()");
+	}
+
+	total = sum;
+
+	ptr = buf;
+	while(total) {
+		len = read(wsgi_req->poll.fd, ptr, total);
+		ptr += len;
+		total -= len;
+	}
+
+	lua_pushlstring(L, buf, sum);
+	free(buf);
+
+	return 1;
+}
+
+int uwsgi_lua_init(){
+
+	uwsgi_log("Initializing Lua environment... (%d cores)\n", uwsgi.cores);
+
+	ulua.L = malloc( sizeof(lua_State*) * uwsgi.cores );
+	if (!ulua.L) {
+		uwsgi_error("malloc()");
+		exit(1);
+	}
+
+	// ok the lua engine is ready
+	return 0;
+
+
+}
+
+void uwsgi_lua_app() {
+	int i;
+
+	if (ulua.filename) {
+		for(i=0;i<uwsgi.cores;i++) {
+			ulua.L[i] = luaL_newstate();
+			luaL_openlibs(ulua.L[i]);
+			luaL_register(ulua.L[i], "uwsgi", uwsgi_api);
+			if (luaL_loadfile(ulua.L[i], ulua.filename)) {
+				uwsgi_log("unable to load file %s\n", ulua.filename);
+				exit(1);
+			}
+			// use a pcall
+			//lua_call(ulua.L[i], 0, 1);
+			if (lua_pcall(ulua.L[i], 0, 1, 0) != 0) {
+				uwsgi_log("%s\n", lua_tostring(ulua.L[i], -1));
+				exit(1);
+			}
+		}
+
+	}
+}
+
+int uwsgi_lua_request(struct wsgi_request *wsgi_req) {
 
 	int i;
-	const char *http ;
-	size_t slen ;
+	int raw;
+	const char *http;
+	size_t slen;
+	ssize_t rlen;
 	char *ptrbuf;
+	lua_State *L = ulua.L[wsgi_req->async_id];
+
+#ifdef UWSGI_ASYNC
+	if (wsgi_req->async_status == UWSGI_AGAIN) {
+		if ((i = lua_pcall(L, 0, 1, 0)) == 0) {
+			if (lua_type(L, -1) == LUA_TSTRING) {
+				http = lua_tolstring(L, -1, &slen);
+				if ( (rlen = write(wsgi_req->poll.fd, http, slen)) != (ssize_t) slen) {
+					perror("write()");
+					return UWSGI_OK;
+				}
+				wsgi_req->response_size += rlen;
+			}
+			lua_pop(L, 1);
+			lua_pushvalue(L, -1);
+			return UWSGI_AGAIN;
+		}
+		goto clear;
+	}
+#endif
 
 	/* Standard WSAPI request */
 	if (!wsgi_req->uh.pktsize) {
-		fprintf (stderr, "Invalid WSAPI request. skip.\n");
-		return -1;
+		uwsgi_log( "Invalid WSAPI request. skip.\n");
+		goto clear;
 	}
 
-	if (uwsgi_parse_vars(uwsgi, wsgi_req)) {
-                fprintf(stderr,"Invalid WSAPI request. skip.\n");
-                return -1;
-        }
+	if (uwsgi_parse_vars(wsgi_req)) {
+		uwsgi_log("Invalid WSAPI request. skip.\n");
+		goto clear;
+	}
 
 	// put function in the stack
-	lua_getfield(ulua.L, LUA_GLOBALSINDEX, "run");
+	//lua_getfield(L, LUA_GLOBALSINDEX, "run");
+	lua_pushvalue(L, -1);
 
 	// put cgi vars in the stack
-	lua_newtable(ulua.L);
-	lua_pushstring(ulua.L, "");
-	lua_setfield(ulua.L, -2, "CONTENT_TYPE");
+
+	lua_newtable(L);
+	lua_pushstring(L, "");
+	lua_setfield(L, -2, "CONTENT_TYPE");
 	for(i=0;i<wsgi_req->var_cnt;i++) {
-		lua_pushlstring(ulua.L, (char *)wsgi_req->hvec[i+1].iov_base, wsgi_req->hvec[i+1].iov_len);
+		lua_pushlstring(L, (char *)wsgi_req->hvec[i+1].iov_base, wsgi_req->hvec[i+1].iov_len);
 		// transform it in a valid c string TODO this is ugly
-		ptrbuf = wsgi_req->hvec[i].iov_base+wsgi_req->hvec[i].iov_len ;
-		*ptrbuf = 0 ;
-		lua_setfield(ulua.L, -2, (char *)wsgi_req->hvec[i].iov_base);
+		ptrbuf = wsgi_req->hvec[i].iov_base+wsgi_req->hvec[i].iov_len;
+		*ptrbuf = 0;
+		lua_setfield(L, -2, (char *)wsgi_req->hvec[i].iov_base);
 		i++;
 	}
 
 
 	// put "input" table
-        lua_newtable(ulua.L);
-        lua_pushcfunction(ulua.L, uwsgi_lua_input);
-        lua_setfield(ulua.L, -2, "read");
-	lua_setfield(ulua.L, -2, "input");
+	lua_newtable(L);
+	lua_pushcfunction(L, uwsgi_lua_input);
+	lua_setfield(L, -2, "read");
+	lua_setfield(L, -2, "input");
 
 
 	// call function
-	i = lua_pcall(ulua.L, 1, 3, 0);
+	i = lua_pcall(L, 1, 3, 0);
 	if (i != 0) {
-		fprintf(stderr,"%s\n", lua_tostring(ulua.L, -1));
-		lua_pop(ulua.L, 1);
-		return -1 ;
+		uwsgi_log("%s\n", lua_tostring(L, -1));
+		lua_pop(L, 1);
+		goto clear;
 	}
 
-	fprintf(stderr,"%d %s %s %s\n",i,lua_typename(ulua.L, lua_type(ulua.L, -3)), lua_typename(ulua.L, lua_type(ulua.L, -2)) ,  lua_typename(ulua.L, lua_type(ulua.L, -1)));
+	//uwsgi_log("%d %s %s %s\n",i,lua_typename(L, lua_type(L, -3)), lua_typename(L, lua_type(L, -2)) ,  lua_typename(L, lua_type(L, -1)));
 
+	raw = 0;
 	// send status
-	if (lua_type(ulua.L, -3) == LUA_TSTRING || lua_type(ulua.L, -3) == LUA_TNUMBER) {
-		http = lua_tolstring(ulua.L, -3, &slen);
-		if (write(wsgi_req->poll.fd, "HTTP/1.1 ", 9) != 9) {
+	if (lua_type(L, -3) == LUA_TSTRING || lua_type(L, -3) == LUA_TNUMBER) {
+		http = lua_tolstring(L, -3, &slen);
+		if (write(wsgi_req->poll.fd, wsgi_req->protocol, wsgi_req->protocol_len) != wsgi_req->protocol_len) {
 			perror("write()");
-			return -1 ;
+			goto clear;
 		}
-		if (write(wsgi_req->poll.fd, http, slen) != slen) {
+		if (write(wsgi_req->poll.fd, " ", 1) != 1) {
 			perror("write()");
-			return -1 ;
+			goto clear;
 		}
+		if (write(wsgi_req->poll.fd, http, slen) != (ssize_t) slen) {
+			perror("write()");
+			goto clear;
+		}
+		// a performance hack
+		ptrbuf = (char *) http;
+		ptrbuf[3] = 0;
+		wsgi_req->status = atoi(ptrbuf);
 		if (write(wsgi_req->poll.fd, "\r\n", 2) != 2) {
 			perror("write()");
-			return -1 ;
+			goto clear;
 		}
 	}
-	
+	else {
+		raw = 1;
+		wsgi_req->status = -1;
+	}
+
 	// send headers
 
-	lua_pushnil(ulua.L);
-        while(lua_next(ulua.L, -3) != 0) {
-		http = lua_tolstring(ulua.L, -2, &slen);
-		if (write(wsgi_req->poll.fd, http, slen) != slen) {
+	lua_pushnil(L);
+	while(lua_next(L, -3) != 0) {
+		http = lua_tolstring(L, -2, &slen);
+		if (write(wsgi_req->poll.fd, http, slen) != (ssize_t) slen) {
 			perror("write()");
-			return -1 ;
+			goto clear;
 		}
 		if (write(wsgi_req->poll.fd, ": ", 2) != 2) {
 			perror("write()");
-			return -1 ;
+			goto clear;
 		}
-		http = lua_tolstring(ulua.L, -1, &slen);
-		if (write(wsgi_req->poll.fd, http, slen) != slen) {
+		http = lua_tolstring(L, -1, &slen);
+		if (write(wsgi_req->poll.fd, http, slen) != (ssize_t) slen) {
 			perror("write()");
-			return -1 ;
+			goto clear;
 		}
 		if (write(wsgi_req->poll.fd, "\r\n", 2) != 2) {
 			perror("write()");
-			return -1 ;
+			goto clear;
 		}
-                lua_pop(ulua.L, 1);
-        }
-
-	if (write(wsgi_req->poll.fd, "\r\n", 2) != 2) {
-		perror("write()");
-		return -1 ;
+		lua_pop(L, 1);
 	}
-	
+
+	if (!raw) {
+		if (write(wsgi_req->poll.fd, "\r\n", 2) != 2) {
+			perror("write()");
+			goto clear;
+		}
+	}
+
 	// send body with coroutine
-	lua_pushvalue(ulua.L, -1);
+	lua_pushvalue(L, -1);
 
-        while ( (i = lua_pcall(ulua.L, 0, 1, 0)) == 0) {
-                if (lua_type(ulua.L, -1) == LUA_TSTRING) {
-			http = lua_tolstring(ulua.L, -1, &slen);
-			if (write(wsgi_req->poll.fd, http, slen) != slen) {
+	while ( (i = lua_pcall(L, 0, 1, 0)) == 0) {
+		if (lua_type(L, -1) == LUA_TSTRING) {
+			http = lua_tolstring(L, -1, &slen);
+			if ( (rlen = write(wsgi_req->poll.fd, http, slen)) != (ssize_t) slen) {
 				perror("write()");
-				return -1 ;
+				goto clear;
 			}
-			//fprintf(stderr,"%.*s\n", slen, http);
-                }
-                lua_pop(ulua.L, 1);
-                lua_pushvalue(ulua.L, -1);
-        }
+			wsgi_req->response_size += rlen;
+		}
+		lua_pop(L, 1);
+		lua_pushvalue(L, -1);
+#ifdef UWSGI_ASYNC
+		if (uwsgi.async > 1) {
+			return UWSGI_AGAIN;
+		}
+#endif
+	}
 
-        lua_pop(ulua.L, 4);
+clear:
+
+	lua_pop(L, 4);
+
+	// set frequency
+	lua_gc(L, LUA_GCCOLLECT, 0);
+
+	return UWSGI_OK;
+
+}
+
+void uwsgi_lua_after_request(struct wsgi_request *wsgi_req) {
+
+	if (uwsgi.shared->options[UWSGI_OPTION_LOGGING])
+		log_request(wsgi_req);
+}
+
+int uwsgi_lua_manage_options(int i, char *optarg) {
+
+	switch(i) {
+		case LONG_ARGS_LUA:
+			ulua.filename = optarg;
+			return 1;
+	}
 
 	return 0;
+}
+
+int uwsgi_lua_magic(char *mountpoint, char *lazy) {
+
+	if (!strcmp(lazy+strlen(lazy)-4, ".lua")) {
+                ulua.filename = lazy;
+                return 1;
+        }
+        else if (!strcmp(lazy+strlen(lazy)-3, ".ws")) {
+                ulua.filename = lazy;
+                return 1;
+        }
+
+
+	return 0;
+}
+
+int uwsgi_lua_signal_handler(uint8_t sig, void *handler) {
+
+	struct wsgi_request *wsgi_req = current_wsgi_req();
+	
+	lua_State *L = ulua.L[wsgi_req->async_id];
+
+	uwsgi_log("managing signal handler on core %d\n", wsgi_req->async_id);
+
+	lua_rawgeti(L, LUA_REGISTRYINDEX, (long) handler);
+
+	lua_pushnumber(L, sig);
+
+	if (lua_pcall(L, 1, 1, 0) != 0) {
+		uwsgi_log("error running function `f': %s",
+                 lua_tostring(L, -1));
+
+		return -1;
+
+	}
+
+	return 0;
+	
+}
+
+uint16_t uwsgi_lua_rpc(void * func, uint8_t argc, char **argv, char *buffer) {
+
+        uint8_t i;
+        const char *sv;
+        size_t sl;
+	long lfunc = (long) func;
+	int ifunc = lfunc;
+
+	struct wsgi_request *wsgi_req = current_wsgi_req();
+	
+	lua_State *L = ulua.L[wsgi_req->async_id];
+
+	uwsgi_log("get function %d\n", ifunc);
+	lua_rawgeti(L, LUA_REGISTRYINDEX, ifunc);
+
+        for(i=0;i<argc;i++) {
+		lua_pushstring(L, argv[i]);
+        }
+
+        if (lua_pcall(L, argc, 1, 0) != 0) {
+		uwsgi_log("error running function `f': %s", lua_tostring(L, -1));
+		return 0;
+        }
+
+	
+	sv = lua_tolstring(L, -1, &sl);
+
+	uwsgi_log("sv = %s sl = %d\n", sv, sl);
+	if (sl <= 0xffff) {
+		memcpy(buffer, sv, sl);
+		return sl;
+	}
+
+        return 0;
 
 }
 
-void uwsgi_after_request(struct uwsgi_server *uwsgi, struct wsgi_request *wsgi_req) {
 
-	if (uwsgi->shared->options[UWSGI_OPTION_LOGGING])
-                log_request(wsgi_req);
-}
+struct uwsgi_plugin lua_plugin = {
+
+	.name = "lua",
+	.modifier1 = 6,
+	.init = uwsgi_lua_init,
+	.options = uwsgi_lua_options,
+	.manage_opt = uwsgi_lua_manage_options,
+	.request = uwsgi_lua_request,
+	.after_request = uwsgi_lua_after_request,
+	.init_apps = uwsgi_lua_app,
+	.magic = uwsgi_lua_magic,
+	.signal_handler = uwsgi_lua_signal_handler,
+	.rpc = uwsgi_lua_rpc,
+
+};
+

plugins/lua/uwsgiplugin.py

@@ -1,5 +1,22 @@
 import os,sys
 
+try:
+        LUALIB = os.environ['UWSGICONFIG_LUALIB']
+except:
+        LUALIB = 'lua'
+
+try:
+        LUAINC = os.environ['UWSGICONFIG_LUAINC']
+except:
+        LUAINC = '/usr/include/lua5.1'
+
+try:
+        LUALIBPATH = os.environ['UWSGICONFIG_LUALIBPATH']
+except:
+        LUALIBPATH = '/usr/lib/lua5.1'
+
 NAME='lua'
-CFLAGS = '-I /usr/include/lua5.1'
-LDFLAGS = '-llua5.1'
+CFLAGS = ['-I%s' % LUAINC]
+LDFLAGS = ['-L%s' % LUALIBPATH]
+GCC_LIST = ['lua_plugin']
+LIBS = ['-l%s' % LUALIB]

plugins/mono/mono_plugin.c

@@ -0,0 +1,35 @@
+#include "../../uwsgi.h"
+
+struct uwsgi_mono {
+
+	char *assembly_name ;
+	
+} um;
+
+int uwsgi_mono_init() {
+
+
+	MonoDomain *domain;
+
+	MonoAssembly *assembly;
+        MonoImage *image, *corlib;
+
+	domain = mono_jit_init("uwsgi");
+
+	corlib = mono_get_corlib();
+        if (!corlib) {
+		uwsgi_log("unable to initialize MONO engine\n");
+		exit(1);
+        }
+
+
+	image = mono_assembly_get_image(assembly);
+
+}
+
+
+struct uwsgi_plugin mono_plugin = {
+
+	.name = "mono",
+	.init = uwsgi_mono_init,
+};

plugins/nagios/nagios.c

@@ -0,0 +1,88 @@
+#include "../../uwsgi.h"
+
+extern struct uwsgi_server uwsgi;
+int use_nagios = 0;
+
+#define LONG_ARGS_NAGIOS 40000
+
+struct option nagios_options[] = {
+
+	{"nagios", no_argument, 0, LONG_ARGS_NAGIOS},
+        {0, 0, 0, 0},
+
+};
+
+
+int nagios() {
+
+	char *tcp_port;
+	struct pollfd nagios_poll;
+// connect and send
+
+	if (!use_nagios) {
+		return 1;
+	}
+	if (uwsgi.sockets[0].name == NULL) {
+		fprintf(stdout, "UWSGI UNKNOWN: you have specified an invalid socket\n");
+		exit(3);
+	}
+	tcp_port = strchr(uwsgi.sockets[0].name, ':');
+	if (tcp_port == NULL) {
+		fprintf(stdout, "UWSGI UNKNOWN: you have specified an invalid socket\n");
+		exit(3);
+	}
+
+	tcp_port[0] = 0;
+
+	nagios_poll.fd = connect_to_tcp(uwsgi.sockets[0].name, atoi(tcp_port + 1), uwsgi.shared->options[UWSGI_OPTION_SOCKET_TIMEOUT], 0);
+	if (nagios_poll.fd < 0) {
+		fprintf(stdout, "UWSGI CRITICAL: could not connect() to workers\n");
+		exit(2);
+	}
+	uwsgi.wsgi_req->uh.modifier1 = UWSGI_MODIFIER_PING;
+	uwsgi.wsgi_req->uh.pktsize = 0;
+	uwsgi.wsgi_req->uh.modifier2 = 0;
+	if (write(nagios_poll.fd, uwsgi.wsgi_req, 4) != 4) {
+		uwsgi_error("write()");
+		fprintf(stdout, "UWSGI CRITICAL: could not send ping packet to workers\n");
+		exit(2);
+	}
+	nagios_poll.events = POLLIN;
+	if (!uwsgi_parse_response(&nagios_poll, uwsgi.shared->options[UWSGI_OPTION_SOCKET_TIMEOUT], (struct uwsgi_header *) uwsgi.wsgi_req, uwsgi.wsgi_req->buffer)) {
+		fprintf(stdout, "UWSGI CRITICAL: timed out waiting for response\n");
+		exit(2);
+	}
+	else {
+		if (uwsgi.wsgi_req->uh.pktsize > 0) {
+			fprintf(stdout, "UWSGI WARNING: %.*s\n", uwsgi.wsgi_req->uh.pktsize, uwsgi.wsgi_req->buffer);
+			exit(1);
+		}
+		else {
+			fprintf(stdout, "UWSGI OK: armed and ready\n");
+			exit(0);
+		}
+	}
+
+	// never here
+	fprintf(stdout, "UWSGI UNKNOWN: probably you hit a bug of uWSGI !!!\n");
+	exit(3);
+}
+
+int nagios_opt(int i, char *optarg) {
+
+	switch(i) {
+		case LONG_ARGS_NAGIOS:
+			uwsgi.no_initial_output = 1;
+			use_nagios = 1;
+			return 1;
+	}
+
+	return 0;
+}
+
+struct uwsgi_plugin nagios_plugin = {
+	
+	.options = nagios_options,
+	.manage_opt = nagios_opt,
+	.init = nagios,
+};

plugins/nagios/uwsgiplugin.py

@@ -0,0 +1,7 @@
+
+NAME='nagios'
+CFLAGS = []
+LDFLAGS = []
+LIBS = []
+
+GCC_LIST = ['nagios']

plugins/ping/ping_plugin.c

@@ -0,0 +1,113 @@
+#include "../../uwsgi.h"
+
+extern struct uwsgi_server uwsgi;
+
+struct uwsgi_ping {
+	char *ping;
+	int ping_timeout;
+} uping;
+
+struct option uwsgi_ping_options[] = {
+	{"ping", required_argument, 0, LONG_ARGS_PING},
+	{"ping-timeout", required_argument, 0, LONG_ARGS_PING_TIMEOUT},
+	{ 0, 0, 0, 0 }
+};
+
+static void ping() {
+
+	struct uwsgi_header uh;
+	struct pollfd uwsgi_poll;
+
+	// use a 3 secs timeout by default
+	if (!uping.ping_timeout) uping.ping_timeout = 3;
+
+	uwsgi_log("PING uwsgi host %s (timeout: %d)\n", uping.ping, uping.ping_timeout);
+
+	uwsgi_poll.fd = uwsgi_connect(uping.ping, uping.ping_timeout, 0);
+	if (uwsgi_poll.fd < 0) {
+		exit(1);
+	}
+
+	uh.modifier1 = UWSGI_MODIFIER_PING;
+	uh.pktsize = 0;
+	uh.modifier2 = 0;
+	if (write(uwsgi_poll.fd, &uh, 4) != 4) {
+		uwsgi_error("write()");
+		exit(2);
+	}
+	uwsgi_poll.events = POLLIN;
+	if (!uwsgi_parse_response(&uwsgi_poll, uping.ping_timeout, &uh, NULL)) {
+		exit(1);
+	}
+	else {
+		if (uh.pktsize > 0) {
+			exit(2);
+		}
+		else {
+			exit(0);
+		}
+	}
+
+}
+
+
+int ping_init() {
+
+	if (uping.ping) {
+		ping();
+		//never here
+	}
+
+	return 1;
+}
+
+/* uwsgi PING|100 */
+int uwsgi_request_ping(struct wsgi_request *wsgi_req) {
+	char len;
+
+	uwsgi_log( "PING\n");
+	wsgi_req->uh.modifier2 = 1;
+	wsgi_req->uh.pktsize = 0;
+
+	len = strlen(uwsgi.shared->warning_message);
+	if (len > 0) {
+		// TODO: check endianess ?
+		wsgi_req->uh.pktsize = len;
+	}
+	if (write(wsgi_req->poll.fd, wsgi_req, 4) != 4) {
+		uwsgi_error("write()");
+	}
+
+	if (len > 0) {
+		if (write(wsgi_req->poll.fd, uwsgi.shared->warning_message, len)
+				!= len) {
+			uwsgi_error("write()");
+		}
+	}
+
+	return UWSGI_OK;
+}
+
+int uwsgi_ping_manage_options(int i, char *optarg) {
+
+	switch(i) {
+		case LONG_ARGS_PING:
+			uping.ping = optarg;
+			return 1;
+		case LONG_ARGS_PING_TIMEOUT:
+			uping.ping_timeout = atoi(optarg);
+			return 1;
+	}
+
+	return 0;
+}
+
+struct uwsgi_plugin ping_plugin = {
+
+	.name = "ping",
+	.modifier1 = 100,
+	.options = uwsgi_ping_options,
+	.manage_opt = uwsgi_ping_manage_options,
+	.request = uwsgi_request_ping,
+	.init = ping_init,
+};

plugins/ping/uwsgiplugin.py

@@ -0,0 +1,5 @@
+NAME='ping'
+CFLAGS = []
+LDFLAGS = []
+LIBS = []
+GCC_LIST = ['ping_plugin']

plugins/proxy/proxy.c

@@ -1,18 +1,33 @@
-#ifdef UWSGI_PROXY
+/*
 
-/* 
+   uWSGI proxy
 
-	uWSGI proxy
+   it needs one of this tecnology to work:
 
-	it needs one of this tecnology to work:
-
-	- epoll (linux 2.6)
-	- kqueue (various BSD and Darwin)
-	- /dev/poll (Solaris)
+   - epoll (linux 2.6)
+   - kqueue (various BSD and Darwin)
+   - /dev/poll (Solaris)
 
 */
 
-#include "uwsgi.h"
+#include "../../uwsgi.h"
+
+#define LONG_ARGS_PROXY_WORKERS 50000
+
+struct uwsgi_proxy {
+	char *socket_name;
+	int add_me;
+	int workers;
+	int fd;
+} uproxy;
+
+struct option proxy_options[] = {
+	{"proxy", required_argument, 0, LONG_ARGS_PROXY},
+        {"proxy-node", required_argument, 0, LONG_ARGS_PROXY_NODE},
+        {"proxy-max-connections", required_argument, 0, LONG_ARGS_PROXY_MAX_CONNECTIONS},
+        {"proxy-workers", required_argument, 0, LONG_ARGS_PROXY_WORKERS},
+	{0, 0, 0, 0},	
+};
 
 #define UWSGI_PROXY_CONNECTING	1
 #define UWSGI_PROXY_WAITING	2
@@ -38,7 +53,6 @@ static void reload_proxy(void) {
 
 static void uwsgi_proxy_close(struct uwsgi_proxy_connection *upcs, int fd) {
 
-
 	if (upcs[fd].dest_fd >= 0) {
 		close(upcs[fd].dest_fd);
 		upcs[upcs[fd].dest_fd].dest_fd = -1;
@@ -60,11 +74,9 @@ static void uwsgi_proxy_close(struct uwsgi_proxy_connection *upcs, int fd) {
 				uwsgi.shared->nodes[upcs[fd].node].connections--;
 		}
 	}
-
 }
 
 static int uwsgi_proxy_find_next_node(int current_node) {
-
 	int i;
 
 	current_node++;
@@ -99,12 +111,11 @@ static int uwsgi_proxy_find_next_node(int current_node) {
 	}
 
 	return -1;
-
 }
 
-void uwsgi_proxy(int proxyfd) {
+void proxy_loop() {
 
-	int efd ;
+	int efd;
 
 #ifdef __linux__
 	struct epoll_event *eevents;
@@ -139,9 +150,9 @@ void uwsgi_proxy(int proxyfd) {
 
 	int next_node = -1;
 
-	uwsgi_log( "spawned uWSGI proxy (pid: %d)\n", getpid());
-
+#ifdef UWSGI_DEBUG
 	uwsgi_log( "allocating space for %d concurrent proxy connections\n", max_connections);
+#endif
 
 	// allocate memory for connections
 	upcs = malloc(sizeof(struct uwsgi_proxy_connection) * max_connections);
@@ -151,21 +162,24 @@ void uwsgi_proxy(int proxyfd) {
 	}
 	memset(upcs, 0, sizeof(struct uwsgi_proxy_connection) * max_connections);
 
+	if (uproxy.add_me) {
+                uwsgi_cluster_simple_add_node(uwsgi.sockets[0].name, 1, CLUSTER_NODE_STATIC);
+        }
 
-	efd = async_queue_init(proxyfd);
+	efd = async_queue_init(uproxy.fd);
 	if (efd < 0) {
 		exit(1);
 	}
 
 #ifdef __linux__
 	eevents = malloc(sizeof(struct epoll_event) * max_events);
-	memset(&ev, 0, sizeof(struct epoll_event)); 
+	memset(&ev, 0, sizeof(struct epoll_event));
 #elif defined(__sun)
 	eevents = malloc(sizeof(struct pollfd) * max_events);
-	memset(&ev, 0, sizeof(struct pollfd)); 
+	memset(&ev, 0, sizeof(struct pollfd));
 #else
 	eevents = malloc(sizeof(struct kevent) * max_events);
-	memset(&ev, 0, sizeof(struct kevent)); 
+	memset(&ev, 0, sizeof(struct kevent));
 #endif
 
 	if (!eevents) {
@@ -188,12 +202,11 @@ void uwsgi_proxy(int proxyfd) {
 
 		for (i = 0; i < nevents; i++) {
 
-
-			if ( (int)eevents[i].ASYNC_FD == proxyfd) {
+			if ( (int)eevents[i].ASYNC_FD == uproxy.fd) {
 
 				if (eevents[i].ASYNC_IS_IN) {
 					// new connection, accept it
-					ev.ASYNC_FD = accept(proxyfd, (struct sockaddr *) &upc_addr, &upc_len);
+					ev.ASYNC_FD = accept(uproxy.fd, (struct sockaddr *) &upc_addr, &upc_len);
 					if ( (int) ev.ASYNC_FD < 0) {
 						uwsgi_error("accept()");
 						continue;
@@ -342,8 +355,13 @@ void uwsgi_proxy(int proxyfd) {
 							uwsgi_log( "connect() %s\n", strerror(soopt));
 							// increase errors on node
 							uwsgi_log( "*** marking cluster node %d/%s as failed ***\n", upcs[eevents[i].ASYNC_FD].node, uwsgi.shared->nodes[upcs[eevents[i].ASYNC_FD].node].name);
-							uwsgi.shared->nodes[upcs[eevents[i].ASYNC_FD].node].errors++;
-							uwsgi.shared->nodes[upcs[eevents[i].ASYNC_FD].node].status = UWSGI_NODE_FAILED;
+							if (uwsgi.shared->nodes[upcs[eevents[i].ASYNC_FD].node].type == CLUSTER_NODE_DYNAMIC) {
+								uwsgi.shared->nodes[upcs[eevents[i].ASYNC_FD].node].name[0] = 0 ;	
+							}
+							else {
+								uwsgi.shared->nodes[upcs[eevents[i].ASYNC_FD].node].errors++;
+								uwsgi.shared->nodes[upcs[eevents[i].ASYNC_FD].node].status = UWSGI_NODE_FAILED;
+							}
 							uwsgi_proxy_close(upcs, ev.ASYNC_FD);
 							continue;
 						}
@@ -387,8 +405,13 @@ void uwsgi_proxy(int proxyfd) {
 
 						// increase errors on node
 						uwsgi_log( "*** marking cluster node %d/%s as failed ***\n", upcs[eevents[i].ASYNC_FD].node, uwsgi.shared->nodes[upcs[eevents[i].ASYNC_FD].node].name);
-						uwsgi.shared->nodes[upcs[eevents[i].ASYNC_FD].node].errors++;
-						uwsgi.shared->nodes[upcs[eevents[i].ASYNC_FD].node].status = UWSGI_NODE_FAILED;
+							if (uwsgi.shared->nodes[upcs[eevents[i].ASYNC_FD].node].type == CLUSTER_NODE_DYNAMIC) {
+								uwsgi.shared->nodes[upcs[eevents[i].ASYNC_FD].node].name[0] = 0;
+							}
+							else {
+								uwsgi.shared->nodes[upcs[eevents[i].ASYNC_FD].node].errors++;
+								uwsgi.shared->nodes[upcs[eevents[i].ASYNC_FD].node].status = UWSGI_NODE_FAILED;
+							}
 					}
 					else {
 						uwsgi_log( "STRANGE EVENT !!! %d %d %d\n", (int) eevents[i].ASYNC_FD, (int) eevents[i].ASYNC_EV, upcs[eevents[i].ASYNC_FD].status);
@@ -401,6 +424,67 @@ void uwsgi_proxy(int proxyfd) {
 	}
 }
 
-#else
-#warning "*** PROXY support is disabled ***"
-#endif
+int proxy_init() {
+	int i;
+	char *tcp_port;
+
+	if (!uproxy.workers) uproxy.workers = 1 ;
+
+	if (uproxy.socket_name) {
+
+		tcp_port = strchr(uproxy.socket_name, ':');
+
+        	if (tcp_port == NULL) {
+                	uproxy.fd = bind_to_unix(uproxy.socket_name, UWSGI_LISTEN_QUEUE, uwsgi.chmod_socket, uwsgi.abstract_socket);
+        	}
+        	else {
+                	uproxy.fd = bind_to_tcp(uproxy.socket_name, UWSGI_LISTEN_QUEUE, tcp_port);
+                	tcp_port[0] = ':';
+        	}
+
+        	if (uproxy.fd < 0) {
+                	uwsgi_log( "unable to create the proxy server socket.\n");
+                	exit(1);
+        	}
+
+		for(i=0;i<uproxy.workers;i++) {
+			if (register_gateway("proxy", proxy_loop) == NULL) {
+				uwsgi_log("unable to register the proxy gateway\n");
+			}
+		}
+	}
+
+	return 0;
+}
+	
+int proxy_opt(int i, char *optarg) {
+
+        switch(i) {
+
+		case LONG_ARGS_PROXY_NODE:
+                        if (uwsgi.cluster_fd >= 0 && !strcmp(optarg, "@self")) {
+                                uproxy.add_me = 1;
+                        }
+                        else {
+                                uwsgi_cluster_simple_add_node(optarg, 1, CLUSTER_NODE_STATIC);
+                        }
+                        return 1;
+                case LONG_ARGS_PROXY:
+                        uproxy.socket_name = optarg;
+                        return 1;
+		case LONG_ARGS_PROXY_WORKERS:
+			uproxy.workers = atoi(optarg);
+			return 1;
+	}
+
+	return 0;
+}
+
+
+struct uwsgi_plugin proxy_plugin = {
+
+        .options = proxy_options,
+        .manage_opt = proxy_opt,
+        .init = proxy_init,
+};
+

plugins/proxy/uwsgiplugin.py

@@ -0,0 +1,7 @@
+
+NAME='proxy'
+CFLAGS = []
+LDFLAGS = []
+LIBS = []
+
+GCC_LIST = ['proxy']

plugins/psgi/psgi.h

@@ -0,0 +1,26 @@
+#include "../../uwsgi.h"
+
+#include <EXTERN.h>
+#include <perl.h>
+#include "XSUB.h"
+
+
+struct uwsgi_perl {
+
+        int fd;
+        char *psgibuffer;
+        char *psgi;
+        PerlInterpreter *main;
+        pthread_key_t u_interpreter;
+        PerlInterpreter **interp;
+        SV *psgi_main;
+        SV **psgi_func;
+        CV *stream_responder;
+
+};
+
+#define LONG_ARGS_PERL_BASE      17000 + ((5 + 1) * 100)
+#define LONG_ARGS_PSGI           LONG_ARGS_PERL_BASE + 1
+
+void init_perl_embedded_module(void);
+int psgi_response(struct wsgi_request *, PerlInterpreter *, AV*);

plugins/psgi/psgi_plugin.c

@@ -1,61 +1,38 @@
-#include <uwsgi.h>
-
-#include <EXTERN.h>
-#include <perl.h>
-
-static PerlInterpreter *my_perl;
-static SV *psgi_func ;
+#include "psgi.h"
 
 extern char **environ;
+extern struct uwsgi_server uwsgi;
 
-/* statistically ordered */
-static struct http_status_codes hsc[] = {
+struct uwsgi_perl uperl;
 
-        {"200", "OK"},
-        {"302", "Found"},
-        {"404", "Not Found"},
-        {"500", "Internal Server Error"},
-        {"301", "Moved Permanently"},
-        {"304", "Not Modified"},
-        {"303", "See Other"},
-        {"403", "Forbidden"},
-        {"307", "Temporary Redirect"},
-        {"401", "Unauthorized"},
-        {"400", "Bad Request"},
-        {"405", "Method Not Allowed"},
-        {"408", "Request Timeout"},
+struct option uwsgi_perl_options[] = {
+
+        {"psgi", required_argument, 0, LONG_ARGS_PSGI},
+        {0, 0, 0, 0},
 
-        {"100", "Continue"},
-        {"101", "Switching Protocols"},
-        {"201", "Created"},
-        {"202", "Accepted"},
-        {"203", "Non-Authoritative Information"},
-        {"204", "No Content"},
-        {"205", "Reset Content"},
-        {"206", "Partial Content"},
-        {"300", "Multiple Choices"},
-        {"305", "Use Proxy"},
-        {"402", "Payment Required"},
-        {"406", "Not Acceptable"},
-        {"407", "Proxy Authentication Required"},
-        {"409", "Conflict"},
-        {"410", "Gone"},
-        {"411", "Length Required"},
-        {"412", "Precondition Failed"},
-        {"413", "Request Entity Too Large"},
-        {"414", "Request-URI Too Long"},
-        {"415", "Unsupported Media Type"},
-        {"416", "Requested Range Not Satisfiable"},
-        {"417", "Expectation Failed"},
-        {"501", "Not Implemented"},
-        {"502", "Bad Gateway"},
-        {"503", "Service Unavailable"},
-        {"504", "Gateway Timeout"},
-        {"505", "HTTP Version Not Supported"},
-	{ "", NULL }, 
 };
 
+extern struct http_status_codes hsc[];
 
+XS(XS_stream)
+{
+    dXSARGS;
+    struct wsgi_request *wsgi_req = current_wsgi_req();
+    SV *stack;
+    AV *response;
+
+    uwsgi_log("args: %d %p\n", items, wsgi_req);
+    stack = ST(0);
+    uwsgi_log("type %d\n", SvTYPE(stack));
+    response = (AV* ) SvRV(stack) ;
+
+
+    psgi_response(wsgi_req, my_perl, response);
+
+    //mXPUSHp("x", 1);
+    XSRETURN(0);
+
+}
 
 /* automatically generated */
 
@@ -63,192 +40,266 @@ EXTERN_C void xs_init (pTHX);
 
 EXTERN_C void boot_DynaLoader (pTHX_ CV* cv);
 
-EXTERN_C void
+	EXTERN_C void
 xs_init(pTHX)
 {
-        char *file = __FILE__;
-        dXSUB_SYS;
+	char *file = __FILE__;
+	dXSUB_SYS;
 
-        /* DynaLoader is a special case */
-        newXS("DynaLoader::boot_DynaLoader", boot_DynaLoader, file);
+	/* DynaLoader is a special case */
+	newXS("DynaLoader::boot_DynaLoader", boot_DynaLoader, file);
+
+	uperl.stream_responder = newXS("uwsgi::stream", XS_stream, "uwsgi");
+
+#ifdef UWSGI_EMBEDDED
+	init_perl_embedded_module();
+#endif
 }
 
 /* end of automagically generated part */
 
 
-int uwsgi_init(struct uwsgi_server *uwsgi, char *args){
+int uwsgi_perl_init(){
 
-	char *psgibuffer ;
-	int fd ;
 
-	struct stat stat_psgi;
+	struct http_status_codes *http_sc;
 
-	struct http_status_codes *http_sc ;
+	int argc = 4;
+	char *embedding[] = { "", "-e", "-e", "0" };
 
-	int argc = 4 ;
-	char *embedding[] = { "", args,  "-e", "0" };
-	char **argv = embedding ;
-
-	uwsgi_log("initializing Perl environment: %s\n", args);
-
-	PERL_SYS_INIT3(&argc, &argv, &environ);
-	my_perl = perl_alloc();	
-	if (!my_perl) {
+	uwsgi_log("initializing Perl environment\n");
+	PERL_SYS_INIT3(&argc, (char ***) &embedding, &environ);
+	uperl.main = perl_alloc();
+	if (!uperl.main) {
 		uwsgi_log("unable to allocate perl interpreter\n");
 		return -1;
 	}
 
-	PL_perl_destruct_level = 1;
-	perl_construct(my_perl);
+	dTHXa(uperl.main);
+	PERL_SET_CONTEXT(uperl.main);
+
+	PL_perl_destruct_level = 2;
+	perl_construct(uperl.main);
 
 	// filling http status codes
 	for (http_sc = hsc; http_sc->message != NULL; http_sc++) {
 		http_sc->message_size = strlen(http_sc->message);
 	}
 
-
 	PL_origalen = 1;
-	perl_parse(my_perl, xs_init, 4, embedding, NULL);
+	perl_parse(uperl.main, xs_init, 4, embedding, NULL);
 
 	perl_eval_pv("use IO::Handle;", 0);
 
-	fd = open(args, O_RDONLY);
-	if (fd < 0) {
-		uwsgi_error("open()");
-		goto clear ;
-	}
-
-        if (fstat(fd, &stat_psgi)) {
-                uwsgi_error("fstat()");
-		close(fd);
-		goto clear;
-        }
-
-	psgibuffer = malloc(stat_psgi.st_size);
-	if (!psgibuffer) {
-		uwsgi_error("malloc()");
-		close(fd);
-		goto clear;
-	}
-
-	if (read(fd, psgibuffer, stat_psgi.st_size) != stat_psgi.st_size) {
-		uwsgi_error("read()");
-		close(fd);
-		free(psgibuffer);
-		goto clear;	
-	}
-
-	psgibuffer[stat_psgi.st_size] = 0 ;
-
-	psgi_func = perl_eval_pv(psgibuffer, 0);
-
-	if (!psgi_func) {
-		uwsgi_log("unable to find PSGI function entry point.\n");
-		close(fd);
-		free(psgibuffer);
-		goto clear;
-	}
-
-	free(psgibuffer);
-	close(fd);
-
-	return 0;
-
-clear:
-	perl_destruct(my_perl);
-        perl_free(my_perl);
-	return -1;
+	return 1;
 
 }
 
-int uwsgi_request(struct uwsgi_server *uwsgi, struct wsgi_request *wsgi_req) {
+void uwsgi_psgi_app() {
+
+	struct stat stat_psgi;
+
+	if (uperl.psgi) {
+		uperl.fd = open(uperl.psgi, O_RDONLY);
+		if (uperl.fd < 0) {
+			uwsgi_error("open()");
+			exit(1);
+		}
+
+		if (fstat(uperl.fd, &stat_psgi)) {
+			uwsgi_error("fstat()");
+			exit(1);
+		}
+
+		uperl.psgibuffer = malloc(stat_psgi.st_size + 1);
+		if (!uperl.psgibuffer) {
+			uwsgi_error("malloc()");
+			exit(1);
+		}
+
+		if (read(uperl.fd, uperl.psgibuffer, stat_psgi.st_size) != stat_psgi.st_size) {
+			uwsgi_error("read()");
+			exit(1);
+		}
+
+		uperl.psgibuffer[stat_psgi.st_size] = 0;
+
+		if (uwsgi.threads < 2) {
+			uperl.psgi_main = perl_eval_pv(uperl.psgibuffer, 0);
+			if (!uperl.psgi_main) {
+				uwsgi_log("unable to find PSGI function entry point.\n");
+				exit(1);
+			}
+
+			if(SvTRUE(ERRSV)) {
+				uwsgi_log("%s\n", SvPV_nolen(ERRSV));
+				exit(1);
+			}
+
+			free(uperl.psgibuffer);
+			close(uperl.fd);
+		}
+
+		uwsgi_log("PSGI app (%s) loaded at %p\n", uperl.psgi, uperl.psgi_main);
+	}
+
+
+}
+
+void uwsgi_perl_enable_threads() {
 	
-	HV *env ;
-	SV **item ;
+	int i;
+
+	if (pthread_key_create(&uperl.u_interpreter, NULL)) {
+        	uwsgi_error("pthread_key_create()");
+                exit(1);
+	}
+
+	uperl.interp = malloc( sizeof(PerlInterpreter*) * uwsgi.threads );
+	if (!uperl.interp) {
+		uwsgi_error("malloc()");
+		exit(1);
+	}
+
+	for(i=1;i<uwsgi.threads;i++) {
+		uperl.interp[i] = perl_clone(uperl.main, CLONEf_KEEP_PTR_TABLE);
+		if (!uperl.interp[i]) {
+			uwsgi_log("unable to create new perl interpreter\n");
+			exit(1);
+		}
+	}
+
+	uperl.psgi_func = malloc( sizeof(SV*) * uwsgi.threads );
+	if (!uperl.psgi_func) {
+		uwsgi_error("malloc()");
+		exit(1);
+	}
 	
-	AV *response, *headers, *body ;
 
-	SV **status_code, **hitem, *io_new, *io_err, *io, *chunk;
-	char *chitem ;
-	STRLEN hlen ;
+	dTHXa(uperl.main);
+	PERL_SET_CONTEXT(uperl.main);
 
-	struct http_status_codes *http_sc;
+	uperl.psgi_main = perl_eval_pv(uperl.psgibuffer, 0);
+	if (!uperl.psgi_main) {
+		uwsgi_log("unable to find PSGI function entry point.\n");
+		exit(1);
+	}
+
+	if(SvTRUE(ERRSV)) {
+		uwsgi_log("%s\n", SvPV_nolen(ERRSV));
+		exit(1);
+	}
+	
+
+}
+
+
+
+int uwsgi_perl_request(struct wsgi_request *wsgi_req) {
+
+	HV *env;
+	SV **item;
+
+	AV *response;
+
+	SV *io_new, *io_err;
+	int i;
+
+	SV *psgi_func = uperl.psgi_main;
+	// ugly hack
+	register PerlInterpreter *my_perl = uperl.main;
+	dSP;
 
-	int i,vi, base ;
 
 	/* Standard PSGI request */
-        if (!wsgi_req->uh.pktsize) {
-                uwsgi_log("Invalid PSGI request. skip.\n");
-                return -1;
-        }
-
-
-	if (uwsgi_parse_vars(uwsgi, wsgi_req)) {
+	if (!wsgi_req->uh.pktsize) {
 		uwsgi_log("Invalid PSGI request. skip.\n");
 		return -1;
 	}
 
 
-	dSP;
+	if (uwsgi_parse_vars(wsgi_req)) {
+		uwsgi_log("Invalid PSGI request. skip.\n");
+		return -1;
+	}
+
+
+#ifdef UWSGI_THREADING
+	if (uwsgi.threads > 1 && wsgi_req->async_id > 0) {
+		psgi_func = uperl.psgi_func[wsgi_req->async_id];
+		my_perl = pthread_getspecific(uperl.u_interpreter);
+	}
+#endif
+
 
 	ENTER;
 	SAVETMPS;
 
 
-	env = (HV*)sv_2mortal((SV*)newHV());
+	env = (HV*) sv_2mortal((SV*)newHV());
+
 
 	// fill perl hash
 	for(i=0;i<wsgi_req->var_cnt;i++) {
 		if (wsgi_req->hvec[i+1].iov_len > 0) {
-		
-		item = hv_store(env, wsgi_req->hvec[i].iov_base, wsgi_req->hvec[i].iov_len, 
-			newSVpv(wsgi_req->hvec[i+1].iov_base, wsgi_req->hvec[i+1].iov_len), 0);
+
+			item = hv_store(env, wsgi_req->hvec[i].iov_base, wsgi_req->hvec[i].iov_len,
+					newSVpv(wsgi_req->hvec[i+1].iov_base, wsgi_req->hvec[i+1].iov_len), 0);
 		}
 		else {
 			item = hv_store(env, wsgi_req->hvec[i].iov_base, wsgi_req->hvec[i].iov_len, newSVpv("", 0), 0);
 		}
+		//uwsgi_log("%.*s = %.*s\n", wsgi_req->hvec[i].iov_len, wsgi_req->hvec[i].iov_base, wsgi_req->hvec[i+1].iov_len, wsgi_req->hvec[i+1].iov_base);
 		i++;
 	}
 
-	item = hv_store(env, "psgi.url_scheme", 15, newSVpv("http", 4), 0);
+
+	SV *us = newSVpv("http", 4);
+	item = hv_store(env, "psgi.url_scheme", 15, us, 0);
+
+
+	SV* iohandle = newSVpv( "IO::Handle", 10 );
 
 
 	PUSHMARK(SP);
-	XPUSHs( sv_2mortal( newSVpv( "IO::Handle", 10 )));
+	XPUSHs( sv_2mortal(iohandle));
 	PUTBACK;
 	perl_call_method( "new", G_SCALAR);
 	SPAGAIN;
-	io_new = newSVsv(POPs);
-
+	io_new = POPs;
 
 	PUSHMARK(SP);
-	XPUSHs( sv_2mortal(io_new) );
-	XPUSHs( sv_2mortal( newSViv( wsgi_req->poll.fd)));
-	XPUSHs( sv_2mortal( newSVpv( "r", 1)));
+	XPUSHs( io_new );
+	XPUSHs( sv_2mortal(newSViv( wsgi_req->poll.fd)));
+	XPUSHs( sv_2mortal(newSVpv( "r", 1)));
 	PUTBACK;
 	perl_call_method( "fdopen", G_SCALAR);
 	SPAGAIN;
 
 
-	item = hv_store(env, "psgi.input", 10, newSVsv(POPs), 0);
+
+
+	SV *pi = SvREFCNT_inc(POPs);
+	item = hv_store(env, "psgi.input", 10, pi, 0);
+
 
 	PUSHMARK(SP);
-	XPUSHs( sv_2mortal( newSVpv( "IO::Handle", 10 )));
+	XPUSHs( newSVpv( "IO::Handle", 10 ));
 	PUTBACK;
 	perl_call_method( "new", G_SCALAR);
 	SPAGAIN;
-	io_err = newSVsv(POPs);
+	io_err = POPs;
 
 	PUSHMARK(SP);
-	XPUSHs( sv_2mortal(io_err) );
+	XPUSHs( io_err );
 	XPUSHs( sv_2mortal( newSViv( 2 )));
 	XPUSHs( sv_2mortal( newSVpv( "w", 1)));
 	PUTBACK;
 	perl_call_method( "fdopen", G_SCALAR);
 	SPAGAIN;
 
-
-	item = hv_store(env, "psgi.errors", 11, newSVsv(POPs), 0);
+	SV *pe = SvREFCNT_inc(POPs);
+	item = hv_store(env, "psgi.errors", 11, pe, 0);
 
 
 	PUSHMARK(SP);
@@ -257,114 +308,40 @@ int uwsgi_request(struct uwsgi_server *uwsgi, struct wsgi_request *wsgi_req) {
 
 
 	perl_call_sv(psgi_func, G_SCALAR);
+
+	
+	if(SvTRUE(ERRSV)) {
+		uwsgi_log("%s\n", SvPV_nolen(ERRSV));
+		goto clear;
+	}
 	SPAGAIN;
+	// no leaks to here
 
 	// dereference output
-	response = (AV *) SvRV( sv_2mortal(newSVsv(POPs)) ) ;
+	response = (AV *) SvRV( POPs );
 
-	status_code = av_fetch(response, 0, 0);
+	//uwsgi_log("response: %p %d\n", response, SvTYPE(response));
 
-	wsgi_req->hvec[0].iov_base = "HTTP/1.1 ";
-	wsgi_req->hvec[0].iov_len = 9 ;
+	if (SvTYPE(response) == SVt_PVCV) {
+		uwsgi_log("streaming response\n");
+			
+		PUSHMARK(SP);
+        	XPUSHs( newRV((SV*) uperl.stream_responder));
+        	PUTBACK;
 
-	wsgi_req->hvec[1].iov_base = SvPV(*status_code, hlen);
-	wsgi_req->hvec[1].iov_len = 3 ;
+        	perl_call_sv( (SV*)response, G_SCALAR);
 
-	wsgi_req->hvec[2].iov_base = " ";
-	wsgi_req->hvec[2].iov_len = 1 ;
-
-	wsgi_req->hvec[3].iov_len = 0 ;
-
-	// get the status code
-	for (http_sc = hsc; http_sc->message != NULL; http_sc++) {
-		if (!strncmp(http_sc->key, wsgi_req->hvec[1].iov_base, 3)) {
-			wsgi_req->hvec[3].iov_base = http_sc->message ;
-			wsgi_req->hvec[3].iov_len = http_sc->message_size ;
-			break;
-		}
-        }
-
-	if (wsgi_req->hvec[3].iov_len == 0) {
-		wsgi_req->hvec[3].iov_base = "Unknown" ;
-		wsgi_req->hvec[3].iov_len =  7;
-	}
-
-	wsgi_req->hvec[4].iov_base = "\r\n";
-	wsgi_req->hvec[4].iov_len = 2 ;
-	
-	hitem = av_fetch(response, 1, 0) ;
-
-	headers = (AV *) SvRV(*hitem);
-
-	base = 5 ;
-
-	// put them in hvec
-	for(i=0; i<=av_len(headers); i++) {
-
-		vi = (i*2)+base ;
-		hitem = av_fetch(headers,i,0);
-		chitem = SvPV(*hitem, hlen);
-		wsgi_req->hvec[vi].iov_base = chitem ; wsgi_req->hvec[vi].iov_len = hlen ;
-
-		wsgi_req->hvec[vi+1].iov_base = ": " ; wsgi_req->hvec[vi+1].iov_len = 2 ;
-
-		hitem = av_fetch(headers,i+1,0);
-		chitem = SvPV(*hitem, hlen);
-		wsgi_req->hvec[vi+2].iov_base = chitem ; wsgi_req->hvec[vi+2].iov_len = hlen ;
-
-		wsgi_req->hvec[vi+3].iov_base = "\r\n" ; wsgi_req->hvec[vi+3].iov_len = 2 ;
-
-		i++;
-	}
-
-	vi = (i*2)+base ;
-	wsgi_req->hvec[vi].iov_base = "\r\n" ; wsgi_req->hvec[vi].iov_len = 2 ;
-
-
-	if ( (wsgi_req->response_size = writev(wsgi_req->poll.fd, wsgi_req->hvec, vi+1)) < 0) {
-		uwsgi_error("writev()");
-	}
-
-
-	hitem = av_fetch(response, 2, 0) ;
-
-	io = *hitem;
-	
-	if (SvTYPE(SvRV(io)) == SVt_PVGV || SvTYPE(SvRV(io)) == SVt_PVHV) {
-
-		for(;;) {
-
-			PUSHMARK(SP);
-			XPUSHs(io) ;
-			PUTBACK;
-			perl_call_method("getline", G_SCALAR);	
-			SPAGAIN;
-			chunk = sv_2mortal(newSVsv(POPs));
-
-			chitem = SvPV(chunk, hlen);
-			if (hlen <= 0) {
-				break;
-			}
-			wsgi_req->response_size += write(wsgi_req->poll.fd, chitem, hlen);
+		if(SvTRUE(ERRSV)) {
+			uwsgi_log("%s\n", SvPV_nolen(ERRSV));
 		}
 
-
+		goto clear;
 	}
-	else if (SvTYPE(SvRV(io)) == SVt_PVAV)  {
 
-		body = (AV *) SvRV(io);
+	psgi_response(wsgi_req, my_perl, response);
 
-		for(i=0; i<=av_len(body); i++) {
-			hitem = av_fetch(body,i,0);
-			chitem = SvPV(*hitem, hlen);
-			wsgi_req->response_size += write(wsgi_req->poll.fd, chitem, hlen);
-		}
+clear:
 
-	}
-	else {
-		uwsgi_log("unsupported response body type: %d\n", SvTYPE(SvRV(io)));
-	}
-	
 	FREETMPS;
 	LEAVE;
 
@@ -372,8 +349,74 @@ int uwsgi_request(struct uwsgi_server *uwsgi, struct wsgi_request *wsgi_req) {
 }
 
 
-void uwsgi_after_request(struct uwsgi_server *uwsgi, struct wsgi_request *wsgi_req) {
+void uwsgi_perl_after_request(struct wsgi_request *wsgi_req) {
 
-	if (uwsgi->shared->options[UWSGI_OPTION_LOGGING])
-                log_request(wsgi_req);
+	if (uwsgi.shared->options[UWSGI_OPTION_LOGGING])
+		log_request(wsgi_req);
 }
+
+void uwsgi_perl_init_thread(int core_id) {
+
+
+	pthread_setspecific(uperl.u_interpreter, uperl.interp[core_id]);
+	dTHXa(uperl.interp[core_id]);
+	PERL_SET_CONTEXT(uperl.interp[core_id]);
+
+	uperl.psgi_func[core_id] = perl_eval_pv(uperl.psgibuffer, 0);
+        if (!uperl.psgi_func[core_id]) {
+        	uwsgi_log("unable to find PSGI function entry point.\n");
+		exit(1);
+        }
+
+        if(SvTRUE(ERRSV)) {
+        	uwsgi_log("%s\n", SvPV_nolen(ERRSV));
+		exit(1);
+        }
+
+
+}
+
+int uwsgi_perl_manage_options(int i, char *optarg) {
+
+        switch(i) {
+                case LONG_ARGS_PSGI:
+                        uperl.psgi = optarg;
+                        return 1;
+        }
+
+        return 0;
+}
+
+int uwsgi_perl_magic(char *mountpoint, char *lazy) {
+
+        if (!strcmp(lazy+strlen(lazy)-5, ".psgi")) {
+                uperl.psgi = lazy;
+                return 1;
+        }
+        else if (!strcmp(lazy+strlen(lazy)-3, ".pl")) {
+                uperl.psgi = lazy;
+                return 1;
+        }
+
+        return 0;
+
+}
+
+
+struct uwsgi_plugin psgi_plugin = {
+
+	.name = "psgi",
+	.modifier1 = 5,
+	.init = uwsgi_perl_init,
+	.options = uwsgi_perl_options,
+	.init_apps = uwsgi_psgi_app,
+	//.magic = uwsgi_perl_magic,
+	//.help = uwsgi_perl_help,
+	.enable_threads = uwsgi_perl_enable_threads,
+	.manage_opt = uwsgi_perl_manage_options,
+	.init_thread = uwsgi_perl_init_thread,
+	.request = uwsgi_perl_request,
+	.after_request = uwsgi_perl_after_request,
+
+	.magic = uwsgi_perl_magic,
+};

plugins/psgi/psgi_response.c

@@ -0,0 +1,172 @@
+#include "psgi.h"
+
+/* statistically ordered */
+struct http_status_codes hsc[] = {
+        {"200", "OK"},
+        {"302", "Found"},
+        {"404", "Not Found"},
+        {"500", "Internal Server Error"},
+        {"301", "Moved Permanently"},
+        {"304", "Not Modified"},
+        {"303", "See Other"},
+        {"403", "Forbidden"},
+        {"307", "Temporary Redirect"},
+        {"401", "Unauthorized"},
+        {"400", "Bad Request"},
+        {"405", "Method Not Allowed"},
+        {"408", "Request Timeout"},
+
+        {"100", "Continue"},
+        {"101", "Switching Protocols"},
+        {"201", "Created"},
+        {"202", "Accepted"},
+        {"203", "Non-Authoritative Information"},
+        {"204", "No Content"},
+        {"205", "Reset Content"},
+        {"206", "Partial Content"},
+        {"300", "Multiple Choices"},
+        {"305", "Use Proxy"},
+        {"402", "Payment Required"},
+        {"406", "Not Acceptable"},
+        {"407", "Proxy Authentication Required"},
+        {"409", "Conflict"},
+        {"410", "Gone"},
+        {"411", "Length Required"},
+        {"412", "Precondition Failed"},
+        {"413", "Request Entity Too Large"},
+        {"414", "Request-URI Too Long"},
+        {"415", "Unsupported Media Type"},
+        {"416", "Requested Range Not Satisfiable"},
+        {"417", "Expectation Failed"},
+        {"501", "Not Implemented"},
+        {"502", "Bad Gateway"},
+        {"503", "Service Unavailable"},
+        {"504", "Gateway Timeout"},
+        {"505", "HTTP Version Not Supported"},
+        { "", NULL },
+};
+
+
+int psgi_response(struct wsgi_request *wsgi_req, PerlInterpreter *my_perl, AV *response) {
+
+	SV **status_code, **hitem ;
+	AV *headers, *body =NULL;
+	STRLEN hlen;
+	struct http_status_codes *http_sc;
+	int i,vi, base;
+	char *chitem;
+	dSP;
+
+	status_code = av_fetch(response, 0, 0);
+
+        wsgi_req->hvec[0].iov_base = "HTTP/1.1 ";
+        wsgi_req->hvec[0].iov_len = 9;
+
+        //uwsgi_log("setting status %d %d\n", SvTYPE(*status_code), SvIV(*status_code));
+
+        wsgi_req->hvec[1].iov_base = SvPV(*status_code, hlen);
+        wsgi_req->hvec[1].iov_len = 3;
+
+        wsgi_req->status = atoi(wsgi_req->hvec[1].iov_base);
+
+        wsgi_req->hvec[2].iov_base = " ";
+        wsgi_req->hvec[2].iov_len = 1;
+
+        wsgi_req->hvec[3].iov_len = 0;
+
+        // get the status code
+        for (http_sc = hsc; http_sc->message != NULL; http_sc++) {
+                if (!strncmp(http_sc->key, wsgi_req->hvec[1].iov_base, 3)) {
+                        wsgi_req->hvec[3].iov_base = (char *) http_sc->message;
+                        wsgi_req->hvec[3].iov_len = http_sc->message_size;
+                        break;
+                }
+        }
+
+        if (wsgi_req->hvec[3].iov_len == 0) {
+                wsgi_req->hvec[3].iov_base = "Unknown";
+                wsgi_req->hvec[3].iov_len =  7;
+        }
+
+        wsgi_req->hvec[4].iov_base = "\r\n";
+        wsgi_req->hvec[4].iov_len = 2;
+
+        hitem = av_fetch(response, 1, 0);
+
+        headers = (AV *) SvRV(*hitem);
+
+        base = 5;
+
+
+        // put them in hvec
+        for(i=0; i<=av_len(headers); i++) {
+
+                vi = (i*2)+base;
+                hitem = av_fetch(headers,i,0);
+                chitem = SvPV(*hitem, hlen);
+                wsgi_req->hvec[vi].iov_base = chitem; wsgi_req->hvec[vi].iov_len = hlen;
+
+                wsgi_req->hvec[vi+1].iov_base = ": "; wsgi_req->hvec[vi+1].iov_len = 2;
+
+                hitem = av_fetch(headers,i+1,0);
+                chitem = SvPV(*hitem, hlen);
+                wsgi_req->hvec[vi+2].iov_base = chitem; wsgi_req->hvec[vi+2].iov_len = hlen;
+
+                wsgi_req->hvec[vi+3].iov_base = "\r\n"; wsgi_req->hvec[vi+3].iov_len = 2;
+
+                wsgi_req->header_cnt++;
+
+                i++;
+        }
+
+	vi = (i*2)+base;
+        wsgi_req->hvec[vi].iov_base = "\r\n"; wsgi_req->hvec[vi].iov_len = 2;
+
+        if ( !(wsgi_req->headers_size = writev(wsgi_req->poll.fd, wsgi_req->hvec, vi+1)) ) {
+                uwsgi_error("writev()");
+        }
+
+        hitem = av_fetch(response, 2, 0);
+
+        if (SvTYPE(SvRV(*hitem)) == SVt_PVGV || SvTYPE(SvRV(*hitem)) == SVt_PVHV) {
+
+                for(;;) {
+                        PUSHMARK(SP);
+                        XPUSHs(*hitem);
+                        PUTBACK;
+                        perl_call_method("getline", G_SCALAR);
+                        SPAGAIN;
+
+                        if(SvTRUE(ERRSV)) {
+                                uwsgi_log("%s\n", SvPV_nolen(ERRSV));
+                                break;
+                        }
+
+                        SV *chunk = POPs;
+                        chitem = SvPV( chunk, hlen);
+                        if (hlen <= 0) {
+                                break;
+                        }
+                        wsgi_req->response_size = write(wsgi_req->poll.fd, chitem, hlen);
+                }
+
+
+        }
+        else if (SvTYPE(SvRV(*hitem)) == SVt_PVAV)  {
+
+                body = (AV *) SvRV(*hitem);
+
+                for(i=0; i<=av_len(body); i++) {
+                        hitem = av_fetch(body,i,0);
+                        chitem = SvPV(*hitem, hlen);
+                        wsgi_req->response_size = write(wsgi_req->poll.fd, chitem, hlen);
+                }
+
+        }
+        else {
+                uwsgi_log("unsupported response body type: %d\n", SvTYPE(SvRV(*hitem)));
+        }
+	
+	return 1;
+
+}

plugins/psgi/uwsgi_plmodule.c

@@ -0,0 +1,98 @@
+#include "psgi.h"
+
+extern struct uwsgi_server uwsgi;
+
+#define psgi_xs(func) newXS("uwsgi::" #func, XS_##func, "uwsgi")
+#define psgi_check_args(x) if (items < x) Perl_croak(aTHX_ "Usage: uwsgi::%s takes %d arguments", __FUNCTION__ + 3, x)
+
+XS(XS_reload) {
+    dXSARGS;
+    items = 0;
+
+    uwsgi_log("SENDING HUP TO %d\n", (int) uwsgi.workers[0].pid);
+    if (kill(uwsgi.workers[0].pid, SIGHUP)) {
+    	uwsgi_error("kill()");
+        XSRETURN_NO;
+    }
+    XSRETURN_YES;
+}
+
+XS(XS_cache_set) {
+	dXSARGS;
+
+	char *key, *val;
+	STRLEN keylen;
+	STRLEN vallen;
+	
+	psgi_check_args(2);
+
+	key = SvPV(ST(0), keylen);
+	val = SvPV(ST(1), vallen);
+
+	uwsgi_cache_set(key, (uint16_t) keylen, val, (uint64_t) vallen, 0, 0);
+
+	XSRETURN_UNDEF;
+}
+
+XS(XS_cache_get) {
+	dXSARGS;
+
+	char *key, *val;
+	STRLEN keylen;
+	uint64_t vallen;
+	
+	psgi_check_args(1);
+
+	key = SvPV(ST(0), keylen);
+
+	val = uwsgi_cache_get(key, (uint16_t) keylen, &vallen);
+
+	if (!val)
+		XSRETURN_UNDEF;
+
+	ST(0) = newSVpv(val, vallen);
+	sv_2mortal(ST(0));
+	
+	XSRETURN(1);
+	
+}
+
+XS(XS_call) {
+
+	dXSARGS;
+
+	char buffer[0xffff];
+        char *func;
+        uint16_t size = 0;
+        int i;
+        char *argv[0xff];
+
+	psgi_check_args(1);
+
+        func = SvPV_nolen(ST(0));
+
+        for(i=0;i<(items-1);i++) {
+                argv[i] = SvPV_nolen(ST(i+1));
+        }
+
+        size = uwsgi_rpc(func, items-1, argv, buffer);
+
+        if (size > 0) {
+		ST(0) = newSVpv(buffer, size);
+        	sv_2mortal(ST(0));
+
+        	XSRETURN(1);
+        }
+
+	XSRETURN_UNDEF;
+}
+
+
+
+void init_perl_embedded_module() {
+	psgi_xs(reload);
+	psgi_xs(cache_set);
+	psgi_xs(cache_get);
+	psgi_xs(call);
+}
+

plugins/psgi/uwsgiplugin.py

@@ -1,5 +1,7 @@
 import os,sys
 
 NAME='psgi'
-CFLAGS = os.popen('perl -MExtUtils::Embed -e ccopts').read().rstrip()
-LDFLAGS = os.popen('perl -MExtUtils::Embed -e ldopts').read().rstrip()
+CFLAGS = [os.popen('perl -MExtUtils::Embed -e ccopts').read().rstrip()]
+LDFLAGS = [os.popen('perl -MExtUtils::Embed -e ldopts').read().rstrip()]
+LIBS = []
+GCC_LIST = ['uwsgi_plmodule', 'psgi_response', 'psgi_plugin']

plugins/pyerl/pyerl.c

@@ -0,0 +1,531 @@
+#include "../erlang/erlang.h"
+#include "../python/uwsgi_python.h"
+
+extern struct uwsgi_server uwsgi;
+extern struct uwsgi_erlang uerl;
+extern struct uwsgi_python up;
+
+ei_cnode *pyerl_cnode;
+
+PyObject *pyerl_close(PyObject * self, PyObject * args) {
+
+	int fd;
+
+	if (!PyArg_ParseTuple(args, "i:erlang_close", &fd)) {
+                return NULL;
+        }
+
+	if (fd >= 0)
+		close(fd);
+
+	Py_INCREF(Py_None);
+	return Py_None;
+}
+
+PyObject *pyerl_connect(PyObject * self, PyObject * args) {
+
+	char *node = NULL;
+	int fd;
+
+	if (!PyArg_ParseTuple(args, "s:erlang_connect", &node)) {
+                return NULL;
+        }
+
+	fd = ei_connect(pyerl_cnode, node); 	
+
+	if (fd < 0) {
+		return PyErr_Format(PyExc_ValueError, "Unable to connect to erlang node");
+	}
+
+	return PyInt_FromLong(fd);
+
+}
+
+int py_to_erl(PyObject *, ei_x_buff*);
+
+PyObject *erl_to_py(ei_x_buff* x) {
+
+	int etype, esize, arity;
+	long long num;
+	double fnum;
+	char *atom, *binary;
+	long bin_size;
+	PyObject *pobj;
+	PyObject *zero;
+	erlang_pid epid;
+	int i;
+
+	ei_get_type(x->buff, &x->index, &etype, &esize);
+
+	switch(etype) {
+		case ERL_SMALL_INTEGER_EXT:
+                case ERL_INTEGER_EXT:
+                case ERL_SMALL_BIG_EXT:
+                case ERL_LARGE_BIG_EXT:
+			ei_decode_longlong(x->buff, &x->index, &num);
+			return PyLong_FromLong(num);
+		case ERL_FLOAT_EXT:
+			ei_decode_double(x->buff, &x->index, &fnum);
+			return PyFloat_FromDouble(fnum);
+		case ERL_STRING_EXT:
+			atom = uwsgi_malloc(esize+1);
+			ei_decode_string(x->buff, &x->index, atom);
+			pobj = PyString_FromString(atom);
+			free(atom);
+			Py_INCREF(pobj);
+			return pobj;
+		case ERL_ATOM_EXT:
+			atom = uwsgi_malloc(esize+1);
+			ei_decode_atom(x->buff, &x->index, atom);
+#ifndef PyUnicode_FromString
+			zero = PyString_FromString(atom);
+			pobj = PyUnicode_FromObject(zero);
+			Py_DECREF(zero);
+#else
+			pobj = PyUnicode_FromString(atom);
+#endif
+			free(atom);
+			Py_INCREF(pobj);
+			return pobj;
+		case ERL_SMALL_TUPLE_EXT:
+                case ERL_LARGE_TUPLE_EXT:
+			ei_decode_tuple_header(x->buff, &x->index, &arity);
+			pobj = PyTuple_New(arity);
+			for(i=0;i<arity;i++) {
+				zero = erl_to_py(x);
+				PyTuple_SetItem(pobj, i, zero);
+				Py_DECREF(zero);
+			}		
+			Py_INCREF(pobj);
+			return pobj;
+		case ERL_LIST_EXT:
+		case ERL_NIL_EXT:
+			ei_decode_list_header(x->buff, &x->index, &arity);
+			if (!arity) {
+				Py_INCREF(Py_None);
+				return Py_None;
+			}
+			pobj = PyList_New(0);
+			for(i=0;i<arity+1;i++) {
+				zero = erl_to_py(x);
+				PyList_Append(pobj, zero);
+				Py_DECREF(zero);
+			}
+			Py_INCREF(pobj);
+			return pobj;	
+		case ERL_BINARY_EXT:
+			binary = uwsgi_malloc(esize);
+			ei_decode_binary(x->buff, &x->index, binary, &bin_size);
+			pobj = PyString_FromStringAndSize(binary, bin_size);
+			free(binary);
+			Py_INCREF(pobj);
+			return pobj;
+		case ERL_PID_EXT:
+			ei_decode_pid(x->buff, &x->index, &epid);	
+			pobj = PyTuple_New(3);
+			PyTuple_SetItem(pobj, 0, PyInt_FromLong(epid.num));
+			PyTuple_SetItem(pobj, 1, PyInt_FromLong(epid.serial));
+			PyTuple_SetItem(pobj, 2, PyInt_FromLong(epid.creation));
+			Py_INCREF(pobj);
+			return pobj;
+		default:
+			ei_skip_term(x->buff, &x->index);
+			Py_INCREF(Py_None);
+			return Py_None;
+	}
+
+	Py_INCREF(Py_None);
+	return Py_None;
+	
+}
+
+PyObject *pyerl_lock(PyObject * self, PyObject * args) {
+
+	uwsgi_lock(uerl.lock);
+
+	Py_INCREF(Py_None);
+	return Py_None;
+}
+
+PyObject *pyerl_unlock(PyObject * self, PyObject * args) {
+
+	uwsgi_unlock(uerl.lock);
+
+	Py_INCREF(Py_None);
+	return Py_None;
+}
+
+PyObject *pyerl_send(PyObject * self, PyObject * args) {
+	PyObject *node;
+        PyObject *reg;
+        char *cnode;
+        PyObject *pobj;
+        ei_x_buff x;
+        int fd;
+        int close_fd = 0;
+        erlang_pid epid;
+
+        if (!PyArg_ParseTuple(args, "OOO:erlang_send", &node, &reg, &pobj)) {
+                return NULL;
+        }
+
+        if (PyString_Check(node)) {
+                cnode = PyString_AsString(node);
+                fd = ei_connect(pyerl_cnode, cnode);
+                close_fd = 1;
+        }
+        else if (PyInt_Check(node)) {
+                fd = PyInt_AsLong(node);
+        }
+        else {
+                return PyErr_Format(PyExc_ValueError, "invalid erlang node/descriptor");
+        }
+
+        if (fd < 0) {
+                return PyErr_Format(PyExc_ValueError, "Unable to connect to erlang node");
+        }
+
+
+        ei_x_new_with_version(&x);
+
+        if (py_to_erl(pobj, &x) < 0) {
+                ei_x_free(&x);
+                if (close_fd) close(fd);
+                return PyErr_Format(PyExc_ValueError, "Unsupported object in Python->Erlang translation");
+        }
+
+
+        if (PyTuple_Check(reg) && PyTuple_Size(reg) == 3) {
+                epid.num = PyInt_AsLong( PyTuple_GetItem(reg, 0) );
+                epid.serial = PyInt_AsLong( PyTuple_GetItem(reg, 1) );
+                epid.creation = PyInt_AsLong( PyTuple_GetItem(reg, 2) );
+                ei_send(fd, &epid, x.buff, x.index);
+        }
+        else if (PyString_Check(reg)) {
+                ei_reg_send(pyerl_cnode, fd, PyString_AsString(reg), x.buff, x.index);
+        }
+        else {
+                ei_x_free(&x);
+                if (close_fd) close(fd);
+                return PyErr_Format(PyExc_ValueError, "Invalid Erlang process");
+        }
+
+	return PyInt_FromLong(fd);
+}
+
+PyObject *pyerl_sr(PyObject * self, PyObject * args) {
+
+	PyObject *node;
+	PyObject *reg;
+	char *cnode;
+	PyObject *pobj;
+	ei_x_buff x;
+	int fd;
+	int close_fd = 0;
+	erlang_msg em;
+	erlang_pid epid;
+	int eversion;
+	PyObject *res;
+
+	if (!PyArg_ParseTuple(args, "OOO:erlang_sr", &node, &reg, &pobj)) {
+                return NULL;
+        }
+
+	if (PyString_Check(node)) {
+		cnode = PyString_AsString(node);
+		fd = ei_connect(pyerl_cnode, cnode); 	
+		close_fd = 1;
+	}
+	else if (PyInt_Check(node)) {
+		fd = PyInt_AsLong(node);
+	}
+	else {
+		return PyErr_Format(PyExc_ValueError, "invalid erlang node/descriptor");
+	}
+
+	if (fd < 0) {
+		return PyErr_Format(PyExc_ValueError, "Unable to connect to erlang node");
+	}
+
+	
+
+	ei_x_new_with_version(&x);
+
+	if (py_to_erl(pobj, &x) < 0) {
+		ei_x_free(&x);
+		if (close_fd) close(fd);
+		return PyErr_Format(PyExc_ValueError, "Unsupported object in Python->Erlang translation");
+	}
+
+	
+	if (PyTuple_Check(reg) && PyTuple_Size(reg) == 3) {
+		epid.num = PyInt_AsLong( PyTuple_GetItem(reg, 0) );
+		epid.serial = PyInt_AsLong( PyTuple_GetItem(reg, 1) );
+		epid.creation = PyInt_AsLong( PyTuple_GetItem(reg, 2) );
+		ei_send(fd, &epid, x.buff, x.index);
+	}
+	else if (PyString_Check(reg)) {
+		ei_reg_send(pyerl_cnode, fd, PyString_AsString(reg), x.buff, x.index);
+	}
+	else {
+		ei_x_free(&x);
+                if (close_fd) close(fd);
+                return PyErr_Format(PyExc_ValueError, "Invalid Erlang process");
+	}
+
+recv:
+	ei_x_free(&x);
+
+	ei_x_new(&x);
+
+	if (ei_xreceive_msg(fd, &em, &x) == ERL_MSG) {
+
+		if (em.msgtype == ERL_TICK) {
+			goto recv;			
+		}
+		x.index = 0;
+		ei_decode_version(x.buff, &x.index, &eversion);
+		res = erl_to_py(&x);
+		ei_x_free(&x);
+		if (close_fd) close(fd);
+		return res;
+	}
+
+	ei_x_free(&x);
+	if (close_fd) close(fd);
+
+        Py_INCREF(Py_None);
+        return Py_None;
+}
+
+void pyerl_call_registered(void *func, ei_x_buff *x) {
+
+	PyObject *pyargs = PyTuple_New(1);
+        PyObject *ret;
+
+	PyTuple_SetItem(pyargs, 0, erl_to_py(x));
+	
+        ret = python_call((PyObject *) func, pyargs, 0);
+}
+
+PyObject *pyerl_register_process(PyObject * self, PyObject * args) {
+
+	char *name;
+	PyObject *callable;
+
+	if (!PyArg_ParseTuple(args, "sO:erlang_register_process", &name, &callable)) {
+                return NULL;
+        }
+
+	if (uerl.uep_cnt >= MAX_UWSGI_ERLANG_PROCESSES)
+	return PyErr_Format(PyExc_ValueError, "You can define max %d erlang registered processes", MAX_UWSGI_ERLANG_PROCESSES);
+
+	if (strlen(name) > 0xff-1)
+	return PyErr_Format(PyExc_ValueError, "Invalid erlang process name");
+
+	strcpy(uerl.uep[uerl.uep_cnt].name, name);
+	uerl.uep[uerl.uep_cnt].plugin = pyerl_call_registered;
+	uerl.uep[uerl.uep_cnt].func = callable;
+
+	uerl.uep_cnt++;
+
+	Py_INCREF(Py_None);
+	return Py_None;
+	
+}
+
+PyObject *pyerl_recv(PyObject * self, PyObject * args) {
+
+	ei_x_buff x;
+	erlang_msg em;
+	PyObject *res;
+	int eversion;
+	int fd;
+
+	if (!PyArg_ParseTuple(args, "i:erlang_recv", &fd)) {
+                return NULL;
+        }
+
+recv:
+	ei_x_new(&x);
+
+	if (ei_xreceive_msg(fd, &em, &x) == ERL_MSG) {
+
+		if (em.msgtype == ERL_TICK) {
+			ei_x_free(&x);
+			goto recv;
+		}
+                x.index = 0;
+                ei_decode_version(x.buff, &x.index, &eversion);
+                res = erl_to_py(&x);
+                ei_x_free(&x);
+                return res;
+        }
+
+        ei_x_free(&x);
+
+	Py_INCREF(Py_None);
+        return Py_None;
+}
+
+PyObject *pyerl_rpc(PyObject * self, PyObject * args) {
+
+        PyObject *node;
+        char *mod, *fun;
+        char *cnode;
+        PyObject *pobj;
+        ei_x_buff x;
+        ei_x_buff xr;
+        int fd;
+        int close_fd = 0;
+        int eversion;
+        PyObject *res;
+
+        if (!PyArg_ParseTuple(args, "OssO:erlang_rpc", &node, &mod, &fun, &pobj)) {
+                return NULL;
+        }
+
+        if (PyString_Check(node)) {
+                cnode = PyString_AsString(node);
+                fd = ei_connect(pyerl_cnode, cnode);
+                close_fd = 1;
+        }
+        else if (PyInt_Check(node)) {
+                fd = PyInt_AsLong(node);
+        }
+        else {
+                return PyErr_Format(PyExc_ValueError, "Invalid erlang node/descriptor");
+        }
+
+        if (fd < 0) {
+                return PyErr_Format(PyExc_ValueError, "Unable to connect to erlang node");
+        }
+
+        ei_x_new(&x);
+
+        if (py_to_erl(pobj, &x) < 0) {
+                ei_x_free(&x);
+        	if (close_fd) close(fd);
+                return PyErr_Format(PyExc_ValueError, "Unsupported object in Python->Erlang translation");
+        }
+
+
+	ei_x_new(&xr);
+        if (ei_rpc(pyerl_cnode, fd, mod, fun, x.buff, x.index, &xr) < 0) {
+		if (close_fd) close(fd);
+		ei_x_free(&x);	
+		ei_x_free(&xr);
+		return PyErr_Format(PyExc_ValueError, "Error in Erlang rpc");
+	}
+
+        xr.index = 0;
+        ei_decode_version(xr.buff, &xr.index, &eversion);
+
+        res = erl_to_py(&xr);
+
+        if (close_fd) close(fd);
+        ei_x_free(&x);
+        ei_x_free(&xr);
+        return res;
+
+}
+
+
+
+static PyMethodDef uwsgi_pyerl_methods[] = {
+        {"erlang_connect", pyerl_connect, METH_VARARGS, ""},
+        {"erlang_close", pyerl_close, METH_VARARGS, ""},
+        {"erlang_send_message", pyerl_send, METH_VARARGS, ""},
+        {"erlang_send", pyerl_send, METH_VARARGS, ""},
+        {"erlang_recv_message", pyerl_recv, METH_VARARGS, ""},
+        {"erlang_recv", pyerl_recv, METH_VARARGS, ""},
+        {"erlang_sr", pyerl_sr, METH_VARARGS, ""},
+        {"erlang_rpc", pyerl_rpc, METH_VARARGS, ""},
+        {"erlang_lock", pyerl_lock, METH_VARARGS, ""},
+        {"erlang_unlock", pyerl_unlock, METH_VARARGS, ""},
+        {"erlang_register_process", pyerl_register_process, METH_VARARGS, ""},
+        {NULL, NULL},
+};
+
+void py_erl_init_functions() {
+
+	PyMethodDef *uwsgi_function;
+
+	PyDict_SetItemString(up.embedded_dict, "erlang_node", PyString_FromString(ei_thisnodename(pyerl_cnode)));
+
+        for (uwsgi_function = uwsgi_pyerl_methods; uwsgi_function->ml_name != NULL; uwsgi_function++) {
+                PyObject *func = PyCFunction_New(uwsgi_function, NULL);
+                PyDict_SetItemString(up.embedded_dict, uwsgi_function->ml_name, func);
+                Py_DECREF(func);
+        }
+
+}
+
+int py_to_erl(PyObject *pobj, ei_x_buff *x) {
+        int i;
+        PyObject *pobj2;
+
+        if (pobj == NULL || pobj == Py_None) {
+		ei_x_encode_empty_list(x);
+        }
+        else if (PyString_Check(pobj)) {
+                ei_x_encode_binary(x, PyString_AsString(pobj), PyString_Size(pobj));
+        }
+	else if (PyUnicode_Check(pobj)) {
+                ei_x_encode_atom(x, PyString_AsString(pobj));
+	}
+        else if (PyInt_Check(pobj)) {
+                ei_x_encode_long(x, PyInt_AsLong(pobj));
+        }
+        else if (PyList_Check(pobj)) {
+		if (PyList_Size(pobj) > 0) {
+			ei_x_encode_list_header(x, PyList_Size(pobj));
+                	for (i = 0; i < PyList_Size(pobj); i++) {
+                        	pobj2 = PyList_GetItem(pobj, i);
+				if (py_to_erl(pobj2, x) < 0) return -1;
+                	}
+		}
+		ei_x_encode_empty_list(x);
+        }
+	else if (PyTuple_Check(pobj)) {
+		ei_x_encode_tuple_header(x, PyTuple_Size(pobj));
+                for (i = 0; i < PyTuple_Size(pobj); i++) {
+                        pobj2 = PyTuple_GetItem(pobj, i);
+			if (py_to_erl(pobj2, x) < 0) return -1;
+                }
+        }
+        else {
+		return -1;
+        }
+
+	return x->index;
+}
+
+
+
+void pyerl_init() {
+
+	up.extension = py_erl_init_functions;
+
+	if (!uerl.name) {
+		pyerl_cnode = uwsgi_malloc(sizeof(ei_cnode));
+		memset(pyerl_cnode, 0, sizeof(ei_cnode));
+		if (ei_connect_init(pyerl_cnode, "uwsgi", NULL, 0) < 0) {
+			uwsgi_log("unable to initialize erlang connection\n");
+			exit(1);
+		}
+		uwsgi_log("Erlang C-Node name: %s\n",ei_thisnodename(pyerl_cnode));
+	}
+	else {
+		pyerl_cnode = &uerl.cnode;
+	}
+
+	uwsgi_log("enabled Python<->Erlang bridge\n");
+
+}
+
+struct uwsgi_plugin pyerl_plugin = {
+
+        .post_init = pyerl_init,
+};
+

plugins/pyerl/uwsgiplugin.py

@@ -0,0 +1,8 @@
+from distutils import sysconfig
+
+NAME='pyerl'
+CFLAGS = ['-I' + sysconfig.get_python_inc(), '-I' + sysconfig.get_python_inc(plat_specific=True)]
+LDFLAGS = []
+LIBS = []
+
+GCC_LIST = ['pyerl']

plugins/python/gil.c

@@ -0,0 +1,26 @@
+#include "uwsgi_python.h"
+
+extern struct uwsgi_server uwsgi;
+extern struct uwsgi_python up;
+
+void gil_real_get() {
+#ifndef PYTHREE
+	PyEval_AcquireLock();
+	PyThreadState_Swap((PyThreadState *) pthread_getspecific(up.upt_gil_key));
+#else
+	PyEval_RestoreThread((PyThreadState *) pthread_getspecific(up.upt_gil_key));
+#endif
+}
+
+void gil_real_release() {
+#ifndef PYTHREE
+	pthread_setspecific(up.upt_gil_key, (void *) PyThreadState_Swap(NULL));
+	PyEval_ReleaseLock();	
+#else
+	pthread_setspecific(up.upt_gil_key, (void *) PyThreadState_Get());
+	PyEval_SaveThread();
+#endif
+}
+
+void gil_fake_get() {}
+void gil_fake_release() {}

plugins/python/pyloader.c

@@ -0,0 +1,653 @@
+#include "uwsgi_python.h"
+
+/* notes
+
+   exit(1) on every malloc error: apps can be dinamically loaded so on memory problem
+   it is better to let the master process manager respawn the worker.
+   */
+
+extern struct uwsgi_server uwsgi;
+extern struct uwsgi_python up;
+
+extern char **environ;
+
+#ifdef UWSGI_SENDFILE
+PyMethodDef uwsgi_sendfile_method[] = {{"uwsgi_sendfile", py_uwsgi_sendfile, METH_VARARGS, ""}};
+#endif
+
+#ifdef UWSGI_ASYNC
+PyMethodDef uwsgi_eventfd_read_method[] = { {"uwsgi_eventfd_read", py_eventfd_read, METH_VARARGS, ""}};
+PyMethodDef uwsgi_eventfd_write_method[] = { {"uwsgi_eventfd_write", py_eventfd_write, METH_VARARGS, ""}};
+#endif
+
+int init_uwsgi_app(int loader, void *arg1, struct wsgi_request *wsgi_req, PyThreadState *interpreter) {
+
+	PyObject *zero;
+	PyObject *app_list = NULL, *applications = NULL;
+
+	int id = uwsgi.apps_cnt;
+	int multiapp = 0;
+
+#ifdef UWSGI_ASYNC
+	int i;
+#endif
+
+	char *mountpoint;
+
+	struct uwsgi_app *wi;
+
+
+	if (wsgi_req->script_name_len == 0) {
+		wsgi_req->script_name = "";
+	}
+	else if (wsgi_req->script_name_len == 1) {
+		if (wsgi_req->script_name[0] == '/') {
+			wsgi_req->script_name = "";
+			wsgi_req->script_name_len = 0;
+		}
+	}
+
+
+	if (uwsgi.vhost && wsgi_req->host_len > 0) {
+		mountpoint = uwsgi_concat3n(wsgi_req->host, wsgi_req->host_len, "|", 1, wsgi_req->script_name, wsgi_req->script_name_len);
+	}
+	else {
+		mountpoint = uwsgi_strncopy(wsgi_req->script_name, wsgi_req->script_name_len);
+	}
+
+	if (uwsgi_get_app_id(mountpoint, strlen(mountpoint), -1) != -1) {
+		uwsgi_log( "mountpoint %.*s already configured. skip.\n", strlen(mountpoint), mountpoint);
+		free(mountpoint);
+		return -1;
+	}
+
+
+	wi = &uwsgi.apps[id];
+
+	memset(wi, 0, sizeof(struct uwsgi_app));
+	wi->mountpoint = mountpoint;
+	wi->mountpoint_len = strlen(mountpoint);
+
+	// dynamic chdir ?
+	if (wsgi_req->chdir_len > 0) {
+		wi->chdir = uwsgi_strncopy(wsgi_req->chdir, wsgi_req->chdir_len);
+#ifdef UWSGI_DEBUG
+		uwsgi_debug("chdir to %s\n", wi->chdir);
+#endif
+		if (chdir(wi->chdir)) {
+			uwsgi_error("chdir()");
+		}
+	}
+
+	// Initialize a new environment for the new interpreter
+
+	// reload "os" environ to allow dynamic setenv()
+	if (up.reload_os_env) {
+
+                char **e, *p;
+                PyObject *k, *env_value;
+
+        	PyObject *os_module = PyImport_ImportModule("os");
+        	if (os_module) {
+                	PyObject *os_module_dict = PyModule_GetDict(os_module);
+                	PyObject *py_environ = PyDict_GetItemString(os_module_dict, "environ");
+			if (py_environ) {
+                		for (e = environ; *e != NULL; e++) {
+                        		p = strchr(*e, '=');
+                        		if (p == NULL) continue;
+
+					k = PyString_FromStringAndSize(*e, (int)(p-*e));
+					if (k == NULL) {
+                                		PyErr_Print();
+                                		continue;
+					}
+
+                        		env_value = PyString_FromString(p+1);
+                        		if (env_value == NULL) {
+                                		PyErr_Print();
+						Py_DECREF(k);
+                                		continue;
+                        		}
+	
+					uwsgi_log("%s = %s\n", PyString_AsString(k), PyString_AsString(env_value));
+
+                        		if (PyObject_SetItem(py_environ, k, env_value)) {
+						uwsgi_log("cazzo\n");
+                                		PyErr_Print();
+                        		}
+
+                        		Py_DECREF(k);
+                        		Py_DECREF(env_value);
+
+                	}
+
+		}
+        	}
+	}
+
+
+	if (interpreter == NULL && id) {
+		wi->interpreter = Py_NewInterpreter();
+		if (!wi->interpreter) {
+			uwsgi_log( "unable to initialize the new python interpreter\n");
+			exit(1);
+		}
+		PyThreadState_Swap(wi->interpreter);
+		init_pyargv();
+
+#ifdef UWSGI_EMBEDDED
+		// we need to inizialize an embedded module for every interpreter
+		init_uwsgi_embedded_module();
+#endif
+		init_uwsgi_vars();
+
+	}
+	else if (interpreter) {
+		wi->interpreter = interpreter;
+	}
+	else {
+		wi->interpreter = up.main_thread;
+	}
+
+
+	wi->callable = up.loaders[loader](arg1);
+
+	if (!wi->callable) {
+		uwsgi_log("unable to load app SCRIPT_NAME=%s\n", mountpoint);
+		goto doh;
+	}
+
+
+	
+	// the module contains multiple apps
+	if (PyDict_Check((PyObject *)wi->callable)) {
+		applications = wi->callable;
+		uwsgi_log("found a multiapp module...\n");
+		app_list = PyDict_Keys(applications);
+		multiapp = PyList_Size(app_list);
+		if (multiapp < 1) {
+			uwsgi_log("you have to define at least one app in the apllications dictionary\n");
+			goto doh;
+		}		
+
+		PyObject *app_mnt = PyList_GetItem(app_list, 0);
+		if (!PyString_Check(app_mnt)) {
+			uwsgi_log("the app mountpoint must be a string\n");
+			goto doh;
+		}
+		wi->mountpoint = PyString_AsString(app_mnt);
+		wi->mountpoint_len = strlen(wi->mountpoint);
+		wsgi_req->script_name = wi->mountpoint;
+		wsgi_req->script_name_len = wi->mountpoint_len;
+		uwsgi_log("main mountpoint = %s\n", wi->mountpoint);
+		wi->callable = PyDict_GetItem(applications, app_mnt);
+	}
+
+#ifdef UWSGI_ASYNC
+	wi->environ = malloc(sizeof(PyObject*)*uwsgi.cores);
+	if (!wi->environ) {
+		uwsgi_error("malloc()");
+		exit(1);
+	}
+
+	for(i=0;i<uwsgi.cores;i++) {
+		wi->environ[i] = PyDict_New();
+		if (!wi->environ[i]) {
+			uwsgi_log("unable to allocate new env dictionary for app\n");
+			exit(1);
+		}
+	}
+#else
+	wi->environ = PyDict_New();
+	if (!wi->environ) {
+		uwsgi_log("unable to allocate new env dictionary for app\n");
+		exit(1);
+	}
+#endif
+
+	// check function args
+	// by defaut it is a WSGI app
+	wi->argc = 2;
+	zero = PyObject_GetAttrString(wi->callable, "__code__");
+	if (!zero) {
+		zero = PyObject_GetAttrString(wi->callable, "__call__");
+		if (zero) {
+			zero = PyObject_GetAttrString(wi->callable, "__code__");
+		}
+		else {
+			uwsgi_log("WARNING: unable to get the number of callable args. Fallback to WSGI\n");
+		}
+	}
+
+	// avoid __code__ attr error propagation
+	PyErr_Clear();
+
+	if (zero) {
+		zero = PyObject_GetAttrString(zero, "co_argcount");
+		wi->argc = (int) PyInt_AsLong(zero);
+	}
+
+	if (wi->argc == 2) {
+#ifdef UWSGI_DEBUG
+		uwsgi_log("-- WSGI callable detected --\n");
+#endif
+		wi->request_subhandler = uwsgi_request_subhandler_wsgi;
+		wi->response_subhandler = uwsgi_response_subhandler_wsgi;
+	}
+#ifdef UWSGI_WEB3
+	else if (wi->argc == 1) {
+#ifdef UWSGI_DEBUG
+		uwsgi_log("-- Web3 callable detected --\n");
+#endif
+		wi->request_subhandler = uwsgi_request_subhandler_web3;
+		wi->response_subhandler = uwsgi_response_subhandler_web3;
+	}
+#endif
+	else {
+		uwsgi_log("-- INVALID callable detected --\n");
+		goto doh;
+	}
+
+#ifdef UWSGI_ASYNC
+	wi->args = malloc(sizeof(PyObject*)*uwsgi.cores);
+	if (!wi->args) {
+		uwsgi_error("malloc()");
+		exit(1);
+	}
+
+	for(i=0;i<uwsgi.cores;i++) {
+		wi->args[i] = PyTuple_New(wi->argc);
+		if (!wi->args[i]) {
+			uwsgi_log("unable to allocate new tuple for app args\n");
+			exit(1);
+		}
+
+		// add start_response on WSGI app
+		if (wi->argc == 2) {
+			if (PyTuple_SetItem(wi->args[i], 1, up.wsgi_spitout)) {
+				uwsgi_log("unable to set start_response in args tuple\n");
+				exit(1);
+			}
+		}
+	}
+#else
+
+	wi->wsgi_args = PyTuple_New(wi->argc);
+	if (wi->argc == 2) {
+		if (PyTuple_SetItem(wi->wsgi_args, 1, up.wsgi_spitout)) {
+			uwsgi_log("unable to set start_response in args tuple\n");
+			exit(1);
+		}
+	}
+#endif
+
+	if (wi->argc == 2) {
+#ifdef UWSGI_SENDFILE
+		// prepare sendfile() for WSGI app
+		wi->sendfile = PyCFunction_New(uwsgi_sendfile_method, NULL);
+#endif
+
+#ifdef UWSGI_ASYNC
+		wi->eventfd_read = PyCFunction_New(uwsgi_eventfd_read_method, NULL);
+		wi->eventfd_write = PyCFunction_New(uwsgi_eventfd_write_method, NULL);
+#endif
+	}
+
+	if (uwsgi.threads > 1 && id) {
+		// if we have multiple threads we need to initialize a PyThreadState for each one
+		for(i=0;i<uwsgi.threads;i++) {
+			uwsgi.core[i]->ts[id] = PyThreadState_New( ((PyThreadState *)wi->interpreter)->interp);
+			if (!uwsgi.core[i]->ts[id]) {
+				uwsgi_log("unable to allocate new PyThreadState structure for app %s", mountpoint);
+				goto doh;
+			}
+		}
+		PyThreadState_Swap((PyThreadState *) pthread_getspecific(up.upt_save_key) );
+	}
+	else if (interpreter == NULL && id) {
+		PyThreadState_Swap(up.main_thread);
+	}
+
+	if (wi->argc == 1) {
+		uwsgi_log( "Web3 application %d (SCRIPT_NAME=%.*s) ready on interpreter %p", id, wi->mountpoint_len, wi->mountpoint, wi->interpreter);
+	}
+	else {
+		uwsgi_log( "WSGI application %d (SCRIPT_NAME=%.*s) ready on interpreter %p", id, wi->mountpoint_len, wi->mountpoint, wi->interpreter);
+	}
+
+	if (!wsgi_req->script_name_len) {
+		uwsgi_rawlog(" (default app)");
+		uwsgi.default_app = id;
+	}
+
+	uwsgi.apps_cnt++;
+
+	uwsgi_rawlog("\n");
+
+	if (multiapp > 1) {
+		for(i=1;i<multiapp;i++) {
+			PyObject *app_mnt = PyList_GetItem(app_list, i);		
+			if (!PyString_Check(app_mnt)) {
+				uwsgi_log("applications dictionary key must be a string, skipping.\n");
+				continue;
+			}
+
+			wsgi_req->script_name = PyString_AsString(app_mnt);
+			wsgi_req->script_name_len = strlen(wsgi_req->script_name);
+			init_uwsgi_app(LOADER_CALLABLE, PyDict_GetItem(applications, app_mnt), wsgi_req, wi->interpreter);
+		}
+	}
+
+	return id;
+
+doh:
+	free(mountpoint);
+	PyErr_Print();
+	if (interpreter == NULL && id) {
+		Py_EndInterpreter(wi->interpreter);
+		if (uwsgi.threads > 1) {
+			PyThreadState_Swap((PyThreadState *) pthread_getspecific(up.upt_save_key));
+		}
+		else {
+			PyThreadState_Swap(up.main_thread);
+		}
+	}
+	return -1;
+}
+
+char *get_uwsgi_pymodule(char *module) {
+
+	char *quick_callable;
+
+	if ( (quick_callable = strchr(module, ':')) ) {
+		quick_callable[0] = 0;
+		quick_callable++;
+		return quick_callable;
+	}
+
+	return NULL;
+}
+
+PyObject *get_uwsgi_pydict(char *module) {
+
+	PyObject *wsgi_module, *wsgi_dict;
+
+	wsgi_module = PyImport_ImportModule(module);
+	if (!wsgi_module) {
+		PyErr_Print();
+		return NULL;
+	}
+
+	wsgi_dict = PyModule_GetDict(wsgi_module);
+	if (!wsgi_dict) {
+		PyErr_Print();
+		return NULL;
+	}
+
+	return wsgi_dict;
+
+}
+
+PyObject *uwsgi_uwsgi_loader(void *arg1) {
+
+	PyObject *wsgi_dict;
+
+	char *quick_callable;
+
+	PyObject *tmp_callable;
+	PyObject *applications;
+	PyObject *uwsgi_dict = get_uwsgi_pydict("uwsgi");
+
+	char *module = (char *) arg1;
+
+	quick_callable = get_uwsgi_pymodule(module);
+	if (quick_callable == NULL) {
+		if (up.callable) {
+			quick_callable = up.callable;
+		}
+		else {
+			quick_callable = "application";
+		}
+		wsgi_dict = get_uwsgi_pydict(module);
+	}
+	else {
+		wsgi_dict = get_uwsgi_pydict(module);
+		module[strlen(module)] = ':';
+	}
+
+	if (!wsgi_dict) {
+		return NULL;
+	}
+
+	applications = PyDict_GetItemString(uwsgi_dict, "applications");
+	if (applications && PyDict_Check(applications)) return applications;
+
+
+	applications = PyDict_GetItemString(wsgi_dict, "applications");
+	if (applications && PyDict_Check(applications)) return applications;
+
+	// quick callable -> thanks gunicorn for the idea
+	// we have extended the concept a bit...
+	if (quick_callable[strlen(quick_callable) -2 ] == '(' && quick_callable[strlen(quick_callable) -1] ==')') {
+		quick_callable[strlen(quick_callable) -2 ] = 0;
+		tmp_callable = PyDict_GetItemString(wsgi_dict, quick_callable);
+		if (tmp_callable) {
+			return python_call(tmp_callable, PyTuple_New(0), 0);
+		}
+	}
+
+	return PyDict_GetItemString(wsgi_dict, quick_callable);
+
+}
+
+/* this is the mount loader, it loads app on mountpoint automagically */
+PyObject *uwsgi_mount_loader(void *arg1) {
+
+	PyObject *callable = NULL;
+	char *what = (char *) arg1;
+
+	if ( !strcmp(what+strlen(what)-3, ".py") || !strcmp(what+strlen(what)-5, ".wsgi")) {
+		callable = uwsgi_file_loader((void *)what);
+	}
+	else if (!strcmp(what+strlen(what)-4, ".ini")) {
+		callable = uwsgi_paste_loader((void *)what);
+	}
+	else if (strchr(what, ':')) {
+		callable = uwsgi_uwsgi_loader((void *)what);
+	}
+
+	return callable;
+}
+
+
+/* this is the dynamic loader, it loads app reading information from a wsgi_request */
+PyObject *uwsgi_dyn_loader(void *arg1) {
+
+	PyObject *callable = NULL;
+	char *tmpstr;
+
+	struct wsgi_request *wsgi_req = (struct wsgi_request *) arg1;
+
+	// MANAGE UWSGI_SCRIPT
+	if (wsgi_req->script_len > 0) {
+		tmpstr = uwsgi_strncopy(wsgi_req->script, wsgi_req->script_len);
+		callable = uwsgi_uwsgi_loader((void *)tmpstr);
+		free(tmpstr);
+	}
+	// MANAGE UWSGI_MODULE
+	else if (wsgi_req->module_len > 0) {
+		if (wsgi_req->callable_len > 0) {
+			tmpstr = uwsgi_concat3n(wsgi_req->module, wsgi_req->module_len, ":", 1, wsgi_req->callable, wsgi_req->callable_len);
+		}
+		else {
+			tmpstr = uwsgi_strncopy(wsgi_req->module, wsgi_req->module_len);
+		}
+		callable = uwsgi_uwsgi_loader((void *)tmpstr);
+		free(tmpstr);
+	}
+	// MANAGE UWSGI_FILE
+	else if (wsgi_req->file_len > 0) {
+		tmpstr = uwsgi_strncopy(wsgi_req->file, wsgi_req->file_len);
+		callable = uwsgi_file_loader((void *)tmpstr);
+		free(tmpstr);
+	}
+	// TODO MANAGE UWSGI_PASTE
+/*
+	else if (wsgi_req->wsgi_paste_len > 0) {
+		tmpstr = uwsgi_strncopy(wsgi_req->paste, wsgi_req->paste_len);
+		callable = uwsgi_paste_loader((void *)tmpstr);
+		free(tmpstr);
+	}
+*/
+
+	return callable;
+}
+
+
+/* trying to emulate Graham's mod_wsgi, this will allows easy and fast migrations */
+PyObject *uwsgi_file_loader(void *arg1) {
+
+	char *filename = (char *) arg1;
+	PyObject *wsgi_file_module, *wsgi_file_dict;
+	PyObject *wsgi_file_callable;
+
+	wsgi_file_module = uwsgi_pyimport_by_filename("uwsgi_wsgi_file", filename);
+	// no need to check here for module import as it is already done by uwsgi_pyimport_by_file
+
+	wsgi_file_dict = PyModule_GetDict(wsgi_file_module);
+	if (!wsgi_file_dict) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	wsgi_file_callable = PyDict_GetItemString(wsgi_file_dict, "application");
+	if (!wsgi_file_callable) {
+		PyErr_Print();
+		uwsgi_log( "unable to find \"application\" callable in file %s\n", filename);
+		exit(1);
+	}
+
+	if (!PyFunction_Check(wsgi_file_callable) && !PyCallable_Check(wsgi_file_callable)) {
+		uwsgi_log( "\"application\" must be a callable object in file %s\n", filename);
+		exit(1);
+	}
+
+	return wsgi_file_callable;
+
+}
+
+PyObject *uwsgi_paste_loader(void *arg1) {
+
+	char *paste = (char *) arg1;
+	PyObject *paste_module, *paste_dict, *paste_loadapp;
+	PyObject *paste_arg, *paste_app;
+
+	uwsgi_log( "Loading paste environment: %s\n", paste);
+	paste_module = PyImport_ImportModule("paste.deploy");
+	if (!paste_module) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	paste_dict = PyModule_GetDict(paste_module);
+	if (!paste_dict) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	paste_loadapp = PyDict_GetItemString(paste_dict, "loadapp");
+	if (!paste_loadapp) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	paste_arg = PyTuple_New(1);
+	if (!paste_arg) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	if (PyTuple_SetItem(paste_arg, 0, PyString_FromString(paste))) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	paste_app = PyEval_CallObject(paste_loadapp, paste_arg);
+	if (!paste_app) {
+		PyErr_Print();
+		exit(1);
+	}
+
+
+	return paste_app;
+}
+
+PyObject *uwsgi_eval_loader(void *arg1) {
+
+	char *code = (char *) arg1;
+
+	PyObject *wsgi_eval_module, *wsgi_eval_callable = NULL;
+
+	struct _node *wsgi_eval_node = NULL;
+	PyObject *wsgi_compiled_node;
+
+	wsgi_eval_node = PyParser_SimpleParseString(code, Py_file_input);
+	if (!wsgi_eval_node) {
+		PyErr_Print();
+		uwsgi_log( "failed to parse <eval> code\n");
+		exit(1);
+	}
+
+	wsgi_compiled_node = (PyObject *) PyNode_Compile(wsgi_eval_node, "uwsgi_eval_config");
+
+	if (!wsgi_compiled_node) {
+		PyErr_Print();
+		uwsgi_log( "failed to compile eval code\n");
+		exit(1);
+	}
+
+
+	wsgi_eval_module = PyImport_ExecCodeModule("uwsgi_eval_config", wsgi_compiled_node);
+	if (!wsgi_eval_module) {
+		PyErr_Print();
+		exit(1);
+	}
+
+
+	Py_DECREF(wsgi_compiled_node);
+
+	up.loader_dict = PyModule_GetDict(wsgi_eval_module);
+	if (!up.loader_dict) {
+		PyErr_Print();
+		exit(1);
+	}
+
+
+	if (up.callable) {
+		wsgi_eval_callable = PyDict_GetItemString(up.loader_dict, up.callable);
+	}
+	else {
+		
+		wsgi_eval_callable = PyDict_GetItemString(up.loader_dict, "application");
+	}
+
+	if (wsgi_eval_callable) {
+		if (!PyFunction_Check(wsgi_eval_callable) && !PyCallable_Check(wsgi_eval_callable)) {
+			uwsgi_log( "you must define a callable object in your code\n");
+			exit(1);
+		}
+	}
+
+	return wsgi_eval_callable;
+
+}
+
+PyObject *uwsgi_callable_loader(void *arg1) {
+	return (PyObject *) arg1;
+}
+
+PyObject *uwsgi_string_callable_loader(void *arg1) {
+	char *callable = (char *) arg1;
+
+	return PyDict_GetItem(up.loader_dict, UWSGI_PYFROMSTRING(callable));
+}

plugins/python/python_plugin.c

@@ -0,0 +1,979 @@
+#include "uwsgi_python.h"
+
+extern struct uwsgi_server uwsgi;
+struct uwsgi_python up;
+
+extern PyTypeObject uwsgi_InputType;
+
+struct option uwsgi_python_options[] = {
+	{"wsgi-file", required_argument, 0, LONG_ARGS_WSGI_FILE},
+	{"file", required_argument, 0, LONG_ARGS_FILE_CONFIG},
+	{"eval", required_argument, 0, LONG_ARGS_EVAL_CONFIG},
+	{"module", required_argument, 0, 'w'},
+	{"callable", required_argument, 0, LONG_ARGS_CALLABLE},
+	{"test", required_argument, 0, 'j'},
+	{"home", required_argument, 0, 'H'},
+	{"virtualenv", required_argument, 0, 'H'},
+	{"venv", required_argument, 0, 'H'},
+	{"pyhome", required_argument, 0, 'H'},
+	{"pythonpath", required_argument, 0, LONG_ARGS_PYTHONPATH},
+	{"python-path", required_argument, 0, LONG_ARGS_PYTHONPATH},
+	{"pymodule-alias", required_argument, 0, LONG_ARGS_PYMODULE_ALIAS},
+	{"pp", required_argument, 0, LONG_ARGS_PYTHONPATH},
+	{"pyargv", required_argument, 0, LONG_ARGS_PYARGV},
+	{"optimize", required_argument, 0, 'O'},
+	{"paste", required_argument, 0, LONG_ARGS_PASTE},
+#ifdef UWSGI_INI
+	{"ini-paste", required_argument, 0, LONG_ARGS_INI_PASTE},
+#endif
+	{"catch-exceptions", no_argument, &up.catch_exceptions, 1},
+	{"ignore-script-name", no_argument, &up.ignore_script_name, 1},
+	{"pep3333-input", no_argument, &up.pep3333_input, 1},
+	{"reload-os-env", no_argument, &up.reload_os_env, 1},
+	{"no-site", no_argument, &Py_NoSiteFlag, 1},
+
+	{0, 0, 0, 0},
+};
+
+/* this routine will be called after each fork to reinitialize the various locks */
+void uwsgi_python_pthread_prepare(void) {
+	pthread_mutex_lock(&up.lock_pyloaders);
+}
+
+void uwsgi_python_pthread_parent(void) {
+	pthread_mutex_unlock(&up.lock_pyloaders);
+}
+
+void uwsgi_python_pthread_child(void) {
+	pthread_mutex_init(&up.lock_pyloaders, NULL);
+}
+
+// fake method
+PyMethodDef null_methods[] = {
+	{NULL, NULL},
+};
+
+PyMethodDef uwsgi_spit_method[] = { {"uwsgi_spit", py_uwsgi_spit, METH_VARARGS, ""} };
+PyMethodDef uwsgi_write_method[] = { {"uwsgi_write", py_uwsgi_write, METH_VARARGS, ""} };
+
+int uwsgi_python_init() {
+
+	char *pyversion = strchr(Py_GetVersion(), '\n');
+        uwsgi_log("Python version: %.*s %s\n", pyversion-Py_GetVersion(), Py_GetVersion(), Py_GetCompiler()+1);
+
+	if (up.home != NULL) {
+		uwsgi_log("Setting PythonHome to %s...\n", up.home);
+#ifdef PYTHREE
+		wchar_t *wpyhome;
+		wpyhome = malloc((sizeof(wchar_t) * strlen(up.home)) + 2);
+		if (!wpyhome) {
+			uwsgi_error("malloc()");
+			exit(1);
+		}
+		mbstowcs(wpyhome, up.home, strlen(up.home));
+		Py_SetPythonHome(wpyhome);
+		free(wpyhome);
+#else
+		Py_SetPythonHome(up.home);
+#endif
+	}
+
+#ifdef PYTHREE
+	wchar_t pname[6];
+	mbstowcs(pname, "uWSGI", 6);
+	Py_SetProgramName(pname);
+#else
+
+	Py_SetProgramName("uWSGI");
+#endif
+
+
+	Py_Initialize();
+
+	Py_OptimizeFlag = up.optimize;
+
+	up.wsgi_spitout = PyCFunction_New(uwsgi_spit_method, NULL);
+	up.wsgi_writeout = PyCFunction_New(uwsgi_write_method, NULL);
+
+	up.main_thread = PyThreadState_Get();
+
+        // by default set a fake GIL (little impact on performance)
+        up.gil_get = gil_fake_get;
+        up.gil_release = gil_fake_release;
+
+        up.swap_ts = simple_swap_ts;
+        up.reset_ts = simple_reset_ts;
+	
+
+	uwsgi_log("Python main interpreter initialized at %p\n", up.main_thread);
+
+	return 1;
+
+}
+
+void uwsgi_python_post_fork() {
+
+	PyObject *random_module, *random_dict, *random_seed;
+
+	// reinitialize the random seed (thanks Jonas Borgström)
+	random_module = PyImport_ImportModule("random");
+	if (random_module) {
+		random_dict = PyModule_GetDict(random_module);
+		if (random_dict) {
+			random_seed = PyDict_GetItemString(random_dict, "seed");
+			if (random_seed) {
+				PyObject *random_args = PyTuple_New(1);
+				// pass no args
+				PyTuple_SetItem(random_args, 0, Py_None);
+				PyEval_CallObject(random_seed, random_args);
+				if (PyErr_Occurred()) {
+					PyErr_Print();
+				}
+			}
+		}
+	}
+
+#ifdef UWSGI_EMBEDDED
+	// call the post_fork_hook
+	PyObject *uwsgi_dict = get_uwsgi_pydict("uwsgi");
+	if (uwsgi_dict) {
+		PyObject *pfh = PyDict_GetItemString(uwsgi_dict, "post_fork_hook");
+		if (pfh) {
+			python_call(pfh, PyTuple_New(0), 0);
+		}
+	}
+	PyErr_Clear();
+#endif
+
+UWSGI_RELEASE_GIL
+
+}
+
+PyObject *uwsgi_pyimport_by_filename(char *name, char *filename) {
+
+	FILE *pyfile;
+	struct _node *py_file_node = NULL;
+	PyObject *py_compiled_node, *py_file_module;
+	int is_a_package = 0;
+	struct stat pystat;
+	char *real_filename = filename;
+
+
+	pyfile = fopen(filename, "r");
+	if (!pyfile) {
+		uwsgi_log("failed to open python file %s\n", filename);
+		exit(1);
+	}
+
+	if (fstat(fileno(pyfile), &pystat)) {
+		uwsgi_error("fstat()");
+		exit(1);
+	}
+
+	if (S_ISDIR(pystat.st_mode)) {
+		is_a_package = 1;
+		fclose(pyfile);
+		real_filename = uwsgi_concat2(filename, "/__init__.py");
+		pyfile = fopen(real_filename, "r");
+		if (!pyfile) {
+			uwsgi_error("fopen()");
+			exit(1);
+		}
+	}
+
+	py_file_node = PyParser_SimpleParseFile(pyfile, real_filename, Py_file_input);
+	if (!py_file_node) {
+		PyErr_Print();
+		uwsgi_log("failed to parse file %s\n", real_filename);
+		exit(1);
+	}
+
+	fclose(pyfile);
+
+	py_compiled_node = (PyObject *) PyNode_Compile(py_file_node, real_filename);
+
+	if (!py_compiled_node) {
+		PyErr_Print();
+		uwsgi_log("failed to compile python file %s\n", real_filename);
+		exit(1);
+	}
+
+	py_file_module = PyImport_ExecCodeModule(name, py_compiled_node);
+	if (!py_file_module) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	Py_DECREF(py_compiled_node);
+
+	if (is_a_package) {
+		PyObject *py_file_module_dict = PyModule_GetDict(py_file_module);
+		if (py_file_module_dict) {
+			PyDict_SetItemString(py_file_module_dict, "__path__", Py_BuildValue("[O]", PyString_FromString(filename)));
+		}
+		free(real_filename);
+	}
+
+	return py_file_module;
+
+}
+
+
+void init_uwsgi_vars() {
+
+	int i;
+	PyObject *pysys, *pysys_dict, *pypath;
+
+	PyObject *modules = PyImport_GetModuleDict();
+	PyObject *tmp_module;
+
+#ifdef UWSGI_MINTERPRETERS
+	char venv_version[15];
+	PyObject *site_module;
+#endif
+
+	/* add cwd to pythonpath */
+	pysys = PyImport_ImportModule("sys");
+	if (!pysys) {
+		PyErr_Print();
+		exit(1);
+	}
+	pysys_dict = PyModule_GetDict(pysys);
+	pypath = PyDict_GetItemString(pysys_dict, "path");
+	if (!pypath) {
+		PyErr_Print();
+		exit(1);
+	}
+
+#ifdef UWSGI_MINTERPRETERS
+	// simulate a pythonhome directive
+	if (uwsgi.wsgi_req->pyhome_len > 0) {
+
+		PyObject *venv_path = UWSGI_PYFROMSTRINGSIZE(uwsgi.wsgi_req->pyhome, uwsgi.wsgi_req->pyhome_len);
+
+#ifdef UWSGI_DEBUG
+		uwsgi_debug("setting dynamic virtualenv to %.*s\n", uwsgi.wsgi_req->pyhome_len, uwsgi.wsgi_req->pyhome);
+#endif
+
+		PyDict_SetItemString(pysys_dict, "prefix", venv_path);
+		PyDict_SetItemString(pysys_dict, "exec_prefix", venv_path);
+
+		venv_version[14] = 0;
+		if (snprintf(venv_version, 15, "/lib/python%d.%d", PY_MAJOR_VERSION, PY_MINOR_VERSION) == -1) {
+			return;
+		}
+
+		// check here
+		PyString_Concat(&venv_path, PyString_FromString(venv_version));
+
+		if (PyList_Insert(pypath, 0, venv_path)) {
+			PyErr_Print();
+		}
+
+		site_module = PyImport_ImportModule("site");
+		if (site_module) {
+			PyImport_ReloadModule(site_module);
+		}
+
+	}
+#endif
+
+	if (PyList_Insert(pypath, 0, UWSGI_PYFROMSTRING(".")) != 0) {
+		PyErr_Print();
+	}
+
+	for (i = 0; i < up.python_path_cnt; i++) {
+		if (PyList_Insert(pypath, 0, UWSGI_PYFROMSTRING(up.python_path[i])) != 0) {
+			PyErr_Print();
+		}
+		else {
+			uwsgi_log("added %s to pythonpath.\n", up.python_path[i]);
+		}
+	}
+
+	for (i = 0; i < up.pymodule_alias_cnt; i++) {
+		// split key=value
+		char *value = strchr(up.pymodule_alias[i], '=');
+		if (!value) {
+			uwsgi_log("invalid pymodule-alias syntax\n");
+			continue;
+		}
+		value[0] = 0;
+		if (!strchr(value + 1, '/')) {
+			// this is a standard pymodule
+			tmp_module = PyImport_ImportModule(value + 1);
+			if (!tmp_module) {
+				PyErr_Print();
+				exit(1);
+			}
+
+			PyDict_SetItemString(modules, up.pymodule_alias[i], tmp_module);
+		}
+		else {
+			// this is a filepath that need to be mapped
+			tmp_module = uwsgi_pyimport_by_filename(up.pymodule_alias[i], value + 1);
+		}
+		uwsgi_log("mapped virtual pymodule \"%s\" to real pymodule \"%s\"\n", up.pymodule_alias[i], value + 1);
+		// reset original value
+		value[0] = '=';
+	}
+
+}
+
+
+
+#ifdef PYTHREE
+static PyModuleDef uwsgi_module3 = {
+	PyModuleDef_HEAD_INIT,
+	"uwsgi",
+	NULL,
+	-1,
+	null_methods,
+};
+PyObject *init_uwsgi3(void) {
+	return PyModule_Create(&uwsgi_module3);
+}
+#endif
+
+
+#ifdef UWSGI_EMBEDDED
+void init_uwsgi_embedded_module() {
+	PyObject *new_uwsgi_module, *zero;
+	int i;
+
+	PyType_Ready(&uwsgi_InputType);
+
+	/* initialize for stats */
+	up.workers_tuple = PyTuple_New(uwsgi.numproc);
+	for (i = 0; i < uwsgi.numproc; i++) {
+		zero = PyDict_New();
+		Py_INCREF(zero);
+		PyTuple_SetItem(up.workers_tuple, i, zero);
+	}
+
+
+
+#ifdef PYTHREE
+	PyImport_AppendInittab("uwsgi", init_uwsgi3);
+	new_uwsgi_module = PyImport_AddModule("uwsgi");
+#else
+	new_uwsgi_module = Py_InitModule("uwsgi", null_methods);
+#endif
+	if (new_uwsgi_module == NULL) {
+		uwsgi_log("could not initialize the uwsgi python module\n");
+		exit(1);
+	}
+
+	up.embedded_dict = PyModule_GetDict(new_uwsgi_module);
+	if (!up.embedded_dict) {
+		uwsgi_log("could not get uwsgi module __dict__\n");
+		exit(1);
+	}
+
+	if (PyDict_SetItemString(up.embedded_dict, "version", PyString_FromString(UWSGI_VERSION))) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	if (uwsgi.mode) {
+		if (PyDict_SetItemString(up.embedded_dict, "mode", PyString_FromString(uwsgi.mode))) {
+			PyErr_Print();
+			exit(1);
+		}
+	}
+
+	if (uwsgi.pidfile) {
+		if (PyDict_SetItemString(up.embedded_dict, "pidfile", PyString_FromString(uwsgi.pidfile))) {
+			PyErr_Print();
+			exit(1);
+		}
+	}
+
+
+	if (PyDict_SetItemString(up.embedded_dict, "SPOOL_RETRY", PyInt_FromLong(-1))) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	if (PyDict_SetItemString(up.embedded_dict, "SPOOL_OK", PyInt_FromLong(-2))) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	if (PyDict_SetItemString(up.embedded_dict, "SPOOL_IGNORE", PyInt_FromLong(0))) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	if (PyDict_SetItemString(up.embedded_dict, "numproc", PyInt_FromLong(uwsgi.numproc))) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	if (PyDict_SetItemString(up.embedded_dict, "cores", PyInt_FromLong(uwsgi.cores))) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	if (uwsgi.loop) {
+		if (PyDict_SetItemString(up.embedded_dict, "loop", PyString_FromString(uwsgi.loop))) {
+			PyErr_Print();
+			exit(1);
+		}
+	}
+
+	if (PyDict_SetItemString(up.embedded_dict, "KIND_NULL", PyInt_FromLong(KIND_NULL))) {
+		PyErr_Print();
+		exit(1);
+	}
+	if (PyDict_SetItemString(up.embedded_dict, "KIND_WORKER", PyInt_FromLong(KIND_WORKER))) {
+		PyErr_Print();
+		exit(1);
+	}
+	if (PyDict_SetItemString(up.embedded_dict, "KIND_EVENT", PyInt_FromLong(KIND_EVENT))) {
+		PyErr_Print();
+		exit(1);
+	}
+	if (PyDict_SetItemString(up.embedded_dict, "KIND_SPOOLER", PyInt_FromLong(KIND_SPOOLER))) {
+		PyErr_Print();
+		exit(1);
+	}
+
+/*
+	if (PyDict_SetItemString(up.embedded_dict, "KIND_ERLANG", PyInt_FromLong(KIND_ERLANG))) {
+		PyErr_Print();
+		exit(1);
+	}
+*/
+
+	if (PyDict_SetItemString(up.embedded_dict, "KIND_PROXY", PyInt_FromLong(KIND_PROXY))) {
+		PyErr_Print();
+		exit(1);
+	}
+	if (PyDict_SetItemString(up.embedded_dict, "KIND_MASTER", PyInt_FromLong(KIND_MASTER))) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	PyObject *py_opt_dict = PyDict_New();
+	for (i = 0; i < uwsgi.exported_opts_cnt; i++) {
+		if (PyDict_Contains(py_opt_dict, PyString_FromString(uwsgi.exported_opts[i]->key))) {
+			PyObject *py_opt_item = PyDict_GetItemString(py_opt_dict, uwsgi.exported_opts[i]->key);
+			if (PyList_Check(py_opt_item)) {
+				PyList_Append(py_opt_item, PyString_FromString(uwsgi.exported_opts[i]->value));
+			}
+			else {
+				PyObject *py_opt_list = PyList_New(0);
+				PyList_Append(py_opt_list, py_opt_item);
+				if (uwsgi.exported_opts[i]->value == NULL) {
+					PyList_Append(py_opt_list, Py_True);
+				}
+				else {
+					PyList_Append(py_opt_list, PyString_FromString(uwsgi.exported_opts[i]->value));
+				}
+
+				PyDict_SetItemString(py_opt_dict, uwsgi.exported_opts[i]->key, py_opt_list);
+			}
+		}
+		else {
+			if (uwsgi.exported_opts[i]->value == NULL) {
+				PyDict_SetItemString(py_opt_dict, uwsgi.exported_opts[i]->key, Py_True);
+			}
+			else {
+				PyDict_SetItemString(py_opt_dict, uwsgi.exported_opts[i]->key, PyString_FromString(uwsgi.exported_opts[i]->value));
+			}
+		}
+	}
+
+	if (PyDict_SetItemString(up.embedded_dict, "opt", py_opt_dict)) {
+		PyErr_Print();
+		exit(1);
+	}
+
+#ifdef UNBIT
+	if (PyDict_SetItemString(up.embedded_dict, "unbit", Py_True)) {
+#else
+	if (PyDict_SetItemString(up.embedded_dict, "unbit", Py_None)) {
+#endif
+		PyErr_Print();
+		exit(1);
+	}
+
+	if (PyDict_SetItemString(up.embedded_dict, "buffer_size", PyInt_FromLong(uwsgi.buffer_size))) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	if (PyDict_SetItemString(up.embedded_dict, "started_on", PyInt_FromLong(uwsgi.start_tv.tv_sec))) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	if (PyDict_SetItemString(up.embedded_dict, "start_response", up.wsgi_spitout)) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	if (PyDict_SetItemString(up.embedded_dict, "fastfuncs", PyList_New(256))) {
+		PyErr_Print();
+		exit(1);
+	}
+
+
+	if (PyDict_SetItemString(up.embedded_dict, "applications", Py_None)) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	if (uwsgi.is_a_reload) {
+		if (PyDict_SetItemString(up.embedded_dict, "is_a_reload", Py_True)) {
+			PyErr_Print();
+			exit(1);
+		}
+	}
+	else {
+		if (PyDict_SetItemString(up.embedded_dict, "is_a_reload", Py_False)) {
+			PyErr_Print();
+			exit(1);
+		}
+	}
+
+	up.embedded_args = PyTuple_New(2);
+	if (!up.embedded_args) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	if (PyDict_SetItemString(up.embedded_dict, "message_manager_marshal", Py_None)) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	up.fastfuncslist = PyDict_GetItemString(up.embedded_dict, "fastfuncs");
+	if (!up.fastfuncslist) {
+		PyErr_Print();
+		exit(1);
+	}
+
+	init_uwsgi_module_advanced(new_uwsgi_module);
+
+#ifdef UWSGI_SPOOLER
+	if (uwsgi.spool_dir != NULL) {
+		init_uwsgi_module_spooler(new_uwsgi_module);
+	}
+#endif
+
+
+	if (uwsgi.sharedareasize > 0 && uwsgi.sharedarea) {
+		init_uwsgi_module_sharedarea(new_uwsgi_module);
+	}
+
+	init_uwsgi_module_cache(new_uwsgi_module);
+
+	init_uwsgi_module_queue(new_uwsgi_module);
+
+	if (up.extension) {
+		up.extension();
+	}
+}
+#endif
+
+
+
+int uwsgi_python_magic(char *mountpoint, char *lazy) {
+
+	char *qc = strchr(lazy, ':');
+	if (qc) {
+		qc[0] = 0;
+		up.callable = qc + 1;
+	}
+
+	if (!strcmp(lazy + strlen(lazy) - 3, ".py")) {
+		up.file_config = lazy;
+		return 1;
+	}
+	else if (!strcmp(lazy + strlen(lazy) - 5, ".wsgi")) {
+		up.file_config = lazy;
+		return 1;
+	}
+	else if (qc && strchr(lazy, '.')) {
+		up.wsgi_config = lazy;
+		return 1;
+	}
+
+	// reset lazy
+	if (qc) {
+		qc[0] = ':';
+	}
+	return 0;
+
+}
+
+int uwsgi_python_manage_options(int i, char *optarg) {
+
+	switch (i) {
+	case 'w':
+		up.wsgi_config = optarg;
+		return 1;
+	case LONG_ARGS_WSGI_FILE:
+	case LONG_ARGS_FILE_CONFIG:
+		up.file_config = optarg;
+		return 1;
+	case LONG_ARGS_EVAL_CONFIG:
+		up.eval = optarg;
+		return 1;
+	case LONG_ARGS_PYMODULE_ALIAS:
+		if (up.pymodule_alias_cnt < MAX_PYMODULE_ALIAS) {
+			up.pymodule_alias[up.pymodule_alias_cnt] = optarg;
+			up.pymodule_alias_cnt++;
+		}
+		else {
+			uwsgi_log("you can specify at most %d --pymodule-alias options\n", MAX_PYMODULE_ALIAS);
+		}
+		return 1;
+	case LONG_ARGS_PYTHONPATH:
+		if (up.python_path_cnt < MAX_PYTHONPATH) {
+			up.python_path[up.python_path_cnt] = optarg;
+			up.python_path_cnt++;
+		}
+		else {
+			uwsgi_log("you can specify at most %d --pythonpath options\n", MAX_PYTHONPATH);
+		}
+		return 1;
+	case LONG_ARGS_PYARGV:
+		up.argv = optarg;
+		return 1;
+	case 'j':
+		up.test_module = optarg;
+		return 1;
+	case 'H':
+		up.home = optarg;
+		return 1;
+	case 'O':
+		up.optimize = atoi(optarg);
+		return 1;
+	case LONG_ARGS_CALLABLE:
+		up.callable = optarg;
+		return 1;
+
+
+	case LONG_ARGS_INI_PASTE:
+		uwsgi.ini = optarg;
+		if (uwsgi.ini[0] != '/') {
+			up.paste = uwsgi_concat4("config:", uwsgi.cwd, "/", uwsgi.ini);
+		}
+		else {
+			up.paste = uwsgi_concat2("config:", uwsgi.ini);
+		}
+		return 1;
+	case LONG_ARGS_PASTE:
+		up.paste = optarg;
+		return 1;
+
+
+
+	}
+
+	return 0;
+}
+
+int uwsgi_python_mount_app(char *mountpoint, char *app) {
+
+	uwsgi.wsgi_req->script_name = mountpoint;
+	uwsgi.wsgi_req->script_name_len = strlen(mountpoint);
+	if (uwsgi.single_interpreter) {
+		return init_uwsgi_app(LOADER_MOUNT, app, uwsgi.wsgi_req, up.main_thread);
+	}
+	return init_uwsgi_app(LOADER_MOUNT, app, uwsgi.wsgi_req, NULL);
+
+}
+
+void uwsgi_python_init_apps() {
+
+	init_pyargv();
+#ifdef UWSGI_MINTERPRETERS
+        init_uwsgi_embedded_module();
+#endif
+
+        if (up.test_module != NULL) {
+                if (PyImport_ImportModule(up.test_module)) {
+                        exit(0);
+                }
+                exit(1);
+        }
+
+        init_uwsgi_vars();
+
+        // setup app loaders
+#ifdef UWSGI_MINTERPRETERS
+        up.loaders[LOADER_DYN] = uwsgi_dyn_loader;
+#endif
+        up.loaders[LOADER_UWSGI] = uwsgi_uwsgi_loader;
+        up.loaders[LOADER_FILE] = uwsgi_file_loader;
+        up.loaders[LOADER_PASTE] = uwsgi_paste_loader;
+        up.loaders[LOADER_EVAL] = uwsgi_eval_loader;
+        up.loaders[LOADER_MOUNT] = uwsgi_mount_loader;
+        up.loaders[LOADER_CALLABLE] = uwsgi_callable_loader;
+        up.loaders[LOADER_STRING_CALLABLE] = uwsgi_string_callable_loader;
+
+
+	if (up.wsgi_config != NULL) {
+		init_uwsgi_app(LOADER_UWSGI, up.wsgi_config, uwsgi.wsgi_req, up.main_thread);
+	}
+
+	if (up.file_config != NULL) {
+		init_uwsgi_app(LOADER_FILE, up.file_config, uwsgi.wsgi_req, up.main_thread);
+	}
+	if (up.paste != NULL) {
+		init_uwsgi_app(LOADER_PASTE, up.paste, uwsgi.wsgi_req, up.main_thread);
+	}
+	if (up.eval != NULL) {
+		init_uwsgi_app(LOADER_EVAL, up.eval, uwsgi.wsgi_req, up.main_thread);
+	}
+
+}
+
+void uwsgi_python_enable_threads() {
+
+	PyEval_InitThreads();
+	if (pthread_key_create(&up.upt_save_key, NULL)) {
+		uwsgi_error("pthread_key_create()");
+		exit(1);
+	}
+	if (pthread_key_create(&up.upt_gil_key, NULL)) {
+		uwsgi_error("pthread_key_create()");
+		exit(1);
+	}
+	pthread_setspecific(up.upt_save_key, (void *) PyThreadState_Get());
+	pthread_setspecific(up.upt_gil_key, (void *) PyThreadState_Get());
+	pthread_mutex_init(&up.lock_pyloaders, NULL);
+	pthread_atfork(uwsgi_python_pthread_prepare, uwsgi_python_pthread_parent, uwsgi_python_pthread_child);
+
+	up.gil_get = gil_real_get;
+	up.gil_release = gil_real_release;
+
+	up.swap_ts = threaded_swap_ts;
+	up.reset_ts = threaded_reset_ts;
+	uwsgi_log("threads support enabled\n");
+}
+
+void uwsgi_python_init_thread(int core_id) {
+
+	// set a new ThreadState for each thread
+	PyThreadState *pts;
+	pts = PyThreadState_New(up.main_thread->interp);
+	pthread_setspecific(up.upt_save_key, (void *) pts);
+	pthread_setspecific(up.upt_gil_key, (void *) pts);
+
+}
+
+int uwsgi_python_xml(char *node, char *content) {
+
+	PyThreadState *interpreter = NULL;
+
+	if (uwsgi.single_interpreter) {
+		interpreter = up.main_thread;
+	}
+
+	if (!strcmp("script", node)) {
+		return init_uwsgi_app(LOADER_UWSGI, content, uwsgi.wsgi_req, interpreter);
+	}
+	else if (!strcmp("file", node)) {
+		return init_uwsgi_app(LOADER_FILE, content, uwsgi.wsgi_req, interpreter);
+	}
+	else if (!strcmp("eval", node)) {
+		return init_uwsgi_app(LOADER_EVAL, content, uwsgi.wsgi_req, interpreter);
+	}
+	else if (!strcmp("wsgi", node)) {
+		return init_uwsgi_app(LOADER_EVAL, content, uwsgi.wsgi_req, interpreter);
+	}
+	else if (!strcmp("module", node)) {
+		uwsgi.wsgi_req->module = content;
+		uwsgi.wsgi_req->module_len = strlen(content);
+		uwsgi.wsgi_req->callable = strchr(uwsgi.wsgi_req->module, ':');
+		if (uwsgi.wsgi_req->callable) {
+			uwsgi.wsgi_req->callable[0] = 0;
+			uwsgi.wsgi_req->callable++;
+			uwsgi.wsgi_req->callable_len = strlen(uwsgi.wsgi_req->callable);
+			uwsgi.wsgi_req->module_len = strlen(uwsgi.wsgi_req->module);
+			return init_uwsgi_app(LOADER_DYN, uwsgi.wsgi_req, uwsgi.wsgi_req, interpreter);
+		}
+		else {
+			return init_uwsgi_app(LOADER_UWSGI, content, uwsgi.wsgi_req, interpreter);
+		}
+		return 1;
+	}
+	else if (!strcmp("pyhome", node)) {
+		uwsgi.wsgi_req->pyhome = content;
+		uwsgi.wsgi_req->pyhome_len = strlen(content);
+		return 1;
+	}
+	else if (!strcmp("callable", node)) {
+		uwsgi.wsgi_req->callable = content;
+		uwsgi.wsgi_req->callable_len = strlen(content);
+		return init_uwsgi_app(LOADER_DYN, uwsgi.wsgi_req, uwsgi.wsgi_req, interpreter);
+	}
+
+	return 0;
+}
+
+void uwsgi_python_suspend(struct wsgi_request *wsgi_req) {
+
+	PyThreadState *tstate = PyThreadState_GET();
+
+	uwsgi_log("suspending python\n");
+	up.current_recursion_depth = tstate->recursion_depth;
+	up.current_frame = tstate->frame;
+
+}
+
+int uwsgi_python_signal_handler(uint8_t sig, void *handler) {
+
+	PyObject *args = PyTuple_New(1);
+	PyObject *ret;
+
+	if (!args)
+		return -1;
+
+	if (!handler) return -1;
+
+
+	PyTuple_SetItem(args, 0, PyInt_FromLong(sig));
+
+	ret = python_call(handler, args, 0);
+
+	if (ret) {
+		return 0;
+	}
+
+	return -1;
+}
+
+uint16_t uwsgi_python_rpc(void *func, uint8_t argc, char **argv, char *buffer) {
+
+	uint8_t i;
+	PyObject *pyargs = PyTuple_New(argc);
+	PyObject *ret;
+	char *rv;
+	size_t rl;
+
+	if (!pyargs)
+		return 0;
+
+	for (i = 0; i < argc; i++) {
+		PyTuple_SetItem(pyargs, i, PyString_FromString(argv[i]));
+	}
+
+	ret = python_call((PyObject *) func, pyargs, 0);
+
+	if (ret) {
+		if (PyString_Check(ret)) {
+			rv = PyString_AsString(ret);
+			rl = strlen(rv);
+			if (rl <= 0xffff) {
+				memcpy(buffer, rv, rl);
+				Py_DECREF(ret);
+				return rl;
+			}
+		}
+	}
+
+	if (PyErr_Occurred())
+		PyErr_Print();
+
+
+	return 0;
+
+}
+
+void uwsgi_python_add_item(char *key, uint16_t keylen, char *val, uint16_t vallen, void *data) {
+
+	PyObject *pydict = (PyObject *) data;
+
+	PyDict_SetItem(pydict, PyString_FromStringAndSize(key, keylen), PyString_FromStringAndSize(val, vallen));
+}
+
+int uwsgi_python_spooler(char *buf, uint16_t len) {
+
+	PyObject *spool_dict = PyDict_New();
+	PyObject *spool_func, *pyargs, *ret;
+
+	if (!up.embedded_dict) {
+		// ignore
+		return 0;
+	}
+
+	spool_func = PyDict_GetItemString(up.embedded_dict, "spooler");
+	if (!spool_func) {
+		// ignore
+		return 0;
+	}
+
+	if (uwsgi_hooked_parse(buf, len, uwsgi_python_add_item, spool_dict)) {
+		// malformed packet, destroy it
+		return -2;
+	}
+
+	pyargs = PyTuple_New(1);
+	PyTuple_SetItem(pyargs, 0, spool_dict);
+	
+	ret = python_call(spool_func, pyargs, 0);
+	if (ret) {
+		if (!PyInt_Check(ret)) {
+			// error, retry
+			return -1;
+		}	
+
+		return PyInt_AsLong(ret);
+	}
+	
+	if (PyErr_Occurred())
+		PyErr_Print();
+
+	// error, retry
+	return -1;
+}
+
+void uwsgi_python_resume(struct wsgi_request *wsgi_req) {
+
+	PyThreadState *tstate = PyThreadState_GET();
+
+	uwsgi_log("resuming python\n");
+	tstate->recursion_depth = up.current_recursion_depth;
+	tstate->frame = up.current_frame;
+
+}
+
+struct uwsgi_plugin python_plugin = {
+
+	.name = "python",
+	.modifier1 = 0,
+	.init = uwsgi_python_init,
+	.post_fork = uwsgi_python_post_fork,
+	.options = uwsgi_python_options,
+	.manage_opt = uwsgi_python_manage_options,
+	.short_options = "w:O:H:j:",
+	.request = uwsgi_request_wsgi,
+	.after_request = uwsgi_after_request_wsgi,
+	.init_apps = uwsgi_python_init_apps,
+
+	.mount_app = uwsgi_python_mount_app,
+
+	.enable_threads = uwsgi_python_enable_threads,
+	.init_thread = uwsgi_python_init_thread,
+	.manage_xml = uwsgi_python_xml,
+
+	.magic = uwsgi_python_magic,
+
+	.suspend = uwsgi_python_suspend,
+	.resume = uwsgi_python_resume,
+
+	.signal_handler = uwsgi_python_signal_handler,
+	.rpc = uwsgi_python_rpc,
+
+	.spooler = uwsgi_python_spooler,
+	/*
+	   .help = uwsgi_python_help,
+	 */
+
+};

plugins/python/pyutils.c

@@ -0,0 +1,101 @@
+#include "uwsgi_python.h"
+
+extern struct uwsgi_server uwsgi;
+extern struct uwsgi_python up;
+
+int manage_python_response(struct wsgi_request *wsgi_req) {
+	// use standard WSGI response parse
+	wsgi_req->switches++;
+	return uwsgi_response_subhandler_wsgi(wsgi_req);
+}
+
+PyObject *python_call(PyObject *callable, PyObject *args, int catch) {
+
+	PyObject *pyret;
+
+	pyret =  PyEval_CallObject(callable, args);
+
+	if (PyErr_Occurred()) {
+		if (PyErr_ExceptionMatches(PyExc_MemoryError)) {
+			uwsgi_log("Memory Error detected !!!\n");
+		}
+		uwsgi.workers[uwsgi.mywid].exceptions++;
+		if (!catch) {
+			PyErr_Print();
+		}
+	}
+
+#ifdef UWSGI_DEBUG
+	if (pyret) {
+		uwsgi_debug("called %p %p %d\n", callable, args, pyret->ob_refcnt);
+	}
+#endif
+
+	return pyret;
+}
+
+int uwsgi_python_call(struct wsgi_request *wsgi_req, PyObject *callable, PyObject *args) {
+
+	wsgi_req->async_result = python_call(callable, args, 0);
+
+	if (wsgi_req->async_result) {
+		while ( manage_python_response(wsgi_req) != UWSGI_OK) {
+#ifdef UWSGI_ASYNC
+			if (uwsgi.async > 1) {
+				return UWSGI_AGAIN;
+			}
+#endif
+		}
+	}
+
+	return UWSGI_OK;
+}
+
+void init_pyargv() {
+
+	char *ap;
+
+#ifdef PYTHREE
+	wchar_t pname[6];
+	mbstowcs(pname, "uwsgi", 6);
+	up.py_argv[0] = pname;
+#else
+	up.py_argv[0] = "uwsgi";
+#endif
+
+	if (up.argv != NULL && !up.argc) {
+		up.argc++;
+#ifdef PYTHREE
+		wchar_t *wcargv = malloc( sizeof( wchar_t ) * (strlen(up.argv)+1));
+		if (!wcargv) {
+			uwsgi_error("malloc()");
+			exit(1);
+		}
+		memset(wcargv, 0, sizeof( wchar_t ) * (strlen(up.argv)+1));
+#endif
+
+#ifdef __sun__
+		// FIX THIS !!!
+		ap = strtok(up.argv, " ");
+		while ((ap = strtok(NULL, " ")) != NULL) {
+#else
+			while ((ap = strsep(&up.argv, " \t")) != NULL) {
+#endif
+				if (*ap != '\0') {
+#ifdef PYTHREE
+					mbstowcs( wcargv + strlen(ap), ap, strlen(ap));
+					up.py_argv[up.argc] = wcargv + strlen(ap);
+#else
+					up.py_argv[up.argc] = ap;
+#endif
+					up.argc++;
+				}
+				if (up.argc + 1 > MAX_PYARGV)
+					break;
+			}
+		}
+
+		PySys_SetArgv(up.argc, up.py_argv);
+
+
+}