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