[p5sagit/p5-mst-13.2.git] / ext / SDBM_File / sdbm / dba.c

/*
 * dba	dbm analysis/recovery
 */

#include <stdio.h>
#include <sys/file.h>
#include "EXTERN.h"
#include "sdbm.h"

char *progname;
extern void oops();

int
main(int argc, char **argv)
{
	int n;
	char *p;
	char *name;
	int pagf;

	progname = argv[0];

	if (p = argv[1]) {
		name = (char *) malloc((n = strlen(p)) + 5);
		if (!name)
		    oops("cannot get memory");

		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;
}

void
sdump(int pagf)
{
	register b;
	register n = 0;
	register t = 0;
	register o = 0;
	register e;
	char pag[PBLKSIZ];

	while ((b = read(pagf, pag, PBLKSIZ)) > 0) {
		printf("#%d: ", n);
		if (!okpage(pag))
			printf("bad\n");
		else {
			printf("ok. ");
			if (!(e = pagestat(pag)))
			    o++;
			else
			    t += e;
		}
		n++;
	}

	if (b == 0)
		printf("%d pages (%d holes):  %d entries\n", n, o, t);
	else
		oops("read failed: block %d", n);
}

int
pagestat(char *pag)
{
	register n;
	register free;
	register short *ino = (short *) pag;

	if (!(n = ino[0]))
		printf("no entries.\n");
	else {
		free = ino[n] - (n + 1) * sizeof(short);
		printf("%3d entries %2d%% used free %d.\n",
		       n / 2, ((PBLKSIZ - free) * 100) / PBLKSIZ, free);
	}
	return n / 2;
}
Commit	Line	Data
463ee0b2	1	/*
	2	* dba dbm analysis/recovery
	3	*/
	4
	5	#include <stdio.h>
	6	#include <sys/file.h>
17f28c40	7	#include "EXTERN.h"
463ee0b2	8	#include "sdbm.h"
	9
	10	char *progname;
	11	extern void oops();
	12
	13	int
ba106d47	14	main(int argc, char **argv)
463ee0b2	15	{
	16	int n;
	17	char *p;
	18	char *name;
	19	int pagf;
	20
	21	progname = argv[0];
	22
	23	if (p = argv[1]) {
	24	name = (char *) malloc((n = strlen(p)) + 5);
db7c17d7	25	if (!name)
	26	oops("cannot get memory");
	27
463ee0b2	28	strcpy(name, p);
	29	strcpy(name + n, ".pag");
	30
	31	if ((pagf = open(name, O_RDONLY)) < 0)
	32	oops("cannot open %s.", name);
	33
	34	sdump(pagf);
	35	}
	36	else
	37	oops("usage: %s dbname", progname);
	38
	39	return 0;
	40	}
	41
ba106d47	42	void
ba106d47	43	sdump(int pagf)
463ee0b2	44	{
	45	register b;
	46	register n = 0;
	47	register t = 0;
	48	register o = 0;
	49	register e;
	50	char pag[PBLKSIZ];
	51
	52	while ((b = read(pagf, pag, PBLKSIZ)) > 0) {
	53	printf("#%d: ", n);
	54	if (!okpage(pag))
	55	printf("bad\n");
	56	else {
	57	printf("ok. ");
	58	if (!(e = pagestat(pag)))
	59	o++;
	60	else
	61	t += e;
	62	}
	63	n++;
	64	}
	65
	66	if (b == 0)
	67	printf("%d pages (%d holes): %d entries\n", n, o, t);
	68	else
	69	oops("read failed: block %d", n);
	70	}
	71
ba106d47	72	int
ba106d47	73	pagestat(char *pag)
463ee0b2	74	{
	75	register n;
	76	register free;
	77	register short ino = (short ) pag;
	78
	79	if (!(n = ino[0]))
	80	printf("no entries.\n");
	81	else {
	82	free = ino[n] - (n + 1) * sizeof(short);
	83	printf("%3d entries %2d%% used free %d.\n",
	84	n / 2, ((PBLKSIZ - free) * 100) / PBLKSIZ, free);
	85	}
	86	return n / 2;
	87	}