2 * Common Dialog Boxes interface (32 bit)
5 * Copyright 1998,1999 Bertho A. Stultiens
16 #include "debugtools.h"
18 DEFAULT_DEBUG_CHANNEL(commdlg
);
23 /*-----------------------------------------------------------------------*/
25 static UINT FindReplaceMessage
;
26 static UINT HelpMessage
;
28 #define FR_MASK (FR_DOWN | FR_MATCHCASE | FR_WHOLEWORD | FR_REPLACEALL | FR_REPLACE | FR_FINDNEXT | FR_DIALOGTERM)
29 /* CRITICAL_SECTION COMDLG32_CritSect; */
32 * MS uses a critical section at a few locations. However, I fail to
33 * see the reason for this. Their comdlg32.dll has a few race conditions
34 * but _not_ at those places that are protected with the mutex (there are
35 * globals that seem to hold info for the wndproc).
37 * FindText[AW]/ReplaceText[AW]
38 * The find/replace calls are passed a structure that is _not_ used
39 * internally. There is a local copy that holds the running info to
40 * be able to combine xxxA and xxxW calls. The passed pointer is
41 * returned upon sendmessage. Apps wont break this way when they rely
42 * on the original pointer. This will work as long as the sizes of
43 * FINDREPLACEA == FINDREPLACEW. The local copy will also prevent
44 * the app to see the wine-specific extra flags to distinguish between
45 * A/W and Find/Replace.
49 /***********************************************************************
50 * COMDLG32_FR_GetFlags [internal]
51 * Returns the button state that needs to be reported to the caller.
53 * Current state of check and radio buttons
55 static DWORD
COMDLG32_FR_GetFlags(HWND hDlgWnd
)
58 if(IsDlgButtonChecked(hDlgWnd
, rad2
) == BST_CHECKED
)
60 if(IsDlgButtonChecked(hDlgWnd
, chx1
) == BST_CHECKED
)
61 flags
|= FR_WHOLEWORD
;
62 if(IsDlgButtonChecked(hDlgWnd
, chx2
) == BST_CHECKED
)
63 flags
|= FR_MATCHCASE
;
67 /***********************************************************************
68 * COMDLG32_FR_HandleWMCommand [internal]
69 * Handle WM_COMMAND messages...
71 static void COMDLG32_FR_HandleWMCommand(HWND hDlgWnd
, COMDLG32_FR_Data
*pData
, int Id
, int NotifyCode
)
75 pData
->user_fr
.fra
->Flags
&= ~FR_MASK
; /* Clear return flags */
76 if(pData
->fr
.Flags
& FR_WINE_REPLACE
) /* Replace always goes down... */
77 pData
->user_fr
.fra
->Flags
|= FR_DOWN
;
79 if(NotifyCode
== BN_CLICKED
)
83 case IDOK
: /* Find Next */
84 if(GetDlgItemTextA(hDlgWnd
, edt1
, pData
->fr
.lpstrFindWhat
, pData
->fr
.wFindWhatLen
) > 0)
86 pData
->user_fr
.fra
->Flags
|= COMDLG32_FR_GetFlags(hDlgWnd
) | FR_FINDNEXT
;
87 if(pData
->fr
.Flags
& FR_WINE_UNICODE
)
89 MultiByteToWideChar( CP_ACP
, 0, pData
->fr
.lpstrFindWhat
, -1,
90 pData
->user_fr
.frw
->lpstrFindWhat
,
95 strcpy(pData
->user_fr
.fra
->lpstrFindWhat
, pData
->fr
.lpstrFindWhat
);
97 SendMessageA(pData
->fr
.hwndOwner
, FindReplaceMessage
, 0, (LPARAM
)pData
->user_fr
.fra
);
102 pData
->user_fr
.fra
->Flags
|= COMDLG32_FR_GetFlags(hDlgWnd
) | FR_DIALOGTERM
;
103 SendMessageA(pData
->fr
.hwndOwner
, FindReplaceMessage
, 0, (LPARAM
)pData
->user_fr
.fra
);
104 DestroyWindow(hDlgWnd
);
107 case psh2
: /* Replace All */
108 flag
= FR_REPLACEALL
;
111 case psh1
: /* Replace */
114 if((pData
->fr
.Flags
& FR_WINE_REPLACE
)
115 && GetDlgItemTextA(hDlgWnd
, edt1
, pData
->fr
.lpstrFindWhat
, pData
->fr
.wFindWhatLen
) > 0)
117 pData
->fr
.lpstrReplaceWith
[0] = 0; /* In case the next GetDlgItemText Fails */
118 GetDlgItemTextA(hDlgWnd
, edt2
, pData
->fr
.lpstrReplaceWith
, pData
->fr
.wReplaceWithLen
);
119 pData
->user_fr
.fra
->Flags
|= COMDLG32_FR_GetFlags(hDlgWnd
) | flag
;
120 if(pData
->fr
.Flags
& FR_WINE_UNICODE
)
122 MultiByteToWideChar( CP_ACP
, 0, pData
->fr
.lpstrFindWhat
, -1,
123 pData
->user_fr
.frw
->lpstrFindWhat
,
125 MultiByteToWideChar( CP_ACP
, 0, pData
->fr
.lpstrReplaceWith
, -1,
126 pData
->user_fr
.frw
->lpstrReplaceWith
,
131 strcpy(pData
->user_fr
.fra
->lpstrFindWhat
, pData
->fr
.lpstrFindWhat
);
132 strcpy(pData
->user_fr
.fra
->lpstrReplaceWith
, pData
->fr
.lpstrReplaceWith
);
134 SendMessageA(pData
->fr
.hwndOwner
, FindReplaceMessage
, 0, (LPARAM
)pData
->user_fr
.fra
);
139 pData
->user_fr
.fra
->Flags
|= COMDLG32_FR_GetFlags(hDlgWnd
);
140 SendMessageA(pData
->fr
.hwndOwner
, HelpMessage
, (WPARAM
)hDlgWnd
, (LPARAM
)pData
->user_fr
.fra
);
144 else if(NotifyCode
== EN_CHANGE
&& Id
== edt1
)
146 BOOL enable
= SendDlgItemMessageA(hDlgWnd
, edt1
, WM_GETTEXTLENGTH
, 0, 0) > 0;
147 EnableWindow(GetDlgItem(hDlgWnd
, IDOK
), enable
);
148 if(pData
->fr
.Flags
& FR_WINE_REPLACE
)
150 EnableWindow(GetDlgItem(hDlgWnd
, psh1
), enable
);
151 EnableWindow(GetDlgItem(hDlgWnd
, psh2
), enable
);
156 /***********************************************************************
157 * COMDLG32_FindReplaceDlgProc [internal]
158 * [Find/Replace]Text32[A/W] window procedure.
160 static BOOL CALLBACK
COMDLG32_FindReplaceDlgProc(HWND hDlgWnd
, UINT iMsg
, WPARAM wParam
, LPARAM lParam
)
162 COMDLG32_FR_Data
*pdata
= (COMDLG32_FR_Data
*)GetPropA(hDlgWnd
, (LPSTR
)COMDLG32_Atom
);
165 if(iMsg
== WM_INITDIALOG
)
167 pdata
= (COMDLG32_FR_Data
*)lParam
;
168 if(!SetPropA(hDlgWnd
, (LPSTR
)COMDLG32_Atom
, (HANDLE
)pdata
))
170 ERR("Could not Set prop; invent a gracefull exit?...\n");
171 DestroyWindow(hDlgWnd
);
174 SendDlgItemMessageA(hDlgWnd
, edt1
, EM_SETLIMITTEXT
, (WPARAM
)pdata
->fr
.wFindWhatLen
, 0);
175 SendDlgItemMessageA(hDlgWnd
, edt1
, WM_SETTEXT
, 0, (LPARAM
)pdata
->fr
.lpstrFindWhat
);
176 if(pdata
->fr
.Flags
& FR_WINE_REPLACE
)
178 SendDlgItemMessageA(hDlgWnd
, edt2
, EM_SETLIMITTEXT
, (WPARAM
)pdata
->fr
.wReplaceWithLen
, 0);
179 SendDlgItemMessageA(hDlgWnd
, edt2
, WM_SETTEXT
, 0, (LPARAM
)pdata
->fr
.lpstrReplaceWith
);
182 if(!(pdata
->fr
.Flags
& FR_SHOWHELP
))
183 ShowWindow(GetDlgItem(hDlgWnd
, pshHelp
), SW_HIDE
);
184 if(pdata
->fr
.Flags
& FR_HIDEUPDOWN
)
186 ShowWindow(GetDlgItem(hDlgWnd
, rad1
), SW_HIDE
);
187 ShowWindow(GetDlgItem(hDlgWnd
, rad2
), SW_HIDE
);
188 ShowWindow(GetDlgItem(hDlgWnd
, grp1
), SW_HIDE
);
190 else if(pdata
->fr
.Flags
& FR_NOUPDOWN
)
192 EnableWindow(GetDlgItem(hDlgWnd
, rad1
), FALSE
);
193 EnableWindow(GetDlgItem(hDlgWnd
, rad2
), FALSE
);
194 EnableWindow(GetDlgItem(hDlgWnd
, grp1
), FALSE
);
198 SendDlgItemMessageA(hDlgWnd
, rad1
, BM_SETCHECK
, pdata
->fr
.Flags
& FR_DOWN
? 0 : BST_CHECKED
, 0);
199 SendDlgItemMessageA(hDlgWnd
, rad2
, BM_SETCHECK
, pdata
->fr
.Flags
& FR_DOWN
? BST_CHECKED
: 0, 0);
202 if(pdata
->fr
.Flags
& FR_HIDEMATCHCASE
)
203 ShowWindow(GetDlgItem(hDlgWnd
, chx2
), SW_HIDE
);
204 else if(pdata
->fr
.Flags
& FR_NOMATCHCASE
)
205 EnableWindow(GetDlgItem(hDlgWnd
, chx2
), FALSE
);
207 SendDlgItemMessageA(hDlgWnd
, chx2
, BM_SETCHECK
, pdata
->fr
.Flags
& FR_MATCHCASE
? BST_CHECKED
: 0, 0);
209 if(pdata
->fr
.Flags
& FR_HIDEWHOLEWORD
)
210 ShowWindow(GetDlgItem(hDlgWnd
, chx1
), SW_HIDE
);
211 else if(pdata
->fr
.Flags
& FR_NOWHOLEWORD
)
212 EnableWindow(GetDlgItem(hDlgWnd
, chx1
), FALSE
);
214 SendDlgItemMessageA(hDlgWnd
, chx1
, BM_SETCHECK
, pdata
->fr
.Flags
& FR_WHOLEWORD
? BST_CHECKED
: 0, 0);
216 /* We did the init here, now call the hook if requested */
218 /* We do not do ShowWindow if hook exists and is FALSE */
219 /* per MSDN Article Q96135 */
220 if((pdata
->fr
.Flags
& FR_ENABLEHOOK
)
221 && ! pdata
->fr
.lpfnHook(hDlgWnd
, iMsg
, wParam
, pdata
->fr
.lCustData
))
223 ShowWindow(hDlgWnd
, SW_SHOWNORMAL
);
224 UpdateWindow(hDlgWnd
);
228 if(pdata
&& (pdata
->fr
.Flags
& FR_ENABLEHOOK
))
230 retval
= pdata
->fr
.lpfnHook(hDlgWnd
, iMsg
, wParam
, lParam
);
241 COMDLG32_FR_HandleWMCommand(hDlgWnd
, pdata
, LOWORD(wParam
), HIWORD(wParam
));
245 COMDLG32_FR_HandleWMCommand(hDlgWnd
, pdata
, IDCANCEL
, BN_CLICKED
);
250 FIXME("Got WM_HELP. Who is gonna supply it?\n");
255 FIXME("Got WM_CONTEXTMENU. Who is gonna supply it?\n");
257 /* FIXME: Handle F1 help */
260 retval
= FALSE
; /* We did not handle the message */
264 /* WM_DESTROY is a special case.
265 * We need to ensure that the allocated memory is freed just before
266 * the dialog is killed. We also need to remove the added prop.
268 if(iMsg
== WM_DESTROY
)
270 RemovePropA(hDlgWnd
, (LPSTR
)COMDLG32_Atom
);
271 HeapFree(GetProcessHeap(), 0, pdata
);
277 /***********************************************************************
278 * COMDLG32_FR_CheckPartial [internal]
279 * Check various fault conditions in the supplied parameters that
280 * cause an extended error to be reported.
285 static BOOL
COMDLG32_FR_CheckPartial(
286 LPFINDREPLACEA pfr
, /* [in] Find structure */
287 BOOL Replace
/* [in] True if called as replace */
291 COMDLG32_SetCommDlgExtendedError(CDERR_GENERALCODES
);
295 if(pfr
->lStructSize
!= sizeof(FINDREPLACEA
))
297 COMDLG32_SetCommDlgExtendedError(CDERR_STRUCTSIZE
);
301 if(!IsWindow(pfr
->hwndOwner
))
303 COMDLG32_SetCommDlgExtendedError(CDERR_DIALOGFAILURE
);
307 if((pfr
->wFindWhatLen
< 1 || !pfr
->lpstrFindWhat
)
308 ||(Replace
&& (pfr
->wReplaceWithLen
< 1 || !pfr
->lpstrReplaceWith
)))
310 COMDLG32_SetCommDlgExtendedError(FRERR_BUFFERLENGTHZERO
);
314 if((FindReplaceMessage
= RegisterWindowMessageA(FINDMSGSTRING
)) == 0)
316 COMDLG32_SetCommDlgExtendedError(CDERR_REGISTERMSGFAIL
);
319 if((HelpMessage
= RegisterWindowMessageA(HELPMSGSTRING
)) == 0)
321 COMDLG32_SetCommDlgExtendedError(CDERR_REGISTERMSGFAIL
);
325 if((pfr
->Flags
& FR_ENABLEHOOK
) && !pfr
->lpfnHook
)
327 COMDLG32_SetCommDlgExtendedError(CDERR_NOHOOK
);
331 if((pfr
->Flags
& (FR_ENABLETEMPLATE
| FR_ENABLETEMPLATEHANDLE
)) && !pfr
->hInstance
)
333 COMDLG32_SetCommDlgExtendedError(CDERR_NOHINSTANCE
);
337 if((pfr
->Flags
& FR_ENABLETEMPLATE
) && !pfr
->lpTemplateName
)
339 COMDLG32_SetCommDlgExtendedError(CDERR_NOTEMPLATE
);
346 /***********************************************************************
347 * COMDLG32_FR_DoFindReplace [internal]
348 * Actual load and creation of the Find/Replace dialog.
350 * Window handle to created dialog:Succes
353 static HWND
COMDLG32_FR_DoFindReplace(
354 COMDLG32_FR_Data
*pdata
/* [in] Internal data structure */
361 TRACE("hInst=%08x, Flags=%08lx\n", pdata
->fr
.hInstance
, pdata
->fr
.Flags
);
363 if(!(pdata
->fr
.Flags
& FR_ENABLETEMPLATEHANDLE
))
365 HMODULE hmod
= COMDLG32_hInstance
;
367 if(pdata
->fr
.Flags
& FR_ENABLETEMPLATE
)
369 hmod
= (HMODULE
)pdata
->fr
.hInstance
;
370 if(pdata
->fr
.Flags
& FR_WINE_UNICODE
)
372 htemplate
= FindResourceW(hmod
, (LPWSTR
)pdata
->fr
.lpTemplateName
, (LPWSTR
)RT_DIALOGA
);
376 htemplate
= FindResourceA(hmod
, pdata
->fr
.lpTemplateName
, (LPCSTR
)RT_DIALOGA
);
381 int rcid
= pdata
->fr
.Flags
& FR_WINE_REPLACE
? REPLACEDLGORD
383 htemplate
= FindResourceA(hmod
, MAKEINTRESOURCEA(rcid
), (LPCSTR
)RT_DIALOGA
);
387 error
= CDERR_FINDRESFAILURE
;
391 loadrc
= LoadResource(hmod
, htemplate
);
395 loadrc
= (HGLOBAL
)pdata
->fr
.hInstance
;
400 error
= CDERR_LOADRESFAILURE
;
404 if((rcs
= (LPDLGTEMPLATEW
)LockResource(loadrc
)) == NULL
)
406 error
= CDERR_LOCKRESFAILURE
;
410 hdlgwnd
= CreateDialogIndirectParamA(COMDLG32_hInstance
,
413 (DLGPROC
)COMDLG32_FindReplaceDlgProc
,
417 error
= CDERR_DIALOGFAILURE
;
419 COMDLG32_SetCommDlgExtendedError(error
);
420 HeapFree(GetProcessHeap(), 0, pdata
);
425 /***********************************************************************
426 * FindTextA [COMDLG32.6]
428 * Window handle to created dialog: Succes
431 HWND WINAPI
FindTextA(
432 LPFINDREPLACEA pfr
/* [in] Find/replace structure*/
434 COMDLG32_FR_Data
*pdata
;
436 TRACE("LPFINDREPLACE=%p\n", pfr
);
438 if(!COMDLG32_FR_CheckPartial(pfr
, FALSE
))
441 if((pdata
= (COMDLG32_FR_Data
*)COMDLG32_AllocMem(sizeof(COMDLG32_FR_Data
))) == NULL
)
442 return 0; /* Error has been set */
444 pdata
->user_fr
.fra
= pfr
;
446 return COMDLG32_FR_DoFindReplace(pdata
);
449 /***********************************************************************
450 * ReplaceTextA [COMDLG32.19]
452 * Window handle to created dialog: Succes
455 HWND WINAPI
ReplaceTextA(
456 LPFINDREPLACEA pfr
/* [in] Find/replace structure*/
458 COMDLG32_FR_Data
*pdata
;
460 TRACE("LPFINDREPLACE=%p\n", pfr
);
462 if(!COMDLG32_FR_CheckPartial(pfr
, TRUE
))
465 if((pdata
= (COMDLG32_FR_Data
*)COMDLG32_AllocMem(sizeof(COMDLG32_FR_Data
))) == NULL
)
466 return 0; /* Error has been set */
468 pdata
->user_fr
.fra
= pfr
;
470 pdata
->fr
.Flags
|= FR_WINE_REPLACE
;
471 return COMDLG32_FR_DoFindReplace(pdata
);
474 /***********************************************************************
475 * FindTextW [COMDLG32.7]
477 * Window handle to created dialog: Succes
480 HWND WINAPI
FindTextW(
481 LPFINDREPLACEW pfr
/* [in] Find/replace structure*/
483 COMDLG32_FR_Data
*pdata
;
486 TRACE("LPFINDREPLACE=%p\n", pfr
);
488 if(!COMDLG32_FR_CheckPartial((LPFINDREPLACEA
)pfr
, FALSE
))
491 len
= WideCharToMultiByte( CP_ACP
, 0, pfr
->lpstrFindWhat
, pfr
->wFindWhatLen
,
492 NULL
, 0, NULL
, NULL
);
493 if((pdata
= (COMDLG32_FR_Data
*)COMDLG32_AllocMem(sizeof(COMDLG32_FR_Data
) + len
)) == NULL
)
494 return 0; /* Error has been set */
496 pdata
->user_fr
.frw
= pfr
;
497 pdata
->fr
= *(LPFINDREPLACEA
)pfr
; /* FINDREPLACEx have same size */
498 pdata
->fr
.Flags
|= FR_WINE_UNICODE
;
499 pdata
->fr
.lpstrFindWhat
= (LPSTR
)(((LPFINDREPLACEA
)(pdata
+1))+1); /* Set string pointer */
500 WideCharToMultiByte( CP_ACP
, 0, pfr
->lpstrFindWhat
, pfr
->wFindWhatLen
,
501 pdata
->fr
.lpstrFindWhat
, len
, NULL
, NULL
);
502 return COMDLG32_FR_DoFindReplace(pdata
);
505 /***********************************************************************
506 * ReplaceTextW [COMDLG32.20]
508 * Window handle to created dialog: Succes
511 HWND WINAPI
ReplaceTextW(
512 LPFINDREPLACEW pfr
/* [in] Find/replace structure*/
514 COMDLG32_FR_Data
*pdata
;
517 TRACE("LPFINDREPLACE=%p\n", pfr
);
519 if(!COMDLG32_FR_CheckPartial((LPFINDREPLACEA
)pfr
, FALSE
))
522 len1
= WideCharToMultiByte( CP_ACP
, 0, pfr
->lpstrFindWhat
, pfr
->wFindWhatLen
,
523 NULL
, 0, NULL
, NULL
);
524 len2
= WideCharToMultiByte( CP_ACP
, 0, pfr
->lpstrReplaceWith
, pfr
->wReplaceWithLen
,
525 NULL
, 0, NULL
, NULL
);
526 if((pdata
= (COMDLG32_FR_Data
*)COMDLG32_AllocMem(sizeof(COMDLG32_FR_Data
)
527 + len1
+ len2
)) == NULL
)
528 return 0; /* Error has been set */
530 pdata
->user_fr
.frw
= pfr
;
531 pdata
->fr
= *(LPFINDREPLACEA
)pfr
; /* FINDREPLACEx have same size */
532 pdata
->fr
.Flags
|= FR_WINE_REPLACE
| FR_WINE_UNICODE
;
533 pdata
->fr
.lpstrFindWhat
= (LPSTR
)(((LPFINDREPLACEA
)(pdata
+1))+1); /* Set string pointers */
534 pdata
->fr
.lpstrReplaceWith
= (LPSTR
)(((LPFINDREPLACEA
)(pdata
+1))+1) + pfr
->wFindWhatLen
;
536 WideCharToMultiByte( CP_ACP
, 0, pfr
->lpstrFindWhat
, pfr
->wFindWhatLen
,
537 pdata
->fr
.lpstrFindWhat
, len1
, NULL
, NULL
);
538 WideCharToMultiByte( CP_ACP
, 0, pfr
->lpstrReplaceWith
, pfr
->wReplaceWithLen
,
539 pdata
->fr
.lpstrReplaceWith
, len2
, NULL
, NULL
);
540 return COMDLG32_FR_DoFindReplace(pdata
);