PX : code

Linux Fortune by Van
Rating: 5.00
Download this code


<html>
<head>
<%
/* 2000-06-02 22:01:34:  Van; vanboers@dedserius.com
    http://www.dedserius.com
    --fortune.php3 v.0.0.1
    A little PHP3 module for Linux that shows fortune, disk-space usage and 
    processes (if you enable them)
$ps_array("cpu","ruser","pid","tty","time","command");
*/
%>
<title>Fortune on <%=$SERVER_NAME%></title>
<table width="100%">
</head>
<body bgcolor="white">
<td width=5>
</td>
<td>
<h2> Brought to you by Linux Fortune on <u><% echo "$SERVER_NAME!"%></u></h2>
<form action="./fortune.php3" method="get">
        <input type="hidden" name="curpage" value="fortune">
        <input type="hidden" name="message" value="fortune.php3">
        <select name="whichcmd">
        <option selected value="<%=$whichcmd%>">Show me a Fortune</option>
        <option value="FortuneOffensive">Show me an Offensive Fortune</option>
        <%/*<option value="Who">Who's on the server?</option>*/%>
        <option value="ProcessList">Show Processes</option>
        <option value="DF">How are the disks doing?</option>
        <input type="submit" value="Post">
    </select>
        <input type="hidden" name="chosewhat" value="Fortune">
</form>
<%
switch ($whichcmd)
{
    case "Fortune":
        $fortune = exec("/usr/games/fortune -a",$fortunearray);
        break;
    case "OffensiveFortune":
        $fortune = exec("/usr/games/fortune -o",$fortunearray);
        break;
    case "Who":
        $fortune = exec("w", $fortunearray);
        break;
    case "DF":
        $fortune = exec("df -hv | sed '/  /s// /g' | sort -n +1", $fortunearray);
        $numcols=5;
        break;
    case "ProcessList":
//        Enable the following and comment out the one below it, if you're either brave
//        or stupid.  >:)  The formatting is kinda broken, but, I haven't done much with it.
/*        $fortune = exec("ps -eo '%C    %u    %p    %y    %x    %a' --width 200 | sort -n +1 -r", $fortunearray);*/
        $fortune = exec("/bin/echo 'Hi There, >:); Yeah, right!'", $fortunearray);
        $numcols=5;
        break;
    default:
        $fortune = exec("/usr/games/fortune -a", $fortunearray);
        break;
        }
$i = 0;
$j = count($fortunearray);
if ( ($whichcmd != "DF" ) && ($whichcmd != "ProcessList"))
{
    while ( $i < $j )
    {
        echo "<font face=>\n";
        echo "$fortunearray[$i]<br>\n";
        echo "</font>\n";
        $i++;
    }
} else {
%>
    <table border=1>
    <%
    while ( $i < $j )
    {
        echo "\t<tr>\n";
        $tabarray=split(" ",$fortunearray[$i],$numcols);
        for ($k=0; $k < $numcols; $k++)
        {
            echo "\t\t<td><b>$tabarray[$k]&nbsp;</b></td>\n";
        }
    echo "\t</tr>\n";
    $i++;
    }
    echo "\n</table>\n";
}
%>
<%
echo "<br><br><hr>\n";
$w = exec("/usr/bin/uptime",$uptime);
$e = 0;
$f = count($uptime);
echo "<b><u><font size=+1>$HostName</u></b> Up Time:</font><br>\n";
echo "==============================================================<br>\n";
while ( $e < $f )
{
echo "$uptime[$e]<br>\n";
$e ++;
}
echo "==============================================================<br>\n";
echo "\n";
%>
</td>
<td width=5>
</td>
</table>
</body>
</html>

Comments or questions?
PX is running PHP 5.2.17
Thanks to Miranda Productions for hosting and bandwidth.
Use of any code from PX is at your own risk.