head 1.2; access; symbols pkgsrc-2013Q2:1.2.0.4 pkgsrc-2013Q2-base:1.2 pkgsrc-2012Q4:1.2.0.2 pkgsrc-2012Q4-base:1.2 pkgsrc-2012Q2:1.1.0.18 pkgsrc-2012Q2-base:1.1 pkgsrc-2012Q1:1.1.0.16 pkgsrc-2012Q1-base:1.1 pkgsrc-2011Q4:1.1.0.14 pkgsrc-2011Q4-base:1.1 pkgsrc-2011Q3:1.1.0.12 pkgsrc-2011Q3-base:1.1 pkgsrc-2011Q2:1.1.0.10 pkgsrc-2011Q2-base:1.1 pkgsrc-2011Q1:1.1.0.8 pkgsrc-2011Q1-base:1.1 pkgsrc-2010Q4:1.1.0.6 pkgsrc-2010Q4-base:1.1 pkgsrc-2010Q3:1.1.0.4 pkgsrc-2010Q3-base:1.1 pkgsrc-2010Q2:1.1.0.2 pkgsrc-2010Q2-base:1.1; locks; strict; comment @# @; 1.2 date 2012.09.14.02.41.09; author jnemeth; state dead; branches; next 1.1; 1.1 date 2010.05.06.20.10.17; author jnemeth; state Exp; branches; next ; desc @@ 1.2 log @Remove Asterisk 1.6. This version series went end-of-line on April 21st, 2012. It most likely has multiple security issues. By this point, all users of this package should have migrated to comms/asterisk18 or comms/asterisk10 as this version has been marked as being deprecated for some time now. Note that this directory is likely to re-appear in late 2017 when Asterisk 16 comes out, assuming the current schedule is followed. However that will be a vastly different version as Asterisk 11 is only in the RC stage now (i.e. it will be five major versions after the one that is expected to be released later this year). @ text @$NetBSD: patch-bc,v 1.1 2010/05/06 20:10:17 jnemeth Exp $ --- contrib/scripts/vmail.cgi.orig 2008-09-20 00:55:01.000000000 +0000 +++ contrib/scripts/vmail.cgi @@@@ -145,7 +145,7 @@@@ sub check_login($$) $context = "default"; } if (!$filename) { - $filename = "/etc/asterisk/voicemail.conf"; + $filename = "@@ASTETCDIR@@/voicemail.conf"; } # print header; # print "Including

$filename

while in

$category

...\n"; @@@@ -153,7 +153,7 @@@@ sub check_login($$) while() { chomp; if (/include\s\"([^\"]+)\"$/) { - ($tmp, $category) = &check_login("/etc/asterisk/$1", $category); + ($tmp, $category) = &check_login("@@ASTETCDIR@@/$1", $category); if (length($tmp)) { # print "Got '$tmp'\n"; return ($tmp, $category); @@@@ -200,7 +200,7 @@@@ sub check_login_users { my ($mbox, $context) = split(/\@@/, param('mailbox')); my $pass = param('password'); my ($found, $fullname) = (0, ""); - open VMAIL, ") { chomp; if (m/\[(.*)\]/) { @@@@ -242,7 +242,7 @@@@ sub validmailbox($$$$) $context = "default"; } if (!$filename) { - $filename = "/etc/asterisk/voicemail.conf"; + $filename = "@@ASTETCDIR@@/voicemail.conf"; } if (!$category) { $category = "general"; @@@@ -251,7 +251,7 @@@@ sub validmailbox($$$$) while () { chomp; if (/include\s\"([^\"]+)\"$/) { - ($tmp, $category) = &validmailbox($mbox, $context, "/etc/asterisk/$1"); + ($tmp, $category) = &validmailbox($mbox, $context, "@@ASTETCDIR@@/$1"); if ($tmp) { return ($tmp, $category); } @@@@ -298,7 +298,7 @@@@ sub mailbox_options() local $tmp2; local $tmp; if (!$filename) { - $filename = "/etc/asterisk/voicemail.conf"; + $filename = "@@ASTETCDIR@@/voicemail.conf"; } if (!$category) { $category = "general"; @@@@ -386,7 +386,7 @@@@ sub mailbox_list() sub msgcount() { my ($context, $mailbox, $folder) = @@_; - my $path = "/var/spool/asterisk/voicemail/$context/$mailbox/$folder"; + my $path = "@@ASTSPOOLDIR@@/voicemail/$context/$mailbox/$folder"; if (opendir(DIR, $path)) { my @@msgs = grep(/^msg....\.txt$/, readdir(DIR)); closedir(DIR); @@@@ -410,7 +410,7 @@@@ sub msgcountstr() sub messages() { my ($context, $mailbox, $folder) = @@_; - my $path = "/var/spool/asterisk/voicemail/$context/$mailbox/$folder"; + my $path = "@@ASTSPOOLDIR@@/voicemail/$context/$mailbox/$folder"; if (opendir(DIR, $path)) { my @@msgs = sort grep(/^msg....\.txt$/, readdir(DIR)); closedir(DIR); @@@@ -435,7 +435,7 @@@@ sub getfields() { my ($context, $mailbox, $folder, $msg) = @@_; my $fields; - if (open(MSG, ") { s/\#.*$//g; if (/^(\w+)\s*\=\s*(.*)$/) { @@@@ -560,7 +560,7 @@@@ _EOH - + @@@@ -588,7 +588,7 @@@@ sub message_audio() } &untaint($format); - my $path = "/var/spool/asterisk/voicemail/$context/$mailbox/$folder/msg${msgid}.$format"; + my $path = "@@ASTSPOOLDIR@@/voicemail/$context/$mailbox/$folder/msg${msgid}.$format"; $msgid =~ /^\d\d\d\d$/ || die("Msgid Liar ($msgid)!"); grep(/^${format}$/, keys %formats) || die("Format Liar ($format)!"); @@@@ -809,11 +809,11 @@@@ sub message_rename() die("Invalid old Message
\n"); } - my $path = "/var/spool/asterisk/voicemail/$context/$mbox/$newfolder"; + my $path = "@@ASTSPOOLDIR@@/voicemail/$context/$mbox/$newfolder"; $path =~ /^(.*)$/; $path = $1; mkdir $path, 0770; - $path = "/var/spool/asterisk/voicemail/$context/$mbox/$oldfolder"; + $path = "@@ASTSPOOLDIR@@/voicemail/$context/$mbox/$oldfolder"; opendir(DIR, $path) || die("Unable to open directory\n"); my @@files = grep /^msg${old}\.\w+$/, readdir(DIR); closedir(DIR); @@@@ -823,7 +823,7 @@@@ sub message_rename() $tmp = $1; $oldfile = $path . "/$tmp"; $tmp =~ s/msg${old}/msg${new}/; - $newfile = "/var/spool/asterisk/voicemail/$context/$mbox/$newfolder/$tmp"; + $newfile = "@@ASTSPOOLDIR@@/voicemail/$context/$mbox/$newfolder/$tmp"; # print "Renaming $oldfile to $newfile
\n"; rename($oldfile, $newfile); } @@@@ -884,15 +884,15 @@@@ sub message_copy() die("Invalid old Message
\n"); } - my $path = "/var/spool/asterisk/voicemail/$context/$newmbox"; + my $path = "@@ASTSPOOLDIR@@/voicemail/$context/$newmbox"; $path =~ /^(.*)$/; $path = $1; mkdir $path, 0770; - $path = "/var/spool/asterisk/voicemail/$context/$newmbox/INBOX"; + $path = "@@ASTSPOOLDIR@@/voicemail/$context/$newmbox/INBOX"; $path =~ /^(.*)$/; $path = $1; mkdir $path, 0770; - $path = "/var/spool/asterisk/voicemail/$context/$mbox/$oldfolder"; + $path = "@@ASTSPOOLDIR@@/voicemail/$context/$mbox/$oldfolder"; opendir(DIR, $path) || die("Unable to open directory\n"); my @@files = grep /^msg${old}\.\w+$/, readdir(DIR); closedir(DIR); @@@@ -902,7 +902,7 @@@@ sub message_copy() $tmp = $1; $oldfile = $path . "/$tmp"; $tmp =~ s/msg${old}/msg${new}/; - $newfile = "/var/spool/asterisk/voicemail/$context/$newmbox/INBOX/$tmp"; + $newfile = "@@ASTSPOOLDIR@@/voicemail/$context/$newmbox/INBOX/$tmp"; # print "Copying $oldfile to $newfile
\n"; &file_copy($oldfile, $newfile); } @@@@ -932,7 +932,7 @@@@ sub message_delete() } else { die("Invalid Message
\n"); } - my $path = "/var/spool/asterisk/voicemail/$context/$mbox/$folder"; + my $path = "@@ASTSPOOLDIR@@/voicemail/$context/$mbox/$folder"; opendir(DIR, $path) || die("Unable to open directory\n"); my @@files = grep /^msg${msg}\.\w+$/, readdir(DIR); closedir(DIR); @@@@ -968,7 +968,7 @@@@ sub message_forward() my $txt; $context = &untaint($context); $newmbox = &untaint($newmbox); - my $path = "/var/spool/asterisk/voicemail/$context/$newmbox/INBOX"; + my $path = "@@ASTSPOOLDIR@@/voicemail/$context/$newmbox/INBOX"; if ($msgs[0]) { if (&lock_path($path) == 0) { $msgcount = &msgcount($context, $newmbox, "INBOX"); @@@@ -1018,7 +1018,7 @@@@ sub message_delete_or_move() $context = &untaint($context); $mbox = &untaint($mbox); $folder = &untaint($folder); - $path = "/var/spool/asterisk/voicemail/$context/$mbox/$folder"; + $path = "@@ASTSPOOLDIR@@/voicemail/$context/$mbox/$folder"; if ($msgs[0]) { if (&lock_path($path) == 0) { my $msgcount = &msgcount($context, $mbox, $folder); @ 1.1 log @Add a webvmail option which installs the vmail.cgi script accessing voicemail using a browser. @ text @d1 1 a1 1 $NetBSD$ @