48a9192ab69fad8ea0d2ce2d195549af6442982e
[mono.git] / 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         int s = 32;
158         char *buffer = NULL, *r;
159         gboolean fail;
160         
161         do {
162                 buffer = g_realloc (buffer, s);
163                 r = getcwd (buffer, s);
164                 fail = (r == NULL && errno == ERANGE);
165                 if (fail) {
166                         s <<= 1;
167                 }
168         } while (fail);
169
170         /* On amd64 sometimes the bottom 32-bits of r == the bottom 32-bits of buffer
171          * but the top 32-bits of r have overflown to 0xffffffff (seriously wtf getcwd
172          * so we return the buffer here since it has a pointer to the valid string
173          */
174         return buffer;
175 }