NP_UpdatePingServer/trunk/updatepingserver/compat/is_a.php

   1 <?php
   2 // +----------------------------------------------------------------------+
   3 // | PHP Version 4                                                        |
   4 // +----------------------------------------------------------------------+
   5 // | Copyright (c) 1997-2004 The PHP Group                                |
   6 // +----------------------------------------------------------------------+
   7 // | This source file is subject to version 3.0 of the PHP license,       |
   8 // | that is bundled with this package in the file LICENSE, and is        |
   9 // | available at through the world-wide-web at                           |
  10 // | http://www.php.net/license/3_0.txt.                                  |
  11 // | If you did not receive a copy of the PHP license and are unable to   |
  12 // | obtain it through the world-wide-web, please send a note to          |
  13 // | license@php.net so we can mail you a copy immediately.               |
  14 // +----------------------------------------------------------------------+
  15 // | Authors: Aidan Lister <aidan@php.net>                                |
  16 // +----------------------------------------------------------------------+
  17 //
  18 // $Id: is_a.php,v 1.1 2007-03-31 03:40:37 shizuki Exp $
  19
  20
  21 /**
  22  * Replace function is_a()
  23  *
  24  * @category    PHP
  25  * @package     PHP_Compat
  26  * @link        http://php.net/function.is_a
  27  * @author      Aidan Lister <aidan@php.net>
  28  * @version     $Revision: 1.1 $
  29  * @since       PHP 4.2.0
  30  * @require     PHP 4.0.0 (user_error) (is_subclass_of)
  31  */
  32 if (!function_exists('is_a')) {
  33     function is_a($object, $class)
  34     {
  35         if (!is_object($object)) {
  36             return false;
  37         }
  38
  39         if (get_class($object) == strtolower($class)) {
  40             return true;
  41         } else {
  42             return is_subclass_of($object, $class);
  43         }
  44     }
  45 }
  46
  47 ?>