重新实现PHP脚本引擎内置函数
日期：2012-06-11 浏览次数：20691 次
|
以下为引用的内容： // 实在无聊,突发奇想,想把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 < 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 */ 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,s
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
|
