Rev Author Line No. Line
45 kakl 1 // History:
300 kaklik 2 // Oprava parametrů obrázku v hlavičce, oprava odkazu na stránku údržby
147 miho 3 // Doplněna detekce jazyka dokumentu (ve značce body)
4 // Předěláno na jinou strukturu adresářů, doplněno poukování odkazů
5 // Oprava regulárního výrazu tak, aby nekazil odkaz Nahoru v patičce
6 // Změna kódování na UTF-8
311 miho 7 // Doplněno automatické generování obsahu
434 miho 8 // Doplněno generování značky <a id="_Up"> pro odkaz Up v patičce
439 miho 9 // Doplněn skript pro sledování návštěvnosti stránek
532 miho 10 // Korekce zobrazení data modifikace stránky pro český jazyk
537 miho 11 // Doplněn do patičky odkaz na HTML validator + změna na přímý odkaz
614 miho 12 // Zrušeno Forum a zavedeno FAQ
45 kakl 13  
147 miho 14 var RelPath=""; // Proměnná pro uložení relativní cesty k rootu webu
15 // Všechny cesty v tomto skriptu pak mají být cestami od
16 // rootu webu (například Web/PIC/MLAB.ico)
45 kakl 17  
18 function Test()
147 miho 19 // Testovací funkce pro ladění
45 kakl 20 {
21 with (document)
22 {
23 var Info;
24 // Test
147 miho 25 // Užitečné: document.URL (cesta a jméno souboru stránky)
45 kakl 26 write('<p class="MenuText Small">');
27 write('document language '+DocLang());
28 write('</p>');
29 write('<p class="MenuText Small">');
30 write('document language '+navigator.appVersion);
31 write('</p>');
32 write('<p class="MenuText Small">');
33 write('document language '+document.body.lang);
34 write('</p>');
35 write('<p class="MenuText Small">');
36 write('navigator language '+navigator.language); // FF ano, IE6 ne
37 write('</p>');
38 }
39 }
40  
41  
42 function DocLang()
147 miho 43 // Vrací zkratku jazyka stránky ( cs en )
44 // Není-li v dokumentu uvedená vrací en
45 kakl 45 {
46 var s;
47 s=document.body.lang.toLowerCase();
147 miho 48 if(s=="cs") return "cs"; // To by mě zajímalo proč je čeština cs a ne cz
49 if(s=="sk") return "cs"; // Pro slováky bude asi čeština vhodnější
50 return "en"; // Pro všechny ostatní dáme angličtinu
45 kakl 51 }
52  
53  
54 function SetRelativePath(Path)
147 miho 55 // Nastaví relativní část cesty tak, abychom se dostali k rootu webu
56 // Například pro stránky v adresáři "Web" je tento parametr "../"
45 kakl 57 {
147 miho 58 // Zapamatuji si relativní cestu
45 kakl 59 RelPath=Path;
147 miho 60 // Případně doplním na konec lomítko
45 kakl 61 if (RelPath.length!=0)
62 if (RelPath.charAt(RelPath.length-1)!='/')
63 RelPath+='/';
64 }
65  
66  
67 function PokeRelativePath(Content)
147 miho 68 // Vezme řetězec a doplní v něm všechny odkazy o relativní část cesty
45 kakl 69 {
54 miho 70 Content=(Content.replace(/(\s+href=[\"\'])([^#])/ig,'$1'+RelPath+'$2'));
71 Content=(Content.replace(/(\s+src=[\"\'])([^#])/ig,'$1'+RelPath+'$2'));
45 kakl 72 return Content;
73 }
74  
75  
76 function DrawHeader(MoreInfo)
77 // Nepovinny parametr udava nadpis stranky
78 // Neni-li uveden bere se text ze znacky title dokumentu
79 {
147 miho 80 // Proměnná pro vznikající vkládaný obsah
45 kakl 81 var Content="";
82 // Default informace pokud je parametr nezadany
83 if(MoreInfo==undefined) MoreInfo=document.title;
84 // Vlozeni HTML kodu
85 Content+='<div class="InnerHeader"> ';
86 if (DocLang()=="cs")
147 miho 87 { // český text
209 miho 88 Content+='<a href="index.cs.html" title="Domů"><span class="HeaderLogo">MLAB</span><img src="Web/PIC/MLAB_online.gif" alt="MLAB Logo"></a>';
45 kakl 89 }
90 else
91 { // English text
209 miho 92 Content+='<a href="index.en.html" title="Home"><span class="HeaderLogo">MLAB</span><img src="Web/PIC/MLAB_online.gif" alt="MLAB Logo"></a>';
45 kakl 93 }
94 Content+='<span class="HeaderText">'+MoreInfo+'</span>';
95 Content+='</div> ';
96 // Korekce cest v odkazech
97 Content=PokeRelativePath(Content);
147 miho 98 // Výstup sestaveného textu
45 kakl 99 document.write(Content);
100 }
101  
102  
103 function DrawMenu(MoreInfo)
104 // Nepovinny parametr udava nazev menu
105 // Neni-li uveden dava se text Menu
435 miho 106 //// Zvýrazněný text má navíc class="Selected", zatím se nepoužívá
45 kakl 107 {
147 miho 108 // Proměnná pro vznikající vkládaný obsah
45 kakl 109 var Content="";
110 // Default text
111 if(MoreInfo==undefined) MoreInfo="Menu";
112 // Vlastni menu
113 Content+='<div class="InnerMenu">';
114 Content+=' <div class="Navigation">';
115 Content+=' <div class="MenuText">';
116 Content+= MoreInfo;
117 Content+=' </div>';
118 if (DocLang()=="cs")
147 miho 119 { // český text
334 miho 120 // POZOR: Při změně nutno zkontrolovat soubor index.cs.html
45 kakl 121 Content+='<ul>';
147 miho 122 Content+=' <li> <a href="index.cs.html" title="Domů">Home</a> </li>';
195 miho 123 Content+=' <li> <a href="Web/Articles.cs.html" title="Články, informace">Články</a> </li>';
147 miho 124 Content+=' <li> <a href="Web/Modules.cs.html" title="Jednotlivé moduly MLAB">Moduly</a> </li>';
195 miho 125 Content+=' <li> <a href="Web/Designs.cs.html" title="Samostatné konstrukce">Konstrukce</a> </li>';
117 miho 126 Content+=' <li> <a href="Web/News.cs.html" title="Novinky">Novinky</a> </li>';
614 miho 127 Content+=' <li> <a href="Web/FAQ.cs.html" title="Nejčastější dotazy">FAQ</a> </li>';
353 kaklik 128 Content+=' <li> <a href= "http://www.mlab.cz/photogallery/" title="Galerie fotografií">Fotogalerie</a> </li>';
437 miho 129 Content+=' <li> <a href="Web/Downloads.cs.html" title="Ke stažení">Downloads</a> </li>';
336 miho 130 Content+=' <li> <a href= "http://www.mlab.cz/WebSVN/listing.php?repname=MLAB&amp;path=%2F&amp;sc=0&amp;langchoice=Česky" title="Webový přístup do databáze SVN">WebSVN</a> </li>';
209 miho 131 Content+=' <li> <a href="Web/Maintenance.cs.html" title="Stránka údržby webu">Údržba</a> </li>';
71 miho 132 Content+=' <li> <a href="Web/About.cs.html" title="O webu, stavebnici MLAB atd.">O projektu</a> </li>';
45 kakl 133 Content+='</ul>';
134 }
135 else
136 { // English text
334 miho 137 // POZOR: Při změně nutno zkontrolovat soubor index.en.html
45 kakl 138 Content+='<ul>';
117 miho 139 Content+=' <li> <a href="index.en.html" title="Home">Home</a> </li>';
195 miho 140 Content+=' <li> <a href="Web/Articles.en.html" title="Articles and other Texts">Articles</a></i>';
71 miho 141 Content+=' <li> <a href="Web/Modules.en.html" title="Individual MLAB Modules">Modules</a> </li>';
195 miho 142 Content+=' <li> <a href="Web/Designs.en.html" title="Independed Designs">Designs</a> </li>';
117 miho 143 Content+=' <li> <a href="Web/News.en.html" title="News">News</a> </li>';
614 miho 144 Content+=' <li> <a href="Web/FAQ.en.html" title="Frequently Asked Questions">FAQ</a> </li>';
353 kaklik 145 Content+=' <li> <a href= "http://www.mlab.cz/photogallery/" title="Photo Gallery">Photogallery</a> </li>';
87 kaklik 146 Content+=' <li> <a href="Web/Downloads.en.html" title="For download">Downloads</a> </li>';
336 miho 147 Content+=' <li> <a href= "http://www.mlab.cz/WebSVN/listing.php?repname=MLAB&amp;path=%2F&amp;sc=0&amp;langchoice=English" title="Web interface to SVN database">WebSVN</a> </li>';
209 miho 148 Content+=' <li> <a href="Web/Maintenance.en.html" title="Maintenance page">Maintenance</a> </li>';
71 miho 149 Content+=' <li> <a href="Web/About.en.html" title="About Project">About</a> </li>';
45 kakl 150 Content+='</ul>';
151 }
152 Content+=' </div>';
153 Content+='</div> ';
154 // Korekce cest v odkazech
155 Content=PokeRelativePath(Content);
147 miho 156 // Výstup sestaveného textu
45 kakl 157 document.write(Content);
433 miho 158 }
430 kaklik 159  
433 miho 160  
45 kakl 161 function DrawFooter(MoreInfo)
162 // Nepovinny parametr pro text do paticky
163 {
147 miho 164 // Proměnná pro vznikající vkládaný obsah
45 kakl 165 var Content="";
532 miho 166 var Time="";
45 kakl 167 // Default text je prazdny
168 if(MoreInfo==undefined) MoreInfo="";
169 // Vlozeni HTML kodu
170 Content+='<div class="InnerFooter">';
147 miho 171 Content+='&nbsp;'; // ústupek IE6 (chyba výpočtu šířky při nenulovém paddingu )
45 kakl 172 if (DocLang()=="cs")
147 miho 173 { // český text
434 miho 174 Content+='<a href="#_Up" class="NoPrint">Nahoru</a> &nbsp; ';
45 kakl 175 Content+='<a href="Web/Copyright.cs.html">Copyright</a> &copy; ';
147 miho 176 Content+='<a href="Web/AboutAuthors.cs.html">Autoři MLAB</a> &nbsp; ';
45 kakl 177 }
178 else
179 { // English text
434 miho 180 Content+='<a href="#_Up" class="NoPrint">Up</a> &nbsp; ';
45 kakl 181 Content+='<a href="Web/Copyright.en.html">Copyright</a> &copy; ';
182 Content+='<a href="Web/AboutAuthors.en.html">MLAB Authors</a> &nbsp; ';
183 }
532 miho 184 if (document.location.hostname!='')
185 {
535 miho 186 Content+='<a href= "http://validator.w3.org/check?uri='
187 +document.location.href
537 miho 188 +'">HTML Validator</a> &nbsp; ';
532 miho 189 }
610 miho 190 /*else
191 {
192 Content+='<a href= "http://validator.w3.org/check?fragment='
193 +''
194 +'">HTML Validator</a> &nbsp; ';
195 }*/
532 miho 196 Time=document.lastModified;
197 if (DocLang()=="cs")
610 miho 198 { // Převeď anglické datum na české
532 miho 199 Time=(Time.replace(/(.+)\/(.+)\/(.+)/i,'$2.$1.$3'));
200 }
201 Content+='['+Time+'] &nbsp;&nbsp;&nbsp;';
45 kakl 202 Content+=MoreInfo;
203 Content+='</div>';
204 // Korekce cest v odkazech
205 Content=PokeRelativePath(Content);
147 miho 206 // Výstup sestaveného textu
45 kakl 207 document.write(Content);
208 }
311 miho 209  
210  
437 miho 211 // Vlozeni cesty u vypisu adresaru
212 function DrawDirectory()
213 {
438 miho 214 document.write(decodeURI(location.pathname));
437 miho 215 }
216  
217  
311 miho 218 //=============================================
219 // Automatické generování obsahu
220 //
221 // Ke každé značce s class="PutTocHere x" vygeneruje obsah
222 // s hloubkou x nadpisů (defaultně 2 úrovně)
223  
224  
225 function tocGetText(obj)
226 // Vrať řetězec s obsahem elementu
227 {
228 var str=""
229 for (var i=0;i < obj.childNodes.length;i++)
230 {
231 if (obj.childNodes[i].nodeType==1) // ELEMENT_NODE
232 str += tocGetText(obj.childNodes[i])
233 else if (obj.childNodes[i].nodeType==3) // TEXT_NODE
234 str += obj.childNodes[i].data
235 }
236 return str
237 }
238  
239 var tocGlobalContext=0 // pro unikátní kotvy ve značce <a>
240  
241 function tocHeaders(el,obj,depth)
242 // Proleze hierarchickou strukturu a najde vsechny nadpisy
243 // do zadané úrovně včetně.
244 {
245 var tagList = "H1;H2;H3;H4;H5;H6;H7;"
246 if (tagList.indexOf(obj.tagName+";")>=0) // je to nadpis
247 if (obj.tagName.charAt(1)<=depth) // úroveň nadpisu
248 {
249 // Vytvoř položku seznamu
250 var eLI = document.createElement("li") // položka seznamu
251 var eA = document.createElement("a") // uvnitř link
252 var eLIText = document.createTextNode(tocGetText(obj)) // uvnitř text
253 eLI.className="Toc" + obj.tagName // úroveň nadpisu do class
254 eA.href="#_Toc_"+tocGlobalContext // cíl odkazu
255 eA.appendChild(eLIText) // vlož text do odkazu
256 eLI.appendChild(eA) // vlož odkaz do položky seznamu
257 el.appendChild(eLI) // vlož položku seznamu do seznamu
258  
259 // Přidej k nadpisu kotvu (znackou <a>)
260 var anchor=document.createElement("a")
261 anchor.id="_Toc_"+tocGlobalContext++ // unikátní jména kotev
262 obj.appendChild(anchor) // přidej kotvu k nadpisu
263 }
264 for (var i=0;i < obj.childNodes.length;i++) // rekurze
265 if (obj.childNodes[i].nodeType==1)
266 tocHeaders(el,obj.childNodes[i],depth)
267 }
268  
269  
270 function tocPutToc(objToc)
271 // Rekurzivně projdi strom dokumentu a na všechna místa kam patří
272 // vlož seznam. Místo je ozačeno značkou s id="PutTocHere".
273 // Volitelně může být uveden parametr Class="x", kde x udává hloubku
274 // zpracovávaných nadpisů.
275 {
276 var cl=objToc.className.split(" ") // vezmi class a rozděl ho na slova
277 if (cl[0].toUpperCase()=="PutTocHere".toUpperCase())
278 {
279 var depth=2 // default hodnota hloubky
280 for (var i=1;i<cl.length;i++)
281 {
282 if (cl[i]!="") // preskoč prázdné položky (IE6)
283 {
284 depth=cl[i] // byla zadána i druhá hodnota
285 break
286 }
287 }
288  
289 var toc = document.createElement("ul") // Toc je nečíslovaný seznam
290 toc.className="Toc" // s Class="Toc"
291  
292 var objHx = document.getElementsByTagName("body")[0] // Odtud začínáme
293 tocHeaders(toc,objHx,depth) // projdi všechny nadpisy
294 objToc.appendChild(toc) // přidej Toc jako jeho dítě
295 }
296 // Rekurzivní procházení dětí
297 for (var i=0;i < objToc.childNodes.length;i++)
298 if (objToc.childNodes[i].nodeType==1) // ELEMENT_NODE
299 (tocPutToc(objToc.childNodes[i]))
300 }
301  
302  
433 miho 303 function putUp()
304 // Funkce najde první div class="Text" a umístí do něj kotvu
305 // Slouží pro klikací odkaz v patičce pro skok na začátek stránky
306 {
434 miho 307 var objDiv = document.getElementsByTagName("body")[0] // první body
308 var objDiv=objDiv.getElementsByTagName("div") // v něm všechny div
309 for (var i=0;i < objDiv.length; i++) // celé projdi
433 miho 310 {
434 miho 311 // Test zda je to div.class="Text"
312 if((" "+objDiv[i].className+" ").toUpperCase().indexOf(" TEXT ")>=0)
433 miho 313 {
434 miho 314 // Vyrob nový element kotvy (značka <a name="Up">)
315 var eA=document.createElement("a")
316 //eA.name="Up" // nefunguje v IE
317 eA.id="_Up" // unikátní Id kotvy
318 // Kontrolní výpis
319 //var ePText=document.createTextNode("Anchor " + String(i) + " " + objDiv[i].className)
320 //eA.appendChild(ePText)
321 // Vlož nový element na začátek
322 if (objDiv[i].childNodes.length>0)
323 objDiv[i].insertBefore(eA,objDiv[i].childNodes[0]) // před první dítě
324 else
325 objDiv[i].appendChild(eA) // žádné dítě nebylo
326 // Hotovo
433 miho 327 break
328 }
434 miho 329 // Kontrolní výpis
330 //var eP=document.createElement("p")
331 //var ePText=document.createTextNode("Div " + String(i) + " " + objDiv[i].className)
332 //eP.appendChild(ePText)
333 //objDiv[0].appendChild(eP)
433 miho 334 }
335 }
336  
337  
439 miho 338 //=============================================
339 // Skript pro sbírání statistiky návštěvnosti stránek
340 //
341 // http://www.phpmyvisites.net/
342 // License GNU/GPL (http://www.gnu.org/copyleft/gpl.html)
343 function pmv_log(pmv_site, pmv_url, pmv_pname, pmv_vars)
344 {
345 function plugMoz(pmv_pl) {
346 if (pmv_tm.indexOf(pmv_pl) != -1 && (navigator.mimeTypes[pmv_pl].enabledPlugin != null))
347 return '1';
348 return '0';
349 }
350 function plugIE(pmv_plug){
351 pmv_find = false;
352 document.write('<SCR' + 'IPT LANGUAGE=VBScript>\n on error resume next \n pmv_find = IsObject(CreateObject("' + pmv_plug + '"))</SCR' + 'IPT>\n');
353 if (pmv_find) return '1';
354 return '0';
355 }
356 var pmv_jav='0'; if(navigator.javaEnabled()) pmv_jav='1';
357 var pmv_agent = navigator.userAgent.toLowerCase();
358 var pmv_moz = (navigator.appName.indexOf("Netscape") != -1);
359 var pmv_ie= (pmv_agent.indexOf("msie") != -1);
360 var pmv_win = ((pmv_agent.indexOf("win") != -1) || (pmv_agent.indexOf("32bit") != -1));
361  
362 if (!pmv_win || pmv_moz){
363 pmv_tm = '';
364 for (var i=0; i < navigator.mimeTypes.length; i++)
365 pmv_tm += navigator.mimeTypes[i].type.toLowerCase();
366 var pmv_dir = plugMoz("application/x-director");
367 var pmv_fla = plugMoz("application/x-shockwave-flash");
368 var pmv_pdf = plugMoz("application/pdf");
369 var pmv_qt = plugMoz("video/quicktime");
370 var pmv_rea = plugMoz("audio/x-pn-realaudio-plugin");
371 var pmv_wma = plugMoz("application/x-mplayer2");
372 } else if (pmv_win && pmv_ie){
373 var pmv_dir = plugIE("SWCtl.SWCtl.1");
374 var pmv_fla = plugIE("ShockwaveFlash.ShockwaveFlash.1");
375 var pmv_pdf = '0';
376 if (plugIE("PDF.PdfCtrl.1") == '1' || plugIE('PDF.PdfCtrl.5') == '1' || plugIE('PDF.PdfCtrl.6') == '1')
377 pmv_pdf = '1';
378 var pmv_qt = plugIE("QuickTimeCheckObject.QuickTimeCheck.1");
379 var pmv_rea = plugIE("rmocx.RealPlayer G2 Control.1");
380 var pmv_wma = plugIE("MediaPlayer.MediaPlayer.1");
381 }
382  
383 var getvars='';
384 for (var i in pmv_vars){
385 if (!Array.prototype[i]){
386 getvars = getvars + '&a_vars['+ escape(i) + ']' + "=" + escape(pmv_vars[i]);
387 }
388 }
389 pmv_do = document; pmv_da = new Date();
390 try {rtu = top.pmv_do.referrer;} catch(e) {
391 try {rtu = pmv_do.referrer;} catch(E) {rtu = '';}
392 }
393  
394 src = pmv_url;
395 src += '?url='+escape(pmv_do.location)+'&pagename='+escape(pmv_pname)+getvars;
396 src += '&id='+pmv_site+'&res='+screen.width+'x'+screen.height+'&col='+screen.colorDepth;
397 src += '&h='+pmv_da.getHours()+'&m='+pmv_da.getMinutes()+'&s='+pmv_da.getSeconds();
398 src += '&flash='+pmv_fla+'&director='+pmv_dir+'&quicktime='+pmv_qt+'&realplayer='+pmv_rea;
399 src += '&pdf='+pmv_pdf+'&windowsmedia='+pmv_wma+'&java='+pmv_jav+'&ref='+escape(rtu);
400  
442 miho 401 // Do již načteného dokumentu se nesmí zapisovat (vznikla by nová stránka)
402 //pmv_do.writeln('<img src="'+src+'" alt="phpMyVisites" style="border:0" />');
403 // Místo toho přednačteme obrázek
404 var dummy_picture=new Image();
405 dummy_picture.src=src;
439 miho 406 }
407  
408  
311 miho 409 function doLoad()
410 // Tato funkce se spustí při načtení celé stránky.
411 {
412 // Najdi všechna místa pro seznam
413 var objToc = document.getElementsByTagName("body")[0] // Odtud začínáme
414 tocPutToc(objToc)
433 miho 415 // Najdi horní konec stránky a umísti tam značku
434 miho 416 putUp()
439 miho 417 // Volání zpracování návštěvnosti
418 var a_vars = Array();
419 var pagename='';
420 var phpmyvisitesSite = 1;
421 var phpmyvisitesURL = "http://www.mlab.cz/phpmyvisites/phpmyvisites.php";
444 miho 422 //if (location.hostname != "") // jen při přístupu na server
423 //{
424 // pmv_log(phpmyvisitesSite, phpmyvisitesURL, pagename, a_vars);
425 //}
311 miho 426 }
427  
428  
429 // Zaregistruj výkonný skript po načtení celé stránky
430 window.onload = doLoad