<?php
namespace daemons;

use \Monolog\Logger;
use \Monolog\Handler\StreamHandler;

/**
 * Phone daemon class
 */
class Phone extends AbstractDaemon
{
    private $msg_queue;
    private $msg_queue_id;
    private $webhook_queue;
    private $last_message_at;
    private $phone;
    private $adapter;
    private $bdd;

    /**
     * Constructor
     * @param array $phone : A phone table entry
     */
    public function __construct(array $phone)
    {
        $this->phone = $phone;
        $this->msg_queue_id = (int) mb_substr($this->phone['number'], 1);
        
        $name = 'RaspiSMS Daemon Phone ' . $this->phone['number'];
        
        $logger = new Logger($name);
        $logger->pushHandler(new StreamHandler(PWD_LOGS . '/raspisms.log', Logger::DEBUG));
        
        $pid_dir = PWD_PID;
        $additional_signals = [];
        $uniq = true; //Main server should be uniq

        //Construct the server and add SIGUSR1 and SIGUSR2
        parent::__construct($name, $logger, $pid_dir, $additional_signals, $uniq);
        
        parent::start();
    }


    public function run()
    {
        //Stop after 5 minutes of inactivity to avoid useless daemon
        if ( (microtime(true) - $this->last_message_at) > 5 * 60 )
        {
            posix_kill(getmypid(), SIGTERM); //Send exit signal to the current process
            return false;
        }
        
        $this->bdd = \descartes\Model::_connect(DATABASE_HOST, DATABASE_NAME, DATABASE_USER, DATABASE_PASSWORD, 'UTF8');
        
        //Send smss in queue
        $this->send_smss();

        //Read received smss
        $this->read_smss();

        usleep(0.5 * 1000000);
    }


    /**
     * Send sms
     */
    private function send_smss ()
    {
        $find_message = true;
        while ($find_message)
        {
            //Call message 
            $msgtype = null;
            $maxsize = 409600;
            $message = null;

            $error_code = null;
            $success = msg_receive($this->msg_queue, QUEUE_TYPE_SEND_MSG, $msgtype, $maxsize, $message, TRUE, MSG_IPC_NOWAIT, $error_code); //MSG_IPC_NOWAIT == dont wait if no message found

            if (!$success && $error_code !== MSG_ENOMSG)
            {
                $this->logger->critical('Error reading MSG SEND Queue, error code : ' . $error);
                return false;
            }

            if (!$message)
            {
                $find_message = false;
                continue;
            }
            
            //Update last message time
            $this->last_message_at = microtime(true);

            $now = new \DateTime();
            $at = $now->format('Y-m-d H:i:s');

            $message['at'] = $at;
            
            $this->logger->info('Try send message : ' . json_encode($message));
            
            $sended_sms_uid = $this->adapter->send($message['destination'], $message['text'], $message['flash']);
            if (!$sended_sms_uid)
            {
                $this->logger->error('Failed send message : ' . json_encode($message));
                $internal_sended->create($at, $message['text'], $message['origin'], $message['destination'], $sended_sms_uid, $this->phone['adapter'], $message['flash'], 'failed');
                continue;
            }

            //Run webhook
            $internal_setting = new \controllers\internals\Setting($this->bdd);
            $user_settings = $internal_setting->gets_for_user($this->phone['id_user']);
            $this->process_for_webhook($message, 'send_sms', $user_settings);

            $this->logger->info('Successfully send message : ' . json_encode($message));

            $internal_sended = new \controllers\internals\Sended($this->bdd);
            $internal_sended->create($at, $message['text'], $message['origin'], $message['destination'], $sended_sms_uid, $this->phone['adapter'], $message['flash']);
        }
    }


    /**
     * Read smss for a number
     */
    private function read_smss ()
    {
        $internal_received = new \controllers\internals\Received($this->bdd);
        $internal_setting = new \controllers\internals\Setting($this->bdd);
        
        $smss = $this->adapter->read();
        if (!$smss)
        {
            return true;
        }

        //Get users settings
        $user_settings = $internal_setting->gets_for_user($this->phone['id_user']);


        //Process smss
        foreach ($smss as $sms)
        {
            $this->logger->info('Receive message : ' . json_encode($sms));

            $command_result = $this->process_for_command($sms);
            $sms['text'] = $command_result['text'];
            $is_command = $command_result['is_command'];

            $this->process_for_webhook($sms, 'receive_sms', $user_settings);

            $internal_received->create($sms['at'], $sms['text'], $sms['origin'], $sms['destination'], 'unread', $is_command);
        }
    }


    /**
     * Process a sms to find if its a command and so execute it
     * @param array $sms : The sms
     * @return array : ['text' => new sms text, 'is_command' => bool]
     */
    private function process_for_command (array $sms)
    {
        $internal_command = new \controllers\internals\Command($this->bdd);
        
        $is_command = false;
        $command = $internal_command->check_for_command($this->phone['id_user'], $sms['text']);
        if ($command)
        {
            $is_command = true;
            $sms['text'] = $command['updated_text'];
            exec($command['command']);
        }

        return ['text' => $sms['text'], 'is_command' => $is_command];
    }


    /**
     * Process a sms to transmit a webhook query to webhook daemon if needed
     * @param array $sms : The sms
     * @param string $webhook_type : Type of webhook to trigger
     * @param array $user_settings : Use settings
     */
    private function process_for_webhook (array $sms, string $webhook_type, array $user_settings)
    {
        if (!$user_settings['webhook'])
        {
            return false;
        }
        
        $internal_webhook = new \controllers\internals\Webhook($this->bdd);
        
        $webhooks = $internal_webhook->gets_for_type_and_user($this->phone['id_user'], $webhook_type);
        foreach ($webhooks as $webhook)
        {
            $message = [
                'url' => $webhook['url'],
                'datas' => [
                    'webhook_type' => $webhook['type'],
                    'at' => $sms['at'],
                    'text' => $sms['text'],
                    'origin' => $sms['origin'],
                    'destination' => $sms['destination'],
                ],
            ];

            $error_code = null;
            $success = msg_send($this->webhook_queue, QUEUE_TYPE_WEBHOOK, $message, TRUE, TRUE, $error_code);
            if (!$success)
            {
                $this->logger->critical("Failed send webhook message in queue, error code : " . $error_code);
            }
        }
    }


    public function on_start()
    {
        //Set last message at to construct time
        $this->last_message_at = microtime(true);
        
        $this->msg_queue = msg_get_queue($this->msg_queue_id);
        $this->webhook_queue = msg_get_queue(QUEUE_ID_WEBHOOK);

        //Instanciate adapter
        $this->adapter = new \adapters\TestAdapter($this->phone['number'], $this->phone['adapter_datas']);

        $this->logger->info("Starting Phone daemon with pid " . getmypid());
    }


    public function on_stop() 
    {
        //Delete queue on daemon close
        $this->logger->info("Closing queue : " . $this->msg_queue_id);
        msg_remove_queue($this->msg_queue);

        $this->logger->info("Stopping Phone daemon with pid " . getmypid ());
    }


    public function handle_other_signals($signal)
    {
        $this->logger->info("Signal not handled by " . $this->name . " Daemon : " . $signal);
    }
}