forked from GNUsocial/gnu-social
598 lines
20 KiB
PHP
598 lines
20 KiB
PHP
<?php
|
|
|
|
/*
|
|
* This file is part of the Symfony package.
|
|
*
|
|
* (c) Fabien Potencier <fabien@symfony.com>
|
|
*
|
|
* For the full copyright and license information, please view the LICENSE
|
|
* file that was distributed with this source code.
|
|
*/
|
|
|
|
namespace Symfony\Component\VarDumper\Dumper;
|
|
|
|
use Symfony\Component\VarDumper\Cloner\Cursor;
|
|
use Symfony\Component\VarDumper\Cloner\Stub;
|
|
|
|
/**
|
|
* CliDumper dumps variables for command line output.
|
|
*
|
|
* @author Nicolas Grekas <p@tchwork.com>
|
|
*/
|
|
class CliDumper extends AbstractDumper
|
|
{
|
|
public static $defaultColors;
|
|
public static $defaultOutput = 'php://stdout';
|
|
|
|
protected $colors;
|
|
protected $maxStringWidth = 0;
|
|
protected $styles = array(
|
|
// See http://en.wikipedia.org/wiki/ANSI_escape_code#graphics
|
|
'default' => '38;5;208',
|
|
'num' => '1;38;5;38',
|
|
'const' => '1;38;5;208',
|
|
'str' => '1;38;5;113',
|
|
'note' => '38;5;38',
|
|
'ref' => '38;5;247',
|
|
'public' => '',
|
|
'protected' => '',
|
|
'private' => '',
|
|
'meta' => '38;5;170',
|
|
'key' => '38;5;113',
|
|
'index' => '38;5;38',
|
|
);
|
|
|
|
protected static $controlCharsRx = '/[\x00-\x1F\x7F]+/';
|
|
protected static $controlCharsMap = array(
|
|
"\t" => '\t',
|
|
"\n" => '\n',
|
|
"\v" => '\v',
|
|
"\f" => '\f',
|
|
"\r" => '\r',
|
|
"\033" => '\e',
|
|
);
|
|
|
|
protected $collapseNextHash = false;
|
|
protected $expandNextHash = false;
|
|
|
|
/**
|
|
* {@inheritdoc}
|
|
*/
|
|
public function __construct($output = null, string $charset = null, int $flags = 0)
|
|
{
|
|
parent::__construct($output, $charset, $flags);
|
|
|
|
if ('\\' === \DIRECTORY_SEPARATOR && !$this->isWindowsTrueColor()) {
|
|
// Use only the base 16 xterm colors when using ANSICON or standard Windows 10 CLI
|
|
$this->setStyles(array(
|
|
'default' => '31',
|
|
'num' => '1;34',
|
|
'const' => '1;31',
|
|
'str' => '1;32',
|
|
'note' => '34',
|
|
'ref' => '1;30',
|
|
'meta' => '35',
|
|
'key' => '32',
|
|
'index' => '34',
|
|
));
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Enables/disables colored output.
|
|
*
|
|
* @param bool $colors
|
|
*/
|
|
public function setColors($colors)
|
|
{
|
|
$this->colors = (bool) $colors;
|
|
}
|
|
|
|
/**
|
|
* Sets the maximum number of characters per line for dumped strings.
|
|
*
|
|
* @param int $maxStringWidth
|
|
*/
|
|
public function setMaxStringWidth($maxStringWidth)
|
|
{
|
|
$this->maxStringWidth = (int) $maxStringWidth;
|
|
}
|
|
|
|
/**
|
|
* Configures styles.
|
|
*
|
|
* @param array $styles A map of style names to style definitions
|
|
*/
|
|
public function setStyles(array $styles)
|
|
{
|
|
$this->styles = $styles + $this->styles;
|
|
}
|
|
|
|
/**
|
|
* {@inheritdoc}
|
|
*/
|
|
public function dumpScalar(Cursor $cursor, $type, $value)
|
|
{
|
|
$this->dumpKey($cursor);
|
|
|
|
$style = 'const';
|
|
$attr = $cursor->attr;
|
|
|
|
switch ($type) {
|
|
case 'default':
|
|
$style = 'default';
|
|
break;
|
|
|
|
case 'integer':
|
|
$style = 'num';
|
|
break;
|
|
|
|
case 'double':
|
|
$style = 'num';
|
|
|
|
switch (true) {
|
|
case INF === $value: $value = 'INF'; break;
|
|
case -INF === $value: $value = '-INF'; break;
|
|
case is_nan($value): $value = 'NAN'; break;
|
|
default:
|
|
$value = (string) $value;
|
|
if (false === strpos($value, $this->decimalPoint)) {
|
|
$value .= $this->decimalPoint.'0';
|
|
}
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case 'NULL':
|
|
$value = 'null';
|
|
break;
|
|
|
|
case 'boolean':
|
|
$value = $value ? 'true' : 'false';
|
|
break;
|
|
|
|
default:
|
|
$attr += array('value' => $this->utf8Encode($value));
|
|
$value = $this->utf8Encode($type);
|
|
break;
|
|
}
|
|
|
|
$this->line .= $this->style($style, $value, $attr);
|
|
|
|
$this->endValue($cursor);
|
|
}
|
|
|
|
/**
|
|
* {@inheritdoc}
|
|
*/
|
|
public function dumpString(Cursor $cursor, $str, $bin, $cut)
|
|
{
|
|
$this->dumpKey($cursor);
|
|
$attr = $cursor->attr;
|
|
|
|
if ($bin) {
|
|
$str = $this->utf8Encode($str);
|
|
}
|
|
if ('' === $str) {
|
|
$this->line .= '""';
|
|
$this->endValue($cursor);
|
|
} else {
|
|
$attr += array(
|
|
'length' => 0 <= $cut ? mb_strlen($str, 'UTF-8') + $cut : 0,
|
|
'binary' => $bin,
|
|
);
|
|
$str = explode("\n", $str);
|
|
if (isset($str[1]) && !isset($str[2]) && !isset($str[1][0])) {
|
|
unset($str[1]);
|
|
$str[0] .= "\n";
|
|
}
|
|
$m = \count($str) - 1;
|
|
$i = $lineCut = 0;
|
|
|
|
if (self::DUMP_STRING_LENGTH & $this->flags) {
|
|
$this->line .= '('.$attr['length'].') ';
|
|
}
|
|
if ($bin) {
|
|
$this->line .= 'b';
|
|
}
|
|
|
|
if ($m) {
|
|
$this->line .= '"""';
|
|
$this->dumpLine($cursor->depth);
|
|
} else {
|
|
$this->line .= '"';
|
|
}
|
|
|
|
foreach ($str as $str) {
|
|
if ($i < $m) {
|
|
$str .= "\n";
|
|
}
|
|
if (0 < $this->maxStringWidth && $this->maxStringWidth < $len = mb_strlen($str, 'UTF-8')) {
|
|
$str = mb_substr($str, 0, $this->maxStringWidth, 'UTF-8');
|
|
$lineCut = $len - $this->maxStringWidth;
|
|
}
|
|
if ($m && 0 < $cursor->depth) {
|
|
$this->line .= $this->indentPad;
|
|
}
|
|
if ('' !== $str) {
|
|
$this->line .= $this->style('str', $str, $attr);
|
|
}
|
|
if ($i++ == $m) {
|
|
if ($m) {
|
|
if ('' !== $str) {
|
|
$this->dumpLine($cursor->depth);
|
|
if (0 < $cursor->depth) {
|
|
$this->line .= $this->indentPad;
|
|
}
|
|
}
|
|
$this->line .= '"""';
|
|
} else {
|
|
$this->line .= '"';
|
|
}
|
|
if ($cut < 0) {
|
|
$this->line .= '…';
|
|
$lineCut = 0;
|
|
} elseif ($cut) {
|
|
$lineCut += $cut;
|
|
}
|
|
}
|
|
if ($lineCut) {
|
|
$this->line .= '…'.$lineCut;
|
|
$lineCut = 0;
|
|
}
|
|
|
|
if ($i > $m) {
|
|
$this->endValue($cursor);
|
|
} else {
|
|
$this->dumpLine($cursor->depth);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* {@inheritdoc}
|
|
*/
|
|
public function enterHash(Cursor $cursor, $type, $class, $hasChild)
|
|
{
|
|
$this->dumpKey($cursor);
|
|
|
|
if ($this->collapseNextHash) {
|
|
$cursor->skipChildren = true;
|
|
$this->collapseNextHash = $hasChild = false;
|
|
}
|
|
|
|
$class = $this->utf8Encode($class);
|
|
if (Cursor::HASH_OBJECT === $type) {
|
|
$prefix = $class && 'stdClass' !== $class ? $this->style('note', $class).' {' : '{';
|
|
} elseif (Cursor::HASH_RESOURCE === $type) {
|
|
$prefix = $this->style('note', $class.' resource').($hasChild ? ' {' : ' ');
|
|
} else {
|
|
$prefix = $class && !(self::DUMP_LIGHT_ARRAY & $this->flags) ? $this->style('note', 'array:'.$class).' [' : '[';
|
|
}
|
|
|
|
if ($cursor->softRefCount || 0 < $cursor->softRefHandle) {
|
|
$prefix .= $this->style('ref', (Cursor::HASH_RESOURCE === $type ? '@' : '#').(0 < $cursor->softRefHandle ? $cursor->softRefHandle : $cursor->softRefTo), array('count' => $cursor->softRefCount));
|
|
} elseif ($cursor->hardRefTo && !$cursor->refIndex && $class) {
|
|
$prefix .= $this->style('ref', '&'.$cursor->hardRefTo, array('count' => $cursor->hardRefCount));
|
|
} elseif (!$hasChild && Cursor::HASH_RESOURCE === $type) {
|
|
$prefix = substr($prefix, 0, -1);
|
|
}
|
|
|
|
$this->line .= $prefix;
|
|
|
|
if ($hasChild) {
|
|
$this->dumpLine($cursor->depth);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* {@inheritdoc}
|
|
*/
|
|
public function leaveHash(Cursor $cursor, $type, $class, $hasChild, $cut)
|
|
{
|
|
$this->dumpEllipsis($cursor, $hasChild, $cut);
|
|
$this->line .= Cursor::HASH_OBJECT === $type ? '}' : (Cursor::HASH_RESOURCE !== $type ? ']' : ($hasChild ? '}' : ''));
|
|
$this->endValue($cursor);
|
|
}
|
|
|
|
/**
|
|
* Dumps an ellipsis for cut children.
|
|
*
|
|
* @param Cursor $cursor The Cursor position in the dump
|
|
* @param bool $hasChild When the dump of the hash has child item
|
|
* @param int $cut The number of items the hash has been cut by
|
|
*/
|
|
protected function dumpEllipsis(Cursor $cursor, $hasChild, $cut)
|
|
{
|
|
if ($cut) {
|
|
$this->line .= ' …';
|
|
if (0 < $cut) {
|
|
$this->line .= $cut;
|
|
}
|
|
if ($hasChild) {
|
|
$this->dumpLine($cursor->depth + 1);
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Dumps a key in a hash structure.
|
|
*
|
|
* @param Cursor $cursor The Cursor position in the dump
|
|
*/
|
|
protected function dumpKey(Cursor $cursor)
|
|
{
|
|
if (null !== $key = $cursor->hashKey) {
|
|
if ($cursor->hashKeyIsBinary) {
|
|
$key = $this->utf8Encode($key);
|
|
}
|
|
$attr = array('binary' => $cursor->hashKeyIsBinary);
|
|
$bin = $cursor->hashKeyIsBinary ? 'b' : '';
|
|
$style = 'key';
|
|
switch ($cursor->hashType) {
|
|
default:
|
|
case Cursor::HASH_INDEXED:
|
|
if (self::DUMP_LIGHT_ARRAY & $this->flags) {
|
|
break;
|
|
}
|
|
$style = 'index';
|
|
// no break
|
|
case Cursor::HASH_ASSOC:
|
|
if (\is_int($key)) {
|
|
$this->line .= $this->style($style, $key).' => ';
|
|
} else {
|
|
$this->line .= $bin.'"'.$this->style($style, $key).'" => ';
|
|
}
|
|
break;
|
|
|
|
case Cursor::HASH_RESOURCE:
|
|
$key = "\0~\0".$key;
|
|
// no break
|
|
case Cursor::HASH_OBJECT:
|
|
if (!isset($key[0]) || "\0" !== $key[0]) {
|
|
$this->line .= '+'.$bin.$this->style('public', $key).': ';
|
|
} elseif (0 < strpos($key, "\0", 1)) {
|
|
$key = explode("\0", substr($key, 1), 2);
|
|
|
|
switch ($key[0][0]) {
|
|
case '+': // User inserted keys
|
|
$attr['dynamic'] = true;
|
|
$this->line .= '+'.$bin.'"'.$this->style('public', $key[1], $attr).'": ';
|
|
break 2;
|
|
case '~':
|
|
$style = 'meta';
|
|
if (isset($key[0][1])) {
|
|
parse_str(substr($key[0], 1), $attr);
|
|
$attr += array('binary' => $cursor->hashKeyIsBinary);
|
|
}
|
|
break;
|
|
case '*':
|
|
$style = 'protected';
|
|
$bin = '#'.$bin;
|
|
break;
|
|
default:
|
|
$attr['class'] = $key[0];
|
|
$style = 'private';
|
|
$bin = '-'.$bin;
|
|
break;
|
|
}
|
|
|
|
if (isset($attr['collapse'])) {
|
|
if ($attr['collapse']) {
|
|
$this->collapseNextHash = true;
|
|
} else {
|
|
$this->expandNextHash = true;
|
|
}
|
|
}
|
|
|
|
$this->line .= $bin.$this->style($style, $key[1], $attr).(isset($attr['separator']) ? $attr['separator'] : ': ');
|
|
} else {
|
|
// This case should not happen
|
|
$this->line .= '-'.$bin.'"'.$this->style('private', $key, array('class' => '')).'": ';
|
|
}
|
|
break;
|
|
}
|
|
|
|
if ($cursor->hardRefTo) {
|
|
$this->line .= $this->style('ref', '&'.($cursor->hardRefCount ? $cursor->hardRefTo : ''), array('count' => $cursor->hardRefCount)).' ';
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Decorates a value with some style.
|
|
*
|
|
* @param string $style The type of style being applied
|
|
* @param string $value The value being styled
|
|
* @param array $attr Optional context information
|
|
*
|
|
* @return string The value with style decoration
|
|
*/
|
|
protected function style($style, $value, $attr = array())
|
|
{
|
|
if (null === $this->colors) {
|
|
$this->colors = $this->supportsColors();
|
|
}
|
|
|
|
if (isset($attr['ellipsis'], $attr['ellipsis-type'])) {
|
|
$prefix = substr($value, 0, -$attr['ellipsis']);
|
|
if ('cli' === \PHP_SAPI && 'path' === $attr['ellipsis-type'] && isset($_SERVER[$pwd = '\\' === \DIRECTORY_SEPARATOR ? 'CD' : 'PWD']) && 0 === strpos($prefix, $_SERVER[$pwd])) {
|
|
$prefix = '.'.substr($prefix, \strlen($_SERVER[$pwd]));
|
|
}
|
|
if (!empty($attr['ellipsis-tail'])) {
|
|
$prefix .= substr($value, -$attr['ellipsis'], $attr['ellipsis-tail']);
|
|
$value = substr($value, -$attr['ellipsis'] + $attr['ellipsis-tail']);
|
|
} else {
|
|
$value = substr($value, -$attr['ellipsis']);
|
|
}
|
|
|
|
return $this->style('default', $prefix).$this->style($style, $value);
|
|
}
|
|
|
|
$style = $this->styles[$style];
|
|
|
|
$map = static::$controlCharsMap;
|
|
$startCchr = $this->colors ? "\033[m\033[{$this->styles['default']}m" : '';
|
|
$endCchr = $this->colors ? "\033[m\033[{$style}m" : '';
|
|
$value = preg_replace_callback(static::$controlCharsRx, function ($c) use ($map, $startCchr, $endCchr) {
|
|
$s = $startCchr;
|
|
$c = $c[$i = 0];
|
|
do {
|
|
$s .= isset($map[$c[$i]]) ? $map[$c[$i]] : sprintf('\x%02X', \ord($c[$i]));
|
|
} while (isset($c[++$i]));
|
|
|
|
return $s.$endCchr;
|
|
}, $value, -1, $cchrCount);
|
|
|
|
if ($this->colors) {
|
|
if ($cchrCount && "\033" === $value[0]) {
|
|
$value = substr($value, \strlen($startCchr));
|
|
} else {
|
|
$value = "\033[{$style}m".$value;
|
|
}
|
|
if ($cchrCount && $endCchr === substr($value, -\strlen($endCchr))) {
|
|
$value = substr($value, 0, -\strlen($endCchr));
|
|
} else {
|
|
$value .= "\033[{$this->styles['default']}m";
|
|
}
|
|
}
|
|
|
|
return $value;
|
|
}
|
|
|
|
/**
|
|
* @return bool Tells if the current output stream supports ANSI colors or not
|
|
*/
|
|
protected function supportsColors()
|
|
{
|
|
if ($this->outputStream !== static::$defaultOutput) {
|
|
return $this->hasColorSupport($this->outputStream);
|
|
}
|
|
if (null !== static::$defaultColors) {
|
|
return static::$defaultColors;
|
|
}
|
|
if (isset($_SERVER['argv'][1])) {
|
|
$colors = $_SERVER['argv'];
|
|
$i = \count($colors);
|
|
while (--$i > 0) {
|
|
if (isset($colors[$i][5])) {
|
|
switch ($colors[$i]) {
|
|
case '--ansi':
|
|
case '--color':
|
|
case '--color=yes':
|
|
case '--color=force':
|
|
case '--color=always':
|
|
return static::$defaultColors = true;
|
|
|
|
case '--no-ansi':
|
|
case '--color=no':
|
|
case '--color=none':
|
|
case '--color=never':
|
|
return static::$defaultColors = false;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
$h = stream_get_meta_data($this->outputStream) + array('wrapper_type' => null);
|
|
$h = 'Output' === $h['stream_type'] && 'PHP' === $h['wrapper_type'] ? fopen('php://stdout', 'wb') : $this->outputStream;
|
|
|
|
return static::$defaultColors = $this->hasColorSupport($h);
|
|
}
|
|
|
|
/**
|
|
* {@inheritdoc}
|
|
*/
|
|
protected function dumpLine($depth, $endOfValue = false)
|
|
{
|
|
if ($this->colors) {
|
|
$this->line = sprintf("\033[%sm%s\033[m", $this->styles['default'], $this->line);
|
|
}
|
|
parent::dumpLine($depth);
|
|
}
|
|
|
|
protected function endValue(Cursor $cursor)
|
|
{
|
|
if (Stub::ARRAY_INDEXED === $cursor->hashType || Stub::ARRAY_ASSOC === $cursor->hashType) {
|
|
if (self::DUMP_TRAILING_COMMA & $this->flags && 0 < $cursor->depth) {
|
|
$this->line .= ',';
|
|
} elseif (self::DUMP_COMMA_SEPARATOR & $this->flags && 1 < $cursor->hashLength - $cursor->hashIndex) {
|
|
$this->line .= ',';
|
|
}
|
|
}
|
|
|
|
$this->dumpLine($cursor->depth, true);
|
|
}
|
|
|
|
/**
|
|
* Returns true if the stream supports colorization.
|
|
*
|
|
* Reference: Composer\XdebugHandler\Process::supportsColor
|
|
* https://github.com/composer/xdebug-handler
|
|
*
|
|
* @param mixed $stream A CLI output stream
|
|
*
|
|
* @return bool
|
|
*/
|
|
private function hasColorSupport($stream)
|
|
{
|
|
if (!\is_resource($stream) || 'stream' !== get_resource_type($stream)) {
|
|
return false;
|
|
}
|
|
|
|
if ('Hyper' === getenv('TERM_PROGRAM')) {
|
|
return true;
|
|
}
|
|
|
|
if (\DIRECTORY_SEPARATOR === '\\') {
|
|
return (\function_exists('sapi_windows_vt100_support')
|
|
&& @sapi_windows_vt100_support($stream))
|
|
|| false !== getenv('ANSICON')
|
|
|| 'ON' === getenv('ConEmuANSI')
|
|
|| 'xterm' === getenv('TERM');
|
|
}
|
|
|
|
if (\function_exists('stream_isatty')) {
|
|
return @stream_isatty($stream);
|
|
}
|
|
|
|
if (\function_exists('posix_isatty')) {
|
|
return @posix_isatty($stream);
|
|
}
|
|
|
|
$stat = @fstat($stream);
|
|
// Check if formatted mode is S_IFCHR
|
|
return $stat ? 0020000 === ($stat['mode'] & 0170000) : false;
|
|
}
|
|
|
|
/**
|
|
* Returns true if the Windows terminal supports true color.
|
|
*
|
|
* Note that this does not check an output stream, but relies on environment
|
|
* variables from known implementations, or a PHP and Windows version that
|
|
* supports true color.
|
|
*
|
|
* @return bool
|
|
*/
|
|
private function isWindowsTrueColor()
|
|
{
|
|
$result = 183 <= getenv('ANSICON_VER')
|
|
|| 'ON' === getenv('ConEmuANSI')
|
|
|| 'xterm' === getenv('TERM')
|
|
|| 'Hyper' === getenv('TERM_PROGRAM');
|
|
|
|
if (!$result && \PHP_VERSION_ID >= 70200) {
|
|
$version = sprintf(
|
|
'%s.%s.%s',
|
|
PHP_WINDOWS_VERSION_MAJOR,
|
|
PHP_WINDOWS_VERSION_MINOR,
|
|
PHP_WINDOWS_VERSION_BUILD
|
|
);
|
|
$result = $version >= '10.0.15063';
|
|
}
|
|
|
|
return $result;
|
|
}
|
|
}
|