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