package com.juick.ws;

import com.juick.User;
import com.juick.json.MessageSerializer;
import com.juick.server.SubscriptionsQueries;
import com.juick.xmpp.JID;
import com.juick.xmpp.Message;
import com.juick.xmpp.Stream;
import com.juick.xmpp.StreamComponent;
import com.juick.xmpp.extensions.JuickMessage;
import org.springframework.core.env.Environment;
import org.springframework.jdbc.core.JdbcTemplate;
import org.springframework.stereotype.Component;
import org.springframework.web.socket.TextMessage;

import javax.inject.Inject;
import java.io.IOException;
import java.net.Socket;
import java.util.List;
import java.util.concurrent.ExecutorService;
import java.util.concurrent.Executors;
import java.util.logging.Level;
import java.util.logging.Logger;
import java.util.stream.Collectors;

/**
 *
 * @author ugnich
 */
@Component
public class XMPPConnection implements Runnable, Stream.StreamListener, Message.MessageListener {
    private static final Logger logger = Logger.getLogger(XMPPConnection.class.getName());

    JdbcTemplate sql;
    Stream xmpp;
    String xmppPassword;
    MessageSerializer ms;
    WebsocketComponent ws;
    ExecutorService xmppThreadService = Executors.newSingleThreadExecutor();

    @Inject
    public XMPPConnection(Environment env, WebsocketComponent ws, JdbcTemplate sql) {
        this.sql = sql;
        this.ws = ws;
        xmppPassword = env.getProperty("xmpp_password");
        ms = new MessageSerializer();
        xmppThreadService.submit(this);
    }

    @Override
    public void run() {
        try {
            Socket socket = new Socket("localhost", 5347);
            xmpp = new StreamComponent(new JID("", "ws.juick.com", ""), socket.getInputStream(), socket.getOutputStream(), xmppPassword);
            xmpp.addChildParser(new JuickMessage());
            xmpp.addListener((Stream.StreamListener) this);
            xmpp.addListener((Message.MessageListener) this);
            xmpp.startParsing();
        } catch (IOException e) {
            logger.log(Level.SEVERE, "XMPPConnection error", e);
        }
    }

    @Override
    public void onStreamReady() {
       logger.info("XMPP stream ready");
    }

    @Override
    public void onStreamFail(String msg) {
        logger.severe("XMPP stream failed: " + msg);
    }

    @Override
    public void onMessage(com.juick.xmpp.Message msg) {
        JuickMessage jmsg = (JuickMessage) msg.getChild(JuickMessage.XMLNS);
        if (jmsg != null) {
            logger.info("got jmsg: " + ms.serialize(jmsg).toString());
            if (jmsg.getMID() == 0) {
                int uid_to = 0;
                try {
                    uid_to = Integer.parseInt(msg.to.Username);
                } catch (Exception e) {
                }
                if (uid_to > 0) {
                    onJuickPM(uid_to, jmsg);
                }
            } else if (jmsg.getRID() == 0) {
                onJuickMessagePost(jmsg);
            } else {
                onJuickMessageReply(jmsg);
            }
        }
    }

    MessageSerializer messageSerializer = new MessageSerializer();

    private void onJuickPM(int uid_to, com.juick.Message jmsg) {
        String json = messageSerializer.serialize(jmsg).toString();
        synchronized (ws.clients) {
            ws.clients.stream().filter(c -> !c.legacy && c.visitor.getUID() == uid_to).forEach(c -> {
                try {
                    logger.info("sending pm to " + c.visitor.getUID());
                    c.session.sendMessage(new TextMessage(json));
                } catch (IOException e) {
                    logger.log(Level.WARNING, "ws error", e);
                }
            });
        }
    }

    private void onJuickMessagePost(com.juick.Message jmsg) {
        String json = messageSerializer.serialize(jmsg).toString();
        List<Integer> uids = SubscriptionsQueries.getSubscribedUsers(sql, jmsg.getUser().getUID(), jmsg.getMID())
                .stream().map(User::getUID).collect(Collectors.toList());
        logger.info(String.format("%d users subscribed to %d", uids.size(), jmsg.getUser().getUID()));
        synchronized (ws.clients) {
            Long legacycount = ws.clients.stream().filter(c -> c.legacy && c.allMessages).count();
            logger.info(String.format("%d legacy users watched %d", legacycount, jmsg.getMID()));
            ws.clients.stream().filter(c -> !c.legacy && uids.contains(c.visitor.getUID())).forEach(c -> {
                try {
                    logger.info("sending message to " + c.visitor.getUID());
                    c.session.sendMessage(new TextMessage(json));
                } catch (IOException e) {
                    logger.log(Level.WARNING, "ws error", e);
                }
            });
            ws.clients.stream().filter(c -> c.legacy && c.allMessages).forEach(c -> {
                try {
                    logger.info("sending message to legacy client " + c.visitor.getUID());
                    c.session.sendMessage(new TextMessage(json));
                } catch (IOException e) {
                    logger.log(Level.WARNING, "ws error", e);
                }
            });
        }
    }

    private void onJuickMessageReply(com.juick.Message jmsg) {
        String json = messageSerializer.serialize(jmsg).toString();
        logger.info("got reply: " + json);
        List<Integer> threadUsers =
                SubscriptionsQueries.getUsersSubscribedToComments(sql, jmsg.getMID(), jmsg.getUser().getUID())
                        .stream().map(User::getUID).collect(Collectors.toList());
        logger.info(String.format("%d users subscribed to %d", threadUsers.size(), jmsg.getMID()));
        synchronized (ws.clients) {
            Long legacycount = ws.clients.stream().filter(c -> c.legacy && c.allReplies).count();
            logger.info(String.format("%d legacy users watched %d", legacycount, jmsg.getMID()));
            ws.clients.stream().filter(c -> !c.legacy && threadUsers.contains(c.visitor.getUID())).forEach(c -> {
                try {
                    logger.info("sending reply to " + c.visitor.getUID());
                    c.session.sendMessage(new TextMessage(json));
                } catch (IOException e) {
                    logger.log(Level.WARNING, "ws error", e);
                }
            });
            ws.clients.stream().filter(c -> (c.legacy && c.allReplies) || (c.legacy && c.MID == jmsg.getMID())).forEach(c -> {
                try {
                    logger.info("sending reply to legacy client " + c.visitor.getUID());
                    c.session.sendMessage(new TextMessage(json));
                } catch (IOException e) {
                    logger.log(Level.WARNING, "ws error", e);
                }
            });
        }
    }
}