dll/win32/msi/dialog.c

   1 /*
   2  * Implementation of the Microsoft Installer (msi.dll)
   3  *
   4  * Copyright 2005 Mike McCormack for CodeWeavers
   5  * Copyright 2005 Aric Stewart for CodeWeavers
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  */
  21
  22 #include "msipriv.h"
  23
  24 #include <olectl.h>
  25 #include <richedit.h>
  26 #include <shellapi.h>
  27
  28 WINE_DEFAULT_DEBUG_CHANNEL(msi);
  29
  30 extern HINSTANCE msi_hInstance;
  31
  32 struct msi_control_tag;
  33 typedef struct msi_control_tag msi_control;
  34 typedef UINT (*msi_handler)( msi_dialog *, msi_control *, WPARAM );
  35 typedef void (*msi_update)( msi_dialog *, msi_control * );
  36 typedef UINT (*control_event_handler)( msi_dialog *, const WCHAR *, const WCHAR * );
  37
  38 struct msi_control_tag
  39 {
  40     struct list entry;
  41     HWND hwnd;
  42     msi_handler handler;
  43     msi_update update;
  44     LPWSTR property;
  45     LPWSTR value;
  46     HBITMAP hBitmap;
  47     HICON hIcon;
  48     LPWSTR tabnext;
  49     LPWSTR type;
  50     HMODULE hDll;
  51     float progress_current;
  52     float progress_max;
  53     BOOL  progress_backwards;
  54     DWORD attributes;
  55     WCHAR name[1];
  56 };
  57
  58 typedef struct msi_font_tag
  59 {
  60     struct list entry;
  61     HFONT hfont;
  62     COLORREF color;
  63     WCHAR name[1];
  64 } msi_font;
  65
  66 struct msi_dialog_tag
  67 {
  68     MSIPACKAGE *package;
  69     msi_dialog *parent;
  70     control_event_handler event_handler;
  71     BOOL finished;
  72     INT scale;
  73     DWORD attributes;
  74     SIZE size;
  75     HWND hwnd;
  76     LPWSTR default_font;
  77     struct list fonts;
  78     struct list controls;
  79     HWND hWndFocus;
  80     LPWSTR control_default;
  81     LPWSTR control_cancel;
  82     WCHAR name[1];
  83 };
  84
  85 struct subscriber
  86 {
  87     struct list entry;
  88     msi_dialog *dialog;
  89     WCHAR      *event;
  90     WCHAR      *control;
  91     WCHAR      *attribute;
  92 };
  93
  94 typedef UINT (*msi_dialog_control_func)( msi_dialog *dialog, MSIRECORD *rec );
  95 struct control_handler
  96 {
  97     LPCWSTR control_type;
  98     msi_dialog_control_func func;
  99 };
 100
 101 typedef struct
 102 {
 103     msi_dialog* dialog;
 104     msi_control *parent;
 105     DWORD       attributes;
 106     LPWSTR      propval;
 107 } radio_button_group_descr;
 108
 109 static const WCHAR szMsiDialogClass[] = { 'M','s','i','D','i','a','l','o','g','C','l','o','s','e','C','l','a','s','s',0 };
 110 static const WCHAR szMsiHiddenWindow[] = { 'M','s','i','H','i','d','d','e','n','W','i','n','d','o','w',0 };
 111 static const WCHAR szStatic[] = { 'S','t','a','t','i','c',0 };
 112 static const WCHAR szButton[] = { 'B','U','T','T','O','N', 0 };
 113 static const WCHAR szButtonData[] = { 'M','S','I','D','A','T','A',0 };
 114 static const WCHAR szProgress[] = { 'P','r','o','g','r','e','s','s',0 };
 115 static const WCHAR szText[] = { 'T','e','x','t',0 };
 116 static const WCHAR szPushButton[] = { 'P','u','s','h','B','u','t','t','o','n',0 };
 117 static const WCHAR szLine[] = { 'L','i','n','e',0 };
 118 static const WCHAR szBitmap[] = { 'B','i','t','m','a','p',0 };
 119 static const WCHAR szCheckBox[] = { 'C','h','e','c','k','B','o','x',0 };
 120 static const WCHAR szScrollableText[] = { 'S','c','r','o','l','l','a','b','l','e','T','e','x','t',0 };
 121 static const WCHAR szComboBox[] = { 'C','o','m','b','o','B','o','x',0 };
 122 static const WCHAR szEdit[] = { 'E','d','i','t',0 };
 123 static const WCHAR szMaskedEdit[] = { 'M','a','s','k','e','d','E','d','i','t',0 };
 124 static const WCHAR szPathEdit[] = { 'P','a','t','h','E','d','i','t',0 };
 125 static const WCHAR szProgressBar[] = { 'P','r','o','g','r','e','s','s','B','a','r',0 };
 126 static const WCHAR szSetProgress[] = { 'S','e','t','P','r','o','g','r','e','s','s',0 };
 127 static const WCHAR szRadioButtonGroup[] = { 'R','a','d','i','o','B','u','t','t','o','n','G','r','o','u','p',0 };
 128 static const WCHAR szIcon[] = { 'I','c','o','n',0 };
 129 static const WCHAR szSelectionTree[] = { 'S','e','l','e','c','t','i','o','n','T','r','e','e',0 };
 130 static const WCHAR szGroupBox[] = { 'G','r','o','u','p','B','o','x',0 };
 131 static const WCHAR szListBox[] = { 'L','i','s','t','B','o','x',0 };
 132 static const WCHAR szDirectoryCombo[] = { 'D','i','r','e','c','t','o','r','y','C','o','m','b','o',0 };
 133 static const WCHAR szDirectoryList[] = { 'D','i','r','e','c','t','o','r','y','L','i','s','t',0 };
 134 static const WCHAR szVolumeCostList[] = { 'V','o','l','u','m','e','C','o','s','t','L','i','s','t',0 };
 135 static const WCHAR szVolumeSelectCombo[] = { 'V','o','l','u','m','e','S','e','l','e','c','t','C','o','m','b','o',0 };
 136 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};
 137 static const WCHAR szSelectionPath[] = {'S','e','l','e','c','t','i','o','n','P','a','t','h',0};
 138 static const WCHAR szProperty[] = {'P','r','o','p','e','r','t','y',0};
 139 static const WCHAR szHyperLink[] = {'H','y','p','e','r','L','i','n','k',0};
 140
 141 /* dialog sequencing */
 142
 143 #define WM_MSI_DIALOG_CREATE  (WM_USER+0x100)
 144 #define WM_MSI_DIALOG_DESTROY (WM_USER+0x101)
 145
 146 #define USER_INSTALLSTATE_ALL 0x1000
 147
 148 static DWORD uiThreadId;
 149 static HWND hMsiHiddenWindow;
 150
 151 static LPWSTR msi_get_window_text( HWND hwnd )
 152 {
 153     UINT sz, r;
 154     LPWSTR buf;
 155
 156     sz = 0x20;
 157     buf = msi_alloc( sz*sizeof(WCHAR) );
 158     while ( buf )
 159     {
 160         r = GetWindowTextW( hwnd, buf, sz );
 161         if ( r < (sz - 1) )
 162             break;
 163         sz *= 2;
 164         buf = msi_realloc( buf, sz*sizeof(WCHAR) );
 165     }
 166
 167     return buf;
 168 }
 169
 170 static INT msi_dialog_scale_unit( msi_dialog *dialog, INT val )
 171 {
 172     return MulDiv( val, dialog->scale, 12 );
 173 }
 174
 175 static msi_control *msi_dialog_find_control( msi_dialog *dialog, LPCWSTR name )
 176 {
 177     msi_control *control;
 178
 179     if( !name )
 180         return NULL;
 181     if( !dialog->hwnd )
 182         return NULL;
 183     LIST_FOR_EACH_ENTRY( control, &dialog->controls, msi_control, entry )
 184         if( !strcmpW( control->name, name ) ) /* FIXME: case sensitive? */
 185             return control;
 186     return NULL;
 187 }
 188
 189 static msi_control *msi_dialog_find_control_by_type( msi_dialog *dialog, LPCWSTR type )
 190 {
 191     msi_control *control;
 192
 193     if( !type )
 194         return NULL;
 195     if( !dialog->hwnd )
 196         return NULL;
 197     LIST_FOR_EACH_ENTRY( control, &dialog->controls, msi_control, entry )
 198         if( !strcmpW( control->type, type ) ) /* FIXME: case sensitive? */
 199             return control;
 200     return NULL;
 201 }
 202
 203 static msi_control *msi_dialog_find_control_by_hwnd( msi_dialog *dialog, HWND hwnd )
 204 {
 205     msi_control *control;
 206
 207     if( !dialog->hwnd )
 208         return NULL;
 209     LIST_FOR_EACH_ENTRY( control, &dialog->controls, msi_control, entry )
 210         if( hwnd == control->hwnd )
 211             return control;
 212     return NULL;
 213 }
 214
 215 static LPWSTR msi_get_deformatted_field( MSIPACKAGE *package, MSIRECORD *rec, int field )
 216 {
 217     LPCWSTR str = MSI_RecordGetString( rec, field );
 218     LPWSTR ret = NULL;
 219
 220     if (str)
 221         deformat_string( package, str, &ret );
 222     return ret;
 223 }
 224
 225 static LPWSTR msi_dialog_dup_property( msi_dialog *dialog, LPCWSTR property, BOOL indirect )
 226 {
 227     LPWSTR prop = NULL;
 228
 229     if (!property)
 230         return NULL;
 231
 232     if (indirect)
 233         prop = msi_dup_property( dialog->package->db, property );
 234
 235     if (!prop)
 236         prop = strdupW( property );
 237
 238     return prop;
 239 }
 240
 241 /*
 242  * msi_dialog_get_style
 243  *
 244  * Extract the {\style} string from the front of the text to display and
 245  * update the pointer.  Only the last style in a list is applied.
 246  */
 247 static LPWSTR msi_dialog_get_style( LPCWSTR p, LPCWSTR *rest )
 248 {
 249     LPWSTR ret;
 250     LPCWSTR q, i, first;
 251     DWORD len;
 252
 253     q = NULL;
 254     *rest = p;
 255     if( !p )
 256         return NULL;
 257
 258     while ((first = strchrW( p, '{' )) && (q = strchrW( first + 1, '}' )))
 259     {
 260         p = first + 1;
 261         if( *p != '\\' && *p != '&' )
 262             return NULL;
 263
 264         /* little bit of sanity checking to stop us getting confused with RTF */
 265         for( i=++p; i<q; i++ )
 266             if( *i == '}' || *i == '\\' )
 267                 return NULL;
 268     }
 269
 270     if (!q)
 271         return NULL;
 272
 273     *rest = ++q;
 274     len = q - p;
 275
 276     ret = msi_alloc( len*sizeof(WCHAR) );
 277     if( !ret )
 278         return ret;
 279     memcpy( ret, p, len*sizeof(WCHAR) );
 280     ret[len-1] = 0;
 281     return ret;
 282 }
 283
 284 static UINT msi_dialog_add_font( MSIRECORD *rec, LPVOID param )
 285 {
 286     msi_dialog *dialog = param;
 287     msi_font *font;
 288     LPCWSTR face, name;
 289     LOGFONTW lf;
 290     INT style;
 291     HDC hdc;
 292
 293     /* create a font and add it to the list */
 294     name = MSI_RecordGetString( rec, 1 );
 295     font = msi_alloc( FIELD_OFFSET( msi_font, name[strlenW( name ) + 1] ));
 296     strcpyW( font->name, name );
 297     list_add_head( &dialog->fonts, &font->entry );
 298
 299     font->color = MSI_RecordGetInteger( rec, 4 );
 300
 301     memset( &lf, 0, sizeof lf );
 302     face = MSI_RecordGetString( rec, 2 );
 303     lf.lfHeight = MSI_RecordGetInteger( rec, 3 );
 304     style = MSI_RecordGetInteger( rec, 5 );
 305     if( style & msidbTextStyleStyleBitsBold )
 306         lf.lfWeight = FW_BOLD;
 307     if( style & msidbTextStyleStyleBitsItalic )
 308         lf.lfItalic = TRUE;
 309     if( style & msidbTextStyleStyleBitsUnderline )
 310         lf.lfUnderline = TRUE;
 311     if( style & msidbTextStyleStyleBitsStrike )
 312         lf.lfStrikeOut = TRUE;
 313     lstrcpynW( lf.lfFaceName, face, LF_FACESIZE );
 314
 315     /* adjust the height */
 316     hdc = GetDC( dialog->hwnd );
 317     if (hdc)
 318     {
 319         lf.lfHeight = -MulDiv(lf.lfHeight, GetDeviceCaps(hdc, LOGPIXELSY), 72);
 320         ReleaseDC( dialog->hwnd, hdc );
 321     }
 322
 323     font->hfont = CreateFontIndirectW( &lf );
 324
 325     TRACE("Adding font style %s\n", debugstr_w(font->name) );
 326
 327     return ERROR_SUCCESS;
 328 }
 329
 330 static msi_font *msi_dialog_find_font( msi_dialog *dialog, LPCWSTR name )
 331 {
 332     msi_font *font = NULL;
 333
 334     LIST_FOR_EACH_ENTRY( font, &dialog->fonts, msi_font, entry )
 335         if( !strcmpW( font->name, name ) )  /* FIXME: case sensitive? */
 336             break;
 337
 338     return font;
 339 }
 340
 341 static UINT msi_dialog_set_font( msi_dialog *dialog, HWND hwnd, LPCWSTR name )
 342 {
 343     msi_font *font;
 344
 345     font = msi_dialog_find_font( dialog, name );
 346     if( font )
 347         SendMessageW( hwnd, WM_SETFONT, (WPARAM) font->hfont, TRUE );
 348     else
 349         ERR("No font entry for %s\n", debugstr_w(name));
 350     return ERROR_SUCCESS;
 351 }
 352
 353 static UINT msi_dialog_build_font_list( msi_dialog *dialog )
 354 {
 355     static const WCHAR query[] = {
 356         'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
 357         '`','T','e','x','t','S','t','y','l','e','`',0};
 358     MSIQUERY *view;
 359     UINT r;
 360
 361     TRACE("dialog %p\n", dialog );
 362
 363     r = MSI_OpenQuery( dialog->package->db, &view, query );
 364     if( r != ERROR_SUCCESS )
 365         return r;
 366
 367     r = MSI_IterateRecords( view, NULL, msi_dialog_add_font, dialog );
 368     msiobj_release( &view->hdr );
 369     return r;
 370 }
 371
 372 static void msi_destroy_control( msi_control *t )
 373 {
 374     list_remove( &t->entry );
 375     /* leave dialog->hwnd - destroying parent destroys child windows */
 376     msi_free( t->property );
 377     msi_free( t->value );
 378     if( t->hBitmap )
 379         DeleteObject( t->hBitmap );
 380     if( t->hIcon )
 381         DestroyIcon( t->hIcon );
 382     msi_free( t->tabnext );
 383     msi_free( t->type );
 384     if (t->hDll)
 385         FreeLibrary( t->hDll );
 386     msi_free( t );
 387 }
 388
 389 static msi_control *dialog_create_window( msi_dialog *dialog, MSIRECORD *rec, DWORD exstyle,
 390                                           const WCHAR *szCls, const WCHAR *name, const WCHAR *text,
 391                                           DWORD style, HWND parent )
 392 {
 393     DWORD x, y, width, height;
 394     LPWSTR font = NULL, title_font = NULL;
 395     LPCWSTR title = NULL;
 396     msi_control *control;
 397
 398     style |= WS_CHILD;
 399
 400     control = msi_alloc( FIELD_OFFSET( msi_control, name[strlenW( name ) + 1] ));
 401     if (!control)
 402         return NULL;
 403
 404     strcpyW( control->name, name );
 405     list_add_tail( &dialog->controls, &control->entry );
 406     control->handler = NULL;
 407     control->update = NULL;
 408     control->property = NULL;
 409     control->value = NULL;
 410     control->hBitmap = NULL;
 411     control->hIcon = NULL;
 412     control->hDll = NULL;
 413     control->tabnext = strdupW( MSI_RecordGetString( rec, 11) );
 414     control->type = strdupW( MSI_RecordGetString( rec, 3 ) );
 415     control->progress_current = 0;
 416     control->progress_max = 100;
 417     control->progress_backwards = FALSE;
 418
 419     x = MSI_RecordGetInteger( rec, 4 );
 420     y = MSI_RecordGetInteger( rec, 5 );
 421     width = MSI_RecordGetInteger( rec, 6 );
 422     height = MSI_RecordGetInteger( rec, 7 );
 423
 424     x = msi_dialog_scale_unit( dialog, x );
 425     y = msi_dialog_scale_unit( dialog, y );
 426     width = msi_dialog_scale_unit( dialog, width );
 427     height = msi_dialog_scale_unit( dialog, height );
 428
 429     if( text )
 430     {
 431         deformat_string( dialog->package, text, &title_font );
 432         font = msi_dialog_get_style( title_font, &title );
 433     }
 434
 435     control->hwnd = CreateWindowExW( exstyle, szCls, title, style,
 436                           x, y, width, height, parent, NULL, NULL, NULL );
 437
 438     TRACE("Dialog %s control %s hwnd %p\n",
 439            debugstr_w(dialog->name), debugstr_w(text), control->hwnd );
 440
 441     msi_dialog_set_font( dialog, control->hwnd,
 442                          font ? font : dialog->default_font );
 443
 444     msi_free( title_font );
 445     msi_free( font );
 446
 447     return control;
 448 }
 449
 450 static LPWSTR msi_dialog_get_uitext( msi_dialog *dialog, LPCWSTR key )
 451 {
 452     MSIRECORD *rec;
 453     LPWSTR text;
 454
 455     static const WCHAR query[] = {
 456         's','e','l','e','c','t',' ','*',' ',
 457         'f','r','o','m',' ','`','U','I','T','e','x','t','`',' ',
 458         'w','h','e','r','e',' ','`','K','e','y','`',' ','=',' ','\'','%','s','\'',0
 459     };
 460
 461     rec = MSI_QueryGetRecord( dialog->package->db, query, key );
 462     if (!rec) return NULL;
 463     text = strdupW( MSI_RecordGetString( rec, 2 ) );
 464     msiobj_release( &rec->hdr );
 465     return text;
 466 }
 467
 468 static MSIRECORD *msi_get_binary_record( MSIDATABASE *db, LPCWSTR name )
 469 {
 470     static const WCHAR query[] = {
 471         's','e','l','e','c','t',' ','*',' ',
 472         'f','r','o','m',' ','B','i','n','a','r','y',' ',
 473         'w','h','e','r','e',' ',
 474             '`','N','a','m','e','`',' ','=',' ','\'','%','s','\'',0
 475     };
 476
 477     return MSI_QueryGetRecord( db, query, name );
 478 }
 479
 480 static LPWSTR msi_create_tmp_path(void)
 481 {
 482     WCHAR tmp[MAX_PATH];
 483     LPWSTR path = NULL;
 484     DWORD len, r;
 485
 486     r = GetTempPathW( MAX_PATH, tmp );
 487     if( !r )
 488         return path;
 489     len = lstrlenW( tmp ) + 20;
 490     path = msi_alloc( len * sizeof (WCHAR) );
 491     if( path )
 492     {
 493         r = GetTempFileNameW( tmp, szMsi, 0, path );
 494         if (!r)
 495         {
 496             msi_free( path );
 497             path = NULL;
 498         }
 499     }
 500     return path;
 501 }
 502
 503 static HANDLE msi_load_image( MSIDATABASE *db, LPCWSTR name, UINT type,
 504                               UINT cx, UINT cy, UINT flags )
 505 {
 506     MSIRECORD *rec = NULL;
 507     HANDLE himage = NULL;
 508     LPWSTR tmp;
 509     UINT r;
 510
 511     TRACE("%p %s %u %u %08x\n", db, debugstr_w(name), cx, cy, flags);
 512
 513     tmp = msi_create_tmp_path();
 514     if( !tmp )
 515         return himage;
 516
 517     rec = msi_get_binary_record( db, name );
 518     if( rec )
 519     {
 520         r = MSI_RecordStreamToFile( rec, 2, tmp );
 521         if( r == ERROR_SUCCESS )
 522         {
 523             himage = LoadImageW( 0, tmp, type, cx, cy, flags );
 524         }
 525         msiobj_release( &rec->hdr );
 526     }
 527     DeleteFileW( tmp );
 528
 529     msi_free( tmp );
 530     return himage;
 531 }
 532
 533 static HICON msi_load_icon( MSIDATABASE *db, LPCWSTR text, UINT attributes )
 534 {
 535     DWORD cx = 0, cy = 0, flags;
 536
 537     flags = LR_LOADFROMFILE | LR_DEFAULTSIZE;
 538     if( attributes & msidbControlAttributesFixedSize )
 539     {
 540         flags &= ~LR_DEFAULTSIZE;
 541         if( attributes & msidbControlAttributesIconSize16 )
 542         {
 543             cx += 16;
 544             cy += 16;
 545         }
 546         if( attributes & msidbControlAttributesIconSize32 )
 547         {
 548             cx += 32;
 549             cy += 32;
 550         }
 551         /* msidbControlAttributesIconSize48 handled by above logic */
 552     }
 553     return msi_load_image( db, text, IMAGE_ICON, cx, cy, flags );
 554 }
 555
 556 static void msi_dialog_update_controls( msi_dialog *dialog, LPCWSTR property )
 557 {
 558     msi_control *control;
 559
 560     LIST_FOR_EACH_ENTRY( control, &dialog->controls, msi_control, entry )
 561     {
 562         if ( control->property && !strcmpW( control->property, property ) && control->update )
 563             control->update( dialog, control );
 564     }
 565 }
 566
 567 static void msi_dialog_set_property( MSIPACKAGE *package, LPCWSTR property, LPCWSTR value )
 568 {
 569     UINT r = msi_set_property( package->db, property, value, -1 );
 570     if (r == ERROR_SUCCESS && !strcmpW( property, szSourceDir ))
 571         msi_reset_folders( package, TRUE );
 572 }
 573
 574 static MSIFEATURE *msi_seltree_feature_from_item( HWND hwnd, HTREEITEM hItem )
 575 {
 576     TVITEMW tvi;
 577
 578     /* get the feature from the item */
 579     memset( &tvi, 0, sizeof tvi );
 580     tvi.hItem = hItem;
 581     tvi.mask = TVIF_PARAM | TVIF_HANDLE;
 582     SendMessageW( hwnd, TVM_GETITEMW, 0, (LPARAM)&tvi );
 583     return (MSIFEATURE *)tvi.lParam;
 584 }
 585
 586 struct msi_selection_tree_info
 587 {
 588     msi_dialog *dialog;
 589     HWND hwnd;
 590     WNDPROC oldproc;
 591     HTREEITEM selected;
 592 };
 593
 594 static MSIFEATURE *msi_seltree_get_selected_feature( msi_control *control )
 595 {
 596     struct msi_selection_tree_info *info = GetPropW( control->hwnd, szButtonData );
 597     return msi_seltree_feature_from_item( control->hwnd, info->selected );
 598 }
 599
 600 static void dialog_handle_event( msi_dialog *dialog, const WCHAR *control,
 601                                  const WCHAR *attribute, MSIRECORD *rec )
 602 {
 603     msi_control* ctrl;
 604
 605     ctrl = msi_dialog_find_control( dialog, control );
 606     if (!ctrl)
 607         return;
 608     if( !strcmpW( attribute, szText ) )
 609     {
 610         const WCHAR *font_text, *text = NULL;
 611         WCHAR *font, *text_fmt = NULL;
 612
 613         font_text = MSI_RecordGetString( rec , 1 );
 614         font = msi_dialog_get_style( font_text, &text );
 615         deformat_string( dialog->package, text, &text_fmt );
 616         if (text_fmt) text = text_fmt;
 617         else text = szEmpty;
 618
 619         SetWindowTextW( ctrl->hwnd, text );
 620
 621         msi_free( font );
 622         msi_free( text_fmt );
 623         msi_dialog_check_messages( NULL );
 624     }
 625     else if( !strcmpW( attribute, szProgress ) )
 626     {
 627         DWORD func, val1, val2, units;
 628
 629         func = MSI_RecordGetInteger( rec, 1 );
 630         val1 = MSI_RecordGetInteger( rec, 2 );
 631         val2 = MSI_RecordGetInteger( rec, 3 );
 632
 633         TRACE("progress: func %u val1 %u val2 %u\n", func, val1, val2);
 634
 635         units = val1 / 512;
 636         switch (func)
 637         {
 638         case 0: /* init */
 639             SendMessageW( ctrl->hwnd, PBM_SETRANGE, 0, MAKELPARAM(0,100) );
 640             if (val2)
 641             {
 642                 ctrl->progress_max = units ? units : 100;
 643                 ctrl->progress_current = units;
 644                 ctrl->progress_backwards = TRUE;
 645                 SendMessageW( ctrl->hwnd, PBM_SETPOS, 100, 0 );
 646             }
 647             else
 648             {
 649                 ctrl->progress_max = units ? units : 100;
 650                 ctrl->progress_current = 0;
 651                 ctrl->progress_backwards = FALSE;
 652                 SendMessageW( ctrl->hwnd, PBM_SETPOS, 0, 0 );
 653             }
 654             break;
 655         case 1: /* action data increment */
 656             if (val2) dialog->package->action_progress_increment = val1;
 657             else dialog->package->action_progress_increment = 0;
 658             break;
 659         case 2: /* move */
 660             if (ctrl->progress_backwards)
 661             {
 662                 if (units >= ctrl->progress_current) ctrl->progress_current -= units;
 663                 else ctrl->progress_current = 0;
 664             }
 665             else
 666             {
 667                 if (ctrl->progress_current + units < ctrl->progress_max) ctrl->progress_current += units;
 668                 else ctrl->progress_current = ctrl->progress_max;
 669             }
 670             SendMessageW( ctrl->hwnd, PBM_SETPOS, MulDiv(100, ctrl->progress_current, ctrl->progress_max), 0 );
 671             break;
 672         case 3: /* add */
 673             ctrl->progress_max += units;
 674             break;
 675         default:
 676             FIXME("Unknown progress message %u\n", func);
 677             break;
 678         }
 679     }
 680     else if ( !strcmpW( attribute, szProperty ) )
 681     {
 682         MSIFEATURE *feature = msi_seltree_get_selected_feature( ctrl );
 683         if (feature) msi_dialog_set_property( dialog->package, ctrl->property, feature->Directory );
 684     }
 685     else if ( !strcmpW( attribute, szSelectionPath ) )
 686     {
 687         BOOL indirect = ctrl->attributes & msidbControlAttributesIndirect;
 688         LPWSTR path = msi_dialog_dup_property( dialog, ctrl->property, indirect );
 689         if (!path) return;
 690         SetWindowTextW( ctrl->hwnd, path );
 691         msi_free(path);
 692     }
 693     else
 694     {
 695         FIXME("Attribute %s not being set\n", debugstr_w(attribute));
 696         return;
 697     }
 698 }
 699
 700 static void event_subscribe( msi_dialog *dialog, const WCHAR *event, const WCHAR *control, const WCHAR *attribute )
 701 {
 702     struct subscriber *sub;
 703
 704     TRACE("event %s control %s attribute %s\n", debugstr_w(event), debugstr_w(control), debugstr_w(attribute));
 705
 706     LIST_FOR_EACH_ENTRY( sub, &dialog->package->subscriptions, struct subscriber, entry )
 707     {
 708         if (!strcmpiW( sub->event, event ) &&
 709             !strcmpiW( sub->control, control ) &&
 710             !strcmpiW( sub->attribute, attribute ))
 711         {
 712             TRACE("already subscribed\n");
 713             return;
 714         };
 715     }
 716     if (!(sub = msi_alloc( sizeof(*sub) ))) return;
 717     sub->dialog    = dialog;
 718     sub->event     = strdupW( event );
 719     sub->control   = strdupW( control );
 720     sub->attribute = strdupW( attribute );
 721     list_add_tail( &dialog->package->subscriptions, &sub->entry );
 722 }
 723
 724 struct dialog_control
 725 {
 726     msi_dialog  *dialog;
 727     const WCHAR *control;
 728 };
 729
 730 static UINT map_event( MSIRECORD *row, void *param )
 731 {
 732     struct dialog_control *dc = param;
 733     const WCHAR *event = MSI_RecordGetString( row, 3 );
 734     const WCHAR *attribute = MSI_RecordGetString( row, 4 );
 735
 736     event_subscribe( dc->dialog, event, dc->control, attribute );
 737     return ERROR_SUCCESS;
 738 }
 739
 740 static void dialog_map_events( msi_dialog *dialog, const WCHAR *control )
 741 {
 742     static const WCHAR queryW[] =
 743         {'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
 744          '`','E','v','e','n','t','M','a','p','p','i','n','g','`',' ',
 745          'W','H','E','R','E',' ','`','D','i','a','l','o','g','_','`',' ','=',' ','\'','%','s','\'',' ',
 746          'A','N','D',' ','`','C','o','n','t','r','o','l','_','`',' ','=',' ','\'','%','s','\'',0};
 747     MSIQUERY *view;
 748     struct dialog_control dialog_control =
 749     {
 750         dialog,
 751         control
 752     };
 753
 754     if (!MSI_OpenQuery( dialog->package->db, &view, queryW, dialog->name, control ))
 755     {
 756         MSI_IterateRecords( view, NULL, map_event, &dialog_control );
 757         msiobj_release( &view->hdr );
 758     }
 759 }
 760
 761 /* everything except radio buttons */
 762 static msi_control *msi_dialog_add_control( msi_dialog *dialog,
 763                 MSIRECORD *rec, LPCWSTR szCls, DWORD style )
 764 {
 765     DWORD attributes;
 766     const WCHAR *text = NULL, *name, *control_type;
 767     DWORD exstyle = 0;
 768
 769     name = MSI_RecordGetString( rec, 2 );
 770     control_type = MSI_RecordGetString( rec, 3 );
 771     attributes = MSI_RecordGetInteger( rec, 8 );
 772     if (strcmpW( control_type, szScrollableText )) text = MSI_RecordGetString( rec, 10 );
 773
 774     TRACE("%s, %s, %08x, %s, %08x\n", debugstr_w(szCls), debugstr_w(name),
 775           attributes, debugstr_w(text), style);
 776
 777     if( attributes & msidbControlAttributesVisible )
 778         style |= WS_VISIBLE;
 779     if( ~attributes & msidbControlAttributesEnabled )
 780         style |= WS_DISABLED;
 781     if( attributes & msidbControlAttributesSunken )
 782         exstyle |= WS_EX_CLIENTEDGE;
 783
 784     dialog_map_events( dialog, name );
 785
 786     return dialog_create_window( dialog, rec, exstyle, szCls, name, text, style, dialog->hwnd );
 787 }
 788
 789 struct msi_text_info
 790 {
 791     msi_font *font;
 792     WNDPROC oldproc;
 793     DWORD attributes;
 794 };
 795
 796 /*
 797  * we don't erase our own background,
 798  * so we have to make sure that the parent window redraws first
 799  */
 800 static void msi_text_on_settext( HWND hWnd )
 801 {
 802     HWND hParent;
 803     RECT rc;
 804
 805     hParent = GetParent( hWnd );
 806     GetWindowRect( hWnd, &rc );
 807     MapWindowPoints( NULL, hParent, (LPPOINT) &rc, 2 );
 808     InvalidateRect( hParent, &rc, TRUE );
 809 }
 810
 811 static LRESULT WINAPI
 812 MSIText_WndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
 813 {
 814     struct msi_text_info *info;
 815     LRESULT r = 0;
 816
 817     TRACE("%p %04x %08lx %08lx\n", hWnd, msg, wParam, lParam);
 818
 819     info = GetPropW(hWnd, szButtonData);
 820
 821     if( msg == WM_CTLCOLORSTATIC &&
 822        ( info->attributes & msidbControlAttributesTransparent ) )
 823     {
 824         SetBkMode( (HDC)wParam, TRANSPARENT );
 825         return (LRESULT) GetStockObject(NULL_BRUSH);
 826     }
 827
 828     r = CallWindowProcW(info->oldproc, hWnd, msg, wParam, lParam);
 829     if ( info->font )
 830         SetTextColor( (HDC)wParam, info->font->color );
 831
 832     switch( msg )
 833     {
 834     case WM_SETTEXT:
 835         msi_text_on_settext( hWnd );
 836         break;
 837     case WM_NCDESTROY:
 838         msi_free( info );
 839         RemovePropW( hWnd, szButtonData );
 840         break;
 841     }
 842
 843     return r;
 844 }
 845
 846 static UINT msi_dialog_text_control( msi_dialog *dialog, MSIRECORD *rec )
 847 {
 848     msi_control *control;
 849     struct msi_text_info *info;
 850     LPCWSTR text, ptr, prop, control_name;
 851     LPWSTR font_name;
 852
 853     TRACE("%p %p\n", dialog, rec);
 854
 855     control = msi_dialog_add_control( dialog, rec, szStatic, SS_LEFT | WS_GROUP );
 856     if( !control )
 857         return ERROR_FUNCTION_FAILED;
 858
 859     info = msi_alloc( sizeof *info );
 860     if( !info )
 861         return ERROR_SUCCESS;
 862
 863     control_name = MSI_RecordGetString( rec, 2 );
 864     control->attributes = MSI_RecordGetInteger( rec, 8 );
 865     prop = MSI_RecordGetString( rec, 9 );
 866     control->property = msi_dialog_dup_property( dialog, prop, FALSE );
 867
 868     text = MSI_RecordGetString( rec, 10 );
 869     font_name = msi_dialog_get_style( text, &ptr );
 870     info->font = ( font_name ) ? msi_dialog_find_font( dialog, font_name ) : NULL;
 871     msi_free( font_name );
 872
 873     info->attributes = MSI_RecordGetInteger( rec, 8 );
 874     if( info->attributes & msidbControlAttributesTransparent )
 875         SetWindowLongPtrW( control->hwnd, GWL_EXSTYLE, WS_EX_TRANSPARENT );
 876
 877     info->oldproc = (WNDPROC) SetWindowLongPtrW( control->hwnd, GWLP_WNDPROC,
 878                                           (LONG_PTR)MSIText_WndProc );
 879     SetPropW( control->hwnd, szButtonData, info );
 880
 881     event_subscribe( dialog, szSelectionPath, control_name, szSelectionPath );
 882     return ERROR_SUCCESS;
 883 }
 884
 885 /* strip any leading text style label from text field */
 886 static WCHAR *msi_get_binary_name( MSIPACKAGE *package, MSIRECORD *rec )
 887 {
 888     WCHAR *p, *text;
 889
 890     text = msi_get_deformatted_field( package, rec, 10 );
 891     if (!text)
 892         return NULL;
 893
 894     p = text;
 895     while (*p && *p != '{') p++;
 896     if (!*p++) return text;
 897
 898     while (*p && *p != '}') p++;
 899     if (!*p++) return text;
 900
 901     p = strdupW( p );
 902     msi_free( text );
 903     return p;
 904 }
 905
 906 static UINT msi_dialog_set_property_event( msi_dialog *dialog, LPCWSTR event, LPCWSTR arg )
 907 {
 908     static const WCHAR szNullArg[] = {'{','}',0};
 909     LPWSTR p, prop, arg_fmt = NULL;
 910     UINT len;
 911
 912     len = strlenW( event );
 913     prop = msi_alloc( len * sizeof(WCHAR) );
 914     strcpyW( prop, &event[1] );
 915     p = strchrW( prop, ']' );
 916     if (p && (p[1] == 0 || p[1] == ' '))
 917     {
 918         *p = 0;
 919         if (strcmpW( szNullArg, arg ))
 920             deformat_string( dialog->package, arg, &arg_fmt );
 921         msi_dialog_set_property( dialog->package, prop, arg_fmt );
 922         msi_dialog_update_controls( dialog, prop );
 923         msi_free( arg_fmt );
 924     }
 925     else ERR("Badly formatted property string - what happens?\n");
 926     msi_free( prop );
 927     return ERROR_SUCCESS;
 928 }
 929
 930 static UINT msi_dialog_send_event( msi_dialog *dialog, LPCWSTR event, LPCWSTR arg )
 931 {
 932     LPWSTR event_fmt = NULL, arg_fmt = NULL;
 933
 934     TRACE("Sending control event %s %s\n", debugstr_w(event), debugstr_w(arg));
 935
 936     deformat_string( dialog->package, event, &event_fmt );
 937     deformat_string( dialog->package, arg, &arg_fmt );
 938
 939     dialog->event_handler( dialog, event_fmt, arg_fmt );
 940
 941     msi_free( event_fmt );
 942     msi_free( arg_fmt );
 943
 944     return ERROR_SUCCESS;
 945 }
 946
 947 static UINT msi_dialog_control_event( MSIRECORD *rec, LPVOID param )
 948 {
 949     msi_dialog *dialog = param;
 950     LPCWSTR condition, event, arg;
 951     UINT r;
 952
 953     condition = MSI_RecordGetString( rec, 5 );
 954     r = MSI_EvaluateConditionW( dialog->package, condition );
 955     if (r == MSICONDITION_TRUE || r == MSICONDITION_NONE)
 956     {
 957         event = MSI_RecordGetString( rec, 3 );
 958         arg = MSI_RecordGetString( rec, 4 );
 959         if (event[0] == '[')
 960             msi_dialog_set_property_event( dialog, event, arg );
 961         else
 962             msi_dialog_send_event( dialog, event, arg );
 963     }
 964     return ERROR_SUCCESS;
 965 }
 966
 967 static UINT msi_dialog_button_handler( msi_dialog *dialog, msi_control *control, WPARAM param )
 968 {
 969     static const WCHAR query[] = {
 970         'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
 971         'C','o','n','t','r','o','l','E','v','e','n','t',' ','W','H','E','R','E',' ',
 972         '`','D','i','a','l','o','g','_','`',' ','=',' ','\'','%','s','\'',' ','A','N','D',' ',
 973         '`','C','o','n','t','r','o','l','_','`',' ','=',' ','\'','%','s','\'',' ',
 974         'O','R','D','E','R',' ','B','Y',' ','`','O','r','d','e','r','i','n','g','`',0};
 975     MSIQUERY *view;
 976     UINT r;
 977
 978     if (HIWORD(param) != BN_CLICKED)
 979         return ERROR_SUCCESS;
 980
 981     r = MSI_OpenQuery( dialog->package->db, &view, query, dialog->name, control->name );
 982     if (r != ERROR_SUCCESS)
 983     {
 984         ERR("query failed\n");
 985         return ERROR_SUCCESS;
 986     }
 987     r = MSI_IterateRecords( view, 0, msi_dialog_control_event, dialog );
 988     msiobj_release( &view->hdr );
 989     return r;
 990 }
 991
 992 static UINT msi_dialog_button_control( msi_dialog *dialog, MSIRECORD *rec )
 993 {
 994     msi_control *control;
 995     UINT attributes, style;
 996
 997     TRACE("%p %p\n", dialog, rec);
 998
 999     style = WS_TABSTOP;
1000     attributes = MSI_RecordGetInteger( rec, 8 );
1001     if( attributes & msidbControlAttributesIcon )
1002         style |= BS_ICON;
1003
1004     control = msi_dialog_add_control( dialog, rec, szButton, style );
1005     if( !control )
1006         return ERROR_FUNCTION_FAILED;
1007
1008     control->handler = msi_dialog_button_handler;
1009
1010     if (attributes & msidbControlAttributesIcon)
1011     {
1012         /* set the icon */
1013         LPWSTR name = msi_get_binary_name( dialog->package, rec );
1014         control->hIcon = msi_load_icon( dialog->package->db, name, attributes );
1015         if (control->hIcon)
1016         {
1017             SendMessageW( control->hwnd, BM_SETIMAGE, IMAGE_ICON, (LPARAM) control->hIcon );
1018         }
1019         else
1020             ERR("Failed to load icon %s\n", debugstr_w(name));
1021         msi_free( name );
1022     }
1023
1024     return ERROR_SUCCESS;
1025 }
1026
1027 static LPWSTR msi_get_checkbox_value( msi_dialog *dialog, LPCWSTR prop )
1028 {
1029     static const WCHAR query[] = {
1030         'S','E','L','E','C','T',' ','*',' ',
1031         'F','R','O','M',' ','`','C','h','e','c','k','B','o','x','`',' ',
1032         'W','H','E','R','E',' ',
1033         '`','P','r','o','p','e','r','t','y','`',' ','=',' ',
1034         '\'','%','s','\'',0
1035     };
1036     MSIRECORD *rec = NULL;
1037     LPWSTR ret = NULL;
1038
1039     /* find if there is a value associated with the checkbox */
1040     rec = MSI_QueryGetRecord( dialog->package->db, query, prop );
1041     if (!rec)
1042         return ret;
1043
1044     ret = msi_get_deformatted_field( dialog->package, rec, 2 );
1045     if( ret && !ret[0] )
1046     {
1047         msi_free( ret );
1048         ret = NULL;
1049     }
1050     msiobj_release( &rec->hdr );
1051     if (ret)
1052         return ret;
1053
1054     ret = msi_dup_property( dialog->package->db, prop );
1055     if( ret && !ret[0] )
1056     {
1057         msi_free( ret );
1058         ret = NULL;
1059     }
1060
1061     return ret;
1062 }
1063
1064 static UINT msi_dialog_get_checkbox_state( msi_dialog *dialog, msi_control *control )
1065 {
1066     WCHAR state[2] = {0};
1067     DWORD sz = 2;
1068
1069     msi_get_property( dialog->package->db, control->property, state, &sz );
1070     return state[0] ? 1 : 0;
1071 }
1072
1073 static void msi_dialog_set_checkbox_state( msi_dialog *dialog, msi_control *control, UINT state )
1074 {
1075     static const WCHAR szState[] = {'1',0};
1076     LPCWSTR val;
1077
1078     /* if uncheck then the property is set to NULL */
1079     if (!state)
1080     {
1081         msi_dialog_set_property( dialog->package, control->property, NULL );
1082         return;
1083     }
1084
1085     /* check for a custom state */
1086     if (control->value && control->value[0])
1087         val = control->value;
1088     else
1089         val = szState;
1090
1091     msi_dialog_set_property( dialog->package, control->property, val );
1092 }
1093
1094 static void msi_dialog_checkbox_sync_state( msi_dialog *dialog, msi_control *control )
1095 {
1096     UINT state = msi_dialog_get_checkbox_state( dialog, control );
1097     SendMessageW( control->hwnd, BM_SETCHECK, state ? BST_CHECKED : BST_UNCHECKED, 0 );
1098 }
1099
1100 static UINT msi_dialog_checkbox_handler( msi_dialog *dialog, msi_control *control, WPARAM param )
1101 {
1102     UINT state;
1103
1104     if (HIWORD(param) != BN_CLICKED)
1105         return ERROR_SUCCESS;
1106
1107     TRACE("clicked checkbox %s, set %s\n", debugstr_w(control->name), debugstr_w(control->property));
1108
1109     state = msi_dialog_get_checkbox_state( dialog, control );
1110     state = state ? 0 : 1;
1111     msi_dialog_set_checkbox_state( dialog, control, state );
1112     msi_dialog_checkbox_sync_state( dialog, control );
1113
1114     return msi_dialog_button_handler( dialog, control, param );
1115 }
1116
1117 static UINT msi_dialog_checkbox_control( msi_dialog *dialog, MSIRECORD *rec )
1118 {
1119     msi_control *control;
1120     LPCWSTR prop;
1121
1122     TRACE("%p %p\n", dialog, rec);
1123
1124     control = msi_dialog_add_control( dialog, rec, szButton, BS_CHECKBOX | BS_MULTILINE | WS_TABSTOP );
1125     control->handler = msi_dialog_checkbox_handler;
1126     control->update = msi_dialog_checkbox_sync_state;
1127     prop = MSI_RecordGetString( rec, 9 );
1128     if (prop)
1129     {
1130         control->property = strdupW( prop );
1131         control->value = msi_get_checkbox_value( dialog, prop );
1132         TRACE("control %s value %s\n", debugstr_w(control->property), debugstr_w(control->value));
1133     }
1134     msi_dialog_checkbox_sync_state( dialog, control );
1135     return ERROR_SUCCESS;
1136 }
1137
1138 static UINT msi_dialog_line_control( msi_dialog *dialog, MSIRECORD *rec )
1139 {
1140     DWORD attributes;
1141     LPCWSTR name;
1142     DWORD style, exstyle = 0;
1143     DWORD x, y, width, height;
1144     msi_control *control;
1145
1146     TRACE("%p %p\n", dialog, rec);
1147
1148     style = WS_CHILD | SS_ETCHEDHORZ | SS_SUNKEN;
1149
1150     name = MSI_RecordGetString( rec, 2 );
1151     attributes = MSI_RecordGetInteger( rec, 8 );
1152
1153     if( attributes & msidbControlAttributesVisible )
1154         style |= WS_VISIBLE;
1155     if( ~attributes & msidbControlAttributesEnabled )
1156         style |= WS_DISABLED;
1157     if( attributes & msidbControlAttributesSunken )
1158         exstyle |= WS_EX_CLIENTEDGE;
1159
1160     dialog_map_events( dialog, name );
1161
1162     control = msi_alloc( FIELD_OFFSET(msi_control, name[strlenW( name ) + 1] ));
1163     if (!control)
1164         return ERROR_OUTOFMEMORY;
1165
1166     strcpyW( control->name, name );
1167     list_add_head( &dialog->controls, &control->entry );
1168     control->handler = NULL;
1169     control->property = NULL;
1170     control->value = NULL;
1171     control->hBitmap = NULL;
1172     control->hIcon = NULL;
1173     control->hDll = NULL;
1174     control->tabnext = strdupW( MSI_RecordGetString( rec, 11) );
1175     control->type = strdupW( MSI_RecordGetString( rec, 3 ) );
1176     control->progress_current = 0;
1177     control->progress_max = 100;
1178     control->progress_backwards = FALSE;
1179
1180     x = MSI_RecordGetInteger( rec, 4 );
1181     y = MSI_RecordGetInteger( rec, 5 );
1182     width = MSI_RecordGetInteger( rec, 6 );
1183
1184     x = msi_dialog_scale_unit( dialog, x );
1185     y = msi_dialog_scale_unit( dialog, y );
1186     width = msi_dialog_scale_unit( dialog, width );
1187     height = 2; /* line is exactly 2 units in height */
1188
1189     control->hwnd = CreateWindowExW( exstyle, szStatic, NULL, style,
1190                           x, y, width, height, dialog->hwnd, NULL, NULL, NULL );
1191
1192     TRACE("Dialog %s control %s hwnd %p\n",
1193            debugstr_w(dialog->name), debugstr_w(name), control->hwnd );
1194
1195     return ERROR_SUCCESS;
1196 }
1197
1198 /******************** Scroll Text ********************************************/
1199
1200 struct msi_scrolltext_info
1201 {
1202     msi_dialog *dialog;
1203     msi_control *control;
1204     WNDPROC oldproc;
1205 };
1206
1207 static LRESULT WINAPI
1208 MSIScrollText_WndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
1209 {
1210     struct msi_scrolltext_info *info;
1211     HRESULT r;
1212
1213     TRACE("%p %04x %08lx %08lx\n", hWnd, msg, wParam, lParam);
1214
1215     info = GetPropW( hWnd, szButtonData );
1216
1217     r = CallWindowProcW( info->oldproc, hWnd, msg, wParam, lParam );
1218
1219     switch( msg )
1220     {
1221     case WM_GETDLGCODE:
1222         return DLGC_WANTARROWS;
1223     case WM_NCDESTROY:
1224         msi_free( info );
1225         RemovePropW( hWnd, szButtonData );
1226         break;
1227     case WM_PAINT:
1228         /* native MSI sets a wait cursor here */
1229         msi_dialog_button_handler( info->dialog, info->control, BN_CLICKED );
1230         break;
1231     }
1232     return r;
1233 }
1234
1235 struct msi_streamin_info
1236 {
1237     LPSTR string;
1238     DWORD offset;
1239     DWORD length;
1240 };
1241
1242 static DWORD CALLBACK
1243 msi_richedit_stream_in( DWORD_PTR arg, LPBYTE buffer, LONG count, LONG *pcb )
1244 {
1245     struct msi_streamin_info *info = (struct msi_streamin_info*) arg;
1246
1247     if( (count + info->offset) > info->length )
1248         count = info->length - info->offset;
1249     memcpy( buffer, &info->string[ info->offset ], count );
1250     *pcb = count;
1251     info->offset += count;
1252
1253     TRACE("%d/%d\n", info->offset, info->length);
1254
1255     return 0;
1256 }
1257
1258 static void msi_scrolltext_add_text( msi_control *control, LPCWSTR text )
1259 {
1260     struct msi_streamin_info info;
1261     EDITSTREAM es;
1262
1263     info.string = strdupWtoA( text );
1264     info.offset = 0;
1265     info.length = lstrlenA( info.string ) + 1;
1266
1267     es.dwCookie = (DWORD_PTR) &info;
1268     es.dwError = 0;
1269     es.pfnCallback = msi_richedit_stream_in;
1270
1271     SendMessageW( control->hwnd, EM_STREAMIN, SF_RTF, (LPARAM) &es );
1272
1273     msi_free( info.string );
1274 }
1275
1276 static UINT msi_dialog_scrolltext_control( msi_dialog *dialog, MSIRECORD *rec )
1277 {
1278     static const WCHAR szRichEdit20W[] = {'R','i','c','h','E','d','i','t','2','0','W',0};
1279     struct msi_scrolltext_info *info;
1280     msi_control *control;
1281     HMODULE hRichedit;
1282     LPCWSTR text;
1283     DWORD style;
1284
1285     info = msi_alloc( sizeof *info );
1286     if (!info)
1287         return ERROR_FUNCTION_FAILED;
1288
1289     hRichedit = LoadLibraryA("riched20");
1290
1291     style = WS_BORDER | ES_MULTILINE | WS_VSCROLL |
1292             ES_READONLY | ES_AUTOVSCROLL | WS_TABSTOP;
1293     control = msi_dialog_add_control( dialog, rec, szRichEdit20W, style );
1294     if (!control)
1295     {
1296         FreeLibrary( hRichedit );
1297         msi_free( info );
1298         return ERROR_FUNCTION_FAILED;
1299     }
1300
1301     control->hDll = hRichedit;
1302
1303     info->dialog = dialog;
1304     info->control = control;
1305
1306     /* subclass the static control */
1307     info->oldproc = (WNDPROC) SetWindowLongPtrW( control->hwnd, GWLP_WNDPROC,
1308                                           (LONG_PTR)MSIScrollText_WndProc );
1309     SetPropW( control->hwnd, szButtonData, info );
1310
1311     /* add the text into the richedit */
1312     text = MSI_RecordGetString( rec, 10 );
1313     if (text)
1314         msi_scrolltext_add_text( control, text );
1315
1316     return ERROR_SUCCESS;
1317 }
1318
1319 static HBITMAP msi_load_picture( MSIDATABASE *db, LPCWSTR name,
1320                                  INT cx, INT cy, DWORD flags )
1321 {
1322     HBITMAP hOleBitmap = 0, hBitmap = 0, hOldSrcBitmap, hOldDestBitmap;
1323     MSIRECORD *rec = NULL;
1324     IStream *stm = NULL;
1325     IPicture *pic = NULL;
1326     HDC srcdc, destdc;
1327     BITMAP bm;
1328     UINT r;
1329
1330     rec = msi_get_binary_record( db, name );
1331     if( !rec )
1332         goto end;
1333
1334     r = MSI_RecordGetIStream( rec, 2, &stm );
1335     msiobj_release( &rec->hdr );
1336     if( r != ERROR_SUCCESS )
1337         goto end;
1338
1339     r = OleLoadPicture( stm, 0, TRUE, &IID_IPicture, (LPVOID*) &pic );
1340     IStream_Release( stm );
1341     if( FAILED( r ) )
1342     {
1343         ERR("failed to load picture\n");
1344         goto end;
1345     }
1346
1347     r = IPicture_get_Handle( pic, (OLE_HANDLE*) &hOleBitmap );
1348     if( FAILED( r ) )
1349     {
1350         ERR("failed to get bitmap handle\n");
1351         goto end;
1352     }
1353
1354     /* make the bitmap the desired size */
1355     r = GetObjectW( hOleBitmap, sizeof bm, &bm );
1356     if (r != sizeof bm )
1357     {
1358         ERR("failed to get bitmap size\n");
1359         goto end;
1360     }
1361
1362     if (flags & LR_DEFAULTSIZE)
1363     {
1364         cx = bm.bmWidth;
1365         cy = bm.bmHeight;
1366     }
1367
1368     srcdc = CreateCompatibleDC( NULL );
1369     hOldSrcBitmap = SelectObject( srcdc, hOleBitmap );
1370     destdc = CreateCompatibleDC( NULL );
1371     hBitmap = CreateCompatibleBitmap( srcdc, cx, cy );
1372     hOldDestBitmap = SelectObject( destdc, hBitmap );
1373     StretchBlt( destdc, 0, 0, cx, cy,
1374                 srcdc, 0, 0, bm.bmWidth, bm.bmHeight, SRCCOPY);
1375     SelectObject( srcdc, hOldSrcBitmap );
1376     SelectObject( destdc, hOldDestBitmap );
1377     DeleteDC( srcdc );
1378     DeleteDC( destdc );
1379
1380 end:
1381     if ( pic )
1382         IPicture_Release( pic );
1383     return hBitmap;
1384 }
1385
1386 static UINT msi_dialog_bitmap_control( msi_dialog *dialog, MSIRECORD *rec )
1387 {
1388     UINT cx, cy, flags, style, attributes;
1389     msi_control *control;
1390     LPWSTR name;
1391
1392     flags = LR_LOADFROMFILE;
1393     style = SS_BITMAP | SS_LEFT | WS_GROUP;
1394
1395     attributes = MSI_RecordGetInteger( rec, 8 );
1396     if( attributes & msidbControlAttributesFixedSize )
1397     {
1398         flags |= LR_DEFAULTSIZE;
1399         style |= SS_CENTERIMAGE;
1400     }
1401
1402     control = msi_dialog_add_control( dialog, rec, szStatic, style );
1403     cx = MSI_RecordGetInteger( rec, 6 );
1404     cy = MSI_RecordGetInteger( rec, 7 );
1405     cx = msi_dialog_scale_unit( dialog, cx );
1406     cy = msi_dialog_scale_unit( dialog, cy );
1407
1408     name = msi_get_binary_name( dialog->package, rec );
1409     control->hBitmap = msi_load_picture( dialog->package->db, name, cx, cy, flags );
1410     if( control->hBitmap )
1411         SendMessageW( control->hwnd, STM_SETIMAGE,
1412                       IMAGE_BITMAP, (LPARAM) control->hBitmap );
1413     else
1414         ERR("Failed to load bitmap %s\n", debugstr_w(name));
1415
1416     msi_free( name );
1417
1418     return ERROR_SUCCESS;
1419 }
1420
1421 static UINT msi_dialog_icon_control( msi_dialog *dialog, MSIRECORD *rec )
1422 {
1423     msi_control *control;
1424     DWORD attributes;
1425     LPWSTR name;
1426
1427     TRACE("\n");
1428
1429     control = msi_dialog_add_control( dialog, rec, szStatic,
1430                             SS_ICON | SS_CENTERIMAGE | WS_GROUP );
1431
1432     attributes = MSI_RecordGetInteger( rec, 8 );
1433     name = msi_get_binary_name( dialog->package, rec );
1434     control->hIcon = msi_load_icon( dialog->package->db, name, attributes );
1435     if( control->hIcon )
1436         SendMessageW( control->hwnd, STM_SETICON, (WPARAM) control->hIcon, 0 );
1437     else
1438         ERR("Failed to load bitmap %s\n", debugstr_w(name));
1439     msi_free( name );
1440     return ERROR_SUCCESS;
1441 }
1442
1443 /******************** Combo Box ***************************************/
1444
1445 struct msi_combobox_info
1446 {
1447     msi_dialog *dialog;
1448     HWND hwnd;
1449     WNDPROC oldproc;
1450     DWORD num_items;
1451     DWORD addpos_items;
1452     LPWSTR *items;
1453 };
1454
1455 static LRESULT WINAPI MSIComboBox_WndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
1456 {
1457     struct msi_combobox_info *info;
1458     LRESULT r;
1459     DWORD j;
1460
1461     TRACE("%p %04x %08lx %08lx\n", hWnd, msg, wParam, lParam);
1462
1463     info = GetPropW( hWnd, szButtonData );
1464     if (!info)
1465         return 0;
1466
1467     r = CallWindowProcW( info->oldproc, hWnd, msg, wParam, lParam );
1468
1469     switch (msg)
1470     {
1471     case WM_NCDESTROY:
1472         for (j = 0; j < info->num_items; j++)
1473             msi_free( info->items[j] );
1474         msi_free( info->items );
1475         msi_free( info );
1476         RemovePropW( hWnd, szButtonData );
1477         break;
1478     }
1479
1480     return r;
1481 }
1482
1483 static UINT msi_combobox_add_item( MSIRECORD *rec, LPVOID param )
1484 {
1485     struct msi_combobox_info *info = param;
1486     LPCWSTR value, text;
1487     int pos;
1488
1489     value = MSI_RecordGetString( rec, 3 );
1490     text = MSI_RecordGetString( rec, 4 );
1491
1492     info->items[info->addpos_items] = strdupW( value );
1493
1494     pos = SendMessageW( info->hwnd, CB_ADDSTRING, 0, (LPARAM)text );
1495     SendMessageW( info->hwnd, CB_SETITEMDATA, pos, (LPARAM)info->items[info->addpos_items] );
1496     info->addpos_items++;
1497
1498     return ERROR_SUCCESS;
1499 }
1500
1501 static UINT msi_combobox_add_items( struct msi_combobox_info *info, LPCWSTR property )
1502 {
1503     static const WCHAR query[] = {
1504         'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
1505         '`','C','o','m','b','o','B','o','x','`',' ','W','H','E','R','E',' ',
1506         '`','P','r','o','p','e','r','t','y','`',' ','=',' ','\'','%','s','\'',' ',
1507         'O','R','D','E','R',' ','B','Y',' ','`','O','r','d','e','r','`',0};
1508     MSIQUERY *view;
1509     DWORD count;
1510     UINT r;
1511
1512     r = MSI_OpenQuery( info->dialog->package->db, &view, query, property );
1513     if (r != ERROR_SUCCESS)
1514         return r;
1515
1516     /* just get the number of records */
1517     count = 0;
1518     r = MSI_IterateRecords( view, &count, NULL, NULL );
1519     if (r != ERROR_SUCCESS)
1520     {
1521         msiobj_release( &view->hdr );
1522         return r;
1523     }
1524     info->num_items = count;
1525     info->items = msi_alloc( sizeof(*info->items) * count );
1526
1527     r = MSI_IterateRecords( view, NULL, msi_combobox_add_item, info );
1528     msiobj_release( &view->hdr );
1529     return r;
1530 }
1531
1532 static UINT msi_dialog_set_control_condition( MSIRECORD *rec, LPVOID param )
1533 {
1534     static const WCHAR szHide[] = {'H','i','d','e',0};
1535     static const WCHAR szShow[] = {'S','h','o','w',0};
1536     static const WCHAR szDisable[] = {'D','i','s','a','b','l','e',0};
1537     static const WCHAR szEnable[] = {'E','n','a','b','l','e',0};
1538     static const WCHAR szDefault[] = {'D','e','f','a','u','l','t',0};
1539     msi_dialog *dialog = param;
1540     msi_control *control;
1541     LPCWSTR name, action, condition;
1542     UINT r;
1543
1544     name = MSI_RecordGetString( rec, 2 );
1545     action = MSI_RecordGetString( rec, 3 );
1546     condition = MSI_RecordGetString( rec, 4 );
1547     r = MSI_EvaluateConditionW( dialog->package, condition );
1548     control = msi_dialog_find_control( dialog, name );
1549     if (r == MSICONDITION_TRUE && control)
1550     {
1551         TRACE("%s control %s\n", debugstr_w(action), debugstr_w(name));
1552
1553         /* FIXME: case sensitive? */
1554         if (!strcmpW( action, szHide ))
1555             ShowWindow(control->hwnd, SW_HIDE);
1556         else if (!strcmpW( action, szShow ))
1557             ShowWindow(control->hwnd, SW_SHOW);
1558         else if (!strcmpW( action, szDisable ))
1559             EnableWindow(control->hwnd, FALSE);
1560         else if (!strcmpW( action, szEnable ))
1561             EnableWindow(control->hwnd, TRUE);
1562         else if (!strcmpW( action, szDefault ))
1563             SetFocus(control->hwnd);
1564         else
1565             FIXME("Unhandled action %s\n", debugstr_w(action));
1566     }
1567     return ERROR_SUCCESS;
1568 }
1569
1570 static UINT msi_dialog_evaluate_control_conditions( msi_dialog *dialog )
1571 {
1572     static const WCHAR query[] = {
1573         'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
1574         'C','o','n','t','r','o','l','C','o','n','d','i','t','i','o','n',' ',
1575         'W','H','E','R','E',' ','`','D','i','a','l','o','g','_','`',' ','=',' ','\'','%','s','\'',0};
1576     UINT r;
1577     MSIQUERY *view;
1578     MSIPACKAGE *package = dialog->package;
1579
1580     TRACE("%p %s\n", dialog, debugstr_w(dialog->name));
1581
1582     /* query the Control table for all the elements of the control */
1583     r = MSI_OpenQuery( package->db, &view, query, dialog->name );
1584     if (r != ERROR_SUCCESS)
1585         return ERROR_SUCCESS;
1586
1587     r = MSI_IterateRecords( view, 0, msi_dialog_set_control_condition, dialog );
1588     msiobj_release( &view->hdr );
1589     return r;
1590 }
1591
1592 static UINT msi_dialog_combobox_handler( msi_dialog *dialog, msi_control *control, WPARAM param )
1593 {
1594     struct msi_combobox_info *info;
1595     int index;
1596     LPWSTR value;
1597
1598     if (HIWORD(param) != CBN_SELCHANGE && HIWORD(param) != CBN_EDITCHANGE)
1599         return ERROR_SUCCESS;
1600
1601     info = GetPropW( control->hwnd, szButtonData );
1602     index = SendMessageW( control->hwnd, CB_GETCURSEL, 0, 0 );
1603     if (index == CB_ERR)
1604         value = msi_get_window_text( control->hwnd );
1605     else
1606         value = (LPWSTR) SendMessageW( control->hwnd, CB_GETITEMDATA, index, 0 );
1607
1608     msi_dialog_set_property( info->dialog->package, control->property, value );
1609     msi_dialog_evaluate_control_conditions( info->dialog );
1610
1611     if (index == CB_ERR)
1612         msi_free( value );
1613
1614     return ERROR_SUCCESS;
1615 }
1616
1617 static void msi_dialog_combobox_update( msi_dialog *dialog, msi_control *control )
1618 {
1619     struct msi_combobox_info *info;
1620     LPWSTR value, tmp;
1621     DWORD j;
1622
1623     info = GetPropW( control->hwnd, szButtonData );
1624
1625     value = msi_dup_property( dialog->package->db, control->property );
1626     if (!value)
1627     {
1628         SendMessageW( control->hwnd, CB_SETCURSEL, -1, 0 );
1629         return;
1630     }
1631
1632     for (j = 0; j < info->num_items; j++)
1633     {
1634         tmp = (LPWSTR) SendMessageW( control->hwnd, CB_GETITEMDATA, j, 0 );
1635         if (!strcmpW( value, tmp ))
1636             break;
1637     }
1638
1639     if (j < info->num_items)
1640     {
1641         SendMessageW( control->hwnd, CB_SETCURSEL, j, 0 );
1642     }
1643     else
1644     {
1645         SendMessageW( control->hwnd, CB_SETCURSEL, -1, 0 );
1646         SetWindowTextW( control->hwnd, value );
1647     }
1648
1649     msi_free(value);
1650 }
1651
1652 static UINT msi_dialog_combo_control( msi_dialog *dialog, MSIRECORD *rec )
1653 {
1654     struct msi_combobox_info *info;
1655     msi_control *control;
1656     DWORD attributes, style;
1657     LPCWSTR prop;
1658
1659     info = msi_alloc( sizeof *info );
1660     if (!info)
1661         return ERROR_FUNCTION_FAILED;
1662
1663     style = CBS_AUTOHSCROLL | WS_TABSTOP | WS_GROUP | WS_CHILD;
1664     attributes = MSI_RecordGetInteger( rec, 8 );
1665     if ( ~attributes & msidbControlAttributesSorted)
1666         style |= CBS_SORT;
1667     if ( attributes & msidbControlAttributesComboList)
1668         style |= CBS_DROPDOWNLIST;
1669     else
1670         style |= CBS_DROPDOWN;
1671
1672     control = msi_dialog_add_control( dialog, rec, WC_COMBOBOXW, style );
1673     if (!control)
1674     {
1675         msi_free( info );
1676         return ERROR_FUNCTION_FAILED;
1677     }
1678
1679     control->handler = msi_dialog_combobox_handler;
1680     control->update = msi_dialog_combobox_update;
1681
1682     prop = MSI_RecordGetString( rec, 9 );
1683     control->property = msi_dialog_dup_property( dialog, prop, FALSE );
1684
1685     /* subclass */
1686     info->dialog = dialog;
1687     info->hwnd = control->hwnd;
1688     info->items = NULL;
1689     info->addpos_items = 0;
1690     info->oldproc = (WNDPROC)SetWindowLongPtrW( control->hwnd, GWLP_WNDPROC,
1691                                                 (LONG_PTR)MSIComboBox_WndProc );
1692     SetPropW( control->hwnd, szButtonData, info );
1693
1694     if (control->property)
1695         msi_combobox_add_items( info, control->property );
1696
1697     msi_dialog_combobox_update( dialog, control );
1698
1699     return ERROR_SUCCESS;
1700 }
1701
1702 static UINT msi_dialog_edit_handler( msi_dialog *dialog, msi_control *control, WPARAM param )
1703 {
1704     LPWSTR buf;
1705
1706     if (HIWORD(param) != EN_CHANGE)
1707         return ERROR_SUCCESS;
1708
1709     TRACE("edit %s contents changed, set %s\n", debugstr_w(control->name), debugstr_w(control->property));
1710
1711     buf = msi_get_window_text( control->hwnd );
1712     msi_dialog_set_property( dialog->package, control->property, buf );
1713     msi_free( buf );
1714
1715     return ERROR_SUCCESS;
1716 }
1717
1718 /* length of 2^32 + 1 */
1719 #define MAX_NUM_DIGITS 11
1720
1721 static UINT msi_dialog_edit_control( msi_dialog *dialog, MSIRECORD *rec )
1722 {
1723     msi_control *control;
1724     LPCWSTR prop, text;
1725     LPWSTR val, begin, end;
1726     WCHAR num[MAX_NUM_DIGITS];
1727     DWORD limit;
1728
1729     control = msi_dialog_add_control( dialog, rec, szEdit,
1730                                       WS_BORDER | WS_TABSTOP | ES_AUTOHSCROLL );
1731     control->handler = msi_dialog_edit_handler;
1732
1733     text = MSI_RecordGetString( rec, 10 );
1734     if ( text )
1735     {
1736         begin = strchrW( text, '{' );
1737         end = strchrW( text, '}' );
1738
1739         if ( begin && end && end > begin &&
1740              begin[0] >= '0' && begin[0] <= '9' &&
1741              end - begin < MAX_NUM_DIGITS)
1742         {
1743             lstrcpynW( num, begin + 1, end - begin );
1744             limit = atolW( num );
1745
1746             SendMessageW( control->hwnd, EM_SETLIMITTEXT, limit, 0 );
1747         }
1748     }
1749
1750     prop = MSI_RecordGetString( rec, 9 );
1751     if( prop )
1752         control->property = strdupW( prop );
1753
1754     val = msi_dup_property( dialog->package->db, control->property );
1755     SetWindowTextW( control->hwnd, val );
1756     msi_free( val );
1757     return ERROR_SUCCESS;
1758 }
1759
1760 /******************** Masked Edit ********************************************/
1761
1762 #define MASK_MAX_GROUPS 20
1763
1764 struct msi_mask_group
1765 {
1766     UINT len;
1767     UINT ofs;
1768     WCHAR type;
1769     HWND hwnd;
1770 };
1771
1772 struct msi_maskedit_info
1773 {
1774     msi_dialog *dialog;
1775     WNDPROC oldproc;
1776     HWND hwnd;
1777     LPWSTR prop;
1778     UINT num_chars;
1779     UINT num_groups;
1780     struct msi_mask_group group[MASK_MAX_GROUPS];
1781 };
1782
1783 static BOOL msi_mask_editable( WCHAR type )
1784 {
1785     switch (type)
1786     {
1787     case '%':
1788     case '#':
1789     case '&':
1790     case '`':
1791     case '?':
1792     case '^':
1793         return TRUE;
1794     }
1795     return FALSE;
1796 }
1797
1798 static void msi_mask_control_change( struct msi_maskedit_info *info )
1799 {
1800     LPWSTR val;
1801     UINT i, n, r;
1802
1803     val = msi_alloc( (info->num_chars+1)*sizeof(WCHAR) );
1804     for( i=0, n=0; i<info->num_groups; i++ )
1805     {
1806         if (info->group[i].len == ~0u)
1807         {
1808             UINT len = SendMessageW( info->group[i].hwnd, WM_GETTEXTLENGTH, 0, 0 );
1809             val = msi_realloc( val, (len + 1) * sizeof(WCHAR) );
1810             GetWindowTextW( info->group[i].hwnd, val, len + 1 );
1811         }
1812         else
1813         {
1814             if (info->group[i].len + n > info->num_chars)
1815             {
1816                 ERR("can't fit control %d text into template\n",i);
1817                 break;
1818             }
1819             if (!msi_mask_editable(info->group[i].type))
1820             {
1821                 for(r=0; r<info->group[i].len; r++)
1822                     val[n+r] = info->group[i].type;
1823                 val[n+r] = 0;
1824             }
1825             else
1826             {
1827                 r = GetWindowTextW( info->group[i].hwnd, &val[n], info->group[i].len+1 );
1828                 if( r != info->group[i].len )
1829                     break;
1830             }
1831             n += r;
1832         }
1833     }
1834
1835     TRACE("%d/%d controls were good\n", i, info->num_groups);
1836
1837     if( i == info->num_groups )
1838     {
1839         TRACE("Set property %s to %s\n", debugstr_w(info->prop), debugstr_w(val));
1840         msi_dialog_set_property( info->dialog->package, info->prop, val );
1841         msi_dialog_evaluate_control_conditions( info->dialog );
1842     }
1843     msi_free( val );
1844 }
1845
1846 /* now move to the next control if necessary */
1847 static VOID msi_mask_next_control( struct msi_maskedit_info *info, HWND hWnd )
1848 {
1849     HWND hWndNext;
1850     UINT len, i;
1851
1852     for( i=0; i<info->num_groups; i++ )
1853         if( info->group[i].hwnd == hWnd )
1854             break;
1855
1856     /* don't move from the last control */
1857     if( i >= (info->num_groups-1) )
1858         return;
1859
1860     len = SendMessageW( hWnd, WM_GETTEXTLENGTH, 0, 0 );
1861     if( len < info->group[i].len )
1862         return;
1863
1864     hWndNext = GetNextDlgTabItem( GetParent( hWnd ), hWnd, FALSE );
1865     SetFocus( hWndNext );
1866 }
1867
1868 static LRESULT WINAPI
1869 MSIMaskedEdit_WndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
1870 {
1871     struct msi_maskedit_info *info;
1872     HRESULT r;
1873
1874     TRACE("%p %04x %08lx %08lx\n", hWnd, msg, wParam, lParam);
1875
1876     info = GetPropW(hWnd, szButtonData);
1877
1878     r = CallWindowProcW(info->oldproc, hWnd, msg, wParam, lParam);
1879
1880     switch( msg )
1881     {
1882     case WM_COMMAND:
1883         if (HIWORD(wParam) == EN_CHANGE)
1884         {
1885             msi_mask_control_change( info );
1886             msi_mask_next_control( info, (HWND) lParam );
1887         }
1888         break;
1889     case WM_NCDESTROY:
1890         msi_free( info->prop );
1891         msi_free( info );
1892         RemovePropW( hWnd, szButtonData );
1893         break;
1894     }
1895
1896     return r;
1897 }
1898
1899 /* fish the various bits of the property out and put them in the control */
1900 static void
1901 msi_maskedit_set_text( struct msi_maskedit_info *info, LPCWSTR text )
1902 {
1903     LPCWSTR p;
1904     UINT i;
1905
1906     p = text;
1907     for( i = 0; i < info->num_groups; i++ )
1908     {
1909         if( info->group[i].len < strlenW( p ) )
1910         {
1911             LPWSTR chunk = strdupW( p );
1912             chunk[ info->group[i].len ] = 0;
1913             SetWindowTextW( info->group[i].hwnd, chunk );
1914             msi_free( chunk );
1915         }
1916         else
1917         {
1918             SetWindowTextW( info->group[i].hwnd, p );
1919             break;
1920         }
1921         p += info->group[i].len;
1922     }
1923 }
1924
1925 static struct msi_maskedit_info * msi_dialog_parse_groups( LPCWSTR mask )
1926 {
1927     struct msi_maskedit_info *info;
1928     int i = 0, n = 0, total = 0;
1929     LPCWSTR p;
1930
1931     TRACE("masked control, template %s\n", debugstr_w(mask));
1932
1933     if( !mask )
1934         return NULL;
1935
1936     info = msi_alloc_zero( sizeof *info );
1937     if( !info )
1938         return info;
1939
1940     p = strchrW(mask, '<');
1941     if( p )
1942         p++;
1943     else
1944         p = mask;
1945
1946     for( i=0; i<MASK_MAX_GROUPS; i++ )
1947     {
1948         /* stop at the end of the string */
1949         if( p[0] == 0 || p[0] == '>' )
1950         {
1951             if (!total)
1952             {
1953                 /* create a group for the empty mask */
1954                 info->group[0].type = '&';
1955                 info->group[0].len = ~0u;
1956                 i = 1;
1957             }
1958             break;
1959         }
1960
1961         /* count the number of the same identifier */
1962         for( n=0; p[n] == p[0]; n++ )
1963             ;
1964         info->group[i].ofs = total;
1965         info->group[i].type = p[0];
1966         if( p[n] == '=' )
1967         {
1968             n++;
1969             total++; /* an extra not part of the group */
1970         }
1971         info->group[i].len = n;
1972         total += n;
1973         p += n;
1974     }
1975
1976     TRACE("%d characters in %d groups\n", total, i );
1977     if( i == MASK_MAX_GROUPS )
1978         ERR("too many groups in PIDTemplate %s\n", debugstr_w(mask));
1979
1980     info->num_chars = total;
1981     info->num_groups = i;
1982
1983     return info;
1984 }
1985
1986 static void
1987 msi_maskedit_create_children( struct msi_maskedit_info *info, LPCWSTR font )
1988 {
1989     DWORD width, height, style, wx, ww;
1990     RECT rect;
1991     HWND hwnd;
1992     UINT i;
1993
1994     style = WS_CHILD | WS_BORDER | WS_VISIBLE | WS_TABSTOP | ES_AUTOHSCROLL;
1995
1996     GetClientRect( info->hwnd, &rect );
1997
1998     width = rect.right - rect.left;
1999     height = rect.bottom - rect.top;
2000
2001     for( i = 0; i < info->num_groups; i++ )
2002     {
2003         if (!msi_mask_editable( info->group[i].type ))
2004             continue;
2005         if (info->num_chars)
2006         {
2007             wx = (info->group[i].ofs * width) / info->num_chars;
2008             ww = (info->group[i].len * width) / info->num_chars;
2009         }
2010         else
2011         {
2012             wx = 0;
2013             ww = width;
2014         }
2015         hwnd = CreateWindowW( szEdit, NULL, style, wx, 0, ww, height,
2016                               info->hwnd, NULL, NULL, NULL );
2017         if( !hwnd )
2018         {
2019             ERR("failed to create mask edit sub window\n");
2020             break;
2021         }
2022
2023         SendMessageW( hwnd, EM_LIMITTEXT, info->group[i].len, 0 );
2024
2025         msi_dialog_set_font( info->dialog, hwnd,
2026                              font?font:info->dialog->default_font );
2027         info->group[i].hwnd = hwnd;
2028     }
2029 }
2030
2031 /*
2032  * office 2003 uses "73931<````=````=````=````=`````>@@@@@"
2033  * delphi 7 uses "<????-??????-??????-????>" and "<???-???>"
2034  * filemaker pro 7 uses "<^^^^=^^^^=^^^^=^^^^=^^^^=^^^^=^^^^^>"
2035  */
2036 static UINT msi_dialog_maskedit_control( msi_dialog *dialog, MSIRECORD *rec )
2037 {
2038     LPWSTR font_mask, val = NULL, font;
2039     struct msi_maskedit_info *info = NULL;
2040     UINT ret = ERROR_SUCCESS;
2041     msi_control *control;
2042     LPCWSTR prop, mask;
2043
2044     TRACE("\n");
2045
2046     font_mask = msi_get_deformatted_field( dialog->package, rec, 10 );
2047     font = msi_dialog_get_style( font_mask, &mask );
2048     if( !mask )
2049     {
2050         WARN("mask template is empty\n");
2051         goto end;
2052     }
2053
2054     info = msi_dialog_parse_groups( mask );
2055     if( !info )
2056     {
2057         ERR("template %s is invalid\n", debugstr_w(mask));
2058         goto end;
2059     }
2060
2061     info->dialog = dialog;
2062
2063     control = msi_dialog_add_control( dialog, rec, szStatic,
2064                    SS_OWNERDRAW | WS_GROUP | WS_VISIBLE );
2065     if( !control )
2066     {
2067         ERR("Failed to create maskedit container\n");
2068         ret = ERROR_FUNCTION_FAILED;
2069         goto end;
2070     }
2071     SetWindowLongPtrW( control->hwnd, GWL_EXSTYLE, WS_EX_CONTROLPARENT );
2072
2073     info->hwnd = control->hwnd;
2074
2075     /* subclass the static control */
2076     info->oldproc = (WNDPROC) SetWindowLongPtrW( info->hwnd, GWLP_WNDPROC,
2077                                           (LONG_PTR)MSIMaskedEdit_WndProc );
2078     SetPropW( control->hwnd, szButtonData, info );
2079
2080     prop = MSI_RecordGetString( rec, 9 );
2081     if( prop )
2082         info->prop = strdupW( prop );
2083
2084     msi_maskedit_create_children( info, font );
2085
2086     if( prop )
2087     {
2088         val = msi_dup_property( dialog->package->db, prop );
2089         if( val )
2090         {
2091             msi_maskedit_set_text( info, val );
2092             msi_free( val );
2093         }
2094     }
2095
2096 end:
2097     if( ret != ERROR_SUCCESS )
2098         msi_free( info );
2099     msi_free( font_mask );
2100     msi_free( font );
2101     return ret;
2102 }
2103
2104 /******************** Progress Bar *****************************************/
2105
2106 static UINT msi_dialog_progress_bar( msi_dialog *dialog, MSIRECORD *rec )
2107 {
2108     msi_control *control;
2109     DWORD attributes, style;
2110
2111     style = WS_VISIBLE;
2112     attributes = MSI_RecordGetInteger( rec, 8 );
2113     if( !(attributes & msidbControlAttributesProgress95) )
2114         style |= PBS_SMOOTH;
2115
2116     control = msi_dialog_add_control( dialog, rec, PROGRESS_CLASSW, style );
2117     if( !control )
2118         return ERROR_FUNCTION_FAILED;
2119
2120     event_subscribe( dialog, szSetProgress, control->name, szProgress );
2121     return ERROR_SUCCESS;
2122 }
2123
2124 /******************** Path Edit ********************************************/
2125
2126 struct msi_pathedit_info
2127 {
2128     msi_dialog *dialog;
2129     msi_control *control;
2130     WNDPROC oldproc;
2131 };
2132
2133 static void msi_dialog_update_pathedit( msi_dialog *dialog, msi_control *control )
2134 {
2135     LPWSTR prop, path;
2136     BOOL indirect;
2137
2138     if (!control && !(control = msi_dialog_find_control_by_type( dialog, szPathEdit )))
2139        return;
2140
2141     indirect = control->attributes & msidbControlAttributesIndirect;
2142     prop = msi_dialog_dup_property( dialog, control->property, indirect );
2143     path = msi_dialog_dup_property( dialog, prop, TRUE );
2144
2145     SetWindowTextW( control->hwnd, path );
2146     SendMessageW( control->hwnd, EM_SETSEL, 0, -1 );
2147
2148     msi_free( path );
2149     msi_free( prop );
2150 }
2151
2152 /* FIXME: test when this should fail */
2153 static BOOL msi_dialog_verify_path( LPWSTR path )
2154 {
2155     if ( !lstrlenW( path ) )
2156         return FALSE;
2157
2158     if ( PathIsRelativeW( path ) )
2159         return FALSE;
2160
2161     return TRUE;
2162 }
2163
2164 /* returns TRUE if the path is valid, FALSE otherwise */
2165 static BOOL msi_dialog_onkillfocus( msi_dialog *dialog, msi_control *control )
2166 {
2167     LPWSTR buf, prop;
2168     BOOL indirect;
2169     BOOL valid;
2170
2171     indirect = control->attributes & msidbControlAttributesIndirect;
2172     prop = msi_dialog_dup_property( dialog, control->property, indirect );
2173
2174     buf = msi_get_window_text( control->hwnd );
2175
2176     if ( !msi_dialog_verify_path( buf ) )
2177     {
2178         /* FIXME: display an error message box */
2179         ERR("Invalid path %s\n", debugstr_w( buf ));
2180         valid = FALSE;
2181         SetFocus( control->hwnd );
2182     }
2183     else
2184     {
2185         valid = TRUE;
2186         msi_dialog_set_property( dialog->package, prop, buf );
2187     }
2188
2189     msi_dialog_update_pathedit( dialog, control );
2190
2191     TRACE("edit %s contents changed, set %s\n", debugstr_w(control->name),
2192           debugstr_w(prop));
2193
2194     msi_free( buf );
2195     msi_free( prop );
2196
2197     return valid;
2198 }
2199
2200 static LRESULT WINAPI MSIPathEdit_WndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
2201 {
2202     struct msi_pathedit_info *info = GetPropW(hWnd, szButtonData);
2203     LRESULT r = 0;
2204
2205     TRACE("%p %04x %08lx %08lx\n", hWnd, msg, wParam, lParam);
2206
2207     if ( msg == WM_KILLFOCUS )
2208     {
2209         /* if the path is invalid, don't handle this message */
2210         if ( !msi_dialog_onkillfocus( info->dialog, info->control ) )
2211             return 0;
2212     }
2213
2214     r = CallWindowProcW(info->oldproc, hWnd, msg, wParam, lParam);
2215
2216     if ( msg == WM_NCDESTROY )
2217     {
2218         msi_free( info );
2219         RemovePropW( hWnd, szButtonData );
2220     }
2221
2222     return r;
2223 }
2224
2225 static UINT msi_dialog_pathedit_control( msi_dialog *dialog, MSIRECORD *rec )
2226 {
2227     struct msi_pathedit_info *info;
2228     msi_control *control;
2229     LPCWSTR prop;
2230
2231     info = msi_alloc( sizeof *info );
2232     if (!info)
2233         return ERROR_FUNCTION_FAILED;
2234
2235     control = msi_dialog_add_control( dialog, rec, szEdit,
2236                                       WS_BORDER | WS_TABSTOP );
2237     control->attributes = MSI_RecordGetInteger( rec, 8 );
2238     prop = MSI_RecordGetString( rec, 9 );
2239     control->property = msi_dialog_dup_property( dialog, prop, FALSE );
2240
2241     info->dialog = dialog;
2242     info->control = control;
2243     info->oldproc = (WNDPROC) SetWindowLongPtrW( control->hwnd, GWLP_WNDPROC,
2244                                                  (LONG_PTR)MSIPathEdit_WndProc );
2245     SetPropW( control->hwnd, szButtonData, info );
2246
2247     msi_dialog_update_pathedit( dialog, control );
2248
2249     return ERROR_SUCCESS;
2250 }
2251
2252 static UINT msi_dialog_radiogroup_handler( msi_dialog *dialog, msi_control *control, WPARAM param )
2253 {
2254     if (HIWORD(param) != BN_CLICKED)
2255         return ERROR_SUCCESS;
2256
2257     TRACE("clicked radio button %s, set %s\n", debugstr_w(control->name), debugstr_w(control->property));
2258
2259     msi_dialog_set_property( dialog->package, control->property, control->name );
2260
2261     return msi_dialog_button_handler( dialog, control, param );
2262 }
2263
2264 /* radio buttons are a bit different from normal controls */
2265 static UINT msi_dialog_create_radiobutton( MSIRECORD *rec, LPVOID param )
2266 {
2267     radio_button_group_descr *group = param;
2268     msi_dialog *dialog = group->dialog;
2269     msi_control *control;
2270     LPCWSTR prop, text, name;
2271     DWORD style, attributes = group->attributes;
2272
2273     style = WS_CHILD | BS_AUTORADIOBUTTON | BS_MULTILINE | WS_TABSTOP;
2274     name = MSI_RecordGetString( rec, 3 );
2275     text = MSI_RecordGetString( rec, 8 );
2276     if( attributes & msidbControlAttributesVisible )
2277         style |= WS_VISIBLE;
2278     if( ~attributes & msidbControlAttributesEnabled )
2279         style |= WS_DISABLED;
2280
2281     control = dialog_create_window( dialog, rec, 0, szButton, name, text, style,
2282                                     group->parent->hwnd );
2283     if (!control)
2284         return ERROR_FUNCTION_FAILED;
2285     control->handler = msi_dialog_radiogroup_handler;
2286
2287     if (group->propval && !strcmpW( control->name, group->propval ))
2288         SendMessageW(control->hwnd, BM_SETCHECK, BST_CHECKED, 0);
2289
2290     prop = MSI_RecordGetString( rec, 1 );
2291     if( prop )
2292         control->property = strdupW( prop );
2293
2294     return ERROR_SUCCESS;
2295 }
2296
2297 static BOOL CALLBACK msi_radioground_child_enum( HWND hWnd, LPARAM lParam )
2298 {
2299     EnableWindow( hWnd, lParam );
2300     return TRUE;
2301 }
2302
2303 static LRESULT WINAPI MSIRadioGroup_WndProc( HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam )
2304 {
2305     WNDPROC oldproc = (WNDPROC)GetPropW( hWnd, szButtonData );
2306     LRESULT r;
2307
2308     TRACE("hWnd %p msg %04x wParam 0x%08lx lParam 0x%08lx\n", hWnd, msg, wParam, lParam);
2309
2310     if (msg == WM_COMMAND) /* Forward notifications to dialog */
2311         SendMessageW( GetParent( hWnd ), msg, wParam, lParam );
2312
2313     r = CallWindowProcW( oldproc, hWnd, msg, wParam, lParam );
2314
2315     /* make sure the radio buttons show as disabled if the parent is disabled */
2316     if (msg == WM_ENABLE)
2317         EnumChildWindows( hWnd, msi_radioground_child_enum, wParam );
2318
2319     return r;
2320 }
2321
2322 static UINT msi_dialog_radiogroup_control( msi_dialog *dialog, MSIRECORD *rec )
2323 {
2324     static const WCHAR query[] = {
2325         'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
2326         'R','a','d','i','o','B','u','t','t','o','n',' ','W','H','E','R','E',' ',
2327         '`','P','r','o','p','e','r','t','y','`',' ','=',' ','\'','%','s','\'',0};
2328     UINT r;
2329     LPCWSTR prop;
2330     msi_control *control;
2331     MSIQUERY *view;
2332     radio_button_group_descr group;
2333     MSIPACKAGE *package = dialog->package;
2334     WNDPROC oldproc;
2335     DWORD attr, style = WS_GROUP;
2336
2337     prop = MSI_RecordGetString( rec, 9 );
2338
2339     TRACE("%p %p %s\n", dialog, rec, debugstr_w( prop ));
2340
2341     attr = MSI_RecordGetInteger( rec, 8 );
2342     if (attr & msidbControlAttributesHasBorder)
2343         style |= BS_GROUPBOX;
2344     else
2345         style |= BS_OWNERDRAW;
2346
2347     /* Create parent group box to hold radio buttons */
2348     control = msi_dialog_add_control( dialog, rec, szButton, style );
2349     if( !control )
2350         return ERROR_FUNCTION_FAILED;
2351
2352     oldproc = (WNDPROC) SetWindowLongPtrW( control->hwnd, GWLP_WNDPROC,
2353                                            (LONG_PTR)MSIRadioGroup_WndProc );
2354     SetPropW(control->hwnd, szButtonData, oldproc);
2355     SetWindowLongPtrW( control->hwnd, GWL_EXSTYLE, WS_EX_CONTROLPARENT );
2356
2357     if( prop )
2358         control->property = strdupW( prop );
2359
2360     /* query the Radio Button table for all control in this group */
2361     r = MSI_OpenQuery( package->db, &view, query, prop );
2362     if( r != ERROR_SUCCESS )
2363     {
2364         ERR("query failed for dialog %s radio group %s\n",
2365             debugstr_w(dialog->name), debugstr_w(prop));
2366         return ERROR_INVALID_PARAMETER;
2367     }
2368
2369     group.dialog = dialog;
2370     group.parent = control;
2371     group.attributes = MSI_RecordGetInteger( rec, 8 );
2372     group.propval = msi_dup_property( dialog->package->db, control->property );
2373
2374     r = MSI_IterateRecords( view, 0, msi_dialog_create_radiobutton, &group );
2375     msiobj_release( &view->hdr );
2376     msi_free( group.propval );
2377     return r;
2378 }
2379
2380 static void
2381 msi_seltree_sync_item_state( HWND hwnd, MSIFEATURE *feature, HTREEITEM hItem )
2382 {
2383     TVITEMW tvi;
2384     DWORD index = feature->ActionRequest;
2385
2386     TRACE("Feature %s -> %d %d %d\n", debugstr_w(feature->Title),
2387         feature->Installed, feature->Action, feature->ActionRequest);
2388
2389     if (index == INSTALLSTATE_UNKNOWN)
2390         index = INSTALLSTATE_ABSENT;
2391
2392     tvi.mask = TVIF_STATE;
2393     tvi.hItem = hItem;
2394     tvi.state = INDEXTOSTATEIMAGEMASK( index );
2395     tvi.stateMask = TVIS_STATEIMAGEMASK;
2396
2397     SendMessageW( hwnd, TVM_SETITEMW, 0, (LPARAM) &tvi );
2398 }
2399
2400 static UINT
2401 msi_seltree_popup_menu( HWND hwnd, INT x, INT y )
2402 {
2403     HMENU hMenu;
2404     INT r;
2405
2406     /* create a menu to display */
2407     hMenu = CreatePopupMenu();
2408
2409     /* FIXME: load strings from resources */
2410     AppendMenuA( hMenu, MF_ENABLED, INSTALLSTATE_LOCAL, "Install feature locally");
2411     AppendMenuA( hMenu, MF_ENABLED, USER_INSTALLSTATE_ALL, "Install entire feature");
2412     AppendMenuA( hMenu, MF_ENABLED, INSTALLSTATE_ADVERTISED, "Install on demand");
2413     AppendMenuA( hMenu, MF_ENABLED, INSTALLSTATE_ABSENT, "Don't install");
2414     r = TrackPopupMenu( hMenu, TPM_LEFTALIGN | TPM_TOPALIGN | TPM_RETURNCMD,
2415                         x, y, 0, hwnd, NULL );
2416     DestroyMenu( hMenu );
2417     return r;
2418 }
2419
2420 static void
2421 msi_seltree_update_feature_installstate( HWND hwnd, HTREEITEM hItem,
2422         MSIPACKAGE *package, MSIFEATURE *feature, INSTALLSTATE state )
2423 {
2424     feature->ActionRequest = state;
2425     msi_seltree_sync_item_state( hwnd, feature, hItem );
2426     ACTION_UpdateComponentStates( package, feature );
2427 }
2428
2429 static void
2430 msi_seltree_update_siblings_and_children_installstate( HWND hwnd, HTREEITEM curr,
2431         MSIPACKAGE *package, INSTALLSTATE state)
2432 {
2433     /* update all siblings */
2434     do
2435     {
2436         MSIFEATURE *feature;
2437         HTREEITEM child;
2438
2439         feature = msi_seltree_feature_from_item( hwnd, curr );
2440         msi_seltree_update_feature_installstate( hwnd, curr, package, feature, state );
2441
2442         /* update this sibling's children */
2443         child = (HTREEITEM)SendMessageW( hwnd, TVM_GETNEXTITEM, (WPARAM)TVGN_CHILD, (LPARAM)curr );
2444         if (child)
2445             msi_seltree_update_siblings_and_children_installstate( hwnd, child,
2446                     package, state );
2447     }
2448     while ((curr = (HTREEITEM)SendMessageW( hwnd, TVM_GETNEXTITEM, (WPARAM)TVGN_NEXT, (LPARAM)curr )));
2449 }
2450
2451 static LRESULT
2452 msi_seltree_menu( HWND hwnd, HTREEITEM hItem )
2453 {
2454     struct msi_selection_tree_info *info;
2455     MSIFEATURE *feature;
2456     MSIPACKAGE *package;
2457     union {
2458         RECT rc;
2459         POINT pt[2];
2460         HTREEITEM hItem;
2461     } u;
2462     UINT r;
2463
2464     info = GetPropW(hwnd, szButtonData);
2465     package = info->dialog->package;
2466
2467     feature = msi_seltree_feature_from_item( hwnd, hItem );
2468     if (!feature)
2469     {
2470         ERR("item %p feature was NULL\n", hItem);
2471         return 0;
2472     }
2473
2474     /* get the item's rectangle to put the menu just below it */
2475     u.hItem = hItem;
2476     SendMessageW( hwnd, TVM_GETITEMRECT, 0, (LPARAM) &u.rc );
2477     MapWindowPoints( hwnd, NULL, u.pt, 2 );
2478
2479     r = msi_seltree_popup_menu( hwnd, u.rc.left, u.rc.top );
2480
2481     switch (r)
2482     {
2483     case USER_INSTALLSTATE_ALL:
2484         r = INSTALLSTATE_LOCAL;
2485         /* fall-through */
2486     case INSTALLSTATE_ADVERTISED:
2487     case INSTALLSTATE_ABSENT:
2488         {
2489             HTREEITEM child;
2490             child = (HTREEITEM)SendMessageW( hwnd, TVM_GETNEXTITEM, (WPARAM)TVGN_CHILD, (LPARAM)hItem );
2491             if (child)
2492                 msi_seltree_update_siblings_and_children_installstate( hwnd, child, package, r );
2493         }
2494         /* fall-through */
2495     case INSTALLSTATE_LOCAL:
2496         msi_seltree_update_feature_installstate( hwnd, hItem, package, feature, r );
2497         break;
2498     }
2499
2500     return 0;
2501 }
2502
2503 static LRESULT WINAPI
2504 MSISelectionTree_WndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
2505 {
2506     struct msi_selection_tree_info *info;
2507     TVHITTESTINFO tvhti;
2508     HRESULT r;
2509
2510     TRACE("%p %04x %08lx %08lx\n", hWnd, msg, wParam, lParam);
2511
2512     info = GetPropW(hWnd, szButtonData);
2513
2514     switch( msg )
2515     {
2516     case WM_LBUTTONDOWN:
2517         tvhti.pt.x = (short)LOWORD( lParam );
2518         tvhti.pt.y = (short)HIWORD( lParam );
2519         tvhti.flags = 0;
2520         tvhti.hItem = 0;
2521         CallWindowProcW(info->oldproc, hWnd, TVM_HITTEST, 0, (LPARAM) &tvhti );
2522         if (tvhti.flags & TVHT_ONITEMSTATEICON)
2523             return msi_seltree_menu( hWnd, tvhti.hItem );
2524         break;
2525     }
2526     r = CallWindowProcW(info->oldproc, hWnd, msg, wParam, lParam);
2527
2528     switch( msg )
2529     {
2530     case WM_NCDESTROY:
2531         msi_free( info );
2532         RemovePropW( hWnd, szButtonData );
2533         break;
2534     }
2535     return r;
2536 }
2537
2538 static void
2539 msi_seltree_add_child_features( MSIPACKAGE *package, HWND hwnd,
2540                                 LPCWSTR parent, HTREEITEM hParent )
2541 {
2542     struct msi_selection_tree_info *info = GetPropW( hwnd, szButtonData );
2543     MSIFEATURE *feature;
2544     TVINSERTSTRUCTW tvis;
2545     HTREEITEM hitem, hfirst = NULL;
2546
2547     LIST_FOR_EACH_ENTRY( feature, &package->features, MSIFEATURE, entry )
2548     {
2549         if ( parent && feature->Feature_Parent && strcmpW( parent, feature->Feature_Parent ))
2550             continue;
2551         else if ( parent && !feature->Feature_Parent )
2552             continue;
2553         else if ( !parent && feature->Feature_Parent )
2554             continue;
2555
2556         if ( !feature->Title )
2557             continue;
2558
2559         if ( !feature->Display )
2560             continue;
2561
2562         memset( &tvis, 0, sizeof tvis );
2563         tvis.hParent = hParent;
2564         tvis.hInsertAfter = TVI_LAST;
2565         tvis.u.item.mask = TVIF_TEXT | TVIF_PARAM;
2566         tvis.u.item.pszText = feature->Title;
2567         tvis.u.item.lParam = (LPARAM) feature;
2568
2569         hitem = (HTREEITEM) SendMessageW( hwnd, TVM_INSERTITEMW, 0, (LPARAM) &tvis );
2570         if (!hitem)
2571             continue;
2572
2573         if (!hfirst)
2574             hfirst = hitem;
2575
2576         msi_seltree_sync_item_state( hwnd, feature, hitem );
2577         msi_seltree_add_child_features( package, hwnd,
2578                                         feature->Feature, hitem );
2579
2580         /* the node is expanded if Display is odd */
2581         if ( feature->Display % 2 != 0 )
2582             SendMessageW( hwnd, TVM_EXPAND, TVE_EXPAND, (LPARAM) hitem );
2583     }
2584
2585     /* select the first item */
2586     SendMessageW( hwnd, TVM_SELECTITEM, TVGN_CARET | TVGN_DROPHILITE, (LPARAM) hfirst );
2587     info->selected = hfirst;
2588 }
2589
2590 static void msi_seltree_create_imagelist( HWND hwnd )
2591 {
2592     const int bm_width = 32, bm_height = 16, bm_count = 3;
2593     const int bm_resource = 0x1001;
2594     HIMAGELIST himl;
2595     int i;
2596     HBITMAP hbmp;
2597
2598     himl = ImageList_Create( bm_width, bm_height, FALSE, 4, 0 );
2599     if (!himl)
2600     {
2601         ERR("failed to create image list\n");
2602         return;
2603     }
2604
2605     for (i=0; i<bm_count; i++)
2606     {
2607         hbmp = LoadBitmapW( msi_hInstance, MAKEINTRESOURCEW(i+bm_resource) );
2608         if (!hbmp)
2609         {
2610             ERR("failed to load bitmap %d\n", i);
2611             break;
2612         }
2613
2614         /*
2615          * Add a dummy bitmap at offset zero because the treeview
2616          * can't use it as a state mask (zero means no user state).
2617          */
2618         if (!i)
2619             ImageList_Add( himl, hbmp, NULL );
2620
2621         ImageList_Add( himl, hbmp, NULL );
2622     }
2623
2624     SendMessageW( hwnd, TVM_SETIMAGELIST, TVSIL_STATE, (LPARAM)himl );
2625 }
2626
2627 static UINT msi_dialog_seltree_handler( msi_dialog *dialog,
2628                                         msi_control *control, WPARAM param )
2629 {
2630     struct msi_selection_tree_info *info = GetPropW( control->hwnd, szButtonData );
2631     LPNMTREEVIEWW tv = (LPNMTREEVIEWW)param;
2632     MSIRECORD *row, *rec;
2633     MSIFOLDER *folder;
2634     MSIFEATURE *feature;
2635     LPCWSTR dir, title = NULL;
2636     UINT r = ERROR_SUCCESS;
2637
2638     static const WCHAR select[] = {
2639         'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
2640         '`','F','e','a','t','u','r','e','`',' ','W','H','E','R','E',' ',
2641         '`','T','i','t','l','e','`',' ','=',' ','\'','%','s','\'',0
2642     };
2643
2644     if (tv->hdr.code != TVN_SELCHANGINGW)
2645         return ERROR_SUCCESS;
2646
2647     info->selected = tv->itemNew.hItem;
2648
2649     if (!(tv->itemNew.mask & TVIF_TEXT))
2650     {
2651         feature = msi_seltree_feature_from_item( control->hwnd, tv->itemNew.hItem );
2652         if (feature)
2653             title = feature->Title;
2654     }
2655     else
2656         title = tv->itemNew.pszText;
2657
2658     row = MSI_QueryGetRecord( dialog->package->db, select, title );
2659     if (!row)
2660         return ERROR_FUNCTION_FAILED;
2661
2662     rec = MSI_CreateRecord( 1 );
2663
2664     MSI_RecordSetStringW( rec, 1, MSI_RecordGetString( row, 4 ) );
2665     msi_event_fire( dialog->package, szSelectionDescription, rec );
2666
2667     dir = MSI_RecordGetString( row, 7 );
2668     if (dir)
2669     {
2670         folder = msi_get_loaded_folder( dialog->package, dir );
2671         if (!folder)
2672         {
2673             r = ERROR_FUNCTION_FAILED;
2674             goto done;
2675         }
2676         MSI_RecordSetStringW( rec, 1, folder->ResolvedTarget );
2677     }
2678     else
2679         MSI_RecordSetStringW( rec, 1, NULL );
2680
2681     msi_event_fire( dialog->package, szSelectionPath, rec );
2682
2683 done:
2684     msiobj_release(&row->hdr);
2685     msiobj_release(&rec->hdr);
2686
2687     return r;
2688 }
2689
2690 static UINT msi_dialog_selection_tree( msi_dialog *dialog, MSIRECORD *rec )
2691 {
2692     msi_control *control;
2693     LPCWSTR prop, control_name;
2694     MSIPACKAGE *package = dialog->package;
2695     DWORD style;
2696     struct msi_selection_tree_info *info;
2697
2698     info = msi_alloc( sizeof *info );
2699     if (!info)
2700         return ERROR_FUNCTION_FAILED;
2701
2702     /* create the treeview control */
2703     style = TVS_HASLINES | TVS_HASBUTTONS | TVS_LINESATROOT;
2704     style |= WS_GROUP | WS_VSCROLL;
2705     control = msi_dialog_add_control( dialog, rec, WC_TREEVIEWW, style );
2706     if (!control)
2707     {
2708         msi_free(info);
2709         return ERROR_FUNCTION_FAILED;
2710     }
2711
2712     control->handler = msi_dialog_seltree_handler;
2713     control_name = MSI_RecordGetString( rec, 2 );
2714     control->attributes = MSI_RecordGetInteger( rec, 8 );
2715     prop = MSI_RecordGetString( rec, 9 );
2716     control->property = msi_dialog_dup_property( dialog, prop, FALSE );
2717
2718     /* subclass */
2719     info->dialog = dialog;
2720     info->hwnd = control->hwnd;
2721     info->oldproc = (WNDPROC) SetWindowLongPtrW( control->hwnd, GWLP_WNDPROC,
2722                                           (LONG_PTR)MSISelectionTree_WndProc );
2723     SetPropW( control->hwnd, szButtonData, info );
2724
2725     event_subscribe( dialog, szSelectionPath, control_name, szProperty );
2726
2727     /* initialize it */
2728     msi_seltree_create_imagelist( control->hwnd );
2729     msi_seltree_add_child_features( package, control->hwnd, NULL, NULL );
2730
2731     return ERROR_SUCCESS;
2732 }
2733
2734 /******************** Group Box ***************************************/
2735
2736 static UINT msi_dialog_group_box( msi_dialog *dialog, MSIRECORD *rec )
2737 {
2738     msi_control *control;
2739     DWORD style;
2740
2741     style = BS_GROUPBOX | WS_CHILD | WS_GROUP;
2742     control = msi_dialog_add_control( dialog, rec, WC_BUTTONW, style );
2743     if (!control)
2744         return ERROR_FUNCTION_FAILED;
2745
2746     return ERROR_SUCCESS;
2747 }
2748
2749 /******************** List Box ***************************************/
2750
2751 struct msi_listbox_info
2752 {
2753     msi_dialog *dialog;
2754     HWND hwnd;
2755     WNDPROC oldproc;
2756     DWORD num_items;
2757     DWORD addpos_items;
2758     LPWSTR *items;
2759 };
2760
2761 static LRESULT WINAPI MSIListBox_WndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
2762 {
2763     struct msi_listbox_info *info;
2764     LRESULT r;
2765     DWORD j;
2766
2767     TRACE("%p %04x %08lx %08lx\n", hWnd, msg, wParam, lParam);
2768
2769     info = GetPropW( hWnd, szButtonData );
2770     if (!info)
2771         return 0;
2772
2773     r = CallWindowProcW( info->oldproc, hWnd, msg, wParam, lParam );
2774
2775     switch( msg )
2776     {
2777     case WM_NCDESTROY:
2778         for (j = 0; j < info->num_items; j++)
2779             msi_free( info->items[j] );
2780         msi_free( info->items );
2781         msi_free( info );
2782         RemovePropW( hWnd, szButtonData );
2783         break;
2784     }
2785
2786     return r;
2787 }
2788
2789 static UINT msi_listbox_add_item( MSIRECORD *rec, LPVOID param )
2790 {
2791     struct msi_listbox_info *info = param;
2792     LPCWSTR value, text;
2793     int pos;
2794
2795     value = MSI_RecordGetString( rec, 3 );
2796     text = MSI_RecordGetString( rec, 4 );
2797
2798     info->items[info->addpos_items] = strdupW( value );
2799
2800     pos = SendMessageW( info->hwnd, LB_ADDSTRING, 0, (LPARAM)text );
2801     SendMessageW( info->hwnd, LB_SETITEMDATA, pos, (LPARAM)info->items[info->addpos_items] );
2802     info->addpos_items++;
2803     return ERROR_SUCCESS;
2804 }
2805
2806 static UINT msi_listbox_add_items( struct msi_listbox_info *info, LPCWSTR property )
2807 {
2808     static const WCHAR query[] = {
2809         'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
2810         '`','L','i','s','t','B','o','x','`',' ','W','H','E','R','E',' ',
2811         '`','P','r','o','p','e','r','t','y','`',' ','=',' ','\'','%','s','\'',' ',
2812         'O','R','D','E','R',' ','B','Y',' ','`','O','r','d','e','r','`',0};
2813     MSIQUERY *view;
2814     DWORD count;
2815     UINT r;
2816
2817     r = MSI_OpenQuery( info->dialog->package->db, &view, query, property );
2818     if ( r != ERROR_SUCCESS )
2819         return r;
2820
2821     /* just get the number of records */
2822     count = 0;
2823     r = MSI_IterateRecords( view, &count, NULL, NULL );
2824     if (r != ERROR_SUCCESS)
2825     {
2826         msiobj_release( &view->hdr );
2827         return r;
2828     }
2829     info->num_items = count;
2830     info->items = msi_alloc( sizeof(*info->items) * count );
2831
2832     r = MSI_IterateRecords( view, NULL, msi_listbox_add_item, info );
2833     msiobj_release( &view->hdr );
2834     return r;
2835 }
2836
2837 static UINT msi_dialog_listbox_handler( msi_dialog *dialog,
2838                                         msi_control *control, WPARAM param )
2839 {
2840     struct msi_listbox_info *info;
2841     int index;
2842     LPCWSTR value;
2843
2844     if( HIWORD(param) != LBN_SELCHANGE )
2845         return ERROR_SUCCESS;
2846
2847     info = GetPropW( control->hwnd, szButtonData );
2848     index = SendMessageW( control->hwnd, LB_GETCURSEL, 0, 0 );
2849     value = (LPCWSTR) SendMessageW( control->hwnd, LB_GETITEMDATA, index, 0 );
2850
2851     msi_dialog_set_property( info->dialog->package, control->property, value );
2852     msi_dialog_evaluate_control_conditions( info->dialog );
2853
2854     return ERROR_SUCCESS;
2855 }
2856
2857 static UINT msi_dialog_list_box( msi_dialog *dialog, MSIRECORD *rec )
2858 {
2859     struct msi_listbox_info *info;
2860     msi_control *control;
2861     DWORD attributes, style;
2862     LPCWSTR prop;
2863
2864     info = msi_alloc( sizeof *info );
2865     if (!info)
2866         return ERROR_FUNCTION_FAILED;
2867
2868     style = WS_TABSTOP | WS_GROUP | WS_CHILD | LBS_NOTIFY | WS_VSCROLL | WS_BORDER;
2869     attributes = MSI_RecordGetInteger( rec, 8 );
2870     if (~attributes & msidbControlAttributesSorted)
2871         style |= LBS_SORT;
2872
2873     control = msi_dialog_add_control( dialog, rec, WC_LISTBOXW, style );
2874     if (!control)
2875     {
2876         msi_free(info);
2877         return ERROR_FUNCTION_FAILED;
2878     }
2879
2880     control->handler = msi_dialog_listbox_handler;
2881
2882     prop = MSI_RecordGetString( rec, 9 );
2883     control->property = msi_dialog_dup_property( dialog, prop, FALSE );
2884
2885     /* subclass */
2886     info->dialog = dialog;
2887     info->hwnd = control->hwnd;
2888     info->items = NULL;
2889     info->addpos_items = 0;
2890     info->oldproc = (WNDPROC)SetWindowLongPtrW( control->hwnd, GWLP_WNDPROC,
2891                                                 (LONG_PTR)MSIListBox_WndProc );
2892     SetPropW( control->hwnd, szButtonData, info );
2893
2894     if ( control->property )
2895         msi_listbox_add_items( info, control->property );
2896
2897     return ERROR_SUCCESS;
2898 }
2899
2900 /******************** Directory Combo ***************************************/
2901
2902 static void msi_dialog_update_directory_combo( msi_dialog *dialog, msi_control *control )
2903 {
2904     LPWSTR prop, path;
2905     BOOL indirect;
2906
2907     if (!control && !(control = msi_dialog_find_control_by_type( dialog, szDirectoryCombo )))
2908         return;
2909
2910     indirect = control->attributes & msidbControlAttributesIndirect;
2911     prop = msi_dialog_dup_property( dialog, control->property, indirect );
2912     path = msi_dialog_dup_property( dialog, prop, TRUE );
2913
2914     PathStripPathW( path );
2915     PathRemoveBackslashW( path );
2916
2917     SendMessageW( control->hwnd, CB_INSERTSTRING, 0, (LPARAM)path );
2918     SendMessageW( control->hwnd, CB_SETCURSEL, 0, 0 );
2919
2920     msi_free( path );
2921     msi_free( prop );
2922 }
2923
2924 static UINT msi_dialog_directory_combo( msi_dialog *dialog, MSIRECORD *rec )
2925 {
2926     msi_control *control;
2927     LPCWSTR prop;
2928     DWORD style;
2929
2930     /* FIXME: use CBS_OWNERDRAWFIXED and add owner draw code */
2931     style = CBS_DROPDOWNLIST | CBS_HASSTRINGS | WS_CHILD |
2932             WS_GROUP | WS_TABSTOP | WS_VSCROLL;
2933     control = msi_dialog_add_control( dialog, rec, WC_COMBOBOXW, style );
2934     if (!control)
2935         return ERROR_FUNCTION_FAILED;
2936
2937     control->attributes = MSI_RecordGetInteger( rec, 8 );
2938     prop = MSI_RecordGetString( rec, 9 );
2939     control->property = msi_dialog_dup_property( dialog, prop, FALSE );
2940
2941     msi_dialog_update_directory_combo( dialog, control );
2942
2943     return ERROR_SUCCESS;
2944 }
2945
2946 /******************** Directory List ***************************************/
2947
2948 static void msi_dialog_update_directory_list( msi_dialog *dialog, msi_control *control )
2949 {
2950     WCHAR dir_spec[MAX_PATH];
2951     WIN32_FIND_DATAW wfd;
2952     LPWSTR prop, path;
2953     BOOL indirect;
2954     LVITEMW item;
2955     HANDLE file;
2956
2957     static const WCHAR asterisk[] = {'*',0};
2958
2959     if (!control && !(control = msi_dialog_find_control_by_type( dialog, szDirectoryList )))
2960         return;
2961
2962     /* clear the list-view */
2963     SendMessageW( control->hwnd, LVM_DELETEALLITEMS, 0, 0 );
2964
2965     indirect = control->attributes & msidbControlAttributesIndirect;
2966     prop = msi_dialog_dup_property( dialog, control->property, indirect );
2967     path = msi_dialog_dup_property( dialog, prop, TRUE );
2968
2969     lstrcpyW( dir_spec, path );
2970     lstrcatW( dir_spec, asterisk );
2971
2972     file = FindFirstFileW( dir_spec, &wfd );
2973     if ( file == INVALID_HANDLE_VALUE )
2974         return;
2975
2976     do
2977     {
2978         if ( wfd.dwFileAttributes != FILE_ATTRIBUTE_DIRECTORY )
2979             continue;
2980
2981         if ( !strcmpW( wfd.cFileName, szDot ) || !strcmpW( wfd.cFileName, szDotDot ) )
2982             continue;
2983
2984         item.mask = LVIF_TEXT;
2985         item.cchTextMax = MAX_PATH;
2986         item.iItem = 0;
2987         item.iSubItem = 0;
2988         item.pszText = wfd.cFileName;
2989
2990         SendMessageW( control->hwnd, LVM_INSERTITEMW, 0, (LPARAM)&item );
2991     } while ( FindNextFileW( file, &wfd ) );
2992
2993     msi_free( prop );
2994     msi_free( path );
2995     FindClose( file );
2996 }
2997
2998 static UINT msi_dialog_directorylist_up( msi_dialog *dialog )
2999 {
3000     msi_control *control;
3001     LPWSTR prop, path, ptr;
3002     BOOL indirect;
3003
3004     control = msi_dialog_find_control_by_type( dialog, szDirectoryList );
3005     indirect = control->attributes & msidbControlAttributesIndirect;
3006     prop = msi_dialog_dup_property( dialog, control->property, indirect );
3007     path = msi_dialog_dup_property( dialog, prop, TRUE );
3008
3009     /* strip off the last directory */
3010     ptr = PathFindFileNameW( path );
3011     if (ptr != path) *(ptr - 1) = '\0';
3012     PathAddBackslashW( path );
3013
3014     msi_dialog_set_property( dialog->package, prop, path );
3015
3016     msi_dialog_update_directory_list( dialog, NULL );
3017     msi_dialog_update_directory_combo( dialog, NULL );
3018     msi_dialog_update_pathedit( dialog, NULL );
3019
3020     msi_free( path );
3021     msi_free( prop );
3022
3023     return ERROR_SUCCESS;
3024 }
3025
3026 static UINT msi_dialog_dirlist_handler( msi_dialog *dialog,
3027                                         msi_control *control, WPARAM param )
3028 {
3029     LPNMHDR nmhdr = (LPNMHDR)param;
3030     WCHAR new_path[MAX_PATH];
3031     WCHAR text[MAX_PATH];
3032     LPWSTR path, prop;
3033     BOOL indirect;
3034     LVITEMW item;
3035     int index;
3036
3037     if (nmhdr->code != LVN_ITEMACTIVATE)
3038         return ERROR_SUCCESS;
3039
3040     index = SendMessageW( control->hwnd, LVM_GETNEXTITEM, -1, LVNI_SELECTED );
3041     if ( index < 0 )
3042     {
3043         ERR("No list-view item selected!\n");
3044         return ERROR_FUNCTION_FAILED;
3045     }
3046
3047     item.iSubItem = 0;
3048     item.pszText = text;
3049     item.cchTextMax = MAX_PATH;
3050     SendMessageW( control->hwnd, LVM_GETITEMTEXTW, index, (LPARAM)&item );
3051
3052     indirect = control->attributes & msidbControlAttributesIndirect;
3053     prop = msi_dialog_dup_property( dialog, control->property, indirect );
3054     path = msi_dialog_dup_property( dialog, prop, TRUE );
3055
3056     lstrcpyW( new_path, path );
3057     lstrcatW( new_path, text );
3058     lstrcatW( new_path, szBackSlash );
3059
3060     msi_dialog_set_property( dialog->package, prop, new_path );
3061
3062     msi_dialog_update_directory_list( dialog, NULL );
3063     msi_dialog_update_directory_combo( dialog, NULL );
3064     msi_dialog_update_pathedit( dialog, NULL );
3065
3066     msi_free( prop );
3067     msi_free( path );
3068     return ERROR_SUCCESS;
3069 }
3070
3071 static UINT msi_dialog_directory_list( msi_dialog *dialog, MSIRECORD *rec )
3072 {
3073     msi_control *control;
3074     LPCWSTR prop;
3075     DWORD style;
3076
3077     style = LVS_LIST | WS_VSCROLL | LVS_SHAREIMAGELISTS |
3078             LVS_AUTOARRANGE | LVS_SINGLESEL | WS_BORDER |
3079             LVS_SORTASCENDING | WS_CHILD | WS_GROUP | WS_TABSTOP;
3080     control = msi_dialog_add_control( dialog, rec, WC_LISTVIEWW, style );
3081     if (!control)
3082         return ERROR_FUNCTION_FAILED;
3083
3084     control->attributes = MSI_RecordGetInteger( rec, 8 );
3085     control->handler = msi_dialog_dirlist_handler;
3086     prop = MSI_RecordGetString( rec, 9 );
3087     control->property = msi_dialog_dup_property( dialog, prop, FALSE );
3088
3089     /* double click to activate an item in the list */
3090     SendMessageW( control->hwnd, LVM_SETEXTENDEDLISTVIEWSTYLE,
3091                   0, LVS_EX_TWOCLICKACTIVATE );
3092
3093     msi_dialog_update_directory_list( dialog, control );
3094
3095     return ERROR_SUCCESS;
3096 }
3097
3098 /******************** VolumeCost List ***************************************/
3099
3100 static BOOL str_is_number( LPCWSTR str )
3101 {
3102     int i;
3103
3104     for (i = 0; i < lstrlenW( str ); i++)
3105         if (!isdigitW(str[i]))
3106             return FALSE;
3107
3108     return TRUE;
3109 }
3110
3111 static const WCHAR column_keys[][80] =
3112 {
3113     {'V','o','l','u','m','e','C','o','s','t','V','o','l','u','m','e',0},
3114     {'V','o','l','u','m','e','C','o','s','t','S','i','z','e',0},
3115     {'V','o','l','u','m','e','C','o','s','t','A','v','a','i','l','a','b','l','e',0},
3116     {'V','o','l','u','m','e','C','o','s','t','R','e','q','u','i','r','e','d',0},
3117     {'V','o','l','u','m','e','C','o','s','t','D','i','f','f','e','r','e','n','c','e',0}
3118 };
3119
3120 static void msi_dialog_vcl_add_columns( msi_dialog *dialog, msi_control *control, MSIRECORD *rec )
3121 {
3122     LPCWSTR text = MSI_RecordGetString( rec, 10 );
3123     LPCWSTR begin = text, end;
3124     WCHAR *num;
3125     LVCOLUMNW lvc;
3126     DWORD count = 0;
3127
3128     static const WCHAR negative[] = {'-',0};
3129
3130     if (!text) return;
3131
3132     while ((begin = strchrW( begin, '{' )) && count < 5)
3133     {
3134         if (!(end = strchrW( begin, '}' )))
3135             return;
3136
3137         num = msi_alloc( (end-begin+1)*sizeof(WCHAR) );
3138         if (!num)
3139             return;
3140
3141         lstrcpynW( num, begin + 1, end - begin );
3142         begin += end - begin + 1;
3143
3144         /* empty braces or '0' hides the column */
3145         if ( !num[0] || !strcmpW( num, szZero ) )
3146         {
3147             count++;
3148             msi_free( num );
3149             continue;
3150         }
3151
3152         /* the width must be a positive number
3153          * if a width is invalid, all remaining columns are hidden
3154          */
3155         if ( !strncmpW( num, negative, 1 ) || !str_is_number( num ) ) {
3156             msi_free( num );
3157             return;
3158         }
3159
3160         ZeroMemory( &lvc, sizeof(lvc) );
3161         lvc.mask = LVCF_TEXT | LVCF_WIDTH | LVCF_SUBITEM;
3162         lvc.cx = atolW( num );
3163         lvc.pszText = msi_dialog_get_uitext( dialog, column_keys[count] );
3164
3165         SendMessageW( control->hwnd,  LVM_INSERTCOLUMNW, count++, (LPARAM)&lvc );
3166         msi_free( lvc.pszText );
3167         msi_free( num );
3168     }
3169 }
3170
3171 static LONGLONG msi_vcl_get_cost( msi_dialog *dialog )
3172 {
3173     MSIFEATURE *feature;
3174     INT each_cost;
3175     LONGLONG total_cost = 0;
3176
3177     LIST_FOR_EACH_ENTRY( feature, &dialog->package->features, MSIFEATURE, entry )
3178     {
3179         if (ERROR_SUCCESS == (MSI_GetFeatureCost(dialog->package, feature,
3180                 MSICOSTTREE_SELFONLY, INSTALLSTATE_LOCAL, &each_cost)))
3181         {
3182             /* each_cost is in 512-byte units */
3183             total_cost += each_cost * 512;
3184         }
3185         if (ERROR_SUCCESS == (MSI_GetFeatureCost(dialog->package, feature,
3186                 MSICOSTTREE_SELFONLY, INSTALLSTATE_ABSENT, &each_cost)))
3187         {
3188             /* each_cost is in 512-byte units */
3189             total_cost -= each_cost * 512;
3190         }
3191     }
3192     return total_cost;
3193 }
3194
3195 static void msi_dialog_vcl_add_drives( msi_dialog *dialog, msi_control *control )
3196 {
3197     ULARGE_INTEGER total, free;
3198     LONGLONG difference, cost;
3199     WCHAR size_text[MAX_PATH];
3200     WCHAR cost_text[MAX_PATH];
3201     LPWSTR drives, ptr;
3202     LVITEMW lvitem;
3203     DWORD size;
3204     int i = 0;
3205
3206     cost = msi_vcl_get_cost(dialog);
3207     StrFormatByteSizeW(cost, cost_text, MAX_PATH);
3208
3209     size = GetLogicalDriveStringsW( 0, NULL );
3210     if ( !size ) return;
3211
3212     drives = msi_alloc( (size + 1) * sizeof(WCHAR) );
3213     if ( !drives ) return;
3214
3215     GetLogicalDriveStringsW( size, drives );
3216
3217     ptr = drives;
3218     while (*ptr)
3219     {
3220         lvitem.mask = LVIF_TEXT;
3221         lvitem.iItem = i;
3222         lvitem.iSubItem = 0;
3223         lvitem.pszText = ptr;
3224         lvitem.cchTextMax = lstrlenW(ptr) + 1;
3225         SendMessageW( control->hwnd, LVM_INSERTITEMW, 0, (LPARAM)&lvitem );
3226
3227         GetDiskFreeSpaceExW(ptr, &free, &total, NULL);
3228         difference = free.QuadPart - cost;
3229
3230         StrFormatByteSizeW(total.QuadPart, size_text, MAX_PATH);
3231         lvitem.iSubItem = 1;
3232         lvitem.pszText = size_text;
3233         lvitem.cchTextMax = lstrlenW(size_text) + 1;
3234         SendMessageW( control->hwnd, LVM_SETITEMW, 0, (LPARAM)&lvitem );
3235
3236         StrFormatByteSizeW(free.QuadPart, size_text, MAX_PATH);
3237         lvitem.iSubItem = 2;
3238         lvitem.pszText = size_text;
3239         lvitem.cchTextMax = lstrlenW(size_text) + 1;
3240         SendMessageW( control->hwnd, LVM_SETITEMW, 0, (LPARAM)&lvitem );
3241
3242         lvitem.iSubItem = 3;
3243         lvitem.pszText = cost_text;
3244         lvitem.cchTextMax = lstrlenW(cost_text) + 1;
3245         SendMessageW( control->hwnd, LVM_SETITEMW, 0, (LPARAM)&lvitem );
3246
3247         StrFormatByteSizeW(difference, size_text, MAX_PATH);
3248         lvitem.iSubItem = 4;
3249         lvitem.pszText = size_text;
3250         lvitem.cchTextMax = lstrlenW(size_text) + 1;
3251         SendMessageW( control->hwnd, LVM_SETITEMW, 0, (LPARAM)&lvitem );
3252
3253         ptr += lstrlenW(ptr) + 1;
3254         i++;
3255     }
3256
3257     msi_free( drives );
3258 }
3259
3260 static UINT msi_dialog_volumecost_list( msi_dialog *dialog, MSIRECORD *rec )
3261 {
3262     msi_control *control;
3263     DWORD style;
3264
3265     style = LVS_REPORT | WS_VSCROLL | WS_HSCROLL | LVS_SHAREIMAGELISTS |
3266             LVS_AUTOARRANGE | LVS_SINGLESEL | WS_BORDER |
3267             WS_CHILD | WS_TABSTOP | WS_GROUP;
3268     control = msi_dialog_add_control( dialog, rec, WC_LISTVIEWW, style );
3269     if (!control)
3270         return ERROR_FUNCTION_FAILED;
3271
3272     msi_dialog_vcl_add_columns( dialog, control, rec );
3273     msi_dialog_vcl_add_drives( dialog, control );
3274
3275     return ERROR_SUCCESS;
3276 }
3277
3278 /******************** VolumeSelect Combo ***************************************/
3279
3280 static UINT msi_dialog_volsel_handler( msi_dialog *dialog,
3281                                        msi_control *control, WPARAM param )
3282 {
3283     WCHAR text[MAX_PATH];
3284     LPWSTR prop;
3285     BOOL indirect;
3286     int index;
3287
3288     if (HIWORD(param) != CBN_SELCHANGE)
3289         return ERROR_SUCCESS;
3290
3291     index = SendMessageW( control->hwnd, CB_GETCURSEL, 0, 0 );
3292     if ( index == CB_ERR )
3293     {
3294         ERR("No ComboBox item selected!\n");
3295         return ERROR_FUNCTION_FAILED;
3296     }
3297
3298     SendMessageW( control->hwnd, CB_GETLBTEXT, index, (LPARAM)text );
3299
3300     indirect = control->attributes & msidbControlAttributesIndirect;
3301     prop = msi_dialog_dup_property( dialog, control->property, indirect );
3302
3303     msi_dialog_set_property( dialog->package, prop, text );
3304
3305     msi_free( prop );
3306     return ERROR_SUCCESS;
3307 }
3308
3309 static void msi_dialog_vsc_add_drives( msi_dialog *dialog, msi_control *control )
3310 {
3311     LPWSTR drives, ptr;
3312     DWORD size;
3313
3314     size = GetLogicalDriveStringsW( 0, NULL );
3315     if ( !size ) return;
3316
3317     drives = msi_alloc( (size + 1) * sizeof(WCHAR) );
3318     if ( !drives ) return;
3319
3320     GetLogicalDriveStringsW( size, drives );
3321
3322     ptr = drives;
3323     while (*ptr)
3324     {
3325         SendMessageW( control->hwnd, CB_ADDSTRING, 0, (LPARAM)ptr );
3326         ptr += lstrlenW(ptr) + 1;
3327     }
3328
3329     msi_free( drives );
3330 }
3331
3332 static UINT msi_dialog_volumeselect_combo( msi_dialog *dialog, MSIRECORD *rec )
3333 {
3334     msi_control *control;
3335     LPCWSTR prop;
3336     DWORD style;
3337
3338     /* FIXME: CBS_OWNERDRAWFIXED */
3339     style = WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP |
3340             CBS_DROPDOWNLIST | CBS_SORT | CBS_HASSTRINGS |
3341             WS_EX_LEFT | WS_EX_LTRREADING | WS_EX_RIGHTSCROLLBAR;
3342     control = msi_dialog_add_control( dialog, rec, WC_COMBOBOXW, style );
3343     if (!control)
3344         return ERROR_FUNCTION_FAILED;
3345
3346     control->attributes = MSI_RecordGetInteger( rec, 8 );
3347     control->handler = msi_dialog_volsel_handler;
3348     prop = MSI_RecordGetString( rec, 9 );
3349     control->property = msi_dialog_dup_property( dialog, prop, FALSE );
3350
3351     msi_dialog_vsc_add_drives( dialog, control );
3352
3353     return ERROR_SUCCESS;
3354 }
3355
3356 static UINT msi_dialog_hyperlink_handler( msi_dialog *dialog, msi_control *control, WPARAM param )
3357 {
3358     static const WCHAR hrefW[] = {'h','r','e','f'};
3359     static const WCHAR openW[] = {'o','p','e','n',0};
3360     int len, len_href = sizeof(hrefW) / sizeof(hrefW[0]);
3361     const WCHAR *p, *q;
3362     WCHAR quote = 0;
3363     LITEM item;
3364
3365     item.mask     = LIF_ITEMINDEX | LIF_URL;
3366     item.iLink    = 0;
3367     item.szUrl[0] = 0;
3368
3369     SendMessageW( control->hwnd, LM_GETITEM, 0, (LPARAM)&item );
3370
3371     p = item.szUrl;
3372     while (*p && *p != '<') p++;
3373     if (!*p++) return ERROR_SUCCESS;
3374     if (toupperW( *p++ ) != 'A' || !isspaceW( *p++ )) return ERROR_SUCCESS;
3375     while (*p && isspaceW( *p )) p++;
3376
3377     len = strlenW( p );
3378     if (len > len_href && !memicmpW( p, hrefW, len_href ))
3379     {
3380         p += len_href;
3381         while (*p && isspaceW( *p )) p++;
3382         if (!*p || *p++ != '=') return ERROR_SUCCESS;
3383         while (*p && isspaceW( *p )) p++;
3384
3385         if (*p == '\"' || *p == '\'') quote = *p++;
3386         q = p;
3387         if (quote)
3388         {
3389             while (*q && *q != quote) q++;
3390             if (*q != quote) return ERROR_SUCCESS;
3391         }
3392         else
3393         {
3394             while (*q && *q != '>' && !isspaceW( *q )) q++;
3395             if (!*q) return ERROR_SUCCESS;
3396         }
3397         item.szUrl[q - item.szUrl] = 0;
3398         ShellExecuteW( NULL, openW, p, NULL, NULL, SW_SHOWNORMAL );
3399     }
3400     return ERROR_SUCCESS;
3401 }
3402
3403 static UINT msi_dialog_hyperlink( msi_dialog *dialog, MSIRECORD *rec )
3404 {
3405     msi_control *control;
3406     DWORD style = WS_CHILD | WS_TABSTOP | WS_GROUP;
3407     const WCHAR *text = MSI_RecordGetString( rec, 10 );
3408     int len = strlenW( text );
3409     LITEM item;
3410
3411     control = msi_dialog_add_control( dialog, rec, WC_LINK, style );
3412     if (!control)
3413         return ERROR_FUNCTION_FAILED;
3414
3415     control->attributes = MSI_RecordGetInteger( rec, 8 );
3416     control->handler    = msi_dialog_hyperlink_handler;
3417
3418     item.mask      = LIF_ITEMINDEX | LIF_STATE | LIF_URL;
3419     item.iLink     = 0;
3420     item.state     = LIS_ENABLED;
3421     item.stateMask = LIS_ENABLED;
3422     if (len < L_MAX_URL_LENGTH) strcpyW( item.szUrl, text );
3423     else item.szUrl[0] = 0;
3424
3425     SendMessageW( control->hwnd, LM_SETITEM, 0, (LPARAM)&item );
3426
3427     return ERROR_SUCCESS;
3428 }
3429
3430 static const struct control_handler msi_dialog_handler[] =
3431 {
3432     { szText, msi_dialog_text_control },
3433     { szPushButton, msi_dialog_button_control },
3434     { szLine, msi_dialog_line_control },
3435     { szBitmap, msi_dialog_bitmap_control },
3436     { szCheckBox, msi_dialog_checkbox_control },
3437     { szScrollableText, msi_dialog_scrolltext_control },
3438     { szComboBox, msi_dialog_combo_control },
3439     { szEdit, msi_dialog_edit_control },
3440     { szMaskedEdit, msi_dialog_maskedit_control },
3441     { szPathEdit, msi_dialog_pathedit_control },
3442     { szProgressBar, msi_dialog_progress_bar },
3443     { szRadioButtonGroup, msi_dialog_radiogroup_control },
3444     { szIcon, msi_dialog_icon_control },
3445     { szSelectionTree, msi_dialog_selection_tree },
3446     { szGroupBox, msi_dialog_group_box },
3447     { szListBox, msi_dialog_list_box },
3448     { szDirectoryCombo, msi_dialog_directory_combo },
3449     { szDirectoryList, msi_dialog_directory_list },
3450     { szVolumeCostList, msi_dialog_volumecost_list },
3451     { szVolumeSelectCombo, msi_dialog_volumeselect_combo },
3452     { szHyperLink, msi_dialog_hyperlink }
3453 };
3454
3455 #define NUM_CONTROL_TYPES (sizeof msi_dialog_handler/sizeof msi_dialog_handler[0])
3456
3457 static UINT msi_dialog_create_controls( MSIRECORD *rec, LPVOID param )
3458 {
3459     msi_dialog *dialog = param;
3460     LPCWSTR control_type;
3461     UINT i;
3462
3463     /* find and call the function that can create this type of control */
3464     control_type = MSI_RecordGetString( rec, 3 );
3465     for( i=0; i<NUM_CONTROL_TYPES; i++ )
3466         if (!strcmpiW( msi_dialog_handler[i].control_type, control_type ))
3467             break;
3468     if( i != NUM_CONTROL_TYPES )
3469         msi_dialog_handler[i].func( dialog, rec );
3470     else
3471         ERR("no handler for element type %s\n", debugstr_w(control_type));
3472
3473     return ERROR_SUCCESS;
3474 }
3475
3476 static UINT msi_dialog_fill_controls( msi_dialog *dialog )
3477 {
3478     static const WCHAR query[] = {
3479         'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
3480         'C','o','n','t','r','o','l',' ','W','H','E','R','E',' ',
3481         '`','D','i','a','l','o','g','_','`',' ','=',' ','\'','%','s','\'',0};
3482     UINT r;
3483     MSIQUERY *view;
3484     MSIPACKAGE *package = dialog->package;
3485
3486     TRACE("%p %s\n", dialog, debugstr_w(dialog->name) );
3487
3488     /* query the Control table for all the elements of the control */
3489     r = MSI_OpenQuery( package->db, &view, query, dialog->name );
3490     if( r != ERROR_SUCCESS )
3491     {
3492         ERR("query failed for dialog %s\n", debugstr_w(dialog->name));
3493         return ERROR_INVALID_PARAMETER;
3494     }
3495
3496     r = MSI_IterateRecords( view, 0, msi_dialog_create_controls, dialog );
3497     msiobj_release( &view->hdr );
3498     return r;
3499 }
3500
3501 static UINT msi_dialog_reset( msi_dialog *dialog )
3502 {
3503     /* FIXME: should restore the original values of any properties we changed */
3504     return msi_dialog_evaluate_control_conditions( dialog );
3505 }
3506
3507 /* figure out the height of 10 point MS Sans Serif */
3508 static INT msi_dialog_get_sans_serif_height( HWND hwnd )
3509 {
3510     static const WCHAR szSansSerif[] = {
3511         'M','S',' ','S','a','n','s',' ','S','e','r','i','f',0 };
3512     LOGFONTW lf;
3513     TEXTMETRICW tm;
3514     BOOL r;
3515     LONG height = 0;
3516     HFONT hFont, hOldFont;
3517     HDC hdc;
3518
3519     hdc = GetDC( hwnd );
3520     if (hdc)
3521     {
3522         memset( &lf, 0, sizeof lf );
3523         lf.lfHeight = MulDiv(12, GetDeviceCaps(hdc, LOGPIXELSY), 72);
3524         strcpyW( lf.lfFaceName, szSansSerif );
3525         hFont = CreateFontIndirectW(&lf);
3526         if (hFont)
3527         {
3528             hOldFont = SelectObject( hdc, hFont );
3529             r = GetTextMetricsW( hdc, &tm );
3530             if (r)
3531                 height = tm.tmHeight;
3532             SelectObject( hdc, hOldFont );
3533             DeleteObject( hFont );
3534         }
3535         ReleaseDC( hwnd, hdc );
3536     }
3537     return height;
3538 }
3539
3540 /* fetch the associated record from the Dialog table */
3541 static MSIRECORD *msi_get_dialog_record( msi_dialog *dialog )
3542 {
3543     static const WCHAR query[] = {
3544         'S','E','L','E','C','T',' ','*',' ',
3545         'F','R','O','M',' ','D','i','a','l','o','g',' ',
3546         'W','H','E','R','E',' ',
3547            '`','D','i','a','l','o','g','`',' ','=',' ','\'','%','s','\'',0};
3548     MSIPACKAGE *package = dialog->package;
3549     MSIRECORD *rec = NULL;
3550
3551     TRACE("%p %s\n", dialog, debugstr_w(dialog->name) );
3552
3553     rec = MSI_QueryGetRecord( package->db, query, dialog->name );
3554     if( !rec )
3555         WARN("query failed for dialog %s\n", debugstr_w(dialog->name));
3556
3557     return rec;
3558 }
3559
3560 static void msi_dialog_adjust_dialog_pos( msi_dialog *dialog, MSIRECORD *rec, LPRECT pos )
3561 {
3562     static const WCHAR szScreenX[] = {'S','c','r','e','e','n','X',0};
3563     static const WCHAR szScreenY[] = {'S','c','r','e','e','n','Y',0};
3564
3565     UINT xres, yres;
3566     POINT center;
3567     SIZE sz;
3568     LONG style;
3569
3570     center.x = MSI_RecordGetInteger( rec, 2 );
3571     center.y = MSI_RecordGetInteger( rec, 3 );
3572
3573     sz.cx = MSI_RecordGetInteger( rec, 4 );
3574     sz.cy = MSI_RecordGetInteger( rec, 5 );
3575
3576     sz.cx = msi_dialog_scale_unit( dialog, sz.cx );
3577     sz.cy = msi_dialog_scale_unit( dialog, sz.cy );
3578
3579     xres = msi_get_property_int( dialog->package->db, szScreenX, 0 );
3580     yres = msi_get_property_int( dialog->package->db, szScreenY, 0 );
3581
3582     center.x = MulDiv( center.x, xres, 100 );
3583     center.y = MulDiv( center.y, yres, 100 );
3584
3585     /* turn the client pos into the window rectangle */
3586     if (dialog->package->center_x && dialog->package->center_y)
3587     {
3588         pos->left = dialog->package->center_x - sz.cx / 2.0;
3589         pos->right = pos->left + sz.cx;
3590         pos->top = dialog->package->center_y - sz.cy / 2.0;
3591         pos->bottom = pos->top + sz.cy;
3592     }
3593     else
3594     {
3595         pos->left = center.x - sz.cx/2;
3596         pos->right = pos->left + sz.cx;
3597         pos->top = center.y - sz.cy/2;
3598         pos->bottom = pos->top + sz.cy;
3599
3600         /* save the center */
3601         dialog->package->center_x = center.x;
3602         dialog->package->center_y = center.y;
3603     }
3604
3605     dialog->size.cx = sz.cx;
3606     dialog->size.cy = sz.cy;
3607
3608     TRACE("%u %u %u %u\n", pos->left, pos->top, pos->right, pos->bottom);
3609
3610     style = GetWindowLongPtrW( dialog->hwnd, GWL_STYLE );
3611     AdjustWindowRect( pos, style, FALSE );
3612 }
3613
3614 static void msi_dialog_set_tab_order( msi_dialog *dialog, LPCWSTR first )
3615 {
3616     struct list tab_chain;
3617     msi_control *control;
3618     HWND prev = HWND_TOP;
3619
3620     list_init( &tab_chain );
3621     if (!(control = msi_dialog_find_control( dialog, first ))) return;
3622
3623     dialog->hWndFocus = control->hwnd;
3624     while (control)
3625     {
3626         list_remove( &control->entry );
3627         list_add_tail( &tab_chain, &control->entry );
3628         if (!control->tabnext) break;
3629         control = msi_dialog_find_control( dialog, control->tabnext );
3630     }
3631
3632     LIST_FOR_EACH_ENTRY( control, &tab_chain, msi_control, entry )
3633     {
3634         SetWindowPos( control->hwnd, prev, 0, 0, 0, 0,
3635                       SWP_NOMOVE | SWP_NOOWNERZORDER | SWP_NOREDRAW |
3636                       SWP_NOREPOSITION | SWP_NOSENDCHANGING | SWP_NOSIZE );
3637         prev = control->hwnd;
3638     }
3639
3640     /* put them back on the main list */
3641     list_move_head( &dialog->controls, &tab_chain );
3642 }
3643
3644 static LRESULT msi_dialog_oncreate( HWND hwnd, LPCREATESTRUCTW cs )
3645 {
3646     static const WCHAR df[] = {
3647         'D','e','f','a','u','l','t','U','I','F','o','n','t',0 };
3648     static const WCHAR dfv[] = {
3649         'M','S',' ','S','h','e','l','l',' ','D','l','g',0 };
3650     msi_dialog *dialog = cs->lpCreateParams;
3651     MSIRECORD *rec = NULL;
3652     LPWSTR title = NULL;
3653     RECT pos;
3654
3655     TRACE("%p %p\n", dialog, dialog->package);
3656
3657     dialog->hwnd = hwnd;
3658     SetWindowLongPtrW( hwnd, GWLP_USERDATA, (LONG_PTR) dialog );
3659
3660     rec = msi_get_dialog_record( dialog );
3661     if( !rec )
3662     {
3663         TRACE("No record found for dialog %s\n", debugstr_w(dialog->name));
3664         return -1;
3665     }
3666
3667     dialog->scale = msi_dialog_get_sans_serif_height(dialog->hwnd);
3668
3669     msi_dialog_adjust_dialog_pos( dialog, rec, &pos );
3670
3671     dialog->attributes = MSI_RecordGetInteger( rec, 6 );
3672
3673     dialog->default_font = msi_dup_property( dialog->package->db, df );
3674     if (!dialog->default_font)
3675     {
3676         dialog->default_font = strdupW(dfv);
3677         msiobj_release( &rec->hdr );
3678         if (!dialog->default_font) return -1;
3679     }
3680
3681     title = msi_get_deformatted_field( dialog->package, rec, 7 );
3682     SetWindowTextW( hwnd, title );
3683     msi_free( title );
3684
3685     SetWindowPos( hwnd, 0, pos.left, pos.top,
3686                   pos.right - pos.left, pos.bottom - pos.top,
3687                   SWP_NOACTIVATE | SWP_NOZORDER | SWP_NOREDRAW );
3688
3689     msi_dialog_build_font_list( dialog );
3690     msi_dialog_fill_controls( dialog );
3691     msi_dialog_evaluate_control_conditions( dialog );
3692     msi_dialog_set_tab_order( dialog, MSI_RecordGetString( rec, 8 ) );
3693     msiobj_release( &rec->hdr );
3694
3695     return 0;
3696 }
3697
3698 static LRESULT msi_dialog_oncommand( msi_dialog *dialog, WPARAM param, HWND hwnd )
3699 {
3700     msi_control *control = NULL;
3701
3702     TRACE("%p %p %08lx\n", dialog, hwnd, param);
3703
3704     switch (param)
3705     {
3706     case 1: /* enter */
3707         control = msi_dialog_find_control( dialog, dialog->control_default );
3708         break;
3709     case 2: /* escape */
3710         control = msi_dialog_find_control( dialog, dialog->control_cancel );
3711         break;
3712     default:
3713         control = msi_dialog_find_control_by_hwnd( dialog, hwnd );
3714     }
3715
3716     if( control )
3717     {
3718         if( control->handler )
3719         {
3720             control->handler( dialog, control, param );
3721             msi_dialog_evaluate_control_conditions( dialog );
3722         }
3723     }
3724
3725     return 0;
3726 }
3727
3728 static LRESULT msi_dialog_onnotify( msi_dialog *dialog, LPARAM param )
3729 {
3730     LPNMHDR nmhdr = (LPNMHDR) param;
3731     msi_control *control = msi_dialog_find_control_by_hwnd( dialog, nmhdr->hwndFrom );
3732
3733     TRACE("%p %p\n", dialog, nmhdr->hwndFrom);
3734
3735     if ( control && control->handler )
3736         control->handler( dialog, control, param );
3737
3738     return 0;
3739 }
3740
3741 static void dialog_setfocus( msi_dialog *dialog )
3742 {
3743     HWND hwnd = dialog->hWndFocus;
3744
3745     hwnd = GetNextDlgTabItem( dialog->hwnd, hwnd, TRUE);
3746     hwnd = GetNextDlgTabItem( dialog->hwnd, hwnd, FALSE);
3747     SetFocus( hwnd );
3748     dialog->hWndFocus = hwnd;
3749 }
3750
3751 static LRESULT WINAPI MSIDialog_WndProc( HWND hwnd, UINT msg,
3752                 WPARAM wParam, LPARAM lParam )
3753 {
3754     msi_dialog *dialog = (LPVOID) GetWindowLongPtrW( hwnd, GWLP_USERDATA );
3755
3756     TRACE("0x%04x\n", msg);
3757
3758     switch (msg)
3759     {
3760     case WM_MOVE:
3761         dialog->package->center_x = LOWORD(lParam) + dialog->size.cx / 2.0;
3762         dialog->package->center_y = HIWORD(lParam) + dialog->size.cy / 2.0;
3763         break;
3764
3765     case WM_CREATE:
3766         return msi_dialog_oncreate( hwnd, (LPCREATESTRUCTW)lParam );
3767
3768     case WM_COMMAND:
3769         return msi_dialog_oncommand( dialog, wParam, (HWND)lParam );
3770
3771     case WM_ACTIVATE:
3772         if( LOWORD(wParam) == WA_INACTIVE )
3773             dialog->hWndFocus = GetFocus();
3774         else
3775             dialog_setfocus( dialog );
3776         return 0;
3777
3778     case WM_SETFOCUS:
3779         dialog_setfocus( dialog );
3780         return 0;
3781
3782     /* bounce back to our subclassed static control */
3783     case WM_CTLCOLORSTATIC:
3784         return SendMessageW( (HWND) lParam, WM_CTLCOLORSTATIC, wParam, lParam );
3785
3786     case WM_DESTROY:
3787         dialog->hwnd = NULL;
3788         return 0;
3789     case WM_NOTIFY:
3790         return msi_dialog_onnotify( dialog, lParam );
3791     }
3792     return DefWindowProcW(hwnd, msg, wParam, lParam);
3793 }
3794
3795 static void process_pending_messages( HWND hdlg )
3796 {
3797     MSG msg;
3798
3799     while (PeekMessageW( &msg, 0, 0, 0, PM_REMOVE ))
3800     {
3801         if (hdlg && IsDialogMessageW( hdlg, &msg )) continue;
3802         TranslateMessage( &msg );
3803         DispatchMessageW( &msg );
3804     }
3805 }
3806
3807 static UINT dialog_run_message_loop( msi_dialog *dialog )
3808 {
3809     DWORD style;
3810     HWND hwnd;
3811
3812     if( uiThreadId != GetCurrentThreadId() )
3813         return SendMessageW( hMsiHiddenWindow, WM_MSI_DIALOG_CREATE, 0, (LPARAM) dialog );
3814
3815     /* create the dialog window, don't show it yet */
3816     style = WS_OVERLAPPED;
3817     if( dialog->attributes & msidbDialogAttributesVisible )
3818         style |= WS_VISIBLE;
3819
3820     hwnd = CreateWindowW( szMsiDialogClass, dialog->name, style,
3821                      CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT,
3822                      NULL, NULL, NULL, dialog );
3823     if( !hwnd )
3824     {
3825         ERR("Failed to create dialog %s\n", debugstr_w( dialog->name ));
3826         return ERROR_FUNCTION_FAILED;
3827     }
3828
3829     ShowWindow( hwnd, SW_SHOW );
3830     /* UpdateWindow( hwnd ); - and causes the transparent static controls not to paint */
3831
3832     if( dialog->attributes & msidbDialogAttributesModal )
3833     {
3834         while( !dialog->finished )
3835         {
3836             MsgWaitForMultipleObjects( 0, NULL, 0, INFINITE, QS_ALLINPUT );
3837             process_pending_messages( dialog->hwnd );
3838         }
3839     }
3840     else
3841         return ERROR_IO_PENDING;
3842
3843     return ERROR_SUCCESS;
3844 }
3845
3846 static LRESULT WINAPI MSIHiddenWindowProc( HWND hwnd, UINT msg,
3847                 WPARAM wParam, LPARAM lParam )
3848 {
3849     msi_dialog *dialog = (msi_dialog*) lParam;
3850
3851     TRACE("%d %p\n", msg, dialog);
3852
3853     switch (msg)
3854     {
3855     case WM_MSI_DIALOG_CREATE:
3856         return dialog_run_message_loop( dialog );
3857     case WM_MSI_DIALOG_DESTROY:
3858         msi_dialog_destroy( dialog );
3859         return 0;
3860     }
3861     return DefWindowProcW( hwnd, msg, wParam, lParam );
3862 }
3863
3864 static BOOL dialog_register_class( void )
3865 {
3866     WNDCLASSW cls;
3867
3868     ZeroMemory( &cls, sizeof cls );
3869     cls.lpfnWndProc   = MSIDialog_WndProc;
3870     cls.hInstance     = NULL;
3871     cls.hIcon         = LoadIconW(0, (LPWSTR)IDI_APPLICATION);
3872     cls.hCursor       = LoadCursorW(0, (LPWSTR)IDC_ARROW);
3873     cls.hbrBackground = (HBRUSH)(COLOR_3DFACE + 1);
3874     cls.lpszMenuName  = NULL;
3875     cls.lpszClassName = szMsiDialogClass;
3876
3877     if( !RegisterClassW( &cls ) )
3878         return FALSE;
3879
3880     cls.lpfnWndProc   = MSIHiddenWindowProc;
3881     cls.lpszClassName = szMsiHiddenWindow;
3882
3883     if( !RegisterClassW( &cls ) )
3884         return FALSE;
3885
3886     uiThreadId = GetCurrentThreadId();
3887
3888     hMsiHiddenWindow = CreateWindowW( szMsiHiddenWindow, NULL, WS_OVERLAPPED,
3889                                    0, 0, 100, 100, NULL, NULL, NULL, NULL );
3890     if( !hMsiHiddenWindow )
3891         return FALSE;
3892
3893     return TRUE;
3894 }
3895
3896 static msi_dialog *dialog_create( MSIPACKAGE *package, const WCHAR *name, msi_dialog *parent,
3897                                   control_event_handler event_handler )
3898 {
3899     MSIRECORD *rec = NULL;
3900     msi_dialog *dialog;
3901
3902     TRACE("%s\n", debugstr_w(name));
3903
3904     if (!hMsiHiddenWindow) dialog_register_class();
3905
3906     /* allocate the structure for the dialog to use */
3907     dialog = msi_alloc_zero( FIELD_OFFSET( msi_dialog, name[strlenW( name ) + 1] ));
3908     if( !dialog )
3909         return NULL;
3910     strcpyW( dialog->name, name );
3911     dialog->parent = parent;
3912     msiobj_addref( &package->hdr );
3913     dialog->package = package;
3914     dialog->event_handler = event_handler;
3915     dialog->finished = 0;
3916     list_init( &dialog->controls );
3917     list_init( &dialog->fonts );
3918
3919     /* verify that the dialog exists */
3920     rec = msi_get_dialog_record( dialog );
3921     if( !rec )
3922     {
3923         msiobj_release( &package->hdr );
3924         msi_free( dialog );
3925         return NULL;
3926     }
3927     dialog->attributes = MSI_RecordGetInteger( rec, 6 );
3928     dialog->control_default = strdupW( MSI_RecordGetString( rec, 9 ) );
3929     dialog->control_cancel = strdupW( MSI_RecordGetString( rec, 10 ) );
3930     msiobj_release( &rec->hdr );
3931
3932     return dialog;
3933 }
3934
3935 static void msi_dialog_end_dialog( msi_dialog *dialog )
3936 {
3937     TRACE("%p\n", dialog);
3938     dialog->finished = 1;
3939     PostMessageW(dialog->hwnd, WM_NULL, 0, 0);
3940 }
3941
3942 void msi_dialog_check_messages( HANDLE handle )
3943 {
3944     DWORD r;
3945
3946     /* in threads other than the UI thread, block */
3947     if( uiThreadId != GetCurrentThreadId() )
3948     {
3949         if (!handle) return;
3950         while (MsgWaitForMultipleObjectsEx( 1, &handle, INFINITE, QS_ALLINPUT, 0 ) == WAIT_OBJECT_0 + 1)
3951         {
3952             MSG msg;
3953             while (PeekMessageW( &msg, NULL, 0, 0, PM_REMOVE ))
3954             {
3955                 TranslateMessage( &msg );
3956                 DispatchMessageW( &msg );
3957             }
3958         }
3959         return;
3960     }
3961
3962     /* there are two choices for the UI thread */
3963     while (1)
3964     {
3965         process_pending_messages( NULL );
3966
3967         if( !handle )
3968             break;
3969
3970         /*
3971          * block here until somebody creates a new dialog or
3972          * the handle we're waiting on becomes ready
3973          */
3974         r = MsgWaitForMultipleObjects( 1, &handle, 0, INFINITE, QS_ALLINPUT );
3975         if( r == WAIT_OBJECT_0 )
3976             break;
3977     }
3978 }
3979
3980 static void dialog_do_preview( msi_dialog *dialog )
3981 {
3982     TRACE("\n");
3983     dialog->attributes |= msidbDialogAttributesVisible;
3984     dialog->attributes &= ~msidbDialogAttributesModal;
3985     dialog_run_message_loop( dialog );
3986 }
3987
3988 static void free_subscriber( struct subscriber *sub )
3989 {
3990     msi_free( sub->event );
3991     msi_free( sub->control );
3992     msi_free( sub->attribute );
3993     msi_free( sub );
3994 }
3995
3996 static void event_cleanup_subscriptions( MSIPACKAGE *package, const WCHAR *dialog )
3997 {
3998     struct list *item, *next;
3999
4000     LIST_FOR_EACH_SAFE( item, next, &package->subscriptions )
4001     {
4002         struct subscriber *sub = LIST_ENTRY( item, struct subscriber, entry );
4003
4004         if (strcmpW( sub->dialog->name, dialog )) continue;
4005         list_remove( &sub->entry );
4006         free_subscriber( sub );
4007     }
4008 }
4009
4010 void msi_dialog_destroy( msi_dialog *dialog )
4011 {
4012     msi_font *font, *next;
4013
4014     if( uiThreadId != GetCurrentThreadId() )
4015     {
4016         SendMessageW( hMsiHiddenWindow, WM_MSI_DIALOG_DESTROY, 0, (LPARAM) dialog );
4017         return;
4018     }
4019
4020     if( dialog->hwnd )
4021         ShowWindow( dialog->hwnd, SW_HIDE );
4022
4023     if( dialog->hwnd )
4024         DestroyWindow( dialog->hwnd );
4025
4026     /* unsubscribe events */
4027     event_cleanup_subscriptions( dialog->package, dialog->name );
4028
4029     /* destroy the list of controls */
4030     while( !list_empty( &dialog->controls ) )
4031     {
4032         msi_control *t;
4033
4034         t = LIST_ENTRY( list_head( &dialog->controls ),
4035                         msi_control, entry );
4036         msi_destroy_control( t );
4037     }
4038
4039     /* destroy the list of fonts */
4040     LIST_FOR_EACH_ENTRY_SAFE( font, next, &dialog->fonts, msi_font, entry )
4041     {
4042         list_remove( &font->entry );
4043         DeleteObject( font->hfont );
4044         msi_free( font );
4045     }
4046     msi_free( dialog->default_font );
4047
4048     msi_free( dialog->control_default );
4049     msi_free( dialog->control_cancel );
4050     msiobj_release( &dialog->package->hdr );
4051     dialog->package = NULL;
4052     msi_free( dialog );
4053 }
4054
4055 void msi_dialog_unregister_class( void )
4056 {
4057     DestroyWindow( hMsiHiddenWindow );
4058     hMsiHiddenWindow = NULL;
4059     UnregisterClassW( szMsiDialogClass, NULL );
4060     UnregisterClassW( szMsiHiddenWindow, NULL );
4061     uiThreadId = 0;
4062 }
4063
4064 void msi_event_cleanup_all_subscriptions( MSIPACKAGE *package )
4065 {
4066     struct list *item, *next;
4067
4068     LIST_FOR_EACH_SAFE( item, next, &package->subscriptions )
4069     {
4070         struct subscriber *sub = LIST_ENTRY( item, struct subscriber, entry );
4071         list_remove( &sub->entry );
4072         free_subscriber( sub );
4073     }
4074 }
4075
4076 static UINT error_dialog_handler( msi_dialog *dialog, const WCHAR *event, const WCHAR *argument )
4077 {
4078     static const WCHAR end_dialog[] = {'E','n','d','D','i','a','l','o','g',0};
4079     static const WCHAR error_abort[] = {'E','r','r','o','r','A','b','o','r','t',0};
4080     static const WCHAR error_cancel[] = {'E','r','r','o','r','C','a','n','c','e','l',0};
4081     static const WCHAR error_no[] = {'E','r','r','o','r','N','o',0};
4082     static const WCHAR result_prop[] = {
4083         'M','S','I','E','r','r','o','r','D','i','a','l','o','g','R','e','s','u','l','t',0
4084     };
4085
4086     if ( strcmpW( event, end_dialog ) )
4087         return ERROR_SUCCESS;
4088
4089     if ( !strcmpW( argument, error_abort ) || !strcmpW( argument, error_cancel ) ||
4090          !strcmpW( argument, error_no ) )
4091     {
4092          msi_set_property( dialog->package->db, result_prop, error_abort, -1 );
4093     }
4094
4095     msi_event_cleanup_all_subscriptions( dialog->package );
4096     msi_dialog_end_dialog( dialog );
4097
4098     return ERROR_SUCCESS;
4099 }
4100
4101 static UINT msi_error_dialog_set_error( MSIPACKAGE *package, LPWSTR error_dialog, LPWSTR error )
4102 {
4103     MSIRECORD * row;
4104
4105     static const WCHAR update[] =
4106         {'U','P','D','A','T','E',' ','`','C','o','n','t','r','o','l','`',' ',
4107          'S','E','T',' ','`','T','e','x','t','`',' ','=',' ','\'','%','s','\'',' ',
4108          'W','H','E','R','E', ' ','`','D','i','a','l','o','g','_','`',' ','=',' ','\'','%','s','\'',' ',
4109          'A','N','D',' ','`','C','o','n','t','r','o','l','`',' ','=',' ',
4110          '\'','E','r','r','o','r','T','e','x','t','\'',0};
4111
4112     row = MSI_QueryGetRecord( package->db, update, error, error_dialog );
4113     if (!row)
4114         return ERROR_FUNCTION_FAILED;
4115
4116     msiobj_release(&row->hdr);
4117     return ERROR_SUCCESS;
4118 }
4119
4120 UINT msi_spawn_error_dialog( MSIPACKAGE *package, LPWSTR error_dialog, LPWSTR error )
4121 {
4122     msi_dialog *dialog;
4123     WCHAR result[MAX_PATH];
4124     UINT r = ERROR_SUCCESS;
4125     DWORD size = MAX_PATH;
4126     int res;
4127
4128     static const WCHAR pn_prop[] = {'P','r','o','d','u','c','t','N','a','m','e',0};
4129     static const WCHAR title_fmt[] = {'%','s',' ','W','a','r','n','i','n','g',0};
4130     static const WCHAR error_abort[] = {'E','r','r','o','r','A','b','o','r','t',0};
4131     static const WCHAR result_prop[] = {
4132         'M','S','I','E','r','r','o','r','D','i','a','l','o','g','R','e','s','u','l','t',0
4133     };
4134
4135     if ((package->ui_level & INSTALLUILEVEL_MASK) == INSTALLUILEVEL_NONE) return ERROR_SUCCESS;
4136
4137     if ( !error_dialog )
4138     {
4139         LPWSTR product_name = msi_dup_property( package->db, pn_prop );
4140         WCHAR title[MAX_PATH];
4141
4142         sprintfW( title, title_fmt, product_name );
4143         res = MessageBoxW( NULL, error, title, MB_OKCANCEL | MB_ICONWARNING );
4144
4145         msi_free( product_name );
4146
4147         if ( res == IDOK )
4148             return ERROR_SUCCESS;
4149         else
4150             return ERROR_FUNCTION_FAILED;
4151     }
4152
4153     r = msi_error_dialog_set_error( package, error_dialog, error );
4154     if ( r != ERROR_SUCCESS )
4155         return r;
4156
4157     dialog = dialog_create( package, error_dialog, package->dialog, error_dialog_handler );
4158     if ( !dialog )
4159         return ERROR_FUNCTION_FAILED;
4160
4161     dialog->finished = FALSE;
4162     r = dialog_run_message_loop( dialog );
4163     if ( r != ERROR_SUCCESS )
4164         goto done;
4165
4166     r = msi_get_property( package->db, result_prop, result, &size );
4167     if ( r != ERROR_SUCCESS)
4168         r = ERROR_SUCCESS;
4169
4170     if ( !strcmpW( result, error_abort ) )
4171         r = ERROR_FUNCTION_FAILED;
4172
4173 done:
4174     msi_dialog_destroy( dialog );
4175
4176     return r;
4177 }
4178
4179 static void MSI_ClosePreview( MSIOBJECTHDR *arg )
4180 {
4181     MSIPREVIEW *preview = (MSIPREVIEW *)arg;
4182     msiobj_release( &preview->package->hdr );
4183 }
4184
4185 static MSIPREVIEW *MSI_EnableUIPreview( MSIDATABASE *db )
4186 {
4187     MSIPREVIEW *preview = NULL;
4188     MSIPACKAGE *package;
4189
4190     package = MSI_CreatePackage( db, NULL );
4191     if (package)
4192     {
4193         preview = alloc_msiobject( MSIHANDLETYPE_PREVIEW, sizeof(MSIPREVIEW), MSI_ClosePreview );
4194         if (preview)
4195         {
4196             preview->package = package;
4197             msiobj_addref( &package->hdr );
4198         }
4199         msiobj_release( &package->hdr );
4200     }
4201     return preview;
4202 }
4203
4204 UINT WINAPI MsiEnableUIPreview( MSIHANDLE hdb, MSIHANDLE *phPreview )
4205 {
4206     MSIDATABASE *db;
4207     MSIPREVIEW *preview;
4208     UINT r = ERROR_FUNCTION_FAILED;
4209
4210     TRACE("%d %p\n", hdb, phPreview);
4211
4212     db = msihandle2msiinfo( hdb, MSIHANDLETYPE_DATABASE );
4213     if (!db)
4214     {
4215         IWineMsiRemoteDatabase *remote_database;
4216
4217         remote_database = (IWineMsiRemoteDatabase *)msi_get_remote( hdb );
4218         if (!remote_database)
4219             return ERROR_INVALID_HANDLE;
4220
4221         *phPreview = 0;
4222
4223         IWineMsiRemoteDatabase_Release( remote_database );
4224         WARN("MsiEnableUIPreview not allowed during a custom action!\n");
4225
4226         return ERROR_FUNCTION_FAILED;
4227     }
4228     preview = MSI_EnableUIPreview( db );
4229     if (preview)
4230     {
4231         *phPreview = alloc_msihandle( &preview->hdr );
4232         msiobj_release( &preview->hdr );
4233         r = ERROR_SUCCESS;
4234         if (!*phPreview)
4235             r = ERROR_NOT_ENOUGH_MEMORY;
4236     }
4237     msiobj_release( &db->hdr );
4238     return r;
4239 }
4240
4241 static UINT preview_event_handler( msi_dialog *dialog, const WCHAR *event, const WCHAR *argument )
4242 {
4243     MESSAGE("Preview dialog event '%s' (arg='%s')\n", debugstr_w(event), debugstr_w(argument));
4244     return ERROR_SUCCESS;
4245 }
4246
4247 static UINT MSI_PreviewDialogW( MSIPREVIEW *preview, LPCWSTR szDialogName )
4248 {
4249     msi_dialog *dialog = NULL;
4250     UINT r = ERROR_SUCCESS;
4251
4252     if (preview->dialog)
4253         msi_dialog_destroy( preview->dialog );
4254
4255     /* an empty name means we should just destroy the current preview dialog */
4256     if (szDialogName)
4257     {
4258         dialog = dialog_create( preview->package, szDialogName, NULL, preview_event_handler );
4259         if (dialog)
4260             dialog_do_preview( dialog );
4261         else
4262             r = ERROR_FUNCTION_FAILED;
4263     }
4264     preview->dialog = dialog;
4265     return r;
4266 }
4267
4268 UINT WINAPI MsiPreviewDialogW( MSIHANDLE hPreview, LPCWSTR szDialogName )
4269 {
4270     MSIPREVIEW *preview;
4271     UINT r;
4272
4273     TRACE("%d %s\n", hPreview, debugstr_w(szDialogName));
4274
4275     preview = msihandle2msiinfo( hPreview, MSIHANDLETYPE_PREVIEW );
4276     if (!preview)
4277         return ERROR_INVALID_HANDLE;
4278
4279     r = MSI_PreviewDialogW( preview, szDialogName );
4280     msiobj_release( &preview->hdr );
4281     return r;
4282 }
4283
4284 UINT WINAPI MsiPreviewDialogA( MSIHANDLE hPreview, LPCSTR szDialogName )
4285 {
4286     UINT r;
4287     LPWSTR strW = NULL;
4288
4289     TRACE("%d %s\n", hPreview, debugstr_a(szDialogName));
4290
4291     if (szDialogName)
4292     {
4293         strW = strdupAtoW( szDialogName );
4294         if (!strW)
4295             return ERROR_OUTOFMEMORY;
4296     }
4297     r = MsiPreviewDialogW( hPreview, strW );
4298     msi_free( strW );
4299     return r;
4300 }
4301
4302 UINT WINAPI MsiPreviewBillboardW( MSIHANDLE hPreview, LPCWSTR szControlName, LPCWSTR szBillboard )
4303 {
4304     FIXME("%d %s %s\n", hPreview, debugstr_w(szControlName), debugstr_w(szBillboard));
4305     return ERROR_CALL_NOT_IMPLEMENTED;
4306 }
4307
4308 UINT WINAPI MsiPreviewBillboardA( MSIHANDLE hPreview, LPCSTR szControlName, LPCSTR szBillboard )
4309 {
4310     FIXME("%d %s %s\n", hPreview, debugstr_a(szControlName), debugstr_a(szBillboard));
4311     return ERROR_CALL_NOT_IMPLEMENTED;
4312 }
4313
4314 typedef UINT (*event_handler)( msi_dialog *, const WCHAR * );
4315
4316 struct control_event
4317 {
4318     const WCHAR  *event;
4319     event_handler handler;
4320 };
4321
4322 static UINT dialog_event_handler( msi_dialog *, const WCHAR *, const WCHAR * );
4323
4324 /* create a dialog box and run it if it's modal */
4325 static UINT event_do_dialog( MSIPACKAGE *package, const WCHAR *name, msi_dialog *parent, BOOL destroy_modeless )
4326 {
4327     msi_dialog *dialog;
4328     UINT r;
4329
4330     /* create a new dialog */
4331     dialog = dialog_create( package, name, parent, dialog_event_handler );
4332     if (dialog)
4333     {
4334         /* kill the current modeless dialog */
4335         if (destroy_modeless && package->dialog)
4336         {
4337             msi_dialog_destroy( package->dialog );
4338             package->dialog = NULL;
4339         }
4340
4341         /* modeless dialogs return an error message */
4342         r = dialog_run_message_loop( dialog );
4343         if (r == ERROR_SUCCESS)
4344             msi_dialog_destroy( dialog );
4345         else
4346             package->dialog = dialog;
4347     }
4348     else r = ERROR_FUNCTION_FAILED;
4349     return r;
4350 }
4351
4352 /* end a modal dialog box */
4353 static UINT event_end_dialog( msi_dialog *dialog, const WCHAR *argument )
4354 {
4355     static const WCHAR exitW[] = {'E','x','i','t',0};
4356     static const WCHAR retryW[] = {'R','e','t','r','y',0};
4357     static const WCHAR ignoreW[] = {'I','g','n','o','r','e',0};
4358     static const WCHAR returnW[] = {'R','e','t','u','r','n',0};
4359
4360     if (!strcmpW( argument, exitW ))
4361         dialog->package->CurrentInstallState = ERROR_INSTALL_USEREXIT;
4362     else if (!strcmpW( argument, retryW ))
4363         dialog->package->CurrentInstallState = ERROR_INSTALL_SUSPEND;
4364     else if (!strcmpW( argument, ignoreW ))
4365         dialog->package->CurrentInstallState = ERROR_SUCCESS;
4366     else if (!strcmpW( argument, returnW ))
4367     {
4368         msi_dialog *parent = dialog->parent;
4369         msi_free( dialog->package->next_dialog );
4370         dialog->package->next_dialog = (parent) ? strdupW( parent->name ) : NULL;
4371         dialog->package->CurrentInstallState = ERROR_SUCCESS;
4372     }
4373     else
4374     {
4375         ERR("Unknown argument string %s\n", debugstr_w(argument));
4376         dialog->package->CurrentInstallState = ERROR_FUNCTION_FAILED;
4377     }
4378     event_cleanup_subscriptions( dialog->package, dialog->name );
4379     msi_dialog_end_dialog( dialog );
4380     return ERROR_SUCCESS;
4381 }
4382
4383 /* transition from one modal dialog to another modal dialog */
4384 static UINT event_new_dialog( msi_dialog *dialog, const WCHAR *argument )
4385 {
4386     /* store the name of the next dialog, and signal this one to end */
4387     dialog->package->next_dialog = strdupW( argument );
4388     msi_event_cleanup_all_subscriptions( dialog->package );
4389     msi_dialog_end_dialog( dialog );
4390     return ERROR_SUCCESS;
4391 }
4392
4393 /* create a new child dialog of an existing modal dialog */
4394 static UINT event_spawn_dialog( msi_dialog *dialog, const WCHAR *argument )
4395 {
4396     /* don't destroy a modeless dialogs that might be our parent */
4397     event_do_dialog( dialog->package, argument, dialog, FALSE );
4398     if (dialog->package->CurrentInstallState != ERROR_SUCCESS) msi_dialog_end_dialog( dialog );
4399     return ERROR_SUCCESS;
4400 }
4401
4402 /* creates a dialog that remains up for a period of time based on a condition */
4403 static UINT event_spawn_wait_dialog( msi_dialog *dialog, const WCHAR *argument )
4404 {
4405     FIXME("doing nothing\n");
4406     return ERROR_SUCCESS;
4407 }
4408
4409 static UINT event_do_action( msi_dialog *dialog, const WCHAR *argument )
4410 {
4411     ACTION_PerformAction( dialog->package, argument, SCRIPT_NONE );
4412     return ERROR_SUCCESS;
4413 }
4414
4415 static UINT event_add_local( msi_dialog *dialog, const WCHAR *argument )
4416 {
4417     MSIFEATURE *feature;
4418
4419     LIST_FOR_EACH_ENTRY( feature, &dialog->package->features, MSIFEATURE, entry )
4420     {
4421         if (!strcmpW( argument, feature->Feature ) || !strcmpW( argument, szAll ))
4422         {
4423             if (feature->ActionRequest != INSTALLSTATE_LOCAL)
4424                 msi_set_property( dialog->package->db, szPreselected, szOne, -1 );
4425             MSI_SetFeatureStateW( dialog->package, feature->Feature, INSTALLSTATE_LOCAL );
4426         }
4427     }
4428     return ERROR_SUCCESS;
4429 }
4430
4431 static UINT event_remove( msi_dialog *dialog, const WCHAR *argument )
4432 {
4433     MSIFEATURE *feature;
4434
4435     LIST_FOR_EACH_ENTRY( feature, &dialog->package->features, MSIFEATURE, entry )
4436     {
4437         if (!strcmpW( argument, feature->Feature ) || !strcmpW( argument, szAll ))
4438         {
4439             if (feature->ActionRequest != INSTALLSTATE_ABSENT)
4440                 msi_set_property( dialog->package->db, szPreselected, szOne, -1 );
4441             MSI_SetFeatureStateW( dialog->package, feature->Feature, INSTALLSTATE_ABSENT );
4442         }
4443     }
4444     return ERROR_SUCCESS;
4445 }
4446
4447 static UINT event_add_source( msi_dialog *dialog, const WCHAR *argument )
4448 {
4449     MSIFEATURE *feature;
4450
4451     LIST_FOR_EACH_ENTRY( feature, &dialog->package->features, MSIFEATURE, entry )
4452     {
4453         if (!strcmpW( argument, feature->Feature ) || !strcmpW( argument, szAll ))
4454         {
4455             if (feature->ActionRequest != INSTALLSTATE_SOURCE)
4456                 msi_set_property( dialog->package->db, szPreselected, szOne, -1 );
4457             MSI_SetFeatureStateW( dialog->package, feature->Feature, INSTALLSTATE_SOURCE );
4458         }
4459     }
4460     return ERROR_SUCCESS;
4461 }
4462
4463 void msi_event_fire( MSIPACKAGE *package, const WCHAR *event, MSIRECORD *rec )
4464 {
4465     struct subscriber *sub;
4466
4467     TRACE("firing event %s\n", debugstr_w(event));
4468
4469     LIST_FOR_EACH_ENTRY( sub, &package->subscriptions, struct subscriber, entry )
4470     {
4471         if (strcmpiW( sub->event, event )) continue;
4472         dialog_handle_event( sub->dialog, sub->control, sub->attribute, rec );
4473     }
4474 }
4475
4476 static UINT event_set_target_path( msi_dialog *dialog, const WCHAR *argument )
4477 {
4478     WCHAR *path = msi_dup_property( dialog->package->db, argument );
4479     MSIRECORD *rec = MSI_CreateRecord( 1 );
4480     UINT r = ERROR_SUCCESS;
4481
4482     MSI_RecordSetStringW( rec, 1, path );
4483     msi_event_fire( dialog->package, szSelectionPath, rec );
4484     if (path)
4485     {
4486         /* failure to set the path halts the executing of control events */
4487         r = MSI_SetTargetPathW( dialog->package, argument, path );
4488         msi_free( path );
4489     }
4490     msi_free( &rec->hdr );
4491     return r;
4492 }
4493
4494 static UINT event_reset( msi_dialog *dialog, const WCHAR *argument )
4495 {
4496     msi_dialog_reset( dialog );
4497     return ERROR_SUCCESS;
4498 }
4499
4500 /* Return ERROR_SUCCESS if dialog is process and ERROR_FUNCTION_FAILED
4501  * if the given parameter is not a dialog box
4502  */
4503 UINT ACTION_DialogBox( MSIPACKAGE *package, const WCHAR *dialog )
4504 {
4505     UINT r;
4506
4507     if (package->next_dialog) ERR("Already got next dialog... ignoring it\n");
4508     package->next_dialog = NULL;
4509
4510     /* Dialogs are chained by filling in the next_dialog member
4511      * of the package structure, then terminating the current dialog.
4512      * The code below sees the next_dialog member set, and runs the
4513      * next dialog.
4514      * We fall out of the loop below if we come across a modeless
4515      * dialog, as it returns ERROR_IO_PENDING when we try to run
4516      * its message loop.
4517      */
4518     r = event_do_dialog( package, dialog, NULL, TRUE );
4519     while (r == ERROR_SUCCESS && package->next_dialog)
4520     {
4521         WCHAR *name = package->next_dialog;
4522
4523         package->next_dialog = NULL;
4524         r = event_do_dialog( package, name, NULL, TRUE );
4525         msi_free( name );
4526     }
4527     if (r == ERROR_IO_PENDING) r = ERROR_SUCCESS;
4528     return r;
4529 }
4530
4531 static UINT event_set_install_level( msi_dialog *dialog, const WCHAR *argument )
4532 {
4533     int level = atolW( argument );
4534
4535     TRACE("setting install level to %d\n", level);
4536     return MSI_SetInstallLevel( dialog->package, level );
4537 }
4538
4539 static UINT event_directory_list_up( msi_dialog *dialog, const WCHAR *argument )
4540 {
4541     return msi_dialog_directorylist_up( dialog );
4542 }
4543
4544 static UINT event_reinstall_mode( msi_dialog *dialog, const WCHAR *argument )
4545 {
4546     return msi_set_property( dialog->package->db, szReinstallMode, argument, -1 );
4547 }
4548
4549 static UINT event_reinstall( msi_dialog *dialog, const WCHAR *argument )
4550 {
4551     return msi_set_property( dialog->package->db, szReinstall, argument, -1 );
4552 }
4553
4554 static UINT event_validate_product_id( msi_dialog *dialog, const WCHAR *argument )
4555 {
4556     return msi_validate_product_id( dialog->package );
4557 }
4558
4559 static const WCHAR end_dialogW[] = {'E','n','d','D','i','a','l','o','g',0};
4560 static const WCHAR new_dialogW[] = {'N','e','w','D','i','a','l','o','g',0};
4561 static const WCHAR spawn_dialogW[] = {'S','p','a','w','n','D','i','a','l','o','g',0};
4562 static const WCHAR spawn_wait_dialogW[] = {'S','p','a','w','n','W','a','i','t','D','i','a','l','o','g',0};
4563 static const WCHAR do_actionW[] = {'D','o','A','c','t','i','o','n',0};
4564 static const WCHAR add_localW[] = {'A','d','d','L','o','c','a','l',0};
4565 static const WCHAR removeW[] = {'R','e','m','o','v','e',0};
4566 static const WCHAR add_sourceW[] = {'A','d','d','S','o','u','r','c','e',0};
4567 static const WCHAR set_target_pathW[] = {'S','e','t','T','a','r','g','e','t','P','a','t','h',0};
4568 static const WCHAR resetW[] = {'R','e','s','e','t',0};
4569 static const WCHAR set_install_levelW[] = {'S','e','t','I','n','s','t','a','l','l','L','e','v','e','l',0};
4570 static const WCHAR directory_list_upW[] = {'D','i','r','e','c','t','o','r','y','L','i','s','t','U','p',0};
4571 static const WCHAR selection_browseW[] = {'S','e','l','e','c','t','i','o','n','B','r','o','w','s','e',0};
4572 static const WCHAR reinstall_modeW[] = {'R','e','i','n','s','t','a','l','l','M','o','d','e',0};
4573 static const WCHAR reinstallW[] = {'R','e','i','n','s','t','a','l','l',0};
4574 static const WCHAR validate_product_idW[] = {'V','a','l','i','d','a','t','e','P','r','o','d','u','c','t','I','D',0};
4575
4576 static const struct control_event control_events[] =
4577 {
4578     { end_dialogW, event_end_dialog },
4579     { new_dialogW, event_new_dialog },
4580     { spawn_dialogW, event_spawn_dialog },
4581     { spawn_wait_dialogW, event_spawn_wait_dialog },
4582     { do_actionW, event_do_action },
4583     { add_localW, event_add_local },
4584     { removeW, event_remove },
4585     { add_sourceW, event_add_source },
4586     { set_target_pathW, event_set_target_path },
4587     { resetW, event_reset },
4588     { set_install_levelW, event_set_install_level },
4589     { directory_list_upW, event_directory_list_up },
4590     { selection_browseW, event_spawn_dialog },
4591     { reinstall_modeW, event_reinstall_mode },
4592     { reinstallW, event_reinstall },
4593     { validate_product_idW, event_validate_product_id },
4594     { NULL, NULL }
4595 };
4596
4597 static UINT dialog_event_handler( msi_dialog *dialog, const WCHAR *event, const WCHAR *argument )
4598 {
4599     unsigned int i;
4600
4601     TRACE("handling event %s\n", debugstr_w(event));
4602
4603     if (!event) return ERROR_SUCCESS;
4604
4605     for (i = 0; control_events[i].event; i++)
4606     {
4607         if (!strcmpW( control_events[i].event, event ))
4608             return control_events[i].handler( dialog, argument );
4609     }
4610     FIXME("unhandled event %s arg(%s)\n", debugstr_w(event), debugstr_w(argument));
4611     return ERROR_SUCCESS;
4612 }