Commit | Line | Data |
---|---|---|
805e021f CE |
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 | #include <afsconfig.h> | |
11 | #include <afs/param.h> | |
12 | ||
13 | #include <roken.h> | |
14 | ||
15 | #define BLKSIZE (4096+24) /* actual block size on our backup tapes */ | |
16 | ||
17 | afs_int32 | |
18 | glong(cp, index) | |
19 | int index; | |
20 | char *cp; | |
21 | { | |
22 | afs_int32 temp; | |
23 | memcpy(&temp, cp + index * 4, sizeof(afs_int32)); | |
24 | return temp; | |
25 | } | |
26 | ||
27 | #include "AFS_component_version_number.c" | |
28 | ||
29 | main(argc, argv) | |
30 | int argc; | |
31 | char **argv; | |
32 | { | |
33 | char tbuffer[10000]; | |
34 | int fd; | |
35 | afs_int32 code; | |
36 | char *lp; | |
37 | afs_int32 count; | |
38 | ||
39 | #ifdef AFS_AIX32_ENV | |
40 | /* | |
41 | * The following signal action for AIX is necessary so that in case of a | |
42 | * crash (i.e. core is generated) we can include the user's data section | |
43 | * in the core dump. Unfortunately, by default, only a partial core is | |
44 | * generated which, in many cases, isn't too useful. | |
45 | */ | |
46 | struct sigaction nsa; | |
47 | ||
48 | sigemptyset(&nsa.sa_mask); | |
49 | nsa.sa_handler = SIG_DFL; | |
50 | nsa.sa_flags = SA_FULLDUMP; | |
51 | sigaction(SIGABRT, &nsa, NULL); | |
52 | sigaction(SIGSEGV, &nsa, NULL); | |
53 | #endif | |
54 | fd = open(argv[1], O_RDONLY, 0); | |
55 | if (fd < 0) { | |
56 | perror("tape open"); | |
57 | exit(1); | |
58 | } | |
59 | for (count = 0;; count++) { | |
60 | code = read(fd, tbuffer, BLKSIZE); | |
61 | if (code == 0) | |
62 | printf("***EOF***\n"); | |
63 | else if (code != BLKSIZE) { | |
64 | printf("failed to read correct number of bytes, read %d\n", code); | |
65 | if (code < 0) | |
66 | perror("read"); | |
67 | exit(1); | |
68 | } else { | |
69 | printf("Block %d is:\n", count); | |
70 | lp = tbuffer; | |
71 | printf("%08x %08x %08x %08x %08x %08x %08x %08x\n", glong(lp, 0), | |
72 | glong(lp, 1), glong(lp, 2), glong(lp, 3), glong(lp, 4), | |
73 | glong(lp, 5), glong(lp, 6), glong(lp, 7)); | |
74 | printf("%08x %08x %08x %08x %08x %08x %08x %08x\n", glong(lp, 8), | |
75 | glong(lp, 9), glong(lp, 10), glong(lp, 11), glong(lp, 12), | |
76 | glong(lp, 13), glong(lp, 14), glong(lp, 15)); | |
77 | } | |
78 | } | |
79 | } |