2a69bf0b1e578fc335e54010f44fde9d71b38e65
[blender.git] / source / blender / blenlib / intern / winstuff.c
1 /**
2  * $Id$
3  *
4  * ***** BEGIN GPL/BL DUAL LICENSE BLOCK *****
5  *
6  * This program is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU General Public License
8  * as published by the Free Software Foundation; either version 2
9  * of the License, or (at your option) any later version. The Blender
10  * Foundation also sells licenses for use in proprietary software under
11  * the Blender License.  See http://www.blender.org/BL/ for information
12  * about this.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software Foundation,
21  * Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
22  *
23  * The Original Code is Copyright (C) 2001-2002 by NaN Holding BV.
24  * All rights reserved.
25  *
26  * The Original Code is: all of this file.
27  *
28  * Contributor(s): none yet.
29  *
30  * ***** END GPL/BL DUAL LICENSE BLOCK *****
31  * Windows-posix compatibility layer, windows-specific functions.
32  */
33
34 #ifdef HAVE_CONFIG_H
35 #include <config.h>
36 #endif
37
38 #ifdef WIN32
39
40 #include <stdlib.h>
41 #include <stdio.h>
42
43 #include "MEM_guardedalloc.h"
44
45 #include "BLI_blenlib.h"
46 #include "BLI_util.h"
47 #include "BLI_winstuff.h"
48
49 #include "BKE_utildefines.h" /* FILE_MAXDIR + FILE_MAXFILE */
50
51 int BLI_getInstallationDir( char * str ) {
52         LONG lresult;
53         HKEY hkey = 0;
54         LONG type;
55         char buffer[FILE_MAXDIR+FILE_MAXFILE];
56         DWORD size;
57         
58         size = sizeof(buffer);
59
60         lresult = RegOpenKeyEx(HKEY_LOCAL_MACHINE, "SOFTWARE\\BlenderFoundation", 0, 
61                 KEY_ALL_ACCESS, &hkey);
62
63         if (lresult == ERROR_SUCCESS) {
64                 lresult = RegQueryValueEx(hkey, "Install_Dir", 0, NULL, (LPBYTE)buffer, &size);
65                 strcpy(str, buffer);
66                 RegCloseKey(hkey);
67                 return 1;
68         }
69         else
70                 return 0;
71 }
72
73
74 void RegisterBlendExtension(char * str) {
75         LONG lresult;
76         HKEY hkey = 0;
77         DWORD dwd = 0;
78         char *dir;
79         char buffer[128];
80         
81         /* Add installation dir to registry --aphex */
82
83         strncpy(dir, str, strlen(str)-11);
84
85         lresult = RegCreateKeyEx(HKEY_LOCAL_MACHINE, "SOFTWARE\\BlenderFoundation", 0, 
86                 "", REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, NULL, &hkey, &dwd);
87
88         if (lresult == ERROR_SUCCESS) {
89                 if (dwd != REG_OPENED_EXISTING_KEY)
90                         lresult = RegSetValueEx(hkey, "Install_Dir", 0, REG_SZ, dir, strlen(dir)+1);
91                 RegCloseKey(hkey);
92         }
93
94         lresult = RegCreateKeyEx(HKEY_CLASSES_ROOT, "blendfile\\shell\\open\\command", 0,
95                 "", REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, NULL, &hkey, &dwd);
96
97         if (lresult == ERROR_SUCCESS) {
98                 sprintf(buffer, "\"%s\" \"%%1\"", str);
99                 lresult = RegSetValueEx(hkey, NULL, 0, REG_SZ, buffer, strlen(buffer) + 1);
100                 RegCloseKey(hkey);
101         }
102
103         lresult = RegCreateKeyEx(HKEY_CLASSES_ROOT, "blendfile\\DefaultIcon", 0,
104                 "", REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, NULL, &hkey, &dwd);
105
106         if (lresult == ERROR_SUCCESS) {
107                 sprintf(buffer, "\"%s\",1", str);
108                 lresult = RegSetValueEx(hkey, NULL, 0, REG_SZ, buffer, strlen(buffer) + 1);
109                 RegCloseKey(hkey);
110         }
111
112         lresult = RegCreateKeyEx(HKEY_CLASSES_ROOT, ".blend", 0,
113                 "", REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, NULL, &hkey, &dwd);
114
115         if (lresult == ERROR_SUCCESS) {
116                 sprintf(buffer, "%s", "blendfile");
117                 lresult = RegSetValueEx(hkey, NULL, 0, REG_SZ, buffer, strlen(buffer) + 1);
118                 RegCloseKey(hkey);
119         }
120 }
121
122 static void strlower (char *str) {
123         while (*str) {
124                 *str= tolower(*str);
125                 str++;
126         }
127 }
128
129 static void strnlower (char *str, int n) {
130         while (n>0 && *str) {
131                 *str= tolower(*str);
132                 str++;
133                 n--;
134         }
135 }
136
137 int strcasecmp (char *s1, char *s2) {
138         char *st1, *st2;
139         int r;
140         
141         st1= MEM_mallocN(strlen(s1)+1, "temp string");
142         strcpy(st1, s1);
143
144         st2= MEM_mallocN(strlen(s2)+1, "temp string");
145         strcpy(st2, s2);
146
147         strlower(st1);
148         strlower(st2);
149         r= strcmp (st1, st2);
150         
151         MEM_freeN(st1);
152         MEM_freeN(st2);
153
154         return r;
155 }
156
157 int strncasecmp (char *s1, char *s2, int n) {
158         char *st1, *st2;
159         int r;
160         
161         st1= MEM_mallocN(n, "temp string");
162         memcpy(st1, s1, n);
163
164         st2= MEM_mallocN(n, "temp string");
165         memcpy(st2, s2, n);
166
167         strnlower(st1, n);
168         strnlower(st2, n);
169
170         r= strncmp (st1, st2, n);
171         
172         MEM_freeN(st1);
173         MEM_freeN(st2);
174
175         return r;       
176 }
177
178 DIR *opendir (const char *path) {
179         if (GetFileAttributes(path) & FILE_ATTRIBUTE_DIRECTORY) {
180                 DIR *newd= MEM_mallocN(sizeof(DIR), "opendir");
181
182                 newd->handle = INVALID_HANDLE_VALUE;
183                 sprintf(newd->path, "%s/*.*",path);
184                 
185                 newd->direntry.d_ino= 0;
186                 newd->direntry.d_off= 0;
187                 newd->direntry.d_reclen= 0;
188                 newd->direntry.d_name= NULL;
189                 
190                 return newd;
191         } else {
192                 return NULL;
193         }
194 }
195
196 struct dirent *readdir(DIR *dp) {
197         if (dp->direntry.d_name) {
198                 MEM_freeN(dp->direntry.d_name);
199                 dp->direntry.d_name= NULL;
200         }
201                 
202         if (dp->handle==INVALID_HANDLE_VALUE) {
203                 dp->handle= FindFirstFile(dp->path, &(dp->data));
204                 if (dp->handle==INVALID_HANDLE_VALUE)
205                         return NULL;
206                         
207                 dp->direntry.d_name= BLI_strdup(dp->data.cFileName);
208
209                 return &dp->direntry;
210         } else if (FindNextFile (dp->handle, &(dp->data))) {
211                 dp->direntry.d_name= BLI_strdup(dp->data.cFileName);
212
213                 return &dp->direntry;
214         } else {
215                 return NULL;
216         }
217 }
218
219 int closedir (DIR *dp) {
220         if (dp->direntry.d_name) MEM_freeN(dp->direntry.d_name);
221         if (dp->handle!=INVALID_HANDLE_VALUE) FindClose(dp->handle);
222
223         MEM_freeN(dp);
224         
225         return 0;
226 }
227
228 #else
229
230 void BLI_WINSTUFF_C_IS_EMPTY_FOR_UNIX(void) 
231 {
232   /*intentionally empty*/
233 }
234
235 #endif