[PSDK]
[reactos.git] / reactos / dll / win32 / comdlg32 / finddlg32.c
1 /*
2 * Common Dialog Boxes interface (32 bit)
3 * Find/Replace
4 *
5 * Copyright 1998,1999 Bertho A. Stultiens
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 #include <stdarg.h>
23 #include <string.h>
24 #include "windef.h"
25 #include "winbase.h"
26 #include "winnls.h"
27 #include "wingdi.h"
28 #include "winuser.h"
29 #include "commdlg.h"
30 #include "cderr.h"
31 #include "dlgs.h"
32 #include "wine/debug.h"
33
34 WINE_DEFAULT_DEBUG_CHANNEL(commdlg);
35
36 #include "cdlg.h"
37
38
39 /*-----------------------------------------------------------------------*/
40
41 static UINT FindReplaceMessage;
42 static UINT HelpMessage;
43
44 #define FR_MASK (FR_DOWN | FR_MATCHCASE | FR_WHOLEWORD | FR_REPLACEALL | FR_REPLACE | FR_FINDNEXT | FR_DIALOGTERM)
45 /* CRITICAL_SECTION COMDLG32_CritSect; */
46
47 /* Notes:
48 * MS uses a critical section at a few locations. However, I fail to
49 * see the reason for this. Their comdlg32.dll has a few race conditions
50 * but _not_ at those places that are protected with the mutex (there are
51 * globals that seem to hold info for the wndproc).
52 *
53 * FindText[AW]/ReplaceText[AW]
54 * The find/replace calls are passed a structure that is _not_ used
55 * internally. There is a local copy that holds the running info to
56 * be able to combine xxxA and xxxW calls. The passed pointer is
57 * returned upon sendmessage. Apps won't break this way when they rely
58 * on the original pointer. This will work as long as the sizes of
59 * FINDREPLACEA == FINDREPLACEW. The local copy will also prevent
60 * the app to see the wine-specific extra flags to distinguish between
61 * A/W and Find/Replace.
62 */
63
64
65 /***********************************************************************
66 * COMDLG32_FR_GetFlags [internal]
67 * Returns the button state that needs to be reported to the caller.
68 * RETURNS
69 * Current state of check and radio buttons
70 */
71 static DWORD COMDLG32_FR_GetFlags(HWND hDlgWnd)
72 {
73 DWORD flags = 0;
74 if(IsDlgButtonChecked(hDlgWnd, rad2) == BST_CHECKED)
75 flags |= FR_DOWN;
76 if(IsDlgButtonChecked(hDlgWnd, chx1) == BST_CHECKED)
77 flags |= FR_WHOLEWORD;
78 if(IsDlgButtonChecked(hDlgWnd, chx2) == BST_CHECKED)
79 flags |= FR_MATCHCASE;
80 return flags;
81 }
82
83 /***********************************************************************
84 * COMDLG32_FR_HandleWMCommand [internal]
85 * Handle WM_COMMAND messages...
86 */
87 static void COMDLG32_FR_HandleWMCommand(HWND hDlgWnd, COMDLG32_FR_Data *pData, int Id, int NotifyCode)
88 {
89 DWORD flag;
90
91 pData->user_fr.fra->Flags &= ~FR_MASK; /* Clear return flags */
92 if(pData->fr.Flags & FR_WINE_REPLACE) /* Replace always goes down... */
93 pData->user_fr.fra->Flags |= FR_DOWN;
94
95 if(NotifyCode == BN_CLICKED)
96 {
97 switch(Id)
98 {
99 case IDOK: /* Find Next */
100 if(GetDlgItemTextA(hDlgWnd, edt1, pData->fr.lpstrFindWhat, pData->fr.wFindWhatLen) > 0)
101 {
102 pData->user_fr.fra->Flags |= COMDLG32_FR_GetFlags(hDlgWnd) | FR_FINDNEXT;
103 if(pData->fr.Flags & FR_WINE_UNICODE)
104 {
105 MultiByteToWideChar( CP_ACP, 0, pData->fr.lpstrFindWhat, -1,
106 pData->user_fr.frw->lpstrFindWhat,
107 0x7fffffff );
108 }
109 else
110 {
111 strcpy(pData->user_fr.fra->lpstrFindWhat, pData->fr.lpstrFindWhat);
112 }
113 SendMessageA(pData->fr.hwndOwner, FindReplaceMessage, 0, (LPARAM)pData->user_fr.fra);
114 }
115 break;
116
117 case IDCANCEL:
118 pData->user_fr.fra->Flags |= COMDLG32_FR_GetFlags(hDlgWnd) | FR_DIALOGTERM;
119 SendMessageA(pData->fr.hwndOwner, FindReplaceMessage, 0, (LPARAM)pData->user_fr.fra);
120 DestroyWindow(hDlgWnd);
121 break;
122
123 case psh2: /* Replace All */
124 flag = FR_REPLACEALL;
125 goto Replace;
126
127 case psh1: /* Replace */
128 flag = FR_REPLACE;
129 Replace:
130 if((pData->fr.Flags & FR_WINE_REPLACE)
131 && GetDlgItemTextA(hDlgWnd, edt1, pData->fr.lpstrFindWhat, pData->fr.wFindWhatLen) > 0)
132 {
133 pData->fr.lpstrReplaceWith[0] = 0; /* In case the next GetDlgItemText Fails */
134 GetDlgItemTextA(hDlgWnd, edt2, pData->fr.lpstrReplaceWith, pData->fr.wReplaceWithLen);
135 pData->user_fr.fra->Flags |= COMDLG32_FR_GetFlags(hDlgWnd) | flag;
136 if(pData->fr.Flags & FR_WINE_UNICODE)
137 {
138 MultiByteToWideChar( CP_ACP, 0, pData->fr.lpstrFindWhat, -1,
139 pData->user_fr.frw->lpstrFindWhat,
140 0x7fffffff );
141 MultiByteToWideChar( CP_ACP, 0, pData->fr.lpstrReplaceWith, -1,
142 pData->user_fr.frw->lpstrReplaceWith,
143 0x7fffffff );
144 }
145 else
146 {
147 strcpy(pData->user_fr.fra->lpstrFindWhat, pData->fr.lpstrFindWhat);
148 strcpy(pData->user_fr.fra->lpstrReplaceWith, pData->fr.lpstrReplaceWith);
149 }
150 SendMessageA(pData->fr.hwndOwner, FindReplaceMessage, 0, (LPARAM)pData->user_fr.fra);
151 }
152 break;
153
154 case pshHelp:
155 pData->user_fr.fra->Flags |= COMDLG32_FR_GetFlags(hDlgWnd);
156 SendMessageA(pData->fr.hwndOwner, HelpMessage, (WPARAM)hDlgWnd, (LPARAM)pData->user_fr.fra);
157 break;
158 }
159 }
160 else if(NotifyCode == EN_CHANGE && Id == edt1)
161 {
162 BOOL enable = SendDlgItemMessageA(hDlgWnd, edt1, WM_GETTEXTLENGTH, 0, 0) > 0;
163 EnableWindow(GetDlgItem(hDlgWnd, IDOK), enable);
164 if(pData->fr.Flags & FR_WINE_REPLACE)
165 {
166 EnableWindow(GetDlgItem(hDlgWnd, psh1), enable);
167 EnableWindow(GetDlgItem(hDlgWnd, psh2), enable);
168 }
169 }
170 }
171
172 /***********************************************************************
173 * COMDLG32_FindReplaceDlgProc [internal]
174 * [Find/Replace]Text32[A/W] window procedure.
175 */
176 static INT_PTR CALLBACK COMDLG32_FindReplaceDlgProc(HWND hDlgWnd, UINT iMsg, WPARAM wParam, LPARAM lParam)
177 {
178 COMDLG32_FR_Data *pdata = GetPropA(hDlgWnd, (LPSTR)COMDLG32_Atom);
179 INT_PTR retval = TRUE;
180
181 if(iMsg == WM_INITDIALOG)
182 {
183 pdata = (COMDLG32_FR_Data *)lParam;
184 if(!SetPropA(hDlgWnd, (LPSTR)COMDLG32_Atom, (HANDLE)pdata))
185 {
186 ERR("Could not Set prop; invent a gracefull exit?...\n");
187 DestroyWindow(hDlgWnd);
188 return FALSE;
189 }
190 SendDlgItemMessageA(hDlgWnd, edt1, EM_SETLIMITTEXT, (WPARAM)pdata->fr.wFindWhatLen, 0);
191 SendDlgItemMessageA(hDlgWnd, edt1, WM_SETTEXT, 0, (LPARAM)pdata->fr.lpstrFindWhat);
192 if(pdata->fr.Flags & FR_WINE_REPLACE)
193 {
194 SendDlgItemMessageA(hDlgWnd, edt2, EM_SETLIMITTEXT, (WPARAM)pdata->fr.wReplaceWithLen, 0);
195 SendDlgItemMessageA(hDlgWnd, edt2, WM_SETTEXT, 0, (LPARAM)pdata->fr.lpstrReplaceWith);
196 }
197
198 if(!(pdata->fr.Flags & FR_SHOWHELP))
199 ShowWindow(GetDlgItem(hDlgWnd, pshHelp), SW_HIDE);
200 if(pdata->fr.Flags & FR_HIDEUPDOWN)
201 {
202 ShowWindow(GetDlgItem(hDlgWnd, rad1), SW_HIDE);
203 ShowWindow(GetDlgItem(hDlgWnd, rad2), SW_HIDE);
204 ShowWindow(GetDlgItem(hDlgWnd, grp1), SW_HIDE);
205 }
206 else if(pdata->fr.Flags & FR_NOUPDOWN)
207 {
208 EnableWindow(GetDlgItem(hDlgWnd, rad1), FALSE);
209 EnableWindow(GetDlgItem(hDlgWnd, rad2), FALSE);
210 EnableWindow(GetDlgItem(hDlgWnd, grp1), FALSE);
211 }
212 else
213 {
214 SendDlgItemMessageA(hDlgWnd, rad1, BM_SETCHECK, pdata->fr.Flags & FR_DOWN ? 0 : BST_CHECKED, 0);
215 SendDlgItemMessageA(hDlgWnd, rad2, BM_SETCHECK, pdata->fr.Flags & FR_DOWN ? BST_CHECKED : 0, 0);
216 }
217
218 if(pdata->fr.Flags & FR_HIDEMATCHCASE)
219 ShowWindow(GetDlgItem(hDlgWnd, chx2), SW_HIDE);
220 else if(pdata->fr.Flags & FR_NOMATCHCASE)
221 EnableWindow(GetDlgItem(hDlgWnd, chx2), FALSE);
222 else
223 SendDlgItemMessageA(hDlgWnd, chx2, BM_SETCHECK, pdata->fr.Flags & FR_MATCHCASE ? BST_CHECKED : 0, 0);
224
225 if(pdata->fr.Flags & FR_HIDEWHOLEWORD)
226 ShowWindow(GetDlgItem(hDlgWnd, chx1), SW_HIDE);
227 else if(pdata->fr.Flags & FR_NOWHOLEWORD)
228 EnableWindow(GetDlgItem(hDlgWnd, chx1), FALSE);
229 else
230 SendDlgItemMessageA(hDlgWnd, chx1, BM_SETCHECK, pdata->fr.Flags & FR_WHOLEWORD ? BST_CHECKED : 0, 0);
231
232 /* We did the init here, now call the hook if requested */
233
234 /* We do not do ShowWindow if hook exists and is FALSE */
235 /* per MSDN Article Q96135 */
236 if((pdata->fr.Flags & FR_ENABLEHOOK)
237 && ! pdata->fr.lpfnHook(hDlgWnd, iMsg, wParam, (LPARAM) &pdata->fr))
238 return TRUE;
239 ShowWindow(hDlgWnd, SW_SHOWNORMAL);
240 UpdateWindow(hDlgWnd);
241 return TRUE;
242 }
243
244 if(pdata && (pdata->fr.Flags & FR_ENABLEHOOK))
245 {
246 retval = pdata->fr.lpfnHook(hDlgWnd, iMsg, wParam, lParam);
247 }
248 else
249 retval = FALSE;
250
251 if(pdata && !retval)
252 {
253 retval = TRUE;
254 switch(iMsg)
255 {
256 case WM_COMMAND:
257 COMDLG32_FR_HandleWMCommand(hDlgWnd, pdata, LOWORD(wParam), HIWORD(wParam));
258 break;
259
260 case WM_CLOSE:
261 COMDLG32_FR_HandleWMCommand(hDlgWnd, pdata, IDCANCEL, BN_CLICKED);
262 break;
263
264 case WM_HELP:
265 /* Heeeeelp! */
266 FIXME("Got WM_HELP. Who is gonna supply it?\n");
267 break;
268
269 case WM_CONTEXTMENU:
270 /* Heeeeelp! */
271 FIXME("Got WM_CONTEXTMENU. Who is gonna supply it?\n");
272 break;
273 /* FIXME: Handle F1 help */
274
275 default:
276 retval = FALSE; /* We did not handle the message */
277 }
278 }
279
280 /* WM_DESTROY is a special case.
281 * We need to ensure that the allocated memory is freed just before
282 * the dialog is killed. We also need to remove the added prop.
283 */
284 if(iMsg == WM_DESTROY)
285 {
286 RemovePropA(hDlgWnd, (LPSTR)COMDLG32_Atom);
287 HeapFree(GetProcessHeap(), 0, pdata);
288 }
289
290 return retval;
291 }
292
293 /***********************************************************************
294 * COMDLG32_FR_CheckPartial [internal]
295 * Check various fault conditions in the supplied parameters that
296 * cause an extended error to be reported.
297 * RETURNS
298 * TRUE: Success
299 * FALSE: Failure
300 */
301 static BOOL COMDLG32_FR_CheckPartial(
302 const FINDREPLACEA *pfr, /* [in] Find structure */
303 BOOL Replace /* [in] True if called as replace */
304 ) {
305 if(!pfr)
306 {
307 COMDLG32_SetCommDlgExtendedError(CDERR_GENERALCODES);
308 return FALSE;
309 }
310
311 if(pfr->lStructSize != sizeof(FINDREPLACEA))
312 {
313 COMDLG32_SetCommDlgExtendedError(CDERR_STRUCTSIZE);
314 return FALSE;
315 }
316
317 if(!IsWindow(pfr->hwndOwner))
318 {
319 COMDLG32_SetCommDlgExtendedError(CDERR_DIALOGFAILURE);
320 return FALSE;
321 }
322
323 if((pfr->wFindWhatLen < 1 || !pfr->lpstrFindWhat)
324 ||(Replace && (pfr->wReplaceWithLen < 1 || !pfr->lpstrReplaceWith)))
325 {
326 COMDLG32_SetCommDlgExtendedError(FRERR_BUFFERLENGTHZERO);
327 return FALSE;
328 }
329
330 if((FindReplaceMessage = RegisterWindowMessageA(FINDMSGSTRINGA)) == 0)
331 {
332 COMDLG32_SetCommDlgExtendedError(CDERR_REGISTERMSGFAIL);
333 return FALSE;
334 }
335 if((HelpMessage = RegisterWindowMessageA(HELPMSGSTRINGA)) == 0)
336 {
337 COMDLG32_SetCommDlgExtendedError(CDERR_REGISTERMSGFAIL);
338 return FALSE;
339 }
340
341 if((pfr->Flags & FR_ENABLEHOOK) && !pfr->lpfnHook)
342 {
343 COMDLG32_SetCommDlgExtendedError(CDERR_NOHOOK);
344 return FALSE;
345 }
346
347 if((pfr->Flags & (FR_ENABLETEMPLATE | FR_ENABLETEMPLATEHANDLE)) && !pfr->hInstance)
348 {
349 COMDLG32_SetCommDlgExtendedError(CDERR_NOHINSTANCE);
350 return FALSE;
351 }
352
353 if((pfr->Flags & FR_ENABLETEMPLATE) && !pfr->lpTemplateName)
354 {
355 COMDLG32_SetCommDlgExtendedError(CDERR_NOTEMPLATE);
356 return FALSE;
357 }
358
359 return TRUE;
360 }
361
362 /***********************************************************************
363 * COMDLG32_FR_DoFindReplace [internal]
364 * Actual load and creation of the Find/Replace dialog.
365 * RETURNS
366 * Window handle to created dialog:Success
367 * NULL:Failure
368 */
369 static HWND COMDLG32_FR_DoFindReplace(
370 COMDLG32_FR_Data *pdata /* [in] Internal data structure */
371 ) {
372 HWND hdlgwnd = 0;
373 HGLOBAL loadrc;
374 DWORD error;
375 LPDLGTEMPLATEW rcs;
376
377 TRACE("hInst=%p, Flags=%08x\n", pdata->fr.hInstance, pdata->fr.Flags);
378
379 if(!(pdata->fr.Flags & FR_ENABLETEMPLATEHANDLE))
380 {
381 HMODULE hmod = COMDLG32_hInstance;
382 HRSRC htemplate;
383 if(pdata->fr.Flags & FR_ENABLETEMPLATE)
384 {
385 hmod = pdata->fr.hInstance;
386 if(pdata->fr.Flags & FR_WINE_UNICODE)
387 {
388 htemplate = FindResourceW(hmod, (LPCWSTR)pdata->fr.lpTemplateName, (LPWSTR)RT_DIALOG);
389 }
390 else
391 {
392 htemplate = FindResourceA(hmod, pdata->fr.lpTemplateName, (LPCSTR)RT_DIALOG);
393 }
394 }
395 else
396 {
397 int rcid = pdata->fr.Flags & FR_WINE_REPLACE ? REPLACEDLGORD
398 : FINDDLGORD;
399 htemplate = FindResourceA(hmod, MAKEINTRESOURCEA(rcid), (LPCSTR)RT_DIALOG);
400 }
401 if(!htemplate)
402 {
403 error = CDERR_FINDRESFAILURE;
404 goto cleanup;
405 }
406
407 loadrc = LoadResource(hmod, htemplate);
408 }
409 else
410 {
411 loadrc = pdata->fr.hInstance;
412 }
413
414 if(!loadrc)
415 {
416 error = CDERR_LOADRESFAILURE;
417 goto cleanup;
418 }
419
420 if((rcs = LockResource(loadrc)) == NULL)
421 {
422 error = CDERR_LOCKRESFAILURE;
423 goto cleanup;
424 }
425
426 hdlgwnd = CreateDialogIndirectParamA(COMDLG32_hInstance,
427 rcs,
428 pdata->fr.hwndOwner,
429 COMDLG32_FindReplaceDlgProc,
430 (LPARAM)pdata);
431 if(!hdlgwnd)
432 {
433 error = CDERR_DIALOGFAILURE;
434 cleanup:
435 COMDLG32_SetCommDlgExtendedError(error);
436 HeapFree(GetProcessHeap(), 0, pdata);
437 }
438 return hdlgwnd;
439 }
440
441 /***********************************************************************
442 * FindTextA [COMDLG32.@]
443 *
444 * See FindTextW.
445 */
446 HWND WINAPI FindTextA(
447 LPFINDREPLACEA pfr /* [in] Find/replace structure*/
448 ) {
449 COMDLG32_FR_Data *pdata;
450
451 TRACE("LPFINDREPLACE=%p\n", pfr);
452
453 if(!COMDLG32_FR_CheckPartial(pfr, FALSE))
454 return 0;
455
456 if((pdata = COMDLG32_AllocMem(sizeof(COMDLG32_FR_Data))) == NULL)
457 return 0; /* Error has been set */
458
459 pdata->user_fr.fra = pfr;
460 pdata->fr = *pfr;
461 return COMDLG32_FR_DoFindReplace(pdata);
462 }
463
464 /***********************************************************************
465 * ReplaceTextA [COMDLG32.@]
466 *
467 * See ReplaceTextW.
468 */
469 HWND WINAPI ReplaceTextA(
470 LPFINDREPLACEA pfr /* [in] Find/replace structure*/
471 ) {
472 COMDLG32_FR_Data *pdata;
473
474 TRACE("LPFINDREPLACE=%p\n", pfr);
475
476 if(!COMDLG32_FR_CheckPartial(pfr, TRUE))
477 return 0;
478
479 if((pdata = COMDLG32_AllocMem(sizeof(COMDLG32_FR_Data))) == NULL)
480 return 0; /* Error has been set */
481
482 pdata->user_fr.fra = pfr;
483 pdata->fr = *pfr;
484 pdata->fr.Flags |= FR_WINE_REPLACE;
485 return COMDLG32_FR_DoFindReplace(pdata);
486 }
487
488 /***********************************************************************
489 * FindTextW [COMDLG32.@]
490 *
491 * Create a modeless find-text dialog box.
492 *
493 * RETURNS
494 * Window handle to created dialog: Success
495 * NULL: Failure
496 */
497 HWND WINAPI FindTextW(
498 LPFINDREPLACEW pfr /* [in] Find/replace structure*/
499 ) {
500 COMDLG32_FR_Data *pdata;
501 DWORD len;
502
503 TRACE("LPFINDREPLACE=%p\n", pfr);
504
505 if(!COMDLG32_FR_CheckPartial((LPFINDREPLACEA)pfr, FALSE))
506 return 0;
507
508 len = WideCharToMultiByte( CP_ACP, 0, pfr->lpstrFindWhat, pfr->wFindWhatLen,
509 NULL, 0, NULL, NULL );
510 if((pdata = COMDLG32_AllocMem(sizeof(COMDLG32_FR_Data) + len)) == NULL)
511 return 0; /* Error has been set */
512
513 pdata->user_fr.frw = pfr;
514 pdata->fr = *(LPFINDREPLACEA)pfr; /* FINDREPLACEx have same size */
515 pdata->fr.Flags |= FR_WINE_UNICODE;
516 pdata->fr.lpstrFindWhat = (LPSTR)(pdata + 1); /* Set string pointer */
517 WideCharToMultiByte( CP_ACP, 0, pfr->lpstrFindWhat, pfr->wFindWhatLen,
518 pdata->fr.lpstrFindWhat, len, NULL, NULL );
519 return COMDLG32_FR_DoFindReplace(pdata);
520 }
521
522 /***********************************************************************
523 * ReplaceTextW [COMDLG32.@]
524 *
525 * Create a modeless replace-text dialog box.
526 *
527 * RETURNS
528 * Window handle to created dialog: Success
529 * NULL: Failure
530 */
531 HWND WINAPI ReplaceTextW(
532 LPFINDREPLACEW pfr /* [in] Find/replace structure*/
533 ) {
534 COMDLG32_FR_Data *pdata;
535 DWORD len1, len2;
536
537 TRACE("LPFINDREPLACE=%p\n", pfr);
538
539 if(!COMDLG32_FR_CheckPartial((LPFINDREPLACEA)pfr, FALSE))
540 return 0;
541
542 len1 = WideCharToMultiByte( CP_ACP, 0, pfr->lpstrFindWhat, pfr->wFindWhatLen,
543 NULL, 0, NULL, NULL );
544 len2 = WideCharToMultiByte( CP_ACP, 0, pfr->lpstrReplaceWith, pfr->wReplaceWithLen,
545 NULL, 0, NULL, NULL );
546 if((pdata = COMDLG32_AllocMem(sizeof(COMDLG32_FR_Data) + len1 + len2)) == NULL)
547 return 0; /* Error has been set */
548
549 pdata->user_fr.frw = pfr;
550 pdata->fr = *(LPFINDREPLACEA)pfr; /* FINDREPLACEx have same size */
551 pdata->fr.Flags |= FR_WINE_REPLACE | FR_WINE_UNICODE;
552 pdata->fr.lpstrFindWhat = (LPSTR)(pdata + 1); /* Set string pointer */
553 pdata->fr.lpstrReplaceWith = pdata->fr.lpstrFindWhat + len1;
554
555 WideCharToMultiByte( CP_ACP, 0, pfr->lpstrFindWhat, pfr->wFindWhatLen,
556 pdata->fr.lpstrFindWhat, len1, NULL, NULL );
557 WideCharToMultiByte( CP_ACP, 0, pfr->lpstrReplaceWith, pfr->wReplaceWithLen,
558 pdata->fr.lpstrReplaceWith, len2, NULL, NULL );
559 return COMDLG32_FR_DoFindReplace(pdata);
560 }