', $direct);
htmlMicroscope_output ('
', $direct);
htmlMicroscope_output ('
', $direct);
if (2==1) {
$b = strlen(serialize($var)); //i suspect serialize to be slow and prone to memory hogging.
htmlMicroscope_output ('
Receiving '.$b.' bytes, '.filesizeHumanReadable($b).' of data.
', $direct);
} else {
htmlMicroscope_output ('
Receiving data.
', $direct);
}
htmlMicroscope_output ('
', $direct);
htmlMicroscope_output ('
', $direct);
htmlMicroscope_output (' ', $direct);
htmlMicroscope_output ('
', $direct);
$jesx_idPrefix = $htmlID.'_tracedata_';
$traceJSON = json_prepare($trace);
json_encode_safer_xxl ($traceJSON);
$jesx_idPrefix = $htmlID.'_data_';
//htmlMicroscope_output ('
'."\n", $direct);
$var = json_prepare($var);
json_encode_safer_xxl ($var);
htmlMicroscope_output ("\n".'
'."\n", $direct);
/*
htmlMicroscope_output ('
'."\n", $direct);
htmlMicroscope_output ('
', $direct);
*/
htmlMicroscope_output ('
', $direct);
htmlMicroscope_output (''."\n", $direct);
if ($direct) return true; else return $hmOutput;
}
function htmlMicroscope_dumpJSON ($jsonString, $title, $options=null, $hmSettings=null, $direct=true) {
if (!$hmSettings) $hmSettings = htmlMicroscope_config();
global $hmTopIdx;
$id = $hmTopIdx++;
$htmlID = 'scope'.$id;
global $jesx_idPrefix;
global $hmOutput;
$hmOutput = '';
$options = ($options ? json_encode_safe($options,true) : null);
$traceData=debug_backtrace();
$traceData = htmlMicroscope_filterTrace_forPHP($traceData, array(
'filter' => array(
// 'badResult' => 'removeCompletely',
//'nonFatalErrorHandler' => 'removeCompletely',
//'htmlMicroscope_dump' => 'removeCompletely',
//'hm' => 'removeCompletely'
)
));
$trace = array(
'hmOverrides' => array (
'themeName' => '--trace--'
//'urlEditor' => $hmSettings['urlEditor']
),
'traceData' => $traceData
);
//htmlDump ($trace, "td2");
htmlMicroscope_output ('
', $direct);
htmlMicroscope_output ('
', $direct);
htmlMicroscope_output ('
', $direct);
if (false) {
$b = strlen(serialize($var)); //i suspect serialize to be slow and prone to memory hogging.
htmlMicroscope_output ('
Receiving '.$b.' bytes, '.filesizeHumanReadable($b).' of data.
', $direct);
} else {
htmlMicroscope_output ('
Receiving data.
', $direct);
}
htmlMicroscope_output ('
', $direct);
htmlMicroscope_output ('
', $direct);
htmlMicroscope_output (' ', $direct);
htmlMicroscope_output ('
', $direct);
$jesx_idPrefix = $htmlID.'_tracedata_';
$traceJSON = json_prepare($trace);
json_encode_safer_xxl ($traceJSON);
$jesx_idPrefix = $htmlID.'_data_';
htmlMicroscope_output ('
'."\n", $direct);
htmlMicroscope_output ('', $direct);
htmlMicroscope_output ("\n".'
'."\n", $direct);
/*
htmlMicroscope_output ('
'."\n", $direct);
htmlMicroscope_output ('
', $direct);
*/
htmlMicroscope_output ('
', $direct);
htmlMicroscope_output ('
', $direct);
htmlMicroscope_output (''."\n", $direct);
if ($direct) return true; else return $hmOutput;
}
function htmlMicroscope_filterTrace_forPHP (&$t,$s=null) {
// $t = trace data from debug_backtrace()
// $s = settings
$r = array();
$t = array_reverse ($t);
foreach ($t as $k => &$l) {
$skip = false;
if (array_key_exists('filter', $s)) {
foreach ($s['filter'] as $k=>$v) {
if ($l['function']==$k) {
if ($v=='removeCompletely') { $skip = true; break; };
if ($v=='removeArg0') { $l['args'][0] = 'htmlMicroscope: removed to eliminate redundancy.'; };
}
}
}
if (!$skip) {
if (array_key_exists('removeFromFilePath', $s) && array_key_exists('file', $l)) {
$l['file'] = str_replace($s['removeFromFilePath'], '', $l['file']);
}
$context = array();
$context['function'] = $l['function'];
if (array_key_exists('file',$l)) $context['file'] = $l['file'];
if (array_key_exists('line',$l)) $context['line'] = $l['line'];
$id = json_encode($context);
if (array_key_exists('args',$l)) $r[$id] = $l['args'];
}
}
return $r;
return array_merge(array(
'hmOverrides'=>array(
'themeName'=>'--trace--'
)),$r
);
}
function json_prepare (&$v) {
$r = json_prepare_forPHP ($v);
return $r;
}
function json_prepare_forPHP (&$v) {
if (is_array($v)) {
foreach ($v as $k=>&$w) {
if ($k!==0 && ($k=='' || is_null($k))) {
unset ($v[$k]);
$k='__nullKey__';
};
$v[$k] = json_prepare_forPHP ($w);
}
} elseif (is_object($v)) {
$v = '[php object]';
} elseif (is_resource($v)) {
$v = '[php resource '.get_resource_type($v).' '.$v.']';
}
return $v;
}
// constants
global $jesx_idPrefix;
global $jesx_chunkSize;
$jesx_chunkSize = 1 * 1024 * 1024;
// variables
global $jesx_cntChunkBytesDone;
$jesx_cntChunkBytesDone = 0;
global $jesx_cntChunks;
$jesx_cntChunks = 0;
global $jecstf_idPrefix;
$jecstf_idPrefix = 'jsonEncodeChunkedSafe__';
global $jecstf_cntChunkBytesDone;
$jecstf_cntChunkBytesDone = 0;
global $jecstf_cntChunks;
$jecstf_cntChunks = 0;
function json_encode_chunked_safe_toFile ($f, &$a, $baseID='jsonEncodeChunkedSafe__', $extraEscaping=false, $isKey=false) {
global $jecstf_cntChunkBytesDone;
$jecstf_cntChunkBytesDone = 0;
global $jecstf_cntChunks;
$jecstf_cntChunks = 0;
global $jecstf_idPrefix;
$jecstf_idPrefix = $baseID;
json_encode_chunked_safe_toFile_do ($f, $a, $extraEscaping, $isKey);
json_encode_chunked_safe_toFile_seperatorEnd ($f);
}
function json_encode_chunked_safe_toFile_seperatorStart ($f) {
global $jecstf_cntChunks;
global $jecstf_idPrefix;
fwrite ($f, '
'."\n");
}
function json_encode_chunked_safe_toFile_do ($f, &$a, $extraEscaping=false, $isKey=false) {
global $jecstf_cntChunkBytesDone;
global $jesx_chunkSize;
global $jecstf_cntChunks;
if ($jecstf_cntChunkBytesDone > $jesx_chunkSize) {
json_encode_chunked_safe_toFile_seperatorEnd($f);
$jecstf_cntChunkBytesDone = 0;
$jecstf_cntChunks++;
}
if ($jecstf_cntChunkBytesDone==0) {
json_encode_chunked_safe_toFile_seperatorStart($f);
}
if (is_null($a) || is_bool($a)) {
if (is_null($a)) $r = 'null';
if ($a===false) $r = 'false';
if ($a===true) $r = 'true';
if ($isKey) {
if ($extraEscaping) {
$r = '\"'.$r.'\"';
} else {
$r = '"'.$r.'"';
}
}
fwrite ($f, $r);
$jecstf_cntChunkBytesDone+= strlen($r);
} else if (is_int($a) || is_float($a)) {
if ($isKey) {
if ($extraEscaping) {
fwrite ($f, '\"'.$a.'\"');
} else {
fwrite ($f, '"'.$a.'"');
}
} else {
fwrite ($f, ''.$a);
}
$jecstf_cntChunkBytesDone += strlen($a);
} else if (is_string($a)) {
$b = '';
if ($a=='') {
//if ($extraEscaping) echo '\"\"'; else echo '""';
} else {
$esc = '\\';
$skip = 0;
for ($i=0; $i
0) {
$i += $skip;
if ($i>=strlen($a)) break;
$skip = 0;
}
$c = substr($a,$i,3);
if (
$c=='\\u' ||
$c=='\\\\'
) {
//skip!
} elseif ($c=='-->') {
$c = '--|>'; //break HTML comment endings, coz it'll break the js decoding
$b.= $c;
$skip = 2;
} else {
$c = substr($c, 0, 1);
if (
$c == ' ' ||
$c == '"' ||
$c == "'" ||
$c == "\t" ||
$c == "\n" || //TODO try
$c == "\r" ||
$c == ')' ||
$c == '(' ||
( $c>='a' && $c<='z') ||
( $c>='A' && $c<='Z') ||
( $c>='0' && $c<='9') ||
$c == '.' ||
$c == '-' ||
$c == '_' ||
$c == '%' ||
$c == '!' ||
$c == '#' ||
$c == '$' ||
$c == '%' ||
$c == '&' ||
$c == '^' ||
$c == ',' ||
$c == ':' ||
$c == ';' ||
$c == '=' ||
$c == '?' ||
$c == '@' ||
$c == '`' ||
$c == '~' ||
$c == '|' ||
$c == '>' ||
$c == '<' ||
$c == '}' ||
$c == '{' ||
$c == ']' ||
$c == '[' ||
$c == '/' ||
$c == '+' ||
$c == '\\'
) {
//if ($c=="'") $c = '\\\'';
if ($c=='/') $c = '\\/';
elseif ($c=='\\') $c = '\\\\';
elseif ($c=='"') $c = '\\"';//$c= '~`';
elseif ($c=="\n") $c = '\\n';
elseif ($c=="\r") $c = '\\r';
elseif ($c=="\t") $c = '\\t';
} else {
$c = dechex(ord($c));
if (strlen($c)==1) $c= '000'.$c;
elseif (strlen($c)==2) $c= '00'.$c;
elseif (strlen($c)==3) $c= '0'.$c;
$c = $esc.'u'.$c;
}
$b.=$c;
}
}
}
if ($extraEscaping) {
//echo '\u0022';
fwrite ($f, '\"');
fwrite ($f, $b);
//echo '\u0022';
fwrite ($f, '\"');
$jecstf_cntChunkBytesDone += 4 + strlen($b);
} else {
fwrite ($f, '"');
fwrite ($f, $b);
fwrite ($f, '"');
$jecstf_cntChunkBytesDone += 2 + strlen($b);
}
return true;
} elseif (is_array($a)) {
$isList = true;
$isListStartingAt1 = false;
for ($i=0, reset($a); $i$v) {
if ($k=='hmOverrides') {
if (is_array($v) && array_key_exists('jsonMe', $v)) {
if ($v['jsonMe'] == true) $extraEscaping = true;
}
}
if ($first) { $first = false; } else { fwrite ($f,','); }
json_encode_chunked_safe_toFile_do ($f, $k,$extraEscaping, true);
fwrite ($f, ':');
$jecstf_cntChunkBytesDone += 1;
json_encode_chunked_safe_toFile_do ($f, $v,$extraEscaping);
}
fwrite ($f, '}');
$jecstf_cntChunkBytesDone += 1;
}
}
// ob_flush(); //flush the output buffer
return true;
}
function json_encode_safer_xxl (&$a, $extraEscaping=false, $isKey=false) {
global $jesx_cntChunkBytesDone;
$jesx_cntChunkBytesDone = 0;
json_encode_safer_xxl_do ($a, $extraEscaping, $isKey);
json_encode_safer_xxl_seperatorEnd();
}
function json_encode_safer_xxl_seperatorStart () {
global $jesx_cntChunks;
global $jesx_idPrefix;
echo ''."\n";
}
function json_encode_safer_xxl_do (&$a, $extraEscaping=false, $isKey=false) {
//was formerly php_js() by php at koterov dot ru,
// somewhat modified by rene7705@gmail.com
// this version outputs in chunks to different DIVs.
// browsers dont like strings (even comment strings) > 60 Mb or so (2010/01)
global $jesx_cntChunkBytesDone;
global $jesx_chunkSize;
global $jesx_cntChunks;
if ($jesx_cntChunkBytesDone > $jesx_chunkSize) {
json_encode_safer_xxl_seperatorEnd();
$jesx_cntChunkBytesDone = 0;
$jesx_cntChunks++;
}
if ($jesx_cntChunkBytesDone==0) {
json_encode_safer_xxl_seperatorStart();
}
if (is_null($a) || is_bool($a)) {
if (is_null($a)) $r = 'null';
if ($a===false) $r = 'false';
if ($a===true) $r = 'true';
if ($isKey) {
if ($extraEscaping) {
$r = '\"'.$r.'\"';
} else {
$r = '"'.$r.'"';
}
}
echo $r;
$jesx_cntChunkBytesDone+= strlen($r);
} else if (is_int($a) || is_float($a)) {
if ($isKey) {
if ($extraEscaping) {
echo '\"'.$a.'\"';
} else {
echo '"'.$a.'"';
}
} else {
echo ''.$a;
}
$jesx_cntChunkBytesDone += strlen($a);
} else if (is_string($a)) {
$b = '';
if ($a=='') {
//if ($extraEscaping) echo '\"\"'; else echo '""';
} else {
$esc = '\\';
$skip = 0;
for ($i=0; $i0) {
$i += $skip;
if ($i>=strlen($a)) break;
$skip = 0;
}
$c = substr($a,$i,3);
if (
$c=='\\u' ||
$c=='\\\\'
) {
//skip!
} elseif ($c=='-->') {
$c = '--|>'; //break HTML comment endings, coz it'll break the js decoding
$b.= $c;
$skip = 2;
} else {
$c = substr($c, 0, 1);
if (
$c == ' ' ||
$c == '"' ||
$c == "'" ||
$c == "\t" ||
$c == "\n" || //TODO try
$c == "\r" ||
$c == ')' ||
$c == '(' ||
( $c>='a' && $c<='z') ||
( $c>='A' && $c<='Z') ||
( $c>='0' && $c<='9') ||
$c == '.' ||
$c == '-' ||
$c == '_' ||
$c == '%' ||
$c == '!' ||
$c == '#' ||
$c == '$' ||
$c == '%' ||
$c == '&' ||
$c == '^' ||
$c == ',' ||
$c == ':' ||
$c == ';' ||
$c == '=' ||
$c == '?' ||
$c == '@' ||
$c == '`' ||
$c == '~' ||
$c == '|' ||
$c == '>' ||
$c == '<' ||
$c == '}' ||
$c == '{' ||
$c == ']' ||
$c == '[' ||
$c == '/' ||
$c == '+' ||
$c == '\\'
) {
//if ($c=="'") $c = '\\\'';
if ($c=='/') $c = '\\/';
elseif ($c=='\\') $c = '\\\\';
elseif ($c=='"') $c = '\\"';//$c= '~`';
elseif ($c=="\n") $c = '\\n';
elseif ($c=="\r") $c = '\\r';
elseif ($c=="\t") $c = '\\t';
} else {
$c = dechex(ord($c));
if (strlen($c)==1) $c= '000'.$c;
elseif (strlen($c)==2) $c= '00'.$c;
elseif (strlen($c)==3) $c= '0'.$c;
$c = $esc.'u'.$c;
}
$b.=$c;
}
}
}
if ($extraEscaping) {
//echo '\u0022';
echo '\"';
echo $b;
//echo '\u0022';
echo '\"';
$jesx_cntChunkBytesDone += 4 + strlen($b);
} else {
echo '"';
echo $b;
echo '"';
$jesx_cntChunkBytesDone += 2 + strlen($b);
}
return true;
} elseif (is_array($a)) {
$isList = true;
$isListStartingAt1 = false;
for ($i=0, reset($a); $i$v) {
if ($k=='hmOverrides') {
if (is_array($v) && array_key_exists('jsonMe', $v)) {
if ($v['jsonMe'] == true) $extraEscaping = true;
}
}
if ($first) { $first = false; } else { echo ','; }
json_encode_safer_xxl_do ($k,$extraEscaping, true);
echo ':';
$jesx_cntChunkBytesDone += 1;
json_encode_safer_xxl_do ($v,$extraEscaping);
}
echo '}';
$jesx_cntChunkBytesDone += 1;
}
}
// ob_flush(); //flush the output buffer
return true;
}
function json_encode_safer($a, $extraEscaping=false, $isKey=false) {
// outputs a single string of JSON, directly to the output buffer.
// but browsers, in January 2010, do not like strings > 60 megabyte. thats why _xxl was created.
//was formerly php_js() by php at koterov dot ru,
// somewhat modified by rene7705@gmail.com
if (is_null($a)) echo 'null';
if ($a === false) echo 'false';
if ($a === true) echo 'true';
if (is_int($a) || is_float($a)) {
if ($isKey) {
if ($extraEscaping) {
echo '\"'.$a.'\"';
} else {
echo '"'.$a.'"';
}
} else {
echo $a;
}
} else if (is_string($a)) {
$b = '';
if ($a=='') {
//if ($extraEscaping) echo '\"\"'; else echo '""';
} else {
$esc = '\\';
$skip = 0;
for ($i=0; $i0) {
$i += $skip;
if ($i>=strlen($a)) break;
$skip = 0;
}
$c = substr($a,$i,3);
if (
$c=='\\u' ||
$c=='\\\\'
) {
//skip!
} elseif ($c=='-->') {
$c = '--|>'; //break HTML comment endings, coz it'll break the js decoding
$b.= $c;
$skip = 2;
} else {
$c = substr($c, 0, 1);
if (
$c == ' ' ||
$c == '"' ||
$c == "'" ||
$c == "\t" ||
$c == "\n" || //TODO try
$c == "\r" ||
$c == ')' ||
$c == '(' ||
( $c>='a' && $c<='z') ||
( $c>='A' && $c<='Z') ||
( $c>='0' && $c<='9') ||
$c == '.' ||
$c == '-' ||
$c == '_' ||
$c == '%' ||
$c == '!' ||
$c == '#' ||
$c == '$' ||
$c == '%' ||
$c == '&' ||
$c == '^' ||
$c == ',' ||
$c == ':' ||
$c == ';' ||
$c == '=' ||
$c == '?' ||
$c == '@' ||
$c == '`' ||
$c == '~' ||
$c == '|' ||
$c == '>' ||
$c == '<' ||
$c == '}' ||
$c == '{' ||
$c == ']' ||
$c == '[' ||
$c == '/' ||
$c == '+' ||
$c == '\\'
) {
//if ($c=="'") $c = '\\\'';
if ($c=='/') $c = '\\/';
elseif ($c=='\\') $c = '\\\\';
elseif ($c=='"') $c = '\\"';//$c= '~`';
elseif ($c=="\n") $c = '\\n';
elseif ($c=="\r") $c = '\\r';
elseif ($c=="\t") $c = '\\t';
} else {
$c = dechex(ord($c));
if (strlen($c)==1) $c= '000'.$c;
elseif (strlen($c)==2) $c= '00'.$c;
elseif (strlen($c)==3) $c= '0'.$c;
$c = $esc.'u'.$c;
}
$b.=$c;
}
}
}
if ($extraEscaping) {
//echo '\u0022';
echo '\"';
echo $b;
//echo '\u0022';
echo '\"';
} else {
echo '"';
echo $b;
echo '"';
}
return true;
} elseif (is_array($a)) {
$isList = true;
$isListStartingAt1 = false;
for ($i=0, reset($a); $i$v) {
if ($k=='hmOverrides') {
if (is_array($v) && array_key_exists('jsonMe', $v)) {
if ($v['jsonMe'] == true) $extraEscaping = true;
}
}
if ($first) { $first = false; } else { echo ','; }
json_encode_safer($k,$extraEscaping, true);
echo ':';
json_encode_safer($v,$extraEscaping);
}
echo '}';
}
}
// ob_flush(); //flush the output buffer
return true;
}
function json_encode_safe($a, $extraEscaping=false, $isKey=false) {
// returns a JSON string of $a to the calling function.
//was formerly php_js() by php at koterov dot ru,
// somewhat modified by rene7705@gmail.com
if (is_null($a)) return 'null';
if ($a === false) return 'false';
if ($a === true) return 'true';
if (is_int($a) || is_float($a)) {
if ($isKey) {
if ($extraEscaping) {
return '\"'.$a.'\"';
} else {
return '"'.$a.'"';
}
} else {
return $a;
}
} else if (is_string($a)) {
$b = '';
if ($a=='') {
echo '""';
} else {
$esc = '\\';
$skip = 0;
for ($i=0; $i0) {
$i += $skip;
if ($i>=strlen($a)) break;
$skip = 0;
}
$c = substr($a,$i,3);
if (
$c=='\\u' ||
$c=='\\\\'
) {
//skip!
} elseif ($c=='-->') {
$c = '--|>'; //break HTML comment endings, coz it'll break the js decoding
$b.= $c;
$skip = 2;
} else {
$c = substr($c, 0, 1);
if (
$c == ' ' ||
$c == '"' ||
$c == "'" ||
$c == "\t" ||
$c == "\n" ||
$c == "\r" ||
$c == ')' ||
$c == '(' ||
( $c>='a' && $c<='z') ||
( $c>='A' && $c<='Z') ||
( $c>='0' && $c<='9') ||
$c == '.' ||
$c == '-' ||
$c == '_' ||
$c == '%' ||
$c == '!' ||
$c == '#' ||
$c == '$' ||
$c == '%' ||
$c == '&' ||
$c == '^' ||
$c == ',' ||
$c == ':' ||
$c == ';' ||
$c == '=' ||
$c == '?' ||
$c == '@' ||
$c == '`' ||
$c == '~' ||
$c == '|' ||
$c == '>' ||
$c == '<' ||
$c == '}' ||
$c == '{' ||
$c == ']' ||
$c == '[' ||
$c == '/' ||
$c == '+' ||
$c == '\\'
) {
//if ($c=="'") $c = '\\\'';
if ($c=='/') $c = '\\/';
elseif ($c=='\\') $c = '\\\\';
elseif ($c=='"') $c = '\\"';//$c= '~`';
elseif ($c=="\n") $c = '\\n';
elseif ($c=="\r") $c = '\\r';
elseif ($c=="\t") $c = '\\t';
} else {
$c = dechex(ord($c));
if (strlen($c)==1) $c= '000'.$c;
elseif (strlen($c)==2) $c= '00'.$c;
elseif (strlen($c)==3) $c= '0'.$c;
$c = $esc.'u'.$c;
}
$b.=$c;
}
}
}
if ($extraEscaping) {
return '\"'.$b.'\"';
} else {
return '"'.$b.'"';
}
}
$isList = true;
$isListStartingAt1 = false;
for ($i=0, reset($a); $i$v)
$result[] = json_encode_safe($k,$extraEscaping, true) . ':' . json_encode_safe($v,$extraEscaping);
return '{' . join(',', $result) . '}';
}
}
// ---
// self-test functions:
function htmlMicroscope_selfTest ($p, $q) {
set_time_limit(0);
// defaults for parameters;
$mem = 130; // memory limit in Mb, 10 minimum
$grace = 4; // how much Mb to stay under the memory limit
$duration = -1; // max execution time
$keys = 999999999; // i'd rather specify how much memory to use.
$deep = 7;
$addStrangeDataTypes = !array_key_exists('nosdt', $_GET);
if ($addStrangeDataTypes) $grace+=8;
$themeOverride = true;
// possibly override params from url-commandline
if (array_key_exists('mem', $_GET) && is_numeric($_GET['mem'])) {
$mem = (int)$_GET['mem'];
}
if (array_key_exists('grace', $_GET) && is_numeric($_GET['grace'])) {
$grace = (int)$_GET['grace'];
}
if (array_key_exists('duration', $_GET) && is_numeric($_GET['duration'])) {
$duration = (int)$_GET['duration'];
}
if (array_key_exists('keys', $_GET) && is_numeric($_GET['keys'])) {
$keys = (int)$_GET['keys'];
}
if (array_key_exists('deep', $_GET) && is_numeric($_GET['deep'])) {
$deep = (int)$_GET['deep'];
}
if (array_key_exists('themeOverride', $_GET) ) {
$themeOverride = $_GET['themeOverride'];
if ($themeOverride=='false') $themeOverride=false;
}
$newMem = ini_set('memory_limit', $mem.'M');
echo "\n".'';
echo "\n";
define ('MEMORY_AVAILABLE', ($mem-$grace) * 1024 * 1024); // in bytes
define ('DURATION', ($duration==-1?-1:$duration * 60)); // in seconds. -1 = no time limit
// start generating
$test = array();
if ($addStrangeDataTypes) {
$asciiTable='';
for ($i=1; $i array('this'=>'out')
));
$test['All ASCII'] = array('here'=>$asciiTable);
$test['All Unicode'] = array ('here'=>$unicodeTable);
$test['some HTML'] = array(
'hmOverrides' => array (
'keyAsPre' => true,
'valRenderHTML' => true
),
'credits' => 'http://www.immigration-usa.com/html_colors.html',
'hit ""!' => file_get_contents('testdata.html')
);
$test['JSON data'] = array (
'here' => json_encode_safe(array(
'we'=>'go',
'...'=>array(
'deeper' => array(
'and' => array (
'deeper' => array (
'down' => array(
'the' => array(
'rabbit' => 'hole',
//'html within json' => array('here'=>file_get_contents('testdata.html')),
'ASCII' => array('here'=>$asciiTable),
//'Unicode' => array('here'=>$unicode)
)))))))));
$test['img as key'] = array (
'hmOverrides' => array(
'keyRenderHTML' => true
),
'key with backdrop;
' => 'xyz',
);
$test['json in key, theme override in sub'] = array(
$jsonInKey => array (
'normal' => 'abc',
'theme override' => array (
'here' => htmlMicroscope_generateRandomArray(30,5, DURATION, MEMORY_AVAILABLE))
)
);
$test['json in key, theme override in sub'][$jsonInKey]
['theme override']['here']['hmOverrides'] = array(
'themeName' => 'renesRed'
);
};
if ($themeOverride) {
$test['theme override'] = htmlMicroscope_generateRandomArray(
//$keys, $deep, DURATION, MEMORY_AVAILABLE
200, 7, DURATION, MEMORY_AVAILABLE
);
$test['theme override']['keys'] = $keys;
$test['theme override']['hmOverrides'] = array(
'themeName' => 'renesRed2'
);
}
$test['random'] = htmlMicroscope_generateRandomArray(
$keys, $deep, DURATION, MEMORY_AVAILABLE
);
//svar_dump ($data);
file_put_contents ('countdown.txt', 'done');
hm ($test, 'example array');
$test = null;
}
global $hmGenKeys;
$hmGenKeys = 0;
global $hmGenKeysDone;
$hmGenKeysDone = 0;
function htmlMicroscope_generateRandomArray ($maxKeys, $maxDepth, $maxDuration=-1, $maxMem=-1) {
global $hmGenKeys;
global $hmGenKeysDone;
$r = array();
$l1 = false;
if ($maxKeys!==null) {
$hmGenKeys = $maxKeys;
$l1 = true;
}
$hmGenKeys--;
if ($hmGenKeys<=0) return false;
if ($maxDepth<=0) return false;
if ($l1) {
srand(htmlMicroscope_randMakeSeed());
while ($hmGenKeys > 0) {
$hmGenKeys--;
$hmGenKeysDone++;
file_put_contents('countdown.txt',
'k:'.number_format($hmGenKeysDone,0,'.',',').
' m:'.number_format(memory_get_usage(true),0,'.',',')
);
if ($maxMem!=-1 && memory_get_usage(true) > $maxMem) {echo"yea"; return $r;}
if ($maxDuration!=-1 && $maxDuration < getDuration()) return $r;
switch (rand(1,2)) {
case 1 :
$next = htmlMicroscope_generateRandomArray (null, $maxDepth-1, $maxDuration, $maxMem);
if ($next!==false)
$r += array(
htmlMicroscope_randomValue(4) => $next
);
break;
case 2 :
$r += array(
htmlMicroscope_randomValue(4) => htmlMicroscope_randomValue(20)
);
break;
}
}
} else {
$range = rand(0,50);
for ($i=0; $i<$range; $i++) {
$hmGenKeys--;
$hmGenKeysDone++;
file_put_contents('countdown.txt',
'k:'.number_format($hmGenKeysDone,0,'.',',').
' m:'.number_format(memory_get_usage(true),0,'.',',')
);
if ($maxMem!=-1 && memory_get_usage(true) > $maxMem) return $r;
if ($maxDuration!=-1 && $maxDuration < getDuration()) return $r;
switch (rand(1,2)) {
case 1 :
$next = htmlMicroscope_generateRandomArray (null, $maxDepth-1, $maxDuration, $maxMem);
if ($next!==false)
$r += array(
htmlMicroscope_randomValue(4) => $next
);
break;
case 2 :
$r += array(
htmlMicroscope_randomValue(4) => htmlMicroscope_randomValue(20)
);
break;
}
}
}
if (($hmGenKeysDone/7919)==round($hmGenKeysDone/7919)) sleep(1);
return $r;
}
function htmlMicroscope_randomValue($maxLength) {
$r = '';
switch (rand(0,9)) {
case 0 : $r = rand (0,100000000); break;
case 1 : $r = rand (0,100000000) / rand(1,100) / 3; break;
default:
switch (rand(0,1)) {
case 0:
$rnd = rand(1,$maxDepth);
for ($i = 0; $i < $rnd; $i++) {
$r.= unichr(rand(0,hexdec('ffff')));
}
break;
case 1:
for ($i = 0; $i < $maxLength; $i++) {
$r.=chr(rand(ord('a'),ord('z')));;
}
break;
}
break;
}
//echo $r.'
'.$maxLength.'
';
return $r;
}
function htmlMicroscope_randMakeSeed() {
list($usec, $sec) = explode(' ', microtime());
return (float) $sec + ((float) $usec * 100000);
}
/*
function htmlMicroscope_dumpDirect ($var, $title, $options=null, $hmSettings=null) {
if (!$hmSettings) $hmSettings = htmlMicroscope_config();
$id = preg_replace('/\s/','',getDuration());
$id = preg_replace('/\./','_', $id);
$htmlID = 'debug_'.$id;
//htmlDump ($var);
// $data = json_encode_safe(json_prepare($var),true);
$options = ($options ? json_encode_safe(json_prepare($options),true) : null);
$traceData = htmlMicroscope_filterTrace(debug_backtrace(), array());
$trace = array_merge(array(
'hmOverrides' => array (
'themeName' => '--trace--',
'urlEditor' => $hmSettings['urlEditor']
),
'traceData' => $traceData
));
//htmlDump ($trace, "td2");
echo '';
echo '
';
echo '
htmlMicroscope ';
echo '
'.$title.' ';
echo '
';
if (2==1) {
$b = strlen(serialize($var)); //i suspect serialize to be slow and prone to memory hogging.
echo '
'.$b.' bytes, '.filesizeHumanReadable($b).' of data to parse';
} else {
echo '
Unknown size of bytes left to parse.';
}
echo '
';
echo '
';
echo '
';
echo '
';
echo '
';
echo '
';
echo '