1		<?php
			2		/* vim: set expandtab tabstop=4 shiftwidth=4: */
			3		// +----------------------------------------------------------------------+
			4		// | PHP Version 4                                                        |
			5		// +----------------------------------------------------------------------+
			6		// | Copyright (c) 1997-2004 The PHP Group                                |
			7		// +----------------------------------------------------------------------+
			8		// | This source file is subject to version 3.0 of the PHP license,       |
			9		// | that is bundled with this package in the file LICENSE, and is        |
			10		// | available at through the world-wide-web at                           |
			11		// | http://www.php.net/license/3_0.txt.                                  |
			12		// | If you did not receive a copy of the PHP license and are unable to   |
			13		// | obtain it through the world-wide-web, please send a note to          |
			14		// | license@php.net so we can mail you a copy immediately.               |
			15		// +----------------------------------------------------------------------+
			16		// | Authors: Aidan Lister <aidan@php.net>                                |
			17		// +----------------------------------------------------------------------+
			18		//
			19		// $Id: var_export.php,v 1.1 2004-10-26 18:22:16 kostja Exp $
			20		//
			21
			22
			23		/**
			24		* Replace var_export()
			25		*
			26		* @category    PHP
			27		* @package     PHP_Compat
			28		* @link        http://php.net/function.var_export
			29		* @author      Aidan Lister <aidan@php.net>
			30		* @version     $Revision: 1.1 $
			31		* @since       PHP 4.2.0
			32		* @require     PHP 4.0.1 (trigger_error)
			33		*/
			34		if (!function_exists('var_export'))
			35		{
			36		function var_export ($array, $return = false)
			37		{
			38		// Common output variables
			39		$indent         = '  ';
			40		$doublearrow    = ' => ';
			41		$lineend        = ",\n";
			42		$stringdelim    = '\'';
			43		$newline        = "\n";
			44
			45		// Check the export isn't a simple string / int
			46		if (is_string($array)) {
			47		$out = $stringdelim . $array . $stringdelim;
			48		}
			49		elseif (is_int($array)) {
			50		$out = (string)$array;
			51		}
			52
			53		// Begin the array export
			54		else
			55		{
			56		// Start the string
			57		$out = "array (\n";
			58
			59		// Loop through each value in array
			60		foreach ($array as $key => $value)
			61		{
			62		// If the key is a string, delimit it
			63		if (is_string($key)) {
			64		$key = $stringdelim . addslashes($key) . $stringdelim;
			65		}
			66
			67		// If the value is a string, delimit it
			68		if (is_string($value)) {
			69		$value = $stringdelim . addslashes($value) . $stringdelim;
			70		}
			71
			72		// We have an array, so do some recursion
			73		elseif (is_array($value))
			74		{
			75		// Do some basic recursion while increasing the indent
			76		$recur_array = explode($newline, var_export($value, true));
			77		$recur_newarr = array ();
			78		foreach ($recur_array as $recur_line) {
			79		$recur_newarr[] = $indent . $recur_line;
			80		}
			81		$recur_array = implode($newline, $recur_newarr);
			82		$value = $newline . $recur_array;
			83		}
			84
			85		// Piece together the line
			86		$out .= $indent . $key . $doublearrow . $value . $lineend;
			87		}
			88
			89		// End our string
			90		$out .= ")";
			91		}
			92
			93
			94		// Decide method of output
			95		if ($return === true) {
			96		return $out;
			97		} else {
			98		echo $out;
			99		return null;
			100		}
			101		}
			102		}
			103		?>