Change that iptv-mac field could also empty for save

This commit is contained in:
Arne Fitzenreiter
2009-10-06 21:09:52 +02:00
parent 4d573fcc33
commit 19b01b74f9
5 changed files with 13 additions and 10 deletions

0
html/cgi-bin/backup.cgi Executable file → Normal file
View File

0
html/cgi-bin/dns.cgi Executable file → Normal file
View File

0
html/cgi-bin/index.cgi Executable file → Normal file
View File

View File

@@ -22,8 +22,8 @@
use strict;
# enable only the following on debugging purpose
use warnings;
use CGI::Carp 'fatalsToBrowser';
#use warnings;
#use CGI::Carp 'fatalsToBrowser';
require '/var/ipfire/general-functions.pl';
require "${General::swroot}/lang.pl";
@@ -56,16 +56,19 @@ if ($macsettings{'ACTION'} eq $Lang::tr{'save'}) {
$errormessage = $Lang::tr{'mac address error not valid'};
}
$macsettings{'MAC2'} =~ s/\-/:/g;
my @mac = split(/:/,$macsettings{"MAC2"});
if ($#mac == 5) {
foreach (@mac) {
unless ($_ =~ /^[a-fA-F0-9]{1,2}$/) {
$errormessage = $Lang::tr{'mac address error not valid'};
last;
if ( not ($macsettings{'MAC2'} eq "" )) {
my @mac = split(/:/,$macsettings{"MAC2"});
if ($#mac == 5) {
foreach (@mac) {
unless ($_ =~ /^[a-fA-F0-9]{1,2}$/) {
$errormessage = $Lang::tr{'mac address error not valid'};
last;
}
}
} else {
$errormessage = $Lang::tr{'mac address error not valid'};
}
} else {
$errormessage = $Lang::tr{'mac address error not valid'};
}
if ($errormessage eq "") {
$macsettings{'MAC'} =~ s/\:/-/g;

0
html/cgi-bin/pakfire.cgi Executable file → Normal file
View File