/[pliva-si]/multi.php
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Annotation of /multi.php

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.6 - (hide annotations)
Thu Sep 20 09:35:23 2001 UTC (17 years, 8 months ago) by dpavlin
Branch: MAIN
Changes since 1.5: +2 -2 lines
support absolute path

1 dpavlin 1.1 <?php
2 dpavlin 1.4
3     $max_title_len=20; // max. length of titles in drop-down
4    
5 dpavlin 1.1 require("Smarty.class.php");
6     require("conn.inc");
7    
8     $smarty = new Smarty;
9    
10     $smarty->assign( array ( Title=>"PLIVA Ljubljana" ) );
11    
12     include("find_html_file.inc");
13    
14     if (! isset($p)) {
15     $p=0;
16     $section="domov";
17     } else {
18     // fetch current page
19 dpavlin 1.2 $sql="select id,menu_num,name,html,path,type from multi where visible and id=$p";
20 dpavlin 1.1 $sth = $dbh->prepare("$sql");
21     $sth->execute();
22     $row=$sth->fetchrow_hash();
23    
24     $title.=" : $row[name]";
25 dpavlin 1.2 if ($row[type]=="h" && file_exists(find_html_file("multi",$row[html]))) {
26 dpavlin 1.1 $main=join('',file(find_html_file("multi",$row[html])));
27 dpavlin 1.3 } elseif ($row[type]=="p") {
28 dpavlin 1.6 if (file_exists(find_html_file("/",$row[path]))) {
29     $main=join('',file(find_html_file("/",$row[path])));
30 dpavlin 1.5 // fix entities from MS programs
31     include("fix_msshit.inc");
32     $main=fix_msshit($main);
33 dpavlin 1.3 } else {
34     $main="<b>can't find $row[path] for id $p</b>";
35     }
36 dpavlin 1.2 // try to load translation (html fix-up or something)
37     $fix_up="./fix_up/".str_replace("/","_",dirname($row[path])).".inc";
38 dpavlin 1.3
39     # $main.="<!-- trying to use fixup $fix_up -->"; ## DEBUG
40 dpavlin 1.2 if (file_exists($fix_up)) {
41     include($fix_up);
42 dpavlin 1.3 # $main.="<!-- fixup: $fix_up -->"; ## DEBUG
43 dpavlin 1.2 }
44 dpavlin 1.1 } else {
45     $main="<b>can't find multi page for id $p</b>";
46     }
47    
48     // fetch section
49     $sql="select section,item from menu where num=$row[menu_num]";
50     $sth = $dbh->prepare("$sql");
51     $sth->execute();
52     $menu_row=$sth->fetchrow_hash();
53     $section=$menu_row[section];
54     $title=" : $menu_row[item] $title";
55     $title=str_replace("\\n"," ",$title); // nuke nl chars
56    
57     // fetch all pages in this multi-page
58     $sql="select id,name from multi where visible and menu_num=$row[menu_num] order by menu_num,num";
59     $sth = $dbh->prepare("$sql");
60     $sth->execute();
61    
62     $multi_page_url=array();
63     $multi_page_options=array();
64     $multi_page_id=array();
65     $max=0;
66     while ($row=$sth->fetchrow_hash()) {
67     array_push($multi_page_url,"$PHP_SELF?p=$row[id]");
68     array_push($multi_page_id,$row[id]);
69 dpavlin 1.4 $drop_title=$row[name];
70     if (strlen($drop_title) > $max_title_len) $drop_title=substr($drop_title,0,$max_title_len)."...";
71     $multi_page_options[$row[id]]=$drop_title;
72 dpavlin 1.1 if ($row[id] == $p) {
73     $current=$max;
74     $curr_id=$row[id];
75     }
76     $max++;
77     }
78     $smarty->assign(array(
79     "multi_page_show" => 1,
80     "multi_page_current"=>($current+1),
81     "multi_page_max"=>$max,
82     "multi_page_prev"=>$multi_page_url[$current-1],
83     "multi_page_next"=>$multi_page_url[$current+1],
84     "multi_page_options"=>$multi_page_options,
85     "multi_page_curr_id"=>$curr_id
86     ));
87     }
88    
89     require("inc/section.php");
90     include("common.inc");
91    
92     $smarty->assign(array(section=>$section,
93     mpic=>$mpic,
94     Section_title=>$title,
95     rnd=>$rnd,
96     MAIN=>$main,
97     ));
98    
99     $smarty->display("index.tpl");
100     ?>

  ViewVC Help
Powered by ViewVC 1.1.26