intern/utfconv/utf_winfunc.c

   1 /*
   2  * This program is free software; you can redistribute it and/or
   3  * modify it under the terms of the GNU General Public License
   4  * as published by the Free Software Foundation; either version 2
   5  * of the License, or (at your option) any later version.
   6  *
   7  * This program is distributed in the hope that it will be useful,
   8  * but WITHOUT ANY WARRANTY; without even the implied warranty of
   9  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  10  * GNU General Public License for more details.
  11  *
  12  * You should have received a copy of the GNU General Public License
  13  * along with this program; if not, write to the Free Software Foundation,
  14  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
  15  *
  16  * The Original Code is Copyright (C) 2012 Blender Foundation.
  17  * All rights reserved.
  18  */
  19
  20 #ifndef _WIN32_IE
  21 #define _WIN32_IE 0x0501
  22 #endif
  23
  24 #include "utf_winfunc.h"
  25 #include "utfconv.h"
  26 #include <io.h>
  27 #include <windows.h>
  28 #include <wchar.h>
  29
  30
  31 FILE *ufopen(const char *filename, const char *mode)
  32 {
  33         FILE *f = NULL;
  34         UTF16_ENCODE(filename);
  35         UTF16_ENCODE(mode);
  36
  37         if (filename_16 && mode_16) {
  38                 f = _wfopen(filename_16, mode_16);
  39         }
  40
  41         UTF16_UN_ENCODE(mode);
  42         UTF16_UN_ENCODE(filename);
  43
  44         if (!f) {
  45                 if ((f = fopen(filename, mode))) {
  46                         printf("WARNING: %s is not utf path. Please update it.\n",filename);
  47                 }
  48         }
  49
  50         return f;
  51 }
  52
  53 int uopen(const char *filename, int oflag, int pmode)
  54 {
  55         int f = -1;
  56         UTF16_ENCODE(filename);
  57
  58         if (filename_16) {
  59                 f = _wopen(filename_16, oflag, pmode);
  60         }
  61
  62         UTF16_UN_ENCODE(filename);
  63
  64         if (f == -1) {
  65                 if ((f = open(filename,oflag, pmode)) != -1) {
  66                         printf("WARNING: %s is not utf path. Please update it.\n",filename);
  67                 }
  68         }
  69
  70         return f;
  71 }
  72
  73 int uaccess(const char *filename, int mode)
  74 {
  75         int r = -1;
  76         UTF16_ENCODE(filename);
  77
  78         if (filename_16) {
  79                 r = _waccess(filename_16, mode);
  80         }
  81
  82         UTF16_UN_ENCODE(filename);
  83
  84         return r;
  85 }
  86
  87 int urename(const char *oldname, const char *newname )
  88 {
  89         int r = -1;
  90         UTF16_ENCODE(oldname);
  91         UTF16_ENCODE(newname);
  92
  93         if (oldname_16 && newname_16) {
  94                 r = _wrename(oldname_16, newname_16);
  95         }
  96
  97         UTF16_UN_ENCODE(newname);
  98         UTF16_UN_ENCODE(oldname);
  99         return r;
 100 }
 101
 102 int umkdir(const char *pathname)
 103 {
 104
 105         BOOL r = 0;
 106         UTF16_ENCODE(pathname);
 107
 108         if (pathname_16) {
 109                 r = CreateDirectoryW(pathname_16, NULL);
 110         }
 111
 112         UTF16_UN_ENCODE(pathname);
 113
 114         return r ? 0 : -1;
 115 }
 116
 117 char *u_alloc_getenv(const char *varname)
 118 {
 119         char * r = 0;
 120         wchar_t * str;
 121         UTF16_ENCODE(varname);
 122         if (varname_16) {
 123                 str = _wgetenv(varname_16);
 124                 r = alloc_utf_8_from_16(str, 0);
 125         }
 126         UTF16_UN_ENCODE(varname);
 127
 128         return r;
 129 }
 130 void  u_free_getenv(char *val)
 131 {
 132         free(val);
 133 }
 134
 135 int uput_getenv(const char *varname, char *value, size_t buffsize)
 136 {
 137         int r = 0;
 138         wchar_t * str;
 139
 140         if (!buffsize) {
 141                 return r;
 142         }
 143
 144         UTF16_ENCODE(varname);
 145         if (varname_16) {
 146                 str = _wgetenv(varname_16);
 147                 conv_utf_16_to_8(str, value, buffsize);
 148                 r = 1;
 149         }
 150         UTF16_UN_ENCODE(varname);
 151
 152         if (!r) {
 153                 value[0] = 0;
 154         }
 155
 156         return r;
 157 }
 158
 159 int uputenv(const char *name, const char *value)
 160 {
 161         int r = -1;
 162         UTF16_ENCODE(name);
 163
 164         if (value) {
 165                 /* set */
 166                 UTF16_ENCODE(value);
 167
 168                 if (name_16 && value_16) {
 169                         r = (SetEnvironmentVariableW(name_16,value_16)!= 0) ? 0 : -1;
 170                 }
 171                 UTF16_UN_ENCODE(value);
 172         }
 173         else {
 174                 /* clear */
 175                 if (name_16) {
 176                         r = (SetEnvironmentVariableW(name_16,NULL)!= 0) ? 0 : -1;
 177                 }
 178         }
 179
 180         UTF16_UN_ENCODE(name);
 181
 182         return r;
 183 }