Adds support for utf paths on Windows.
[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) 2009 Blender Foundation.
19  * All rights reserved.
20  * 
21  * Contributor(s): Alexandr Kuznetsov, Andrea Weikert
22  *
23  * ***** END GPL LICENSE BLOCK *****
24  */
25
26 #ifdef WIN32
27
28 #ifndef _WIN32_IE
29 #define _WIN32_IE 0x0501
30 #endif
31
32 #include "utf_winfunc.h"
33 #include <io.h>
34 #include <Windows.h>
35 #include <wchar.h>
36
37
38 FILE * ufopen(const char * filename, const char * mode)
39 {
40         FILE * f = NULL;
41         UTF16_ENCODE(filename);
42         UTF16_ENCODE (mode);
43
44         if(filename_16 && mode_16) f = _wfopen(filename_16, mode_16);
45         
46         UTF16_UN_ENCODE(mode);
47         UTF16_UN_ENCODE(filename);
48
49         if(!f) 
50         {
51                 if(f=fopen(filename,mode))
52                         printf("WARNING: %s is not utf path. Please update it.\n",filename);
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) f = _wopen(filename_16, oflag, pmode);
64
65         UTF16_UN_ENCODE(filename);
66
67         if(f==-1) 
68         {
69                 if((f=open(filename,oflag, pmode))!=-1)
70                         printf("WARNING: %s is not utf path. Please update it.\n",filename);
71         }
72
73         return f;
74 }
75
76 int urename(const char *oldname, const char *newname )
77 {
78         int r = -1;
79         UTF16_ENCODE(oldname);
80         UTF16_ENCODE (newname);
81
82         if(oldname_16 && newname_16) r = _wrename(oldname_16, newname_16);
83         
84         UTF16_UN_ENCODE(newname);
85         UTF16_UN_ENCODE(oldname);
86         return r;
87 }
88
89 int umkdir(const char *pathname)
90 {
91
92         BOOL r = 0;
93         UTF16_ENCODE(pathname);
94         
95         if(pathname_16) r = CreateDirectoryW(pathname_16, NULL);
96
97         UTF16_UN_ENCODE(pathname);
98
99         return r?0:-1;
100 }
101
102 char * u_alloc_getenv(const char *varname)
103 {
104         char * r = 0;
105         wchar_t * str;
106         UTF16_ENCODE(varname);
107         if(varname_16){ str = _wgetenv(varname_16);
108         r = alloc_utf_8_from_16(str,0);}
109         UTF16_UN_ENCODE(varname);
110
111         return r;
112 }
113 void  u_free_getenv(char *val)
114 {
115         free(val);
116 }
117
118 int uput_getenv(const char *varname, char * value, size_t buffsize)
119 {
120         int r = 0;
121         wchar_t * str;
122         if(!buffsize) return r;
123
124         UTF16_ENCODE(varname);
125                 if(varname_16) 
126                         {
127                                 str = _wgetenv(varname_16);
128                                 conv_utf_16_to_8(str, value, buffsize);
129                                 r = 1;
130                         }
131         UTF16_UN_ENCODE(varname);
132
133         if(!r) value[0] = 0;
134
135         return r;
136 }
137
138
139
140 int uputenv(const char *name, const char *value)
141 {
142         int r = -1;
143         UTF16_ENCODE(name)
144         UTF16_ENCODE(value)
145                 if(name_16 && value_16) {
146                         if(SetEnvironmentVariableW(name_16,value_16)!=0) 
147                                 r =0;
148                         else r = -1;
149         }
150         UTF16_UN_ENCODE(value)
151         UTF16_UN_ENCODE(name)
152
153         return r;
154 }
155
156 #endif