first commit

2023-07-24 08:30:51 +02:00
commit c2e100a763
7128 changed files with 1622619 additions and 0 deletions
--- a/wp-content/plugins/unyson/framework/helpers/class-fw-dumper.php
+++ b/wp-content/plugins/unyson/framework/helpers/class-fw-dumper.php
@@ -0,0 +1,124 @@
+<?php
+
+// original source: https://code.google.com/p/prado3/source/browse/trunk/framework/Util/TVar_dumper.php
+
+/**
+ * TVar_dumper class.
+ *
+ * TVar_dumper is intended to replace the buggy PHP function var_dump and print_r.
+ * It can correctly identify the recursively referenced objects in a complex
+ * object structure. It also has a recursive depth control to avoid indefinite
+ * recursive display of some peculiar variables.
+ *
+ * TVar_dumper can be used as follows,
+ * <code>
+ *   echo TVar_dumper::dump($var);
+ * </code>
+ *
+ * @author Qiang Xue <qiang.xue@gmail.com>
+ * @version $Id$
+ * @package System.Util
+ * @since 3.0
+ */
+class FW_Dumper
+{
+	private static $_objects;
+	private static $_output;
+	private static $_depth;
+
+	/**
+	 * Converts a variable into a string representation.
+	 * This method achieves the similar functionality as var_dump and print_r
+	 * but is more robust when handling complex objects such as PRADO controls.
+	 * @param mixed $var     Variable to be dumped
+	 * @param integer $depth Maximum depth that the dumper should go into the variable. Defaults to 10.
+	 * @return string the string representation of the variable
+	 */
+	public static function dump($var, $depth=10)
+	{
+		self::reset_internals();
+
+		self::$_depth=$depth;
+		self::dump_internal($var,0);
+
+		$output = self::$_output;
+
+		self::reset_internals();
+
+		return $output;
+	}
+
+	private static function reset_internals()
+	{
+		self::$_output='';
+		self::$_objects=array();
+		self::$_depth=10;
+	}
+
+	private static function dump_internal($var,$level)
+	{
+		switch(gettype($var)) {
+			case 'boolean':
+				self::$_output.=$var?'true':'false';
+				break;
+			case 'integer':
+				self::$_output.="$var";
+				break;
+			case 'double':
+				self::$_output.="$var";
+				break;
+			case 'string':
+				self::$_output.="'$var'";
+				break;
+			case 'resource':
+				self::$_output.='{resource}';
+				break;
+			case 'NULL':
+				self::$_output.="null";
+				break;
+			case 'unknown type':
+				self::$_output.='{unknown}';
+				break;
+			case 'array':
+				if(self::$_depth<=$level)
+					self::$_output.='array(...)';
+				else if(empty($var))
+					self::$_output.='array()';
+				else
+				{
+					$keys=array_keys($var);
+					$spaces=str_repeat(' ',$level*4);
+					self::$_output.="array\n".$spaces.'(';
+					foreach($keys as $key)
+					{
+						self::$_output.="\n".$spaces."    [$key] => ";
+						self::$_output.=self::dump_internal($var[$key],$level+1);
+					}
+					self::$_output.="\n".$spaces.')';
+				}
+				break;
+			case 'object':
+				if(($id=array_search($var,self::$_objects,true))!==false)
+					self::$_output.=get_class($var).'(...)';
+				else if(self::$_depth<=$level)
+					self::$_output.=get_class($var).'(...)';
+				else
+				{
+					$id=array_push(self::$_objects,$var);
+					$class_name=get_class($var);
+					$members=(array)$var;
+					$keys=array_keys($members);
+					$spaces=str_repeat(' ',$level*4);
+					self::$_output.="$class_name\n".$spaces.'(';
+					foreach($keys as $key)
+					{
+						$key_display=strtr(trim($key),array("\0"=>':'));
+						self::$_output.="\n".$spaces."    [$key_display] => ";
+						self::$_output.=self::dump_internal($members[$key],$level+1);
+					}
+					self::$_output.="\n".$spaces.')';
+				}
+				break;
+		}
+	}
+}