package ru.bvn13.jircbot.listeners;

import org.pircbotx.hooks.events.MessageEvent;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.stereotype.Component;
import ru.bvn13.jircbot.bot.ImprovedListenerAdapter;
import ru.bvn13.jircbot.bot.JircBot;
import ru.bvn13.jircbot.database.services.ChannelSettingsService;
import ru.bvn13.jircbot.documentation.DescriptionProvided;
import ru.bvn13.jircbot.documentation.DocumentationProvider;
import ru.bvn13.jircbot.documentation.ListenerDescription;
import ru.bvn13.jircbot.services.InternetAccessor;

import java.io.*;
import java.util.ArrayList;
import java.util.List;
import java.util.regex.Matcher;
import java.util.regex.Pattern;

import static ru.bvn13.jircbot.documentation.ListenerDescription.CommandDescription;

/**
 * Created by bvn13 on 23.01.2018.
 */
@Component
public class LinkPreviewListener extends ImprovedListenerAdapter implements DescriptionProvided {

    @Autowired
    private InternetAccessor internetAccessor;

    private static final Pattern REGEX = Pattern.compile("(?i)(?:(?:https?|ftp)://)(?:\\S+(?::\\S*)?@)?(?:(?!(?:10|127)(?:\\.\\d{1,3}){3})(?!(?:169\\.254|192\\.168)(?:\\.\\d{1,3}){2})(?!172\\.(?:1[6-9]|2\\d|3[0-1])(?:\\.\\d{1,3}){2})(?:[1-9]\\d?|1\\d\\d|2[01]\\d|22[0-3])(?:\\.(?:1?\\d{1,2}|2[0-4]\\d|25[0-5])){2}(?:\\.(?:[1-9]\\d?|1\\d\\d|2[0-4]\\d|25[0-4]))|(?:(?:[a-z\\u00a1-\\uffff0-9]-*)*[a-z\\u00a1-\\uffff0-9]+)(?:\\.(?:[a-z\\u00a1-\\uffff0-9]-*)*[a-z\\u00a1-\\uffff0-9]+)*(?:\\.(?:[a-z\\u00a1-\\uffff]{2,}))\\.?)(?::\\d{2,5})?(?:[/?#]\\S*)?");

    @Autowired
    private ChannelSettingsService channelSettingsService;

    @Autowired
    public LinkPreviewListener(DocumentationProvider documentationProvider) {
        registerDescription(documentationProvider);
    }

    @Override
    public ListenerDescription getDescription() {
        return ListenerDescription.create()
                .setModuleName("LinkPreviewListener")
                .setModuleDescription("With this module enabled into <a href='/docs#AdminListener'>Admin module</a> the bot will send the title of every URL found in messages posted in channel")
                ;
    }


    @Override
    public void onMessage(final MessageEvent event) throws Exception {

        if (!channelSettingsService.getChannelSettings(JircBot.extractServer(event.getBot().getServerHostname()), getChannelName(event)).getLinkPreviewEnabled()) {
            return;
        }

        if (event.getUser().getUserId().equals(event.getBot().getUserBot().getUserId())) {
            return;
        }

        List<String> links = findLink(event.getMessage());
        for (String link : links) {
            String info = parseLink(link);
            if (info != null && !info.isEmpty()) {
                //event.respond(info);
                event.getChannel().send().message(info);
            }
        };

    }


    public List<String> findLink(String message) {
        Matcher matcher = REGEX.matcher(message);
        List<String> links = new ArrayList<>();
        while (matcher.find()) {
            links.add(matcher.group());
        }
        return links;
    }


    private String parseLink(String link) throws Exception {
        String content = internetAccessor.retrieveContentByLink(link);

        String encoding = null; //getCharsetFromHeaders(content.toString());
        if (encoding == null) {
            encoding = getCharsetFromBody(content.toString());
        }

        String title = "";

        if (encoding != null && !encoding.isEmpty()) {
            content = internetAccessor.retrieveContentByLinkWithEncoding(link, encoding);
        }

        title = content.substring(content.indexOf("<title>") + 7, content.indexOf("</title>"));

        return "Title: "+title.toString();
    }


    public String decodeTitle_buffered(String title, String encoding) throws IOException {
        ByteArrayOutputStream out = new ByteArrayOutputStream();

        Reader r = new BufferedReader(new InputStreamReader(new ByteArrayInputStream(title.getBytes()), encoding));
        Writer w = new BufferedWriter(new OutputStreamWriter(out, "UTF-8"));

        char[] buffer=new char[4096];
        int len;
        while((len=r.read(buffer)) != -1) {
            w.write(buffer, 0, len);
        }
        r.close();
        w.flush();
        w.close();

        String encodedTitle = out.toString();

        return encodedTitle;
    }

    String decodeTitle(String title, String encoding) throws UnsupportedEncodingException {
        return new String(title.getBytes("UTF-8"), encoding);
    }

    public String getCharsetFromHeaders(String contentType){
        if (contentType != null && contentType.toLowerCase().trim().contains("charset=")){
            String[] parts = contentType.toLowerCase().trim().split("=");
            if (parts.length > 0)
                return parts[1];
        }
        return null;
    }

    public static String getCharsetFromBody(String body) {
        if (body != null) {
            int headEnd = body.toLowerCase().trim().indexOf("</head>");

            // return null if there's no head tags
            if (headEnd == -1)
                return null;

            String body_head = body.toLowerCase().substring(0, headEnd);

            Pattern p = Pattern.compile("charset=([\"\'a-z0-9A-Z-]+)");
            Matcher m = p.matcher(body_head);
            String str_match = "";
            if (m.find()) {
                str_match = m.toMatchResult().group(1);
                return str_match.replaceAll("[\"']", "");
            }
        }
        return null;
    }
}