<?php

class eventsmanager_broker
{
    private static $_instance = false;
    protected $events = array();
    protected $notifications = array();
    protected $pool_classes = array();

    /**
     *
     * @var appbox
     */
    protected $appbox;

    /**
     *
     * @var \Alchemy\Phrasea\Core
     */
    protected $core;

    private function __construct(appbox &$appbox, \Alchemy\Phrasea\Core $core)
    {
        $this->appbox = $appbox;
        $this->core = $core;

        return $this;
    }

    /**
     * @return \eventsmanager_broker
     */
    public static function getInstance(appbox &$appbox, \Alchemy\Phrasea\Core $core)
    {
        if ( ! self::$_instance) {
            self::$_instance = new self($appbox, $core);
        }

        return self::$_instance;
    }

    public function start()
    {
        $iterators_pool = array(
            'event' => (is_array($this->appbox->get_registry()->get('GV_events')) ? $this->appbox->get_registry()->get('GV_events') : array()),
            'notify' => (is_array($this->appbox->get_registry()->get('GV_notifications')) ? $this->appbox->get_registry()->get('GV_notifications') : array())
        );

        foreach ($iterators_pool as $type => $iterators) {
            foreach ($iterators as $fileinfo) {
                $classname = $fileinfo;

                if ( ! class_exists($classname, true)) {
                    continue;
                }
                $this->pool_classes[$classname] = new $classname($this->appbox, $this->core, $this);

                foreach ($this->pool_classes[$classname]->get_events() as $event)
                    $this->bind($event, $classname);

                if ($type === 'notify' && $this->pool_classes[$classname]->is_available())
                    $this->notifications[] = $classname;
            }
        }

        return;
    }

    public function list_all($type)
    {
        $iterators_pool = array();

        $root = __DIR__ . '/../../';

        if ($type == 'event') {
            $iterators_pool['event'][] = new DirectoryIterator(__DIR__ . '/event/');
            if (file_exists(__DIR__ . '/event/'))
                $iterators_pool['event'][] = new DirectoryIterator(__DIR__ . '/event/');
        }
        if ($type == 'notify') {
            $iterators_pool['notify'][] = new DirectoryIterator(__DIR__ . '/notify/');
        }

        $ret = array();

        foreach ($iterators_pool as $type => $iterators) {
            foreach ($iterators as $iterator) {
                foreach ($iterator as $fileinfo) {
                    if ( ! $fileinfo->isDot()) {
                        if (substr($fileinfo->getFilename(), 0, 1) == '.')
                            continue;

                        $filename = explode('.', $fileinfo->getFilename());
                        $classname = 'eventsmanager_' . $type . '_' . $filename[0];

                        if ( ! class_exists($classname)) {
                            continue;
                        }
                        $obj = new $classname($this->appbox, $this->core, $this);

                        $ret[$classname] = $obj->get_name();
                    }
                }
            }
        }

        return $ret;
    }

    public function trigger($event, $array_params = array(), &$object = false)
    {
        if (array_key_exists($event, $this->events)) {
            foreach ($this->events[$event] as $classname) {
                $this->pool_classes[$classname]->fire($event, $array_params, $object);
            }
        }

        return;
    }

    public function bind($event, $object_name)
    {

        if ( ! array_key_exists($event, $this->events))
            $this->events[$event] = array();

        $this->events[$event][] = $object_name;
    }

    public function notify($usr_id, $event_type, $datas, $mailed = false)
    {
        try {
            $event_type = str_replace('eventsmanager_', '', $event_type);

            $sql = 'INSERT INTO notifications (id, usr_id, type, unread, mailed, datas, created_on)
              VALUES
              (null, :usr_id, :event_type, 1, :mailed, :datas, NOW())';

            $params = array(
                ':usr_id'     => $usr_id
                , ':event_type' => $event_type
                , ':mailed'     => ($mailed ? 1 : 0)
                , ':datas'      => $datas
            );

            $stmt = $this->appbox->get_connection()->prepare($sql);
            $stmt->execute($params);
            $stmt->closeCursor();
        } catch (Exception $e) {
            return false;
        }

        return true;
    }

    public function get_json_notifications($page = 0)
    {
        $appbox = appbox::get_instance(\bootstrap::getCore());
        $session = $appbox->get_session();

        $unread = 0;
        $total = 0;

        $sql = 'SELECT count(id) as total, sum(unread) as unread
            FROM notifications WHERE usr_id = :usr_id';

        $stmt = $this->appbox->get_connection()->prepare($sql);
        $stmt->execute(array(':usr_id' => $session->get_usr_id()));
        $row = $stmt->fetch(PDO::FETCH_ASSOC);
        $stmt->closeCursor();

        if ($row) {
            $unread = $row['unread'];
            $total = $row['total'];
        }

        $n = 10;

        $sql = 'SELECT * FROM notifications
            WHERE usr_id = :usr_id
            ORDER BY created_on DESC
            LIMIT ' . ((int) $page * $n) . ', ' . $n;

        $datas = array('notifications' => array(), 'next' => '');

        $stmt = $this->appbox->get_connection()->prepare($sql);
        $stmt->execute(array(':usr_id' => $session->get_usr_id()));
        $rs = $stmt->fetchAll(PDO::FETCH_ASSOC);
        $stmt->closeCursor();

        foreach ($rs as $row) {
            $type = 'eventsmanager_' . $row['type'];
            $data = $this->pool_classes[$type]->datas($row['datas'], $row['unread']);

            if ( ! isset($this->pool_classes[$type]) || count($datas) === 0) {
                $sql = 'DELETE FROM notifications WHERE id = :id';
                $stmt = $this->appbox->get_connection()->prepare($sql);
                $stmt->execute(array(':id' => $row['id']));
                $stmt->closeCursor();
                continue;
            }

            $date_key = str_replace('-', '_', substr($row['created_on'], 0, 10));
            $display_date = phraseadate::getDate(new DateTime($row['created_on']));

            if ( ! isset($datas['notifications'][$date_key])) {
                $datas['notifications'][$date_key] = array(
                    'display'       => $display_date
                    , 'notifications' => array()
                );
            }

            $datas['notifications'][$date_key]['notifications'][$row['id']] = array(
                'classname' => $data['class']
                , 'time'      => phraseadate::getTime(new DateTime($row['created_on']))
                , 'icon'      => '<img src="' . $this->pool_classes[$type]->icon_url() . '" style="vertical-align:middle;width:16px;margin:2px;" />'
                , 'id'        => $row['id']
                , 'text'      => $data['text']
            );
        }

        if (((int) $page + 1) * $n < $total) {
            $datas['next'] = '<a href="#" onclick="print_notifications(' . ((int) $page + 1) . ');return false;">' . _('charger d\'avantages de notifications') . '</a>';
        }

        return p4string::jsonencode($datas);
    }

    public function get_unread_notifications_number()
    {
        $appbox = appbox::get_instance(\bootstrap::getCore());
        $session = $appbox->get_session();

        $total = 0;

        $sql = 'SELECT count(id) as total
            FROM notifications
            WHERE usr_id = :usr_id AND unread="1"';
        $stmt = $this->appbox->get_connection()->prepare($sql);
        $stmt->execute(array(':usr_id' => $session->get_usr_id()));
        $row = $stmt->fetch(PDO::FETCH_ASSOC);
        $stmt->closeCursor();

        if ($row) {
            $total = $row['total'];
        }

        return $total;
    }

    public function get_notifications()
    {
        $appbox = appbox::get_instance(\bootstrap::getCore());
        $session = $appbox->get_session();

        $unread = 0;
        $total = 0;

        $sql = 'SELECT count(id) as total, sum(unread) as unread
            FROM notifications WHERE usr_id = :usr_id';

        $stmt = $this->appbox->get_connection()->prepare($sql);
        $stmt->execute(array(':usr_id' => $session->get_usr_id()));
        $row = $stmt->fetch(PDO::FETCH_ASSOC);
        $stmt->closeCursor();

        if ($row) {
            $unread = $row['unread'];
            $total = $row['total'];
        }

        if ($unread < 3) {
            $sql = 'SELECT * FROM notifications
              WHERE usr_id = :usr_id ORDER BY created_on DESC LIMIT 0,4';
        } else {
            $sql = 'SELECT * FROM notifications
              WHERE usr_id = :usr_id AND unread="1" ORDER BY created_on DESC';
        }

        $ret = $bloc = array();
        $stmt = $this->appbox->get_connection()->prepare($sql);
        $stmt->execute(array(':usr_id' => $session->get_usr_id()));
        $rs = $stmt->fetchAll(PDO::FETCH_ASSOC);
        $stmt->closeCursor();

        foreach ($rs as $row) {
            $type = 'eventsmanager_' . $row['type'];
            if ( ! isset($this->pool_classes[$type])) {
                continue;
            }
            $datas = $this->pool_classes[$type]->datas($row['datas'], $row['unread']);

            if ( ! isset($this->pool_classes[$type]) || count($datas) === 0) {
                $sql = 'DELETE FROM notifications WHERE id = :id';
                $stmt = $this->appbox->get_connection()->prepare($sql);
                $stmt->execute(array(':id' => $row['id']));
                $stmt->closeCursor();
                continue;
            }

            $ret[] = array_merge(
                $datas
                , array(
                'created_on' => phraseadate::getPrettyString(new DateTime($row['created_on']))
                , 'icon'       => $this->pool_classes[$type]->icon_url()
                , 'id'         => $row['id']
                , 'unread'     => $row['unread']
                )
            );
        }

        $html = '';

        return $ret;
    }

    public function read(Array $notifications, $usr_id)
    {
        if (count($notifications) == 0) {
            return false;
        }

        $sql = 'UPDATE notifications SET unread="0"
            WHERE usr_id = :usr_id
              AND (id="' . implode('" OR id="', $notifications) . '")';

        $stmt = $this->appbox->get_connection()->prepare($sql);
        $stmt->execute(array(':usr_id' => $usr_id));
        $stmt->closeCursor();

        return $this;
    }

    public function mailed($notification, $usr_id)
    {
        $sql = 'UPDATE notifications SET mailed="0"
            WHERE usr_id = :usr_id AND id = :notif_id';

        $stmt = $this->appbox->get_connection()->prepare($sql);
        $stmt->execute(array(':usr_id'   => $usr_id, ':notif_id' => $notifications));
        $stmt->closeCursor();

        return;
    }

    public function list_notifications_available($usr_id)
    {

        $personnal_notifications = array();

        foreach ($this->notifications as $notification) {
            $group = $this->pool_classes[$notification]->get_group();
            $group = $group === null ? _('Notifications globales') : $group;

            $personnal_notifications[$group][] = array(
                'name'             => $this->pool_classes[$notification]->get_name()
                , 'id'               => $notification
                , 'description'      => $this->pool_classes[$notification]->get_description()
                , 'subscribe_emails' => true
            );
        }

        return $personnal_notifications;
    }
}