mono/eglib/gfile-win32.c

   1 /*
   2  * File utility functions.
   3  *
   4  * Author:
   5  *   Gonzalo Paniagua Javier (gonzalo@novell.com)
   6  *
   7  * (C) 2006 Novell, Inc.
   8  *
   9  * Permission is hereby granted, free of charge, to any person obtaining
  10  * a copy of this software and associated documentation files (the
  11  * "Software"), to deal in the Software without restriction, including
  12  * without limitation the rights to use, copy, modify, merge, publish,
  13  * distribute, sublicense, and/or sell copies of the Software, and to
  14  * permit persons to whom the Software is furnished to do so, subject to
  15  * the following conditions:
  16  *
  17  * The above copyright notice and this permission notice shall be
  18  * included in all copies or substantial portions of the Software.
  19  *
  20  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  21  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  22  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  23  * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
  24  * LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
  25  * OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
  26  * WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  27  */
  28 #include <config.h>
  29 #include <windows.h>
  30 #include <glib.h>
  31 #include <stdio.h>
  32 #include <stdlib.h>
  33 #include <errno.h>
  34 #include <sys/types.h>
  35 #include <sys/stat.h>
  36 #include <fcntl.h>
  37 #include <sys/types.h>
  38 #include <direct.h>
  39
  40 #ifdef G_OS_WIN32
  41 #include <io.h>
  42 #define open _open
  43 #ifndef S_ISREG
  44 #define S_ISREG(x) ((x &  _S_IFMT) == _S_IFREG)
  45 #endif
  46 #ifndef S_ISDIR
  47 #define S_ISDIR(x) ((x &  _S_IFMT) == _S_IFDIR)
  48 #endif
  49 #endif
  50
  51 int mkstemp (char *tmp_template)
  52 {
  53         int fd;
  54         gunichar2* utf16_template;
  55
  56         utf16_template  = u8to16 (tmp_template);
  57
  58         fd = -1;
  59         utf16_template = _wmktemp( utf16_template);
  60         if (utf16_template && *utf16_template) {
  61                 /* FIXME: _O_TEMPORARY causes file to disappear on close causing a test to fail */
  62                 fd = _wopen( utf16_template, _O_BINARY | _O_CREAT /*| _O_TEMPORARY*/ | _O_RDWR | _O_EXCL, _S_IREAD | _S_IWRITE);
  63         }
  64
  65         /* FIXME: this will crash if utf16_template == NULL */
  66         sprintf (tmp_template + strlen (tmp_template) - 6, "%S", utf16_template + wcslen (utf16_template) - 6);
  67
  68         g_free (utf16_template);
  69         return fd;
  70 }
  71
  72 gchar *
  73 g_mkdtemp (char *tmp_template)
  74 {
  75         gunichar2* utf16_template;
  76
  77         utf16_template  = u8to16 (tmp_template);
  78
  79         utf16_template = _wmktemp(utf16_template);
  80         if (utf16_template && *utf16_template) {
  81                 if (_wmkdir (utf16_template) == 0){
  82                         char *ret = u16to8 (utf16_template);
  83                         g_free (utf16_template);
  84                         return ret;
  85                 }
  86         }
  87
  88         g_free (utf16_template);
  89         return NULL;
  90 }
  91
  92 #ifdef _MSC_VER
  93 #pragma warning(disable:4701)
  94 #endif
  95
  96 gboolean
  97 g_file_test (const gchar *filename, GFileTest test)
  98 {
  99         gunichar2* utf16_filename = NULL;
 100         DWORD attr;
 101
 102         if (filename == NULL || test == 0)
 103                 return FALSE;
 104
 105         utf16_filename = u8to16 (filename);
 106         attr = GetFileAttributesW (utf16_filename);
 107         g_free (utf16_filename);
 108
 109         if (attr == INVALID_FILE_ATTRIBUTES)
 110                 return FALSE;
 111
 112         if ((test & G_FILE_TEST_EXISTS) != 0) {
 113                 return TRUE;
 114         }
 115
 116         if ((test & G_FILE_TEST_IS_EXECUTABLE) != 0) {
 117                 /* Testing executable permission on Windows is hard, and this is unused, treat as EXISTS for now. */
 118                 return TRUE;
 119         }
 120
 121         if ((test & G_FILE_TEST_IS_REGULAR) != 0) {
 122                 if (attr & (FILE_ATTRIBUTE_DEVICE|FILE_ATTRIBUTE_DIRECTORY))
 123                         return FALSE;
 124                 return TRUE;
 125         }
 126
 127         if ((test & G_FILE_TEST_IS_DIR) != 0) {
 128                 if (attr & FILE_ATTRIBUTE_DIRECTORY)
 129                         return TRUE;
 130         }
 131
 132         /* make this last in case it is OR'd with something else */
 133         if ((test & G_FILE_TEST_IS_SYMLINK) != 0) {
 134                 return FALSE;
 135         }
 136
 137         return FALSE;
 138 }