Registering .blend files now works for Windows -- hopefully!
[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\\Blender", 0, 
61                 KEY_ALL_ACCESS, &hkey);
62
63         if (lresult == ERROR_SUCCESS) {
64                 lresult = RegQueryValueEx(hkey, "Inst_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\\Blender", 0, 
86                 "", REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, NULL, &hkey, &dwd);
87
88         if (lresult == ERROR_SUCCESS) {
89                 lresult = RegSetValueEx(hkey, "Inst_Dir", 0, REG_SZ, dir, strlen(dir)+1);
90                 RegCloseKey(hkey);
91         }
92
93         lresult = RegCreateKeyEx(HKEY_CLASSES_ROOT, "blendfile\\shell\\open\\command", 0,
94                 "", REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, NULL, &hkey, &dwd);
95
96         if (lresult == ERROR_SUCCESS) {
97                 sprintf(buffer, "\"%s\" \"%%1\"", str);
98                 lresult = RegSetValueEx(hkey, NULL, 0, REG_SZ, buffer, strlen(buffer) + 1);
99                 RegCloseKey(hkey);
100         }
101
102         lresult = RegCreateKeyEx(HKEY_CLASSES_ROOT, "blendfile\\DefaultIcon", 0,
103                 "", REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, NULL, &hkey, &dwd);
104
105         if (lresult == ERROR_SUCCESS) {
106                 sprintf(buffer, "\"%s\",1", str);
107                 lresult = RegSetValueEx(hkey, NULL, 0, REG_SZ, buffer, strlen(buffer) + 1);
108                 RegCloseKey(hkey);
109         }
110
111         lresult = RegCreateKeyEx(HKEY_CLASSES_ROOT, ".blend", 0,
112                 "", REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, NULL, &hkey, &dwd);
113
114         if (lresult == ERROR_SUCCESS) {
115                 sprintf(buffer, "%s", "blendfile");
116                 lresult = RegSetValueEx(hkey, NULL, 0, REG_SZ, buffer, strlen(buffer) + 1);
117                 RegCloseKey(hkey);
118         }
119 }
120
121 static void strlower (char *str) {
122         while (*str) {
123                 *str= tolower(*str);
124                 str++;
125         }
126 }
127
128 static void strnlower (char *str, int n) {
129         while (n>0 && *str) {
130                 *str= tolower(*str);
131                 str++;
132                 n--;
133         }
134 }
135
136 #ifndef FREE_WINDOWS
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 #endif
178
179 DIR *opendir (const char *path) {
180         if (GetFileAttributes(path) & FILE_ATTRIBUTE_DIRECTORY) {
181                 DIR *newd= MEM_mallocN(sizeof(DIR), "opendir");
182
183                 newd->handle = INVALID_HANDLE_VALUE;
184                 sprintf(newd->path, "%s/*.*",path);
185                 
186                 newd->direntry.d_ino= 0;
187                 newd->direntry.d_off= 0;
188                 newd->direntry.d_reclen= 0;
189                 newd->direntry.d_name= NULL;
190                 
191                 return newd;
192         } else {
193                 return NULL;
194         }
195 }
196
197 struct dirent *readdir(DIR *dp) {
198         if (dp->direntry.d_name) {
199                 MEM_freeN(dp->direntry.d_name);
200                 dp->direntry.d_name= NULL;
201         }
202                 
203         if (dp->handle==INVALID_HANDLE_VALUE) {
204                 dp->handle= FindFirstFile(dp->path, &(dp->data));
205                 if (dp->handle==INVALID_HANDLE_VALUE)
206                         return NULL;
207                         
208                 dp->direntry.d_name= BLI_strdup(dp->data.cFileName);
209
210                 return &dp->direntry;
211         } else if (FindNextFile (dp->handle, &(dp->data))) {
212                 dp->direntry.d_name= BLI_strdup(dp->data.cFileName);
213
214                 return &dp->direntry;
215         } else {
216                 return NULL;
217         }
218 }
219
220 int closedir (DIR *dp) {
221         if (dp->direntry.d_name) MEM_freeN(dp->direntry.d_name);
222         if (dp->handle!=INVALID_HANDLE_VALUE) FindClose(dp->handle);
223
224         MEM_freeN(dp);
225         
226         return 0;
227 }
228
229 #else
230
231 void BLI_WINSTUFF_C_IS_EMPTY_FOR_UNIX(void) 
232 {
233   /*intentionally empty*/
234 }
235
236 #endif