使用php重新實(shí)現(xiàn)PHP腳本引擎內(nèi)置函數(shù)
更新時(shí)間：2007年03月06日 00:00:00 作者：
// 實(shí)在無(wú)聊,突發(fā)奇想,想把PHP里面部分已經(jīng)提供封裝好的函數(shù)重新使用PHP實(shí)現(xiàn)一遍,
// 于是便有了下面的代碼主要實(shí)現(xiàn)了PHP中部分字符串處理函數(shù),同時(shí)實(shí)現(xiàn)了一些PHP中
// 沒(méi)有,但是同樣有作用的字符串處理函數(shù)同樣的這些函數(shù),也能夠使用其他語(yǔ)言來(lái)實(shí)
// 現(xiàn),比如用C/VBScript/Perl等等,那么你就能夠有一個(gè)自己的函數(shù)庫(kù).
// 以下函數(shù)不一定能夠成功運(yùn)行,只是為了學(xué)習(xí)而已。
//
// 如果無(wú)特別聲明,全部是由于heiyeluren原創(chuàng),要使用任何函數(shù)都請(qǐng)保留作者信息
/**
* 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
* @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;
}
// }}}
/************ 以下串處理函數(shù)是PHP中沒(méi)有的，自己寫(xiě)著玩 ***************/
// {{{ 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
* @author heiyeluren <hyeiyeluren@163.com>
*/
function strcat($s1, $s2)
{
if (!isset($s1))
return;
if (!isset($s2))
return;
$newstr = $s1 . $s2;
return $newsstr;
}
// }}}
// {{{ php_encode(), php_decode()
/**
* Simple string encode/decode function
*
* @param string $str need code/encode string variable
* @return string code/encode after string
* @version v0.2
* @create 2005-3-11
* @modified 2005-5-24
* @author heiyeluren <hyeiyeluren@163.com>
*/
/* String encode function */
function php_encode($str)
{
if ($str=='' && strlen($str)>128)
return false;
for($i=0; $i<strlen($str); $i++)
{
$c = ord($str[$i]);
if ($c>31 && $c<107)
$c += 20;
if ($c>106 && $c<127)
$c -= 75;
$word = chr($c);
$s .= $word;
}
return $s;
}
/* String decode function */
function php_decode($str)
{
if ($str=='' && strlen($str)>128)
return false;
for($i=0; $i<strlen($str); $i++)
{
$c = ord($word);
if ($c>106 && $c<127)
$c = $c-20;
if ($c>31 && $c<107)
$c = $c+75;
$word = chr($c);
$s .= $word;
}
return $s;
}
// }}}
// {{{ php_encrypt(), php_decrypt()
/**
* Simple string encrypt/decrypt function
*
* @param string $str need crypt string variable
* @return string encrypt/decrypt after string
* @version v0.1
* @create 2005-5-27
* @modified 2005-5-29
* @author heiyeluren <hyeiyeluren@163.com>
*/
/* define crypt key */
$encrypt_key = 'abcdefghijklmnopqrstuvwxyz1234567890';
$decrypt_key = 'ngzqtcobmuhelkpdawxfyivrsj2468021359';
/* String encrypt function */
function php_encrypt($str)
{
global $encrypt_key, $decrypt_key;
if (strlen($str) == 0)
return false;
for ($i=0; $i<strlen($str); $i++)
{
for ($j=0; $j<strlen($encrypt_key); $j++)
{
if ($str[$i] == $encrypt_key[$j])
{
$enstr .= $decrypt_key[$j];
break;
}
}
}
return $enstr;
}
/* String decrypt function */
function php_decrypt($str)
{
global $encrypt_key, $decrypt_key;
if (strlen($str) == 0)
return false;
for ($i=0; $i<strlen($str); $i++)
{
for ($j=0; $j<strlen($decrypt_key); $j++)
{
if ($str[$i] == $decrypt_key[$j])
{
$enstr .= $encrypt_key[$j];
break;
}
}
}
return $enstr;
}
// }}}
如果代碼不清晰的話，建議查看一下連接，是我在blogchina的博客：
http://heiyeluren.blogchina.com/1741318.html
您可能感興趣的文章:
- PHP中的函數(shù)嵌套層數(shù)限制分析
- php初始化對(duì)象和析構(gòu)函數(shù)的簡(jiǎn)單實(shí)例
- PHP使用內(nèi)置函數(shù)file_put_contents寫(xiě)入文件及追加內(nèi)容的方法
- PHP使用內(nèi)置函數(shù)生成圖片的方法詳解
- 幾個(gè)實(shí)用的PHP內(nèi)置函數(shù)使用指南
- 關(guān)于PHP內(nèi)置的字符串處理函數(shù)詳解
- PHP內(nèi)置函數(shù)生成隨機(jī)數(shù)實(shí)例
- PHP 查找字符串常用函數(shù)介紹
- PHP函數(shù)篇詳解十進(jìn)制、二進(jìn)制、八進(jìn)制和十六進(jìn)制轉(zhuǎn)換函數(shù)說(shuō)明
- PHP取整數(shù)函數(shù)常用的四種方法小結(jié)
- PHP常用函數(shù)總結(jié)(180多個(gè))
- PHP函數(shù)用法詳解【初始化、嵌套、內(nèi)置函數(shù)等】
相關(guān)文章
PHP實(shí)現(xiàn)隨機(jī)數(shù)字、字母的驗(yàn)證碼功能
本文通過(guò)實(shí)例代碼給大家介紹了PHP實(shí)現(xiàn)隨機(jī)數(shù)字、字母的驗(yàn)證碼功能，代碼簡(jiǎn)單易懂，非常不錯(cuò)，具有一定得參考借鑒價(jià)值，需要得朋友參考下吧2018-08-08
這篇文章主要介紹了Symfony生成二維碼的方法,實(shí)例分析了采用google開(kāi)放api和PHP類庫(kù)phpqrcode兩種方法,并結(jié)合實(shí)例詳細(xì)說(shuō)明了Symfony下使用EndroidQrCodeBundle生成二維碼的具體步驟與實(shí)現(xiàn)方法,需要的朋友可以參考下2016-02-02
這篇文章主要介紹了php中字符串和整數(shù)比較的操作方法，本文給大家介紹的非常詳細(xì)，具有一定的參考借鑒價(jià)值,需要的朋友可以參考下2019-06-06
簡(jiǎn)單PHP會(huì)話(session)說(shuō)明介紹
下面小編就為大家?guī)?lái)一篇簡(jiǎn)單PHP會(huì)話(session)說(shuō)明介紹。小編覺(jué)得挺不錯(cuò)的，現(xiàn)在就分享給大家，也給大家做個(gè)參考。一起跟隨小編過(guò)來(lái)看看吧2016-08-08
這篇文章主要介紹了smarty模板局部緩存方法,需要的朋友可以參考下2014-06-06
phpinfo 系統(tǒng)查看參數(shù)函數(shù)代碼
并根據(jù)自身的理解做了很多修改和優(yōu)化，就當(dāng)前而言，這是探測(cè)信息最全面的PHP探針了！2009-06-06
這篇文章主要介紹了CI框架常用方法,總結(jié)分析了CI框架加載文件、模板、調(diào)用函數(shù)、對(duì)象等技巧,非常簡(jiǎn)單實(shí)用,需要的朋友可以參考下2016-05-05
用 Composer構(gòu)建自己的 PHP 框架之構(gòu)建路由
本文是構(gòu)建自己的php框架的第二篇，主要為大家來(lái)講述如何構(gòu)建路由，非常的詳細(xì)，也很易懂，有需要的朋友可以參考下2014-10-10
php版微信公眾號(hào)自定義分享內(nèi)容實(shí)現(xiàn)方法
這篇文章主要介紹了php版微信公眾號(hào)自定義分享內(nèi)容實(shí)現(xiàn)方法,結(jié)合實(shí)例形式分析了php實(shí)現(xiàn)微信公眾號(hào)自定義分享內(nèi)容的接口調(diào)用與相關(guān)使用技巧,需要的朋友可以參考下2016-09-09
一個(gè)自定義位數(shù)的php多用戶計(jì)數(shù)器代碼
一個(gè)自定義位數(shù)的php多用戶計(jì)數(shù)器代碼...2007-03-03