X-Git-Url: http://git.jankratochvil.net/?a=blobdiff_plain;f=common.php;h=69ffa306aaf97c4efeb8b27ecabbe97066fe18ce;hb=be48830f81f1c8c233cdde70ea1c53fa3aa388a5;hp=f0fd2c9bad71ac1b5342511616999d493934ac09;hpb=e3d161cb8ff2459746555bb546b7733ab25d8479;p=www.energie.vellum.cz.git

diff --git a/common.php b/common.php
index f0fd2c9..69ffa30 100644
--- a/common.php
+++ b/common.php
@@ -1,6 +1,7 @@
 <?php // $Id$
 
 	error_reporting(E_ALL);
+	setlocale(LC_ALL,"cs_CZ.iso-8859-2");
 
 	include("config.php");
 
@@ -10,7 +11,7 @@
 	$cvs_id_split=split(" ",$cvs_id);
 	if (count($cvs_id_split)==8) {
 		$cvs_id_split[1]="<a href=\"$viewcvs\">".$cvs_id_split[1]."</a>";
-		$cvs_id_split[5]="<a href=\"mailto:".$cvs_id_split[5]."@".$HTTP_SERVER_VARS["HTTP_HOST"]."\">".$cvs_id_split[5]."</a>";
+		$cvs_id_split[5]="<a href=\"mailto:".$cvs_id_split[5]."@$cvs_mailhost\">".$cvs_id_split[5]."</a>";
 		}
 	$cvs_id_html=join(" ",$cvs_id_split);
 
@@ -19,13 +20,13 @@
 	if (isset($detect_js) && !$have_js)
 		$head.='<script type="text/javascript" src="have_js.js"></script>'."\n";
 
-	$user_agent=$HTTP_SERVER_VARS["HTTP_USER_AGENT"];
+	$user_agent=(!isset($HTTP_SERVER_VARS["HTTP_USER_AGENT"]) ? "" : $HTTP_SERVER_VARS["HTTP_USER_AGENT"]);
 	if (ereg("[[:<:]]MSIE ([0-9]+)\\.",$user_agent,$msie_major_a))
 		$msie_major=$msie_major_a[1];
 	else if (ereg("[[:<:]]Mozilla/([0-9]+)\\.",$user_agent,$mozilla_major_a))
 		$mozilla_major=$mozilla_major_a[1];
 
-	$have_style=!ereg("Mozilla/4\\.[5-7]",$user_agent);
+	$have_style=!isset($mozilla_major) || $mozilla_major!=4;
 	$have_css=true; // doesn't hurt anybody AFAIK
 
 function addpercents($url)
@@ -43,12 +44,13 @@ function fatal($msg="UNKNOWN")
 {
 	global $admin_mail;
 
-	print("\n<br /><h1 class=\"error\">Nastala chyba pøi zpracování: $msg!</h1>\n"
+	heading(false/*title*/); // it is always safe
+	print("\n<p>&nbsp;<br />&nbsp;</p><hr /><h1 class=\"error\">Nastala chyba pøi zpracování: $msg!</h1>\n"
 			."<p>Mù¾ete tento problém nahlásit <a href=\"mailto:$admin_mail\">správci tohoto webu</a>.</p>\n");
 	footer();
 }
 
-function prepvar($name,$regex=".",$require=true)
+function prepvar($name,$regex=".*",$require=true)
 {
 	global $HTTP_GET_VARS,$HTTP_POST_VARS;
 
@@ -70,7 +72,7 @@ function prepvar($name,$regex=".",$require=true)
 	if (!isset($v))
 		return(0);
 
-	$globals[$name]=$v;
+	$GLOBALS[$name]=$v;
 	return($v);
 }
 
@@ -97,7 +99,7 @@ function db_query($query)
 	return($r);
 }
 
-function db_row($query)
+function db_row($query) // pure indexes
 {
 	$q=db_query($query);
 	$r=mysql_fetch_row($q);
@@ -105,6 +107,14 @@ function db_row($query)
 	return($r);
 }
 
+function db_array($query) // field-names associative
+{
+	$q=db_query($query);
+	$r=mysql_fetch_array($q);
+	mysql_free_result($q);
+	return($r);
+}
+
 function db_item($query)
 {
 	$row=db_row($query);
@@ -159,7 +169,8 @@ function img_size($width,$height)
 function img($file,$alt,$attrs="")
 {
 	list($width,$height)=getimagesize($file);
-	return("<img src=\"$file\" alt=\"".htmlspecialchars($alt)."\" ".img_size($width,$height)
+	$alt=htmlspecialchars($alt);
+	return("<img src=\"$file\" alt=\"$alt\" title=\"$alt\" ".img_size($width,$height)
 			.($attrs=="" ? "" : " ".$attrs)." />");
 }
 
@@ -210,11 +221,22 @@ function title_month($year,$month)
 
 function title_icons_table_month($year,$month,$month_last,$sequential)
 {
+	global $tb_clanek;
+
 	$month_a=month_a($year,$month,$month_last,$sequential);
-	print("<a href=\"title.php?year=$year&amp;month=$month\">"
-				.img($month_a["icon"],"titulní stránka ".$month_a["name_full"])."</a><br />"
-			."<a href=\"obsah.php?year=$year&amp;month=$month\">obsah ".$month_a["name"]."</a>"
-			);
+	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"
+				."&bull;&nbsp;<a href=\"title.php?year=$year&amp;month=$month\">titulní strana</a><br />\n"
+				."&bull;&nbsp;<a href=\"obsah.php?year=$year&amp;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("&bull;&nbsp;<a href=\"clanek.php?year=$year&amp;month=$month&amp;id=".$row["id"]."\">"
+				.htmlspecialchars($row["name"])."</a><br />\n");
+	mysql_free_result($result);
+	print("</td></tr></table>");
 }
 
 function title_icons($year,$month)
@@ -222,7 +244,7 @@ function title_icons($year,$month)
 	global $tb_obsah;
 
 	print("<h2>"
-		.(isset($year) ? "<a name=\"year_$year\">" : "")
+		.(isset($year) ? "<a id=\"year_$year\">" : "")
 		.title_name(&$year,&$month)
 		.(isset($year) ? "</a>" : "")
 		."</h2>\n");
@@ -233,7 +255,7 @@ function title_icons($year,$month)
 			.(isset($year) && isset($month) ? " and" : "")
 			.(isset($month) ?   " month=$month" : "")
 			." order by year,month");
-	$split=6;
+	$split=4;
 
 	// $year variable changes its meaning here!!!
 	if (isset($year))
@@ -251,7 +273,7 @@ function title_icons($year,$month)
 
 			$year=$row["year"];
 			print(""
-					.(!isset($wanted_year) ? "<p><a name=\"year_$year\">&nbsp;</a></p>" : "")
+					.(!isset($wanted_year) ? "<p><a id=\"year_$year\">&nbsp;</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"
 					);
@@ -270,7 +292,7 @@ function title_icons($year,$month)
 			print("<td></td>");
 			$month++;
 			}
-		print("<td align=\"center\""
+		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"]);
@@ -304,7 +326,285 @@ function image_supported($mime)
 	return(false);
 }
 
-function footer()
+// 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 print_pdf_layout($name,$base)
+{
+	$imgfmt=(image_supported("image/png") ? "png" : "gif");
+	?>
+<p>Shodný <?php print($name); ?> je dostupný ve dvou rùzných formátech souboru. V&nbsp;pøípadì,
+¾e nemáte/nechcete instalovat
+<a href="http://www.adobe.com/products/acrobat/readstep.html">Adobe Acrobat Reader</a>,
+zvolte prosím druhou mo¾nost:</p>
+
+<table border="0">
+<tr><td><table border="0" cellpadding="1" style="border: ridge;">
+<tr><td align="center"><?php
+	print(img("${base}s.$imgfmt",ucfirst($name)));
+?></td></tr></table></td>
+<td valign="top"><ul>
+
+<li>
+<table border="0">
+<tr><td><?php print("<a href=\"$base.pdf\">".img("img/adobe-pdficon-alpha.gif","Adobe PDF")."</a>"); ?></td>
+	<td><?php print(data_href("$base.pdf","Dokument PDF")); ?></td>
+	</tr>
+</table>
+<blockquote>
+<table border="0">
+<tr><td><a href="http://www.adobe.com/products/acrobat/readstep.html"><?php
+	print(img("img/adobe-getacro.gif","Get Adobe Acrobat Reader"));
+	?></a></td>
+	<td class="smaller">Soubor je ve formátu <span class="italic">Adobe Acrobat</span>,
+	pro jeho pøeètení si prosím nainstalujte
+	<a href="http://www.adobe.com/products/acrobat/readstep.html">Adobe Acrobat Reader</a>.</td>
+	</tr>
+</table>
+</blockquote>
+</li>
+
+<li>
+<?php print(img_href("$base.$imgfmt","Obrázkový formát ".strtoupper($imgfmt))); ?>
+</li>
+
+</ul></td></tr></table>
+<?php
+}
+
+function format_fields_to_text($title="",$pfx="")
+{
+	global $HTTP_POST_VARS;
+	$fields=array(
+			"Název"  ,"name",
+			"Adresa" ,"adresa",
+			"Ulice"  ,"ulice",
+			"Mìsto"  ,"mesto",
+			"PSÈ"    ,"psc",
+			"IÈO"    ,"ico",
+			"DIÈ"    ,"dic",
+			"Kontakt","contact",
+			"Tel"    ,"tel",
+			"Fax"    ,"fax",
+			"Poèet"  ,"pocet",
+			"e-mail" ,"mail",
+			);
+	$bools=array(
+			"Doklad" ,"doklad",
+			);
+	$texts=array(
+			"Text inzerátu","text",
+			"Jiné sdìlení" ,"comments",
+			);
+
+	$r="";
+	$tab=($title=="" ? "" : "\t");
+	while ($fields) {
+		$pretty=array_shift($fields);
+		$var=$pfx.array_shift($fields);
+		if (!isset($HTTP_POST_VARS[$var]))
+			continue;
+		if (""==($value=trim($HTTP_POST_VARS[$var])))
+			continue;
+		$r.="$tab$pretty:\t$value\n";
+		}
+	while ($bools) {
+		$pretty=array_shift($bools);
+		$var=$pfx.array_shift($bools);
+		if (!isset($HTTP_POST_VARS[$var]))
+			continue;
+		$r.="$tab$pretty:\t".($HTTP_POST_VARS[$var] ? "ANO" : "NE")."\n";
+		}
+	while ($texts) {
+		$pretty=array_shift($texts);
+		$var=$pfx.array_shift($texts);
+		if (!isset($HTTP_POST_VARS[$var]))
+			continue;
+		if (""==($value=trim(ereg_replace("[\r\n]+","\n",$HTTP_POST_VARS[$var]))))
+			continue;
+		$r.="$tab$pretty:".ereg_replace("\n","\\0\t","\n".$value)."\n";
+		}
+	if ($r!="" && $title!="")
+		$r="$title\n".$r;
+	return($r);
+}
+
+function stamp_line()
+{
+	return("stamp:\t".date("r")."\n");
+}
+
+function return_back($what)
+{
+	global $have_js;
+
+	return(""
+			.(!$have_js ? "" : "<input type=\"button\" value=\"")
+			.$what
+			.(!$have_js ? " (tlaèítkem "
+							."&quot;<span class=\"quote\">Zpìt</span>&quot; èi "
+							."&quot;<span class=\"quote\">Back</span>&quot; prohlí¾eèe)"
+					: "\" onclick=\"history.back()\" />")
+			);
+}
+
+// Data acquision error checking:
+function datacheck_fail()
+{
+	print("<p>Nyní se prosím ".return_back("vra»te zpìt")
+			." na pøedchozí stránku a chybu zadaných dat opravte.</p>\n");
+	footer();
+}
+
+function mail_data($title,$data)
+{
+	global $admin_mail,$mail_to;
+
+	// 5th mail argument is supported from PHP-4.0.5
+	return (!mail($mail_to,"EnergieWeb: $title",$data,
+"From: EnergieWeb <$admin_mail>
+Mime-Version: 1.0
+Content-Type: text/plain; charset=iso-8859-2
+Content-Disposition: inline
+Content-Transfer-Encoding: 8bit
+"));
+}
+
+function gsm_row($name,$value)
+{
+	return("<tr><td align=\"left\">$name</td>"
+			."<td align=\"right\">".($value=="" ? "neuvádìjte" : $value)."</td>"
+			."<td align=\"right\">".strtr($value,"/.","#*")."</td></tr>\n");
+}
+
+function gsm_table($total,$varsym)
+{
+	global $firma_ucet,$firma_konstsym,$firma_specsym;
+
+	return("<blockquote><table border=\"1\" cellpadding=\"5\">\n"
+			."<tr><th>polo¾ka</th><th>bankovní pøíkaz</th><th>".gsm_banking()."</th></tr>\n"
+			.gsm_row("Èíslo úètu",$firma_ucet)
+			.gsm_row("Èástka",sprintf("%.2f",$total))
+			.gsm_row("Konstantní symbol",$firma_konstsym)
+			.gsm_row("Variabilní symbol",$varsym)
+			.gsm_row("Specifický symbol",$firma_specsym)
+			."</table></blockquote>\n"
+			);
+}
+
+function return_to_homepage()
+{
+	global $HTTP_SERVER_VARS;
+
+	return("<p>Nyní se mù¾ete vrátit na <a href=\"".dirnameslashed($HTTP_SERVER_VARS["SCRIPT_NAME"])."\">úvodní stránku</a>.</p>\n");
+}
+
+function input_text($name,$size,$default_value="",$addons="")
+{
+	$r="<input type=\"text\" name=\"$name\" size=\"$size\"";
+	$value=(isset($GLOBALS[$name]) ? $GLOBALS[$name] : $default_value);
+	if (""!=$value)
+		$r.=" value=\"".htmlspecialchars($value)."\"";
+	$r.=$addons." />";
+	return($r);
+}
+
+function print_form_radkova_inzerce($readonly,$total,$submit_name,$submit_value)
+{
+	global $have_js,$text,$doklad;
+
+	$addons=(!$readonly ? "" : " readonly=\"readonly\"");
+	?>
+<blockquote>
+<form action="inzerat-submit.php<?php print($have_js); ?>" method="post">
+<table border="1" width="100%" cellpadding="5">
+<tr><td align="center"><table border="0">
+	<tr><td align="left" class="tab-head">Text inzerátu</td></tr>
+	<tr><td align="center"><?php
+			print("<textarea name=\"text\" rows=\"7\" cols=\"60\""
+					.($readonly ? "" : " onkeyup=\"sum_total(this)\" onchange=\"sum_total(this)\"")
+					.$addons.">"
+					.(!isset($text) ? "" : htmlspecialchars(trim($text)))
+					."</textarea>");
+			?></td></tr>
+	<?php
+		if ($have_js || $total!="") {
+			?>
+		<tr><td colspan="3"><hr /></td></tr>
+		<tr><td colspan="3" id="celkova_cena">Celková cena:
+				<input type="text" name="total" value="<?php
+						print(htmlspecialchars($total));
+						?>" size="8" readonly="readonly" /></td></tr>
+			<?php
+			}
+	?>
+	</table></td></tr>
+<tr><td align="left"><table border ="0" width="100%">
+	<tr><td>Název firmy / Jméno:</td ><td colspan="3"><?php print(input_text("name"  ,60,"",$addons)); ?></td></tr>
+	<tr><td>Úplná adresa:</td        ><td colspan="3"><?php print(input_text("adresa",60,"",$addons)); ?></td></tr>
+	<tr><td>Telefon:</td             ><td colspan="3"><?php print(input_text("tel"   ,25,"",$addons)); ?></td></tr>
+	<tr><td>IÈO:</td                 ><td            ><?php print(input_text("ico"   ,20,"",$addons)); ?></td>
+			<td>DIÈ</td                  ><td            ><?php print(input_text("dic"   ,20,"",$addons)); ?></td></tr>
+	<tr><td id="danovy_doklad"
+	       >Zaslat daòový doklad?</td><td colspan="3"><input type="checkbox" name="doklad"<?php
+			print(""
+					// some hacks as "readonly" not supported for "checkbox"es (->"disabled" for them)
+					.($readonly ? "" : " onclick=\"sum_total(this)\"")
+					.(!($have_js || $readonly) ? "" : " disabled=\"disabled\"")
+					.(!isset($doklad) ? "" : " checked=\"checked\"")
+					.ereg_replace(" readonly=\"readonly\"","",$addons)." />");
+			?></td></tr>
+	<tr><td id="pocet_zverejneni"
+	       >Poèet zveøejnìní:</td    ><td            ><?php print(input_text("pocet",5,1,
+					$addons." onkeyup=\"sum_total(this)\" onchange=\"sum_total(this)\"")); ?></td>
+			<td>e-mail:</td              ><td            ><?php print(input_text("mail",40,"",$addons)); ?></td></tr>
+	</table></td></tr>
+<tr><td align="center" id="submit_button"><?php
+		print("<input type=\"submit\" name=\"$submit_name\" value=\"".htmlspecialchars($submit_value)."\""
+				." onclick=\"return(validate(this.form))\" />");
+		?></td></tr>
+</table></form>
+</blockquote>
+<?php
+}
+
+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)
 {
 	// deadlock prevention:
 	global $footer_passed;
@@ -313,20 +613,23 @@ function footer()
 	$footer_passed=true;
 
 	global $cvs_id_html,$viewcvs,$viewcvs,$HTTP_SERVER_VARS;
+	if ($delimit)
+		print("<p>&nbsp;</p>\n");
+	$uri="uri=".addpercents("http://".$HTTP_SERVER_VARS["HTTP_HOST"].$HTTP_SERVER_VARS["REQUEST_URI"]);
 	?>
-<p>&nbsp;</p>
 <hr />
 <table border="0" width="100%">
 <tr><td align="left"><span class="cvs-id"><?php print($cvs_id_html); ?></span></td><td align="right"><a
-	href="http://validator.w3.org/check/referer"><img src="http://www.w3.org/Icons/valid-xhtml10"
-		<?php print(img_size(88,31)); ?> alt="Valid XHTML 1.0!" /></a><a
-	href="http://jigsaw.w3.org/css-validator/validator?warning=2&amp;profile=css2&amp;uri=<?php
-		print(addpercents("http://".$HTTP_SERVER_VARS["HTTP_HOST"].$HTTP_SERVER_VARS["REQUEST_URI"]));
-		?>"><img src="http://jigsaw.w3.org/css-validator/images/vcss"
-		<?php print(img_size(88,31)); ?> alt="Valid CSS!" /></a></td></tr>
+	href="http://validator.w3.org/check?<?php
+		print($uri); ?>"><?php
+				print footer_img("http://www.w3.org/Icons/valid-xhtml11","Valid XHTML 1.1!",img_size(88,31));
+				?></a><a href="http://jigsaw.w3.org/css-validator/validator?warning=2&amp;profile=css2&amp;<?php
+		print($uri); ?>"><?php
+				print footer_img("http://jigsaw.w3.org/css-validator/images/vcss","Valid CSS!",img_size(88,31));
+				?></a></td></tr>
 </table>
 </body></html>
-	<?php
+<?php
 	exit();
 }
 
@@ -339,25 +642,41 @@ function no_cache()
 	header("Pragma: no-cache");                                // HTTP/1.0
 }
 
-function heading()
+function heading($title=false)
 {
-	global $msie_major,$mozilla_major,$title_tail,$head_css,$have_css,$head;
+	global $HTTP_SERVER_VARS,$msie_major,$mozilla_major,$title_tail,$head_css,$have_css,$head,$heading_done,$title_prefix,$force_charset;
+
+	if (isset($heading_done))
+		return;
+	$heading_done=1;
 
-	header("Content-type: text/html; charset=iso-8859-2");
-	if (!isset($msie_major) || $msie_major>=4)
-		print('<?xml version="1.0" encoding="iso-8859-2"?>'."\n");
+	if (isset($force_charset))
+		$client_charset=$force_charset;
+	else
+		$client_charset=(!isset($HTTP_SERVER_VARS["CLIENT_CHARSET"]) ? "iso-8859-2" : $HTTP_SERVER_VARS["CLIENT_CHARSET"]);
+	// When "CLIENT_CHARSET" is set we MUST NOT explicitely specify our "charset"
+	header("Content-type: text/html".(isset($HTTP_SERVER_VARS["CLIENT_CHARSET"]) ? "" : "; charset=$client_charset"));
+	header("Content-Style-Type: text/css");
+	if (!isset($msie_major) || $msie_major>=4) {
+		print('<?xml version="1.0" encoding="'.$client_charset.'"?>'."\n");
+		}
 ?>
-<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
-<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="cs" lang="cs">
-<head><title>Energie &amp; peníze<?php
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
+<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="cs">
+<head><?php
+	print("<title>$title_prefix");
 	if (isset($title_tail))
-		print(": $title_tail");
+		print(": ".htmlspecialchars($title_tail));
 	print("</title>\n");
 	if ($have_css) {
 ?><style type="text/css"><!--
-.cvs-id  { font-family: monospace; }
-.error   { color: red;    background-color: transparent; }
-.quote   { font-family: monospace; }
+.cvs-id   { font-family: monospace; }
+.error    { color: red;   background-color: transparent; }
+.quote    { font-family: monospace; }
+.nowrap   { white-space: nowrap; }
+.centered { text-align: center; }
+.tab-bold { font-weight: bold; }
+.tab-head { font-weight: bold; color: yellow; background-color: transparent; }
 body {
 		background-color: black;
 		color: white;
@@ -374,7 +693,11 @@ h1,h2    { color: yellow; background-color: transparent; }
 		print($head);
 	print("</head><body");
 	if (isset($mozilla_major) && $mozilla_major==4)
-		print(" bgcolor=\"black\" text=\"white\" link=\"cyan\" vlink=\"teal\"");
+		print(" bgcolor=\"black\" text=\"white\" link=\"aqua\" vlink=\"teal\"");
 	print(">\n");
+	if ($title)
+		print("<h1 class=\"centered\">"
+				.img("img/eap-title.".(image_supported("image/png") ? "png" : "gif"),"Energie & Peníze")
+				."</h1>\n");
 }
 ?>