git.oblomov.eu Git - wine/blob - dlls/msi/select.c

   1 /*
   2  * Implementation of the Microsoft Installer (msi.dll)
   3  *
   4  * Copyright 2002-2004 Mike McCormack for CodeWeavers
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include <stdarg.h>
  22
  23 #include "windef.h"
  24 #include "winbase.h"
  25 #include "winerror.h"
  26 #include "wine/debug.h"
  27 #include "msi.h"
  28 #include "msiquery.h"
  29 #include "objbase.h"
  30 #include "objidl.h"
  31 #include "msipriv.h"
  32 #include "winnls.h"
  33
  34 #include "query.h"
  35
  36 WINE_DEFAULT_DEBUG_CHANNEL(msidb);
  37
  38
  39 /* below is the query interface to a table */
  40
  41 typedef struct tagMSISELECTVIEW
  42 {
  43     MSIVIEW        view;
  44     MSIDATABASE   *db;
  45     MSIVIEW       *table;
  46     UINT           num_cols;
  47     UINT           max_cols;
  48     UINT           cols[1];
  49 } MSISELECTVIEW;
  50
  51 static UINT SELECT_fetch_int( struct tagMSIVIEW *view, UINT row, UINT col, UINT *val )
  52 {
  53     MSISELECTVIEW *sv = (MSISELECTVIEW*)view;
  54
  55     TRACE("%p %d %d %p\n", sv, row, col, val );
  56
  57     if( !sv->table )
  58          return ERROR_FUNCTION_FAILED;
  59
  60     if( (col==0) || (col>sv->num_cols) )
  61          return ERROR_FUNCTION_FAILED;
  62
  63     col = sv->cols[ col - 1 ];
  64
  65     return sv->table->ops->fetch_int( sv->table, row, col, val );
  66 }
  67
  68 static UINT SELECT_fetch_stream( struct tagMSIVIEW *view, UINT row, UINT col, IStream **stm)
  69 {
  70     MSISELECTVIEW *sv = (MSISELECTVIEW*)view;
  71
  72     TRACE("%p %d %d %p\n", sv, row, col, stm );
  73
  74     if( !sv->table )
  75          return ERROR_FUNCTION_FAILED;
  76
  77     if( (col==0) || (col>sv->num_cols) )
  78          return ERROR_FUNCTION_FAILED;
  79
  80     col = sv->cols[ col - 1 ];
  81
  82     return sv->table->ops->fetch_stream( sv->table, row, col, stm );
  83 }
  84
  85 static UINT SELECT_get_row( struct tagMSIVIEW *view, UINT row, MSIRECORD **rec )
  86 {
  87     MSISELECTVIEW *sv = (MSISELECTVIEW *)view;
  88
  89     TRACE("%p %d %p\n", sv, row, rec );
  90
  91     if( !sv->table )
  92          return ERROR_FUNCTION_FAILED;
  93
  94     return msi_view_get_row(sv->db, view, row, rec);
  95 }
  96
  97 static UINT SELECT_set_row( struct tagMSIVIEW *view, UINT row, MSIRECORD *rec, UINT mask )
  98 {
  99     MSISELECTVIEW *sv = (MSISELECTVIEW*)view;
 100     UINT i, expanded_mask = 0, r = ERROR_SUCCESS, col_count = 0;
 101     MSIRECORD *expanded;
 102
 103     TRACE("%p %d %p %08x\n", sv, row, rec, mask );
 104
 105     if ( !sv->table )
 106          return ERROR_FUNCTION_FAILED;
 107
 108     /* test if any of the mask bits are invalid */
 109     if ( mask >= (1<<sv->num_cols) )
 110         return ERROR_INVALID_PARAMETER;
 111
 112     /* find the number of columns in the table below */
 113     r = sv->table->ops->get_dimensions( sv->table, NULL, &col_count );
 114     if( r )
 115         return r;
 116
 117     /* expand the record to the right size for the underlying table */
 118     expanded = MSI_CreateRecord( col_count );
 119     if ( !expanded )
 120         return ERROR_FUNCTION_FAILED;
 121
 122     /* move the right fields across */
 123     for ( i=0; i<sv->num_cols; i++ )
 124     {
 125         r = MSI_RecordCopyField( rec, i+1, expanded, sv->cols[ i ] );
 126         if (r != ERROR_SUCCESS)
 127             break;
 128         expanded_mask |= (1<<(sv->cols[i]-1));
 129     }
 130
 131     /* set the row in the underlying table */
 132     if (r == ERROR_SUCCESS)
 133         r = sv->table->ops->set_row( sv->table, row, expanded, expanded_mask );
 134
 135     msiobj_release( &expanded->hdr );
 136     return r;
 137 }
 138
 139 static UINT SELECT_insert_row( struct tagMSIVIEW *view, MSIRECORD *record, UINT row, BOOL temporary )
 140 {
 141     MSISELECTVIEW *sv = (MSISELECTVIEW*)view;
 142     UINT i, table_cols, r;
 143     MSIRECORD *outrec;
 144
 145     TRACE("%p %p\n", sv, record );
 146
 147     if ( !sv->table )
 148         return ERROR_FUNCTION_FAILED;
 149
 150     /* rearrange the record to suit the table */
 151     r = sv->table->ops->get_dimensions( sv->table, NULL, &table_cols );
 152     if (r != ERROR_SUCCESS)
 153         return r;
 154
 155     outrec = MSI_CreateRecord( table_cols + 1 );
 156
 157     for (i=0; i<sv->num_cols; i++)
 158     {
 159         r = MSI_RecordCopyField( record, i+1, outrec, sv->cols[i] );
 160         if (r != ERROR_SUCCESS)
 161             goto fail;
 162     }
 163
 164     r = sv->table->ops->insert_row( sv->table, outrec, row, temporary );
 165
 166 fail:
 167     msiobj_release( &outrec->hdr );
 168
 169     return r;
 170 }
 171
 172 static UINT SELECT_execute( struct tagMSIVIEW *view, MSIRECORD *record )
 173 {
 174     MSISELECTVIEW *sv = (MSISELECTVIEW*)view;
 175
 176     TRACE("%p %p\n", sv, record);
 177
 178     if( !sv->table )
 179          return ERROR_FUNCTION_FAILED;
 180
 181     return sv->table->ops->execute( sv->table, record );
 182 }
 183
 184 static UINT SELECT_close( struct tagMSIVIEW *view )
 185 {
 186     MSISELECTVIEW *sv = (MSISELECTVIEW*)view;
 187
 188     TRACE("%p\n", sv );
 189
 190     if( !sv->table )
 191          return ERROR_FUNCTION_FAILED;
 192
 193     return sv->table->ops->close( sv->table );
 194 }
 195
 196 static UINT SELECT_get_dimensions( struct tagMSIVIEW *view, UINT *rows, UINT *cols )
 197 {
 198     MSISELECTVIEW *sv = (MSISELECTVIEW*)view;
 199
 200     TRACE("%p %p %p\n", sv, rows, cols );
 201
 202     if( !sv->table )
 203          return ERROR_FUNCTION_FAILED;
 204
 205     if( cols )
 206         *cols = sv->num_cols;
 207
 208     return sv->table->ops->get_dimensions( sv->table, rows, NULL );
 209 }
 210
 211 static UINT SELECT_get_column_info( struct tagMSIVIEW *view,
 212                 UINT n, LPWSTR *name, UINT *type, BOOL *temporary,
 213                 LPWSTR *table_name)
 214 {
 215     MSISELECTVIEW *sv = (MSISELECTVIEW*)view;
 216
 217     TRACE("%p %d %p %p %p %p\n", sv, n, name, type, temporary, table_name );
 218
 219     if( !sv->table )
 220          return ERROR_FUNCTION_FAILED;
 221
 222     if( (n==0) || (n>sv->num_cols) )
 223          return ERROR_FUNCTION_FAILED;
 224
 225     n = sv->cols[ n - 1 ];
 226
 227     return sv->table->ops->get_column_info( sv->table, n, name,
 228                                             type, temporary, table_name );
 229 }
 230
 231 static UINT msi_select_update(struct tagMSIVIEW *view, MSIRECORD *rec, UINT row)
 232 {
 233     MSISELECTVIEW *sv = (MSISELECTVIEW*)view;
 234     UINT r, i, num_columns, col, type, val;
 235     LPWSTR name;
 236     LPCWSTR str;
 237     MSIRECORD *mod;
 238
 239     r = SELECT_get_dimensions(view, NULL, &num_columns);
 240     if (r != ERROR_SUCCESS)
 241         return r;
 242
 243     r = sv->table->ops->get_row(sv->table, row - 1, &mod);
 244     if (r != ERROR_SUCCESS)
 245         return r;
 246
 247     for (i = 0; i < num_columns; i++)
 248     {
 249         col = sv->cols[i];
 250
 251         r = SELECT_get_column_info(view, i + 1, &name, &type, NULL, NULL);
 252         msi_free(name);
 253         if (r != ERROR_SUCCESS)
 254         {
 255             ERR("Failed to get column information: %d\n", r);
 256             goto done;
 257         }
 258
 259         if (MSITYPE_IS_BINARY(type))
 260         {
 261             ERR("Cannot modify binary data!\n");
 262             r = ERROR_FUNCTION_FAILED;
 263             goto done;
 264         }
 265         else if (type & MSITYPE_STRING)
 266         {
 267             str = MSI_RecordGetString(rec, i + 1);
 268             r = MSI_RecordSetStringW(mod, col, str);
 269         }
 270         else
 271         {
 272             val = MSI_RecordGetInteger(rec, i + 1);
 273             r = MSI_RecordSetInteger(mod, col, val);
 274         }
 275
 276         if (r != ERROR_SUCCESS)
 277         {
 278             ERR("Failed to modify record: %d\n", r);
 279             goto done;
 280         }
 281     }
 282
 283     r = sv->table->ops->modify(sv->table, MSIMODIFY_UPDATE, mod, row);
 284
 285 done:
 286     msiobj_release(&mod->hdr);
 287     return r;
 288 }
 289
 290 static UINT SELECT_modify( struct tagMSIVIEW *view, MSIMODIFY eModifyMode,
 291                            MSIRECORD *rec, UINT row )
 292 {
 293     MSISELECTVIEW *sv = (MSISELECTVIEW*)view;
 294
 295     TRACE("%p %d %p %d\n", sv, eModifyMode, rec, row );
 296
 297     if( !sv->table )
 298          return ERROR_FUNCTION_FAILED;
 299
 300     if (eModifyMode == MSIMODIFY_UPDATE)
 301         return msi_select_update(view, rec, row);
 302
 303     return sv->table->ops->modify( sv->table, eModifyMode, rec, row );
 304 }
 305
 306 static UINT SELECT_delete( struct tagMSIVIEW *view )
 307 {
 308     MSISELECTVIEW *sv = (MSISELECTVIEW*)view;
 309
 310     TRACE("%p\n", sv );
 311
 312     if( sv->table )
 313         sv->table->ops->delete( sv->table );
 314     sv->table = NULL;
 315
 316     msi_free( sv );
 317
 318     return ERROR_SUCCESS;
 319 }
 320
 321 static UINT SELECT_find_matching_rows( struct tagMSIVIEW *view, UINT col,
 322     UINT val, UINT *row, MSIITERHANDLE *handle )
 323 {
 324     MSISELECTVIEW *sv = (MSISELECTVIEW*)view;
 325
 326     TRACE("%p, %d, %u, %p\n", view, col, val, *handle);
 327
 328     if( !sv->table )
 329          return ERROR_FUNCTION_FAILED;
 330
 331     if( (col==0) || (col>sv->num_cols) )
 332          return ERROR_FUNCTION_FAILED;
 333
 334     col = sv->cols[ col - 1 ];
 335
 336     return sv->table->ops->find_matching_rows( sv->table, col, val, row, handle );
 337 }
 338
 339 static UINT SELECT_sort(struct tagMSIVIEW *view, column_info *columns)
 340 {
 341     MSISELECTVIEW *sv = (MSISELECTVIEW *)view;
 342
 343     TRACE("%p %p\n", view, columns);
 344
 345     return sv->table->ops->sort( sv->table, columns );
 346 }
 347
 348 static const MSIVIEWOPS select_ops =
 349 {
 350     SELECT_fetch_int,
 351     SELECT_fetch_stream,
 352     SELECT_get_row,
 353     SELECT_set_row,
 354     SELECT_insert_row,
 355     NULL,
 356     SELECT_execute,
 357     SELECT_close,
 358     SELECT_get_dimensions,
 359     SELECT_get_column_info,
 360     SELECT_modify,
 361     SELECT_delete,
 362     SELECT_find_matching_rows,
 363     NULL,
 364     NULL,
 365     NULL,
 366     NULL,
 367     SELECT_sort,
 368     NULL,
 369 };
 370
 371 static UINT SELECT_AddColumn( MSISELECTVIEW *sv, LPCWSTR name )
 372 {
 373     UINT r, n=0;
 374     MSIVIEW *table;
 375
 376     TRACE("%p adding %s\n", sv, debugstr_w( name ) );
 377
 378     if( sv->view.ops != &select_ops )
 379         return ERROR_FUNCTION_FAILED;
 380
 381     table = sv->table;
 382     if( !table )
 383         return ERROR_FUNCTION_FAILED;
 384     if( !table->ops->get_dimensions )
 385         return ERROR_FUNCTION_FAILED;
 386     if( !table->ops->get_column_info )
 387         return ERROR_FUNCTION_FAILED;
 388
 389     if( sv->num_cols >= sv->max_cols )
 390         return ERROR_FUNCTION_FAILED;
 391
 392     r = VIEW_find_column( table, name, NULL, &n );
 393     if( r != ERROR_SUCCESS )
 394         return r;
 395
 396     sv->cols[sv->num_cols] = n;
 397     TRACE("Translating column %s from %d -> %d\n",
 398           debugstr_w( name ), sv->num_cols, n);
 399
 400     sv->num_cols++;
 401
 402     return ERROR_SUCCESS;
 403 }
 404
 405 static int select_count_columns( const column_info *col )
 406 {
 407     int n;
 408     for (n = 0; col; col = col->next)
 409         n++;
 410     return n;
 411 }
 412
 413 UINT SELECT_CreateView( MSIDATABASE *db, MSIVIEW **view, MSIVIEW *table,
 414                         const column_info *columns )
 415 {
 416     MSISELECTVIEW *sv = NULL;
 417     UINT count = 0, r = ERROR_SUCCESS;
 418
 419     TRACE("%p\n", sv );
 420
 421     count = select_count_columns( columns );
 422
 423     sv = msi_alloc_zero( sizeof *sv + count*sizeof (UINT) );
 424     if( !sv )
 425         return ERROR_FUNCTION_FAILED;
 426
 427     /* fill the structure */
 428     sv->view.ops = &select_ops;
 429     sv->db = db;
 430     sv->table = table;
 431     sv->num_cols = 0;
 432     sv->max_cols = count;
 433
 434     while( columns )
 435     {
 436         r = SELECT_AddColumn( sv, columns->column );
 437         if( r )
 438             break;
 439         columns = columns->next;
 440     }
 441
 442     if( r == ERROR_SUCCESS )
 443         *view = &sv->view;
 444     else
 445         msi_free( sv );
 446
 447     return r;
 448 }