2 * Implementation of the Microsoft Installer (msi.dll)
4 * Copyright 2006 Mike McCormack for CodeWeavers
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
33 #include "wine/debug.h"
34 #include "wine/unicode.h"
36 WINE_DEFAULT_DEBUG_CHANNEL(msidb);
38 typedef struct tagJOINTABLE
47 typedef struct tagMSIJOINVIEW
56 static UINT JOIN_fetch_int( struct tagMSIVIEW *view, UINT row, UINT col, UINT *val )
58 MSIJOINVIEW *jv = (MSIJOINVIEW*)view;
63 if (col == 0 || col > jv->columns)
64 return ERROR_FUNCTION_FAILED;
67 return ERROR_FUNCTION_FAILED;
69 LIST_FOR_EACH_ENTRY(table, &jv->tables, JOINTABLE, entry)
71 if (col <= cols + table->columns)
73 row = (row % (jv->rows / table->next_rows)) / prev_rows;
78 prev_rows *= table->rows;
79 cols += table->columns;
82 return table->view->ops->fetch_int( table->view, row, col, val );
85 static UINT JOIN_fetch_stream( struct tagMSIVIEW *view, UINT row, UINT col, IStream **stm)
87 MSIJOINVIEW *jv = (MSIJOINVIEW*)view;
92 TRACE("%p %d %d %p\n", jv, row, col, stm );
94 if (col == 0 || col > jv->columns)
95 return ERROR_FUNCTION_FAILED;
98 return ERROR_FUNCTION_FAILED;
100 LIST_FOR_EACH_ENTRY(table, &jv->tables, JOINTABLE, entry)
102 if (col <= cols + table->columns)
104 row = (row % (jv->rows / table->next_rows)) / prev_rows;
109 prev_rows *= table->rows;
110 cols += table->columns;
113 return table->view->ops->fetch_stream( table->view, row, col, stm );
116 static UINT JOIN_get_row( struct tagMSIVIEW *view, UINT row, MSIRECORD **rec )
118 MSIJOINVIEW *jv = (MSIJOINVIEW*)view;
120 TRACE("%p %d %p\n", jv, row, rec);
122 return msi_view_get_row( jv->db, view, row, rec );
125 static UINT JOIN_execute( struct tagMSIVIEW *view, MSIRECORD *record )
127 MSIJOINVIEW *jv = (MSIJOINVIEW*)view;
131 TRACE("%p %p\n", jv, record);
133 LIST_FOR_EACH_ENTRY(table, &jv->tables, JOINTABLE, entry)
135 table->view->ops->execute(table->view, NULL);
137 r = table->view->ops->get_dimensions(table->view, &table->rows, NULL);
138 if (r != ERROR_SUCCESS)
140 ERR("failed to get table dimensions\n");
144 /* each table must have at least one row */
145 if (table->rows == 0)
148 return ERROR_SUCCESS;
152 jv->rows = table->rows;
154 jv->rows *= table->rows;
158 LIST_FOR_EACH_ENTRY(table, &jv->tables, JOINTABLE, entry)
161 table->next_rows = rows;
164 return ERROR_SUCCESS;
167 static UINT JOIN_close( struct tagMSIVIEW *view )
169 MSIJOINVIEW *jv = (MSIJOINVIEW*)view;
174 LIST_FOR_EACH_ENTRY(table, &jv->tables, JOINTABLE, entry)
176 table->view->ops->close(table->view);
179 return ERROR_SUCCESS;
182 static UINT JOIN_get_dimensions( struct tagMSIVIEW *view, UINT *rows, UINT *cols )
184 MSIJOINVIEW *jv = (MSIJOINVIEW*)view;
186 TRACE("%p %p %p\n", jv, rows, cols );
194 return ERROR_SUCCESS;
197 static UINT JOIN_get_column_info( struct tagMSIVIEW *view, UINT n, LPCWSTR *name,
198 UINT *type, BOOL *temporary, LPCWSTR *table_name )
200 MSIJOINVIEW *jv = (MSIJOINVIEW*)view;
204 TRACE("%p %d %p %p %p %p\n", jv, n, name, type, temporary, table_name );
206 if (n == 0 || n > jv->columns)
207 return ERROR_FUNCTION_FAILED;
209 LIST_FOR_EACH_ENTRY(table, &jv->tables, JOINTABLE, entry)
211 if (n <= cols + table->columns)
212 return table->view->ops->get_column_info(table->view, n - cols,
213 name, type, temporary,
215 cols += table->columns;
218 return ERROR_FUNCTION_FAILED;
221 static UINT join_find_row( MSIJOINVIEW *jv, MSIRECORD *rec, UINT *row )
226 str = MSI_RecordGetString( rec, 1 );
227 r = msi_string2idW( jv->db->strings, str, &id );
228 if (r != ERROR_SUCCESS)
231 for (i = 0; i < jv->rows; i++)
233 JOIN_fetch_int( &jv->view, i, 1, &data );
238 return ERROR_SUCCESS;
242 return ERROR_FUNCTION_FAILED;
245 static UINT JOIN_set_row( struct tagMSIVIEW *view, UINT row, MSIRECORD *rec, UINT mask )
247 MSIJOINVIEW *jv = (MSIJOINVIEW*)view;
249 UINT i, reduced_mask = 0, r = ERROR_SUCCESS, offset = 0, col_count;
252 TRACE("%p %d %p %u %08x\n", jv, row, rec, rec->count, mask );
254 if (mask >= 1 << jv->columns)
255 return ERROR_INVALID_PARAMETER;
257 LIST_FOR_EACH_ENTRY(table, &jv->tables, JOINTABLE, entry)
259 r = table->view->ops->get_dimensions( table->view, NULL, &col_count );
260 if (r != ERROR_SUCCESS)
263 reduced = MSI_CreateRecord( col_count );
265 return ERROR_FUNCTION_FAILED;
267 for (i = 0; i < col_count; i++)
269 r = MSI_RecordCopyField( rec, i + offset + 1, reduced, i + 1 );
270 if (r != ERROR_SUCCESS)
275 reduced_mask = mask >> (jv->columns - offset) & ((1 << col_count) - 1);
277 if (r == ERROR_SUCCESS)
278 r = table->view->ops->set_row( table->view, row, reduced, reduced_mask );
280 msiobj_release( &reduced->hdr );
286 static UINT join_modify_update( struct tagMSIVIEW *view, MSIRECORD *rec )
288 MSIJOINVIEW *jv = (MSIJOINVIEW *)view;
291 r = join_find_row( jv, rec, &row );
292 if (r != ERROR_SUCCESS)
295 return JOIN_set_row( view, row, rec, (1 << jv->columns) - 1 );
298 static UINT JOIN_modify( struct tagMSIVIEW *view, MSIMODIFY mode, MSIRECORD *rec, UINT row )
302 TRACE("%p %d %p %u\n", view, mode, rec, row);
306 case MSIMODIFY_UPDATE:
307 return join_modify_update( view, rec );
309 case MSIMODIFY_ASSIGN:
310 case MSIMODIFY_DELETE:
311 case MSIMODIFY_INSERT:
312 case MSIMODIFY_INSERT_TEMPORARY:
313 case MSIMODIFY_MERGE:
314 case MSIMODIFY_REPLACE:
316 case MSIMODIFY_VALIDATE:
317 case MSIMODIFY_VALIDATE_DELETE:
318 case MSIMODIFY_VALIDATE_FIELD:
319 case MSIMODIFY_VALIDATE_NEW:
320 r = ERROR_FUNCTION_FAILED;
323 case MSIMODIFY_REFRESH:
324 r = ERROR_CALL_NOT_IMPLEMENTED;
328 WARN("%p %d %p %u - unknown mode\n", view, mode, rec, row );
329 r = ERROR_INVALID_PARAMETER;
336 static UINT JOIN_delete( struct tagMSIVIEW *view )
338 MSIJOINVIEW *jv = (MSIJOINVIEW*)view;
339 struct list *item, *cursor;
343 LIST_FOR_EACH_SAFE(item, cursor, &jv->tables)
345 JOINTABLE* table = LIST_ENTRY(item, JOINTABLE, entry);
347 list_remove(&table->entry);
348 table->view->ops->delete(table->view);
355 return ERROR_SUCCESS;
358 static UINT JOIN_find_matching_rows( struct tagMSIVIEW *view, UINT col,
359 UINT val, UINT *row, MSIITERHANDLE *handle )
361 MSIJOINVIEW *jv = (MSIJOINVIEW*)view;
364 TRACE("%p, %d, %u, %p\n", view, col, val, *handle);
366 if (col == 0 || col > jv->columns)
367 return ERROR_INVALID_PARAMETER;
369 for (i = PtrToUlong(*handle); i < jv->rows; i++)
371 if (view->ops->fetch_int( view, i, col, &row_value ) != ERROR_SUCCESS)
374 if (row_value == val)
377 (*(UINT *)handle) = i + 1;
378 return ERROR_SUCCESS;
382 return ERROR_NO_MORE_ITEMS;
385 static UINT JOIN_sort(struct tagMSIVIEW *view, column_info *columns)
387 MSIJOINVIEW *jv = (MSIJOINVIEW *)view;
391 TRACE("%p %p\n", view, columns);
393 LIST_FOR_EACH_ENTRY(table, &jv->tables, JOINTABLE, entry)
395 r = table->view->ops->sort(table->view, columns);
396 if (r != ERROR_SUCCESS)
400 return ERROR_SUCCESS;
403 static const MSIVIEWOPS join_ops =
414 JOIN_get_column_info,
417 JOIN_find_matching_rows,
426 UINT JOIN_CreateView( MSIDATABASE *db, MSIVIEW **view, LPWSTR tables )
428 MSIJOINVIEW *jv = NULL;
429 UINT r = ERROR_SUCCESS;
433 TRACE("%p (%s)\n", jv, debugstr_w(tables) );
435 jv = msi_alloc_zero( sizeof *jv );
437 return ERROR_FUNCTION_FAILED;
439 /* fill the structure */
440 jv->view.ops = &join_ops;
445 list_init(&jv->tables);
449 if ((ptr = strchrW(tables, ' ')))
452 table = msi_alloc(sizeof(JOINTABLE));
455 r = ERROR_OUTOFMEMORY;
459 r = TABLE_CreateView( db, tables, &table->view );
460 if( r != ERROR_SUCCESS )
462 WARN("can't create table: %s\n", debugstr_w(tables));
464 r = ERROR_BAD_QUERY_SYNTAX;
468 r = table->view->ops->get_dimensions( table->view, NULL,
470 if( r != ERROR_SUCCESS )
472 ERR("can't get table dimensions\n");
476 jv->columns += table->columns;
478 list_add_head( &jv->tables, &table->entry );
487 return ERROR_SUCCESS;
490 jv->view.ops->delete( &jv->view );