]> CyberLeo.Net >> Repos - FreeBSD/releng/8.1.git/blob - tools/regression/acct/pack.c
Copy stable/8 to releng/8.1 in preparation for 8.1-RC1.
[FreeBSD/releng/8.1.git] / tools / regression / acct / pack.c
1 /*-
2  * Copyright (c) 2007 Diomidis Spinellis. All rights reserved.
3  * Redistribution and use in source and binary forms, with or without
4  * modification, are permitted provided that the following conditions
5  * are met:
6  * 1. Redistributions of source code must retain the above copyright
7  *    notice, this list of conditions and the following disclaimer.
8  * 2. Redistributions in binary form must reproduce the above copyright
9  *    notice, this list of conditions and the following disclaimer in the
10  *    documentation and/or other materials provided with the distribution.
11  *
12  * THIS SOFTWARE IS PROVIDED BY AUTHOR AND CONTRIBUTORS ``AS IS'' AND
13  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
14  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
15  * ARE DISCLAIMED.  IN NO EVENT SHALL AUTHOR OR CONTRIBUTORS BE LIABLE
16  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
17  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
18  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
19  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
20  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
21  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
22  * SUCH DAMAGE.
23  */
24
25 #include <sys/cdefs.h>
26 __FBSDID("$FreeBSD$");
27
28 #include <assert.h>
29 #include <float.h>
30 #include <math.h>
31 #include <stdio.h>
32 #include <stdlib.h>
33 #include <strings.h>
34
35 #include <sys/time.h>
36 #include <sys/types.h>
37
38 #define KASSERT(val, msg) assert(val)
39
40 typedef u_int32_t comp_t;
41
42 #define AHZ 1000000
43
44 #include "convert.c"
45
46 static int nerr;
47
48 union cf {
49         comp_t c;
50         float f;
51 };
52
53 static void
54 check_result(const char *name, float expected, union cf v)
55 {
56         double eps;
57
58         eps = fabs(expected - v.f) / expected;
59         if (eps > FLT_EPSILON) {
60                 printf("Error in %s\n", name);
61                 printf("Got      0x%08x %12g\n", v.c, v.f);
62                 v.f = expected;
63                 printf("Expected 0x%08x %12g (%.15lg)\n", v.c, v.f, expected);
64                 printf("Epsilon=%lg, rather than %g\n", eps, FLT_EPSILON);
65                 nerr++;
66         }
67 }
68
69 int
70 main(int argc, char *argv[])
71 {
72         union cf v;
73         long l;
74         int i, end;
75         struct timeval tv;
76
77         if (argc == 2) {
78                 /* Loop test */
79                 end = atoi(argv[1]);
80                 for (i = 0; i < end; i++) {
81                         tv.tv_sec = random();
82                         tv.tv_usec = (random() % 1000000);
83                         v.c = encode_timeval(tv);
84                         check_result("encode_timeval",
85                             (float)tv.tv_sec * AHZ + tv.tv_usec, v);
86                         l = random();
87                         v.c = encode_long(l);
88                         check_result("encode_long", l, v);
89                 }
90         } else if (argc == 3) {
91                 /* Single-value timeval/long test */
92                 tv.tv_sec = atol(argv[1]);
93                 tv.tv_usec = atol(argv[2]);
94                 v.c = encode_timeval(tv);
95                 check_result("encode_timeval",
96                     (float)tv.tv_sec * AHZ + tv.tv_usec, v);
97                 v.c = encode_long(tv.tv_sec);
98                 check_result("encode_long", tv.tv_sec, v);
99         } else {
100                 fprintf(stderr, "usage:\n%s repetitions\n%s sec usec\n",
101                     argv[0], argv[0]);
102                 return (1);
103         }
104         return (nerr);
105 }