mirror of
https://github.com/iiab/iiab.git
synced 2025-02-13 11:42:08 +00:00
33 lines
1.2 KiB
PHP
33 lines
1.2 KiB
PHP
|
<?php
|
||
|
|
// This is interface between nginx fastcgi and older cgi perl script: awstats.pl
|
||
|
|
// Taken from https://wiki.archlinux.org/index.php/AWStats#Nginx
|
||
|
|
$descriptorspec = array(
|
||
|
|
0 => array("pipe", "r"), // stdin is a pipe that the child will read from
|
||
|
|
1 => array("pipe", "w"), // stdout is a pipe that the child will write to
|
||
|
|
2 => array("pipe", "w") // stderr is a file to write to
|
||
|
|
);
|
||
|
|
$newenv = $_SERVER;
|
||
|
|
$newenv["SCRIPT_FILENAME"] = $_SERVER["X_SCRIPT_FILENAME"];
|
||
|
|
$newenv["SCRIPT_NAME"] = $_SERVER["X_SCRIPT_NAME"];
|
||
|
|
if (is_executable($_SERVER["X_SCRIPT_FILENAME"])) {
|
||
|
|
$process = proc_open($_SERVER["X_SCRIPT_FILENAME"], $descriptorspec, $pipes, NULL, $newenv);
|
||
|
|
if (is_resource($process)) {
|
||
|
|
fclose($pipes[0]);
|
||
|
|
$head = fgets($pipes[1]);
|
||
|
|
while (strcmp($head, "\n")) {
|
||
|
|
header($head);
|
||
|
|
$head = fgets($pipes[1]);
|
||
|
|
}
|
||
|
|
fpassthru($pipes[1]);
|
||
|
|
fclose($pipes[1]);
|
||
|
|
fclose($pipes[2]);
|
||
|
|
$return_value = proc_close($process);
|
||
|
|
} else {
|
||
|
|
header("Status: 500 Internal Server Error");
|
||
|
|
echo("Internal Server Error");
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
header("Status: 404 Page Not Found");
|
||
|
|
echo("Page Not Found");
|
||
|
|
}
|