Ein Paar Dateien fuer die GPLv3 angepasst.

[ipfire-2.x.git] / html / cgi-bin / network.cgi

diff --git a/html/cgi-bin/network.cgi b/html/cgi-bin/network.cgi
index 1843d796ba14d4c910441187781f30cafc9c1464..1a77bee992ec0f9017bd8dadcd5bd987b0a83952 100644 (file)
--- a/html/cgi-bin/network.cgi
+++ b/html/cgi-bin/network.cgi
@@ -1,18 +1,29 @@
 #!/usr/bin/perl
-#
-# SmoothWall CGIs
-#
-# This code is distributed under the terms of the GPL
-#
-# (c) The SmoothWall Team
-#
-#
+###############################################################################
+#                                                                             #
+# IPFire.org - A linux based firewall                                         #
+# Copyright (C) 2007  Michael Tremer & Christian Schmidt                      #
+#                                                                             #
+# This program is free software: you can redistribute it and/or modify        #
+# it under the terms of the GNU General Public License as published by        #
+# the Free Software Foundation, either version 3 of the License, or           #
+# (at your option) any later version.                                         #
+#                                                                             #
+# This program is distributed in the hope that it will be useful,             #
+# but WITHOUT ANY WARRANTY; without even the implied warranty of              #
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the               #
+# GNU General Public License for more details.                                #
+#                                                                             #
+# You should have received a copy of the GNU General Public License           #
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.       #
+#                                                                             #
+###############################################################################
 
 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";
@@ -54,20 +65,10 @@ if ($cgiparams[1] =~ /red/) {
 
 foreach my $graphname (@graphs) {
 
-  if ($graphname == "lq" )
-  {
-  &Graphs::updatelqgraph("day");
-  &Graphs::updatelqgraph("week");
-  &Graphs::updatelqgraph("month");
-  &Graphs::updatelqgraph("year");
-  }
+  if ($graphname eq "lq" )
+  {  &Graphs::updatelqgraph("day");  }
   else
-  {
-  &Graphs::updateifgraph ($graphname, "day");
-  &Graphs::updateifgraph ($graphname, "week");
-  &Graphs::updateifgraph ($graphname, "month");
-  &Graphs::updateifgraph ($graphname, "year");
-  }
+  {  &Graphs::updateifgraph($graphname, "day");  }
   
        &Header::openbox('100%', 'center', "$graphname $Lang::tr{'graph'}");
        if (-e "$Header::graphdir/${graphname}-day.png") {
@@ -85,7 +86,7 @@ foreach my $graphname (@graphs) {
 
 if ($cgiparams[1] =~ /red/) {
        
-       if ( $netsettings{'CONFIG_TYPE'} =~ /^(2|3|6|7)$/  && $netsettings{'RED_TYPE'} eq "DHCP") {
+       if ( $netsettings{'CONFIG_TYPE'} =~ /^(1|2|3|4)$/  && $netsettings{'RED_TYPE'} eq "DHCP") {
 
                &Header::openbox('100%', 'left', "RED $Lang::tr{'dhcp configuration'}");
                if (-s "${General::swroot}/dhcpc/dhcpcd-$netsettings{'RED_DEV'}.info") {