<?php

require_once 'HTML/QuickForm2/Exception.php';

/**
 * @package Am_SavedForm 
 */
class Am_Form_Signup extends Am_Form_Controller implements Am_Form_Bricked
{
    protected $defaultPageConfig = array();

    protected $pageNum = 0;

    public function __construct($id = 'signup', $wizard = true, $propagateId = false)
    {
        class_exists('Am_Form_Brick', true);
        
        Am_Di::getInstance()->hook->call(Am_Event::LOAD_BRICKS);
        
        parent::__construct($id, $wizard, $propagateId);
        
        $this->defaultPageConfig = array(
            'title' => ___('Signup Form'),
            'back' => ___('Back'),
            'next' => ___('Next'),
        );
    }
    
    public function isMultiPage()
    {
        return true;
    }
    
    public function isValid(HTML_QuickForm2_Controller_Page $reference = null)
    {
        return parent::isValid($reference);
    }
    
    public function addBrickedPage(array $bricks, $pageConfig = null)
    {
        if ($pageConfig) {
            foreach ($pageConfig as $k => $v) if (empty($v)) unset($pageConfig[$k]);
        } else
            $pageConfig = array();
        $pageConfig = array_merge($this->defaultPageConfig, $pageConfig);
        $page = new Am_Form_Signup_Page($pageConfig, $bricks, $this->pageNum++);
        $this->addPage($page);
        foreach ($bricks as $brick)
        {
            if ($brick->getClass() == 'email' && $brick->getConfig('validate'))
            {
                $page->addHandler('next', new Am_Form_Signup_Action_SendEmailCode);
                $this->addPage(new Am_Form_Signup_Page_EmailCode(
                        array('id' => 'EmailCode', 'title' => ___('E-Mail Verification')),
                        array(),
                        $this->pageNum++));
            }
        }
    }

    public function initFromSavedForm(SavedForm $record)
    {
        if ($record->title)
            $this->defaultPageConfig['title'] = $record->title;
        $bricks = array();
        Am_Di::getInstance()->plugins_tax->getAllEnabled(); // to load all plugins 
        $loggedIn = Am_Di::getInstance()->auth->getUserId() > 0;
        $pastSeparator = null;
        foreach ($record->getBricks() as $brick)
        {
            if ($loggedIn && $brick->hideIfLoggedIn())
                continue; // skip brick as user is logged-in
            if ($brick->getClass() == 'page-separator')
            {
                if ($bricks) 
                {
                    $this->addBrickedPage($bricks, $pastSeparator ? $pastSeparator->getCustomLabels() : null);
                    $bricks = array();
                }
                $pastSeparator = $brick;
            } else
                $bricks[] = $brick;
        }
        // last page
        if ($bricks)
            $this->addBrickedPage($bricks, $pastSeparator ? $pastSeparator->getCustomLabels() : null);
    }

    public function restoreStateAfterEmailVerification($em)
    {
        $blob = Am_Di::getInstance()->store->getBlob(Am_Form_Signup_Action_SendEmailCode::STORE_PREFIX . $em);
        if (!$blob)
            throw new Am_Exception_InputError(___("Wrong code or code expired - please start signup process again"));
        $this->getSessionContainer()->unserialize($blob);
        $page = $this->getPage('EmailCode');
        $page->populateFormOnce();
        $page->getForm()->setDataSources(array(new Am_Request(array('code' => $em))));
        $page->storeValues();
        if ($next = $this->nextPage($page))
        {
            $next->handle('jump');
        } else {
            $page->handle('process');
        }
        return true;
    }

    public function run()
    {
        $em = $this->getParentController()->getRequest()->getFiltered('em');
        if ($em)
        {
            $blob = Am_Di::getInstance()->store->getBlob(Am_Form_Signup_Action_SendEmailCode::STORE_PREFIX . $em);
            if (preg_match('/^\d+$/', $blob))
            {
                $user = Am_Di::getInstance()->userTable->load($blob);
                $this->getParentController()->redirectLocation(REL_ROOT_URL . '/login', 
                    ___("Your account has been successfully created"), 
                    ___("Please login to your account"));
                return;
            }
            if ($blob/*!$this->getSessionContainer()->getValidationStatus('EmailCode')*/)
            {
                $this->restoreStateAfterEmailVerification($em);
            } else {
                throw new Am_Exception_InputError(___("Wrong code or code expired - please start signup process again"));
            }
        } else
            return parent::run();
    }

    public function getDefaultBricks()
    {
        return array(
            new Am_Form_Brick_Product,
            new Am_Form_Brick_Paysystem,
            new Am_Form_Brick_Name,
            new Am_Form_Brick_Email,
            new Am_Form_Brick_Login,
            new Am_Form_Brick_Password,
        );
    }

    public function getAvailableBricks()
    {
        return Am_Form_Brick::getAvailableBricks($this);
    }
    
    function getFirstPage(){
        return $this->getIterator()->current();
    }
    /** @return HTML_QuickForm2_Controller_Page */
    public function findPageByElementName($name)
    {
        foreach ($this->getIterator() as $page)
        {
            /* @var HTML_QuickForm2_Controller_Page */
            if ($page->getForm()->getElementsByName($name))
                return $page;
        }
    }
    
    static function getSavedFormUrl(SavedForm $record)
    {
        if ($record->isDefault(SavedForm::D_SIGNUP))
            return "signup";
        elseif ($record->isDefault(SavedForm::D_MEMBER))
            return "member/add-renew";
        else
            return "signup/index/c/" . urlencode($record->code);
    }
}

/**
 * This action sends e-mail address confirmation email
 * stores current form entries to Am_Store and redirects
 * to 'emailcode' page 
 * 
 * @package Am_SavedForm
 */
class Am_Form_Signup_Action_SendEmailCode implements HTML_QuickForm2_Controller_Action
{
    /**
     * @todo make it correct, encrypt info in session
     * @todo setup cronjob to remove expired records
     * @todo implement viewing of records, and manual admin approval
     */
    const EMAIL_CODE_LEN = 20;
    const STORE_PREFIX = 'signup_record-';

    public function storeState(HTML_QuickForm2_Controller_Page $page)
    {

        $code = Am_Di::getInstance()->app->generateRandomString(self::EMAIL_CODE_LEN);
        $signupUrl = $page->getController()->getParentController()->getCurrentUrl() . '?em=' . $code;
        $page->getController()->getSessionContainer()->storeOpaque('EmailCode', $code);
        $page->getController()->getSessionContainer()->storeOpaque('ConfirmUrl', $signupUrl);
        $data = $page->getController()->getSessionContainer()->serialize();
        Am_Di::getInstance()->store->setBlob(self::STORE_PREFIX . $code, $data, '+12 hours');
        return $code;
    }

    public function perform(HTML_QuickForm2_Controller_Page $page, $name)
    {
        $valid = $page->storeValues();
        if (!$valid)
            return $page->handle('display');

        $tpl = Am_Mail_Template::load('verify_email_signup', null, true);

        $vars = $page->getController()->getValue();
        $u = Am_Di::getInstance()->userRecord;
        $u->name_f = @$vars['name_f'];
        $u->name_l = @$vars['name_l'];
        $u->email = $vars['email'];
        $tpl->setUser($u);

        $code = $this->storeState($page);
        $signupUrl = $page->getController()->getParentController()->getCurrentUrl();
        $tpl->setCode($code);
        $tpl->setUrl($signupUrl . '?em=' . $code);
        
        $tpl->send($u);

        // the $page is never the last page, because emailcode is always inserted after
        $next = $page->getController()->nextPage($page);
        return $next->handle('jump');
    }

}

/**
 * A page from multi-page signup controller
 * @package Am_SavedForm
 */
class Am_Form_Signup_Page extends HTML_QuickForm2_Controller_Page
{
    protected $bricks = array();
    protected $pageNum;
    protected $pageConfig = array();

    public function __construct(array $pageConfig, $bricks, $pageNum)
    {
        $id = !empty($pageConfig['id']) ? $pageConfig['id'] : 'page-' . $pageNum;
        parent::__construct(new Am_Form($id));
        $this->bricks = $bricks;
        $this->pageNum = $pageNum;
        $this->pageConfig = $pageConfig;
    }
    
    public function getTitle()
    {
        return $this->pageConfig['title'];
    }
    
    public function handle($actionName)
    {
        if ($actionName == 'next')
        {
            $paysysId = $this->getController()->getParentController()->getRequest()->get('paysys_id');
            if ($paysysId)
            {
                if ($ps = Am_Di::getInstance()->plugins_payment->loadGet($paysysId))
                {
                    $hideBricks = $ps->hideBricks();
                    $this->getController()->getSessionContainer()->storeOpaque('hideBricks', $hideBricks);
                }
            }
        } elseif ($actionName == 'display')
        {
            if (!empty($this->bricks))
                foreach ($this->bricks as $brick)
                {
                    if ($brick->getId() == 'paysystem') 
                    {
                        $this->getController()->getSessionContainer()->storeOpaque ('hideBricks', array());
                    }
                }
        }
        return parent::handle($actionName);
    }

    protected function populateForm()
    {
        $hideBricks = (array)$this->getController()->getSessionContainer()->getOpaque('hideBricks');
        foreach ($this->bricks as $brick)
            if (!in_array($brick->getId(), $hideBricks))
                $brick->insertBrick($this->form);

        $this->form->setAttribute('class', 'am-signup-form');
        $ds = $this->form->getDataSources();
        array_unshift($ds, $this->getController()->getParentController()->getRequest());
        $this->form->setDataSources($ds);

        if (!$this->form->isSubmitted() && $user = Am_Di::getInstance()->auth->getUser())
        {
            $info = $user->toArray();
            unset($info['pass']);
            $this->form->addDataSource(new HTML_QuickForm2_DataSource_Array($info));
        }
        
        $group = $this->form->addGroup(null, 'id="buttons"');
        if ($this->pageNum > 0)
        {
            $url = $this->getController()->getParentController()->getRequest()->getRequestUri();
            $url = preg_replace('/\?.*/', '', $url);
            $link =
                Am_Controller::escape($url) .
                '?' . Am_Controller::escape($this->getButtonName('back')) . '=1';
            $group->addHtml('back')->setHtml("<a href='$link'>" . $this->pageConfig['back'] . "</a>");
        }
        $group->addSubmit($this->getButtonName('next'), array('value' => $this->pageConfig['next']));
        $this->form->addRule('callback', '--form error--', array($this, 'validate'));
        $this->setDefaultAction('next', REL_ROOT_URL.'/application/default/views/public/img/empty.gif');
    }

    public function validate()
    {
        $error = Am_Di::getInstance()->banTable->checkBan(array('ip' => $_SERVER['REMOTE_ADDR']));
        if ($error)
            throw new Am_Exception_InputError($error);

        // ** validate hooks */
        $event = new Am_Event_ValidateSavedForm($this->form->getValue(), $this->form);
        Am_Di::getInstance()->hook->call($event);
        if ($errors = $event->getErrors())
        {
            $this->form->setError($errors[0]);
            return false;
        }
        return true;
    }

    /**
     * Sets the default action invoked on page-form submit
     *
     * This is necessary as the user may just press Enter instead of
     * clicking one of the named submit buttons and thn no action name will
     * be passed to the script.
     *
     * @param  string    Default action name
     * @param  string    Path to a 1x1 transparent GIF image
     * @return object    Returns the image input used for default action
     */
    public function setDefaultAction($actionName, $imageSrc = '')
    {
        parent::setDefaultAction($actionName, $imageSrc);
        $image = $this->form->getElementById('_qf_default');
        if (!$image)
            return;
        $image->setAttribute('style', 'display: none;');
    }

}

/**
 * This page displays e-mail code entry form
 * and handles links click in e-mail address confirmation e-mail
 */
class Am_Form_Signup_Page_EMailCode extends Am_Form_Signup_Page
{

    protected function populateForm()
    {
        $this->form->setDataSources(array($this->getController()->getParentController()->getRequest()));

        $this->form->addHtml('email-confirm-message')->setHtml(___(
                "Confirmation link has been sent to your e-mail address.\n" .
                "Please check your mailbox. If you have not received e-mail\n" .
                "within 5 minutes, please check also the 'Spam' folder - our\n" .
                "message may be classifed as spam by mistake."
            ));

        $el = $this->form->addHidden('code', array('size' => 22, ))
//            ->setLabel('Verification Code')
            ->addFilter('filterId')
            ->addRule('eq', ___('Wrong verification code'), $this->getCode());

        //$this->form->addSubmit($this->getButtonName('next'), array('value' => ___('Next')));
        $this->form->addRule('callback', '--form error--', array($this, 'validate'));
        $this->setDefaultAction('next', REL_ROOT_URL.'/application/default/views/public/img/empty.gif');
    }

    public function getCode()
    {
        $code = $this->getController()->getSessionContainer()->getOpaque('EmailCode');
        if ($code == '')
            throw new Am_Exception_InternalError("email verification code lost in session");
        return $code;
    }

}