# -*- coding: utf-8 -*-

import re

from time import time
from urlparse import urlparse

from pycurl import FOLLOWLOCATION

from pyload.datatype.PyFile import statusMap as _statusMap
from pyload.network.CookieJar import CookieJar
from pyload.network.RequestFactory import getURL
from pyload.plugins.internal.Hoster import Hoster
from pyload.utils import fixup, parseFileSize


#@TODO: Adapt and move to PyFile in 0.4.10
statusMap = {v: k for k, v in _statusMap.iteritems()}


def replace_patterns(string, ruleslist):
    for r in ruleslist:
        rf, rt = r
        string = re.sub(rf, rt, string)
    return string


def set_cookies(cj, cookies):
    for cookie in cookies:
        if isinstance(cookie, tuple) and len(cookie) == 3:
            domain, name, value = cookie
            cj.setCookie(domain, name, value)


def parseHtmlTagAttrValue(attr_name, tag):
    m = re.search(r"%s\s*=\s*([\"']?)((?<=\")[^\"]+|(?<=')[^']+|[^>\s\"'][^>\s]*)\1" % attr_name, tag, re.I)
    return m.group(2) if m else None


def parseHtmlForm(attr_str, html, input_names=None):
    for form in re.finditer(r"(?P<tag><form[^>]*%s[^>]*>)(?P<content>.*?)</?(form|body|html)[^>]*>" % attr_str,
                            html, re.S | re.I):
        inputs = {}
        action = parseHtmlTagAttrValue("action", form.group('tag'))
        for inputtag in re.finditer(r'(<(input|textarea)[^>]*>)([^<]*(?=</\2)|)', form.group('content'), re.S | re.I):
            name = parseHtmlTagAttrValue("name", inputtag.group(1))
            if name:
                value = parseHtmlTagAttrValue("value", inputtag.group(1))
                if not value:
                    inputs[name] = inputtag.group(3) or ''
                else:
                    inputs[name] = value

        if isinstance(input_names, dict):
            # check input attributes
            for key, val in input_names.iteritems():
                if key in inputs:
                    if isinstance(val, basestring) and inputs[key] == val:
                        continue
                    elif isinstance(val, tuple) and inputs[key] in val:
                        continue
                    elif hasattr(val, "search") and re.match(val, inputs[key]):
                        continue
                    break  #: attibute value does not match
                else:
                    break  #: attibute name does not match
            else:
                return action, inputs  #: passed attribute check
        else:
            # no attribute check
            return action, inputs

    return {}, None  #: no matching form found


#: Deprecated
def parseFileInfo(plugin, url="", html=""):
    info = plugin.getInfo(url, html)
    return info['name'], info['size'], info['status'], info['url']


#@TODO: Remove in 0.4.10
def create_getInfo(plugin):
    return lambda urls: [(info['name'], info['size'], info['status'], info['url']) for info in plugin.parseInfo(urls)]


def timestamp():
    return int(time() * 1000)


#@TODO: Move to hoster class in 0.4.10
def _getDirectLink(self, url):
    self.req.http.c.setopt(FOLLOWLOCATION, 0)

    html = self.load(url, ref=True, decode=True)

    self.req.http.c.setopt(FOLLOWLOCATION, 1)

    if self.getInfo(url, html)['status'] is not 2:
        try:
            return re.search(r'Location\s*:\s*(.+)', self.req.http.header, re.I).group(1).rstrip()  #@TODO: Remove .rstrip() in 0.4.10
        except:
            pass


class SimpleHoster(Hoster):
    __name__    = "SimpleHoster"
    __type__    = "hoster"
    __version__ = "0.59"

    __pattern__ = r'^unmatchable$'

    __description__ = """Simple hoster plugin"""
    __license__     = "GPLv3"
    __authors__     = [("zoidberg", "zoidberg@mujmail.cz"),
                       ("stickell", "l.stickell@yahoo.it"),
                       ("Walter Purcaro", "vuolter@gmail.com")]


    """
    Info patterns should be defined by each hoster:

      INFO_PATTERN: (optional) Name and Size of the file
        example: INFO_PATTERN = r'(?P<N>file_name) (?P<S>file_size) (?P<U>size_unit)'
      or
        NAME_PATTERN: (optional) Name that will be set for the file
          example: NAME_PATTERN = r'(?P<N>file_name)'
        SIZE_PATTERN: (optional) Size that will be checked for the file
          example: SIZE_PATTERN = r'(?P<S>file_size) (?P<U>size_unit)'

      OFFLINE_PATTERN: (optional) Check if the file is yet available online
        example: OFFLINE_PATTERN = r'File (deleted|not found)'

      TEMP_OFFLINE_PATTERN: (optional) Check if the file is temporarily offline
        example: TEMP_OFFLINE_PATTERN = r'Server (maintenance|maintainance)'


    Error handling patterns are all optional:

      WAIT_PATTERN: (optional) Detect waiting time
        example: WAIT_PATTERN = r''

      PREMIUM_ONLY_PATTERN: (optional) Check if the file can be downloaded only with a premium account
        example: PREMIUM_ONLY_PATTERN = r'Premium account required'

      ERROR_PATTERN: (optional) Detect any error preventing download
        example: ERROR_PATTERN = r''


    Instead overriding handleFree and handlePremium methods you can define the following patterns for direct download:

      LINK_FREE_PATTERN: (optional) group(1) should be the direct link for free download
        example: LINK_FREE_PATTERN = r'<div class="link"><a href="(.+?)"'

      LINK_PREMIUM_PATTERN: (optional) group(1) should be the direct link for premium download
        example: LINK_PREMIUM_PATTERN = r'<div class="link"><a href="(.+?)"'
    """

    NAME_REPLACEMENTS = [("&#?\w+;", fixup)]
    SIZE_REPLACEMENTS = []
    URL_REPLACEMENTS  = []

    TEXT_ENCODING       = False  #: Set to True or encoding name if encoding value in http header is not correct
    COOKIES             = True   #: or False or list of tuples [(domain, name, value)]
    FORCE_CHECK_TRAFFIC = False  #: Set to True to force checking traffic left for premium account
    CHECK_DIRECT_LINK   = None   #: when None self-set to True if self.account else False
    MULTI_HOSTER        = False  #: Set to True to leech other hoster link
    CONTENT_DISPOSITION = False  #: Set to True to replace file name with content-disposition value in http header


    @classmethod
    def parseInfo(cls, urls):
        for url in urls:
            url = replace_patterns(url, cls.URL_REPLACEMENTS)
            yield cls.getInfo(url)


    @classmethod
    def getInfo(cls, url="", html=""):
        info = {'name': url or _("Unknown"), 'size': 0, 'status': 3, 'url': url}

        if not html:
            if url:
                html = getURL(url, cookies=cls.COOKIES, decode=not cls.TEXT_ENCODING)
                if isinstance(cls.TEXT_ENCODING, basestring):
                    html = unicode(html, cls.TEXT_ENCODING)
            else:
                return info

        online = False

        if hasattr(cls, "OFFLINE_PATTERN") and re.search(cls.OFFLINE_PATTERN, html):
            info['status'] = 1

        elif hasattr(cls, "TEMP_OFFLINE_PATTERN") and re.search(cls.TEMP_OFFLINE_PATTERN, html):
            info['status'] = 6

        else:
            try:
                info.update(re.match(cls.__pattern__, url).groupdict())
            except:
                pass

            for pattern in ("INFO_PATTERN", "NAME_PATTERN", "SIZE_PATTERN"):
                try:
                    attr = getattr(cls, pattern)
                    info.update(re.search(attr, html).groupdict())
                except AttributeError:
                    continue
                else:
                    online = True

        if online:
            info['status'] = 2

            if 'N' in info:
                info['name'] = replace_patterns(info['N'].strip(), cls.NAME_REPLACEMENTS)

            if 'S' in info:
                size = replace_patterns(info['S'] + info['U'] if 'U' in info else info['S'], cls.SIZE_REPLACEMENTS)
                info['size'] = parseFileSize(size)

            elif isinstance(info['size'], basestring):
                unit = info['units'] if 'units' in info else None
                info['size'] = parseFileSize(info['size'], unit)

        return info


    def setup(self):
        self.resumeDownload = self.multiDL = self.premium


    def prepare(self):
        self.info      = {}
        self.link      = ""     #@TODO: Move to hoster class in 0.4.10
        self.directDL  = False  #@TODO: Move to hoster class in 0.4.10
        self.multihost = False  #@TODO: Move to hoster class in 0.4.10

        self.req.setOption("timeout", 120)

        if isinstance(self.COOKIES, list):
            set_cookies(self.req.cj, self.COOKIES)

        if (self.MULTI_HOSTER
            and self.__pattern__ != self.core.pluginManager.hosterPlugins[self.__name__]['pattern']
            and re.match(self.__pattern__, self.pyfile.url) is None):

            self.logInfo("Multi hoster detected")

            if self.account:
                self.multihost = True
                return
            else:
                self.fail(_("Only registered or premium users can use url leech feature"))

        if self.CHECK_DIRECT_LINK is None:
            self.directDL = bool(self.account)

        self.pyfile.url = replace_patterns(self.pyfile.url, self.URL_REPLACEMENTS)


    def preload(self):
        self.html = self.load(self.pyfile.url, cookies=bool(self.COOKIES), decode=not self.TEXT_ENCODING)

        if isinstance(self.TEXT_ENCODING, basestring):
            self.html = unicode(self.html, self.TEXT_ENCODING)


    def process(self, pyfile):
        self.prepare()

        if self.multihost:
            self.logDebug("Looking for leeched download link...")
            self.handleMulti()

        elif self.directDL:
            self.logDebug("Looking for direct download link...")
            self.handleDirect()

        if not self.link:
            self.preload()

            if self.html is None:
                self.fail(_("No html retrieved"))

            self.checkErrors()

            premium_only = 'error' in self.info and self.info['error'] == "premium-only"

            info = self.getInfo(pyfile.url, self.html)
            self._updateInfo(info)

            self.checkNameSize()

            #: Usually premium only pages doesn't show any file information
            if not premium_only:
                self.checkStatus()

            if self.premium and (not self.FORCE_CHECK_TRAFFIC or self.checkTrafficLeft()):
                self.logDebug("Handled as premium download")
                self.handlePremium()

            elif premium_only:
                self.fail(_("Link require a premium account to be handled"))

            else:
                self.logDebug("Handled as free download")
                self.handleFree()

        if self.link:
            self.download(self.link, disposition=self.CONTENT_DISPOSITION)


    def checkErrors(self):
        if hasattr(self, 'WAIT_PATTERN'):
            m = re.search(self.WAIT_PATTERN, self.html)
            if m:
                wait_time = sum([int(v) * {"hr": 3600, "hour": 3600, "min": 60, "sec": 1}[u.lower()] for v, u in
                                 re.findall(r'(\d+)\s*(hr|hour|min|sec)', m, re.I)])
                self.wait(wait_time, False)
                return

        if hasattr(self, 'PREMIUM_ONLY_PATTERN'):
            m = re.search(self.PREMIUM_ONLY_PATTERN, self.html)
            if m:
                self.info['error'] = "premium-only"
                return

        if hasattr(self, 'ERROR_PATTERN'):
            m = re.search(self.ERROR_PATTERN, self.html)
            if m:
                e = self.info['error'] = m.group(1)
                self.error(e)

        self.info.pop('error', None)


    def checkStatus(self):
        status = self.info['status']

        if status is 1:
            self.offline()

        elif status is 6:
            self.tempOffline()

        elif status is not 2:
            self.logInfo(_("File status: %s") % statusMap[status],
                         _("File info: %s")   % self.info)
            self.error(_("No file info retrieved"))


    def checkNameSize(self):
        name = self.info['name']
        size = self.info['size']
        url  = self.info['url']

        if name and name != url:
            self.pyfile.name = name
        else:
            self.pyfile.name = name = self.info['name'] = urlparse(name).path.split('/')[-1]

        if size > 0:
            self.pyfile.size = size
        else:
            size = "Unknown"

        self.logDebug("File name: %s" % name,
                      "File size: %s" % size)


    def checkInfo(self):
        self.checkErrors()

        self._updateInfo(self.getInfo(self.pyfile.url, self.html or ""))

        self.checkNameSize()
        self.checkStatus()


    #: Deprecated
    def getFileInfo(self):
        return self.checkInfo()


    def _updateInfo(self, info):
        self.logDebug(_("File info (before update): %s") % self.info)
        self.info.update(info)
        self.logDebug(_("File info (after update): %s")  % self.info)


    def handleDirect(self):
        self.link = _getDirectLink(self, self.pyfile.url)

        if self.link:
            self.logInfo(_("Direct download link detected"))

            self._updateInfo(self.getInfo(self.pyfile.url))
            self.checkNameSize()

        else:
            self.logDebug(_("Direct download link not found"))


    def handleMulti(self):  #: Multi-hoster handler
        pass


    def handleFree(self):
        if not hasattr(self, 'LINK_FREE_PATTERN'):
            self.fail(_("Free download not implemented"))

        try:
            m = re.search(self.LINK_FREE_PATTERN, self.html)
            if m is None:
                self.error(_("Free download link not found"))

            self.link = m.group(1)

        except Exception, e:
            self.fail(str(e))


    def handlePremium(self):
        if not hasattr(self, 'LINK_PREMIUM_PATTERN'):
            self.fail(_("Premium download not implemented"))

        try:
            m = re.search(self.LINK_PREMIUM_PATTERN, self.html)
            if m is None:
                self.error(_("Premium download link not found"))

            self.link = m.group(1)

        except Exception, e:
            self.fail(str(e))


    def longWait(self, wait_time=None, max_tries=3):
        if wait_time and isinstance(wait_time, (int, long, float)):
            time_str  = "%dh %dm" % divmod(wait_time / 60, 60)
        else:
            wait_time = 900
            time_str  = _("(unknown time)")
            max_tries = 100

        self.logInfo(_("Download limit reached, reconnect or wait %s") % time_str)

        self.setWait(wait_time, True)
        self.wait()
        self.retry(max_tries=max_tries, reason=_("Download limit reached"))


    def parseHtmlForm(self, attr_str='', input_names=None):
        return parseHtmlForm(attr_str, self.html, input_names)


    def checkTrafficLeft(self):
        traffic = self.account.getAccountInfo(self.user, True)['trafficleft']

        if traffic is None:
            return False
        elif traffic == -1:
            return True
        else:
            size = self.pyfile.size / 1024
            self.logInfo(_("Filesize: %i KiB, Traffic left for user %s: %i KiB") % (size, self.user, traffic))
            return size <= traffic


    def error(self, reason="", type="parse"):
        return super(SimpleHoster, self).error(self, reason, type)