corp_html/inc/Smarty.local.php

<?php

//-----------------------------------------
// Custom made by Dobrica Pavlinusic <dpavlin@rot13.org>

// helper function to make full path of relative dir
function dir2path($dir) {
        if (substr($dir,0,1) != "/") {
                return dirname($GLOBALS[SCRIPT_FILENAME])."/$dir";
        } else {
                return $dir;
        }
}

function smarty_func_img() {
        extract(func_get_arg(0));

        $f=Array();

        global $img_time;
        if (!isset($img_time)) {
                $img_time=time();
        }
                

        if (isset($dir)) {
                $tdir=dir2path($dir);
                $h=opendir($dir);
                $pics=0;
                while ($tmp = readdir($h)) {
                        if (is_file("$tdir/$tmp") && substr($tmp,0,1)!=".") {
//                              print "$tdir/$tmp<br>\n";
                                $f[]=$tmp;
                                $pics++;
                        }
                }
                closedir($h);
//              $f=shuffle($f);
                $ord=($img_time+$nr) % $pics;
                $src="$dir/$f[$ord]";
        }

        $add="";
        if (isset($border)) {
                $add.=" border=\"$border\"";
        }
        if (isset($alt)) {
                $add.=" alt=\"$alt\"";
        }
        if (isset($align)) {
                $add.=" align=\"$align\"";
        }
        if (isset($hspace)) {
                $add.=" hspace=\"$hspace\"";
        }
        if (isset($vspace)) {
                $add.=" vspace=\"$vspace\"";
        }

        $out="";
        $product_link = array (
"andol.gif"=>"http://www.pliva.hr/human_health.php?search=andol&show_description=on#results",
"andol_c.jpg"=>"http://www.pliva.hr/human_health.php?search=andol%25c&show_description=on#results",
"bisolex.jpg"=>"http://www.pliva.hr/human_health.php?search=bisolex&show_description=on#results",
"plibex.gif"=>"http://www.pliva.hr/human_health.php?search=plibex&show_description=on#results",
"plivit_b.gif"=>"http://www.pliva.hr/human_health.php?search=plivit%25b&show_description=on#results",
"plivit_b6.gif"=>"http://www.pliva.hr/human_health.php?search=plivit%25b6&show_description=on#results",
"plivit_c.gif"=>"http://www.pliva.hr/human_health.php?search=plivit%25c&show_description=on#results",
"plivazdravlje.gif"=>"http://www.plivazdravlje.hr/",
"plivamed.gif"=>"http://www.plivamed.net/",
        );

        $pic=basename($src);
        if ($product_link[$pic]) {
                $out.="<a href=\"$product_link[$pic]\">";
                $add.=" border=\"0\"";
        }

        $size = GetImageSize(dir2path($src));
        $out.="<img src=\"$src\" $size[3]$add>";
        if ($product_link[$pic]) {
                $out.="</a>";
        }
        print $out;
}

// checkboxes

function smarty_func_html_checkboxes()
{
        $print_result = true;

        extract(func_get_arg(0));

        settype($output, 'array');
        settype($values, 'array');

        $html_result = "";

        for ($i = 0; $i < count($output); $i++) {
                /* By default, check value against $selected */
                $sel_check = $values[$i];
                if (isset($before)) $html_result.=$before;
                $html_result .= "<input type=checkbox name=\"".$values[$i]."\"";
                if (isset($GLOBALS[$values[$i]])) {
                        $html_result .= " checked";
                }
                $html_result .= ">".$output[$i]."\n";
                if (isset($after)) $html_result.=$after;
        }

        if ($print_result)
                print $html_result;
        else
                return $html_result;
}

// $filename|filesize:"dir":"unit"
//
// dir -- path to file (or "")
// unit -- Mb|Kb|auto

function smarty_mod_filesize($file,$dir,$unit="")
{
        $path=dir2path("$dir/$file");
        $ext=explode(".",$file);
        $ext=strtoupper(array_pop($ext));

        if ($size=filesize($path)) {
                switch ($unit) {
                        case 'Mb':
                        case 'mb':
                                return sprintf("%s, %2.1f Mb",$ext,$size/(1024*1024));
                        case 'Kb':
                        case 'kb':
                                return sprintf("%s, %2.1f Mb",$ext,$size/1024);
                        case 'auto':
                                $size=$size/1024; # Kb
                                if ($size > 1024) {
                                        return sprintf("%s, %2.1f Mb",$ext,$size/1024);
                                } else {
                                        return sprintf("%s, %2.1f Kb",$ext,$size);
                                }
                                        
                }
                return $size;
        }
}

// input functions (input, rinput)

function smarty_func_input() {
        extract(func_get_arg(0));
        if (strtolower($type) == "radio") {
                print "<input name=\"$name\" type=\"radio\" value=\"$value\"";
                if ($GLOBALS[$name] == $value) print " checked";
                print ">";
        } else {
                print "<input name=\"$name\" size=\"$size\" value=\"".$GLOBALS[$name]."\">";
        }
        if ($type) print "<input type=\"hidden\" name=\"inputs_required_type[$name]\" value=\"$type\">";
}

function smarty_func_textarea() {
        extract(func_get_arg(0));
        print "<textarea name=\"$name\" cols=\"$cols\" rows=\"$rows\">".$GLOBALS[$name]."</textarea>";
}

function smarty_func_rinput() {
        extract(func_get_arg(0));
        global $inputs_required_type;
        $ok=1;
        if (! isset($GLOBALS[$name]) || $GLOBALS[$name] == "") {
                $ok=0;
        } else {
                switch($inputs_required_type[$name]) {
                        case 'email':
                                if (!strstr($GLOBALS[$name],'@')) $ok=0;
                }
        }
        if ($ok) {
                print "$desc";
        } else {
                print "<b>$desc</b>";
        }
        print "<input type=\"hidden\" name=\"inputs_required[]\" value=\"$name\">";
}

// not strictly smarty, but it should be here and not in common.inc

function check_required() {
        global $inputs_required;
        global $inputs_required_type;
        $ok=1;
        if (isset($inputs_required)) {
                foreach ($inputs_required as $i) {
                        if (! isset($GLOBALS[$i]) || $GLOBALS[$i] == "") $ok=0;
                        switch (strtolower($inputs_required_type[$i])) {
                                case 'email':
                                        if (!strstr($GLOBALS[$i],'@')) $ok=0;
                        }
//                      print "$i: $GLOBALS[$i] type: $inputs_required_type[$i] $ok -- ";

                }
        } else {
                print "<!-- no inputs required -->";
        }
        return $ok;
}

?>
1	dpavlin	1.1	<?php
2
3			//-----------------------------------------
4			// Custom made by Dobrica Pavlinusic <dpavlin@rot13.org>
5
6	dpavlin	1.9	// helper function to make full path of relative dir
7			function dir2path($dir) {
8			if (substr($dir,0,1) != "/") {
9			return dirname($GLOBALS[SCRIPT_FILENAME])."/$dir";
10			} else {
11			return $dir;
12			}
13			}
14
15	dpavlin	1.1	function smarty_func_img() {
16			extract(func_get_arg(0));
17
18			$f=Array();
19
20			global $img_time;
21			if (!isset($img_time)) {
22			$img_time=time();
23			}
24
25
26			if (isset($dir)) {
27	dpavlin	1.9	$tdir=dir2path($dir);
28	dpavlin	1.1	$h=opendir($dir);
29			$pics=0;
30			while ($tmp = readdir($h)) {
31			if (is_file("$tdir/$tmp") && substr($tmp,0,1)!=".") {
32			// print "$tdir/$tmp<br>\n";
33			$f[]=$tmp;
34			$pics++;
35			}
36			}
37			closedir($h);
38			// $f=shuffle($f);
39			$ord=($img_time+$nr) % $pics;
40			$src="$dir/$f[$ord]";
41			}
42
43			$add="";
44			if (isset($border)) {
45			$add.=" border=\"$border\"";
46			}
47			if (isset($alt)) {
48			$add.=" alt=\"$alt\"";
49			}
50			if (isset($align)) {
51			$add.=" align=\"$align\"";
52			}
53			if (isset($hspace)) {
54			$add.=" hspace=\"$hspace\"";
55			}
56			if (isset($vspace)) {
57			$add.=" vspace=\"$vspace\"";
58			}
59
60	dpavlin	1.2	$out="";
61			$product_link = array (
62	dpavlin	1.8	"andol.gif"=>"http://www.pliva.hr/human_health.php?search=andol&show_description=on#results",
63			"andol_c.jpg"=>"http://www.pliva.hr/human_health.php?search=andol%25c&show_description=on#results",
64			"bisolex.jpg"=>"http://www.pliva.hr/human_health.php?search=bisolex&show_description=on#results",
65			"plibex.gif"=>"http://www.pliva.hr/human_health.php?search=plibex&show_description=on#results",
66			"plivit_b.gif"=>"http://www.pliva.hr/human_health.php?search=plivit%25b&show_description=on#results",
67			"plivit_b6.gif"=>"http://www.pliva.hr/human_health.php?search=plivit%25b6&show_description=on#results",
68			"plivit_c.gif"=>"http://www.pliva.hr/human_health.php?search=plivit%25c&show_description=on#results",
69	dpavlin	1.10	"plivazdravlje.gif"=>"http://www.plivazdravlje.hr/",
70			"plivamed.gif"=>"http://www.plivamed.net/",
71	dpavlin	1.2	);
72
73			$pic=basename($src);
74			if ($product_link[$pic]) {
75			$out.="<a href=\"$product_link[$pic]\">";
76			$add.=" border=\"0\"";
77			}
78
79	dpavlin	1.9	$size = GetImageSize(dir2path($src));
80	dpavlin	1.2	$out.="<img src=\"$src\" $size[3]$add>";
81			if ($product_link[$pic]) {
82			$out.="</a>";
83			}
84			print $out;
85	dpavlin	1.1	}
86
87			// checkboxes
88
89			function smarty_func_html_checkboxes()
90			{
91			$print_result = true;
92
93			extract(func_get_arg(0));
94
95			settype($output, 'array');
96			settype($values, 'array');
97
98			$html_result = "";
99
100			for ($i = 0; $i < count($output); $i++) {
101			/* By default, check value against $selected */
102			$sel_check = $values[$i];
103			if (isset($before)) $html_result.=$before;
104			$html_result .= "<input type=checkbox name=\"".$values[$i]."\"";
105			if (isset($GLOBALS[$values[$i]])) {
106			$html_result .= " checked";
107			}
108			$html_result .= ">".$output[$i]."\n";
109			if (isset($after)) $html_result.=$after;
110			}
111
112			if ($print_result)
113			print $html_result;
114			else
115			return $html_result;
116			}
117
118	dpavlin	1.4	// $filename\|filesize:"dir":"unit"
119			//
120			// dir -- path to file (or "")
121			// unit -- Mb\|Kb\|auto
122	dpavlin	1.3
123	dpavlin	1.4	function smarty_mod_filesize($file,$dir,$unit="")
124	dpavlin	1.3	{
125	dpavlin	1.9	$path=dir2path("$dir/$file");
126	dpavlin	1.7	$ext=explode(".",$file);
127			$ext=strtoupper(array_pop($ext));
128	dpavlin	1.3
129			if ($size=filesize($path)) {
130			switch ($unit) {
131			case 'Mb':
132			case 'mb':
133	dpavlin	1.7	return sprintf("%s, %2.1f Mb",$ext,$size/(1024*1024));
134	dpavlin	1.3	case 'Kb':
135			case 'kb':
136	dpavlin	1.7	return sprintf("%s, %2.1f Mb",$ext,$size/1024);
137	dpavlin	1.4	case 'auto':
138			$size=$size/1024; # Kb
139			if ($size > 1024) {
140	dpavlin	1.7	return sprintf("%s, %2.1f Mb",$ext,$size/1024);
141	dpavlin	1.4	} else {
142	dpavlin	1.7	return sprintf("%s, %2.1f Kb",$ext,$size);
143	dpavlin	1.4	}
144
145	dpavlin	1.3	}
146			return $size;
147			}
148			}
149
150	dpavlin	1.5	// input functions (input, rinput)
151
152			function smarty_func_input() {
153			extract(func_get_arg(0));
154	dpavlin	1.11	if (strtolower($type) == "radio") {
155			print "<input name=\"$name\" type=\"radio\" value=\"$value\"";
156			if ($GLOBALS[$name] == $value) print " checked";
157			print ">";
158			} else {
159			print "<input name=\"$name\" size=\"$size\" value=\"".$GLOBALS[$name]."\">";
160			}
161	dpavlin	1.5	if ($type) print "<input type=\"hidden\" name=\"inputs_required_type[$name]\" value=\"$type\">";
162			}
163
164	dpavlin	1.11	function smarty_func_textarea() {
165			extract(func_get_arg(0));
166			print "<textarea name=\"$name\" cols=\"$cols\" rows=\"$rows\">".$GLOBALS[$name]."</textarea>";
167			}
168
169	dpavlin	1.5	function smarty_func_rinput() {
170			extract(func_get_arg(0));
171			global $inputs_required_type;
172			$ok=1;
173			if (! isset($GLOBALS[$name]) \|\| $GLOBALS[$name] == "") {
174			$ok=0;
175			} else {
176			switch($inputs_required_type[$name]) {
177			case 'email':
178			if (!strstr($GLOBALS[$name],'@')) $ok=0;
179			}
180			}
181			if ($ok) {
182			print "$desc";
183			} else {
184			print "<b>$desc</b>";
185			}
186	dpavlin	1.11	print "<input type=\"hidden\" name=\"inputs_required[]\" value=\"$name\">";
187	dpavlin	1.5	}
188	dpavlin	1.12
189			// not strictly smarty, but it should be here and not in common.inc
190
191			function check_required() {
192			global $inputs_required;
193			global $inputs_required_type;
194			$ok=1;
195			if (isset($inputs_required)) {
196			foreach ($inputs_required as $i) {
197			if (! isset($GLOBALS[$i]) \|\| $GLOBALS[$i] == "") $ok=0;
198			switch (strtolower($inputs_required_type[$i])) {
199			case 'email':
200			if (!strstr($GLOBALS[$i],'@')) $ok=0;
201			}
202			// print "$i: $GLOBALS[$i] type: $inputs_required_type[$i] $ok -- ";
203
204			}
205			} else {
206			print "<!-- no inputs required -->";
207			}
208			return $ok;
209			}
210
211	dpavlin	1.1	?>