common.php

   1 <?php // $Id$
   2
   3         error_reporting(E_ALL);
   4
   5         include("config.php");
   6
   7         // $viewcvs prepared by "config.php"
   8         if ($viewcvs==$HTTP_SERVER_VARS["SCRIPT_NAME"])
   9                 unset($viewcvs);
  10         $cvs_id_split=split(" ",$cvs_id);
  11         if (count($cvs_id_split)==8) {
  12                 $cvs_id_split[1]="<a href=\"$viewcvs\">".$cvs_id_split[1]."</a>";
  13                 $cvs_id_split[5]="<a href=\"mailto:".$cvs_id_split[5]."@".$HTTP_SERVER_VARS["HTTP_HOST"]."\">".$cvs_id_split[5]."</a>";
  14                 }
  15         $cvs_id_html=join(" ",$cvs_id_split);
  16
  17         $have_js=(isset($HTTP_GET_VARS["have_js"]) || isset($HTTP_POST_VARS["have_js"])
  18                         ? "?have_js=1" : "");
  19         if (isset($detect_js) && !$have_js)
  20                 $head.='<script type="text/javascript" src="have_js.js"></script>'."\n";
  21
  22         $user_agent=$HTTP_SERVER_VARS["HTTP_USER_AGENT"];
  23         if (ereg("[[:<:]]MSIE ([0-9]+)\\.",$user_agent,$msie_major_a))
  24                 $msie_major=$msie_major_a[1];
  25         else if (ereg("[[:<:]]Mozilla/([0-9]+)\\.",$user_agent,$mozilla_major_a))
  26                 $mozilla_major=$mozilla_major_a[1];
  27
  28 function addpercents($url)
  29 {
  30         $r=$c="";
  31         foreach(preg_split('//', $url, -1, PREG_SPLIT_NO_EMPTY) as $c)
  32                 if (ereg("[a-zA-Z0-9]",$c))
  33                         $r.=$c;
  34                 else
  35                         $r.=sprintf("%%%02X",ord($c));
  36         return($r);
  37 }
  38
  39 function fatal($msg="UNKNOWN")
  40 {
  41         global $admin_mail;
  42
  43         print("\n<br /><h1 class=\"error\">Nastala chyba pøi zpracování: $msg!</h1>\n"
  44                         ."<p>Mù¾ete tento problém nahlásit <a href=\"mailto:$admin_mail\">správci tohoto webu</a>.</p>\n");
  45         footer();
  46 }
  47
  48 function prepvar($name,$regex=".",$require=true)
  49 {
  50         global $HTTP_GET_VARS,$HTTP_POST_VARS;
  51
  52              if (isset($HTTP_GET_VARS[$name]))
  53                 $v=$HTTP_GET_VARS[$name];
  54         else if (isset($HTTP_POST_VARS[$name]))
  55                 $v=$HTTP_POST_VARS[$name];
  56         else
  57                 unset($v);
  58
  59         $name_html="Parametr <span class=\"quote\">".htmlspecialchars($name)."</span>";
  60
  61         $regex="^$regex\$";
  62         if (isset($v) && !ereg($regex,$v))
  63                 fatal("$name_html nevyhovuje po¾adovanému regexu <span class=\"quote\">".htmlspecialchars($regex)."</span>");
  64         if (!isset($v) && $require)
  65                 fatal("$name_html je vy¾adován");
  66
  67         if (!isset($v))
  68                 return(0);
  69
  70         $globals[$name]=$v;
  71         return($v);
  72 }
  73
  74 function db_connect()
  75 {
  76         global $db_host,$db_user,$db_pwd,$db_name;
  77         global $db_link;
  78
  79         if (isset($db_link))
  80                 return;
  81         if (!($db_link=mysql_connect($db_host,$db_user,$db_pwd)))
  82                 fatal("MySQL connect: ".mysql_error());
  83         if (!mysql_select_db($db_name,$db_link))
  84                 fatal("MySQL database select: ".mysql_error());
  85 }
  86
  87 function db_query($query)
  88 {
  89         global $db_link;
  90
  91         db_connect();
  92         if (!($r=mysql_query($query,$db_link)))
  93                 fatal("MySQL query \"$query\": ".mysql_error());
  94         return($r);
  95 }
  96
  97 function db_row($query)
  98 {
  99         $q=db_query($query);
 100         $r=mysql_fetch_row($q);
 101         mysql_free_result($q);
 102         return($r);
 103 }
 104
 105 function db_item($query)
 106 {
 107         $row=db_row($query);
 108         return($row[0]);
 109 }
 110
 111 function month_a($year,$month,$month_last=0)
 112 {
 113         global $tb_obsah;
 114
 115         if (!$month_last)
 116                 $month_last=db_item("select month_last from $tb_obsah where year='$year' and month='$month'");
 117         $month_full=sprintf("%02d".($month==$month_last ? "" : "-%02d"),$month,$month_last);
 118
 119         $r=array("year"=>$year,"month"=>$month,"month_last"=>$month_last,"month_full"=>$month_full,
 120                         "name"=>"$year/${month_full}",
 121                         "img" =>"img/eap-$year-${month_full}.jpeg",
 122                         "icon"=>"img/eap-$year-${month_full}s.jpeg",
 123                         );
 124         return($r);
 125 }
 126
 127 function img_size($width,$height=0)
 128 {
 129         if (!$height)
 130                 list($width,$height)=getimagesize($width);
 131         return("style=\"border:0;width:${width}px;height:${height}px\" width=\"$width\" height=\"$height\"");
 132 }
 133
 134 function gsm_banking()
 135 {
 136         return("<img src=\"img/sluzby_bankovni_pggsm.gif\"".img_size(89,31)." alt=\"Paegas GSM banking\" class=\"img-align\" />");
 137 }
 138
 139 function price_a()
 140 {
 141         if (!($f=fopen("objednavka.js","r")))
 142                 fatal("Nepodaøilo se naèíst seznam dostupného zbo¾í");
 143         $r=array();
 144         while (($s=fgets($f,0x1000))) {
 145                 if (!($s=trim($s)))
 146                         break;
 147                 if (!(ereg("^want_price\\[ *'([^']*)'\\]=([0-9]*);$",$s,$matched)))
 148                         continue;
 149                 $r[$matched[1]]=$matched[2];
 150                 }
 151         fclose($f);
 152         return($r);
 153 }
 154
 155 function title_name($year,$month)
 156 {
 157              if (isset($year) && isset($month)) {
 158                 $month_a=month_a($year,$month);
 159                 return("Titulní strana èísla ".$month_a["name"]);
 160                 }
 161         else if (isset($year))
 162                 return("Titulní strany roèníku $year");
 163         else
 164                 return("Titulní strany");
 165 }
 166
 167 function title_month($year,$month)
 168 {
 169   $month_a=month_a($year,$month);
 170         return(""
 171                         ."<table border=\"0\" width=\"100%\">\n"
 172                         ."<tr><td align=\"center\"><table border=\"1\" cellpadding=\"10\">\n"
 173                         ."<tr><th align=\"center\">".title_name($year,$month)."</th></tr>\n"
 174                         ."<tr><td align=\"center\"><img src=\"".$month_a["img"]."\" ".img_size($month_a["img"])
 175                         ." alt=\"titulní stránka ".$month_a["name"]."\" /></td></tr>\n"
 176                         ."</table></td></tr>\n"
 177                         ."</table>\n"
 178                         );
 179 }
 180
 181 function title_icons_table_month($year,$month,$month_last)
 182 {
 183         $month_a=month_a($year,$month,$month_last);
 184         print("<a href=\"title.php?year=$year&amp;month=$month\">"
 185                                 ."<img src=\"".$month_a["icon"]."\" ".img_size($month_a["icon"])
 186                                 ." alt=\"titulní stránka ".$month_a["name"]."\" /></a><br />"
 187                         ."<a href=\"obsah.php?year=$year&amp;month=$month\">obsah ".$month_a["name"]."</a>"
 188                         );
 189 }
 190
 191 function title_icons($year,$month)
 192 {
 193         global $tb_obsah;
 194
 195         print("<h2>"
 196                 .(isset($year) ? "<a name=\"year_$year\">" : "")
 197                 .title_name(&$year,&$month)
 198                 .(isset($year) ? "</a>" : "")
 199                 ."</h2>\n");
 200
 201         $result=db_query("select year,month,month_last from $tb_obsah"
 202                         .(isset($year) || isset($month) ? " where" : "")
 203                         .(isset($year ) ? " year=$year"   : "")
 204                         .(isset($year) && isset($month) ? " and" : "")
 205                         .(isset($month) ?   " month=$month" : "")
 206                         ." order by year,month");
 207         $split=6;
 208
 209         // $year variable changes its meaning here!!!
 210         if (isset($year))
 211                 $wanted_year=$year;
 212         $year=0;
 213
 214         $fin_split="";
 215         $fin_year="";
 216         while ($row=mysql_fetch_array($result)) {
 217                 $row["month"     ]--;
 218                 $row["month_last"]--;
 219
 220                 if ($row["year"]!=$year) {
 221                         print($fin_split.$fin_year);
 222
 223                         $year=$row["year"];
 224                         print(""
 225                                         .(!isset($wanted_year) ? "<p><a name=\"year_$year\">&nbsp;</a></p>" : "")
 226                                         ."<table border=\"0\" width=\"100%\"><tr><td align=\"center\"><table border=\"1\" cellpadding=\"5\">\n"
 227                                         ."<tr><th colspan=\"$split\">Roèník $year (<a href=\"obsah.php?year=$year\">obsahy èísel</a>)</th></tr>\n"
 228                                         );
 229                         $fin_year="</table></td></tr></table>\n";
 230                         $fin_split="";
 231                         $month=-1;
 232                         $floor=-1;
 233                         }
 234                 while ($floor<floor($row["month"]/$split)) {
 235                         print($fin_split."<tr>");
 236                         $fin_split="</tr>\n";
 237                         $floor++;
 238                         $month=$floor*$split-1;
 239                         }
 240                 while ($month+1<$row["month"]) {
 241                         print("<td></td>");
 242                         $month++;
 243                         }
 244                 print("<td align=\"center\""
 245                                 .($row["month_last"]!=$row["month"] ? " colspan=\"".($row["month_last"]+1-$row["month"])."\"" : "")
 246                                 .">");
 247                 title_icons_table_month($year,$row["month"]+1,$row["month_last"]+1);
 248                 print("</td>\n");
 249                 $month=$row["month_last"];
 250                 }
 251         mysql_free_result($result);
 252         print($fin_split.$fin_year);
 253 }
 254
 255 function title($year,$month)
 256 {
 257         if (isset($year) && isset($month))
 258                 return(title_month( $year, $month));
 259         else
 260                 return(title_icons(&$year,&$month));
 261 }
 262
 263 function image_supported($mime)
 264 {
 265         global $HTTP_SERVER_VARS;
 266
 267         $exp=explode(",",$HTTP_SERVER_VARS["HTTP_ACCEPT"]);
 268         while (($s=array_shift($exp))) {
 269                 $s=trim(ereg_replace(";.*","",$s));
 270                 if ($s==$mime)
 271                         return(true);
 272                 }
 273         return(false);
 274 }
 275
 276 function footer()
 277 {
 278         // deadlock prevention:
 279         global $footer_passed;
 280         if (isset($footer_passed))
 281                 exit();
 282         $footer_passed=true;
 283
 284         global $cvs_id_html,$viewcvs,$viewcvs,$HTTP_SERVER_VARS;
 285         ?>
 286 <p>&nbsp;</p>
 287 <hr />
 288 <table border="0" width="100%">
 289 <tr><td align="left"><span class="cvs-id"><?php print($cvs_id_html); ?></span></td><td align="right"><a
 290         href="http://validator.w3.org/check/referer"><img src="http://www.w3.org/Icons/valid-xhtml10"
 291                 <?php print(img_size(88,31)); ?> alt="Valid XHTML 1.0!" /></a><a
 292         href="http://jigsaw.w3.org/css-validator/validator?warning=2&amp;profile=css2&amp;uri=<?php
 293                 print(addpercents("http://".$HTTP_SERVER_VARS["HTTP_HOST"].$HTTP_SERVER_VARS["REQUEST_URI"]));
 294                 ?>"><img src="http://jigsaw.w3.org/css-validator/images/vcss"
 295                 <?php print(img_size(88,31)); ?> alt="Valid CSS!" /></a></td></tr>
 296 </table>
 297 </body></html>
 298         <?php
 299         exit();
 300 }
 301
 302 // Stolen from: php-manual.html#function.header
 303 function no_cache()
 304 {
 305         header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");          // Date in the past
 306         header("Last-Modified: ".gmdate("D, d M Y H:i:s")." GMT"); // always modified
 307         header("Cache-Control: no-cache, must-revalidate");        // HTTP/1.1
 308         header("Pragma: no-cache");                                // HTTP/1.0
 309 }
 310
 311 function heading()
 312 {
 313         global $msie_major,$mozilla_major,$title_tail,$head_css,$head;
 314
 315         header("Content-type: text/html; charset=iso-8859-2");
 316         if (!isset($msie_major) || $msie_major>=4)
 317                 print('<?xml version="1.0" encoding="iso-8859-2"?>'."\n");
 318 ?>
 319 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
 320 <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="cs" lang="cs">
 321 <head><title>Energie &amp; peníze<?php
 322         if (isset($title_tail))
 323                 print(": $title_tail");
 324 ?></title>
 325 <style type="text/css"><!--
 326 .cvs-id  { font-family: monospace; }
 327 .error   { color: red;    background-color: transparent; }
 328 .quote   { font-family: monospace; }
 329 body {
 330                 background-color: black;
 331                 color: white;
 332                 }
 333 :link    { color: aqua;   background-color: transparent; }
 334 :visited { color: teal;   background-color: transparent; }
 335 h1,h2    { color: yellow; background-color: transparent; }
 336 <?php
 337         if (isset($head_css))
 338                 print(trim($head_css)."\n");
 339         print("--></style>\n");
 340         if (isset($head))
 341                 print($head);
 342         print("</head><body");
 343         if (isset($mozilla_major) && $mozilla_major==4)
 344                 print(" bgcolor=\"black\" text=\"white\" link=\"cyan\" vlink=\"teal\"");
 345         print(">\n");
 346 }
 347 ?>