用PEAR来写你的下一个php程序

　　你可能已经是个PHP的老手了，写了很多非常棒的代码。但是，如果你现在要把它们加入到你现在的项目中去，是否有些吃力？你的朋友想使用你的代码作为他的项目中的一个模块，但是你发现你们使用了截然不同的编码风格，让他适应，甚至不如重写一个！

　　请跟我来，使用PEAR标准编写你的PHP程序吧，你的程序将会拥有更大的活力，你的程序和代码将会很方便地和其他高手的代码融合在一起，PEAR就象CPAN对于PERL一样，会让PHP产生更高的能量。

　　什么是ＰＥＡＲ

　　ＰＥＡＲ是ＰＨＰ扩展与应用库（the PHP Extension and Application Repository）的缩写。它是一个ＰＨＰ扩展及应用的一个代码仓库，简单地说，ＰＥＡＲ就是ＰＨＰ的ＣＰＡＮ。

　　为什么要使用ＰＥＡＲ？

　　PHP 是一个非常优秀的脚本语言，简洁、高效，随着4.0的发布，越来越多的人使用它来进行动态网站的开发，可以说，PHP已经成为最优秀的INTERNET开发语言之一，尤其对于那些需要能够快速、高效地开发中小规模的商业应用的网站开发人员，PHP是其首选的语言。但是随着PHP的应用的不断增多，对于这些应用缺乏统一的标准和有效的管理，因此，PHP社区很难象PERL社区的人们那样方便的共享彼此的代码和应用，因为PHP缺乏象CPAN那样的统一的代码库来分类管理应用的代码模块（熟悉PERL的人都知道，CPAN是一个巨大的PERL的扩展模块仓库，编写的应用模块可以放在CPAN下面的适当的分类目录下面，其他的人可以很方便地复用，当然，你编写应用模块时候也需要遵守其中的准则。）

　　为此，PEAR就应运而生了，并且从4.04开始，随着PHP核心一起被分发。

　　ＰＥＡＲ能给我带来什么好处？

　　1.如前所述，PEAR按照一定的分类来管理PEAR应用代码库，你的PEAR代码可以组织到其中适当的目录中，其他的人可以方便地检索并分享到你的成果。

　　2.PEAR不仅仅是一个代码仓库，它同时也是一个标准，使用这个标准来书写你的PHP代码，将会增强你的程序的可读性，复用性，减少出错的几率。

　　3.PEAR通过提供2个类为你搭建了一个框架，实现了诸如析构函数，错误捕获功能，你通过继承就可以使用这些功能。

　　ＰＥＡＲ的编码规则

　　PEAR的编码规则包括缩进规则，控制结构，函数调用，函数定义，注释，包含代码，PHP标记，文件头的注释块，CVS标记，URL样例，常量的命名这11方面。下面简要地介绍一下：

　　PEAR中需要使用4个空格来缩排代码，并且不使用TAB。如果你使用VIM，将下列设置放入你的~/.vimrc中：

set expandtabset shiftwidth=4set tabstop=4 

　　如果，你使用Emacs/XEmacs,需要把indent-tabs-mode 设置成nil。

　　不过你象我一样喜欢用(X)Emacs编辑PHP文件，我强烈推荐你安装PHP-MODE，这样当你编写PEAR代码的时候，它会自动调整你的缩排风格，当然PHP-MODE还有许多很优秀的特性，你可以从资源列表中的地方下载最新版的PHP-MODE。

　　这里所说的控制结构包括: if for while switch 等。对于控制结构，在关键字（如if for ..）后面要空一个格，然后再跟控制的圆括号，这样，不至于和函数调用混淆，此外，你应该尽量完整的使用花括号{}，即使从语法上来说是可选的。这样可以防止你以后需添加新的代码行时产生逻辑上的疑惑或者错误。这里是一个样例：

if ((条件1) && (条件2)) {语句1；}esleif ((条件3) || (条件4)) {语句2；}else {语句3；}

　　对于函数调用，函数名和左括号( 之间不应该有空格，对于函数参数，在分隔的逗号和下一个参数之间要有相同的空格分离，最后一个参数和右括号之间不能有空格。下面是一个标准的函数调用；

$result = foo($param1, $param2, $param3);不规范的写法：$result=foo ($param1,$param2,$param3);$result=foo( $param1,$param2, $param3 );

　　此外，如果要将函数的返回结果赋值，那么在等号和所赋值的变量之间要有空格，同时，如果是一系列相关的赋值语句，你添加适当的空格，使它们对齐，就象这样：

 $result1 = $foo($param1, $param2, $param3);$var2= $foo($param3);$var3= $foo($param4, $param5); 

　　PEAR:这是PEAR的基类，所有的PEAR扩展都要从它继承派生出来。

　　PEAR_Error：PEAR的错误处理的基类，你可以选择派生出自己的错误处理的类。

　　一般来说，你不应该直接创建PEAR的实例，而是要自己派生出一个新的类，然后再创建这个新类的实例。作为基类，PEAR给我们提供了一些有用的功能，最主要的就是析构函数和错误处理

　　PHP 支持构造函数，但是并不支持析构函数，不过，PHP提供register_shutdown_function()这个函数，从而能够在脚本终止前回调注册的函数，因此PEAR利用这个特性，提供了析构函数的仿真。假如你有一个PEAR的子类，叫做mypear,那么在mypear类中，你可以定义一个函数，函数名是下划线加上你的类名，_mypear(),这个函数就是这个类的析构函数。不过这个析构函数和C++中的析构函数不太一样，它不会在对象被删除的时候执行，而是在脚本结束的时候，毕竟这只是一个仿真。由于是使用了register_shutdown_function()，所以在你的析构函数里，打印的信息将不会返回浏览器中。此外，在你的构造函数中，需要调用一下它的父类的构造函数，因为PHP不会自动调用父类的构造函数，而析构函数需要在 PEAR的构造函数中注册，我们可以看看PEAR的源代码：

codefunction PEAR() {if (method_exists($this, "_".get_class($this))) {global $_PEAR_destructor_object_list;$_PEAR_destructor_object_list[] = && this;}if ($this-_debug) {printf("PEAR constructor called, class=%sn",get_class($this));}.....function _PEAR_call_destructors() {global $_PEAR_destructor_object_list;if (is_array($_PEAR_destructor_object_list) && sizeof($_PEAR_destructor_object_list)) {reset($_PEAR_destructor_object_list);while (list($k, $objref) = each($_PEAR_destructor_object_list)) {$destructor = "_".get_class($objref);if (method_exists($objref, $destructor)) {$objref-$destructor();}}//清空已注册的对象列表，//防止重复调用$_PEAR_destructor_object_list = array();}}....register_shutdown_function("_PEAR_call_destructors");/code

　　上面这段代码展示了PEAR是如何实现析构函数的,在构件函数中，将检查当前类中是否有析构函数，如果有，那么将把当前类的引用放入一个全局列表中，在_PEAR_call_destructors中，则检查这个全局列表中的每个元素是否存在相应的析构函数，如果有，则调用它，最后将全局列表清空。

　　在PEAR.php的最后一行代码，则调用 register_shutdown_function("_PEAR_call_destructors")，注册 _PEAR_call_destructors，这样，当脚本执行完毕的时候，PHP会回调这个函数。使用析构函数，你可以在处理完用户的请求，退出之前做一些必要的"善后"工作，典型的例子是，你可以关闭打开的文件，断开数据库的连接，将某些数据存入磁盘等等。

　　PEAR中可以让你有很多的方式来处理错误，你不仅仅是简单地返回一个错误代码，或者错误的信息，而是可以返回一个PEAR_Error对象，或者是由PEAR_Error派生出来的新的错误对象。

　　PEAR 中的错误对象的并没有限定具体的输出形式，它可以仅仅是捕获错误，不给用户返回太多的信息，也可以是去回调一个特殊错误处理函数，同时，即使输出错误信息，它也强迫你必须要是HTML形式，你可以输出XML，CSV形式，或者是其他你自己定义的形式，你只需要从PEAR_Error派生一个新的类，然后在适当的时候创建并"抛出"这个新类的对象就可以了。

　　在PEAR中，最简单的错误处理是"抛出"这个错误，你只要简单地创建并返回一个PEAR_Error的对象就可以了。下面是一个简单的例子：

codefunction myconnect($host = "localhost", $port = 1080){$fp = fsockopen($host, $port, $errno, $errstr);if (!is_resource($fp)) {return new PEAR_Error($errstr, $errno);}return $fp;}$sock = myconnect();if (PEAR::isError($sock)) {print "connect error: ".$sock--getMessage()."BRn"}/code