- Support control panel applications that provide more than one control panel.
[reactos.git] / reactos / lib / cpl / control / control.c
1 /*
2 * ReactOS
3 * Copyright (C) 2004 ReactOS Team
4 * Copyright (C) 2004 GkWare e.K.
5 *
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
10 *
11 * This program 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
14 * GNU General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
19 */
20 /* $Id: control.c,v 1.6 2004/10/29 12:27:58 ekohl Exp $
21 *
22 * PROJECT: ReactOS System Control Panel
23 * FILE: lib/cpl/system/control.c
24 * PURPOSE: ReactOS System Control Panel
25 * PROGRAMMER: Gero Kuehn (reactos.filter@gkware.com)
26 * UPDATE HISTORY:
27 * 06-13-2004 Created
28 */
29 #include <windows.h>
30 #include <commctrl.h>
31 #include <cpl.h>
32
33 #include <stdlib.h>
34 #include <stdio.h>
35 #include <stdarg.h>
36 #include <tchar.h>
37
38 #include "resource.h"
39
40 //#define CONTROL_DEBUG_ENABLE
41
42 #ifdef CONTROL_DEBUG_ENABLE
43 #define CTL_DEBUG(x) dbgprint x
44 #else
45 #define CTL_DEBUG(x)
46 #endif
47
48 #define MYWNDCLASS _T("CTLPANELCLASS")
49
50 typedef LONG (CALLBACK *CPLAPPLETFUNC)(HWND hwndCPL, UINT uMsg, LPARAM lParam1, LPARAM lParam2);
51
52 typedef struct CPLLISTENTRY
53 {
54 TCHAR pszPath[MAX_PATH];
55 HMODULE hDll;
56 CPLAPPLETFUNC pFunc;
57 CPLINFO CplInfo;
58 int nIndex;
59 } CPLLISTENTRY, *PCPLLISTENTRY;
60
61
62 HWND hListView;
63 HINSTANCE hInst;
64 HWND hMainWnd;
65 DEVMODE pDevMode;
66
67 VOID dbgprint(TCHAR *format,...)
68 {
69 TCHAR buf[1000];
70 va_list va;
71
72 va_start(va,format);
73 _vstprintf(buf,format,va);
74 OutputDebugString(buf);
75 va_end(va);
76 }
77
78 VOID PopulateCPLList(HWND hLisCtrl)
79 {
80 WIN32_FIND_DATA fd;
81 HANDLE hFind;
82 TCHAR pszSearchPath[MAX_PATH];
83 HIMAGELIST hImgListSmall;
84 HIMAGELIST hImgListLarge;
85 int ColorDepth;
86 HMODULE hDll;
87 CPLAPPLETFUNC pFunc;
88 TCHAR pszPath[MAX_PATH];
89
90 /* Icon drawing mode */
91 pDevMode.dmSize = sizeof(DEVMODE);
92 pDevMode.dmDriverExtra = 0;
93
94 EnumDisplaySettings(NULL,ENUM_CURRENT_SETTINGS,&pDevMode);
95 switch (pDevMode.dmBitsPerPel)
96 {
97 case 32: ColorDepth = ILC_COLOR32; break;
98 case 24: ColorDepth = ILC_COLOR24; break;
99 case 16: ColorDepth = ILC_COLOR16; break;
100 case 8: ColorDepth = ILC_COLOR8; break;
101 case 4: ColorDepth = ILC_COLOR4; break;
102 default: ColorDepth = ILC_COLOR; break;
103 }
104
105 hImgListSmall = ImageList_Create(16,16,ColorDepth | ILC_MASK,5,5);
106 hImgListLarge = ImageList_Create(32,32,ColorDepth | ILC_MASK,5,5);
107
108 GetSystemDirectory(pszSearchPath,MAX_PATH);
109 _tcscat(pszSearchPath,_T("\\*.cpl"));
110
111 hFind = FindFirstFile(pszSearchPath,&fd);
112 while (hFind != INVALID_HANDLE_VALUE)
113 {
114 PCPLLISTENTRY pEntry;
115 CTL_DEBUG((_T("Found %s\r\n"), fd.cFileName));
116
117 _tcscpy(pszPath, pszSearchPath);
118 *_tcsrchr(pszPath, '\\')=0;
119 _tcscat(pszPath, _T("\\"));
120 _tcscat(pszPath, fd.cFileName);
121
122 hDll = LoadLibrary(pszPath);
123 CTL_DEBUG((_T("Handle %08X\r\n"), hDll));
124
125 pFunc = (CPLAPPLETFUNC)GetProcAddress(hDll, "CPlApplet");
126 CTL_DEBUG((_T("CPLFunc %08X\r\n"), pFunc));
127
128 if (pFunc && pFunc(hLisCtrl, CPL_INIT, 0, 0))
129 {
130 UINT i, uPanelCount;
131
132 uPanelCount = (UINT)pFunc(hLisCtrl, CPL_GETCOUNT, 0, 0);
133 for (i = 0; i < uPanelCount; i++)
134 {
135 HICON hIcon;
136 TCHAR Name[MAX_PATH];
137 int index;
138
139 pEntry = (PCPLLISTENTRY)malloc(sizeof(CPLLISTENTRY));
140 if (pEntry == NULL)
141 return;
142
143 memset(pEntry, 0, sizeof(CPLLISTENTRY));
144 pEntry->hDll = hDll;
145 pEntry->pFunc = pFunc;
146 _tcscpy(pEntry->pszPath, pszPath);
147
148 pEntry->pFunc(hLisCtrl, CPL_INQUIRE, (LPARAM)i, (LPARAM)&pEntry->CplInfo);
149 hIcon = LoadImage(pEntry->hDll,MAKEINTRESOURCE(pEntry->CplInfo.idIcon),IMAGE_ICON,16,16,LR_DEFAULTCOLOR);
150 index = ImageList_AddIcon(hImgListSmall,hIcon);
151 DestroyIcon(hIcon);
152 hIcon = LoadImage(pEntry->hDll,MAKEINTRESOURCE(pEntry->CplInfo.idIcon),IMAGE_ICON,32,32,LR_DEFAULTCOLOR);
153 ImageList_AddIcon(hImgListLarge,hIcon);
154 DestroyIcon(hIcon);
155
156 if (LoadString(pEntry->hDll, pEntry->CplInfo.idName, Name, MAX_PATH))
157 {
158 LV_ITEM lvi;
159
160 memset(&lvi,0x00,sizeof(lvi));
161 lvi.mask = LVIF_TEXT|LVIF_PARAM|LVIF_STATE|LVIF_IMAGE;
162 lvi.pszText = Name;
163 lvi.state = 0;
164 lvi.iImage = index;
165 lvi.lParam = (LPARAM)pEntry;
166 pEntry->nIndex = ListView_InsertItem(hLisCtrl,&lvi);
167
168 if (LoadString(pEntry->hDll, pEntry->CplInfo.idInfo, Name, MAX_PATH))
169 ListView_SetItemText(hLisCtrl, pEntry->nIndex, 1, Name);
170 }
171 }
172 }
173
174 if (!FindNextFile(hFind,&fd))
175 hFind = INVALID_HANDLE_VALUE;
176 }
177
178 ListView_SetImageList(hLisCtrl,hImgListSmall,LVSIL_SMALL);
179 ListView_SetImageList(hLisCtrl,hImgListLarge,LVSIL_NORMAL);
180 }
181
182 LRESULT CALLBACK MyWindowProc(HWND hWnd,UINT uMsg,WPARAM wParam,LPARAM lParam)
183 {
184 switch (uMsg)
185 {
186 case WM_CREATE:
187 {
188 RECT rect;
189 LV_COLUMN column;
190
191 GetClientRect(hWnd,&rect);
192 hListView = CreateWindow(WC_LISTVIEW,_T(""),LVS_REPORT | LVS_ALIGNLEFT | LVS_AUTOARRANGE | LVS_SINGLESEL | WS_VISIBLE | WS_CHILD | WS_TABSTOP,0,0,rect.right ,rect.bottom,hWnd,NULL,hInst,0);
193 CTL_DEBUG((_T("Listview Window %08X\r\n"),hListView));
194
195 memset(&column,0x00,sizeof(column));
196 column.mask=LVCF_FMT | LVCF_WIDTH | LVCF_SUBITEM|LVCF_TEXT;
197 column.fmt=LVCFMT_LEFT;
198 column.cx = (rect.right - rect.left) / 3;
199 column.iSubItem = 0;
200 column.pszText = _T("Name");
201 ListView_InsertColumn(hListView,0,&column);
202 column.cx = (rect.right - rect.left) - ((rect.right - rect.left) / 3) - 1;
203 column.iSubItem = 1;
204 column.pszText = _T("Comment");
205 ListView_InsertColumn(hListView,1,&column);
206 PopulateCPLList(hListView);
207 ListView_SetColumnWidth(hListView,2,LVSCW_AUTOSIZE_USEHEADER);
208 ListView_Update(hListView,0);
209
210 SetFocus(hListView);
211 }
212 break;
213
214 case WM_DESTROY:
215 PostQuitMessage(0);
216 break;
217
218 case WM_SIZE:
219 {
220 RECT rect;
221
222 GetClientRect(hWnd,&rect);
223 MoveWindow(hListView,0,0,rect.right,rect.bottom,TRUE);
224 }
225 break;
226
227 case WM_NOTIFY:
228 {
229 NMHDR *phdr;
230 phdr = (NMHDR*)lParam;
231 switch(phdr->code)
232 {
233 case NM_RETURN:
234 case NM_DBLCLK:
235 {
236 int nSelect;
237 LV_ITEM lvi;
238 PCPLLISTENTRY pEntry;
239
240 nSelect=SendMessage(hListView,LVM_GETNEXTITEM,(WPARAM)-1,LVNI_FOCUSED);
241
242 if (nSelect==-1)
243 {
244 /* no items */
245 MessageBox(hWnd,_T("No Items in ListView"),_T("Error"),MB_OK|MB_ICONINFORMATION);
246 break;
247 }
248
249 CTL_DEBUG((_T("Select %d\r\n"),nSelect));
250 memset(&lvi,0x00,sizeof(lvi));
251 lvi.iItem = nSelect;
252 lvi.mask = LVIF_PARAM;
253 ListView_GetItem(hListView,&lvi);
254 pEntry = (PCPLLISTENTRY)lvi.lParam;
255 CTL_DEBUG((_T("Listview DblClk Entry %08X\r\n"),pEntry));
256 if (pEntry)
257 {
258 CTL_DEBUG((_T("Listview DblClk Entry Func %08X\r\n"),pEntry->pFunc));
259 }
260
261 if (pEntry && pEntry->pFunc)
262 pEntry->pFunc(hListView,CPL_DBLCLK,pEntry->CplInfo.lData,0);
263 }
264 }
265 }
266 break;
267
268 case WM_COMMAND:
269 switch (LOWORD(wParam))
270 {
271 case IDM_LARGEICONS:
272 SetWindowLong(hListView,GWL_STYLE,LVS_ICON | LVS_ALIGNLEFT | LVS_AUTOARRANGE | LVS_SINGLESEL | WS_VISIBLE | WS_CHILD|WS_BORDER|WS_TABSTOP);
273 break;
274 case IDM_SMALLICONS:
275 SetWindowLong(hListView,GWL_STYLE,LVS_SMALLICON | LVS_ALIGNLEFT | LVS_AUTOARRANGE | LVS_SINGLESEL | WS_VISIBLE | WS_CHILD|WS_BORDER|WS_TABSTOP);
276 break;
277 case IDM_LIST:
278 SetWindowLong(hListView,GWL_STYLE,LVS_LIST | LVS_ALIGNLEFT | LVS_AUTOARRANGE | LVS_SINGLESEL | WS_VISIBLE | WS_CHILD|WS_BORDER|WS_TABSTOP);
279 break;
280 case IDM_DETAILS:
281 SetWindowLong(hListView,GWL_STYLE,LVS_REPORT | LVS_ALIGNLEFT | LVS_AUTOARRANGE | LVS_SINGLESEL | WS_VISIBLE | WS_CHILD|WS_BORDER|WS_TABSTOP);
282 break;
283 case IDM_CLOSE:
284 DestroyWindow(hWnd);
285 break;
286 case IDM_ABOUT:
287 MessageBox(hWnd,_T("Simple Control Panel (not Shell-namespace based)\rCopyright 2004 GkWare e.K.\rhttp://www.gkware.com\rReleased under the GPL"),_T("About the Control Panel"),MB_OK | MB_ICONINFORMATION);
288 break;
289 }
290 break;
291
292 default:
293 return DefWindowProc(hWnd,uMsg,wParam,lParam);
294 }
295
296 return 0;
297 }
298
299
300 #ifdef _MSVC
301 int WINAPI wWinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,WCHAR *lpCmdLine,int nCmdShow)
302 #else
303 int WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,char *lpCmdLine,int nCmdShow)
304 #endif
305 {
306 MSG msg;
307 WNDCLASS wc;
308
309 hInst = hInstance;
310 CTL_DEBUG((_T("My Control Panel\r\n")));
311 memset(&wc,0x00,sizeof(wc));
312 wc.hIcon = LoadIcon(hInst,MAKEINTRESOURCE(IDI_MAINICON));
313 wc.lpszClassName = MYWNDCLASS;
314 wc.lpszMenuName = _T("MAINMENU");
315 wc.lpfnWndProc = MyWindowProc;
316 RegisterClass(&wc);
317 InitCommonControls();
318 hMainWnd = CreateWindowEx(WS_EX_CLIENTEDGE,MYWNDCLASS,_T("Control Panel"),WS_OVERLAPPEDWINDOW,CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT,NULL,LoadMenu(hInst,MAKEINTRESOURCE(IDM_MAINMENU)),hInst,0);
319 if (!hMainWnd)
320 {
321 CTL_DEBUG((_T("Unable to create window\r\n")));
322 return -1;
323 }
324 ShowWindow(hMainWnd,nCmdShow);
325 while (GetMessage(&msg,0,0,0))
326 {
327 TranslateMessage(&msg);
328 DispatchMessage(&msg);
329 }
330
331 return 0;
332 }