<?php

/*
 * This file is part of Phraseanet
 *
 * (c) 2005-2013 Alchemy
 *
 * For the full copyright and license information, please view the LICENSE
 * file that was distributed with this source code.
 */

namespace Alchemy\Phrasea\Setup;

use Alchemy\Phrasea\Application;
use Doctrine\ORM\Tools\SchemaTool;

class Installer
{
    private $app;
    private $phraseaIndexer;

    public function __construct(Application $app)
    {
        $this->app = $app;
    }

    public function install($email, $password, \connection_interface $abConn, $serverName, $dataPath, \connection_interface $dbConn = null, $template = null, array $binaryData = array())
    {
        $this->rollbackInstall($abConn, $dbConn);

        try {

            $this->createConfigFile($abConn, $serverName, $binaryData);
            $this->createAB();
            $this->populateRegistryData($serverName, $dataPath, $binaryData);
            $user = $this->createUser($email, $password);
            if (null !== $dbConn) {
                $this->createDB($dbConn, $template);
            }
        } catch (\Exception $e) {
            $this->rollbackInstall($abConn, $dbConn);
            throw $e;
        }

        return $user;
    }

    public function setPhraseaIndexerPath($path)
    {
        $this->phraseaIndexer = $path;
    }

    private function populateRegistryData($serverName, $dataPath, $binaryData)
    {
        $this->app['phraseanet.registry']->set('GV_base_datapath_noweb', $dataPath, \registry::TYPE_STRING);
        $this->app['phraseanet.registry']->set('GV_ServerName', $serverName, \registry::TYPE_STRING);

        foreach ($binaryData as $key => $value) {
            $this->app['phraseanet.registry']->set($key, $value, \registry::TYPE_STRING);
        }

        // required to load GV template
        $app = $this->app;
        $GV = require __DIR__ . '/../../../../lib/conf.d/_GV_template.inc';

        foreach ($GV as $section) {
            foreach ($section['vars'] as $var) {
                if (isset($var['default'])) {
                    $this->app['phraseanet.registry']->set($var['name'], $var['default'], $var['type']);
                }
            }
        }
    }

    private function createDB(\connection_interface $dbConn = null, $template)
    {
        $template = new \SplFileInfo(__DIR__ . '/../../../conf.d/data_templates/' . $template . '-simple.xml');
        $databox = \databox::create($this->app, $dbConn, $template, $this->app['phraseanet.registry']);
        $this->app['authentication']->getUser()->ACL()
            ->give_access_to_sbas(array($databox->get_sbas_id()))
            ->update_rights_to_sbas(
                $databox->get_sbas_id(), array(
                'bas_manage'        => 1, 'bas_modify_struct' => 1,
                'bas_modif_th'      => 1, 'bas_chupub'        => 1
                )
        );

        $collection = \collection::create($this->app, $databox, $this->app['phraseanet.appbox'], 'test', $this->app['authentication']->getUser());

        $this->app['authentication']->getUser()->ACL()->give_access_to_base(array($collection->get_base_id()));
        $this->app['authentication']->getUser()->ACL()->update_rights_to_base($collection->get_base_id(), array(
            'canpush'         => 1, 'cancmd'          => 1
            , 'canputinalbum'   => 1, 'candwnldhd'      => 1, 'candwnldpreview' => 1, 'canadmin'        => 1
            , 'actif'           => 1, 'canreport'       => 1, 'canaddrecord'    => 1, 'canmodifrecord'  => 1
            , 'candeleterecord' => 1, 'chgstatus'       => 1, 'imgtools'        => 1, 'manage'          => 1
            , 'modify_struct'   => 1, 'nowatermark'     => 1
            )
        );

        foreach (array('cindexer', 'subdef', 'writemeta') as $task) {
            $class_name = sprintf('task_period_%s', $task);
            if ($task === 'cindexer' && is_executable($this->phraseaIndexer)) {
                $credentials = $databox->get_appbox()->get_connection()->get_credentials();

                $host = $credentials['hostname'];
                $port = $credentials['port'];
                $user_ab = $credentials['user'];
                $password = $credentials['password'];
                $dbname = $credentials['dbname'];

                $settings = "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n<tasksettings>\n<binpath>"
                    . str_replace('/phraseanet_indexer', '', $this->phraseaIndexer)
                    . "</binpath><host>" . $host . "</host><port>"
                    . $port . "</port><base>"
                    . $dbname . "</base><user>"
                    . $user_ab . "</user><password>"
                    . $password . "</password><socket>25200</socket>"
                    . "<use_sbas>1</use_sbas><nolog>0</nolog><clng></clng>"
                    . "<winsvc_run>0</winsvc_run><charset>utf8</charset></tasksettings>";
            } else {
                $settings = null;
            }

            \task_abstract::create($this->app, $class_name, $settings);
        }
    }

    private function createUser($email, $password)
    {
        $user = \User_Adapter::create($this->app, $email, $password, $email, true);

        $this->app['session']->set('usr_id', $user->get_id());

        return $user;
    }

    private function rollbackInstall(\connection_interface $abConn, \connection_interface $dbConn = null)
    {
        $structure = simplexml_load_file(__DIR__ . "/../../../conf.d/bases_structure.xml");

        if (!$structure) {
            throw new \RuntimeException('Unable to load schema');
        }

        $appbox = $structure->appbox;
        $databox = $structure->databox;

        foreach ($appbox->tables->table as $table) {
            try {
                $sql = 'DROP TABLE `' . $table['name'] . '`';
                $stmt = $abConn->prepare($sql);
                $stmt->execute();
                $stmt->closeCursor();
            } catch (\PDOException $e) {

            }
        }
        if (null !== $dbConn) {
            foreach ($databox->tables->table as $table) {
                try {
                    $sql = 'DROP TABLE `' . $table['name'] . '`';
                    $stmt = $dbConn->prepare($sql);
                    $stmt->execute();
                    $stmt->closeCursor();
                } catch (\PDOException $e) {

                }
            }
        }

        $this->app['phraseanet.configuration']->delete();

        return;
    }

    private function createAB()
    {
        $this->app['phraseanet.appbox']->insert_datas();

        $metadatas = $this->app['EM']->getMetadataFactory()->getAllMetadata();

        if (!empty($metadatas)) {
            // Create SchemaTool
            $tool = new SchemaTool($this->app['EM']);
            // Create schema
            $tool->dropSchema($metadatas);
            $tool->createSchema($metadatas);
        }

        $this->app['phraseanet.registry'] = new \registry($this->app);
    }

    private function createConfigFile($abConn, $serverName, $binaryData)
    {
        $config = $this->app['phraseanet.configuration']->initialize();

        foreach ($abConn->get_credentials() as $key => $value) {
            $key = $key == 'hostname' ? 'host' : $key;
            $config['main']['database'][$key] = (string) $value;
        }

        $config['main']['database']['driver'] = 'pdo_mysql';
        $config['main']['database']['charset'] = 'UTF8';

        $config['binaries'] = $binaryData;

        $config['main']['servername'] = $serverName;
        $config['main']['key'] = md5(mt_rand(100000000, 999999999));

        $this->app['phraseanet.registry']->setKey($config['main']['key']);
        $this->app['phraseanet.configuration']->setConfig($config);
    }
}