Как удалить последние 2 сообщения в телеграм боте?

Question

[Тынай Бакасов]

Доброго времени суток.
В боте есть кнопка "Баланс"
При нажатии отправляется сообщение "Баланс"
Отправленное сообщение Баланс удаляется,
И выводиться Баланс:
Потом я нажимаю "Назад"
Так же сообщение "Назад" удаляется и возвращает слово Главное меню,
Но перед ним остался баланс, и я бы хотел его тоже удалить.

Основной язык Perl
Это шаблон бота.
Код написан не мной, (естественно, тогда бы я не спрашивал )
Поэтому сложно разобраться.

Шаблон

<% CASE ['/start', 'Назад', 'Главное', 'меню']%>
{
    "deleteMessage": { "message_id": {{ message.message_id }} }
},
{
    "sendMessage": {
        "text":"Главное меню",
        "reply_markup": {
            "keyboard": [
                [
                    {"text": " Баланс"}
                ],
                [
                    {"text": " Помощь"}
                ]
                
                    
                
            ],
            "one_time_keyboard": false,
            "resize_keyboard": true
        }
    }
},
{
    "deleteMessage": { "message_id": {{ message.message_id }} }
}
<% CASE ['/balance', '', 'Баланс'] %>
{
    "deleteMessage": { 
"message_id": {{ message.message_id }}
 }
},
{
    "sendMessage": {
        "text": "Баланс: {{ user.balance }}",
        "reply_markup": {
            "keyboard": [
                [
                    {
                        "text": "☰ История платежей"
                    }
                ],
                [
                    {"text": "Назад"}
                ]
            ],
            "one_time_keyboard": false,
            "resize_keyboard": true
        }
    }
}

Вот часть кода который обрабатывает удаление сообщения

deleteMessage

sub deleteMessage {
    my $self = shift;
    my %args = (
        message_id => undef,
        @_,
    );

    $self->http( 'deleteMessage',
        data => \%args,
    );
}

и ещё немного

sub process_message {
    my $self = shift;
    my %args = (
        message => undef,
        @_,
    );

    return undef unless $self->token;

    logger->debug('REQUEST:', \%args );

    my $message = $args{callback_query} ? $args{callback_query}->{message} : $args{message};
    $self->message( $message );

    $self->chat_id( $message->{chat}->{id} );

    my $query;
    if ( $args{message} ) {
        $query = $args{message}->{text};
    } elsif ( $args{callback_query} ) {
        $query = $args{callback_query}->{data};
    }

    my ( $cmd, @callback_args ) = split( /\s+/, $query );
    if ( $cmd=~s/^\|// ) {
        $cmd = join(' ', $cmd, @callback_args );
    }

    if ( $cmd ne '/register' ) {
        my $user = $self->auth( $message );
        if ( !$user ) {
            logger->warning( 'USER_NOT_FOUND. Chat_id', $message->{chat}->{id}, 'username:', $message->{chat}->{username} );
            $cmd = 'USER_NOT_FOUND';
        } elsif ( $user->{block} ) {
            return $self->sendMessage(
                text => sprintf("You are blocked! (user_id: %s)", $user->{user_id} ),
            );
        }
    }

    my $obj = get_script( $cmd,
        vars => {
            cmd => $cmd,
            message => $message,
            args => \@callback_args,
        },
    );

    if ( my @errors = get_service('report')->errors ) {
        return $self->sendMessage(
            text => join('<br>', @errors),
        );
    }

    for my $script ( @{ $obj } ) {
        logger->debug( 'Script:', $script );
        my $method = get_script_method( $script );

        my %allow_telegram_methods = (
            sendPhoto => 1,
            sendAudio => 1,
            sendDocument => 1,
            sendVideo => 1,
            sendAnimation => 1,
            sendVoice => 1,
            sendVideoNote => 1,
            sendMediaGroup => 1,
            sendLocation => 1,
            sendVenue => 1,
            sendContact => 1,
            sendPoll => 1,
            sendDice => 1,
            sendChatAction => 1,
            deleteMessage => 1,
        );

        if ( $self->can( $method ) ) {
            $self->$method( %{ $script->{ $method } || {} } );
        } elsif ( $allow_telegram_methods{ $method } ) {
            $self->http( $method,
                data => $script->{ $method } || {},
            );
        } else {
            logger->error("Method $method not exists");
            next;
        }
    }

    return 1;
}

И ещё я не могу в keyboard вызвать обработчик
Если в keyboard есть текст
"text": "Меню"
"callback_query": "/menu"
То ничего не происходит.

А если использовать inline_keyboard то всё работает.
Но хотелось бы keyboard

Answer 1

[Тынай Бакасов]

Решено с помощью добавления минуса

{
    "deleteMessage": { "message_id": {{ message.message_id }} }
},
{
    "deleteMessage": { "message_id": {{ message.message_id -1 }} }
}

Comments

[shurshur]

Отвратительный способ решения, потому что id не обязаны быть последовательными, и можно удалить не то, что нужно.

[Тынай Бакасов]

shurshur, мне нужно удалить последние два сообщения, я удаляю последнее сообщение + -1 предыдущее сообщение

[shurshur]

Тынай Бакасов, если бот отправит двум разным пользователям или пользователь быстро отправит два разных сообщения - то вся нумерация легко поедет и удалиться может не то, что надо (в том числе у другого пользователя!). Я уж не говорю о том, что способ выдачи id может изменить телеграм на своей стороне, например, начать выдавать их с другим инкрементом или вообще без какой-либо монотонности. Если изначально соблюдать API как надо, то бот это без проблем переживёт и будет работать, а если нет...

Я могу пример привести из своей практики. Есть интеграция, в которой id выдают блоками по 1000 штук два независимых сервиса, один выдаёт нечётные, другой - чётные (чтобы не пересекались). Некоторые клиенты ошибочно думали, что id монотонны и всегда возрастают, но это не так: когда очередной блок берётся с другого генератора, чем в предыдущий раз, очередные id могут измениться в сторону снижения. Причём чем дольше длится интеграция, тем больше расхождение может накопиться (хотя в нормальной ситуации должно быть приблизительно поровну).

Причём это когда-то много лет назад было переделано из простых sequence в базе в рамках повышения отказоустойчивости. И это там реально работает. Так, при тормозах, кратковременной или полной недоступности базы основной функционал сервиса сохраняется. Причём он может так работать не один час, и такие аварии там несколько раз бывали.

Правильнее хранить предысторию, включающую все нужные id сообщений в рамках текущего активного диалога. В общем, если у бота не будет большой аудитории и нет высоких требований к его надёжности, то можно оставить и так, а чинить в случае если совсем припрёт. Ну и обязательно проверять вызов удаления на ошибки, чтобы бот не упал, если пользователь успеет сам своё сообщение и что-то пойдёт не так (тм)

PS: Я кстати был реально уверен что удалять бот чужие сообщения из личного чата не может. Но вероятно перепутал с редактированием - тут был кто-то, кто очень хотел ботом редактировать текст сообщения пользователя.

[Тынай Бакасов]

shurshur, я учту ваши советы, но тут есть ещё и chat_id, так что чужие сообщения не могут удаляться.
Насчёт id я попробую выяснить, но как я пологаю нету разницы какая там цифра или не убывание или увеличение, - 1 я просто беру предыдущее сообщение, так как все id сообщений хранятся пока не удалится.
Но я учту ваши советы и попробую переделать чтобы был отказоустойчивым.

Answer 2

[shurshur]

Никак, бот может удалять только свои сообщения, но не сообщения от пользователя.

Comments

[Тынай Бакасов]

А что считается сообщением от пользователя?
Когда я жму на кнопку получается я отправляю сообщение, получается я пользователь,
А бот мне показывает баланс.
А если так почему он работает когда кнопка inline?

[shurshur]

Тынай Бакасов, потому что при нажатии inline-кнопки никакого сообщения от лица пользователя не отправляется. А при обычной кнопке - отправляется (и в истории сообщений это видно).

[Алексей]

Тынай Бакасов, бот может удалять и сообщения пользователя и свои сообщения.

но если нажать на кнопку inline, то нет сообщения от юзера, вам приходит в скрипт ответ, с id того сообщения кнопку которого нажали. И если надо вы его можете удалить