Fix undeclared variables in exceptions-amd64.c on win64.
[mono-project.git] / eglib / src / gmisc-win32.c
blob07dcf39aec86c58ffbbe9cccb19b5291d30cc576
1 /*
2 * gmisc.c: Misc functions with no place to go (right now)
4 * Author:
5 * Aaron Bockover (abockover@novell.com)
7 * (C) 2006 Novell, Inc.
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:
17 * The above copyright notice and this permission notice shall be
18 * included in all copies or substantial portions of the Software.
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.
29 #include <stdlib.h>
30 #include <glib.h>
32 #include <windows.h>
33 #include <direct.h>
34 #include <io.h>
36 const gchar *
37 g_getenv(const gchar *variable)
39 gunichar2 *var, *buffer;
40 gchar* val = NULL;
41 gint32 buffer_size = 1024;
42 gint32 retval;
43 var = u8to16(variable);
44 buffer = g_malloc(buffer_size*sizeof(gunichar2));
45 retval = GetEnvironmentVariableW (var, buffer, buffer_size);
46 if (retval != 0) {
47 if (retval > buffer_size) {
48 g_free (buffer);
49 buffer_size = retval;
50 buffer = g_malloc(buffer_size*sizeof(gunichar2));
51 retval = GetEnvironmentVariableW (var, buffer, buffer_size);
53 val = u16to8 (buffer);
54 } else {
55 if (GetLastError () != ERROR_ENVVAR_NOT_FOUND){
56 val = g_malloc (1);
57 *val = 0;
60 g_free(var);
61 g_free(buffer);
62 return val;
65 gboolean
66 g_setenv(const gchar *variable, const gchar *value, gboolean overwrite)
68 gunichar2 *var, *val;
69 gboolean result;
70 var = u8to16(variable);
71 val = u8to16(value);
72 result = (SetEnvironmentVariableW(var, val) != 0) ? TRUE : FALSE;
73 g_free(var);
74 g_free(val);
75 return result;
78 void
79 g_unsetenv(const gchar *variable)
81 gunichar2 *var;
82 var = u8to16(variable);
83 SetEnvironmentVariableW(var, L"");
84 g_free(var);
87 gchar*
88 g_win32_getlocale(void)
90 /* FIXME: Use GetThreadLocale
91 * and convert LCID to standard
92 * string form, "en_US" */
93 return strdup ("en_US");
96 gboolean
97 g_path_is_absolute (const char *filename)
99 g_return_val_if_fail (filename != NULL, FALSE);
101 if (filename[0] != '\0' && filename[1] != '\0') {
102 if (filename[1] == ':' && filename[2] != '\0' &&
103 (filename[2] == '\\' || filename[2] == '/'))
104 return TRUE;
105 /* UNC paths */
106 else if (filename[0] == '\\' && filename[1] == '\\' &&
107 filename[2] != '\0')
108 return TRUE;
111 return FALSE;
114 const gchar *
115 g_get_home_dir (void)
117 /* FIXME */
118 const gchar *drive = g_getenv ("HOMEDRIVE");
119 const gchar *path = g_getenv ("HOMEPATH");
120 gchar *home_dir = NULL;
122 if (drive && path) {
123 home_dir = g_malloc(strlen(drive) + strlen(path) +1);
124 if (home_dir) {
125 sprintf(home_dir, "%s%s", drive, path);
129 return home_dir;
132 const char *
133 g_get_user_name (void)
135 const char * retName = g_getenv ("USER");
136 if (!retName)
137 retName = g_getenv ("USERNAME");
138 return retName;
141 static const char *tmp_dir;
143 const gchar *
144 g_get_tmp_dir (void)
146 if (tmp_dir == NULL){
147 if (tmp_dir == NULL){
148 tmp_dir = g_getenv ("TMPDIR");
149 if (tmp_dir == NULL){
150 tmp_dir = g_getenv ("TMP");
151 if (tmp_dir == NULL){
152 tmp_dir = g_getenv ("TEMP");
153 if (tmp_dir == NULL)
154 tmp_dir = "C:\\temp";
159 return tmp_dir;