348 lines
		
	
	
		
			8.1 KiB
		
	
	
	
		
			C++
		
	
	
	
			
		
		
	
	
			348 lines
		
	
	
		
			8.1 KiB
		
	
	
	
		
			C++
		
	
	
	
| /* 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 <unistd.h>
 | |
| #include <stdlib.h>
 | |
| #include <sys/stat.h>
 | |
| #include <errno.h>
 | |
| 
 | |
| #define _COMPILING_NEWLIB
 | |
| #include <dirent.h>
 | |
| 
 | |
| #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:
 | |
| 	  ino_t dino = hash_path_name (dir->__d_dirhash, "\\");
 | |
| 	  dir->__d_dirent->d_ino = hash_path_name (dino, res->d_name);
 | |
| 	}
 | |
|     }
 | |
|   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" __off32_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, __off32_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;
 | |
| }
 |