X-Git-Url: http://git.jankratochvil.net/?p=www.energie.vellum.cz.git;a=blobdiff_plain;f=common.php;h=2a3db70a572396391ec58ecf59f43a33a2627d08;hp=e4587c1eb7962aa9b9684b5d735bb0b080eca574;hb=HEAD;hpb=22a4058cb135366061add810df74e635a32dbea3 diff --git a/common.php b/common.php index e4587c1..2a3db70 100644 --- a/common.php +++ b/common.php @@ -1,6 +1,7 @@ " + .$cvs_id_split[2].""; $cvs_id_split[1]="".$cvs_id_split[1].""; - $cvs_id_split[5]="".$cvs_id_split[5].""; + $cvs_id_split[5]="".$cvs_id_split[5].""; } $cvs_id_html=join(" ",$cvs_id_split); + if (!isset($head)) + $head=""; + if (!isset($energie_base)) + $energie_base=""; + + unset($have_ent); + if (isset($HTTP_GET_VARS[ "have_ent"])) + $have_ent=true; + if (isset($HTTP_GET_VARS["amp;have_ent"])) + $have_ent=false; + if ((!isset($detect_ent) || $detect_ent) && !isset($have_ent) && $HTTP_SERVER_VARS["REQUEST_METHOD"]=="GET") + $head.=''."\n"; + fixampvars(); + $have_js=(isset($HTTP_GET_VARS["have_js"]) || isset($HTTP_POST_VARS["have_js"]) ? "?have_js=1" : ""); if (isset($detect_js) && !$have_js) - $head.=''."\n"; + $head.=''."\n"; $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)) @@ -28,27 +50,30 @@ $have_style=!isset($mozilla_major) || $mozilla_major!=4; $have_css=true; // doesn't hurt anybody AFAIK -function addpercents($url) +function fixampvars() { - $r=$c=""; - foreach(preg_split('//', $url, -1, PREG_SPLIT_NO_EMPTY) as $c) - if (ereg("[a-zA-Z0-9]",$c)) - $r.=$c; - else - $r.=sprintf("%%%02X",ord($c)); - return($r); + $ars=array("HTTP_GET_VARS","HTTP_POST_VARS"); + foreach ($ars as $ar) { + foreach ($GLOBALS[$ar] as $key=>$val) { + if (substr($key,0,4)!="amp;") + continue; + unset($GLOBALS[$ar][$key]); + $GLOBALS[$ar][substr($key,4)]=$val; + } + } } function fatal($msg="UNKNOWN") { global $admin_mail; + heading(false/*title*/,false/*indexme*/); // notitle is always safe, don't index the error message print("\n
Mù¾ete tento problém nahlásit správci tohoto webu.
\n"); footer(); } -function prepvar($name,$regex=".",$require=true) +function prepvar($name,$regex=".*",$require=true) { global $HTTP_GET_VARS,$HTTP_POST_VARS; @@ -70,7 +95,7 @@ function prepvar($name,$regex=".",$require=true) if (!isset($v)) return(0); - $globals[$name]=$v; + $GLOBALS[$name]=$v; return($v); } @@ -97,7 +122,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,7 +130,7 @@ function db_row($query) return($r); } -function db_array($query) +function db_array($query) // field-names associative { $q=db_query($query); $r=mysql_fetch_array($q); @@ -166,16 +191,12 @@ function img_size($width,$height) function img($file,$alt,$attrs="") { - list($width,$height)=getimagesize($file); - return(""); } -function gsm_banking() -{ - return(img("img/sluzby_bankovni_pggsm.gif","Paegas GSM banking","class=\"img-align\"")); -} - function price_a() { if (!($f=fopen("objednavka.js","r"))) @@ -216,7 +237,7 @@ function title_month($year,$month) ); } -function title_icons_table_month($year,$month,$month_last,$sequential) +function title_icons_table_month($year,$month,$month_last,$sequential,$has_contents) { global $tb_clanek; @@ -227,11 +248,13 @@ function title_icons_table_month($year,$month,$month_last,$sequential) .img($month_a["icon"],"titulní stránka ".$month_a["name_full"])."\n" ."Shodný je dostupný ve dvou rùzných formátech souboru. V pøípadì, +¾e nemáte/nechcete instalovat +Adobe Acrobat Reader, +zvolte prosím druhou mo¾nost:
+ +
|
Nyní se prosím ".return_back("vra»te zpìt") + ." na pøedchozí stránku a chybu zadaných dat opravte.
\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("\n" + ); +} + +function return_to_homepage() +{ + global $HTTP_SERVER_VARS; + + return("\n" + ."
\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) + ." polo¾ka bankovní pøíkaz
Nyní se mù¾ete vrátit na úvodní stránku.
\n"); +} + +function input_text($name,$size,$default_value="",$addons="") +{ + $r=""; + return($r); +} + +function form_charset() +{ + // CSacek-2.1.9+ required (mod_czech support dropped!) + // We MUST have input coded in "iso-8859-2" as we use + // "csacekRecodeInput Off", CSacek otherwise tries to recode input but CSacek + // _cannot_ know the encoding used by the client (moreover it IGNORES POST + // data MIME type, even if provided by Lynx 2.8.4dev.11, Mozilla 1.0.0 + // doesn't provide anything). + // "iso-8859-2" should be replaced by $HTTP_SERVER_VARS["HTTP_X_CLIENT_CHARSET"] + // and "csacekRecodeInput On"(default) when CSacek fixes support of "utf-8" + // input-decoding, details in my mail <20020620134930.GA18761@short.ucw.cz>. + + return('enctype="application/x-www-form-urlencoded" accept-charset="iso-8859-2"'); +} + +function print_form_radkova_inzerce($readonly,$total,$submit_name,$submit_value) +{ + global $have_js,$text,$doklad; + + $addons=(!$readonly ? "" : " readonly=\"readonly\""); + ?> ++ ++"); + else + return($text); +} + +function a_href($url,$contents) +{ + global $have_ent,$energie_base; + + $r="$contents"; + return($r); } function footer($delimit=true) @@ -355,20 +671,24 @@ function footer($delimit=true) exit(); $footer_passed=true; - global $cvs_id_html,$viewcvs,$viewcvs,$HTTP_SERVER_VARS; + global $cvs_id_html,$viewcvs,$viewcvs,$HTTP_SERVER_VARS,$energie_base; if ($delimit) print("
\n"); - $uri="uri=".addpercents("http://".$HTTP_SERVER_VARS["HTTP_HOST"].$HTTP_SERVER_VARS["REQUEST_URI"]); + $uri="uri=".urlencode("http://".$HTTP_SERVER_VARS["HTTP_HOST"].$HTTP_SERVER_VARS["REQUEST_URI"]); ?>
alt="Valid XHTML 1.1!" /> alt="Valid CSS!" /> | |
4 + .a_href("http://www.w3.org/Style/CSS/Buttons",'' + .img($energie_base."img/mwcts." .(image_supported("image/png") ? "png" : "gif"),"Made with CSS").'') + ); + ?> |