/* * This file Copyright (C) 2013-2014 Mnemosyne LLC * * It may be used under the GNU GPL versions 2 or 3 * or any future license endorsed by Mnemosyne LLC. * * $Id$ */ #include #ifndef _WIN32 #include #include #include #else #include #endif #include "transmission.h" #include "error.h" #include "file.h" #include "libtransmission-test.h" #ifndef _WIN32 #define NATIVE_PATH_SEP "/" #else #define NATIVE_PATH_SEP "\\" #endif static tr_session * session; static char * create_test_dir (const char * name) { char * const test_dir = tr_buildPath (tr_sessionGetConfigDir (session), name, NULL); tr_sys_dir_create (test_dir, 0, 0777, NULL); return test_dir; } static bool create_symlink (const char * dst_path, const char * src_path, bool dst_is_dir) { #ifndef _WIN32 (void) dst_is_dir; return symlink (src_path, dst_path) != -1; #else wchar_t * wide_src_path; wchar_t * wide_dst_path; bool ret = false; wide_src_path = tr_win32_utf8_to_native (src_path, -1); wide_dst_path = tr_win32_utf8_to_native (dst_path, -1); ret = CreateSymbolicLinkW (wide_dst_path, wide_src_path, dst_is_dir ? SYMBOLIC_LINK_FLAG_DIRECTORY : 0); tr_free (wide_dst_path); tr_free (wide_src_path); return ret; #endif } static bool create_hardlink (const char * dst_path, const char * src_path) { #ifndef _WIN32 return link (src_path, dst_path) != -1; #else wchar_t * wide_src_path = tr_win32_utf8_to_native (src_path, -1); wchar_t * wide_dst_path = tr_win32_utf8_to_native (dst_path, -1); bool ret = CreateHardLinkW (wide_dst_path, wide_src_path, NULL); tr_free (wide_dst_path); tr_free (wide_src_path); return ret; #endif } static void clear_path_info (tr_sys_path_info * info) { info->type = (tr_sys_path_type_t) -1; info->size = (uint64_t) -1; info->last_modified_at = (time_t) -1; } static bool path_contains_no_symlinks (const char * path) { const char * p = path; while (*p != '\0') { tr_sys_path_info info; char * pathPart; const char * slashPos = strchr (p, '/'); #ifdef _WIN32 const char * backslashPos = strchr (p, '\\'); if (slashPos == NULL || (backslashPos != NULL && backslashPos < slashPos)) slashPos = backslashPos; #endif if (slashPos == NULL) slashPos = p + strlen (p) - 1; pathPart = tr_strndup (path, slashPos - path + 1); if (!tr_sys_path_get_info (pathPart, TR_SYS_PATH_NO_FOLLOW, &info, NULL) || (info.type != TR_SYS_PATH_IS_FILE && info.type != TR_SYS_PATH_IS_DIRECTORY)) { tr_free (pathPart); return false; } tr_free (pathPart); p = slashPos + 1; } return true; } static bool validate_permissions (const char * path, unsigned int permissions) { #ifndef _WIN32 struct stat sb; return stat (path, &sb) != -1 && (sb.st_mode & 0777) == permissions; #else (void) path; (void) permissions; /* No UNIX permissions on Windows */ return true; #endif } static int test_get_info (void) { char * const test_dir = create_test_dir (__FUNCTION__); tr_sys_path_info info; tr_sys_file_t fd; tr_error * err = NULL; char * path1, * path2; time_t t; path1 = tr_buildPath (test_dir, "a", NULL); path2 = tr_buildPath (test_dir, "b", NULL); /* Can't get info of non-existent file/directory */ check (!tr_sys_path_get_info (path1, 0, &info, &err)); check (err != NULL); tr_error_clear (&err); t = time (NULL); libtest_create_file_with_string_contents (path1, "test"); /* Good file info */ clear_path_info (&info); check (tr_sys_path_get_info (path1, 0, &info, &err)); check (err == NULL); check_int_eq (TR_SYS_PATH_IS_FILE, info.type); check_int_eq (4, info.size); check (info.last_modified_at >= t && info.last_modified_at <= time (NULL)); /* Good file info (by handle) */ fd = tr_sys_file_open (path1, TR_SYS_FILE_READ, 0, NULL); clear_path_info (&info); check (tr_sys_file_get_info (fd, &info, &err)); check (err == NULL); check_int_eq (TR_SYS_PATH_IS_FILE, info.type); check_int_eq (4, info.size); check (info.last_modified_at >= t && info.last_modified_at <= time (NULL)); tr_sys_file_close (fd, NULL); tr_sys_path_remove (path1, NULL); /* Good directory info */ t = time (NULL); tr_sys_dir_create (path1, 0, 0777, NULL); clear_path_info (&info); check (tr_sys_path_get_info (path1, 0, &info, &err)); check (err == NULL); check_int_eq (TR_SYS_PATH_IS_DIRECTORY, info.type); check (info.size != (uint64_t) -1); check (info.last_modified_at >= t && info.last_modified_at <= time (NULL)); tr_sys_path_remove (path1, NULL); if (create_symlink (path1, path2, false)) { /* Can't get info of non-existent file/directory */ check (!tr_sys_path_get_info (path1, 0, &info, &err)); check (err != NULL); tr_error_clear (&err); t = time (NULL); libtest_create_file_with_string_contents (path2, "test"); /* Good file info */ clear_path_info (&info); check (tr_sys_path_get_info (path1, 0, &info, &err)); check (err == NULL); check_int_eq (TR_SYS_PATH_IS_FILE, info.type); check_int_eq (4, info.size); check (info.last_modified_at >= t && info.last_modified_at <= time (NULL)); /* Good file info (by handle) */ fd = tr_sys_file_open (path1, TR_SYS_FILE_READ, 0, NULL); clear_path_info (&info); check (tr_sys_file_get_info (fd, &info, &err)); check (err == NULL); check_int_eq (TR_SYS_PATH_IS_FILE, info.type); check_int_eq (4, info.size); check (info.last_modified_at >= t && info.last_modified_at <= time (NULL)); tr_sys_file_close (fd, NULL); tr_sys_path_remove (path2, NULL); /* Good directory info */ t = time (NULL); tr_sys_dir_create (path2, 0, 0777, NULL); clear_path_info (&info); check (tr_sys_path_get_info (path1, 0, &info, &err)); check (err == NULL); check_int_eq (TR_SYS_PATH_IS_DIRECTORY, info.type); check (info.size != (uint64_t) -1); check (info.last_modified_at >= t && info.last_modified_at <= time (NULL)); tr_sys_path_remove (path2, NULL); tr_sys_path_remove (path1, NULL); } else { fprintf (stderr, "WARNING: [%s] unable to run symlink tests\n", __FUNCTION__); } tr_free (path2); tr_free (path1); tr_free (test_dir); return 0; } static int test_path_exists (void) { char * const test_dir = create_test_dir (__FUNCTION__); tr_error * err = NULL; char * path1, * path2; path1 = tr_buildPath (test_dir, "a", NULL); path2 = tr_buildPath (test_dir, "b", NULL); /* Non-existent file does not exist */ check (!tr_sys_path_exists (path1, &err)); check (err == NULL); /* Create file and see that it exists */ libtest_create_file_with_string_contents (path1, "test"); check (tr_sys_path_exists (path1, &err)); check (err == NULL); tr_sys_path_remove (path1, NULL); /* Create directory and see that it exists */ tr_sys_dir_create (path1, 0, 0777, NULL); check (tr_sys_path_exists (path1, &err)); check (err == NULL); tr_sys_path_remove (path1, NULL); if (create_symlink (path1, path2, false)) { /* Non-existent file does not exist (via symlink) */ check (!tr_sys_path_exists (path1, &err)); check (err == NULL); /* Create file and see that it exists (via symlink) */ libtest_create_file_with_string_contents (path2, "test"); check (tr_sys_path_exists (path1, &err)); check (err == NULL); tr_sys_path_remove (path2, NULL); /* Create directory and see that it exists (via symlink) */ tr_sys_dir_create (path2, 0, 0777, NULL); check (tr_sys_path_exists (path1, &err)); check (err == NULL); tr_sys_path_remove (path2, NULL); tr_sys_path_remove (path1, NULL); } else { fprintf (stderr, "WARNING: [%s] unable to run symlink tests\n", __FUNCTION__); } tr_free (path2); tr_free (path1); tr_free (test_dir); return 0; } static int test_path_is_relative (void) { check (tr_sys_path_is_relative ("")); check (tr_sys_path_is_relative (".")); check (tr_sys_path_is_relative ("..")); check (tr_sys_path_is_relative ("x")); check (tr_sys_path_is_relative ("\\")); check (tr_sys_path_is_relative (":")); #ifdef _WIN32 check (tr_sys_path_is_relative ("/")); check (tr_sys_path_is_relative ("\\x")); check (tr_sys_path_is_relative ("/x")); check (tr_sys_path_is_relative ("\\x\\y")); check (tr_sys_path_is_relative ("/x/y")); check (tr_sys_path_is_relative ("C:x")); check (tr_sys_path_is_relative ("C:x\\y")); check (tr_sys_path_is_relative ("C:x/y")); check (!tr_sys_path_is_relative ("\\\\")); check (!tr_sys_path_is_relative ("//")); check (!tr_sys_path_is_relative ("\\\\x")); check (!tr_sys_path_is_relative ("//x")); check (!tr_sys_path_is_relative ("\\\\x\\y")); check (!tr_sys_path_is_relative ("//x/y")); check (!tr_sys_path_is_relative ("\\\\.\\x")); check (!tr_sys_path_is_relative ("//./x")); check (!tr_sys_path_is_relative ("a:")); check (!tr_sys_path_is_relative ("a:\\")); check (!tr_sys_path_is_relative ("a:/")); check (!tr_sys_path_is_relative ("Z:")); check (!tr_sys_path_is_relative ("Z:\\")); check (!tr_sys_path_is_relative ("Z:/")); #else /* _WIN32 */ check (!tr_sys_path_is_relative ("/")); check (!tr_sys_path_is_relative ("/x")); check (!tr_sys_path_is_relative ("/x/y")); check (!tr_sys_path_is_relative ("//x")); #endif /* _WIN32 */ return 0; } static int test_path_is_same (void) { char * const test_dir = create_test_dir (__FUNCTION__); tr_error * err = NULL; char * path1, * path2, * path3; path1 = tr_buildPath (test_dir, "a", NULL); path2 = tr_buildPath (test_dir, "b", NULL); path3 = tr_buildPath (path2, "c", NULL); /* Two non-existent files are not the same */ check (!tr_sys_path_is_same (path1, path1, &err)); check (err == NULL); check (!tr_sys_path_is_same (path1, path2, &err)); check (err == NULL); /* Two same files are the same */ libtest_create_file_with_string_contents (path1, "test"); check (tr_sys_path_is_same (path1, path1, &err)); check (err == NULL); /* Existent and non-existent files are not the same */ check (!tr_sys_path_is_same (path1, path2, &err)); check (err == NULL); check (!tr_sys_path_is_same (path2, path1, &err)); check (err == NULL); /* Two separate files (even with same content) are not the same */ libtest_create_file_with_string_contents (path2, "test"); check (!tr_sys_path_is_same (path1, path2, &err)); check (err == NULL); tr_sys_path_remove (path1, NULL); /* Two same directories are the same */ tr_sys_dir_create (path1, 0, 0777, NULL); check (tr_sys_path_is_same (path1, path1, &err)); check (err == NULL); /* File and directory are not the same */ check (!tr_sys_path_is_same (path1, path2, &err)); check (err == NULL); check (!tr_sys_path_is_same (path2, path1, &err)); check (err == NULL); tr_sys_path_remove (path2, NULL); /* Two separate directories are not the same */ tr_sys_dir_create (path2, 0, 0777, NULL); check (!tr_sys_path_is_same (path1, path2, &err)); check (err == NULL); tr_sys_path_remove (path1, NULL); tr_sys_path_remove (path2, NULL); if (create_symlink (path1, ".", true)) { /* Directory and symlink pointing to it are the same */ check (tr_sys_path_is_same (path1, test_dir, &err)); check (err == NULL); check (tr_sys_path_is_same (test_dir, path1, &err)); check (err == NULL); /* Non-existent file and symlink are not the same */ check (!tr_sys_path_is_same (path1, path2, &err)); check (err == NULL); check (!tr_sys_path_is_same (path2, path1, &err)); check (err == NULL); /* Symlinks pointing to different directories are not the same */ create_symlink (path2, "..", true); check (!tr_sys_path_is_same (path1, path2, &err)); check (err == NULL); check (!tr_sys_path_is_same (path2, path1, &err)); check (err == NULL); tr_sys_path_remove (path2, NULL); /* Symlinks pointing to same directory are the same */ create_symlink (path2, ".", true); check (tr_sys_path_is_same (path1, path2, &err)); check (err == NULL); tr_sys_path_remove (path2, NULL); /* Directory and symlink pointing to another directory are not the same */ tr_sys_dir_create (path2, 0, 0777, NULL); check (!tr_sys_path_is_same (path1, path2, &err)); check (err == NULL); check (!tr_sys_path_is_same (path2, path1, &err)); check (err == NULL); /* Symlinks pointing to same directory are the same */ create_symlink (path3, "..", true); check (tr_sys_path_is_same (path1, path3, &err)); check (err == NULL); tr_sys_path_remove (path1, NULL); /* File and symlink pointing to directory are not the same */ libtest_create_file_with_string_contents (path1, "test"); check (!tr_sys_path_is_same (path1, path3, &err)); check (err == NULL); check (!tr_sys_path_is_same (path3, path1, &err)); check (err == NULL); tr_sys_path_remove (path3, NULL); /* File and symlink pointing to same file are the same */ create_symlink (path3, path1, false); check (tr_sys_path_is_same (path1, path3, &err)); check (err == NULL); check (tr_sys_path_is_same (path3, path1, &err)); check (err == NULL); /* Symlinks pointing to non-existent files are not the same */ tr_sys_path_remove (path1, NULL); create_symlink (path1, "missing", false); tr_sys_path_remove (path3, NULL); create_symlink (path3, "missing", false); check (!tr_sys_path_is_same (path1, path3, &err)); check (err == NULL); check (!tr_sys_path_is_same (path3, path1, &err)); check (err == NULL); tr_sys_path_remove (path3, NULL); /* Symlinks pointing to same non-existent file are not the same */ create_symlink (path3, ".." NATIVE_PATH_SEP "missing", false); check (!tr_sys_path_is_same (path1, path3, &err)); check (err == NULL); check (!tr_sys_path_is_same (path3, path1, &err)); check (err == NULL); /* Non-existent file and symlink pointing to non-existent file are not the same */ tr_sys_path_remove (path3, NULL); check (!tr_sys_path_is_same (path1, path3, &err)); check (err == NULL); check (!tr_sys_path_is_same (path3, path1, &err)); check (err == NULL); tr_sys_path_remove (path2, NULL); tr_sys_path_remove (path1, NULL); } else { fprintf (stderr, "WARNING: [%s] unable to run symlink tests\n", __FUNCTION__); } tr_free (path3); path3 = tr_buildPath (test_dir, "c", NULL); libtest_create_file_with_string_contents (path1, "test"); if (create_hardlink (path2, path1)) { /* File and hardlink to it are the same */ check (tr_sys_path_is_same (path1, path2, &err)); check (err == NULL); /* Two hardlinks to the same file are the same */ create_hardlink (path3, path2); check (tr_sys_path_is_same (path2, path3, &err)); check (err == NULL); check (tr_sys_path_is_same (path1, path3, &err)); check (err == NULL); tr_sys_path_remove (path2, NULL); check (tr_sys_path_is_same (path1, path3, &err)); check (err == NULL); tr_sys_path_remove (path3, NULL); /* File and hardlink to another file are not the same */ libtest_create_file_with_string_contents (path3, "test"); create_hardlink (path2, path3); check (!tr_sys_path_is_same (path1, path2, &err)); check (err == NULL); check (!tr_sys_path_is_same (path2, path1, &err)); check (err == NULL); tr_sys_path_remove (path3, NULL); tr_sys_path_remove (path2, NULL); } else { fprintf (stderr, "WARNING: [%s] unable to run hardlink tests\n", __FUNCTION__); } if (create_symlink (path2, path1, false) && create_hardlink (path3, path1)) { check (tr_sys_path_is_same (path2, path3, &err)); check (err == NULL); } else { fprintf (stderr, "WARNING: [%s] unable to run combined symlink and hardlink tests\n", __FUNCTION__); } tr_sys_path_remove (path3, NULL); tr_sys_path_remove (path2, NULL); tr_sys_path_remove (path1, NULL); tr_free (path3); tr_free (path2); tr_free (path1); tr_free (test_dir); return 0; } static int test_path_resolve (void) { char * const test_dir = create_test_dir (__FUNCTION__); tr_error * err = NULL; char * path1, * path2; path1 = tr_buildPath (test_dir, "a", NULL); path2 = tr_buildPath (test_dir, "b", NULL); libtest_create_file_with_string_contents (path1, "test"); if (create_symlink (path2, path1, false)) { char * tmp; tmp = tr_sys_path_resolve (path2, &err); check (tmp != NULL); check (err == NULL); check (path_contains_no_symlinks (tmp)); tr_free (tmp); tr_sys_path_remove (path1, NULL); tr_sys_dir_create (path1, 0, 0755, NULL); tmp = tr_sys_path_resolve (path2, &err); check (tmp != NULL); check (err == NULL); check (path_contains_no_symlinks (tmp)); tr_free (tmp); } else { fprintf (stderr, "WARNING: [%s] unable to run symlink tests\n", __FUNCTION__); } tr_sys_path_remove (path2, NULL); tr_sys_path_remove (path1, NULL); tr_free (path2); tr_free (path1); tr_free (test_dir); return 0; } struct xname_test_data { const char * input; const char * output; }; static int test_path_xname (const struct xname_test_data * data, size_t data_size, char * (* func) (const char *, tr_error **)) { for (size_t i = 0; i < data_size; ++i) { tr_error * err = NULL; char * name = func (data[i].input, &err); if (data[i].output != NULL) { check (name != NULL); check (err == NULL); check_streq (data[i].output, name); tr_free (name); } else { check (name == NULL); check (err != NULL); tr_error_clear (&err); } } return 0; } static int test_path_basename_dirname (void) { const struct xname_test_data basename_tests[] = { { "a", "a" }, { "aa", "aa" }, { "/aa", "aa" }, { "/a/b/c", "c" }, { "/a/b/c/", "c" }, { "/", "/" }, { "", "." }, #ifdef _WIN32 { "c:\\a\\b\\c", "c" }, { "c:", "/" }, { "c:/", "/" }, { "c:\\", "/" }, { "c:a/b", "b" }, { "c:a", "a" }, { "\\\\a\\b\\c", "c" }, { "//a/b", "b" }, { "//1.2.3.4/b", "b" }, { "\\\\a", "a" }, { "\\\\1.2.3.4", "1.2.3.4" }, { "\\\\", "/" }, { "\\", "/" }, { "\\a", "a" }, { "\\\\\\", NULL }, { "123:" , NULL } #else { "////", "/" } #endif }; if (test_path_xname (basename_tests, sizeof (basename_tests) / sizeof (*basename_tests), tr_sys_path_basename) != 0) return 1; const struct xname_test_data dirname_tests[] = { { "/a/b/c", "/a/b" }, { "a/b/c", "a/b" }, { "a/b/c/", "a/b" }, { "a", "." }, { "a/", "." }, { "/", "/" }, { "", "." }, #ifdef _WIN32 { "C:\\a/b\\c", "C:\\a/b" }, { "C:\\a/b\\c\\", "C:\\a/b" }, { "C:\\a/b", "C:\\a" }, { "C:/a", "C:" }, { "C:", "C:" }, { "C:/", "C:" }, { "C:\\", "C:" }, { "c:a/b", "c:a" }, { "c:a", "c:." }, { "c:.", "c:." }, { "\\\\a\\b\\c", "\\\\a\\b" }, { "\\\\a\\b\\c/", "\\\\a\\b" }, { "//a/b", "//a" }, { "//1.2.3.4/b", "//1.2.3.4" }, { "\\\\a", "\\\\" }, { "\\\\1.2.3.4", "\\\\" }, { "\\\\", "\\\\" }, { "\\", "/" }, { "a/b\\c", "a/b" }, { "\\\\\\" , NULL }, { "123:" , NULL } #else { "////", "/" } #endif }; if (test_path_xname (dirname_tests, sizeof (dirname_tests) / sizeof (*dirname_tests), tr_sys_path_dirname) != 0) return 1; /* TODO: is_same (dirname (x) + '/' + basename (x), x) */ return 0; } static int test_path_rename (void) { char * const test_dir = create_test_dir (__FUNCTION__); tr_error * err = NULL; char * path1, * path2, * path3; path1 = tr_buildPath (test_dir, "a", NULL); path2 = tr_buildPath (test_dir, "b", NULL); path3 = tr_buildPath (path2, "c", NULL); libtest_create_file_with_string_contents (path1, "test"); /* Preconditions */ check (tr_sys_path_exists (path1, NULL)); check (!tr_sys_path_exists (path2, NULL)); /* Forward rename works */ check (tr_sys_path_rename (path1, path2, &err)); check (!tr_sys_path_exists (path1, NULL)); check (tr_sys_path_exists (path2, NULL)); check (err == NULL); /* Backward rename works */ check (tr_sys_path_rename (path2, path1, &err)); check (tr_sys_path_exists (path1, NULL)); check (!tr_sys_path_exists (path2, NULL)); check (err == NULL); /* Another backward rename [of non-existent file] does not work */ check (!tr_sys_path_rename (path2, path1, &err)); check (err != NULL); tr_error_clear (&err); /* Rename to file which couldn't be created does not work */ check (!tr_sys_path_rename (path1, path3, &err)); check (err != NULL); tr_error_clear (&err); /* Rename of non-existent file does not work */ check (!tr_sys_path_rename (path3, path2, &err)); check (err != NULL); tr_error_clear (&err); libtest_create_file_with_string_contents (path2, "test"); /* Renaming file does overwrite existing file */ check (tr_sys_path_rename (path2, path1, &err)); check (err == NULL); tr_sys_dir_create (path2, 0, 0777, NULL); /* Renaming file does not overwrite existing directory, and vice versa */ check (!tr_sys_path_rename (path1, path2, &err)); check (err != NULL); tr_error_clear (&err); check (!tr_sys_path_rename (path2, path1, &err)); check (err != NULL); tr_error_clear (&err); tr_sys_path_remove (path2, NULL); tr_free (path3); path3 = tr_buildPath (test_dir, "c", NULL); if (create_symlink (path2, path1, false)) { /* Preconditions */ check (tr_sys_path_exists (path2, NULL)); check (!tr_sys_path_exists (path3, NULL)); check (tr_sys_path_is_same (path1, path2, NULL)); /* Rename of symlink works, files stay the same */ check (tr_sys_path_rename (path2, path3, &err)); check (err == NULL); check (!tr_sys_path_exists (path2, NULL)); check (tr_sys_path_exists (path3, NULL)); check (tr_sys_path_is_same (path1, path3, NULL)); tr_sys_path_remove (path3, NULL); } else { fprintf (stderr, "WARNING: [%s] unable to run symlink tests\n", __FUNCTION__); } if (create_hardlink (path2, path1)) { /* Preconditions */ check (tr_sys_path_exists (path2, NULL)); check (!tr_sys_path_exists (path3, NULL)); check (tr_sys_path_is_same (path1, path2, NULL)); /* Rename of hardlink works, files stay the same */ check (tr_sys_path_rename (path2, path3, &err)); check (err == NULL); check (!tr_sys_path_exists (path2, NULL)); check (tr_sys_path_exists (path3, NULL)); check (tr_sys_path_is_same (path1, path3, NULL)); tr_sys_path_remove (path3, NULL); } else { fprintf (stderr, "WARNING: [%s] unable to run hardlink tests\n", __FUNCTION__); } tr_sys_path_remove (path1, NULL); tr_free (path3); tr_free (path2); tr_free (path1); tr_free (test_dir); return 0; } static int test_path_remove (void) { char * const test_dir = create_test_dir (__FUNCTION__); tr_error * err = NULL; char * path1, * path2, * path3; path1 = tr_buildPath (test_dir, "a", NULL); path2 = tr_buildPath (test_dir, "b", NULL); path3 = tr_buildPath (path2, "c", NULL); /* Can't remove non-existent file/directory */ check (!tr_sys_path_exists (path1, NULL)); check (!tr_sys_path_remove (path1, &err)); check (err != NULL); check (!tr_sys_path_exists (path1, NULL)); tr_error_clear (&err); /* Removing file works */ libtest_create_file_with_string_contents (path1, "test"); check (tr_sys_path_exists (path1, NULL)); check (tr_sys_path_remove (path1, &err)); check (err == NULL); check (!tr_sys_path_exists (path1, NULL)); /* Removing empty directory works */ tr_sys_dir_create (path1, 0, 0777, NULL); check (tr_sys_path_exists (path1, NULL)); check (tr_sys_path_remove (path1, &err)); check (err == NULL); check (!tr_sys_path_exists (path1, NULL)); /* Removing non-empty directory fails */ tr_sys_dir_create (path2, 0, 0777, NULL); libtest_create_file_with_string_contents (path3, "test"); check (tr_sys_path_exists (path2, NULL)); check (tr_sys_path_exists (path3, NULL)); check (!tr_sys_path_remove (path2, &err)); check (err != NULL); check (tr_sys_path_exists (path2, NULL)); check (tr_sys_path_exists (path3, NULL)); tr_error_clear (&err); tr_sys_path_remove (path3, NULL); tr_sys_path_remove (path2, NULL); tr_free (path3); tr_free (path2); tr_free (path1); tr_free (test_dir); return 0; } static int test_file_open (void) { char * const test_dir = create_test_dir (__FUNCTION__); tr_error * err = NULL; char * path1; tr_sys_file_t fd; uint64_t n; tr_sys_path_info info; path1 = tr_buildPath (test_dir, "a", NULL); /* Can't open non-existent file */ check (!tr_sys_path_exists (path1, NULL)); check (tr_sys_file_open (path1, TR_SYS_FILE_READ, 0600, &err) == TR_BAD_SYS_FILE); check (err != NULL); check (!tr_sys_path_exists (path1, NULL)); tr_error_clear (&err); check (tr_sys_file_open (path1, TR_SYS_FILE_WRITE, 0600, &err) == TR_BAD_SYS_FILE); check (err != NULL); check (!tr_sys_path_exists (path1, NULL)); tr_error_clear (&err); /* Can't open directory */ tr_sys_dir_create (path1, 0, 0777, NULL); #ifdef _WIN32 /* This works on *NIX */ check (tr_sys_file_open (path1, TR_SYS_FILE_READ, 0600, &err) == TR_BAD_SYS_FILE); check (err != NULL); tr_error_clear (&err); #endif check (tr_sys_file_open (path1, TR_SYS_FILE_WRITE, 0600, &err) == TR_BAD_SYS_FILE); check (err != NULL); tr_error_clear (&err); tr_sys_path_remove (path1, NULL); /* Can create non-existent file */ fd = tr_sys_file_open (path1, TR_SYS_FILE_WRITE | TR_SYS_FILE_CREATE, 0640, &err); check (fd != TR_BAD_SYS_FILE); check (err == NULL); tr_sys_file_close (fd, NULL); check (tr_sys_path_exists (path1, NULL)); check (validate_permissions (path1, 0640)); /* Can open existing file */ check (tr_sys_path_exists (path1, NULL)); fd = tr_sys_file_open (path1, TR_SYS_FILE_READ, 0600, &err); check (fd != TR_BAD_SYS_FILE); check (err == NULL); tr_sys_file_close (fd, NULL); fd = tr_sys_file_open (path1, TR_SYS_FILE_WRITE, 0600, &err); check (fd != TR_BAD_SYS_FILE); check (err == NULL); tr_sys_file_close (fd, NULL); tr_sys_path_remove (path1, NULL); libtest_create_file_with_string_contents (path1, "test"); /* Can't create new file if it already exists */ fd = tr_sys_file_open (path1, TR_SYS_FILE_WRITE | TR_SYS_FILE_CREATE_NEW, 0640, &err); check (fd == TR_BAD_SYS_FILE); check (err != NULL); tr_error_clear (&err); tr_sys_path_get_info (path1, TR_SYS_PATH_NO_FOLLOW, &info, NULL); check_int_eq (4, info.size); /* Pointer is at the end of file */ tr_sys_path_get_info (path1, TR_SYS_PATH_NO_FOLLOW, &info, NULL); check_int_eq (4, info.size); fd = tr_sys_file_open (path1, TR_SYS_FILE_WRITE | TR_SYS_FILE_APPEND, 0600, &err); check (fd != TR_BAD_SYS_FILE); check (err == NULL); tr_sys_file_write (fd, "s", 1, NULL, NULL); /* On *NIX, pointer is positioned on each write but not initially */ tr_sys_file_seek (fd, 0, TR_SEEK_CUR, &n, NULL); check_int_eq (5, n); tr_sys_file_close (fd, NULL); /* File gets truncated */ tr_sys_path_get_info (path1, TR_SYS_PATH_NO_FOLLOW, &info, NULL); check_int_eq (5, info.size); fd = tr_sys_file_open (path1, TR_SYS_FILE_WRITE | TR_SYS_FILE_TRUNCATE, 0600, &err); check (fd != TR_BAD_SYS_FILE); check (err == NULL); tr_sys_file_get_info (fd, &info, NULL); check_int_eq (0, info.size); tr_sys_file_close (fd, NULL); tr_sys_path_get_info (path1, TR_SYS_PATH_NO_FOLLOW, &info, NULL); check_int_eq (0, info.size); /* TODO: symlink and hardlink tests */ tr_sys_path_remove (path1, NULL); tr_free (path1); tr_free (test_dir); return 0; } static int test_file_read_write_seek (void) { char * const test_dir = create_test_dir (__FUNCTION__); tr_error * err = NULL; char * path1; tr_sys_file_t fd; uint64_t n; char buf[100]; path1 = tr_buildPath (test_dir, "a", NULL); fd = tr_sys_file_open (path1, TR_SYS_FILE_READ | TR_SYS_FILE_WRITE | TR_SYS_FILE_CREATE, 0600, NULL); check (tr_sys_file_seek (fd, 0, TR_SEEK_CUR, &n, &err)); check (err == NULL); check_int_eq (0, n); check (tr_sys_file_write (fd, "test", 4, &n, &err)); check (err == NULL); check_int_eq (4, n); check (tr_sys_file_seek (fd, 0, TR_SEEK_CUR, &n, &err)); check (err == NULL); check_int_eq (4, n); check (tr_sys_file_seek (fd, 0, TR_SEEK_SET, &n, &err)); check (err == NULL); check_int_eq (0, n); check (tr_sys_file_read (fd, buf, sizeof (buf), &n, &err)); check (err == NULL); check_int_eq (4, n); check_int_eq (0, memcmp (buf, "test", 4)); check (tr_sys_file_seek (fd, -3, TR_SEEK_CUR, &n, &err)); check (err == NULL); check_int_eq (1, n); check (tr_sys_file_write (fd, "E", 1, &n, &err)); check (err == NULL); check_int_eq (1, n); check (tr_sys_file_seek (fd, -2, TR_SEEK_CUR, &n, &err)); check (err == NULL); check_int_eq (0, n); check (tr_sys_file_read (fd, buf, sizeof (buf), &n, &err)); check (err == NULL); check_int_eq (4, n); check_int_eq (0, memcmp (buf, "tEst", 4)); check (tr_sys_file_seek (fd, 0, TR_SEEK_END, &n, &err)); check (err == NULL); check_int_eq (4, n); check (tr_sys_file_write (fd, " ok", 3, &n, &err)); check (err == NULL); check_int_eq (3, n); check (tr_sys_file_seek (fd, 0, TR_SEEK_SET, &n, &err)); check (err == NULL); check_int_eq (0, n); check (tr_sys_file_read (fd, buf, sizeof (buf), &n, &err)); check (err == NULL); check_int_eq (7, n); check_int_eq (0, memcmp (buf, "tEst ok", 7)); check (tr_sys_file_write_at (fd, "-", 1, 4, &n, &err)); check (err == NULL); check_int_eq (1, n); check (tr_sys_file_read_at (fd, buf, 5, 2, &n, &err)); check (err == NULL); check_int_eq (5, n); check_int_eq (0, memcmp (buf, "st-ok", 5)); tr_sys_file_close (fd, NULL); tr_sys_path_remove (path1, NULL); tr_free (path1); tr_free (test_dir); return 0; } static int test_file_truncate (void) { char * const test_dir = create_test_dir (__FUNCTION__); tr_error * err = NULL; char * path1; tr_sys_file_t fd; tr_sys_path_info info; path1 = tr_buildPath (test_dir, "a", NULL); fd = tr_sys_file_open (path1, TR_SYS_FILE_WRITE | TR_SYS_FILE_CREATE, 0600, NULL); check (tr_sys_file_truncate (fd, 10, &err)); check (err == NULL); tr_sys_file_get_info (fd, &info, NULL); check_int_eq (10, info.size); check (tr_sys_file_truncate (fd, 20, &err)); check (err == NULL); tr_sys_file_get_info (fd, &info, NULL); check_int_eq (20, info.size); check (tr_sys_file_truncate (fd, 0, &err)); check (err == NULL); tr_sys_file_get_info (fd, &info, NULL); check_int_eq (0, info.size); check (tr_sys_file_truncate (fd, 50, &err)); check (err == NULL); tr_sys_file_close (fd, NULL); tr_sys_path_get_info (path1, 0, &info, NULL); check_int_eq (50, info.size); fd = tr_sys_file_open (path1, TR_SYS_FILE_WRITE | TR_SYS_FILE_CREATE, 0600, NULL); check (tr_sys_file_truncate (fd, 25, &err)); check (err == NULL); tr_sys_file_close (fd, NULL); tr_sys_path_get_info (path1, 0, &info, NULL); check_int_eq (25, info.size); tr_sys_path_remove (path1, NULL); tr_free (path1); tr_free (test_dir); return 0; } static int test_file_preallocate (void) { char * const test_dir = create_test_dir (__FUNCTION__); tr_error * err = NULL; char * path1; tr_sys_file_t fd; tr_sys_path_info info; path1 = tr_buildPath (test_dir, "a", NULL); fd = tr_sys_file_open (path1, TR_SYS_FILE_WRITE | TR_SYS_FILE_CREATE, 0600, NULL); if (tr_sys_file_preallocate (fd, 50, 0, &err)) { check (err == NULL); tr_sys_file_get_info (fd, &info, NULL); check_int_eq (50, info.size); } else { check (err != NULL); fprintf (stderr, "WARNING: [%s] unable to preallocate file (full): %s (%d)\n", __FUNCTION__, err->message, err->code); tr_error_clear (&err); } tr_sys_file_close (fd, NULL); tr_sys_path_remove (path1, NULL); fd = tr_sys_file_open (path1, TR_SYS_FILE_WRITE | TR_SYS_FILE_CREATE, 0600, NULL); if (tr_sys_file_preallocate (fd, 500 * 1024 * 1024, TR_SYS_FILE_PREALLOC_SPARSE, &err)) { check (err == NULL); tr_sys_file_get_info (fd, &info, NULL); check_int_eq (500 * 1024 * 1024, info.size); } else { check (err != NULL); fprintf (stderr, "WARNING: [%s] unable to preallocate file (sparse): %s (%d)\n", __FUNCTION__, err->message, err->code); tr_error_clear (&err); } tr_sys_file_close (fd, NULL); tr_sys_path_remove (path1, NULL); tr_free (path1); tr_free (test_dir); return 0; } static int test_file_map (void) { char * const test_dir = create_test_dir (__FUNCTION__); tr_error * err = NULL; char * path1; tr_sys_file_t fd; char * view; path1 = tr_buildPath (test_dir, "a", NULL); libtest_create_file_with_string_contents (path1, "test"); fd = tr_sys_file_open (path1, TR_SYS_FILE_READ | TR_SYS_FILE_WRITE, 0600, NULL); view = tr_sys_file_map_for_reading (fd, 0, 4, &err); check (view != NULL); check (err == NULL); check_int_eq (0, memcmp (view, "test", 4)); tr_sys_file_write_at (fd, "E", 1, 1, NULL, NULL); check_int_eq (0, memcmp (view, "tEst", 4)); check (tr_sys_file_unmap (view, 4, &err)); check (err == NULL); tr_sys_file_close (fd, NULL); tr_sys_path_remove (path1, NULL); tr_free (path1); tr_free (test_dir); return 0; } static int test_file_utilities (void) { char * const test_dir = create_test_dir (__FUNCTION__); tr_error * err = NULL; char * path1; tr_sys_file_t fd; char buffer[16]; path1 = tr_buildPath (test_dir, "a", NULL); libtest_create_file_with_string_contents (path1, "a\nbc\r\ndef\nghij\r\n\n\nklmno\r"); fd = tr_sys_file_open (path1, TR_SYS_FILE_READ, 0, NULL); check (tr_sys_file_read_line (fd, buffer, sizeof (buffer) / sizeof (*buffer), &err)); check (err == NULL); check_streq ("a", buffer); check (tr_sys_file_read_line (fd, buffer, sizeof (buffer) / sizeof (*buffer), &err)); check (err == NULL); check_streq ("bc", buffer); check (tr_sys_file_read_line (fd, buffer, sizeof (buffer) / sizeof (*buffer), &err)); check (err == NULL); check_streq ("def", buffer); check (tr_sys_file_read_line (fd, buffer, sizeof (buffer) / sizeof (*buffer), &err)); check (err == NULL); check_streq ("ghij", buffer); check (tr_sys_file_read_line (fd, buffer, sizeof (buffer) / sizeof (*buffer), &err)); check (err == NULL); check_streq ("", buffer); check (tr_sys_file_read_line (fd, buffer, sizeof (buffer) / sizeof (*buffer), &err)); check (err == NULL); check_streq ("", buffer); check (tr_sys_file_read_line (fd, buffer, 4, &err)); check (err == NULL); check_streq ("klmn", buffer); check (tr_sys_file_read_line (fd, buffer, sizeof (buffer) / sizeof (*buffer), &err)); check (err == NULL); check_streq ("o", buffer); check (!tr_sys_file_read_line (fd, buffer, sizeof (buffer) / sizeof (*buffer), &err)); check (err == NULL); check_streq ("o", buffer); /* on EOF, buffer stays unchanged */ tr_sys_file_close (fd, NULL); fd = tr_sys_file_open (path1, TR_SYS_FILE_READ | TR_SYS_FILE_WRITE | TR_SYS_FILE_TRUNCATE, 0, NULL); check (tr_sys_file_write_line (fd, "p", &err)); check (err == NULL); check (tr_sys_file_write_line (fd, "", &err)); check (err == NULL); check (tr_sys_file_write_line (fd, "qr", &err)); check (err == NULL); check (tr_sys_file_write_fmt (fd, "s%cu\r\n", &err, 't')); check (err == NULL); check (tr_sys_file_write_line (fd, "", &err)); check (err == NULL); check (tr_sys_file_write_line (fd, "", &err)); check (err == NULL); check (tr_sys_file_write_fmt (fd, "v%sy%d", &err, "wx", 2)); check (err == NULL); tr_sys_file_seek (fd, 0, TR_SEEK_SET, NULL, NULL); check (tr_sys_file_read_line (fd, buffer, sizeof (buffer) / sizeof (*buffer), &err)); check (err == NULL); check_streq ("p", buffer); check (tr_sys_file_read_line (fd, buffer, sizeof (buffer) / sizeof (*buffer), &err)); check (err == NULL); check_streq ("", buffer); check (tr_sys_file_read_line (fd, buffer, sizeof (buffer) / sizeof (*buffer), &err)); check (err == NULL); check_streq ("qr", buffer); check (tr_sys_file_read_line (fd, buffer, sizeof (buffer) / sizeof (*buffer), &err)); check (err == NULL); check_streq ("stu", buffer); check (tr_sys_file_read_line (fd, buffer, sizeof (buffer) / sizeof (*buffer), &err)); check (err == NULL); check_streq ("", buffer); check (tr_sys_file_read_line (fd, buffer, sizeof (buffer) / sizeof (*buffer), &err)); check (err == NULL); check_streq ("", buffer); check (tr_sys_file_read_line (fd, buffer, sizeof (buffer) / sizeof (*buffer), &err)); check (err == NULL); check_streq ("vwxy2", buffer); check (!tr_sys_file_read_line (fd, buffer, sizeof (buffer) / sizeof (*buffer), &err)); check (err == NULL); check_streq ("vwxy2", buffer); /* on EOF, buffer stays unchanged */ tr_sys_file_close (fd, NULL); tr_sys_path_remove (path1, NULL); tr_free (path1); tr_free (test_dir); return 0; } static int test_dir_create (void) { char * const test_dir = create_test_dir (__FUNCTION__); tr_error * err = NULL; char * path1, * path2; path1 = tr_buildPath (test_dir, "a", NULL); path2 = tr_buildPath (path1, "b", NULL); /* Can create directory which has parent */ check (tr_sys_dir_create (path1, 0, 0700, &err)); check (err == NULL); check (tr_sys_path_exists (path1, NULL)); check (validate_permissions (path1, 0700)); tr_sys_path_remove (path1, NULL); libtest_create_file_with_string_contents (path1, "test"); /* Can't create directory where file already exists */ check (!tr_sys_dir_create (path1, 0, 0700, &err)); check (err != NULL); tr_error_clear (&err); check (!tr_sys_dir_create (path1, TR_SYS_DIR_CREATE_PARENTS, 0700, &err)); check (err != NULL); tr_error_clear (&err); tr_sys_path_remove (path1, NULL); /* Can't create directory which has no parent */ check (!tr_sys_dir_create (path2, 0, 0700, &err)); check (err != NULL); check (!tr_sys_path_exists (path2, NULL)); tr_error_clear (&err); /* Can create directory with parent directories */ check (tr_sys_dir_create (path2, TR_SYS_DIR_CREATE_PARENTS, 0751, &err)); check (err == NULL); check (tr_sys_path_exists (path1, NULL)); check (tr_sys_path_exists (path2, NULL)); check (validate_permissions (path1, 0751)); check (validate_permissions (path2, 0751)); /* Can create existing directory (no-op) */ check (tr_sys_dir_create (path1, 0, 0700, &err)); check (err == NULL); check (tr_sys_dir_create (path1, TR_SYS_DIR_CREATE_PARENTS, 0700, &err)); check (err == NULL); tr_sys_path_remove (path2, NULL); tr_sys_path_remove (path1, NULL); tr_free (path2); tr_free (path1); tr_free (test_dir); return 0; } static int test_dir_read_impl (const char * path, bool * have1, bool * have2) { tr_error * err = NULL; tr_sys_dir_t dd; const char * name; *have1 = *have2 = false; dd = tr_sys_dir_open (path, &err); check (dd != TR_BAD_SYS_DIR); check (err == NULL); while ((name = tr_sys_dir_read_name (dd, &err)) != NULL) { check (err == NULL); if (strcmp (name, ".") == 0 || strcmp (name, "..") == 0) continue; if (strcmp (name, "a") == 0) *have1 = true; else if (strcmp (name, "b") == 0) *have2 = true; else check (false); } check (err == NULL); check (tr_sys_dir_close (dd, &err)); check (err == NULL); return 0; } static int test_dir_read (void) { char * const test_dir = create_test_dir (__FUNCTION__); char * path1, * path2; bool have1, have2; path1 = tr_buildPath (test_dir, "a", NULL); path2 = tr_buildPath (test_dir, "b", NULL); if (test_dir_read_impl (test_dir, &have1, &have2) != 0) return 1; check (!have1); check (!have2); libtest_create_file_with_string_contents (path1, "test"); if (test_dir_read_impl (test_dir, &have1, &have2) != 0) return 1; check (have1); check (!have2); libtest_create_file_with_string_contents (path2, "test"); if (test_dir_read_impl (test_dir, &have1, &have2) != 0) return 1; check (have1); check (have2); tr_sys_path_remove (path1, NULL); if (test_dir_read_impl (test_dir, &have1, &have2) != 0) return 1; check (!have1); check (have2); tr_free (path2); tr_free (path1); tr_free (test_dir); return 0; } int main (void) { const testFunc tests[] = { test_get_info, test_path_exists, test_path_is_relative, test_path_is_same, test_path_resolve, test_path_basename_dirname, test_path_rename, test_path_remove, test_file_open, test_file_read_write_seek, test_file_truncate, test_file_preallocate, test_file_map, test_file_utilities, test_dir_create, test_dir_read }; int ret; /* init the session */ session = libttest_session_init (NULL); ret = runTests (tests, NUM_TESTS (tests)); if (ret == 0) libttest_session_close (session); return ret; }