mono/eglib/gdir-unix.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 <unistd.h>
  35 #include <dirent.h>
  36
  37 struct _GDir {
  38         DIR *dir;
  39 #ifndef HAVE_REWINDDIR
  40         char *path;
  41 #endif
  42 };
  43
  44 GDir *
  45 g_dir_open (const gchar *path, guint flags, GError **error)
  46 {
  47         GDir *dir;
  48
  49         g_return_val_if_fail (path != NULL, NULL);
  50         g_return_val_if_fail (error == NULL || *error == NULL, NULL);
  51
  52         (void) flags; /* this is not used */
  53         dir = g_new (GDir, 1);
  54         dir->dir = opendir (path);
  55         if (dir->dir == NULL) {
  56                 if (error) {
  57                         gint err = errno;
  58                         *error = g_error_new (G_LOG_DOMAIN, g_file_error_from_errno (err), strerror (err));
  59                 }
  60                 g_free (dir);
  61                 return NULL;
  62         }
  63 #ifndef HAVE_REWINDDIR
  64         dir->path = g_strdup (path);
  65 #endif
  66         return dir;
  67 }
  68
  69 const gchar *
  70 g_dir_read_name (GDir *dir)
  71 {
  72         struct dirent *entry;
  73
  74         g_return_val_if_fail (dir != NULL && dir->dir != NULL, NULL);
  75         do {
  76                 entry = readdir (dir->dir);
  77                 if (entry == NULL)
  78                         return NULL;
  79         } while ((strcmp (entry->d_name, ".") == 0) || (strcmp (entry->d_name, "..") == 0));
  80
  81         return entry->d_name;
  82 }
  83
  84 void
  85 g_dir_rewind (GDir *dir)
  86 {
  87         g_return_if_fail (dir != NULL && dir->dir != NULL);
  88 #ifndef HAVE_REWINDDIR
  89         closedir (dir->dir);
  90         dir->dir = opendir (dir->path);
  91 #else
  92         rewinddir (dir->dir);
  93 #endif
  94 }
  95
  96 void
  97 g_dir_close (GDir *dir)
  98 {
  99         g_return_if_fail (dir != NULL && dir->dir != 0);
 100         closedir (dir->dir);
 101 #ifndef HAVE_REWINDDIR
 102         g_free (dir->path);
 103 #endif
 104         dir->dir = NULL;
 105         g_free (dir);
 106 }
 107
 108 int
 109 g_mkdir_with_parents (const gchar *pathname, int mode)
 110 {
 111         char *path, *d;
 112         int rv;
 113
 114         if (!pathname || *pathname == '\0') {
 115                 errno = EINVAL;
 116                 return -1;
 117         }
 118
 119         d = path = g_strdup (pathname);
 120         if (*d == '/')
 121                 d++;
 122
 123         while (TRUE) {
 124                 if (*d == '/' || *d == '\0') {
 125                   char orig = *d;
 126                   *d = '\0';
 127                   rv = mkdir (path, mode);
 128                   if (rv == -1 && errno != EEXIST) {
 129                         g_free (path);
 130                         return -1;
 131                   }
 132
 133                   *d++ = orig;
 134                   while (orig == '/' && *d == '/')
 135                         d++;
 136                   if (orig == '\0')
 137                         break;
 138                 } else {
 139                         d++;
 140                 }
 141         }
 142
 143         g_free (path);
 144
 145         return 0;
 146 }