eglib/src/gmisc-win32.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 <config.h>
  30
  31 #include <stdlib.h>
  32 #include <glib.h>
  33
  34 #include <windows.h>
  35 #if _MSC_VER && G_HAVE_API_SUPPORT(HAVE_CLASSIC_WINAPI_SUPPORT)
  36 #include <shlobj.h>
  37 #endif
  38 #include <direct.h>
  39 #include <io.h>
  40 #include <assert.h>
  41
  42 const gchar *
  43 g_getenv(const gchar *variable)
  44 {
  45         gunichar2 *var, *buffer;
  46         gchar* val = NULL;
  47         gint32 buffer_size = 1024;
  48         gint32 retval;
  49         var = u8to16(variable);
  50         buffer = g_malloc(buffer_size*sizeof(gunichar2));
  51         retval = GetEnvironmentVariableW (var, buffer, buffer_size);
  52         if (retval != 0) {
  53                 if (retval > buffer_size) {
  54                         g_free (buffer);
  55                         buffer_size = retval;
  56                         buffer = g_malloc(buffer_size*sizeof(gunichar2));
  57                         retval = GetEnvironmentVariableW (var, buffer, buffer_size);
  58                 }
  59                 val = u16to8 (buffer);
  60         } else {
  61                 if (GetLastError () != ERROR_ENVVAR_NOT_FOUND){
  62                         val = g_malloc (1);
  63                         *val = 0;
  64                 }
  65         }
  66         g_free(var);
  67         g_free(buffer);
  68         return val;
  69 }
  70
  71 gboolean
  72 g_setenv(const gchar *variable, const gchar *value, gboolean overwrite)
  73 {
  74         gunichar2 *var, *val;
  75         gboolean result;
  76         var = u8to16(variable);
  77         val = u8to16(value);
  78         result = (SetEnvironmentVariableW(var, val) != 0) ? TRUE : FALSE;
  79         g_free(var);
  80         g_free(val);
  81         return result;
  82 }
  83
  84 void
  85 g_unsetenv(const gchar *variable)
  86 {
  87         gunichar2 *var;
  88         var = u8to16(variable);
  89         SetEnvironmentVariableW(var, L"");
  90         g_free(var);
  91 }
  92
  93 #if G_HAVE_API_SUPPORT(HAVE_CLASSIC_WINAPI_SUPPORT)
  94 gchar*
  95 g_win32_getlocale(void)
  96 {
  97         LCID lcid = GetThreadLocale();
  98         gchar buf[19];
  99         gint ccBuf = GetLocaleInfoA(lcid, LOCALE_SISO639LANGNAME, buf, 9);
 100         buf[ccBuf - 1] = '-';
 101         ccBuf += GetLocaleInfoA(lcid, LOCALE_SISO3166CTRYNAME, buf + ccBuf, 9);
 102         return g_strdup (buf);
 103 }
 104 #endif /* G_HAVE_API_SUPPORT(HAVE_CLASSIC_WINAPI_SUPPORT) */
 105
 106 gboolean
 107 g_path_is_absolute (const char *filename)
 108 {
 109         g_return_val_if_fail (filename != NULL, FALSE);
 110
 111         if (filename[0] != '\0' && filename[1] != '\0') {
 112                 if (filename[1] == ':' && filename[2] != '\0' &&
 113                         (filename[2] == '\\' || filename[2] == '/'))
 114                         return TRUE;
 115                 /* UNC paths */
 116                 else if (filename[0] == '\\' && filename[1] == '\\' &&
 117                         filename[2] != '\0')
 118                         return TRUE;
 119         }
 120
 121         return FALSE;
 122 }
 123
 124 #if _MSC_VER && G_HAVE_API_SUPPORT(HAVE_CLASSIC_WINAPI_SUPPORT)
 125 static gchar*
 126 g_get_known_folder_path (void)
 127 {
 128         gchar *folder_path = NULL;
 129         PWSTR profile_path = NULL;
 130         HRESULT hr = SHGetKnownFolderPath (&FOLDERID_Profile, KF_FLAG_DEFAULT, NULL, &profile_path);
 131         if (SUCCEEDED(hr)) {
 132                 folder_path = u16to8 (profile_path);
 133                 CoTaskMemFree (profile_path);
 134         }
 135
 136         return folder_path;
 137 }
 138
 139 #else
 140
 141 static inline gchar *
 142 g_get_known_folder_path (void)
 143 {
 144         return NULL;
 145 }
 146 #endif
 147
 148 const gchar *
 149 g_get_home_dir (void)
 150 {
 151         gchar *home_dir = g_get_known_folder_path ();
 152
 153         if (!home_dir) {
 154                 home_dir = (gchar *) g_getenv ("USERPROFILE");
 155         }
 156
 157         if (!home_dir) {
 158                 const gchar *drive = g_getenv ("HOMEDRIVE");
 159                 const gchar *path = g_getenv ("HOMEPATH");
 160
 161                 if (drive && path) {
 162                         home_dir = g_malloc (strlen (drive) + strlen (path) + 1);
 163                         if (home_dir) {
 164                                 sprintf (home_dir, "%s%s", drive, path);
 165                         }
 166                 }
 167                 g_free (drive);
 168                 g_free (path);
 169         }
 170
 171         return home_dir;
 172 }
 173
 174 const char *
 175 g_get_user_name (void)
 176 {
 177         const char * retName = g_getenv ("USER");
 178         if (!retName)
 179                 retName = g_getenv ("USERNAME");
 180         return retName;
 181 }
 182
 183 static const char *tmp_dir;
 184
 185 const gchar *
 186 g_get_tmp_dir (void)
 187 {
 188         if (tmp_dir == NULL){
 189                 if (tmp_dir == NULL){
 190                         tmp_dir = g_getenv ("TMPDIR");
 191                         if (tmp_dir == NULL){
 192                                 tmp_dir = g_getenv ("TMP");
 193                                 if (tmp_dir == NULL){
 194                                         tmp_dir = g_getenv ("TEMP");
 195                                         if (tmp_dir == NULL)
 196                                                 tmp_dir = "C:\\temp";
 197                                 }
 198                         }
 199                 }
 200         }
 201         return tmp_dir;
 202 }