设为首页 友情链接
在线留言 发表文章
加入收藏 广告联系

刺猬首页

| 专案技术 | 网络技术 | 图形图象 | 网络编程 | 网页设计 | 操作系统 | 服务器 | 技术白皮书 | 在线实验室 | 刺猬论坛 |
小说专版  | 数据库 | 设计赏析 | 存储频道 | 网络安全 | 私服架设 |  Solaris | 网站评估 | PC维护技巧 | 下载中心 | 博 客 |
专   题: | Linux | java | cisco | 防病毒 | 刀片 | SOA | iscsi | ASP.NET | SQL | Oracle |
您现在的位置: IT公社 IT community >> 网络编程 >> PHP >> 教程正文 用户登录 新用户注册
专 题 栏 目
最 新 热 门
最 新 推 荐
相 关 文 章
使用TurboGears和Python…
PHP has encountered an…
PHP中for循环语句的几种…
为什么PHP令人不爽(对于…
如何利用PHP和CSS改变网…
PHP程序与服务器端通讯的…
PHPUnit袖珍指南之自动测…
用php或js获取图片大小,…
还是说php实现singleton…
PHP实现简单线性回归之数…
  使用php重新实现PHP脚本引擎内置函数         
使用php重新实现PHP脚本引擎内置函数
 

实在无聊,突发奇想,想把PHP里面部分已经提供封装好的函数重新使用PHP实现一遍,
// 于是便有了下面的代码主要实现了PHP中部分字符串处理函数,同时实现了一些PHP中
// 没有,但是同样有作用的字符串处理函数同样的这些函数,也能够使用其他语言来实 
// 现,比如用C/VBScript/Perl等等,那么你就能够有一个自己的函数库.             
// 以下函数不一定能够成功运行,只是为了学习而已。                            
//                                                                          
// 如果无特别声明,全部是由于heiyeluren原创,要使用任何函数都请保留作者信息   


/**
 * String Functions Reconstruct
 *
 * Copyright (c) 2005 heiyeluren <heiyeluren@163.com>
 * Author: heiyeluren <heiyeluren@163.com>

 * $Id: StringFunctions.php,v 0.1 e 2005-5-29 23:21 heiyeluren Exp $
**/


// {{{ strlen()
/**
 * Count string length
 *
 * @param string $str need count length string variable
 * @return int    return count result
 * @version v0.1
 * @create 2005-5-24
 * @modified 2005-5-24
 * @author heiyeluren <hyeiyeluren@163.com>
 */
function strlen1($str)
{
 if ($str == '')
  return 0;
 
 $count = 0;
 while (1)
 {
  if ($str[$count] != NULL)
  {
   $count++;
   continue;
  }
  else
   break;
 }
 return $count;
}
// }}}


// {{{ substr()
/**
 * Get sub string
 *
 * @param string $str need get sub string variable
 * @param int  $start start get sub string
 * @param int  $length need get string length
 * @return string   return sub string
 * @version v0.2
 * @create 2005-5-24
 * @modified 2005-5-25
 * @author heiyeluren <hyeiyeluren@163.com>
 */
function substr1($str, $start, $length=0)
{
 if ($str == '')
  return;
 if ($start > strlen($str))
  return;
 if (($length != NULL) && ($start > 0) && ($length > strlen($str)-$start))
  return;
 if (($length != NULL) && ($start < 0) && ($length > strlen($str)+$start))
  return;

 if ($length == NULL)
  $length = (strlen($str) - $start);
 
 if ($start < 0)
 {
  for ($i=(strlen($str)+$start); $i<(strlen($str)+$start+$length); $i++)
  {
   $substr .= $str[$i];
  }
 }

 if ($length > 0)
 {
  for ($i=$start; $i<($start+$length); $i++)
  {
   $substr .= $str[$i];
  }
 }

 if ($length < 0)
 {
  for ($i=$start; $i<(strlen($str)+$length); $i++)
  {
   $substr .= $str[$i];
  }
 }
 return $substr;
}
// }}}


// {{{ strrev()
/**
 * Reversal string order
 *
 * @param string $str need reversal string variable
 * @return string   reversal string
 * @version v0.1 www.knowsky.com
 * @create 2005-5-24
 * @modified 2005-5-24
 * @author heiyeluren <hyeiyeluren@163.com>
 */
function strrev1($str)
{
 if ($str == '')
  return 0;
 for ($i=(strlen($str)-1); $i>=0; $i--)
 {
  $rev_str .= $str[$i];
 }
 return $rev_str;
}
// }}}


// {{{ strcmp()
/**
 * String comparison
 *
 * @param string $s1 first string
 * @param string $s2 second string
 * @return int  return -1,str1 < str2; return 1, str1 > str2, str1 = str2,
 *    return 0, other, return false
 * @version v0.1
 * @create 2005-5-24
 * @modified 2005-5-24
 * @author heiyeluren <hyeiyeluren@163.com>
 */
function strcmp1($s1, $s2)
{
 if (strlen($s1) < strlen($s2))
  return -1;
 if (strlen($s1) > strlen($s2))
  return 1;

 for ($i=0; $i<strlen($s1); $i++)
 {
  if ($s1[$i] == $s2[$i])
   continue;
  else
   return false;
 }
 return 0;
}
// }}}


// {{{ strchr(), strstr(), strpos()
/**
 * Find first occurrence of a string
 *
 * @param string $str parent string
 * @param string $substr need match sub string
 * @return int  return find sub string at parent string first place,
 *    f not find, return false
 * @version v0.4
 * @create 2005-5-24
 * @modified 2005-5-29
 * @author heiyeluren <hyeiyeluren@163.com>
 */
function strchr1($str, $substr)
{
 $m = strlen($str);
 $n = strlen($substr);

 if ($m < $n)
  return false;

 for ($i=0; $i<=($m-$n+1); $i++)
 {
  $sub = substr($str, $i, $n);
  if (strcmp($sub, $substr) == 0)
   return $i;
 }
 return false;
}
// }}}


// {{{ str_replace()
/**
 * Replace all occurrences of the search string with the replacement string
 *
 * @param string $substr  need replace sub string variable
 * @param string $newsubstr new sub string
 * @param string $str  operate parent string
 * @return string   return replace after new parent string
 * @version v0.2
 * @create 2005-5-24
 * @modified 2005-5-29
 * @author heiyeluren <hyeiyeluren@163.com>
 */
function str_replace1($substr, $newsubstr, $str)
{
 $m = strlen($str);
 $n = strlen($substr);
 $x = strlen($newsubstr);

 if (strchr($str, $substr) == false)
  return false;

 for ($i=0; $i<=($m-$n+1); $i++)
 {
  $i = strchr($str, $substr);
  $str = str_delete($str, $i, $n);
  $str = str_insert($str, $i, $newstr);
 }
 return $str;
}
// }}}


/************ 以下串处理函数是PHP中没有的,自己写着玩 ***************/

// {{{ insert_str(), delete_str(), index_str()
/**
 * Basic string operate
 *
 * @param string $str need get sub string variable
 * @param int  $start start get sub string
 * @param int  $length need get string length
 * @return string  return sub string
 * @version v0.1
 * @create 2005-5-24
 * @modified 2005-5-24
 * @author heiyeluren <hyeiyeluren@163.com>
 */
function str_insert($str, $i, $substr)
{

 for($j=0; $j<$i; $j++)
 {
  $startstr .= $str[$j];
 }

 for ($j=$i; $j<strlen($str); $j++)
 {
  $laststr .= $str[$j];
 }
 $str = ($startstr . $substr . $laststr);
 
 return $str;
}


function str_delete($str, $i, $j)
{
 for ($c=0; $c<$i; $c++)
 {
  $startstr .= $str[$c];
 }

 for ($c=($i+$j); $c<strlen($str); $c++)
 {
  $laststr .= $str[$c];
 }

 $str = ($startstr . $laststr);

 return $str;
}
// }}}


// {{{ strcpy()
/**
 * Use designate sub string  replace string
 *
 * @param string $str need get sub string variable
 * @param int  $start start get sub string
 * @param int  $length need get string length
 * @return string  return sub string
 * @version v0.1
 * @create 2005-5-27
 * @modified 2005-5-27
 * @author heiyeluren <hyeiyeluren@163.com>
 */
function strcpy($s1, $s2)
{
 if (strlen($s1) == NULL)
  return;
 if (!isset($s2))
  return;

 for ($i=0; $i<strlen($s1); $i++)
 {
  $s2[] = $s1[$i];
 }
 return $s2;
}
// }}}


// {{{ strcat()
/**
 * Use designate sub string  replace string
 *
 * @param string $str need get sub string variable
 * @param int  $start start get sub string
 * @param int  $length need get string length
 * @return string  return sub string
 * @version v0.1
 * @create 2005-5-27
 * @modified 2005-5-27
 * @aut

[1] [2] 下一页

频道声明:本频道的文章除部分特别声明禁止转载的专稿外,可以自由转载.但请务必注明出出处和原始作者 文章版权归本频道与文章作者所有.对于被频道转载文章的个人和网站,我们表示深深的谢意。

原始作者:佚名 录入时间:2007-1-3 3:31:35
信息来源:不详 投稿信箱:itqoo@126.com
教程录入:itqoo    责任编辑:itqoo 
  • 上一个教程:

  • 下一个教程:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
      网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)
    - 关于我们 - 合作伙伴 - 友情链接 - 广告刊登 - 投稿热线 - 在线留言版权声明联系方式 -
    IT公社版权所有 粤ICP备05127012号
    Copyrigh@2005-2006 itqoo.com.Inc All Rights Reserved  推荐分辨率 1024*768
    联系站长:E-Mail:itqoo@126.com     MSN:urchincc@hotmail.com    QQ:点击这里给我发消息
    特别感谢:亿太网络提供空间支持