byterazor/qpsmtpd
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Split out content log file name logic

Browse Source
This commit is contained in:
Jared Johnson 2014-12-02 16:28:51 -06:00
parent df2ef1cb64
commit 50badecc48
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
plugins/content_log
View File

@ -8,9 +8,7 @@ use POSIX qw:strftime:;
sub hook_data_post { sub hook_data_post {
my ($self, $transaction) = @_; my ($self, $transaction) = @_;
# as a decent default, log on a per-day-basis open my $out, '>>', $self->content_log_file;
my $date = strftime("%Y%m%d", localtime(time));
open(my $out, ">>mail/$date")
or return DECLINED, "Could not open log file.. continuing anyway"; or return DECLINED, "Could not open log file.. continuing anyway";
$transaction->header->print($out); $transaction->header->print($out);
@ -23,3 +21,9 @@ sub hook_data_post {
return DECLINED, "successfully saved message.. continuing"; return DECLINED, "successfully saved message.. continuing";
} }
sub content_log_file {
# as a decent default, log on a per-day-basis
my $date = strftime("%Y%m%d", localtime(time));
return "mail/$date";
}