| 1 | <?php
 | 
|---|
| 2 | 
 | 
|---|
| 3 | require "cvs.php3";
 | 
|---|
| 4 | require "stilovi.php3";
 | 
|---|
| 5 | 
 | 
|---|
| 6 | /*
 | 
|---|
| 7 |  * Parse argument(s)
 | 
|---|
| 8 |  */
 | 
|---|
| 9 | if (isset($sFile))
 | 
|---|
| 10 | {
 | 
|---|
| 11 |     if (isset($sRevision))
 | 
|---|
| 12 |     {
 | 
|---|
| 13 |         $sOperation = "viewfile";
 | 
|---|
| 14 |         if ($sRevision == "HEAD")
 | 
|---|
| 15 |             $sRevision = "";
 | 
|---|
| 16 |         $sTitle = substr($sFile, 0, -2)."\nrev.: ". ($sRevision == "" ? "HEAD" : $sRevision);
 | 
|---|
| 17 |     }
 | 
|---|
| 18 |     else
 | 
|---|
| 19 |     {
 | 
|---|
| 20 |         $sOperation = "viewfileinfo";
 | 
|---|
| 21 |         $sTitle = substr($sFile, 0, -2);
 | 
|---|
| 22 |     }
 | 
|---|
| 23 | }
 | 
|---|
| 24 | else if (isset($sDir))
 | 
|---|
| 25 | {
 | 
|---|
| 26 |     $sOperation = "viewdir";
 | 
|---|
| 27 |     $sTitle = ($sDir == "." || $sDir =="") ? "./" : $sDir."/";
 | 
|---|
| 28 |     $iSortColumn = (!isset($iSortColumn) || $iSortColumn == "")  ?
 | 
|---|
| 29 |                         0 : $iSortColumn = @(int)$iSortColumn;
 | 
|---|
| 30 | }
 | 
|---|
| 31 | else
 | 
|---|
| 32 | {   /* default action: */
 | 
|---|
| 33 |     $sOperation = "viewdir";
 | 
|---|
| 34 |     $sDir = ".";
 | 
|---|
| 35 |     $sTitle = "root";
 | 
|---|
| 36 |     $iSortColumn = 0;
 | 
|---|
| 37 | }
 | 
|---|
| 38 | 
 | 
|---|
| 39 | 
 | 
|---|
| 40 | /*
 | 
|---|
| 41 |  * Odin32 look.
 | 
|---|
| 42 |  */
 | 
|---|
| 43 | require "01-PreTitle.php3";
 | 
|---|
| 44 | echo "Odin32 CVS: ", str_replace("\n", " ", $sTitle);
 | 
|---|
| 45 | require "02-PostTitle.php3";
 | 
|---|
| 46 | 
 | 
|---|
| 47 | require "03-MainTableBeg.php3";
 | 
|---|
| 48 | require "04-ColumnOne.php3";
 | 
|---|
| 49 | 
 | 
|---|
| 50 | require "05-ColumnTwoHeader.php3";
 | 
|---|
| 51 | echo "Odin32 CVS: ", str_replace("\n", "<br>", $sTitle);
 | 
|---|
| 52 | require "06-ColumnTwoHeader2.php3";
 | 
|---|
| 53 | 
 | 
|---|
| 54 | 
 | 
|---|
| 55 | /*
 | 
|---|
| 56 |  *
 | 
|---|
| 57 |  */
 | 
|---|
| 58 | flush();
 | 
|---|
| 59 | 
 | 
|---|
| 60 | /*
 | 
|---|
| 61 |  * Do the requested operation...
 | 
|---|
| 62 |  */
 | 
|---|
| 63 | switch ($sOperation)
 | 
|---|
| 64 | {
 | 
|---|
| 65 | 
 | 
|---|
| 66 |     case "viewfileinfo":
 | 
|---|
| 67 |     {
 | 
|---|
| 68 |         $obj = new CVSFile($sFile, 0);
 | 
|---|
| 69 |         if ($obj && $obj->fOk)
 | 
|---|
| 70 |         {
 | 
|---|
| 71 |             if (!$obj->PrintAllInfo())
 | 
|---|
| 72 |             {
 | 
|---|
| 73 |                 echo "<p><i>PrintRevision failed.</i>";
 | 
|---|
| 74 |                 echo "<br><i>".$obj->sError."<br>";
 | 
|---|
| 75 |             }
 | 
|---|
| 76 |         }
 | 
|---|
| 77 |         else
 | 
|---|
| 78 |         { //error - complain
 | 
|---|
| 79 |             echo "<p><i>An error occured while creating file object for $sFile.</i>";
 | 
|---|
| 80 |             if ($obj)
 | 
|---|
| 81 |                 echo "<br><i>".$obj->sError."<br>";
 | 
|---|
| 82 |         }
 | 
|---|
| 83 |         break;
 | 
|---|
| 84 |     }
 | 
|---|
| 85 | 
 | 
|---|
| 86 |     case "viewfile":
 | 
|---|
| 87 |     {
 | 
|---|
| 88 |         $obj = new CVSFile($sFile, 0);
 | 
|---|
| 89 |         if ($obj && $obj->fOk)
 | 
|---|
| 90 |         {
 | 
|---|
| 91 |             if (!$obj->PrintRevision($sRevision))
 | 
|---|
| 92 |             {
 | 
|---|
| 93 |                 echo "<p><i>PrintRevision failed.</i>";
 | 
|---|
| 94 |                 echo "<br><i>".$obj->sError."<br>";
 | 
|---|
| 95 |             }
 | 
|---|
| 96 |         }
 | 
|---|
| 97 |         else
 | 
|---|
| 98 |         { //error - complain
 | 
|---|
| 99 |             echo "<p><i>An error occured while creating file object for $sFile.</i>";
 | 
|---|
| 100 |             if ($obj)
 | 
|---|
| 101 |                 echo "<br><i>".$obj->sError."<br>";
 | 
|---|
| 102 |         }
 | 
|---|
| 103 |         break;
 | 
|---|
| 104 |     }
 | 
|---|
| 105 | 
 | 
|---|
| 106 | 
 | 
|---|
| 107 |     case "viewdir":
 | 
|---|
| 108 |     {
 | 
|---|
| 109 |         ListDirectory($sDir, $iSortColumn);
 | 
|---|
| 110 |         break;
 | 
|---|
| 111 |     }
 | 
|---|
| 112 | 
 | 
|---|
| 113 |     default:
 | 
|---|
| 114 |         echo "IPE";
 | 
|---|
| 115 | }
 | 
|---|
| 116 | 
 | 
|---|
| 117 | 
 | 
|---|
| 118 | /*
 | 
|---|
| 119 |  * Finish off the column
 | 
|---|
| 120 |  */
 | 
|---|
| 121 | require "07-ColumnTwoFooter.php3";
 | 
|---|
| 122 | 
 | 
|---|
| 123 | if (1)
 | 
|---|
| 124 | {
 | 
|---|
| 125 |     require "08-News.php3";
 | 
|---|
| 126 |     /*
 | 
|---|
| 127 |     require "09-ContentsTitle.php3";
 | 
|---|
| 128 | 
 | 
|---|
| 129 |     TocBeg();
 | 
|---|
| 130 |     TocEnd();
 | 
|---|
| 131 | 
 | 
|---|
| 132 |     */
 | 
|---|
| 133 |     require "10-EndOfContent.php3";
 | 
|---|
| 134 |     require "11-NetlabsContact.php3";
 | 
|---|
| 135 | 
 | 
|---|
| 136 |     $Kada=date ("j M Y", filemtime(__file__));
 | 
|---|
| 137 |     require "12-OdinBanner.php3";
 | 
|---|
| 138 | }
 | 
|---|
| 139 | else
 | 
|---|
| 140 | {
 | 
|---|
| 141 |     echo "</td>\n</tr></table>\n";
 | 
|---|
| 142 |     echo "</td>\n</tr></table>\n";
 | 
|---|
| 143 | }
 | 
|---|
| 144 | require "13-Closing.php3";
 | 
|---|
| 145 | 
 | 
|---|
| 146 | 
 | 
|---|
| 147 | ?>
 | 
|---|