Blame OLD/main_c.dbg

Packit 6f02de
char psb[64];	/* DEBUG in main()'s declarations */
Packit 6f02de
(void) snpf(psb, sizeof(psb), "/bin/ps -l -p %d", Mypid);	/* DEBUG before the do loop */
Packit 6f02de
DBMon=1;	/* DEBUG in the do loop before gather_proc_info() */
Packit 6f02de
system(psb);	/* DEBUG in the sleep section after fflush() */
Packit 6f02de
/* start DEBUG section after the end of main() */
Packit 6f02de
Packit 6f02de
int DBMon=0;
Packit 6f02de
Packit 6f02de
void *
Packit 6f02de
lsofcalloc(char *f, int l, size_t n, size_t s)
Packit 6f02de
{
Packit 6f02de
#undef	calloc
Packit 6f02de
	void *v;
Packit 6f02de
	v = (void *)calloc(n, s);
Packit 6f02de
	if (DBMon)
Packit 6f02de
	    (void) fprintf(stderr, "MEMa %#x %s:%d calloc(%d, %d)\n",
Packit 6f02de
		v, f, l, n, s);
Packit 6f02de
	return(v);
Packit 6f02de
}
Packit 6f02de
Packit 6f02de
void
Packit 6f02de
lsoffree(char *f, int l, void *p)
Packit 6f02de
{
Packit 6f02de
#undef	free
Packit 6f02de
	(void) free(p);
Packit 6f02de
	if (DBMon)
Packit 6f02de
	    (void) fprintf(stderr, "MEMf %#x %s:%d free\n", p, f, l);
Packit 6f02de
}
Packit 6f02de
Packit 6f02de
void *
Packit 6f02de
lsofmalloc(char *f, int l, size_t s)
Packit 6f02de
{
Packit 6f02de
#undef	malloc
Packit 6f02de
	void *v;
Packit 6f02de
	v = (void *)malloc(s);
Packit 6f02de
	if (DBMon)
Packit 6f02de
	    (void) fprintf(stderr, "MEMa %#x %s:%d malloc(%d)\n", v, f, l, s);
Packit 6f02de
	return(v);
Packit 6f02de
}
Packit 6f02de
Packit 6f02de
void *
Packit 6f02de
lsofrealloc(char *f, int l, void *p, size_t s)
Packit 6f02de
{
Packit 6f02de
#undef	realloc
Packit 6f02de
	void *v;
Packit 6f02de
	v = (void *)realloc(p, s);
Packit 6f02de
	if (DBMon)
Packit 6f02de
	    (void) fprintf(stderr, "MEMr %#x %#x %s:%d realloc(%d)\n",
Packit 6f02de
		p, v, f, l, s);
Packit 6f02de
	return(v);
Packit 6f02de
}
Packit 6f02de
Packit 6f02de
/* end DEBUG section */