PAL.C.T MINI SHELL
<?php
function get_cgi_path() /* {{{ */
{
$php = getenv("TEST_PHP_EXECUTABLE");
$cli = false;
$cgi = false;
if (file_exists($php) && is_executable($php)) {
$version = `$php -n -v`;
if (strstr($version, "(cli)")) {
/* that's cli */
$cli = true;
} else if (strpos($version, "(cgi")) {
/* that's cgi */
return $php;
}
}
if ($cli) {
/* trying to guess ... */
$php_path = $php;
if (defined("PHP_WINDOWS_VERSION_MAJOR")) {
/* On Windows it should be in the same dir as php.exe in most of the cases. */
$php_path = dirname($php);
if (is_dir($php_path) && file_exists("$php_path/php-cgi.exe") && is_executable("$php_path/php-cgi.exe")) {
return "$php_path/php-cgi.exe";
}
} else {
for ($i = 0; $i < 2; $i++) {
$slash_pos = strrpos($php_path, "/");
if ($slash_pos) {
$php_path = substr($php_path, 0, $slash_pos);
} else {
return FALSE;
}
}
if ($php_path && is_dir($php_path) && file_exists($php_path."/cgi/php-cgi") && is_executable($php_path."/cgi/php-cgi")) {
/* gotcha */
return $php_path."/cgi/php-cgi";
}
}
return false;
}
/* uhm? what's that then? */
return false;
}
/* }}} */
function reset_env_vars() /* {{{ */
{
putenv("REDIRECT_STATUS");
putenv("QUERY_STRING");
putenv("PATH_TRANSLATED");
putenv("SCRIPT_FILENAME");
putenv("SERVER_SOFTWARE");
putenv("SERVER_NAME");
putenv("GATEWAY_INTERFACE");
putenv("REQUEST_METHOD");
}
/* }}} */
?>
y~or5J ={Eeu磝Qk ᯘG{?+]ן?wM3X^歌>{7پK>on\jy R g/=fOroNVv~Y+ NGuÝHWyw[eQʨSb> >}Gmx[o[<{Ϯ_qF vM IENDB`