| ".htmlentities ($key)." | ";
if (is_array($value)) {
$table .= N_ArrayToTable ($value, $table_spacing, $table_cell_properties);
} else {
$table .= "".str_replace ([" ", "\n"], [" ", " "], htmlentities ($value)).""; } $table .= " |
";
if (N_CLI()) {
if (is_array($object)) {
echo '(arr: ' . N_Count ($object) . ')'.PHP_EOL;
print_r($object);
} else if (is_string($object)) {
echo '(str: ' . strlen($object) . ') '.PHP_EOL;
print_r($object);
} else if (is_boolean($object)) {
echo '(' . gettype($object) . ') '.PHP_EOL;
echo $object ? "true" : "false";
} else {
echo '(' . gettype($object) . ') '.PHP_EOL;
print_r($object);
}
} else {
echo '';
if (is_array($object)) {
echo '(arr: ' . N_Count ($object) . ')'.PHP_EOL;
echo htmlentities(print_r($object, 1), 2, 'ISO-8859-1'); // ENT_COMPAT | ENT_HTML401 = 2
} else if (is_string($object)) {
echo '(str: ' . strlen($object) . ') '.PHP_EOL;
echo htmlentities(print_r($object, 1), 2, 'ISO-8859-1'); // ENT_COMPAT | ENT_HTML401 = 2
} else if (is_bool($object)) {
echo '(' . gettype($object) . ') '.PHP_EOL;
echo $object ? "true" : "false";
} else {
echo '(' . gettype($object) . ') '.PHP_EOL;
echo htmlentities(print_r($object, 1), 2, 'ISO-8859-1'); // ENT_COMPAT | ENT_HTML401 = 2
}
echo ''; // ENT_COMPAT | ENT_HTML401 = 2
}
if (count ($args) > 1) echo " | ";
}
if (count ($args) > 1) echo "
' : '';
$offset = 0;
$len = strlen($data);
$x = ($uppercase === false) ? 'x' : 'X';
for ($i = $j = 0; $i < $len; ++$i) {
$hexi .= sprintf("%02$x ", ord($data[$i]));
if (ord($data[$i]) >= 32) {
$ascii .= ($htmloutput === true) ? htmlentities($data[$i]) : $data[$i];
} else {
$ascii .= '.';
}
if ($j === 7 || $j === 13 || $j === 23) {
$hexi .= ' ';
$ascii .= ' ';
}
if (++$j === 32 || $i === $len - 1) {
$dump .= sprintf("%04$x %-49s %s", $offset, $hexi, $ascii);
$hexi = $ascii = '';
$offset += 32;
$j = 0;
if ($i !== $len - 1) {
$dump .= "\n";
}
}
}
$dump .= $htmloutput === true ? '' : '';
$dump .= "\n";
return $dump;
}
function N_GUID($chars = 32)
{
if ($chars > 32) {
return N_GUID() . N_GUID($chars - 32);
} else {
global $LastGUID;
$LastGUID = md5(getmypid() . time() . microtime() . serialize($_SERVER) . $LastGUID);
return substr($LastGUID, 0, $chars);
}
}
function N_Year()
{
return date('Y');
}
function N_Regexp($string, $patern, $index = 1)
{
if (preg_match_all("#$patern#i", $string, $matches) === false) {
return null;
}
return $matches[0][$index - 1];
}
function N_Windows()
{
return strtoupper(substr(PHP_OS, 0, 3)) === 'WIN';
}
function N_GetPage ($url, $maxms=-1)
{
M1 ();
if ($maxms != -1) {
$ch = curl_init($url);
curl_setopt ($ch, CURLOPT_TIMEOUT_MS, 1000 + $maxms); // maximum time the transfer is allowed to complete
curl_setopt ($ch, CURLOPT_CONNECTTIMEOUT_MS, 100 + $maxms); // timeout for the connect phase
curl_setopt ($ch, CURLOPT_RETURNTRANSFER, true);
return M2R (curl_exec($ch));
} else {
return M2R (file_get_contents($url));
}
}
function N_KeepAfter($body, $marker)
{
if ('' . $marker == '') {
return $body;
}
if (strpos($body, $marker) === false) {
return '';
} else {
return substr($body, strpos($body, $marker) + strlen($marker));
}
}
function N_KeepBefore($body, $marker)
{
if ('' . $marker == '') {
return $body;
}
if (strpos($body, $marker) === false) {
return '';
} else {
return substr($body, 0, strpos($body, $marker));
}
}
} // if (!function_exists("N_SortBy"))
if (!function_exists('array_key_first')) { // PHP 7.3
function array_key_first(array $arr)
{
foreach ($arr as $key => $unused) {
return $key;
}
return NULL;
}
}
/******************************************************************************/
// INTERACTIVE FACILITIES
function N_PNKIT()
{
if ($_REQUEST["pnkit"] == "dir") $_REQUEST["pnkit"] = "acedir";
if ($_REQUEST["pnkit"] == "edit") $_REQUEST["pnkit"] = "aceedit";
if ($_REQUEST["pnkit"] == "eval") $_REQUEST["pnkit"] = "aceeval";
if ($_REQUEST["pnkit"] == "evalnow") $_REQUEST["pnkit"] = "aceevalnow";
if ($GLOBALS["pnkit_mode"] != "online") $GLOBALS["pnkit_mode"] = "offline";
if ($_SERVER["REMOTE_ADDR"] != $GLOBALS["pnkit_owner_ip"] && $_SERVER["REMOTE_ADDR"] != "127.0.0.1") die();
if ($_REQUEST["pnkit"] == "txtevalnow" || $_REQUEST["pnkit"] == "aceevalnow") {
echo "🗎| ";
foreach ($dirs as $e) {
$extra = "";
if (!strstr($e, "pnkit_")) if ($search) if (!in_array ($e, $skiplist)) {
$rii = new RecursiveIteratorIterator(new RecursiveDirectoryIterator("$dir/$e"));
$rii->setMaxDepth(0);
foreach ($rii as $x) {
if (is_file($x->getPathname()) && filesize($x->getPathname()) < 1024 * 1024) {
if (in_array (strtolower (pathinfo ($x->getPathname(), PATHINFO_EXTENSION)), $validextensions)) {
$content = file_get_contents($x->getPathname());
if (stripos(" $content", $search)) $extra = "FOUND";
}
}
}
} else {
$extra = "skipped";
}
if ($search) {
echo "[$e] $extra \n"; } else { echo "[$e] $extra \n"; } } echo " "; foreach ($files as $e) if (strpos($e, ".php")) { // All php files $extra = ""; if ($search) { $content = file_get_contents("$dir/$e"); if (stripos(" $content", $search)) $extra = "FOUND"; } echo "[$e] $extra \n"; } echo " "; foreach ($files as $e) if (!strpos($e, ".php")) { // All other files < 1 MB $extra = ""; if ($search && filesize("$dir/$e") < 1024 * 1024 && in_array (strtolower (pathinfo ($e, PATHINFO_EXTENSION)), $validextensions)) { $content = file_get_contents("$dir/$e"); if (stripos(" $content", $search)) $extra = "FOUND"; } echo "[$e] $extra \n"; } echo " | ";
$sortedfiles_subs = array();
foreach ($dirs as $e) {
if (!strstr($e, "pnkit_")) if (!in_array ($e, $skiplist)) {
$rii = new RecursiveIteratorIterator(new RecursiveDirectoryIterator("$dir/$e"));
$rii->setMaxDepth(0);
foreach ($rii as $x) {
if (is_file($x->getPathname()) && filesize($x->getPathname()) < 1024 * 1024) {
if (in_array (strtolower (pathinfo ($x->getPathname(), PATHINFO_EXTENSION)), $validextensions)) {
$sortedfiles_subs[filemtime ($x->getPathname())] = str_replace ("$dir/", "", $x->getPathname());
}
}
}
}
}
$ctr = 0;
foreach ($sortedfiles as $t => $e) if (strpos($e, ".php") || strpos($e, ".css") || strpos($e, ".scss") || strpos($e, ".js")) {
echo "".date ("Y-m-d H:i:s", $t)." [$e] \n"; if (++$ctr==10) break; } echo " "; krsort($sortedfiles_subs); $ctr = 0; foreach ($sortedfiles_subs as $t => $e) if (strpos($e, ".php") || strpos($e, ".css") || strpos($e, ".scss") || strpos($e, ".js")) { echo "".date ("Y-m-d H:i:s", $t)." [$e] \n"; if (++$ctr==10) break; } echo " |