1 /*
2 +----------------------------------------------------------------------+
3 | PHP Version 5 |
4 +----------------------------------------------------------------------+
5 | Copyright (c) 1997-2014 The PHP Group |
6 +----------------------------------------------------------------------+
7 | This source file is subject to version 3.01 of the PHP license, |
8 | that is bundled with this package in the file LICENSE, and is |
9 | available through the world-wide-web at the following url: |
10 | http://www.php.net/license/3_01.txt |
11 | If you did not receive a copy of the PHP license and are unable to |
12 | obtain it through the world-wide-web, please send a note to |
13 | license@php.net so we can mail you a copy immediately. |
14 +----------------------------------------------------------------------+
15 | Authors: Rasmus Lerdorf <rasmus@lerdorf.on.ca> |
16 | Stig Bakken <ssb@php.net> |
17 | Zeev Suraski <zeev@zend.com> |
18 | FastCGI: Ben Mansell <php@slimyhorror.com> |
19 | Shane Caraveo <shane@caraveo.com> |
20 | Dmitry Stogov <dmitry@zend.com> |
21 +----------------------------------------------------------------------+
22 */
23
24 /* $Id$ */
25
26 #include "php.h"
27 #include "php_globals.h"
28 #include "php_variables.h"
29 #include "zend_modules.h"
30
31 #include "SAPI.h"
32
33 #include <stdio.h>
34 #include "php.h"
35
36 #ifdef PHP_WIN32
37 # include "win32/time.h"
38 # include "win32/signal.h"
39 # include <process.h>
40 #endif
41
42 #if HAVE_SYS_TIME_H
43 # include <sys/time.h>
44 #endif
45
46 #if HAVE_UNISTD_H
47 # include <unistd.h>
48 #endif
49
50 #if HAVE_SIGNAL_H
51 # include <signal.h>
52 #endif
53
54 #if HAVE_SETLOCALE
55 # include <locale.h>
56 #endif
57
58 #if HAVE_SYS_TYPES_H
59 # include <sys/types.h>
60 #endif
61
62 #if HAVE_SYS_WAIT_H
63 # include <sys/wait.h>
64 #endif
65
66 #include "zend.h"
67 #include "zend_extensions.h"
68 #include "php_ini.h"
69 #include "php_globals.h"
70 #include "php_main.h"
71 #include "fopen_wrappers.h"
72 #include "ext/standard/php_standard.h"
73 #include "ext/standard/url.h"
74
75 #ifdef PHP_WIN32
76 # include <io.h>
77 # include <fcntl.h>
78 # include "win32/php_registry.h"
79 #endif
80
81 #ifdef __riscos__
82 # include <unixlib/local.h>
83 int __riscosify_control = __RISCOSIFY_STRICT_UNIX_SPECS;
84 #endif
85
86 #include "zend_compile.h"
87 #include "zend_execute.h"
88 #include "zend_highlight.h"
89 #include "zend_indent.h"
90
91 #include "php_getopt.h"
92
93 #include "fastcgi.h"
94
95 #ifndef PHP_WIN32
96 /* XXX this will need to change later when threaded fastcgi is implemented. shane */
97 struct sigaction act, old_term, old_quit, old_int;
98 #endif
99
100 static void (*php_php_import_environment_variables)(zval *array_ptr TSRMLS_DC);
101
102 #ifndef PHP_WIN32
103 /* these globals used for forking children on unix systems */
104 /**
105 * Number of child processes that will get created to service requests
106 */
107 static int children = 0;
108
109
110 /**
111 * Set to non-zero if we are the parent process
112 */
113 static int parent = 1;
114
115 /* Did parent received exit signals SIG_TERM/SIG_INT/SIG_QUIT */
116 static int exit_signal = 0;
117
118 /* Is Parent waiting for children to exit */
119 static int parent_waiting = 0;
120
121 /**
122 * Process group
123 */
124 static pid_t pgroup;
125 #endif
126
127 #define PHP_MODE_STANDARD 1
128 #define PHP_MODE_HIGHLIGHT 2
129 #define PHP_MODE_INDENT 3
130 #define PHP_MODE_LINT 4
131 #define PHP_MODE_STRIP 5
132
133 static char *php_optarg = NULL;
134 static int php_optind = 1;
135 static zend_module_entry cgi_module_entry;
136
137 static const opt_struct OPTIONS[] = {
138 {'a', 0, "interactive"},
139 {'b', 1, "bindpath"},
140 {'C', 0, "no-chdir"},
141 {'c', 1, "php-ini"},
142 {'d', 1, "define"},
143 {'e', 0, "profile-info"},
144 {'f', 1, "file"},
145 {'h', 0, "help"},
146 {'i', 0, "info"},
147 {'l', 0, "syntax-check"},
148 {'m', 0, "modules"},
149 {'n', 0, "no-php-ini"},
150 {'q', 0, "no-header"},
151 {'s', 0, "syntax-highlight"},
152 {'s', 0, "syntax-highlighting"},
153 {'w', 0, "strip"},
154 {'?', 0, "usage"},/* help alias (both '?' and 'usage') */
155 {'v', 0, "version"},
156 {'z', 1, "zend-extension"},
157 {'T', 1, "timing"},
158 {'-', 0, NULL} /* end of args */
159 };
160
161 typedef struct _php_cgi_globals_struct {
162 zend_bool rfc2616_headers;
163 zend_bool nph;
164 zend_bool check_shebang_line;
165 zend_bool fix_pathinfo;
166 zend_bool force_redirect;
167 zend_bool discard_path;
168 zend_bool fcgi_logging;
169 char *redirect_status_env;
170 #ifdef PHP_WIN32
171 zend_bool impersonate;
172 #endif
173 HashTable user_config_cache;
174 } php_cgi_globals_struct;
175
176 /* {{{ user_config_cache
177 *
178 * Key for each cache entry is dirname(PATH_TRANSLATED).
179 *
180 * NOTE: Each cache entry config_hash contains the combination from all user ini files found in
181 * the path starting from doc_root throught to dirname(PATH_TRANSLATED). There is no point
182 * storing per-file entries as it would not be possible to detect added / deleted entries
183 * between separate files.
184 */
185 typedef struct _user_config_cache_entry {
186 time_t expires;
187 HashTable *user_config;
188 } user_config_cache_entry;
189
user_config_cache_entry_dtor(user_config_cache_entry * entry)190 static void user_config_cache_entry_dtor(user_config_cache_entry *entry)
191 {
192 zend_hash_destroy(entry->user_config);
193 free(entry->user_config);
194 }
195 /* }}} */
196
197 #ifdef ZTS
198 static int php_cgi_globals_id;
199 #define CGIG(v) TSRMG(php_cgi_globals_id, php_cgi_globals_struct *, v)
200 #else
201 static php_cgi_globals_struct php_cgi_globals;
202 #define CGIG(v) (php_cgi_globals.v)
203 #endif
204
205 #ifdef PHP_WIN32
206 #define TRANSLATE_SLASHES(path) \
207 { \
208 char *tmp = path; \
209 while (*tmp) { \
210 if (*tmp == '\\') *tmp = '/'; \
211 tmp++; \
212 } \
213 }
214 #else
215 #define TRANSLATE_SLASHES(path)
216 #endif
217
print_module_info(zend_module_entry * module,void * arg TSRMLS_DC)218 static int print_module_info(zend_module_entry *module, void *arg TSRMLS_DC)
219 {
220 php_printf("%s\n", module->name);
221 return 0;
222 }
223
module_name_cmp(const void * a,const void * b TSRMLS_DC)224 static int module_name_cmp(const void *a, const void *b TSRMLS_DC)
225 {
226 Bucket *f = *((Bucket **) a);
227 Bucket *s = *((Bucket **) b);
228
229 return strcasecmp( ((zend_module_entry *)f->pData)->name,
230 ((zend_module_entry *)s->pData)->name);
231 }
232
print_modules(TSRMLS_D)233 static void print_modules(TSRMLS_D)
234 {
235 HashTable sorted_registry;
236 zend_module_entry tmp;
237
238 zend_hash_init(&sorted_registry, 50, NULL, NULL, 1);
239 zend_hash_copy(&sorted_registry, &module_registry, NULL, &tmp, sizeof(zend_module_entry));
240 zend_hash_sort(&sorted_registry, zend_qsort, module_name_cmp, 0 TSRMLS_CC);
241 zend_hash_apply_with_argument(&sorted_registry, (apply_func_arg_t) print_module_info, NULL TSRMLS_CC);
242 zend_hash_destroy(&sorted_registry);
243 }
244
print_extension_info(zend_extension * ext,void * arg TSRMLS_DC)245 static int print_extension_info(zend_extension *ext, void *arg TSRMLS_DC)
246 {
247 php_printf("%s\n", ext->name);
248 return 0;
249 }
250
extension_name_cmp(const zend_llist_element ** f,const zend_llist_element ** s TSRMLS_DC)251 static int extension_name_cmp(const zend_llist_element **f, const zend_llist_element **s TSRMLS_DC)
252 {
253 return strcmp( ((zend_extension *)(*f)->data)->name,
254 ((zend_extension *)(*s)->data)->name);
255 }
256
print_extensions(TSRMLS_D)257 static void print_extensions(TSRMLS_D)
258 {
259 zend_llist sorted_exts;
260
261 zend_llist_copy(&sorted_exts, &zend_extensions);
262 sorted_exts.dtor = NULL;
263 zend_llist_sort(&sorted_exts, extension_name_cmp TSRMLS_CC);
264 zend_llist_apply_with_argument(&sorted_exts, (llist_apply_with_arg_func_t) print_extension_info, NULL TSRMLS_CC);
265 zend_llist_destroy(&sorted_exts);
266 }
267
268 #ifndef STDOUT_FILENO
269 #define STDOUT_FILENO 1
270 #endif
271
sapi_cgi_single_write(const char * str,uint str_length TSRMLS_DC)272 static inline size_t sapi_cgi_single_write(const char *str, uint str_length TSRMLS_DC)
273 {
274 #ifdef PHP_WRITE_STDOUT
275 long ret;
276
277 ret = write(STDOUT_FILENO, str, str_length);
278 if (ret <= 0) return 0;
279 return ret;
280 #else
281 size_t ret;
282
283 ret = fwrite(str, 1, MIN(str_length, 16384), stdout);
284 return ret;
285 #endif
286 }
287
sapi_cgi_ub_write(const char * str,uint str_length TSRMLS_DC)288 static int sapi_cgi_ub_write(const char *str, uint str_length TSRMLS_DC)
289 {
290 const char *ptr = str;
291 uint remaining = str_length;
292 size_t ret;
293
294 while (remaining > 0) {
295 ret = sapi_cgi_single_write(ptr, remaining TSRMLS_CC);
296 if (!ret) {
297 php_handle_aborted_connection();
298 return str_length - remaining;
299 }
300 ptr += ret;
301 remaining -= ret;
302 }
303
304 return str_length;
305 }
306
sapi_fcgi_ub_write(const char * str,uint str_length TSRMLS_DC)307 static int sapi_fcgi_ub_write(const char *str, uint str_length TSRMLS_DC)
308 {
309 const char *ptr = str;
310 uint remaining = str_length;
311 fcgi_request *request = (fcgi_request*) SG(server_context);
312
313 while (remaining > 0) {
314 long ret = fcgi_write(request, FCGI_STDOUT, ptr, remaining);
315
316 if (ret <= 0) {
317 php_handle_aborted_connection();
318 return str_length - remaining;
319 }
320 ptr += ret;
321 remaining -= ret;
322 }
323
324 return str_length;
325 }
326
sapi_cgi_flush(void * server_context)327 static void sapi_cgi_flush(void *server_context)
328 {
329 if (fflush(stdout) == EOF) {
330 php_handle_aborted_connection();
331 }
332 }
333
sapi_fcgi_flush(void * server_context)334 static void sapi_fcgi_flush(void *server_context)
335 {
336 fcgi_request *request = (fcgi_request*) server_context;
337
338 if (
339 #ifndef PHP_WIN32
340 !parent &&
341 #endif
342 request && !fcgi_flush(request, 0)) {
343
344 php_handle_aborted_connection();
345 }
346 }
347
348 #define SAPI_CGI_MAX_HEADER_LENGTH 1024
349
350 typedef struct _http_error {
351 int code;
352 const char* msg;
353 } http_error;
354
355 static const http_error http_error_codes[] = {
356 {100, "Continue"},
357 {101, "Switching Protocols"},
358 {200, "OK"},
359 {201, "Created"},
360 {202, "Accepted"},
361 {203, "Non-Authoritative Information"},
362 {204, "No Content"},
363 {205, "Reset Content"},
364 {206, "Partial Content"},
365 {300, "Multiple Choices"},
366 {301, "Moved Permanently"},
367 {302, "Moved Temporarily"},
368 {303, "See Other"},
369 {304, "Not Modified"},
370 {305, "Use Proxy"},
371 {400, "Bad Request"},
372 {401, "Unauthorized"},
373 {402, "Payment Required"},
374 {403, "Forbidden"},
375 {404, "Not Found"},
376 {405, "Method Not Allowed"},
377 {406, "Not Acceptable"},
378 {407, "Proxy Authentication Required"},
379 {408, "Request Time-out"},
380 {409, "Conflict"},
381 {410, "Gone"},
382 {411, "Length Required"},
383 {412, "Precondition Failed"},
384 {413, "Request Entity Too Large"},
385 {414, "Request-URI Too Large"},
386 {415, "Unsupported Media Type"},
387 {428, "Precondition Required"},
388 {429, "Too Many Requests"},
389 {431, "Request Header Fields Too Large"},
390 {500, "Internal Server Error"},
391 {501, "Not Implemented"},
392 {502, "Bad Gateway"},
393 {503, "Service Unavailable"},
394 {504, "Gateway Time-out"},
395 {505, "HTTP Version not supported"},
396 {511, "Network Authentication Required"},
397 {0, NULL}
398 };
399
sapi_cgi_send_headers(sapi_headers_struct * sapi_headers TSRMLS_DC)400 static int sapi_cgi_send_headers(sapi_headers_struct *sapi_headers TSRMLS_DC)
401 {
402 char buf[SAPI_CGI_MAX_HEADER_LENGTH];
403 sapi_header_struct *h;
404 zend_llist_position pos;
405 zend_bool ignore_status = 0;
406 int response_status = SG(sapi_headers).http_response_code;
407
408 if (SG(request_info).no_headers == 1) {
409 return SAPI_HEADER_SENT_SUCCESSFULLY;
410 }
411
412 if (CGIG(nph) || SG(sapi_headers).http_response_code != 200)
413 {
414 int len;
415 zend_bool has_status = 0;
416
417 if (CGIG(rfc2616_headers) && SG(sapi_headers).http_status_line) {
418 char *s;
419 len = slprintf(buf, SAPI_CGI_MAX_HEADER_LENGTH, "%s\r\n", SG(sapi_headers).http_status_line);
420 if ((s = strchr(SG(sapi_headers).http_status_line, ' '))) {
421 response_status = atoi((s + 1));
422 }
423
424 if (len > SAPI_CGI_MAX_HEADER_LENGTH) {
425 len = SAPI_CGI_MAX_HEADER_LENGTH;
426 }
427
428 } else {
429 char *s;
430
431 if (SG(sapi_headers).http_status_line &&
432 (s = strchr(SG(sapi_headers).http_status_line, ' ')) != 0 &&
433 (s - SG(sapi_headers).http_status_line) >= 5 &&
434 strncasecmp(SG(sapi_headers).http_status_line, "HTTP/", 5) == 0
435 ) {
436 len = slprintf(buf, sizeof(buf), "Status:%s\r\n", s);
437 response_status = atoi((s + 1));
438 } else {
439 h = (sapi_header_struct*)zend_llist_get_first_ex(&sapi_headers->headers, &pos);
440 while (h) {
441 if (h->header_len > sizeof("Status:")-1 &&
442 strncasecmp(h->header, "Status:", sizeof("Status:")-1) == 0
443 ) {
444 has_status = 1;
445 break;
446 }
447 h = (sapi_header_struct*)zend_llist_get_next_ex(&sapi_headers->headers, &pos);
448 }
449 if (!has_status) {
450 http_error *err = (http_error*)http_error_codes;
451
452 while (err->code != 0) {
453 if (err->code == SG(sapi_headers).http_response_code) {
454 break;
455 }
456 err++;
457 }
458 if (err->msg) {
459 len = slprintf(buf, sizeof(buf), "Status: %d %s\r\n", SG(sapi_headers).http_response_code, err->msg);
460 } else {
461 len = slprintf(buf, sizeof(buf), "Status: %d\r\n", SG(sapi_headers).http_response_code);
462 }
463 }
464 }
465 }
466
467 if (!has_status) {
468 PHPWRITE_H(buf, len);
469 ignore_status = 1;
470 }
471 }
472
473 h = (sapi_header_struct*)zend_llist_get_first_ex(&sapi_headers->headers, &pos);
474 while (h) {
475 /* prevent CRLFCRLF */
476 if (h->header_len) {
477 if (h->header_len > sizeof("Status:")-1 &&
478 strncasecmp(h->header, "Status:", sizeof("Status:")-1) == 0
479 ) {
480 if (!ignore_status) {
481 ignore_status = 1;
482 PHPWRITE_H(h->header, h->header_len);
483 PHPWRITE_H("\r\n", 2);
484 }
485 } else if (response_status == 304 && h->header_len > sizeof("Content-Type:")-1 &&
486 strncasecmp(h->header, "Content-Type:", sizeof("Content-Type:")-1) == 0
487 ) {
488 h = (sapi_header_struct*)zend_llist_get_next_ex(&sapi_headers->headers, &pos);
489 continue;
490 } else {
491 PHPWRITE_H(h->header, h->header_len);
492 PHPWRITE_H("\r\n", 2);
493 }
494 }
495 h = (sapi_header_struct*)zend_llist_get_next_ex(&sapi_headers->headers, &pos);
496 }
497 PHPWRITE_H("\r\n", 2);
498
499 return SAPI_HEADER_SENT_SUCCESSFULLY;
500 }
501
502 #ifndef STDIN_FILENO
503 # define STDIN_FILENO 0
504 #endif
505
sapi_cgi_read_post(char * buffer,uint count_bytes TSRMLS_DC)506 static int sapi_cgi_read_post(char *buffer, uint count_bytes TSRMLS_DC)
507 {
508 uint read_bytes = 0;
509 int tmp_read_bytes;
510
511 count_bytes = MIN(count_bytes, (uint) SG(request_info).content_length - SG(read_post_bytes));
512 while (read_bytes < count_bytes) {
513 tmp_read_bytes = read(STDIN_FILENO, buffer + read_bytes, count_bytes - read_bytes);
514 if (tmp_read_bytes <= 0) {
515 break;
516 }
517 read_bytes += tmp_read_bytes;
518 }
519 return read_bytes;
520 }
521
sapi_fcgi_read_post(char * buffer,uint count_bytes TSRMLS_DC)522 static int sapi_fcgi_read_post(char *buffer, uint count_bytes TSRMLS_DC)
523 {
524 uint read_bytes = 0;
525 int tmp_read_bytes;
526 fcgi_request *request = (fcgi_request*) SG(server_context);
527
528 count_bytes = MIN(count_bytes, (uint) SG(request_info).content_length - SG(read_post_bytes));
529 while (read_bytes < count_bytes) {
530 tmp_read_bytes = fcgi_read(request, buffer + read_bytes, count_bytes - read_bytes);
531 if (tmp_read_bytes <= 0) {
532 break;
533 }
534 read_bytes += tmp_read_bytes;
535 }
536 return read_bytes;
537 }
538
sapi_cgi_getenv(char * name,size_t name_len TSRMLS_DC)539 static char *sapi_cgi_getenv(char *name, size_t name_len TSRMLS_DC)
540 {
541 return getenv(name);
542 }
543
sapi_fcgi_getenv(char * name,size_t name_len TSRMLS_DC)544 static char *sapi_fcgi_getenv(char *name, size_t name_len TSRMLS_DC)
545 {
546 /* when php is started by mod_fastcgi, no regular environment
547 * is provided to PHP. It is always sent to PHP at the start
548 * of a request. So we have to do our own lookup to get env
549 * vars. This could probably be faster somehow. */
550 fcgi_request *request = (fcgi_request*) SG(server_context);
551 char *ret = fcgi_getenv(request, name, name_len);
552
553 if (ret) return ret;
554 /* if cgi, or fastcgi and not found in fcgi env
555 check the regular environment */
556 return getenv(name);
557 }
558
_sapi_cgi_putenv(char * name,int name_len,char * value)559 static char *_sapi_cgi_putenv(char *name, int name_len, char *value)
560 {
561 #if !HAVE_SETENV || !HAVE_UNSETENV
562 int len;
563 char *buf;
564 #endif
565
566 #if HAVE_SETENV
567 if (value) {
568 setenv(name, value, 1);
569 }
570 #endif
571 #if HAVE_UNSETENV
572 if (!value) {
573 unsetenv(name);
574 }
575 #endif
576
577 #if !HAVE_SETENV || !HAVE_UNSETENV
578 /* if cgi, or fastcgi and not found in fcgi env
579 check the regular environment
580 this leaks, but it's only cgi anyway, we'll fix
581 it for 5.0
582 */
583 len = name_len + (value ? strlen(value) : 0) + sizeof("=") + 2;
584 buf = (char *) malloc(len);
585 if (buf == NULL) {
586 return getenv(name);
587 }
588 #endif
589 #if !HAVE_SETENV
590 if (value) {
591 len = slprintf(buf, len - 1, "%s=%s", name, value);
592 putenv(buf);
593 }
594 #endif
595 #if !HAVE_UNSETENV
596 if (!value) {
597 len = slprintf(buf, len - 1, "%s=", name);
598 putenv(buf);
599 }
600 #endif
601 return getenv(name);
602 }
603
sapi_cgi_read_cookies(TSRMLS_D)604 static char *sapi_cgi_read_cookies(TSRMLS_D)
605 {
606 return getenv("HTTP_COOKIE");
607 }
608
sapi_fcgi_read_cookies(TSRMLS_D)609 static char *sapi_fcgi_read_cookies(TSRMLS_D)
610 {
611 fcgi_request *request = (fcgi_request*) SG(server_context);
612
613 return FCGI_GETENV(request, "HTTP_COOKIE");
614 }
615
cgi_php_load_env_var(char * var,unsigned int var_len,char * val,unsigned int val_len,void * arg TSRMLS_DC)616 static void cgi_php_load_env_var(char *var, unsigned int var_len, char *val, unsigned int val_len, void *arg TSRMLS_DC)
617 {
618 zval *array_ptr = (zval*)arg;
619 int filter_arg = (array_ptr == PG(http_globals)[TRACK_VARS_ENV])?PARSE_ENV:PARSE_SERVER;
620 unsigned int new_val_len;
621
622 if (sapi_module.input_filter(filter_arg, var, &val, strlen(val), &new_val_len TSRMLS_CC)) {
623 php_register_variable_safe(var, val, new_val_len, array_ptr TSRMLS_CC);
624 }
625 }
626
cgi_php_import_environment_variables(zval * array_ptr TSRMLS_DC)627 static void cgi_php_import_environment_variables(zval *array_ptr TSRMLS_DC)
628 {
629 if (PG(http_globals)[TRACK_VARS_ENV] &&
630 array_ptr != PG(http_globals)[TRACK_VARS_ENV] &&
631 Z_TYPE_P(PG(http_globals)[TRACK_VARS_ENV]) == IS_ARRAY &&
632 zend_hash_num_elements(Z_ARRVAL_P(PG(http_globals)[TRACK_VARS_ENV])) > 0
633 ) {
634 zval_dtor(array_ptr);
635 *array_ptr = *PG(http_globals)[TRACK_VARS_ENV];
636 INIT_PZVAL(array_ptr);
637 zval_copy_ctor(array_ptr);
638 return;
639 } else if (PG(http_globals)[TRACK_VARS_SERVER] &&
640 array_ptr != PG(http_globals)[TRACK_VARS_SERVER] &&
641 Z_TYPE_P(PG(http_globals)[TRACK_VARS_SERVER]) == IS_ARRAY &&
642 zend_hash_num_elements(Z_ARRVAL_P(PG(http_globals)[TRACK_VARS_SERVER])) > 0
643 ) {
644 zval_dtor(array_ptr);
645 *array_ptr = *PG(http_globals)[TRACK_VARS_SERVER];
646 INIT_PZVAL(array_ptr);
647 zval_copy_ctor(array_ptr);
648 return;
649 }
650
651 /* call php's original import as a catch-all */
652 php_php_import_environment_variables(array_ptr TSRMLS_CC);
653
654 if (fcgi_is_fastcgi()) {
655 fcgi_request *request = (fcgi_request*) SG(server_context);
656 fcgi_loadenv(request, cgi_php_load_env_var, array_ptr TSRMLS_CC);
657 }
658 }
659
sapi_cgi_register_variables(zval * track_vars_array TSRMLS_DC)660 static void sapi_cgi_register_variables(zval *track_vars_array TSRMLS_DC)
661 {
662 unsigned int php_self_len;
663 char *php_self;
664
665 /* In CGI mode, we consider the environment to be a part of the server
666 * variables
667 */
668 php_import_environment_variables(track_vars_array TSRMLS_CC);
669
670 if (CGIG(fix_pathinfo)) {
671 char *script_name = SG(request_info).request_uri;
672 char *path_info;
673 int free_php_self;
674 ALLOCA_FLAG(use_heap)
675
676 if (fcgi_is_fastcgi()) {
677 fcgi_request *request = (fcgi_request*) SG(server_context);
678
679 path_info = FCGI_GETENV(request, "PATH_INFO");
680 } else {
681 path_info = getenv("PATH_INFO");
682 }
683
684 if (path_info) {
685 unsigned int path_info_len = strlen(path_info);
686
687 if (script_name) {
688 unsigned int script_name_len = strlen(script_name);
689
690 php_self_len = script_name_len + path_info_len;
691 php_self = do_alloca(php_self_len + 1, use_heap);
692 memcpy(php_self, script_name, script_name_len + 1);
693 memcpy(php_self + script_name_len, path_info, path_info_len + 1);
694 free_php_self = 1;
695 } else {
696 php_self = path_info;
697 php_self_len = path_info_len;
698 free_php_self = 0;
699 }
700 } else if (script_name) {
701 php_self = script_name;
702 php_self_len = strlen(script_name);
703 free_php_self = 0;
704 } else {
705 php_self = "";
706 php_self_len = 0;
707 free_php_self = 0;
708 }
709
710 /* Build the special-case PHP_SELF variable for the CGI version */
711 if (sapi_module.input_filter(PARSE_SERVER, "PHP_SELF", &php_self, php_self_len, &php_self_len TSRMLS_CC)) {
712 php_register_variable_safe("PHP_SELF", php_self, php_self_len, track_vars_array TSRMLS_CC);
713 }
714 if (free_php_self) {
715 free_alloca(php_self, use_heap);
716 }
717 } else {
718 php_self = SG(request_info).request_uri ? SG(request_info).request_uri : "";
719 php_self_len = strlen(php_self);
720 if (sapi_module.input_filter(PARSE_SERVER, "PHP_SELF", &php_self, php_self_len, &php_self_len TSRMLS_CC)) {
721 php_register_variable_safe("PHP_SELF", php_self, php_self_len, track_vars_array TSRMLS_CC);
722 }
723 }
724 }
725
sapi_cgi_log_message(char * message TSRMLS_DC)726 static void sapi_cgi_log_message(char *message TSRMLS_DC)
727 {
728 if (fcgi_is_fastcgi() && CGIG(fcgi_logging)) {
729 fcgi_request *request;
730
731 request = (fcgi_request*) SG(server_context);
732 if (request) {
733 int len = strlen(message);
734 char *buf = malloc(len+2);
735
736 memcpy(buf, message, len);
737 memcpy(buf + len, "\n", sizeof("\n"));
738 fcgi_write(request, FCGI_STDERR, buf, len+1);
739 free(buf);
740 } else {
741 fprintf(stderr, "%s\n", message);
742 }
743 /* ignore return code */
744 } else {
745 fprintf(stderr, "%s\n", message);
746 }
747 }
748
749 /* {{{ php_cgi_ini_activate_user_config
750 */
php_cgi_ini_activate_user_config(char * path,int path_len,const char * doc_root,int doc_root_len,int start TSRMLS_DC)751 static void php_cgi_ini_activate_user_config(char *path, int path_len, const char *doc_root, int doc_root_len, int start TSRMLS_DC)
752 {
753 char *ptr;
754 user_config_cache_entry *new_entry, *entry;
755 time_t request_time = sapi_get_request_time(TSRMLS_C);
756
757 /* Find cached config entry: If not found, create one */
758 if (zend_hash_find(&CGIG(user_config_cache), path, path_len + 1, (void **) &entry) == FAILURE) {
759 new_entry = pemalloc(sizeof(user_config_cache_entry), 1);
760 new_entry->expires = 0;
761 new_entry->user_config = (HashTable *) pemalloc(sizeof(HashTable), 1);
762 zend_hash_init(new_entry->user_config, 0, NULL, (dtor_func_t) config_zval_dtor, 1);
763 zend_hash_update(&CGIG(user_config_cache), path, path_len + 1, new_entry, sizeof(user_config_cache_entry), (void **) &entry);
764 free(new_entry);
765 }
766
767 /* Check whether cache entry has expired and rescan if it is */
768 if (request_time > entry->expires) {
769 char *real_path = NULL;
770 int real_path_len;
771 char *s1, *s2;
772 int s_len;
773
774 /* Clear the expired config */
775 zend_hash_clean(entry->user_config);
776
777 if (!IS_ABSOLUTE_PATH(path, path_len)) {
778 real_path = tsrm_realpath(path, NULL TSRMLS_CC);
779 if (real_path == NULL) {
780 return;
781 }
782 real_path_len = strlen(real_path);
783 path = real_path;
784 path_len = real_path_len;
785 }
786
787 if (path_len > doc_root_len) {
788 s1 = (char *) doc_root;
789 s2 = path;
790 s_len = doc_root_len;
791 } else {
792 s1 = path;
793 s2 = (char *) doc_root;
794 s_len = path_len;
795 }
796
797 /* we have to test if path is part of DOCUMENT_ROOT.
798 if it is inside the docroot, we scan the tree up to the docroot
799 to find more user.ini, if not we only scan the current path.
800 */
801 #ifdef PHP_WIN32
802 if (strnicmp(s1, s2, s_len) == 0) {
803 #else
804 if (strncmp(s1, s2, s_len) == 0) {
805 #endif
806 ptr = s2 + start; /* start is the point where doc_root ends! */
807 while ((ptr = strchr(ptr, DEFAULT_SLASH)) != NULL) {
808 *ptr = 0;
809 php_parse_user_ini_file(path, PG(user_ini_filename), entry->user_config TSRMLS_CC);
810 *ptr = '/';
811 ptr++;
812 }
813 } else {
814 php_parse_user_ini_file(path, PG(user_ini_filename), entry->user_config TSRMLS_CC);
815 }
816
817 if (real_path) {
818 free(real_path);
819 }
820 entry->expires = request_time + PG(user_ini_cache_ttl);
821 }
822
823 /* Activate ini entries with values from the user config hash */
824 php_ini_activate_config(entry->user_config, PHP_INI_PERDIR, PHP_INI_STAGE_HTACCESS TSRMLS_CC);
825 }
826 /* }}} */
827
828 static int sapi_cgi_activate(TSRMLS_D)
829 {
830 char *path, *doc_root, *server_name;
831 uint path_len, doc_root_len, server_name_len;
832
833 /* PATH_TRANSLATED should be defined at this stage but better safe than sorry :) */
834 if (!SG(request_info).path_translated) {
835 return FAILURE;
836 }
837
838 if (php_ini_has_per_host_config()) {
839 /* Activate per-host-system-configuration defined in php.ini and stored into configuration_hash during startup */
840 if (fcgi_is_fastcgi()) {
841 fcgi_request *request = (fcgi_request*) SG(server_context);
842
843 server_name = FCGI_GETENV(request, "SERVER_NAME");
844 } else {
845 server_name = getenv("SERVER_NAME");
846 }
847 /* SERVER_NAME should also be defined at this stage..but better check it anyway */
848 if (server_name) {
849 server_name_len = strlen(server_name);
850 server_name = estrndup(server_name, server_name_len);
851 zend_str_tolower(server_name, server_name_len);
852 php_ini_activate_per_host_config(server_name, server_name_len + 1 TSRMLS_CC);
853 efree(server_name);
854 }
855 }
856
857 if (php_ini_has_per_dir_config() ||
858 (PG(user_ini_filename) && *PG(user_ini_filename))
859 ) {
860 /* Prepare search path */
861 path_len = strlen(SG(request_info).path_translated);
862
863 /* Make sure we have trailing slash! */
864 if (!IS_SLASH(SG(request_info).path_translated[path_len])) {
865 path = emalloc(path_len + 2);
866 memcpy(path, SG(request_info).path_translated, path_len + 1);
867 path_len = zend_dirname(path, path_len);
868 path[path_len++] = DEFAULT_SLASH;
869 } else {
870 path = estrndup(SG(request_info).path_translated, path_len);
871 path_len = zend_dirname(path, path_len);
872 }
873 path[path_len] = 0;
874
875 /* Activate per-dir-system-configuration defined in php.ini and stored into configuration_hash during startup */
876 php_ini_activate_per_dir_config(path, path_len TSRMLS_CC); /* Note: for global settings sake we check from root to path */
877
878 /* Load and activate user ini files in path starting from DOCUMENT_ROOT */
879 if (PG(user_ini_filename) && *PG(user_ini_filename)) {
880 if (fcgi_is_fastcgi()) {
881 fcgi_request *request = (fcgi_request*) SG(server_context);
882
883 doc_root = FCGI_GETENV(request, "DOCUMENT_ROOT");
884 } else {
885 doc_root = getenv("DOCUMENT_ROOT");
886 }
887
888 /* DOCUMENT_ROOT should also be defined at this stage..but better check it anyway */
889 if (doc_root) {
890 doc_root_len = strlen(doc_root);
891 if (doc_root_len > 0 && IS_SLASH(doc_root[doc_root_len - 1])) {
892 --doc_root_len;
893 }
894 #ifdef PHP_WIN32
895 /* paths on windows should be case-insensitive */
896 doc_root = estrndup(doc_root, doc_root_len);
897 zend_str_tolower(doc_root, doc_root_len);
898 #endif
899 php_cgi_ini_activate_user_config(path, path_len, doc_root, doc_root_len, doc_root_len - 1 TSRMLS_CC);
900
901 #ifdef PHP_WIN32
902 efree(doc_root);
903 #endif
904 }
905 }
906
907 efree(path);
908 }
909
910 return SUCCESS;
911 }
912
913 static int sapi_cgi_deactivate(TSRMLS_D)
914 {
915 /* flush only when SAPI was started. The reasons are:
916 1. SAPI Deactivate is called from two places: module init and request shutdown
917 2. When the first call occurs and the request is not set up, flush fails on FastCGI.
918 */
919 if (SG(sapi_started)) {
920 if (fcgi_is_fastcgi()) {
921 if (
922 #ifndef PHP_WIN32
923 !parent &&
924 #endif
925 !fcgi_finish_request((fcgi_request*)SG(server_context), 0)) {
926 php_handle_aborted_connection();
927 }
928 } else {
929 sapi_cgi_flush(SG(server_context));
930 }
931 }
932 return SUCCESS;
933 }
934
935 static int php_cgi_startup(sapi_module_struct *sapi_module)
936 {
937 if (php_module_startup(sapi_module, &cgi_module_entry, 1) == FAILURE) {
938 return FAILURE;
939 }
940 return SUCCESS;
941 }
942
943 /* {{{ sapi_module_struct cgi_sapi_module
944 */
945 static sapi_module_struct cgi_sapi_module = {
946 "cgi-fcgi", /* name */
947 "CGI/FastCGI", /* pretty name */
948
949 php_cgi_startup, /* startup */
950 php_module_shutdown_wrapper, /* shutdown */
951
952 sapi_cgi_activate, /* activate */
953 sapi_cgi_deactivate, /* deactivate */
954
955 sapi_cgi_ub_write, /* unbuffered write */
956 sapi_cgi_flush, /* flush */
957 NULL, /* get uid */
958 sapi_cgi_getenv, /* getenv */
959
960 php_error, /* error handler */
961
962 NULL, /* header handler */
963 sapi_cgi_send_headers, /* send headers handler */
964 NULL, /* send header handler */
965
966 sapi_cgi_read_post, /* read POST data */
967 sapi_cgi_read_cookies, /* read Cookies */
968
969 sapi_cgi_register_variables, /* register server variables */
970 sapi_cgi_log_message, /* Log message */
971 NULL, /* Get request time */
972 NULL, /* Child terminate */
973
974 STANDARD_SAPI_MODULE_PROPERTIES
975 };
976 /* }}} */
977
978 /* {{{ arginfo ext/standard/dl.c */
979 ZEND_BEGIN_ARG_INFO(arginfo_dl, 0)
980 ZEND_ARG_INFO(0, extension_filename)
981 ZEND_END_ARG_INFO()
982 /* }}} */
983
984 static const zend_function_entry additional_functions[] = {
985 ZEND_FE(dl, arginfo_dl)
986 {NULL, NULL, NULL}
987 };
988
989 /* {{{ php_cgi_usage
990 */
991 static void php_cgi_usage(char *argv0)
992 {
993 char *prog;
994
995 prog = strrchr(argv0, '/');
996 if (prog) {
997 prog++;
998 } else {
999 prog = "php";
1000 }
1001
1002 php_printf( "Usage: %s [-q] [-h] [-s] [-v] [-i] [-f <file>]\n"
1003 " %s <file> [args...]\n"
1004 " -a Run interactively\n"
1005 " -b <address:port>|<port> Bind Path for external FASTCGI Server mode\n"
1006 " -C Do not chdir to the script's directory\n"
1007 " -c <path>|<file> Look for php.ini file in this directory\n"
1008 " -n No php.ini file will be used\n"
1009 " -d foo[=bar] Define INI entry foo with value 'bar'\n"
1010 " -e Generate extended information for debugger/profiler\n"
1011 " -f <file> Parse <file>. Implies `-q'\n"
1012 " -h This help\n"
1013 " -i PHP information\n"
1014 " -l Syntax check only (lint)\n"
1015 " -m Show compiled in modules\n"
1016 " -q Quiet-mode. Suppress HTTP Header output.\n"
1017 " -s Display colour syntax highlighted source.\n"
1018 " -v Version number\n"
1019 " -w Display source with stripped comments and whitespace.\n"
1020 " -z <file> Load Zend extension <file>.\n"
1021 " -T <count> Measure execution time of script repeated <count> times.\n",
1022 prog, prog);
1023 }
1024 /* }}} */
1025
1026 /* {{{ is_valid_path
1027 *
1028 * some server configurations allow '..' to slip through in the
1029 * translated path. We'll just refuse to handle such a path.
1030 */
1031 static int is_valid_path(const char *path)
1032 {
1033 const char *p = path;
1034
1035 if (UNEXPECTED(!p)) {
1036 return 0;
1037 }
1038 if (UNEXPECTED(*p == '.') && *(p+1) == '.' && (!*(p+2) || IS_SLASH(*(p+2)))) {
1039 return 0;
1040 }
1041 while (*p) {
1042 if (IS_SLASH(*p)) {
1043 p++;
1044 if (UNEXPECTED(*p == '.')) {
1045 p++;
1046 if (UNEXPECTED(*p == '.')) {
1047 p++;
1048 if (UNEXPECTED(!*p) || UNEXPECTED(IS_SLASH(*p))) {
1049 return 0;
1050 }
1051 }
1052 }
1053 }
1054 p++;
1055 }
1056 return 1;
1057 }
1058 /* }}} */
1059
1060 #define CGI_GETENV(name) \
1061 ((request) ? \
1062 FCGI_GETENV(request, name) : \
1063 getenv(name))
1064
1065 #define CGI_PUTENV(name, value) \
1066 ((request) ? \
1067 FCGI_PUTENV(request, name, value) : \
1068 _sapi_cgi_putenv(name, sizeof(name)-1, value))
1069
1070 /* {{{ init_request_info
1071
1072 initializes request_info structure
1073
1074 specificly in this section we handle proper translations
1075 for:
1076
1077 PATH_INFO
1078 derived from the portion of the URI path following
1079 the script name but preceding any query data
1080 may be empty
1081
1082 PATH_TRANSLATED
1083 derived by taking any path-info component of the
1084 request URI and performing any virtual-to-physical
1085 translation appropriate to map it onto the server's
1086 document repository structure
1087
1088 empty if PATH_INFO is empty
1089
1090 The env var PATH_TRANSLATED **IS DIFFERENT** than the
1091 request_info.path_translated variable, the latter should
1092 match SCRIPT_FILENAME instead.
1093
1094 SCRIPT_NAME
1095 set to a URL path that could identify the CGI script
1096 rather than the interpreter. PHP_SELF is set to this
1097
1098 REQUEST_URI
1099 uri section following the domain:port part of a URI
1100
1101 SCRIPT_FILENAME
1102 The virtual-to-physical translation of SCRIPT_NAME (as per
1103 PATH_TRANSLATED)
1104
1105 These settings are documented at
1106 http://cgi-spec.golux.com/
1107
1108
1109 Based on the following URL request:
1110
1111 http://localhost/info.php/test?a=b
1112
1113 should produce, which btw is the same as if
1114 we were running under mod_cgi on apache (ie. not
1115 using ScriptAlias directives):
1116
1117 PATH_INFO=/test
1118 PATH_TRANSLATED=/docroot/test
1119 SCRIPT_NAME=/info.php
1120 REQUEST_URI=/info.php/test?a=b
1121 SCRIPT_FILENAME=/docroot/info.php
1122 QUERY_STRING=a=b
1123
1124 but what we get is (cgi/mod_fastcgi under apache):
1125
1126 PATH_INFO=/info.php/test
1127 PATH_TRANSLATED=/docroot/info.php/test
1128 SCRIPT_NAME=/php/php-cgi (from the Action setting I suppose)
1129 REQUEST_URI=/info.php/test?a=b
1130 SCRIPT_FILENAME=/path/to/php/bin/php-cgi (Action setting translated)
1131 QUERY_STRING=a=b
1132
1133 Comments in the code below refer to using the above URL in a request
1134
1135 */
1136 static void init_request_info(fcgi_request *request TSRMLS_DC)
1137 {
1138 char *env_script_filename = CGI_GETENV("SCRIPT_FILENAME");
1139 char *env_path_translated = CGI_GETENV("PATH_TRANSLATED");
1140 char *script_path_translated = env_script_filename;
1141
1142 /* some broken servers do not have script_filename or argv0
1143 * an example, IIS configured in some ways. then they do more
1144 * broken stuff and set path_translated to the cgi script location */
1145 if (!script_path_translated && env_path_translated) {
1146 script_path_translated = env_path_translated;
1147 }
1148
1149 /* initialize the defaults */
1150 SG(request_info).path_translated = NULL;
1151 SG(request_info).request_method = NULL;
1152 SG(request_info).proto_num = 1000;
1153 SG(request_info).query_string = NULL;
1154 SG(request_info).request_uri = NULL;
1155 SG(request_info).content_type = NULL;
1156 SG(request_info).content_length = 0;
1157 SG(sapi_headers).http_response_code = 200;
1158
1159 /* script_path_translated being set is a good indication that
1160 * we are running in a cgi environment, since it is always
1161 * null otherwise. otherwise, the filename
1162 * of the script will be retreived later via argc/argv */
1163 if (script_path_translated) {
1164 const char *auth;
1165 char *content_length = CGI_GETENV("CONTENT_LENGTH");
1166 char *content_type = CGI_GETENV("CONTENT_TYPE");
1167 char *env_path_info = CGI_GETENV("PATH_INFO");
1168 char *env_script_name = CGI_GETENV("SCRIPT_NAME");
1169
1170 #ifdef PHP_WIN32
1171 /* Hack for buggy IIS that sets incorrect PATH_INFO */
1172 char *env_server_software = CGI_GETENV("SERVER_SOFTWARE");
1173
1174 if (env_server_software &&
1175 env_script_name &&
1176 env_path_info &&
1177 strncmp(env_server_software, "Microsoft-IIS", sizeof("Microsoft-IIS")-1) == 0 &&
1178 strncmp(env_path_info, env_script_name, strlen(env_script_name)) == 0
1179 ) {
1180 env_path_info = CGI_PUTENV("ORIG_PATH_INFO", env_path_info);
1181 env_path_info += strlen(env_script_name);
1182 if (*env_path_info == 0) {
1183 env_path_info = NULL;
1184 }
1185 env_path_info = CGI_PUTENV("PATH_INFO", env_path_info);
1186 }
1187 #endif
1188
1189 if (CGIG(fix_pathinfo)) {
1190 struct stat st;
1191 char *real_path = NULL;
1192 char *env_redirect_url = CGI_GETENV("REDIRECT_URL");
1193 char *env_document_root = CGI_GETENV("DOCUMENT_ROOT");
1194 char *orig_path_translated = env_path_translated;
1195 char *orig_path_info = env_path_info;
1196 char *orig_script_name = env_script_name;
1197 char *orig_script_filename = env_script_filename;
1198 int script_path_translated_len;
1199
1200 if (!env_document_root && PG(doc_root)) {
1201 env_document_root = CGI_PUTENV("DOCUMENT_ROOT", PG(doc_root));
1202 /* fix docroot */
1203 TRANSLATE_SLASHES(env_document_root);
1204 }
1205
1206 if (env_path_translated != NULL && env_redirect_url != NULL &&
1207 env_path_translated != script_path_translated &&
1208 strcmp(env_path_translated, script_path_translated) != 0) {
1209 /*
1210 * pretty much apache specific. If we have a redirect_url
1211 * then our script_filename and script_name point to the
1212 * php executable
1213 */
1214 script_path_translated = env_path_translated;
1215 /* we correct SCRIPT_NAME now in case we don't have PATH_INFO */
1216 env_script_name = env_redirect_url;
1217 }
1218
1219 #ifdef __riscos__
1220 /* Convert path to unix format*/
1221 __riscosify_control |= __RISCOSIFY_DONT_CHECK_DIR;
1222 script_path_translated = __unixify(script_path_translated, 0, NULL, 1, 0);
1223 #endif
1224
1225 /*
1226 * if the file doesn't exist, try to extract PATH_INFO out
1227 * of it by stat'ing back through the '/'
1228 * this fixes url's like /info.php/test
1229 */
1230 if (script_path_translated &&
1231 (script_path_translated_len = strlen(script_path_translated)) > 0 &&
1232 (script_path_translated[script_path_translated_len-1] == '/' ||
1233 #ifdef PHP_WIN32
1234 script_path_translated[script_path_translated_len-1] == '\\' ||
1235 #endif
1236 (real_path = tsrm_realpath(script_path_translated, NULL TSRMLS_CC)) == NULL)
1237 ) {
1238 char *pt = estrndup(script_path_translated, script_path_translated_len);
1239 int len = script_path_translated_len;
1240 char *ptr;
1241
1242 while ((ptr = strrchr(pt, '/')) || (ptr = strrchr(pt, '\\'))) {
1243 *ptr = 0;
1244 if (stat(pt, &st) == 0 && S_ISREG(st.st_mode)) {
1245 /*
1246 * okay, we found the base script!
1247 * work out how many chars we had to strip off;
1248 * then we can modify PATH_INFO
1249 * accordingly
1250 *
1251 * we now have the makings of
1252 * PATH_INFO=/test
1253 * SCRIPT_FILENAME=/docroot/info.php
1254 *
1255 * we now need to figure out what docroot is.
1256 * if DOCUMENT_ROOT is set, this is easy, otherwise,
1257 * we have to play the game of hide and seek to figure
1258 * out what SCRIPT_NAME should be
1259 */
1260 int slen = len - strlen(pt);
1261 int pilen = env_path_info ? strlen(env_path_info) : 0;
1262 char *path_info = env_path_info ? env_path_info + pilen - slen : NULL;
1263
1264 if (orig_path_info != path_info) {
1265 if (orig_path_info) {
1266 char old;
1267
1268 CGI_PUTENV("ORIG_PATH_INFO", orig_path_info);
1269 old = path_info[0];
1270 path_info[0] = 0;
1271 if (!orig_script_name ||
1272 strcmp(orig_script_name, env_path_info) != 0) {
1273 if (orig_script_name) {
1274 CGI_PUTENV("ORIG_SCRIPT_NAME", orig_script_name);
1275 }
1276 SG(request_info).request_uri = CGI_PUTENV("SCRIPT_NAME", env_path_info);
1277 } else {
1278 SG(request_info).request_uri = orig_script_name;
1279 }
1280 path_info[0] = old;
1281 }
1282 env_path_info = CGI_PUTENV("PATH_INFO", path_info);
1283 }
1284 if (!orig_script_filename ||
1285 strcmp(orig_script_filename, pt) != 0) {
1286 if (orig_script_filename) {
1287 CGI_PUTENV("ORIG_SCRIPT_FILENAME", orig_script_filename);
1288 }
1289 script_path_translated = CGI_PUTENV("SCRIPT_FILENAME", pt);
1290 }
1291 TRANSLATE_SLASHES(pt);
1292
1293 /* figure out docroot
1294 * SCRIPT_FILENAME minus SCRIPT_NAME
1295 */
1296 if (env_document_root) {
1297 int l = strlen(env_document_root);
1298 int path_translated_len = 0;
1299 char *path_translated = NULL;
1300
1301 if (l && env_document_root[l - 1] == '/') {
1302 --l;
1303 }
1304
1305 /* we have docroot, so we should have:
1306 * DOCUMENT_ROOT=/docroot
1307 * SCRIPT_FILENAME=/docroot/info.php
1308 */
1309
1310 /* PATH_TRANSLATED = DOCUMENT_ROOT + PATH_INFO */
1311 path_translated_len = l + (env_path_info ? strlen(env_path_info) : 0);
1312 path_translated = (char *) emalloc(path_translated_len + 1);
1313 memcpy(path_translated, env_document_root, l);
1314 if (env_path_info) {
1315 memcpy(path_translated + l, env_path_info, (path_translated_len - l));
1316 }
1317 path_translated[path_translated_len] = '\0';
1318 if (orig_path_translated) {
1319 CGI_PUTENV("ORIG_PATH_TRANSLATED", orig_path_translated);
1320 }
1321 env_path_translated = CGI_PUTENV("PATH_TRANSLATED", path_translated);
1322 efree(path_translated);
1323 } else if ( env_script_name &&
1324 strstr(pt, env_script_name)
1325 ) {
1326 /* PATH_TRANSLATED = PATH_TRANSLATED - SCRIPT_NAME + PATH_INFO */
1327 int ptlen = strlen(pt) - strlen(env_script_name);
1328 int path_translated_len = ptlen + (env_path_info ? strlen(env_path_info) : 0);
1329 char *path_translated = NULL;
1330
1331 path_translated = (char *) emalloc(path_translated_len + 1);
1332 memcpy(path_translated, pt, ptlen);
1333 if (env_path_info) {
1334 memcpy(path_translated + ptlen, env_path_info, path_translated_len - ptlen);
1335 }
1336 path_translated[path_translated_len] = '\0';
1337 if (orig_path_translated) {
1338 CGI_PUTENV("ORIG_PATH_TRANSLATED", orig_path_translated);
1339 }
1340 env_path_translated = CGI_PUTENV("PATH_TRANSLATED", path_translated);
1341 efree(path_translated);
1342 }
1343 break;
1344 }
1345 }
1346 if (!ptr) {
1347 /*
1348 * if we stripped out all the '/' and still didn't find
1349 * a valid path... we will fail, badly. of course we would
1350 * have failed anyway... we output 'no input file' now.
1351 */
1352 if (orig_script_filename) {
1353 CGI_PUTENV("ORIG_SCRIPT_FILENAME", orig_script_filename);
1354 }
1355 script_path_translated = CGI_PUTENV("SCRIPT_FILENAME", NULL);
1356 SG(sapi_headers).http_response_code = 404;
1357 }
1358 if (!SG(request_info).request_uri) {
1359 if (!orig_script_name ||
1360 strcmp(orig_script_name, env_script_name) != 0) {
1361 if (orig_script_name) {
1362 CGI_PUTENV("ORIG_SCRIPT_NAME", orig_script_name);
1363 }
1364 SG(request_info).request_uri = CGI_PUTENV("SCRIPT_NAME", env_script_name);
1365 } else {
1366 SG(request_info).request_uri = orig_script_name;
1367 }
1368 }
1369 if (pt) {
1370 efree(pt);
1371 }
1372 } else {
1373 /* make sure path_info/translated are empty */
1374 if (!orig_script_filename ||
1375 (script_path_translated != orig_script_filename &&
1376 strcmp(script_path_translated, orig_script_filename) != 0)) {
1377 if (orig_script_filename) {
1378 CGI_PUTENV("ORIG_SCRIPT_FILENAME", orig_script_filename);
1379 }
1380 script_path_translated = CGI_PUTENV("SCRIPT_FILENAME", script_path_translated);
1381 }
1382 if (env_redirect_url) {
1383 if (orig_path_info) {
1384 CGI_PUTENV("ORIG_PATH_INFO", orig_path_info);
1385 CGI_PUTENV("PATH_INFO", NULL);
1386 }
1387 if (orig_path_translated) {
1388 CGI_PUTENV("ORIG_PATH_TRANSLATED", orig_path_translated);
1389 CGI_PUTENV("PATH_TRANSLATED", NULL);
1390 }
1391 }
1392 if (env_script_name != orig_script_name) {
1393 if (orig_script_name) {
1394 CGI_PUTENV("ORIG_SCRIPT_NAME", orig_script_name);
1395 }
1396 SG(request_info).request_uri = CGI_PUTENV("SCRIPT_NAME", env_script_name);
1397 } else {
1398 SG(request_info).request_uri = env_script_name;
1399 }
1400 free(real_path);
1401 }
1402 } else {
1403 /* pre 4.3 behaviour, shouldn't be used but provides BC */
1404 if (env_path_info) {
1405 SG(request_info).request_uri = env_path_info;
1406 } else {
1407 SG(request_info).request_uri = env_script_name;
1408 }
1409 if (!CGIG(discard_path) && env_path_translated) {
1410 script_path_translated = env_path_translated;
1411 }
1412 }
1413
1414 if (is_valid_path(script_path_translated)) {
1415 SG(request_info).path_translated = estrdup(script_path_translated);
1416 }
1417
1418 SG(request_info).request_method = CGI_GETENV("REQUEST_METHOD");
1419 /* FIXME - Work out proto_num here */
1420 SG(request_info).query_string = CGI_GETENV("QUERY_STRING");
1421 SG(request_info).content_type = (content_type ? content_type : "" );
1422 SG(request_info).content_length = (content_length ? atol(content_length) : 0);
1423
1424 /* The CGI RFC allows servers to pass on unvalidated Authorization data */
1425 auth = CGI_GETENV("HTTP_AUTHORIZATION");
1426 php_handle_auth_data(auth TSRMLS_CC);
1427 }
1428 }
1429 /* }}} */
1430
1431 #ifndef PHP_WIN32
1432 /**
1433 * Clean up child processes upon exit
1434 */
1435 void fastcgi_cleanup(int signal)
1436 {
1437 #ifdef DEBUG_FASTCGI
1438 fprintf(stderr, "FastCGI shutdown, pid %d\n", getpid());
1439 #endif
1440
1441 sigaction(SIGTERM, &old_term, 0);
1442
1443 /* Kill all the processes in our process group */
1444 kill(-pgroup, SIGTERM);
1445
1446 if (parent && parent_waiting) {
1447 exit_signal = 1;
1448 } else {
1449 exit(0);
1450 }
1451 }
1452 #endif
1453
1454 PHP_INI_BEGIN()
1455 STD_PHP_INI_ENTRY("cgi.rfc2616_headers", "0", PHP_INI_ALL, OnUpdateBool, rfc2616_headers, php_cgi_globals_struct, php_cgi_globals)
1456 STD_PHP_INI_ENTRY("cgi.nph", "0", PHP_INI_ALL, OnUpdateBool, nph, php_cgi_globals_struct, php_cgi_globals)
1457 STD_PHP_INI_ENTRY("cgi.check_shebang_line", "1", PHP_INI_SYSTEM, OnUpdateBool, check_shebang_line, php_cgi_globals_struct, php_cgi_globals)
1458 STD_PHP_INI_ENTRY("cgi.force_redirect", "1", PHP_INI_SYSTEM, OnUpdateBool, force_redirect, php_cgi_globals_struct, php_cgi_globals)
1459 STD_PHP_INI_ENTRY("cgi.redirect_status_env", NULL, PHP_INI_SYSTEM, OnUpdateString, redirect_status_env, php_cgi_globals_struct, php_cgi_globals)
1460 STD_PHP_INI_ENTRY("cgi.fix_pathinfo", "1", PHP_INI_SYSTEM, OnUpdateBool, fix_pathinfo, php_cgi_globals_struct, php_cgi_globals)
1461 STD_PHP_INI_ENTRY("cgi.discard_path", "0", PHP_INI_SYSTEM, OnUpdateBool, discard_path, php_cgi_globals_struct, php_cgi_globals)
1462 STD_PHP_INI_ENTRY("fastcgi.logging", "1", PHP_INI_SYSTEM, OnUpdateBool, fcgi_logging, php_cgi_globals_struct, php_cgi_globals)
1463 #ifdef PHP_WIN32
1464 STD_PHP_INI_ENTRY("fastcgi.impersonate", "0", PHP_INI_SYSTEM, OnUpdateBool, impersonate, php_cgi_globals_struct, php_cgi_globals)
1465 #endif
1466 PHP_INI_END()
1467
1468 /* {{{ php_cgi_globals_ctor
1469 */
1470 static void php_cgi_globals_ctor(php_cgi_globals_struct *php_cgi_globals TSRMLS_DC)
1471 {
1472 php_cgi_globals->rfc2616_headers = 0;
1473 php_cgi_globals->nph = 0;
1474 php_cgi_globals->check_shebang_line = 1;
1475 php_cgi_globals->force_redirect = 1;
1476 php_cgi_globals->redirect_status_env = NULL;
1477 php_cgi_globals->fix_pathinfo = 1;
1478 php_cgi_globals->discard_path = 0;
1479 php_cgi_globals->fcgi_logging = 1;
1480 #ifdef PHP_WIN32
1481 php_cgi_globals->impersonate = 0;
1482 #endif
1483 zend_hash_init(&php_cgi_globals->user_config_cache, 0, NULL, (dtor_func_t) user_config_cache_entry_dtor, 1);
1484 }
1485 /* }}} */
1486
1487 /* {{{ PHP_MINIT_FUNCTION
1488 */
1489 static PHP_MINIT_FUNCTION(cgi)
1490 {
1491 #ifdef ZTS
1492 ts_allocate_id(&php_cgi_globals_id, sizeof(php_cgi_globals_struct), (ts_allocate_ctor) php_cgi_globals_ctor, NULL);
1493 #else
1494 php_cgi_globals_ctor(&php_cgi_globals TSRMLS_CC);
1495 #endif
1496 REGISTER_INI_ENTRIES();
1497 return SUCCESS;
1498 }
1499 /* }}} */
1500
1501 /* {{{ PHP_MSHUTDOWN_FUNCTION
1502 */
1503 static PHP_MSHUTDOWN_FUNCTION(cgi)
1504 {
1505 zend_hash_destroy(&CGIG(user_config_cache));
1506
1507 UNREGISTER_INI_ENTRIES();
1508 return SUCCESS;
1509 }
1510 /* }}} */
1511
1512 /* {{{ PHP_MINFO_FUNCTION
1513 */
1514 static PHP_MINFO_FUNCTION(cgi)
1515 {
1516 DISPLAY_INI_ENTRIES();
1517 }
1518 /* }}} */
1519
1520 PHP_FUNCTION(apache_child_terminate) /* {{{ */
1521 {
1522 if (ZEND_NUM_ARGS() > 0) {
1523 WRONG_PARAM_COUNT;
1524 }
1525 if (fcgi_is_fastcgi()) {
1526 fcgi_terminate();
1527 }
1528 }
1529 /* }}} */
1530
1531 static void add_request_header(char *var, unsigned int var_len, char *val, unsigned int val_len, void *arg TSRMLS_DC) /* {{{ */
1532 {
1533 zval *return_value = (zval*)arg;
1534 char *str = NULL;
1535 char *p;
1536 ALLOCA_FLAG(use_heap)
1537
1538 if (var_len > 5 &&
1539 var[0] == 'H' &&
1540 var[1] == 'T' &&
1541 var[2] == 'T' &&
1542 var[3] == 'P' &&
1543 var[4] == '_') {
1544
1545 var_len -= 5;
1546 p = var + 5;
1547 var = str = do_alloca(var_len + 1, use_heap);
1548 *str++ = *p++;
1549 while (*p) {
1550 if (*p == '_') {
1551 *str++ = '-';
1552 p++;
1553 if (*p) {
1554 *str++ = *p++;
1555 }
1556 } else if (*p >= 'A' && *p <= 'Z') {
1557 *str++ = (*p++ - 'A' + 'a');
1558 } else {
1559 *str++ = *p++;
1560 }
1561 }
1562 *str = 0;
1563 } else if (var_len == sizeof("CONTENT_TYPE")-1 &&
1564 memcmp(var, "CONTENT_TYPE", sizeof("CONTENT_TYPE")-1) == 0) {
1565 var = "Content-Type";
1566 } else if (var_len == sizeof("CONTENT_LENGTH")-1 &&
1567 memcmp(var, "CONTENT_LENGTH", sizeof("CONTENT_LENGTH")-1) == 0) {
1568 var = "Content-Length";
1569 } else {
1570 return;
1571 }
1572 add_assoc_stringl_ex(return_value, var, var_len+1, val, val_len, 1);
1573 if (str) {
1574 free_alloca(var, use_heap);
1575 }
1576 }
1577 /* }}} */
1578
1579 PHP_FUNCTION(apache_request_headers) /* {{{ */
1580 {
1581 if (ZEND_NUM_ARGS() > 0) {
1582 WRONG_PARAM_COUNT;
1583 }
1584 array_init(return_value);
1585 if (fcgi_is_fastcgi()) {
1586 fcgi_request *request = (fcgi_request*) SG(server_context);
1587
1588 fcgi_loadenv(request, add_request_header, return_value TSRMLS_CC);
1589 } else {
1590 char buf[128];
1591 char **env, *p, *q, *var, *val, *t = buf;
1592 size_t alloc_size = sizeof(buf);
1593 unsigned long var_len;
1594
1595 for (env = environ; env != NULL && *env != NULL; env++) {
1596 val = strchr(*env, '=');
1597 if (!val) { /* malformed entry? */
1598 continue;
1599 }
1600 var_len = val - *env;
1601 if (var_len >= alloc_size) {
1602 alloc_size = var_len + 64;
1603 t = (t == buf ? emalloc(alloc_size): erealloc(t, alloc_size));
1604 }
1605 var = *env;
1606 if (var_len > 5 &&
1607 var[0] == 'H' &&
1608 var[1] == 'T' &&
1609 var[2] == 'T' &&
1610 var[3] == 'P' &&
1611 var[4] == '_') {
1612
1613 var_len -= 5;
1614
1615 if (var_len >= alloc_size) {
1616 alloc_size = var_len + 64;
1617 t = (t == buf ? emalloc(alloc_size): erealloc(t, alloc_size));
1618 }
1619 p = var + 5;
1620
1621 var = q = t;
1622 /* First char keep uppercase */
1623 *q++ = *p++;
1624 while (*p) {
1625 if (*p == '=') {
1626 /* End of name */
1627 break;
1628 } else if (*p == '_') {
1629 *q++ = '-';
1630 p++;
1631 /* First char after - keep uppercase */
1632 if (*p && *p!='=') {
1633 *q++ = *p++;
1634 }
1635 } else if (*p >= 'A' && *p <= 'Z') {
1636 /* lowercase */
1637 *q++ = (*p++ - 'A' + 'a');
1638 } else {
1639 *q++ = *p++;
1640 }
1641 }
1642 *q = 0;
1643 } else if (var_len == sizeof("CONTENT_TYPE")-1 &&
1644 memcmp(var, "CONTENT_TYPE", sizeof("CONTENT_TYPE")-1) == 0) {
1645 var = "Content-Type";
1646 } else if (var_len == sizeof("CONTENT_LENGTH")-1 &&
1647 memcmp(var, "CONTENT_LENGTH", sizeof("CONTENT_LENGTH")-1) == 0) {
1648 var = "Content-Length";
1649 } else {
1650 continue;
1651 }
1652 val++;
1653 add_assoc_string_ex(return_value, var, var_len+1, val, 1);
1654 }
1655 if (t != buf && t != NULL) {
1656 efree(t);
1657 }
1658 }
1659 }
1660 /* }}} */
1661
1662 static void add_response_header(sapi_header_struct *h, zval *return_value TSRMLS_DC) /* {{{ */
1663 {
1664 char *s, *p;
1665 int len;
1666 ALLOCA_FLAG(use_heap)
1667
1668 if (h->header_len > 0) {
1669 p = strchr(h->header, ':');
1670 len = p - h->header;
1671 if (p && (len > 0)) {
1672 while (len > 0 && (h->header[len-1] == ' ' || h->header[len-1] == '\t')) {
1673 len--;
1674 }
1675 if (len) {
1676 s = do_alloca(len + 1, use_heap);
1677 memcpy(s, h->header, len);
1678 s[len] = 0;
1679 do {
1680 p++;
1681 } while (*p == ' ' || *p == '\t');
1682 add_assoc_stringl_ex(return_value, s, len+1, p, h->header_len - (p - h->header), 1);
1683 free_alloca(s, use_heap);
1684 }
1685 }
1686 }
1687 }
1688 /* }}} */
1689
1690 PHP_FUNCTION(apache_response_headers) /* {{{ */
1691 {
1692 if (ZEND_NUM_ARGS() > 0) {
1693 WRONG_PARAM_COUNT;
1694 }
1695
1696 if (!&SG(sapi_headers).headers) {
1697 RETURN_FALSE;
1698 }
1699 array_init(return_value);
1700 zend_llist_apply_with_argument(&SG(sapi_headers).headers, (llist_apply_with_arg_func_t)add_response_header, return_value TSRMLS_CC);
1701 }
1702 /* }}} */
1703
1704 ZEND_BEGIN_ARG_INFO(arginfo_no_args, 0)
1705 ZEND_END_ARG_INFO()
1706
1707 const zend_function_entry cgi_functions[] = {
1708 PHP_FE(apache_child_terminate, arginfo_no_args)
1709 PHP_FE(apache_request_headers, arginfo_no_args)
1710 PHP_FE(apache_response_headers, arginfo_no_args)
1711 PHP_FALIAS(getallheaders, apache_request_headers, arginfo_no_args)
1712 {NULL, NULL, NULL}
1713 };
1714
1715 static zend_module_entry cgi_module_entry = {
1716 STANDARD_MODULE_HEADER,
1717 "cgi-fcgi",
1718 cgi_functions,
1719 PHP_MINIT(cgi),
1720 PHP_MSHUTDOWN(cgi),
1721 NULL,
1722 NULL,
1723 PHP_MINFO(cgi),
1724 NO_VERSION_YET,
1725 STANDARD_MODULE_PROPERTIES
1726 };
1727
1728 /* {{{ main
1729 */
1730 int main(int argc, char *argv[])
1731 {
1732 int free_query_string = 0;
1733 int exit_status = SUCCESS;
1734 int cgi = 0, c, i, len;
1735 zend_file_handle file_handle;
1736 char *s;
1737
1738 /* temporary locals */
1739 int behavior = PHP_MODE_STANDARD;
1740 int no_headers = 0;
1741 int orig_optind = php_optind;
1742 char *orig_optarg = php_optarg;
1743 char *script_file = NULL;
1744 int ini_entries_len = 0;
1745 /* end of temporary locals */
1746
1747 #ifdef ZTS
1748 void ***tsrm_ls;
1749 #endif
1750
1751 int max_requests = 500;
1752 int requests = 0;
1753 int fastcgi;
1754 char *bindpath = NULL;
1755 int fcgi_fd = 0;
1756 fcgi_request *request = NULL;
1757 int repeats = 1;
1758 int benchmark = 0;
1759 #if HAVE_GETTIMEOFDAY
1760 struct timeval start, end;
1761 #else
1762 time_t start, end;
1763 #endif
1764 #ifndef PHP_WIN32
1765 int status = 0;
1766 #endif
1767 char *query_string;
1768 char *decoded_query_string;
1769 int skip_getopt = 0;
1770
1771 #if 0 && defined(PHP_DEBUG)
1772 /* IIS is always making things more difficult. This allows
1773 * us to stop PHP and attach a debugger before much gets started */
1774 {
1775 char szMessage [256];
1776 wsprintf (szMessage, "Please attach a debugger to the process 0x%X [%d] (%s) and click OK", GetCurrentProcessId(), GetCurrentProcessId(), argv[0]);
1777 MessageBox(NULL, szMessage, "CGI Debug Time!", MB_OK|MB_SERVICE_NOTIFICATION);
1778 }
1779 #endif
1780
1781 #ifdef HAVE_SIGNAL_H
1782 #if defined(SIGPIPE) && defined(SIG_IGN)
1783 signal(SIGPIPE, SIG_IGN); /* ignore SIGPIPE in standalone mode so
1784 that sockets created via fsockopen()
1785 don't kill PHP if the remote site
1786 closes it. in apache|apxs mode apache
1787 does that for us! thies@thieso.net
1788 20000419 */
1789 #endif
1790 #endif
1791
1792 #ifdef ZTS
1793 tsrm_startup(1, 1, 0, NULL);
1794 tsrm_ls = ts_resource(0);
1795 #endif
1796
1797 sapi_startup(&cgi_sapi_module);
1798 fastcgi = fcgi_is_fastcgi();
1799 cgi_sapi_module.php_ini_path_override = NULL;
1800
1801 #ifdef PHP_WIN32
1802 _fmode = _O_BINARY; /* sets default for file streams to binary */
1803 setmode(_fileno(stdin), O_BINARY); /* make the stdio mode be binary */
1804 setmode(_fileno(stdout), O_BINARY); /* make the stdio mode be binary */
1805 setmode(_fileno(stderr), O_BINARY); /* make the stdio mode be binary */
1806 #endif
1807
1808 if (!fastcgi) {
1809 /* Make sure we detect we are a cgi - a bit redundancy here,
1810 * but the default case is that we have to check only the first one. */
1811 if (getenv("SERVER_SOFTWARE") ||
1812 getenv("SERVER_NAME") ||
1813 getenv("GATEWAY_INTERFACE") ||
1814 getenv("REQUEST_METHOD")
1815 ) {
1816 cgi = 1;
1817 }
1818 }
1819
1820 if((query_string = getenv("QUERY_STRING")) != NULL && strchr(query_string, '=') == NULL) {
1821 /* we've got query string that has no = - apache CGI will pass it to command line */
1822 unsigned char *p;
1823 decoded_query_string = strdup(query_string);
1824 php_url_decode(decoded_query_string, strlen(decoded_query_string));
1825 for (p = decoded_query_string; *p && *p <= ' '; p++) {
1826 /* skip all leading spaces */
1827 }
1828 if(*p == '-') {
1829 skip_getopt = 1;
1830 }
1831 free(decoded_query_string);
1832 }
1833
1834 while (!skip_getopt && (c = php_getopt(argc, argv, OPTIONS, &php_optarg, &php_optind, 0, 2)) != -1) {
1835 switch (c) {
1836 case 'c':
1837 if (cgi_sapi_module.php_ini_path_override) {
1838 free(cgi_sapi_module.php_ini_path_override);
1839 }
1840 cgi_sapi_module.php_ini_path_override = strdup(php_optarg);
1841 break;
1842 case 'n':
1843 cgi_sapi_module.php_ini_ignore = 1;
1844 break;
1845 case 'd': {
1846 /* define ini entries on command line */
1847 int len = strlen(php_optarg);
1848 char *val;
1849
1850 if ((val = strchr(php_optarg, '='))) {
1851 val++;
1852 if (!isalnum(*val) && *val != '"' && *val != '\'' && *val != '\0') {
1853 cgi_sapi_module.ini_entries = realloc(cgi_sapi_module.ini_entries, ini_entries_len + len + sizeof("\"\"\n\0"));
1854 memcpy(cgi_sapi_module.ini_entries + ini_entries_len, php_optarg, (val - php_optarg));
1855 ini_entries_len += (val - php_optarg);
1856 memcpy(cgi_sapi_module.ini_entries + ini_entries_len, "\"", 1);
1857 ini_entries_len++;
1858 memcpy(cgi_sapi_module.ini_entries + ini_entries_len, val, len - (val - php_optarg));
1859 ini_entries_len += len - (val - php_optarg);
1860 memcpy(cgi_sapi_module.ini_entries + ini_entries_len, "\"\n\0", sizeof("\"\n\0"));
1861 ini_entries_len += sizeof("\n\0\"") - 2;
1862 } else {
1863 cgi_sapi_module.ini_entries = realloc(cgi_sapi_module.ini_entries, ini_entries_len + len + sizeof("\n\0"));
1864 memcpy(cgi_sapi_module.ini_entries + ini_entries_len, php_optarg, len);
1865 memcpy(cgi_sapi_module.ini_entries + ini_entries_len + len, "\n\0", sizeof("\n\0"));
1866 ini_entries_len += len + sizeof("\n\0") - 2;
1867 }
1868 } else {
1869 cgi_sapi_module.ini_entries = realloc(cgi_sapi_module.ini_entries, ini_entries_len + len + sizeof("=1\n\0"));
1870 memcpy(cgi_sapi_module.ini_entries + ini_entries_len, php_optarg, len);
1871 memcpy(cgi_sapi_module.ini_entries + ini_entries_len + len, "=1\n\0", sizeof("=1\n\0"));
1872 ini_entries_len += len + sizeof("=1\n\0") - 2;
1873 }
1874 break;
1875 }
1876 /* if we're started on command line, check to see if
1877 * we are being started as an 'external' fastcgi
1878 * server by accepting a bindpath parameter. */
1879 case 'b':
1880 if (!fastcgi) {
1881 bindpath = strdup(php_optarg);
1882 }
1883 break;
1884 case 's': /* generate highlighted HTML from source */
1885 behavior = PHP_MODE_HIGHLIGHT;
1886 break;
1887 }
1888 }
1889 php_optind = orig_optind;
1890 php_optarg = orig_optarg;
1891
1892 if (fastcgi || bindpath) {
1893 /* Override SAPI callbacks */
1894 cgi_sapi_module.ub_write = sapi_fcgi_ub_write;
1895 cgi_sapi_module.flush = sapi_fcgi_flush;
1896 cgi_sapi_module.read_post = sapi_fcgi_read_post;
1897 cgi_sapi_module.getenv = sapi_fcgi_getenv;
1898 cgi_sapi_module.read_cookies = sapi_fcgi_read_cookies;
1899 }
1900
1901 #ifdef ZTS
1902 SG(request_info).path_translated = NULL;
1903 #endif
1904
1905 cgi_sapi_module.executable_location = argv[0];
1906 if (!cgi && !fastcgi && !bindpath) {
1907 cgi_sapi_module.additional_functions = additional_functions;
1908 }
1909
1910 /* startup after we get the above ini override se we get things right */
1911 if (cgi_sapi_module.startup(&cgi_sapi_module) == FAILURE) {
1912 #ifdef ZTS
1913 tsrm_shutdown();
1914 #endif
1915 return FAILURE;
1916 }
1917
1918 /* check force_cgi after startup, so we have proper output */
1919 if (cgi && CGIG(force_redirect)) {
1920 /* Apache will generate REDIRECT_STATUS,
1921 * Netscape and redirect.so will generate HTTP_REDIRECT_STATUS.
1922 * redirect.so and installation instructions available from
1923 * http://www.koehntopp.de/php.
1924 * -- kk@netuse.de
1925 */
1926 if (!getenv("REDIRECT_STATUS") &&
1927 !getenv ("HTTP_REDIRECT_STATUS") &&
1928 /* this is to allow a different env var to be configured
1929 * in case some server does something different than above */
1930 (!CGIG(redirect_status_env) || !getenv(CGIG(redirect_status_env)))
1931 ) {
1932 zend_try {
1933 SG(sapi_headers).http_response_code = 400;
1934 PUTS("<b>Security Alert!</b> The PHP CGI cannot be accessed directly.\n\n\
1935 <p>This PHP CGI binary was compiled with force-cgi-redirect enabled. This\n\
1936 means that a page will only be served up if the REDIRECT_STATUS CGI variable is\n\
1937 set, e.g. via an Apache Action directive.</p>\n\
1938 <p>For more information as to <i>why</i> this behaviour exists, see the <a href=\"http://php.net/security.cgi-bin\">\
1939 manual page for CGI security</a>.</p>\n\
1940 <p>For more information about changing this behaviour or re-enabling this webserver,\n\
1941 consult the installation file that came with this distribution, or visit \n\
1942 <a href=\"http://php.net/install.windows\">the manual page</a>.</p>\n");
1943 } zend_catch {
1944 } zend_end_try();
1945 #if defined(ZTS) && !defined(PHP_DEBUG)
1946 /* XXX we're crashing here in msvc6 debug builds at
1947 * php_message_handler_for_zend:839 because
1948 * SG(request_info).path_translated is an invalid pointer.
1949 * It still happens even though I set it to null, so something
1950 * weird is going on.
1951 */
1952 tsrm_shutdown();
1953 #endif
1954 return FAILURE;
1955 }
1956 }
1957
1958 if (bindpath) {
1959 fcgi_fd = fcgi_listen(bindpath, 128);
1960 if (fcgi_fd < 0) {
1961 fprintf(stderr, "Couldn't create FastCGI listen socket on port %s\n", bindpath);
1962 #ifdef ZTS
1963 tsrm_shutdown();
1964 #endif
1965 return FAILURE;
1966 }
1967 fastcgi = fcgi_is_fastcgi();
1968 }
1969 if (fastcgi) {
1970 /* How many times to run PHP scripts before dying */
1971 if (getenv("PHP_FCGI_MAX_REQUESTS")) {
1972 max_requests = atoi(getenv("PHP_FCGI_MAX_REQUESTS"));
1973 if (max_requests < 0) {
1974 fprintf(stderr, "PHP_FCGI_MAX_REQUESTS is not valid\n");
1975 return FAILURE;
1976 }
1977 }
1978
1979 /* make php call us to get _ENV vars */
1980 php_php_import_environment_variables = php_import_environment_variables;
1981 php_import_environment_variables = cgi_php_import_environment_variables;
1982
1983 /* library is already initialized, now init our request */
1984 request = fcgi_init_request(fcgi_fd);
1985
1986 #ifndef PHP_WIN32
1987 /* Pre-fork, if required */
1988 if (getenv("PHP_FCGI_CHILDREN")) {
1989 char * children_str = getenv("PHP_FCGI_CHILDREN");
1990 children = atoi(children_str);
1991 if (children < 0) {
1992 fprintf(stderr, "PHP_FCGI_CHILDREN is not valid\n");
1993 return FAILURE;
1994 }
1995 fcgi_set_mgmt_var("FCGI_MAX_CONNS", sizeof("FCGI_MAX_CONNS")-1, children_str, strlen(children_str));
1996 /* This is the number of concurrent requests, equals FCGI_MAX_CONNS */
1997 fcgi_set_mgmt_var("FCGI_MAX_REQS", sizeof("FCGI_MAX_REQS")-1, children_str, strlen(children_str));
1998 } else {
1999 fcgi_set_mgmt_var("FCGI_MAX_CONNS", sizeof("FCGI_MAX_CONNS")-1, "1", sizeof("1")-1);
2000 fcgi_set_mgmt_var("FCGI_MAX_REQS", sizeof("FCGI_MAX_REQS")-1, "1", sizeof("1")-1);
2001 }
2002
2003 if (children) {
2004 int running = 0;
2005 pid_t pid;
2006
2007 /* Create a process group for ourself & children */
2008 setsid();
2009 pgroup = getpgrp();
2010 #ifdef DEBUG_FASTCGI
2011 fprintf(stderr, "Process group %d\n", pgroup);
2012 #endif
2013
2014 /* Set up handler to kill children upon exit */
2015 act.sa_flags = 0;
2016 act.sa_handler = fastcgi_cleanup;
2017 if (sigaction(SIGTERM, &act, &old_term) ||
2018 sigaction(SIGINT, &act, &old_int) ||
2019 sigaction(SIGQUIT, &act, &old_quit)
2020 ) {
2021 perror("Can't set signals");
2022 exit(1);
2023 }
2024
2025 if (fcgi_in_shutdown()) {
2026 goto parent_out;
2027 }
2028
2029 while (parent) {
2030 do {
2031 #ifdef DEBUG_FASTCGI
2032 fprintf(stderr, "Forking, %d running\n", running);
2033 #endif
2034 pid = fork();
2035 switch (pid) {
2036 case 0:
2037 /* One of the children.
2038 * Make sure we don't go round the
2039 * fork loop any more
2040 */
2041 parent = 0;
2042
2043 /* don't catch our signals */
2044 sigaction(SIGTERM, &old_term, 0);
2045 sigaction(SIGQUIT, &old_quit, 0);
2046 sigaction(SIGINT, &old_int, 0);
2047 break;
2048 case -1:
2049 perror("php (pre-forking)");
2050 exit(1);
2051 break;
2052 default:
2053 /* Fine */
2054 running++;
2055 break;
2056 }
2057 } while (parent && (running < children));
2058
2059 if (parent) {
2060 #ifdef DEBUG_FASTCGI
2061 fprintf(stderr, "Wait for kids, pid %d\n", getpid());
2062 #endif
2063 parent_waiting = 1;
2064 while (1) {
2065 if (wait(&status) >= 0) {
2066 running--;
2067 break;
2068 } else if (exit_signal) {
2069 break;
2070 }
2071 }
2072 if (exit_signal) {
2073 #if 0
2074 while (running > 0) {
2075 while (wait(&status) < 0) {
2076 }
2077 running--;
2078 }
2079 #endif
2080 goto parent_out;
2081 }
2082 }
2083 }
2084 } else {
2085 parent = 0;
2086 }
2087
2088 #endif /* WIN32 */
2089 }
2090
2091 zend_first_try {
2092 while (!skip_getopt && (c = php_getopt(argc, argv, OPTIONS, &php_optarg, &php_optind, 1, 2)) != -1) {
2093 switch (c) {
2094 case 'T':
2095 benchmark = 1;
2096 repeats = atoi(php_optarg);
2097 #ifdef HAVE_GETTIMEOFDAY
2098 gettimeofday(&start, NULL);
2099 #else
2100 time(&start);
2101 #endif
2102 break;
2103 case 'h':
2104 case '?':
2105 if (request) {
2106 fcgi_destroy_request(request);
2107 }
2108 fcgi_shutdown();
2109 no_headers = 1;
2110 SG(headers_sent) = 1;
2111 php_cgi_usage(argv[0]);
2112 php_output_end_all(TSRMLS_C);
2113 exit_status = 0;
2114 goto out;
2115 }
2116 }
2117 php_optind = orig_optind;
2118 php_optarg = orig_optarg;
2119
2120 /* start of FAST CGI loop */
2121 /* Initialise FastCGI request structure */
2122 #ifdef PHP_WIN32
2123 /* attempt to set security impersonation for fastcgi
2124 * will only happen on NT based OS, others will ignore it. */
2125 if (fastcgi && CGIG(impersonate)) {
2126 fcgi_impersonate();
2127 }
2128 #endif
2129 while (!fastcgi || fcgi_accept_request(request) >= 0) {
2130 SG(server_context) = fastcgi ? (void *) request : (void *) 1;
2131 init_request_info(request TSRMLS_CC);
2132 CG(interactive) = 0;
2133
2134 if (!cgi && !fastcgi) {
2135 while ((c = php_getopt(argc, argv, OPTIONS, &php_optarg, &php_optind, 0, 2)) != -1) {
2136 switch (c) {
2137
2138 case 'a': /* interactive mode */
2139 printf("Interactive mode enabled\n\n");
2140 CG(interactive) = 1;
2141 break;
2142
2143 case 'C': /* don't chdir to the script directory */
2144 SG(options) |= SAPI_OPTION_NO_CHDIR;
2145 break;
2146
2147 case 'e': /* enable extended info output */
2148 CG(compiler_options) |= ZEND_COMPILE_EXTENDED_INFO;
2149 break;
2150
2151 case 'f': /* parse file */
2152 if (script_file) {
2153 efree(script_file);
2154 }
2155 script_file = estrdup(php_optarg);
2156 no_headers = 1;
2157 break;
2158
2159 case 'i': /* php info & quit */
2160 if (script_file) {
2161 efree(script_file);
2162 }
2163 if (php_request_startup(TSRMLS_C) == FAILURE) {
2164 SG(server_context) = NULL;
2165 php_module_shutdown(TSRMLS_C);
2166 return FAILURE;
2167 }
2168 if (no_headers) {
2169 SG(headers_sent) = 1;
2170 SG(request_info).no_headers = 1;
2171 }
2172 php_print_info(0xFFFFFFFF TSRMLS_CC);
2173 php_request_shutdown((void *) 0);
2174 fcgi_shutdown();
2175 exit_status = 0;
2176 goto out;
2177
2178 case 'l': /* syntax check mode */
2179 no_headers = 1;
2180 behavior = PHP_MODE_LINT;
2181 break;
2182
2183 case 'm': /* list compiled in modules */
2184 if (script_file) {
2185 efree(script_file);
2186 }
2187 SG(headers_sent) = 1;
2188 php_printf("[PHP Modules]\n");
2189 print_modules(TSRMLS_C);
2190 php_printf("\n[Zend Modules]\n");
2191 print_extensions(TSRMLS_C);
2192 php_printf("\n");
2193 php_output_end_all(TSRMLS_C);
2194 fcgi_shutdown();
2195 exit_status = 0;
2196 goto out;
2197
2198 #if 0 /* not yet operational, see also below ... */
2199 case '': /* generate indented source mode*/
2200 behavior=PHP_MODE_INDENT;
2201 break;
2202 #endif
2203
2204 case 'q': /* do not generate HTTP headers */
2205 no_headers = 1;
2206 break;
2207
2208 case 'v': /* show php version & quit */
2209 if (script_file) {
2210 efree(script_file);
2211 }
2212 no_headers = 1;
2213 if (php_request_startup(TSRMLS_C) == FAILURE) {
2214 SG(server_context) = NULL;
2215 php_module_shutdown(TSRMLS_C);
2216 return FAILURE;
2217 }
2218 if (no_headers) {
2219 SG(headers_sent) = 1;
2220 SG(request_info).no_headers = 1;
2221 }
2222 #if ZEND_DEBUG
2223 php_printf("PHP %s (%s) (built: %s %s) (DEBUG)\nCopyright (c) 1997-2014 The PHP Group\n%s", PHP_VERSION, sapi_module.name, __DATE__, __TIME__, get_zend_version());
2224 #else
2225 php_printf("PHP %s (%s) (built: %s %s)\nCopyright (c) 1997-2014 The PHP Group\n%s", PHP_VERSION, sapi_module.name, __DATE__, __TIME__, get_zend_version());
2226 #endif
2227 php_request_shutdown((void *) 0);
2228 fcgi_shutdown();
2229 exit_status = 0;
2230 goto out;
2231
2232 case 'w':
2233 behavior = PHP_MODE_STRIP;
2234 break;
2235
2236 case 'z': /* load extension file */
2237 zend_load_extension(php_optarg);
2238 break;
2239
2240 default:
2241 break;
2242 }
2243 }
2244
2245 if (script_file) {
2246 /* override path_translated if -f on command line */
2247 STR_FREE(SG(request_info).path_translated);
2248 SG(request_info).path_translated = script_file;
2249 /* before registering argv to module exchange the *new* argv[0] */
2250 /* we can achieve this without allocating more memory */
2251 SG(request_info).argc = argc - (php_optind - 1);
2252 SG(request_info).argv = &argv[php_optind - 1];
2253 SG(request_info).argv[0] = script_file;
2254 } else if (argc > php_optind) {
2255 /* file is on command line, but not in -f opt */
2256 STR_FREE(SG(request_info).path_translated);
2257 SG(request_info).path_translated = estrdup(argv[php_optind]);
2258 /* arguments after the file are considered script args */
2259 SG(request_info).argc = argc - php_optind;
2260 SG(request_info).argv = &argv[php_optind];
2261 }
2262
2263 if (no_headers) {
2264 SG(headers_sent) = 1;
2265 SG(request_info).no_headers = 1;
2266 }
2267
2268 /* all remaining arguments are part of the query string
2269 * this section of code concatenates all remaining arguments
2270 * into a single string, seperating args with a &
2271 * this allows command lines like:
2272 *
2273 * test.php v1=test v2=hello+world!
2274 * test.php "v1=test&v2=hello world!"
2275 * test.php v1=test "v2=hello world!"
2276 */
2277 if (!SG(request_info).query_string && argc > php_optind) {
2278 int slen = strlen(PG(arg_separator).input);
2279 len = 0;
2280 for (i = php_optind; i < argc; i++) {
2281 if (i < (argc - 1)) {
2282 len += strlen(argv[i]) + slen;
2283 } else {
2284 len += strlen(argv[i]);
2285 }
2286 }
2287
2288 len += 2;
2289 s = malloc(len);
2290 *s = '\0'; /* we are pretending it came from the environment */
2291 for (i = php_optind; i < argc; i++) {
2292 strlcat(s, argv[i], len);
2293 if (i < (argc - 1)) {
2294 strlcat(s, PG(arg_separator).input, len);
2295 }
2296 }
2297 SG(request_info).query_string = s;
2298 free_query_string = 1;
2299 }
2300 } /* end !cgi && !fastcgi */
2301
2302 /*
2303 we never take stdin if we're (f)cgi, always
2304 rely on the web server giving us the info
2305 we need in the environment.
2306 */
2307 if (SG(request_info).path_translated || cgi || fastcgi) {
2308 file_handle.type = ZEND_HANDLE_FILENAME;
2309 file_handle.filename = SG(request_info).path_translated;
2310 file_handle.handle.fp = NULL;
2311 } else {
2312 file_handle.filename = "-";
2313 file_handle.type = ZEND_HANDLE_FP;
2314 file_handle.handle.fp = stdin;
2315 }
2316
2317 file_handle.opened_path = NULL;
2318 file_handle.free_filename = 0;
2319
2320 /* request startup only after we've done all we can to
2321 * get path_translated */
2322 if (php_request_startup(TSRMLS_C) == FAILURE) {
2323 if (fastcgi) {
2324 fcgi_finish_request(request, 1);
2325 }
2326 SG(server_context) = NULL;
2327 php_module_shutdown(TSRMLS_C);
2328 return FAILURE;
2329 }
2330 if (no_headers) {
2331 SG(headers_sent) = 1;
2332 SG(request_info).no_headers = 1;
2333 }
2334
2335 /*
2336 at this point path_translated will be set if:
2337 1. we are running from shell and got filename was there
2338 2. we are running as cgi or fastcgi
2339 */
2340 if (cgi || fastcgi || SG(request_info).path_translated) {
2341 if (php_fopen_primary_script(&file_handle TSRMLS_CC) == FAILURE) {
2342 zend_try {
2343 if (errno == EACCES) {
2344 SG(sapi_headers).http_response_code = 403;
2345 PUTS("Access denied.\n");
2346 } else {
2347 SG(sapi_headers).http_response_code = 404;
2348 PUTS("No input file specified.\n");
2349 }
2350 } zend_catch {
2351 } zend_end_try();
2352 /* we want to serve more requests if this is fastcgi
2353 * so cleanup and continue, request shutdown is
2354 * handled later */
2355 if (fastcgi) {
2356 goto fastcgi_request_done;
2357 }
2358
2359 STR_FREE(SG(request_info).path_translated);
2360
2361 if (free_query_string && SG(request_info).query_string) {
2362 free(SG(request_info).query_string);
2363 SG(request_info).query_string = NULL;
2364 }
2365
2366 php_request_shutdown((void *) 0);
2367 SG(server_context) = NULL;
2368 php_module_shutdown(TSRMLS_C);
2369 sapi_shutdown();
2370 #ifdef ZTS
2371 tsrm_shutdown();
2372 #endif
2373 return FAILURE;
2374 }
2375 }
2376
2377 if (CGIG(check_shebang_line)) {
2378 /* #!php support */
2379 switch (file_handle.type) {
2380 case ZEND_HANDLE_FD:
2381 if (file_handle.handle.fd < 0) {
2382 break;
2383 }
2384 file_handle.type = ZEND_HANDLE_FP;
2385 file_handle.handle.fp = fdopen(file_handle.handle.fd, "rb");
2386 /* break missing intentionally */
2387 case ZEND_HANDLE_FP:
2388 if (!file_handle.handle.fp ||
2389 (file_handle.handle.fp == stdin)) {
2390 break;
2391 }
2392 c = fgetc(file_handle.handle.fp);
2393 if (c == '#') {
2394 while (c != '\n' && c != '\r' && c != EOF) {
2395 c = fgetc(file_handle.handle.fp); /* skip to end of line */
2396 }
2397 /* handle situations where line is terminated by \r\n */
2398 if (c == '\r') {
2399 if (fgetc(file_handle.handle.fp) != '\n') {
2400 long pos = ftell(file_handle.handle.fp);
2401 fseek(file_handle.handle.fp, pos - 1, SEEK_SET);
2402 }
2403 }
2404 CG(start_lineno) = 2;
2405 } else {
2406 rewind(file_handle.handle.fp);
2407 }
2408 break;
2409 case ZEND_HANDLE_STREAM:
2410 c = php_stream_getc((php_stream*)file_handle.handle.stream.handle);
2411 if (c == '#') {
2412 while (c != '\n' && c != '\r' && c != EOF) {
2413 c = php_stream_getc((php_stream*)file_handle.handle.stream.handle); /* skip to end of line */
2414 }
2415 /* handle situations where line is terminated by \r\n */
2416 if (c == '\r') {
2417 if (php_stream_getc((php_stream*)file_handle.handle.stream.handle) != '\n') {
2418 long pos = php_stream_tell((php_stream*)file_handle.handle.stream.handle);
2419 php_stream_seek((php_stream*)file_handle.handle.stream.handle, pos - 1, SEEK_SET);
2420 }
2421 }
2422 CG(start_lineno) = 2;
2423 } else {
2424 php_stream_rewind((php_stream*)file_handle.handle.stream.handle);
2425 }
2426 break;
2427 case ZEND_HANDLE_MAPPED:
2428 if (file_handle.handle.stream.mmap.buf[0] == '#') {
2429 int i = 1;
2430
2431 c = file_handle.handle.stream.mmap.buf[i++];
2432 while (c != '\n' && c != '\r' && i < file_handle.handle.stream.mmap.len) {
2433 c = file_handle.handle.stream.mmap.buf[i++];
2434 }
2435 if (c == '\r') {
2436 if (i < file_handle.handle.stream.mmap.len && file_handle.handle.stream.mmap.buf[i] == '\n') {
2437 i++;
2438 }
2439 }
2440 if(i > file_handle.handle.stream.mmap.len) {
2441 i = file_handle.handle.stream.mmap.len;
2442 }
2443 file_handle.handle.stream.mmap.buf += i;
2444 file_handle.handle.stream.mmap.len -= i;
2445 }
2446 break;
2447 default:
2448 break;
2449 }
2450 }
2451
2452 switch (behavior) {
2453 case PHP_MODE_STANDARD:
2454 php_execute_script(&file_handle TSRMLS_CC);
2455 break;
2456 case PHP_MODE_LINT:
2457 PG(during_request_startup) = 0;
2458 exit_status = php_lint_script(&file_handle TSRMLS_CC);
2459 if (exit_status == SUCCESS) {
2460 zend_printf("No syntax errors detected in %s\n", file_handle.filename);
2461 } else {
2462 zend_printf("Errors parsing %s\n", file_handle.filename);
2463 }
2464 break;
2465 case PHP_MODE_STRIP:
2466 if (open_file_for_scanning(&file_handle TSRMLS_CC) == SUCCESS) {
2467 zend_strip(TSRMLS_C);
2468 zend_file_handle_dtor(&file_handle TSRMLS_CC);
2469 php_output_teardown();
2470 }
2471 return SUCCESS;
2472 break;
2473 case PHP_MODE_HIGHLIGHT:
2474 {
2475 zend_syntax_highlighter_ini syntax_highlighter_ini;
2476
2477 if (open_file_for_scanning(&file_handle TSRMLS_CC) == SUCCESS) {
2478 php_get_highlight_struct(&syntax_highlighter_ini);
2479 zend_highlight(&syntax_highlighter_ini TSRMLS_CC);
2480 if (fastcgi) {
2481 goto fastcgi_request_done;
2482 }
2483 zend_file_handle_dtor(&file_handle TSRMLS_CC);
2484 php_output_teardown();
2485 }
2486 return SUCCESS;
2487 }
2488 break;
2489 #if 0
2490 /* Zeev might want to do something with this one day */
2491 case PHP_MODE_INDENT:
2492 open_file_for_scanning(&file_handle TSRMLS_CC);
2493 zend_indent();
2494 zend_file_handle_dtor(&file_handle TSRMLS_CC);
2495 php_output_teardown();
2496 return SUCCESS;
2497 break;
2498 #endif
2499 }
2500
2501 fastcgi_request_done:
2502 {
2503 STR_FREE(SG(request_info).path_translated);
2504
2505 php_request_shutdown((void *) 0);
2506
2507 if (exit_status == 0) {
2508 exit_status = EG(exit_status);
2509 }
2510
2511 if (free_query_string && SG(request_info).query_string) {
2512 free(SG(request_info).query_string);
2513 SG(request_info).query_string = NULL;
2514 }
2515 }
2516
2517 if (!fastcgi) {
2518 if (benchmark) {
2519 repeats--;
2520 if (repeats > 0) {
2521 script_file = NULL;
2522 php_optind = orig_optind;
2523 php_optarg = orig_optarg;
2524 continue;
2525 }
2526 }
2527 break;
2528 }
2529
2530 /* only fastcgi will get here */
2531 requests++;
2532 if (max_requests && (requests == max_requests)) {
2533 fcgi_finish_request(request, 1);
2534 if (bindpath) {
2535 free(bindpath);
2536 }
2537 if (max_requests != 1) {
2538 /* no need to return exit_status of the last request */
2539 exit_status = 0;
2540 }
2541 break;
2542 }
2543 /* end of fastcgi loop */
2544 }
2545 if (request) {
2546 fcgi_destroy_request(request);
2547 }
2548 fcgi_shutdown();
2549
2550 if (cgi_sapi_module.php_ini_path_override) {
2551 free(cgi_sapi_module.php_ini_path_override);
2552 }
2553 if (cgi_sapi_module.ini_entries) {
2554 free(cgi_sapi_module.ini_entries);
2555 }
2556 } zend_catch {
2557 exit_status = 255;
2558 } zend_end_try();
2559
2560 out:
2561 if (benchmark) {
2562 int sec;
2563 #ifdef HAVE_GETTIMEOFDAY
2564 int usec;
2565
2566 gettimeofday(&end, NULL);
2567 sec = (int)(end.tv_sec - start.tv_sec);
2568 if (end.tv_usec >= start.tv_usec) {
2569 usec = (int)(end.tv_usec - start.tv_usec);
2570 } else {
2571 sec -= 1;
2572 usec = (int)(end.tv_usec + 1000000 - start.tv_usec);
2573 }
2574 fprintf(stderr, "\nElapsed time: %d.%06d sec\n", sec, usec);
2575 #else
2576 time(&end);
2577 sec = (int)(end - start);
2578 fprintf(stderr, "\nElapsed time: %d sec\n", sec);
2579 #endif
2580 }
2581
2582 #ifndef PHP_WIN32
2583 parent_out:
2584 #endif
2585
2586 SG(server_context) = NULL;
2587 php_module_shutdown(TSRMLS_C);
2588 sapi_shutdown();
2589
2590 #ifdef ZTS
2591 tsrm_shutdown();
2592 #endif
2593
2594 #if defined(PHP_WIN32) && ZEND_DEBUG && 0
2595 _CrtDumpMemoryLeaks();
2596 #endif
2597
2598 return exit_status;
2599 }
2600 /* }}} */
2601
2602 /*
2603 * Local variables:
2604 * tab-width: 4
2605 * c-basic-offset: 4
2606 * End:
2607 * vim600: sw=4 ts=4 fdm=marker
2608 * vim<600: sw=4 ts=4
2609 */
2610
