|
|
@ -545,14 +545,16 @@ _EOH
|
|
|
|
sub message_audio()
|
|
|
|
sub message_audio()
|
|
|
|
{
|
|
|
|
{
|
|
|
|
my ($forcedownload) = @_;
|
|
|
|
my ($forcedownload) = @_;
|
|
|
|
my $folder = param('folder');
|
|
|
|
my $folder = &untaint(param('folder'));
|
|
|
|
my $msgid = param('msgid');
|
|
|
|
my $msgid = &untaint(param('msgid'));
|
|
|
|
my $mailbox = param('mailbox');
|
|
|
|
my $mailbox = &untaint(param('mailbox'));
|
|
|
|
my $context = param('context');
|
|
|
|
my $context = &untaint(param('context'));
|
|
|
|
my $format = param('format');
|
|
|
|
my $format = param('format');
|
|
|
|
if (!$format) {
|
|
|
|
if (!$format) {
|
|
|
|
$format = &getcookie('format');
|
|
|
|
$format = &getcookie('format');
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
&untaint($format);
|
|
|
|
|
|
|
|
|
|
|
|
my $path = "/var/spool/asterisk/voicemail/$context/$mailbox/$folder/msg${msgid}.$format";
|
|
|
|
my $path = "/var/spool/asterisk/voicemail/$context/$mailbox/$folder/msg${msgid}.$format";
|
|
|
|
|
|
|
|
|
|
|
|
$msgid =~ /^\d\d\d\d$/ || die("Msgid Liar ($msgid)!");
|
|
|
|
$msgid =~ /^\d\d\d\d$/ || die("Msgid Liar ($msgid)!");
|
|
|
|