mono/eglib/gdir-win32.c

   1 /*
   2  * Directory 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 <glib.h>
  29 #include <stdio.h>
  30 #include <stdlib.h>
  31 #include <errno.h>
  32 #include <sys/types.h>
  33 #include <sys/stat.h>
  34 #include <io.h>
  35
  36 #include <winsock2.h>
  37
  38 struct _GDir {
  39         HANDLE handle;
  40         gchar* current;
  41         gchar* next;
  42 };
  43
  44 GDir *
  45 g_dir_open (const gchar *path, guint flags, GError **error)
  46 {
  47         GDir *dir;
  48         gunichar2* path_utf16;
  49         gunichar2* path_utf16_search;
  50         WIN32_FIND_DATAW find_data;
  51
  52         g_return_val_if_fail (path != NULL, NULL);
  53         g_return_val_if_fail (error == NULL || *error == NULL, NULL);
  54
  55         dir = g_new0 (GDir, 1);
  56         path_utf16 = u8to16 (path);
  57         path_utf16_search = g_malloc ((wcslen((wchar_t *) path_utf16) + 3)*sizeof(gunichar2));
  58         wcscpy (path_utf16_search, path_utf16);
  59         wcscat (path_utf16_search, L"\\*");
  60
  61         dir->handle = FindFirstFileW (path_utf16_search, &find_data);
  62         if (dir->handle == INVALID_HANDLE_VALUE) {
  63                 if (error) {
  64                         gint err = errno;
  65                         *error = g_error_new (G_LOG_DOMAIN, g_file_error_from_errno (err), strerror (err));
  66                 }
  67                 g_free (path_utf16_search);
  68                 g_free (path_utf16);
  69                 g_free (dir);
  70                 return NULL;
  71         }
  72         g_free (path_utf16_search);
  73         g_free (path_utf16);
  74
  75         while ((wcscmp ((wchar_t *) find_data.cFileName, L".") == 0) || (wcscmp ((wchar_t *) find_data.cFileName, L"..") == 0)) {
  76                 if (!FindNextFileW (dir->handle, &find_data)) {
  77                         if (error) {
  78                                 gint err = errno;
  79                                 *error = g_error_new (G_LOG_DOMAIN, g_file_error_from_errno (err), strerror (err));
  80                         }
  81                         g_free (dir);
  82                         return NULL;
  83                 }
  84         }
  85
  86         dir->current = NULL;
  87         dir->next = u16to8 (find_data.cFileName);
  88         return dir;
  89 }
  90
  91 const gchar *
  92 g_dir_read_name (GDir *dir)
  93 {
  94         WIN32_FIND_DATAW find_data;
  95
  96         g_return_val_if_fail (dir != NULL && dir->handle != 0, NULL);
  97
  98         if (dir->current)
  99                 g_free (dir->current);
 100         dir->current = NULL;
 101
 102         dir->current = dir->next;
 103
 104         if (!dir->current)
 105                 return NULL;
 106
 107         dir->next = NULL;
 108
 109         do {
 110                 if (!FindNextFileW (dir->handle, &find_data)) {
 111                         dir->next = NULL;
 112                         return dir->current;
 113                 }
 114         } while ((wcscmp ((wchar_t *) find_data.cFileName, L".") == 0) || (wcscmp ((wchar_t *) find_data.cFileName, L"..") == 0));
 115
 116         dir->next = u16to8 (find_data.cFileName);
 117         return dir->current;
 118 }
 119
 120 void
 121 g_dir_rewind (GDir *dir)
 122 {
 123 }
 124
 125 void
 126 g_dir_close (GDir *dir)
 127 {
 128         g_return_if_fail (dir != NULL && dir->handle != 0);
 129
 130         if (dir->current)
 131                 g_free (dir->current);
 132         dir->current = NULL;
 133         if (dir->next)
 134                 g_free (dir->next);
 135         dir->next = NULL;
 136         FindClose (dir->handle);
 137         dir->handle = 0;
 138         g_free (dir);
 139 }
 140
 141