maint.mk: provide "make upload" to ease uploading
[gnulib.git] / tests / test-getloadavg.c
blob39a8375474e10fa3270a5d7fd63c956e2ee76657
1 /* Test of getting load average.
2 Copyright (C) 2011-2012 Free Software Foundation, Inc.
4 This program is free software: you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 3 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program. If not, see <http://www.gnu.org/licenses/>. */
17 #include <config.h>
19 #include <stdlib.h>
21 #include "signature.h"
22 SIGNATURE_CHECK (getloadavg, int, (double [], int));
24 #include <errno.h>
25 #include <stdio.h>
26 #include <unistd.h>
28 static void
29 check_avg (int minutes, double avg, int printit)
31 if (printit)
32 printf ("%d-minute: %f ", minutes, avg);
33 else
35 /* Plausibility checks. */
36 if (avg < 0.01)
37 printf ("suspiciously low %d-minute average: %f\n", minutes, avg);
38 if (avg > 1000000)
39 printf ("suspiciously high %d-minute average: %f\n", minutes, avg);
41 if (avg < 0 || avg != avg)
42 exit (minutes);
45 /* This program can also be used as a manual test, by invoking it with
46 an argument; it then prints the load average. If the argument is
47 nonzero, the manual test repeats forever, sleeping for the stated
48 interval between each iteration. */
49 int
50 main (int argc, char **argv)
52 int naptime = 0;
54 if (argc > 1)
55 naptime = atoi (argv[1]);
57 while (1)
59 double avg[3];
60 int loads = getloadavg (avg, 3);
61 if (loads == -1)
63 if (! (errno == ENOSYS || errno == ENOTSUP || errno == ENOENT))
64 return 1;
65 perror ("Skipping test; load average not supported");
66 return 77;
68 if (loads > 0)
69 check_avg (1, avg[0], argc > 1);
70 if (loads > 1)
71 check_avg (5, avg[1], argc > 1);
72 if (loads > 2)
73 check_avg (15, avg[1], argc > 1);
74 if (loads > 0 && argc > 1)
75 putchar ('\n');
77 if (naptime == 0)
78 break;
79 sleep (naptime);
82 return 0;