Implemented articles
[www.energie.vellum.cz.git] / obsah.php
1 <?php $cvs_id='$Id$';
2
3         include("common.php");
4
5         /* assign it manually to force it to value "0" if it would be unset */
6         $year =prepvar("year" ,"[0-9]+",false/*required*/);
7         $month=prepvar("month","[0-9]+",false/*required*/);
8
9         if ($month && !$year)
10                 $month=0;
11
12              if (!$year)
13                 $title_tail="Obsahy v¹ech èísel";
14         else if (!$month)
15                 $title_tail="Obsahy èísel roku $year";
16         else {
17                 $month_a=month_a($year,$month);
18                 $title_tail="Obsah èísla ".$month_a["name_full"];
19                 }
20
21         $head_css="
22 .page { font-style: italic; }
23 ";
24         heading();
25         print("<h1>$title_tail</h1>\n");
26
27         $result=db_query("select year,month,month_last,contents from $tb_obsah"
28                         .($year  ? " where year=$year"   : "")
29                         .($month ?   " and month=$month" : "")
30                         ." order by year,month"
31                         );
32         if (!mysql_num_rows($result))
33                 fatal("Obsah po¾adovan".($month ? "ého èísla" : "ých èísel")." bohu¾el není ulo¾en");
34         while ($row=mysql_fetch_array($result)) {
35                 if (!$month) {
36                         $month_a=month_a($row["year"],$row["month"],$row["month_last"]);
37                         print("<h2>Èíslo ".$month_a["name_full"]."</h2>\n");
38                         }
39                 $contents=$sep_obsah_contents.$row["contents"];
40                 $contents=htmlspecialchars($contents);
41
42                 $article_result=db_query("select name,id from $tb_clanek"
43                                 ." where  year=".$row[ "year"]
44                                 .  " and month=".$row["month"]
45                                 );
46                 while ($article_row=mysql_fetch_array($article_result))
47                         $contents=ereg_replace("$sep_obsah_contents(".quotemeta($article_row["name"]).")$page_obsah_contents",
48                                         "$sep_obsah_contents"
49                                                         ."<a href=\"clanek.php?year=".$row["year"]."&amp;month=".$row["month"]."&amp;id=".$article_row["id"]."\">"
50                                                         ."\\1</a>"
51                                         ."$page_obsah_contents",$contents);
52                 mysql_free_result($article_result);
53
54                 $contents=ereg_replace("http://[^[:space:]$page_obsah_contents$sep_obsah_contents]+",
55                                 "<a href=\"\\0\">\\0</a>",$contents);
56                 $contents=ereg_replace("$page_obsah_contents([^$sep_obsah_contents$appendix_obsah_contents]+)",
57                                 "<br /><div class=\"page\">strana ... \\1</div>",$contents);
58                 $contents=ereg_replace("\n","<br />\n\t\t",$contents);
59                 $contents=ereg_replace("$sep_obsah_contents([^$sep_obsah_contents$appendix_obsah_contents]*)","\t<li>\\1</li>\n",$contents);
60                 if (1<count($contents_a=split("$appendix_obsah_contents",$contents,2)))
61                         $contents=$contents_a[0]."\t<li>Pøílohy:<ul>\n".ereg_replace("\t","\t\t",$contents_a[1])."\t</ul></li>\n";
62                 print("<ul>\n$contents</ul>\n");
63                 }
64         mysql_free_result($result);
65
66         footer();
67 ?>