no message

diff --git a/wwwroot/cgi-bin/awstats.model.conf b/wwwroot/cgi-bin/awstats.model.conf
index 5e9b82169194ec7e1edc2d5319beecccc5f5fe6d..4fd9ae3669e2bb8078b6af39a267a056381afdd4 100644 (file)
--- a/wwwroot/cgi-bin/awstats.model.conf
+++ b/wwwroot/cgi-bin/awstats.model.conf
@@ -267,7 +267,7 @@ SkipHosts=""
 #  the DNS. You may specify partial addresses (ie 163.85. for everything
 #  behind the usual firewall setup, etc)...
 # This is only useful if DNSLookup=1.
-# Note: Use space between each value and put a backslash before each dot.
+# Note: Use space between each value.
 # Example: "163.85. 201.101.51.2"
 # Default: ""
 #
@@ -493,7 +493,7 @@ DetailedReportsOnNewWindows=1
 # See Lang parameter for list of allowed flag/language codes.
 # If you don't want any flag link, set ShowFlagLinks to "".
 # This parameter is used only if ShowHeader parameter is set to 1.
-# Possible values: "" or "language_codes_separated_by_space".
+# Possible values: "" or "language_codes_separated_by_space"
 # Default: "en es fr it nl es"
 #
 ShowFlagLinks="en fr de it nl es"

diff --git a/wwwroot/cgi-bin/awstats.pl b/wwwroot/cgi-bin/awstats.pl
index c38b1affa56ce82e30ada14284d87081bdc8870f..7d06fd2c4c30d1a33da9f31a5b6a1df8564f840d 100644 (file)
--- a/wwwroot/cgi-bin/awstats.pl
+++ b/wwwroot/cgi-bin/awstats.pl
@@ -25,6 +25,7 @@ use Time::Local;      # use Time::Local 'timelocal_nocheck' is not supported by all T
 #-------------------------------------------------------
 # Defines
 #-------------------------------------------------------
+use vars qw/ $REVISION $VERSION /;
 my $REVISION='$Revision$'; $REVISION =~ /\s(.*)\s/; $REVISION=$1;
 my $VERSION="4.1 (build $REVISION)";
 
@@ -2488,9 +2489,13 @@ sub BuildKeyList {
 #--------------------------------------------------------------------
 # MAIN
 #--------------------------------------------------------------------
+$starttime=time;
+
 if ($ENV{"GATEWAY_INTERFACE"}) {       # Run from a browser
-       #print "Expires: ".(localtime(time()+3600))."\n";
-       print("Content-type: text/html\n\n\n");
+       # $ExpireDelayInHTTPHeader=3600;
+       # print "Expires: ".(localtime($starttime+$ExpireDelayInHTTPHeader)."\n";
+       print "Content-type: text/html\n";
+       print "\n\n";
        if ($ENV{"CONTENT_LENGTH"}) {
                binmode STDIN;
                read(STDIN, $QueryString, $ENV{'CONTENT_LENGTH'});
@@ -2625,7 +2630,6 @@ if ((! $ENV{"GATEWAY_INTERFACE"}) && (! $SiteConfig)) {
 }
 
 # Get current time (time when AWStats is started)
-$starttime=time;
 ($nowsec,$nowmin,$nowhour,$nowday,$nowmonth,$nowyear,$nowwday) = localtime($starttime);
 $nowweekofmonth=int($nowday/7);
 $nowdaymod=$nowday%7;
@@ -4272,9 +4276,10 @@ EOF
                print "<TD><b>".Format_Bytes(int($TotalBytes))."</b><br>($RatioBytes&nbsp;$Message[108]/".lc($Message[12]).")</TD>";
                print "</TR>\n";
                print "<TR valign=bottom><TD colspan=5 align=center><center>";
+
                # Show monthly stats
                print "<TABLE>";
-               print "<TR valign=bottom>";
+               print "<TR valign=bottom><td></td>";
                $max_v=$max_p=$max_h=$max_k=1;
                for (my $ix=1; $ix<=12; $ix++) {
                        my $monthix=$ix; if ($monthix < 10) { $monthix="0$monthix"; }
@@ -4302,17 +4307,35 @@ EOF
                        print "</TD>\n";
                }
                print "</TR>\n";
-               print "<TR>";
+               print "<TR valign=middle cellspacing=0 cellpadding=0><td></td>";
                for (my $ix=1; $ix<=12; $ix++) {
-                       my $monthix=$ix; if ($monthix < 10) { $monthix="0$monthix"; }
-                       print "<TD valign=middle>";
+                       my $monthix=($ix<10?"0$ix":"$ix");
+                       print "<TD>";
                        if ($ENV{"GATEWAY_INTERFACE"} || !$StaticLinks) { print "<a href=\"$AWScript?${NewLinkParams}year=$YearRequired&month=$monthix\">"; }
                        print "$monthlib{$monthix}";
                        if ($ENV{"GATEWAY_INTERFACE"} || !$StaticLinks) { print "</a>"; }
                        print "</TD>\n";
                }
                print "</TR>\n";
+               # Array of values
+#              print "<STYLE TYPE=\"text/css\"><!-- .ROWU { font: 12px arial, verdana, helvetica, sans-serif; color: #$color_u; } --></STYLE>\n";
+#              print "<STYLE TYPE=\"text/css\"><!-- .ROWV { font: 12px arial, verdana, helvetica, sans-serif; color: #$color_v; } --></STYLE>\n";
+#              print "<STYLE TYPE=\"text/css\"><!-- .ROWP { font: 12px arial, verdana, helvetica, sans-serif; color: #$color_p; } --></STYLE>\n";
+#              print "<STYLE TYPE=\"text/css\"><!-- .ROWH { font: 12px arial, verdana, helvetica, sans-serif; color: #$color_h; } --></STYLE>\n";
+#              print "<TR valign=middle><td class=\"ROWU\">$Message[11]</td>";
+#              for (my $ix=1; $ix<=12; $ix++) { my $monthix=($ix<10?"0$ix":"$ix"); print "<TD class=\"ROWU\">$MonthUnique{$YearRequired.$monthix}</TD>\n"; }
+#              print "</TR>\n";
+#              print "<TR valign=middle><td class=\"ROWV\">$Message[10]</td>";
+#              for (my $ix=1; $ix<=12; $ix++) { my $monthix=($ix<10?"0$ix":"$ix"); print "<TD class=\"ROWV\">$MonthVisits{$YearRequired.$monthix}</TD>\n";     }
+#              print "</TR></font>\n";
+#              print "<TR valign=middle><td class=\"ROWP\">$Message[56]</td>";
+#              for (my $ix=1; $ix<=12; $ix++) { my $monthix=($ix<10?"0$ix":"$ix"); print "<TD class=\"ROWP\">$MonthPages{$YearRequired.$monthix}</TD>\n";      }
+#              print "</TR></font>\n";
+#              print "<TR valign=middle><td class=\"ROWH\">$Message[57]</td>";
+#              for (my $ix=1; $ix<=12; $ix++) { my $monthix=($ix<10?"0$ix":"$ix"); print "<TD class=\"ROWH\">$MonthHits{$YearRequired.$monthix}</TD>\n";       }
+#              print "</TR>\n";
                print "</TABLE>\n<br>\n";
+
                # Show daily stats
                print "<TABLE>";
                print "<TR valign=bottom>";