exporting correct SCRIPT_FILENAME for CGI

This commit is contained in:
valenok 2010-09-19 13:00:49 +01:00
parent 3e5d2bd3ac
commit 1811240587
2 changed files with 10 additions and 7 deletions

View File

@ -210,8 +210,9 @@ typedef int SOCKET;
#if defined(DEBUG)
#define DEBUG_TRACE(x) do { \
flockfile(stdout); \
printf("*** [%lu] thread %p: %s: ", \
(unsigned long) time(NULL), (void *) pthread_self(), __func__); \
printf("*** %lu.%p.%s.%d: ", \
(unsigned long) time(NULL), (void *) pthread_self(), \
__func__, __LINE__); \
printf x; \
putchar('\n'); \
fflush(stdout); \
@ -743,7 +744,6 @@ static void send_http_error(struct mg_connection *conn, int status,
va_list ap;
int len;
DEBUG_TRACE(("%d %s", status, reason));
conn->request_info.status_code = status;
if (call_user(conn, MG_HTTP_ERROR) == NULL) {
@ -757,9 +757,10 @@ static void send_http_error(struct mg_connection *conn, int status,
buf[len++] = '\n';
va_start(ap, fmt);
mg_vsnprintf(conn, buf + len, sizeof(buf) - len, fmt, ap);
len += mg_vsnprintf(conn, buf + len, sizeof(buf) - len, fmt, ap);
va_end(ap);
}
DEBUG_TRACE(("[%s]", buf));
mg_printf(conn, "HTTP/1.1 %d %s\r\n"
"Content-Type: text/plain\r\n"
@ -2777,7 +2778,7 @@ static void prepare_cgi_environment(struct mg_connection *conn,
(slash - conn->request_info.uri) + 1, conn->request_info.uri,
script_filename);
addenv(blk, "SCRIPT_FILENAME=%s", script_filename);
addenv(blk, "SCRIPT_FILENAME=%s", prog);
addenv(blk, "PATH_TRANSLATED=%s", prog);
addenv(blk, "HTTPS=%s", conn->ssl == NULL ? "off" : "on");
@ -2898,8 +2899,8 @@ static void handle_cgi_request(struct mg_connection *conn, const char *prog) {
buf, sizeof(buf), &data_len);
if (headers_len <= 0) {
send_http_error(conn, 500, http_500_error,
"CGI program sent malformed HTTP headers: [%.*s]",
data_len, buf);
"CGI program sent malformed HTTP headers: [%.*s]",
data_len, buf);
goto done;
}
pbuf = buf;

View File

@ -210,6 +210,8 @@ write_file($path, read_file($root . $dir_separator . 'env.cgi'));
chmod 0755, $path;
o("GET /$test_dir_uri/x/ HTTP/1.0\n\n", "Content-Type: text/html\r\n\r\n",
'index.cgi execution');
o("GET /$test_dir_uri/x/ HTTP/1.0\n\n",
"SCRIPT_FILENAME=test/test_dir/x/index.cgi", 'SCRIPT_FILENAME');
o("GET /ta/x/ HTTP/1.0\n\n", "SCRIPT_NAME=/ta/x/index.cgi",
'Aliases SCRIPT_NAME');
#o("GET /hello.txt HTTP/1.1\n\n GET /hello.txt HTTP/1.0\n\n",