from datetime import datetime, timedelta, date
from datetime import time as dtime
from adjacent import Client
import logging
import re

from django.core.cache import cache
from django.core.urlresolvers import reverse
from django.db import models, transaction
from django.shortcuts import get_object_or_404
from django.template import RequestContext
from django.template.loader import render_to_string
from django.utils import timezone
from markupfield.fields import MarkupField
from boards import settings

from boards.models import PostImage
from boards.models.base import Viewable
from boards.models.thread import Thread
from boards.utils import datetime_to_epoch

WS_CHANNEL_THREAD = "thread:"

APP_LABEL_BOARDS = 'boards'

CACHE_KEY_PPD = 'ppd'
CACHE_KEY_POST_URL = 'post_url'

POSTS_PER_DAY_RANGE = 7

BAN_REASON_AUTO = 'Auto'

IMAGE_THUMB_SIZE = (200, 150)

TITLE_MAX_LENGTH = 200

DEFAULT_MARKUP_TYPE = 'bbcode'

# TODO This should be removed
NO_IP = '0.0.0.0'

# TODO Real user agent should be saved instead of this
UNKNOWN_UA = ''

REGEX_REPLY = re.compile(r'\[post\](\d+)\[/post\]')

PARAMETER_TRUNCATED = 'truncated'
PARAMETER_TAG = 'tag'
PARAMETER_OFFSET = 'offset'
PARAMETER_DIFF_TYPE = 'type'

DIFF_TYPE_HTML = 'html'
DIFF_TYPE_JSON = 'json'

PREPARSE_PATTERNS = {
        r'>>(\d+)': r'[post]\1[/post]',
        r'>(.+)': r'[quote]\1[/quote]'
}


class PostManager(models.Manager):
    def create_post(self, title, text, image=None, thread=None, ip=NO_IP,
                    tags=None):
        """
        Creates new post
        """

        if not tags:
            tags = []

        posting_time = timezone.now()
        if not thread:
            thread = Thread.objects.create(bump_time=posting_time,
                                           last_edit_time=posting_time)
            new_thread = True
        else:
            thread.bump()
            thread.last_edit_time = posting_time
            if thread.can_bump() and (
                    thread.get_reply_count() >= settings.MAX_POSTS_PER_THREAD):
                thread.bumpable = False
            thread.save()
            new_thread = False

        pre_text = self._preparse_text(text)

        post = self.create(title=title,
                           text=pre_text,
                           pub_time=posting_time,
                           thread_new=thread,
                           poster_ip=ip,
                           poster_user_agent=UNKNOWN_UA,  # TODO Get UA at
                           # last!
                           last_edit_time=posting_time)

        logger = logging.getLogger('boards.post.create')

        logger.info('Created post #{} with title "{}" by {}'.format(
            post.id, post.title, post.poster_ip))

        if image:
            post_image = PostImage.objects.create(image=image)
            post.images.add(post_image)
            logger.info('Created image #{} for post #{}'.format(
                post_image.id, post.id))

        thread.replies.add(post)
        list(map(thread.add_tag, tags))

        if new_thread:
            Thread.objects.process_oldest_threads()
        self.connect_replies(post)

        return post

    def delete_posts_by_ip(self, ip):
        """
        Deletes all posts of the author with same IP
        """

        posts = self.filter(poster_ip=ip)
        for post in posts:
            post.delete()

    def  connect_replies(self, post):
        """
        Connects replies to a post to show them as a reflink map
        """

        for reply_number in re.finditer(REGEX_REPLY, post.text.raw):
            post_id = reply_number.group(1)
            ref_post = self.filter(id=post_id)
            if ref_post.count() > 0:
                referenced_post = ref_post[0]
                referenced_post.referenced_posts.add(post)
                referenced_post.last_edit_time = post.pub_time
                referenced_post.build_refmap()
                referenced_post.save(update_fields=['refmap', 'last_edit_time'])

                referenced_thread = referenced_post.get_thread()
                referenced_thread.last_edit_time = post.pub_time
                referenced_thread.save(update_fields=['last_edit_time'])

    def get_posts_per_day(self):
        """
        Gets average count of posts per day for the last 7 days
        """

        day_end = date.today()
        day_start = day_end - timedelta(POSTS_PER_DAY_RANGE)

        cache_key = CACHE_KEY_PPD + str(day_end)
        ppd = cache.get(cache_key)
        if ppd:
            return ppd

        day_time_start = timezone.make_aware(datetime.combine(
            day_start, dtime()), timezone.get_current_timezone())
        day_time_end = timezone.make_aware(datetime.combine(
            day_end, dtime()), timezone.get_current_timezone())

        posts_per_period = float(self.filter(
            pub_time__lte=day_time_end,
            pub_time__gte=day_time_start).count())

        ppd = posts_per_period / POSTS_PER_DAY_RANGE

        cache.set(cache_key, ppd)
        return ppd

    def _preparse_text(self, text):
        """
        Preparses text to change patterns like '>>' to a proper bbcode
        tags.
        """

        for key, value in PREPARSE_PATTERNS.items():
            text = re.sub(key, value, text)

        return text


class Post(models.Model, Viewable):
    """A post is a message."""

    objects = PostManager()

    class Meta:
        app_label = APP_LABEL_BOARDS
        ordering = ('id',)

    title = models.CharField(max_length=TITLE_MAX_LENGTH)
    pub_time = models.DateTimeField()
    text = MarkupField(default_markup_type=DEFAULT_MARKUP_TYPE,
                       escape_html=False)

    images = models.ManyToManyField(PostImage, null=True, blank=True,
                                    related_name='ip+', db_index=True)

    poster_ip = models.GenericIPAddressField()
    poster_user_agent = models.TextField()

    thread_new = models.ForeignKey('Thread', null=True, default=None,
                                   db_index=True)
    last_edit_time = models.DateTimeField()

    referenced_posts = models.ManyToManyField('Post', symmetrical=False,
                                              null=True,
                                              blank=True, related_name='rfp+',
                                              db_index=True)
    refmap = models.TextField(null=True, blank=True)

    def __str__(self):
        return 'P#{}/{}'.format(self.id, self.title)

    def get_title(self):
        """
        Gets original post title or part of its text.
        """

        title = self.title
        if not title:
            title = self.text.rendered

        return title

    def build_refmap(self):
        """
        Builds a replies map string from replies list. This is a cache to stop
        the server from recalculating the map on every post show.
        """
        map_string = ''

        first = True
        for refpost in self.referenced_posts.all():
            if not first:
                map_string += ', '
            map_string += '<a href="%s">&gt;&gt;%s</a>' % (refpost.get_url(),
                                                           refpost.id)
            first = False

        self.refmap = map_string

    def get_sorted_referenced_posts(self):
        return self.refmap

    def is_referenced(self):
        if not self.refmap:
            return False
        else:
            return len(self.refmap) > 0

    def is_opening(self):
        """
        Checks if this is an opening post or just a reply.
        """

        return self.get_thread().get_opening_post_id() == self.id

    @transaction.atomic
    def add_tag(self, tag):
        edit_time = timezone.now()

        thread = self.get_thread()
        thread.add_tag(tag)
        self.last_edit_time = edit_time
        self.save(update_fields=['last_edit_time'])

        thread.last_edit_time = edit_time
        thread.save(update_fields=['last_edit_time'])

    @transaction.atomic
    def remove_tag(self, tag):
        edit_time = timezone.now()

        thread = self.get_thread()
        thread.remove_tag(tag)
        self.last_edit_time = edit_time
        self.save(update_fields=['last_edit_time'])

        thread.last_edit_time = edit_time
        thread.save(update_fields=['last_edit_time'])

    def get_url(self, thread=None):
        """
        Gets full url to the post.
        """

        cache_key = CACHE_KEY_POST_URL + str(self.id)
        link = cache.get(cache_key)

        if not link:
            if not thread:
                thread = self.get_thread()

            opening_id = thread.get_opening_post_id()

            if self.id != opening_id:
                link = reverse('thread', kwargs={
                    'post_id': opening_id}) + '#' + str(self.id)
            else:
                link = reverse('thread', kwargs={'post_id': self.id})

            cache.set(cache_key, link)

        return link

    def get_thread(self):
        """
        Gets post's thread.
        """

        return self.thread_new

    def get_referenced_posts(self):
        return self.referenced_posts.only('id', 'thread_new')

    def get_text(self):
        return self.text

    def get_view(self, moderator=False, need_open_link=False,
                 truncated=False, *args, **kwargs):
        if 'is_opening' in kwargs:
            is_opening = kwargs['is_opening']
        else:
            is_opening = self.is_opening()

        if 'thread' in kwargs:
            thread = kwargs['thread']
        else:
            thread = self.get_thread()

        if 'can_bump' in kwargs:
            can_bump = kwargs['can_bump']
        else:
            can_bump = thread.can_bump()

        if is_opening:
            opening_post_id = self.id
        else:
            opening_post_id = thread.get_opening_post_id()

        return render_to_string('boards/post.html', {
            'post': self,
            'moderator': moderator,
            'is_opening': is_opening,
            'thread': thread,
            'bumpable': can_bump,
            'need_open_link': need_open_link,
            'truncated': truncated,
            'opening_post_id': opening_post_id,
        })

    def get_first_image(self):
        return self.images.earliest('id')

    def delete(self, using=None):
        """
        Deletes all post images and the post itself. If the post is opening,
        thread with all posts is deleted.
        """

        self.images.all().delete()

        if self.is_opening():
            self.get_thread().delete()
        else:
            thread = self.get_thread()
            thread.last_edit_time = timezone.now()
            thread.save()

            super(Post, self).delete(using)

        logging.getLogger('boards.post.delete').info(
            'Deleted post P#{}/{}'.format(self.id, self.get_title()))

    def get_post_data(self, format_type=DIFF_TYPE_JSON, request=None,
                      include_last_update=False):
        """
        Gets post HTML or JSON data that can be rendered on a page or used by
        API.
        """

        if format_type == DIFF_TYPE_HTML:
            context = RequestContext(request)
            context['post'] = self
            if PARAMETER_TRUNCATED in request.GET:
                context[PARAMETER_TRUNCATED] = True

            # TODO Use dict here
            return render_to_string('boards/api_post.html',
                                    context_instance=context)
        elif format_type == DIFF_TYPE_JSON:
            post_json = {
                'id': self.id,
                'title': self.title,
                'text': self.text.rendered,
                }
            if self.images.exists():
                post_image = self.get_first_image()
                post_json['image'] = post_image.image.url
                post_json['image_preview'] = post_image.image.url_200x150
            if include_last_update:
                post_json['bump_time'] = datetime_to_epoch(
                    self.thread_new.bump_time)
            return post_json

    def send_to_websocket(self, request, recursive=True):
        """
        Sends post HTML data to the thread web socket.
        """

        if not settings.WEBSOCKETS_ENABLED:
            return

        client = Client()

        channel_name = WS_CHANNEL_THREAD + str(self.get_thread().get_opening_post_id())
        client.publish(channel_name, {
            'html': self.get_post_data(
                format_type=DIFF_TYPE_HTML,
                request=request),
            'diff_type': 'added' if recursive else 'updated',
        })
        client.send()

        logger = logging.getLogger('boards.post.websocket')

        logger.info('Sent post #{} to channel {}'.format(self.id, channel_name))

        if recursive:
            for reply_number in re.finditer(REGEX_REPLY, self.text.raw):
                post_id = reply_number.group(1)
                ref_post = Post.objects.filter(id=post_id)[0]

                ref_post.send_to_websocket(request, recursive=False)