X-Git-Url: https://vcs.fsf.org/?a=blobdiff_plain;f=functions%2Fhtml.php;h=c07964163fc3d78301df24167d875830e51da8d1;hb=d8a255feb14375b3d65605c6eb260b72ae1136dd;hp=525ccffc871b0fd10b573a4201370ea7ed071e85;hpb=6330a3067970197aa4d47c08efc4e1954a7de127;p=squirrelmail.git
diff --git a/functions/html.php b/functions/html.php
index 525ccffc..c0796416 100644
--- a/functions/html.php
+++ b/functions/html.php
@@ -3,7 +3,7 @@
/**
* html.php
*
- * Copyright (c) 1999-2002 The SquirrelMail Project Team
+ * Copyright (c) 1999-2004 The SquirrelMail Project Team
* Licensed under the GNU GPL. For full terms see the file COPYING.
*
* The idea is to inlcude here some functions to make easier
@@ -11,159 +11,172 @@
* html outputs.
*
* $Id$
+ * @package squirrelmail
*/
- function html_tag( $tag, // Tag to output
- $val = '', // Value between tags (if empty only start tag is issued)
+/**
+ * Generate html tags
+ *
+ * @param string $tag Tag to output
+ * @param string $val Value between tags
+ * @param string $align Alignment (left, center, etc)
+ * @param string $bgcolor Back color in hexadecimal
+ * @param string $xtra Extra options
+ * @return string HTML ready for output
+ */
+function html_tag( $tag, // Tag to output
+ $val = '', // Value between tags
$align = '', // Alignment
$bgcolor = '', // Back color
$xtra = '' ) { // Extra options
-
- GLOBAL $languages, $squirrelmail_language;
-
- $align = strtolower( $align );
- $bgc = '';
- $tag = strtoupper( $tag );
-
- if ( isset( $languages[$squirrelmail_language]['DIR']) ) {
- $dir = $languages[$squirrelmail_language]['DIR'];
- } else {
- $dir = 'ltr';
- }
-
- if ( $dir == 'ltr' ) {
- $rgt = 'right';
- $lft = 'left';
- } else {
- $rgt = 'left';
- $lft = 'right';
- }
-
- if ( $bgcolor <> '' ) {
- $bgc = " BGCOLOR=\"$bgcolor\"";
- }
-
- switch ( $align ) {
- case '':
- $alg = '';
- break;
- case 'right':
- $alg = " ALIGN=\"$rgt\"";
- break;
- case 'left':
- $alg = " ALIGN=\"$lft\"";
- break;
- default:
- $alg = " ALIGN=\"$align\"";
- break;
- }
-
- $ret = "<$tag";
-
- if ( $dir <> 'ltr' ) {
- $ret .= " DIR=\"$dir\"";
- }
- $ret .= "$bgc$alg";
-
- if ( $xtra <> '' ) {
- $ret .= " $xtra";
- }
- $ret .= '>';
-
- if ( $val <> '' ) {
- $ret .= "$val";
- }
-
+
+ GLOBAL $languages, $squirrelmail_language;
+
+ $align = strtolower( $align );
+ $bgc = '';
+ $tag = strtolower( $tag );
+
+ if ( isset( $languages[$squirrelmail_language]['DIR']) ) {
+ $dir = $languages[$squirrelmail_language]['DIR'];
+ } else {
+ $dir = 'ltr';
+ }
+
+ if ( $dir == 'ltr' ) {
+ $rgt = 'right';
+ $lft = 'left';
+ } else {
+ $rgt = 'left';
+ $lft = 'right';
+ }
+
+ if ( $bgcolor <> '' ) {
+ $bgc = " bgcolor=\"$bgcolor\"";
+ }
+
+ switch ( $align ) {
+ case '':
+ $alg = '';
+ break;
+ case 'right':
+ $alg = " align=\"$rgt\"";
+ break;
+ case 'left':
+ $alg = " align=\"$lft\"";
+ break;
+ default:
+ $alg = " align=\"$align\"";
+ break;
+ }
+
+ $ret = "<$tag";
+
+ if ( $dir <> 'ltr' ) {
+ $ret .= " dir=\"$dir\"";
+ }
+ $ret .= $bgc . $alg;
+
+ if ( $xtra <> '' ) {
+ $ret .= " $xtra";
+ }
+
+ if ( $val <> '' ) {
+ $ret .= ">$val";
+ } else {
+ $ret .= '>';
+ }
+
return( $ret );
}
/* handy function to set url vars */
/* especially usefull when $url = $PHP_SELF */
- function set_url_var($url, $var, $val=0) {
- $k = '';
- $ret = '';
- $url = trim(preg_replace('/&/','&',$url));
-
- $pat_a = array (
+ function set_url_var($url, $var, $val=0, $link=true) {
+ $k = '';
+ $ret = '';
+ $pat_a = array (
'/.+(\\&'.$var.')=(.*)\\&/AU', /* in the middle */
- '/.+\\?('.$var.')=(.*\\&).+/AU', /* at front, more follow */
- '/.+(\\?'.$var.')=(.*)$/AU', /* at front and only var */
- '/.+(\\&'.$var.')=(.*)$/AU' /* at the end */
- );
- switch (true) {
- case (preg_match($pat_a[0],$url,$regs)):
- $k = $regs[1];
- $v = $regs[2];
- break;
- case (preg_match($pat_a[1],$url,$regs)):
- $k = $regs[1];
- $v = $regs[2];
- break;
- case (preg_match($pat_a[2],$url,$regs)):
- $k = $regs[1];
- $v = $regs[2];
- break;
- case (preg_match($pat_a[3],$url,$regs)):
- $k = $regs[1];
- $v = $regs[2];
- break;
- default:
- if ($val) {
- if (strpos($url,'?')) {
-
- $url .= "&$var=$val";
- } else {
-
- $url .= "?$var=$val";
- }
- }
- break;
- }
-
- if ($k) {
- if ($val) {
- $pat = "/$k=$v/";
- $rpl = "$k=$val";
- echo "$pat , $rpl
";
- $url = preg_replace($pat,$rpl,$url);
- } else {
- $pat = "/$k=$v/";
- $url = preg_replace($pat,'',$url);
+ '/.+\\?('.$var.')=(.*\\&).+/AU', /* at front, more follow */
+ '/.+(\\?'.$var.')=(.*)$/AU', /* at front and only var */
+ '/.+(\\&'.$var.')=(.*)$/AU' /* at the end */
+ );
+ preg_replace('/&/','&',$url);
+ switch (true) {
+ case (preg_match($pat_a[0],$url,$regs)):
+ $k = $regs[1];
+ $v = $regs[2];
+ break;
+ case (preg_match($pat_a[1],$url,$regs)):
+ $k = $regs[1];
+ $v = $regs[2];
+ break;
+ case (preg_match($pat_a[2],$url,$regs)):
+ $k = $regs[1];
+ $v = $regs[2];
+ break;
+ case (preg_match($pat_a[3],$url,$regs)):
+ $k = $regs[1];
+ $v = $regs[2];
+ break;
+ default:
+ if ($val) {
+ if (strpos($url,'?')) {
+ $url .= "&$var=$val";
+ } else {
+ $url .= "?$var=$val";
+ }
+ }
+ break;
}
- }
- return preg_replace('/&/','&',$url);
- }
+
+ if ($k) {
+ if ($val) {
+ $rpl = "$k=$val";
+ if ($link) {
+ $rpl = preg_replace('/&/','&',$rpl);
+ }
+ } else {
+ $rpl = '';
+ }
+ $pat = "/$k=$v/";
+ $url = preg_replace($pat,$rpl,$url);
+ }
+ return $url;
+ }
/* Temporary test function to proces template vars with formatting.
- * I use it for viewing the message_header (view_header.php) with
+ * I use it for viewing the message_header (view_header.php) with
* a sort of template.
- */
+ */
function echo_template_var($var, $format_ar = array() ) {
- $frm_last = count($format_ar) -1;
-
- if (isset($format_ar[0])) echo $format_ar[0];
- $i = 1;
-
- switch (true) {
- case (is_string($var)):
- echo $var;
- break;
- case (is_array($var)):
- $frm_a = array_slice($format_ar,1,$frm_last-1);
- foreach ($var as $a_el) {
- if (is_array($a_el)) {
- echo_template_var($a_el,$frm_a);
- } else {
- echo $a_el;
- if (isset($format_ar[$i])) echo $format_ar[$i];
- $i++;
- }
- }
- break;
- default:
- break;
- }
- if (isset($format_ar[$frm_last]) && $frm_last>$i ) echo $format_ar[$frm_last];
- }
+ $frm_last = count($format_ar) -1;
+ if (isset($format_ar[0])) echo $format_ar[0];
+ $i = 1;
+
+ switch (true) {
+ case (is_string($var)):
+ echo $var;
+ break;
+ case (is_array($var)):
+ $frm_a = array_slice($format_ar,1,$frm_last-1);
+ foreach ($var as $a_el) {
+ if (is_array($a_el)) {
+ echo_template_var($a_el,$frm_a);
+ } else {
+ echo $a_el;
+ if (isset($format_ar[$i])) {
+ echo $format_ar[$i];
+ }
+ $i++;
+ }
+ }
+ break;
+ default:
+ break;
+ }
+ if (isset($format_ar[$frm_last]) && $frm_last>$i ) {
+ echo $format_ar[$frm_last];
+ }
+ }
?>