# HG changeset patch
# User Bruno Haible <bruno@clisp.org>
# Date 1297982540 -3600
# Node ID d1eef489f6fa81100c40edee4a6b4c3fdeb69c35
# Parent  e52d28567d4e21640e839c42dccd755629942092
getloadavg test: Add some plausibility checks.

* tests/test-getloadavg.c (check_avg): Print a warning when the value
is improbable.

diff --git a/ChangeLog b/ChangeLog
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2011-02-17  Bruno Haible  <bruno@clisp.org>
+
+	getloadavg test: Add some plausibility checks.
+	* tests/test-getloadavg.c (check_avg): Print a warning when the value
+	is improbable.
+
 2011-02-16  Eric Blake  <eblake@redhat.com>
 
 	maintainer-makefile: make syntax-check a no-op from tarballs
diff --git a/tests/test-getloadavg.c b/tests/test-getloadavg.c
--- a/tests/test-getloadavg.c
+++ b/tests/test-getloadavg.c
@@ -30,6 +30,14 @@
 {
   if (printit)
     printf ("%d-minute: %f  ", minutes, avg);
+  else
+    {
+      /* Plausibility checks.  */
+      if (avg < 0.01)
+        printf ("suspiciously low %d-minute average: %f\n", minutes, avg);
+      if (avg > 1000000)
+        printf ("suspiciously high %d-minute average: %f\n", minutes, avg);
+    }
   if (avg < 0 || avg != avg)
     exit (minutes);
 }