eglib/src/gfile-posix.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 <glib.h>
  30 #include <stdio.h>
  31 #include <stdlib.h>
  32 #include <sys/types.h>
  33 #include <sys/stat.h>
  34 #ifdef HAVE_UNISTD_H
  35 #include <unistd.h>
  36 #endif
  37 #include <fcntl.h>
  38 #include <errno.h>
  39
  40 #ifdef _MSC_VER
  41 #include <direct.h>
  42 #endif
  43 #ifdef G_OS_WIN32
  44 int mkstemp (char *tmp_template);
  45 #endif
  46
  47 #ifndef O_LARGEFILE
  48 #define OPEN_FLAGS (O_RDONLY)
  49 #else
  50 #define OPEN_FLAGS (O_RDONLY | O_LARGEFILE)
  51 #endif
  52 gboolean
  53 g_file_get_contents (const gchar *filename, gchar **contents, gsize *length, GError **error)
  54 {
  55         gchar *str;
  56         int fd;
  57         struct stat st;
  58         long offset;
  59         int nread;
  60
  61         g_return_val_if_fail (filename != NULL, FALSE);
  62         g_return_val_if_fail (contents != NULL, FALSE);
  63         g_return_val_if_fail (error == NULL || *error == NULL, FALSE);
  64
  65         *contents = NULL;
  66         if (length)
  67                 *length = 0;
  68
  69         fd = open (filename, OPEN_FLAGS);
  70         if (fd == -1) {
  71                 if (error != NULL) {
  72                         int err = errno;
  73                         *error = g_error_new (G_LOG_DOMAIN, g_file_error_from_errno (err), "Error opening file");
  74                 }
  75                 return FALSE;
  76         }
  77
  78         if (fstat (fd, &st) != 0) {
  79                 if (error != NULL) {
  80                         int err = errno;
  81                         *error = g_error_new (G_LOG_DOMAIN, g_file_error_from_errno (err), "Error in fstat()");
  82                 }
  83                 close (fd);
  84                 return FALSE;
  85         }
  86
  87         str = g_malloc (st.st_size + 1);
  88         offset = 0;
  89         do {
  90                 nread = read (fd, str + offset, st.st_size - offset);
  91                 if (nread > 0) {
  92                         offset += nread;
  93                 }
  94         } while ((nread > 0 && offset < st.st_size) || (nread == -1 && errno == EINTR));
  95
  96         close (fd);
  97         str [st.st_size] = '\0';
  98         if (length) {
  99                 *length = st.st_size;
 100         }
 101         *contents = str;
 102         return TRUE;
 103 }
 104
 105 gint
 106 g_file_open_tmp (const gchar *tmpl, gchar **name_used, GError **error)
 107 {
 108         const static gchar *default_tmpl = ".XXXXXX";
 109         gchar *t;
 110         gint fd;
 111         size_t len;
 112
 113         g_return_val_if_fail (error == NULL || *error == NULL, -1);
 114
 115         if (tmpl == NULL)
 116                 tmpl = default_tmpl;
 117
 118         if (strchr (tmpl, G_DIR_SEPARATOR) != NULL) {
 119                 if (error) {
 120                         *error = g_error_new (G_LOG_DOMAIN, 24, "Template should not have any " G_DIR_SEPARATOR_S);
 121                 }
 122                 return -1;
 123         }
 124
 125         len = strlen (tmpl);
 126         if (len < 6 || strcmp (tmpl + len - 6, "XXXXXX")) {
 127                 if (error) {
 128                         *error = g_error_new (G_LOG_DOMAIN, 24, "Template should end with XXXXXX");
 129                 }
 130                 return -1;
 131         }
 132
 133         t = g_build_filename (g_get_tmp_dir (), tmpl, NULL);
 134
 135         fd = mkstemp (t);
 136
 137         if (fd == -1) {
 138                 if (error) {
 139                         int err = errno;
 140                         *error = g_error_new (G_LOG_DOMAIN, g_file_error_from_errno (err), "Error in mkstemp()");
 141                 }
 142                 g_free (t);
 143                 return -1;
 144         }
 145
 146         if (name_used) {
 147                 *name_used = t;
 148         } else {
 149                 g_free (t);
 150         }
 151         return fd;
 152 }
 153
 154 gchar *
 155 g_get_current_dir (void)
 156 {
 157 #ifdef __native_client__
 158         char *buffer;
 159         if ((buffer = g_getenv("NACL_PWD"))) {
 160                 buffer = g_strdup(buffer);
 161         } else {
 162                 buffer = g_strdup(".");
 163         }
 164         return buffer;
 165 #else
 166         int s = 32;
 167         char *buffer = NULL, *r;
 168         gboolean fail;
 169
 170         do {
 171                 buffer = g_realloc (buffer, s);
 172                 r = getcwd (buffer, s);
 173                 fail = (r == NULL && errno == ERANGE);
 174                 if (fail) {
 175                         s <<= 1;
 176                 }
 177         } while (fail);
 178
 179         /* On amd64 sometimes the bottom 32-bits of r == the bottom 32-bits of buffer
 180          * but the top 32-bits of r have overflown to 0xffffffff (seriously wtf getcwd
 181          * so we return the buffer here since it has a pointer to the valid string
 182          */
 183         return buffer;
 184 #endif
 185 }