#include <stdlib.h>
#include <stdio.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <unistd.h>
#include <error.h>
#include <string.h>
#include <hurd.h>


#define RM_SLASH() \
      for (;\
           (p != argv[i]) && (*p == '/');\
           p--);

#define SKIP_TILL_SLASH() \
      for (;\
           (p != argv[i]) && (*p != '/');\
           p--);


int
main (int argc, char *argv[])
{
  error_t err;
  int i;
  struct stat st;

  for (i=1; i<argc; i++)
  {
    printf ("Stats for %s\n", argv[i]);
    err = stat (argv[i], &st);
    if (err)
      error (1, err, "stat() error");
    printf ("st_fstype = 0x%x\n", st.st_fstype);
    printf ("st_fsid   = %i\n", st.st_fsid  );
    printf ("st_dev    = %i\n", st.st_dev   );
    printf ("st_rdev   = %i\n", st.st_rdev  );
    printf ("st_ino    = %i\n", st.st_ino   );
    if (S_ISDIR (st.st_mode))
    {
      /* Compare "foo/dir/.." and "foo". */
      char *same, *p;
      struct stat same_st;

      /* 1st: "foo/dir/.." */
      same = calloc (sizeof (char), strlen (argv[i]) + 4);
      strcpy (same, argv[i]);
      strcat (same, "/..");
      stat (same, &same_st);

      /* 2nd: "foo" */
      p = &argv[i][strlen (argv[i]) - 1];
      RM_SLASH();
      SKIP_TILL_SLASH();
      RM_SLASH();
      *(++p) = '\0';
      stat (argv[i], &st);

      err = (same_st.st_dev != st.st_dev) ||
            (same_st.st_rdev != st.st_rdev) ||
            (same_st.st_ino  != st.st_ino);

      if (err)
      {
	printf("Stats for %s vs %s:\n", argv[i], same);

	if (same_st.st_dev != st.st_dev)
	  printf ("%s vs %s: st_dev=%i vs st_dev=%i\n",
	    argv[i], same, st.st_dev, same_st.st_dev);
	if (same_st.st_rdev != st.st_rdev)
	  printf ("%s vs %s: st_rdev=%i vs st_rdev=%i\n",
	    argv[i], same, st.st_rdev, same_st.st_rdev);
	if (same_st.st_ino != st.st_ino)
	  printf ("%s vs %s: st_ino=%i vs st_ino=%i\n",
	    argv[i], same, st.st_ino, same_st.st_ino);
      }
      free (same);
    }
  }

  return 0;
}