实用的php函数

时间：2006-02-16 来源：瘦死的骆驼

* @version 1.14 $Id 2003-05-30 10:10:08 $
*/
/**
* 弹出提示框
*
* @access public
* @param string $txt 弹出一个提示框，$txt为要弹出的内容
* @return void
*/
function popbox($txt) {
echo "alert('".$txt."')";
}
/**
* 非法操作警告
*
* @access public
* @param string $C_alert 提示的错误信息
* @param string $I_goback  返回后返回到哪一页,不指定则不返回
* @return void
*/
function alert($C_alert,$I_goback='main.php') {
if(!empty($I_goback)) {
      echo "alert('$C_alert');window.location.href='$I_goback';";
} else {
      echo "alert('$C_alert');";
}
}
/**
* 产生随机字符串
*
* 产生一个指定长度的随机字符串,并返回给用户
*
* @access public
* @param int $len  产生字符串的位数
* @return string
*/
function randstr($len=6) {

[email=$chars='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-@#~']$chars='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-@#~'[/email]
;
// characters to build the password from
mt_srand((double)microtime()*1000000*getmypid());
// seed the random number generater (must be done)
$password='';
while(strlen($password)
/**
* 判断下拉菜音的选取项
*
* 可以判断字符串一和字符串二是否相等.从而使相等的项目在下拉菜单中被选择
*
* @access public
* @param string $str1  要比较的字符串一
* @param string $str2  要比较的字符串二
* @return string    相等返回字符串"selected",否则返回空字符串
*/
function ckselect($str1,$str2) {
if($str1==$str2) {
      return ' selected';
}
return '';
}
/**
* 一个自定义的Ftp函数
*
* @access private
* @return void
*/
function myftp($ftp_server,$ftp_port,$ftp_username,$ftp_password,$ftp_path='/') {

[email=$ftpid=@ftp_connect($ftp_server,$ftp_port]$ftpid=@ftp_connect($ftp_server,$ftp_port[/email]
) or die('Connect To Ftp Server Error!');
@ftp_login($ftpid,$ftp_username,$ftp_password) or die('Login Ftp Error!');
@ftp_chdir($ftpid,'/wwwroot/'.$ftp_path) or die('Chdir Error!');
return $ftpid;
}
/**
* 截取中文部分字符串
*
* 截取指定字符串指定长度的函数,该函数可自动判定中英文,不会出现乱码
*
* @access public
* @param string $str 要处理的字符串
* @param int    $strlen 要截取的长度默认为10
* @param string $other  是否要加上省略号,默认会加上
* @return string
*/
function showtitle($str,$strlen=10,$other=true) {
$j = 0;
for($i=0;$i0xa0) $j++;
if($j%2!=0) $strlen++;
$rstr=substr($str,0,$strlen);
if (strlen($str)>$strlen && $other) {$rstr.='...';}
return $rstr;
}
/**
* 制作链接
*
* @access public
* @param string url       要链接到的网址
* @param string linktext 显示的链接文字
* @param string target    目标框架
* @param string extras    扩展参数
* @return string
*/
function make_link ($url, $linktext=false, $target=false, $extras=false) {
return sprintf("%s",
      $url,
      ($target ? ' target="'.$target.'"' : ''),
      ($extras ? ' '.$extras : ''),
      ($linktext ? $linktext : $url)
);
}
/**
* 格式化用户评论
*
* @access public
* @param string
* @return void
*/
function clean_note($text) {
$text = htmlspecialchars(trim($text));
/* turn urls into links */
$text = preg_replace("/((mailto|http|ftp|nntp|news):.+?)(>|\s|\)|\"|\.\s|$)/","\1\3",$text);
/* this 'fixing' code will go away eventually. */
$fixes = array('
', '', '');
reset($fixes);
while (list(,$f) = each($fixes)) {
      $text = str_replace(htmlspecialchars($f), $f, $text);
      $text = str_replace(htmlspecialchars(strtoupper($f)), $f, $text);
}

/*  tags make things look awfully weird (breaks things out of the
   tag). Just convert them to
's
*/
$text = str_replace (array ('', ''), '
', $text);

/* Remove  tags to prevent it from showing up in the note */
$text = str_replace (array ('', ''), '', $text);
/* preserve linebreaks */
$text = str_replace("\n", "
", $text);
/* this will only break long lines */
if (function_exists("wordwrap")) {
      $text = wordwrap($text);
}

// Preserve spacing of user notes
$text = str_replace("  ", " ", $text);
return $text;
}
/**
* 获取图象信息的函数
*
* 一个全面获取图象信息的函数
*
* @access public
* @param string $img 图片路径
* @return array
*/
function getimageinfo($img) {
$img_info = getimagesize($img);
switch ($img_info[2]) {
case 1:
$imgtype = "GIF";
break;
case 2:
$imgtype = "JPG";
break;
case 3:
$imgtype = "PNG";
break;
}
$img_size = ceil(filesize($img)/1000)."k";
$new_img_info = array (
      "width"=>$img_info[0],
      "height"=>$img_info[1],
      "type"=>$imgtype,
      "size"=>$img_size
);
return $new_img_info;
}
/**
* 计算当前时间
*
* 以微秒为单位返回当前系统的时间
*
* @access public
* @return real
*/
function getmicrotime() {
$tmp = explode(' ', microtime());
return (real)$tmp[1]. substr($tmp[0], 1);
}
/**
* 写文件操作
*
* @access public
* @param bool
* @return void
*/
function wfile($file,$content,$mode='w') {
$oldmask = umask(0);
$fp = fopen($file, $mode);
if (!$fp) return false;
fwrite($fp,$content);
fclose($fp);
umask($oldmask);
return true;
}
/**
* 加载模板文件
*
* @access public
* @return void
*/
function tpl_load($tplfile,$path='./templates/',$empty='remove') {
global $tpl;
$path ? '' : $path='./templates/';
require_once 'HTML/Template/PHPLIB.php';
$tpl = new Template_PHPLIB($path,$empty);

$tpl->setFile('main',$tplfile);
}
/**
* 模板解析输出
*
* @access public
* @return void
*/
function tpl_output() {
global $tpl;
$tpl->parse('output','main');
$tpl->p('output');
}
/**
* 邮件发送函数
*
* @access public private
* @param bool
* @return void
*/
function mailSender($from, $to, $title, $content) {
$from ? $from =
[email='[email protected]']'[email protected]'[/email]
: '';
$title ? $title = 'From Exceed PHP...' : '';
$sig = "
   感谢您使用我们的服务.\n\n
                                             Exceed PHP(超越PHP)\n
                                             $maildate\n\n
---------------------------------------------------------------------------------------
\n\n
去发现极限方法的唯一办法就是去超越它\n
超越PHP欢迎您(
http://www.phpe.net)\n
";
$content .= $sig;
if (@_mail($to, $title, $content, "From:$from\nReply-To:$from")) {
      return true;
} else {
      return false;
}
}
/**
* UBB解析
*
* @param    none
* @access    public
* @return    void
*/
function ubbParse($txt, $coverhtml=0) {
if ($coverhtml == 0) $txt = nl2br(htmlspecialchars($txt));  //BR和HTML转换
//只转换BR，不转换HTML
if ($coverhtml == 1) {
      if (!preg_match('/^$/s', $txt) && !preg_match('//is', $txt)) {
         $txt = strip_tags($txt);
         $txt = nl2br($txt);
      }
}
// pre and quote
$txt = preg_replace( "#\[quote\](.+?)\[/quote\]#is", "\1", $txt );
$txt = preg_replace( "#\[code\](.+?)\[/code\]#is", "\1", $txt );
// Colors 支持篏套
while( preg_match( "#\[color=([^\]]+)\](.+?)\[/color\]#is", $txt ) ) {
      $txt = preg_replace( "#\[color=([^\]]+)\](.+?)\[/color\]#is", "\2", $txt );
}
// Align
$txt = preg_replace( "#\[center\](.+?)\[/center\]#is", "\1", $txt );
$txt = preg_replace( "#\[left\](.+?)\[/left\]#is", "\1", $txt );
$txt = preg_replace( "#\[right\](.+?)\[/right\]#is", "\1", $txt );
// Sub & sup
$txt = preg_replace( "#\[sup\](.+?)\[/sup\]#is", "\1", $txt );
$txt = preg_replace( "#\[sub\](.+?)\[/sub\]#is", "\1", $txt );
// email tags
// [email protected] Email me
$txt = preg_replace( "#\[email\](\S+?)\[/email\]#i"                                                             , "\1", $txt );
$txt = preg_replace( "#\[email\s*=\s*\&quot\;([\.\w\-]+\@[\.\w\-]+\.[\.\w\-]+)\s*\&quot\;\s*\](.*?)\[\/email\]#i"  , "\2", $txt );
$txt = preg_replace( "#\[email\s*=\s*([\.\w\-]+\@[\.\w\-]+\.[\w\-]+)\s*\](.*?)\[\/email\]#i"                      , "\2", $txt );
// url tags
// http://www.phpe.net Exceed PHP!
$txt = preg_replace( "#\[url\](\S+?)\[/url\]#i"                                     , "\1", $txt );
$txt = preg_replace( "#\[url\s*=\s*\&quot\;\s*(\S+?)\s*\&quot\;\s*\](.*?)\[\/url\]#i" , "\2", $txt );
$txt = preg_replace( "#\[url\s*=\s*(\S+?)\s*\](.*?)\[\/url\]#i"                      , "\2", $txt );
// Start off with the easy stuff
$txt = preg_replace( "#\[b\](.+?)\[/b\]#is", "\1", $txt );
$txt = preg_replace( "#\[i\](.+?)\[/i\]#is", "\1", $txt );
$txt = preg_replace( "#\[u\](.+?)\[/u\]#is", "\1", $txt );
$txt = preg_replace( "#\[s\](.+?)\[/s\]#is", "\1", $txt );
// Images
$txt = preg_replace( "#\[img\](.+?)\[/img\]#i", "500) this.width=500' align='center' hspace='10' vspace='10'>
", $txt );

// Attach
$txt = preg_replace( "#\[attach\s*=\s*\&quot\;\s*(\S+?)\s*\&quot\;\s*\](.*?)\[\/attach\]#i" , "相关附件：\1", $txt );
$txt = preg_replace( "#\[attach\s*=\s*(\S+?)\s*\](.*?)\[\/attach\]#i"                      , "相关附件：\1", $txt );
// Iframe
$txt = preg_replace( "#\[iframe\](.+?)\[/iframe\]#i", "在新窗口打开链接", $txt );
// (c) (r) and (tm)
$txt = preg_replace( "#$c$#i"    , "©" , $txt );
$txt = preg_replace( "#$tm$#i" , "™" , $txt );
$txt = preg_replace( "#$r$#i"    , "®"  , $txt );

return $txt;
}
?>

print('正在加载，请稍等...
三秒后自动跳转~~~');
/*
补充说明：
若等待时间为0，则与header("location:")等效。
*/
?>
删除数组
function remove(&$arr,$del_value)//$arr 为要执行的数组,$del_value为要删除的值
{
   foreach ($arr AS $key => $val)
   {
            if(is_array($arr[$key]))
         {
            remove($arr[$key],$del_value);
         }
         elseif($arr[$key]===$del_value)
         {
                  unset($arr[$key]);
         }
   }
}