From 83f8e614ab2bfe55f10ee9d5199c408cac10fcc2 Mon Sep 17 00:00:00 2001 From: Lester Caine Date: Thu, 14 May 2026 19:58:48 +0100 Subject: move dBug into local include to manage with package --- includes/bit_error_inc.php | 2 +- includes/dBug/dBug.php | 531 +++++++++++++++++++++++++++++++++++++++++++++ 2 files changed, 532 insertions(+), 1 deletion(-) create mode 100755 includes/dBug/dBug.php diff --git a/includes/bit_error_inc.php b/includes/bit_error_inc.php index a2689a8..6c98ab9 100755 --- a/includes/bit_error_inc.php +++ b/includes/bit_error_inc.php @@ -425,7 +425,7 @@ function vc( $iVar, $pHtml=true ) { var_dump( $iVar ); } } elseif( $pHtml && !empty( $_SERVER['HTTP_USER_AGENT'] ) && $_SERVER['HTTP_USER_AGENT'] != 'cron' && ((is_object( $iVar ) && !empty( $iVar )) || is_array( $iVar )) ) { - include_once UTIL_PKG_INCLUDE_PATH.'dBug/dBug.php'; + include_once KERNEL_PKG_INCLUDE_PATH.'dBug/dBug.php'; new \dBug( $iVar, "", false ); } else { print '
';
diff --git a/includes/dBug/dBug.php b/includes/dBug/dBug.php
new file mode 100755
index 0000000..e6ec35b
--- /dev/null
+++ b/includes/dBug/dBug.php
@@ -0,0 +1,531 @@
+initJSandCSS();
+		}
+		$arrAccept=["array","object","xml"]; //array of variable types that can be "forced"
+		$this->bCollapsed = $bCollapsed;
+		if(in_array($forceType,$arrAccept))
+			$this->{"varIs".ucfirst($forceType)}($var);
+		else
+			$this->checkType($var);
+	}
+
+	//get variable name
+	function getVariableName() {
+		$arrBacktrace = debug_backtrace();
+
+		//possible 'included' functions
+		$arrInclude = ["include","include_once","require","require_once"];
+
+		//check for any included/required files. if found, get array of the last included file (they contain the right line numbers)
+		for($i=count($arrBacktrace)-1; $i>=0; $i--) {
+			$arrCurrent = $arrBacktrace[$i];
+			if(array_key_exists("function", $arrCurrent) &&
+				(in_array($arrCurrent["function"], $arrInclude) || (0 != strcasecmp($arrCurrent["function"], "dbug"))))
+				continue;
+
+			$arrFile = $arrCurrent;
+
+			break;
+		}
+
+		if(isset($arrFile)) {
+			$arrLines = file($arrFile["file"]);
+			$code = $arrLines[($arrFile["line"]-1)];
+
+			//find call to dBug class
+			preg_match('/\bnew dBug\s*\(\s*(.+)\s*\);/i', $code, $arrMatches);
+
+			return $arrMatches[1];
+		}
+		return "";
+	}
+
+	//create the main table header
+	function makeTableHeader($type,$header,$colspan=2) {
+		if(!$this->bInitialized) {
+			$header = $this->getVariableName() . " (" . $header . ")";
+			$this->bInitialized = true;
+		}
+		$str_i = ($this->bCollapsed) ? 'style="font-style:italic" ' : "";
+
+		echo '
+				
+					
+				";
+	}
+
+	//create the table row header
+	function makeTDHeader($type,$header) {
+		$str_d = ($this->bCollapsed) ? ' style="display:none"' : "";
+		echo "
+				
+				\n";
+	}
+
+	//error
+	function  error($type) {
+		$error="Error: Variable cannot be a";
+		// this just checks if the type starts with a vowel or "x" and displays either "a" or "an"
+		if(in_array(substr($type,0,1),["a","e","i","o","u","x"]))
+			$error.="n";
+		return ($error." ".$type." type");
+	}
+
+	//check variable type
+	function checkType($var) {
+		switch(gettype($var)) {
+			case "resource":
+				$this->varIsResource($var);
+				break;
+			case "object":
+				$this->varIsObject($var);
+				break;
+			case "array":
+				$this->varIsArray($var);
+				break;
+			case "NULL":
+				$this->varIsNULL();
+				break;
+			case "boolean":
+				$this->varIsBoolean($var);
+				break;
+			default:
+				$var=($var=="") ? "[empty string]" : $var;
+				echo "
".$header."
'.$header."";
+	}
+
+	//close table row
+	function closeTDRow() {
+		return "
\n\n\n
".htmlentities($var)."
\n";
+				break;
+		}
+	}
+
+	//if variable is a NULL type
+	function varIsNULL() {
+		echo "NULL";
+	}
+
+	//if variable is a boolean type
+	function varIsBoolean($var) {
+		$var=($var==1) ? "TRUE" : "FALSE";
+		echo $var;
+	}
+
+	//if variable is an array type
+	function varIsArray($var) {
+		$var_ser = serialize($var);
+		array_push($this->arrHistory, $var_ser);
+
+		$this->makeTableHeader("array", (empty($var)?"empty array":"array"));
+		if(is_array($var)) {
+			foreach($var as $key=>$value) {
+				$this->makeTDHeader("array",$key);
+
+				//check for recursion
+				if(is_array($value)) {
+					$var_ser = serialize($value);
+					if(in_array($var_ser, $this->arrHistory, TRUE))
+						$value = "*RECURSION*";
+				}
+
+				if(in_array(gettype($value),$this->arrType))
+					$this->checkType($value);
+				else {
+					$value=(trim($value)=="") ? "[empty string]" : $value;
+					echo htmlentities($value);
+				}
+				echo $this->closeTDRow();
+			}
+		}
+		else echo "".$this->error("array").$this->closeTDRow();
+		array_pop($this->arrHistory);
+		echo "";
+	}
+
+	//if variable is an object type
+	function varIsObject($var) {
+		$var_ser = serialize($var);
+		array_push($this->arrHistory, $var_ser);
+		$this->makeTableHeader("object","object");
+
+		if(is_object($var)) {
+			$arrObjVars=get_object_vars($var);
+			foreach($arrObjVars as $key=>$value) {
+
+				$value=(!is_object($value) && !is_array($value) && trim($value)=="") ? "[empty string]" : $value;
+				$this->makeTDHeader("object",$key);
+
+				//check for recursion
+				if(is_object($value)||is_array($value)) {
+					$var_ser = serialize($value);
+					if(in_array($var_ser, $this->arrHistory, TRUE)) {
+						$value = (is_object($value)) ? "*RECURSION* -> $".$value::class : "*RECURSION*";
+
+					}
+				}
+				if(in_array(gettype($value),$this->arrType))
+					$this->checkType($value);
+				else echo $value;
+				echo $this->closeTDRow();
+			}
+			$arrObjMethods=get_class_methods($var::class);
+			foreach($arrObjMethods as $key=>$value) {
+				$this->makeTDHeader("object",$value);
+				echo "[function]".$this->closeTDRow();
+			}
+		}
+		else echo "".$this->error("object").$this->closeTDRow();
+		array_pop($this->arrHistory);
+		echo "";
+	}
+
+	//if variable is a resource type
+	function varIsResource($var) {
+		$this->makeTableHeader("resourceC","resource",1);
+		echo "\n\n";
+		switch(get_resource_type($var)) {
+			case "fbsql result":
+			case "mssql result":
+			case "msql query":
+			case "pgsql result":
+			case "sybase-db result":
+			case "sybase-ct result":
+			case "mysql result":
+				$db=current(explode(" ",get_resource_type($var)));
+				$this->varIsDBResource($var,$db);
+				break;
+			case "gd":
+				$this->varIsGDResource($var);
+				break;
+			case "xml":
+				$this->varIsXmlResource($var);
+				break;
+			default:
+				echo get_resource_type($var).$this->closeTDRow();
+				break;
+		}
+		echo $this->closeTDRow()."\n";
+	}
+
+	//if variable is a database resource type
+	function varIsDBResource($var,$db="mysql") {
+		if($db == "pgsql")
+			$db = "pg";
+		if($db == "sybase-db" || $db == "sybase-ct")
+			$db = "sybase";
+		$arrFields = ["name","type","flags"];
+		$numrows=call_user_func($db."_num_rows",$var);
+		$numfields=call_user_func($db."_num_fields",$var);
+		$this->makeTableHeader("resource",$db." result",$numfields+1);
+		echo ' ';
+		for($i=0;$i<$numfields;$i++) {
+			$field_header = "";
+			for($j=0; $j'.$field_name."";
+		}
+		echo "";
+		for($i=0;$i<$numrows;$i++) {
+			$row=call_user_func($db."_fetch_array",$var,constant(strtoupper($db)."_ASSOC"));
+			echo "\n";
+			echo ''.($i+1)."";
+			for($k=0;$k<$numfields;$k++) {
+				$tempField=$field[$k]->name;
+				$fieldrow=$row[($field[$k]->name)];
+				$fieldrow=($fieldrow=="") ? "[empty string]" : $fieldrow;
+				echo "".$fieldrow."\n";
+			}
+			echo "\n";
+		}
+		echo "";
+		if($numrows>0)
+			call_user_func($db."_data_seek",$var,0);
+	}
+
+	//if variable is an image/gd resource type
+	function varIsGDResource($var) {
+		$this->makeTableHeader("resource","gd",2);
+		$this->makeTDHeader("resource","Width");
+		echo imagesx($var).$this->closeTDRow();
+		$this->makeTDHeader("resource","Height");
+		echo imagesy($var).$this->closeTDRow();
+		$this->makeTDHeader("resource","Colors");
+		echo imagecolorstotal($var).$this->closeTDRow();
+		echo "";
+	}
+
+	//if variable is an xml type
+	function varIsXml($var) {
+		$this->varIsXmlResource($var);
+	}
+
+	//if variable is an xml resource type
+	function varIsXmlResource($var) {
+		$xml_parser=xml_parser_create();
+		xml_parser_set_option($xml_parser,XML_OPTION_CASE_FOLDING,0);
+		xml_set_element_handler($xml_parser,[&$this,"xmlStartElement"],[&$this,"xmlEndElement"]);
+		xml_set_character_data_handler($xml_parser,[&$this,"xmlCharacterData"]);
+		xml_set_default_handler($xml_parser,[&$this,"xmlDefaultHandler"]);
+
+		$this->makeTableHeader("xml","xml document",2);
+		$this->makeTDHeader("xml","xmlRoot");
+
+		//attempt to open xml file
+		$bFile=(!($fp=@fopen($var,"r"))) ? false : true;
+
+		//read xml file
+		if($bFile) {
+			while($data=str_replace("\n","",fread($fp,4096)))
+				$this->xmlParse($xml_parser,$data,feof($fp));
+		}
+		//if xml is not a file, attempt to read it as a string
+		else {
+			if(!is_string($var)) {
+				echo $this->error("xml").$this->closeTDRow()."\n";
+				return;
+			}
+			$data=$var;
+			$this->xmlParse($xml_parser,$data,1);
+		}
+
+		echo $this->closeTDRow()."\n";
+
+	}
+
+	//parse xml
+	function xmlParse($xml_parser,$data,$bFinal) {
+		if (!xml_parse($xml_parser,$data,$bFinal)) {
+				   die(sprintf("XML error: %s at line %d\n",
+							   xml_error_string(xml_get_error_code($xml_parser)),
+							   xml_get_current_line_number($xml_parser), ));
+		}
+	}
+
+	//xml: inititiated when a start tag is encountered
+	function xmlStartElement($parser,$name,$attribs) {
+		$this->xmlAttrib[$this->xmlCount]=$attribs;
+		$this->xmlName[$this->xmlCount]=$name;
+		$this->xmlSData[$this->xmlCount]='$this->makeTableHeader("xml","xml element",2);';
+		$this->xmlSData[$this->xmlCount].='$this->makeTDHeader("xml","xmlName");';
+		$this->xmlSData[$this->xmlCount].='echo "'.$this->xmlName[$this->xmlCount].'".$this->closeTDRow();';
+		$this->xmlSData[$this->xmlCount].='$this->makeTDHeader("xml","xmlAttributes");';
+		if(count($attribs)>0)
+			$this->xmlSData[$this->xmlCount].="$this->varIsArray($this->xmlAttrib[".$this->xmlCount."]);";
+		else
+			$this->xmlSData[$this->xmlCount].='echo " ";';
+		$this->xmlSData[$this->xmlCount].="echo $this->closeTDRow();";
+		$this->xmlCount++;
+	}
+
+	//xml: initiated when an end tag is encountered
+	function xmlEndElement($parser,$name) {
+		for($i=0;$i<$this->xmlCount;$i++) {
+			eval($this->xmlSData[$i]);
+			$this->makeTDHeader("xml","xmlText");
+			echo (!empty($this->xmlCData[$i])) ? $this->xmlCData[$i] : " ";
+			echo $this->closeTDRow();
+			$this->makeTDHeader("xml","xmlComment");
+			echo (!empty($this->xmlDData[$i])) ? $this->xmlDData[$i] : " ";
+			echo $this->closeTDRow();
+			$this->makeTDHeader("xml","xmlChildren");
+			unset($this->xmlCData[$i],$this->xmlDData[$i]);
+		}
+		echo $this->closeTDRow();
+		echo "";
+		$this->xmlCount=0;
+	}
+
+	//xml: initiated when text between tags is encountered
+	function xmlCharacterData($parser,$data) {
+		$count=$this->xmlCount-1;
+		if(!empty($this->xmlCData[$count]))
+			$this->xmlCData[$count].=$data;
+		else
+			$this->xmlCData[$count]=$data;
+	}
+
+	//xml: initiated when a comment or other miscellaneous texts is encountered
+	function xmlDefaultHandler($parser,$data) {
+		//strip '' off comments
+		$data=str_replace(["<!--","-->"],"",htmlspecialchars($data));
+		$count=$this->xmlCount-1;
+		if(!empty($this->xmlDData[$count]))
+			$this->xmlDData[$count].=$data;
+		else
+			$this->xmlDData[$count]=$data;
+	}
+
+	function initJSandCSS() {
+		echo <<
+			/* code modified from ColdFusion's cfdump code */
+				function dBug_toggleRow(source) {
+					var target = (document.all) ? source.parentElement.cells[1] : source.parentNode.lastChild;
+					dBug_toggleTarget(target,dBug_toggleSource(source));
+				}
+				
+				function dBug_toggleSource(source) {
+					if (source.style.fontStyle=='italic') {
+						source.style.fontStyle='normal';
+						source.title='click to collapse';
+						return 'open';
+					} else {
+						source.style.fontStyle='italic';
+						source.title='click to expand';
+						return 'closed';
+					}
+				}
+			
+				function dBug_toggleTarget(target,switchToState) {
+					target.style.display = (switchToState=='open') ? '' : 'none';
+				}
+			
+				function dBug_toggleTable(source) {
+					var switchToState=dBug_toggleSource(source);
+					if(document.all) {
+						var table=source.parentElement.parentElement;
+						for(var i=1;i
+			
+			
+SCRIPTS;
+	}
+
+}
+?>
-- 
cgit v1.3