/**
* lightweight version of Kint::dump(). Uses whitespace for formatting instead of html
* sadly not DRY yet
*
* @param $var
* @param int $level
*
* @return string
*/
function kintLite(&$var, $level = 0)
{
// initialize function names into variables for prettier string output (html and implode are also DRY)
$html = "htmlspecialchars";
$implode = "implode";
$strlen = "strlen";
$count = "count";
$getClass = "get_class";
if ($var === null) {
return 'NULL';
} elseif (is_bool($var)) {
return 'bool ' . ($var ? 'TRUE' : 'FALSE');
} elseif (is_float($var)) {
return 'float ' . $var;
} elseif (is_int($var)) {
return 'integer ' . $var;
} elseif (is_resource($var)) {
if (($type = get_resource_type($var)) === 'stream' and $meta = stream_get_meta_data($var)) {
if (isset($meta['uri'])) {
$file = $meta['uri'];
return "resource ({$type}) {$html($file, 0)}";
} else {
return "resource ({$type})";
}
} else {
return "resource ({$type})";
}
} elseif (is_string($var)) {
return "string ({$strlen($var)}) \"{$html($var)}\"";
} elseif (is_array($var)) {
$output = array();
$space = str_repeat($s = ' ', $level);
static $marker;
if ($marker === null) {
// Make a unique marker
$marker = uniqid("");
}
if (empty($var)) {
return "array()";
} elseif (isset($var[$marker])) {
$output[] = "[\n{$space}{$s}*RECURSION*\n{$space}]";
} elseif ($level < 7) {
$isSeq = array_keys($var) === range(0, count($var) - 1);
$output[] = "[";
$var[$marker] = true;
foreach ($var as $key => &$val) {
if ($key === $marker) {
continue;
}
$key = $space . $s . ($isSeq ? "" : "'{$html($key, 0)}' => ");
$dump = kintLite($val, $level + 1);
$output[] = "{$key}{$dump}";
}
unset($var[$marker]);
$output[] = "{$space}]";
} else {
$output[] = "[\n{$space}{$s}*depth too great*\n{$space}]";
}
return "array({$count($var)}) {$implode("\n", $output)}";
} elseif (is_object($var)) {
if ($var instanceof SplFileInfo) {
return "object SplFileInfo " . $var->getRealPath();
}
// Copy the object as an array
$array = (array) $var;
$output = array();
$space = str_repeat($s = ' ', $level);
$hash = spl_object_hash($var);
// Objects that are being dumped
static $objects = array();
if (empty($array)) {
return "object {$getClass($var)} {}";
} elseif (isset($objects[$hash])) {
$output[] = "{\n{$space}{$s}*RECURSION*\n{$space}}";
} elseif ($level < 7) {
$output[] = "{";
$objects[$hash] = true;
foreach ($array as $key => &$val) {
if ($key[0] === "") {
$access = $key[1] === "*" ? "protected" : "private";
// Remove the access level from the variable name
$key = substr($key, strrpos($key, "") + 1);
} else {
$access = "public";
}
$output[] = "{$space}{$s}{$access} {$key} -> " . kintLite($val, $level + 1);
}
unset($objects[$hash]);
$output[] = "{$space}}";
} else {
$output[] = "{\n{$space}{$s}*depth too great*\n{$space}}";
}
return "object {$getClass($var)} ({$count($array)}) {$implode("\n", $output)}";
} else {
return gettype($var) . htmlspecialchars(var_export($var, true), ENT_NOQUOTES);
}
}
public function formatVar($data)
{
return \kintLite($data);
}
