8fd761ed0dd4e53f00e034c1aa86f4ef9d117789
[reactos.git] / reactos / dll / win32 / 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 {
214 MSISELECTVIEW *sv = (MSISELECTVIEW*)view;
215
216 TRACE("%p %d %p %p %p\n", sv, n, name, type, temporary );
217
218 if( !sv->table )
219 return ERROR_FUNCTION_FAILED;
220
221 if( (n==0) || (n>sv->num_cols) )
222 return ERROR_FUNCTION_FAILED;
223
224 n = sv->cols[ n - 1 ];
225
226 return sv->table->ops->get_column_info( sv->table, n, name,
227 type, temporary );
228 }
229
230 static UINT msi_select_update(struct tagMSIVIEW *view, MSIRECORD *rec, UINT row)
231 {
232 MSISELECTVIEW *sv = (MSISELECTVIEW*)view;
233 UINT r, i, num_columns, col, type, val;
234 LPWSTR name;
235 LPCWSTR str;
236 MSIRECORD *mod;
237
238 r = SELECT_get_dimensions(view, NULL, &num_columns);
239 if (r != ERROR_SUCCESS)
240 return r;
241
242 r = sv->table->ops->get_row(sv->table, row - 1, &mod);
243 if (r != ERROR_SUCCESS)
244 return r;
245
246 for (i = 0; i < num_columns; i++)
247 {
248 col = sv->cols[i];
249
250 r = SELECT_get_column_info(view, i + 1, &name, &type, NULL);
251 msi_free(name);
252 if (r != ERROR_SUCCESS)
253 {
254 ERR("Failed to get column information: %d\n", r);
255 goto done;
256 }
257
258 if (MSITYPE_IS_BINARY(type))
259 {
260 ERR("Cannot modify binary data!\n");
261 r = ERROR_FUNCTION_FAILED;
262 goto done;
263 }
264 else if (type & MSITYPE_STRING)
265 {
266 str = MSI_RecordGetString(rec, i + 1);
267 r = MSI_RecordSetStringW(mod, col, str);
268 }
269 else
270 {
271 val = MSI_RecordGetInteger(rec, i + 1);
272 r = MSI_RecordSetInteger(mod, col, val);
273 }
274
275 if (r != ERROR_SUCCESS)
276 {
277 ERR("Failed to modify record: %d\n", r);
278 goto done;
279 }
280 }
281
282 r = sv->table->ops->modify(sv->table, MSIMODIFY_UPDATE, mod, row);
283
284 done:
285 msiobj_release(&mod->hdr);
286 return r;
287 }
288
289 static UINT SELECT_modify( struct tagMSIVIEW *view, MSIMODIFY eModifyMode,
290 MSIRECORD *rec, UINT row )
291 {
292 MSISELECTVIEW *sv = (MSISELECTVIEW*)view;
293
294 TRACE("%p %d %p %d\n", sv, eModifyMode, rec, row );
295
296 if( !sv->table )
297 return ERROR_FUNCTION_FAILED;
298
299 if (eModifyMode == MSIMODIFY_UPDATE)
300 return msi_select_update(view, rec, row);
301
302 return sv->table->ops->modify( sv->table, eModifyMode, rec, row );
303 }
304
305 static UINT SELECT_delete( struct tagMSIVIEW *view )
306 {
307 MSISELECTVIEW *sv = (MSISELECTVIEW*)view;
308
309 TRACE("%p\n", sv );
310
311 if( sv->table )
312 sv->table->ops->delete( sv->table );
313 sv->table = NULL;
314
315 msi_free( sv );
316
317 return ERROR_SUCCESS;
318 }
319
320 static UINT SELECT_find_matching_rows( struct tagMSIVIEW *view, UINT col,
321 UINT val, UINT *row, MSIITERHANDLE *handle )
322 {
323 MSISELECTVIEW *sv = (MSISELECTVIEW*)view;
324
325 TRACE("%p, %d, %u, %p\n", view, col, val, *handle);
326
327 if( !sv->table )
328 return ERROR_FUNCTION_FAILED;
329
330 if( (col==0) || (col>sv->num_cols) )
331 return ERROR_FUNCTION_FAILED;
332
333 col = sv->cols[ col - 1 ];
334
335 return sv->table->ops->find_matching_rows( sv->table, col, val, row, handle );
336 }
337
338 static UINT SELECT_sort(struct tagMSIVIEW *view, column_info *columns)
339 {
340 MSISELECTVIEW *sv = (MSISELECTVIEW *)view;
341
342 TRACE("%p %p\n", view, columns);
343
344 return sv->table->ops->sort( sv->table, columns );
345 }
346
347 static const MSIVIEWOPS select_ops =
348 {
349 SELECT_fetch_int,
350 SELECT_fetch_stream,
351 SELECT_get_row,
352 SELECT_set_row,
353 SELECT_insert_row,
354 NULL,
355 SELECT_execute,
356 SELECT_close,
357 SELECT_get_dimensions,
358 SELECT_get_column_info,
359 SELECT_modify,
360 SELECT_delete,
361 SELECT_find_matching_rows,
362 NULL,
363 NULL,
364 NULL,
365 NULL,
366 SELECT_sort,
367 NULL,
368 };
369
370 static UINT SELECT_AddColumn( MSISELECTVIEW *sv, LPCWSTR name )
371 {
372 UINT r, n=0;
373 MSIVIEW *table;
374
375 TRACE("%p adding %s\n", sv, debugstr_w( name ) );
376
377 if( sv->view.ops != &select_ops )
378 return ERROR_FUNCTION_FAILED;
379
380 table = sv->table;
381 if( !table )
382 return ERROR_FUNCTION_FAILED;
383 if( !table->ops->get_dimensions )
384 return ERROR_FUNCTION_FAILED;
385 if( !table->ops->get_column_info )
386 return ERROR_FUNCTION_FAILED;
387
388 if( sv->num_cols >= sv->max_cols )
389 return ERROR_FUNCTION_FAILED;
390
391 r = VIEW_find_column( table, name, &n );
392 if( r != ERROR_SUCCESS )
393 return r;
394
395 sv->cols[sv->num_cols] = n;
396 TRACE("Translating column %s from %d -> %d\n",
397 debugstr_w( name ), sv->num_cols, n);
398
399 sv->num_cols++;
400
401 return ERROR_SUCCESS;
402 }
403
404 static int select_count_columns( const column_info *col )
405 {
406 int n;
407 for (n = 0; col; col = col->next)
408 n++;
409 return n;
410 }
411
412 UINT SELECT_CreateView( MSIDATABASE *db, MSIVIEW **view, MSIVIEW *table,
413 const column_info *columns )
414 {
415 MSISELECTVIEW *sv = NULL;
416 UINT count = 0, r = ERROR_SUCCESS;
417
418 TRACE("%p\n", sv );
419
420 count = select_count_columns( columns );
421
422 sv = msi_alloc_zero( sizeof *sv + count*sizeof (UINT) );
423 if( !sv )
424 return ERROR_FUNCTION_FAILED;
425
426 /* fill the structure */
427 sv->view.ops = &select_ops;
428 sv->db = db;
429 sv->table = table;
430 sv->num_cols = 0;
431 sv->max_cols = count;
432
433 while( columns )
434 {
435 r = SELECT_AddColumn( sv, columns->column );
436 if( r )
437 break;
438 columns = columns->next;
439 }
440
441 if( r == ERROR_SUCCESS )
442 *view = &sv->view;
443 else
444 msi_free( sv );
445
446 return r;
447 }