4 * Copyright (C) 2002 Robert Dickenson <robd@reactos.org>
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21 #define WIN32_LEAN_AND_MEAN /* Exclude rarely-used stuff from Windows headers */
27 #include "wine/debug.h"
28 #include "wine/heap.h"
30 WINE_DEFAULT_DEBUG_CHANNEL(regedit
);
32 ChildWnd
* g_pChildWnd
;
33 static int last_split
;
35 static const WCHAR wszLastKey
[] = {'L','a','s','t','K','e','y',0};
36 static const WCHAR wszKeyName
[] = {'S','o','f','t','w','a','r','e','\\',
37 'M','i','c','r','o','s','o','f','t','\\',
38 'W','i','n','d','o','w','s','\\',
39 'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
40 'A','p','p','l','e','t','s','\\','R','e','g','e','d','i','t',0};
42 /*******************************************************************************
43 * Local module support methods
46 static LPCWSTR
GetRootKeyName(HKEY hRootKey
)
48 if(hRootKey
== HKEY_CLASSES_ROOT
)
49 return reg_class_namesW
[INDEX_HKEY_CLASSES_ROOT
];
50 if(hRootKey
== HKEY_CURRENT_USER
)
51 return reg_class_namesW
[INDEX_HKEY_CURRENT_USER
];
52 if(hRootKey
== HKEY_LOCAL_MACHINE
)
53 return reg_class_namesW
[INDEX_HKEY_LOCAL_MACHINE
];
54 if(hRootKey
== HKEY_USERS
)
55 return reg_class_namesW
[INDEX_HKEY_USERS
];
56 if(hRootKey
== HKEY_CURRENT_CONFIG
)
57 return reg_class_namesW
[INDEX_HKEY_CURRENT_CONFIG
];
58 if(hRootKey
== HKEY_DYN_DATA
)
59 return reg_class_namesW
[INDEX_HKEY_DYN_DATA
];
62 static const WCHAR unknown_key
[] = {'U','N','K','N','O','W','N',' ','H','K','E','Y',',',' ',
63 'P','L','E','A','S','E',' ','R','E','P','O','R','T',0};
68 static void draw_splitbar(HWND hWnd
, int x
)
71 HDC hdc
= GetDC(hWnd
);
73 GetClientRect(hWnd
, &rt
);
74 rt
.left
= x
- SPLIT_WIDTH
/2;
75 rt
.right
= x
+ SPLIT_WIDTH
/2+1;
80 static void ResizeWnd(int cx
, int cy
)
82 HDWP hdwp
= BeginDeferWindowPos(2);
83 RECT rt
= {0, 0, cx
, cy
};
85 cx
= g_pChildWnd
->nSplitPos
+ SPLIT_WIDTH
/2;
86 DeferWindowPos(hdwp
, g_pChildWnd
->hTreeWnd
, 0, rt
.left
, rt
.top
, g_pChildWnd
->nSplitPos
-SPLIT_WIDTH
/2-rt
.left
, rt
.bottom
-rt
.top
, SWP_NOZORDER
|SWP_NOACTIVATE
);
87 DeferWindowPos(hdwp
, g_pChildWnd
->hListWnd
, 0, rt
.left
+cx
, rt
.top
, rt
.right
-cx
, rt
.bottom
-rt
.top
, SWP_NOZORDER
|SWP_NOACTIVATE
);
88 EndDeferWindowPos(hdwp
);
91 static void OnPaint(HWND hWnd
)
96 GetClientRect(hWnd
, &rt
);
97 BeginPaint(hWnd
, &ps
);
98 FillRect(ps
.hdc
, &rt
, GetSysColorBrush(COLOR_BTNFACE
));
102 static LPWSTR
CombinePaths(LPCWSTR pPaths
[], int nPaths
) {
105 for (i
=0, len
=0; i
<nPaths
; i
++) {
106 if (pPaths
[i
] && *pPaths
[i
]) {
107 len
+= lstrlenW(pPaths
[i
])+1;
110 combined
= heap_xalloc(len
* sizeof(WCHAR
));
112 for (i
=0, pos
=0; i
<nPaths
; i
++) {
113 if (pPaths
[i
] && *pPaths
[i
]) {
114 int llen
= lstrlenW(pPaths
[i
]);
116 lstrcpyW(combined
, pPaths
[i
]);
118 combined
[pos
++] = '\\';
119 lstrcpyW(combined
+pos
, pPaths
[i
]);
127 static LPWSTR
GetPathRoot(HWND hwndTV
, HTREEITEM hItem
, BOOL bFull
) {
128 LPCWSTR parts
[2] = {0,0};
130 HKEY hRootKey
= NULL
;
132 hItem
= (HTREEITEM
)SendMessageW(hwndTV
, TVM_GETNEXTITEM
, TVGN_CARET
, 0);
133 heap_free(GetItemPath(hwndTV
, hItem
, &hRootKey
));
134 if (!bFull
&& !hRootKey
)
137 parts
[1] = GetRootKeyName(hRootKey
);
139 DWORD dwSize
= ARRAY_SIZE(text
);
140 GetComputerNameW(text
, &dwSize
);
143 return CombinePaths(parts
, 2);
146 LPWSTR
GetItemFullPath(HWND hwndTV
, HTREEITEM hItem
, BOOL bFull
) {
149 HKEY hRootKey
= NULL
;
151 parts
[0] = GetPathRoot(hwndTV
, hItem
, bFull
);
152 parts
[1] = GetItemPath(hwndTV
, hItem
, &hRootKey
);
153 ret
= CombinePaths((LPCWSTR
*)parts
, 2);
159 static void OnTreeSelectionChanged(HWND hwndTV
, HWND hwndLV
, HTREEITEM hItem
, BOOL bRefreshLV
)
163 HKEY hRootKey
= NULL
;
166 rootitem
= (HTREEITEM
)SendMessageW(hwndTV
, TVM_GETNEXTITEM
, TVGN_ROOT
, 0);
167 if (rootitem
== hItem
)
169 SendMessageW(hwndLV
, LVM_DELETEALLITEMS
, 0, 0);
174 keyPath
= GetItemPath(hwndTV
, hItem
, &hRootKey
);
175 RefreshListView(hwndLV
, hRootKey
, keyPath
, NULL
);
181 /*******************************************************************************
182 * finish_splitbar [internal]
184 * make the splitbar invisible and resize the windows
185 * (helper for ChildWndProc)
187 static void finish_splitbar(HWND hWnd
, int x
)
191 draw_splitbar(hWnd
, last_split
);
193 GetClientRect(hWnd
, &rt
);
194 g_pChildWnd
->nSplitPos
= x
;
195 ResizeWnd(rt
.right
, rt
.bottom
);
199 /*******************************************************************************
201 * FUNCTION: _CmdWndProc(HWND, unsigned, WORD, LONG)
203 * PURPOSE: Processes WM_COMMAND messages for the main frame window.
207 static BOOL
_CmdWndProc(HWND hWnd
, UINT message
, WPARAM wParam
, LPARAM lParam
)
209 switch (LOWORD(wParam
)) {
210 /* Parse the menu selections: */
211 case ID_REGISTRY_EXIT
:
214 case ID_VIEW_REFRESH
:
215 WINE_TRACE("Is this ever called or is it just dead code?\n");
218 case ID_SWITCH_PANELS
:
219 g_pChildWnd
->nFocusPanel
= !g_pChildWnd
->nFocusPanel
;
220 SetFocus(g_pChildWnd
->nFocusPanel
? g_pChildWnd
->hListWnd
: g_pChildWnd
->hTreeWnd
);
228 /*******************************************************************************
229 * get_last_key [internal]
234 static void get_last_key(HWND hwndTV
)
237 WCHAR wszVal
[KEY_MAX_LEN
];
238 DWORD dwSize
= sizeof(wszVal
);
240 if (RegCreateKeyExW(HKEY_CURRENT_USER
, wszKeyName
, 0, NULL
, 0, KEY_READ
, NULL
, &hkey
, NULL
) == ERROR_SUCCESS
)
242 HTREEITEM selection
= NULL
;
243 if (RegQueryValueExW(hkey
, wszLastKey
, NULL
, NULL
, (LPBYTE
)wszVal
, &dwSize
) == ERROR_SUCCESS
)
245 if (lstrcmpW(wszVal
, g_pChildWnd
->szPath
))
246 selection
= FindPathInTree(hwndTV
, wszVal
);
251 selection
= (HTREEITEM
)SendMessageW(g_pChildWnd
->hTreeWnd
, TVM_GETNEXTITEM
, TVGN_ROOT
, 0);
252 SendMessageW(hwndTV
, TVM_EXPAND
, TVE_EXPAND
, (LPARAM
)selection
);
255 SendMessageW(hwndTV
, TVM_SELECTITEM
, TVGN_CARET
, (LPARAM
)selection
);
261 /*******************************************************************************
262 * set_last_key [internal]
267 static void set_last_key(HWND hwndTV
)
271 if (RegCreateKeyExW(HKEY_CURRENT_USER
, wszKeyName
, 0, NULL
, 0, KEY_WRITE
, NULL
, &hkey
, NULL
) == ERROR_SUCCESS
)
273 HTREEITEM selection
= (HTREEITEM
)SendMessageW(g_pChildWnd
->hTreeWnd
, TVM_GETNEXTITEM
, TVGN_CARET
, 0);
274 HTREEITEM root
= (HTREEITEM
)SendMessageW(g_pChildWnd
->hTreeWnd
, TVM_GETNEXTITEM
, TVGN_ROOT
, 0);
277 if (selection
== root
)
278 value
= g_pChildWnd
->szPath
;
280 value
= GetItemFullPath(g_pChildWnd
->hTreeWnd
, selection
, FALSE
);
281 RegSetValueExW(hkey
, wszLastKey
, 0, REG_SZ
, (LPBYTE
)value
, (lstrlenW(value
) + 1) * sizeof(WCHAR
));
282 if (selection
!= root
)
288 static int treeview_notify(HWND hWnd
, UINT message
, WPARAM wParam
, LPARAM lParam
)
290 switch (((NMHDR
*)lParam
)->code
)
293 g_pChildWnd
->nFocusPanel
= 0;
295 case TVN_BEGINLABELEDITW
:
300 if (!GetWindowLongPtrW(g_pChildWnd
->hTreeWnd
, GWLP_USERDATA
))
303 path
= GetItemPath(g_pChildWnd
->hTreeWnd
, 0, &hRootKey
);
308 case TVN_ENDLABELEDITW
:
311 NMTVDISPINFOW
*dispInfo
= (NMTVDISPINFOW
*)lParam
;
312 WCHAR
*path
= GetItemPath(g_pChildWnd
->hTreeWnd
, 0, &hRootKey
);
313 BOOL res
= RenameKey(hWnd
, hRootKey
, path
, dispInfo
->item
.pszText
);
321 item
.mask
= TVIF_HANDLE
| TVIF_TEXT
;
322 item
.hItem
= dispInfo
->item
.hItem
;
323 item
.pszText
= dispInfo
->item
.pszText
;
324 SendMessageW(g_pChildWnd
->hTreeWnd
, TVM_SETITEMW
, 0, (LPARAM
)&item
);
326 path
= GetItemPath(g_pChildWnd
->hTreeWnd
, 0, &hRootKey
);
327 update_listview_path(path
);
333 SetWindowLongPtrW(g_pChildWnd
->hTreeWnd
, GWLP_USERDATA
, 0);
336 case TVN_ITEMEXPANDINGW
:
337 return !OnTreeExpanding(g_pChildWnd
->hTreeWnd
, (NMTREEVIEWW
*)lParam
);
338 case TVN_SELCHANGEDW
:
339 OnTreeSelectionChanged(g_pChildWnd
->hTreeWnd
, g_pChildWnd
->hListWnd
,
340 ((NMTREEVIEWW
*)lParam
)->itemNew
.hItem
, TRUE
);
346 static int listview_notify(HWND hWnd
, UINT message
, WPARAM wParam
, LPARAM lParam
)
348 switch (((NMHDR
*)lParam
)->code
)
352 NMITEMACTIVATE
*nmitem
= (NMITEMACTIVATE
*)lParam
;
354 if (nmitem
->iItem
!= -1)
359 item
.stateMask
= LVIS_FOCUSED
| LVIS_SELECTED
;
360 SendMessageW(g_pChildWnd
->hListWnd
, LVM_SETITEMSTATE
, (UINT
)-1, (LPARAM
)&item
);
362 item
.state
= LVIS_FOCUSED
| LVIS_SELECTED
;
363 item
.stateMask
= LVIS_FOCUSED
| LVIS_SELECTED
;
364 SendMessageW(g_pChildWnd
->hListWnd
, LVM_SETITEMSTATE
, nmitem
->iItem
, (LPARAM
)&item
);
366 SendMessageW(hFrameWnd
, WM_COMMAND
, ID_EDIT_MODIFY
, 0);
372 int cnt
= SendMessageW(g_pChildWnd
->hListWnd
, LVM_GETNEXTITEM
, -1,
373 MAKELPARAM(LVNI_FOCUSED
| LVNI_SELECTED
, 0));
375 SendMessageW(hFrameWnd
, WM_COMMAND
, ID_EDIT_MODIFY
, 0);
379 g_pChildWnd
->nFocusPanel
= 1;
381 case LVN_BEGINLABELEDITW
:
382 if (!((NMLVDISPINFOW
*)lParam
)->item
.iItem
)
385 case LVN_COLUMNCLICK
:
386 if (g_columnToSort
== ((NMLISTVIEW
*)lParam
)->iSubItem
)
387 g_invertSort
= !g_invertSort
;
390 g_columnToSort
= ((NMLISTVIEW
*)lParam
)->iSubItem
;
391 g_invertSort
= FALSE
;
394 SendMessageW(g_pChildWnd
->hListWnd
, LVM_SORTITEMS
,
395 (WPARAM
)g_pChildWnd
->hListWnd
, (LPARAM
)CompareFunc
);
399 NMLISTVIEW
*nmlv
= (NMLISTVIEW
*)lParam
;
400 LINE_INFO
*info
= (LINE_INFO
*)nmlv
->lParam
;
402 heap_free(info
->name
);
403 heap_free(info
->val
);
407 case LVN_ENDLABELEDITW
:
409 NMLVDISPINFOW
*dispInfo
= (NMLVDISPINFOW
*)lParam
;
410 WCHAR
*oldName
= GetItemText(g_pChildWnd
->hListWnd
, dispInfo
->item
.iItem
);
413 if (!oldName
) return -1; /* cannot rename a default value */
414 ret
= RenameValue(g_pChildWnd
->hListWnd
, g_currentRootKey
, g_currentPath
,
415 oldName
, dispInfo
->item
.pszText
);
418 dispInfo
->item
.iSubItem
= 0;
419 SendMessageW(g_pChildWnd
->hListWnd
, LVM_SETITEMTEXTW
,
420 dispInfo
->item
.iItem
, (LPARAM
)&dispInfo
->item
);
426 case LVN_GETDISPINFOW
:
427 OnGetDispInfo((NMLVDISPINFOW
*)lParam
);
433 #define GET_X_LPARAM(lp) ((int)(short)LOWORD(lp))
434 #define GET_Y_LPARAM(lp) ((int)(short)HIWORD(lp))
436 /*******************************************************************************
438 * FUNCTION: ChildWndProc(HWND, unsigned, WORD, LONG)
440 * PURPOSE: Processes messages for the child windows.
442 * WM_COMMAND - process the application menu
443 * WM_PAINT - Paint the main window
444 * WM_DESTROY - post a quit message and return
447 LRESULT CALLBACK
ChildWndProc(HWND hWnd
, UINT message
, WPARAM wParam
, LPARAM lParam
)
451 g_pChildWnd
= heap_xalloc(sizeof(ChildWnd
));
452 if (!g_pChildWnd
) return 0;
453 LoadStringW(hInst
, IDS_REGISTRY_ROOT_NAME
, g_pChildWnd
->szPath
, MAX_PATH
);
454 g_pChildWnd
->nSplitPos
= 250;
455 g_pChildWnd
->hWnd
= hWnd
;
456 g_pChildWnd
->hTreeWnd
= CreateTreeView(hWnd
, g_pChildWnd
->szPath
, TREE_WINDOW
);
457 g_pChildWnd
->hListWnd
= CreateListView(hWnd
, LIST_WINDOW
/*, g_pChildWnd->szPath*/);
458 g_pChildWnd
->nFocusPanel
= 1;
459 SetFocus(g_pChildWnd
->hTreeWnd
);
460 get_last_key(g_pChildWnd
->hTreeWnd
);
463 if (!_CmdWndProc(hWnd
, message
, wParam
, lParam
)) {
471 if (LOWORD(lParam
) == HTCLIENT
) {
474 ScreenToClient(hWnd
, &pt
);
475 if (pt
.x
>=g_pChildWnd
->nSplitPos
-SPLIT_WIDTH
/2 && pt
.x
<g_pChildWnd
->nSplitPos
+SPLIT_WIDTH
/2+1) {
476 SetCursor(LoadCursorW(0, (LPCWSTR
)IDC_SIZEWE
));
482 set_last_key(g_pChildWnd
->hTreeWnd
);
483 heap_free(g_pChildWnd
);
487 case WM_LBUTTONDOWN
: {
489 int x
= (short)LOWORD(lParam
);
490 GetClientRect(hWnd
, &rt
);
491 if (x
>=g_pChildWnd
->nSplitPos
-SPLIT_WIDTH
/2 && x
<g_pChildWnd
->nSplitPos
+SPLIT_WIDTH
/2+1) {
492 last_split
= g_pChildWnd
->nSplitPos
;
493 draw_splitbar(hWnd
, last_split
);
499 /* WM_RBUTTONDOWN sets the splitbar the same way as WM_LBUTTONUP */
502 if (GetCapture() == hWnd
) {
503 finish_splitbar(hWnd
, LOWORD(lParam
));
507 case WM_CAPTURECHANGED
:
508 if (GetCapture()==hWnd
&& last_split
>=0)
509 draw_splitbar(hWnd
, last_split
);
514 POINT pt
= {GET_X_LPARAM(lParam
), GET_Y_LPARAM(lParam
)};
515 short int menu_id
= -1;
517 if ((HWND
)wParam
== g_pChildWnd
->hTreeWnd
)
522 ScreenToClient(g_pChildWnd
->hTreeWnd
, &ht
.pt
);
524 if (SendMessageW(g_pChildWnd
->hTreeWnd
, TVM_HITTEST
, 0, (LPARAM
)&ht
))
528 SendMessageW(g_pChildWnd
->hTreeWnd
, TVM_SELECTITEM
, TVGN_CARET
, (LPARAM
)ht
.hItem
);
529 root
= (HTREEITEM
)SendMessageW(g_pChildWnd
->hTreeWnd
, TVM_GETNEXTITEM
, TVGN_ROOT
, 0);
530 menu_id
= (ht
.hItem
== root
) ? PM_COMPUTER
: PM_TREEVIEW
;
535 int sel
= SendMessageW(g_pChildWnd
->hListWnd
, LVM_GETNEXTITEM
, -1,
536 MAKELPARAM(LVNI_SELECTED
, 0));
537 menu_id
= (sel
== -1) ? PM_NEW_VALUE
: PM_MODIFY_VALUE
;
540 TrackPopupMenu(GetSubMenu(hPopupMenus
, menu_id
), TPM_RIGHTBUTTON
,
541 pt
.x
, pt
.y
, 0, hFrameWnd
, NULL
);
546 if (wParam
== VK_ESCAPE
)
547 if (GetCapture() == hWnd
) {
549 draw_splitbar(hWnd
, last_split
);
550 GetClientRect(hWnd
, &rt
);
551 ResizeWnd(rt
.right
, rt
.bottom
);
554 SetCursor(LoadCursorW(0, (LPCWSTR
)IDC_ARROW
));
559 if (GetCapture() == hWnd
) {
561 int x
= LOWORD(lParam
);
562 HDC hdc
= GetDC(hWnd
);
563 GetClientRect(hWnd
, &rt
);
564 rt
.left
= last_split
-SPLIT_WIDTH
/2;
565 rt
.right
= last_split
+SPLIT_WIDTH
/2+1;
566 InvertRect(hdc
, &rt
);
568 rt
.left
= x
-SPLIT_WIDTH
/2;
569 rt
.right
= x
+SPLIT_WIDTH
/2+1;
570 InvertRect(hdc
, &rt
);
571 ReleaseDC(hWnd
, hdc
);
576 if (g_pChildWnd
!= NULL
) {
577 SetFocus(g_pChildWnd
->nFocusPanel
? g_pChildWnd
->hListWnd
: g_pChildWnd
->hTreeWnd
);
585 if (wParam
== TREE_WINDOW
&& g_pChildWnd
)
586 return treeview_notify(hWnd
, message
, wParam
, lParam
);
587 else if (wParam
== LIST_WINDOW
&& g_pChildWnd
)
588 return listview_notify(hWnd
, message
, wParam
, lParam
);
592 if (wParam
!= SIZE_MINIMIZED
&& g_pChildWnd
!= NULL
) {
593 ResizeWnd(LOWORD(lParam
), HIWORD(lParam
));
597 return DefWindowProcW(hWnd
, message
, wParam
, lParam
);