# mautrix-signal - A Matrix-Signal puppeting bridge
# Copyright (C) 2020 Tulir Asokan
#
# 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 <https://www.gnu.org/licenses/>.
from typing import Optional, ClassVar, List, TYPE_CHECKING
from uuid import UUID

from attr import dataclass
from yarl import URL
import asyncpg

from mausignald.types import Address
from mautrix.types import UserID, SyncToken, ContentURI
from mautrix.util.async_db import Database

fake_db = Database("") if TYPE_CHECKING else None


@dataclass
class Puppet:
    db: ClassVar[Database] = fake_db

    uuid: Optional[UUID]
    number: Optional[str]
    name: Optional[str]
    avatar_hash: Optional[str]
    avatar_url: Optional[ContentURI]
    name_set: bool
    avatar_set: bool

    uuid_registered: bool
    number_registered: bool

    custom_mxid: Optional[UserID]
    access_token: Optional[str]
    next_batch: Optional[SyncToken]
    base_url: Optional[URL]

    @property
    def _base_url_str(self) -> Optional[str]:
        return str(self.base_url) if self.base_url else None

    async def insert(self) -> None:
        q = ("INSERT INTO puppet (uuid, number, name, avatar_hash, avatar_url, name_set, "
             "                    avatar_set, uuid_registered, number_registered, "
             "                    custom_mxid, access_token, next_batch, base_url) "
             "VALUES ($1, $2, $3, $4, $5, $6, $7, $8, $9, $10, $11, $12, $13)")
        await self.db.execute(q, self.uuid, self.number, self.name, self.avatar_hash,
                              self.avatar_url, self.name_set, self.avatar_set,
                              self.uuid_registered, self.number_registered, self.custom_mxid,
                              self.access_token, self.next_batch, self._base_url_str)

    async def _set_uuid(self, uuid: UUID) -> None:
        if self.uuid:
            raise ValueError("Can't re-set UUID for puppet")
        self.uuid = uuid
        async with self.db.acquire() as conn, conn.transaction():
            await conn.execute("UPDATE puppet SET uuid=$1 WHERE number=$2", uuid, self.number)
            uuid = str(uuid)
            await conn.execute("UPDATE portal SET chat_id=$1 WHERE chat_id=$2", uuid, self.number)
            await conn.execute("UPDATE message SET sender=$1 WHERE sender=$2", uuid, self.number)
            await conn.execute("UPDATE reaction SET author=$1 WHERE author=$2", uuid, self.number)

    async def update(self) -> None:
        set_columns = (
            "name=$3, avatar_hash=$4, avatar_url=$5, name_set=$6, avatar_set=$7, "
            "uuid_registered=$8, number_registered=$9, "
            "custom_mxid=$10, access_token=$11, next_batch=$12, base_url=$13"
        )
        q = (f"UPDATE puppet SET uuid=$1, {set_columns} WHERE number=$2"
             if self.uuid is None
             else f"UPDATE puppet SET number=$2, {set_columns} WHERE uuid=$1")
        await self.db.execute(q,self.uuid, self.number, self.name, self.avatar_hash,
                              self.avatar_url, self.name_set, self.avatar_set,
                              self.uuid_registered, self.number_registered, self.custom_mxid,
                              self.access_token, self.next_batch, self._base_url_str)

    @classmethod
    def _from_row(cls, row: asyncpg.Record) -> 'Puppet':
        data = {**row}
        base_url_str = data.pop("base_url")
        base_url = URL(base_url_str) if base_url_str is not None else None
        return cls(base_url=base_url, **data)

    _select_base = ("SELECT uuid, number, name, avatar_hash, avatar_url, name_set, avatar_set, "
                    "       uuid_registered, number_registered, custom_mxid, access_token, "
                    "       next_batch, base_url "
                    "FROM puppet")

    @classmethod
    async def get_by_address(cls, address: Address) -> Optional['Puppet']:
        if address.uuid:
            if address.number:
                row = await cls.db.fetchrow(f"{cls._select_base} WHERE uuid=$1 OR number=$2",
                                            address.uuid, address.number)
            else:
                row = await cls.db.fetchrow(f"{cls._select_base} WHERE uuid=$1", address.uuid)
        elif address.number:
            row = await cls.db.fetchrow(f"{cls._select_base} WHERE number=$1", address.number)
        else:
            raise ValueError("Invalid address")
        if not row:
            return None
        return cls._from_row(row)

    @classmethod
    async def get_by_custom_mxid(cls, mxid: UserID) -> Optional['Puppet']:
        row = await cls.db.fetchrow(f"{cls._select_base} WHERE custom_mxid=$1", mxid)
        if not row:
            return None
        return cls._from_row(row)

    @classmethod
    async def all_with_custom_mxid(cls) -> List['Puppet']:
        rows = await cls.db.fetch(f"{cls._select_base} WHERE custom_mxid IS NOT NULL")
        return [cls._from_row(row) for row in rows]