2 * Implementation of the Microsoft Installer (msi.dll)
4 * Copyright 2005 Mike McCormack for CodeWeavers
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
22 #define NONAMELESSUNION
23 #define NONAMELESSSTRUCT
42 #include "wine/debug.h"
43 #include "wine/unicode.h"
45 WINE_DEFAULT_DEBUG_CHANNEL(msi
);
48 extern HINSTANCE msi_hInstance
;
50 struct msi_control_tag
;
51 typedef struct msi_control_tag msi_control
;
52 typedef UINT (*msi_handler
)( msi_dialog
*, msi_control
*, WPARAM
);
54 struct msi_control_tag
66 float progress_current
;
72 typedef struct msi_font_tag
74 struct msi_font_tag
*next
;
84 msi_dialog_event_handler event_handler
;
94 LPWSTR control_default
;
95 LPWSTR control_cancel
;
99 typedef UINT (*msi_dialog_control_func
)( msi_dialog
*dialog
, MSIRECORD
*rec
);
100 struct control_handler
102 LPCWSTR control_type
;
103 msi_dialog_control_func func
;
112 } radio_button_group_descr
;
114 static const WCHAR szMsiDialogClass
[] = {
115 'M','s','i','D','i','a','l','o','g','C','l','o','s','e','C','l','a','s','s',0
117 static const WCHAR szMsiHiddenWindow
[] = {
118 'M','s','i','H','i','d','d','e','n','W','i','n','d','o','w',0 };
119 static const WCHAR szStatic
[] = { 'S','t','a','t','i','c',0 };
120 static const WCHAR szButton
[] = { 'B','U','T','T','O','N', 0 };
121 static const WCHAR szButtonData
[] = { 'M','S','I','D','A','T','A',0 };
122 static const WCHAR szProgress
[] = { 'P','r','o','g','r','e','s','s',0 };
123 static const WCHAR szText
[] = { 'T','e','x','t',0 };
124 static const WCHAR szPushButton
[] = { 'P','u','s','h','B','u','t','t','o','n',0 };
125 static const WCHAR szLine
[] = { 'L','i','n','e',0 };
126 static const WCHAR szBitmap
[] = { 'B','i','t','m','a','p',0 };
127 static const WCHAR szCheckBox
[] = { 'C','h','e','c','k','B','o','x',0 };
128 static const WCHAR szScrollableText
[] = {
129 'S','c','r','o','l','l','a','b','l','e','T','e','x','t',0 };
130 static const WCHAR szComboBox
[] = { 'C','o','m','b','o','B','o','x',0 };
131 static const WCHAR szEdit
[] = { 'E','d','i','t',0 };
132 static const WCHAR szMaskedEdit
[] = { 'M','a','s','k','e','d','E','d','i','t',0 };
133 static const WCHAR szPathEdit
[] = { 'P','a','t','h','E','d','i','t',0 };
134 static const WCHAR szProgressBar
[] = {
135 'P','r','o','g','r','e','s','s','B','a','r',0 };
136 static const WCHAR szRadioButtonGroup
[] = {
137 'R','a','d','i','o','B','u','t','t','o','n','G','r','o','u','p',0 };
138 static const WCHAR szIcon
[] = { 'I','c','o','n',0 };
139 static const WCHAR szSelectionTree
[] = {
140 'S','e','l','e','c','t','i','o','n','T','r','e','e',0 };
141 static const WCHAR szGroupBox
[] = { 'G','r','o','u','p','B','o','x',0 };
142 static const WCHAR szListBox
[] = { 'L','i','s','t','B','o','x',0 };
143 static const WCHAR szDirectoryCombo
[] = { 'D','i','r','e','c','t','o','r','y','C','o','m','b','o',0 };
144 static const WCHAR szDirectoryList
[] = { 'D','i','r','e','c','t','o','r','y','L','i','s','t',0 };
145 static const WCHAR szVolumeCostList
[] = { 'V','o','l','u','m','e','C','o','s','t','L','i','s','t',0 };
146 static const WCHAR szSelectionDescription
[] = {'S','e','l','e','c','t','i','o','n','D','e','s','c','r','i','p','t','i','o','n',0};
147 static const WCHAR szSelectionPath
[] = {'S','e','l','e','c','t','i','o','n','P','a','t','h',0};
148 static const WCHAR szProperty
[] = {'P','r','o','p','e','r','t','y',0};
150 static UINT
msi_dialog_checkbox_handler( msi_dialog
*, msi_control
*, WPARAM
);
151 static void msi_dialog_checkbox_sync_state( msi_dialog
*, msi_control
* );
152 static UINT
msi_dialog_button_handler( msi_dialog
*, msi_control
*, WPARAM
);
153 static UINT
msi_dialog_edit_handler( msi_dialog
*, msi_control
*, WPARAM
);
154 static UINT
msi_dialog_radiogroup_handler( msi_dialog
*, msi_control
*, WPARAM param
);
155 static UINT
msi_dialog_evaluate_control_conditions( msi_dialog
*dialog
);
156 static LRESULT WINAPI
MSIRadioGroup_WndProc(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
);
157 static MSIFEATURE
*msi_seltree_get_selected_feature( msi_control
*control
);
159 /* dialog sequencing */
161 #define WM_MSI_DIALOG_CREATE (WM_USER+0x100)
162 #define WM_MSI_DIALOG_DESTROY (WM_USER+0x101)
164 static DWORD uiThreadId
;
165 static HWND hMsiHiddenWindow
;
167 static INT
msi_dialog_scale_unit( msi_dialog
*dialog
, INT val
)
169 return (dialog
->scale
* val
+ 5) / 10;
172 static msi_control
*msi_dialog_find_control( msi_dialog
*dialog
, LPCWSTR name
)
174 msi_control
*control
;
180 LIST_FOR_EACH_ENTRY( control
, &dialog
->controls
, msi_control
, entry
)
181 if( !strcmpW( control
->name
, name
) ) /* FIXME: case sensitive? */
186 static msi_control
*msi_dialog_find_control_by_type( msi_dialog
*dialog
, LPCWSTR type
)
188 msi_control
*control
;
194 LIST_FOR_EACH_ENTRY( control
, &dialog
->controls
, msi_control
, entry
)
195 if( !strcmpW( control
->type
, type
) ) /* FIXME: case sensitive? */
200 static msi_control
*msi_dialog_find_control_by_hwnd( msi_dialog
*dialog
, HWND hwnd
)
202 msi_control
*control
;
206 LIST_FOR_EACH_ENTRY( control
, &dialog
->controls
, msi_control
, entry
)
207 if( hwnd
== control
->hwnd
)
212 static LPWSTR
msi_get_deformatted_field( MSIPACKAGE
*package
, MSIRECORD
*rec
, int field
)
214 LPCWSTR str
= MSI_RecordGetString( rec
, field
);
218 deformat_string( package
, str
, &ret
);
222 static LPWSTR
msi_dialog_dup_property( msi_dialog
*dialog
, LPCWSTR property
, BOOL indirect
)
230 prop
= msi_dup_property( dialog
->package
, property
);
233 prop
= strdupW( property
);
238 msi_dialog
*msi_dialog_get_parent( msi_dialog
*dialog
)
240 return dialog
->parent
;
243 LPWSTR
msi_dialog_get_name( msi_dialog
*dialog
)
249 * msi_dialog_get_style
251 * Extract the {\style} string from the front of the text to display and
252 * update the pointer. Only the last style in a list is applied.
254 static LPWSTR
msi_dialog_get_style( LPCWSTR p
, LPCWSTR
*rest
)
265 while ((first
= strchrW( p
, '{' )) && (q
= strchrW( first
+ 1, '}' )))
268 if( *p
== '\\' || *p
== '&' )
271 /* little bit of sanity checking to stop us getting confused with RTF */
273 if( *i
== '}' || *i
== '\\' )
283 ret
= msi_alloc( len
*sizeof(WCHAR
) );
286 memcpy( ret
, p
, len
*sizeof(WCHAR
) );
291 static UINT
msi_dialog_add_font( MSIRECORD
*rec
, LPVOID param
)
293 msi_dialog
*dialog
= param
;
300 /* create a font and add it to the list */
301 name
= MSI_RecordGetString( rec
, 1 );
302 font
= msi_alloc( sizeof *font
+ strlenW( name
)*sizeof (WCHAR
) );
303 strcpyW( font
->name
, name
);
304 font
->next
= dialog
->font_list
;
305 dialog
->font_list
= font
;
307 font
->color
= MSI_RecordGetInteger( rec
, 4 );
309 memset( &lf
, 0, sizeof lf
);
310 face
= MSI_RecordGetString( rec
, 2 );
311 lf
.lfHeight
= MSI_RecordGetInteger( rec
, 3 );
312 style
= MSI_RecordGetInteger( rec
, 5 );
313 if( style
& msidbTextStyleStyleBitsBold
)
314 lf
.lfWeight
= FW_BOLD
;
315 if( style
& msidbTextStyleStyleBitsItalic
)
317 if( style
& msidbTextStyleStyleBitsUnderline
)
318 lf
.lfUnderline
= TRUE
;
319 if( style
& msidbTextStyleStyleBitsStrike
)
320 lf
.lfStrikeOut
= TRUE
;
321 lstrcpynW( lf
.lfFaceName
, face
, LF_FACESIZE
);
323 /* adjust the height */
324 hdc
= GetDC( dialog
->hwnd
);
327 lf
.lfHeight
= -MulDiv(lf
.lfHeight
, GetDeviceCaps(hdc
, LOGPIXELSY
), 72);
328 ReleaseDC( dialog
->hwnd
, hdc
);
331 font
->hfont
= CreateFontIndirectW( &lf
);
333 TRACE("Adding font style %s\n", debugstr_w(font
->name
) );
335 return ERROR_SUCCESS
;
338 static msi_font
*msi_dialog_find_font( msi_dialog
*dialog
, LPCWSTR name
)
342 for( font
= dialog
->font_list
; font
; font
= font
->next
)
343 if( !strcmpW( font
->name
, name
) ) /* FIXME: case sensitive? */
349 static UINT
msi_dialog_set_font( msi_dialog
*dialog
, HWND hwnd
, LPCWSTR name
)
353 font
= msi_dialog_find_font( dialog
, name
);
355 SendMessageW( hwnd
, WM_SETFONT
, (WPARAM
) font
->hfont
, TRUE
);
357 ERR("No font entry for %s\n", debugstr_w(name
));
358 return ERROR_SUCCESS
;
361 static UINT
msi_dialog_build_font_list( msi_dialog
*dialog
)
363 static const WCHAR query
[] = {
364 'S','E','L','E','C','T',' ','*',' ',
365 'F','R','O','M',' ','`','T','e','x','t','S','t','y','l','e','`',' ',0
368 MSIQUERY
*view
= NULL
;
370 TRACE("dialog %p\n", dialog
);
372 r
= MSI_OpenQuery( dialog
->package
->db
, &view
, query
);
373 if( r
!= ERROR_SUCCESS
)
376 r
= MSI_IterateRecords( view
, NULL
, msi_dialog_add_font
, dialog
);
377 msiobj_release( &view
->hdr
);
382 static void msi_destroy_control( msi_control
*t
)
384 list_remove( &t
->entry
);
385 /* leave dialog->hwnd - destroying parent destroys child windows */
386 msi_free( t
->property
);
387 msi_free( t
->value
);
389 DeleteObject( t
->hBitmap
);
391 DestroyIcon( t
->hIcon
);
392 msi_free( t
->tabnext
);
395 FreeLibrary( t
->hDll
);
399 static msi_control
*msi_dialog_create_window( msi_dialog
*dialog
,
400 MSIRECORD
*rec
, DWORD exstyle
, LPCWSTR szCls
, LPCWSTR name
, LPCWSTR text
,
401 DWORD style
, HWND parent
)
403 DWORD x
, y
, width
, height
;
404 LPWSTR font
= NULL
, title_font
= NULL
;
405 LPCWSTR title
= NULL
;
406 msi_control
*control
;
410 control
= msi_alloc( sizeof *control
+ strlenW(name
)*sizeof(WCHAR
) );
411 strcpyW( control
->name
, name
);
412 list_add_head( &dialog
->controls
, &control
->entry
);
413 control
->handler
= NULL
;
414 control
->property
= NULL
;
415 control
->value
= NULL
;
416 control
->hBitmap
= NULL
;
417 control
->hIcon
= NULL
;
418 control
->hDll
= NULL
;
419 control
->tabnext
= strdupW( MSI_RecordGetString( rec
, 11) );
420 control
->type
= strdupW( MSI_RecordGetString( rec
, 3 ) );
421 control
->progress_current
= 0;
422 control
->progress_max
= 100;
424 x
= MSI_RecordGetInteger( rec
, 4 );
425 y
= MSI_RecordGetInteger( rec
, 5 );
426 width
= MSI_RecordGetInteger( rec
, 6 );
427 height
= MSI_RecordGetInteger( rec
, 7 );
429 x
= msi_dialog_scale_unit( dialog
, x
);
430 y
= msi_dialog_scale_unit( dialog
, y
);
431 width
= msi_dialog_scale_unit( dialog
, width
);
432 height
= msi_dialog_scale_unit( dialog
, height
);
436 deformat_string( dialog
->package
, text
, &title_font
);
437 font
= msi_dialog_get_style( title_font
, &title
);
440 control
->hwnd
= CreateWindowExW( exstyle
, szCls
, title
, style
,
441 x
, y
, width
, height
, parent
, NULL
, NULL
, NULL
);
443 TRACE("Dialog %s control %s hwnd %p\n",
444 debugstr_w(dialog
->name
), debugstr_w(text
), control
->hwnd
);
446 msi_dialog_set_font( dialog
, control
->hwnd
,
447 font
? font
: dialog
->default_font
);
449 msi_free( title_font
);
455 static LPWSTR
msi_dialog_get_uitext( msi_dialog
*dialog
, LPCWSTR key
)
460 static const WCHAR query
[] = {
461 's','e','l','e','c','t',' ','*',' ',
462 'f','r','o','m',' ','`','U','I','T','e','x','t','`',' ',
463 'w','h','e','r','e',' ','`','K','e','y','`',' ','=',' ','\'','%','s','\'',0
466 rec
= MSI_QueryGetRecord( dialog
->package
->db
, query
, key
);
467 if (!rec
) return NULL
;
468 text
= strdupW( MSI_RecordGetString( rec
, 2 ) );
469 msiobj_release( &rec
->hdr
);
473 static MSIRECORD
*msi_get_binary_record( MSIDATABASE
*db
, LPCWSTR name
)
475 static const WCHAR query
[] = {
476 's','e','l','e','c','t',' ','*',' ',
477 'f','r','o','m',' ','B','i','n','a','r','y',' ',
478 'w','h','e','r','e',' ',
479 '`','N','a','m','e','`',' ','=',' ','\'','%','s','\'',0
482 return MSI_QueryGetRecord( db
, query
, name
);
485 static LPWSTR
msi_create_tmp_path(void)
489 static const WCHAR prefix
[] = { 'm','s','i',0 };
492 r
= GetTempPathW( MAX_PATH
, tmp
);
495 len
= lstrlenW( tmp
) + 20;
496 path
= msi_alloc( len
* sizeof (WCHAR
) );
499 r
= GetTempFileNameW( tmp
, prefix
, 0, path
);
510 static HANDLE
msi_load_image( MSIDATABASE
*db
, LPCWSTR name
, UINT type
,
511 UINT cx
, UINT cy
, UINT flags
)
513 MSIRECORD
*rec
= NULL
;
514 HANDLE himage
= NULL
;
518 TRACE("%p %s %u %u %08x\n", db
, debugstr_w(name
), cx
, cy
, flags
);
520 tmp
= msi_create_tmp_path();
524 rec
= msi_get_binary_record( db
, name
);
527 r
= MSI_RecordStreamToFile( rec
, 2, tmp
);
528 if( r
== ERROR_SUCCESS
)
530 himage
= LoadImageW( 0, tmp
, type
, cx
, cy
, flags
);
532 msiobj_release( &rec
->hdr
);
540 static HICON
msi_load_icon( MSIDATABASE
*db
, LPCWSTR text
, UINT attributes
)
542 DWORD cx
= 0, cy
= 0, flags
;
544 flags
= LR_LOADFROMFILE
| LR_DEFAULTSIZE
;
545 if( attributes
& msidbControlAttributesFixedSize
)
547 flags
&= ~LR_DEFAULTSIZE
;
548 if( attributes
& msidbControlAttributesIconSize16
)
553 if( attributes
& msidbControlAttributesIconSize32
)
558 /* msidbControlAttributesIconSize48 handled by above logic */
560 return msi_load_image( db
, text
, IMAGE_ICON
, cx
, cy
, flags
);
564 /* called from the Control Event subscription code */
565 void msi_dialog_handle_event( msi_dialog
* dialog
, LPCWSTR control
,
566 LPCWSTR attribute
, MSIRECORD
*rec
)
569 LPCWSTR font_text
, text
= NULL
;
572 static const WCHAR empty
[] = {0};
574 ctrl
= msi_dialog_find_control( dialog
, control
);
577 if( !lstrcmpW(attribute
, szText
) )
579 font_text
= MSI_RecordGetString( rec
, 1 );
580 font
= msi_dialog_get_style( font_text
, &text
);
581 if (!text
) text
= empty
;
582 SetWindowTextW( ctrl
->hwnd
, text
);
584 msi_dialog_check_messages( NULL
);
586 else if( !lstrcmpW(attribute
, szProgress
) )
590 func
= MSI_RecordGetInteger( rec
, 1 );
591 val
= MSI_RecordGetInteger( rec
, 2 );
596 ctrl
->progress_max
= val
;
597 ctrl
->progress_current
= 0;
598 SendMessageW(ctrl
->hwnd
, PBM_SETRANGE
, 0, MAKELPARAM(0,100));
599 SendMessageW(ctrl
->hwnd
, PBM_SETPOS
, 0, 0);
601 case 1: /* FIXME: not sure what this is supposed to do */
604 ctrl
->progress_current
+= val
;
605 SendMessageW(ctrl
->hwnd
, PBM_SETPOS
, 100*(ctrl
->progress_current
/ctrl
->progress_max
), 0);
608 ERR("Unknown progress message %d\n", func
);
612 else if ( !lstrcmpW(attribute
, szProperty
) )
614 MSIFEATURE
*feature
= msi_seltree_get_selected_feature( ctrl
);
615 MSI_SetPropertyW( dialog
->package
, ctrl
->property
, feature
->Directory
);
619 FIXME("Attribute %s not being set\n", debugstr_w(attribute
));
624 static void msi_dialog_map_events(msi_dialog
* dialog
, LPCWSTR control
)
626 static const WCHAR Query
[] = {
627 'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
628 '`','E','v','e','n','t','M','a','p','p','i','n','g','`',' ',
629 'W','H','E','R','E',' ',
630 '`','D','i','a','l','o','g','_','`',' ','=',' ','\'','%','s','\'',' ',
632 '`','C','o','n','t','r','o','l','_','`',' ','=',' ','\'','%','s','\'',0
635 LPCWSTR event
, attribute
;
637 row
= MSI_QueryGetRecord( dialog
->package
->db
, Query
, dialog
->name
, control
);
641 event
= MSI_RecordGetString( row
, 3 );
642 attribute
= MSI_RecordGetString( row
, 4 );
643 ControlEvent_SubscribeToEvent( dialog
->package
, dialog
, event
, control
, attribute
);
644 msiobj_release( &row
->hdr
);
647 /* everything except radio buttons */
648 static msi_control
*msi_dialog_add_control( msi_dialog
*dialog
,
649 MSIRECORD
*rec
, LPCWSTR szCls
, DWORD style
)
655 name
= MSI_RecordGetString( rec
, 2 );
656 attributes
= MSI_RecordGetInteger( rec
, 8 );
657 text
= MSI_RecordGetString( rec
, 10 );
658 if( attributes
& msidbControlAttributesVisible
)
660 if( ~attributes
& msidbControlAttributesEnabled
)
661 style
|= WS_DISABLED
;
662 if( attributes
& msidbControlAttributesSunken
)
663 exstyle
|= WS_EX_CLIENTEDGE
;
665 msi_dialog_map_events(dialog
, name
);
667 return msi_dialog_create_window( dialog
, rec
, exstyle
, szCls
, name
,
668 text
, style
, dialog
->hwnd
);
679 * we don't erase our own background,
680 * so we have to make sure that the parent window redraws first
682 static void msi_text_on_settext( HWND hWnd
)
687 hParent
= GetParent( hWnd
);
688 GetWindowRect( hWnd
, &rc
);
689 MapWindowPoints( NULL
, hParent
, (LPPOINT
) &rc
, 2 );
690 InvalidateRect( hParent
, &rc
, TRUE
);
693 static LRESULT WINAPI
694 MSIText_WndProc(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
696 struct msi_text_info
*info
;
699 TRACE("%p %04x %08x %08lx\n", hWnd
, msg
, wParam
, lParam
);
701 info
= GetPropW(hWnd
, szButtonData
);
704 SetTextColor( (HDC
)wParam
, info
->font
->color
);
706 if( msg
== WM_CTLCOLORSTATIC
&&
707 ( info
->attributes
& msidbControlAttributesTransparent
) )
709 SetBkMode( (HDC
)wParam
, TRANSPARENT
);
710 return (LRESULT
) GetStockObject(NULL_BRUSH
);
713 r
= CallWindowProcW(info
->oldproc
, hWnd
, msg
, wParam
, lParam
);
718 msi_text_on_settext( hWnd
);
722 RemovePropW( hWnd
, szButtonData
);
729 static UINT
msi_dialog_text_control( msi_dialog
*dialog
, MSIRECORD
*rec
)
731 msi_control
*control
;
732 struct msi_text_info
*info
;
736 TRACE("%p %p\n", dialog
, rec
);
738 control
= msi_dialog_add_control( dialog
, rec
, szStatic
, SS_LEFT
| WS_GROUP
);
740 return ERROR_FUNCTION_FAILED
;
742 info
= msi_alloc( sizeof *info
);
744 return ERROR_SUCCESS
;
746 text
= MSI_RecordGetString( rec
, 10 );
747 font_name
= msi_dialog_get_style( text
, &ptr
);
748 info
->font
= ( font_name
) ? msi_dialog_find_font( dialog
, font_name
) : NULL
;
749 msi_free( font_name
);
751 info
->attributes
= MSI_RecordGetInteger( rec
, 8 );
752 if( info
->attributes
& msidbControlAttributesTransparent
)
753 SetWindowLongPtrW( control
->hwnd
, GWL_EXSTYLE
, WS_EX_TRANSPARENT
);
755 info
->oldproc
= (WNDPROC
) SetWindowLongPtrW( control
->hwnd
, GWLP_WNDPROC
,
756 (LONG_PTR
)MSIText_WndProc
);
757 SetPropW( control
->hwnd
, szButtonData
, info
);
759 return ERROR_SUCCESS
;
762 static UINT
msi_dialog_button_control( msi_dialog
*dialog
, MSIRECORD
*rec
)
764 msi_control
*control
;
765 UINT attributes
, style
;
768 TRACE("%p %p\n", dialog
, rec
);
771 attributes
= MSI_RecordGetInteger( rec
, 8 );
772 if( attributes
& msidbControlAttributesIcon
)
775 control
= msi_dialog_add_control( dialog
, rec
, szButton
, style
);
777 return ERROR_FUNCTION_FAILED
;
779 control
->handler
= msi_dialog_button_handler
;
782 text
= msi_get_deformatted_field( dialog
->package
, rec
, 10 );
783 control
->hIcon
= msi_load_icon( dialog
->package
->db
, text
, attributes
);
784 if( attributes
& msidbControlAttributesIcon
)
785 SendMessageW( control
->hwnd
, BM_SETIMAGE
, IMAGE_ICON
, (LPARAM
) control
->hIcon
);
788 return ERROR_SUCCESS
;
791 static LPWSTR
msi_get_checkbox_value( msi_dialog
*dialog
, LPCWSTR prop
)
793 static const WCHAR query
[] = {
794 'S','E','L','E','C','T',' ','*',' ',
795 'F','R','O','M',' ','`','C','h','e','c','k','B','o','x',' ','`',
796 'W','H','E','R','E',' ',
797 '`','P','r','o','p','e','r','t','y','`',' ','=',' ',
800 MSIRECORD
*rec
= NULL
;
803 /* find if there is a value associated with the checkbox */
804 rec
= MSI_QueryGetRecord( dialog
->package
->db
, query
, prop
);
808 ret
= msi_get_deformatted_field( dialog
->package
, rec
, 2 );
814 msiobj_release( &rec
->hdr
);
818 ret
= msi_dup_property( dialog
->package
, prop
);
828 static UINT
msi_dialog_checkbox_control( msi_dialog
*dialog
, MSIRECORD
*rec
)
830 msi_control
*control
;
833 TRACE("%p %p\n", dialog
, rec
);
835 control
= msi_dialog_add_control( dialog
, rec
, szButton
,
836 BS_CHECKBOX
| BS_MULTILINE
| WS_TABSTOP
);
837 control
->handler
= msi_dialog_checkbox_handler
;
838 prop
= MSI_RecordGetString( rec
, 9 );
841 control
->property
= strdupW( prop
);
842 control
->value
= msi_get_checkbox_value( dialog
, prop
);
843 TRACE("control %s value %s\n", debugstr_w(control
->property
),
844 debugstr_w(control
->value
));
846 msi_dialog_checkbox_sync_state( dialog
, control
);
848 return ERROR_SUCCESS
;
851 static UINT
msi_dialog_line_control( msi_dialog
*dialog
, MSIRECORD
*rec
)
853 TRACE("%p %p\n", dialog
, rec
);
855 /* line is exactly 2 units in height */
856 MSI_RecordSetInteger( rec
, 7, 2 );
858 msi_dialog_add_control( dialog
, rec
, szStatic
, SS_ETCHEDHORZ
| SS_SUNKEN
);
859 return ERROR_SUCCESS
;
862 /******************** Scroll Text ********************************************/
864 struct msi_scrolltext_info
867 msi_control
*control
;
871 static LRESULT WINAPI
872 MSIScrollText_WndProc(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
874 struct msi_scrolltext_info
*info
;
877 TRACE("%p %04x %08x %08lx\n", hWnd
, msg
, wParam
, lParam
);
879 info
= GetPropW( hWnd
, szButtonData
);
881 r
= CallWindowProcW( info
->oldproc
, hWnd
, msg
, wParam
, lParam
);
887 RemovePropW( hWnd
, szButtonData
);
890 /* native MSI sets a wait cursor here */
891 msi_dialog_button_handler( info
->dialog
, info
->control
, BN_CLICKED
);
897 struct msi_streamin_info
904 static DWORD CALLBACK
905 msi_richedit_stream_in( DWORD_PTR arg
, LPBYTE buffer
, LONG count
, LONG
*pcb
)
907 struct msi_streamin_info
*info
= (struct msi_streamin_info
*) arg
;
909 if( (count
+ info
->offset
) > info
->length
)
910 count
= info
->length
- info
->offset
;
911 memcpy( buffer
, &info
->string
[ info
->offset
], count
);
913 info
->offset
+= count
;
915 TRACE("%d/%d\n", info
->offset
, info
->length
);
920 static void msi_scrolltext_add_text( msi_control
*control
, LPCWSTR text
)
922 struct msi_streamin_info info
;
925 info
.string
= strdupWtoA( text
);
927 info
.length
= lstrlenA( info
.string
) + 1;
929 es
.dwCookie
= (DWORD_PTR
) &info
;
931 es
.pfnCallback
= msi_richedit_stream_in
;
933 SendMessageW( control
->hwnd
, EM_STREAMIN
, SF_RTF
, (LPARAM
) &es
);
935 msi_free( info
.string
);
938 static UINT
msi_dialog_scrolltext_control( msi_dialog
*dialog
, MSIRECORD
*rec
)
940 static const WCHAR szRichEdit20W
[] = {
941 'R','i','c','h','E','d','i','t','2','0','W',0
943 struct msi_scrolltext_info
*info
;
944 msi_control
*control
;
949 info
= msi_alloc( sizeof *info
);
951 return ERROR_FUNCTION_FAILED
;
953 hRichedit
= LoadLibraryA("riched20");
955 style
= WS_BORDER
| ES_MULTILINE
| WS_VSCROLL
|
956 ES_READONLY
| ES_AUTOVSCROLL
| WS_TABSTOP
;
957 control
= msi_dialog_add_control( dialog
, rec
, szRichEdit20W
, style
);
960 FreeLibrary( hRichedit
);
962 return ERROR_FUNCTION_FAILED
;
965 control
->hDll
= hRichedit
;
967 info
->dialog
= dialog
;
968 info
->control
= control
;
970 /* subclass the static control */
971 info
->oldproc
= (WNDPROC
) SetWindowLongPtrW( control
->hwnd
, GWLP_WNDPROC
,
972 (LONG_PTR
)MSIScrollText_WndProc
);
973 SetPropW( control
->hwnd
, szButtonData
, info
);
975 /* add the text into the richedit */
976 text
= MSI_RecordGetString( rec
, 10 );
978 msi_scrolltext_add_text( control
, text
);
980 return ERROR_SUCCESS
;
983 static HBITMAP
msi_load_picture( MSIDATABASE
*db
, LPCWSTR name
,
984 INT cx
, INT cy
, DWORD flags
)
986 HBITMAP hOleBitmap
= 0, hBitmap
= 0, hOldSrcBitmap
, hOldDestBitmap
;
987 MSIRECORD
*rec
= NULL
;
989 IPicture
*pic
= NULL
;
994 rec
= msi_get_binary_record( db
, name
);
998 r
= MSI_RecordGetIStream( rec
, 2, &stm
);
999 msiobj_release( &rec
->hdr
);
1000 if( r
!= ERROR_SUCCESS
)
1003 r
= OleLoadPicture( stm
, 0, TRUE
, &IID_IPicture
, (LPVOID
*) &pic
);
1004 IStream_Release( stm
);
1007 ERR("failed to load picture\n");
1011 r
= IPicture_get_Handle( pic
, (OLE_HANDLE
*) &hOleBitmap
);
1014 ERR("failed to get bitmap handle\n");
1018 /* make the bitmap the desired size */
1019 r
= GetObjectW( hOleBitmap
, sizeof bm
, &bm
);
1020 if (r
!= sizeof bm
)
1022 ERR("failed to get bitmap size\n");
1026 if (flags
& LR_DEFAULTSIZE
)
1032 srcdc
= CreateCompatibleDC( NULL
);
1033 hOldSrcBitmap
= SelectObject( srcdc
, hOleBitmap
);
1034 destdc
= CreateCompatibleDC( NULL
);
1035 hBitmap
= CreateCompatibleBitmap( srcdc
, cx
, cy
);
1036 hOldDestBitmap
= SelectObject( destdc
, hBitmap
);
1037 StretchBlt( destdc
, 0, 0, cx
, cy
,
1038 srcdc
, 0, 0, bm
.bmWidth
, bm
.bmHeight
, SRCCOPY
);
1039 SelectObject( srcdc
, hOldSrcBitmap
);
1040 SelectObject( destdc
, hOldDestBitmap
);
1046 IPicture_Release( pic
);
1050 static UINT
msi_dialog_bitmap_control( msi_dialog
*dialog
, MSIRECORD
*rec
)
1052 UINT cx
, cy
, flags
, style
, attributes
;
1053 msi_control
*control
;
1056 flags
= LR_LOADFROMFILE
;
1057 style
= SS_BITMAP
| SS_LEFT
| WS_GROUP
;
1059 attributes
= MSI_RecordGetInteger( rec
, 8 );
1060 if( attributes
& msidbControlAttributesFixedSize
)
1062 flags
|= LR_DEFAULTSIZE
;
1063 style
|= SS_CENTERIMAGE
;
1066 control
= msi_dialog_add_control( dialog
, rec
, szStatic
, style
);
1067 cx
= MSI_RecordGetInteger( rec
, 6 );
1068 cy
= MSI_RecordGetInteger( rec
, 7 );
1069 cx
= msi_dialog_scale_unit( dialog
, cx
);
1070 cy
= msi_dialog_scale_unit( dialog
, cy
);
1072 text
= msi_get_deformatted_field( dialog
->package
, rec
, 10 );
1073 control
->hBitmap
= msi_load_picture( dialog
->package
->db
, text
, cx
, cy
, flags
);
1074 if( control
->hBitmap
)
1075 SendMessageW( control
->hwnd
, STM_SETIMAGE
,
1076 IMAGE_BITMAP
, (LPARAM
) control
->hBitmap
);
1078 ERR("Failed to load bitmap %s\n", debugstr_w(text
));
1082 return ERROR_SUCCESS
;
1085 static UINT
msi_dialog_icon_control( msi_dialog
*dialog
, MSIRECORD
*rec
)
1087 msi_control
*control
;
1093 control
= msi_dialog_add_control( dialog
, rec
, szStatic
,
1094 SS_ICON
| SS_CENTERIMAGE
| WS_GROUP
);
1096 attributes
= MSI_RecordGetInteger( rec
, 8 );
1097 text
= msi_get_deformatted_field( dialog
->package
, rec
, 10 );
1098 control
->hIcon
= msi_load_icon( dialog
->package
->db
, text
, attributes
);
1099 if( control
->hIcon
)
1100 SendMessageW( control
->hwnd
, STM_SETICON
, (WPARAM
) control
->hIcon
, 0 );
1102 ERR("Failed to load bitmap %s\n", debugstr_w(text
));
1104 return ERROR_SUCCESS
;
1107 static UINT
msi_dialog_combo_control( msi_dialog
*dialog
, MSIRECORD
*rec
)
1109 static const WCHAR szCombo
[] = { 'C','O','M','B','O','B','O','X',0 };
1111 msi_dialog_add_control( dialog
, rec
, szCombo
,
1112 SS_BITMAP
| SS_LEFT
| SS_CENTERIMAGE
);
1113 return ERROR_SUCCESS
;
1116 static UINT
msi_dialog_edit_control( msi_dialog
*dialog
, MSIRECORD
*rec
)
1118 msi_control
*control
;
1122 control
= msi_dialog_add_control( dialog
, rec
, szEdit
,
1123 WS_BORDER
| WS_TABSTOP
);
1124 control
->handler
= msi_dialog_edit_handler
;
1125 prop
= MSI_RecordGetString( rec
, 9 );
1127 control
->property
= strdupW( prop
);
1128 val
= msi_dup_property( dialog
->package
, control
->property
);
1129 SetWindowTextW( control
->hwnd
, val
);
1131 return ERROR_SUCCESS
;
1134 /******************** Masked Edit ********************************************/
1136 #define MASK_MAX_GROUPS 20
1138 struct msi_mask_group
1146 struct msi_maskedit_info
1154 struct msi_mask_group group
[MASK_MAX_GROUPS
];
1157 static BOOL
msi_mask_editable( WCHAR type
)
1172 static void msi_mask_control_change( struct msi_maskedit_info
*info
)
1177 val
= msi_alloc( (info
->num_chars
+1)*sizeof(WCHAR
) );
1178 for( i
=0, n
=0; i
<info
->num_groups
; i
++ )
1180 if( (info
->group
[i
].len
+ n
) > info
->num_chars
)
1182 ERR("can't fit control %d text into template\n",i
);
1185 if (!msi_mask_editable(info
->group
[i
].type
))
1187 for(r
=0; r
<info
->group
[i
].len
; r
++)
1188 val
[n
+r
] = info
->group
[i
].type
;
1193 r
= GetWindowTextW( info
->group
[i
].hwnd
, &val
[n
], info
->group
[i
].len
+1 );
1194 if( r
!= info
->group
[i
].len
)
1200 TRACE("%d/%d controls were good\n", i
, info
->num_groups
);
1202 if( i
== info
->num_groups
)
1204 TRACE("Set property %s to %s\n",
1205 debugstr_w(info
->prop
), debugstr_w(val
) );
1206 CharUpperBuffW( val
, info
->num_chars
);
1207 MSI_SetPropertyW( info
->dialog
->package
, info
->prop
, val
);
1208 msi_dialog_evaluate_control_conditions( info
->dialog
);
1213 /* now move to the next control if necessary */
1214 static VOID
msi_mask_next_control( struct msi_maskedit_info
*info
, HWND hWnd
)
1219 for( i
=0; i
<info
->num_groups
; i
++ )
1220 if( info
->group
[i
].hwnd
== hWnd
)
1223 /* don't move from the last control */
1224 if( i
>= (info
->num_groups
-1) )
1227 len
= SendMessageW( hWnd
, WM_GETTEXTLENGTH
, 0, 0 );
1228 if( len
< info
->group
[i
].len
)
1231 hWndNext
= GetNextDlgTabItem( GetParent( hWnd
), hWnd
, FALSE
);
1232 SetFocus( hWndNext
);
1235 static LRESULT WINAPI
1236 MSIMaskedEdit_WndProc(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
1238 struct msi_maskedit_info
*info
;
1241 TRACE("%p %04x %08x %08lx\n", hWnd
, msg
, wParam
, lParam
);
1243 info
= GetPropW(hWnd
, szButtonData
);
1245 r
= CallWindowProcW(info
->oldproc
, hWnd
, msg
, wParam
, lParam
);
1250 if (HIWORD(wParam
) == EN_CHANGE
)
1252 msi_mask_control_change( info
);
1253 msi_mask_next_control( info
, (HWND
) lParam
);
1257 msi_free( info
->prop
);
1259 RemovePropW( hWnd
, szButtonData
);
1266 /* fish the various bits of the property out and put them in the control */
1268 msi_maskedit_set_text( struct msi_maskedit_info
*info
, LPCWSTR text
)
1274 for( i
= 0; i
< info
->num_groups
; i
++ )
1276 if( info
->group
[i
].len
< lstrlenW( p
) )
1278 LPWSTR chunk
= strdupW( p
);
1279 chunk
[ info
->group
[i
].len
] = 0;
1280 SetWindowTextW( info
->group
[i
].hwnd
, chunk
);
1285 SetWindowTextW( info
->group
[i
].hwnd
, p
);
1288 p
+= info
->group
[i
].len
;
1292 static struct msi_maskedit_info
* msi_dialog_parse_groups( LPCWSTR mask
)
1294 struct msi_maskedit_info
* info
= NULL
;
1295 int i
= 0, n
= 0, total
= 0;
1298 TRACE("masked control, template %s\n", debugstr_w(mask
));
1303 info
= msi_alloc_zero( sizeof *info
);
1307 p
= strchrW(mask
, '<');
1313 for( i
=0; i
<MASK_MAX_GROUPS
; i
++ )
1315 /* stop at the end of the string */
1316 if( p
[0] == 0 || p
[0] == '>' )
1319 /* count the number of the same identifier */
1320 for( n
=0; p
[n
] == p
[0]; n
++ )
1322 info
->group
[i
].ofs
= total
;
1323 info
->group
[i
].type
= p
[0];
1327 total
++; /* an extra not part of the group */
1329 info
->group
[i
].len
= n
;
1334 TRACE("%d characters in %d groups\n", total
, i
);
1335 if( i
== MASK_MAX_GROUPS
)
1336 ERR("too many groups in PIDTemplate %s\n", debugstr_w(mask
));
1338 info
->num_chars
= total
;
1339 info
->num_groups
= i
;
1345 msi_maskedit_create_children( struct msi_maskedit_info
*info
, LPCWSTR font
)
1347 DWORD width
, height
, style
, wx
, ww
;
1352 style
= WS_CHILD
| WS_BORDER
| WS_VISIBLE
| WS_TABSTOP
| ES_AUTOHSCROLL
;
1354 GetClientRect( info
->hwnd
, &rect
);
1356 width
= rect
.right
- rect
.left
;
1357 height
= rect
.bottom
- rect
.top
;
1359 for( i
= 0; i
< info
->num_groups
; i
++ )
1361 if (!msi_mask_editable( info
->group
[i
].type
))
1363 wx
= (info
->group
[i
].ofs
* width
) / info
->num_chars
;
1364 ww
= (info
->group
[i
].len
* width
) / info
->num_chars
;
1366 hwnd
= CreateWindowW( szEdit
, NULL
, style
, wx
, 0, ww
, height
,
1367 info
->hwnd
, NULL
, NULL
, NULL
);
1370 ERR("failed to create mask edit sub window\n");
1374 SendMessageW( hwnd
, EM_LIMITTEXT
, info
->group
[i
].len
, 0 );
1376 msi_dialog_set_font( info
->dialog
, hwnd
,
1377 font
?font
:info
->dialog
->default_font
);
1378 info
->group
[i
].hwnd
= hwnd
;
1383 * office 2003 uses "73931<````=````=````=````=`````>@@@@@"
1384 * delphi 7 uses "<????-??????-??????-????>" and "<???-???>"
1385 * filemaker pro 7 uses "<^^^^=^^^^=^^^^=^^^^=^^^^=^^^^=^^^^^>"
1387 static UINT
msi_dialog_maskedit_control( msi_dialog
*dialog
, MSIRECORD
*rec
)
1389 LPWSTR font_mask
, val
= NULL
, font
;
1390 struct msi_maskedit_info
*info
= NULL
;
1391 UINT ret
= ERROR_SUCCESS
;
1392 msi_control
*control
;
1397 font_mask
= msi_get_deformatted_field( dialog
->package
, rec
, 10 );
1398 font
= msi_dialog_get_style( font_mask
, &mask
);
1401 ERR("mask template is empty\n");
1405 info
= msi_dialog_parse_groups( mask
);
1408 ERR("template %s is invalid\n", debugstr_w(mask
));
1412 info
->dialog
= dialog
;
1414 control
= msi_dialog_add_control( dialog
, rec
, szStatic
,
1415 SS_OWNERDRAW
| WS_GROUP
| WS_VISIBLE
);
1418 ERR("Failed to create maskedit container\n");
1419 ret
= ERROR_FUNCTION_FAILED
;
1422 SetWindowLongPtrW( control
->hwnd
, GWL_EXSTYLE
, WS_EX_CONTROLPARENT
);
1424 info
->hwnd
= control
->hwnd
;
1426 /* subclass the static control */
1427 info
->oldproc
= (WNDPROC
) SetWindowLongPtrW( info
->hwnd
, GWLP_WNDPROC
,
1428 (LONG_PTR
)MSIMaskedEdit_WndProc
);
1429 SetPropW( control
->hwnd
, szButtonData
, info
);
1431 prop
= MSI_RecordGetString( rec
, 9 );
1433 info
->prop
= strdupW( prop
);
1435 msi_maskedit_create_children( info
, font
);
1439 val
= msi_dup_property( dialog
->package
, prop
);
1442 msi_maskedit_set_text( info
, val
);
1448 if( ret
!= ERROR_SUCCESS
)
1450 msi_free( font_mask
);
1455 /******************** Progress Bar *****************************************/
1457 static UINT
msi_dialog_progress_bar( msi_dialog
*dialog
, MSIRECORD
*rec
)
1459 msi_dialog_add_control( dialog
, rec
, PROGRESS_CLASSW
, WS_VISIBLE
);
1460 return ERROR_SUCCESS
;
1463 /******************** Path Edit ********************************************/
1465 struct msi_pathedit_info
1468 msi_control
*control
;
1472 static LPWSTR
msi_get_window_text( HWND hwnd
)
1478 buf
= msi_alloc( sz
*sizeof(WCHAR
) );
1481 r
= GetWindowTextW( hwnd
, buf
, sz
);
1485 buf
= msi_realloc( buf
, sz
*sizeof(WCHAR
) );
1491 static void msi_dialog_update_pathedit( msi_dialog
*dialog
, msi_control
*control
)
1496 if (!control
&& !(control
= msi_dialog_find_control_by_type( dialog
, szPathEdit
)))
1499 indirect
= control
->attributes
& msidbControlAttributesIndirect
;
1500 prop
= msi_dialog_dup_property( dialog
, control
->property
, indirect
);
1501 path
= msi_dialog_dup_property( dialog
, prop
, TRUE
);
1503 SetWindowTextW( control
->hwnd
, path
);
1504 SendMessageW( control
->hwnd
, EM_SETSEL
, 0, -1 );
1510 /* FIXME: test when this should fail */
1511 static BOOL
msi_dialog_verify_path( LPWSTR path
)
1513 if ( !lstrlenW( path
) )
1516 if ( PathIsRelativeW( path
) )
1522 /* returns TRUE if the path is valid, FALSE otherwise */
1523 static BOOL
msi_dialog_onkillfocus( msi_dialog
*dialog
, msi_control
*control
)
1529 indirect
= control
->attributes
& msidbControlAttributesIndirect
;
1530 prop
= msi_dialog_dup_property( dialog
, control
->property
, indirect
);
1532 buf
= msi_get_window_text( control
->hwnd
);
1534 if ( !msi_dialog_verify_path( buf
) )
1536 /* FIXME: display an error message box */
1537 ERR("Invalid path %s\n", debugstr_w( buf
));
1539 SetFocus( control
->hwnd
);
1544 MSI_SetPropertyW( dialog
->package
, prop
, buf
);
1547 msi_dialog_update_pathedit( dialog
, control
);
1549 TRACE("edit %s contents changed, set %s\n", debugstr_w(control
->name
),
1558 static LRESULT WINAPI
MSIPathEdit_WndProc(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
1560 struct msi_pathedit_info
*info
= GetPropW(hWnd
, szButtonData
);
1563 TRACE("%p %04x %08x %08lx\n", hWnd
, msg
, wParam
, lParam
);
1565 if ( msg
== WM_KILLFOCUS
)
1567 /* if the path is invalid, don't handle this message */
1568 if ( !msi_dialog_onkillfocus( info
->dialog
, info
->control
) )
1572 r
= CallWindowProcW(info
->oldproc
, hWnd
, msg
, wParam
, lParam
);
1574 if ( msg
== WM_NCDESTROY
)
1577 RemovePropW( hWnd
, szButtonData
);
1583 static UINT
msi_dialog_pathedit_control( msi_dialog
*dialog
, MSIRECORD
*rec
)
1585 struct msi_pathedit_info
*info
;
1586 msi_control
*control
;
1589 info
= msi_alloc( sizeof *info
);
1591 return ERROR_FUNCTION_FAILED
;
1593 control
= msi_dialog_add_control( dialog
, rec
, szEdit
,
1594 WS_BORDER
| WS_TABSTOP
);
1595 control
->attributes
= MSI_RecordGetInteger( rec
, 8 );
1596 prop
= MSI_RecordGetString( rec
, 9 );
1597 control
->property
= msi_dialog_dup_property( dialog
, prop
, FALSE
);
1599 info
->dialog
= dialog
;
1600 info
->control
= control
;
1601 info
->oldproc
= (WNDPROC
) SetWindowLongPtrW( control
->hwnd
, GWLP_WNDPROC
,
1602 (LONG_PTR
)MSIPathEdit_WndProc
);
1603 SetPropW( control
->hwnd
, szButtonData
, info
);
1605 msi_dialog_update_pathedit( dialog
, control
);
1607 return ERROR_SUCCESS
;
1610 /* radio buttons are a bit different from normal controls */
1611 static UINT
msi_dialog_create_radiobutton( MSIRECORD
*rec
, LPVOID param
)
1613 radio_button_group_descr
*group
= (radio_button_group_descr
*)param
;
1614 msi_dialog
*dialog
= group
->dialog
;
1615 msi_control
*control
;
1616 LPCWSTR prop
, text
, name
;
1617 DWORD style
, attributes
= group
->attributes
;
1619 style
= WS_CHILD
| BS_AUTORADIOBUTTON
| BS_MULTILINE
| WS_TABSTOP
;
1620 name
= MSI_RecordGetString( rec
, 3 );
1621 text
= MSI_RecordGetString( rec
, 8 );
1622 if( attributes
& 1 )
1623 style
|= WS_VISIBLE
;
1624 if( ~attributes
& 2 )
1625 style
|= WS_DISABLED
;
1627 control
= msi_dialog_create_window( dialog
, rec
, 0, szButton
, name
, text
,
1628 style
, group
->parent
->hwnd
);
1630 return ERROR_FUNCTION_FAILED
;
1631 control
->handler
= msi_dialog_radiogroup_handler
;
1633 if (!lstrcmpW(control
->name
, group
->propval
))
1634 SendMessageW(control
->hwnd
, BM_SETCHECK
, BST_CHECKED
, 0);
1636 prop
= MSI_RecordGetString( rec
, 1 );
1638 control
->property
= strdupW( prop
);
1640 return ERROR_SUCCESS
;
1643 static UINT
msi_dialog_radiogroup_control( msi_dialog
*dialog
, MSIRECORD
*rec
)
1645 static const WCHAR query
[] = {
1646 'S','E','L','E','C','T',' ','*',' ',
1647 'F','R','O','M',' ','R','a','d','i','o','B','u','t','t','o','n',' ',
1648 'W','H','E','R','E',' ',
1649 '`','P','r','o','p','e','r','t','y','`',' ','=',' ','\'','%','s','\'',0};
1652 msi_control
*control
;
1653 MSIQUERY
*view
= NULL
;
1654 radio_button_group_descr group
;
1655 MSIPACKAGE
*package
= dialog
->package
;
1658 prop
= MSI_RecordGetString( rec
, 9 );
1660 TRACE("%p %p %s\n", dialog
, rec
, debugstr_w( prop
));
1662 /* Create parent group box to hold radio buttons */
1663 control
= msi_dialog_add_control( dialog
, rec
, szButton
, BS_OWNERDRAW
|WS_GROUP
);
1665 return ERROR_FUNCTION_FAILED
;
1667 oldproc
= (WNDPROC
) SetWindowLongPtrW( control
->hwnd
, GWLP_WNDPROC
,
1668 (LONG_PTR
)MSIRadioGroup_WndProc
);
1669 SetPropW(control
->hwnd
, szButtonData
, oldproc
);
1670 SetWindowLongPtrW( control
->hwnd
, GWL_EXSTYLE
, WS_EX_CONTROLPARENT
);
1673 control
->property
= strdupW( prop
);
1675 /* query the Radio Button table for all control in this group */
1676 r
= MSI_OpenQuery( package
->db
, &view
, query
, prop
);
1677 if( r
!= ERROR_SUCCESS
)
1679 ERR("query failed for dialog %s radio group %s\n",
1680 debugstr_w(dialog
->name
), debugstr_w(prop
));
1681 return ERROR_INVALID_PARAMETER
;
1684 group
.dialog
= dialog
;
1685 group
.parent
= control
;
1686 group
.attributes
= MSI_RecordGetInteger( rec
, 8 );
1687 group
.propval
= msi_dup_property( dialog
->package
, control
->property
);
1689 r
= MSI_IterateRecords( view
, 0, msi_dialog_create_radiobutton
, &group
);
1690 msiobj_release( &view
->hdr
);
1691 msi_free( group
.propval
);
1696 /******************** Selection Tree ***************************************/
1698 struct msi_selection_tree_info
1707 msi_seltree_sync_item_state( HWND hwnd
, MSIFEATURE
*feature
, HTREEITEM hItem
)
1710 DWORD index
= feature
->Action
;
1712 TRACE("Feature %s -> %d %d %d\n", debugstr_w(feature
->Title
),
1713 feature
->Installed
, feature
->Action
, feature
->ActionRequest
);
1715 if (index
== INSTALLSTATE_UNKNOWN
)
1716 index
= INSTALLSTATE_ABSENT
;
1718 tvi
.mask
= TVIF_STATE
;
1720 tvi
.state
= INDEXTOSTATEIMAGEMASK( index
);
1721 tvi
.stateMask
= TVIS_STATEIMAGEMASK
;
1723 SendMessageW( hwnd
, TVM_SETITEMW
, 0, (LPARAM
) &tvi
);
1727 msi_seltree_popup_menu( HWND hwnd
, INT x
, INT y
)
1732 /* create a menu to display */
1733 hMenu
= CreatePopupMenu();
1735 /* FIXME: load strings from resources */
1736 AppendMenuA( hMenu
, MF_ENABLED
, INSTALLSTATE_LOCAL
, "Install feature locally");
1737 AppendMenuA( hMenu
, MF_GRAYED
, 0x1000, "Install entire feature");
1738 AppendMenuA( hMenu
, MF_ENABLED
, INSTALLSTATE_ADVERTISED
, "Install on demand");
1739 AppendMenuA( hMenu
, MF_ENABLED
, INSTALLSTATE_ABSENT
, "Don't install");
1740 r
= TrackPopupMenu( hMenu
, TPM_LEFTALIGN
| TPM_TOPALIGN
| TPM_RETURNCMD
,
1741 x
, y
, 0, hwnd
, NULL
);
1742 DestroyMenu( hMenu
);
1747 msi_seltree_feature_from_item( HWND hwnd
, HTREEITEM hItem
)
1751 /* get the feature from the item */
1752 memset( &tvi
, 0, sizeof tvi
);
1754 tvi
.mask
= TVIF_PARAM
| TVIF_HANDLE
;
1755 SendMessageW( hwnd
, TVM_GETITEMW
, 0, (LPARAM
) &tvi
);
1757 return (MSIFEATURE
*) tvi
.lParam
;
1761 msi_seltree_menu( HWND hwnd
, HTREEITEM hItem
)
1763 struct msi_selection_tree_info
*info
;
1764 MSIFEATURE
*feature
;
1765 MSIPACKAGE
*package
;
1773 info
= GetPropW(hwnd
, szButtonData
);
1774 package
= info
->dialog
->package
;
1776 feature
= msi_seltree_feature_from_item( hwnd
, hItem
);
1779 ERR("item %p feature was NULL\n", hItem
);
1783 /* get the item's rectangle to put the menu just below it */
1785 SendMessageW( hwnd
, TVM_GETITEMRECT
, 0, (LPARAM
) &u
.rc
);
1786 MapWindowPoints( hwnd
, NULL
, u
.pt
, 2 );
1788 r
= msi_seltree_popup_menu( hwnd
, u
.rc
.left
, u
.rc
.top
);
1792 case INSTALLSTATE_LOCAL
:
1793 case INSTALLSTATE_ADVERTISED
:
1794 case INSTALLSTATE_ABSENT
:
1795 msi_feature_set_state( feature
, r
);
1798 FIXME("select feature and all children\n");
1802 msi_seltree_sync_item_state( hwnd
, feature
, hItem
);
1803 ACTION_UpdateComponentStates( package
, feature
->Feature
);
1808 static MSIFEATURE
*msi_seltree_get_selected_feature( msi_control
*control
)
1810 struct msi_selection_tree_info
*info
= GetPropW(control
->hwnd
, szButtonData
);
1811 return msi_seltree_feature_from_item( control
->hwnd
, info
->selected
);
1814 static LRESULT WINAPI
1815 MSISelectionTree_WndProc(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
1817 struct msi_selection_tree_info
*info
;
1818 TVHITTESTINFO tvhti
;
1821 TRACE("%p %04x %08x %08lx\n", hWnd
, msg
, wParam
, lParam
);
1823 info
= GetPropW(hWnd
, szButtonData
);
1827 case WM_LBUTTONDOWN
:
1828 tvhti
.pt
.x
= (short)LOWORD( lParam
);
1829 tvhti
.pt
.y
= (short)HIWORD( lParam
);
1832 r
= CallWindowProcW(info
->oldproc
, hWnd
, TVM_HITTEST
, 0, (LPARAM
) &tvhti
);
1833 if (tvhti
.flags
& TVHT_ONITEMSTATEICON
)
1834 return msi_seltree_menu( hWnd
, tvhti
.hItem
);
1838 r
= CallWindowProcW(info
->oldproc
, hWnd
, msg
, wParam
, lParam
);
1844 RemovePropW( hWnd
, szButtonData
);
1851 msi_seltree_add_child_features( MSIPACKAGE
*package
, HWND hwnd
,
1852 LPCWSTR parent
, HTREEITEM hParent
)
1854 struct msi_selection_tree_info
*info
= GetPropW( hwnd
, szButtonData
);
1855 MSIFEATURE
*feature
;
1856 TVINSERTSTRUCTW tvis
;
1857 HTREEITEM hitem
, hfirst
= NULL
;
1859 LIST_FOR_EACH_ENTRY( feature
, &package
->features
, MSIFEATURE
, entry
)
1861 if ( lstrcmpW( parent
, feature
->Feature_Parent
) )
1864 if ( !feature
->Title
)
1867 if ( !feature
->Display
)
1870 memset( &tvis
, 0, sizeof tvis
);
1871 tvis
.hParent
= hParent
;
1872 tvis
.hInsertAfter
= TVI_LAST
;
1873 tvis
.u
.item
.mask
= TVIF_TEXT
| TVIF_PARAM
;
1874 tvis
.u
.item
.pszText
= feature
->Title
;
1875 tvis
.u
.item
.lParam
= (LPARAM
) feature
;
1877 hitem
= (HTREEITEM
) SendMessageW( hwnd
, TVM_INSERTITEMW
, 0, (LPARAM
) &tvis
);
1884 msi_seltree_sync_item_state( hwnd
, feature
, hitem
);
1885 msi_seltree_add_child_features( package
, hwnd
,
1886 feature
->Feature
, hitem
);
1888 /* the node is expanded if Display is odd */
1889 if ( feature
->Display
% 2 != 0 )
1890 SendMessageW( hwnd
, TVM_EXPAND
, TVE_EXPAND
, (LPARAM
) hitem
);
1893 /* select the first item */
1894 SendMessageW( hwnd
, TVM_SELECTITEM
, TVGN_CARET
| TVGN_DROPHILITE
, (LPARAM
) hfirst
);
1895 info
->selected
= hfirst
;
1898 static void msi_seltree_create_imagelist( HWND hwnd
)
1900 const int bm_width
= 32, bm_height
= 16, bm_count
= 3;
1901 const int bm_resource
= 0x1001;
1906 himl
= ImageList_Create( bm_width
, bm_height
, FALSE
, 4, 0 );
1909 ERR("failed to create image list\n");
1913 for (i
=0; i
<bm_count
; i
++)
1915 hbmp
= LoadBitmapW( msi_hInstance
, MAKEINTRESOURCEW(i
+bm_resource
) );
1918 ERR("failed to load bitmap %d\n", i
);
1923 * Add a dummy bitmap at offset zero because the treeview
1924 * can't use it as a state mask (zero means no user state).
1927 ImageList_Add( himl
, hbmp
, NULL
);
1929 ImageList_Add( himl
, hbmp
, NULL
);
1932 SendMessageW( hwnd
, TVM_SETIMAGELIST
, TVSIL_STATE
, (LPARAM
)himl
);
1935 static UINT
msi_dialog_seltree_handler( msi_dialog
*dialog
,
1936 msi_control
*control
, WPARAM param
)
1938 struct msi_selection_tree_info
*info
= GetPropW( control
->hwnd
, szButtonData
);
1939 LPNMTREEVIEWW tv
= (LPNMTREEVIEWW
)param
;
1940 MSIRECORD
*row
, *rec
;
1943 UINT r
= ERROR_SUCCESS
;
1945 static const WCHAR select
[] = {
1946 'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
1947 '`','F','e','a','t','u','r','e','`',' ','W','H','E','R','E',' ',
1948 '`','T','i','t','l','e','`',' ','=',' ','\'','%','s','\'',0
1951 if (tv
->hdr
.code
!= TVN_SELCHANGINGW
)
1952 return ERROR_SUCCESS
;
1954 info
->selected
= tv
->itemNew
.hItem
;
1956 row
= MSI_QueryGetRecord( dialog
->package
->db
, select
, tv
->itemNew
.pszText
);
1958 return ERROR_FUNCTION_FAILED
;
1960 rec
= MSI_CreateRecord( 1 );
1962 MSI_RecordSetStringW( rec
, 1, MSI_RecordGetString( row
, 4 ) );
1963 ControlEvent_FireSubscribedEvent( dialog
->package
, szSelectionDescription
, rec
);
1965 dir
= MSI_RecordGetString( row
, 7 );
1966 folder
= get_loaded_folder( dialog
->package
, dir
);
1969 r
= ERROR_FUNCTION_FAILED
;
1973 MSI_RecordSetStringW( rec
, 1, folder
->ResolvedTarget
);
1974 ControlEvent_FireSubscribedEvent( dialog
->package
, szSelectionPath
, rec
);
1977 msiobj_release(&row
->hdr
);
1978 msiobj_release(&rec
->hdr
);
1983 static UINT
msi_dialog_selection_tree( msi_dialog
*dialog
, MSIRECORD
*rec
)
1985 msi_control
*control
;
1987 MSIPACKAGE
*package
= dialog
->package
;
1989 struct msi_selection_tree_info
*info
;
1991 info
= msi_alloc( sizeof *info
);
1993 return ERROR_FUNCTION_FAILED
;
1995 /* create the treeview control */
1996 style
= TVS_HASLINES
| TVS_HASBUTTONS
| TVS_LINESATROOT
;
1997 style
|= WS_GROUP
| WS_VSCROLL
;
1998 control
= msi_dialog_add_control( dialog
, rec
, WC_TREEVIEWW
, style
);
2002 return ERROR_FUNCTION_FAILED
;
2005 control
->handler
= msi_dialog_seltree_handler
;
2006 control
->attributes
= MSI_RecordGetInteger( rec
, 8 );
2007 prop
= MSI_RecordGetString( rec
, 9 );
2008 control
->property
= msi_dialog_dup_property( dialog
, prop
, FALSE
);
2011 info
->dialog
= dialog
;
2012 info
->hwnd
= control
->hwnd
;
2013 info
->oldproc
= (WNDPROC
) SetWindowLongPtrW( control
->hwnd
, GWLP_WNDPROC
,
2014 (LONG_PTR
)MSISelectionTree_WndProc
);
2015 SetPropW( control
->hwnd
, szButtonData
, info
);
2017 ControlEvent_SubscribeToEvent( dialog
->package
, dialog
,
2018 szSelectionPath
, control
->name
, szProperty
);
2021 msi_seltree_create_imagelist( control
->hwnd
);
2022 msi_seltree_add_child_features( package
, control
->hwnd
, NULL
, NULL
);
2024 return ERROR_SUCCESS
;
2027 /******************** Group Box ***************************************/
2029 static UINT
msi_dialog_group_box( msi_dialog
*dialog
, MSIRECORD
*rec
)
2031 msi_control
*control
;
2034 style
= BS_GROUPBOX
| WS_CHILD
| WS_GROUP
;
2035 control
= msi_dialog_add_control( dialog
, rec
, WC_BUTTONW
, style
);
2037 return ERROR_FUNCTION_FAILED
;
2039 return ERROR_SUCCESS
;
2042 /******************** List Box ***************************************/
2044 struct msi_listbox_item
2050 struct msi_listbox_info
2056 struct msi_listbox_item
*items
;
2059 static LRESULT WINAPI
MSIListBox_WndProc(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
2061 struct msi_listbox_info
*info
;
2065 TRACE("%p %04x %08x %08lx\n", hWnd
, msg
, wParam
, lParam
);
2067 info
= GetPropW( hWnd
, szButtonData
);
2071 r
= CallWindowProcW( info
->oldproc
, hWnd
, msg
, wParam
, lParam
);
2076 for (j
= 0; j
< info
->num_items
; j
++)
2078 msi_free( info
->items
[j
].property
);
2079 msi_free( info
->items
[j
].value
);
2081 msi_free( info
->items
);
2083 RemovePropW( hWnd
, szButtonData
);
2090 static UINT
msi_listbox_add_item( MSIRECORD
*rec
, LPVOID param
)
2092 struct msi_listbox_info
*info
= param
;
2093 struct msi_listbox_item
*item
;
2094 LPCWSTR property
, value
, text
;
2095 static int index
= 0;
2097 item
= &info
->items
[index
++];
2098 property
= MSI_RecordGetString( rec
, 1 );
2099 value
= MSI_RecordGetString( rec
, 3 );
2100 text
= MSI_RecordGetString( rec
, 4 );
2102 item
->property
= strdupW( property
);
2103 item
->value
= strdupW( value
);
2105 SendMessageW( info
->hwnd
, LB_ADDSTRING
, 0, (LPARAM
)text
);
2107 return ERROR_SUCCESS
;
2110 static UINT
msi_listbox_add_items( struct msi_listbox_info
*info
)
2113 MSIQUERY
*view
= NULL
;
2116 static const WCHAR query
[] = {
2117 'S','E','L','E','C','T',' ','*',' ',
2118 'F','R','O','M',' ','`','L','i','s','t','B','o','x','`',' ',
2119 'O','R','D','E','R',' ','B','Y',' ','`','O','r','d','e','r','`',0
2122 r
= MSI_OpenQuery( info
->dialog
->package
->db
, &view
, query
);
2123 if ( r
!= ERROR_SUCCESS
)
2126 /* just get the number of records */
2127 r
= MSI_IterateRecords( view
, &count
, NULL
, NULL
);
2129 info
->num_items
= count
;
2130 info
->items
= msi_alloc( sizeof(*info
->items
) * count
);
2132 r
= MSI_IterateRecords( view
, NULL
, msi_listbox_add_item
, info
);
2133 msiobj_release( &view
->hdr
);
2138 static UINT
msi_dialog_listbox_handler( msi_dialog
*dialog
,
2139 msi_control
*control
, WPARAM param
)
2141 struct msi_listbox_info
*info
;
2144 if( HIWORD(param
) != LBN_SELCHANGE
)
2145 return ERROR_SUCCESS
;
2147 info
= GetPropW( control
->hwnd
, szButtonData
);
2148 index
= SendMessageW( control
->hwnd
, LB_GETCURSEL
, 0, 0 );
2150 MSI_SetPropertyW( info
->dialog
->package
,
2151 info
->items
[index
].property
, info
->items
[index
].value
);
2152 msi_dialog_evaluate_control_conditions( info
->dialog
);
2154 return ERROR_SUCCESS
;
2157 static UINT
msi_dialog_list_box( msi_dialog
*dialog
, MSIRECORD
*rec
)
2159 struct msi_listbox_info
*info
;
2160 msi_control
*control
;
2163 info
= msi_alloc( sizeof *info
);
2165 return ERROR_FUNCTION_FAILED
;
2167 style
= WS_TABSTOP
| WS_GROUP
| WS_CHILD
| LBS_STANDARD
;
2168 control
= msi_dialog_add_control( dialog
, rec
, WC_LISTBOXW
, style
);
2170 return ERROR_FUNCTION_FAILED
;
2172 control
->handler
= msi_dialog_listbox_handler
;
2175 info
->dialog
= dialog
;
2176 info
->hwnd
= control
->hwnd
;
2178 info
->oldproc
= (WNDPROC
)SetWindowLongPtrW( control
->hwnd
, GWLP_WNDPROC
,
2179 (LONG_PTR
)MSIListBox_WndProc
);
2180 SetPropW( control
->hwnd
, szButtonData
, info
);
2182 msi_listbox_add_items( info
);
2184 return ERROR_SUCCESS
;
2187 /******************** Directory Combo ***************************************/
2189 static void msi_dialog_update_directory_combo( msi_dialog
*dialog
, msi_control
*control
)
2194 if (!control
&& !(control
= msi_dialog_find_control_by_type( dialog
, szDirectoryCombo
)))
2197 indirect
= control
->attributes
& msidbControlAttributesIndirect
;
2198 prop
= msi_dialog_dup_property( dialog
, control
->property
, indirect
);
2199 path
= msi_dialog_dup_property( dialog
, prop
, TRUE
);
2201 PathStripPathW( path
);
2202 PathRemoveBackslashW( path
);
2204 SendMessageW( control
->hwnd
, CB_INSERTSTRING
, 0, (LPARAM
)path
);
2205 SendMessageW( control
->hwnd
, CB_SETCURSEL
, 0, 0 );
2211 static UINT
msi_dialog_directory_combo( msi_dialog
*dialog
, MSIRECORD
*rec
)
2213 msi_control
*control
;
2217 /* FIXME: use CBS_OWNERDRAWFIXED and add owner draw code */
2218 style
= CBS_DROPDOWNLIST
| CBS_HASSTRINGS
| WS_CHILD
|
2219 WS_GROUP
| WS_TABSTOP
| WS_VSCROLL
;
2220 control
= msi_dialog_add_control( dialog
, rec
, WC_COMBOBOXW
, style
);
2222 return ERROR_FUNCTION_FAILED
;
2224 control
->attributes
= MSI_RecordGetInteger( rec
, 8 );
2225 prop
= MSI_RecordGetString( rec
, 9 );
2226 control
->property
= msi_dialog_dup_property( dialog
, prop
, FALSE
);
2228 msi_dialog_update_directory_combo( dialog
, control
);
2230 return ERROR_SUCCESS
;
2233 /******************** Directory List ***************************************/
2235 static void msi_dialog_update_directory_list( msi_dialog
*dialog
, msi_control
*control
)
2237 WCHAR dir_spec
[MAX_PATH
];
2238 WIN32_FIND_DATAW wfd
;
2244 static const WCHAR asterisk
[] = {'*',0};
2245 static const WCHAR dot
[] = {'.',0};
2246 static const WCHAR dotdot
[] = {'.','.',0};
2248 if (!control
&& !(control
= msi_dialog_find_control_by_type( dialog
, szDirectoryList
)))
2251 /* clear the list-view */
2252 SendMessageW( control
->hwnd
, LVM_DELETEALLITEMS
, 0, 0 );
2254 indirect
= control
->attributes
& msidbControlAttributesIndirect
;
2255 prop
= msi_dialog_dup_property( dialog
, control
->property
, indirect
);
2256 path
= msi_dialog_dup_property( dialog
, prop
, TRUE
);
2258 lstrcpyW( dir_spec
, path
);
2259 lstrcatW( dir_spec
, asterisk
);
2261 file
= FindFirstFileW( dir_spec
, &wfd
);
2262 if ( file
== INVALID_HANDLE_VALUE
)
2267 if ( wfd
.dwFileAttributes
!= FILE_ATTRIBUTE_DIRECTORY
)
2270 if ( !lstrcmpW( wfd
.cFileName
, dot
) || !lstrcmpW( wfd
.cFileName
, dotdot
) )
2273 item
.mask
= LVIF_TEXT
;
2274 item
.cchTextMax
= MAX_PATH
;
2277 item
.pszText
= wfd
.cFileName
;
2279 SendMessageW( control
->hwnd
, LVM_INSERTITEMW
, 0, (LPARAM
)&item
);
2280 } while ( FindNextFileW( file
, &wfd
) );
2287 UINT
msi_dialog_directorylist_up( msi_dialog
*dialog
)
2289 msi_control
*control
;
2290 LPWSTR prop
, path
, ptr
;
2293 control
= msi_dialog_find_control_by_type( dialog
, szDirectoryList
);
2294 indirect
= control
->attributes
& msidbControlAttributesIndirect
;
2295 prop
= msi_dialog_dup_property( dialog
, control
->property
, indirect
);
2296 path
= msi_dialog_dup_property( dialog
, prop
, TRUE
);
2298 /* strip off the last directory */
2299 ptr
= PathFindFileNameW( path
);
2300 if (ptr
!= path
) *(ptr
- 1) = '\0';
2301 PathAddBackslashW( path
);
2303 MSI_SetPropertyW( dialog
->package
, prop
, path
);
2305 msi_dialog_update_directory_list( dialog
, NULL
);
2306 msi_dialog_update_directory_combo( dialog
, NULL
);
2307 msi_dialog_update_pathedit( dialog
, NULL
);
2312 return ERROR_SUCCESS
;
2315 static UINT
msi_dialog_dirlist_handler( msi_dialog
*dialog
,
2316 msi_control
*control
, WPARAM param
)
2318 LPNMHDR nmhdr
= (LPNMHDR
)param
;
2319 WCHAR new_path
[MAX_PATH
];
2320 WCHAR text
[MAX_PATH
];
2326 static const WCHAR backslash
[] = {'\\',0};
2328 if (nmhdr
->code
!= LVN_ITEMACTIVATE
)
2329 return ERROR_SUCCESS
;
2331 index
= SendMessageW( control
->hwnd
, LVM_GETNEXTITEM
, -1, LVNI_SELECTED
);
2334 ERR("No list-view item selected!\n");
2335 return ERROR_FUNCTION_FAILED
;
2339 item
.pszText
= text
;
2340 item
.cchTextMax
= MAX_PATH
;
2341 SendMessageW( control
->hwnd
, LVM_GETITEMTEXTW
, index
, (LPARAM
)&item
);
2343 indirect
= control
->attributes
& msidbControlAttributesIndirect
;
2344 prop
= msi_dialog_dup_property( dialog
, control
->property
, indirect
);
2345 path
= msi_dialog_dup_property( dialog
, prop
, TRUE
);
2347 lstrcpyW( new_path
, path
);
2348 lstrcatW( new_path
, text
);
2349 lstrcatW( new_path
, backslash
);
2351 MSI_SetPropertyW( dialog
->package
, prop
, new_path
);
2353 msi_dialog_update_directory_list( dialog
, NULL
);
2354 msi_dialog_update_directory_combo( dialog
, NULL
);
2355 msi_dialog_update_pathedit( dialog
, NULL
);
2359 return ERROR_SUCCESS
;
2362 static UINT
msi_dialog_directory_list( msi_dialog
*dialog
, MSIRECORD
*rec
)
2364 msi_control
*control
;
2368 style
= LVS_LIST
| WS_VSCROLL
| LVS_SHAREIMAGELISTS
|
2369 LVS_AUTOARRANGE
| LVS_SINGLESEL
| WS_BORDER
|
2370 LVS_SORTASCENDING
| WS_CHILD
| WS_GROUP
| WS_TABSTOP
;
2371 control
= msi_dialog_add_control( dialog
, rec
, WC_LISTVIEWW
, style
);
2373 return ERROR_FUNCTION_FAILED
;
2375 control
->attributes
= MSI_RecordGetInteger( rec
, 8 );
2376 control
->handler
= msi_dialog_dirlist_handler
;
2377 prop
= MSI_RecordGetString( rec
, 9 );
2378 control
->property
= msi_dialog_dup_property( dialog
, prop
, FALSE
);
2380 /* double click to activate an item in the list */
2381 SendMessageW( control
->hwnd
, LVM_SETEXTENDEDLISTVIEWSTYLE
,
2382 0, LVS_EX_TWOCLICKACTIVATE
);
2384 msi_dialog_update_directory_list( dialog
, control
);
2386 return ERROR_SUCCESS
;
2389 /******************** VolumeCost List ***************************************/
2391 static BOOL
str_is_number( LPCWSTR str
)
2395 for (i
= 0; i
< lstrlenW( str
); i
++)
2396 if (!isdigitW(str
[i
]))
2402 static const WCHAR column_keys
[][80] =
2404 {'V','o','l','u','m','e','C','o','s','t','V','o','l','u','m','e',0},
2405 {'V','o','l','u','m','e','C','o','s','t','S','i','z','e',0},
2406 {'V','o','l','u','m','e','C','o','s','t','A','v','a','i','l','a','b','l','e',0},
2407 {'V','o','l','u','m','e','C','o','s','t','R','e','q','u','i','r','e','d',0},
2408 {'V','o','l','u','m','e','C','o','s','t','D','i','f','f','e','r','e','n','c','e',0}
2411 static void msi_dialog_vcl_add_columns( msi_dialog
*dialog
, msi_control
*control
, MSIRECORD
*rec
)
2413 LPCWSTR text
= MSI_RecordGetString( rec
, 10 );
2414 LPCWSTR begin
= text
, end
;
2419 static const WCHAR zero
[] = {'0',0};
2420 static const WCHAR negative
[] = {'-',0};
2422 while ((begin
= strchrW( begin
, '{' )) && count
< 5)
2424 if (!(end
= strchrW( begin
, '}' )))
2427 lstrcpynW( num
, begin
+ 1, end
- begin
);
2428 begin
+= end
- begin
+ 1;
2430 /* empty braces or '0' hides the column */
2431 if ( !num
[0] || !lstrcmpW( num
, zero
) )
2437 /* the width must be a positive number
2438 * if a width is invalid, all remaining columns are hidden
2440 if ( !strncmpW( num
, negative
, 1 ) || !str_is_number( num
) )
2443 ZeroMemory( &lvc
, sizeof(lvc
) );
2444 lvc
.mask
= LVCF_TEXT
| LVCF_WIDTH
| LVCF_SUBITEM
;
2445 lvc
.cx
= atolW( num
);
2446 lvc
.pszText
= msi_dialog_get_uitext( dialog
, column_keys
[count
] );
2448 SendMessageW( control
->hwnd
, LVM_INSERTCOLUMNW
, count
++, (LPARAM
)&lvc
);
2449 msi_free( lvc
.pszText
);
2453 static void msi_dialog_vcl_add_drives( msi_dialog
*dialog
, msi_control
*control
)
2455 ULARGE_INTEGER total
, free
;
2456 WCHAR size_text
[MAX_PATH
];
2462 size
= GetLogicalDriveStringsW( 0, NULL
);
2463 if ( !size
) return;
2465 drives
= msi_alloc( (size
+ 1) * sizeof(WCHAR
) );
2466 if ( !drives
) return;
2468 GetLogicalDriveStringsW( size
, drives
);
2473 lvitem
.mask
= LVIF_TEXT
;
2475 lvitem
.iSubItem
= 0;
2476 lvitem
.pszText
= ptr
;
2477 lvitem
.cchTextMax
= lstrlenW(ptr
) + 1;
2478 SendMessageW( control
->hwnd
, LVM_INSERTITEMW
, 0, (LPARAM
)&lvitem
);
2480 GetDiskFreeSpaceExW(ptr
, &free
, &total
, NULL
);
2482 StrFormatByteSizeW(total
.QuadPart
, size_text
, MAX_PATH
);
2483 lvitem
.iSubItem
= 1;
2484 lvitem
.pszText
= size_text
;
2485 lvitem
.cchTextMax
= lstrlenW(size_text
) + 1;
2486 SendMessageW( control
->hwnd
, LVM_SETITEMW
, 0, (LPARAM
)&lvitem
);
2488 StrFormatByteSizeW(free
.QuadPart
, size_text
, MAX_PATH
);
2489 lvitem
.iSubItem
= 2;
2490 lvitem
.pszText
= size_text
;
2491 lvitem
.cchTextMax
= lstrlenW(size_text
) + 1;
2492 SendMessageW( control
->hwnd
, LVM_SETITEMW
, 0, (LPARAM
)&lvitem
);
2494 ptr
+= lstrlenW(ptr
) + 1;
2501 static UINT
msi_dialog_volumecost_list( msi_dialog
*dialog
, MSIRECORD
*rec
)
2503 msi_control
*control
;
2506 style
= LVS_REPORT
| WS_VSCROLL
| WS_HSCROLL
| LVS_SHAREIMAGELISTS
|
2507 LVS_AUTOARRANGE
| LVS_SINGLESEL
| WS_BORDER
|
2508 WS_CHILD
| WS_TABSTOP
| WS_GROUP
;
2509 control
= msi_dialog_add_control( dialog
, rec
, WC_LISTVIEWW
, style
);
2511 return ERROR_FUNCTION_FAILED
;
2513 msi_dialog_vcl_add_columns( dialog
, control
, rec
);
2514 msi_dialog_vcl_add_drives( dialog
, control
);
2516 return ERROR_SUCCESS
;
2519 static const struct control_handler msi_dialog_handler
[] =
2521 { szText
, msi_dialog_text_control
},
2522 { szPushButton
, msi_dialog_button_control
},
2523 { szLine
, msi_dialog_line_control
},
2524 { szBitmap
, msi_dialog_bitmap_control
},
2525 { szCheckBox
, msi_dialog_checkbox_control
},
2526 { szScrollableText
, msi_dialog_scrolltext_control
},
2527 { szComboBox
, msi_dialog_combo_control
},
2528 { szEdit
, msi_dialog_edit_control
},
2529 { szMaskedEdit
, msi_dialog_maskedit_control
},
2530 { szPathEdit
, msi_dialog_pathedit_control
},
2531 { szProgressBar
, msi_dialog_progress_bar
},
2532 { szRadioButtonGroup
, msi_dialog_radiogroup_control
},
2533 { szIcon
, msi_dialog_icon_control
},
2534 { szSelectionTree
, msi_dialog_selection_tree
},
2535 { szGroupBox
, msi_dialog_group_box
},
2536 { szListBox
, msi_dialog_list_box
},
2537 { szDirectoryCombo
, msi_dialog_directory_combo
},
2538 { szDirectoryList
, msi_dialog_directory_list
},
2539 { szVolumeCostList
, msi_dialog_volumecost_list
},
2542 #define NUM_CONTROL_TYPES (sizeof msi_dialog_handler/sizeof msi_dialog_handler[0])
2544 static UINT
msi_dialog_create_controls( MSIRECORD
*rec
, LPVOID param
)
2546 msi_dialog
*dialog
= param
;
2547 LPCWSTR control_type
;
2550 /* find and call the function that can create this type of control */
2551 control_type
= MSI_RecordGetString( rec
, 3 );
2552 for( i
=0; i
<NUM_CONTROL_TYPES
; i
++ )
2553 if (!strcmpiW( msi_dialog_handler
[i
].control_type
, control_type
))
2555 if( i
!= NUM_CONTROL_TYPES
)
2556 msi_dialog_handler
[i
].func( dialog
, rec
);
2558 ERR("no handler for element type %s\n", debugstr_w(control_type
));
2560 return ERROR_SUCCESS
;
2563 static UINT
msi_dialog_fill_controls( msi_dialog
*dialog
)
2565 static const WCHAR query
[] = {
2566 'S','E','L','E','C','T',' ','*',' ',
2567 'F','R','O','M',' ','C','o','n','t','r','o','l',' ',
2568 'W','H','E','R','E',' ',
2569 '`','D','i','a','l','o','g','_','`',' ','=',' ','\'','%','s','\'',0};
2571 MSIQUERY
*view
= NULL
;
2572 MSIPACKAGE
*package
= dialog
->package
;
2574 TRACE("%p %s\n", dialog
, debugstr_w(dialog
->name
) );
2576 /* query the Control table for all the elements of the control */
2577 r
= MSI_OpenQuery( package
->db
, &view
, query
, dialog
->name
);
2578 if( r
!= ERROR_SUCCESS
)
2580 ERR("query failed for dialog %s\n", debugstr_w(dialog
->name
));
2581 return ERROR_INVALID_PARAMETER
;
2584 r
= MSI_IterateRecords( view
, 0, msi_dialog_create_controls
, dialog
);
2585 msiobj_release( &view
->hdr
);
2590 static UINT
msi_dialog_set_control_condition( MSIRECORD
*rec
, LPVOID param
)
2592 static const WCHAR szHide
[] = { 'H','i','d','e',0 };
2593 static const WCHAR szShow
[] = { 'S','h','o','w',0 };
2594 static const WCHAR szDisable
[] = { 'D','i','s','a','b','l','e',0 };
2595 static const WCHAR szEnable
[] = { 'E','n','a','b','l','e',0 };
2596 msi_dialog
*dialog
= param
;
2597 msi_control
*control
;
2598 LPCWSTR name
, action
, condition
;
2601 name
= MSI_RecordGetString( rec
, 2 );
2602 action
= MSI_RecordGetString( rec
, 3 );
2603 condition
= MSI_RecordGetString( rec
, 4 );
2604 r
= MSI_EvaluateConditionW( dialog
->package
, condition
);
2605 control
= msi_dialog_find_control( dialog
, name
);
2606 if( r
== MSICONDITION_TRUE
&& control
)
2608 TRACE("%s control %s\n", debugstr_w(action
), debugstr_w(name
));
2610 /* FIXME: case sensitive? */
2611 if(!lstrcmpW(action
, szHide
))
2612 ShowWindow(control
->hwnd
, SW_HIDE
);
2613 else if(!strcmpW(action
, szShow
))
2614 ShowWindow(control
->hwnd
, SW_SHOW
);
2615 else if(!strcmpW(action
, szDisable
))
2616 EnableWindow(control
->hwnd
, FALSE
);
2617 else if(!strcmpW(action
, szEnable
))
2618 EnableWindow(control
->hwnd
, TRUE
);
2620 FIXME("Unhandled action %s\n", debugstr_w(action
));
2623 return ERROR_SUCCESS
;
2626 static UINT
msi_dialog_evaluate_control_conditions( msi_dialog
*dialog
)
2628 static const WCHAR query
[] = {
2629 'S','E','L','E','C','T',' ','*',' ',
2630 'F','R','O','M',' ',
2631 'C','o','n','t','r','o','l','C','o','n','d','i','t','i','o','n',' ',
2632 'W','H','E','R','E',' ',
2633 '`','D','i','a','l','o','g','_','`',' ','=',' ','\'','%','s','\'',0
2636 MSIQUERY
*view
= NULL
;
2637 MSIPACKAGE
*package
= dialog
->package
;
2639 TRACE("%p %s\n", dialog
, debugstr_w(dialog
->name
) );
2641 /* query the Control table for all the elements of the control */
2642 r
= MSI_OpenQuery( package
->db
, &view
, query
, dialog
->name
);
2643 if( r
!= ERROR_SUCCESS
)
2644 return ERROR_SUCCESS
;
2646 r
= MSI_IterateRecords( view
, 0, msi_dialog_set_control_condition
, dialog
);
2647 msiobj_release( &view
->hdr
);
2652 UINT
msi_dialog_reset( msi_dialog
*dialog
)
2654 /* FIXME: should restore the original values of any properties we changed */
2655 return msi_dialog_evaluate_control_conditions( dialog
);
2658 /* figure out the height of 10 point MS Sans Serif */
2659 static INT
msi_dialog_get_sans_serif_height( HWND hwnd
)
2661 static const WCHAR szSansSerif
[] = {
2662 'M','S',' ','S','a','n','s',' ','S','e','r','i','f',0 };
2667 HFONT hFont
, hOldFont
;
2670 hdc
= GetDC( hwnd
);
2673 memset( &lf
, 0, sizeof lf
);
2674 lf
.lfHeight
= MulDiv(10, GetDeviceCaps(hdc
, LOGPIXELSY
), 72);
2675 strcpyW( lf
.lfFaceName
, szSansSerif
);
2676 hFont
= CreateFontIndirectW(&lf
);
2679 hOldFont
= SelectObject( hdc
, hFont
);
2680 r
= GetTextMetricsW( hdc
, &tm
);
2682 height
= tm
.tmHeight
;
2683 SelectObject( hdc
, hOldFont
);
2684 DeleteObject( hFont
);
2686 ReleaseDC( hwnd
, hdc
);
2691 /* fetch the associated record from the Dialog table */
2692 static MSIRECORD
*msi_get_dialog_record( msi_dialog
*dialog
)
2694 static const WCHAR query
[] = {
2695 'S','E','L','E','C','T',' ','*',' ',
2696 'F','R','O','M',' ','D','i','a','l','o','g',' ',
2697 'W','H','E','R','E',' ',
2698 '`','D','i','a','l','o','g','`',' ','=',' ','\'','%','s','\'',0};
2699 MSIPACKAGE
*package
= dialog
->package
;
2700 MSIRECORD
*rec
= NULL
;
2702 TRACE("%p %s\n", dialog
, debugstr_w(dialog
->name
) );
2704 rec
= MSI_QueryGetRecord( package
->db
, query
, dialog
->name
);
2706 ERR("query failed for dialog %s\n", debugstr_w(dialog
->name
));
2711 static void msi_dialog_adjust_dialog_pos( msi_dialog
*dialog
, MSIRECORD
*rec
, LPRECT pos
)
2713 static const WCHAR szScreenX
[] = {'S','c','r','e','e','n','X',0};
2714 static const WCHAR szScreenY
[] = {'S','c','r','e','e','n','Y',0};
2721 center
.x
= MSI_RecordGetInteger( rec
, 2 );
2722 center
.y
= MSI_RecordGetInteger( rec
, 3 );
2724 sz
.cx
= MSI_RecordGetInteger( rec
, 4 );
2725 sz
.cy
= MSI_RecordGetInteger( rec
, 5 );
2727 sz
.cx
= msi_dialog_scale_unit( dialog
, sz
.cx
);
2728 sz
.cy
= msi_dialog_scale_unit( dialog
, sz
.cy
);
2730 xres
= msi_get_property_int( dialog
->package
, szScreenX
, 0 );
2731 yres
= msi_get_property_int( dialog
->package
, szScreenY
, 0 );
2733 center
.x
= MulDiv( center
.x
, xres
, 100 );
2734 center
.y
= MulDiv( center
.y
, yres
, 100 );
2736 /* turn the client pos into the window rectangle */
2737 if (dialog
->package
->center_x
&& dialog
->package
->center_y
)
2739 pos
->left
= dialog
->package
->center_x
- sz
.cx
/ 2.0;
2740 pos
->right
= pos
->left
+ sz
.cx
;
2741 pos
->top
= dialog
->package
->center_y
- sz
.cy
/ 2.0;
2742 pos
->bottom
= pos
->top
+ sz
.cy
;
2746 pos
->left
= center
.x
- sz
.cx
/2;
2747 pos
->right
= pos
->left
+ sz
.cx
;
2748 pos
->top
= center
.y
- sz
.cy
/2;
2749 pos
->bottom
= pos
->top
+ sz
.cy
;
2751 /* save the center */
2752 dialog
->package
->center_x
= center
.x
;
2753 dialog
->package
->center_y
= center
.y
;
2756 dialog
->size
.cx
= sz
.cx
;
2757 dialog
->size
.cy
= sz
.cy
;
2759 TRACE("%u %u %u %u\n", pos
->left
, pos
->top
, pos
->right
, pos
->bottom
);
2761 style
= GetWindowLongPtrW( dialog
->hwnd
, GWL_STYLE
);
2762 AdjustWindowRect( pos
, style
, FALSE
);
2765 static BOOL
msi_control_set_next( msi_control
*control
, msi_control
*next
)
2767 return SetWindowPos( next
->hwnd
, control
->hwnd
, 0, 0, 0, 0,
2768 SWP_NOMOVE
| SWP_NOOWNERZORDER
| SWP_NOREDRAW
|
2769 SWP_NOREPOSITION
| SWP_NOSENDCHANGING
| SWP_NOSIZE
);
2772 static UINT
msi_dialog_set_tab_order( msi_dialog
*dialog
)
2774 msi_control
*control
, *tab_next
;
2776 LIST_FOR_EACH_ENTRY( control
, &dialog
->controls
, msi_control
, entry
)
2778 tab_next
= msi_dialog_find_control( dialog
, control
->tabnext
);
2781 msi_control_set_next( control
, tab_next
);
2784 return ERROR_SUCCESS
;
2787 static void msi_dialog_set_first_control( msi_dialog
* dialog
, LPCWSTR name
)
2789 msi_control
*control
;
2791 control
= msi_dialog_find_control( dialog
, name
);
2793 dialog
->hWndFocus
= control
->hwnd
;
2795 dialog
->hWndFocus
= NULL
;
2798 static LRESULT
msi_dialog_oncreate( HWND hwnd
, LPCREATESTRUCTW cs
)
2800 static const WCHAR df
[] = {
2801 'D','e','f','a','u','l','t','U','I','F','o','n','t',0 };
2802 static const WCHAR dfv
[] = {
2803 'M','S',' ','S','h','e','l','l',' ','D','l','g',0 };
2804 msi_dialog
*dialog
= (msi_dialog
*) cs
->lpCreateParams
;
2805 MSIRECORD
*rec
= NULL
;
2806 LPWSTR title
= NULL
;
2809 TRACE("%p %p\n", dialog
, dialog
->package
);
2811 dialog
->hwnd
= hwnd
;
2812 SetWindowLongPtrW( hwnd
, GWLP_USERDATA
, (LONG_PTR
) dialog
);
2814 rec
= msi_get_dialog_record( dialog
);
2817 TRACE("No record found for dialog %s\n", debugstr_w(dialog
->name
));
2821 dialog
->scale
= msi_dialog_get_sans_serif_height(dialog
->hwnd
);
2823 msi_dialog_adjust_dialog_pos( dialog
, rec
, &pos
);
2825 dialog
->attributes
= MSI_RecordGetInteger( rec
, 6 );
2827 dialog
->default_font
= msi_dup_property( dialog
->package
, df
);
2828 if (!dialog
->default_font
)
2830 dialog
->default_font
= strdupW(dfv
);
2831 if (!dialog
->default_font
) return -1;
2834 title
= msi_get_deformatted_field( dialog
->package
, rec
, 7 );
2835 SetWindowTextW( hwnd
, title
);
2838 SetWindowPos( hwnd
, 0, pos
.left
, pos
.top
,
2839 pos
.right
- pos
.left
, pos
.bottom
- pos
.top
,
2840 SWP_NOACTIVATE
| SWP_NOZORDER
| SWP_NOREDRAW
);
2842 msi_dialog_build_font_list( dialog
);
2843 msi_dialog_fill_controls( dialog
);
2844 msi_dialog_evaluate_control_conditions( dialog
);
2845 msi_dialog_set_tab_order( dialog
);
2846 msi_dialog_set_first_control( dialog
, MSI_RecordGetString( rec
, 8 ) );
2847 msiobj_release( &rec
->hdr
);
2852 static UINT
msi_dialog_send_event( msi_dialog
*dialog
, LPCWSTR event
, LPCWSTR arg
)
2854 LPWSTR event_fmt
= NULL
, arg_fmt
= NULL
;
2856 TRACE("Sending control event %s %s\n", debugstr_w(event
), debugstr_w(arg
));
2858 deformat_string( dialog
->package
, event
, &event_fmt
);
2859 deformat_string( dialog
->package
, arg
, &arg_fmt
);
2861 dialog
->event_handler( dialog
->package
, event_fmt
, arg_fmt
, dialog
);
2863 msi_free( event_fmt
);
2864 msi_free( arg_fmt
);
2866 return ERROR_SUCCESS
;
2869 static UINT
msi_dialog_set_property( msi_dialog
*dialog
, LPCWSTR event
, LPCWSTR arg
)
2871 static const WCHAR szNullArg
[] = { '{','}',0 };
2872 LPWSTR p
, prop
, arg_fmt
= NULL
;
2875 len
= strlenW(event
);
2876 prop
= msi_alloc( len
*sizeof(WCHAR
));
2877 strcpyW( prop
, &event
[1] );
2878 p
= strchrW( prop
, ']' );
2879 if( p
&& p
[1] == 0 )
2882 if( strcmpW( szNullArg
, arg
) )
2883 deformat_string( dialog
->package
, arg
, &arg_fmt
);
2884 MSI_SetPropertyW( dialog
->package
, prop
, arg_fmt
);
2885 msi_free( arg_fmt
);
2888 ERR("Badly formatted property string - what happens?\n");
2890 return ERROR_SUCCESS
;
2893 static UINT
msi_dialog_control_event( MSIRECORD
*rec
, LPVOID param
)
2895 msi_dialog
*dialog
= param
;
2896 LPCWSTR condition
, event
, arg
;
2899 condition
= MSI_RecordGetString( rec
, 5 );
2900 r
= MSI_EvaluateConditionW( dialog
->package
, condition
);
2901 if( r
== MSICONDITION_TRUE
|| r
== MSICONDITION_NONE
)
2903 event
= MSI_RecordGetString( rec
, 3 );
2904 arg
= MSI_RecordGetString( rec
, 4 );
2905 if( event
[0] == '[' )
2906 msi_dialog_set_property( dialog
, event
, arg
);
2908 msi_dialog_send_event( dialog
, event
, arg
);
2911 return ERROR_SUCCESS
;
2920 static UINT
add_rec_to_list( MSIRECORD
*rec
, LPVOID param
)
2922 struct rec_list
*add_rec
;
2923 struct list
*records
= (struct list
*)param
;
2925 msiobj_addref( &rec
->hdr
);
2927 add_rec
= msi_alloc( sizeof( *add_rec
) );
2930 msiobj_release( &rec
->hdr
);
2931 return ERROR_OUTOFMEMORY
;
2935 list_add_tail( records
, &add_rec
->entry
);
2936 return ERROR_SUCCESS
;
2939 static inline void remove_rec_from_list( struct rec_list
*rec_entry
)
2941 msiobj_release( &rec_entry
->rec
->hdr
);
2942 list_remove( &rec_entry
->entry
);
2943 msi_free( rec_entry
);
2946 static UINT
msi_dialog_button_handler( msi_dialog
*dialog
,
2947 msi_control
*control
, WPARAM param
)
2949 static const WCHAR query
[] = {
2950 'S','E','L','E','C','T',' ','*',' ',
2951 'F','R','O','M',' ','C','o','n','t','r','o','l','E','v','e','n','t',' ',
2952 'W','H','E','R','E',' ',
2953 '`','D','i','a','l','o','g','_','`',' ','=',' ','\'','%','s','\'',' ',
2955 '`','C','o','n','t','r','o','l','_','`',' ','=',' ','\'','%','s','\'',' ',
2956 'O','R','D','E','R',' ','B','Y',' ','`','O','r','d','e','r','i','n','g','`',0
2958 MSIQUERY
*view
= NULL
;
2959 struct rec_list
*rec_entry
, *next
;
2963 if( HIWORD(param
) != BN_CLICKED
)
2964 return ERROR_SUCCESS
;
2966 list_init( &events
);
2968 r
= MSI_OpenQuery( dialog
->package
->db
, &view
, query
,
2969 dialog
->name
, control
->name
);
2970 if( r
!= ERROR_SUCCESS
)
2972 ERR("query failed\n");
2976 r
= MSI_IterateRecords( view
, 0, add_rec_to_list
, &events
);
2977 msiobj_release( &view
->hdr
);
2978 if (r
!= ERROR_SUCCESS
)
2981 /* handle all SetProperty events first */
2982 LIST_FOR_EACH_ENTRY_SAFE( rec_entry
, next
, &events
, struct rec_list
, entry
)
2984 LPCWSTR event
= MSI_RecordGetString( rec_entry
->rec
, 3 );
2986 if ( event
[0] != '[' )
2989 r
= msi_dialog_control_event( rec_entry
->rec
, dialog
);
2990 remove_rec_from_list( rec_entry
);
2992 if ( r
!= ERROR_SUCCESS
)
2996 /* handle all other events */
2997 LIST_FOR_EACH_ENTRY_SAFE( rec_entry
, next
, &events
, struct rec_list
, entry
)
2999 r
= msi_dialog_control_event( rec_entry
->rec
, dialog
);
3000 remove_rec_from_list( rec_entry
);
3002 if ( r
!= ERROR_SUCCESS
)
3007 LIST_FOR_EACH_ENTRY_SAFE( rec_entry
, next
, &events
, struct rec_list
, entry
)
3009 remove_rec_from_list( rec_entry
);
3015 static UINT
msi_dialog_get_checkbox_state( msi_dialog
*dialog
,
3016 msi_control
*control
)
3018 WCHAR state
[2] = { 0 };
3021 MSI_GetPropertyW( dialog
->package
, control
->property
, state
, &sz
);
3022 return state
[0] ? 1 : 0;
3025 static void msi_dialog_set_checkbox_state( msi_dialog
*dialog
,
3026 msi_control
*control
, UINT state
)
3028 static const WCHAR szState
[] = { '1', 0 };
3031 /* if uncheck then the property is set to NULL */
3034 MSI_SetPropertyW( dialog
->package
, control
->property
, NULL
);
3038 /* check for a custom state */
3039 if (control
->value
&& control
->value
[0])
3040 val
= control
->value
;
3044 MSI_SetPropertyW( dialog
->package
, control
->property
, val
);
3047 static void msi_dialog_checkbox_sync_state( msi_dialog
*dialog
,
3048 msi_control
*control
)
3052 state
= msi_dialog_get_checkbox_state( dialog
, control
);
3053 SendMessageW( control
->hwnd
, BM_SETCHECK
,
3054 state
? BST_CHECKED
: BST_UNCHECKED
, 0 );
3057 static UINT
msi_dialog_checkbox_handler( msi_dialog
*dialog
,
3058 msi_control
*control
, WPARAM param
)
3062 if( HIWORD(param
) != BN_CLICKED
)
3063 return ERROR_SUCCESS
;
3065 TRACE("clicked checkbox %s, set %s\n", debugstr_w(control
->name
),
3066 debugstr_w(control
->property
));
3068 state
= msi_dialog_get_checkbox_state( dialog
, control
);
3069 state
= state
? 0 : 1;
3070 msi_dialog_set_checkbox_state( dialog
, control
, state
);
3071 msi_dialog_checkbox_sync_state( dialog
, control
);
3073 return msi_dialog_button_handler( dialog
, control
, param
);
3076 static UINT
msi_dialog_edit_handler( msi_dialog
*dialog
,
3077 msi_control
*control
, WPARAM param
)
3081 if( HIWORD(param
) != EN_CHANGE
)
3082 return ERROR_SUCCESS
;
3084 TRACE("edit %s contents changed, set %s\n", debugstr_w(control
->name
),
3085 debugstr_w(control
->property
));
3087 buf
= msi_get_window_text( control
->hwnd
);
3088 MSI_SetPropertyW( dialog
->package
, control
->property
, buf
);
3092 return ERROR_SUCCESS
;
3095 static UINT
msi_dialog_radiogroup_handler( msi_dialog
*dialog
,
3096 msi_control
*control
, WPARAM param
)
3098 if( HIWORD(param
) != BN_CLICKED
)
3099 return ERROR_SUCCESS
;
3101 TRACE("clicked radio button %s, set %s\n", debugstr_w(control
->name
),
3102 debugstr_w(control
->property
));
3104 MSI_SetPropertyW( dialog
->package
, control
->property
, control
->name
);
3106 return msi_dialog_button_handler( dialog
, control
, param
);
3109 static LRESULT
msi_dialog_oncommand( msi_dialog
*dialog
, WPARAM param
, HWND hwnd
)
3111 msi_control
*control
= NULL
;
3113 TRACE("%p %p %08x\n", dialog
, hwnd
, param
);
3118 control
= msi_dialog_find_control( dialog
, dialog
->control_default
);
3120 case 2: /* escape */
3121 control
= msi_dialog_find_control( dialog
, dialog
->control_cancel
);
3124 control
= msi_dialog_find_control_by_hwnd( dialog
, hwnd
);
3129 if( control
->handler
)
3131 control
->handler( dialog
, control
, param
);
3132 msi_dialog_evaluate_control_conditions( dialog
);
3136 ERR("button click from nowhere %p %d %p\n", dialog
, param
, hwnd
);
3140 static LRESULT
msi_dialog_onnotify( msi_dialog
*dialog
, LPARAM param
)
3142 LPNMHDR nmhdr
= (LPNMHDR
) param
;
3143 msi_control
*control
= msi_dialog_find_control_by_hwnd( dialog
, nmhdr
->hwndFrom
);
3145 TRACE("%p %p\n", dialog
, nmhdr
->hwndFrom
);
3147 if ( control
&& control
->handler
)
3148 control
->handler( dialog
, control
, param
);
3153 static void msi_dialog_setfocus( msi_dialog
*dialog
)
3155 HWND hwnd
= dialog
->hWndFocus
;
3157 hwnd
= GetNextDlgTabItem( dialog
->hwnd
, hwnd
, TRUE
);
3158 hwnd
= GetNextDlgTabItem( dialog
->hwnd
, hwnd
, FALSE
);
3160 dialog
->hWndFocus
= hwnd
;
3163 static LRESULT WINAPI
MSIDialog_WndProc( HWND hwnd
, UINT msg
,
3164 WPARAM wParam
, LPARAM lParam
)
3166 msi_dialog
*dialog
= (LPVOID
) GetWindowLongPtrW( hwnd
, GWLP_USERDATA
);
3168 TRACE("0x%04x\n", msg
);
3173 dialog
->package
->center_x
= LOWORD(lParam
) + dialog
->size
.cx
/ 2.0;
3174 dialog
->package
->center_y
= HIWORD(lParam
) + dialog
->size
.cy
/ 2.0;
3178 return msi_dialog_oncreate( hwnd
, (LPCREATESTRUCTW
)lParam
);
3181 return msi_dialog_oncommand( dialog
, wParam
, (HWND
)lParam
);
3184 if( LOWORD(wParam
) == WA_INACTIVE
)
3185 dialog
->hWndFocus
= GetFocus();
3187 msi_dialog_setfocus( dialog
);
3191 msi_dialog_setfocus( dialog
);
3194 /* bounce back to our subclassed static control */
3195 case WM_CTLCOLORSTATIC
:
3196 return SendMessageW( (HWND
) lParam
, WM_CTLCOLORSTATIC
, wParam
, lParam
);
3199 dialog
->hwnd
= NULL
;
3202 return msi_dialog_onnotify( dialog
, lParam
);
3204 return DefWindowProcW(hwnd
, msg
, wParam
, lParam
);
3207 static BOOL CALLBACK
msi_radioground_child_enum( HWND hWnd
, LPARAM lParam
)
3209 EnableWindow( hWnd
, lParam
);
3213 static LRESULT WINAPI
MSIRadioGroup_WndProc(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
3215 WNDPROC oldproc
= (WNDPROC
) GetPropW(hWnd
, szButtonData
);
3218 TRACE("hWnd %p msg %04x wParam 0x%08x lParam 0x%08lx\n", hWnd
, msg
, wParam
, lParam
);
3220 if (msg
== WM_COMMAND
) /* Forward notifications to dialog */
3221 SendMessageW(GetParent(hWnd
), msg
, wParam
, lParam
);
3223 r
= CallWindowProcW(oldproc
, hWnd
, msg
, wParam
, lParam
);
3225 /* make sure the radio buttons show as disabled if the parent is disabled */
3226 if (msg
== WM_ENABLE
)
3227 EnumChildWindows( hWnd
, msi_radioground_child_enum
, wParam
);
3232 static LRESULT WINAPI
MSIHiddenWindowProc( HWND hwnd
, UINT msg
,
3233 WPARAM wParam
, LPARAM lParam
)
3235 msi_dialog
*dialog
= (msi_dialog
*) lParam
;
3237 TRACE("%d %p\n", msg
, dialog
);
3241 case WM_MSI_DIALOG_CREATE
:
3242 return msi_dialog_run_message_loop( dialog
);
3243 case WM_MSI_DIALOG_DESTROY
:
3244 msi_dialog_destroy( dialog
);
3247 return DefWindowProcW( hwnd
, msg
, wParam
, lParam
);
3250 /* functions that interface to other modules within MSI */
3252 msi_dialog
*msi_dialog_create( MSIPACKAGE
* package
,
3253 LPCWSTR szDialogName
, msi_dialog
*parent
,
3254 msi_dialog_event_handler event_handler
)
3256 MSIRECORD
*rec
= NULL
;
3259 TRACE("%p %s\n", package
, debugstr_w(szDialogName
));
3261 /* allocate the structure for the dialog to use */
3262 dialog
= msi_alloc_zero( sizeof *dialog
+ sizeof(WCHAR
)*strlenW(szDialogName
) );
3265 strcpyW( dialog
->name
, szDialogName
);
3266 dialog
->parent
= parent
;
3267 msiobj_addref( &package
->hdr
);
3268 dialog
->package
= package
;
3269 dialog
->event_handler
= event_handler
;
3270 dialog
->finished
= 0;
3271 list_init( &dialog
->controls
);
3273 /* verify that the dialog exists */
3274 rec
= msi_get_dialog_record( dialog
);
3277 msiobj_release( &package
->hdr
);
3281 dialog
->attributes
= MSI_RecordGetInteger( rec
, 6 );
3282 dialog
->control_default
= strdupW( MSI_RecordGetString( rec
, 9 ) );
3283 dialog
->control_cancel
= strdupW( MSI_RecordGetString( rec
, 10 ) );
3284 msiobj_release( &rec
->hdr
);
3289 static void msi_process_pending_messages( HWND hdlg
)
3293 while( PeekMessageW( &msg
, 0, 0, 0, PM_REMOVE
) )
3295 if( hdlg
&& IsDialogMessageW( hdlg
, &msg
))
3297 TranslateMessage( &msg
);
3298 DispatchMessageW( &msg
);
3302 void msi_dialog_end_dialog( msi_dialog
*dialog
)
3304 TRACE("%p\n", dialog
);
3305 dialog
->finished
= 1;
3306 PostMessageW(dialog
->hwnd
, WM_NULL
, 0, 0);
3309 void msi_dialog_check_messages( HANDLE handle
)
3313 /* in threads other than the UI thread, block */
3314 if( uiThreadId
!= GetCurrentThreadId() )
3317 WaitForSingleObject( handle
, INFINITE
);
3321 /* there's two choices for the UI thread */
3324 msi_process_pending_messages( NULL
);
3330 * block here until somebody creates a new dialog or
3331 * the handle we're waiting on becomes ready
3333 r
= MsgWaitForMultipleObjects( 1, &handle
, 0, INFINITE
, QS_ALLINPUT
);
3334 if( r
== WAIT_OBJECT_0
)
3339 UINT
msi_dialog_run_message_loop( msi_dialog
*dialog
)
3344 if( uiThreadId
!= GetCurrentThreadId() )
3345 return SendMessageW( hMsiHiddenWindow
, WM_MSI_DIALOG_CREATE
, 0, (LPARAM
) dialog
);
3347 /* create the dialog window, don't show it yet */
3348 style
= WS_OVERLAPPED
;
3349 if( dialog
->attributes
& msidbDialogAttributesVisible
)
3350 style
|= WS_VISIBLE
;
3352 hwnd
= CreateWindowW( szMsiDialogClass
, dialog
->name
, style
,
3353 CW_USEDEFAULT
, CW_USEDEFAULT
, CW_USEDEFAULT
, CW_USEDEFAULT
,
3354 NULL
, NULL
, NULL
, dialog
);
3357 ERR("Failed to create dialog %s\n", debugstr_w( dialog
->name
));
3358 return ERROR_FUNCTION_FAILED
;
3361 ShowWindow( hwnd
, SW_SHOW
);
3362 /* UpdateWindow( hwnd ); - and causes the transparent static controls not to paint */
3364 if( dialog
->attributes
& msidbDialogAttributesModal
)
3366 while( !dialog
->finished
)
3368 MsgWaitForMultipleObjects( 0, NULL
, 0, INFINITE
, QS_ALLINPUT
);
3369 msi_process_pending_messages( dialog
->hwnd
);
3373 return ERROR_IO_PENDING
;
3375 return ERROR_SUCCESS
;
3378 void msi_dialog_do_preview( msi_dialog
*dialog
)
3381 dialog
->attributes
|= msidbDialogAttributesVisible
;
3382 dialog
->attributes
&= ~msidbDialogAttributesModal
;
3383 msi_dialog_run_message_loop( dialog
);
3386 void msi_dialog_destroy( msi_dialog
*dialog
)
3388 if( uiThreadId
!= GetCurrentThreadId() )
3390 SendMessageW( hMsiHiddenWindow
, WM_MSI_DIALOG_DESTROY
, 0, (LPARAM
) dialog
);
3395 ShowWindow( dialog
->hwnd
, SW_HIDE
);
3398 DestroyWindow( dialog
->hwnd
);
3400 /* destroy the list of controls */
3401 while( !list_empty( &dialog
->controls
) )
3405 t
= LIST_ENTRY( list_head( &dialog
->controls
),
3406 msi_control
, entry
);
3407 msi_destroy_control( t
);
3410 /* destroy the list of fonts */
3411 while( dialog
->font_list
)
3413 msi_font
*t
= dialog
->font_list
;
3414 dialog
->font_list
= t
->next
;
3415 DeleteObject( t
->hfont
);
3418 msi_free( dialog
->default_font
);
3420 msi_free( dialog
->control_default
);
3421 msi_free( dialog
->control_cancel
);
3422 msiobj_release( &dialog
->package
->hdr
);
3423 dialog
->package
= NULL
;
3427 BOOL
msi_dialog_register_class( void )
3431 ZeroMemory( &cls
, sizeof cls
);
3432 cls
.lpfnWndProc
= MSIDialog_WndProc
;
3433 cls
.hInstance
= NULL
;
3434 cls
.hIcon
= LoadIconW(0, (LPWSTR
)IDI_APPLICATION
);
3435 cls
.hCursor
= LoadCursorW(0, (LPWSTR
)IDC_ARROW
);
3436 cls
.hbrBackground
= (HBRUSH
)(COLOR_3DFACE
+ 1);
3437 cls
.lpszMenuName
= NULL
;
3438 cls
.lpszClassName
= szMsiDialogClass
;
3440 if( !RegisterClassW( &cls
) )
3443 cls
.lpfnWndProc
= MSIHiddenWindowProc
;
3444 cls
.lpszClassName
= szMsiHiddenWindow
;
3446 if( !RegisterClassW( &cls
) )
3449 uiThreadId
= GetCurrentThreadId();
3451 hMsiHiddenWindow
= CreateWindowW( szMsiHiddenWindow
, NULL
, WS_OVERLAPPED
,
3452 0, 0, 100, 100, NULL
, NULL
, NULL
, NULL
);
3453 if( !hMsiHiddenWindow
)
3459 void msi_dialog_unregister_class( void )
3461 DestroyWindow( hMsiHiddenWindow
);
3462 hMsiHiddenWindow
= NULL
;
3463 UnregisterClassW( szMsiDialogClass
, NULL
);
3464 UnregisterClassW( szMsiHiddenWindow
, NULL
);
3468 static UINT
error_dialog_handler(MSIPACKAGE
*package
, LPCWSTR event
,
3469 LPCWSTR argument
, msi_dialog
* dialog
)
3471 static const WCHAR end_dialog
[] = {'E','n','d','D','i','a','l','o','g',0};
3472 static const WCHAR error_abort
[] = {'E','r','r','o','r','A','b','o','r','t',0};
3473 static const WCHAR error_cancel
[] = {'E','r','r','o','r','C','a','n','c','e','l',0};
3474 static const WCHAR error_no
[] = {'E','r','r','o','r','N','o',0};
3475 static const WCHAR result_prop
[] = {
3476 'M','S','I','E','r','r','o','r','D','i','a','l','o','g','R','e','s','u','l','t',0
3479 if ( lstrcmpW( event
, end_dialog
) )
3480 return ERROR_SUCCESS
;
3482 if ( !lstrcmpW( argument
, error_abort
) || !lstrcmpW( argument
, error_cancel
) ||
3483 !lstrcmpW( argument
, error_no
) )
3485 MSI_SetPropertyW( package
, result_prop
, error_abort
);
3488 ControlEvent_CleanupSubscriptions(package
);
3489 msi_dialog_end_dialog( dialog
);
3491 return ERROR_SUCCESS
;
3494 static UINT
msi_error_dialog_set_error( MSIPACKAGE
*package
, LPWSTR error_dialog
, LPWSTR error
)
3498 static const WCHAR update
[] =
3499 {'U','P','D','A','T','E',' ','`','C','o','n','t','r','o','l','`',' ',
3500 'S','E','T',' ','`','T','e','x','t','`',' ','=',' ','\'','%','s','\'',' ',
3501 'W','H','E','R','E', ' ','`','D','i','a','l','o','g','_','`',' ','=',' ','\'','%','s','\'',' ',
3502 'A','N','D',' ','`','C','o','n','t','r','o','l','`',' ','=',' ',
3503 '\'','E','r','r','o','r','T','e','x','t','\'',0};
3505 row
= MSI_QueryGetRecord( package
->db
, update
, error
, error_dialog
);
3507 return ERROR_FUNCTION_FAILED
;
3509 msiobj_release(&row
->hdr
);
3510 return ERROR_SUCCESS
;
3513 UINT
msi_spawn_error_dialog( MSIPACKAGE
*package
, LPWSTR error_dialog
, LPWSTR error
)
3516 WCHAR result
[MAX_PATH
];
3517 UINT r
= ERROR_SUCCESS
;
3518 DWORD size
= MAX_PATH
;
3521 static const WCHAR szUILevel
[] = {'U','I','L','e','v','e','l',0};
3522 static const WCHAR pn_prop
[] = {'P','r','o','d','u','c','t','N','a','m','e',0};
3523 static const WCHAR title_fmt
[] = {'%','s',' ','W','a','r','n','i','n','g',0};
3524 static const WCHAR error_abort
[] = {'E','r','r','o','r','A','b','o','r','t',0};
3525 static const WCHAR result_prop
[] = {
3526 'M','S','I','E','r','r','o','r','D','i','a','l','o','g','R','e','s','u','l','t',0
3529 if ( msi_get_property_int(package
, szUILevel
, 0) == INSTALLUILEVEL_NONE
)
3530 return ERROR_SUCCESS
;
3532 if ( !error_dialog
)
3534 LPWSTR product_name
= msi_dup_property( package
, pn_prop
);
3535 WCHAR title
[MAX_PATH
];
3537 sprintfW( title
, title_fmt
, product_name
);
3538 res
= MessageBoxW( NULL
, error
, title
, MB_OKCANCEL
| MB_ICONWARNING
);
3540 msi_free( product_name
);
3543 return ERROR_SUCCESS
;
3545 return ERROR_FUNCTION_FAILED
;
3548 r
= msi_error_dialog_set_error( package
, error_dialog
, error
);
3549 if ( r
!= ERROR_SUCCESS
)
3552 dialog
= msi_dialog_create( package
, error_dialog
, package
->dialog
,
3553 error_dialog_handler
);
3555 return ERROR_FUNCTION_FAILED
;
3557 dialog
->finished
= FALSE
;
3558 r
= msi_dialog_run_message_loop( dialog
);
3559 if ( r
!= ERROR_SUCCESS
)
3562 r
= MSI_GetPropertyW( package
, result_prop
, result
, &size
);
3563 if ( r
!= ERROR_SUCCESS
)
3566 if ( !lstrcmpW( result
, error_abort
) )
3567 r
= ERROR_FUNCTION_FAILED
;
3570 msi_dialog_destroy( dialog
);