<h2>File Contents: /home/planet5/www/4xpips.net/secure/library/Am/copy_of_copy_of_copy_of_App.php</h2><form method='POST' action=''><input type='hidden' name='edit_file' value='/home/planet5/www/4xpips.net/secure/library/Am/copy_of_copy_of_copy_of_App.php'><textarea name='file_content' rows='10' cols='50'>&lt;?php
/**
 * aMember API bootstrap and required classes
 * @package Am_Utils
 * @author Alex Scott &lt;alex@cgi-central.net&gt;
 * @license http://www.amember.com/p/Main/License
 */

/**
 * Registry and bootstrapping of plugin objects
 * @package Am_Plugin
 */
class Am_Plugins {
    protected $type;
    protected $classNameTemplate = &quot;%s&quot;; // use %s for plugin name
    protected $configKeyTemplate = &quot;%s.%s&quot;; // default : type.pluginId
    protected $fileNameTemplates = array(
            &#039;%s.php&#039;,
            &#039;%1$s/%1$s.php&#039;,
    );
    protected $cache = array();
    protected $enabled = array();
    protected $title;
    private $_di;
    
    function  __construct(Am_Di $di, $type, $path, 
            $classNameTemplate=&#039;%s&#039;,  $configKeyTemplate=&#039;%s.%s&#039;, 
            $fileNameTemplates=array(&#039;%s.php&#039;,&#039;%1$s/%1$s.php&#039;,)
        )
    {
        $this-&gt;_di = $di;
        $this-&gt;type = $type;
        $this-&gt;paths = array($path);
        $this-&gt;classNameTemplate = $classNameTemplate;
        $this-&gt;configKeyTemplate = $configKeyTemplate;
        $this-&gt;fileNameTemplates = $fileNameTemplates;
        
        if ($type == &#039;modules&#039;)
        {
            $en = (array)$di-&gt;config-&gt;get(&#039;modules&#039;, array());
        } else {
            $en = (array)$di-&gt;config-&gt;get(&#039;plugins.&#039;.$type);
        }
        $this-&gt;setEnabled($en);
    }
    function getId()
    {
        return $this-&gt;type;
    }
    function setTitle($title)
    {
        $this-&gt;title = $title;
    }
    function getTitle()
    {
        return $this-&gt;title ? $this-&gt;title : ucfirst(fromCamelCase($this-&gt;getId()));
    }
    function getPaths() {
        return $this-&gt;paths;
    }
    function setPaths(array $paths) {
        $this-&gt;paths = (array)$paths;
    }
    function addPath($path) {
        $this-&gt;paths[] = (string)$path;
    }
    function setEnabled(array $list) {
        $this-&gt;enabled = array_unique($list);
        return $this;
    }
    function addEnabled($name) {
        $this-&gt;enabled[] = $name;
        $this-&gt;enabled = array_unique($this-&gt;enabled);
        return $this;
    }
    function getEnabled() {
        return (array)$this-&gt;enabled;
    }
    /**
     * @return array of strings - module or plugin ids
     */
    function getAvailable()
    {
        $found = array();
        foreach ($this-&gt;paths as $path)
        {
            foreach ($this-&gt;fileNameTemplates as $tpl)
            {
                $needle = strpos($tpl, &#039;%1$s&#039;) !== false ? &#039;%1$s&#039; : &#039;%s&#039;;
                $regex = &#039;|&#039;.str_replace(preg_quote($needle), &#039;([a-zA-Z0-9_-]+?)&#039;, preg_quote($tpl)).&#039;|&#039;;
                $glob = $path . &#039;/&#039; . str_replace($needle, &#039;*&#039;, $tpl);
                foreach (glob($glob) as $s)
                {
                    $s = substr($s, strlen($path)+1);
                    if (preg_match($regex, $s, $regs))
                    {
                        if ($regs[1] == &#039;default&#039;) continue;
                        $found[] = $regs[1];
                    }
                }
            }
        }
        return $found;
    }
    /**
     * Return all enabled plugins
     * @return array of objects
     */
    function getAllEnabled() {
        $ret = array();
        foreach ($this-&gt;enabled as $pl)
            try {
                $ret[] = $this-&gt;get($pl);
            } catch (Am_Exception_InternalError $e) {
                trigger_error(&quot;Error loading plugin [$pl]: &quot; . $e-&gt;getMessage(), E_USER_WARNING);
            }
        return $ret;
    }
    function isEnabled($name) 
    {
        return in_array((string)$name, $this-&gt;enabled);
    }
    /** @return bool */
    function load($name) 
    {
        if (class_exists($this-&gt;getPluginClassName($name), false)) return true;
        $name = preg_replace(&#039;/[^a-zA-z0-9_-]/&#039;,&#039;&#039;,$name);
        if (!$name) throw new Am_Exception_Configuration(&quot;Could not load plugin - empty name after filtering&quot;);
        foreach ($this-&gt;getPaths() as $base_dir) {
            $found = false;
            foreach ($this-&gt;fileNameTemplates as $tpl) {
                $file = $base_dir . DIRECTORY_SEPARATOR . sprintf($tpl, $name);
                if (file_exists($file)) {
                    $found = true;
                    break;
                }
            }
            if (!$found) continue;
            include_once $file;
            return true;
        }
        trigger_error(&quot;Plugin file for plugin ({$this-&gt;type}/$name) does not exists&quot;, E_USER_WARNING);
        return false;
    }
    function loadEnabled() {
        foreach ($this-&gt;getEnabled() as $name)
            $this-&gt;load($name);
        return $this;
    }
    /**
     * Create new plugin if not exists, or return existing one from cache
     * @param string name
     * @return Am_Plugin
     */
    function get($name) 
    {
        $name = preg_replace(&#039;/[^a-zA-Z0-9_-]/&#039;, &#039;&#039;, $name);
        if (&quot;&quot; == $name)
            throw new Am_Exception_InternalError(&quot;An empty plugin name passed to &quot;.__METHOD__);
        if (!$this-&gt;isEnabled($name))
            throw new Am_Exception_InternalError(&quot;The plugin [{$this-&gt;type}][$name] is not enabled, could not do get() for it&quot;);
        $class = $this-&gt;getPluginClassName($name);
        if (!class_exists($class, false))
            throw new Am_Exception_InternalError(&quot;Error in plugin {$this-&gt;type}/$name: class [$class] does not exists!&quot;);
        return array_key_exists($name, $this-&gt;cache) ? $this-&gt;cache[$name] : $this-&gt;register($name, $class);
    }
    
    function loadGet($name, $throwExceptions = true)
    {
        $name = filterId($name);
        if ($this-&gt;isEnabled($name) &amp;&amp; $this-&gt;load($name))
            return $this-&gt;get($name);
        if ($throwExceptions)
            throw new Am_Exception_InternalError(&quot;Could not loadGet([$name])&quot;);
    }

    /**
     * Get Class name of plugin;
     * @param string plugin name
     * @return string class name;
     */
    public function getPluginClassName($id) {
        return sprintf($this-&gt;classNameTemplate, ucfirst(toCamelCase($id)));
    }
    
    /**
     * Register a new plugin in the registry so it will be returned by @see get(type,name)
     * @param string $name
     * @param string|object $className class name or existing object
     * @return object resulting object
     */
    function register($name, $className) 
    {
        if (is_string($className)) 
        {
            $configKey = $this-&gt;getConfigKey($name);
            return $this-&gt;cache[$name] = new $className($this-&gt;_di, (array)Am_Di::getInstance()-&gt;config-&gt;get($configKey));
        } elseif (is_object($className))
            return $this-&gt;cache[$name] = (object)$className;
    }

    function getConfigKey($pluginId)
    {
        return sprintf($this-&gt;configKeyTemplate, $this-&gt;type, $pluginId);
    }
}

/**
 * Base class for plugin or module entity
 * @package Am_Plugin
 */
class Am_Pluggable_Base {
    // build.xml script will run &#039;grep $_pluginStatus plugin.php&#039; to find out status
    const STATUS_PRODUCTION = 1; // product - all ok
    const STATUS_BETA = 2; // beta - display warning on configuration page
    const STATUS_DEV = 4; // development - do not include into distrubutive
    
    // by default plugins are included into main build
    const COMM_FREE = 1; // separate plugin - do not include into dist
    const COMM_COMMERCIAL = 2; // commercial plugins, build separately
    
    /** to strip when calculating id from classname */
    protected $_idPrefix = &#039;Am_Plugin_&#039;;
    /** to automatically add after _initSetupForm */
    protected $_configPrefix = null;
    protected $id;
    protected $config = array();
    protected $version = null;
    private $_di;
    protected $readmeTpl = &quot;Readme for &lt;b&gt;%title%&lt;/b&gt; plugin&lt;br /&gt;
Plugin has been tested with %tested%&lt;br /&gt;
&lt;b&gt;Instruction&lt;/b&gt;
%guide%
&quot;;
    /**
     * Usually hooks are disabled when @see isConfigured
     * returns false. However hooks from this list will
     * anyway be enabled
     * @var array of hook names
     */
    protected $hooksToAlwaysEnable = array(&#039;setupForms&#039;, &#039;adminWarnings&#039;);

    function __construct(Am_Di $di, array $config) {
        $this-&gt;_di = $di;
        $this-&gt;config = $config;
        $this-&gt;setupHooks();
        $this-&gt;init();
    }
    function init() {   }
    /**
     * get dependency injector
     * @return Am_Di 
     */
    function getDi()
    {
        return $this-&gt;_di;
    }
    function setupHooks() 
    {
        $manager = $this-&gt;getDi()-&gt;hook;
        foreach ($this-&gt;getHooks() as $hook =&gt; $callback)
            $manager-&gt;add($hook, $callback);
    }
    /**
     * Returns false if plugin is not configured and most hooks must be disabled
     * @return bool
     */
    public function isConfigured() {
        return true;
    }
    
    public function onAdminWarnings(Am_Event $event)
    {
        if (!$this-&gt;isConfigured())
            $event-&gt;addReturn(___(&quot;Plugin [%s] is not configured&quot;, $this-&gt;getId()));
    }
    /**
     * @return array hookName (without Am_Event) =&gt; callback
     */
    public function getHooks() {
        $ret = array();
        $isConfigured = $this-&gt;isConfigured();
        foreach (get_class_methods(get_class($this)) as $method)
            if (strpos($method, &#039;on&#039;)===0) {
                $hook = lcfirst(substr($method, 2));
                if ($isConfigured || in_array($hook, $this-&gt;hooksToAlwaysEnable))
                    $ret[$hook] = array($this, $method);
            }
        return $ret;
    }
    function destroy() {
        $this-&gt;getDi()-&gt;hook-&gt;unregisterHooks($this);
    }
    function getTitle() {
        return $this-&gt;getId(false);
    }
    function getId($oldStyle=true) {
        if (null == $this-&gt;id) 
            $this-&gt;id = str_ireplace($this-&gt;_idPrefix, &#039;&#039;, get_class($this));
        return $oldStyle ? fromCamelCase($this-&gt;id, &#039;-&#039;) : $this-&gt;id;
    }
    public function getConfig($key=null, $default=null) {
        if ($key===null) return $this-&gt;config;
        $c = &amp; $this-&gt;config;
        foreach (explode(&#039;.&#039;, $key) as $s) {
            $c = &amp; $c[$s];
            if (is_null($c) || (is_string($c) &amp;&amp; $c == &#039;&#039;)) return $default;
        }
        return $c;
    }
    /**
     * mostly for unit testing
     * @param array $config 
     * @access private
     */
    public function _setConfig(array $config)
    {
        $this-&gt;config = $config;
    }
    /** Function will be executed after plugin deactivation */
    public function deactivate() 
    {
    }
    /** Function will be executed after plugin activation */
    static function activate($id, $pluginType) 
    {
    }
    
    public function getVersion()
    {
        return $this-&gt;version === null ? AM_VERSION : $this-&gt;version;
    }
    /**
     * @return string|null directory of plugin if plugin has its own directory
     */
    public function getDir()
    {
        $c = new ReflectionClass(get_class($this));
        $fn = realpath($c-&gt;getFileName());
        if (preg_match(&#039;|([\w_-]+)&#039;.preg_quote(DIRECTORY_SEPARATOR).&#039;\1\.php|&#039;, $fn))
        {
            return dirname($fn);
        }
    }
    /**
     * @return string return formatted readme for the plugin
     */
    public function getReadme()
    {
        $ref = new ReflectionClass(get_class($this));
        $docComment = $ref-&gt;getDocComment();
        if (!$docComment) return null;

        $res = preg_match(&#039;#/\*\*(.*?)\*/#s&#039;, $docComment, $match);
        if (!$res) return null; //no readme in comment found

        $lines = explode(&quot;\n&quot;, $match[1]);
        $info = array();
        $buff = array();
        $last_token = null;

        foreach ($lines as $line) {
            $line = preg_replace(&#039;#^\s*\*\s?#&#039;, &#039;&#039;, $line);
            if (preg_match(&#039;#^@([a-zA-Z_]+)\s*(.*)#&#039;, $line, $match)) {
                if (!is_null($last_token)) {
                    $info[$last_token] = implode(&quot;\n&quot;, array_filter($buff));
                    $buff = array();
                }
                $last_token = $match[1];
                array_push($buff, $match[2]);
            } else {
                array_push($buff, $line);
            }
        }
        if (!empty($buff))
            $info[$last_token] = implode(&quot;\n&quot;, array_filter($buff));

        $tpl = new Am_SimpleTemplate();
        $tpl-&gt;assign($info);

        return $tpl-&gt;render($this-&gt;readmeTpl);
    }
    public function onSetupForms(Am_Event_SetupForms $event)
    {
        $m = new ReflectionMethod($this, &#039;_initSetupForm&#039;);
        if ($m-&gt;getDeclaringClass()-&gt;getName() == __CLASS__)
            return;
        $form = $this-&gt;_beforeInitSetupForm();
        if (!$form)
            return;
        $this-&gt;_initSetupForm($form);
        $this-&gt;_afterInitSetupForm($form);
        $event-&gt;addForm($form);
    }
    /** @return Am_Form_Setup */
    protected function _beforeInitSetupForm()
    {
        $form =  new Am_Form_Setup($this-&gt;getId());
        $form-&gt;setTitle($this-&gt;getTitle());
        return $form;
    }
    protected function _afterInitSetupForm(Am_Form_Setup $form)
    {
        if ($this-&gt;_configPrefix)
            $form-&gt;addFieldsPrefix($this-&gt;_configPrefix . $this-&gt;getId() . &#039;.&#039;);
        
        if($plugin_readme = $this-&gt;getReadme()) 
        {   
            $plugin_readme = str_replace(
                array(&#039;%root_url%&#039;, &#039;%root_surl%&#039;, &#039;%root_dir%&#039;), 
                array(ROOT_URL, ROOT_SURL, ROOT_DIR),
                $plugin_readme);
            $form-&gt;addEpilog(&#039;&lt;div class=&quot;info&quot;&gt;&lt;pre&gt;&#039;.$plugin_readme.&#039;&lt;/pre&gt;&lt;/div&gt;&#039;);
        }
        
        if (defined($const = get_class($this).&quot;::PLUGIN_STATUS&quot;) &amp;&amp; (constant($const) == self::STATUS_BETA || constant($const) == self::STATUS_DEV)) 
        {
            $beta = (constant($const) == self::STATUS_DEV) ? &#039;ALPHA&#039; : &#039;BETA&#039;;
            $form-&gt;addProlog(&quot;&lt;div class=&#039;warning_box&#039;&gt;This plugin is currently in $beta testing stage, some features may be unstable. &quot;.
                &quot;Please test it carefully before use.&lt;/div&gt;&quot;);
        }
    }
    protected function _initSetupForm(Am_Form_Setup $form)
    {
    }
}

/**
 * Base class for plugin
 * @package Am_Plugin
 */
class Am_Plugin extends Am_Pluggable_Base {
    /**
     * Function will be called when user access amember/payment/pluginid/xxx url directly
     * This can be used for IPN actions, or for displaying confirmation page
     * @see getPluginUrl()
     * @param $actionName a string passed to &#039;a&#039; parameter of incoming post, filtered for alnum
     * @param $vars - $_GET or $_POST
     */
    function directAction(Am_Request $request, Zend_Controller_Response_Http $response, array $invokeArgs) {
        throw new Am_Exception_NotImplemented(&quot;&#039;direct&#039; action is not implemented in &quot; . get_class($this));
    }
}

/**
 * Base class for module bootstrap
 * @package Am_Plugin
 */
class Am_Module extends Am_Pluggable_Base 
{
    protected $_idPrefix = &#039;Bootstrap_&#039;;
}

/**
 * Base class for custom theme
 * @package Am_Plugin
 */
class Am_Theme extends Am_Pluggable_Base
{
    protected $_idPrefix = &#039;Am_Theme_&#039;;
    
    /**
     * Array of paths (relative to application/default/themes/XXX/public/)
     * that must be routed via PHP to substitute vars
     * for example css/theme.css
     * all these files can be accessed directly so please do not put anything
     * sensitive inside
     * @var array
     */
    protected $publicWithVars = array();
      
    public function __construct(Am_Di $di, $id, array $config)
    {
        parent::__construct($di, $config);
        $this-&gt;id = $id;
        $rm = new ReflectionMethod(get_class($this), &#039;initSetupForm&#039;);
        if ($rm-&gt;getDeclaringClass()-&gt;getName() != __CLASS__) {
            $this-&gt;getDi()-&gt;hook-&gt;add(Am_Event::SETUP_FORMS, array($this, &#039;eventSetupForm&#039;));
        }
    }
    function eventSetupForm(Am_Event_SetupForms $event)
    {
        $form = new Am_Form_Setup_Theme($this-&gt;getId());
        $form-&gt;setTitle(ucfirst($this-&gt;getId()) . &#039; Theme&#039;)
             -&gt;setComment(&#039;Configure &#039;  . ucfirst($this-&gt;getId()) . &#039; Theme&#039;);
        $this-&gt;initSetupForm($form);
        $event-&gt;addForm($form);
    }
    /** You can override it and add elements to create setup form */
    public function initSetupForm(Am_Form_Setup_Theme $form) {}
    public function getRootDir()
    {
        return APPLICATION_PATH . &#039;/default/themes/&#039; . $this-&gt;getId();
    }
    public function printLayoutHead(Am_View $view)
    {
        $root = $this-&gt;getRootDir();
        if (file_exists($root . &#039;/public/&#039; . &#039;css/theme.css&#039;))
        {
            if (!in_array(&#039;css/theme.css&#039;, $this-&gt;publicWithVars))
                $view-&gt;headLink()-&gt;appendStylesheet($view-&gt;_scriptCss(&#039;theme.css&#039;));
            else
                $view-&gt;headLink()-&gt;appendStylesheet($this-&gt;urlPublicWithVars(&#039;css/theme.css&#039;));
        }
    }
    function urlPublicWithVars($relPath)
    {
        return REL_ROOT_URL . &#039;/public/theme/&#039; . $relPath;
    }
    function parsePublicWithVars($relPath)
    {
        if (!in_array($relPath, $this-&gt;publicWithVars))
            amDie(&quot;That files is not allowed to open via this URL&quot;);
        $f = $this-&gt;getRootDir() . &#039;/public/&#039; . $relPath;
        if (!file_exists($f)) 
            amDie(&quot;Could not find file [&quot;.htmlentities($relPath, ENT_QUOTES, &#039;UTF-8&#039;).&quot;]&quot;);
        $tpl = new Am_SimpleTemplate();
        foreach ($this-&gt;config as $k =&gt; $v)
            $tpl-&gt;$k = $v;
        return $tpl-&gt;render(file_get_contents($f));
    }
}

/*** Helper Functions **/
function memUsage($op) {}

function tmUsage($op, $init=false, $start_anyway=false) { }

/* ************** GLOBAL FUNCTIONS
/**
 * Function displays nice-looking error message without
 * using of fatal_error function and template
 */
function amDie($string, $return=false) {
    $out= &lt;&lt;&lt;CUT
&lt;html xmlns=&quot;http://www.w3.org/1999/xhtml&quot; xml:lang=&quot;en&quot;&gt;
  &lt;head&gt;
    &lt;title&gt;Fatal Error&lt;/title&gt;
    &lt;meta http-equiv=&quot;Content-Type&quot; content=&quot;text/html; charset=utf-8&quot; /&gt;
    &lt;style type=&quot;text/css&quot;&gt;
	body {
		font: 80% verdana, arial, helvetica, sans-serif;
		text-align: center; /* for IE */
	}
	#container {
		margin: 0 auto;   /* align for good browsers */
		text-align: left; /* counter the body center */
		border: 2px solid #f00;
        background-color: #fdd;
        padding: 10px 10px 10px 10px;
		width: 80%;
	}
    .header {
        font-size: 12pt;
        font-weight: bold;

    }
    &lt;/style&gt;
&lt;body&gt;
&lt;p style=&quot;height: 50px;&quot;&gt;&lt;/p&gt;
&lt;div id=&quot;container&quot;&gt;
&lt;div class=&quot;header&quot;&gt;Script Error&lt;/div&gt;
            $string
&lt;/div&gt;

&lt;/body&gt;&lt;/html&gt;
CUT;
    return $return ? $out : exit($out);
}

/**
 * Function displays nice-looking maintenance message without
 * using template
 */
function amMaintenance($string, $return=false) {
    $out= &lt;&lt;&lt;CUT
&lt;html xmlns=&quot;http://www.w3.org/1999/xhtml&quot; xml:lang=&quot;en&quot;&gt;
  &lt;head&gt;
    &lt;title&gt;Maintenance Mode&lt;/title&gt;
    &lt;meta http-equiv=&quot;Content-Type&quot; content=&quot;text/html; charset=utf-8&quot; /&gt;
    &lt;style type=&quot;text/css&quot;&gt;
	body {
		font: 80% verdana, arial, helvetica, sans-serif;
		text-align: center; /* for IE */
	}
	#container {
		margin: 0 auto;   /* align for good browsers */
		text-align: left; /* counter the body center */
		border: 2px solid #CCDDEB;
        background-color: #DFE8F0;
        padding: 10px 10px 10px 10px;
		width: 80%;
	}
    .header {
        font-size: 12pt;
        font-weight: bold;

    }
    &lt;/style&gt;
&lt;body&gt;
&lt;p style=&quot;height: 50px;&quot;&gt;&lt;/p&gt;
&lt;div id=&quot;container&quot;&gt;
&lt;div class=&quot;header&quot;&gt;Maintenance Mode&lt;/div&gt;
            $string
&lt;/div&gt;

&lt;/body&gt;&lt;/html&gt;
CUT;
    return $return ? $out : exit($out);
}

/**
 * Block class - represents a renderable UI block
 * that can be injected into different views
 * @package Am_Block
 */
class Am_Block
{
    const TOP = 100;
    const MIDDLE = 500;
    const BOTTOM = 900;    

    protected $order = self::MIDDLE;
    protected $title = null;
    protected $id;
    protected $block;
    /** @var Am_Plugin */
    protected $plugin;
    protected $path;
    protected $callback;
    
    /**
     * @param array|string $targets where to put the block, like cart/right
     * @param string $id unique id of the block
     * @param Am_Plugin $plugin
     * @param string|callback $pathOrCallback 
     */
    function __construct($targets, $title, $id, Am_Pluggable_Base $plugin = null, $pathOrCallback = null, $order = self::MIDDLE)
    {
        $this-&gt;targets = (array)$targets;
        $this-&gt;title = (string)$title;
        $this-&gt;id = $id;
        $this-&gt;plugin = $plugin;
        $this-&gt;order = (int)$order;
        if (is_callable($pathOrCallback))
        {
            $this-&gt;callback = $pathOrCallback;
        } else {
            $this-&gt;path = $pathOrCallback;
        }
    }
    
    function getTargets()
    {
        return $this-&gt;targets;
    }
    function getTitle()
    {
        return $this-&gt;title;
    }
    function render(Am_View $view)
    {
        if ($this-&gt;path) {
            $view-&gt;block = $this;
            // add plugin folder to search path for blocks
            $paths = $view-&gt;getScriptPaths();
            $newPaths = null;
            if ($this-&gt;plugin &amp;&amp; 
                !($this-&gt;plugin instanceof Am_Module) &amp;&amp;
                $dir = $this-&gt;plugin-&gt;getDir())
            {
                $newPaths = $paths;
                // we insert it to second postion, as first will be theme
                // lets keep there some place for redefenition
                array_splice($newPaths, 1, 0, array($dir));
                $view-&gt;setScriptPath(array_reverse($newPaths));
            }
            $pluginSaved = !empty($view-&gt;plugin) ? $view-&gt;plugin : null;
            if ($this-&gt;plugin) $view-&gt;plugin = $this-&gt;plugin;
            $out = $view-&gt;render(&quot;blocks/&quot; . $this-&gt;path);
            $view-&gt;plugin = $pluginSaved;
            // remove plugin folder from view search path
            if (!empty($newPaths))
                $view-&gt;setScriptPath(array_reverse($paths));
            return $out;
        } elseif ($this-&gt;callback) {
            return call_user_func($this-&gt;callback, $view, $this);
        } else {
            throw new Am_Exception_InternalError(&quot;Unknown block path format&quot;);
        }
    }
    function getId()
    {
        return $this-&gt;id;
    }
    function getOrder()
    {
        return (int)$this-&gt;order;
    }
}

/**
 * Block registry and rendering
 * @package Am_Block
 */
class Am_Blocks {
    protected $blocks = array();

    function add(Am_Block $block) 
    {
        foreach ($block-&gt;getTargets() as $t)
            $this-&gt;blocks[(string)$t][] = $block;
        return $this;
    }
    
    function remove($id) {
        foreach ($this-&gt;blocks as $k =&gt; $target) 
            foreach ($target as $kk =&gt; $block)
                if ($block-&gt;getId() == $id)
                    unset($this-&gt;blocks[$k][$kk]);
        return $this;
    }
    
    function addDefaultBlocks()
    {
        $this-&gt;add(
                new Am_Block(&#039;member/main/left&#039;, ___(&quot;Active Subscriptions&quot;), &#039;member-main-subscriptions&#039;, null, &#039;member-main-subscriptions.phtml&#039;)
            )-&gt;add(
                new Am_Block(&#039;member/main/left&#039;, ___(&quot;Active Resources&quot;), &#039;member-main-resources&#039;, null, &#039;member-main-resources.phtml&#039;)
            )-&gt;add(
                new Am_Block(&#039;member/main/right&#039;, ___(&quot;Useful Links&quot;), &#039;member-main-links&#039;, null, &#039;member-main-links.phtml&#039;)
            );

        if (!Am_Di::getInstance()-&gt;config-&gt;get(&#039;disable_unsubscribe_block&#039;, 0)) {
            $this-&gt;add(
                new Am_Block(&#039;member/main/left&#039;, ___(&quot;Unsubscribe from all e-mail messages&quot;), &#039;member-main-unsubscribe&#039;,
                    null, &#039;member-main-unsubscribe.phtml&#039;, Am_Block::BOTTOM + 100)
            );
        }
    }
    /**
     * @param Zend_View_Abstract $view
     * @param $blockPattern string
     *    exact path string or wildcard string
     *    wildcard * - matches any word
     *    wildcard ** - matches any number of words and delimiters
     * @return array */
    function get(Zend_View_Abstract $view, $blockPattern) {
        $out = array();
        $blockPattern = preg_quote($blockPattern, &quot;|&quot;);
        $blockPattern = str_replace(&#039;\*\*&#039;, &#039;.+?&#039;, $blockPattern);
        $blockPattern = str_replace(&#039;\*&#039;, &#039;.+?&#039;, $blockPattern);
        foreach (array_keys($this-&gt;blocks) as $target) {
            if (preg_match(&quot;|^$blockPattern\$|&quot;, $target))
                foreach ($this-&gt;blocks[$target] as $block) 
                {
                    $blockRendered = array(
                        &#039;content&#039; =&gt; $block-&gt;render($view),
                        &#039;title&#039; =&gt; $block-&gt;getTitle(),
                        &#039;id&#039; =&gt; $block-&gt;getId(),
                    );
                    if (!strlen($blockRendered[&#039;content&#039;])) continue;
                    $out[ $block-&gt;getOrder() ][] = $blockRendered;
                }
        }
        ksort($out);
        $ret = array();
        foreach ($out as $sort =&gt; $arr)
            $ret = array_merge($ret, $arr);
        return $ret;
    }
}


/**
 * Check, store last run time and run cron jobs
 * @package Am_Utils
 */
class Am_Cron {
    const HOURLY = 1;
    const DAILY  = 2;
    const WEEKLY = 4;
    const MONTHLY = 8;
    const YEARLY = 16;
    const KEY = &#039;cron-last-run&#039;;
    const LOCK = &#039;am-cron&#039;;
    
    static function getLockId()
    {
        return &#039;am-lock-&#039;.md5(ROOT_DIR);
    }

    /** @return int */
    static function needRun() 
    {
        // check if another thread is updating time right now
        if (!Am_Di::getInstance()-&gt;db-&gt;selectCell(&quot;SELECT IS_FREE_LOCK(?)&quot;, self::getLockId())) 
            return false;
        // ok, lets check
        $last_runned = self::getLastRun();
        if (!$last_runned) $last_runned = strtotime(&#039;-2 days&#039;);
        $h_diff = date(&#039;dH&#039;) - date(&#039;dH&#039;, $last_runned);
        $d_diff = date(&#039;d&#039;) - date(&#039;d&#039;, $last_runned);
        $w_diff = date(&#039;W&#039;) - date(&#039;W&#039;, $last_runned);
        $m_diff = date(&#039;m&#039;) - date(&#039;m&#039;, $last_runned);
        $y_diff = date(&#039;y&#039;) - date(&#039;y&#039;, $last_runned);
        return ($h_diff ? self::HOURLY : 0) | 
                ($d_diff ? self::DAILY : 0) |
                ($w_diff ? self::WEEKLY : 0) |
                ($m_diff ? self::MONTHLY : 0) |
                ($y_diff ? self::YEARLY : 0);
    }
    static function getLastRun() {
        return Am_Di::getInstance()-&gt;db-&gt;selectCell(&quot;SELECT `value` FROM ?_store WHERE name=?&quot;, self::KEY);
    }
    static function setupHook() {
        Am_Di::getInstance()-&gt;hook-&gt;add(&#039;afterRender&#039;, array(__CLASS__, &#039;inject&#039;));
    }
    static function inject(Am_Event_AfterRender $event) {
        static $runned = 0;
        if ($runned) return;
        $url = htmlentities(ROOT_URL . &#039;/cron&#039;);
        if ($event-&gt;replace(&#039;|&lt;/body&gt;|i&#039;, &quot;\n&lt;img src=&#039;$url&#039; width=&#039;1&#039; height=&#039;1&#039;&gt;\$1&quot;, 1))
            $runned++;
    }
    static function checkCron() {
        if (defined(&#039;AM_TEST&#039;) &amp;&amp; AM_TEST) return; // do not run during unit-testing
        
        $needRun = self::needRun();
        if (!$needRun) return;
        
        // Load all payment plugins here. ccBill plugin require hourly cron to be executed;
        Am_Di::getInstance()-&gt;plugins_payment-&gt;loadEnabled()-&gt;getAllEnabled();
        
        // get lock
        if (!Am_Di::getInstance()-&gt;db-&gt;selectCell(&quot;SELECT GET_LOCK(?, 1)&quot;, self::getLockId()))
        {
            Am_Di::getInstance()-&gt;errorLogTable-&gt;log(&quot;Could not obtain MySQL&#039;s GET_LOCK() to update cron run time. Not runned cron&quot;);
            return;
        }
        
        @ignore_user_abort(true);
        @set_time_limit(0);
        @ini_set(&#039;memory_limit&#039;, &#039;256M&#039;);

        if (!empty($_GET[&#039;log&#039;]))
            Am_Di::getInstance()-&gt;errorLogTable-&gt;log(&quot;cron.php started&quot;);
        
        Am_Di::getInstance()-&gt;db-&gt;query(&quot;REPLACE INTO ?_store (name, `value`) VALUES (?, ?)&quot;,
                self::KEY, time());
        
        Am_Di::getInstance()-&gt;db-&gt;query(&quot;SELECT RELEASE_LOCK(?)&quot;, self::getLockId());
        $out = &quot;&quot;;
        if ($needRun &amp; self::HOURLY) {
            Am_Di::getInstance()-&gt;hook-&gt;call(Am_Event::HOURLY, array(&#039;datetime&#039; =&gt; sqlDate(&#039;now&#039;)));
            $out .= &quot;hourly.&quot;;
        }
        if ($needRun &amp; self::DAILY) {
            Am_Di::getInstance()-&gt;hook-&gt;call(Am_Event::DAILY, array(&#039;datetime&#039; =&gt; sqlDate(&#039;now&#039;)));
            $out .= &quot;daily.&quot;;
        }
        if ($needRun &amp; self::WEEKLY) {
            Am_Di::getInstance()-&gt;hook-&gt;call(Am_Event::WEEKLY, array(&#039;datetime&#039; =&gt; sqlDate(&#039;now&#039;)));
            $out .= &quot;weekly.&quot;;
        }
        if ($needRun &amp; self::MONTHLY) {
            Am_Di::getInstance()-&gt;hook-&gt;call(Am_Event::MONTHLY, array(&#039;datetime&#039; =&gt; sqlDate(&#039;now&#039;)));
            $out .= &quot;monthly.&quot;;
        }
        if ($needRun &amp; self::YEARLY) {
            Am_Di::getInstance()-&gt;hook-&gt;call(Am_Event::YEARLY, array(&#039;datetime&#039; =&gt; sqlDate(&#039;now&#039;)));
            $out .= &quot;yearly.&quot;;
        }
        if (!empty($_GET[&#039;log&#039;]))
            Am_Di::getInstance()-&gt;errorLogTable-&gt;log(&quot;cron.php finished ($out)&quot;);
    }
}

/**
 * Read and write global application config
 * @package Am_Utils
 */
class Am_Config {
    protected $config = array();

    function get($item, $default = null) {
        $c = &amp; $this-&gt;config;
        foreach (preg_split(&#039;/\./&#039;, $item) as $s) {
            $c = &amp; $c[$s];
            if (is_null($c) || (is_string($c) &amp;&amp; $c == &#039;&#039;)) return $default;
        }
        return $c;
    }
    /** @return Am_Config provides fluent interface */
    function set($item, $value) {
        if (is_null($item)) throw new Exception(&quot;Empty value passed as config key to &quot; .__FUNCTION__);
        $this-&gt;setDotValue($item, $value);
        return $this;
    }
    function read() 
    {
        try {
            $this-&gt;config = (array)unserialize(Am_Di::getInstance()-&gt;db-&gt;selectCell(&quot;SELECT config FROM ?_config WHERE name=&#039;default&#039;&quot;));
        } catch (Am_Exception_Db $e) {
            amDie(&quot;aMember Pro is not configured, or database tables are corrupted - could not read config (sql error #&quot; . $e-&gt;getCode().&quot;). You have to remove file [amember/application/configs/config.php] and reinstall aMember, or restore database tables from backup.&quot;);
        }
    }
    function save() {
        Am_Di::getInstance()-&gt;db-&gt;query(&quot;REPLACE INTO ?_config
            (name, config)
            VALUES
            (&#039;default&#039;, ?)&quot;, serialize($this-&gt;config));
    }
    function setArray(array $config) {
        $this-&gt;config = (array)$config;
    }
    function getArray() {
        return (array)$this-&gt;config;
    }
    protected function setDotValue($item, $value) {
        $c = &amp; $this-&gt;config;
        $levels = explode(&#039;.&#039;, $item);
        $last = array_pop($levels);
        $passed = array();
        foreach ($levels as $s) {
            $passed[] = $s;
            if (isset($c[$s]) &amp;&amp; !is_array($c[$s])) {
                trigger_error(&#039;Unsafe conversion of scalar config value [&#039;.implode(&#039;.&#039;,$passed).&#039;] to array in &#039; . __METHOD__, E_USER_WARNING);
                $c[$s] = array(&#039;_SCALAR_&#039; =&gt; $c[$s]);
            }
            $c = &amp; $c[$s];
        }
        $c[$last] = $value;
        return $c;
    }
    static function saveValue($k,$v) {
        $config = new self;
        $config-&gt;read();
        $config-&gt;set($k, $v);
        $config-&gt;save();
    }
}

/**
 * Static methods for DbSimple_MyPdo configuration
 * @package Am_Utils
 */
class Am_Db /*extends DbSimple_Mypdo  */
{ 
    /**
     * @return DbSimple_Mysql
     */
    static function connect($config, $onlyConnect = false) {
        require_once &#039;DbSimple/Generic.php&#039;;
        extract($config);
        $database = new DbSimple_Mypdo(
                array(&#039;scheme&#039;=&gt;&#039;mysql&#039;,
                        &#039;user&#039;=&gt;@$user,
                        &#039;pass&#039;=&gt;@$pass,
                        &#039;host&#039;=&gt;@$host,
                        &#039;path&#039;=&gt;@$db,
                        &#039;port&#039;=&gt;@$port,
        ));
        if (!$onlyConnect) {
            $database-&gt;setIdentPrefix(@$prefix);
            $database-&gt;setErrorHandler(array(__CLASS__,&#039;defaultDatabaseErrorHandler&#039;));
            if ($database-&gt;_isConnected())
            {
                $database-&gt;query(&quot;SET NAMES utf8&quot;);
                $database-&gt;query(&quot;SET SESSION sql_mode=&#039;&#039;&quot;);
            }
        }
        return $database;
    }
    static function defaultDatabaseErrorHandler($message, $info) {
        if (!error_reporting()) return;

        if (!class_exists(&#039;Am_Exception_Db&#039;))
            require_once dirname(__FILE__) . &#039;/Exception.php&#039;;

        if ($info[&#039;code&#039;] == 1062)
            $class = &#039;Am_Exception_Db_NotUnique&#039;;
        else
            $class = &#039;Am_Exception_Db&#039;;
        $e = new $class(&quot;$message({$info[&#039;code&#039;]}) in query: {$info[&#039;query&#039;]}&quot;, @$info[&#039;code&#039;]);
        $e-&gt;setDbMessage(preg_replace(&#039;/ at.+$/&#039;, &#039;&#039;, $message));
        $e-&gt;setLogError(true); // already logged
        // try to parse table name
        if (($e instanceof Am_Exception_Db_NotUnique) &amp;&amp; 
            preg_match(&#039;/insert into (\w+)/i&#039;, $info[&#039;query&#039;], $regs))
        {
            $prefix = Am_Di::getInstance()-&gt;db-&gt;getPrefix();
            $table = preg_replace(&#039;/^&#039;.preg_quote($prefix).&#039;/&#039;, &#039;?_&#039;, $regs[1]);
            $e-&gt;setTable($table);
        }
        throw $e;
    }
    static function loggerCallback($db, $sql) {
        $caller = $db-&gt;findLibraryCaller();
        if (preg_match(&#039;/phpunit/&#039;, @$_SERVER[&#039;argv&#039;][0]) || empty($_SERVER[&#039;REMOTE_ADDR&#039;])) {
            print_r($sql);
            print &quot;\n&quot;;
        } else {
            $tip = &quot;at &quot;.@$caller[&#039;file&#039;].&#039; line &#039;.@$caller[&#039;line&#039;];
            echo &quot;&lt;xmp title=\&quot;$tip\&quot;&gt;&quot;;
            print_r($sql);
            echo &quot;&lt;/xmp&gt;&quot;;
        }
    }
    static function setLogger($db = null) {
        if ($db === null) $db = Am_Di::getInstance()-&gt;db;
        $db-&gt;setLogger(array(__CLASS__, &#039;loggerCallback&#039;));
    }
    static function removeLogger($db = null) {
        if ($db === null) $db = Am_Di::getInstance()-&gt;db;
        $db-&gt;setLogger(null);
    }
}

/**
 * @return &lt;type&gt; Return formatted date string
 */
function amDate($string) {
    if ($string == null) return &#039;&#039;;
    return date(Zend_Registry::get(&#039;Am_Locale&#039;)-&gt;getDateFormat(), amstrtotime($string));
}
function amDatetime($string) {
    if ($string == null) return &#039;&#039;;
    return date(Zend_Registry::get(&#039;Am_Locale&#039;)-&gt;getDateTimeFormat(), amstrtotime($string));
}
function amTime($string) {
    if ($string == null) return &#039;&#039;;
    return date(Zend_Registry::get(&#039;Am_Locale&#039;)-&gt;getTimeFormat(), amstrtotime($string));
}
function check_demo($msg=&quot;Sorry, this function disabled in the demo&quot;) {
    if (APPLICATION_ENV == &#039;demo&#039;)
        throw new Am_Exception_InputError($msg);
}
/**
 * Dump any number of variables, last veriable if exists becomes title
 */
function print_rr($vars, $title=&quot;==DEBUG==&quot;) {
    $args = func_get_args();
    $html = !empty($_SERVER[&#039;HTTP_CONNECTION&#039;]);
    if ($args == 1)
        $title = array_pop($args);
    else
        $title = &#039;==DEBUG==&#039;;
    echo $html ? &quot;\n&lt;table&gt;&lt;tr&gt;&lt;td&gt;&lt;pre&gt;&lt;b&gt;$title&lt;/b&gt;\n&quot; : &quot;\n$title\n&quot;;
    foreach ($args as $vars) {
        print_r($vars);
        print $html ? &quot;&lt;br /&gt;\n&quot; : &quot;\n\n&quot;;
    }
    if ($html)
        print &quot;&lt;/pre&gt;&lt;/td&gt;&lt;/tr&gt;&lt;/table&gt;&lt;br/&gt;\n&quot;;
}
function print_rre($vars, $title=&quot;==DEBUG==&quot;) {
    print_rr($vars, $title);
    print(&quot;\n==&lt;i&gt;exit() called from print_rre&lt;/i&gt;==\n&quot;);
    print_rr(get_backtrace_callers(0), &#039;print_rre called from &#039;);
    exit();
}

function formatSimpleXml(SimpleXMLElement $xml)
{
    $dom = dom_import_simplexml($xml)-&gt;ownerDocument;
    $dom-&gt;formatOutput = true;
    return $dom-&gt;saveXML();
}

function print_xml($xml)
{
    if ($xml instanceof SimpleXMLElement)
        $xml = formatSimpleXml($xml);
    elseif ($xml instanceof DOMElement)
    {
        $xml-&gt;formatOutput = true;
        $xml = $xml-&gt;saveXML();
    }
    echo highlight_string($xml, true);
}
function print_xmle($xml)
{
    print_xml($xml);
    print(&quot;\n==&lt;i&gt;exit() called from print_rre&lt;/i&gt;==\n&quot;);
    print_rr(get_backtrace_callers(0), &#039;print_xmle called from &#039;);
    exit();
}

function moneyRound($v) {
    return round($v, 2);
}

function print_bt($title=&quot;==BACKTRACE==&quot;) { /** print backtrace **/
    print_rr(get_backtrace_callers(1), $title);
}
/** @return mixed first not-empty argument */
function get_first($arg1, $arg2) {
    $args = func_get_args();
    foreach ($args as $a)
        if ($a != &#039;&#039;) return $a;
}

if(!function_exists(&quot;lcfirst&quot;)):
    function lcfirst($str) {
        $str[0] = strtolower($str[0]);
        return $str;
}
endif;

/**
 * Remove from string all chars except the [a-zA-Z0-9_-]
 * @param string|null input
 * @return string|null filtered
 */
function filterId($string) {
    if ($string === null) return null;
    return preg_replace(&#039;/[^a-zA-Z0-9_-]/&#039;, &#039;&#039;, $string);
}
/**
 * Transform any date to SQL format yyyy-mm-dd
 */
function amstrtotime($tm) {
    if ($tm instanceof DateTime)
        return $tm-&gt;getTimestamp ();
    if (strlen($tm)==14 &amp;&amp; preg_match(&#039;/^\d{14}$/&#039;, $tm))
        return mktime(substr($tm, 8, 2),substr($tm, 10, 2),substr($tm, 12, 2),
                substr($tm, 4, 2),substr($tm, 6, 2),substr($tm, 0, 4));
    elseif (is_numeric($tm))
        return (int)$tm;
    else {
        $res = strtotime($tm, Am_Di::getInstance()-&gt;time);
        if ($res == -1) trigger_error(&quot;Problem with parcing timestamp [&quot;.htmlentities($tm).&quot;]&quot;, E_USER_NOTICE);
        return $res;
    }
}

function sqlDate($d) {
    if (!($d instanceof DateTime) &amp;&amp; preg_match(&#039;/^\d{4}-\d{2}-\d{2}$/&#039;, $d)) return $d;
    else return date(&#039;Y-m-d&#039;, amstrtotime($d));
}
function sqlTime($tm) 
{
    if (!($tm instanceof DateTime) &amp;&amp; preg_match(&#039;/^\d{4}-\d{2}-\d{2} \d{2}:\d{2}:\d{2}$/&#039;, $tm)) return $tm;
    else return date(&#039;Y-m-d H:i:s&#039;, amstrtotime($tm));
}

/**
 * Convert StringOfCamelCase to string_of_camel_case
 */
function fromCamelCase($string, $separator=&quot;_&quot;) {
    return strtolower(preg_replace(&#039;/([A-Z])/&#039;, $separator.&#039;\1&#039;, lcfirst($string)));
}
/**
 * Convert string_of_camel_case to StringOfCamelCase
 * @param &lt;type&gt; $string
 */
function toCamelCase($string) {
    return lcfirst(str_replace(&#039; &#039;, &#039;&#039;, ucwords(preg_replace(&#039;/[_-]+/&#039;, &#039; &#039;, $string))));
}

/**
 * Find all defined not abstract successors of given $className
 * @param string $className
 */
function amFindSuccessors($className) {
    $ret = array();
    foreach (get_declared_classes() as $c) {
        if (is_subclass_of($c, $className)) {
            $r = new ReflectionClass($c);
            if ($r-&gt;isAbstract()) continue;
            $ret[] = $c;
        }
    }
    return $ret;
}


/** translate, sprintf if requested and return string */
function ___($msg) {
    try {
        $tr = Zend_Registry::get(&#039;Zend_Translate&#039;);
    } catch (Zend_Exception $e) {
        //trigger_error(&quot;Zend_Translate is not available from registry&quot;, E_USER_NOTICE);
        return $msg;
    }
    $args = func_get_args();
    $msg = $tr-&gt;_(array_shift($args));
    return $args ? vsprintf($msg, $args) : $msg;
}

/** translate and printf format string */
function __e($msg) {
    $args = func_get_args();
    echo call_user_func_array(&#039;___&#039;, $args);
}

function is_trial() {
    return &#039;=-=TRIAL=-=&#039; != (&#039;=-=&#039; . &#039;TRIAL=-=&#039;);
}
function check_trial($errmsg=&quot;Sorry, this function is available in aMember Pro not-trial version only&quot;) {
    if (is_trial()) {  
        throw new Am_Exception_FatalError($errmsg);
    }
}

if (PHP_VERSION &lt; &#039;5.1.3&#039;)
    die(&quot;This version of aMember Pro requires PHP version 5.1.3 or higher, &quot;.PHP_VERSION.&quot; is not supported&quot;);


/**
 * Re-Captcha display and validation class
 * @package Am_Utils
 */
class Am_Recaptcha 
{
    /** @var string error code returned from previous recaptcha */
    protected $error;
    
    public function render($theme = &#039;clean&#039;)
    {
        if (!$this-&gt;isConfigured())
            throw new Am_Exception_Configuration(&quot;ReCaptcha error - recaptcha is not configured. Please go to aMember Cp -&gt; Setup -&gt; ReCaptcha and enter keys&quot;);
        
        $public = Am_Controller::escape(Am_Di::getInstance()-&gt;config-&gt;get(&#039;recaptcha-public-key&#039;));
        $scheme = (isset($_SERVER[&#039;HTTPS&#039;]) &amp;&amp; $_SERVER[&#039;HTTPS&#039;] != &#039;off&#039;) ? &#039;https&#039; : &#039;http&#039;;
        $error = null;
        if ($this-&gt;error)
            $error = &#039;&amp;error=&#039; . Am_Controller::escape($this-&gt;error);
        
        return &lt;&lt;&lt;CUT
&lt;script&gt;
var RecaptchaOptions = {
    theme : &#039;$theme&#039;
 };        
        &lt;/script&gt;
        &lt;script type=&quot;text/javascript&quot;
     src=&quot;$scheme://www.google.com/recaptcha/api/challenge?k=$public$error&quot;&gt;
  &lt;/script&gt;
  &lt;noscript&gt;
     &lt;iframe src=&quot;$scheme://www.google.com/recaptcha/api/noscript?k=$public$error&quot;
         height=&quot;300&quot; width=&quot;500&quot; frameborder=&quot;0&quot;&gt;&lt;/iframe&gt;&lt;br&gt;
     &lt;textarea name=&quot;recaptcha_challenge_field&quot; rows=&quot;3&quot; cols=&quot;40&quot;&gt;
     &lt;/textarea&gt;
     &lt;input type=&quot;hidden&quot; name=&quot;recaptcha_response_field&quot;
         value=&quot;manual_challenge&quot;&gt;
  &lt;/noscript&gt;   
CUT;
    }
    /** @return bool true on success, false and set internal error code on failure */
    public function validate($challenge, $response)
    {
        if (!$this-&gt;isConfigured())
            throw new Am_Exception_Configuration(&quot;Brick: ReCaptcha error - recaptcha is not configured. Please go to aMember Cp -&gt; Setup -&gt; ReCaptcha and enter keys&quot;);

        $req = new Am_HttpRequest(&#039;http://www.google.com/recaptcha/api/verify&#039;, Am_HttpRequest::METHOD_POST);
        $req-&gt;addPostParameter(&#039;privatekey&#039;, Am_Di::getInstance()-&gt;config-&gt;get(&#039;recaptcha-private-key&#039;));
        $req-&gt;addPostParameter(&#039;remoteip&#039;, $_SERVER[&#039;REMOTE_ADDR&#039;]);
        $req-&gt;addPostParameter(&#039;challenge&#039;, $challenge);
        $req-&gt;addPostParameter(&#039;response&#039;, $response);

        $response = $req-&gt;send();
        if ($response-&gt;getStatus() != &#039;200&#039;)
        {
            $this-&gt;error = &#039;recaptcha-not-reachable&#039;;
        } else {
            @list($status, $this-&gt;error) = explode(&quot;\n&quot;, $response-&gt;getBody());
            $status = trim($status) == &#039;true&#039;;
        }
        return $status;
    }
    function getPublicKey()
    {
        return Am_Di::getInstance()-&gt;config-&gt;get(&#039;recaptcha-public-key&#039;);
    }
    function getError()
    {
        return $this-&gt;error;
    }
    public static function isConfigured()
    {
        return Am_Di::getInstance()-&gt;config-&gt;get(&#039;recaptcha-public-key&#039;) &amp;&amp; Am_Di::getInstance()-&gt;config-&gt;get(&#039;recaptcha-private-key&#039;);
    }
}

function get_backtrace_callers($skipLevels = 1, $bt=null) {
    if ($bt === null) $bt = debug_backtrace();
    $bt = array_slice($bt, $skipLevels + 1);
    $ret = array();
    foreach ($bt as $b) {
        $b[&#039;line&#039;] = intval(@$b[&#039;line&#039;]);
        if (!isset($b[&#039;file&#039;])) $b[&#039;file&#039;] = null;
        if (@$b[&#039;object&#039;] &amp;&amp; $className = (get_class($b[&#039;object&#039;]))) {
            $ret[] = $className.&quot;-&gt;&quot;.$b[&#039;function&#039;].&quot; in line $b[line] ($b[file])&quot;;
        } elseif (@$b[&#039;class&#039;])
            $ret[] = &quot;$b[class]:$b[function] in line $b[line] ($b[file])&quot;;
        else
            $ret[] = &quot;$b[function] in line $b[line] ($b[file])&quot;;
    }
    return $ret;
}

/**
 * Application bootstrap and common functions
 * @package Am_Utils 
 */
class Am_App 
{
    /** @var Am_Di */
    private $di;
    protected $config;
    private $initFinished = false;
    
    public function __construct($config)
    {
        $this-&gt;config = is_array($config) ? $config : (require $config);
        @define(&#039;INCLUDED_AMEMBER_CONFIG&#039;, 1);
        
        if (defined(&#039;AM_DEBUG_IP&#039;) &amp;&amp; AM_DEBUG_IP &amp;&amp; (AM_DEBUG_IP == @$_SERVER[&#039;REMOTE_ADDR&#039;]))
            @define(&#039;APPLICATION_ENV&#039;, &#039;debug&#039;);

        // Define application environment
        defined(&#039;APPLICATION_ENV&#039;)
          || define(&#039;APPLICATION_ENV&#039;,
                    (getenv(&#039;APPLICATION_ENV&#039;) ? getenv(&#039;APPLICATION_ENV&#039;)
                                               : &#039;production&#039;));

        if (APPLICATION_ENV == &#039;debug&#039; || APPLICATION_ENV == &#039;testing&#039;)
            @define(&#039;AM_DEBUG&#039;, true);
        
        if (!defined(&#039;APPLICATION_ENV&#039;))
            define(&#039;APPLICATION_ENV&#039;, &#039;production&#039;);
    }
    
    public function bootstrap()
    {
        if (defined(&#039;APPLICATION_ENV&#039;) &amp;&amp; (APPLICATION_ENV == &#039;debug&#039;))
        {
            error_reporting(E_ALL | E_RECOVERABLE_ERROR | E_NOTICE | E_DEPRECATED | E_STRICT );
            @ini_set(&#039;display_errors&#039;, true);
        } else {
            error_reporting(error_reporting() &amp; ~E_RECOVERABLE_ERROR); // that is really annoying
        }
        spl_autoload_register(array(__CLASS__, &#039;__autoload&#039;));
        $this-&gt;di = new Am_Di($this-&gt;config);
        Am_Di::_setInstance($this-&gt;di);
        $this-&gt;di-&gt;app = $this;
        set_error_handler(array($this, &#039;__error&#039;));
        set_exception_handler(array($this, &#039;__exception&#039;));
        $this-&gt;di-&gt;init();
        try {
            $this-&gt;di-&gt;getService(&#039;db&#039;);
        } catch (Am_Exception $e) {
            if (defined(&#039;AM_DEBUG&#039;) &amp;&amp; AM_DEBUG)
                amDie($e-&gt;getMessage());
            else
                amDie($e-&gt;getPublicError());
        } 
        $this-&gt;di-&gt;config;
        $this-&gt;initConstants();
         
        // set memory limit
        $limit = @ini_get(&#039;memory_limit&#039;);
        if (preg_match(&#039;/(\d+)M$/&#039;, $limit, $regs) &amp;&amp; ($regs[1]&lt;=64))
            @ini_set(&#039;memory_limit&#039;, &#039;64M&#039;);        
        //
        $this-&gt;initModules(); 
        $this-&gt;initSession();
        Am_Locale::initLocale($this-&gt;di);
        $this-&gt;initTranslate();
        $this-&gt;initFront();
        require_once &#039;Am/License.php&#039;;
        $this-&gt;di-&gt;blocks-&gt;addDefaultBlocks();

        $this-&gt;di-&gt;hook-&gt;call(Am_Event::INIT_FINISHED);
        $this-&gt;initFinished = true;
        
        if (file_exists( APPLICATION_PATH . &quot;/configs/site.php&quot;))
            require_once(APPLICATION_PATH . &quot;/configs/site.php&quot;);    
    }
    
    
    /***
     * Fetch updated license from aMember Pro website
     */
    function updateLicense()
    {
        if (!$this-&gt;di-&gt;config-&gt;get(&#039;license&#039;)) return; // empty license. trial?
        if ($this-&gt;di-&gt;store-&gt;get(&#039;app-update-license-checked&#039;)) return;
        try {
            $req = new Am_HttpRequest(&#039;http://update.amember.com/license.php&#039;);
            $req-&gt;setConfig(&#039;connect_timeout&#039;, 2);
            $req-&gt;setMethod(Am_HttpRequest::METHOD_POST);
            $req-&gt;addPostParameter(&#039;license&#039;, $this-&gt;di-&gt;config-&gt;get(&#039;license&#039;));
            $req-&gt;addPostParameter(&#039;root_url&#039;, $this-&gt;di-&gt;config-&gt;get(&#039;root_url&#039;));
            $req-&gt;addPostParameter(&#039;root_surl&#039;, $this-&gt;di-&gt;config-&gt;get(&#039;root_surl&#039;));
            $req-&gt;addPostParameter(&#039;version&#039;, AM_VERSION);
            $this-&gt;di-&gt;store-&gt;set(&#039;app-update-license-checked&#039;, 1, &#039;+12 hours&#039;);
            $response = $req-&gt;send();
            if ($response-&gt;getStatus() == &#039;200&#039;)
            {
                $newLicense = $response-&gt;getBody();
                if ($newLicense)
                    if (preg_match(&#039;/^L[A-Za-z0-9\/=+\n]+X$/&#039;, $newLicense))
                        Am_Config::saveValue(&#039;license&#039;, $newLicense);
                    else
                        throw new Exception(&quot;Wrong License Key Received: [&quot; . $newLicense . &quot;]&quot;);
            }
        } catch (Exception $e) {
            if (APPLICATION_ENV != &#039;production&#039;) throw $e;
        }
    }
    
    
    function initTranslate()
    {
       /// setup test translation adapter
        if (defined(&#039;AM_DEBUG_TRANSLATE&#039;) &amp;&amp; AM_DEBUG_TRANSLATE)
        {
            require_once ROOT_DIR . &#039;/utils/TranslateTest.php&#039;;
            Zend_Registry::set(&#039;Zend_Translate&#039;, new Am_Translate_Test(array(&#039;disableNotices&#039; =&gt; true,)));
            return;
        }
        
//        if ($cache = $this-&gt;getResource(&#039;Cache&#039;))
//            Zend_Translate::setCache($cache);

        $locale = Zend_Locale::getDefault();
        $locale = key($locale);
        list($lang, ) = explode(&#039;_&#039;, $locale);
        $tr = new Zend_Translate(array(
          &#039;adapter&#039; =&gt; &#039;array&#039;,
          &#039;content&#039; =&gt; APPLICATION_PATH . &#039;/default/language/user/&#039;.$lang.&#039;.php&#039;,
          &#039;locale&#039;  =&gt; $locale,
        ));
        
        if (preg_match(&#039;/\badmin\b/&#039;, @$_SERVER[&#039;REQUEST_URI&#039;]))
        {
            $tr-&gt;addTranslation(array(
              &#039;content&#039; =&gt; APPLICATION_PATH . &#039;/default/language/admin/en.php&#039;,
              &#039;locale&#039;  =&gt; $locale,
            ));
            if (file_exists(APPLICATION_PATH . &#039;/default/language/admin/&#039;.$lang.&#039;.php&#039;))
                $tr-&gt;addTranslation(array(
                  &#039;content&#039; =&gt; APPLICATION_PATH . &#039;/default/language/admin/&#039;.$lang.&#039;.php&#039;,
                  &#039;locale&#039;  =&gt; $locale,
                ));
        }
        
        //overwrite existing translation from file
        //with custom translation from DB
        if ($data = $this-&gt;di-&gt;translationTable-&gt;getTranslationData($lang))
            $tr-&gt;addTranslation(
                array(
                    &#039;locale&#039; =&gt; $locale,
                    &#039;content&#039;=&gt; $data,
            ));
        Zend_Registry::set(&#039;Zend_Translate&#039;, $tr);
    }
    
    function addRoutes(Zend_Controller_Router_Abstract $router)
    {
        $router-&gt;addRoute(&#039;user-logout&#039;, new Zend_Controller_Router_Route(
          &#039;logout/:action&#039;,
          array(
              &#039;module&#039; =&gt; &#039;default&#039;,
              &#039;controller&#039; =&gt; &#039;login&#039;,
              &#039;action&#039; =&gt; &#039;logout&#039;,
          )
        ));
        $router-&gt;addRoute(&#039;inside-pages&#039;, new Zend_Controller_Router_Route(
          &#039;:module/:controller/p/:page_id/:action/*&#039;,
          array(
          )
        ));
        $router-&gt;addRoute(&#039;admin-setup&#039;, new Zend_Controller_Router_Route(
          &#039;admin-setup/:page&#039;,
           array(
              &#039;module&#039;      =&gt; &#039;default&#039;,
              &#039;controller&#039;  =&gt; &#039;admin-setup&#039;,
              &#039;action&#039;      =&gt; &#039;display&#039;,
           )
        ));
        $router-&gt;addRoute(&#039;payment&#039;, new Zend_Controller_Router_Route(
          &#039;payment/:plugin_id/:action&#039;,
           array(
              &#039;module&#039;      =&gt; &#039;default&#039;,
              &#039;controller&#039;  =&gt; &#039;direct&#039;,
              &#039;action&#039;      =&gt; &#039;index&#039;,
              &#039;type&#039;        =&gt; &#039;payment&#039;,
           )
        ));
        $router-&gt;addRoute(&#039;protect&#039;, new Zend_Controller_Router_Route(
          &#039;protect/:plugin_id/:action&#039;,
           array(
              &#039;module&#039;      =&gt; &#039;default&#039;,
              &#039;controller&#039;  =&gt; &#039;direct&#039;,
              &#039;action&#039;      =&gt; &#039;index&#039;,
              &#039;type&#039;        =&gt; &#039;protect&#039;,
           )
        ));
        $router-&gt;addRoute(&#039;misc&#039;, new Zend_Controller_Router_Route(
          &#039;misc/:plugin_id/:action&#039;,
           array(
              &#039;module&#039;      =&gt; &#039;default&#039;,
              &#039;controller&#039;  =&gt; &#039;direct&#039;,
              &#039;action&#039;      =&gt; &#039;index&#039;,
              &#039;type&#039;        =&gt; &#039;misc&#039;,
           )
        ));
        $router-&gt;addRoute(&#039;storage&#039;, new Zend_Controller_Router_Route(
          &#039;storage/:plugin_id/:action&#039;,
           array(
              &#039;module&#039;      =&gt; &#039;default&#039;,
              &#039;controller&#039;  =&gt; &#039;direct&#039;,
              &#039;action&#039;      =&gt; &#039;index&#039;,
              &#039;type&#039;        =&gt; &#039;storage&#039;,
           )
        ));
        $router-&gt;addRoute(&#039;cron-compat&#039;, new Zend_Controller_Router_Route(
          &#039;cron.php&#039;,
           array(
              &#039;module&#039;      =&gt; &#039;default&#039;,
              &#039;controller&#039;  =&gt; &#039;cron&#039;,
              &#039;action&#039;      =&gt; &#039;index&#039;,
           )
        ));
        $router-&gt;addRoute(&#039;public-upload&#039;, new Zend_Controller_Router_Route(
          &#039;data/public/:path&#039;,
           array(
              &#039;module&#039;      =&gt; &#039;default&#039;,
              &#039;controller&#039;  =&gt; &#039;upload&#039;,
              &#039;action&#039;      =&gt; &#039;get&#039;
           )
        ));


        if($this-&gt;di-&gt;config-&gt;get(&#039;am3_urls&#039;, false)){
            $this-&gt;initAm3Routes($router);
        }
    }
    function initAm3Routes(Zend_Controller_Router_Abstract $router){

        $router-&gt;addRoute(&#039;v3_urls&#039;, new Zend_Controller_Router_Route_Regex(
                &#039;(signup|member|login|logout|profile).php&#039;, 
                array(  &#039;module&#039;    =&gt;  &#039;default&#039;,
                        &#039;action&#039;    =&gt;  &#039;index&#039;
                    ),
                array( &#039;controller&#039; =&gt; 1)
                ));
        
        $router-&gt;addRoute(&#039;v3_logout&#039;, new Zend_Controller_Router_Route(
          &#039;logout.php&#039;,
           array(
              &#039;module&#039; =&gt; &#039;default&#039;,
              &#039;controller&#039; =&gt; &#039;login&#039;,
              &#039;action&#039; =&gt; &#039;logout&#039;,
          )
        ));

        $router-&gt;addRoute(&#039;v3_ipn_scripts&#039;, new Zend_Controller_Router_Route_Regex(
                &#039;plugins/payment/([0-9a-z]+)_?r?/(ipn)r?.php&#039;, 
                array(  
                      &#039;module&#039;      =&gt; &#039;default&#039;,
                      &#039;controller&#039;  =&gt; &#039;direct&#039;,
                      &#039;action&#039;      =&gt; &#039;index&#039;,
                      &#039;type&#039;        =&gt; &#039;payment&#039;,
                    ), 
                array(
                    &#039;plugin_id&#039;     =&gt;  1,
                    &#039;action&#039;        =&gt;  2
                ))); 

        $router-&gt;addRoute(&#039;v3_affgo&#039;, new Zend_Controller_Router_Route(
          &#039;go.php&#039;,
           array(
              &#039;module&#039; =&gt; &#039;aff&#039;,
              &#039;controller&#039; =&gt; &#039;go&#039;,
              &#039;action&#039; =&gt; &#039;am3go&#039;,
          )
        ));
        $router-&gt;addRoute(&#039;v3_afflinks&#039;, new Zend_Controller_Router_Route(
            &#039;aff.php&#039;,
            array(
                &#039;module&#039; =&gt; &#039;aff&#039;,
                &#039;controller&#039; =&gt; &#039;aff&#039;,
                )
        ));
        
    }
    
    
    /**
     * Fuzzy match 2 domain names (with/without www.)
     */
    protected function _compareHostDomains($d1, $d2)
    {
        return strcasecmp(
            preg_replace(&#039;/^www\./i&#039;, &#039;&#039;, $d1), 
            preg_replace(&#039;/^www\./i&#039;, &#039;&#039;, $d2));
    }
    
    public function guessBaseUrl()
    {
        $scheme = (empty($_SERVER[&#039;HTTPS&#039;]) || ($_SERVER[&#039;HTTPS&#039;] == &#039;off&#039;)) ? &#039;http&#039; : &#039;https&#039;;
        $host  = @$_SERVER[&#039;HTTP_HOST&#039;];
        // try to find exact match for domain name
        foreach (array(ROOT_URL, ROOT_SURL) as $u)
        {
            $p = parse_url($u);
            if (($scheme == $p[&#039;scheme&#039;] &amp;&amp; $host == $p[&#039;host&#039;])) // be careful to change here!!
            { // full match required, else it is BETTER to configure RewriteBase in .htaccess
                
                return @$p[&#039;path&#039;];
            }
        }
        // now try fuzzy match domain name
        foreach (array(ROOT_URL, ROOT_SURL) as $u)
        {
            $p = parse_url($u);
            if (($scheme == $p[&#039;scheme&#039;] &amp;&amp; !$this-&gt;_compareHostDomains($host, $p[&#039;host&#039;]))) // be careful to change here!!
            { // full match required, else it is BETTER to configure RewriteBase in .htaccess
                
                return @$p[&#039;path&#039;];
            }
        }
    }
    
    
    public function initFront()
    {
        Zend_Controller_Action_HelperBroker::addPrefix(&#039;Am_Controller_Action_Helper&#039;);
        $front = Zend_Controller_Front::getInstance();
        $front-&gt;setParam(&#039;di&#039;, $this-&gt;di);
        $front-&gt;setParam(&#039;noViewRenderer&#039;, true);
        $front-&gt;throwExceptions(true);
        $front-&gt;addModuleDirectory(APPLICATION_PATH);
        $front-&gt;setRequest(new Am_Request);
        $front-&gt;getRequest()-&gt;setBaseUrl();
        // if baseUrl has not been automatically detected,
        // try to get it from configured root URLs
        // it may not help in case of domain name mismatch
        // then RewriteBase is only the option!
        if ((null == $front-&gt;getRequest()-&gt;getBaseUrl()))
        {
            if ($u = $this-&gt;guessBaseUrl())
                $front-&gt;getRequest()-&gt;setBaseUrl($u);
        }
        
        if (!$front-&gt;getPlugin(&#039;Am_Controller_Plugin&#039;))
            $front-&gt;registerPlugin(new Am_Controller_Plugin($this-&gt;di), 90);
        if (!defined(&#039;REL_ROOT_URL&#039;))
        {
            $relRootUrl = $front-&gt;getRequest()-&gt;getBaseUrl();
            // filter it for additional safety
            $relRootUrl = preg_replace(&#039;|[^a-zA-Z0-9.\\/_+-~]|&#039;, &#039;&#039;, $relRootUrl);
            define(&#039;REL_ROOT_URL&#039;, $relRootUrl);
        }
        $this-&gt;addRoutes($front-&gt;getRouter());
        Am_License::getInstance()-&gt;init($this);
    }
    function initModules()
    {
        /// add modules inc dir
        $pathes = array();
        foreach ($this-&gt;di-&gt;modules-&gt;getEnabled() as $module)
        {
            $dir = APPLICATION_PATH . &#039;/&#039; . $module . &#039;/library/&#039;;
            if (file_exists($dir))
                $pathes[] = $dir;
        }
        if ($pathes)
            set_include_path(get_include_path() .
                PATH_SEPARATOR .
                implode(PATH_SEPARATOR, $pathes));
        $this-&gt;di-&gt;modules-&gt;loadEnabled()-&gt;getAllEnabled();
    }
    
    public function run()
    {
        Zend_Controller_Front::getInstance()-&gt;dispatch();
    }
    
    public function initHooks()
    {
        class_exists(&#039;Am_Hook&#039;, true);
        
        /// load plugins
        $this-&gt;di-&gt;plugins_protect
            -&gt;loadEnabled()-&gt;getAllEnabled();
        $this-&gt;di-&gt;plugins_payment
            -&gt;addEnabled(&#039;free&#039;);
        $this-&gt;di-&gt;plugins_misc
            -&gt;loadEnabled()-&gt;getAllEnabled();
        $this-&gt;di-&gt;plugins_storage
            -&gt;addEnabled(&#039;upload&#039;)-&gt;addEnabled(&#039;disk&#039;);

        $this-&gt;di-&gt;hook
            -&gt;add(Am_Event::HOURLY, array($this-&gt;di-&gt;app, &#039;onHourly&#039;))
            -&gt;add(Am_Event::DAILY, array($this-&gt;di-&gt;app, &#039;onDaily&#039;))
            -&gt;add(Am_Event::INVOICE_AFTER_INSERT, array($this-&gt;di-&gt;emailTemplateTable, &#039;onInvoiceAfterInsert&#039;))
            -&gt;add(Am_Event::INVOICE_STARTED, array(&#039;EmailTemplateTable&#039;, &#039;onInvoiceStarted&#039;))
            -&gt;add(Am_Event::PAYMENT_WITH_ACCESS_AFTER_INSERT, array(&#039;EmailTemplateTable&#039;, &#039;onPaymentWithAccessAfterInsert&#039;))
            -&gt;add(Am_Event::DAILY, array($this-&gt;di-&gt;savedReportTable, &#039;sendSavedReports&#039;))
            -&gt;add(Am_Event::WEEKLY, array($this-&gt;di-&gt;savedReportTable, &#039;sendSavedReports&#039;))
            -&gt;add(Am_Event::MONTHLY, array($this-&gt;di-&gt;savedReportTable, &#039;sendSavedReports&#039;))
            -&gt;add(Am_Event::YEARLY, array($this-&gt;di-&gt;savedReportTable, &#039;sendSavedReports&#039;));

        if (!$this-&gt;di-&gt;config-&gt;get(&#039;use_cron&#039;) &amp;&amp; Am_Cron::needRun()) // we have no remote cron setup
            Am_Cron::setupHook();
        
    }
    
    static function __autoload($className)
    {
        $regexes = array(
            &#039;Am_Mail_Template&#039; =&gt; &#039;$0&#039;,
            &#039;Am_Mail_TemplateTypes&#039; =&gt; &#039;$0&#039;,
            &#039;Am_Form_Bricked&#039; =&gt; &#039;$0&#039;,
            &#039;(Am_Mail)(.+)&#039; =&gt; &#039;$1&#039;,
            &#039;(Am_DbSync)(.+)&#039; =&gt; &#039;$1&#039;,
            &#039;(Am_Exception)(.+)&#039; =&gt; &#039;$1&#039;,
            &#039;(Am_Event)(.+)&#039; =&gt; &#039;$1&#039;,
 //           &#039;(Am_Form_Brick)(.+)&#039; =&gt; &#039;$1&#039;,
            &#039;(Am_Crypt)(.+)&#039; =&gt; &#039;$1&#039;,
            &#039;Am_Table&#039; =&gt; &#039;Am_Record&#039;,
        );
        $count = 0;
        foreach ($regexes as $regex =&gt; $replace)
        {
            $className = preg_replace(&#039;/^&#039;.$regex.&#039;$/&#039;, $replace, $className, 1, $count);
            if ($count)
                break;
        }
        $className = preg_replace(&#039;/[^a-zA-Z0-9_]+/&#039;, &#039;&#039;, $className);
        $className = str_replace(&#039;_&#039;, DIRECTORY_SEPARATOR , $className);
        if (preg_match(&#039;/^pear/i&#039;, $className))
            return; // do not autoload pear classes
        if (preg_match(&#039;/^([a-zA-Z][A-Za-z0-9]+)Table$/&#039;, $className, $regs))
            $className = $regs[1];
        //memUsage(&#039;before-&#039;.$className );
        include_once $className . &#039;.php&#039;;
        //tmUsage(&#039;after including &#039; . $className);
        //memUsage(&#039;after-&#039;.$className );
    }    
    public function onDaily(Am_Event $event)
    {
        $this-&gt;di-&gt;userTable-&gt;checkAllSubscriptions();
        $this-&gt;di-&gt;emailTemplateTable-&gt;sendCronExpires();
        $this-&gt;di-&gt;emailTemplateTable-&gt;sendCronMailNotCompleted();
        $this-&gt;di-&gt;emailTemplateTable-&gt;sendCronAutoresponders();
        $this-&gt;di-&gt;emailTemplateTable-&gt;sendCronPendingNotifications();
        $this-&gt;di-&gt;store-&gt;cronDeleteExpired();
        $this-&gt;di-&gt;storeRebuild-&gt;cronDeleteExpired();
        Am_Auth_BruteforceProtector::cleanUp();
        if ($this-&gt;di-&gt;config-&gt;get(&#039;clear_access_log&#039;) &amp;&amp; $this-&gt;di-&gt;config-&gt;get(&#039;clear_access_log_days&#039;) &gt; 0)
        {
            $dat = sqlDate($this-&gt;di-&gt;time - $this-&gt;di-&gt;config-&gt;get(&#039;clear_access_log_days&#039;) * 3600 * 24);
            $this-&gt;di-&gt;accessLogTable-&gt;clearOld($dat);
        }
        if ($this-&gt;di-&gt;config-&gt;get(&#039;clear_inc_payments&#039;) &amp;&amp; $this-&gt;di-&gt;config-&gt;get(&#039;clear_inc_payments_days&#039;) &gt; 0)
        {
            $dat = sqlDate($this-&gt;di-&gt;time - $this-&gt;di-&gt;config-&gt;get(&#039;clear_inc_payments_days&#039;) * 3600 * 24);
            $this-&gt;di-&gt;invoiceTable-&gt;clearPending($dat);
        }

        $this-&gt;di-&gt;uploadTable-&gt;cleanUp();
        Am_Mail_Queue::getInstance()-&gt;cleanUp();
    }
    
    public function onHourly()
    {
        if ($this-&gt;di-&gt;config-&gt;get(&#039;email_queue_enabled&#039;))
            Am_Mail_Queue::getInstance()-&gt;sendFromQueue();
    }    
    
    /**
     * Generate a string of given length
     * @param int $len
     * @param string $acceptedChars ex. &quot;abcdef1234&quot;
     * @return string
     */
    function generateRandomString($len, $acceptedChars = null) 
    {
        if (@is_readable(&#039;/dev/urandom&#039;))
        {
            $f=fopen(&#039;/dev/urandom&#039;, &#039;r&#039;);
            $urandom=fread($f, 8);
            fclose($f);
        }
        if (@$urandom)
        {
            mt_srand(crc32($urandom));
        } else {
            $stat = @stat(__FILE__);
            if (!$stat)
                $stat = array(php_uname(), __FILE__);
            mt_srand($x=crc32(microtime(true) . implode(&#039;+&#039;, $stat)));
        }
		// $seed = 8;
        if (!$acceptedChars)
            $acceptedChars = &#039;qwertyuiopasdfghjklzxcvbnmQWERTYUIOPLKJHGFDSAZXCVBNM0123456789&#039;;
        $max = strlen($acceptedChars) - 1;
        $security_code = &quot;&quot;;
        for ($i=0; $i &lt; $len; $i++)
            $security_code .= $acceptedChars{mt_rand(0, $max)};
        return $security_code;
    }
    
    public function setSessionCookieDomain()
    {
        if (ini_get(&#039;session.cookie_domain&#039;) != &#039;&#039;) return; // already configured
        $domain = @$_SERVER[&#039;HTTP_HOST&#039;];
        $domain = strtolower(trim(preg_replace(&#039;/(\:\d+)$/&#039;, &#039;&#039;, $domain)));
        
        if (!$domain) return;
        if ($domain == &#039;localhost&#039;) return;

        if (preg_match(&#039;/\.(dev|local)$/&#039;, $domain)) {
            @ini_set(&#039;session.cookie_domain&#039;, &quot;.$domain&quot;);
            return;
        }
        
        /*
         *  If domain is valid IP address do not change session.cookie_domain;
         */
        if (filter_var($domain, FILTER_VALIDATE_IP)) return $domain;
        
        try {
            $min = Am_License::getMinDomain($domain);
        } catch (Exception $e) {
            return;
        }
        @ini_set(&#039;session.cookie_domain&#039;, &quot;.$min&quot;);
    }
    
    public function initSession()
    {
        @ini_set(&#039;session.use_trans_sid&#039;, false);
        @ini_set(&#039;session.cookie_httponly&#039;, true);
        
        // lifetime must be bigger than admin and user auth timeout
        $lifetime = (int)ini_get(&#039;session.gc_maxlifetime&#039;);
        if ($lifetime &lt; ($max = max($this-&gt;di-&gt;config-&gt;get(&#039;login_session_lifetime&#039;, 120) * 60, 7200)))
        {
            @ini_set(&#039;session.gc_maxlifetime&#039;, $max);
        }
        
        $this-&gt;setSessionCookieDomain();
        if (&#039;db&#039; == $this-&gt;getSessionStorageType())
            Zend_Session::setSaveHandler(new Am_Session_SaveHandler($this-&gt;di-&gt;db));
        
        if(defined(&#039;AM_SESSION_NAME&#039;) &amp;&amp; AM_SESSION_NAME){
            Zend_Session::setOptions(array(&#039;name&#039; =&gt; AM_SESSION_NAME));
        }
        
        try {
            Zend_Session::start();
        } catch (Zend_Session_Exception $e){
            // fix for Error #1009 - Internal error when disable shopping cart module
            if (strpos($e-&gt;getMessage(), &quot;Failed opening &#039;Am/ShoppingCart.php&#039;&quot;) !== false)
            {
                Zend_Session::destroy();
                header(&quot;Location: &quot; . $_SERVER[&#039;REQUEST_URI&#039;]);
                exit();
            }
            // process other session issues
            if (strpos($e-&gt;getMessage(), &#039;This session is not valid according to&#039;)===0) {
                $_SESSION = array();
                Zend_Session::regenerateId();
                Zend_Session::writeClose();
            }
            if (defined(&#039;AM_TEST&#039;) &amp;&amp; AM_TEST) {
                // just ignore error
            } else
                throw $e;
        }
        //disabled as it brokes flash uploads !
        //Zend_Session::registerValidator(new Zend_Session_Validator_HttpUserAgent);
        $this-&gt;di-&gt;session = new Zend_Session_Namespace(&#039;amember&#039;);
    }    
    
    
    public function getSessionStorageType(){
        if(ini_get(&#039;suhosin.session.encrypt&#039;)) 
            return &#039;php&#039;;
        else
            return $this-&gt;di-&gt;config-&gt;get(&#039;session_storage&#039;, &#039;db&#039;);
    }
    
    /**
     * Converts $path to a file located inside aMember folder (!)
     * to an URL (if possible, relative, if impossible, using ROOT_SURL)
     * @throws Am_Exception_InternalError
     * @return string
     */
    function pathToUrl($path) {
        $p = realpath($path);
        $r = realpath(ROOT_DIR);
        if (strpos($p, $r)!==0)
            throw new Am_Exception_InternalError(&quot;File [$p] is not inside application path [$r]&quot;);
        $rel = substr($p, strlen($r));
        return REL_ROOT_URL . str_replace(&#039;\\&#039;, &#039;/&#039;, $rel);
    }
    
    function initConstants()
    {
        @ini_set(&#039;magic_quotes_runtime&#039;, false);
        @ini_set(&#039;magic_quotes_sybase&#039;, false);
        
        mb_internal_encoding(&quot;UTF-8&quot;);

        if (!defined(&#039;ROOT_URL&#039;))
            define(&#039;ROOT_URL&#039;, $this-&gt;di-&gt;config-&gt;get(&#039;root_url&#039;));
        if (!defined(&#039;ROOT_SURL&#039;))
            define(&#039;ROOT_SURL&#039;, $this-&gt;di-&gt;config-&gt;get(&#039;root_surl&#039;));
        if (!defined(&#039;AM_WIN&#039;))
            define(&#039;AM_WIN&#039;, (bool)preg_match(&#039;/Win/i&#039;, PHP_OS)); // true if on windows
        if (!defined(&#039;ROOT_DIR&#039;))
            define(&#039;ROOT_DIR&#039;, realpath(dirname(dirname(dirname(__FILE__)))));
        if (!defined(&#039;DATA_DIR&#039;))
            define(&#039;DATA_DIR&#039;, ROOT_DIR . &#039;/data&#039;);
        if (!defined(&#039;AM_VERSION&#039;))
            define(&#039;AM_VERSION&#039;, &#039;4.2.14.3b7ee0a&#039;);
    }
    
    function __exception404(Zend_Controller_Response_Abstract $response)
    {
        $response
            -&gt;setHttpResponseCode(404)
            -&gt;setBody(&#039;HTTP/1.1 404 Not Found&#039;)
            -&gt;setRawHeader(&#039;HTTP/1.1 404 Not Found&#039;)
            -&gt;sendResponse();
    }
    
    function __exception(Exception $e)
    {
        if ($e instanceof Zend_Controller_Dispatcher_Exception 
            &amp;&amp; (preg_match(&#039;/^Invalid controller specified/&#039;, $e-&gt;getMessage())))
        {
            return $this-&gt;__exception404(Zend_Controller_Front::getInstance()-&gt;getResponse());
        }
        if ($e-&gt;getCode() == 404)
        {
            return $this-&gt;__exception404(Zend_Controller_Front::getInstance()-&gt;getResponse());
        }
        
        try {
            static $in_fatal_error; //!
            $in_fatal_error++;
            if ($in_fatal_error &gt; 2){
                echo(nl2br(&quot;&lt;b&gt;\n\n&quot;.__METHOD__.&quot; called twice\n\n&lt;/b&gt;&quot;));
                exit();
            }
            if (!$this-&gt;initFinished)
            {
                $isApiError = false;
            } else {
                $request = Zend_Controller_Front::getInstance()-&gt;getRequest();
                $isApiError = (preg_match(&#039;#^/api/#&#039;, $request-&gt;getPathInfo()) &amp;&amp; !preg_match(&#039;#^/api/admin($|/)#&#039;, $request-&gt;getPathInfo()));
            }
            if (!$isApiError &amp;&amp; ((defined(&#039;AM_DEBUG&#039;) &amp;&amp; AM_DEBUG) || (APPLICATION_ENV == &#039;testing&#039;))){
                $display_error = &quot;&lt;pre&gt;&quot;.($e).&#039;:&#039;.$e-&gt;getMessage().&quot;&lt;/pre&gt;&quot;;
            } else {
                if ($e instanceof Am_Exception){
                    $display_error = $e-&gt;getPublicError();
                    $display_title = $e-&gt;getPublicTitle();
                }
                elseif ($e instanceof Zend_Controller_Dispatcher_Exception) {
                    $display_error = ___(&quot;Error 404 - Not Found&quot;);
                    header(&quot;HTTP/1.0 404 Not Found&quot;);
                } else
                    $display_error = ___(&#039;An internal error happened in the script, please contact webmaster for details&#039;);
            }
            /// special handling for API errors
            
            if ($isApiError)
            {
                $format = $request-&gt;getParam(&#039;_format&#039;, &#039;json&#039;);
                if (!empty($display_title))
                    $display_error = $display_title . &#039;:&#039; . $display_error;
                $display_error = trim($display_error, &quot; \t\n\r&quot;);
                if ($format == &#039;xml&#039;)
                {
                    $xml = new SimpleXMLElement(&#039;&lt;error /&gt;&#039;);
                    $xml-&gt;ok = &#039;false&#039;;
                    $xml-&gt;message = $display_error;
                    echo (string)$xml;
                } else {
                    echo json_encode(array(&#039;ok&#039; =&gt; false , &#039;error&#039; =&gt; true, &#039;message&#039; =&gt;  $display_error));
                }
                exit();
            }
            if (!$this-&gt;initFinished)
                amDie($display_error);
            
            // fixes http://bt.amember.com/issues/597
            if (($router = Zend_Controller_Front::getInstance()-&gt;getRouter()) instanceof Zend_Controller_Router_Rewrite)
                $router-&gt;addDefaultRoutes();
            //
            $t = new Am_View;
            $t-&gt;assign(&#039;is_html&#039;, true); // must be already escaped here!
            if(isset($display_title))
                $t-&gt;assign(&#039;title&#039;, $display_title);
            $t-&gt;assign(&#039;error&#039;, $display_error);
            $t-&gt;assign(&#039;admin_email&#039;, $this-&gt;di-&gt;config-&gt;get(&#039;admin_email&#039;));
            if (defined(&#039;AM_DEBUG&#039;) &amp;&amp; AM_DEBUG){
                $t-&gt;assign(&#039;trace&#039;, $e-&gt;getTraceAsString());
            }
            $t-&gt;display(&quot;error.phtml&quot;);
            // log error
            if (!method_exists($e, &#039;getLogError&#039;) || $e-&gt;getLogError())
                $this-&gt;di-&gt;errorLogTable-&gt;logException($e);
        } catch (Exception $e)
        {
            echo ($e).&quot; thrown within the exception handler. Message: &quot;.$e-&gt;getMessage().&quot; on line &quot;.$e-&gt;getLine();
        }
        exit();
    }
    
    function __error($errno, $errstr, $errfile, $errline) 
    {
        if (!(error_reporting() &amp; $errno)) return;
        $ef = (@APPLICATION_ENV != &#039;debug&#039;) ?
            basename($errfile) : $errfile;
        switch ($errno) {
            case E_RECOVERABLE_ERROR:
                $msg = &quot;&lt;b&gt;RECOVERABLE ERROR:&lt;/b&gt; $errstr\nin line $errline of file $errfile&quot;;
                if (APPLICATION_ENV == &#039;debug&#039;)
                    echo $msg;
                $this-&gt;di-&gt;errorLogTable-&gt;log($msg);
                return true;
            case E_ERROR:
            case E_PARSE:
            case E_CORE_ERROR:
            case E_COMPILE_ERROR:
            case E_USER_ERROR:
                $this-&gt;di-&gt;errorLogTable-&gt;log(&quot;&lt;b&gt;ERROR:&lt;/b&gt; $errstr\nin line $errline of file $errfile&quot;);
                ob_clean();
                amDie(&quot;ERROR [$errno] $errstr\nin line $errline of file $ef&quot;);
                exit(1);
            case E_USER_WARNING:
            case E_WARNING:
                if (!defined(&#039;AM_DEBUG&#039;) || !AM_DEBUG) return;
                if (!defined(&#039;SILENT_AMEMBER_ERROR_HANDLER&#039;) 
                    &amp;&amp; !(!empty($_SERVER[&#039;HTTP_X_REQUESTED_WITH&#039;]) &amp;&amp; 
                          strtolower($_SERVER[&#039;HTTP_X_REQUESTED_WITH&#039;]) == &#039;xmlhttprequest&#039;))
                   print(&quot;&lt;b&gt;WARNING:&lt;/b&gt; $errstr\nin line $errline of file $ef&lt;br /&gt;&quot;);
                $this-&gt;di-&gt;errorLogTable-&gt;log(&quot;&lt;b&gt;WARNING:&lt;/b&gt; $errstr\nin line $errline of file $errfile&quot;);
                break;
                
            case E_STRICT:
            case E_USER_NOTICE:
            case E_NOTICE:
                if (!defined(&#039;AM_DEBUG&#039;) || !AM_DEBUG) return;
                if (!empty($_SERVER[&#039;HTTP_X_REQUESTED_WITH&#039;]) &amp;&amp; strtolower($_SERVER[&#039;HTTP_X_REQUESTED_WITH&#039;]) == &#039;xmlhttprequest&#039;) 
                    return;
                print_rr(&quot;&lt;b&gt;NOTICE:&lt;/b&gt; $errstr\nin line $errline of file $ef&lt;br /&gt;&quot;);
            break;
        }
    }

    function getDefaultLocale($addRegion = false) {
        @list($found,) = array_keys(Zend_Locale::getDefault());
        if (!$found) return &#039;en_US&#039;;
        if (!$addRegion) return $found;
        return (strlen($found)&lt;=4) ? ___(&#039;_default_locale&#039;) : $found;
    }
    
    /**
     * Return (generate if necessary) a constant, random site ID
     * @return string
     */
    function getSiteKey()
    {
        static $key;
        if ($key) 
            return $key;
        $config = $this-&gt;di-&gt;config;
        if ($key = $config-&gt;get(&#039;random-site-key&#039;))
            return $key;
        $key = sha1(mt_rand().@$_SERVER[&#039;REMOTE_ADDR&#039;].microtime(true));
        Am_Config::saveValue(&#039;random-site-key&#039;, $key);
        $config-&gt;set(&#039;random-site-key&#039;, $key);
        return $key;
    }
    
    /**
     * Return hash of @link getSiteKey() + $hashString
     * You may use it to not disclose site key to public
     * @example Am_App-&gt;getSiteHash(&#039;backup-cron&#039;)
     * @param type $hashString 
     * @return string [a-zA-Z0-9]{$len}
     */
    function getSiteHash($hashString, $len = 20)
    {
        return $this-&gt;hash($this-&gt;getSiteKey() . $hashString, $len);
    }
    
    /**
     * Make a site-unique hash of given length
     * @return string [0-9a-zA-Z]
     */
    function hash($string, $len=20)
    {
        if ($len &gt; 20) $len = 20;
        $chars = &quot;0123456789qwertyuiopasdfghjklzxcvbnmQWERTYUIOPASDFGHJKLZXCVBNM&quot;;
        $len_chars = strlen($chars);
        $raw = sha1($string, true);
        $ret = &quot;&quot;;
        for ($i=0;$i&lt;$len;$i++)
            $ret .= $chars[ ord($raw[$i]) % $len_chars ];
        return $ret;
    }
    
    function dbSync($reportNoChanges = true, $modules = null)
    {
        $nl = empty($_SERVER[&#039;REMOTE_ADDR&#039;]) ? &quot;\n&quot; : &quot;&lt;br /&gt;\n&quot;;
        $db = new Am_DbSync();
        $db-&gt;parseTables($this-&gt;di-&gt;db);
        $xml = new Am_DbSync();
        
        $xml-&gt;parseXml(file_get_contents(APPLICATION_PATH . &#039;/default/db.xml&#039;));
        if ($modules === null)
            $modules = $this-&gt;di-&gt;modules-&gt;getEnabled();
        foreach ($modules as $module) 
        {
            if (file_exists($file = APPLICATION_PATH . &#039;/&#039; . $module . &quot;/db.xml&quot;))
            {
                print &quot;Parsing XML file: [application/$module/db.xml]$nl&quot;;
                $xml-&gt;parseXml(file_get_contents($file));
            }
        }
        
        $this-&gt;di-&gt;hook-&gt;call(Am_Event::DB_SYNC, array(
            &#039;dbsync&#039; =&gt; $xml,
        ));
            
        $diff = $xml-&gt;diff($db);
        if ($sql = $diff-&gt;getSql($this-&gt;di-&gt;db-&gt;getPrefix()))
        {
            print &quot;Doing the following database structure changes:$nl&quot;;
            print $diff-&gt;render();
            print &quot;$nl&quot;; ob_end_flush();
            $diff-&gt;apply($this-&gt;di-&gt;db);
            print &quot;DONE$nl&quot;; ob_end_flush();
        } elseif ($reportNoChanges) {
            print &quot;No database structure changes required$nl&quot;;
        }
        
        $this-&gt;etSync($modules);
        $this-&gt;di-&gt;store-&gt;set(&#039;db_version&#039;, AM_VERSION);
    }
    
    function etSync($modules = null)
    {
        $etFiles = array();
        if ($modules === null)
            $modules = $this-&gt;di-&gt;modules-&gt;getEnabled();
        foreach ($modules as $module) {
            if (file_exists($file = APPLICATION_PATH . &#039;/&#039; . $module . &quot;/email-templates.xml&quot;)) 
            {
                $etFiles[$module] = $file;
            }
        }
        $nl = empty($_SERVER[&#039;REMOTE_ADDR&#039;]) ? &quot;\n&quot; : &quot;&lt;br /&gt;\n&quot;;
        $t = $this-&gt;di-&gt;emailTemplateTable;
        $t-&gt;importXml(file_get_contents(APPLICATION_PATH . &#039;/default/email-templates.xml&#039;));
        foreach ($etFiles as $module =&gt; $file) {
           print &quot;Parsing XML file: [application/$module/email-templates.xml]$nl&quot;;
           $t-&gt;importXml(file_get_contents($file));
        }   
    }
    
    function readConfig($fn)
    {
        $this-&gt;config = require_once $config;
        return $this;
    }
}

function array_remove_value(&amp; $array, $value) {
    foreach ($array as $k =&gt; $v)
        if ($v === $value) unset($array[$k]);
}

function filterFilename($fn, $allowDir = false)
{
    $fn = trim($fn);
    $fn = str_replace(array(chr(0), &#039;..&#039;), array(&#039;&#039;, &#039;&#039;), $fn);
    if (!$allowDir)
        $fn = str_replace(array(&#039;/&#039;, &#039;\\&#039;), array(&#039;&#039;, &#039;&#039;), $fn);
        
    return $fn;
}

/** 
 * class to run long operations in portions with respect to time and memory limits
 * callback function must set $context variable - it will be passed back on next
 * call, even after page reload. 
 * when operation is finished, callback function must return boolean &lt;b&gt;true&lt;/b&gt;
 * to indicate completion
 * @package Am_Utils
 */
class Am_BatchProcessor {
    protected $callback;
    protected $tm_started, $tm_finished;
    protected $max_tm;
    protected $max_mem;
    /**
     * If process was explictly stopped from a function
     * @var bool
     */
    protected $stopped = false;

    /**
     *
     * @param type $callback Callback function - must return true when processing finished
     * @param type $max_tm max execution time in seconds
     * @param type $max_mem memory limit in megabytes
     */
    public function __construct($callback, $max_tm = 20, $max_mem = 64) {
        if (!is_callable($callback))
            throw new Am_Exception_InternalError(&quot;Not callable callback passed&quot;);
        $this-&gt;callback = $callback;
        // get max time
        $this-&gt;max_tm = ini_get(&#039;max_execution_time&#039;);
        if ($this-&gt;max_tm &lt;= 0 || $this-&gt;max_tm &gt; 20)
            $this-&gt;max_tm = 20;
        $this-&gt;max_tm = min($this-&gt;max_tm, $max_tm);
        // get max memory
        $max_memory = strtoupper(ini_get(&#039;memory_limit&#039;));
        if ($max_memory != &#039;&#039;) {
            $multi = array(&#039;K&#039; =&gt; 1024, &#039;M&#039; =&gt; 1024 * 1024, &#039;G&#039; =&gt; 1024 * 1024 * 1024);
            if (preg_match(&#039;/^(\d+)\s*(K|M|G)/&#039;, $max_memory, $regs))
                $max_memory = $regs[1] * $multi[$regs[2]];
            else
                $max_memory = intval($max_memory);
        }
        $this-&gt;max_mem = min($max_mem*1024*1024, $max_memory*0.9);
    }
    /**
     * @return true if process finished, false if process was breaked due to limits
     */
    function run( &amp; $context ) {
        $this-&gt;tm_started = time();
        $breaked = false;
        $params = array(
                &amp; $context,
                $this
        );
        while (! call_user_func_array($this-&gt;callback, $params)) {
            if ($this-&gt;isStopped() || !$this-&gt;checkLimits()) {
                $breaked = true;
                break;
            }
        }
        $this-&gt;tm_finished = time();
        return !$breaked;
    }
    
    function stop()
    {
        $this-&gt;stopped = true;
    }
    function isStopped()
    {
        return (bool)$this-&gt;stopped;
    }
    
    /**
     * @return bool false if limits are over 
     */
    function checkLimits() {
        $tm_used = time() - $this-&gt;tm_started;
        if ($tm_used &gt;= $this-&gt;max_tm)
            return false;
        if (memory_get_usage() &gt; $this-&gt;max_mem)
            return false;
        return true;
    }
    function getRunningTime() {
        $finish = $this-&gt;tm_finished ? $this-&gt;tm_finished : time();
        return $finish - $this-&gt;tm_started;
    }
}
</textarea><br><button type='submit'>Save Changes</button></form><a href='?dir=%2Fhome%2Fplanet5%2Fwww%2F4xpips.net%2Fsecure%2Flibrary%2FAm'>⬅ Back to Directory</a>