Rev Author Line No. Line
718 Dawon 1 <?php
2 if ($HTTP_GET_VARS["lang"] == "en") {
3 $lang = "en";
4 } else {
5 $lang = "cs";
6 }
7 ?>
717 Dawon 8 <html>
663 Dawon 9 <head>
703 Dawon 10 <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
11 <title> MLAB moduly </title>
707 Dawon 12 <meta name="keywords" content="stavebnice MLAB univerzální moduly seznam přehled">
703 Dawon 13 <meta name="description" content="Projekt MLAB, moduly">
719 Dawon 14 <!-- AUTOINCLUDE START "Page/Head.<?php echo $lang; ?>.ihtml" DO NOT REMOVE -->
707 Dawon 15 <link rel="StyleSheet" href="../Web/CSS/MLAB.css" type="text/css" title="MLAB základní styl">
703 Dawon 16 <link rel="StyleSheet" href="../Web/CSS/MLAB_Print.css" type="text/css" media="print">
17 <link rel="shortcut icon" type="image/x-icon" href="../Web/PIC/MLAB.ico">
18 <script type="text/javascript" src="../Web/JS/MLAB_Menu.js"></script>
19 <!-- AUTOINCLUDE END -->
663 Dawon 20 </head>
720 Dawon 21 <body lang="<?php echo $lang; ?>">
663 Dawon 22  
718 Dawon 23 <!-- AUTOINCLUDE START "Page/Header.<?php echo $lang; ?>.ihtml" DO NOT REMOVE -->
704 Dawon 24 <!-- ============== HLAVICKA ============== -->
25 <div class="Header">
26 <script type="text/javascript">
27 <!--
28 SetRelativePath("../");
29 DrawHeader();
30 // -->
31 </script>
32 <noscript>
721 Dawon 33 <?php if ($lang == "cs") {?>
707 Dawon 34 <p><b> Pro zobrazení (vložení) hlavičky je potřeba JavaScript </b></p>
721 Dawon 35 <?php } else { ?>
36 <p><b> JavaScript is required for including of the header </b></p>
37 <?php } ?>
704 Dawon 38 </noscript>
39 </div>
40 <!-- AUTOINCLUDE END -->
683 Dawon 41  
718 Dawon 42 <!-- AUTOINCLUDE START "Page/Menu.<?php echo $lang; ?>.ihtml" DO NOT REMOVE -->
704 Dawon 43 <!-- ============== MENU ============== -->
44 <div class="Menu">
45 <script type="text/javascript">
46 <!--
47 SetRelativePath("../");
48 DrawMenu();
49 // -->
50 </script>
51 <noscript>
721 Dawon 52 <?php if ($lang == "cs") {?>
707 Dawon 53 <p><b> Pro zobrazení (vložení) menu je potřeba JavaScript </b></p>
721 Dawon 54 <?php } else { ?>
55 <p><b> JavaScript is required for including of the menu </b><p>
56 <?php } ?>
704 Dawon 57 </noscript>
58 </div>
59 <!-- AUTOINCLUDE END -->
60  
61  
62  
706 Dawon 63 <!-- ============== TEXT ============== -->
717 Dawon 64 <?php if ($lang == "en") { ?>
706 Dawon 65 <div class="Text">
66 <p class="Title">
717 Dawon 67 Overview of MLAB Modules
68 </p>
69 <p class=Subtitle>
70 You can find an overview of MLAB Modules here. It is automatically
71 generated page based on source database and the overview can be sorted
72 variously.
73 </p>
74  
75 <p class="Remark">
76 Automatic generation is not written yet.
77 </p>
78 <?php } else { ?>
79 <div class="Text">
80 <p class="Title">
707 Dawon 81 Přehled modulů MLAB
706 Dawon 82 </p>
83 <p class="Subtitle">
707 Dawon 84 Zde je k dispozici přehled existujících modulů stavebnice MLAB. Přehled
85 je generován automaticky a může být setříděn různým způsobem.
706 Dawon 86 </p>
87  
88 <p class="Remark">
707 Dawon 89 Automatické generování přehledů ještě nemáme rozfungované, proto jsou
90 zde zatím jen statické odkazy.
706 Dawon 91 </p>
663 Dawon 92 <?php
717 Dawon 93 }
663 Dawon 94 /* KONFIGURACE */
665 Dawon 95 $path = '/var/www/Web';
664 Dawon 96 $www = 'http://www.mlab.cz';
666 Dawon 97 $folder = '/../Modules';
747 Dawon 98 /*$img = 'preview.jpg';*/
99 $info = 'ProjectInfo.xml';
749 Dawon 100 $info1 = "info.".$lang.".txt";
663 Dawon 101  
102 /* KONEC KONFIGURACE */
103  
104  
105  
733 Dawon 106 echo "<table>\n";
739 Dawon 107  
108 if ($lang == "en") {
743 Dawon 109 echo "<tr><td>Preview</td><td>Name</td><td>PDF</td><td>XML</td><td>WebSVN</td><td>Info</td></tr>\n";
739 Dawon 110 } else {
743 Dawon 111 echo "<tr><td>Náhled</td><td>Název</td><td>PDF</td><td>XML</td><td>WebSVN</td><td>Info</td></tr>\n";
739 Dawon 112 }
663 Dawon 113  
114 $adresar = opendir($path.$folder);
115 while ($soubor = readdir($adresar)){
671 Dawon 116 if ((Is_Dir($path.$folder."/".$soubor)) && (substr($soubor,0,1) <> ".") && (substr($soubor,0,1) <> "!")) {
677 Dawon 117 $img = $soubor."_Small.jpg";
733 Dawon 118  
677 Dawon 119 if (file_exists($path.$folder."/".$soubor."/CAM_AMA")) {
732 Dawon 120 echo "<tr>";
740 Dawon 121 if (file_exists($path.$folder.'/'.$soubor."/".$img)) { echo "<td><img src=\"".$www.$folder.'/'.$soubor."/".$img."\" width=\"100\"></td>\n"; }
122 else { echo "<td><img src=\"http://www.mlab.cz/Web/PIC/nopicture2.jpg\" width=\"100\"></td>\n"; }
732 Dawon 123 if (file_exists($path.$folder."/".$soubor."/DOC/HTML/".$soubor.".".$lang.".html")) {
737 Dawon 124 echo "<td><b><a href=\"".$www.$folder."/".$soubor."/DOC/HTML/".$soubor.".".$lang.".html\">".$soubor."</a></b></td>\n";
125 } else { echo "<td><b>".$soubor."</b></td>\n"; }
732 Dawon 126 if (file_exists($path.$folder."/".$soubor."/".$soubor1."/DOC/".$soubor1.".".$lang.".pdf")) {
127 echo "\n<td><a href=\"".$www.$folder."/".$soubor."/DOC/".$soubor.".".$lang.".pdf\">PDF</a></td>\n";
738 Dawon 128 } else { echo "\n<td>-</td>\n"; }
677 Dawon 129 if (file_exists($path.$folder.'/'.$soubor."/".$info)) {
747 Dawon 130 echo "<td><A HREF=".$www.$folder.'/'.$soubor."/".$info.">XML</A></td>\n";
738 Dawon 131 } else { echo "\n<td>-</td>\n"; }
732 Dawon 132 echo "<td><a href=\"http://www.mlab.cz/WebSVN/listing.php?repname=MLAB&amp;path=/Modules/".$soubor."/\">WebSVN</a></td>\n";
747 Dawon 133 if (file_exists($path.$folder.'/'.$soubor."/".$info1)) {
753 Dawon 134 $fp = FOpen ($path.$folder.'/'.$soubor."/".$info1, "r");
135 $data = FRead ($fp, FileSize ($path.$folder.'/'.$soubor."/".$info1));
136 FClose ($fp);
137 echo "<td>".wordwrap($data, 25, "<br>")."</td>\n";
747 Dawon 138 } else { echo "\n<td><i>No description available!!</i></td>\n"; }
732 Dawon 139 echo "</tr>\n\n";
743 Dawon 140  
141  
677 Dawon 142 } else {
743 Dawon 143  
144  
732 Dawon 145 echo "<tr>\n";
677 Dawon 146 $adresar1 = opendir($path.$folder."/".$soubor);
147 while ($soubor1 = readdir($adresar1)){
148 if ((Is_Dir($path.$folder."/".$soubor."/".$soubor1)) && (substr($soubor1,0,1) <> ".") && (substr($soubor1,0,1) <> "!")) {
149 $img = $soubor1."_Small.jpg";
663 Dawon 150  
687 Dawon 151  
734 Dawon 152  
677 Dawon 153 if (file_exists($path.$folder.'/'.$soubor."/".$soubor1."/".$img)) {
741 Dawon 154 echo "<td><img src=\"".$www.$folder.'/'.$soubor."/".$soubor1."/".$img."\" width=\"100\"></td>\n";
740 Dawon 155 } else { echo "<td><img src=\"http://www.mlab.cz/Web/PIC/nopicture2.jpg\" width=\"100\"></td>\n"; }
728 Dawon 156  
724 Dawon 157 if (file_exists($path.$folder."/".$soubor."/".$soubor1."/DOC/HTML/".$soubor1.".".$lang.".html")) {
737 Dawon 158 echo "<td><a href=\"".$www.$folder."/".$soubor."/".$soubor1."/DOC/HTML/".$soubor1.".".$lang.".html\">".$soubor."/<b>".$soubor1."</b></a></td>\n";
159 } else { echo "<td>".$soubor."/<b>".$soubor1."</b></td>\n"; }
728 Dawon 160 if (file_exists($path.$folder."/".$soubor."/".$soubor1."/DOC/".$soubor1.".".$lang.".pdf")) {
732 Dawon 161 echo "<td><a href=\"".$www.$folder."/".$soubor."/".$soubor1."/DOC/".$soubor1.".".$lang.".pdf\">PDF</a></td>\n";
738 Dawon 162 } else { echo "\n<td>-</td>\n"; }
677 Dawon 163 if (file_exists($path.$folder.'/'.$soubor."/".$soubor1."/".$info)) {
732 Dawon 164 echo "<td><a href=".$www.$folder.'/'.$soubor."/".$soubor1."/".$info.">XML</a></td>\n";
738 Dawon 165 } else { echo "<td>-</td>\n"; }
732 Dawon 166 echo "<td><a href=\"http://www.mlab.cz/WebSVN/listing.php?repname=MLAB&amp;path=/Modules/".$soubor."/".$soubor1."/\">WebSVN</a></td>\n";
747 Dawon 167 if (file_exists($path.$folder.'/'.$soubor."/".$soubor1."/".$info1)) {
753 Dawon 168 $fp = FOpen ($path.$folder.'/'.$soubor."/".$soubor1."/".$info1, "r");
169 $data = FRead ($fp, FileSize ($path.$folder.'/'.$soubor."/".$soubor1."/".$info1));
170 FClose ($fp);
171 echo "<td>".wordwrap($data, 25, "<br>")."</td>\n";
747 Dawon 172 } else { echo "\n<td><i>No description available!!</i></td>\n"; }
732 Dawon 173 echo "</tr>\n\n";
677 Dawon 174 }
175 }
176 }
663 Dawon 177 }
178 }
179 ?>
732 Dawon 180 </table>
709 Dawon 181 </div>
663 Dawon 182  
719 Dawon 183 <!-- AUTOINCLUDE START "Page/Footer.<?php echo $lang; ?>.ihtml" DO NOT REMOVE -->
707 Dawon 184 <!-- ============== PATIČKA ============== -->
704 Dawon 185 <div class="Footer">
186 <script type="text/javascript">
187 <!--
188 SetRelativePath("../");
189 DrawFooter();
190 // -->
191 </script>
192 <noscript>
721 Dawon 193 <?php if ($lang == "cs") {?>
194 <p><b> Pro zobrazení (vložení) zápatí je potřeba JavaScript </b></p>
195 <?php } else { ?>
196 <p><b> JavaScript is required for including of the footer </b></p>
197 <?php } ?>
704 Dawon 198 </noscript>
199 </div>
200 <!-- AUTOINCLUDE END -->
201  
202  
203  
663 Dawon 204 </body>
205 </html>