commit 4b49a59e71e1f117dbbaeb82a1083406045128d9
Author: Kornel Benko <[email protected]>
Date:   Sat Jan 2 11:29:11 2016 +0100

    Cmake URL tests: Interpret 'Error 404' in received data as error.

diff --git a/development/checkurls/CheckURL.pm 
b/development/checkurls/CheckURL.pm
index 8403c5d..2601e95 100755
--- a/development/checkurls/CheckURL.pm
+++ b/development/checkurls/CheckURL.pm
@@ -70,9 +70,14 @@ sub check_http_url($$$$)
   my $buf;
   my $n = $s->read_entity_body($buf, 1024);
   if (! defined($n)) {
-    print " Read from \"$protocol://$host$getp\" failed";
+    print " Read from \"$protocol://$host$getp\" ";
     return 3;
   }
+  if ($buf =~ /\<title\>Error 404\<\/title\>/) {
+    print " Page reports 'Error 404' from \"$protocol://$host$getp\" ";
+    return 3;
+  }
+  return 0;
 }
 
 # Returns ($err, $isdir)

Reply via email to