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