blob: f09c2c86c7f17f72445009cdbd805a0e3bbb446b [file] [log] [blame]
whrb973f2b2000-05-05 19:34:50 +00001/*
2 * Copyright (c) 2000 Silicon Graphics, Inc. All Rights Reserved.
3 *
4 * This program is free software; you can redistribute it and/or modify it
5 * under the terms of version 2 of the GNU General Public License as
6 * published by the Free Software Foundation.
7 *
8 * This program is distributed in the hope that it would be useful, but
9 * WITHOUT ANY WARRANTY; without even the implied warranty of
10 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
11 *
12 * Further, this software is distributed without any warranty that it is
13 * free of the rightful claim of any third person regarding infringement
14 * or the like. Any license provided herein, whether implied or
15 * otherwise, applies only to this software file. Patent licenses, if
16 * any, provided herein do not apply to combinations of this program with
17 * other software, or any other product whatsoever.
18 *
19 * You should have received a copy of the GNU General Public License along
20 * with this program; if not, write the Free Software Foundation, Inc., 59
21 * Temple Place - Suite 330, Boston MA 02111-1307, USA.
22 *
23 * Contact information: Silicon Graphics, Inc., 1600 Amphitheatre Pkwy,
24 * Mountain View, CA 94043, or:
25 *
26 * http://www.sgi.com
27 *
28 * For further information regarding this notice, see:
29 *
30 * http://oss.sgi.com/projects/GenInfo/NoticeExplan/
31 */
32#include <stdio.h>
33#include <sys/param.h>
34#include <string.h> /* memset */
35#include <stdlib.h> /* rand */
alaffincc2e5552000-07-27 17:13:18 +000036#include "databin.h"
whrb973f2b2000-05-05 19:34:50 +000037
38#if UNIT_TEST
39#include <malloc.h>
40#endif
41
42static char Errmsg[80];
43
whrb973f2b2000-05-05 19:34:50 +000044void
45databingen (mode, buffer, bsize, offset)
46int mode; /* either a, c, r, o, z or C */
47unsigned char *buffer; /* buffer pointer */
48int bsize; /* size of buffer */
49int offset; /* offset into the file where buffer starts */
50{
51int ind;
52
53 switch (mode)
54 {
55 default:
56 case 'a': /* alternating bit pattern */
57 memset(buffer,0x55,bsize);
58 break;
59
60 case 'c': /* checkerboard pattern */
61 memset(buffer,0xf0,bsize);
62 break;
63
64 case 'C': /* */
65 for (ind=0;ind< bsize;ind++) {
66 buffer[ind] = ((offset+ind)%8 & 0177);
67 }
68 break;
69
70 case 'o':
71 memset(buffer,0xff,bsize);
72 break;
73
74 case 'z':
75 memset(buffer,0x0,bsize);
76 break;
77
78 case 'r': /* random */
79 for (ind=0;ind< bsize;ind++) {
80 buffer[ind] = (rand () & 0177) | 0100;
81 }
82 }
83}
84
85/***********************************************************************
86 *
87 * return values:
88 * >= 0 : error at byte offset into the file, offset+buffer[0-(bsize-1)]
89 * < 0 : no error
90 ***********************************************************************/
91int
92databinchk(mode, buffer, bsize, offset, errmsg)
93int mode; /* either a, c, r, z, o, or C */
94unsigned char *buffer; /* buffer pointer */
95int bsize; /* size of buffer */
96int offset; /* offset into the file where buffer starts */
97char **errmsg;
98{
99 int cnt;
100 unsigned char *chr;
101 int total;
102 long expbits;
103 long actbits;
104
105 chr=buffer;
106 total=bsize;
107
108 if ( errmsg != NULL ) {
109 *errmsg = Errmsg;
110 }
111
112 switch (mode)
113 {
114 default:
115 case 'a': /* alternating bit pattern */
116 expbits=0x55;
117 break;
118
119 case 'c': /* checkerboard pattern */
120 expbits=0xf0;
121 break;
122
123 case 'C': /* counting pattern */
124 for (cnt=0;cnt< bsize;cnt++) {
125 expbits = ((offset+cnt)%8 & 0177);
126
127 if ( buffer[cnt] != expbits ) {
128 sprintf(Errmsg,
129 "data mismatch at offset %d, exp:%#lo, act:%#o",
130 offset+cnt, expbits, buffer[cnt]);
131 return offset+cnt;
132 }
133 }
134 sprintf(Errmsg, "all %d bytes match desired pattern", bsize);
135 return -1;
136
137 case 'o':
138 expbits=0xff;
139 break;
140
141 case 'z':
142 expbits=0;
143 break;
144
145 case 'r':
146 return -1; /* no check can be done for random */
147 }
148
149 for (cnt=0; cnt<bsize; chr++, cnt++) {
150 actbits = (long)*chr;
151
152 if ( actbits != expbits ) {
153 sprintf(Errmsg, "data mismatch at offset %d, exp:%#lo, act:%#lo",
154 offset+cnt, expbits, actbits);
155 return offset+cnt;
156 }
157 }
158
159 sprintf(Errmsg, "all %d bytes match desired pattern", bsize);
160 return -1; /* all ok */
161}
162
163#if UNIT_TEST
164
165/***********************************************************************
166 * main for doing unit testing
167 ***********************************************************************/
168int
169main(ac, ag)
170int ac;
171char **ag;
172{
173
174 int size=1023;
175 int offset;
176 int number;
177 unsigned char *buffer;
178 int ret;
179 char *errmsg;
180
181 if ((buffer=(unsigned char *)malloc(size)) == NULL ) {
182 perror("malloc");
183 exit(2);
184 }
185
186
187printf("***** for a ****************************\n");
188 databingen('a', buffer, size, 0);
189 printf("databingen('a', buffer, %d, 0)\n", size);
190
191 ret=databinchk('a', buffer, size, 0, &errmsg);
192 printf("databinchk('a', buffer, %d, 0, &errmsg) returned %d: %s\n",
193 size, ret, errmsg);
194 if ( ret == -1 )
195 printf("\tPASS return value of -1 as expected\n");
196 else
197 printf("\tFAIL return value %d, expected -1\n", ret);
198
199 offset=232400;
200 ret=databinchk('a', &buffer[1], size-1, offset, &errmsg);
201 printf("databinchk('a', &buffer[1], %d, %d, &errmsg) returned %d: %s\n",
202 size, offset, ret, errmsg);
203 if ( ret == -1 )
204 printf("\tPASS return value of -1 as expected\n");
205 else
206 printf("\tFAIL return value %d, expected -1\n", ret);
207
208 buffer[15]= 0x0;
209 printf("changing char 15 (offset (%d+15) = %d) to 0x0\n", offset, offset+15);
210 number=offset+15;
211
212 ret=databinchk('a', &buffer[1], size-1, offset+1, &errmsg);
213 printf("databinchk('a', &buffer[1], %d, %d, &errmsg) returned %d: %s\n",
214 size-1, offset+1, ret, errmsg);
215 if ( ret == number )
216 printf("\tPASS return value of %d as expected\n", number);
217 else
218 printf("\tFAIL return value %d, expected %d\n", ret, number);
219
220
221
222printf("***** for c ****************************\n");
223 databingen('c', buffer, size, 0);
224 printf("databingen('c', buffer, %d, 0)\n", size);
225
226 ret=databinchk('c', buffer, size, 0, &errmsg);
227 printf("databinchk('c', buffer, %d, 0, &errmsg) returned %d: %s\n",
228 size, ret, errmsg);
229 if ( ret == -1 )
230 printf("\tPASS return value of -1 as expected\n");
231 else
232 printf("\tFAIL return value %d, expected -1\n", ret);
233
234 offset=232400;
235 ret=databinchk('c', &buffer[1], size-1, offset, &errmsg);
236 printf("databinchk('c', &buffer[1], %d, %d, &errmsg) returned %d: %s\n",
237 size, offset, ret, errmsg);
238 if ( ret == -1 )
239 printf("\tPASS return value of -1 as expected\n");
240 else
241 printf("\tFAIL return value %d, expected -1\n", ret);
242
243 buffer[15]= 0x0;
244 printf("changing char 15 (offset (%d+15) = %d) to 0x0\n", offset, offset+15);
245 number=offset+15;
246
247 ret=databinchk('c', &buffer[1], size-1, offset+1, &errmsg);
248 printf("databinchk('c', &buffer[1], %d, %d, &errmsg) returned %d: %s\n",
249 size-1, offset+1, ret, errmsg);
250 if ( ret == number )
251 printf("\tPASS return value of %d as expected\n", number);
252 else
253 printf("\tFAIL return value %d, expected %d\n", ret, number);
254
255printf("***** for C ****************************\n");
256
257 databingen('C', buffer, size, 0);
258 printf("databingen('C', buffer, %d, 0)\n", size);
259
260 ret=databinchk('C', buffer, size, 0, &errmsg);
261 printf("databinchk('C', buffer, %d, 0, &errmsg) returned %d: %s\n",
262 size, ret, errmsg);
263 if ( ret == -1 )
264 printf("\tPASS return value of -1 as expected\n");
265 else
266 printf("\tFAIL return value %d, expected -1\n", ret);
267
268 offset=18;
269 ret=databinchk('C', &buffer[18], size-18, 18, &errmsg);
270 printf("databinchk('C', &buffer[18], %d, 18, &errmsg) returned %d: %s\n",
271 size-18, ret, errmsg);
272 if ( ret == -1 )
273 printf("\tPASS return value of -1 as expected\n");
274 else
275 printf("\tFAIL return value %d, expected -1\n", ret);
276
277 buffer[20]= 0x0;
278 buffer[21]= 0x0;
279 printf("changing char 20 and 21 to 0x0 (offset %d and %d)\n", 20,
280 21);
281
282 ret=databinchk('C', &buffer[18], size-18, 18, &errmsg);
283 printf("databinchk('C', &buffer[18], %d, 18, &errmsg) returned %d: %s\n",
284 size-18, ret, errmsg);
285
286 if ( ret == 20 || ret == 21 )
287 printf("\tPASS return value of %d or %d as expected\n",
288 20, 21);
289 else
290 printf("\tFAIL return value %d, expected %d or %d\n", ret,
291 20, 21 );
292
293 exit(0);
294
295}
296
297#endif
298