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

   1 /*
   2  * Implementation of the Microsoft Installer (msi.dll)
   3  *
   4  * Copyright 2007 James Hawkins
   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 #define COBJMACROS
  24
  25 #include "windef.h"
  26 #include "winbase.h"
  27 #include "winerror.h"
  28 #include "msi.h"
  29 #include "msiquery.h"
  30 #include "objbase.h"
  31 #include "msipriv.h"
  32 #include "query.h"
  33
  34 #include "wine/debug.h"
  35 #include "wine/unicode.h"
  36
  37 WINE_DEFAULT_DEBUG_CHANNEL(msidb);
  38
  39 #define NUM_STREAMS_COLS    2
  40
  41 typedef struct tabSTREAM
  42 {
  43     UINT str_index;
  44     IStream *stream;
  45 } STREAM;
  46
  47 typedef struct tagMSISTREAMSVIEW
  48 {
  49     MSIVIEW view;
  50     MSIDATABASE *db;
  51     STREAM **streams;
  52     UINT max_streams;
  53     UINT num_rows;
  54     UINT row_size;
  55 } MSISTREAMSVIEW;
  56
  57 static BOOL streams_set_table_size(MSISTREAMSVIEW *sv, UINT size)
  58 {
  59     if (size >= sv->max_streams)
  60     {
  61         sv->max_streams *= 2;
  62         sv->streams = msi_realloc_zero(sv->streams, sv->max_streams * sizeof(STREAM *));
  63         if (!sv->streams)
  64             return FALSE;
  65     }
  66
  67     return TRUE;
  68 }
  69
  70 static STREAM *create_stream(MSISTREAMSVIEW *sv, LPCWSTR name, BOOL encoded, IStream *stm)
  71 {
  72     STREAM *stream;
  73     WCHAR decoded[MAX_STREAM_NAME_LEN];
  74
  75     stream = msi_alloc(sizeof(STREAM));
  76     if (!stream)
  77         return NULL;
  78
  79     if (encoded)
  80     {
  81         decode_streamname(name, decoded);
  82         TRACE("stream -> %s %s\n", debugstr_w(name), debugstr_w(decoded));
  83         name = decoded;
  84     }
  85
  86     stream->str_index = msi_addstringW(sv->db->strings, name, -1, 1, StringNonPersistent);
  87     stream->stream = stm;
  88     return stream;
  89 }
  90
  91 static UINT STREAMS_fetch_int(struct tagMSIVIEW *view, UINT row, UINT col, UINT *val)
  92 {
  93     MSISTREAMSVIEW *sv = (MSISTREAMSVIEW *)view;
  94
  95     TRACE("(%p, %d, %d, %p)\n", view, row, col, val);
  96
  97     if (col != 1)
  98         return ERROR_INVALID_PARAMETER;
  99
 100     if (row >= sv->num_rows)
 101         return ERROR_NO_MORE_ITEMS;
 102
 103     *val = sv->streams[row]->str_index;
 104
 105     return ERROR_SUCCESS;
 106 }
 107
 108 static UINT STREAMS_fetch_stream(struct tagMSIVIEW *view, UINT row, UINT col, IStream **stm)
 109 {
 110     MSISTREAMSVIEW *sv = (MSISTREAMSVIEW *)view;
 111
 112     TRACE("(%p, %d, %d, %p)\n", view, row, col, stm);
 113
 114     if (row >= sv->num_rows)
 115         return ERROR_FUNCTION_FAILED;
 116
 117     IStream_AddRef(sv->streams[row]->stream);
 118     *stm = sv->streams[row]->stream;
 119
 120     return ERROR_SUCCESS;
 121 }
 122
 123 static UINT STREAMS_get_row( struct tagMSIVIEW *view, UINT row, MSIRECORD **rec )
 124 {
 125     MSISTREAMSVIEW *sv = (MSISTREAMSVIEW *)view;
 126
 127     TRACE("%p %d %p\n", sv, row, rec);
 128
 129     return msi_view_get_row( sv->db, view, row, rec );
 130 }
 131
 132 static UINT STREAMS_set_row(struct tagMSIVIEW *view, UINT row, MSIRECORD *rec, UINT mask)
 133 {
 134     MSISTREAMSVIEW *sv = (MSISTREAMSVIEW *)view;
 135     STREAM *stream;
 136     IStream *stm;
 137     STATSTG stat;
 138     LPWSTR encname = NULL, name = NULL;
 139     USHORT *data = NULL;
 140     HRESULT hr;
 141     ULONG count;
 142     UINT r = ERROR_FUNCTION_FAILED;
 143
 144     TRACE("(%p, %d, %p, %08x)\n", view, row, rec, mask);
 145
 146     if (row > sv->num_rows)
 147         return ERROR_FUNCTION_FAILED;
 148
 149     r = MSI_RecordGetIStream(rec, 2, &stm);
 150     if (r != ERROR_SUCCESS)
 151         return r;
 152
 153     hr = IStream_Stat(stm, &stat, STATFLAG_NONAME);
 154     if (FAILED(hr))
 155     {
 156         WARN("failed to stat stream: %08x\n", hr);
 157         goto done;
 158     }
 159
 160     if (stat.cbSize.QuadPart >> 32)
 161     {
 162         WARN("stream too large\n");
 163         goto done;
 164     }
 165
 166     data = msi_alloc(stat.cbSize.QuadPart);
 167     if (!data)
 168         goto done;
 169
 170     hr = IStream_Read(stm, data, stat.cbSize.QuadPart, &count);
 171     if (FAILED(hr) || count != stat.cbSize.QuadPart)
 172     {
 173         WARN("failed to read stream: %08x\n", hr);
 174         goto done;
 175     }
 176
 177     name = strdupW(MSI_RecordGetString(rec, 1));
 178     if (!name)
 179     {
 180         WARN("failed to retrieve stream name\n");
 181         goto done;
 182     }
 183
 184     encname = encode_streamname(FALSE, name);
 185     msi_destroy_stream(sv->db, encname);
 186
 187     r = write_stream_data(sv->db->storage, name, data, count, FALSE);
 188     if (r != ERROR_SUCCESS)
 189     {
 190         WARN("failed to write stream data: %d\n", r);
 191         goto done;
 192     }
 193
 194     stream = create_stream(sv, name, FALSE, NULL);
 195     if (!stream)
 196         goto done;
 197
 198     hr = IStorage_OpenStream(sv->db->storage, encname, 0,
 199                              STGM_READ | STGM_SHARE_EXCLUSIVE, 0, &stream->stream);
 200     if (FAILED(hr))
 201     {
 202         WARN("failed to open stream: %08x\n", hr);
 203         goto done;
 204     }
 205
 206     sv->streams[row] = stream;
 207
 208 done:
 209     msi_free(name);
 210     msi_free(data);
 211     msi_free(encname);
 212
 213     IStream_Release(stm);
 214
 215     return r;
 216 }
 217
 218 static UINT STREAMS_insert_row(struct tagMSIVIEW *view, MSIRECORD *rec, UINT row, BOOL temporary)
 219 {
 220     MSISTREAMSVIEW *sv = (MSISTREAMSVIEW *)view;
 221     UINT i;
 222
 223     TRACE("(%p, %p, %d, %d)\n", view, rec, row, temporary);
 224
 225     if (!streams_set_table_size(sv, ++sv->num_rows))
 226         return ERROR_FUNCTION_FAILED;
 227
 228     if (row == -1)
 229         row = sv->num_rows - 1;
 230
 231     /* shift the rows to make room for the new row */
 232     for (i = sv->num_rows - 1; i > row; i--)
 233     {
 234         sv->streams[i] = sv->streams[i - 1];
 235     }
 236
 237     return STREAMS_set_row(view, row, rec, 0);
 238 }
 239
 240 static UINT STREAMS_delete_row(struct tagMSIVIEW *view, UINT row)
 241 {
 242     FIXME("(%p %d): stub!\n", view, row);
 243     return ERROR_SUCCESS;
 244 }
 245
 246 static UINT STREAMS_execute(struct tagMSIVIEW *view, MSIRECORD *record)
 247 {
 248     TRACE("(%p, %p)\n", view, record);
 249     return ERROR_SUCCESS;
 250 }
 251
 252 static UINT STREAMS_close(struct tagMSIVIEW *view)
 253 {
 254     TRACE("(%p)\n", view);
 255     return ERROR_SUCCESS;
 256 }
 257
 258 static UINT STREAMS_get_dimensions(struct tagMSIVIEW *view, UINT *rows, UINT *cols)
 259 {
 260     MSISTREAMSVIEW *sv = (MSISTREAMSVIEW *)view;
 261
 262     TRACE("(%p, %p, %p)\n", view, rows, cols);
 263
 264     if (cols) *cols = NUM_STREAMS_COLS;
 265     if (rows) *rows = sv->num_rows;
 266
 267     return ERROR_SUCCESS;
 268 }
 269
 270 static UINT STREAMS_get_column_info( struct tagMSIVIEW *view, UINT n, LPCWSTR *name,
 271                                      UINT *type, BOOL *temporary, LPCWSTR *table_name )
 272 {
 273     TRACE("(%p, %d, %p, %p, %p, %p)\n", view, n, name, type, temporary,
 274           table_name);
 275
 276     if (n == 0 || n > NUM_STREAMS_COLS)
 277         return ERROR_INVALID_PARAMETER;
 278
 279     switch (n)
 280     {
 281     case 1:
 282         if (name) *name = szName;
 283         if (type) *type = MSITYPE_STRING | MSITYPE_VALID | MAX_STREAM_NAME_LEN;
 284         break;
 285
 286     case 2:
 287         if (name) *name = szData;
 288         if (type) *type = MSITYPE_STRING | MSITYPE_VALID | MSITYPE_NULLABLE;
 289         break;
 290     }
 291     if (table_name) *table_name = szStreams;
 292     if (temporary) *temporary = FALSE;
 293     return ERROR_SUCCESS;
 294 }
 295
 296 static UINT streams_find_row(MSISTREAMSVIEW *sv, MSIRECORD *rec, UINT *row)
 297 {
 298     LPCWSTR str;
 299     UINT i, id, data;
 300
 301     str = MSI_RecordGetString(rec, 1);
 302     msi_string2idW(sv->db->strings, str, &id);
 303
 304     for (i = 0; i < sv->num_rows; i++)
 305     {
 306         STREAMS_fetch_int(&sv->view, i, 1, &data);
 307
 308         if (data == id)
 309         {
 310             *row = i;
 311             return ERROR_SUCCESS;
 312         }
 313     }
 314
 315     return ERROR_FUNCTION_FAILED;
 316 }
 317
 318 static UINT streams_modify_update(struct tagMSIVIEW *view, MSIRECORD *rec)
 319 {
 320     MSISTREAMSVIEW *sv = (MSISTREAMSVIEW *)view;
 321     UINT r, row;
 322
 323     r = streams_find_row(sv, rec, &row);
 324     if (r != ERROR_SUCCESS)
 325         return ERROR_FUNCTION_FAILED;
 326
 327     return STREAMS_set_row(view, row, rec, 0);
 328 }
 329
 330 static UINT streams_modify_assign(struct tagMSIVIEW *view, MSIRECORD *rec)
 331 {
 332     MSISTREAMSVIEW *sv = (MSISTREAMSVIEW *)view;
 333     UINT r, row;
 334
 335     r = streams_find_row(sv, rec, &row);
 336     if (r == ERROR_SUCCESS)
 337         return streams_modify_update(view, rec);
 338
 339     return STREAMS_insert_row(view, rec, -1, FALSE);
 340 }
 341
 342 static UINT STREAMS_modify(struct tagMSIVIEW *view, MSIMODIFY eModifyMode, MSIRECORD *rec, UINT row)
 343 {
 344     UINT r;
 345
 346     TRACE("%p %d %p\n", view, eModifyMode, rec);
 347
 348     switch (eModifyMode)
 349     {
 350     case MSIMODIFY_ASSIGN:
 351         r = streams_modify_assign(view, rec);
 352         break;
 353
 354     case MSIMODIFY_INSERT:
 355         r = STREAMS_insert_row(view, rec, -1, FALSE);
 356         break;
 357
 358     case MSIMODIFY_UPDATE:
 359         r = streams_modify_update(view, rec);
 360         break;
 361
 362     case MSIMODIFY_VALIDATE_NEW:
 363     case MSIMODIFY_INSERT_TEMPORARY:
 364     case MSIMODIFY_REFRESH:
 365     case MSIMODIFY_REPLACE:
 366     case MSIMODIFY_MERGE:
 367     case MSIMODIFY_DELETE:
 368     case MSIMODIFY_VALIDATE:
 369     case MSIMODIFY_VALIDATE_FIELD:
 370     case MSIMODIFY_VALIDATE_DELETE:
 371         FIXME("%p %d %p - mode not implemented\n", view, eModifyMode, rec );
 372         r = ERROR_CALL_NOT_IMPLEMENTED;
 373         break;
 374
 375     default:
 376         r = ERROR_INVALID_DATA;
 377     }
 378
 379     return r;
 380 }
 381
 382 static UINT STREAMS_delete(struct tagMSIVIEW *view)
 383 {
 384     MSISTREAMSVIEW *sv = (MSISTREAMSVIEW *)view;
 385     UINT i;
 386
 387     TRACE("(%p)\n", view);
 388
 389     for (i = 0; i < sv->num_rows; i++)
 390     {
 391         if (sv->streams[i])
 392         {
 393             if (sv->streams[i]->stream)
 394                 IStream_Release(sv->streams[i]->stream);
 395             msi_free(sv->streams[i]);
 396         }
 397     }
 398
 399     msi_free(sv->streams);
 400     msi_free(sv);
 401
 402     return ERROR_SUCCESS;
 403 }
 404
 405 static UINT STREAMS_find_matching_rows(struct tagMSIVIEW *view, UINT col,
 406                                        UINT val, UINT *row, MSIITERHANDLE *handle)
 407 {
 408     MSISTREAMSVIEW *sv = (MSISTREAMSVIEW *)view;
 409     UINT index = PtrToUlong(*handle);
 410
 411     TRACE("(%p, %d, %d, %p, %p)\n", view, col, val, row, handle);
 412
 413     if (col == 0 || col > NUM_STREAMS_COLS)
 414         return ERROR_INVALID_PARAMETER;
 415
 416     while (index < sv->num_rows)
 417     {
 418         if (sv->streams[index]->str_index == val)
 419         {
 420             *row = index;
 421             break;
 422         }
 423
 424         index++;
 425     }
 426
 427     *handle = UlongToPtr(++index);
 428
 429     if (index > sv->num_rows)
 430         return ERROR_NO_MORE_ITEMS;
 431
 432     return ERROR_SUCCESS;
 433 }
 434
 435 static const MSIVIEWOPS streams_ops =
 436 {
 437     STREAMS_fetch_int,
 438     STREAMS_fetch_stream,
 439     STREAMS_get_row,
 440     STREAMS_set_row,
 441     STREAMS_insert_row,
 442     STREAMS_delete_row,
 443     STREAMS_execute,
 444     STREAMS_close,
 445     STREAMS_get_dimensions,
 446     STREAMS_get_column_info,
 447     STREAMS_modify,
 448     STREAMS_delete,
 449     STREAMS_find_matching_rows,
 450     NULL,
 451     NULL,
 452     NULL,
 453     NULL,
 454     NULL,
 455     NULL,
 456 };
 457
 458 static INT add_streams_to_table(MSISTREAMSVIEW *sv)
 459 {
 460     IEnumSTATSTG *stgenum = NULL;
 461     STATSTG stat;
 462     STREAM *stream = NULL;
 463     HRESULT hr;
 464     UINT r, count = 0, size;
 465     LPWSTR encname;
 466
 467     hr = IStorage_EnumElements(sv->db->storage, 0, NULL, 0, &stgenum);
 468     if (FAILED(hr))
 469         return -1;
 470
 471     sv->max_streams = 1;
 472     sv->streams = msi_alloc_zero(sizeof(STREAM *));
 473     if (!sv->streams)
 474         return -1;
 475
 476     while (TRUE)
 477     {
 478         size = 0;
 479         hr = IEnumSTATSTG_Next(stgenum, 1, &stat, &size);
 480         if (FAILED(hr) || !size)
 481             break;
 482
 483         if (stat.type != STGTY_STREAM)
 484         {
 485             CoTaskMemFree(stat.pwcsName);
 486             continue;
 487         }
 488
 489         /* table streams are not in the _Streams table */
 490         if (*stat.pwcsName == 0x4840)
 491         {
 492             CoTaskMemFree(stat.pwcsName);
 493             continue;
 494         }
 495
 496         stream = create_stream(sv, stat.pwcsName, TRUE, NULL);
 497         if (!stream)
 498         {
 499             count = -1;
 500             CoTaskMemFree(stat.pwcsName);
 501             break;
 502         }
 503
 504         /* these streams appear to be unencoded */
 505         if (*stat.pwcsName == 0x0005)
 506         {
 507             r = msi_get_raw_stream(sv->db, stat.pwcsName, &stream->stream);
 508         }
 509         else
 510         {
 511             encname = encode_streamname(FALSE, stat.pwcsName);
 512             r = msi_get_raw_stream(sv->db, encname, &stream->stream);
 513             msi_free(encname);
 514         }
 515         CoTaskMemFree(stat.pwcsName);
 516
 517         if (r != ERROR_SUCCESS)
 518         {
 519             WARN("unable to get stream %u\n", r);
 520             count = -1;
 521             break;
 522         }
 523
 524         if (!streams_set_table_size(sv, ++count))
 525         {
 526             count = -1;
 527             break;
 528         }
 529
 530         sv->streams[count - 1] = stream;
 531     }
 532
 533     IEnumSTATSTG_Release(stgenum);
 534     return count;
 535 }
 536
 537 UINT STREAMS_CreateView(MSIDATABASE *db, MSIVIEW **view)
 538 {
 539     MSISTREAMSVIEW *sv;
 540     INT rows;
 541
 542     TRACE("(%p, %p)\n", db, view);
 543
 544     sv = msi_alloc_zero( sizeof(MSISTREAMSVIEW) );
 545     if (!sv)
 546         return ERROR_FUNCTION_FAILED;
 547
 548     sv->view.ops = &streams_ops;
 549     sv->db = db;
 550     rows = add_streams_to_table(sv);
 551     if (rows < 0)
 552     {
 553         msi_free( sv );
 554         return ERROR_FUNCTION_FAILED;
 555     }
 556     sv->num_rows = rows;
 557
 558     *view = (MSIVIEW *)sv;
 559
 560     return ERROR_SUCCESS;
 561 }