]>
git.proxmox.com Git - pve-manager.git/blob - bin/pvemailforward.pl
7 use PVE
::AccessControl
;
8 use PVE
::Cluster qw
(cfs_read_file
);
10 # NOTE: we need to run this with setgid www-data
11 # else we cant read /etc/pve/user.cfg
13 $( = $); # $GID = $EGID
15 $ENV{'PATH'} = '/sbin:/bin:/usr/sbin:/usr/bin';
17 initlog
('pvemailforward');
20 PVE
::Cluster
::cfs_update
();
23 my $usercfg = cfs_read_file
("user.cfg");
24 my $rootcfg = $usercfg->{users
}->{'root@pam'} || {};
25 my $mailto = $rootcfg->{email
};
27 die "user 'root\@pam' does not have a email address\n" if !$mailto;
29 syslog
("info", "forward mail to <$mailto>");
31 # we never send DSN (avoid mail loops)
32 open(CMD
, "|sendmail -bm -N never $mailto") ||
33 die "can't exec sendmail - $!\n";
34 while (<>) { print CMD
$_; }
38 syslog
('err', "mail forward failed: $err");