Hikka/hikka/inline/gallery.py

#             █ █ ▀ █▄▀ ▄▀█ █▀█ ▀
#             █▀█ █ █ █ █▀█ █▀▄ █
#              © Copyright 2022
#           https://t.me/hikariatama
#
# 🔒      Licensed under the GNU AGPLv3
# 🌐 https://www.gnu.org/licenses/agpl-3.0.html

import asyncio
import contextlib
import copy
import functools
import logging
import time
import traceback
import typing

from aiogram.types import (
    CallbackQuery,
    InlineKeyboardMarkup,
    InlineQuery,
    InlineQueryResultGif,
    InlineQueryResultPhoto,
    InputMediaAnimation,
    InputMediaPhoto,
)
from aiogram.utils.exceptions import BadRequest, RetryAfter

from telethon.tl.types import Message
from telethon.errors.rpcerrorlist import ChatSendInlineForbiddenError
from telethon.extensions.html import CUSTOM_EMOJIS

from urllib.parse import urlparse
import os

from .. import utils, main
from ..types import HikkaReplyMarkup
from .types import InlineUnit, InlineMessage

logger = logging.getLogger(__name__)


class ListGalleryHelper:
    def __init__(self, lst: typing.List[str]):
        self.lst = lst
        self._current_index = -1

    def __call__(self) -> str:
        self._current_index += 1
        return self.lst[self._current_index % len(self.lst)]

    def by_index(self, index: int) -> str:
        return self.lst[index % len(self.lst)]


class Gallery(InlineUnit):
    async def gallery(
        self,
        message: typing.Union[Message, int],
        next_handler: typing.Union[callable, typing.List[str]],
        caption: typing.Union[typing.List[str], str, callable] = "",
        *,
        custom_buttons: typing.Optional[HikkaReplyMarkup] = None,
        force_me: bool = False,
        always_allow: typing.Optional[typing.List[int]] = None,
        manual_security: bool = False,
        disable_security: bool = False,
        ttl: typing.Union[int, bool] = False,
        on_unload: typing.Optional[callable] = None,
        preload: typing.Union[bool, int] = False,
        gif: bool = False,
        silent: bool = False,
        _reattempt: bool = False,
    ) -> typing.Union[bool, InlineMessage]:
        """
        Send inline gallery to chat
        :param caption: Caption for photo, or callable, returning caption
        :param message: Where to send inline. Can be either `Message` or `int`
        :param next_handler: Callback function, which must return url for next photo or list with photo urls
        :param custom_buttons: Custom buttons to add above native ones
        :param force_me: Either this gallery buttons must be pressed only by owner scope or no
        :param always_allow: Users, that are allowed to press buttons in addition to previous rules
        :param ttl: Time, when the gallery is going to be unloaded. Unload means, that the gallery
                    will become unusable. Pay attention, that ttl can't
                    be bigger, than default one (1 day) and must be either `int` or `False`
        :param on_unload: Callback, called when gallery is unloaded and/or closed. You can clean up trash
                          or perform another needed action
        :param preload: Either to preload gallery photos beforehand or no. If yes - specify threshold to
                        be loaded. Toggle this attribute, if your callback is too slow to load photos
                        in real time
        :param gif: Whether the gallery will be filled with gifs. If you omit this argument and specify
                    gifs in `next_handler`, Hikka will try to determine the filetype of these images
        :param manual_security: By default, Hikka will try to inherit inline buttons security from the caller (command)
                                If you want to avoid this, pass `manual_security=True`
        :param disable_security: By default, Hikka will try to inherit inline buttons security from the caller (command)
                                 If you want to disable all security checks on this gallery in particular, pass `disable_security=True`
        :param silent: Whether the gallery must be sent silently (w/o "Opening gallery..." message)
        :return: If gallery is sent, returns :obj:`InlineMessage`, otherwise returns `False`
        """
        with contextlib.suppress(AttributeError):
            _hikka_client_id_logging_tag = copy.copy(self._client.tg_id)

        custom_buttons = self._validate_markup(custom_buttons)

        if not (
            isinstance(caption, str)
            or isinstance(caption, list)
            and all(isinstance(item, str) for item in caption)
        ) and not callable(caption):
            logger.error(
                "Invalid type for `caption`. Expected `str` or `list` or `callable`,"
                " got `%s`",
                type(caption),
            )
            return False

        if isinstance(caption, list):
            caption = ListGalleryHelper(caption)

        if not isinstance(manual_security, bool):
            logger.error(
                "Invalid type for `manual_security`. Expected `bool`, got `%s`",
                type(manual_security),
            )
            return False

        if not isinstance(silent, bool):
            logger.error(
                "Invalid type for `silent`. Expected `bool`, got `%s`", type(silent)
            )
            return False

        if not isinstance(disable_security, bool):
            logger.error(
                "Invalid type for `disable_security`. Expected `bool`, got `%s`",
                type(disable_security),
            )
            return False

        if not isinstance(message, (Message, int)):
            logger.error(
                "Invalid type for `message`. Expected `Message` or `int`, got `%s`",
                type(message),
            )
            return False

        if not isinstance(force_me, bool):
            logger.error(
                "Invalid type for `force_me`. Expected `bool`, got `%s`", type(force_me)
            )
            return False

        if not isinstance(gif, bool):
            logger.error("Invalid type for `gif`. Expected `bool`, got `%s`", type(gif))
            return False

        if (
            not isinstance(preload, (bool, int))
            or isinstance(preload, bool)
            and preload
        ):
            logger.error(
                "Invalid type for `preload`. Expected `int` or `False`, got `%s`",
                type(preload),
            )
            return False

        if always_allow and not isinstance(always_allow, list):
            logger.error(
                "Invalid type for `always_allow`. Expected `list`, got `%s`",
                type(always_allow),
            )
            return False

        if not always_allow:
            always_allow = []

        if not isinstance(ttl, int) and ttl:
            logger.error(
                "Invalid type for `ttl`. Expected `int` or `False`, got `%s`", type(ttl)
            )
            return False

        if isinstance(next_handler, list):
            if all(isinstance(i, str) for i in next_handler):
                next_handler = ListGalleryHelper(next_handler)
            else:
                logger.error(
                    "Invalid type for `next_handler`. Expected `callable` or `list` of"
                    " `str`, got `%s`",
                    type(next_handler),
                )
                return False

        unit_id = utils.rand(16)
        btn_call_data = utils.rand(10)

        try:
            if isinstance(next_handler, ListGalleryHelper):
                photo_url = next_handler.lst
            else:
                photo_url = await self._call_photo(next_handler)
                if not photo_url:
                    return False
        except Exception:
            logger.exception("Error while parsing first photo in gallery")
            return False

        perms_map = None if manual_security else self._find_caller_sec_map()

        self._units[unit_id] = {
            "type": "gallery",
            "caption": caption,
            "chat": None,
            "message_id": None,
            "uid": unit_id,
            "photo_url": (photo_url if isinstance(photo_url, str) else photo_url[0]),
            "next_handler": next_handler,
            "btn_call_data": btn_call_data,
            "photos": [photo_url] if isinstance(photo_url, str) else photo_url,
            "current_index": 0,
            "future": asyncio.Event(),
            **({"ttl": round(time.time()) + ttl} if ttl else {}),
            **({"force_me": force_me} if force_me else {}),
            **({"disable_security": disable_security} if disable_security else {}),
            **({"on_unload": on_unload} if callable(on_unload) else {}),
            **({"preload": preload} if preload else {}),
            **({"gif": gif} if gif else {}),
            **({"always_allow": always_allow} if always_allow else {}),
            **({"perms_map": perms_map} if perms_map else {}),
            **({"message": message} if isinstance(message, Message) else {}),
            **({"custom_buttons": custom_buttons} if custom_buttons else {}),
        }

        self._custom_map[btn_call_data] = {
            "handler": asyncio.coroutine(
                functools.partial(
                    self._gallery_page,
                    unit_id=unit_id,
                )
            ),
            **(
                {"ttl": self._units[unit_id]["ttl"]}
                if "ttl" in self._units[unit_id]
                else {}
            ),
            **({"always_allow": always_allow} if always_allow else {}),
            **({"force_me": force_me} if force_me else {}),
            **({"disable_security": disable_security} if disable_security else {}),
            **({"perms_map": perms_map} if perms_map else {}),
            **({"message": message} if isinstance(message, Message) else {}),
        }

        if isinstance(message, Message) and not silent:
            try:
                status_message = await (
                    message.edit if message.out else message.respond
                )(
                    (
                        utils.get_platform_emoji()
                        if self._client.hikka_me.premium and CUSTOM_EMOJIS
                        else "🌘"
                    )
                    + " <b>Opening gallery...</b>"
                )
            except Exception:
                status_message = None
        else:
            status_message = None

        async def answer(msg: str):
            nonlocal message
            if isinstance(message, Message):
                await (message.edit if message.out else message.respond)(msg)
            else:
                await self._client.send_message(message, msg)

        try:
            q = await self._client.inline_query(self.bot_username, unit_id)
            m = await q[0].click(
                utils.get_chat_id(message) if isinstance(message, Message) else message,
                reply_to=message.reply_to_msg_id
                if isinstance(message, Message)
                else None,
            )
        except ChatSendInlineForbiddenError:
            await answer("🚫 <b>You can't send inline units in this chat</b>")
        except Exception:
            logger.exception("Error sending inline gallery")

            del self._units[unit_id]

            if _reattempt:
                logger.exception("Can't send gallery")

                if not self._db.get(main.__name__, "inlinelogs", True):
                    msg = "<b>🚫 Gallery invoke failed! More info in logs</b>"
                else:
                    exc = traceback.format_exc()
                    # Remove `Traceback (most recent call last):`
                    exc = "\n".join(exc.splitlines()[1:])
                    msg = (
                        "<b>🚫 Gallery invoke failed!</b>\n\n"
                        f"<b>🧾 Logs:</b>\n<code>{utils.escape_html(exc)}</code>"
                    )

                del self._units[unit_id]
                await answer(msg)

                return False

            kwargs = utils.get_kwargs()
            kwargs["_reattempt"] = True

            return await self.gallery(**kwargs)

        await self._units[unit_id]["future"].wait()
        del self._units[unit_id]["future"]

        self._units[unit_id]["chat"] = utils.get_chat_id(m)
        self._units[unit_id]["message_id"] = m.id

        if isinstance(message, Message) and message.out:
            await message.delete()

        if status_message and not message.out:
            await status_message.delete()

        if not isinstance(next_handler, ListGalleryHelper):
            asyncio.ensure_future(self._load_gallery_photos(unit_id))

        return InlineMessage(self, unit_id, self._units[unit_id]["inline_message_id"])

    async def _call_photo(self, callback: callable) -> typing.Union[str, bool]:
        """Parses photo url from `callback`. Returns url on success, otherwise `False`
        """
        if isinstance(callback, str):
            photo_url = callback
        elif isinstance(callback, list):
            photo_url = callback[0]
        elif asyncio.iscoroutinefunction(callback):
            photo_url = await callback()
        elif callable(callback):
            photo_url = callback()
        else:
            logger.error(
                "Invalid type for `next_handler`. Expected `str`, `list`, `callable` or"
                " `asyncio.coroutine`, got %s",
                type(callback),
            )
            return False

        if not isinstance(photo_url, (str, list)):
            logger.error(
                "Got invalid result from `next_handler`. Expected `str` or `list`,"
                " got %s",
                type(photo_url),
            )
            return False

        return photo_url

    async def _load_gallery_photos(self, unit_id: str):
        """Preloads photo. Should be called via ensure_future"""
        unit = self._units[unit_id]

        photo_url = await self._call_photo(unit["next_handler"])

        self._units[unit_id]["photos"] += (
            [photo_url] if isinstance(photo_url, str) else photo_url
        )

        unit = self._units[unit_id]

        # If only one preload was insufficient to load needed amount of photos
        if unit.get("preload", False) and len(unit["photos"]) - unit[
            "current_index"
        ] < unit.get("preload", False):
            # Start load again
            asyncio.ensure_future(self._load_gallery_photos(unit_id))

    async def _gallery_slideshow_loop(
        self,
        call: CallbackQuery,
        unit_id: str = None,
    ):
        while True:
            await asyncio.sleep(7)

            unit = self._units[unit_id]

            if unit_id not in self._units or not unit.get("slideshow", False):
                return

            if unit["current_index"] + 1 >= len(unit["photos"]) and isinstance(
                unit["next_handler"],
                ListGalleryHelper,
            ):
                del self._units[unit_id]["slideshow"]
                self._units[unit_id]["current_index"] -= 1

            await self._gallery_page(
                call,
                self._units[unit_id]["current_index"] + 1,
                unit_id=unit_id,
            )

    async def _gallery_slideshow(
        self,
        call: CallbackQuery,
        unit_id: str = None,
    ):
        if not self._units[unit_id].get("slideshow", False):
            self._units[unit_id]["slideshow"] = True
            await self.bot.edit_message_reply_markup(
                inline_message_id=call.inline_message_id,
                reply_markup=self._gallery_markup(unit_id),
            )
            await call.answer("✅ Slideshow on")
        else:
            del self._units[unit_id]["slideshow"]
            await self.bot.edit_message_reply_markup(
                inline_message_id=call.inline_message_id,
                reply_markup=self._gallery_markup(unit_id),
            )
            await call.answer("🚫 Slideshow off")
            return

        asyncio.ensure_future(
            self._gallery_slideshow_loop(
                call,
                unit_id,
            )
        )

    async def _gallery_back(
        self,
        call: CallbackQuery,
        unit_id: str = None,
    ):
        queue = self._units[unit_id]["photos"]

        if not queue:
            await call.answer("No way back", show_alert=True)
            return

        self._units[unit_id]["current_index"] -= 1

        if self._units[unit_id]["current_index"] < 0:
            self._units[unit_id]["current_index"] = 0
            await call.answer("No way back")
            return

        try:
            await self.bot.edit_message_media(
                inline_message_id=call.inline_message_id,
                media=self._get_current_media(unit_id),
                reply_markup=self._gallery_markup(unit_id),
            )
        except RetryAfter as e:
            await call.answer(
                f"Got FloodWait. Wait for {e.timeout} seconds",
                show_alert=True,
            )
        except Exception:
            logger.exception("Exception while trying to edit media")
            await call.answer("Error occurred", show_alert=True)
            return

    def _get_current_media(
        self,
        unit_id: str,
    ) -> typing.Union[InputMediaPhoto, InputMediaAnimation]:
        """Return current media, which should be updated in gallery"""
        media = self._get_next_photo(unit_id)
        try:
            path = urlparse(media).path
            ext = os.path.splitext(path)[1]
        except Exception:
            ext = None

        if self._units[unit_id].get("gif", False) or ext in {".gif", ".mp4"}:
            return InputMediaAnimation(
                media=media,
                caption=self._get_caption(
                    unit_id,
                    index=self._units[unit_id]["current_index"],
                ),
                parse_mode="HTML",
            )

        return InputMediaPhoto(
            media=media,
            caption=self._get_caption(
                unit_id,
                index=self._units[unit_id]["current_index"],
            ),
            parse_mode="HTML",
        )

    async def _gallery_page(
        self,
        call: CallbackQuery,
        page: typing.Union[int, str],
        unit_id: str = None,
    ):
        if page == "slideshow":
            await self._gallery_slideshow(call, unit_id)
            return

        if page == "close":
            await self._delete_unit_message(call, unit_id=unit_id)
            return

        if page < 0:
            await call.answer("No way back")
            return

        if page > len(self._units[unit_id]["photos"]) - 1 and isinstance(
            self._units[unit_id]["next_handler"], ListGalleryHelper
        ):
            await call.answer("No way forward")
            return

        self._units[unit_id]["current_index"] = page
        if not isinstance(self._units[unit_id]["next_handler"], ListGalleryHelper):
            # If we exceeded photos limit in gallery and need to preload more
            if self._units[unit_id]["current_index"] >= len(
                self._units[unit_id]["photos"]
            ):
                await self._load_gallery_photos(unit_id)

            # If we still didn't get needed photo index
            if self._units[unit_id]["current_index"] >= len(
                self._units[unit_id]["photos"]
            ):
                await call.answer("Can't load next photo")
                return

            if (
                len(self._units[unit_id]["photos"])
                - self._units[unit_id]["current_index"]
                < self._units[unit_id].get("preload", 0) // 2
            ):
                logger.debug(f"Started preload for gallery {unit_id}")
                asyncio.ensure_future(self._load_gallery_photos(unit_id))

        try:
            await self.bot.edit_message_media(
                inline_message_id=call.inline_message_id,
                media=self._get_current_media(unit_id),
                reply_markup=self._gallery_markup(unit_id),
            )
        except BadRequest:
            logger.debug("Error fetching photo content, attempting load next one")
            del self._units[unit_id]["photos"][self._units[unit_id]["current_index"]]
            self._units[unit_id]["current_index"] -= 1
            return await self._gallery_page(call, page, unit_id)
        except RetryAfter as e:
            await call.answer(
                f"Got FloodWait. Wait for {e.timeout} seconds",
                show_alert=True,
            )
            return
        except Exception:
            logger.exception("Exception while trying to edit media")
            await call.answer("Error occurred", show_alert=True)
            return

    def _get_next_photo(self, unit_id: str) -> str:
        """Returns next photo"""
        try:
            return self._units[unit_id]["photos"][self._units[unit_id]["current_index"]]
        except IndexError:
            logger.error(
                "Got IndexError in `_get_next_photo`. "
                f"{self._units[unit_id]['current_index']=} / "
                f"{len(self._units[unit_id]['photos'])=}"
            )
            return self._units[unit_id]["photos"][0]

    def _get_caption(self, unit_id: str, index: int = 0) -> str:
        """Calls and returnes caption for gallery"""
        caption = self._units[unit_id].get("caption", "")
        if isinstance(caption, ListGalleryHelper):
            return caption.by_index(index)

        return (
            caption
            if isinstance(caption, str)
            else caption()
            if callable(caption)
            else ""
        )

    def _gallery_markup(self, unit_id: str) -> InlineKeyboardMarkup:
        """Generates aiogram markup for `gallery`"""
        callback = functools.partial(self._gallery_page, unit_id=unit_id)
        unit = self._units[unit_id]
        return self.generate_markup(
            (
                (
                    unit.get("custom_buttons", [])
                    + self.build_pagination(
                        unit_id=unit_id,
                        callback=callback,
                        total_pages=len(unit["photos"]),
                    )
                    + [
                        [
                            *(
                                [
                                    {
                                        "text": "⏪",
                                        "callback": callback,
                                        "args": (unit["current_index"] - 1,),
                                    }
                                ]
                                if unit["current_index"] > 0
                                else []
                            ),
                            *(
                                [
                                    {
                                        "text": "🛑"
                                        if unit.get("slideshow", False)
                                        else "⏱",
                                        "callback": callback,
                                        "args": ("slideshow",),
                                    }
                                ]
                                if unit["current_index"] < len(unit["photos"]) - 1
                                or not isinstance(
                                    unit["next_handler"], ListGalleryHelper
                                )
                                else []
                            ),
                            *(
                                [
                                    {
                                        "text": "⏩",
                                        "callback": callback,
                                        "args": (unit["current_index"] + 1,),
                                    }
                                ]
                                if unit["current_index"] < len(unit["photos"]) - 1
                                or not isinstance(
                                    unit["next_handler"], ListGalleryHelper
                                )
                                else []
                            ),
                        ]
                    ]
                )
                + [[{"text": "🔻 Close", "callback": callback, "args": ("close",)}]]
            )
        )

    async def _gallery_inline_handler(self, inline_query: InlineQuery):
        for unit in self._units.copy().values():
            if (
                inline_query.from_user.id == self._me
                and inline_query.query == unit["uid"]
                and unit["type"] == "gallery"
            ):
                try:
                    path = urlparse(unit["photo_url"]).path
                    ext = os.path.splitext(path)[1]
                except Exception:
                    ext = None

                args = {
                    "thumb_url": "https://img.icons8.com/fluency/344/loading.png",
                    "caption": self._get_caption(unit["uid"], index=0),
                    "parse_mode": "HTML",
                    "reply_markup": self._gallery_markup(unit["uid"]),
                    "id": utils.rand(20),
                    "title": "Processing inline gallery",
                }

                if unit.get("gif", False) or ext in {".gif", ".mp4"}:
                    await inline_query.answer(
                        [InlineQueryResultGif(gif_url=unit["photo_url"], **args)]
                    )
                    return

                await inline_query.answer(
                    [InlineQueryResultPhoto(photo_url=unit["photo_url"], **args)],
                    cache_time=0,
                )