Add vasprintf to the Cygwin build
[mono.git] / eglib / src / gmisc-unix.c
1 /*
2  * gmisc.c: Misc functions with no place to go (right now)
3  *
4  * Author:
5  *   Aaron Bockover (abockover@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
29 #include <stdlib.h>
30 #include <glib.h>
31 #include <pthread.h>
32
33 #ifdef HAVE_PWD_H
34 #include <pwd.h>
35 #endif
36
37 #ifdef HAVE_UNISTD_H
38 #include <unistd.h>
39 #endif
40
41
42 const gchar *
43 g_getenv(const gchar *variable)
44 {
45         return getenv(variable);
46 }
47
48 gboolean
49 g_setenv(const gchar *variable, const gchar *value, gboolean overwrite)
50 {
51         return setenv(variable, value, overwrite) == 0;
52 }
53
54 void
55 g_unsetenv(const gchar *variable)
56 {
57         unsetenv(variable);
58 }
59
60 gchar*
61 g_win32_getlocale(void)
62 {
63         return NULL;
64 }
65
66 gboolean
67 g_path_is_absolute (const char *filename)
68 {
69         g_return_val_if_fail (filename != NULL, FALSE);
70
71         return (*filename == '/');
72 }
73
74 static pthread_mutex_t home_lock = PTHREAD_MUTEX_INITIALIZER;
75 static const gchar *home_dir;
76
77 /* Give preference to /etc/passwd than HOME */
78 const gchar *
79 g_get_home_dir (void)
80 {
81         if (home_dir == NULL){
82                 pthread_mutex_lock (&home_lock);
83                 if (home_dir == NULL){
84 #ifdef HAVE_GETPWENT_R
85                         struct passwd pwbuf, *track;
86                         char buf [4096];
87                         uid_t uid;
88                         
89                         uid = getuid ();
90
91                         setpwent ();
92                         
93                         while (getpwent_r (&pwbuf, buf, sizeof (buf), &track) == 0){
94                                 if (pwbuf.pw_uid == uid){
95                                         home_dir = g_strdup (pwbuf.pw_dir);
96                                         break;
97                                 }
98                         }
99                         endpwent ();
100 #endif
101                         if (home_dir == NULL)
102                                 home_dir = g_getenv ("HOME");
103                         pthread_mutex_unlock (&home_lock);
104                 }
105         }
106         return home_dir;
107 }
108
109 const char *
110 g_get_user_name (void)
111 {
112         const char *retName = g_getenv ("USER");
113         if (!retName)
114                 retName = "somebody";
115         return retName;
116 }
117
118 static const char *tmp_dir;
119
120 static pthread_mutex_t tmp_lock = PTHREAD_MUTEX_INITIALIZER;
121
122 const gchar *
123 g_get_tmp_dir (void)
124 {
125         if (tmp_dir == NULL){
126                 pthread_mutex_lock (&tmp_lock);
127                 if (tmp_dir == NULL){
128                         tmp_dir = g_getenv ("TMPDIR");
129                         if (tmp_dir == NULL){
130                                 tmp_dir = g_getenv ("TMP");
131                                 if (tmp_dir == NULL){
132                                         tmp_dir = g_getenv ("TEMP");
133                                         if (tmp_dir == NULL)
134                                                 tmp_dir = "/tmp";
135                                 }
136                         }
137                 }
138                 pthread_mutex_unlock (&tmp_lock);
139         }
140         return tmp_dir;
141 }
142