快速业务通道

使用php重新实现PHP脚本引擎内置函数

作者 佚名技术 来源 NET编程 浏览 发布时间 2012-05-25

// 实在无聊,突发奇想,想把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; $

凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务,公司网站:http://www.lingzhong.cn 为了给广大客户了解更多的技术信息,本技术文章收集来源于网络,凌众科技尊重文章作者的版权,如果有涉及你的版权有必要删除你的文章,请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!

分享到: 更多

Copyright ©1999-2011 厦门凌众科技有限公司 厦门优通互联科技开发有限公司 All rights reserved

地址(ADD):厦门软件园二期望海路63号701E(东南融通旁) 邮编(ZIP):361008

电话:0592-5908028 传真:0592-5908039 咨询信箱:web@lingzhong.cn 咨询OICQ:173723134

《中华人民共和国增值电信业务经营许可证》闽B2-20100024  ICP备案:闽ICP备05037997号