# -*- coding: utf-8 -*-
# Copyright 2014 OpenMarket Ltd
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
#     http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.


from twisted.internet import defer
from ._base import BaseHandler

from synapse.api.errors import SynapseError
from synapse.http.client import HttpClient
from synapse.api.events.room import RoomAliasesEvent

import logging
import sqlite3


logger = logging.getLogger(__name__)


class DirectoryHandler(BaseHandler):

    def __init__(self, hs):
        super(DirectoryHandler, self).__init__(hs)

        self.federation = hs.get_replication_layer()
        self.federation.register_query_handler(
            "directory", self.on_directory_query
        )

    @defer.inlineCallbacks
    def create_association(self, user_id, room_alias, room_id, servers=None):

        # TODO(erikj): Do auth.

        if not room_alias.is_mine:
            raise SynapseError(400, "Room alias must be local")
            # TODO(erikj): Change this.

        # TODO(erikj): Add transactions.

        # TODO(erikj): Check if there is a current association.

        if not servers:
            servers = yield self.store.get_joined_hosts_for_room(room_id)

        if not servers:
            raise SynapseError(400, "Failed to get server list")

        try:
            yield self.store.create_room_alias_association(
                room_alias,
                room_id,
                servers
            )
        except sqlite3.IntegrityError:
            defer.returnValue("Already exists")

        # TODO: Send the room event.
        yield self._update_room_alias_events(user_id, room_id)

    @defer.inlineCallbacks
    def delete_association(self, user_id, room_alias):
        # TODO Check if server admin

        if not room_alias.is_mine:
            raise SynapseError(400, "Room alias must be local")

        room_id = yield self.store.delete_room_alias(room_alias)

        if room_id:
            yield self._update_room_alias_events(user_id, room_id)

    @defer.inlineCallbacks
    def get_association(self, room_alias):
        room_id = None
        if room_alias.is_mine:
            result = yield self.store.get_association_from_room_alias(
                room_alias
            )

            if result:
                room_id = result.room_id
                servers = result.servers
        else:
            result = yield self.federation.make_query(
                destination=room_alias.domain,
                query_type="directory",
                args={
                    "room_alias": room_alias.to_string(),
                    HttpClient.RETRY_DNS_LOOKUP_FAILURES: False
                }
            )

            if result and "room_id" in result and "servers" in result:
                room_id = result["room_id"]
                servers = result["servers"]

        if not room_id:
            defer.returnValue({})
            return

        extra_servers = yield self.store.get_joined_hosts_for_room(room_id)
        servers = list(set(extra_servers) | set(servers))

        defer.returnValue({
            "room_id": room_id,
            "servers": servers,
        })
        return

    @defer.inlineCallbacks
    def on_directory_query(self, args):
        room_alias = self.hs.parse_roomalias(args["room_alias"])
        if not room_alias.is_mine:
            raise SynapseError(
                400, "Room Alias is not hosted on this Home Server"
            )

        result = yield self.store.get_association_from_room_alias(
            room_alias
        )

        defer.returnValue({
            "room_id": result.room_id,
            "servers": result.servers,
        })

    @defer.inlineCallbacks
    def _update_room_alias_events(self, user_id, room_id):
        aliases = yield self.store.get_aliases_for_room(room_id)

        event = self.event_factory.create_event(
            etype=RoomAliasesEvent.TYPE,
            state_key=self.hs.hostname,
            room_id=room_id,
            user_id=user_id,
            content={"aliases": aliases},
        )

        snapshot = yield self.store.snapshot_room(
            room_id=room_id,
            user_id=user_id,
        )

        yield self.state_handler.handle_new_event(event, snapshot)
        yield self._on_new_room_event(event, snapshot, extra_users=[user_id])