char ddm_c_rcs_id[] =
    "$Id: ddm.c,v 1.4 2000-06-04 16:33:21 hjp Exp $";
/* 
 * ddm - disk delay monitor
 *
 * chdirs to a list of filesystems (mount points by default) and does
 * the equivalent of an ls -l.
 */

#include <errno.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include <dirent.h>
#include <mntent.h>
#include <sys/stat.h>
#include <sys/time.h>
#include <unistd.h>

#include <ant/da.h>

static double gettimestamp(void) {
    struct timeval tm;

    gettimeofday(&tm, NULL);
    return tm.tv_sec + tm.tv_usec/1E6;
}

int main(int argc, char**argv) {
    char **dirs = NULL;
    char **entries = NULL;

    for (;;) {
	FILE *mtp;
	struct mntent *me;
	double ts; 
	int i;
	int nr_dirs;
	int sleeptime;

	/* Get list of directories 
	 */
	ts = gettimestamp();
	fprintf(stderr, "%s: %.6f: open %s\n", argv[0], ts, MNTTAB);
	if ((mtp = setmntent(MNTTAB, "r")) == NULL) {
	    fprintf(stderr, "%s: cannot open %s: %s\n",
		    argv[0], MNTTAB, strerror(errno));
	    exit(1);
	}
	for (i = 0;(me = getmntent(mtp)); i++) {
	    DA_MKIND_INI(dirs, i, NULL);
	    if (dirs[i]) free(dirs[i]);
	    dirs[i] = strdup(me->mnt_dir);
	    ts = gettimestamp();
	    fprintf(stderr, "%s: %.6f: mountpoint %s\n",
		    argv[0], ts, dirs[i]);
	}
	endmntent(mtp);

	nr_dirs = i;

	/* Now read them
	 */
	for (i = 0; i < nr_dirs; i++) {
	    int j;
	    int nr_entries;
	    DIR *dp;
	    struct dirent *de;

	    fprintf(stderr, "%s: %.6f: start %s\n",
		    argv[0], gettimestamp(), dirs[i]);
	    if (chdir(dirs[i]) == -1) {
		fprintf(stderr, "%s: %.6f: chdir %s failed: %s\n",
			argv[0], gettimestamp(), dirs[i], strerror(errno));
		continue;
	    }
	    fprintf(stderr, "%s: %.6f: chdir %s ok\n",
		    argv[0], gettimestamp(), dirs[i]);

	    if ((dp = opendir(".")) == NULL) {
		fprintf(stderr, "%s: %.6f: opendir %s failed: %s\n",
			argv[0], gettimestamp(), dirs[i], strerror(errno));
		continue;
	    }
	    for (j = 0;(de = readdir(dp)); j++) {
		DA_MKIND_INI(entries, j, NULL);
		if (entries[j]) free(entries[j]);
		entries[j] = strdup(de->d_name);
		fprintf(stderr, "%s: %.6f: entry %s\n",
			argv[0], gettimestamp(), entries[j]);
	    }
	    closedir(dp);
	    nr_entries = j;

	    for (j = 0; j < nr_entries; j++) {
		struct stat st;
		stat (entries[j], &st);
		fprintf(stderr, "%s: %.6f: stat entry %s\n",
			argv[0], gettimestamp(), entries[j]);
	    }
	}

	chdir("/");

	sleeptime = rand() * 3600.0 / RAND_MAX;
	fprintf(stderr, "%s: %.6f: sleeping %d seconds\n",
		argv[0], gettimestamp(), sleeptime);
	sleep(sleeptime);
    }
	    
	
    return 0;
}

/* 
 * $Log: ddm.c,v $
 * Revision 1.4  2000-06-04 16:33:21  hjp
 * Removed MNTTAB autodetection again as it seems to be already defined.
 * Don't skip rest of mountpoints if one is not accessible.
 * chdir to / while sleeping to avoid blocking automounters
 * increased default sleep interval to 1 hour max.
 *
 * Revision 1.3  2000/06/04 16:19:00  hjp
 * Fixed order of args in fprintf (segfault).
 *
 * Revision 1.2  2000/06/04 16:11:12  hjp
 * Added autodetection of /etc/m(nt)?tab.
 *
 * Revision 1.1  2000/06/04 15:53:19  hjp
 * Pre-Version. Options are still missing.
 *
 */