1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
|
/*
* dbd - dump a dbm data file
*/
#include <stdio.h>
#include <sys/file.h>
#include "EXTERN.h"
#include "sdbm.h"
char *progname;
extern void oops();
#define empty(page) (((short *) page)[0] == 0)
int
main(argc, argv)
char **argv;
{
int n;
char *p;
char *name;
int pagf;
progname = argv[0];
if (p = argv[1]) {
name = (char *) malloc((n = strlen(p)) + 5);
strcpy(name, p);
strcpy(name + n, ".pag");
if ((pagf = open(name, O_RDONLY)) < 0)
oops("cannot open %s.", name);
sdump(pagf);
}
else
oops("usage: %s dbname", progname);
return 0;
}
sdump(pagf)
int pagf;
{
register r;
register n = 0;
register o = 0;
char pag[PBLKSIZ];
while ((r = read(pagf, pag, PBLKSIZ)) > 0) {
if (!okpage(pag))
fprintf(stderr, "%d: bad page.\n", n);
else if (empty(pag))
o++;
else
dispage(pag);
n++;
}
if (r == 0)
fprintf(stderr, "%d pages (%d holes).\n", n, o);
else
oops("read failed: block %d", n);
}
#ifdef OLD
dispage(pag)
char *pag;
{
register i, n;
register off;
register short *ino = (short *) pag;
off = PBLKSIZ;
for (i = 1; i < ino[0]; i += 2) {
printf("\t[%d]: ", ino[i]);
for (n = ino[i]; n < off; n++)
putchar(pag[n]);
putchar(' ');
off = ino[i];
printf("[%d]: ", ino[i + 1]);
for (n = ino[i + 1]; n < off; n++)
putchar(pag[n]);
off = ino[i + 1];
putchar('\n');
}
}
#else
dispage(pag)
char *pag;
{
register i, n;
register off;
register short *ino = (short *) pag;
off = PBLKSIZ;
for (i = 1; i < ino[0]; i += 2) {
for (n = ino[i]; n < off; n++)
if (pag[n] != 0)
putchar(pag[n]);
putchar('\t');
off = ino[i];
for (n = ino[i + 1]; n < off; n++)
if (pag[n] != 0)
putchar(pag[n]);
putchar('\n');
off = ino[i + 1];
}
}
#endif
|
