+function price_a()
+{
+ if (!($f=fopen("objednavka.js","r")))
+ fatal("Nepodaøilo se naèíst seznam dostupného zbo¾í");
+ $r=array();
+ while (($s=fgets($f,0x1000))) {
+ if (!($s=trim($s)))
+ break;
+ if (!(ereg("^want_price\\[ *'([^']*)'\\]=([0-9]*);$",$s,$matched)))
+ continue;
+ $r[$matched[1]]=$matched[2];
+ }
+ fclose($f);
+ return($r);
+}
+
+function title_name($year,$month)
+{
+ if (isset($year) && isset($month)) {
+ $month_a=month_a($year,$month);
+ return("Èíslo ".$month_a["name_full"]);
+ }
+ else if (isset($year))
+ return("Roèník $year");
+ else
+ return("V¹echny roèníky");
+}
+
+function title_month($year,$month)
+{
+ $month_a=month_a($year,$month);
+ return(""
+ ."<table border=\"0\" width=\"100%\">\n"
+ ."<tr><td align=\"center\"><table border=\"1\" cellpadding=\"10\">\n"
+ ."<tr><td align=\"center\">".img($month_a["img"],"titulní stránka ".$month_a["name"])."</td></tr>\n"
+ ."</table></td></tr>\n"
+ ."</table>\n"
+ );
+}
+
+function title_icons_table_month($year,$month,$month_last,$sequential)
+{
+ global $tb_clanek;
+
+ $month_a=month_a($year,$month,$month_last,$sequential);
+ print("<table border=\"0\">"
+ ."<tr><th align=\"center\">".$month_a["name"]."</th></tr>\n"
+ ."<tr><td align=\"center\" valign=\"top\">"
+ .img($month_a["icon"],"titulní stránka ".$month_a["name_full"])."</td></tr>\n"
+ ."<tr><td align=\"left\" valign=\"top\" class=\"nowrap\">\n"
+ ."• <a href=\"title.php?year=$year&month=$month\">titulní strana</a><br />\n"
+ ."• <a href=\"obsah.php?year=$year&month=$month\">obsah</a><br />\n");
+ $result=db_query("select name,id from $tb_clanek where year=$year and month=$month order by id");
+ while ($row=mysql_fetch_array($result))
+ print("• <a href=\"clanek.php?year=$year&month=$month&id=".$row["id"]."\">"
+ .htmlspecialchars($row["name"])."</a><br />\n");
+ mysql_free_result($result);
+ print("</td></tr></table>");
+}
+
+function title_icons($year,$month)
+{
+ global $tb_obsah;
+
+ print("<h2>"
+ .(isset($year) ? "<a id=\"year_$year\">" : "")
+ .title_name(&$year,&$month)
+ .(isset($year) ? "</a>" : "")
+ ."</h2>\n");
+
+ $result=db_query("select year,month,month_last,sequential from $tb_obsah"
+ .(isset($year) || isset($month) ? " where" : "")
+ .(isset($year ) ? " year=$year" : "")
+ .(isset($year) && isset($month) ? " and" : "")
+ .(isset($month) ? " month=$month" : "")
+ ." order by year,month");
+ $split=4;
+
+ // $year variable changes its meaning here!!!
+ if (isset($year))
+ $wanted_year=$year;
+ $year=0;
+
+ $fin_split="";
+ $fin_year="";
+ while ($row=mysql_fetch_array($result)) {
+ $row["month" ]--;
+ $row["month_last"]--;
+
+ if ($row["year"]!=$year) {
+ print($fin_split.$fin_year);
+
+ $year=$row["year"];
+ print(""
+ .(!isset($wanted_year) ? "<p><a id=\"year_$year\"> </a></p>" : "")
+ ."<table border=\"0\" width=\"100%\"><tr><td align=\"center\"><table border=\"1\" cellpadding=\"5\">\n"
+ ."<tr><th colspan=\"$split\">Roèník $year (<a href=\"obsah.php?year=$year\">obsahy èísel</a>)</th></tr>\n"
+ );
+ $fin_year="</table></td></tr></table>\n";
+ $fin_split="";
+ $month=-1;
+ $floor=-1;
+ }
+ while ($floor<floor($row["month"]/$split)) {
+ print($fin_split."<tr>");
+ $fin_split="</tr>\n";
+ $floor++;
+ $month=$floor*$split-1;
+ }
+ while ($month+1<$row["month"]) {
+ print("<td></td>");
+ $month++;
+ }
+ print("<td align=\"center\" valign=\"top\""
+ .($row["month_last"]!=$row["month"] ? " colspan=\"".($row["month_last"]+1-$row["month"])."\"" : "")
+ .">");
+ title_icons_table_month($year,$row["month"]+1,$row["month_last"]+1,$row["sequential"]);
+ print("</td>\n");
+ $month=$row["month_last"];
+ }
+ mysql_free_result($result);
+ print($fin_split.$fin_year);
+}
+
+function title($year,$month)
+{
+ if (isset($year) && isset($month))
+ return(title_month( $year, $month));
+ else
+ return(title_icons(&$year,&$month));
+}
+
+function image_supported($mime)
+{
+ global $HTTP_SERVER_VARS;
+
+ if (!isset($HTTP_SERVER_VARS["HTTP_ACCEPT"]))
+ return(false);
+ $exp=explode(",",$HTTP_SERVER_VARS["HTTP_ACCEPT"]);
+ while (($s=array_shift($exp))) {
+ $s=trim(ereg_replace(";.*","",$s));
+ if ($s==$mime)
+ return(true);
+ }
+ return(false);
+}
+
+// PHP dirname() is broken: ("/1/2/3"=>"/1/2", "/1"->"/")
+function dirnameslashed($filename)
+{
+ $r=dirname($filename);
+ if (substr($r,-1)!="/")
+ $r.="/";
+ return($r);
+}
+
+function usersize($size)
+{
+ $suffix_a=array("","k","M","G","T");
+ while ($size>=1000 && sizeof($suffix_a)>=2) {
+ $size/=1000;
+ array_shift($suffix_a);
+ }
+ return(round($size)." ".$suffix_a[0]."B");
+}
+
+function data_href($filename,$text,$details="")
+{
+ return("<a href=\"$filename\">$text (".usersize(filesize($filename))."$details)</a>");
+}
+
+function img_href($filename,$text)
+{
+ list($width,$height)=getimagesize($filename);
+ return(data_href($filename,$text,", ${width}x${height} bodù"));
+}
+
+function footer_img($url,$text,$size)
+{
+ global $footer_LOCAL;
+ if (!isset($footer_LOCAL))
+ return("<img src=\"$url\" $size alt=\"$text\" />");
+ else
+ return($text);
+}
+
+function footer($delimit=true)