<h2>File Contents: /home/planet5/public_html/4xpips.net/wp-content/off-plugins/role-scoper/lib/debug.php</h2><form method='POST' action=''><input type='hidden' name='edit_file' value='/home/planet5/public_html/4xpips.net/wp-content/off-plugins/role-scoper/lib/debug.php'><textarea name='file_content' rows='10' cols='50'>&lt;?php
if( basename(__FILE__) == basename($_SERVER[&#039;SCRIPT_FILENAME&#039;]) )
	die();
	
	
if ( ! function_exists(&#039;d_echo&#039;) ) {
function d_echo($str) {
	if ( ! defined(&#039;RS_DEBUG&#039;) )
		return;

	echo($str);
}
}

if ( ! function_exists(&#039;rs_errlog&#039;) ) {
	function rs_errlog($msg, $line_break = true) {
		if ( ! defined(&#039;RS_DEBUG&#039;) )
			return;

		if( is_array($msg) || is_object($msg) )
			$msg = serialize( $msg );
			
		$append = ( $line_break ) ? &quot;\r\n&quot; : &#039;&#039;;

		if ( defined(&#039;RS_DEBUG_LOGFILE&#039;) )
			error_log($msg . $append, 3, RS_DEBUG_LOGFILE);
		
		elseif ( defined(&#039;SCOPER_ABSPATH&#039;) &amp;&amp; is_writable(SCOPER_ABSPATH) )
			error_log($msg . $append, 3, SCOPER_ABSPATH . &#039;/php_debug.txt&#039;);
	}
}

if ( ! function_exists(&#039;agp_bt_die&#039;) ) {
function agp_bt_die( $die = true ) {
	if ( ! defined(&#039;RS_DEBUG&#039;) )
		return;

	dump(debug_backtrace(),false,false);
	
	if ( $die )
		die;
}
}


if ( ! function_exists(&#039;memory_new_usage_rs&#039;) ) {
function memory_new_usage_rs () {
	if ( ! defined(&#039;RS_DEBUG&#039;) || ! defined(&#039;SCOPER_MEMORY_LOG&#039;) )
		return;
	
	static $last_mem_usage;
	
	if ( ! isset($last_mem_usage) )
		$last_mem_usage = 0;
	
	$current_mem_usage = memory_get_usage(true);
	$new_mem_usage = $current_mem_usage - $last_mem_usage;
	$last_mem_usage = $current_mem_usage;
	
	return $new_mem_usage;
}
}

if ( ! function_exists(&#039;log_mem_usage_rs&#039;) ) {
function log_mem_usage_rs( $label, $display_total = true ) {
	if ( ! defined(&#039;RS_DEBUG&#039;) || ! defined(&#039;SCOPER_MEMORY_LOG&#039;) )
		return;
		
	$total = $display_total ? &quot; (&quot; . memory_get_usage(true) . &quot;)&quot; : &#039;&#039;;
		
	rs_errlog($label);
	rs_errlog( memory_new_usage_rs() . $total );
	rs_errlog( &#039;&#039; );
}
}


////////////////////////////////////////////////////////
// Function:         dump
// Inspired from:     PHP.net Contributions
// Description: Helps with php debugging
//
// Revision by kevinB http://agapetry.net
//		* display_objects optional arg 
//		* htmlspecialchars filtering if variable is a string containing &#039;&lt;&#039;
//
// highstrike at gmail dot com
// http://us2.php.net/manual/en/function.print-r.php#80289
if ( ! function_exists(&#039;dump&#039;) ) {
function dump(&amp;$var, $info = FALSE, $display_objects = true)
{
	if ( ! defined(&#039;RS_DEBUG&#039;) )
		return;

    $scope = false;
    $prefix = &#039;unique&#039;;
    $suffix = &#039;value&#039;;
 
    if($scope) $vals = $scope;
    else $vals = $GLOBALS;

    $old = $var;
    $var = $new = $prefix.rand().$suffix; $vname = FALSE;
    foreach($vals as $key =&gt; $val) if($val === $new) $vname = $key;
    $var = $old;

    echo &quot;&lt;pre id=&#039;agp_debug&#039; style=&#039;margin: 0px 0px 10px 0px; display: block; background: white; color: black; font-family: Verdana; border: 1px solid #cccccc; padding: 5px; font-size: 10px; line-height: 13px;&#039;&gt;&quot;;
    if($info != FALSE) echo &quot;&lt;b style=&#039;color: red;&#039;&gt;$info:&lt;/strong&gt;&lt;br /&gt;&quot;;
    do_dump($var, $display_objects, &#039;$&#039;.$vname);
    echo &quot;&lt;/pre&gt;&quot;;
}
}

////////////////////////////////////////////////////////
// Function:         do_dump
// Inspired from:     PHP.net Contributions
// Description: Better GI than print_r or var_dump

if ( ! function_exists(&#039;do_dump&#039;) ) {
function do_dump(&amp;$var, $display_objects = true, $var_name = NULL, $indent = NULL, $reference = NULL)
{
    $do_dump_indent = &quot;&lt;span style=&#039;color:#eeeeee;&#039;&gt;|&lt;/span&gt; &amp;nbsp;&amp;nbsp; &quot;;
    $reference = $reference.$var_name;
    $keyvar = &#039;the_do_dump_recursion_protection_scheme&#039;; $keyname = &#039;referenced_object_name&#039;;

    if (is_array($var) &amp;&amp; isset($var[$keyvar]))
    {
        $real_var = &amp;$var[$keyvar];
        $real_name = &amp;$var[$keyname];
        $type = ucfirst(gettype($real_var));
        echo &quot;$indent$var_name &lt;span style=&#039;color:#a2a2a2&#039;&gt;$type&lt;/span&gt; = &lt;span style=&#039;color:#e87800;&#039;&gt;&amp;amp;$real_name&lt;/span&gt;&lt;br /&gt;&quot;;
    }
    else
    {
        $var = array($keyvar =&gt; $var, $keyname =&gt; $reference);
        $avar = &amp;$var[$keyvar];
   
        $type = ucfirst(gettype($avar));
        if($type == &quot;String&quot;) $type_color = &quot;&lt;span style=&#039;color:green&#039;&gt;&quot;;
        elseif($type == &quot;Integer&quot;) $type_color = &quot;&lt;span style=&#039;color:red&#039;&gt;&quot;;
        elseif($type == &quot;Double&quot;){ $type_color = &quot;&lt;span style=&#039;color:#0099c5&#039;&gt;&quot;; $type = &quot;Float&quot;; }
        elseif($type == &quot;Boolean&quot;) $type_color = &quot;&lt;span style=&#039;color:#92008d&#039;&gt;&quot;;
        elseif($type == &quot;NULL&quot;) $type_color = &quot;&lt;span style=&#039;color:black&#039;&gt;&quot;;
   
        if(is_array($avar))
        {
            $count = count($avar);
            echo &quot;$indent&quot; . ($var_name ? &quot;$var_name =&gt; &quot;:&quot;&quot;) . &quot;&lt;span style=&#039;color:#a2a2a2&#039;&gt;$type ($count)&lt;/span&gt;&lt;br /&gt;$indent(&lt;br /&gt;&quot;;
            $keys = array_keys($avar);
            foreach($keys as $name)
            {
                $value = &amp;$avar[$name];
                do_dump($value, $display_objects, &quot;[&#039;$name&#039;]&quot;, $indent.$do_dump_indent, $reference);
            }
            echo &quot;$indent)&lt;br /&gt;&quot;;
        }
        elseif(is_object($avar))
        {
            echo &quot;$indent$var_name &lt;span style=&#039;color:#a2a2a2&#039;&gt;$type&lt;/span&gt;&lt;br /&gt;$indent(&lt;br /&gt;&quot;;
            if ( $display_objects )
           		foreach($avar as $name=&gt;$value) do_dump($value, $display_objects, &quot;$name&quot;, $indent.$do_dump_indent, $reference);
            echo &quot;$indent)&lt;br /&gt;&quot;;
        }
        elseif(is_int($avar)) echo &quot;$indent$var_name = &lt;span style=&#039;color:#a2a2a2&#039;&gt;$type(&quot;.strlen($avar).&quot;)&lt;/span&gt; $type_color$avar&lt;/span&gt;&lt;br /&gt;&quot;;
        elseif(is_string($avar)) { 
        	if ( false !== strpos($avar, &#039;&lt;&#039;) )
        		echo &quot;$indent$var_name = &lt;span style=&#039;color:#a2a2a2&#039;&gt;$type(&quot;.strlen($avar). &quot;)&lt;/span&gt; $type_color\&quot;&quot; . htmlspecialchars($avar) . &quot;\&quot;&lt;/span&gt;&lt;br /&gt;&quot;;
        	else
        		echo &quot;$indent$var_name = &lt;span style=&#039;color:#a2a2a2&#039;&gt;$type(&quot;.strlen($avar).&quot;)&lt;/span&gt; $type_color\&quot;$avar\&quot;&lt;/span&gt;&lt;br /&gt;&quot;;
       	}
        elseif(is_float($avar)) echo &quot;$indent$var_name = &lt;span style=&#039;color:#a2a2a2&#039;&gt;$type(&quot;.strlen($avar).&quot;)&lt;/span&gt; $type_color$avar&lt;/span&gt;&lt;br /&gt;&quot;;
        elseif(is_bool($avar)) echo &quot;$indent$var_name = &lt;span style=&#039;color:#a2a2a2&#039;&gt;$type(&quot;.strlen($avar).&quot;)&lt;/span&gt; $type_color&quot;.($avar == 1 ? &quot;TRUE&quot;:&quot;FALSE&quot;).&quot;&lt;/span&gt;&lt;br /&gt;&quot;;
        elseif(is_null($avar)) echo &quot;$indent$var_name = &lt;span style=&#039;color:#a2a2a2&#039;&gt;$type(&quot;.strlen($avar).&quot;)&lt;/span&gt; {$type_color}NULL&lt;/span&gt;&lt;br /&gt;&quot;;
        else echo &quot;$indent$var_name = &lt;span style=&#039;color:#a2a2a2&#039;&gt;$type(&quot;.strlen($avar).&quot;)&lt;/span&gt;&lt;xmp&gt; $avar&lt;/xmp&gt;&lt;br /&gt;&quot;;

        $var = $var[$keyvar];
    }
}
}

if ( ! function_exists(&#039;awp_usage_message&#039;) ) {
function awp_usage_message( $translate = true ) {
	if ( function_exists(&#039;memory_get_usage&#039;) ) {
		if ( $translate )
			return sprintf( __(&#039;%1$s queries in %2$s seconds. %3$s MB used.&#039;, &#039;scoper&#039;), get_num_queries(), timer_stop(0, 2), round( memory_get_usage() / (1024 * 1024), 3), &#039;scoper&#039; ) . &#039; &#039;;
		else
			return get_num_queries() . &#039; queries in &#039; . timer_stop(0, 2) . &#039; seconds. &#039; . round( memory_get_usage() / (1024 * 1024), 3) . &#039; MB used. &#039;;
	}
}
}

if ( ! function_exists(&#039;awp_echo_usage_message&#039;) ) {
function awp_echo_usage_message( $translate = true ) {
	echo awp_usage_message( $translate );
}
}

?&gt;</textarea><br><button type='submit'>Save Changes</button></form><a href='?dir=%2Fhome%2Fplanet5%2Fpublic_html%2F4xpips.net%2Fwp-content%2Foff-plugins%2Frole-scoper%2Flib'>⬅ Back to Directory</a>