2 * Implementation of the Microsoft Installer (msi.dll)
4 * Copyright 2004 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
26 #include "wine/debug.h"
36 WINE_DEFAULT_DEBUG_CHANNEL(msidb
);
39 /* below is the query interface to a table */
41 typedef struct tagMSIINSERTVIEW
51 static UINT
INSERT_fetch_int( struct tagMSIVIEW
*view
, UINT row
, UINT col
, UINT
*val
)
53 MSIINSERTVIEW
*iv
= (MSIINSERTVIEW
*)view
;
55 TRACE("%p %d %d %p\n", iv
, row
, col
, val
);
57 return ERROR_FUNCTION_FAILED
;
61 * msi_query_merge_record
63 * Merge a value_list and a record to create a second record.
64 * Replace wildcard entries in the valuelist with values from the record
66 MSIRECORD
*msi_query_merge_record( UINT fields
, const column_info
*vl
, MSIRECORD
*rec
)
69 DWORD wildcard_count
= 1, i
;
71 merged
= MSI_CreateRecord( fields
);
72 for( i
=1; i
<= fields
; i
++ )
76 TRACE("Not enough elements in the list to insert\n");
79 switch( vl
->val
->type
)
82 TRACE("field %d -> %s\n", i
, debugstr_w(vl
->val
->u
.sval
));
83 MSI_RecordSetStringW( merged
, i
, vl
->val
->u
.sval
);
86 MSI_RecordSetInteger( merged
, i
, vl
->val
->u
.ival
);
91 MSI_RecordCopyField( rec
, wildcard_count
, merged
, i
);
95 ERR("Unknown expression type %d\n", vl
->val
->type
);
102 msiobj_release( &merged
->hdr
);
106 /* checks to see if the column order specified in the INSERT query
107 * matches the column order of the table
109 static BOOL
msi_columns_in_order(MSIINSERTVIEW
*iv
, UINT col_count
)
115 for (i
= 1; i
<= col_count
; i
++)
117 iv
->sv
->ops
->get_column_info(iv
->sv
, i
, &a
, NULL
, NULL
);
118 iv
->table
->ops
->get_column_info(iv
->table
, i
, &b
, NULL
, NULL
);
120 res
= lstrcmpW(a
, b
);
131 /* rearranges the data in the record to be inserted based on column order,
132 * and pads the record for any missing columns in the INSERT query
134 static UINT
msi_arrange_record(MSIINSERTVIEW
*iv
, MSIRECORD
**values
)
137 UINT col_count
, val_count
;
142 r
= iv
->table
->ops
->get_dimensions(iv
->table
, NULL
, &col_count
);
143 if (r
!= ERROR_SUCCESS
)
146 val_count
= MSI_RecordGetFieldCount(*values
);
148 /* check to see if the columns are arranged already
149 * to avoid unnecessary copying
151 if (col_count
== val_count
&& msi_columns_in_order(iv
, col_count
))
152 return ERROR_SUCCESS
;
154 padded
= MSI_CreateRecord(col_count
);
156 return ERROR_OUTOFMEMORY
;
158 for (colidx
= 1; colidx
<= val_count
; colidx
++)
160 r
= iv
->sv
->ops
->get_column_info(iv
->sv
, colidx
, &a
, NULL
, NULL
);
161 if (r
!= ERROR_SUCCESS
)
164 for (i
= 1; i
<= col_count
; i
++)
166 r
= iv
->table
->ops
->get_column_info(iv
->table
, i
, &b
, NULL
, NULL
);
167 if (r
!= ERROR_SUCCESS
)
170 res
= lstrcmpW(a
, b
);
175 MSI_RecordCopyField(*values
, colidx
, padded
, i
);
183 msiobj_release(&(*values
)->hdr
);
186 return ERROR_SUCCESS
;
189 msiobj_release(&padded
->hdr
);
193 static BOOL
row_has_null_primary_keys(MSIINSERTVIEW
*iv
, MSIRECORD
*row
)
195 UINT r
, i
, col_count
, type
;
197 r
= iv
->table
->ops
->get_dimensions( iv
->table
, NULL
, &col_count
);
198 if (r
!= ERROR_SUCCESS
)
201 for (i
= 1; i
<= col_count
; i
++)
203 r
= iv
->table
->ops
->get_column_info(iv
->table
, i
, NULL
, &type
, NULL
);
204 if (r
!= ERROR_SUCCESS
)
207 if (!(type
& MSITYPE_KEY
))
210 if (MSI_RecordIsNull(row
, i
))
217 static UINT
INSERT_execute( struct tagMSIVIEW
*view
, MSIRECORD
*record
)
219 MSIINSERTVIEW
*iv
= (MSIINSERTVIEW
*)view
;
220 UINT r
, row
= -1, col_count
= 0;
222 MSIRECORD
*values
= NULL
;
224 TRACE("%p %p\n", iv
, record
);
228 return ERROR_FUNCTION_FAILED
;
230 r
= sv
->ops
->execute( sv
, 0 );
231 TRACE("sv execute returned %x\n", r
);
235 r
= sv
->ops
->get_dimensions( sv
, NULL
, &col_count
);
240 * Merge the wildcard values into the list of values provided
241 * in the query, and create a record containing both.
243 values
= msi_query_merge_record( col_count
, iv
->vals
, record
);
247 r
= msi_arrange_record( iv
, &values
);
248 if( r
!= ERROR_SUCCESS
)
251 /* rows with NULL primary keys are inserted at the beginning of the table */
252 if( row_has_null_primary_keys( iv
, values
) )
255 r
= iv
->table
->ops
->insert_row( iv
->table
, values
, row
, iv
->bIsTemp
);
259 msiobj_release( &values
->hdr
);
265 static UINT
INSERT_close( struct tagMSIVIEW
*view
)
267 MSIINSERTVIEW
*iv
= (MSIINSERTVIEW
*)view
;
274 return ERROR_FUNCTION_FAILED
;
276 return sv
->ops
->close( sv
);
279 static UINT
INSERT_get_dimensions( struct tagMSIVIEW
*view
, UINT
*rows
, UINT
*cols
)
281 MSIINSERTVIEW
*iv
= (MSIINSERTVIEW
*)view
;
284 TRACE("%p %p %p\n", iv
, rows
, cols
);
288 return ERROR_FUNCTION_FAILED
;
290 return sv
->ops
->get_dimensions( sv
, rows
, cols
);
293 static UINT
INSERT_get_column_info( struct tagMSIVIEW
*view
,
294 UINT n
, LPWSTR
*name
, UINT
*type
, BOOL
*temporary
)
296 MSIINSERTVIEW
*iv
= (MSIINSERTVIEW
*)view
;
299 TRACE("%p %d %p %p %p\n", iv
, n
, name
, type
, temporary
);
303 return ERROR_FUNCTION_FAILED
;
305 return sv
->ops
->get_column_info( sv
, n
, name
, type
, temporary
);
308 static UINT
INSERT_modify( struct tagMSIVIEW
*view
, MSIMODIFY eModifyMode
, MSIRECORD
*rec
, UINT row
)
310 MSIINSERTVIEW
*iv
= (MSIINSERTVIEW
*)view
;
312 TRACE("%p %d %p\n", iv
, eModifyMode
, rec
);
314 return ERROR_FUNCTION_FAILED
;
317 static UINT
INSERT_delete( struct tagMSIVIEW
*view
)
319 MSIINSERTVIEW
*iv
= (MSIINSERTVIEW
*)view
;
326 sv
->ops
->delete( sv
);
327 msiobj_release( &iv
->db
->hdr
);
330 return ERROR_SUCCESS
;
333 static UINT
INSERT_find_matching_rows( struct tagMSIVIEW
*view
, UINT col
,
334 UINT val
, UINT
*row
, MSIITERHANDLE
*handle
)
336 TRACE("%p, %d, %u, %p\n", view
, col
, val
, *handle
);
338 return ERROR_FUNCTION_FAILED
;
342 static const MSIVIEWOPS insert_ops
=
352 INSERT_get_dimensions
,
353 INSERT_get_column_info
,
356 INSERT_find_matching_rows
,
365 static UINT
count_column_info( const column_info
*ci
)
368 for ( ; ci
; ci
= ci
->next
)
373 UINT
INSERT_CreateView( MSIDATABASE
*db
, MSIVIEW
**view
, LPCWSTR table
,
374 column_info
*columns
, column_info
*values
, BOOL temp
)
376 MSIINSERTVIEW
*iv
= NULL
;
378 MSIVIEW
*tv
= NULL
, *sv
= NULL
;
382 /* there should be one value for each column */
383 if ( count_column_info( columns
) != count_column_info(values
) )
384 return ERROR_BAD_QUERY_SYNTAX
;
386 r
= TABLE_CreateView( db
, table
, &tv
);
387 if( r
!= ERROR_SUCCESS
)
390 r
= SELECT_CreateView( db
, &sv
, tv
, columns
);
391 if( r
!= ERROR_SUCCESS
)
394 tv
->ops
->delete( tv
);
398 iv
= msi_alloc_zero( sizeof *iv
);
400 return ERROR_FUNCTION_FAILED
;
402 /* fill the structure */
403 iv
->view
.ops
= &insert_ops
;
404 msiobj_addref( &db
->hdr
);
410 *view
= (MSIVIEW
*) iv
;
412 return ERROR_SUCCESS
;