/* dir.cc: Posix directory-related routines Copyright 1996, 1997, 1998, 1999, 2000, 2001, 2002 Red Hat, Inc. This file is part of Cygwin. This software is a copyrighted work licensed under the terms of the Cygwin license. Please consult the file "CYGWIN_LICENSE" for details. */ #include "winsup.h" #include #include #include #define _COMPILING_NEWLIB #include #include "pinfo.h" #include "cygerrno.h" #include "security.h" #include "fhandler.h" #include "path.h" #include "dtable.h" #include "cygheap.h" /* Cygwin internal */ /* Return whether the directory of a file is writable. Return 1 if it is. Otherwise, return 0, and set errno appropriately. */ int __stdcall writable_directory (const char *file) { #if 0 char dir[strlen (file) + 1]; strcpy (dir, file); const char *usedir; char *slash = strrchr (dir, '\\'); if (slash == NULL) usedir = "."; else if (slash == dir) { usedir = "\\"; } else { *slash = '\0'; usedir = dir; } int acc = access (usedir, W_OK); return acc == 0; #else return 1; #endif } extern "C" int dirfd (DIR *dir) { if (check_null_invalid_struct_errno (dir)) return -1; if (dir->__d_cookie != __DIRENT_COOKIE) { set_errno (EBADF); syscall_printf ("-1 = dirfd (%p)", dir); return -1; } return dir->__d_dirent->d_fd; } /* opendir: POSIX 5.1.2.1 */ extern "C" DIR * opendir (const char *name) { fhandler_base *fh; path_conv pc; DIR *res; fh = cygheap->fdtab.build_fhandler_from_name (-1, name, NULL, pc, PC_SYM_FOLLOW | PC_FULL, NULL); if (!fh) res = NULL; else if (pc.exists ()) res = fh->opendir (pc); else { set_errno (ENOENT); res = NULL; } if (!res && fh) delete fh; return res; } /* readdir: POSIX 5.1.2.1 */ extern "C" struct dirent * readdir (DIR *dir) { if (check_null_invalid_struct_errno (dir)) return NULL; if (dir->__d_cookie != __DIRENT_COOKIE) { set_errno (EBADF); syscall_printf ("%p = readdir (%p)", NULL, dir); return NULL; } dirent *res = ((fhandler_base *) dir->__d_u.__d_data.__fh)->readdir (dir); if (res) { /* Compute d_ino by combining filename hash with the directory hash (which was stored in dir->__d_dirhash when opendir was called). */ if (res->d_name[0] == '.') { if (res->d_name[1] == '\0') dir->__d_dirent->d_ino = dir->__d_dirhash; else if (res->d_name[1] != '.' || res->d_name[2] != '\0') goto hashit; else { char *p, up[strlen (dir->__d_dirname) + 1]; strcpy (up, dir->__d_dirname); if (!(p = strrchr (up, '\\'))) goto hashit; *p = '\0'; if (!(p = strrchr (up, '\\'))) dir->__d_dirent->d_ino = hash_path_name (0, "."); else { *p = '\0'; dir->__d_dirent->d_ino = hash_path_name (0, up); } } } else { hashit: __ino64_t dino = hash_path_name (dir->__d_dirhash, "\\"); dir->__d_dirent->d_ino = hash_path_name (dino, res->d_name); } } dir->__d_dirent->old_d_ino = dir->__d_dirent->d_ino; // just truncate return res; } extern "C" _off64_t telldir64 (DIR *dir) { if (check_null_invalid_struct_errno (dir)) return -1; if (dir->__d_cookie != __DIRENT_COOKIE) return 0; return ((fhandler_base *) dir->__d_u.__d_data.__fh)->telldir (dir); } /* telldir */ extern "C" _off_t telldir (DIR *dir) { return telldir64 (dir); } extern "C" void seekdir64 (DIR *dir, _off64_t loc) { if (check_null_invalid_struct_errno (dir)) return; if (dir->__d_cookie != __DIRENT_COOKIE) return; return ((fhandler_base *) dir->__d_u.__d_data.__fh)->seekdir (dir, loc); } /* seekdir */ extern "C" void seekdir (DIR *dir, _off_t loc) { seekdir64 (dir, (_off64_t)loc); } /* rewinddir: POSIX 5.1.2.1 */ extern "C" void rewinddir (DIR *dir) { if (check_null_invalid_struct_errno (dir)) return; if (dir->__d_cookie != __DIRENT_COOKIE) return; return ((fhandler_base *) dir->__d_u.__d_data.__fh)->rewinddir (dir); } /* closedir: POSIX 5.1.2.1 */ extern "C" int closedir (DIR *dir) { if (check_null_invalid_struct_errno (dir)) return -1; if (dir->__d_cookie != __DIRENT_COOKIE) { set_errno (EBADF); syscall_printf ("-1 = closedir (%p)", dir); return -1; } /* Reset the marker in case the caller tries to use `dir' again. */ dir->__d_cookie = 0; int res = ((fhandler_base *) dir->__d_u.__d_data.__fh)->closedir (dir); cygheap->fdtab.release (dir->__d_dirent->d_fd); free (dir->__d_dirname); free (dir->__d_dirent); free (dir); syscall_printf ("%d = closedir (%p)", res); return res; } /* mkdir: POSIX 5.4.1.1 */ extern "C" int mkdir (const char *dir, mode_t mode) { int res = -1; SECURITY_ATTRIBUTES sa = sec_none_nih; path_conv real_dir (dir, PC_SYM_NOFOLLOW); if (real_dir.error) { set_errno (real_dir.case_clash ? ECASECLASH : real_dir.error); goto done; } nofinalslash (real_dir.get_win32 (), real_dir.get_win32 ()); if (! writable_directory (real_dir.get_win32 ())) goto done; if (allow_ntsec && real_dir.has_acls ()) set_security_attribute (S_IFDIR | ((mode & 07777) & ~cygheap->umask), &sa, alloca (4096), 4096); if (CreateDirectoryA (real_dir.get_win32 (), &sa)) { if (!allow_ntsec && allow_ntea) set_file_attribute (real_dir.has_acls (), real_dir.get_win32 (), S_IFDIR | ((mode & 07777) & ~cygheap->umask)); #ifdef HIDDEN_DOT_FILES char *c = strrchr (real_dir.get_win32 (), '\\'); if ((c && c[1] == '.') || *real_dir.get_win32 () == '.') SetFileAttributes (real_dir.get_win32 (), FILE_ATTRIBUTE_HIDDEN); #endif res = 0; } else __seterrno (); done: syscall_printf ("%d = mkdir (%s, %d)", res, dir, mode); return res; } /* rmdir: POSIX 5.5.2.1 */ extern "C" int rmdir (const char *dir) { int res = -1; DWORD devn; path_conv real_dir (dir, PC_SYM_NOFOLLOW); if (real_dir.error) set_errno (real_dir.error); else if ((devn = real_dir.get_devn ()) == FH_PROC || devn == FH_REGISTRY || devn == FH_PROCESS) set_errno (EROFS); else if (!real_dir.exists ()) set_errno (ENOENT); else if (!real_dir.isdir ()) set_errno (ENOTDIR); else { /* Even own directories can't be removed if R/O attribute is set. */ if (real_dir.has_attribute (FILE_ATTRIBUTE_READONLY)) SetFileAttributes (real_dir, (DWORD) real_dir & ~FILE_ATTRIBUTE_READONLY); if (RemoveDirectory (real_dir)) { /* RemoveDirectory on a samba drive doesn't return an error if the directory can't be removed because it's not empty. Checking for existence afterwards keeps us informed about success. */ if (GetFileAttributes (real_dir) != INVALID_FILE_ATTRIBUTES) set_errno (ENOTEMPTY); else res = 0; } else { /* This kludge detects if we are attempting to remove the current working directory. If so, we will move elsewhere to potentially allow the rmdir to succeed. This means that cygwin's concept of the current working directory != Windows concept but, hey, whaddaregonnado? Note that this will not cause something like the following to work: $ cd foo $ rmdir . since the shell will have foo "open" in the above case and so Windows will not allow the deletion. FIXME: A potential workaround for this is for cygwin apps to *never* call SetCurrentDirectory. */ if (strcasematch (real_dir, cygheap->cwd.win32) && !strcasematch ("c:\\", cygheap->cwd.win32)) { DWORD err = GetLastError (); if (!SetCurrentDirectory ("c:\\")) SetLastError (err); else if ((res = rmdir (dir))) SetCurrentDirectory (cygheap->cwd.win32); } if (res) { if (GetLastError () != ERROR_ACCESS_DENIED || !wincap.access_denied_on_delete ()) __seterrno (); else set_errno (ENOTEMPTY); /* On 9X ERROR_ACCESS_DENIED is returned if you try to remove a non-empty directory. */ /* If directory still exists, restore R/O attribute. */ if (real_dir.has_attribute (FILE_ATTRIBUTE_READONLY)) SetFileAttributes (real_dir, real_dir); } } } syscall_printf ("%d = rmdir (%s)", res, dir); return res; }