Subversion Repositories – MLAB

(root)/Web/modules.inc.php @ 875

Rev 758

<?php
      echo "<tr>\n";
      $adresar1 = opendir($path.$folder."/".$HTTP_GET_VARS["file"]);
      while ($soubor1 = readdir($adresar1)){
        if ((Is_Dir($path.$folder."/".$HTTP_GET_VARS["file"]."/".$soubor1)) && (substr($soubor1,0,1) <> ".") && (substr($soubor1,0,1) <> "!")) {
          $img = $soubor1."_Small.jpg";



          if (file_exists($path.$folder.'/'.$HTTP_GET_VARS["file"]."/".$soubor1."/".$img)) {
            echo "<td><img src=\"".$www.$folder.'/'.$HTTP_GET_VARS["file"]."/".$soubor1."/".$img."\"></td>\n";
          } else { echo "<td><img src=\"http://www.mlab.cz/Web/PIC/nopicture2.jpg\"></td>\n"; }

          if (file_exists($path.$folder."/".$HTTP_GET_VARS["file"]."/".$soubor1."/DOC/HTML/".$soubor1.".".$lang.".html")) {
            echo "<td><a href=\"".$www.$folder."/".$HTTP_GET_VARS["file"]."/".$soubor1."/DOC/HTML/".$soubor1.".".$lang.".html\">".$soubor1."</a></td>\n";
          } else { echo "<td>".$soubor."/<b>".$soubor1."</b></td>\n"; }
          if (file_exists($path.$folder."/".$HTTP_GET_VARS["file"]."/".$soubor1."/DOC/".$soubor1.".".$lang.".pdf")) {
            echo "<td><a href=\"".$www.$folder."/".$HTTP_GET_VARS["file"]."/".$soubor1."/DOC/".$soubor1.".".$lang.".pdf\">PDF</a></td>\n";
          } else { echo "\n<td>-</td>\n"; }
//          if (file_exists($path.$folder.'/'.$soubor."/".$soubor1."/".$info)) {
//            echo "<td><a href=".$www.$folder.'/'.$soubor."/".$soubor1."/".$info.">XML</a></td>\n";
//          } else { echo "<td>-</td>\n"; }
          echo "<td><a href=\"http://www.mlab.cz/WebSVN/listing.php?repname=MLAB&amp;path=/Modules/".$HTTP_GET_VARS["file"]."/".$soubor1."/\">WebSVN</a></td>\n";
          if (file_exists($path.$folder.'/'.$HTTP_GET_VARS["file"]."/".$soubor1."/".$info1)) {
            $fp = FOpen ($path.$folder.'/'.$HTTP_GET_VARS["file"]."/".$soubor1."/".$info1, "r");
            $data = FRead ($fp, FileSize ($path.$folder.'/'.$HTTP_GET_VARS["file"]."/".$soubor1."/".$info1));
            FClose ($fp);
            echo "<td>".wordwrap($data, 50, "<br>")."</td>\n";
          } else { echo "\n<td><i>No description available!!</i></td>\n"; }
          echo "</tr>\n\n";
        }
      }

?>