winecfg: Update the drives only when they have changed, instead of trying to compare...
[wine] / programs / winecfg / drive.c
1 /*
2  * Drive management code
3  *
4  * Copyright 2003 Mark Westcott
5  * Copyright 2003-2004 Mike Hearn
6  * Copyright 2004 Chris Morgan
7  *
8  * This library is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public
10  * License as published by the Free Software Foundation; either
11  * version 2.1 of the License, or (at your option) any later version.
12  *
13  * This library is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Lesser General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with this library; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21  *
22  */
23
24 #include "config.h"
25 #include "wine/port.h"
26
27 #include <assert.h>
28 #include <stdarg.h>
29 #include <stdio.h>
30 #include <string.h>
31
32 #include <windef.h>
33 #include <winbase.h>
34 #include <winreg.h>
35 #include <wine/debug.h>
36 #include <shellapi.h>
37 #include <objbase.h>
38 #include <shlguid.h>
39 #include <shlwapi.h>
40 #include <shlobj.h>
41 #include <wine/library.h>
42
43 #include "winecfg.h"
44 #include "resource.h"
45
46
47 WINE_DEFAULT_DEBUG_CHANNEL(winecfg);
48
49 struct drive drives[26]; /* one for each drive letter */
50
51 static inline int letter_to_index(char letter)
52 {
53     return (toupper(letter) - 'A');
54 }
55
56 /* This function produces a mask for each drive letter that isn't
57  * currently used. Each bit of the long result represents a letter,
58  * with A being the least significant bit, and Z being the most
59  * significant.
60  *
61  * To calculate this, we loop over each letter, and see if we can get
62  * a drive entry for it. If so, we set the appropriate bit. At the
63  * end, we flip each bit, to give the desired result.
64  *
65  * The letter parameter is always marked as being available. This is
66  * so the edit dialog can display the currently used drive letter
67  * alongside the available ones.
68  */
69 long drive_available_mask(char letter)
70 {
71   long result = 0;
72   int i;
73
74   WINE_TRACE("\n");
75
76
77   for(i = 0; i < 26; i++)
78   {
79       if (!drives[i].in_use) continue;
80       result |= (1 << (letter_to_index(drives[i].letter)));
81   }
82
83   result = ~result;
84   if (letter) result |= DRIVE_MASK_BIT(letter);
85
86   WINE_TRACE("finished drive letter loop with %lx\n", result);
87   return result;
88 }
89
90 BOOL add_drive(char letter, const char *targetpath, const WCHAR *label, DWORD serial, DWORD type)
91 {
92     int driveIndex = letter_to_index(letter);
93
94     if(drives[driveIndex].in_use)
95         return FALSE;
96
97     WINE_TRACE("letter == '%c', unixpath == '%s', label == %s, serial == %08x, type == %d\n",
98                letter, targetpath, wine_dbgstr_w(label), serial, type);
99
100     drives[driveIndex].letter   = toupper(letter);
101     drives[driveIndex].unixpath = strdupA(targetpath);
102     drives[driveIndex].label    = strdupW(label);
103     drives[driveIndex].serial   = serial;
104     drives[driveIndex].type     = type;
105     drives[driveIndex].in_use   = TRUE;
106     drives[driveIndex].modified = TRUE;
107
108     return TRUE;
109 }
110
111 /* deallocates the contents of the drive. does not free the drive itself  */
112 void delete_drive(struct drive *d)
113 {
114     HeapFree(GetProcessHeap(), 0, d->unixpath);
115     d->unixpath = NULL;
116     HeapFree(GetProcessHeap(), 0, d->label);
117     d->label = NULL;
118     d->serial = 0;
119     d->in_use = FALSE;
120     d->modified = TRUE;
121 }
122
123 static void set_drive_type( char letter, DWORD type )
124 {
125     HKEY hKey;
126     char driveValue[4];
127     const char *typeText = NULL;
128
129     sprintf(driveValue, "%c:", letter);
130
131     /* Set the drive type in the registry */
132     if (type == DRIVE_FIXED)
133         typeText = "hd";
134     else if (type == DRIVE_REMOTE)
135         typeText = "network";
136     else if (type == DRIVE_REMOVABLE)
137         typeText = "floppy";
138     else if (type == DRIVE_CDROM)
139         typeText = "cdrom";
140
141     if (RegCreateKey(HKEY_LOCAL_MACHINE, "Software\\Wine\\Drives", &hKey) != ERROR_SUCCESS)
142         WINE_TRACE("  Unable to open '%s'\n", "Software\\Wine\\Drives");
143     else
144     {
145         if (typeText)
146             RegSetValueEx( hKey, driveValue, 0, REG_SZ, (const BYTE *)typeText, strlen(typeText) + 1 );
147         else
148             RegDeleteValue( hKey, driveValue );
149         RegCloseKey(hKey);
150     }
151 }
152
153 static DWORD get_drive_type( char letter )
154 {
155     HKEY hKey;
156     char driveValue[4];
157     DWORD ret = DRIVE_UNKNOWN;
158
159     sprintf(driveValue, "%c:", letter);
160
161     if (RegOpenKey(HKEY_LOCAL_MACHINE, "Software\\Wine\\Drives", &hKey) != ERROR_SUCCESS)
162         WINE_TRACE("  Unable to open Software\\Wine\\Drives\n" );
163     else
164     {
165         char buffer[80];
166         DWORD size = sizeof(buffer);
167
168         if (!RegQueryValueExA( hKey, driveValue, NULL, NULL, (LPBYTE)buffer, &size ))
169         {
170             WINE_TRACE("Got type '%s' for %s\n", buffer, driveValue );
171             if (!lstrcmpi( buffer, "hd" )) ret = DRIVE_FIXED;
172             else if (!lstrcmpi( buffer, "network" )) ret = DRIVE_REMOTE;
173             else if (!lstrcmpi( buffer, "floppy" )) ret = DRIVE_REMOVABLE;
174             else if (!lstrcmpi( buffer, "cdrom" )) ret = DRIVE_CDROM;
175         }
176         RegCloseKey(hKey);
177     }
178     return ret;
179 }
180
181
182 static void set_drive_label( char letter, const WCHAR *label )
183 {
184     static const WCHAR emptyW[1];
185     WCHAR device[] = {'a',':','\\',0};  /* SetVolumeLabel() requires a trailing slash */
186     device[0] = letter;
187
188     if (!label) label = emptyW;
189     if(!SetVolumeLabelW(device, label))
190     {
191         WINE_WARN("unable to set volume label for devicename of %s, label of %s\n",
192                   wine_dbgstr_w(device), wine_dbgstr_w(label));
193         PRINTERROR();
194     }
195     else
196     {
197         WINE_TRACE("  set volume label for devicename of %s, label of %s\n",
198                   wine_dbgstr_w(device), wine_dbgstr_w(label));
199     }
200 }
201
202 /* set the drive serial number via a .windows-serial file */
203 static void set_drive_serial( char letter, DWORD serial )
204 {
205     char filename[] = "a:\\.windows-serial";
206     HANDLE hFile;
207
208     filename[0] = letter;
209     WINE_TRACE("Putting serial number of %08x into file '%s'\n", serial, filename);
210     hFile = CreateFile(filename, GENERIC_WRITE, FILE_SHARE_READ, NULL,
211                        CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);
212     if (hFile != INVALID_HANDLE_VALUE)
213     {
214         DWORD w;
215         char buffer[16];
216
217         sprintf( buffer, "%X\n", serial );
218         WriteFile(hFile, buffer, strlen(buffer), &w, NULL);
219         CloseHandle(hFile);
220     }
221 }
222
223 #if 0
224
225 /* currently unused, but if users have this burning desire to be able to rename drives,
226    we can put it back in.
227  */
228
229 BOOL copyDrive(struct drive *pSrc, struct drive *pDst)
230 {
231     if(pDst->in_use)
232     {
233         WINE_TRACE("pDst already in use\n");
234         return FALSE;
235     }
236
237     if(!pSrc->unixpath) WINE_TRACE("!pSrc->unixpath\n");
238     if(!pSrc->label) WINE_TRACE("!pSrc->label\n");
239     if(!pSrc->serial) WINE_TRACE("!pSrc->serial\n");
240
241     pDst->unixpath = strdupA(pSrc->unixpath);
242     pDst->label = strdupA(pSrc->label);
243     pDst->serial = strdupA(pSrc->serial);
244     pDst->type = pSrc->type;
245     pDst->in_use = TRUE;
246
247     return TRUE;
248 }
249
250 BOOL moveDrive(struct drive *pSrc, struct drive *pDst)
251 {
252     WINE_TRACE("pSrc->letter == %c, pDst->letter == %c\n", pSrc->letter, pDst->letter);
253
254     if(!copyDrive(pSrc, pDst))
255     {
256         WINE_TRACE("copyDrive failed\n");
257         return FALSE;
258     }
259
260     delete_drive(pSrc);
261     return TRUE;
262 }
263
264 #endif
265
266 /* Load currently defined drives into the drives array  */
267 void load_drives(void)
268 {
269     WCHAR *devices, *dev;
270     int len;
271     int drivecount = 0, i;
272     int retval;
273     static const int arraysize = 512;
274     const char *config_dir = wine_get_config_dir();
275     char *path;
276
277     WINE_TRACE("\n");
278
279     /* setup the drives array */
280     dev = devices = HeapAlloc(GetProcessHeap(), 0, arraysize * sizeof(WCHAR));
281     len = GetLogicalDriveStringsW(arraysize, devices);
282
283     /* make all devices unused */
284     for (i = 0; i < 26; i++)
285     {
286         drives[i].letter = 'A' + i;
287         drives[i].in_use = FALSE;
288         drives[i].serial = 0;
289
290         HeapFree(GetProcessHeap(), 0, drives[i].unixpath);
291         drives[i].unixpath = NULL;
292
293         HeapFree(GetProcessHeap(), 0, drives[i].label);
294         drives[i].label = NULL;
295     }
296
297     /* work backwards through the result of GetLogicalDriveStrings  */
298     while (len)
299     {
300         WCHAR volname[512]; /* volume name  */
301         DWORD serial;
302         char simplepath[3];
303         char targetpath[256];
304         char *c;
305
306         WINE_TRACE("devices == %s\n", wine_dbgstr_w(devices));
307
308         volname[0] = 0;
309
310         retval = GetVolumeInformationW(devices, volname, sizeof(volname)/sizeof(WCHAR),
311                                        &serial, NULL, NULL, NULL, 0);
312         if(!retval)
313         {
314             WINE_ERR("GetVolumeInformation() for %s failed, setting serial to 0\n",
315                      wine_dbgstr_w(devices));
316             PRINTERROR();
317             serial = 0;
318         }
319
320         WINE_TRACE("serial: '0x%X'\n", serial);
321
322         /* QueryDosDevice() requires no trailing backslash */
323         simplepath[0] = devices[0];
324         simplepath[1] = ':';
325         simplepath[2] = 0;
326         QueryDosDevice(simplepath, targetpath, sizeof(targetpath));
327
328         /* targetpath may have forward slashes rather than backslashes, so correct */
329         c = targetpath;
330         do if (*c == '\\') *c = '/'; while (*c++);
331
332         add_drive(*devices, targetpath, volname, serial, get_drive_type(devices[0]) );
333
334         len -= lstrlenW(devices);
335         devices += lstrlenW(devices);
336
337         /* skip over any nulls */
338         while ((*devices == 0) && (len))
339         {
340             len--;
341             devices++;
342         }
343
344         drivecount++;
345     }
346
347     /* Find all the broken symlinks we might have and add them as well. */
348
349     len = strlen(config_dir) + sizeof("/dosdevices/a:");
350     if (!(path = HeapAlloc(GetProcessHeap(), 0, len)))
351         return;
352
353     strcpy(path, config_dir);
354     strcat(path, "/dosdevices/a:");
355
356     for (i = 0; i < 26; i++)
357     {
358         char buff[MAX_PATH];
359         struct stat st;
360         int cnt;
361
362         if (drives[i].in_use) continue;
363         path[len - 3] = 'a' + i;
364
365         if (lstat(path, &st) == -1 || !S_ISLNK(st.st_mode)) continue;
366         if ((cnt = readlink(path, buff, sizeof(buff))) == -1) continue;
367         buff[cnt] = '\0';
368
369         WINE_TRACE("found broken symlink %s -> %s\n", path, buff);
370         add_drive('A' + i, buff, NULL, 0, DRIVE_UNKNOWN);
371
372         drivecount++;
373     }
374
375     /* reset modified flags */
376     for (i = 0; i < 26; i++) drives[i].modified = FALSE;
377
378     WINE_TRACE("found %d drives\n", drivecount);
379
380     HeapFree(GetProcessHeap(), 0, path);
381     HeapFree(GetProcessHeap(), 0, dev);
382 }
383
384 /* some of this code appears to be broken by bugs in Wine: the label
385  * setting code has no effect, for instance  */
386 void apply_drive_changes(void)
387 {
388     int i;
389     CHAR devicename[4];
390     CHAR targetpath[256];
391
392     WINE_TRACE("\n");
393
394     /* add each drive and remove as we go */
395     for(i = 0; i < 26; i++)
396     {
397         if (!drives[i].modified) continue;
398         drives[i].modified = FALSE;
399
400         snprintf(devicename, sizeof(devicename), "%c:", 'A' + i);
401
402         if (drives[i].in_use)
403         {
404             /* define this drive */
405             /* DefineDosDevice() requires that NO trailing slash be present */
406             if(!DefineDosDevice(DDD_RAW_TARGET_PATH, devicename, drives[i].unixpath))
407             {
408                 WINE_ERR("  unable to define devicename of '%s', targetpath of '%s'\n",
409                     devicename, drives[i].unixpath);
410                 PRINTERROR();
411             }
412             else
413             {
414                 WINE_TRACE("  added devicename of '%s', targetpath of '%s'\n",
415                            devicename, drives[i].unixpath);
416             }
417             set_drive_label( drives[i].letter, drives[i].label );
418             set_drive_serial( drives[i].letter, drives[i].serial );
419             set_drive_type( drives[i].letter, drives[i].type );
420         }
421         else if (QueryDosDevice(devicename, targetpath, sizeof(targetpath)))
422         {
423             /* remove this drive */
424             if(!DefineDosDevice(DDD_REMOVE_DEFINITION, devicename, drives[i].unixpath))
425             {
426                 WINE_ERR("unable to remove devicename of '%s', targetpath of '%s'\n",
427                     devicename, drives[i].unixpath);
428                 PRINTERROR();
429             }
430             else
431             {
432                 WINE_TRACE("removed devicename of '%s', targetpath of '%s'\n",
433                            devicename, drives[i].unixpath);
434             }
435
436             set_drive_type( drives[i].letter, DRIVE_UNKNOWN );
437             continue;
438         }
439     }
440 }