git.ozlabs.org Git - ccan/blob - ccan/tal/path/test/run-is_dir.c

   1 #include <ccan/tal/path/path.h>
   2 #include <ccan/tal/path/path.c>
   3 #include <ccan/tap/tap.h>
   4 #include <sys/types.h>
   5 #include <sys/stat.h>
   6 #include <fcntl.h>
   7
   8 int main(void)
   9 {
  10         char cwd[1024], *path, *ctx = tal_strdup(NULL, "ctx");
  11
  12         plan_tests(6);
  13
  14         if (!getcwd(cwd, sizeof(cwd)))
  15                 abort();
  16
  17         unlink("run-is_dir-dir-link");
  18         unlink("run-is_dir-file-link");
  19         unlink("run-is_dir-dir/file");
  20         rmdir("run-is_dir-dir");
  21         if (mkdir("run-is_dir-dir", 0700) != 0)
  22                 abort();
  23         if (symlink("run-is_dir-dir", "run-is_dir-dir-link") != 0)
  24                 abort();
  25         if (symlink("run-is_dir-dir/file", "run-is_dir-file-link") != 0)
  26                 abort();
  27         close(open("run-is_dir-dir/file", O_WRONLY|O_CREAT, 0600));
  28
  29         ok1(path_is_dir("run-is_dir-dir-link"));
  30         ok1(!path_is_dir("run-is_dir-file-link"));
  31         ok1(!path_is_dir("run-is_dir-dir/file"));
  32         ok1(path_is_dir("run-is_dir-dir"));
  33
  34         path = path_join(ctx, cwd, "run-is_dir-dir/file");
  35         ok1(!path_is_dir(path));
  36         ok1(path_is_dir(cwd));
  37
  38         tal_free(ctx);
  39
  40         return exit_status();
  41 }