[Sommaire] [Imprimer]

   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: clone.php,v 1.3 2005/05/01 10:40:59 aidan Exp $

  19  
  20  
  21  /**

  22   * Replace clone()

  23   *

  24   * @category    PHP

  25   * @package     PHP_Compat

  26   * @link        http://php.net/language.oop5.cloning

  27   * @author      Aidan Lister <aidan@php.net>

  28   * @version     $Revision: 1.3 $

  29   * @since       PHP 5.0.0

  30   * @require     PHP 4.0.0 (user_error)

  31   */
  32  if (version_compare(phpversion(), '5.0') === -1) {
  33      // Needs to be wrapped in eval as clone is a keyword in PHP5

  34      eval('
  35          function clone($object)
  36          {
  37              // Sanity check

  38              if (!is_object($object)) {
  39                  user_error(\'clone() __clone method called on non-object\', E_USER_WARNING);
  40                  return;
  41              }
  42      
  43              // Use serialize/unserialize trick to deep copy the object

  44              $object = unserialize(serialize($object));
  45  
  46              // If there is a __clone method call it on the "new" class

  47              if (method_exists($object, \'__clone\')) {
  48                  $object->__clone();
  49              }
  50              
  51              return $object;
  52          }
  53      ');
  54  }
  55  
  56  ?>