/*
 * Juick
 * Copyright (C) 2008-2011, Ugnich Anton
 *
 * This program 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.
 *
 * This program 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 this program.  If not, see <http://www.gnu.org/licenses/>.
 */
package com.juick.http.www;

import com.alibaba.fastjson.JSONArray;
import com.juick.JuickApplication;
import com.juick.Tag;
import com.juick.server.*;
import com.juick.xmpp.JID;
import com.juick.xmpp.Message;
import com.juick.xmpp.Stream;
import com.juick.xmpp.extensions.JuickMessage;
import com.juick.xmpp.extensions.JuickUser;
import com.juick.xmpp.extensions.Nickname;
import com.juick.xmpp.extensions.XOOB;
import org.springframework.jdbc.core.JdbcTemplate;

import javax.servlet.ServletException;
import javax.servlet.http.HttpServletRequest;
import javax.servlet.http.HttpServletResponse;
import java.io.IOException;
import java.io.PrintWriter;
import java.io.UnsupportedEncodingException;
import java.net.URL;
import java.net.URLEncoder;
import java.util.ArrayList;
import java.util.List;
import java.util.logging.Logger;

/**
 *
 * @author Ugnich Anton
 */
public class NewMessage {

    private static final Logger logger = Logger.getLogger(NewMessage.class.getName());

    JuickApplication app;
    JdbcTemplate sql;
    Stream xmpp;

    public NewMessage(JuickApplication application) {
        this.app = application;
        this.sql = application.getSql();
        this.xmpp = application.getRouter();
    }

    protected void doGetNewMessage(HttpServletRequest request, HttpServletResponse response, com.juick.User visitor) throws ServletException, IOException {
        response.setContentType("text/html; charset=UTF-8");
        try (PrintWriter out = response.getWriter()) {
            PageTemplates.pageHead(out, "Написать", "<script src=\"//maps.google.com/maps?file=api&amp;v=2&amp;sensor=false&amp;key=ABQIAAAAVVtPtxkw4soCEHg44FsNChRB4OFYjAXt73He16Zkp6a_0tPs2RTU6i6UlcMs4QvPBYvIY8rWvcxqOg\" type=\"text/javascript\"></script>"
                    + "<script src=\"//static.juick.com/mc.js\" type=\"text/javascript\" defer=\"defer\"></script>"
                    + "<script src=\"//static.juick.com/maps.js?2010111500\" type=\"text/javascript\" defer=\"defer\"></script>"
                    + "<script src=\"//static.juick.com/post3.js\" type=\"text/javascript\" defer=\"defer\"></script>");
            PageTemplates.pageNavigation(out, visitor, null);

            out.println("<section id=\"content\" class=\"pagetext\">");
            out.println("<form action=\"/post2\" method=\"post\" id=\"postmsg\" enctype=\"multipart/form-data\">");
            out.println("<p style=\"text-align: left\"><b>Место: <span id=\"location\"></span></b> <span id=\"locationclear\">&mdash; <a href=\"#\" onclick=\"clearLocation()\">Отменить</a></span></p>");
            out.println("<p style=\"text-align: left\"><b>Фото:</b> <span id=\"attachmentfile\"><input type=\"file\" name=\"attach\"/> <i>(JPG, PNG, до 10Мб)</i></span></p>");

            String body = request.getParameter("body");
            if (body == null) {
                body = "";
            } else {
                if (body.length() > 4096) {
                    body = body.substring(0, 4096);
                }
                body = Utils.encodeHTML(body);
            }
            out.println("<p><textarea name=\"body\" class=\"newmessage\" rows=\"7\" cols=\"10\">" + body + "</textarea><br/>");

            out.println("<input type=\"hidden\" name=\"place_id\"/>" + "" + "<input type=\"submit\" class=\"subm\" value=\"   Отправить   \"/></p>");
            out.println("</form>");
            out.println("<div id=\"geomap\"></div>");
            out.println("<p style=\"text-align: left\"><b>Теги:</b></p>");
            printUserTags(out, visitor);
            out.println("</section>");

            PageTemplates.pageFooter(request, out, visitor, false);
            PageTemplates.pageEnd(out);
        }
    }

    void printUserTags(PrintWriter out, com.juick.User visitor) {
        List<Tag> tags = TagQueries.getUserTagsAll(sql, visitor.getUID());

        if (tags.isEmpty()) {
            return;
        }

        int min = tags.get(0).UsageCnt;
        int max = tags.get(0).UsageCnt;
        for (int i = 1; i < tags.size(); i++) {
            int usagecnt = tags.get(i).UsageCnt;
            if (usagecnt < min) {
                min = usagecnt;
            }
            if (usagecnt > max) {
                max = usagecnt;
            }
        }
        max -= min;

        out.print("<p style=\"text-align: justify\">");
        for (int i = 0; i < tags.size(); i++) {
            if (i > 0) {
                out.print(" ");
            }
            String taglink = "";
            try {
                taglink = "<a onclick=\"return addTag('" + Utils.encodeHTML(tags.get(i).Name) + "')\" href=\"/" + visitor.getUName() + "/?tag=" + URLEncoder.encode(tags.get(i).Name, "utf-8") + "\" title=\"" + tags.get(i).UsageCnt + "\">" + Utils.encodeHTML(tags.get(i).Name) + "</a>";
            } catch (UnsupportedEncodingException e) {
            }
            int usagecnt = tags.get(i).UsageCnt;
            if (usagecnt <= max / 5 + min) {
                out.print("<span style=\"font-size: small\">" + taglink + "</span>");
            } else if (usagecnt <= max / 5 * 2 + min) {
                out.print(taglink);
            } else if (usagecnt <= max / 5 * 3 + min) {
                out.print("<span style=\"font-size: large\">" + taglink + "</span>");
            } else if (usagecnt <= max / 5 * 4 + min) {
                out.print("<span style=\"font-size: x-large\">" + taglink + "</span>");
            } else {
                out.print("<span style=\"font-size: xx-large\">" + taglink + "</span>");
            }
        }
        out.println("</p>");
    }

    public void doPostMessage(HttpServletRequest request, HttpServletResponse response,
                              com.juick.User visitor) throws ServletException, IOException {
        String body = request.getParameter("body");
        if (body == null || body.length() < 1 || body.length() > 4096) {
            response.sendError(400);
            return;
        }
        body = body.replace("\r", "");

        String tagsStr = request.getParameter("tags");
        List<com.juick.Tag> tags = new ArrayList<>();
        String tagsArr[] = new String[1];
        if (tagsStr != null && !tagsStr.isEmpty()) {
            if (tagsStr.startsWith("[")) {
                // new json tags format with auto-completion
                JSONArray parse = (JSONArray)JSONArray.parse(tagsStr);
                ArrayList<String> tagsList = new ArrayList<>();
                for(int i=0; i<parse.size(); i++) {
                    if (parse.get(i) instanceof String) {
                        tagsList.add(parse.getString(i));
                    }
                }
                tagsArr = tagsList.toArray(new String[tagsList.size()]);
            } else {
                tagsArr = tagsStr.split("[ \\,]");
                for (int i = 0; i < tagsArr.length; i++) {
                    if (tagsArr[i].startsWith("*")) {
                        tagsArr[i] = tagsArr[i].substring(1);
                    }
                    if (tagsArr[i].length() > 64) {
                        tagsArr[i] = tagsArr[i].substring(0, 64);
                    }
                }
            }
            tags = TagQueries.getTags(sql, tagsArr, true);
            while (tags.size() > 5) {
                tags.remove(5);
            }
        }

        String attachmentFName = null;
        try {
            attachmentFName = Utils.receiveMultiPartFile(request, "attach");
        } catch (Exception e) {
            System.out.println("MULTIPART ERROR: " + e.toString());
            response.sendError(400);
            return;
        }

        String paramImg = request.getParameter("img");
        if (attachmentFName == null && paramImg != null && paramImg.length() > 10 ) {
            try {
                URL imgUrl = new URL(paramImg);
                attachmentFName = Utils.downloadImage(imgUrl);
            } catch (Exception e) {
                System.out.println("DOWNLOAD ERROR: " + e.toString());
                response.sendError(500);
                return;
            }
        }

        String attachmentType = attachmentFName != null ? attachmentFName.substring(attachmentFName.length() - 3) : null;
        int mid = MessagesQueries.createMessage(sql, visitor.getUID(), body, attachmentType, tags);
        SubscriptionsQueries.subscribeMessage(sql, mid, visitor.getUID());

        Message xmsg = new Message();
        xmsg.from = new JID("juick", "juick.com", null);
        xmsg.type = Message.Type.chat;
        xmsg.thread = "juick-" + mid;

        JuickMessage jmsg = new JuickMessage(MessagesQueries.getMessage(sql, mid));
        xmsg.addChild(jmsg);

        Nickname nick = new Nickname();
        nick.Nickname = "@" + jmsg.getUser().getUName();
        xmsg.addChild(nick);

        if (attachmentFName != null) {
            String fname = mid + "." + attachmentType;
            String attachmentURL = "http://i.juick.com/photos-1024/" + fname;

            Runtime.getRuntime().exec("/var/www/juick.com/cgi/p-convert.sh /var/www/juick.com/i/tmp/" + attachmentFName + " " + fname);

            body = attachmentURL + "\n" + body;
            XOOB xoob = new XOOB();
            xoob.URL = attachmentURL;
            xmsg.addChild(xoob);
        }
        String tagsStr2 = "";
        for (String tag : tagsArr) {
            tagsStr2 += " *" + tag;
        }
        xmsg.body = "@" + jmsg.getUser().getUName() + ":" + tagsStr2 + "\n" + body + "\n\n#" + mid + " http://juick.com/" + mid;

        xmsg.to = new JID("juick", "s2s.juick.com", null);
        app.push(xmsg);

        xmsg.to.Host = "push.juick.com";
        app.push(xmsg);

        xmsg.to.Host = "crosspost.juick.com";
        xmsg.to.Username = "twitter";
        app.push(xmsg);
        xmsg.to.Username = "fb";
        app.push(xmsg);

        xmsg.to.Host = "nologin.ru";
        xmsg.to.Username = "jubo";
        app.push(xmsg);
        if (xmpp != null) {
            xmsg.to.Host = "ws.juick.com";
            xmpp.send(xmsg);
        } else {
            logger.warning("XMPP is not available, websockets will not be notified");
        }

        response.setContentType("text/html; charset=UTF-8");
        try (PrintWriter out = response.getWriter()) {
            PageTemplates.pageHead(out, "Сообщение опубликовано", null);
            PageTemplates.pageNavigation(out, visitor, null);
            PageTemplates.pageHomeColumn(out, sql, visitor);

            String hashtags = "";
            String tagscomma = "";
            for (int i = 0; i < tagsArr.length; i++) {
                if (i > 0) {
                    hashtags += " ";
                    tagscomma += ",";
                }
                hashtags += "#" + tagsArr[i];
                tagscomma += tagsArr[i];
            }

            String url = URLEncoder.encode("http://juick.com/" + mid, "utf-8");
            String sharetwi = hashtags + " " + body;
            if (sharetwi.length() > 115) {
                sharetwi = sharetwi.substring(0, 114) + "…";
            }
            sharetwi += " http://juick.com/" + mid;
            String sharelj = URLEncoder.encode(body + "\n", "utf-8") + url;

            out.println("<section id=\"content\">");
            out.println("<h1>Сообщение опубликовано</h1>");
            out.println("<p>Поделитесь своим новым постом в социальных сетях:</p>");
            if (CrosspostQueries.getTwitterTokens(sql, visitor.getUID()) == null) {
                out.println("<p><a href=\"https://twitter.com/intent/tweet?text=" + URLEncoder.encode(sharetwi, "utf-8") + "\" onclick=\"return openSocialWindow(this)\" class=\"ico32-twi sharenew\">Отправить в Twitter</a></p>");
            }
            out.println("<p><a href=\"http://www.livejournal.com/update.bml?subject=" + URLEncoder.encode(hashtags, "utf-8") + "&event=" + sharelj + "&prop_taglist=" + URLEncoder.encode(tagscomma, "utf-8") + "\" target=\"_blank\" class=\"ico32-lj sharenew\">Отправить в LiveJournal</a></p>");
            out.println("<p><a href=\"https://vk.com/share.php?url=" + url + "\" onclick=\"return openSocialWindow(this)\" class=\"ico32-vk sharenew\">Отправить в ВКонтакте</a></p>");
            if (CrosspostQueries.getFacebookToken(sql, visitor.getUID()) == null) {
                out.println("<p><a href=\"https://www.facebook.com/sharer/sharer.php?u=" + url + "\" onclick=\"return openSocialWindow(this)\" class=\"ico32-fb sharenew\">Отправить в Facebook</a></p>");
            }
            out.println("<p><a href=\"https://plus.google.com/share?url=" + url + "\" onclick=\"return openSocialWindow(this)\" class=\"ico32-gp sharenew\">Отправить в Google+</a></p>");
            out.println("<p>Ссылка на сообщение: <a href=\"http://"+ Endpoints.wwwJuickCom+"/" + mid + "\">http://"+Endpoints.wwwJuickCom+"/" + mid + "</a></p>");
            out.println("</section>");

            PageTemplates.pageFooter(request, out, visitor, false);
            PageTemplates.pageEnd(out);
        }
    }

    public void doPostComment(HttpServletRequest request, HttpServletResponse response,
                              com.juick.User visitor) throws ServletException, IOException {
        int mid = Utils.parseInt(request.getParameter("mid"), 0);
        if (mid == 0) {
            response.sendError(400);
            return;
        }
        com.juick.Message msg = MessagesQueries.getMessage(sql, mid);
        if (msg == null) {
            response.sendError(404);
            return;
        }

        int rid = Utils.parseInt(request.getParameter("rid"), 0);
        com.juick.Message reply = null;
        if (rid > 0) {
            reply = MessagesQueries.getReply(sql, mid, rid);
            if (reply == null) {
                response.sendError(404);
                return;
            }
        }

        String body = request.getParameter("body");
        if (body == null || body.length() < 1 || body.length() > 4096) {
            response.sendError(400);
            return;
        }
        body = body.replace("\r", "");

        if ((msg.ReadOnly && msg.getUser().getUID() != visitor.getUID()) || UserQueries.isInBLAny(sql, msg.getUser().getUID(), visitor.getUID()) || (reply != null && UserQueries.isInBLAny(sql, reply.getUser().getUID(), visitor.getUID()))) {
            response.sendError(403);
            return;
        }

        String attachmentFName = null;
        try {
            attachmentFName = Utils.receiveMultiPartFile(request, "attach");
        } catch (Exception e) {
            System.out.println("MULTIPART ERROR: " + e.toString());
            response.sendError(400);
            return;
        }

        String paramImg = request.getParameter("img");
        if (attachmentFName == null && paramImg != null && paramImg.length() > 10) {
            try {
                attachmentFName = Utils.downloadImage(new URL(paramImg));
            } catch (Exception e) {
                System.out.println("DOWNLOAD ERROR: " + e.toString());
                response.sendError(500);
                return;
            }
        }

        String attachmentType = attachmentFName != null ? attachmentFName.substring(attachmentFName.length() - 3) : null;
        int ridnew = MessagesQueries.createReply(sql, mid, rid, visitor.getUID(), body, attachmentType);
        SubscriptionsQueries.subscribeMessage(sql, mid, visitor.getUID());

        Message xmsg = new Message();
        xmsg.from = new JID("juick", "juick.com", null);
        xmsg.type = Message.Type.chat;
        xmsg.thread = "juick-" + mid;

        JuickMessage jmsg = new JuickMessage(MessagesQueries.getReply(sql, mid, ridnew));
        xmsg.addChild(jmsg);

        String quote = reply != null ? reply.getText() : msg.getText();
        if (quote.length() >= 50) {
            quote = quote.substring(0, 47) + "...";
        }

        Nickname nick = new Nickname();
        nick.Nickname = "@" + jmsg.getUser().getUName();
        xmsg.addChild(nick);

        if (attachmentFName != null) {
            String fname = mid + "-" + ridnew + "." + attachmentType;
            String attachmentURL = "http://i.juick.com/photos-1024/" + fname;

            Runtime.getRuntime().exec("/var/www/juick.com/cgi/p-convert.sh /var/www/juick.com/i/tmp/" + attachmentFName + " " + fname);

            body = attachmentURL + "\n" + body;
            XOOB xoob = new XOOB();
            xoob.URL = attachmentURL;
            xmsg.addChild(xoob);
        }


        xmsg.body = "Reply by @" + jmsg.getUser().getUName() + ":\n>" + quote + "\n" + body + "\n\n#" + mid + "/" + ridnew + " http://juick.com/" + mid + "#" + ridnew;

        xmsg.to = new JID("juick", "s2s.juick.com", null);
        app.push(xmsg);
        xmsg.to.Host = "push.juick.com";
        app.push(xmsg);

        if (xmpp != null) {
            xmsg.to.Host = "ws.juick.com";
            xmpp.send(xmsg);
        } else {
            logger.warning("XMPP is not available, websockets will not be notified");
        }

        Utils.sendTemporaryRedirect(response, "/" + msg.getUser().getUName() + "/" + mid + "#" + ridnew);
    }

    public void doPostRecomm(HttpServletRequest request, HttpServletResponse response,
                             com.juick.User visitor) throws ServletException, IOException {
        int mid = Utils.parseInt(request.getParameter("mid"), 0);
        if (mid == 0) {
            response.sendError(400);
            return;
        }
        com.juick.Message msg = MessagesQueries.getMessage(sql, mid);
        if (msg == null) {
            response.sendError(404);
            return;
        }
        if (msg.getUser().getUID() == visitor.getUID()) {
            response.sendError(403);
            return;
        }

        boolean res = MessagesQueries.recommendMessage(sql, mid, visitor.getUID());

        if (res) {
            Message xmsg = new Message();
            xmsg.to = new JID("recomm", "s2s.juick.com", null);
            JuickMessage jmsg = new JuickMessage();
            jmsg.setMID(mid);
            jmsg.setUser(new JuickUser(visitor));
            xmsg.addChild(jmsg);
            app.push(xmsg);

            Utils.replyJSON(request, response, "{\"status\":\"ok\"}");
        } else {
            response.sendError(500);
        }
    }
}