?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
msxml3: Use standard dlopen() instead of the libwine wrappers.
[wine/zf.git] / programs / winefile / winefile.c
blobfa78237cccf33acd89dc3cc202f430f202a8d545
1 /*
2 * Winefile
3 *
4 * Copyright 2000, 2003, 2004, 2005 Martin Fuchs
5 * Copyright 2006 Jason Green
6 *
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
11 *
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
16 *
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20 */
21
22 #define COBJMACROS
23
24 #include <assert.h>
25 #include <stdio.h>
26 #include "winefile.h"
27 #include "resource.h"
28
29 #ifdef NONAMELESSUNION
30 #define UNION_MEMBER(x) DUMMYUNIONNAME.x
31 #else
32 #define UNION_MEMBER(x) x
33 #endif
34
35 #define DEFAULT_SPLIT_POS 300
36
37 static const WCHAR registry_key[] = { 'S','o','f','t','w','a','r','e','\\',
38 'W','i','n','e','\\',
39 'W','i','n','e','F','i','l','e','\0'};
40 static const WCHAR reg_start_x[] = { 's','t','a','r','t','X','\0'};
41 static const WCHAR reg_start_y[] = { 's','t','a','r','t','Y','\0'};
42 static const WCHAR reg_width[] = { 'w','i','d','t','h','\0'};
43 static const WCHAR reg_height[] = { 'h','e','i','g','h','t','\0'};
44 static const WCHAR reg_logfont[] = { 'l','o','g','f','o','n','t','\0'};
45
46 enum ENTRY_TYPE {
47 ET_WINDOWS,
48 ET_SHELL
49 };
50
51 typedef struct _Entry {
52 struct _Entry* next;
53 struct _Entry* down;
54 struct _Entry* up;
55
56 BOOL expanded;
57 BOOL scanned;
58 int level;
59
60 WIN32_FIND_DATAW data;
61
62 BY_HANDLE_FILE_INFORMATION bhfi;
63 BOOL bhfi_valid;
64 enum ENTRY_TYPE etype;
65 LPITEMIDLIST pidl;
66 IShellFolder* folder;
67 HICON hicon;
68 } Entry;
69
70 typedef struct {
71 Entry entry;
72 WCHAR path[MAX_PATH];
73 WCHAR volname[_MAX_FNAME];
74 WCHAR fs[_MAX_DIR];
75 DWORD drive_type;
76 DWORD fs_flags;
77 } Root;
78
79 enum COLUMN_FLAGS {
80 COL_SIZE = 0x01,
81 COL_DATE = 0x02,
82 COL_TIME = 0x04,
83 COL_ATTRIBUTES = 0x08,
84 COL_DOSNAMES = 0x10,
85 COL_INDEX = 0x20,
86 COL_LINKS = 0x40,
87 COL_ALL = COL_SIZE|COL_DATE|COL_TIME|COL_ATTRIBUTES|COL_DOSNAMES|COL_INDEX|COL_LINKS
88 };
89
90 typedef enum {
91 SORT_NAME,
92 SORT_EXT,
93 SORT_SIZE,
94 SORT_DATE
95 } SORT_ORDER;
96
97 typedef struct {
98 HWND hwnd;
99 HWND hwndHeader;
100
101 #define COLUMNS 10
102 int widths[COLUMNS];
103 int widths_shown[COLUMNS];
104 int positions[COLUMNS+1];
105
106 BOOL treePane;
107 int visible_cols;
108 Entry* root;
109 Entry* cur;
110 } Pane;
111
112 typedef struct {
113 HWND hwnd;
114 Pane left;
115 Pane right;
116 int focus_pane; /* 0: left 1: right */
117 WINDOWPLACEMENT pos;
118 int split_pos;
119 BOOL header_wdths_ok;
120
121 WCHAR path[MAX_PATH];
122 WCHAR filter_pattern[MAX_PATH];
123 int filter_flags;
124 Root root;
125
126 SORT_ORDER sortOrder;
127 } ChildWnd;
128
129
130
131 static void read_directory(Entry* dir, LPCWSTR path, SORT_ORDER sortOrder, HWND hwnd);
132 static void set_curdir(ChildWnd* child, Entry* entry, int idx, HWND hwnd);
133 static void refresh_child(ChildWnd* child);
134 static void refresh_drives(void);
135 static void get_path(Entry* dir, PWSTR path);
136 static void format_date(const FILETIME* ft, WCHAR* buffer, int visible_cols);
137
138 static LRESULT CALLBACK FrameWndProc(HWND hwnd, UINT nmsg, WPARAM wparam, LPARAM lparam);
139 static LRESULT CALLBACK ChildWndProc(HWND hwnd, UINT nmsg, WPARAM wparam, LPARAM lparam);
140 static LRESULT CALLBACK TreeWndProc(HWND hwnd, UINT nmsg, WPARAM wparam, LPARAM lparam);
141
142
143 /* globals */
144 WINEFILE_GLOBALS Globals;
145
146 static int last_split;
147
148 /* some common string constants */
149 static const WCHAR sEmpty[] = {'\0'};
150 static const WCHAR sSpace[] = {' ', '\0'};
151 static const WCHAR sNumFmt[] = {'%','d','\0'};
152 static const WCHAR sQMarks[] = {'?','?','?','\0'};
153
154 /* window class names */
155 static const WCHAR sWINEFILEFRAME[] = {'W','F','S','_','F','r','a','m','e','\0'};
156 static const WCHAR sWINEFILETREE[] = {'W','F','S','_','T','r','e','e','\0'};
157
158 static void format_longlong(LPWSTR ret, ULONGLONG val)
159 {
160 WCHAR buffer[65], *p = &buffer[64];
161
162 *p = 0;
163 do {
164 *(--p) = '0' + val % 10;
165 val /= 10;
166 } while (val);
167 lstrcpyW( ret, p );
168 }
169
170
171 /* load resource string */
172 static LPWSTR load_string(LPWSTR buffer, DWORD size, UINT id)
173 {
174 LoadStringW(Globals.hInstance, id, buffer, size);
175 return buffer;
176 }
177
178 #define RS(b, i) load_string(b, ARRAY_SIZE(b), i)
179
180
181 /* display error message for the specified WIN32 error code */
182 static void display_error(HWND hwnd, DWORD error)
183 {
184 WCHAR b1[BUFFER_LEN], b2[BUFFER_LEN];
185 PWSTR msg;
186
187 if (FormatMessageW(FORMAT_MESSAGE_ALLOCATE_BUFFER|FORMAT_MESSAGE_FROM_SYSTEM,
188 0, error, MAKELANGID(LANG_NEUTRAL,SUBLANG_DEFAULT), (PWSTR)&msg, 0, NULL))
189 MessageBoxW(hwnd, msg, RS(b2,IDS_WINEFILE), MB_OK);
190 else
191 MessageBoxW(hwnd, RS(b1,IDS_ERROR), RS(b2,IDS_WINEFILE), MB_OK);
192
193 LocalFree(msg);
194 }
195
196
197 /* display network error message using WNetGetLastErrorW() */
198 static void display_network_error(HWND hwnd)
199 {
200 WCHAR msg[BUFFER_LEN], provider[BUFFER_LEN], b2[BUFFER_LEN];
201 DWORD error;
202
203 if (WNetGetLastErrorW(&error, msg, BUFFER_LEN, provider, BUFFER_LEN) == NO_ERROR)
204 MessageBoxW(hwnd, msg, RS(b2,IDS_WINEFILE), MB_OK);
205 }
206
207 static inline BOOL get_check(HWND hwnd, INT id)
208 {
209 return BST_CHECKED&SendMessageW(GetDlgItem(hwnd, id), BM_GETSTATE, 0, 0);
210 }
211
212 static inline INT set_check(HWND hwnd, INT id, BOOL on)
213 {
214 return SendMessageW(GetDlgItem(hwnd, id), BM_SETCHECK, on?BST_CHECKED:BST_UNCHECKED, 0);
215 }
216
217 static inline void choose_font(HWND hwnd)
218 {
219 WCHAR dlg_name[BUFFER_LEN], dlg_info[BUFFER_LEN];
220 CHOOSEFONTW chFont;
221 LOGFONTW lFont;
222
223 HDC hdc = GetDC(hwnd);
224
225 GetObjectW(Globals.hfont, sizeof(LOGFONTW), &lFont);
226
227 chFont.lStructSize = sizeof(CHOOSEFONTW);
228 chFont.hwndOwner = hwnd;
229 chFont.hDC = NULL;
230 chFont.lpLogFont = &lFont;
231 chFont.Flags = CF_SCREENFONTS | CF_FORCEFONTEXIST | CF_LIMITSIZE | CF_NOSCRIPTSEL | CF_INITTOLOGFONTSTRUCT | CF_NOVERTFONTS;
232 chFont.rgbColors = RGB(0,0,0);
233 chFont.lCustData = 0;
234 chFont.lpfnHook = NULL;
235 chFont.lpTemplateName = NULL;
236 chFont.hInstance = Globals.hInstance;
237 chFont.lpszStyle = NULL;
238 chFont.nFontType = SIMULATED_FONTTYPE;
239 chFont.nSizeMin = 0;
240 chFont.nSizeMax = 24;
241
242 if (ChooseFontW(&chFont)) {
243 HWND childWnd;
244 HFONT hFontOld;
245
246 DeleteObject(Globals.hfont);
247 Globals.hfont = CreateFontIndirectW(&lFont);
248 hFontOld = SelectObject(hdc, Globals.hfont);
249 GetTextExtentPoint32W(hdc, sSpace, 1, &Globals.spaceSize);
250
251 /* change font in all open child windows */
252 for(childWnd=GetWindow(Globals.hmdiclient,GW_CHILD); childWnd; childWnd=GetNextWindow(childWnd,GW_HWNDNEXT)) {
253 ChildWnd* child = (ChildWnd*) GetWindowLongPtrW(childWnd, GWLP_USERDATA);
254 SendMessageW(child->left.hwnd, WM_SETFONT, (WPARAM)Globals.hfont, TRUE);
255 SendMessageW(child->right.hwnd, WM_SETFONT, (WPARAM)Globals.hfont, TRUE);
256 SendMessageW(child->left.hwnd, LB_SETITEMHEIGHT, 1, max(Globals.spaceSize.cy,IMAGE_HEIGHT+3));
257 SendMessageW(child->right.hwnd, LB_SETITEMHEIGHT, 1, max(Globals.spaceSize.cy,IMAGE_HEIGHT+3));
258 InvalidateRect(child->left.hwnd, NULL, TRUE);
259 InvalidateRect(child->right.hwnd, NULL, TRUE);
260 }
261
262 SelectObject(hdc, hFontOld);
263 }
264 else if (CommDlgExtendedError()) {
265 LoadStringW(Globals.hInstance, IDS_FONT_SEL_DLG_NAME, dlg_name, BUFFER_LEN);
266 LoadStringW(Globals.hInstance, IDS_FONT_SEL_ERROR, dlg_info, BUFFER_LEN);
267 MessageBoxW(hwnd, dlg_info, dlg_name, MB_OK);
268 }
269
270 ReleaseDC(hwnd, hdc);
271 }
272
273
274 /* allocate and initialise a directory entry */
275 static Entry* alloc_entry(void)
276 {
277 Entry* entry = HeapAlloc(GetProcessHeap(), 0, sizeof(Entry));
278
279 entry->pidl = NULL;
280 entry->folder = NULL;
281 entry->hicon = 0;
282
283 return entry;
284 }
285
286 /* free a directory entry */
287 static void free_entry(Entry* entry)
288 {
289 if (entry->hicon && entry->hicon!=(HICON)-1)
290 DestroyIcon(entry->hicon);
291
292 if (entry->folder && entry->folder!=Globals.iDesktop)
293 IShellFolder_Release(entry->folder);
294
295 if (entry->pidl)
296 IMalloc_Free(Globals.iMalloc, entry->pidl);
297
298 HeapFree(GetProcessHeap(), 0, entry);
299 }
300
301 /* recursively free all child entries */
302 static void free_entries(Entry* dir)
303 {
304 Entry *entry, *next=dir->down;
305
306 if (next) {
307 dir->down = 0;
308
309 do {
310 entry = next;
311 next = entry->next;
312
313 free_entries(entry);
314 free_entry(entry);
315 } while(next);
316 }
317 }
318
319
320 static void read_directory_win(Entry* dir, LPCWSTR path)
321 {
322 Entry* first_entry = NULL;
323 Entry* last = NULL;
324 Entry* entry;
325
326 int level = dir->level + 1;
327 WIN32_FIND_DATAW w32fd;
328 HANDLE hFind;
329 HANDLE hFile;
330
331 WCHAR buffer[MAX_PATH], *p;
332 for(p=buffer; *path; )
333 *p++ = *path++;
334
335 *p++ = '\\';
336 p[0] = '*';
337 p[1] = '\0';
338
339 hFind = FindFirstFileW(buffer, &w32fd);
340
341 if (hFind != INVALID_HANDLE_VALUE) {
342 do {
343 entry = alloc_entry();
344
345 if (!first_entry)
346 first_entry = entry;
347
348 if (last)
349 last->next = entry;
350
351 memcpy(&entry->data, &w32fd, sizeof(WIN32_FIND_DATAW));
352 entry->down = NULL;
353 entry->up = dir;
354 entry->expanded = FALSE;
355 entry->scanned = FALSE;
356 entry->level = level;
357 entry->etype = ET_WINDOWS;
358 entry->bhfi_valid = FALSE;
359
360 lstrcpyW(p, entry->data.cFileName);
361
362 hFile = CreateFileW(buffer, GENERIC_READ, FILE_SHARE_READ|FILE_SHARE_WRITE|FILE_SHARE_DELETE,
363 0, OPEN_EXISTING, FILE_FLAG_BACKUP_SEMANTICS, 0);
364
365 if (hFile != INVALID_HANDLE_VALUE) {
366 if (GetFileInformationByHandle(hFile, &entry->bhfi))
367 entry->bhfi_valid = TRUE;
368
369 CloseHandle(hFile);
370 }
371
372 last = entry;
373 } while(FindNextFileW(hFind, &w32fd));
374
375 if (last)
376 last->next = NULL;
377
378 FindClose(hFind);
379 }
380
381 dir->down = first_entry;
382 dir->scanned = TRUE;
383 }
384
385
386 static Entry* find_entry_win(Entry* dir, LPCWSTR name)
387 {
388 Entry* entry;
389
390 for(entry=dir->down; entry; entry=entry->next) {
391 LPCWSTR p = name;
392 LPCWSTR q = entry->data.cFileName;
393
394 do {
395 if (!*p || *p == '\\' || *p == '/')
396 return entry;
397 } while(tolower(*p++) == tolower(*q++));
398
399 p = name;
400 q = entry->data.cAlternateFileName;
401
402 do {
403 if (!*p || *p == '\\' || *p == '/')
404 return entry;
405 } while(tolower(*p++) == tolower(*q++));
406 }
407
408 return 0;
409 }
410
411
412 static Entry* read_tree_win(Root* root, LPCWSTR path, SORT_ORDER sortOrder, HWND hwnd)
413 {
414 WCHAR buffer[MAX_PATH];
415 Entry* entry = &root->entry;
416 LPCWSTR s = path;
417 PWSTR d = buffer;
418
419 HCURSOR old_cursor = SetCursor(LoadCursorW(0, (LPCWSTR)IDC_WAIT));
420
421 entry->etype = ET_WINDOWS;
422 while(entry) {
423 while(*s && *s != '\\' && *s != '/')
424 *d++ = *s++;
425
426 while(*s == '\\' || *s == '/')
427 s++;
428
429 *d++ = '\\';
430 *d = '\0';
431
432 read_directory(entry, buffer, sortOrder, hwnd);
433
434 if (entry->down)
435 entry->expanded = TRUE;
436
437 if (!*s)
438 break;
439
440 entry = find_entry_win(entry, s);
441 }
442
443 SetCursor(old_cursor);
444
445 return entry;
446 }
447
448
449 static void free_strret(STRRET* str)
450 {
451 if (str->uType == STRRET_WSTR)
452 IMalloc_Free(Globals.iMalloc, str->UNION_MEMBER(pOleStr));
453 }
454
455 static LPWSTR wcscpyn(LPWSTR dest, LPCWSTR source, size_t count)
456 {
457 LPCWSTR s;
458 LPWSTR d = dest;
459
460 for(s=source; count&&(*d++=*s++); )
461 count--;
462
463 return dest;
464 }
465
466 static void get_strretW(STRRET* str, const SHITEMID* shiid, LPWSTR buffer, int len)
467 {
468 switch(str->uType) {
469 case STRRET_WSTR:
470 wcscpyn(buffer, str->UNION_MEMBER(pOleStr), len);
471 break;
472
473 case STRRET_OFFSET:
474 MultiByteToWideChar(CP_ACP, 0, (LPCSTR)shiid+str->UNION_MEMBER(uOffset), -1, buffer, len);
475 break;
476
477 case STRRET_CSTR:
478 MultiByteToWideChar(CP_ACP, 0, str->UNION_MEMBER(cStr), -1, buffer, len);
479 }
480 }
481
482
483 static HRESULT name_from_pidl(IShellFolder* folder, LPITEMIDLIST pidl, LPWSTR buffer, int len, SHGDNF flags)
484 {
485 STRRET str;
486
487 HRESULT hr = IShellFolder_GetDisplayNameOf(folder, pidl, flags, &str);
488
489 if (SUCCEEDED(hr)) {
490 get_strretW(&str, &pidl->mkid, buffer, len);
491 free_strret(&str);
492 } else
493 buffer[0] = '\0';
494
495 return hr;
496 }
497
498
499 static HRESULT path_from_pidlW(IShellFolder* folder, LPITEMIDLIST pidl, LPWSTR buffer, int len)
500 {
501 STRRET str;
502
503 /* SHGDN_FORPARSING: get full path of id list */
504 HRESULT hr = IShellFolder_GetDisplayNameOf(folder, pidl, SHGDN_FORPARSING, &str);
505
506 if (SUCCEEDED(hr)) {
507 get_strretW(&str, &pidl->mkid, buffer, len);
508 free_strret(&str);
509 } else
510 buffer[0] = '\0';
511
512 return hr;
513 }
514
515
516 /* create an item id list from a file system path */
517
518 static LPITEMIDLIST get_path_pidl(LPWSTR path, HWND hwnd)
519 {
520 LPITEMIDLIST pidl;
521 HRESULT hr;
522 ULONG len;
523 LPWSTR buffer = path;
524
525 hr = IShellFolder_ParseDisplayName(Globals.iDesktop, hwnd, NULL, buffer, &len, &pidl, NULL);
526 if (FAILED(hr))
527 return NULL;
528
529 return pidl;
530 }
531
532
533 /* convert an item id list from relative to absolute (=relative to the desktop) format */
534
535 static LPITEMIDLIST get_to_absolute_pidl(Entry* entry, HWND hwnd)
536 {
537 if (entry->up && entry->up->etype==ET_SHELL) {
538 LPITEMIDLIST idl = NULL;
539
540 while (entry->up) {
541 idl = ILCombine(ILClone(entry->pidl), idl);
542 entry = entry->up;
543 }
544
545 return idl;
546 } else if (entry->etype == ET_WINDOWS) {
547 WCHAR path[MAX_PATH];
548
549 get_path(entry, path);
550
551 return get_path_pidl(path, hwnd);
552 } else if (entry->pidl)
553 return ILClone(entry->pidl);
554
555 return NULL;
556 }
557
558
559 static HICON extract_icon(IShellFolder* folder, LPCITEMIDLIST pidl)
560 {
561 IExtractIconW* pExtract;
562
563 if (SUCCEEDED(IShellFolder_GetUIObjectOf(folder, 0, 1, &pidl, &IID_IExtractIconW, 0, (void**)&pExtract))) {
564 WCHAR path[_MAX_PATH];
565 unsigned flags;
566 HICON hicon;
567 int idx;
568
569 if (SUCCEEDED(IExtractIconW_GetIconLocation(pExtract, GIL_FORSHELL, path, _MAX_PATH, &idx, &flags))) {
570 if (!(flags & GIL_NOTFILENAME)) {
571 if (idx == -1)
572 idx = 0; /* special case for some control panel applications */
573
574 if ((int)ExtractIconExW(path, idx, 0, &hicon, 1) > 0)
575 flags &= ~GIL_DONTCACHE;
576 } else {
577 HICON hIconLarge = 0;
578
579 HRESULT hr = IExtractIconW_Extract(pExtract, path, idx, &hIconLarge, &hicon, MAKELONG(0/*GetSystemMetrics(SM_CXICON)*/,GetSystemMetrics(SM_CXSMICON)));
580
581 if (SUCCEEDED(hr))
582 DestroyIcon(hIconLarge);
583 }
584
585 return hicon;
586 }
587 }
588
589 return 0;
590 }
591
592
593 static Entry* find_entry_shell(Entry* dir, LPCITEMIDLIST pidl)
594 {
595 Entry* entry;
596
597 for(entry=dir->down; entry; entry=entry->next) {
598 if (entry->pidl->mkid.cb == pidl->mkid.cb &&
599 !memcmp(entry->pidl, pidl, entry->pidl->mkid.cb))
600 return entry;
601 }
602
603 return 0;
604 }
605
606 static Entry* read_tree_shell(Root* root, LPITEMIDLIST pidl, SORT_ORDER sortOrder, HWND hwnd)
607 {
608 Entry* entry = &root->entry;
609 Entry* next;
610 LPITEMIDLIST next_pidl = pidl;
611 IShellFolder* folder;
612 IShellFolder* child = NULL;
613 HRESULT hr;
614
615 HCURSOR old_cursor = SetCursor(LoadCursorW(0, (LPCWSTR)IDC_WAIT));
616
617 entry->etype = ET_SHELL;
618 folder = Globals.iDesktop;
619
620 while(entry) {
621 entry->pidl = next_pidl;
622 entry->folder = folder;
623
624 if (!pidl->mkid.cb)
625 break;
626
627 /* copy first element of item idlist */
628 next_pidl = IMalloc_Alloc(Globals.iMalloc, pidl->mkid.cb+sizeof(USHORT));
629 memcpy(next_pidl, pidl, pidl->mkid.cb);
630 ((LPITEMIDLIST)((LPBYTE)next_pidl+pidl->mkid.cb))->mkid.cb = 0;
631
632 hr = IShellFolder_BindToObject(folder, next_pidl, 0, &IID_IShellFolder, (void**)&child);
633 if (FAILED(hr))
634 break;
635
636 read_directory(entry, NULL, sortOrder, hwnd);
637
638 if (entry->down)
639 entry->expanded = TRUE;
640
641 next = find_entry_shell(entry, next_pidl);
642 if (!next)
643 break;
644
645 folder = child;
646 entry = next;
647
648 /* go to next element */
649 pidl = (LPITEMIDLIST) ((LPBYTE)pidl+pidl->mkid.cb);
650 }
651
652 SetCursor(old_cursor);
653
654 return entry;
655 }
656
657
658 static void fill_w32fdata_shell(IShellFolder* folder, LPCITEMIDLIST pidl, SFGAOF attribs, WIN32_FIND_DATAW* w32fdata)
659 {
660 if (!(attribs & SFGAO_FILESYSTEM) ||
661 FAILED(SHGetDataFromIDListW(folder, pidl, SHGDFIL_FINDDATA, w32fdata, sizeof(WIN32_FIND_DATAW)))) {
662 WIN32_FILE_ATTRIBUTE_DATA fad;
663 IDataObject* pDataObj;
664
665 STGMEDIUM medium = {0, {0}, 0};
666 FORMATETC fmt = {Globals.cfStrFName, 0, DVASPECT_CONTENT, -1, TYMED_HGLOBAL};
667
668 HRESULT hr = IShellFolder_GetUIObjectOf(folder, 0, 1, &pidl, &IID_IDataObject, 0, (LPVOID*)&pDataObj);
669
670 if (SUCCEEDED(hr)) {
671 hr = IDataObject_GetData(pDataObj, &fmt, &medium);
672
673 IDataObject_Release(pDataObj);
674
675 if (SUCCEEDED(hr)) {
676 LPCWSTR path = GlobalLock(medium.UNION_MEMBER(hGlobal));
677 UINT sem_org = SetErrorMode(SEM_FAILCRITICALERRORS);
678
679 if (GetFileAttributesExW(path, GetFileExInfoStandard, &fad)) {
680 w32fdata->dwFileAttributes = fad.dwFileAttributes;
681 w32fdata->ftCreationTime = fad.ftCreationTime;
682 w32fdata->ftLastAccessTime = fad.ftLastAccessTime;
683 w32fdata->ftLastWriteTime = fad.ftLastWriteTime;
684
685 if (!(fad.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)) {
686 w32fdata->nFileSizeLow = fad.nFileSizeLow;
687 w32fdata->nFileSizeHigh = fad.nFileSizeHigh;
688 }
689 }
690
691 SetErrorMode(sem_org);
692
693 GlobalUnlock(medium.UNION_MEMBER(hGlobal));
694 GlobalFree(medium.UNION_MEMBER(hGlobal));
695 }
696 }
697 }
698
699 if (attribs & (SFGAO_FOLDER|SFGAO_HASSUBFOLDER))
700 w32fdata->dwFileAttributes |= FILE_ATTRIBUTE_DIRECTORY;
701
702 if (attribs & SFGAO_READONLY)
703 w32fdata->dwFileAttributes |= FILE_ATTRIBUTE_READONLY;
704
705 if (attribs & SFGAO_COMPRESSED)
706 w32fdata->dwFileAttributes |= FILE_ATTRIBUTE_COMPRESSED;
707 }
708
709
710 static void read_directory_shell(Entry* dir, HWND hwnd)
711 {
712 IShellFolder* folder = dir->folder;
713 int level = dir->level + 1;
714 HRESULT hr;
715
716 IShellFolder* child;
717 IEnumIDList* idlist;
718
719 Entry* first_entry = NULL;
720 Entry* last = NULL;
721 Entry* entry;
722
723 if (!folder)
724 return;
725
726 hr = IShellFolder_EnumObjects(folder, hwnd, SHCONTF_FOLDERS|SHCONTF_NONFOLDERS|SHCONTF_INCLUDEHIDDEN|SHCONTF_SHAREABLE|SHCONTF_STORAGE, &idlist);
727
728 if (SUCCEEDED(hr)) {
729 for(;;) {
730 #define FETCH_ITEM_COUNT 32
731 LPITEMIDLIST pidls[FETCH_ITEM_COUNT];
732 SFGAOF attribs;
733 ULONG cnt = 0;
734 ULONG n;
735
736 memset(pidls, 0, sizeof(pidls));
737
738 hr = IEnumIDList_Next(idlist, FETCH_ITEM_COUNT, pidls, &cnt);
739 if (FAILED(hr))
740 break;
741
742 if (hr == S_FALSE)
743 break;
744
745 for(n=0; n<cnt; ++n) {
746 entry = alloc_entry();
747
748 if (!first_entry)
749 first_entry = entry;
750
751 if (last)
752 last->next = entry;
753
754 memset(&entry->data, 0, sizeof(WIN32_FIND_DATAW));
755 entry->bhfi_valid = FALSE;
756
757 attribs = ~SFGAO_FILESYSTEM; /*SFGAO_HASSUBFOLDER|SFGAO_FOLDER; SFGAO_FILESYSTEM sorgt dafür, daß "My Documents" anstatt von "Martin's Documents" angezeigt wird */
758
759 hr = IShellFolder_GetAttributesOf(folder, 1, (LPCITEMIDLIST*)&pidls[n], &attribs);
760
761 if (SUCCEEDED(hr)) {
762 if (attribs != (SFGAOF)~SFGAO_FILESYSTEM) {
763 fill_w32fdata_shell(folder, pidls[n], attribs, &entry->data);
764
765 entry->bhfi_valid = TRUE;
766 } else
767 attribs = 0;
768 } else
769 attribs = 0;
770
771 entry->pidl = pidls[n];
772
773 if (entry->data.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) {
774 hr = IShellFolder_BindToObject(folder, pidls[n], 0, &IID_IShellFolder, (void**)&child);
775
776 if (SUCCEEDED(hr))
777 entry->folder = child;
778 else
779 entry->folder = NULL;
780 }
781 else
782 entry->folder = NULL;
783
784 if (!entry->data.cFileName[0])
785 /*hr = */name_from_pidl(folder, pidls[n], entry->data.cFileName, MAX_PATH, /*SHGDN_INFOLDER*/0x2000/*0x2000=SHGDN_INCLUDE_NONFILESYS*/);
786
787 /* get display icons for files and virtual objects */
788 if (!(entry->data.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) ||
789 !(attribs & SFGAO_FILESYSTEM)) {
790 entry->hicon = extract_icon(folder, pidls[n]);
791
792 if (!entry->hicon)
793 entry->hicon = (HICON)-1; /* don't try again later */
794 }
795
796 entry->down = NULL;
797 entry->up = dir;
798 entry->expanded = FALSE;
799 entry->scanned = FALSE;
800 entry->level = level;
801
802 entry->etype = ET_SHELL;
803 entry->bhfi_valid = FALSE;
804
805 last = entry;
806 }
807 }
808
809 IEnumIDList_Release(idlist);
810 }
811
812 if (last)
813 last->next = NULL;
814
815 dir->down = first_entry;
816 dir->scanned = TRUE;
817 }
818
819 /* sort order for different directory/file types */
820 enum TYPE_ORDER {
821 TO_DIR = 0,
822 TO_DOT = 1,
823 TO_DOTDOT = 2,
824 TO_OTHER_DIR = 3,
825 TO_FILE = 4
826 };
827
828 /* distinguish between ".", ".." and any other directory names */
829 static int TypeOrderFromDirname(LPCWSTR name)
830 {
831 if (name[0] == '.') {
832 if (name[1] == '\0')
833 return TO_DOT; /* "." */
834
835 if (name[1]=='.' && name[2]=='\0')
836 return TO_DOTDOT; /* ".." */
837 }
838
839 return TO_OTHER_DIR; /* anything else */
840 }
841
842 /* directories first... */
843 static int compareType(const WIN32_FIND_DATAW* fd1, const WIN32_FIND_DATAW* fd2)
844 {
845 int order1 = fd1->dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY? TO_DIR: TO_FILE;
846 int order2 = fd2->dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY? TO_DIR: TO_FILE;
847
848 /* Handle "." and ".." as special case and move them at the very first beginning. */
849 if (order1==TO_DIR && order2==TO_DIR) {
850 order1 = TypeOrderFromDirname(fd1->cFileName);
851 order2 = TypeOrderFromDirname(fd2->cFileName);
852 }
853
854 return order2==order1? 0: order1<order2? -1: 1;
855 }
856
857
858 static int __cdecl compareName(const void* arg1, const void* arg2)
859 {
860 const WIN32_FIND_DATAW* fd1 = &(*(const Entry* const*)arg1)->data;
861 const WIN32_FIND_DATAW* fd2 = &(*(const Entry* const*)arg2)->data;
862
863 int cmp = compareType(fd1, fd2);
864 if (cmp)
865 return cmp;
866
867 return lstrcmpiW(fd1->cFileName, fd2->cFileName);
868 }
869
870 static int __cdecl compareExt(const void* arg1, const void* arg2)
871 {
872 const WIN32_FIND_DATAW* fd1 = &(*(const Entry* const*)arg1)->data;
873 const WIN32_FIND_DATAW* fd2 = &(*(const Entry* const*)arg2)->data;
874 const WCHAR *name1, *name2, *ext1, *ext2;
875
876 int cmp = compareType(fd1, fd2);
877 if (cmp)
878 return cmp;
879
880 name1 = fd1->cFileName;
881 name2 = fd2->cFileName;
882
883 ext1 = wcsrchr(name1, '.');
884 ext2 = wcsrchr(name2, '.');
885
886 if (ext1)
887 ext1++;
888 else
889 ext1 = sEmpty;
890
891 if (ext2)
892 ext2++;
893 else
894 ext2 = sEmpty;
895
896 cmp = lstrcmpiW(ext1, ext2);
897 if (cmp)
898 return cmp;
899
900 return lstrcmpiW(name1, name2);
901 }
902
903 static int __cdecl compareSize(const void* arg1, const void* arg2)
904 {
905 const WIN32_FIND_DATAW* fd1 = &(*(const Entry* const*)arg1)->data;
906 const WIN32_FIND_DATAW* fd2 = &(*(const Entry* const*)arg2)->data;
907
908 int cmp = compareType(fd1, fd2);
909 if (cmp)
910 return cmp;
911
912 cmp = fd2->nFileSizeHigh - fd1->nFileSizeHigh;
913
914 if (cmp < 0)
915 return -1;
916 else if (cmp > 0)
917 return 1;
918
919 cmp = fd2->nFileSizeLow - fd1->nFileSizeLow;
920
921 return cmp<0? -1: cmp>0? 1: 0;
922 }
923
924 static int __cdecl compareDate(const void* arg1, const void* arg2)
925 {
926 const WIN32_FIND_DATAW* fd1 = &(*(const Entry* const*)arg1)->data;
927 const WIN32_FIND_DATAW* fd2 = &(*(const Entry* const*)arg2)->data;
928
929 int cmp = compareType(fd1, fd2);
930 if (cmp)
931 return cmp;
932
933 return CompareFileTime(&fd2->ftLastWriteTime, &fd1->ftLastWriteTime);
934 }
935
936
937 static int (CDECL *sortFunctions[])(const void* arg1, const void* arg2) = {
938 compareName, /* SORT_NAME */
939 compareExt, /* SORT_EXT */
940 compareSize, /* SORT_SIZE */
941 compareDate /* SORT_DATE */
942 };
943
944
945 static void SortDirectory(Entry* dir, SORT_ORDER sortOrder)
946 {
947 Entry* entry;
948 Entry** array, **p;
949 int len;
950
951 len = 0;
952 for(entry=dir->down; entry; entry=entry->next)
953 len++;
954
955 if (len) {
956 array = HeapAlloc(GetProcessHeap(), 0, len*sizeof(Entry*));
957
958 p = array;
959 for(entry=dir->down; entry; entry=entry->next)
960 *p++ = entry;
961
962 /* call qsort with the appropriate compare function */
963 qsort(array, len, sizeof(array[0]), sortFunctions[sortOrder]);
964
965 dir->down = array[0];
966
967 for(p=array; --len; p++)
968 p[0]->next = p[1];
969
970 (*p)->next = 0;
971
972 HeapFree(GetProcessHeap(), 0, array);
973 }
974 }
975
976
977 static void read_directory(Entry* dir, LPCWSTR path, SORT_ORDER sortOrder, HWND hwnd)
978 {
979 WCHAR buffer[MAX_PATH];
980 Entry* entry;
981 LPCWSTR s;
982 PWSTR d;
983
984 if (dir->etype == ET_SHELL)
985 {
986 read_directory_shell(dir, hwnd);
987
988 if (Globals.prescan_node) {
989 s = path;
990 d = buffer;
991
992 while(*s)
993 *d++ = *s++;
994
995 *d++ = '\\';
996
997 for(entry=dir->down; entry; entry=entry->next)
998 if (entry->data.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) {
999 read_directory_shell(entry, hwnd);
1000 SortDirectory(entry, sortOrder);
1001 }
1002 }
1003 }
1004 else
1005 {
1006 read_directory_win(dir, path);
1007
1008 if (Globals.prescan_node) {
1009 s = path;
1010 d = buffer;
1011
1012 while(*s)
1013 *d++ = *s++;
1014
1015 *d++ = '\\';
1016
1017 for(entry=dir->down; entry; entry=entry->next)
1018 if (entry->data.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) {
1019 lstrcpyW(d, entry->data.cFileName);
1020 read_directory_win(entry, buffer);
1021 SortDirectory(entry, sortOrder);
1022 }
1023 }
1024 }
1025
1026 SortDirectory(dir, sortOrder);
1027 }
1028
1029
1030 static Entry* read_tree(Root* root, LPCWSTR path, LPITEMIDLIST pidl, LPWSTR drv, SORT_ORDER sortOrder, HWND hwnd)
1031 {
1032 static const WCHAR sBackslash[] = {'\\', '\0'};
1033
1034 if (pidl)
1035 {
1036 /* read shell namespace tree */
1037 root->drive_type = DRIVE_UNKNOWN;
1038 drv[0] = '\\';
1039 drv[1] = '\0';
1040 load_string(root->volname, ARRAY_SIZE(root->volname), IDS_DESKTOP);
1041 root->fs_flags = 0;
1042 load_string(root->fs, ARRAY_SIZE(root->fs), IDS_SHELL);
1043
1044 return read_tree_shell(root, pidl, sortOrder, hwnd);
1045 }
1046
1047 /* read WIN32 file system tree */
1048 root->drive_type = GetDriveTypeW(path);
1049
1050 lstrcatW(drv, sBackslash);
1051 GetVolumeInformationW(drv, root->volname, _MAX_FNAME, 0, 0, &root->fs_flags, root->fs, _MAX_DIR);
1052
1053 lstrcpyW(root->path, drv);
1054
1055 return read_tree_win(root, path, sortOrder, hwnd);
1056 }
1057
1058
1059 /* flags to filter different file types */
1060 enum TYPE_FILTER {
1061 TF_DIRECTORIES = 0x01,
1062 TF_PROGRAMS = 0x02,
1063 TF_DOCUMENTS = 0x04,
1064 TF_OTHERS = 0x08,
1065 TF_HIDDEN = 0x10,
1066 TF_ALL = 0x1F
1067 };
1068
1069
1070 static ChildWnd* alloc_child_window(LPCWSTR path, LPITEMIDLIST pidl, HWND hwnd)
1071 {
1072 WCHAR drv[_MAX_DRIVE+1], dir[_MAX_DIR], name[_MAX_FNAME], ext[_MAX_EXT];
1073 WCHAR dir_path[MAX_PATH];
1074 static const WCHAR sAsterics[] = {'*', '\0'};
1075 static const WCHAR sTitleFmt[] = {'%','s',' ','-',' ','%','s','\0'};
1076
1077 ChildWnd* child = HeapAlloc(GetProcessHeap(), 0, sizeof(ChildWnd));
1078 Root* root = &child->root;
1079 Entry* entry;
1080
1081 memset(child, 0, sizeof(ChildWnd));
1082
1083 child->left.treePane = TRUE;
1084 child->left.visible_cols = 0;
1085
1086 child->right.treePane = FALSE;
1087 child->right.visible_cols = COL_SIZE|COL_DATE|COL_TIME|COL_ATTRIBUTES|COL_INDEX|COL_LINKS;
1088
1089 child->pos.length = sizeof(WINDOWPLACEMENT);
1090 child->pos.flags = 0;
1091 child->pos.showCmd = SW_SHOWNORMAL;
1092 child->pos.rcNormalPosition.left = CW_USEDEFAULT;
1093 child->pos.rcNormalPosition.top = CW_USEDEFAULT;
1094 child->pos.rcNormalPosition.right = CW_USEDEFAULT;
1095 child->pos.rcNormalPosition.bottom = CW_USEDEFAULT;
1096
1097 child->focus_pane = 0;
1098 child->split_pos = DEFAULT_SPLIT_POS;
1099 child->sortOrder = SORT_NAME;
1100 child->header_wdths_ok = FALSE;
1101
1102 if (path)
1103 {
1104 int pathlen = lstrlenW(path);
1105 const WCHAR *npath = path;
1106
1107 if (path[0] == '"' && path[pathlen - 1] == '"')
1108 {
1109 npath++;
1110 pathlen--;
1111 }
1112 lstrcpynW(child->path, npath, pathlen + 1);
1113
1114 _wsplitpath(child->path, drv, dir, name, ext);
1115 }
1116
1117 lstrcpyW(child->filter_pattern, sAsterics);
1118 child->filter_flags = TF_ALL;
1119
1120 root->entry.level = 0;
1121
1122 lstrcpyW(dir_path, drv);
1123 lstrcatW(dir_path, dir);
1124 entry = read_tree(root, dir_path, pidl, drv, child->sortOrder, hwnd);
1125
1126 if (root->entry.etype == ET_SHELL)
1127 load_string(root->entry.data.cFileName, ARRAY_SIZE(root->entry.data.cFileName), IDS_DESKTOP);
1128 else
1129 wsprintfW(root->entry.data.cFileName, sTitleFmt, drv, root->fs);
1130
1131 root->entry.data.dwFileAttributes = FILE_ATTRIBUTE_DIRECTORY;
1132
1133 child->left.root = &root->entry;
1134 child->right.root = NULL;
1135
1136 set_curdir(child, entry, 0, hwnd);
1137
1138 return child;
1139 }
1140
1141
1142 /* free all memory associated with a child window */
1143 static void free_child_window(ChildWnd* child)
1144 {
1145 free_entries(&child->root.entry);
1146 HeapFree(GetProcessHeap(), 0, child);
1147 }
1148
1149
1150 /* get full path of specified directory entry */
1151 static void get_path(Entry* dir, PWSTR path)
1152 {
1153 Entry* entry;
1154 int len = 0;
1155 int level = 0;
1156
1157 if (dir->etype == ET_SHELL)
1158 {
1159 SFGAOF attribs;
1160 HRESULT hr = S_OK;
1161
1162 path[0] = '\0';
1163
1164 attribs = 0;
1165
1166 if (dir->folder)
1167 hr = IShellFolder_GetAttributesOf(dir->folder, 1, (LPCITEMIDLIST*)&dir->pidl, &attribs);
1168
1169 if (SUCCEEDED(hr) && (attribs&SFGAO_FILESYSTEM)) {
1170 IShellFolder* parent = dir->up? dir->up->folder: Globals.iDesktop;
1171
1172 hr = path_from_pidlW(parent, dir->pidl, path, MAX_PATH);
1173 }
1174 }
1175 else
1176 {
1177 for(entry=dir; entry; level++) {
1178 LPCWSTR name;
1179 int l;
1180
1181 {
1182 LPCWSTR s;
1183 name = entry->data.cFileName;
1184 s = name;
1185
1186 for(l=0; *s && *s != '/' && *s != '\\'; s++)
1187 l++;
1188 }
1189
1190 if (entry->up) {
1191 if (l > 0) {
1192 memmove(path+l+1, path, len*sizeof(WCHAR));
1193 memcpy(path+1, name, l*sizeof(WCHAR));
1194 len += l+1;
1195 path[0] = '\\';
1196 }
1197
1198 entry = entry->up;
1199 } else {
1200 memmove(path+l, path, len*sizeof(WCHAR));
1201 memcpy(path, name, l*sizeof(WCHAR));
1202 len += l;
1203 break;
1204 }
1205 }
1206
1207 if (!level) path[len++] = '\\';
1208 path[len] = '\0';
1209 }
1210 }
1211
1212 static windowOptions load_registry_settings(void)
1213 {
1214 DWORD size;
1215 DWORD type;
1216 HKEY hKey;
1217 windowOptions opts;
1218 LOGFONTW logfont;
1219
1220 RegOpenKeyExW( HKEY_CURRENT_USER, registry_key,
1221 0, KEY_QUERY_VALUE, &hKey );
1222
1223 size = sizeof(DWORD);
1224
1225 if( RegQueryValueExW( hKey, reg_start_x, NULL, &type,
1226 (LPBYTE) &opts.start_x, &size ) != ERROR_SUCCESS )
1227 opts.start_x = CW_USEDEFAULT;
1228
1229 if( RegQueryValueExW( hKey, reg_start_y, NULL, &type,
1230 (LPBYTE) &opts.start_y, &size ) != ERROR_SUCCESS )
1231 opts.start_y = CW_USEDEFAULT;
1232
1233 if( RegQueryValueExW( hKey, reg_width, NULL, &type,
1234 (LPBYTE) &opts.width, &size ) != ERROR_SUCCESS )
1235 opts.width = CW_USEDEFAULT;
1236
1237 if( RegQueryValueExW( hKey, reg_height, NULL, &type,
1238 (LPBYTE) &opts.height, &size ) != ERROR_SUCCESS )
1239 opts.height = CW_USEDEFAULT;
1240 size=sizeof(logfont);
1241 if( RegQueryValueExW( hKey, reg_logfont, NULL, &type,
1242 (LPBYTE) &logfont, &size ) != ERROR_SUCCESS )
1243 GetObjectW(GetStockObject(DEFAULT_GUI_FONT),sizeof(logfont),&logfont);
1244
1245 RegCloseKey( hKey );
1246
1247 Globals.hfont = CreateFontIndirectW(&logfont);
1248 return opts;
1249 }
1250
1251 static void save_registry_settings(void)
1252 {
1253 WINDOWINFO wi;
1254 HKEY hKey;
1255 INT width, height;
1256 LOGFONTW logfont;
1257
1258 wi.cbSize = sizeof( WINDOWINFO );
1259 GetWindowInfo(Globals.hMainWnd, &wi);
1260 width = wi.rcWindow.right - wi.rcWindow.left;
1261 height = wi.rcWindow.bottom - wi.rcWindow.top;
1262
1263 if ( RegOpenKeyExW( HKEY_CURRENT_USER, registry_key,
1264 0, KEY_SET_VALUE, &hKey ) != ERROR_SUCCESS )
1265 {
1266 /* Unable to save registry settings - try to create key */
1267 if ( RegCreateKeyExW( HKEY_CURRENT_USER, registry_key,
1268 0, NULL, REG_OPTION_NON_VOLATILE,
1269 KEY_SET_VALUE, NULL, &hKey, NULL ) != ERROR_SUCCESS )
1270 {
1271 /* FIXME: Cannot create key */
1272 return;
1273 }
1274 }
1275 /* Save all of the settings */
1276 RegSetValueExW( hKey, reg_start_x, 0, REG_DWORD,
1277 (LPBYTE) &wi.rcWindow.left, sizeof(DWORD) );
1278 RegSetValueExW( hKey, reg_start_y, 0, REG_DWORD,
1279 (LPBYTE) &wi.rcWindow.top, sizeof(DWORD) );
1280 RegSetValueExW( hKey, reg_width, 0, REG_DWORD,
1281 (LPBYTE) &width, sizeof(DWORD) );
1282 RegSetValueExW( hKey, reg_height, 0, REG_DWORD,
1283 (LPBYTE) &height, sizeof(DWORD) );
1284 GetObjectW(Globals.hfont, sizeof(logfont), &logfont);
1285 RegSetValueExW( hKey, reg_logfont, 0, REG_BINARY,
1286 (LPBYTE)&logfont, sizeof(LOGFONTW) );
1287
1288 /* TODO: Save more settings here (List vs. Detailed View, etc.) */
1289 RegCloseKey( hKey );
1290 }
1291
1292 static void resize_frame_rect(HWND hwnd, PRECT prect)
1293 {
1294 int new_top;
1295 RECT rt;
1296
1297 if (IsWindowVisible(Globals.htoolbar)) {
1298 SendMessageW(Globals.htoolbar, WM_SIZE, 0, 0);
1299 GetClientRect(Globals.htoolbar, &rt);
1300 prect->top = rt.bottom+3;
1301 prect->bottom -= rt.bottom+3;
1302 }
1303
1304 if (IsWindowVisible(Globals.hdrivebar)) {
1305 SendMessageW(Globals.hdrivebar, WM_SIZE, 0, 0);
1306 GetClientRect(Globals.hdrivebar, &rt);
1307 new_top = --prect->top + rt.bottom+3;
1308 MoveWindow(Globals.hdrivebar, 0, prect->top, rt.right, new_top, TRUE);
1309 prect->top = new_top;
1310 prect->bottom -= rt.bottom+2;
1311 }
1312
1313 if (IsWindowVisible(Globals.hstatusbar)) {
1314 int parts[] = {300, 500};
1315
1316 SendMessageW(Globals.hstatusbar, WM_SIZE, 0, 0);
1317 SendMessageW(Globals.hstatusbar, SB_SETPARTS, 2, (LPARAM)&parts);
1318 GetClientRect(Globals.hstatusbar, &rt);
1319 prect->bottom -= rt.bottom;
1320 }
1321
1322 MoveWindow(Globals.hmdiclient, prect->left-1,prect->top-1,prect->right+2,prect->bottom+1, TRUE);
1323 }
1324
1325 static void resize_frame(HWND hwnd, int cx, int cy)
1326 {
1327 RECT rect;
1328
1329 rect.left = 0;
1330 rect.top = 0;
1331 rect.right = cx;
1332 rect.bottom = cy;
1333
1334 resize_frame_rect(hwnd, &rect);
1335 }
1336
1337 static void resize_frame_client(HWND hwnd)
1338 {
1339 RECT rect;
1340
1341 GetClientRect(hwnd, &rect);
1342
1343 resize_frame_rect(hwnd, &rect);
1344 }
1345
1346
1347 static HHOOK hcbthook;
1348 static ChildWnd* newchild = NULL;
1349
1350 static LRESULT CALLBACK CBTProc(int code, WPARAM wparam, LPARAM lparam)
1351 {
1352 if (code==HCBT_CREATEWND && newchild) {
1353 ChildWnd* child = newchild;
1354 newchild = NULL;
1355
1356 child->hwnd = (HWND) wparam;
1357 SetWindowLongPtrW(child->hwnd, GWLP_USERDATA, (LPARAM)child);
1358 }
1359
1360 return CallNextHookEx(hcbthook, code, wparam, lparam);
1361 }
1362
1363 static HWND create_child_window(ChildWnd* child)
1364 {
1365 MDICREATESTRUCTW mcs;
1366 int idx;
1367
1368 mcs.szClass = sWINEFILETREE;
1369 mcs.szTitle = child->path;
1370 mcs.hOwner = Globals.hInstance;
1371 mcs.x = child->pos.rcNormalPosition.left;
1372 mcs.y = child->pos.rcNormalPosition.top;
1373 mcs.cx = child->pos.rcNormalPosition.right-child->pos.rcNormalPosition.left;
1374 mcs.cy = child->pos.rcNormalPosition.bottom-child->pos.rcNormalPosition.top;
1375 mcs.style = 0;
1376 mcs.lParam = 0;
1377
1378 hcbthook = SetWindowsHookExW(WH_CBT, CBTProc, 0, GetCurrentThreadId());
1379
1380 newchild = child;
1381 child->hwnd = (HWND)SendMessageW(Globals.hmdiclient, WM_MDICREATE, 0, (LPARAM)&mcs);
1382 if (!child->hwnd) {
1383 UnhookWindowsHookEx(hcbthook);
1384 return 0;
1385 }
1386
1387 UnhookWindowsHookEx(hcbthook);
1388
1389 SendMessageW(child->left.hwnd, LB_SETITEMHEIGHT, 1, max(Globals.spaceSize.cy,IMAGE_HEIGHT+3));
1390 SendMessageW(child->right.hwnd, LB_SETITEMHEIGHT, 1, max(Globals.spaceSize.cy,IMAGE_HEIGHT+3));
1391
1392 idx = SendMessageW(child->left.hwnd, LB_FINDSTRING, 0, (LPARAM)child->left.cur);
1393 SendMessageW(child->left.hwnd, LB_SETCURSEL, idx, 0);
1394
1395 return child->hwnd;
1396 }
1397
1398 #define RFF_NODEFAULT 0x02 /* No default item selected. */
1399
1400 static void WineFile_OnRun( HWND hwnd )
1401 {
1402 static const WCHAR shell32_dll[] = {'S','H','E','L','L','3','2','.','D','L','L',0};
1403 void (WINAPI *pRunFileDlgAW )(HWND, HICON, LPWSTR, LPWSTR, LPWSTR, DWORD);
1404 HMODULE hshell = GetModuleHandleW( shell32_dll );
1405 HICON hIcon = LoadIconW(Globals.hInstance, MAKEINTRESOURCEW(IDI_WINEFILE));
1406
1407 pRunFileDlgAW = (void*)GetProcAddress(hshell, (LPCSTR)61);
1408 if (pRunFileDlgAW) pRunFileDlgAW( hwnd, hIcon, NULL, NULL, NULL, RFF_NODEFAULT);
1409 }
1410
1411 static INT_PTR CALLBACK DestinationDlgProc(HWND hwnd, UINT nmsg, WPARAM wparam, LPARAM lparam)
1412 {
1413 WCHAR b1[BUFFER_LEN], b2[BUFFER_LEN];
1414
1415 switch(nmsg) {
1416 case WM_INITDIALOG:
1417 SetWindowLongPtrW(hwnd, GWLP_USERDATA, lparam);
1418 SetWindowTextW(GetDlgItem(hwnd, 201), (LPCWSTR)lparam);
1419 return 1;
1420
1421 case WM_COMMAND: {
1422 int id = (int)wparam;
1423
1424 switch(id) {
1425 case IDOK: {
1426 LPWSTR dest = (LPWSTR)GetWindowLongPtrW(hwnd, GWLP_USERDATA);
1427 GetWindowTextW(GetDlgItem(hwnd, 201), dest, MAX_PATH);
1428 EndDialog(hwnd, id);
1429 break;}
1430
1431 case IDCANCEL:
1432 EndDialog(hwnd, id);
1433 break;
1434
1435 case 254:
1436 MessageBoxW(hwnd, RS(b1,IDS_NO_IMPL), RS(b2,IDS_WINEFILE), MB_OK);
1437 break;
1438 }
1439
1440 return 1;
1441 }
1442 }
1443
1444 return 0;
1445 }
1446
1447
1448 struct FilterDialog {
1449 WCHAR pattern[MAX_PATH];
1450 int flags;
1451 };
1452
1453 static INT_PTR CALLBACK FilterDialogDlgProc(HWND hwnd, UINT nmsg, WPARAM wparam, LPARAM lparam)
1454 {
1455 static struct FilterDialog* dlg;
1456
1457 switch(nmsg) {
1458 case WM_INITDIALOG:
1459 dlg = (struct FilterDialog*) lparam;
1460 SetWindowTextW(GetDlgItem(hwnd, IDC_VIEW_PATTERN), dlg->pattern);
1461 set_check(hwnd, IDC_VIEW_TYPE_DIRECTORIES, dlg->flags&TF_DIRECTORIES);
1462 set_check(hwnd, IDC_VIEW_TYPE_PROGRAMS, dlg->flags&TF_PROGRAMS);
1463 set_check(hwnd, IDC_VIEW_TYPE_DOCUMENTS, dlg->flags&TF_DOCUMENTS);
1464 set_check(hwnd, IDC_VIEW_TYPE_OTHERS, dlg->flags&TF_OTHERS);
1465 set_check(hwnd, IDC_VIEW_TYPE_HIDDEN, dlg->flags&TF_HIDDEN);
1466 return 1;
1467
1468 case WM_COMMAND: {
1469 int id = (int)wparam;
1470
1471 if (id == IDOK) {
1472 int flags = 0;
1473
1474 GetWindowTextW(GetDlgItem(hwnd, IDC_VIEW_PATTERN), dlg->pattern, MAX_PATH);
1475
1476 flags |= get_check(hwnd, IDC_VIEW_TYPE_DIRECTORIES) ? TF_DIRECTORIES : 0;
1477 flags |= get_check(hwnd, IDC_VIEW_TYPE_PROGRAMS) ? TF_PROGRAMS : 0;
1478 flags |= get_check(hwnd, IDC_VIEW_TYPE_DOCUMENTS) ? TF_DOCUMENTS : 0;
1479 flags |= get_check(hwnd, IDC_VIEW_TYPE_OTHERS) ? TF_OTHERS : 0;
1480 flags |= get_check(hwnd, IDC_VIEW_TYPE_HIDDEN) ? TF_HIDDEN : 0;
1481
1482 dlg->flags = flags;
1483
1484 EndDialog(hwnd, id);
1485 } else if (id == IDCANCEL)
1486 EndDialog(hwnd, id);
1487
1488 return 1;}
1489 }
1490
1491 return 0;
1492 }
1493
1494
1495 struct PropertiesDialog {
1496 WCHAR path[MAX_PATH];
1497 Entry entry;
1498 void* pVersionData;
1499 };
1500
1501 /* Structure used to store enumerated languages and code pages. */
1502 struct LANGANDCODEPAGE {
1503 WORD wLanguage;
1504 WORD wCodePage;
1505 } *lpTranslate;
1506
1507 static LPCSTR InfoStrings[] = {
1508 "Comments",
1509 "CompanyName",
1510 "FileDescription",
1511 "FileVersion",
1512 "InternalName",
1513 "LegalCopyright",
1514 "LegalTrademarks",
1515 "OriginalFilename",
1516 "PrivateBuild",
1517 "ProductName",
1518 "ProductVersion",
1519 "SpecialBuild",
1520 NULL
1521 };
1522
1523 static void PropDlg_DisplayValue(HWND hlbox, HWND hedit)
1524 {
1525 int idx = SendMessageW(hlbox, LB_GETCURSEL, 0, 0);
1526
1527 if (idx != LB_ERR) {
1528 LPCWSTR pValue = (LPCWSTR)SendMessageW(hlbox, LB_GETITEMDATA, idx, 0);
1529
1530 if (pValue)
1531 SetWindowTextW(hedit, pValue);
1532 }
1533 }
1534
1535 static void CheckForFileInfo(struct PropertiesDialog* dlg, HWND hwnd, LPCWSTR strFilename)
1536 {
1537 static const WCHAR sBackSlash[] = {'\\','\0'};
1538 static const WCHAR sTranslation[] = {'\\','V','a','r','F','i','l','e','I','n','f','o','\\','T','r','a','n','s','l','a','t','i','o','n','\0'};
1539 static const WCHAR sStringFileInfo[] = {'\\','S','t','r','i','n','g','F','i','l','e','I','n','f','o','\\',
1540 '%','0','4','x','%','0','4','x','\\','%','s','\0'};
1541 static const WCHAR sFmt[] = {'%','d','.','%','d','.','%','d','.','%','d','\0'};
1542 DWORD dwVersionDataLen = GetFileVersionInfoSizeW(strFilename, NULL);
1543
1544 if (dwVersionDataLen) {
1545 dlg->pVersionData = HeapAlloc(GetProcessHeap(), 0, dwVersionDataLen);
1546
1547 if (GetFileVersionInfoW(strFilename, 0, dwVersionDataLen, dlg->pVersionData)) {
1548 LPVOID pVal;
1549 UINT nValLen;
1550
1551 if (VerQueryValueW(dlg->pVersionData, sBackSlash, &pVal, &nValLen)) {
1552 if (nValLen == sizeof(VS_FIXEDFILEINFO)) {
1553 VS_FIXEDFILEINFO* pFixedFileInfo = (VS_FIXEDFILEINFO*)pVal;
1554 WCHAR buffer[BUFFER_LEN];
1555
1556 swprintf(buffer, ARRAY_SIZE(buffer), sFmt,
1557 HIWORD(pFixedFileInfo->dwFileVersionMS), LOWORD(pFixedFileInfo->dwFileVersionMS),
1558 HIWORD(pFixedFileInfo->dwFileVersionLS), LOWORD(pFixedFileInfo->dwFileVersionLS));
1559
1560 SetDlgItemTextW(hwnd, IDC_STATIC_PROP_VERSION, buffer);
1561 }
1562 }
1563
1564 /* Read the list of languages and code pages. */
1565 if (VerQueryValueW(dlg->pVersionData, sTranslation, &pVal, &nValLen)) {
1566 struct LANGANDCODEPAGE* pTranslate = (struct LANGANDCODEPAGE*)pVal;
1567 struct LANGANDCODEPAGE* pEnd = (struct LANGANDCODEPAGE*)((LPBYTE)pVal+nValLen);
1568
1569 HWND hlbox = GetDlgItem(hwnd, IDC_LIST_PROP_VERSION_TYPES);
1570
1571 /* Read the file description for each language and code page. */
1572 for(; pTranslate<pEnd; ++pTranslate) {
1573 LPCSTR* p;
1574
1575 for(p=InfoStrings; *p; ++p) {
1576 WCHAR subblock[200];
1577 WCHAR infoStr[100];
1578 LPCWSTR pTxt;
1579 UINT nValLen;
1580
1581 LPCSTR pInfoString = *p;
1582 MultiByteToWideChar(CP_ACP, 0, pInfoString, -1, infoStr, 100);
1583 wsprintfW(subblock, sStringFileInfo, pTranslate->wLanguage, pTranslate->wCodePage, infoStr);
1584
1585 /* Retrieve file description for language and code page */
1586 if (VerQueryValueW(dlg->pVersionData, subblock, (PVOID)&pTxt, &nValLen)) {
1587 int idx = SendMessageW(hlbox, LB_ADDSTRING, 0L, (LPARAM)infoStr);
1588 SendMessageW(hlbox, LB_SETITEMDATA, idx, (LPARAM)pTxt);
1589 }
1590 }
1591 }
1592
1593 SendMessageW(hlbox, LB_SETCURSEL, 0, 0);
1594
1595 PropDlg_DisplayValue(hlbox, GetDlgItem(hwnd,IDC_LIST_PROP_VERSION_VALUES));
1596 }
1597 }
1598 }
1599 }
1600
1601 static INT_PTR CALLBACK PropertiesDialogDlgProc(HWND hwnd, UINT nmsg, WPARAM wparam, LPARAM lparam)
1602 {
1603 static struct PropertiesDialog* dlg;
1604
1605 switch(nmsg) {
1606 case WM_INITDIALOG: {
1607 static const WCHAR sByteFmt[] = {'%','s',' ','B','y','t','e','s','\0'};
1608 WCHAR b1[BUFFER_LEN], b2[BUFFER_LEN];
1609 LPWIN32_FIND_DATAW pWFD;
1610
1611 dlg = (struct PropertiesDialog*) lparam;
1612 pWFD = (LPWIN32_FIND_DATAW)&dlg->entry.data;
1613
1614 GetWindowTextW(hwnd, b1, MAX_PATH);
1615 wsprintfW(b2, b1, pWFD->cFileName);
1616 SetWindowTextW(hwnd, b2);
1617
1618 format_date(&pWFD->ftLastWriteTime, b1, COL_DATE|COL_TIME);
1619 SetWindowTextW(GetDlgItem(hwnd, IDC_STATIC_PROP_LASTCHANGE), b1);
1620
1621 format_longlong( b1, ((ULONGLONG)pWFD->nFileSizeHigh << 32) | pWFD->nFileSizeLow );
1622 wsprintfW(b2, sByteFmt, b1);
1623 SetWindowTextW(GetDlgItem(hwnd, IDC_STATIC_PROP_SIZE), b2);
1624
1625 SetWindowTextW(GetDlgItem(hwnd, IDC_STATIC_PROP_FILENAME), pWFD->cFileName);
1626 SetWindowTextW(GetDlgItem(hwnd, IDC_STATIC_PROP_PATH), dlg->path);
1627
1628 set_check(hwnd, IDC_CHECK_READONLY, pWFD->dwFileAttributes&FILE_ATTRIBUTE_READONLY);
1629 set_check(hwnd, IDC_CHECK_ARCHIVE, pWFD->dwFileAttributes&FILE_ATTRIBUTE_ARCHIVE);
1630 set_check(hwnd, IDC_CHECK_COMPRESSED, pWFD->dwFileAttributes&FILE_ATTRIBUTE_COMPRESSED);
1631 set_check(hwnd, IDC_CHECK_HIDDEN, pWFD->dwFileAttributes&FILE_ATTRIBUTE_HIDDEN);
1632 set_check(hwnd, IDC_CHECK_SYSTEM, pWFD->dwFileAttributes&FILE_ATTRIBUTE_SYSTEM);
1633
1634 CheckForFileInfo(dlg, hwnd, dlg->path);
1635 return 1;}
1636
1637 case WM_COMMAND: {
1638 int id = (int)wparam;
1639
1640 switch(HIWORD(wparam)) {
1641 case LBN_SELCHANGE: {
1642 HWND hlbox = GetDlgItem(hwnd, IDC_LIST_PROP_VERSION_TYPES);
1643 PropDlg_DisplayValue(hlbox, GetDlgItem(hwnd,IDC_LIST_PROP_VERSION_VALUES));
1644 break;
1645 }
1646
1647 case BN_CLICKED:
1648 if (id==IDOK || id==IDCANCEL)
1649 EndDialog(hwnd, id);
1650 }
1651
1652 return 1;}
1653
1654 case WM_NCDESTROY:
1655 HeapFree(GetProcessHeap(), 0, dlg->pVersionData);
1656 dlg->pVersionData = NULL;
1657 break;
1658 }
1659
1660 return 0;
1661 }
1662
1663 static void show_properties_dlg(Entry* entry, HWND hwnd)
1664 {
1665 struct PropertiesDialog dlg;
1666
1667 memset(&dlg, 0, sizeof(struct PropertiesDialog));
1668 get_path(entry, dlg.path);
1669 memcpy(&dlg.entry, entry, sizeof(Entry));
1670
1671 DialogBoxParamW(Globals.hInstance, MAKEINTRESOURCEW(IDD_DIALOG_PROPERTIES), hwnd, PropertiesDialogDlgProc, (LPARAM)&dlg);
1672 }
1673
1674 static struct FullScreenParameters {
1675 BOOL mode;
1676 RECT orgPos;
1677 BOOL wasZoomed;
1678 } g_fullscreen = {
1679 FALSE, /* mode */
1680 {0, 0, 0, 0},
1681 FALSE
1682 };
1683
1684 static void frame_get_clientspace(HWND hwnd, PRECT prect)
1685 {
1686 RECT rt;
1687
1688 if (!IsIconic(hwnd))
1689 GetClientRect(hwnd, prect);
1690 else {
1691 WINDOWPLACEMENT wp;
1692
1693 wp.length = sizeof(wp);
1694 GetWindowPlacement(hwnd, &wp);
1695
1696 prect->left = prect->top = 0;
1697 prect->right = wp.rcNormalPosition.right-wp.rcNormalPosition.left-
1698 2*(GetSystemMetrics(SM_CXSIZEFRAME)+GetSystemMetrics(SM_CXEDGE));
1699 prect->bottom = wp.rcNormalPosition.bottom-wp.rcNormalPosition.top-
1700 2*(GetSystemMetrics(SM_CYSIZEFRAME)+GetSystemMetrics(SM_CYEDGE))-
1701 GetSystemMetrics(SM_CYCAPTION)-GetSystemMetrics(SM_CYMENUSIZE);
1702 }
1703
1704 if (IsWindowVisible(Globals.htoolbar)) {
1705 GetClientRect(Globals.htoolbar, &rt);
1706 prect->top += rt.bottom+2;
1707 }
1708
1709 if (IsWindowVisible(Globals.hdrivebar)) {
1710 GetClientRect(Globals.hdrivebar, &rt);
1711 prect->top += rt.bottom+2;
1712 }
1713
1714 if (IsWindowVisible(Globals.hstatusbar)) {
1715 GetClientRect(Globals.hstatusbar, &rt);
1716 prect->bottom -= rt.bottom;
1717 }
1718 }
1719
1720 static BOOL toggle_fullscreen(HWND hwnd)
1721 {
1722 RECT rt;
1723
1724 if ((g_fullscreen.mode=!g_fullscreen.mode)) {
1725 GetWindowRect(hwnd, &g_fullscreen.orgPos);
1726 g_fullscreen.wasZoomed = IsZoomed(hwnd);
1727
1728 Frame_CalcFrameClient(hwnd, &rt);
1729 MapWindowPoints( hwnd, 0, (POINT *)&rt, 2 );
1730
1731 rt.left = g_fullscreen.orgPos.left-rt.left;
1732 rt.top = g_fullscreen.orgPos.top-rt.top;
1733 rt.right = GetSystemMetrics(SM_CXSCREEN)+g_fullscreen.orgPos.right-rt.right;
1734 rt.bottom = GetSystemMetrics(SM_CYSCREEN)+g_fullscreen.orgPos.bottom-rt.bottom;
1735
1736 MoveWindow(hwnd, rt.left, rt.top, rt.right-rt.left, rt.bottom-rt.top, TRUE);
1737 } else {
1738 MoveWindow(hwnd, g_fullscreen.orgPos.left, g_fullscreen.orgPos.top,
1739 g_fullscreen.orgPos.right-g_fullscreen.orgPos.left,
1740 g_fullscreen.orgPos.bottom-g_fullscreen.orgPos.top, TRUE);
1741
1742 if (g_fullscreen.wasZoomed)
1743 ShowWindow(hwnd, WS_MAXIMIZE);
1744 }
1745
1746 return g_fullscreen.mode;
1747 }
1748
1749 static void fullscreen_move(HWND hwnd)
1750 {
1751 RECT rt, pos;
1752 GetWindowRect(hwnd, &pos);
1753
1754 Frame_CalcFrameClient(hwnd, &rt);
1755 MapWindowPoints( hwnd, 0, (POINT *)&rt, 2 );
1756
1757 rt.left = pos.left-rt.left;
1758 rt.top = pos.top-rt.top;
1759 rt.right = GetSystemMetrics(SM_CXSCREEN)+pos.right-rt.right;
1760 rt.bottom = GetSystemMetrics(SM_CYSCREEN)+pos.bottom-rt.bottom;
1761
1762 MoveWindow(hwnd, rt.left, rt.top, rt.right-rt.left, rt.bottom-rt.top, TRUE);
1763 }
1764
1765 static void toggle_child(HWND hwnd, UINT cmd, HWND hchild)
1766 {
1767 BOOL vis = IsWindowVisible(hchild);
1768
1769 CheckMenuItem(Globals.hMenuOptions, cmd, vis?MF_BYCOMMAND:MF_BYCOMMAND|MF_CHECKED);
1770
1771 ShowWindow(hchild, vis?SW_HIDE:SW_SHOW);
1772
1773 if (g_fullscreen.mode)
1774 fullscreen_move(hwnd);
1775
1776 resize_frame_client(hwnd);
1777 }
1778
1779 static BOOL activate_drive_window(LPCWSTR path)
1780 {
1781 WCHAR drv1[_MAX_DRIVE], drv2[_MAX_DRIVE];
1782 HWND child_wnd;
1783
1784 _wsplitpath(path, drv1, 0, 0, 0);
1785
1786 /* search for an already open window for the same drive */
1787 for(child_wnd=GetNextWindow(Globals.hmdiclient,GW_CHILD); child_wnd; child_wnd=GetNextWindow(child_wnd, GW_HWNDNEXT)) {
1788 ChildWnd* child = (ChildWnd*)GetWindowLongPtrW(child_wnd, GWLP_USERDATA);
1789
1790 if (child) {
1791 _wsplitpath(child->root.path, drv2, 0, 0, 0);
1792
1793 if (!lstrcmpiW(drv2, drv1)) {
1794 SendMessageW(Globals.hmdiclient, WM_MDIACTIVATE, (WPARAM)child_wnd, 0);
1795
1796 if (IsIconic(child_wnd))
1797 ShowWindow(child_wnd, SW_SHOWNORMAL);
1798
1799 return TRUE;
1800 }
1801 }
1802 }
1803
1804 return FALSE;
1805 }
1806
1807 static BOOL activate_fs_window(LPCWSTR filesys)
1808 {
1809 HWND child_wnd;
1810
1811 /* search for an already open window of the given file system name */
1812 for(child_wnd=GetNextWindow(Globals.hmdiclient,GW_CHILD); child_wnd; child_wnd=GetNextWindow(child_wnd, GW_HWNDNEXT)) {
1813 ChildWnd* child = (ChildWnd*) GetWindowLongPtrW(child_wnd, GWLP_USERDATA);
1814
1815 if (child) {
1816 if (!lstrcmpiW(child->root.fs, filesys)) {
1817 SendMessageW(Globals.hmdiclient, WM_MDIACTIVATE, (WPARAM)child_wnd, 0);
1818
1819 if (IsIconic(child_wnd))
1820 ShowWindow(child_wnd, SW_SHOWNORMAL);
1821
1822 return TRUE;
1823 }
1824 }
1825 }
1826
1827 return FALSE;
1828 }
1829
1830 static LRESULT CALLBACK FrameWndProc(HWND hwnd, UINT nmsg, WPARAM wparam, LPARAM lparam)
1831 {
1832 WCHAR b1[BUFFER_LEN], b2[BUFFER_LEN];
1833
1834 switch(nmsg) {
1835 case WM_CLOSE:
1836 if (Globals.saveSettings)
1837 save_registry_settings();
1838
1839 DestroyWindow(hwnd);
1840
1841 /* clear handle variables */
1842 Globals.hMenuFrame = 0;
1843 Globals.hMenuView = 0;
1844 Globals.hMenuOptions = 0;
1845 Globals.hMainWnd = 0;
1846 Globals.hmdiclient = 0;
1847 Globals.hdrivebar = 0;
1848 break;
1849
1850 case WM_DESTROY:
1851 PostQuitMessage(0);
1852 break;
1853
1854 case WM_INITMENUPOPUP: {
1855 HWND hwndClient = (HWND)SendMessageW(Globals.hmdiclient, WM_MDIGETACTIVE, 0, 0);
1856
1857 if (!SendMessageW(hwndClient, WM_INITMENUPOPUP, wparam, lparam))
1858 return 0;
1859 break;}
1860
1861 case WM_COMMAND: {
1862 UINT cmd = LOWORD(wparam);
1863 HWND hwndClient = (HWND)SendMessageW(Globals.hmdiclient, WM_MDIGETACTIVE, 0, 0);
1864
1865 if (SendMessageW(hwndClient, WM_DISPATCH_COMMAND, wparam, lparam))
1866 break;
1867
1868 if (cmd>=ID_DRIVE_FIRST && cmd<=ID_DRIVE_FIRST+0xFF) {
1869 WCHAR drv[_MAX_DRIVE], path[MAX_PATH];
1870 ChildWnd* child;
1871 LPCWSTR root = Globals.drives;
1872 int i;
1873
1874 for(i=cmd-ID_DRIVE_FIRST; i--; root++)
1875 while(*root)
1876 root++;
1877
1878 if (activate_drive_window(root))
1879 return 0;
1880
1881 _wsplitpath(root, drv, 0, 0, 0);
1882
1883 if (!SetCurrentDirectoryW(drv)) {
1884 display_error(hwnd, GetLastError());
1885 return 0;
1886 }
1887
1888 GetCurrentDirectoryW(MAX_PATH, path); /*TODO: store last directory per drive */
1889 child = alloc_child_window(path, NULL, hwnd);
1890
1891 if (!create_child_window(child))
1892 HeapFree(GetProcessHeap(), 0, child);
1893 } else switch(cmd) {
1894 case ID_FILE_EXIT:
1895 SendMessageW(hwnd, WM_CLOSE, 0, 0);
1896 break;
1897
1898 case ID_WINDOW_NEW: {
1899 WCHAR path[MAX_PATH];
1900 ChildWnd* child;
1901
1902 GetCurrentDirectoryW(MAX_PATH, path);
1903 child = alloc_child_window(path, NULL, hwnd);
1904
1905 if (!create_child_window(child))
1906 HeapFree(GetProcessHeap(), 0, child);
1907 break;}
1908
1909 case ID_REFRESH:
1910 refresh_drives();
1911 break;
1912
1913 case ID_WINDOW_CASCADE:
1914 SendMessageW(Globals.hmdiclient, WM_MDICASCADE, 0, 0);
1915 break;
1916
1917 case ID_WINDOW_TILE_HORZ:
1918 SendMessageW(Globals.hmdiclient, WM_MDITILE, MDITILE_HORIZONTAL, 0);
1919 break;
1920
1921 case ID_WINDOW_TILE_VERT:
1922 SendMessageW(Globals.hmdiclient, WM_MDITILE, MDITILE_VERTICAL, 0);
1923 break;
1924
1925 case ID_WINDOW_ARRANGE:
1926 SendMessageW(Globals.hmdiclient, WM_MDIICONARRANGE, 0, 0);
1927 break;
1928
1929 case ID_SELECT_FONT:
1930 choose_font(hwnd);
1931 break;
1932
1933 case ID_VIEW_TOOL_BAR:
1934 toggle_child(hwnd, cmd, Globals.htoolbar);
1935 break;
1936
1937 case ID_VIEW_DRIVE_BAR:
1938 toggle_child(hwnd, cmd, Globals.hdrivebar);
1939 break;
1940
1941 case ID_VIEW_STATUSBAR:
1942 toggle_child(hwnd, cmd, Globals.hstatusbar);
1943 break;
1944
1945 case ID_VIEW_SAVESETTINGS:
1946 Globals.saveSettings = !Globals.saveSettings;
1947 CheckMenuItem(Globals.hMenuOptions, ID_VIEW_SAVESETTINGS,
1948 Globals.saveSettings ? MF_CHECKED : MF_UNCHECKED );
1949 break;
1950
1951 case ID_RUN:
1952 WineFile_OnRun( hwnd );
1953 break;
1954
1955 case ID_CONNECT_NETWORK_DRIVE: {
1956 DWORD ret = WNetConnectionDialog(hwnd, RESOURCETYPE_DISK);
1957 if (ret == NO_ERROR)
1958 refresh_drives();
1959 else if (ret != (DWORD)-1) {
1960 if (ret == ERROR_EXTENDED_ERROR)
1961 display_network_error(hwnd);
1962 else
1963 display_error(hwnd, ret);
1964 }
1965 break;}
1966
1967 case ID_DISCONNECT_NETWORK_DRIVE: {
1968 DWORD ret = WNetDisconnectDialog(hwnd, RESOURCETYPE_DISK);
1969 if (ret == NO_ERROR)
1970 refresh_drives();
1971 else if (ret != (DWORD)-1) {
1972 if (ret == ERROR_EXTENDED_ERROR)
1973 display_network_error(hwnd);
1974 else
1975 display_error(hwnd, ret);
1976 }
1977 break;}
1978
1979 case ID_HELP:
1980 WinHelpW(hwnd, RS(b1,IDS_WINEFILE), HELP_INDEX, 0);
1981 break;
1982
1983 case ID_VIEW_FULLSCREEN:
1984 CheckMenuItem(Globals.hMenuOptions, cmd, toggle_fullscreen(hwnd)?MF_CHECKED:0);
1985 break;
1986
1987 case ID_DRIVE_SHELL_NS: {
1988 WCHAR path[MAX_PATH];
1989 ChildWnd* child;
1990
1991 if (activate_fs_window(RS(b1,IDS_SHELL)))
1992 break;
1993
1994 GetCurrentDirectoryW(MAX_PATH, path);
1995 child = alloc_child_window(path, get_path_pidl(path,hwnd), hwnd);
1996
1997 if (!create_child_window(child))
1998 HeapFree(GetProcessHeap(), 0, child);
1999 break;}
2000
2001 /*TODO: There are even more menu items! */
2002
2003 case ID_ABOUT:
2004 ShellAboutW(hwnd, RS(b1,IDS_WINEFILE), NULL,
2005 LoadImageW( Globals.hInstance, MAKEINTRESOURCEW(IDI_WINEFILE),
2006 IMAGE_ICON, 48, 48, LR_SHARED ));
2007 break;
2008
2009 default:
2010 /*TODO: if (wParam >= PM_FIRST_LANGUAGE && wParam <= PM_LAST_LANGUAGE)
2011 STRING_SelectLanguageByNumber(wParam - PM_FIRST_LANGUAGE);
2012 else */if ((cmd<IDW_FIRST_CHILD || cmd>=IDW_FIRST_CHILD+0x100) &&
2013 (cmd<SC_SIZE || cmd>SC_RESTORE))
2014 MessageBoxW(hwnd, RS(b2,IDS_NO_IMPL), RS(b1,IDS_WINEFILE), MB_OK);
2015
2016 return DefFrameProcW(hwnd, Globals.hmdiclient, nmsg, wparam, lparam);
2017 }
2018 break;}
2019
2020 case WM_SIZE:
2021 resize_frame(hwnd, LOWORD(lparam), HIWORD(lparam));
2022 break; /* do not pass message to DefFrameProcW */
2023
2024 case WM_DEVICECHANGE:
2025 SendMessageW(hwnd, WM_COMMAND, MAKELONG(ID_REFRESH,0), 0);
2026 break;
2027
2028 case WM_GETMINMAXINFO: {
2029 LPMINMAXINFO lpmmi = (LPMINMAXINFO)lparam;
2030
2031 lpmmi->ptMaxTrackSize.x <<= 1;/*2*GetSystemMetrics(SM_CXSCREEN) / SM_CXVIRTUALSCREEN */
2032 lpmmi->ptMaxTrackSize.y <<= 1;/*2*GetSystemMetrics(SM_CYSCREEN) / SM_CYVIRTUALSCREEN */
2033 break;}
2034
2035 case FRM_CALC_CLIENT:
2036 frame_get_clientspace(hwnd, (PRECT)lparam);
2037 return TRUE;
2038
2039 default:
2040 return DefFrameProcW(hwnd, Globals.hmdiclient, nmsg, wparam, lparam);
2041 }
2042
2043 return 0;
2044 }
2045
2046
2047 static WCHAR g_pos_names[COLUMNS][40] = {
2048 {'\0'} /* symbol */
2049 };
2050
2051 static const int g_pos_align[] = {
2052 0,
2053 HDF_LEFT, /* Name */
2054 HDF_RIGHT, /* Size */
2055 HDF_LEFT, /* CDate */
2056 HDF_LEFT, /* ADate */
2057 HDF_LEFT, /* MDate */
2058 HDF_LEFT, /* Index */
2059 HDF_CENTER, /* Links */
2060 HDF_CENTER, /* Attributes */
2061 HDF_LEFT /* Security */
2062 };
2063
2064 static void resize_tree(ChildWnd* child, int cx, int cy)
2065 {
2066 HDWP hdwp = BeginDeferWindowPos(4);
2067 RECT rt;
2068 WINDOWPOS wp;
2069 HD_LAYOUT hdl;
2070
2071 rt.left = 0;
2072 rt.top = 0;
2073 rt.right = cx;
2074 rt.bottom = cy;
2075
2076 cx = child->split_pos + SPLIT_WIDTH/2;
2077 hdl.prc = &rt;
2078 hdl.pwpos = &wp;
2079
2080 SendMessageW(child->left.hwndHeader, HDM_LAYOUT, 0, (LPARAM)&hdl);
2081
2082 DeferWindowPos(hdwp, child->left.hwndHeader, wp.hwndInsertAfter,
2083 wp.x-1, wp.y, child->split_pos-SPLIT_WIDTH/2+1, wp.cy, wp.flags);
2084 DeferWindowPos(hdwp, child->right.hwndHeader, wp.hwndInsertAfter,
2085 rt.left+cx+1, wp.y, wp.cx-cx+2, wp.cy, wp.flags);
2086 DeferWindowPos(hdwp, child->left.hwnd, 0, rt.left, rt.top, child->split_pos-SPLIT_WIDTH/2-rt.left, rt.bottom-rt.top, SWP_NOZORDER|SWP_NOACTIVATE);
2087 DeferWindowPos(hdwp, child->right.hwnd, 0, rt.left+cx+1, rt.top, rt.right-cx, rt.bottom-rt.top, SWP_NOZORDER|SWP_NOACTIVATE);
2088
2089 EndDeferWindowPos(hdwp);
2090 }
2091
2092 static HWND create_header(HWND parent, Pane* pane, UINT id)
2093 {
2094 HDITEMW hdi;
2095 int idx;
2096
2097 HWND hwnd = CreateWindowW(WC_HEADERW, 0, WS_CHILD|WS_VISIBLE|HDS_HORZ|HDS_FULLDRAG/*TODO: |HDS_BUTTONS + sort orders*/,
2098 0, 0, 0, 0, parent, (HMENU)ULongToHandle(id), Globals.hInstance, 0);
2099 if (!hwnd)
2100 return 0;
2101
2102 SendMessageW(hwnd, WM_SETFONT, (WPARAM)GetStockObject(DEFAULT_GUI_FONT), FALSE);
2103
2104 hdi.mask = HDI_TEXT|HDI_WIDTH|HDI_FORMAT;
2105
2106 for(idx=0; idx<COLUMNS; idx++) {
2107 hdi.pszText = g_pos_names[idx];
2108 hdi.fmt = HDF_STRING | g_pos_align[idx];
2109 hdi.cxy = pane->widths[idx];
2110 pane->widths_shown[idx] = hdi.cxy;
2111 SendMessageW(hwnd, HDM_INSERTITEMW, idx, (LPARAM)&hdi);
2112 }
2113
2114 return hwnd;
2115 }
2116
2117 static void init_output(HWND hwnd)
2118 {
2119 static const WCHAR s1000[] = {'1','0','0','0','\0'};
2120 WCHAR b[16];
2121 HFONT old_font;
2122 HDC hdc = GetDC(hwnd);
2123
2124 if (GetNumberFormatW(LOCALE_USER_DEFAULT, 0, s1000, 0, b, 16) > 4)
2125 Globals.num_sep = b[1];
2126 else
2127 Globals.num_sep = '.';
2128
2129 old_font = SelectObject(hdc, Globals.hfont);
2130 GetTextExtentPoint32W(hdc, sSpace, 1, &Globals.spaceSize);
2131 SelectObject(hdc, old_font);
2132 ReleaseDC(hwnd, hdc);
2133 }
2134
2135 static void draw_item(Pane* pane, LPDRAWITEMSTRUCT dis, Entry* entry, int calcWidthCol);
2136
2137
2138 /* calculate preferred width for all visible columns */
2139
2140 static BOOL calc_widths(Pane* pane, BOOL anyway)
2141 {
2142 int col, x, cx, spc=3*Globals.spaceSize.cx;
2143 int entries = SendMessageW(pane->hwnd, LB_GETCOUNT, 0, 0);
2144 int orgWidths[COLUMNS];
2145 int orgPositions[COLUMNS+1];
2146 HFONT hfontOld;
2147 HDC hdc;
2148 int cnt;
2149
2150 if (!anyway) {
2151 memcpy(orgWidths, pane->widths, sizeof(orgWidths));
2152 memcpy(orgPositions, pane->positions, sizeof(orgPositions));
2153 }
2154
2155 for(col=0; col<COLUMNS; col++)
2156 pane->widths[col] = 0;
2157
2158 hdc = GetDC(pane->hwnd);
2159 hfontOld = SelectObject(hdc, Globals.hfont);
2160
2161 for(cnt=0; cnt<entries; cnt++) {
2162 Entry* entry = (Entry*)SendMessageW(pane->hwnd, LB_GETITEMDATA, cnt, 0);
2163
2164 DRAWITEMSTRUCT dis;
2165
2166 dis.CtlType = 0;
2167 dis.CtlID = 0;
2168 dis.itemID = 0;
2169 dis.itemAction = 0;
2170 dis.itemState = 0;
2171 dis.hwndItem = pane->hwnd;
2172 dis.hDC = hdc;
2173 SetRectEmpty(&dis.rcItem);
2174 /*dis.itemData = 0; */
2175
2176 draw_item(pane, &dis, entry, COLUMNS);
2177 }
2178
2179 SelectObject(hdc, hfontOld);
2180 ReleaseDC(pane->hwnd, hdc);
2181
2182 x = 0;
2183 for(col=0; col<COLUMNS; col++) {
2184 pane->positions[col] = x;
2185 cx = pane->widths[col];
2186
2187 if (cx) {
2188 cx += spc;
2189
2190 if (cx < IMAGE_WIDTH)
2191 cx = IMAGE_WIDTH;
2192
2193 pane->widths[col] = cx;
2194 }
2195
2196 x += cx;
2197 }
2198
2199 pane->positions[COLUMNS] = x;
2200
2201 SendMessageW(pane->hwnd, LB_SETHORIZONTALEXTENT, x, 0);
2202
2203 /* no change? */
2204 if (!anyway && !memcmp(orgWidths, pane->widths, sizeof(orgWidths)))
2205 return FALSE;
2206
2207 /* don't move, if only collapsing an entry */
2208 if (!anyway && pane->widths[0]<orgWidths[0] &&
2209 !memcmp(orgWidths+1, pane->widths+1, sizeof(orgWidths)-sizeof(int))) {
2210 pane->widths[0] = orgWidths[0];
2211 memcpy(pane->positions, orgPositions, sizeof(orgPositions));
2212
2213 return FALSE;
2214 }
2215
2216 InvalidateRect(pane->hwnd, 0, TRUE);
2217
2218 return TRUE;
2219 }
2220
2221 /* calculate one preferred column width */
2222 static void calc_single_width(Pane* pane, int col)
2223 {
2224 HFONT hfontOld;
2225 int x, cx;
2226 int entries = SendMessageW(pane->hwnd, LB_GETCOUNT, 0, 0);
2227 int cnt;
2228 HDC hdc;
2229
2230 pane->widths[col] = 0;
2231
2232 hdc = GetDC(pane->hwnd);
2233 hfontOld = SelectObject(hdc, Globals.hfont);
2234
2235 for(cnt=0; cnt<entries; cnt++) {
2236 Entry* entry = (Entry*)SendMessageW(pane->hwnd, LB_GETITEMDATA, cnt, 0);
2237 DRAWITEMSTRUCT dis;
2238
2239 dis.CtlType = 0;
2240 dis.CtlID = 0;
2241 dis.itemID = 0;
2242 dis.itemAction = 0;
2243 dis.itemState = 0;
2244 dis.hwndItem = pane->hwnd;
2245 dis.hDC = hdc;
2246 SetRectEmpty(&dis.rcItem);
2247 /*dis.itemData = 0; */
2248
2249 draw_item(pane, &dis, entry, col);
2250 }
2251
2252 SelectObject(hdc, hfontOld);
2253 ReleaseDC(pane->hwnd, hdc);
2254
2255 cx = pane->widths[col];
2256
2257 if (cx) {
2258 cx += 3*Globals.spaceSize.cx;
2259
2260 if (cx < IMAGE_WIDTH)
2261 cx = IMAGE_WIDTH;
2262 }
2263
2264 pane->widths[col] = cx;
2265
2266 x = pane->positions[col] + cx;
2267
2268 for(; col<COLUMNS-1; ) {
2269 pane->positions[++col] = x;
2270 x += pane->widths[col];
2271 }
2272
2273 SendMessageW(pane->hwnd, LB_SETHORIZONTALEXTENT, x, 0);
2274 }
2275
2276 static BOOL pattern_match(LPCWSTR str, LPCWSTR pattern)
2277 {
2278 for( ; *str&&*pattern; str++,pattern++) {
2279 if (*pattern == '*') {
2280 do pattern++;
2281 while(*pattern == '*');
2282
2283 if (!*pattern)
2284 return TRUE;
2285
2286 for(; *str; str++)
2287 if (*str==*pattern && pattern_match(str, pattern))
2288 return TRUE;
2289
2290 return FALSE;
2291 }
2292 else if (*str!=*pattern && *pattern!='?')
2293 return FALSE;
2294 }
2295
2296 if (*str || *pattern)
2297 if (*pattern!='*' || pattern[1]!='\0')
2298 return FALSE;
2299
2300 return TRUE;
2301 }
2302
2303 static BOOL pattern_imatch(LPCWSTR str, LPCWSTR pattern)
2304 {
2305 WCHAR b1[BUFFER_LEN], b2[BUFFER_LEN];
2306
2307 lstrcpyW(b1, str);
2308 lstrcpyW(b2, pattern);
2309 CharUpperW(b1);
2310 CharUpperW(b2);
2311
2312 return pattern_match(b1, b2);
2313 }
2314
2315
2316 enum FILE_TYPE {
2317 FT_OTHER = 0,
2318 FT_EXECUTABLE = 1,
2319 FT_DOCUMENT = 2
2320 };
2321
2322 static enum FILE_TYPE get_file_type(LPCWSTR filename);
2323
2324
2325 /* insert listbox entries after index idx */
2326
2327 static int insert_entries(Pane* pane, Entry* dir, LPCWSTR pattern, int filter_flags, int idx)
2328 {
2329 Entry* entry = dir;
2330
2331 if (!entry)
2332 return idx;
2333
2334 ShowWindow(pane->hwnd, SW_HIDE);
2335
2336 for(; entry; entry=entry->next) {
2337 if (pane->treePane && !(entry->data.dwFileAttributes&FILE_ATTRIBUTE_DIRECTORY))
2338 continue;
2339
2340 if (entry->data.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) {
2341 /* don't display entries "." and ".." in the left pane */
2342 if (pane->treePane && entry->data.cFileName[0] == '.')
2343 if (entry->data.cFileName[1] == '\0' ||
2344 (entry->data.cFileName[1] == '.' &&
2345 entry->data.cFileName[2] == '\0'))
2346 continue;
2347
2348 /* filter directories in right pane */
2349 if (!pane->treePane && !(filter_flags&TF_DIRECTORIES))
2350 continue;
2351 }
2352
2353 /* filter using the file name pattern */
2354 if (pattern)
2355 if (!pattern_imatch(entry->data.cFileName, pattern))
2356 continue;
2357
2358 /* filter system and hidden files */
2359 if (!(filter_flags&TF_HIDDEN) && (entry->data.dwFileAttributes&(FILE_ATTRIBUTE_HIDDEN|FILE_ATTRIBUTE_SYSTEM)))
2360 continue;
2361
2362 /* filter looking at the file type */
2363 if ((filter_flags&(TF_PROGRAMS|TF_DOCUMENTS|TF_OTHERS)) != (TF_PROGRAMS|TF_DOCUMENTS|TF_OTHERS))
2364 switch(get_file_type(entry->data.cFileName)) {
2365 case FT_EXECUTABLE:
2366 if (!(filter_flags & TF_PROGRAMS))
2367 continue;
2368 break;
2369
2370 case FT_DOCUMENT:
2371 if (!(filter_flags & TF_DOCUMENTS))
2372 continue;
2373 break;
2374
2375 default: /* TF_OTHERS */
2376 if (!(filter_flags & TF_OTHERS))
2377 continue;
2378 }
2379
2380 if (idx != -1)
2381 idx++;
2382
2383 SendMessageW(pane->hwnd, LB_INSERTSTRING, idx, (LPARAM)entry);
2384
2385 if (pane->treePane && entry->expanded)
2386 idx = insert_entries(pane, entry->down, pattern, filter_flags, idx);
2387 }
2388
2389 ShowWindow(pane->hwnd, SW_SHOW);
2390
2391 return idx;
2392 }
2393
2394 static void set_space_status(void)
2395 {
2396 ULARGE_INTEGER ulFreeBytesToCaller, ulTotalBytes, ulFreeBytes;
2397 WCHAR fmt[64], b1[64], b2[64], buffer[BUFFER_LEN];
2398
2399 if (GetDiskFreeSpaceExW(NULL, &ulFreeBytesToCaller, &ulTotalBytes, &ulFreeBytes)) {
2400 DWORD_PTR args[2];
2401
2402 args[0] = (DWORD_PTR)StrFormatByteSizeW(ulFreeBytesToCaller.QuadPart, b1, ARRAY_SIZE(b1));
2403 args[1] = (DWORD_PTR)StrFormatByteSizeW(ulTotalBytes.QuadPart, b2, ARRAY_SIZE(b2));
2404
2405 FormatMessageW(FORMAT_MESSAGE_FROM_STRING|FORMAT_MESSAGE_ARGUMENT_ARRAY,
2406 RS(fmt,IDS_FREE_SPACE_FMT), 0, 0, buffer, ARRAY_SIZE(buffer),
2407 (__ms_va_list*)args);
2408 } else
2409 lstrcpyW(buffer, sQMarks);
2410
2411 SendMessageW(Globals.hstatusbar, SB_SETTEXTW, 0, (LPARAM)buffer);
2412 }
2413
2414
2415 static WNDPROC g_orgTreeWndProc;
2416
2417 static void create_tree_window(HWND parent, Pane* pane, UINT id, UINT id_header, LPCWSTR pattern, int filter_flags)
2418 {
2419 static const WCHAR sListBox[] = {'L','i','s','t','B','o','x','\0'};
2420
2421 static BOOL s_init = FALSE;
2422 Entry* entry = pane->root;
2423
2424 pane->hwnd = CreateWindowW(sListBox, sEmpty, WS_CHILD|WS_VISIBLE|WS_HSCROLL|WS_VSCROLL|
2425 LBS_DISABLENOSCROLL|LBS_NOINTEGRALHEIGHT|LBS_OWNERDRAWFIXED|LBS_NOTIFY,
2426 0, 0, 0, 0, parent, (HMENU)ULongToHandle(id), Globals.hInstance, 0);
2427
2428 SetWindowLongPtrW(pane->hwnd, GWLP_USERDATA, (LPARAM)pane);
2429 g_orgTreeWndProc = (WNDPROC)SetWindowLongPtrW(pane->hwnd, GWLP_WNDPROC, (LPARAM)TreeWndProc);
2430
2431 SendMessageW(pane->hwnd, WM_SETFONT, (WPARAM)Globals.hfont, FALSE);
2432
2433 /* insert entries into listbox */
2434 if (entry)
2435 insert_entries(pane, entry, pattern, filter_flags, -1);
2436
2437 /* calculate column widths */
2438 if (!s_init) {
2439 s_init = TRUE;
2440 init_output(pane->hwnd);
2441 }
2442
2443 calc_widths(pane, TRUE);
2444
2445 pane->hwndHeader = create_header(parent, pane, id_header);
2446 }
2447
2448
2449 static void InitChildWindow(ChildWnd* child)
2450 {
2451 create_tree_window(child->hwnd, &child->left, IDW_TREE_LEFT, IDW_HEADER_LEFT, NULL, TF_ALL);
2452 create_tree_window(child->hwnd, &child->right, IDW_TREE_RIGHT, IDW_HEADER_RIGHT, child->filter_pattern, child->filter_flags);
2453 }
2454
2455
2456 static void format_date(const FILETIME* ft, WCHAR* buffer, int visible_cols)
2457 {
2458 SYSTEMTIME systime;
2459 FILETIME lft;
2460 int len = 0;
2461
2462 *buffer = '\0';
2463
2464 if (!ft->dwLowDateTime && !ft->dwHighDateTime)
2465 return;
2466
2467 if (!FileTimeToLocalFileTime(ft, &lft))
2468 {err: lstrcpyW(buffer,sQMarks); return;}
2469
2470 if (!FileTimeToSystemTime(&lft, &systime))
2471 goto err;
2472
2473 if (visible_cols & COL_DATE) {
2474 len = GetDateFormatW(LOCALE_USER_DEFAULT, 0, &systime, 0, buffer, BUFFER_LEN);
2475 if (!len)
2476 goto err;
2477 }
2478
2479 if (visible_cols & COL_TIME) {
2480 if (len)
2481 buffer[len-1] = ' ';
2482
2483 buffer[len++] = ' ';
2484
2485 if (!GetTimeFormatW(LOCALE_USER_DEFAULT, 0, &systime, 0, buffer+len, BUFFER_LEN-len))
2486 buffer[len] = '\0';
2487 }
2488 }
2489
2490
2491 static void calc_width(Pane* pane, LPDRAWITEMSTRUCT dis, int col, LPCWSTR str)
2492 {
2493 RECT rt = {0, 0, 0, 0};
2494
2495 DrawTextW(dis->hDC, str, -1, &rt, DT_CALCRECT|DT_SINGLELINE|DT_NOPREFIX);
2496
2497 if (rt.right > pane->widths[col])
2498 pane->widths[col] = rt.right;
2499 }
2500
2501 static void calc_tabbed_width(Pane* pane, LPDRAWITEMSTRUCT dis, int col, LPCWSTR str)
2502 {
2503 RECT rt = {0, 0, 0, 0};
2504
2505 DrawTextW(dis->hDC, str, -1, &rt, DT_CALCRECT|DT_SINGLELINE|DT_EXPANDTABS|DT_TABSTOP|(2<<8));
2506 /*FIXME rt (0,0) ??? */
2507
2508 if (rt.right > pane->widths[col])
2509 pane->widths[col] = rt.right;
2510 }
2511
2512
2513 static void output_text(Pane* pane, LPDRAWITEMSTRUCT dis, int col, LPCWSTR str, DWORD flags)
2514 {
2515 int x = dis->rcItem.left;
2516 RECT rt;
2517
2518 rt.left = x+pane->positions[col]+Globals.spaceSize.cx;
2519 rt.top = dis->rcItem.top;
2520 rt.right = x+pane->positions[col+1]-Globals.spaceSize.cx;
2521 rt.bottom = dis->rcItem.bottom;
2522
2523 DrawTextW(dis->hDC, str, -1, &rt, DT_SINGLELINE|DT_NOPREFIX|flags);
2524 }
2525
2526 static void output_tabbed_text(Pane* pane, LPDRAWITEMSTRUCT dis, int col, LPCWSTR str)
2527 {
2528 int x = dis->rcItem.left;
2529 RECT rt;
2530
2531 rt.left = x+pane->positions[col]+Globals.spaceSize.cx;
2532 rt.top = dis->rcItem.top;
2533 rt.right = x+pane->positions[col+1]-Globals.spaceSize.cx;
2534 rt.bottom = dis->rcItem.bottom;
2535
2536 DrawTextW(dis->hDC, str, -1, &rt, DT_SINGLELINE|DT_EXPANDTABS|DT_TABSTOP|(2<<8));
2537 }
2538
2539 static void output_number(Pane* pane, LPDRAWITEMSTRUCT dis, int col, LPCWSTR str)
2540 {
2541 int x = dis->rcItem.left;
2542 RECT rt;
2543 LPCWSTR s = str;
2544 WCHAR b[128];
2545 LPWSTR d = b;
2546 int pos;
2547
2548 rt.left = x+pane->positions[col]+Globals.spaceSize.cx;
2549 rt.top = dis->rcItem.top;
2550 rt.right = x+pane->positions[col+1]-Globals.spaceSize.cx;
2551 rt.bottom = dis->rcItem.bottom;
2552
2553 if (*s)
2554 *d++ = *s++;
2555
2556 /* insert number separator characters */
2557 pos = lstrlenW(s) % 3;
2558
2559 while(*s)
2560 if (pos--)
2561 *d++ = *s++;
2562 else {
2563 *d++ = Globals.num_sep;
2564 pos = 3;
2565 }
2566
2567 DrawTextW(dis->hDC, b, d-b, &rt, DT_RIGHT|DT_SINGLELINE|DT_NOPREFIX|DT_END_ELLIPSIS);
2568 }
2569
2570
2571 static BOOL is_exe_file(LPCWSTR ext)
2572 {
2573 static const WCHAR executable_extensions[][4] = {
2574 {'C','O','M','\0'},
2575 {'E','X','E','\0'},
2576 {'B','A','T','\0'},
2577 {'C','M','D','\0'},
2578 {'C','M','M','\0'},
2579 {'B','T','M','\0'},
2580 {'A','W','K','\0'},
2581 {'\0'}
2582 };
2583
2584 WCHAR ext_buffer[_MAX_EXT];
2585 const WCHAR (*p)[4];
2586 LPCWSTR s;
2587 LPWSTR d;
2588
2589 for(s=ext+1,d=ext_buffer; (*d=tolower(*s)); s++)
2590 d++;
2591
2592 for(p=executable_extensions; (*p)[0]; p++)
2593 if (!lstrcmpiW(ext_buffer, *p))
2594 return TRUE;
2595
2596 return FALSE;
2597 }
2598
2599 static BOOL is_registered_type(LPCWSTR ext)
2600 {
2601 /* check if there exists a classname for this file extension in the registry */
2602 if (!RegQueryValueW(HKEY_CLASSES_ROOT, ext, NULL, NULL))
2603 return TRUE;
2604
2605 return FALSE;
2606 }
2607
2608 static enum FILE_TYPE get_file_type(LPCWSTR filename)
2609 {
2610 LPCWSTR ext = wcsrchr(filename, '.');
2611 if (!ext)
2612 ext = sEmpty;
2613
2614 if (is_exe_file(ext))
2615 return FT_EXECUTABLE;
2616 else if (is_registered_type(ext))
2617 return FT_DOCUMENT;
2618 else
2619 return FT_OTHER;
2620 }
2621
2622
2623 static void draw_item(Pane* pane, LPDRAWITEMSTRUCT dis, Entry* entry, int calcWidthCol)
2624 {
2625 WCHAR buffer[BUFFER_LEN];
2626 DWORD attrs;
2627 int visible_cols = pane->visible_cols;
2628 COLORREF bkcolor, textcolor;
2629 RECT focusRect = dis->rcItem;
2630 HBRUSH hbrush;
2631 enum IMAGE img;
2632 int img_pos, cx;
2633 int col = 0;
2634
2635 if (entry) {
2636 attrs = entry->data.dwFileAttributes;
2637
2638 if (attrs & FILE_ATTRIBUTE_DIRECTORY) {
2639 if (entry->data.cFileName[0] == '.' && entry->data.cFileName[1] == '.'
2640 && entry->data.cFileName[2] == '\0')
2641 img = IMG_FOLDER_UP;
2642 else if (entry->data.cFileName[0] == '.' && entry->data.cFileName[1] == '\0')
2643 img = IMG_FOLDER_CUR;
2644 else if (pane->treePane && (dis->itemState&ODS_FOCUS))
2645 img = IMG_OPEN_FOLDER;
2646 else
2647 img = IMG_FOLDER;
2648 } else {
2649 switch(get_file_type(entry->data.cFileName)) {
2650 case FT_EXECUTABLE: img = IMG_EXECUTABLE; break;
2651 case FT_DOCUMENT: img = IMG_DOCUMENT; break;
2652 default: img = IMG_FILE;
2653 }
2654 }
2655 } else {
2656 attrs = 0;
2657 img = IMG_NONE;
2658 }
2659
2660 if (pane->treePane) {
2661 if (entry) {
2662 img_pos = dis->rcItem.left + entry->level*(IMAGE_WIDTH+TREE_LINE_DX);
2663
2664 if (calcWidthCol == -1) {
2665 int x;
2666 int y = dis->rcItem.top + IMAGE_HEIGHT/2;
2667 Entry* up;
2668 RECT rt_clip;
2669 HRGN hrgn_org = CreateRectRgn(0, 0, 0, 0);
2670 HRGN hrgn;
2671
2672 rt_clip.left = dis->rcItem.left;
2673 rt_clip.top = dis->rcItem.top;
2674 rt_clip.right = dis->rcItem.left+pane->widths[col];
2675 rt_clip.bottom = dis->rcItem.bottom;
2676
2677 hrgn = CreateRectRgnIndirect(&rt_clip);
2678
2679 if (!GetClipRgn(dis->hDC, hrgn_org)) {
2680 DeleteObject(hrgn_org);
2681 hrgn_org = 0;
2682 }
2683
2684 ExtSelectClipRgn(dis->hDC, hrgn, RGN_AND);
2685 DeleteObject(hrgn);
2686
2687 if ((up=entry->up) != NULL) {
2688 MoveToEx(dis->hDC, img_pos-IMAGE_WIDTH/2, y, 0);
2689 LineTo(dis->hDC, img_pos-2, y);
2690
2691 x = img_pos - IMAGE_WIDTH/2;
2692
2693 do {
2694 x -= IMAGE_WIDTH+TREE_LINE_DX;
2695
2696 if (up->next
2697 && (up->next->data.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)
2698 ) {
2699 MoveToEx(dis->hDC, x, dis->rcItem.top, 0);
2700 LineTo(dis->hDC, x, dis->rcItem.bottom);
2701 }
2702 } while((up=up->up) != NULL);
2703 }
2704
2705 x = img_pos - IMAGE_WIDTH/2;
2706
2707 MoveToEx(dis->hDC, x, dis->rcItem.top, 0);
2708 LineTo(dis->hDC, x, y);
2709
2710 if (entry->next
2711 && (entry->next->data.dwFileAttributes&FILE_ATTRIBUTE_DIRECTORY))
2712 LineTo(dis->hDC, x, dis->rcItem.bottom);
2713
2714 SelectClipRgn(dis->hDC, hrgn_org);
2715 if (hrgn_org) DeleteObject(hrgn_org);
2716 } else if (calcWidthCol==col || calcWidthCol==COLUMNS) {
2717 int right = img_pos + IMAGE_WIDTH - TREE_LINE_DX;
2718
2719 if (right > pane->widths[col])
2720 pane->widths[col] = right;
2721 }
2722 } else {
2723 img_pos = dis->rcItem.left;
2724 }
2725 } else {
2726 img_pos = dis->rcItem.left;
2727
2728 if (calcWidthCol==col || calcWidthCol==COLUMNS)
2729 pane->widths[col] = IMAGE_WIDTH;
2730 }
2731
2732 if (calcWidthCol == -1) {
2733 focusRect.left = img_pos -2;
2734
2735 if (attrs & FILE_ATTRIBUTE_COMPRESSED)
2736 textcolor = COLOR_COMPRESSED;
2737 else
2738 textcolor = RGB(0,0,0);
2739
2740 if (dis->itemState & ODS_FOCUS) {
2741 textcolor = RGB(255,255,255);
2742 bkcolor = COLOR_SELECTION;
2743 } else {
2744 bkcolor = RGB(255,255,255);
2745 }
2746
2747 hbrush = CreateSolidBrush(bkcolor);
2748 FillRect(dis->hDC, &focusRect, hbrush);
2749 DeleteObject(hbrush);
2750
2751 SetBkMode(dis->hDC, TRANSPARENT);
2752 SetTextColor(dis->hDC, textcolor);
2753
2754 cx = pane->widths[col];
2755
2756 if (cx && img!=IMG_NONE) {
2757 if (cx > IMAGE_WIDTH)
2758 cx = IMAGE_WIDTH;
2759
2760 if (entry->hicon && entry->hicon!=(HICON)-1)
2761 DrawIconEx(dis->hDC, img_pos, dis->rcItem.top, entry->hicon, cx, GetSystemMetrics(SM_CYSMICON), 0, 0, DI_NORMAL);
2762 else
2763 ImageList_DrawEx(Globals.himl, img, dis->hDC,
2764 img_pos, dis->rcItem.top, cx,
2765 IMAGE_HEIGHT, bkcolor, CLR_DEFAULT, ILD_NORMAL);
2766 }
2767 }
2768
2769 if (!entry)
2770 return;
2771
2772 col++;
2773
2774 /* output file name */
2775 if (calcWidthCol == -1)
2776 output_text(pane, dis, col, entry->data.cFileName, 0);
2777 else if (calcWidthCol==col || calcWidthCol==COLUMNS)
2778 calc_width(pane, dis, col, entry->data.cFileName);
2779
2780 col++;
2781
2782 /* display file size */
2783 if (visible_cols & COL_SIZE) {
2784 format_longlong( buffer, ((ULONGLONG)entry->data.nFileSizeHigh << 32) | entry->data.nFileSizeLow );
2785
2786 if (calcWidthCol == -1)
2787 output_number(pane, dis, col, buffer);
2788 else if (calcWidthCol==col || calcWidthCol==COLUMNS)
2789 calc_width(pane, dis, col, buffer);/*TODO: not ever time enough */
2790
2791 col++;
2792 }
2793
2794 /* display file date */
2795 if (visible_cols & (COL_DATE|COL_TIME)) {
2796 format_date(&entry->data.ftCreationTime, buffer, visible_cols);
2797 if (calcWidthCol == -1)
2798 output_text(pane, dis, col, buffer, 0);
2799 else if (calcWidthCol==col || calcWidthCol==COLUMNS)
2800 calc_width(pane, dis, col, buffer);
2801 col++;
2802
2803 format_date(&entry->data.ftLastAccessTime, buffer, visible_cols);
2804 if (calcWidthCol == -1)
2805 output_text(pane, dis, col, buffer, 0);
2806 else if (calcWidthCol==col || calcWidthCol==COLUMNS)
2807 calc_width(pane, dis, col, buffer);
2808 col++;
2809
2810 format_date(&entry->data.ftLastWriteTime, buffer, visible_cols);
2811 if (calcWidthCol == -1)
2812 output_text(pane, dis, col, buffer, 0);
2813 else if (calcWidthCol==col || calcWidthCol==COLUMNS)
2814 calc_width(pane, dis, col, buffer);
2815 col++;
2816 }
2817
2818 if (entry->bhfi_valid) {
2819 if (visible_cols & COL_INDEX) {
2820 static const WCHAR fmtlow[] = {'%','X',0};
2821 static const WCHAR fmthigh[] = {'%','X','%','0','8','X',0};
2822
2823 if (entry->bhfi.nFileIndexHigh)
2824 wsprintfW(buffer, fmthigh,
2825 entry->bhfi.nFileIndexHigh, entry->bhfi.nFileIndexLow );
2826 else
2827 wsprintfW(buffer, fmtlow, entry->bhfi.nFileIndexLow );
2828
2829 if (calcWidthCol == -1)
2830 output_text(pane, dis, col, buffer, DT_RIGHT);
2831 else if (calcWidthCol==col || calcWidthCol==COLUMNS)
2832 calc_width(pane, dis, col, buffer);
2833
2834 col++;
2835 }
2836
2837 if (visible_cols & COL_LINKS) {
2838 wsprintfW(buffer, sNumFmt, entry->bhfi.nNumberOfLinks);
2839
2840 if (calcWidthCol == -1)
2841 output_text(pane, dis, col, buffer, DT_CENTER);
2842 else if (calcWidthCol==col || calcWidthCol==COLUMNS)
2843 calc_width(pane, dis, col, buffer);
2844
2845 col++;
2846 }
2847 } else
2848 col += 2;
2849
2850 /* show file attributes */
2851 if (visible_cols & COL_ATTRIBUTES) {
2852 static const WCHAR s11Tabs[] = {' ','\t',' ','\t',' ','\t',' ','\t',' ','\t',' ','\t',' ','\t',' ','\t',' ','\t',' ','\t',' ','\t',' ','\0'};
2853 lstrcpyW(buffer, s11Tabs);
2854
2855 if (attrs & FILE_ATTRIBUTE_NORMAL) buffer[ 0] = 'N';
2856 else {
2857 if (attrs & FILE_ATTRIBUTE_READONLY) buffer[ 2] = 'R';
2858 if (attrs & FILE_ATTRIBUTE_HIDDEN) buffer[ 4] = 'H';
2859 if (attrs & FILE_ATTRIBUTE_SYSTEM) buffer[ 6] = 'S';
2860 if (attrs & FILE_ATTRIBUTE_ARCHIVE) buffer[ 8] = 'A';
2861 if (attrs & FILE_ATTRIBUTE_COMPRESSED) buffer[10] = 'C';
2862 if (attrs & FILE_ATTRIBUTE_DIRECTORY) buffer[12] = 'D';
2863 if (attrs & FILE_ATTRIBUTE_ENCRYPTED) buffer[14] = 'E';
2864 if (attrs & FILE_ATTRIBUTE_TEMPORARY) buffer[16] = 'T';
2865 if (attrs & FILE_ATTRIBUTE_SPARSE_FILE) buffer[18] = 'P';
2866 if (attrs & FILE_ATTRIBUTE_REPARSE_POINT) buffer[20] = 'Q';
2867 if (attrs & FILE_ATTRIBUTE_OFFLINE) buffer[22] = 'O';
2868 if (attrs & FILE_ATTRIBUTE_NOT_CONTENT_INDEXED) buffer[24] = 'X';
2869 }
2870
2871 if (calcWidthCol == -1)
2872 output_tabbed_text(pane, dis, col, buffer);
2873 else if (calcWidthCol==col || calcWidthCol==COLUMNS)
2874 calc_tabbed_width(pane, dis, col, buffer);
2875
2876 col++;
2877 }
2878 }
2879
2880 static void set_header(Pane* pane)
2881 {
2882 HDITEMW item;
2883 int scroll_pos = GetScrollPos(pane->hwnd, SB_HORZ);
2884 int i;
2885
2886 item.mask = HDI_WIDTH;
2887
2888 for (i = 0; i < COLUMNS; ++i) {
2889 if (pane->positions[i] >= scroll_pos) {
2890 item.cxy = pane->widths[i];
2891 } else if (pane->positions[i+1] <= scroll_pos) {
2892 item.cxy = 0;
2893 } else {
2894 item.cxy = pane->positions[i+1] - scroll_pos;
2895 }
2896 pane->widths_shown[i] = item.cxy;
2897 SendMessageW(pane->hwndHeader, HDM_SETITEMW, i, (LPARAM)&item);
2898 }
2899 }
2900
2901 static LRESULT pane_notify(Pane* pane, NMHDR* pnmh)
2902 {
2903 switch(pnmh->code) {
2904 case HDN_ITEMCHANGEDW: {
2905 LPNMHEADERW phdn = (LPNMHEADERW)pnmh;
2906 int idx = phdn->iItem;
2907 int dx = phdn->pitem->cxy - pane->widths_shown[idx];
2908 int i;
2909
2910 RECT clnt;
2911 GetClientRect(pane->hwnd, &clnt);
2912
2913 pane->widths[idx] += dx;
2914 pane->widths_shown[idx] += dx;
2915
2916 for(i=idx; ++i<=COLUMNS; )
2917 pane->positions[i] += dx;
2918
2919 {
2920 int scroll_pos = GetScrollPos(pane->hwnd, SB_HORZ);
2921 RECT rt_scr;
2922 RECT rt_clip;
2923
2924 rt_scr.left = pane->positions[idx+1]-scroll_pos;
2925 rt_scr.top = 0;
2926 rt_scr.right = clnt.right;
2927 rt_scr.bottom = clnt.bottom;
2928
2929 rt_clip.left = pane->positions[idx]-scroll_pos;
2930 rt_clip.top = 0;
2931 rt_clip.right = clnt.right;
2932 rt_clip.bottom = clnt.bottom;
2933
2934 if (rt_scr.left < 0) rt_scr.left = 0;
2935 if (rt_clip.left < 0) rt_clip.left = 0;
2936
2937 ScrollWindowEx(pane->hwnd, dx, 0, &rt_scr, &rt_clip, 0, 0, SW_INVALIDATE);
2938
2939 rt_clip.right = pane->positions[idx+1];
2940 RedrawWindow(pane->hwnd, &rt_clip, 0, RDW_INVALIDATE|RDW_UPDATENOW);
2941
2942 if (pnmh->code == HDN_ENDTRACKW) {
2943 SendMessageW(pane->hwnd, LB_SETHORIZONTALEXTENT, pane->positions[COLUMNS], 0);
2944
2945 if (GetScrollPos(pane->hwnd, SB_HORZ) != scroll_pos)
2946 set_header(pane);
2947 }
2948 }
2949
2950 return FALSE;
2951 }
2952
2953 case HDN_DIVIDERDBLCLICKW: {
2954 LPNMHEADERW phdn = (LPNMHEADERW)pnmh;
2955 HDITEMW item;
2956
2957 calc_single_width(pane, phdn->iItem);
2958 item.mask = HDI_WIDTH;
2959 item.cxy = pane->widths[phdn->iItem];
2960
2961 SendMessageW(pane->hwndHeader, HDM_SETITEMW, phdn->iItem, (LPARAM)&item);
2962 InvalidateRect(pane->hwnd, 0, TRUE);
2963 break;}
2964 }
2965
2966 return 0;
2967 }
2968
2969 static void scan_entry(ChildWnd* child, Entry* entry, int idx, HWND hwnd)
2970 {
2971 WCHAR path[MAX_PATH];
2972 HCURSOR old_cursor = SetCursor(LoadCursorW(0, (LPCWSTR)IDC_WAIT));
2973
2974 /* delete sub entries in left pane */
2975 for(;;) {
2976 LRESULT res = SendMessageW(child->left.hwnd, LB_GETITEMDATA, idx+1, 0);
2977 Entry* sub = (Entry*) res;
2978
2979 if (res==LB_ERR || !sub || sub->level<=entry->level)
2980 break;
2981
2982 SendMessageW(child->left.hwnd, LB_DELETESTRING, idx+1, 0);
2983 }
2984
2985 /* empty right pane */
2986 SendMessageW(child->right.hwnd, LB_RESETCONTENT, 0, 0);
2987
2988 /* release memory */
2989 free_entries(entry);
2990
2991 /* read contents from disk */
2992 if (entry->etype == ET_SHELL)
2993 {
2994 read_directory(entry, NULL, child->sortOrder, hwnd);
2995 }
2996 else
2997 {
2998 get_path(entry, path);
2999 read_directory(entry, path, child->sortOrder, hwnd);
3000 }
3001
3002 /* insert found entries in right pane */
3003 insert_entries(&child->right, entry->down, child->filter_pattern, child->filter_flags, -1);
3004 calc_widths(&child->right, FALSE);
3005 set_header(&child->right);
3006
3007 child->header_wdths_ok = FALSE;
3008
3009 SetCursor(old_cursor);
3010 }
3011
3012
3013 /* expand a directory entry */
3014
3015 static BOOL expand_entry(ChildWnd* child, Entry* dir)
3016 {
3017 int idx;
3018 Entry* p;
3019
3020 if (!dir || dir->expanded || !dir->down)
3021 return FALSE;
3022
3023 p = dir->down;
3024
3025 if (p->data.cFileName[0]=='.' && p->data.cFileName[1]=='\0' && p->next) {
3026 p = p->next;
3027
3028 if (p->data.cFileName[0]=='.' && p->data.cFileName[1]=='.' &&
3029 p->data.cFileName[2]=='\0' && p->next)
3030 p = p->next;
3031 }
3032
3033 /* no subdirectories ? */
3034 if (!(p->data.dwFileAttributes&FILE_ATTRIBUTE_DIRECTORY))
3035 return FALSE;
3036
3037 idx = SendMessageW(child->left.hwnd, LB_FINDSTRING, 0, (LPARAM)dir);
3038
3039 dir->expanded = TRUE;
3040
3041 /* insert entries in left pane */
3042 insert_entries(&child->left, p, NULL, TF_ALL, idx);
3043
3044 if (!child->header_wdths_ok) {
3045 if (calc_widths(&child->left, FALSE)) {
3046 set_header(&child->left);
3047
3048 child->header_wdths_ok = TRUE;
3049 }
3050 }
3051
3052 return TRUE;
3053 }
3054
3055
3056 static void collapse_entry(Pane* pane, Entry* dir)
3057 {
3058 int idx;
3059
3060 if (!dir) return;
3061 idx = SendMessageW(pane->hwnd, LB_FINDSTRING, 0, (LPARAM)dir);
3062
3063 ShowWindow(pane->hwnd, SW_HIDE);
3064
3065 /* hide sub entries */
3066 for(;;) {
3067 LRESULT res = SendMessageW(pane->hwnd, LB_GETITEMDATA, idx+1, 0);
3068 Entry* sub = (Entry*) res;
3069
3070 if (res==LB_ERR || !sub || sub->level<=dir->level)
3071 break;
3072
3073 SendMessageW(pane->hwnd, LB_DELETESTRING, idx+1, 0);
3074 }
3075
3076 dir->expanded = FALSE;
3077
3078 ShowWindow(pane->hwnd, SW_SHOW);
3079 }
3080
3081
3082 static void refresh_right_pane(ChildWnd* child)
3083 {
3084 SendMessageW(child->right.hwnd, LB_RESETCONTENT, 0, 0);
3085 insert_entries(&child->right, child->right.root, child->filter_pattern, child->filter_flags, -1);
3086 calc_widths(&child->right, FALSE);
3087
3088 set_header(&child->right);
3089 }
3090
3091 static void set_curdir(ChildWnd* child, Entry* entry, int idx, HWND hwnd)
3092 {
3093 WCHAR path[MAX_PATH];
3094
3095 if (!entry)
3096 return;
3097
3098 path[0] = '\0';
3099
3100 child->left.cur = entry;
3101
3102 child->right.root = entry->down? entry->down: entry;
3103 child->right.cur = entry;
3104
3105 if (!entry->scanned)
3106 scan_entry(child, entry, idx, hwnd);
3107 else
3108 refresh_right_pane(child);
3109
3110 get_path(entry, path);
3111 lstrcpyW(child->path, path);
3112
3113 if (child->hwnd) /* only change window title, if the window already exists */
3114 SetWindowTextW(child->hwnd, path);
3115
3116 if (path[0])
3117 if (SetCurrentDirectoryW(path))
3118 set_space_status();
3119 }
3120
3121
3122 static void refresh_child(ChildWnd* child)
3123 {
3124 WCHAR path[MAX_PATH], drv[_MAX_DRIVE+1];
3125 Entry* entry;
3126 int idx;
3127
3128 get_path(child->left.cur, path);
3129 _wsplitpath(path, drv, NULL, NULL, NULL);
3130
3131 child->right.root = NULL;
3132
3133 scan_entry(child, &child->root.entry, 0, child->hwnd);
3134
3135 if (child->root.entry.etype == ET_SHELL)
3136 {
3137 LPITEMIDLIST local_pidl = get_path_pidl(path,child->hwnd);
3138 if (local_pidl)
3139 entry = read_tree(&child->root, NULL, local_pidl , drv, child->sortOrder, child->hwnd);
3140 else
3141 entry = NULL;
3142 }
3143 else
3144 entry = read_tree(&child->root, path, NULL, drv, child->sortOrder, child->hwnd);
3145
3146 if (!entry)
3147 entry = &child->root.entry;
3148
3149 insert_entries(&child->left, child->root.entry.down, NULL, TF_ALL, 0);
3150
3151 set_curdir(child, entry, 0, child->hwnd);
3152
3153 idx = SendMessageW(child->left.hwnd, LB_FINDSTRING, 0, (LPARAM)child->left.cur);
3154 SendMessageW(child->left.hwnd, LB_SETCURSEL, idx, 0);
3155 }
3156
3157
3158 static void create_drive_bar(void)
3159 {
3160 TBBUTTON drivebarBtn = {0, 0, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0};
3161 WCHAR b1[BUFFER_LEN];
3162 int btn = 1;
3163 PWSTR p;
3164
3165 GetLogicalDriveStringsW(BUFFER_LEN, Globals.drives);
3166
3167 Globals.hdrivebar = CreateToolbarEx(Globals.hMainWnd, WS_CHILD|WS_VISIBLE|CCS_NOMOVEY|TBSTYLE_LIST,
3168 IDW_DRIVEBAR, 2, Globals.hInstance, IDB_DRIVEBAR, &drivebarBtn,
3169 0, 16, 13, 16, 13, sizeof(TBBUTTON));
3170
3171 /* insert shell namespace button */
3172 load_string(b1, ARRAY_SIZE(b1), IDS_SHELL);
3173 b1[lstrlenW(b1)+1] = '\0';
3174 SendMessageW(Globals.hdrivebar, TB_ADDSTRINGW, 0, (LPARAM)b1);
3175
3176 drivebarBtn.idCommand = ID_DRIVE_SHELL_NS;
3177 SendMessageW(Globals.hdrivebar, TB_INSERTBUTTONW, btn++, (LPARAM)&drivebarBtn);
3178 drivebarBtn.iString++;
3179
3180 /* register windows drive root strings */
3181 SendMessageW(Globals.hdrivebar, TB_ADDSTRINGW, 0, (LPARAM)Globals.drives);
3182
3183 drivebarBtn.idCommand = ID_DRIVE_FIRST;
3184
3185 for(p=Globals.drives; *p; ) {
3186 switch(GetDriveTypeW(p)) {
3187 case DRIVE_REMOVABLE: drivebarBtn.iBitmap = 1; break;
3188 case DRIVE_CDROM: drivebarBtn.iBitmap = 3; break;
3189 case DRIVE_REMOTE: drivebarBtn.iBitmap = 4; break;
3190 case DRIVE_RAMDISK: drivebarBtn.iBitmap = 5; break;
3191 default:/*DRIVE_FIXED*/ drivebarBtn.iBitmap = 2;
3192 }
3193
3194 SendMessageW(Globals.hdrivebar, TB_INSERTBUTTONW, btn++, (LPARAM)&drivebarBtn);
3195 drivebarBtn.idCommand++;
3196 drivebarBtn.iString++;
3197
3198 while(*p++);
3199 }
3200 }
3201
3202 static void refresh_drives(void)
3203 {
3204 RECT rect;
3205
3206 /* destroy drive bar */
3207 DestroyWindow(Globals.hdrivebar);
3208 Globals.hdrivebar = 0;
3209
3210 /* re-create drive bar */
3211 create_drive_bar();
3212
3213 /* update window layout */
3214 GetClientRect(Globals.hMainWnd, &rect);
3215 SendMessageW(Globals.hMainWnd, WM_SIZE, 0, MAKELONG(rect.right, rect.bottom));
3216 }
3217
3218
3219 static BOOL launch_file(HWND hwnd, LPCWSTR cmd, UINT nCmdShow)
3220 {
3221 HINSTANCE hinst = ShellExecuteW(hwnd, NULL/*operation*/, cmd, NULL/*parameters*/, NULL/*dir*/, nCmdShow);
3222
3223 if (PtrToUlong(hinst) <= 32) {
3224 display_error(hwnd, GetLastError());
3225 return FALSE;
3226 }
3227
3228 return TRUE;
3229 }
3230
3231
3232 static BOOL launch_entry(Entry* entry, HWND hwnd, UINT nCmdShow)
3233 {
3234 WCHAR cmd[MAX_PATH];
3235
3236 if (entry->etype == ET_SHELL) {
3237 BOOL ret = TRUE;
3238
3239 SHELLEXECUTEINFOW shexinfo;
3240
3241 shexinfo.cbSize = sizeof(SHELLEXECUTEINFOW);
3242 shexinfo.fMask = SEE_MASK_IDLIST;
3243 shexinfo.hwnd = hwnd;
3244 shexinfo.lpVerb = NULL;
3245 shexinfo.lpFile = NULL;
3246 shexinfo.lpParameters = NULL;
3247 shexinfo.lpDirectory = NULL;
3248 shexinfo.nShow = nCmdShow;
3249 shexinfo.lpIDList = get_to_absolute_pidl(entry, hwnd);
3250
3251 if (!ShellExecuteExW(&shexinfo)) {
3252 display_error(hwnd, GetLastError());
3253 ret = FALSE;
3254 }
3255
3256 if (shexinfo.lpIDList != entry->pidl)
3257 IMalloc_Free(Globals.iMalloc, shexinfo.lpIDList);
3258
3259 return ret;
3260 }
3261
3262 get_path(entry, cmd);
3263
3264 /* start program, open document... */
3265 return launch_file(hwnd, cmd, nCmdShow);
3266 }
3267
3268
3269 static void activate_entry(ChildWnd* child, Pane* pane, HWND hwnd)
3270 {
3271 Entry* entry = pane->cur;
3272
3273 if (!entry)
3274 return;
3275
3276 if (entry->data.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) {
3277 int scanned_old = entry->scanned;
3278
3279 if (!scanned_old)
3280 {
3281 int idx = SendMessageW(child->left.hwnd, LB_GETCURSEL, 0, 0);
3282 scan_entry(child, entry, idx, hwnd);
3283 }
3284
3285 if (entry->data.cFileName[0]=='.' && entry->data.cFileName[1]=='\0')
3286 return;
3287
3288 if (entry->data.cFileName[0]=='.' && entry->data.cFileName[1]=='.' && entry->data.cFileName[2]=='\0') {
3289 entry = child->left.cur->up;
3290 collapse_entry(&child->left, entry);
3291 goto focus_entry;
3292 } else if (entry->expanded)
3293 collapse_entry(pane, child->left.cur);
3294 else {
3295 expand_entry(child, child->left.cur);
3296
3297 if (!pane->treePane) focus_entry: {
3298 int idxstart = SendMessageW(child->left.hwnd, LB_GETCURSEL, 0, 0);
3299 int idx = SendMessageW(child->left.hwnd, LB_FINDSTRING, idxstart, (LPARAM)entry);
3300 SendMessageW(child->left.hwnd, LB_SETCURSEL, idx, 0);
3301 set_curdir(child, entry, idx, hwnd);
3302 }
3303 }
3304
3305 if (!scanned_old) {
3306 calc_widths(pane, FALSE);
3307
3308 set_header(pane);
3309 }
3310 } else {
3311 if (GetKeyState(VK_MENU) < 0)
3312 show_properties_dlg(entry, child->hwnd);
3313 else
3314 launch_entry(entry, child->hwnd, SW_SHOWNORMAL);
3315 }
3316 }
3317
3318
3319 static BOOL pane_command(Pane* pane, UINT cmd)
3320 {
3321 switch(cmd) {
3322 case ID_VIEW_NAME:
3323 if (pane->visible_cols) {
3324 pane->visible_cols = 0;
3325 calc_widths(pane, TRUE);
3326 set_header(pane);
3327 InvalidateRect(pane->hwnd, 0, TRUE);
3328 CheckMenuItem(Globals.hMenuView, ID_VIEW_NAME, MF_BYCOMMAND|MF_CHECKED);
3329 CheckMenuItem(Globals.hMenuView, ID_VIEW_ALL_ATTRIBUTES, MF_BYCOMMAND);
3330 }
3331 break;
3332
3333 case ID_VIEW_ALL_ATTRIBUTES:
3334 if (pane->visible_cols != COL_ALL) {
3335 pane->visible_cols = COL_ALL;
3336 calc_widths(pane, TRUE);
3337 set_header(pane);
3338 InvalidateRect(pane->hwnd, 0, TRUE);
3339 CheckMenuItem(Globals.hMenuView, ID_VIEW_NAME, MF_BYCOMMAND);
3340 CheckMenuItem(Globals.hMenuView, ID_VIEW_ALL_ATTRIBUTES, MF_BYCOMMAND|MF_CHECKED);
3341 }
3342 break;
3343
3344 case ID_PREFERRED_SIZES: {
3345 calc_widths(pane, TRUE);
3346 set_header(pane);
3347 InvalidateRect(pane->hwnd, 0, TRUE);
3348 break;}
3349
3350 /* TODO: more command ids... */
3351
3352 default:
3353 return FALSE;
3354 }
3355
3356 return TRUE;
3357 }
3358
3359
3360 static void set_sort_order(ChildWnd* child, SORT_ORDER sortOrder)
3361 {
3362 if (child->sortOrder != sortOrder) {
3363 child->sortOrder = sortOrder;
3364 refresh_child(child);
3365 }
3366 }
3367
3368 static void update_view_menu(ChildWnd* child)
3369 {
3370 CheckMenuItem(Globals.hMenuView, ID_VIEW_SORT_NAME, child->sortOrder==SORT_NAME? MF_CHECKED: MF_UNCHECKED);
3371 CheckMenuItem(Globals.hMenuView, ID_VIEW_SORT_TYPE, child->sortOrder==SORT_EXT? MF_CHECKED: MF_UNCHECKED);
3372 CheckMenuItem(Globals.hMenuView, ID_VIEW_SORT_SIZE, child->sortOrder==SORT_SIZE? MF_CHECKED: MF_UNCHECKED);
3373 CheckMenuItem(Globals.hMenuView, ID_VIEW_SORT_DATE, child->sortOrder==SORT_DATE? MF_CHECKED: MF_UNCHECKED);
3374 }
3375
3376
3377 static BOOL is_directory(LPCWSTR target)
3378 {
3379 DWORD target_attr = GetFileAttributesW(target);
3380
3381 if (target_attr == INVALID_FILE_ATTRIBUTES)
3382 return FALSE;
3383
3384 return (target_attr & FILE_ATTRIBUTE_DIRECTORY) != 0;
3385 }
3386
3387 static BOOL prompt_target(Pane* pane, LPWSTR source, LPWSTR target)
3388 {
3389 WCHAR path[MAX_PATH];
3390 int len;
3391
3392 get_path(pane->cur, path);
3393
3394 if (DialogBoxParamW(Globals.hInstance, MAKEINTRESOURCEW(IDD_SELECT_DESTINATION), pane->hwnd, DestinationDlgProc, (LPARAM)path) != IDOK)
3395 return FALSE;
3396
3397 get_path(pane->cur, source);
3398
3399 /* convert relative targets to absolute paths */
3400 if (path[0]!='/' && path[1]!=':') {
3401 get_path(pane->cur->up, target);
3402 len = lstrlenW(target);
3403
3404 if (target[len-1]!='\\' && target[len-1]!='/')
3405 target[len++] = '/';
3406
3407 lstrcpyW(target+len, path);
3408 } else
3409 lstrcpyW(target, path);
3410
3411 /* If the target already exists as directory, create a new target below this. */
3412 if (is_directory(path)) {
3413 WCHAR fname[_MAX_FNAME], ext[_MAX_EXT];
3414 static const WCHAR sAppend[] = {'%','s','/','%','s','%','s','\0'};
3415
3416 _wsplitpath(source, NULL, NULL, fname, ext);
3417
3418 wsprintfW(target, sAppend, path, fname, ext);
3419 }
3420
3421 return TRUE;
3422 }
3423
3424
3425 static IContextMenu2* s_pctxmenu2 = NULL;
3426 static IContextMenu3* s_pctxmenu3 = NULL;
3427
3428 static void CtxMenu_reset(void)
3429 {
3430 s_pctxmenu2 = NULL;
3431 s_pctxmenu3 = NULL;
3432 }
3433
3434 static IContextMenu* CtxMenu_query_interfaces(IContextMenu* pcm1)
3435 {
3436 IContextMenu* pcm = NULL;
3437
3438 CtxMenu_reset();
3439
3440 if (IContextMenu_QueryInterface(pcm1, &IID_IContextMenu3, (void**)&pcm) == NOERROR)
3441 s_pctxmenu3 = (LPCONTEXTMENU3)pcm;
3442 else if (IContextMenu_QueryInterface(pcm1, &IID_IContextMenu2, (void**)&pcm) == NOERROR)
3443 s_pctxmenu2 = (LPCONTEXTMENU2)pcm;
3444
3445 if (pcm) {
3446 IContextMenu_Release(pcm1);
3447 return pcm;
3448 } else
3449 return pcm1;
3450 }
3451
3452 static BOOL CtxMenu_HandleMenuMsg(UINT nmsg, WPARAM wparam, LPARAM lparam)
3453 {
3454 if (s_pctxmenu3) {
3455 if (SUCCEEDED(IContextMenu3_HandleMenuMsg(s_pctxmenu3, nmsg, wparam, lparam)))
3456 return TRUE;
3457 }
3458
3459 if (s_pctxmenu2)
3460 if (SUCCEEDED(IContextMenu2_HandleMenuMsg(s_pctxmenu2, nmsg, wparam, lparam)))
3461 return TRUE;
3462
3463 return FALSE;
3464 }
3465
3466 static HRESULT ShellFolderContextMenu(IShellFolder* shell_folder, HWND hwndParent, int cidl, LPCITEMIDLIST* apidl, int x, int y)
3467 {
3468 IContextMenu* pcm;
3469 BOOL executed = FALSE;
3470
3471 HRESULT hr = IShellFolder_GetUIObjectOf(shell_folder, hwndParent, cidl, apidl, &IID_IContextMenu, NULL, (LPVOID*)&pcm);
3472
3473 if (SUCCEEDED(hr)) {
3474 HMENU hmenu = CreatePopupMenu();
3475
3476 pcm = CtxMenu_query_interfaces(pcm);
3477
3478 if (hmenu) {
3479 hr = IContextMenu_QueryContextMenu(pcm, hmenu, 0, FCIDM_SHVIEWFIRST, FCIDM_SHVIEWLAST, CMF_NORMAL);
3480
3481 if (SUCCEEDED(hr)) {
3482 UINT idCmd = TrackPopupMenu(hmenu, TPM_LEFTALIGN|TPM_RETURNCMD|TPM_RIGHTBUTTON, x, y, 0, hwndParent, NULL);
3483
3484 CtxMenu_reset();
3485
3486 if (idCmd) {
3487 CMINVOKECOMMANDINFO cmi;
3488
3489 cmi.cbSize = sizeof(CMINVOKECOMMANDINFO);
3490 cmi.fMask = 0;
3491 cmi.hwnd = hwndParent;
3492 cmi.lpVerb = (LPCSTR)(INT_PTR)(idCmd - FCIDM_SHVIEWFIRST);
3493 cmi.lpParameters = NULL;
3494 cmi.lpDirectory = NULL;
3495 cmi.nShow = SW_SHOWNORMAL;
3496 cmi.dwHotKey = 0;
3497 cmi.hIcon = 0;
3498
3499 hr = IContextMenu_InvokeCommand(pcm, &cmi);
3500 executed = TRUE;
3501 }
3502 } else
3503 CtxMenu_reset();
3504 }
3505
3506 IContextMenu_Release(pcm);
3507 }
3508
3509 return FAILED(hr)? hr: executed? S_OK: S_FALSE;
3510 }
3511
3512 static LRESULT CALLBACK ChildWndProc(HWND hwnd, UINT nmsg, WPARAM wparam, LPARAM lparam)
3513 {
3514 ChildWnd* child = (ChildWnd*)GetWindowLongPtrW(hwnd, GWLP_USERDATA);
3515 assert(child);
3516
3517 switch(nmsg) {
3518 case WM_DRAWITEM: {
3519 LPDRAWITEMSTRUCT dis = (LPDRAWITEMSTRUCT)lparam;
3520 Entry* entry = (Entry*) dis->itemData;
3521
3522 if (dis->CtlID == IDW_TREE_LEFT)
3523 draw_item(&child->left, dis, entry, -1);
3524 else if (dis->CtlID == IDW_TREE_RIGHT)
3525 draw_item(&child->right, dis, entry, -1);
3526 else
3527 goto draw_menu_item;
3528
3529 return TRUE;}
3530
3531 case WM_CREATE:
3532 InitChildWindow(child);
3533 break;
3534
3535 case WM_NCDESTROY:
3536 free_child_window(child);
3537 SetWindowLongPtrW(hwnd, GWLP_USERDATA, 0);
3538 break;
3539
3540 case WM_PAINT: {
3541 PAINTSTRUCT ps;
3542 HBRUSH lastBrush;
3543 RECT rt;
3544 GetClientRect(hwnd, &rt);
3545 BeginPaint(hwnd, &ps);
3546 rt.left = child->split_pos-SPLIT_WIDTH/2;
3547 rt.right = child->split_pos+SPLIT_WIDTH/2+1;
3548 lastBrush = SelectObject(ps.hdc, GetStockObject(COLOR_SPLITBAR));
3549 Rectangle(ps.hdc, rt.left, rt.top-1, rt.right, rt.bottom+1);
3550 SelectObject(ps.hdc, lastBrush);
3551 EndPaint(hwnd, &ps);
3552 break;}
3553
3554 case WM_SETCURSOR:
3555 if (LOWORD(lparam) == HTCLIENT) {
3556 POINT pt;
3557 GetCursorPos(&pt);
3558 ScreenToClient(hwnd, &pt);
3559
3560 if (pt.x>=child->split_pos-SPLIT_WIDTH/2 && pt.x<child->split_pos+SPLIT_WIDTH/2+1) {
3561 SetCursor(LoadCursorW(0, (LPCWSTR)IDC_SIZEWE));
3562 return TRUE;
3563 }
3564 }
3565 goto def;
3566
3567 case WM_LBUTTONDOWN: {
3568 RECT rt;
3569 int x = (short)LOWORD(lparam);
3570
3571 GetClientRect(hwnd, &rt);
3572
3573 if (x>=child->split_pos-SPLIT_WIDTH/2 && x<child->split_pos+SPLIT_WIDTH/2+1) {
3574 last_split = child->split_pos;
3575 SetCapture(hwnd);
3576 }
3577
3578 break;}
3579
3580 case WM_LBUTTONUP:
3581 if (GetCapture() == hwnd)
3582 ReleaseCapture();
3583 break;
3584
3585 case WM_KEYDOWN:
3586 if (wparam == VK_ESCAPE)
3587 if (GetCapture() == hwnd) {
3588 RECT rt;
3589 child->split_pos = last_split;
3590 GetClientRect(hwnd, &rt);
3591 resize_tree(child, rt.right, rt.bottom);
3592 last_split = -1;
3593 ReleaseCapture();
3594 SetCursor(LoadCursorW(0, (LPCWSTR)IDC_ARROW));
3595 }
3596 break;
3597
3598 case WM_MOUSEMOVE:
3599 if (GetCapture() == hwnd) {
3600 RECT rt;
3601 int x = (short)LOWORD(lparam);
3602
3603 GetClientRect(hwnd, &rt);
3604
3605 if (x>=0 && x<rt.right) {
3606 child->split_pos = x;
3607 resize_tree(child, rt.right, rt.bottom);
3608 rt.left = x-SPLIT_WIDTH/2;
3609 rt.right = x+SPLIT_WIDTH/2+1;
3610 InvalidateRect(hwnd, &rt, FALSE);
3611 UpdateWindow(child->left.hwnd);
3612 UpdateWindow(hwnd);
3613 UpdateWindow(child->right.hwnd);
3614 }
3615 }
3616 break;
3617
3618 case WM_GETMINMAXINFO:
3619 DefMDIChildProcW(hwnd, nmsg, wparam, lparam);
3620
3621 {LPMINMAXINFO lpmmi = (LPMINMAXINFO)lparam;
3622
3623 lpmmi->ptMaxTrackSize.x <<= 1;/*2*GetSystemMetrics(SM_CXSCREEN) / SM_CXVIRTUALSCREEN */
3624 lpmmi->ptMaxTrackSize.y <<= 1;/*2*GetSystemMetrics(SM_CYSCREEN) / SM_CYVIRTUALSCREEN */
3625 break;}
3626
3627 case WM_SETFOCUS:
3628 if (SetCurrentDirectoryW(child->path))
3629 set_space_status();
3630 SetFocus(child->focus_pane? child->right.hwnd: child->left.hwnd);
3631 break;
3632
3633 case WM_DISPATCH_COMMAND: {
3634 Pane* pane = GetFocus()==child->left.hwnd? &child->left: &child->right;
3635
3636 switch(LOWORD(wparam)) {
3637 case ID_WINDOW_NEW: {
3638 ChildWnd* new_child = alloc_child_window(child->path, NULL, hwnd);
3639
3640 if (!create_child_window(new_child))
3641 HeapFree(GetProcessHeap(), 0, new_child);
3642
3643 break;}
3644
3645 case ID_REFRESH:
3646 refresh_drives();
3647 refresh_child(child);
3648 break;
3649
3650 case ID_ACTIVATE:
3651 activate_entry(child, pane, hwnd);
3652 break;
3653
3654 case ID_FILE_MOVE: {
3655 WCHAR source[BUFFER_LEN], target[BUFFER_LEN];
3656
3657 if (prompt_target(pane, source, target)) {
3658 SHFILEOPSTRUCTW shfo = {hwnd, FO_MOVE, source, target};
3659
3660 source[lstrlenW(source)+1] = '\0';
3661 target[lstrlenW(target)+1] = '\0';
3662
3663 if (!SHFileOperationW(&shfo))
3664 refresh_child(child);
3665 }
3666 break;}
3667
3668 case ID_FILE_COPY: {
3669 WCHAR source[BUFFER_LEN], target[BUFFER_LEN];
3670
3671 if (prompt_target(pane, source, target)) {
3672 SHFILEOPSTRUCTW shfo = {hwnd, FO_COPY, source, target};
3673
3674 source[lstrlenW(source)+1] = '\0';
3675 target[lstrlenW(target)+1] = '\0';
3676
3677 if (!SHFileOperationW(&shfo))
3678 refresh_child(child);
3679 }
3680 break;}
3681
3682 case ID_FILE_DELETE: {
3683 WCHAR path[BUFFER_LEN];
3684 SHFILEOPSTRUCTW shfo = {hwnd, FO_DELETE, path, NULL, FOF_ALLOWUNDO};
3685
3686 get_path(pane->cur, path);
3687
3688 path[lstrlenW(path)+1] = '\0';
3689
3690 if (!SHFileOperationW(&shfo))
3691 refresh_child(child);
3692 break;}
3693
3694 case ID_VIEW_SORT_NAME:
3695 set_sort_order(child, SORT_NAME);
3696 break;
3697
3698 case ID_VIEW_SORT_TYPE:
3699 set_sort_order(child, SORT_EXT);
3700 break;
3701
3702 case ID_VIEW_SORT_SIZE:
3703 set_sort_order(child, SORT_SIZE);
3704 break;
3705
3706 case ID_VIEW_SORT_DATE:
3707 set_sort_order(child, SORT_DATE);
3708 break;
3709
3710 case ID_VIEW_FILTER: {
3711 struct FilterDialog dlg;
3712
3713 memset(&dlg, 0, sizeof(struct FilterDialog));
3714 lstrcpyW(dlg.pattern, child->filter_pattern);
3715 dlg.flags = child->filter_flags;
3716
3717 if (DialogBoxParamW(Globals.hInstance, MAKEINTRESOURCEW(IDD_DIALOG_VIEW_TYPE), hwnd, FilterDialogDlgProc, (LPARAM)&dlg) == IDOK) {
3718 lstrcpyW(child->filter_pattern, dlg.pattern);
3719 child->filter_flags = dlg.flags;
3720 refresh_right_pane(child);
3721 }
3722 break;}
3723
3724 case ID_VIEW_SPLIT: {
3725 last_split = child->split_pos;
3726 SetCapture(hwnd);
3727 break;}
3728
3729 case ID_EDIT_PROPERTIES:
3730 show_properties_dlg(pane->cur, child->hwnd);
3731 break;
3732
3733 default:
3734 return pane_command(pane, LOWORD(wparam));
3735 }
3736
3737 return TRUE;}
3738
3739 case WM_COMMAND: {
3740 Pane* pane = GetFocus()==child->left.hwnd? &child->left: &child->right;
3741
3742 switch(HIWORD(wparam)) {
3743 case LBN_SELCHANGE: {
3744 int idx = SendMessageW(pane->hwnd, LB_GETCURSEL, 0, 0);
3745 Entry* entry = (Entry*)SendMessageW(pane->hwnd, LB_GETITEMDATA, idx, 0);
3746
3747 if (pane == &child->left)
3748 set_curdir(child, entry, idx, hwnd);
3749 else
3750 pane->cur = entry;
3751 break;}
3752
3753 case LBN_DBLCLK:
3754 activate_entry(child, pane, hwnd);
3755 break;
3756 }
3757 break;}
3758
3759 case WM_NOTIFY: {
3760 NMHDR* pnmh = (NMHDR*) lparam;
3761 return pane_notify(pnmh->idFrom==IDW_HEADER_LEFT? &child->left: &child->right, pnmh);}
3762
3763 case WM_CONTEXTMENU: {
3764 POINT pt, pt_clnt;
3765 Pane* pane;
3766 int idx;
3767
3768 /* first select the current item in the listbox */
3769 HWND hpanel = (HWND) wparam;
3770 pt_clnt.x = pt.x = (short)LOWORD(lparam);
3771 pt_clnt.y = pt.y = (short)HIWORD(lparam);
3772 ScreenToClient(hpanel, &pt_clnt);
3773 SendMessageW(hpanel, WM_LBUTTONDOWN, 0, MAKELONG(pt_clnt.x, pt_clnt.y));
3774 SendMessageW(hpanel, WM_LBUTTONUP, 0, MAKELONG(pt_clnt.x, pt_clnt.y));
3775
3776 /* now create the popup menu using shell namespace and IContextMenu */
3777 pane = GetFocus()==child->left.hwnd? &child->left: &child->right;
3778 idx = SendMessageW(pane->hwnd, LB_GETCURSEL, 0, 0);
3779
3780 if (idx != -1) {
3781 Entry* entry = (Entry*)SendMessageW(pane->hwnd, LB_GETITEMDATA, idx, 0);
3782
3783 LPITEMIDLIST pidl_abs = get_to_absolute_pidl(entry, hwnd);
3784
3785 if (pidl_abs) {
3786 IShellFolder* parentFolder;
3787 LPCITEMIDLIST pidlLast;
3788
3789 /* get and use the parent folder to display correct context menu in all cases */
3790 if (SUCCEEDED(SHBindToParent(pidl_abs, &IID_IShellFolder, (LPVOID*)&parentFolder, &pidlLast))) {
3791 if (ShellFolderContextMenu(parentFolder, hwnd, 1, &pidlLast, pt.x, pt.y) == S_OK)
3792 refresh_child(child);
3793
3794 IShellFolder_Release(parentFolder);
3795 }
3796
3797 IMalloc_Free(Globals.iMalloc, pidl_abs);
3798 }
3799 }
3800 break;}
3801
3802 case WM_MEASUREITEM:
3803 draw_menu_item:
3804 if (!wparam) /* Is the message menu-related? */
3805 if (CtxMenu_HandleMenuMsg(nmsg, wparam, lparam))
3806 return TRUE;
3807
3808 break;
3809
3810 case WM_INITMENUPOPUP:
3811 if (CtxMenu_HandleMenuMsg(nmsg, wparam, lparam))
3812 return 0;
3813
3814 update_view_menu(child);
3815 break;
3816
3817 case WM_MENUCHAR: /* only supported by IContextMenu3 */
3818 if (s_pctxmenu3) {
3819 LRESULT lResult = 0;
3820
3821 IContextMenu3_HandleMenuMsg2(s_pctxmenu3, nmsg, wparam, lparam, &lResult);
3822
3823 return lResult;
3824 }
3825
3826 break;
3827
3828 case WM_SIZE:
3829 if (wparam != SIZE_MINIMIZED)
3830 resize_tree(child, LOWORD(lparam), HIWORD(lparam));
3831 /* fall through */
3832
3833 default: def:
3834 return DefMDIChildProcW(hwnd, nmsg, wparam, lparam);
3835 }
3836
3837 return 0;
3838 }
3839
3840
3841 static LRESULT CALLBACK TreeWndProc(HWND hwnd, UINT nmsg, WPARAM wparam, LPARAM lparam)
3842 {
3843 ChildWnd* child = (ChildWnd*)GetWindowLongPtrW(GetParent(hwnd), GWLP_USERDATA);
3844 Pane* pane = (Pane*)GetWindowLongPtrW(hwnd, GWLP_USERDATA);
3845 assert(child);
3846
3847 switch(nmsg) {
3848 case WM_HSCROLL:
3849 set_header(pane);
3850 break;
3851
3852 case WM_SETFOCUS:
3853 child->focus_pane = pane==&child->right? 1: 0;
3854 SendMessageW(hwnd, LB_SETSEL, TRUE, 1);
3855 /*TODO: check menu items */
3856 break;
3857
3858 case WM_KEYDOWN:
3859 if (wparam == VK_TAB) {
3860 /*TODO: SetFocus(Globals.hdrivebar) */
3861 SetFocus(child->focus_pane? child->left.hwnd: child->right.hwnd);
3862 }
3863 }
3864
3865 return CallWindowProcW(g_orgTreeWndProc, hwnd, nmsg, wparam, lparam);
3866 }
3867
3868
3869 static void InitInstance(HINSTANCE hinstance)
3870 {
3871 static const WCHAR sFont[] = {'M','i','c','r','o','s','o','f','t',' ','S','a','n','s',' ','S','e','r','i','f','\0'};
3872
3873 WNDCLASSEXW wcFrame;
3874 WNDCLASSW wcChild;
3875 int col;
3876
3877 INITCOMMONCONTROLSEX icc = {
3878 sizeof(INITCOMMONCONTROLSEX),
3879 ICC_BAR_CLASSES
3880 };
3881
3882 HDC hdc = GetDC(0);
3883
3884 setlocale(LC_COLLATE, ""); /* set collating rules to local settings for compareName */
3885
3886 InitCommonControlsEx(&icc);
3887
3888
3889 /* register frame window class */
3890
3891 wcFrame.cbSize = sizeof(WNDCLASSEXW);
3892 wcFrame.style = 0;
3893 wcFrame.lpfnWndProc = FrameWndProc;
3894 wcFrame.cbClsExtra = 0;
3895 wcFrame.cbWndExtra = 0;
3896 wcFrame.hInstance = hinstance;
3897 wcFrame.hIcon = LoadIconW(hinstance, MAKEINTRESOURCEW(IDI_WINEFILE));
3898 wcFrame.hCursor = LoadCursorW(0, (LPCWSTR)IDC_ARROW);
3899 wcFrame.hbrBackground = 0;
3900 wcFrame.lpszMenuName = 0;
3901 wcFrame.lpszClassName = sWINEFILEFRAME;
3902 wcFrame.hIconSm = LoadImageW(hinstance, MAKEINTRESOURCEW(IDI_WINEFILE), IMAGE_ICON, GetSystemMetrics(SM_CXSMICON), GetSystemMetrics(SM_CYSMICON), LR_SHARED);
3903
3904 Globals.hframeClass = RegisterClassExW(&wcFrame);
3905
3906
3907 /* register tree windows class */
3908
3909 wcChild.style = CS_CLASSDC|CS_DBLCLKS|CS_VREDRAW;
3910 wcChild.lpfnWndProc = ChildWndProc;
3911 wcChild.cbClsExtra = 0;
3912 wcChild.cbWndExtra = 0;
3913 wcChild.hInstance = hinstance;
3914 wcChild.hIcon = LoadIconW(hinstance, MAKEINTRESOURCEW(IDI_WINEFILE));
3915 wcChild.hCursor = LoadCursorW(0, (LPCWSTR)IDC_ARROW);
3916 wcChild.hbrBackground = 0;
3917 wcChild.lpszMenuName = 0;
3918 wcChild.lpszClassName = sWINEFILETREE;
3919
3920 RegisterClassW(&wcChild);
3921
3922
3923 Globals.haccel = LoadAcceleratorsW(hinstance, MAKEINTRESOURCEW(IDA_WINEFILE));
3924
3925 Globals.hfont = CreateFontW(-MulDiv(8,GetDeviceCaps(hdc,LOGPIXELSY),72), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sFont);
3926
3927 ReleaseDC(0, hdc);
3928
3929 Globals.hInstance = hinstance;
3930
3931 CoInitialize(NULL);
3932 CoGetMalloc(MEMCTX_TASK, &Globals.iMalloc);
3933 SHGetDesktopFolder(&Globals.iDesktop);
3934 Globals.cfStrFName = RegisterClipboardFormatW(CFSTR_FILENAMEW);
3935
3936 /* load column strings */
3937 col = 1;
3938
3939 load_string(g_pos_names[col++], ARRAY_SIZE(g_pos_names[col]), IDS_COL_NAME);
3940 load_string(g_pos_names[col++], ARRAY_SIZE(g_pos_names[col]), IDS_COL_SIZE);
3941 load_string(g_pos_names[col++], ARRAY_SIZE(g_pos_names[col]), IDS_COL_CDATE);
3942 load_string(g_pos_names[col++], ARRAY_SIZE(g_pos_names[col]), IDS_COL_ADATE);
3943 load_string(g_pos_names[col++], ARRAY_SIZE(g_pos_names[col]), IDS_COL_MDATE);
3944 load_string(g_pos_names[col++], ARRAY_SIZE(g_pos_names[col]), IDS_COL_IDX);
3945 load_string(g_pos_names[col++], ARRAY_SIZE(g_pos_names[col]), IDS_COL_LINKS);
3946 load_string(g_pos_names[col++], ARRAY_SIZE(g_pos_names[col]), IDS_COL_ATTR);
3947 load_string(g_pos_names[col++], ARRAY_SIZE(g_pos_names[col]), IDS_COL_SEC);
3948 }
3949
3950
3951 static BOOL show_frame(HWND hwndParent, int cmdshow, LPWSTR path)
3952 {
3953 static const WCHAR sMDICLIENT[] = {'M','D','I','C','L','I','E','N','T','\0'};
3954
3955 WCHAR buffer[MAX_PATH], b1[BUFFER_LEN];
3956 ChildWnd* child;
3957 HMENU hMenuFrame, hMenuWindow;
3958 windowOptions opts;
3959
3960 CLIENTCREATESTRUCT ccs;
3961
3962 if (Globals.hMainWnd)
3963 return TRUE;
3964
3965 opts = load_registry_settings();
3966 hMenuFrame = LoadMenuW(Globals.hInstance, MAKEINTRESOURCEW(IDM_WINEFILE));
3967 hMenuWindow = GetSubMenu(hMenuFrame, GetMenuItemCount(hMenuFrame)-2);
3968
3969 Globals.hMenuFrame = hMenuFrame;
3970 Globals.hMenuView = GetSubMenu(hMenuFrame, 2);
3971 Globals.hMenuOptions = GetSubMenu(hMenuFrame, 3);
3972
3973 ccs.hWindowMenu = hMenuWindow;
3974 ccs.idFirstChild = IDW_FIRST_CHILD;
3975
3976
3977 /* create main window */
3978 Globals.hMainWnd = CreateWindowExW(0, MAKEINTRESOURCEW(Globals.hframeClass), RS(b1,IDS_WINEFILE), WS_OVERLAPPEDWINDOW,
3979 opts.start_x, opts.start_y, opts.width, opts.height,
3980 hwndParent, Globals.hMenuFrame, Globals.hInstance, 0/*lpParam*/);
3981
3982
3983 Globals.hmdiclient = CreateWindowExW(0, sMDICLIENT, NULL,
3984 WS_CHILD|WS_CLIPCHILDREN|WS_VSCROLL|WS_HSCROLL|WS_VISIBLE|WS_BORDER,
3985 0, 0, 0, 0,
3986 Globals.hMainWnd, 0, Globals.hInstance, &ccs);
3987
3988 CheckMenuItem(Globals.hMenuOptions, ID_VIEW_DRIVE_BAR, MF_BYCOMMAND|MF_CHECKED);
3989 CheckMenuItem(Globals.hMenuOptions, ID_VIEW_SAVESETTINGS, MF_BYCOMMAND);
3990
3991 create_drive_bar();
3992
3993 {
3994 TBBUTTON toolbarBtns[] = {
3995 {0, 0, 0, BTNS_SEP, {0, 0}, 0, 0},
3996 {0, ID_WINDOW_NEW, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0},
3997 {1, ID_WINDOW_CASCADE, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0},
3998 {2, ID_WINDOW_TILE_HORZ, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0},
3999 {3, ID_WINDOW_TILE_VERT, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0},
4000 };
4001
4002 Globals.htoolbar = CreateToolbarEx(Globals.hMainWnd, WS_CHILD|WS_VISIBLE,
4003 IDW_TOOLBAR, 2, Globals.hInstance, IDB_TOOLBAR, toolbarBtns,
4004 ARRAY_SIZE(toolbarBtns), 16, 15, 16, 15, sizeof(TBBUTTON));
4005 CheckMenuItem(Globals.hMenuOptions, ID_VIEW_TOOL_BAR, MF_BYCOMMAND|MF_CHECKED);
4006 }
4007
4008 Globals.hstatusbar = CreateStatusWindowW(WS_CHILD|WS_VISIBLE, 0, Globals.hMainWnd, IDW_STATUSBAR);
4009 CheckMenuItem(Globals.hMenuOptions, ID_VIEW_STATUSBAR, MF_BYCOMMAND|MF_CHECKED);
4010
4011 /*TODO: read paths from registry */
4012
4013 if (!path || !*path) {
4014 GetCurrentDirectoryW(MAX_PATH, buffer);
4015 path = buffer;
4016 }
4017
4018 ShowWindow(Globals.hMainWnd, cmdshow);
4019
4020 /* Shell Namespace as default: */
4021 child = alloc_child_window(path, get_path_pidl(path,Globals.hMainWnd), Globals.hMainWnd);
4022
4023 child->pos.showCmd = SW_SHOWMAXIMIZED;
4024 child->pos.rcNormalPosition.left = 0;
4025 child->pos.rcNormalPosition.top = 0;
4026 child->pos.rcNormalPosition.right = 320;
4027 child->pos.rcNormalPosition.bottom = 280;
4028
4029 if (!create_child_window(child)) {
4030 HeapFree(GetProcessHeap(), 0, child);
4031 return FALSE;
4032 }
4033
4034 SetWindowPlacement(child->hwnd, &child->pos);
4035
4036 Globals.himl = ImageList_LoadImageW(Globals.hInstance, MAKEINTRESOURCEW(IDB_IMAGES), 16, 0, RGB(0,255,0), IMAGE_BITMAP, 0);
4037
4038 Globals.prescan_node = FALSE;
4039
4040 UpdateWindow(Globals.hMainWnd);
4041
4042 if (child->hwnd && path && path[0])
4043 {
4044 int index,count;
4045 WCHAR drv[_MAX_DRIVE+1], dir[_MAX_DIR], name[_MAX_FNAME], ext[_MAX_EXT];
4046 WCHAR fullname[_MAX_FNAME+_MAX_EXT+1];
4047
4048 memset(name,0,sizeof(name));
4049 memset(name,0,sizeof(ext));
4050 _wsplitpath(path, drv, dir, name, ext);
4051 if (name[0])
4052 {
4053 count = SendMessageW(child->right.hwnd, LB_GETCOUNT, 0, 0);
4054 lstrcpyW(fullname,name);
4055 lstrcatW(fullname,ext);
4056
4057 for (index = 0; index < count; index ++)
4058 {
4059 Entry* entry = (Entry*)SendMessageW(child->right.hwnd, LB_GETITEMDATA, index, 0);
4060 if (lstrcmpW(entry->data.cFileName,fullname)==0 ||
4061 lstrcmpW(entry->data.cAlternateFileName,fullname)==0)
4062 {
4063 SendMessageW(child->right.hwnd, LB_SETCURSEL, index, 0);
4064 SetFocus(child->right.hwnd);
4065 break;
4066 }
4067 }
4068 }
4069 }
4070 return TRUE;
4071 }
4072
4073 static void ExitInstance(void)
4074 {
4075 IShellFolder_Release(Globals.iDesktop);
4076 IMalloc_Release(Globals.iMalloc);
4077 CoUninitialize();
4078
4079 DeleteObject(Globals.hfont);
4080 ImageList_Destroy(Globals.himl);
4081 }
4082
4083 int APIENTRY wWinMain(HINSTANCE hinstance, HINSTANCE previnstance, LPWSTR cmdline, int cmdshow)
4084 {
4085 MSG msg;
4086
4087 InitInstance(hinstance);
4088
4089 if( !show_frame(0, cmdshow, cmdline) )
4090 {
4091 ExitInstance();
4092 return 1;
4093 }
4094
4095 while(GetMessageW(&msg, 0, 0, 0)) {
4096 if (Globals.hmdiclient && TranslateMDISysAccel(Globals.hmdiclient, &msg))
4097 continue;
4098
4099 if (Globals.hMainWnd && TranslateAcceleratorW(Globals.hMainWnd, Globals.haccel, &msg))
4100 continue;
4101
4102 TranslateMessage(&msg);
4103 DispatchMessageW(&msg);
4104 }
4105
4106 ExitInstance();
4107
4108 return msg.wParam;
4109 }
Zebediah Figura's local tree