| 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 | ?> | 
|---|