From: Laurent Destailleur <eldy@destailleur.fr>
Date: Mon, 6 Feb 2017 03:44:21 +0000 (+0100)
Subject: Add methodurlprot
X-Git-Tag: AWSTATS_7_7~9
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=d101c1724d6ee7df98eab1570a50225b13ea35ca;p=thirdparty%2FAWStats.git

Add methodurlprot
---

diff --git a/wwwroot/cgi-bin/awstats.pl b/wwwroot/cgi-bin/awstats.pl
index 96e0e568..90b1919b 100755
--- a/wwwroot/cgi-bin/awstats.pl
+++ b/wwwroot/cgi-bin/awstats.pl
@@ -9193,7 +9193,7 @@ sub DefinePerlParsingFormat {
 "([^$LogSeparatorWithoutStar]+T[^$LogSeparatorWithoutStar]+)(Z|[-+\.]\\d\\d[:\\.\\dZ]*)?";
 			}
 
-			# Special for methodurl and methodurlnoprot
+			# Special for methodurl, methodurlprot and methodurlnoprot
 			elsif ( $f =~ /%methodurl$/ ) {
 				$pos_method = $i;
 				$i++;
@@ -9202,9 +9202,18 @@ sub DefinePerlParsingFormat {
 				$i++;
 				push @fieldlib, 'url';
 				$PerlParsingFormat .=
-
 #"\\\"([^$LogSeparatorWithoutStar]+) ([^$LogSeparatorWithoutStar]+) [^\\\"]+\\\"";
 "\\\"([^$LogSeparatorWithoutStar]+) ([^$LogSeparatorWithoutStar]+)(?: [^\\\"]+|)\\\"";
+			}
+			elsif ( $f =~ /%methodurlprot$/ ) {
+				$pos_method = $i;
+				$i++;
+				push @fieldlib, 'method';
+				$pos_url = $i;
+				$i++;
+				push @fieldlib, 'url';
+				$PerlParsingFormat .=
+"\\\"([^$LogSeparatorWithoutStar]+) ([^\\\"]+) ([^\\\"]+)\\\"";
 			}
 			elsif ( $f =~ /%methodurlnoprot$/ ) {
 				$pos_method = $i;