X-Git-Url: https://git.jankratochvil.net/?a=blobdiff_plain;f=common.php;h=528f671a3041bc36603fc058c0a2754e413777fe;hb=88c174ee25860b905efe6bfcda87e6b88363deaa;hp=e4587c1eb7962aa9b9684b5d735bb0b080eca574;hpb=22a4058cb135366061add810df74e635a32dbea3;p=www.energie.vellum.cz.git diff --git a/common.php b/common.php index e4587c1..528f671 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_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*/); // it is always safe print("\n

 
 


Nastala chyba pøi zpracování: $msg!

\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,14 +191,18 @@ function img_size($width,$height) function img($file,$alt,$attrs="") { - list($width,$height)=getimagesize($file); - return("\"".htmlspecialchars($alt)."\""); } function gsm_banking() { - return(img("img/sluzby_bankovni_pggsm.gif","Paegas GSM banking","class=\"img-align\"")); + global $energie_base; + + return(img($energie_base."img/sluzby_bankovni_pggsm.".(image_supported("video/x-mng") ? "mng" : "gif"), + "Paegas GSM banking","class=\"img-align\"")); } function price_a() @@ -342,9 +371,301 @@ function usersize($size) return(round($size)." ".$suffix_a[0]."B"); } -function data_href($filename,$text) +function data_href($filename,$text,$details="") +{ + return("$text (".usersize(filesize($filename))."$details)"); +} + +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) +{ + global $energie_base; + + $imgfmt=(image_supported("image/png") ? "png" : "gif"); + ?> +

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:

+ + + +
+
    + +
  • + + + + +
    ".img($energie_base."img/adobe-pdficon-alpha.".(image_supported("image/png") ? "png" : "gif"), + "Adobe PDF").""); ?>
    +
    + + + + +
    Soubor je ve formátu Adobe Acrobat, + pro jeho pøeètení si prosím nainstalujte + Adobe Acrobat Reader.
    +
    +
  • + +
  • + +
  • + +
+Zpìt" èi " + .""Back" prohlí¾eèe)" + : "\" onclick=\"history.back()\" />") + ); +} + +// Data acquision error checking: +function datacheck_fail() +{ + print("

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("$name" + ."".($value=="" ? "neuvádìjte" : $value)."" + ."".strtr($value,"/.","#*")."\n"); +} + +function gsm_table($total,$varsym) +{ + global $firma_ucet,$firma_konstsym,$firma_specsym; + + 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¾kabankovní pøíkaz".gsm_banking()."
\n" + ); +} + +function return_to_homepage() +{ + global $HTTP_SERVER_VARS; + + return("

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) { - return("$text (".usersize(filesize($filename)).")"); + global $have_js,$text,$doklad; + + $addons=(!$readonly ? "" : " readonly=\"readonly\""); + ?> +
+
> + + + + +
+ + + + + + +
Text inzerátu
" + .(!isset($text) ? "" : htmlspecialchars(trim($text))) + .""); + ?>

Celková cena: +
+ + + + + + + + +
Název firmy / Jméno:
Úplná adresa:
Telefon:
IÈO:DIÈ
Zaslat daòový doklad?"disabled" for them) + .($readonly ? "" : " onclick=\"sum_total(this)\"") + .(!($have_js || $readonly) ? "" : " disabled=\"disabled\"") + .(!isset($doklad) ? "" : " checked=\"checked\"") + .ereg_replace(" readonly=\"readonly\"","",$addons)." />"); + ?>
Poèet zveøejnìní:e-mail:
"); + ?>
+
+"); + else + return($text); +} + +function a_href($url,$contents) +{ + global $have_ent,$energie_base; + + $r="$contents"; + return($r); } function footer($delimit=true) @@ -355,20 +676,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) - print(''."\n"); + if (!isset($msie_major) || $msie_major>=4) { + print(''."\n"); + } ?> -Energie & peníze<?php +<head><?php + print("<title>$title_prefix"); if (isset($title_tail)) print(": ".htmlspecialchars($title_tail)); print("\n"); @@ -406,6 +739,8 @@ function heading($title=false) .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; @@ -413,6 +748,7 @@ body { :link { color: aqua; background-color: transparent; } :visited { color: teal; background-color: transparent; } h1,h2 { color: yellow; background-color: transparent; } +.footer img { vertical-align: middle; }