From: maniacikarus Date: Fri, 18 May 2007 17:32:42 +0000 (+0000) Subject: Qos CGI vom Meister angefasst und Quellcode neu ausgewuerfelt X-Git-Tag: v2.3-beta1~696 X-Git-Url: http://git.ipfire.org/?p=people%2Fpmueller%2Fipfire-2.x.git;a=commitdiff_plain;h=f841744cb2334432f622d73fc8c5415c34f7f5ac Qos CGI vom Meister angefasst und Quellcode neu ausgewuerfelt git-svn-id: http://svn.ipfire.org/svn/ipfire/trunk@563 ea5c0bd1-69bd-2848-81d8-4f18e57aeed8 --- diff --git a/html/cgi-bin/qos.cgi b/html/cgi-bin/qos.cgi index 7cc9959124..2428152e76 100644 --- a/html/cgi-bin/qos.cgi +++ b/html/cgi-bin/qos.cgi @@ -468,7 +468,7 @@ END @classline = split( /\;/, $classentry ); $qossettings{'CLASS'}=$classline[1]; print < + END ; } @@ -487,9 +487,9 @@ END &Header::openbox('100%', 'center', "$qossettings{'CLASS'} ($qossettings{'DEV'})"); print < - - - + + + END ; foreach $subclassentry (sort @subclasses) @@ -500,9 +500,9 @@ END $qossettings{'SCLASS'}=$subclassline[2]; &gengraph($qossettings{'DEV'},$qossettings{'SCLASS'}); print < - - + + + END ; } @@ -515,7 +515,6 @@ print < END ; - &Header::closebox(); &Header::closebigbox(); &Header::closepage(); exit @@ -621,7 +620,8 @@ if ($errormessage) { &Header::openbox('100%', 'center', 'Quality of Service'); print < +
+ END ; if ( $message ne "" ) { @@ -633,38 +633,45 @@ END
- +
END ; if (($qossettings{'OUT_SPD'} ne '') && ($qossettings{'INC_SPD'} ne '')) { print < +
 
Downloadgeschwindigkeit: $qossettings{'INC_SPD'} kbps
Uploadgeschwindigkeit: $qossettings{'OUT_SPD'} kbps +
END ; } if (($qossettings{'DEFCLASS_OUT'} ne '') && ($qossettings{'DEFCLASS_INC'} ne '')&& ($qossettings{'ACK'} ne '')) { print < +
Downloadstandardklasse: $qossettings{'DEFCLASS_INC'} - +
Uploadstandardklasse: $qossettings{'DEFCLASS_OUT'}
ACKs: $qossettings{'ACK'}
- -
- -
- +
+ +
+ +
+ +
+
END ; } -print "
"; &Header::closebox(); if ( ($qossettings{'OUT_SPD'} eq '') || ($qossettings{'INC_SPD'} eq '') ) { @@ -686,14 +693,14 @@ if ( ($qossettings{'DEFCLASS_INC'} eq '') || ($qossettings{'DEFCLASS_OUT'} eq '' &overviewgraph($qossettings{'IMQ_DEV'}); print < -  Unterklasse hinzufuegen |  Regel hinzufuegen |  Bearbeiten |  Loeschen   +  Unterklasse hinzufuegen |  Regel hinzufuegen |  Bearbeiten |  Loeschen   TOS-Bits:  0 - Deaktiviert | 8 - Minimale Verzoegerung | 4 - Maximaler Durchsatz | 2 - Maximale Zuverlaessigkeit | 1 - Minimale Kosten   END ; if (( -e "/srv/web/ipfire/html/graphs/qos-graph-$qossettings{'RED_DEV'}.png") && ( -e "/srv/web/ipfire/html/graphs/qos-graph-$qossettings{'IMQ_DEV'}.png")) { print < - + + END ;} print "\t"; @@ -795,8 +802,8 @@ END print "$message"; } if ( $qossettings{'EDIT'} eq 'yes' ) { - print ""; - print ""; + print ""; + print ""; } print <Geben sie die Daten ein
und klicken Sie danach auf Speichern. @@ -875,7 +882,7 @@ END   $Lang::tr{'remark'}: - blob +       @@ -994,11 +1001,11 @@ END print <  Quell-IP-Adresse: - +   Ziel-IP-Adresse: - - + + END ; @@ -1031,17 +1038,17 @@ END print <  Quell-Port: - +   Ziel-Port: - +   Quell-IP-Adresse: - +   Ziel-IP-Adresse: - - + + END ; @@ -1064,11 +1071,11 @@ END print <Aktuelle Klasse: $qossettings{'CLASS'} Aktivieren oder deaktivieren sie die TOS-Bits
und klicken Sie danach auf Speichern. - Minimale Verzoegerung (8) - Maximaler Durchsatz (4) - Maximale Zuverlaessigkeit (2) - Minimale Kosten (1) - + Minimale Verzoegerung (8) + Maximaler Durchsatz (4) + Maximale Zuverlaessigkeit (2) + Minimale Kosten (1) + END ; @@ -1122,24 +1129,24 @@ sub showclasses {
- - - + + +
- - - + + +
- - - + + +
- - - + + +
@@ -1222,24 +1229,24 @@ END
- - - - - - - - + + + + + + + +
- - - - - - - - + + + + + + + +
END @@ -1283,18 +1290,18 @@ END
- - - - - + + + + +
- - - - - + + + + +
END @@ -1305,7 +1312,7 @@ END if ( -e "/srv/web/ipfire/html/graphs/class_$qossettings{'CLASSPRFX'}-$qossettings{'CLASS'}_$qossettings{'DEV'}-packets.png") { print < + END ; } @@ -1327,19 +1334,19 @@ END
- - - + + +
- - - + + +
- - - + + +
END @@ -1363,13 +1370,13 @@ sub expert
MTU: - + Diese Einstellung aendert die MTU nicht global sondern nur fuer das QoS.
Queue Laenge: - +  
SFQ Perturb: - +