From fcd5cb6f248a56d8258b9fc95f8980ec476d7ad1 Mon Sep 17 00:00:00 2001 From: ms Date: Sun, 11 Nov 2007 12:24:46 +0000 Subject: [PATCH] Fixed the branch git-svn-id: http://svn.ipfire.org/svn/ipfire/branches/2.1/trunk@1076 ea5c0bd1-69bd-2848-81d8-4f18e57aeed8 --- config/rootfiles/common/ntfs-3g | 2 +- html/cgi-bin/mpfire.cgi | 29 +++++++---- html/cgi-bin/qos.cgi | 90 ++++++++++++++++----------------- html/cgi-bin/samba.cgi | 2 +- langs/de/cgi-bin/de.pl | 2 +- 5 files changed, 67 insertions(+), 58 deletions(-) diff --git a/config/rootfiles/common/ntfs-3g b/config/rootfiles/common/ntfs-3g index da175f0d48..0b7a86b0cd 100644 --- a/config/rootfiles/common/ntfs-3g +++ b/config/rootfiles/common/ntfs-3g @@ -3,7 +3,7 @@ bin/ntfs-3g #lib/libntfs-3g.la lib/libntfs-3g.so lib/libntfs-3g.so.14 -lib/libntfs-3g.so.14.0.0 +lib/libntfs-3g.so.14.1.0 sbin/mount.ntfs-3g #usr/include/ntfs-3g #usr/include/ntfs-3g/attrib.h diff --git a/html/cgi-bin/mpfire.cgi b/html/cgi-bin/mpfire.cgi index 3b5262f8e4..7d75f0b451 100644 --- a/html/cgi-bin/mpfire.cgi +++ b/html/cgi-bin/mpfire.cgi @@ -53,7 +53,7 @@ print < END ; -} +} else{ &Header::showhttpheaders(); @@ -108,6 +108,8 @@ foreach (@songdb){ if ( $mpfiresettings{'ACTION'} eq "scan" ) { +&General::readhash("${General::swroot}/mpfire/settings", \%mpfiresettings); +&Header::getcgihash(\%mpfiresettings); delete $mpfiresettings{'__CGI__'};delete $mpfiresettings{'x'};delete $mpfiresettings{'y'};delete $mpfiresettings{'PAGE'}; &General::writehash("${General::swroot}/mpfire/settings", \%mpfiresettings); open(DATEI, "<${General::swroot}/mpfire/mpd.conf") || die "Datei nicht gefunden"; @@ -144,7 +146,7 @@ foreach (keys(%songs)){ } open(DATEI, ">${General::swroot}/mpfire/playlist.m3u") || die "Could not add playlist"; print DATEI @temp; -close(DATEI); +close(DATEI); $message=system("/usr/local/bin/mpfirectrl playlist 2>/dev/null"); } @@ -208,7 +210,7 @@ my @temp = ""; my @song = ""; my @select = split(/\|/,$mpfiresettings{'genre'}); foreach (keys(%songs)){ @song = split(/\|/,$songs{$_});$song[7] =~ s/\W/ /g; - + foreach (@select){ $_ =~ s/\W/ /g; if ( $song[7] =~ /$_/ ){push(@temp,$song[0]);} @@ -220,13 +222,20 @@ print DATEI @temp; close(DATEI); $message=system("/usr/local/bin/mpfirectrl playlist 2>/dev/null"); } -elsif ( $mpfiresettings{'SHOWLIST'} ){delete $mpfiresettings{'__CGI__'};delete $mpfiresettings{'x'};delete $mpfiresettings{'y'};delete $mpfiresettings{'PAGE'};&General::writehash("${General::swroot}/mpfire/settings", \%mpfiresettings);refreshpage();} +elsif ( $mpfiresettings{'SHOWLIST'} ){ + &General::readhash("${General::swroot}/mpfire/settings", \%mpfiresettings); + &Header::getcgihash(\%mpfiresettings); + delete $mpfiresettings{'__CGI__'}; + delete $mpfiresettings{'x'}; + delete $mpfiresettings{'y'}; + delete $mpfiresettings{'PAGE'}; + &General::writehash("${General::swroot}/mpfire/settings", \%mpfiresettings);refreshpage(); +} ############################################################################################################################ ################################### Aufbau der HTML Seite fr globale Sambaeinstellungen #################################### $mpfiresettings{'MUSICDIR'} = "/"; - &General::readhash("${General::swroot}/mpfire/settings", \%mpfiresettings); ############################################################################################################################ @@ -243,7 +252,7 @@ print <$Lang::tr{'Scan for Files'} $Lang::tr{'Scan from Directory'} - + END @@ -274,8 +283,8 @@ print <
";} -else { print"
";} -print <
";} +print <
@@ -384,13 +393,13 @@ else{ $begin=(($mpfiresettings{'PAGE'}-1) * 100); $end=(($mpfiresettings{'PAGE'} * 100)-1); } -foreach (keys(%songs)){ +foreach (sort(keys(%songs))){ if (!($i >= $begin && $i <= $end)){ # print $begin."->".$i."<-".$end."\n"; $i++;next;} my @song = split(/\|/,$songs{$_}); my $minutes = sprintf ("%.0f", $song[1] / 60 ); - my $seconds = $song[1] % 60; + my $seconds = sprintf("%02d", ($song[1] % 60) ); if ($lines % 2) {print "";} else {print "";} print <= 100 && $qossettings{'CLASS'} < 121) { @@ -318,15 +318,15 @@ END if ($qossettings{'DOPORT'} eq $Lang::tr{'save'}) { if ( $qossettings{'QIP'} ne '' ) { - unless ( &General::validip($qossettings{'QIP'}) ) { + unless ( &General::validip($qossettings{'QIP'}) ) { $qossettings{'VALID'} = 'no'; - $message = "Die Quell-IP-Adresse ist ungueltig."; + $message = "Die Quell-IP-Adresse ist ungueltig."; } } if ( $qossettings{'DIP'} ne '' ) { - unless ( &General::validip($qossettings{'DIP'}) ) { + unless ( &General::validip($qossettings{'DIP'}) ) { $qossettings{'VALID'} = 'no'; - $message = "Die Ziel-IP-Adresse ist ungueltig."; + $message = "Die Ziel-IP-Adresse ist ungueltig."; } } if ($qossettings{'CLASS'} >= 100 && $qossettings{'CLASS'} < 121) { @@ -405,7 +405,7 @@ $qossettings{'CLASS'};$qossettings{'DEVICE'};$qossettings{'TOS'}; END ; close FILE; -} +} elsif ($qossettings{'DOTOS'} eq 'Loeschen') { open( FILE, "< $tosfile" ) or die "Unable to read $tosfile"; @@ -508,28 +508,28 @@ imq0;203;4;$DOWN[20];$DOWN[1];;;0;VPN; imq0;204;5;$DOWN[20];$DOWN[1];;;8;Webtraffic; imq0;210;6;1;$DOWN[1];;;0;Standardklasse; imq0;220;7;1;$DOWN[1];;;1;P2P; -ppp0;101;1;$UP[2];$UP[1];;;8;ACKs oder so; -ppp0;102;2;$UP[3];$UP[1];;;8;VoIP; -ppp0;104;5;$UP[10];$UP[1];;;8;Webtraffic; -ppp0;110;6;1;$UP[1];;;0;Standardklasse; -ppp0;120;7;1;$UP[1];;;1;P2P; -ppp0;103;4;$UP[2];$UP[1];;;2;VPN; +$qossettings{'RED_DEV'};101;1;$UP[2];$UP[1];;;8;ACKs oder so; +$qossettings{'RED_DEV'};102;2;$UP[3];$UP[1];;;8;VoIP; +$qossettings{'RED_DEV'};104;5;$UP[10];$UP[1];;;8;Webtraffic; +$qossettings{'RED_DEV'};110;6;1;$UP[1];;;0;Standardklasse; +$qossettings{'RED_DEV'};120;7;1;$UP[1];;;1;P2P; +$qossettings{'RED_DEV'};103;4;$UP[2];$UP[1];;;2;VPN; END ; close FILE; open( FILE, "> $level7file" ) or die "Unable to write $level7file"; print FILE < $portfile" ) or die "Unable to write $portfile"; print FILE <Quality of Service: $status - - + + END ; @@ -721,7 +721,7 @@ END
END ;} -else +else { print "\t
-
$Lang::tr{'downlink std class'}: $qossettings{'DEFCLASS_INC'} +
$Lang::tr{'downlink std class'}: $qossettings{'DEFCLASS_INC'}
$Lang::tr{'uplink std class'}: $qossettings{'DEFCLASS_OUT'}
ACKs: $qossettings{'ACK'} @@ -770,7 +770,7 @@ if (( -e "/srv/web/ipfire/html/graphs/qos-graph-$qossettings{'RED_DEV'}-3240.png

".$Lang::tr{'no information available'}; } @@ -799,7 +799,7 @@ END for ( $c = 200 ; $c <= 220 ; $c++ ) { if ( $qossettings{'DEFCLASS_INC'} ne $c ) - { print "\n"; } + { print "\n"; } else { print "\n"; } } print <$message"; } - if ( $qossettings{'EDIT'} eq 'yes' ) { + if ( $qossettings{'EDIT'} eq 'yes' ) { print ""; print ""; } @@ -882,7 +882,7 @@ END END ; - if ( $qossettings{'EDIT'} eq 'yes' ) { + if ( $qossettings{'EDIT'} eq 'yes' ) { print ""; @@ -899,7 +899,7 @@ END $Lang::tr{'Class'}: END ; - if ( $qossettings{'EDIT'} eq 'yes' ) { + if ( $qossettings{'EDIT'} eq 'yes' ) { print ""; @@ -1067,7 +1067,7 @@ END next if -d "/etc/l7-protocols/protocols/$direntry"; @proto = split( /\./, $direntry ); if ( $proto[0] eq $qossettings{'L7PROT'} ) { - print "\n"; + print "\n"; } else { print "\n"; } @@ -1105,7 +1105,7 @@ END @tmpline = split( /\ /, $direntry ); next if $tmpline[0] =~ "#"; if ( $tmpline[0] eq $qossettings{'PPROT'} ) { - print "\n"; + print "\n"; } else { print "\n"; } diff --git a/html/cgi-bin/samba.cgi b/html/cgi-bin/samba.cgi index 787104ad5c..1f091a8302 100644 --- a/html/cgi-bin/samba.cgi +++ b/html/cgi-bin/samba.cgi @@ -476,7 +476,7 @@ print <$Lang::tr{'os level'} $Lang::tr{'socket options'} $Lang::tr{'remote announce'} -$Lang::tr{'remote browse sync'} +$Lang::tr{'remote browse sync'} END ; if ($sambasettings{'WINSSUPPORT'} eq 'off') {print"$Lang::tr{'wins server'}";} diff --git a/langs/de/cgi-bin/de.pl b/langs/de/cgi-bin/de.pl index 62c37a66d1..b8fbd66e4a 100644 --- a/langs/de/cgi-bin/de.pl +++ b/langs/de/cgi-bin/de.pl @@ -1520,7 +1520,7 @@ 'system status information' => 'System-Statusinformationen', 'telephone not set' => 'Telefonnummer nicht angegeben.', 'template' => 'Vorlage', -'template warning' => 'Zur Einrichtugn von QoS stehen Ihnen 2 Möglichkeiten zur Auswahl. Erstens Sie wählen speichern und erstellen Classen und Regeln nach Ihren Wünschen, oder Sie wählen Vorlage, dann werden die Klassen und Regeln durch ein Template generiert.', +'template warning' => 'Zur Einrichtung von QoS stehen Ihnen 2 Möglichkeiten zur Auswahl. Erstens Sie wählen speichern und erstellen Klassen und Regeln nach Ihren Wünschen, oder Sie wählen Vorlage, dann werden die Klassen und Regeln durch ein Template generiert.', 'test' => 'test', 'test email could not be sent' => 'Könnte Testemail nicht senden', 'test email was sent' => 'Testemail wurde erfolgreich versand', -- 2.39.2