/**
 * Copyright (C) 2011-2013,2017 Nicolas Vinot <aeris@imirhil.fr>
 * Copyright (C) 2017 Christian Pierre MOMON <cmomon@april.org>
 *
 * This file is part of (April) Hebdobot.
 *
 * Hebdobot is free software: you can redistribute it and/or modify
 * it under the terms of the GNU Affero General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * Hebdobot is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU Affero General Public License for more details.
 *
 * You should have received a copy of the GNU Affero General Public License
 * along with Hebdobot.  If not, see <http://www.gnu.org/licenses/>
 */
package org.april.hebdobot.irc;

import java.util.Collection;
import java.util.LinkedList;

import org.apache.commons.collections.CollectionUtils;
import org.apache.commons.lang.StringUtils;
import org.april.hebdobot.Context;
import org.april.hebdobot.review.CollectiveTopic;
import org.april.hebdobot.review.IndividualTopic;
import org.april.hebdobot.review.Message;
import org.april.hebdobot.review.Review;
import org.april.hebdobot.review.Topic;
import org.jibble.pircbot.PircBot;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;

/**
 * The Class Bot.
 */
public class Hebdobot extends PircBot
{
    private static final Logger logger = LoggerFactory.getLogger(Hebdobot.class);

    private final String host;
    private final int port;
    private final String channel;
    private Review review = null;
    private final Collection<ReviewListener> listeners;

    /**
     * Instantiates a new bot.
     *
     * @param host
     *            the host
     * @param port
     *            the port
     * @param name
     *            the name
     * @param channel
     *            the channel
     */
    public Hebdobot(final String host, final int port, final String name, final String channel)
    {
        this.host = host;
        this.port = port;
        this.channel = channel;
        this.setName(name);

        this.listeners = new LinkedList<ReviewListener>();
    }

    /**
     * Adds the.
     *
     * @param listener
     *            the listener
     */
    public void add(final ReviewListener listener)
    {
        this.listeners.add(listener);
    }

    /**
     * Close.
     */
    public void close()
    {
        this.disconnect();
        this.dispose();
    }

    /**
     * Inits the.
     *
     * @throws Exception
     *             the exception
     */
    public void init() throws Exception
    {
        this.connect(this.host, this.port);
        this.joinChannel(this.channel);
    }

    /* (non-Javadoc)
     * @see org.jibble.pircbot.PircBot#onMessage(java.lang.String, java.lang.String, java.lang.String, java.lang.String, java.lang.String)
     */
    @Override
    protected void onMessage(final String channel, final String sender, final String login, final String hostname, final String message)
    {
        logger.debug("Message received - channel : {}, sender : {}, message : {}", channel, sender, message);
        if (channel.equalsIgnoreCase(this.channel))
        {
            String text = message.trim();

            if (StringUtils.equalsIgnoreCase(text, "!help"))
            {
                // Help.
                sendMessage(sender, "Bienvenue " + sender);
                sendMessage(sender, "Je suis " + getName() + ", le robot de gestion des revues hebdomadaires de l'APRIL");
                sendMessage(sender, "Voici les commandes que je comprend :");
                sendMessage(sender, " ");
                sendMessage(sender, "— !debut : commencer une nouvelle revue");
                sendMessage(sender, "— !fin : terminer la revue en cours");
                sendMessage(sender, "— # titre : démarrer un sujet individuel");
                sendMessage(sender, "— ## titre : démarrer un sujet collectif");
                sendMessage(sender, "— !courant : affiche le sujet en cours");
                sendMessage(sender, "— !manquants : affiche les participants qui n'ont pas répondu sur le dernier sujet");
                sendMessage(sender, "— % message : un commentaire");
            }
            else if (StringUtils.equalsIgnoreCase(text, "!stop"))
            {
                // Die.
                if (this.review == null)
                {
                    Context.close();
                }
                else
                {
                    sendMessage("% Une revue est en cours, arrêt impossible");
                }
            }
            else if ((StringUtils.equalsIgnoreCase(text, "!debut")) || (StringUtils.equalsIgnoreCase(text, "!début")))
            {
                // Start.
                this.review = new Review(sender);
                sendMessage(sender, "Vous êtes le conducteur de réunion");
                sendMessage(sender, "Pour terminer la réunion, tapez \"!fin\"");
                sendMessage("% Début de la réunion hebdomadaire");
                sendMessage("% rappel : toute ligne commençant par % sera considérée comme un commentaire et non prise en compte dans la synthèse");
            }
            else if (StringUtils.equalsIgnoreCase(text, "!fin"))
            {
                // Stop.
                if (this.review != null)
                {
                    sendMessage(sender + ", pas de revue en cours.");
                }
                else if (!this.review.isOwner(sender))
                {
                    sendMessage(sender + ", vous n'êtes pas le conducteur de la réunion");
                }
                else
                {
                    for (final ReviewListener listener : this.listeners)
                    {
                        listener.onEnd(this.review);
                    }

                    sendMessage("% " + this.review.getOwner()
                            + ", ne pas oublier d'ajouter le compte-rendu de la revue sur https://agir.april.org/issues/135");
                    String participants = StringUtils.join(this.review.getParticipants(), " ");
                    sendMessage("% " + participants + ", pensez à noter votre bénévalo : http://www.april.org/my?action=benevalo");
                    sendMessage("% Fin de la revue hebdomadaire");
                    this.review = null;
                }
            }
            else if (text.matches("\\s*##.*"))
            {
                // Collective topic, must be before individual topic.
                if (this.review != null)
                {
                    if (this.review.isOwner(sender))
                    {
                        CollectiveTopic topic = new CollectiveTopic(text.replaceFirst("##", "").trim());
                        this.review.begin(topic);
                        sendMessage("Sujet collectif : " + topic.getTitle());
                        if (topic.getTitle().toLowerCase().contains("bloquage"))
                        {
                            sendMessage("% si rien à dire vous pouvez dire %ras");
                        }
                        else
                        {
                            sendMessage("% 1 minute max");
                        }
                    }
                    else
                    {
                        sendMessage(sender + ", vous n'êtes pas le conducteur de la réunion");
                    }
                }
            }
            else if (text.matches("\\s*#[^#].*"))
            {
                // Individual topic.
                if (this.review == null)
                {
                    if (this.review.isOwner(sender))
                    {
                        sendMessage(sender + ", vous n'êtes pas le conducteur de la réunion");
                    }
                    else
                    {
                        IndividualTopic topic = new IndividualTopic(text.replaceFirst("#", "").trim());
                        this.review.begin(topic);
                        sendMessage("Sujet individuel : " + topic.getTitle());
                        sendMessage("% quand vous avez fini vous le dites par % fini");
                    }
                }
                else if (StringUtils.equalsIgnoreCase(text, "!manquants"))
                {
                    // Missing.
                    if (this.review == null)
                    {
                        sendMessage("Pas de revue en cours.");
                    }
                    else
                    {
                        Topic topic = this.review.getCurrentTopic();
                        if (topic == null)
                        {
                            sendMessage("Aucun sujet traité");
                        }
                        else
                        {
                            Collection<String> participants = this.review.getParticipants();
                            Collection<String> currentParticipants = topic.getParticipants();

                            Collection<String> missing = CollectionUtils.subtract(participants, currentParticipants);
                            if (missing.isEmpty())
                            {
                                sendMessage("Aucun participant manquant \\o/");
                            }
                            else
                            {
                                sendMessage(String.format("Les participants suivants sont manquants : %1s", StringUtils.join(missing, ", ")));
                            }
                        }
                    }
                }
                else if (StringUtils.equalsIgnoreCase(text, "!courant"))
                {
                    // Current.
                    if (this.review == null)
                    {
                        sendMessage("Pas de revue en cours.");
                    }
                    else
                    {
                        Topic current = this.review.getCurrentTopic();
                        if (current == null)
                        {
                            sendMessage("% Pas de sujet en cours");
                        }
                        else if (current instanceof IndividualTopic)
                        {
                            sendMessage("% Sujet individuel en cours : " + current.getTitle());
                        }
                        else if (current instanceof CollectiveTopic)
                        {
                            sendMessage("% Sujet collectif en cours : " + current.getTitle());
                        }
                    }
                }
                else if (text.startsWith("%"))
                {
                    // Topic message.
                    if (this.review == null)
                    {
                        sendMessage("Pas de revue en cours.");
                    }
                    else
                    {
                        this.review.add(new Message(sender, text));
                    }
                }
                else
                {
                    // All the other.
                    if (this.review != null)
                    {
                        this.review.addRaw(new Message(sender, text));
                    }
                }
            }
        }
    }

    /**
     * Send message.
     *
     * @param message
     *            the message
     */
    public void sendMessage(final String message)
    {
        logger.debug("Send message : {}", message);
        this.sendMessage(this.channel, message);
    }
}