搜索
首页php教程php手册重新实现PHP脚本引擎内置函数

以下为引用的内容:

// 实在无聊,突发奇想,想把PHP里面部分已经提供封装好的函数重新使用PHP实现一遍,

// 于是便有了下面的代码主要实现了PHP中部分字符串处理函数,同时实现了一些PHP中

// 没有,但是同样有作用的字符串处理函数同样的这些函数,也能够使用其他语言来实

// 现,比如用C/VBScript/Perl等等,那么你就能够有一个自己的函数库.

// 以下函数不一定能够成功运行,只是为了学习而已。

//

// 如果无特别声明,全部是由于heiyeluren原创,要使用任何函数都请保留作者信息

/**

* String Functions Reconstruct

*

* Copyright (c) 2005 heiyeluren

* Author: heiyeluren

* $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

*/

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

*/

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 strlen($str)+$start))

return;

if ($length == NULL)

$length = (strlen($str) - $start);

if ($start

{

for ($i=(strlen($str)+$start); $i

{

$substr .= $str[$i];

}

}

if ($length > 0)

{

for ($i=$start; $i

{

$substr .= $str[$i];

}

}

if ($length

{

for ($i=$start; $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

*/

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, str1 = str2,

* return 0, other, return false

* @version v0.1

* @create 2005-5-24

* @modified 2005-5-24

* @author heiyeluren

*/

function strcmp1($s1, $s2)

{

if (strlen($s1)

return -1;

if (strlen($s1) > strlen($s2))

return 1;

for ($i=0; $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

*/

function strchr1($str, $substr)

{

$m = strlen($str);

$n = strlen($substr);

if ($m

return false;

for ($i=0; $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

*/

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

{

$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

*/

function str_insert($str, $i, $substr)

{

for($j=0; $j

{

$startstr .= $str[$j];

}

for ($j=$i; $j

{

$laststr .= $str[$j];

}

$str = ($startstr . $substr . $laststr);

return $str;

}

function str_delete($str, $i, $j)

{

for ($c=0; $c

{

$startstr .= $str[$c];

}

for ($c=($i+$j); $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

*/

function strcpy($s1, $s2)

{

if (strlen($s1) == NULL)

return;

if (!isset($s2))

return;

for ($i=0; $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

*/

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

*/

/* String encode function */

function php_encode($str)

{

if ($str=='' && strlen($str)>128)

return false;

for($i=0; $i

{

$c = ord($str[$i]);

if ($c>31 && $c

$c += 20;

if ($c>106 && $c

$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

{

$c = ord($word);

if ($c>106 && $c

$c = $c-20;

if ($c>31 && $c

$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

*/

/* 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

{

for ($j=0; $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

{

for ($j=0; $j

{

if ($str[$i] == $decrypt_key[$j])

{

$enstr .= $encrypt_key[$j];

break;

}

}

}

return $enstr;

}

// }}}



声明
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系admin@php.cn

热AI工具

Undresser.AI Undress

Undresser.AI Undress

人工智能驱动的应用程序,用于创建逼真的裸体照片

AI Clothes Remover

AI Clothes Remover

用于从照片中去除衣服的在线人工智能工具。

Undress AI Tool

Undress AI Tool

免费脱衣服图片

Clothoff.io

Clothoff.io

AI脱衣机

AI Hentai Generator

AI Hentai Generator

免费生成ai无尽的。

热门文章

R.E.P.O.能量晶体解释及其做什么(黄色晶体)
3 周前By尊渡假赌尊渡假赌尊渡假赌
R.E.P.O.最佳图形设置
3 周前By尊渡假赌尊渡假赌尊渡假赌
R.E.P.O.如果您听不到任何人,如何修复音频
3 周前By尊渡假赌尊渡假赌尊渡假赌
WWE 2K25:如何解锁Myrise中的所有内容
3 周前By尊渡假赌尊渡假赌尊渡假赌

热工具

EditPlus 中文破解版

EditPlus 中文破解版

体积小,语法高亮,不支持代码提示功能

记事本++7.3.1

记事本++7.3.1

好用且免费的代码编辑器

SecLists

SecLists

SecLists是最终安全测试人员的伙伴。它是一个包含各种类型列表的集合,这些列表在安全评估过程中经常使用,都在一个地方。SecLists通过方便地提供安全测试人员可能需要的所有列表,帮助提高安全测试的效率和生产力。列表类型包括用户名、密码、URL、模糊测试有效载荷、敏感数据模式、Web shell等等。测试人员只需将此存储库拉到新的测试机上,他就可以访问到所需的每种类型的列表。

MinGW - 适用于 Windows 的极简 GNU

MinGW - 适用于 Windows 的极简 GNU

这个项目正在迁移到osdn.net/projects/mingw的过程中,你可以继续在那里关注我们。MinGW:GNU编译器集合(GCC)的本地Windows移植版本,可自由分发的导入库和用于构建本地Windows应用程序的头文件;包括对MSVC运行时的扩展,以支持C99功能。MinGW的所有软件都可以在64位Windows平台上运行。

ZendStudio 13.5.1 Mac

ZendStudio 13.5.1 Mac

功能强大的PHP集成开发环境