usd: Make test program build again
[openafs.git] / src / usd / test / usd_test.c
1 /*
2  * Copyright 2000, International Business Machines Corporation and others.
3  * All Rights Reserved.
4  * 
5  * This software has been released under the terms of the IBM Public
6  * License.  For details, see the LICENSE file in the top-level source
7  * directory or online at http://www.openafs.org/dl/license10.html
8  */
9
10
11 /* usd_test.c: Tests the usd library by opening a tape device,
12  *         writing a few blocks of data to it, doing a fsf, bsf
13  */
14 #include <afsconfig.h>
15 #include <afs/param.h>
16
17 #include <stdio.h>
18 #include <stdlib.h>
19
20 #include <afs/usd.h>
21 #ifdef AFS_NT40_ENV
22 #include <windows.h>
23 #include <winbase.h>
24 #endif
25
26 static char *whoami;
27 usd_handle_t hTape;
28
29 #define USDTEST_DEBUG        0  /* set to 1, to print tape pos info */
30
31 static int err_exit(char *action, char *msg, int rcode);
32 static int bufeql(char *buf1, char *buf2, int size);
33 static int Rewind(usd_handle_t hTape);
34 static int WriteEOF(usd_handle_t hTape, int cnt);
35 static int ForwardSpace(usd_handle_t hTape, int cnt);
36 static int BackSpace(usd_handle_t hTape, int cnt);
37 static int PrepTape(usd_handle_t hTape);
38 static int ShutdownTape(usd_handle_t hTape);
39 static int PrintTapePos(usd_handle_t hTape);
40
41 int
42 main(int argc, char **argv)
43 {
44     int rcode;
45     afs_uint32 xferd;
46     char *filename = argv[1];
47     char buf1[1024], buf2[1024];
48     int i;
49
50     whoami = argv[0];
51     if (argc < 2) {
52         printf(" Usage: %s <tape device name>\n", whoami);
53         exit(1);
54     }
55     rcode =
56         usd_Open(filename, (USD_OPEN_RDWR | USD_OPEN_WLOCK), 0777, &hTape);
57
58     if (rcode) {
59         printf("%s:Can't open device. Err %d\n", whoami, rcode);
60         return 1;
61     }
62     PrepTape(hTape);
63
64     Rewind(hTape);
65     Rewind(hTape);
66     Rewind(hTape);
67     PrintTapePos(hTape);
68     /* Write test - write 10 blocks of random data */
69     printf("%s: Beginning Write Test\n", whoami);
70     i = 10;
71     for (i = 0; i < 10; i++) {
72         rcode = USD_WRITE(hTape, buf1, 1024, &xferd);
73         if (rcode || xferd != 1024) {
74             printf("%s: Write test failed. Err %d\n", whoami, rcode);
75             return 1;
76         }
77         PrintTapePos(hTape);
78     }
79
80     WriteEOF(hTape, 1);
81
82     PrintTapePos(hTape);
83     printf("%s: Write Test Passed.\n", whoami);
84
85     Rewind(hTape);
86     printf("%s: Rewind Test passed\n", whoami);
87     PrintTapePos(hTape);
88
89     /* Read test - read the 10 blocks written */
90     printf("%s: Beginning read test\n", whoami);
91     for (i = 0; i < 10; i++) {
92         rcode = USD_READ(hTape, buf2, 1024, &xferd);
93         err_exit("read", "Read Test Failed", rcode);
94         PrintTapePos(hTape);
95         if (xferd != 1024)
96             err_exit("read", "Read Test Failed. Wrong no. of bytes read.", 1);
97         if (bufeql(buf1, buf2, 1024) == 0) {
98             printf("%s: Read test failed\n", whoami);
99             exit(1);
100         }
101     }
102     printf("%s: Read Test passed\n", whoami);
103
104     Rewind(hTape);
105     PrintTapePos(hTape);
106     /* WEOF - Test */
107     for (i = 0; i < 5; i++) {
108         /* write data block */
109         *buf1 = i;
110         rcode = USD_WRITE(hTape, buf1, 1024, &xferd);
111         err_exit("Write", "Write EOF Test Failed", rcode);
112
113         /* write EOF mark */
114         rcode = WriteEOF(hTape, 1);
115         err_exit("WEOF", "Write EOF Test Failed", rcode);
116         PrintTapePos(hTape);
117     }
118     printf("%s: WEOF Test passed\n", whoami);
119
120     Rewind(hTape);
121     /* fsf/bsf test */
122     ForwardSpace(hTape, 2);
123     PrintTapePos(hTape);
124     rcode = USD_READ(hTape, buf2, 1024, &xferd);
125     err_exit("read", "FSF Test Failed", rcode);
126     if (*buf2 != 2)
127         err_exit("FSF", "FSF Test Failed", 1);
128
129     ForwardSpace(hTape, 2);
130     PrintTapePos(hTape);
131     rcode = USD_READ(hTape, buf2, 1024, &xferd);
132     err_exit("read", "FSF Test Failed", rcode);
133     if (*buf2 != 4)
134         err_exit("FSF", "FSF Test Failed", 1);
135
136     printf("%s: FSF Test passed\n", whoami);
137
138     BackSpace(hTape, 4);
139     ForwardSpace(hTape, 1);
140     rcode = USD_READ(hTape, buf2, 1024, &xferd);
141     err_exit("read", "FSF Test Failed", rcode);
142     if (*buf2 != 1)
143         err_exit("BSF", "FSF Test Failed", 1);
144
145     printf("%s: BSF Test Passed\n", whoami);
146
147     ShutdownTape(hTape);
148     rcode = USD_CLOSE(hTape);
149     if (rcode) {
150         printf("%s:Can't close device. Err %d\n", whoami, rcode);
151         return 1;
152     }
153     printf("%s: usd library, all tests passed!\n", whoami);
154
155     return 0;
156 }
157
158
159 static int
160 err_exit(char *action, char *msg, int rcode)
161 {
162     if (!rcode)
163         return 0;
164     printf("%s:Can't %s device. Err %d\n %s \n", whoami, action, rcode, msg);
165
166     /* Now shutdown and close the tape */
167     ShutdownTape(hTape);
168     rcode = USD_CLOSE(hTape);
169     if (rcode) {
170         printf("%s:Can't close device. Err %d\n", whoami, rcode);
171         return 1;
172     }
173     exit(1);
174 }
175
176
177 static int
178 bufeql(char *buf1, char *buf2, int size)
179 {
180     while (size--) {
181         if (*buf1 != *buf2)
182             return 0;
183
184         ++buf1;
185         ++buf2;
186     }
187     return 1;
188 }
189
190
191 static int
192 Rewind(usd_handle_t hTape)
193 {
194     usd_tapeop_t tapeop;
195     int rcode;
196
197     tapeop.tp_op = USDTAPE_REW;
198     tapeop.tp_count = 1;
199     rcode = USD_IOCTL(hTape, USD_IOCTL_TAPEOPERATION, (void *)&tapeop);
200     err_exit("rewind", "Rewind Test Failed", rcode);
201     return 0;
202 }
203
204 static int
205 WriteEOF(usd_handle_t hTape, int cnt)
206 {
207     usd_tapeop_t tapeop;
208     int rcode;
209
210     tapeop.tp_op = USDTAPE_WEOF;
211     tapeop.tp_count = cnt;
212     rcode = USD_IOCTL(hTape, USD_IOCTL_TAPEOPERATION, (void *)&tapeop);
213     err_exit("rewind", "Rewind Test Failed", rcode);
214     return 0;
215 }
216
217 static int
218 ForwardSpace(usd_handle_t hTape, int cnt)
219 {
220     usd_tapeop_t tapeop;
221     int rcode;
222
223     tapeop.tp_op = USDTAPE_FSF;
224     tapeop.tp_count = cnt;
225     rcode = USD_IOCTL(hTape, USD_IOCTL_TAPEOPERATION, (void *)&tapeop);
226     err_exit("FSF", "FSF Test Failed", rcode);
227     return 0;
228 }
229
230 static int
231 BackSpace(usd_handle_t hTape, int cnt)
232 {
233     usd_tapeop_t tapeop;
234     int rcode;
235
236     tapeop.tp_op = USDTAPE_BSF;
237     tapeop.tp_count = cnt;
238     rcode = USD_IOCTL(hTape, USD_IOCTL_TAPEOPERATION, (void *)&tapeop);
239     err_exit("BSF", "BSF Test Failed", rcode);
240     return 0;
241 }
242
243 static int
244 PrepTape(usd_handle_t hTape)
245 {
246     usd_tapeop_t tapeop;
247     int rcode;
248
249     tapeop.tp_op = USDTAPE_PREPARE;
250     tapeop.tp_count = 0;
251     rcode = USD_IOCTL(hTape, USD_IOCTL_TAPEOPERATION, (void *)&tapeop);
252     err_exit("PREPARE", "Tape Prepare Test Failed", rcode);
253     return 0;
254 }
255
256
257 static int
258 ShutdownTape(usd_handle_t hTape)
259 {
260     usd_tapeop_t tapeop;
261     int rcode;
262
263     tapeop.tp_op = USDTAPE_SHUTDOWN;
264     tapeop.tp_count = 0;
265     rcode = USD_IOCTL(hTape, USD_IOCTL_TAPEOPERATION, (void *)&tapeop);
266     if (rcode) {                /* can't call err_exit() here for fear of recursion */
267         printf("%s: Tape Shutdown Failed with code %d\n", whoami, rcode);
268         exit(1);
269     }
270     return 0;
271 }
272
273 #ifdef AFS_NT40_ENV
274 static int
275 PrintTapePos(usd_handle_t hTape)
276 {
277     DWORD rcode;
278     DWORD part, offLow, offHi;
279
280     rcode =
281         GetTapePosition(hTape->handle, TAPE_ABSOLUTE_POSITION, &part, &offLow,
282                         &offHi);
283     if (rcode != NO_ERROR)
284         err_exit("GetTapePosition", "Get Tape Pos test Failed", 1);
285
286     if (USDTEST_DEBUG)
287         printf("%s: Cur Tape Block : %d \n", whoami, offLow);
288
289     return (offLow);
290 }
291 #else
292 static int
293 PrintTapePos(usd_handle_t hTape)
294 {
295     afs_hyper_t startOff, stopOff;
296     int rcode;
297
298     hset64(startOff, 0, 0);
299     hset64(stopOff, 0, 0);
300
301     rcode = USD_SEEK(hTape, startOff, SEEK_CUR, &stopOff);
302     err_exit("Seek", "Tape Seek Test Failed", rcode);
303
304     if (USDTEST_DEBUG)
305         printf("%s: Cur Tape Pos : %d bytes\n", whoami, stopOff.low);
306
307     return (stopOff.low);
308 }
309 #endif