<?php
/* For licensing terms, see /license.txt */

use ChamiloSession as Session;

/**
 * Class Chat
 * @todo ChamiloSession instead of $_SESSION
 * @package chamilo.library.chat
 */
class Chat extends Model
{
    public $table;
    public $columns = array(
        'id',
        'from_user',
        'to_user',
        'message',
        'sent',
        'recd',
    );
    public $window_list = array();

    /**
     * The contructor sets the chat table name and the window_list attribute
     */
    public function __construct()
    {
        parent::__construct();
        $this->table = Database::get_main_table(TABLE_MAIN_CHAT);
        $this->window_list = Session::read('window_list');
        Session::write('window_list', $this->window_list);
    }

    /**
     * Get user chat status
     * @return int 0 if disconnected, 1 if connected
     */
    public function get_user_status()
    {
        $status = UserManager::get_extra_user_data_by_field(
            api_get_user_id(),
            'user_chat_status',
            false,
            true
        );

        return $status['user_chat_status'];
    }

    /**
    * Set user chat status
    * @param int 0 if disconnected, 1 if connected
    * @param integer $status
     *
    * @return void
    */
    public function setUserStatus($status)
    {
        UserManager::update_extra_field_value(api_get_user_id(), 'user_chat_status', $status);
    }

    /**
     * Starts a chat session and returns JSON array of status and chat history
     * @return void (prints output in JSON format)
     */
    public function startSession()
    {
        $items = array();
        if (isset($_SESSION['chatHistory'])) {
            $items = $_SESSION['chatHistory'];
        }
        $return = array(
            'user_status' => $this->get_user_status(),
            'me' => get_lang('Me'),
            'items' => $items
        );
        echo json_encode($return);
        exit;
    }

    /**
     * Refreshes the chat windows (usually called every x seconds through AJAX)
     * @return void (prints JSON array of chat windows)
     */
    public function heartbeat()
    {
        $to_user_id = api_get_user_id();

        $sql = "SELECT * FROM ".$this->table."
                WHERE to_user = '".intval($to_user_id)."' AND ( recd  = 0 )
                ORDER BY id ASC";
        $result = Database::query($sql);

        $chat_list = array();

        while ($chat = Database::fetch_array($result, 'ASSOC')) {
            $chat_list[$chat['from_user']]['items'][] = $chat;
        }

        $items = array();
        foreach ($chat_list as $from_user_id => $rows) {
            $rows = $rows['items'];
            $user_info = api_get_user_info($from_user_id, true);

            //Cleaning tsChatBoxes
            unset($_SESSION['tsChatBoxes'][$from_user_id]);

            foreach ($rows as $chat) {
                $chat['message'] = Security::remove_XSS($chat['message']);

                $item = array(
                    's' => '0',
                    'f' => $from_user_id,
                    'm' => $chat['message'],
                    'username' => $user_info['complete_name'],
                    'id' => $chat['id']
                );
                $items[$from_user_id]['items'][] = $item;
                $items[$from_user_id]['user_info']['user_name'] = $user_info['complete_name'];
                $items[$from_user_id]['user_info']['online'] = $user_info['user_is_online'];
                $items[$from_user_id]['user_info']['avatar'] = $user_info['avatar_small'];
                $_SESSION['openChatBoxes'][$from_user_id] = api_strtotime($chat['sent'], 'UTC');
            }
            $_SESSION['chatHistory'][$from_user_id]['items'][] = $item;
            $_SESSION['chatHistory'][$from_user_id]['user_info']['user_name'] = $user_info['complete_name'];
            $_SESSION['chatHistory'][$from_user_id]['user_info']['online'] = $user_info['user_is_online'];
            $_SESSION['chatHistory'][$from_user_id]['user_info']['avatar'] = $user_info['avatar_small'];
        }

        if (!empty($_SESSION['openChatBoxes'])) {
            foreach ($_SESSION['openChatBoxes'] as $user_id => $time) {
                if (!isset($_SESSION['tsChatBoxes'][$user_id])) {
                    $now = time() - $time;
                    $time = api_convert_and_format_date($time, DATE_TIME_FORMAT_SHORT_TIME_FIRST);
                    $message = sprintf(get_lang('SentAtX'), $time);

                    if ($now > 180) {
                        $item = array('s' => '2', 'f' => $user_id, 'm' => $message);

                        if (isset($_SESSION['chatHistory'][$user_id])) {
                            $_SESSION['chatHistory'][$user_id]['items'][] = $item;
                        }
                        $_SESSION['tsChatBoxes'][$user_id] = 1;
                    }
                }
            }
        }

        $sql = "UPDATE ".$this->table." SET recd = 1
                WHERE to_user = '".$to_user_id."' AND recd = 0";
        Database::query($sql);

        echo json_encode(array('items' => $items));
    }

    /**
    * Returns an array of messages inside a chat session with a specific user
    * @param int The ID of the user with whom the current user is chatting
    * @return array Messages list
    */
    public function box_session($user_id)
    {
        $items = array();
        if (isset($_SESSION['chatHistory'][$user_id])) {
            $items = $_SESSION['chatHistory'][$user_id];
        }

        return $items;
    }

    /**
     * Saves into session the fact that a chat window exists with the given user
     * @param int The ID of the user with whom the current user is chatting
     * @param integer $user_id
     * @return void
     */
    public function save_window($user_id)
    {
        $this->window_list[$user_id] = true;
        Session::write('window_list', $this->window_list);
    }

    /**
     * Sends a message from one user to another user
     * @param int $from_user_id The ID of the user sending the message
     * @param int $to_user_id The ID of the user receiving the message
     * @param string $message Message
     * @param boolean $printResult Optional. Whether print the result
     * @param boolean $sanitize Optional. Whether sanitize the message
     *
     * @return void Prints "1"
     */
    public function send(
        $from_user_id,
        $to_user_id,
        $message,
        $printResult = true,
        $sanitize = true
    ) {
        $user_friend_relation = SocialManager::get_relation_between_contacts(
            $from_user_id,
            $to_user_id
        );

        if ($user_friend_relation == USER_RELATION_TYPE_FRIEND) {
            $user_info = api_get_user_info($to_user_id, true);
            $this->save_window($to_user_id);

            $_SESSION['openChatBoxes'][$to_user_id] = api_get_utc_datetime();

            if ($sanitize) {
                $messagesan = self::sanitize($message);
            } else {
                $messagesan = $message;
            }

            if (!isset($_SESSION['chatHistory'][$to_user_id])) {
                $_SESSION['chatHistory'][$to_user_id] = array();
            }
            $item = array(
                "s" => "1",
                "f" => $from_user_id,
                "m" => $messagesan,
                "username" => get_lang('Me')
            );
            $_SESSION['chatHistory'][$to_user_id]['items'][] = $item;
            $_SESSION['chatHistory'][$to_user_id]['user_info']['user_name'] = $user_info['complete_name'];
            $_SESSION['chatHistory'][$to_user_id]['user_info']['online'] = $user_info['user_is_online'];
            $_SESSION['chatHistory'][$to_user_id]['user_info']['avatar'] = $user_info['avatar_small'];

            unset($_SESSION['tsChatBoxes'][$to_user_id]);

            $params = array();
            $params['from_user'] = intval($from_user_id);
            $params['to_user'] = intval($to_user_id);
            $params['message'] = $message;
            $params['sent'] = api_get_utc_datetime();

            if (!empty($from_user_id) && !empty($to_user_id)) {
                $this->save($params);
            }

            if ($printResult) {
                echo "1";
                exit;
            }
        } else {
            if ($printResult) {
                echo "0";
                exit;
            }
        }
    }

    /**
     * Close a specific chat box (user ID taken from $_POST['chatbox'])
     * @return void Prints "1"
     */
    public function close()
    {
        unset($_SESSION['openChatBoxes'][$_POST['chatbox']]);
        unset($_SESSION['chatHistory'][$_POST['chatbox']]);
        echo "1";
        exit;
    }

    /**
     * Filter chat messages to avoid XSS or other JS
     * @param string $text Unfiltered message
     *
     * @return string Filterd mssage
     */
    public function sanitize($text)
    {
        $text = htmlspecialchars($text, ENT_QUOTES);
        $text = str_replace("\n\r", "\n", $text);
        $text = str_replace("\r\n", "\n", $text);
        $text = str_replace("\n", "<br>", $text);

        return $text;
    }

    /**
     * SET Disable Chat
     * @param boolean status to disable chat
     * @return void
     */
    public static function setDisableChat($status = true)
    {
        Session::write('disable_chat', $status);
    }

    /**
     * Disable Chat - disable the chat
     * @return boolean - return true if setDisableChat status is true
     */
    public static function disableChat()
    {
        $status = Session::read('disable_chat');
        if (!empty($status)) {
            if ($status == true) {
                Session::write('disable_chat', null);
                return true;
            }
        }

         return false;
    }

    /**
     * @return bool
     */
    public function is_chat_blocked_by_exercises()
    {
        $currentExercises = Session::read('current_exercises');
        if (!empty($currentExercises)) {
            foreach ($currentExercises as $attempt_status) {
                if ($attempt_status == true) {
                    return true;
                }
            }
        }

        return false;
    }
}