3
0
mirror of https://github.com/pragma-/pbot.git synced 2024-11-25 05:19:29 +01:00
pbot/lib/PBot/Core/MessageHistory.pm
2023-04-13 21:04:12 -07:00

46 lines
1.4 KiB
Perl

# File: MessageHistory.pm
#
# Purpose: Keeps track of who has said what and when, as well as their
# nickserv accounts and alter-hostmasks.
#
# Used in conjunction with AntiFlood and Quotegrabs for kick/ban on
# flood/ban-evasion and grabbing quotes, respectively.
# SPDX-FileCopyrightText: 2014-2023 Pragmatic Software <pragma78@gmail.com>
# SPDX-License-Identifier: MIT
package PBot::Core::MessageHistory;
use parent 'PBot::Core::Class';
use PBot::Imports;
use Time::HiRes qw(time tv_interval);
use PBot::Core::MessageHistory::Storage::SQLite;
sub initialize($self, %conf) {
$self->{filename} = $conf{filename} // $self->{pbot}->{registry}->get_value('general', 'data_dir') . '/message_history.sqlite3';
$self->{database} = PBot::Core::MessageHistory::Storage::SQLite->new(
pbot => $self->{pbot},
filename => $self->{filename}
);
$self->{database}->begin;
$self->{database}->devalidate_all_channels;
$self->{pbot}->{registry}->add_default('text', 'messagehistory', 'max_recall_time', $conf{max_recall_time} // 0);
$self->{pbot}->{atexit}->register(sub { $self->{database}->end });
}
sub get_message_account($self, $nick, $user, $host) {
return $self->{database}->get_message_account($nick, $user, $host);
}
sub add_message($self, $account, $mask, $channel, $text, $mode) {
$self->{database}->add_message($account, $mask, $channel, { timestamp => scalar time, msg => $text, mode => $mode });
}
1;