kernel32: Handle the case where the 16-bit module is already loaded also for separate...
[wine] / dlls / msi / alter.c
1 /*
2  * Implementation of the Microsoft Installer (msi.dll)
3  *
4  * Copyright 2006 Mike McCormack
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
33 #include "query.h"
34
35 WINE_DEFAULT_DEBUG_CHANNEL(msidb);
36
37 typedef struct tagMSIALTERVIEW
38 {
39     MSIVIEW        view;
40     MSIDATABASE   *db;
41     MSIVIEW       *table;
42     column_info   *colinfo;
43     INT hold;
44 } MSIALTERVIEW;
45
46 static UINT ALTER_fetch_int( struct tagMSIVIEW *view, UINT row, UINT col, UINT *val )
47 {
48     MSIALTERVIEW *av = (MSIALTERVIEW*)view;
49
50     TRACE("%p %d %d %p\n", av, row, col, val );
51
52     return ERROR_FUNCTION_FAILED;
53 }
54
55 static UINT ALTER_fetch_stream( struct tagMSIVIEW *view, UINT row, UINT col, IStream **stm)
56 {
57     MSIALTERVIEW *av = (MSIALTERVIEW*)view;
58
59     TRACE("%p %d %d %p\n", av, row, col, stm );
60
61     return ERROR_FUNCTION_FAILED;
62 }
63
64 static UINT ALTER_get_row( struct tagMSIVIEW *view, UINT row, MSIRECORD **rec )
65 {
66     MSIALTERVIEW *av = (MSIALTERVIEW*)view;
67
68     TRACE("%p %d %p\n", av, row, rec );
69
70     return av->table->ops->get_row(av->table, row, rec);
71 }
72
73 static UINT ITERATE_columns(MSIRECORD *row, LPVOID param)
74 {
75     (*(UINT *)param)++;
76     return ERROR_SUCCESS;
77 }
78
79 static BOOL check_column_exists(MSIDATABASE *db, LPCWSTR table, LPCWSTR column)
80 {
81     MSIQUERY *view;
82     MSIRECORD *rec;
83     UINT r;
84
85     static const WCHAR query[] = {
86         'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
87         '`','_','C','o','l','u','m','n','s','`',' ','W','H','E','R','E',' ',
88         '`','T','a','b','l','e','`','=','\'','%','s','\'',' ','A','N','D',' ',
89         '`','N','a','m','e','`','=','\'','%','s','\'',0
90     };
91
92     r = MSI_OpenQuery(db, &view, query, table, column);
93     if (r != ERROR_SUCCESS)
94         return FALSE;
95
96     r = MSI_ViewExecute(view, NULL);
97     if (r != ERROR_SUCCESS)
98         goto done;
99
100     r = MSI_ViewFetch(view, &rec);
101     if (r == ERROR_SUCCESS)
102         msiobj_release(&rec->hdr);
103
104 done:
105     msiobj_release(&view->hdr);
106     return (r == ERROR_SUCCESS);
107 }
108
109 static UINT alter_add_column(MSIALTERVIEW *av)
110 {
111     UINT r, colnum = 1;
112     MSIQUERY *view;
113     MSIVIEW *columns;
114
115     static const WCHAR szColumns[] = {'_','C','o','l','u','m','n','s',0};
116     static const WCHAR query[] = {
117         'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
118         '`','_','C','o','l','u','m','n','s','`',' ','W','H','E','R','E',' ',
119         '`','T','a','b','l','e','`','=','\'','%','s','\'',' ','O','R','D','E','R',' ',
120         'B','Y',' ','`','N','u','m','b','e','r','`',0
121     };
122
123     r = TABLE_CreateView(av->db, szColumns, &columns);
124     if (r != ERROR_SUCCESS)
125         return r;
126
127     if (check_column_exists(av->db, av->colinfo->table, av->colinfo->column))
128     {
129         columns->ops->delete(columns);
130         return ERROR_BAD_QUERY_SYNTAX;
131     }
132
133     r = MSI_OpenQuery(av->db, &view, query, av->colinfo->table, av->colinfo->column);
134     if (r == ERROR_SUCCESS)
135     {
136         r = MSI_IterateRecords(view, NULL, ITERATE_columns, &colnum);
137         msiobj_release(&view->hdr);
138     }
139
140     r = columns->ops->add_column(columns, av->colinfo->table,
141                                  colnum, av->colinfo->column,
142                                  av->colinfo->type, (av->hold == 1));
143
144     columns->ops->delete(columns);
145     return r;
146 }
147
148 static UINT ALTER_execute( struct tagMSIVIEW *view, MSIRECORD *record )
149 {
150     MSIALTERVIEW *av = (MSIALTERVIEW*)view;
151     UINT ref;
152
153     TRACE("%p %p\n", av, record);
154
155     if (av->hold == 1)
156         av->table->ops->add_ref(av->table);
157     else if (av->hold == -1)
158     {
159         ref = av->table->ops->release(av->table);
160         if (ref == 0)
161             av->table = NULL;
162     }
163
164     if (av->colinfo)
165         return alter_add_column(av);
166
167     return ERROR_SUCCESS;
168 }
169
170 static UINT ALTER_close( struct tagMSIVIEW *view )
171 {
172     MSIALTERVIEW *av = (MSIALTERVIEW*)view;
173
174     TRACE("%p\n", av );
175
176     return ERROR_SUCCESS;
177 }
178
179 static UINT ALTER_get_dimensions( struct tagMSIVIEW *view, UINT *rows, UINT *cols )
180 {
181     MSIALTERVIEW *av = (MSIALTERVIEW*)view;
182
183     TRACE("%p %p %p\n", av, rows, cols );
184
185     return ERROR_FUNCTION_FAILED;
186 }
187
188 static UINT ALTER_get_column_info( struct tagMSIVIEW *view,
189                 UINT n, LPWSTR *name, UINT *type, BOOL *temporary,
190                 LPWSTR *table_name)
191 {
192     MSIALTERVIEW *av = (MSIALTERVIEW*)view;
193
194     TRACE("%p %d %p %p %p %p\n", av, n, name, type, temporary, table_name );
195
196     return ERROR_FUNCTION_FAILED;
197 }
198
199 static UINT ALTER_modify( struct tagMSIVIEW *view, MSIMODIFY eModifyMode,
200                           MSIRECORD *rec, UINT row )
201 {
202     MSIALTERVIEW *av = (MSIALTERVIEW*)view;
203
204     TRACE("%p %d %p\n", av, eModifyMode, rec );
205
206     return ERROR_FUNCTION_FAILED;
207 }
208
209 static UINT ALTER_delete( struct tagMSIVIEW *view )
210 {
211     MSIALTERVIEW *av = (MSIALTERVIEW*)view;
212
213     TRACE("%p\n", av );
214     if (av->table)
215         av->table->ops->delete( av->table );
216     msi_free( av );
217
218     return ERROR_SUCCESS;
219 }
220
221 static UINT ALTER_find_matching_rows( struct tagMSIVIEW *view, UINT col,
222     UINT val, UINT *row, MSIITERHANDLE *handle )
223 {
224     TRACE("%p, %d, %u, %p\n", view, col, val, *handle);
225
226     return ERROR_FUNCTION_FAILED;
227 }
228
229 static const MSIVIEWOPS alter_ops =
230 {
231     ALTER_fetch_int,
232     ALTER_fetch_stream,
233     ALTER_get_row,
234     NULL,
235     NULL,
236     NULL,
237     ALTER_execute,
238     ALTER_close,
239     ALTER_get_dimensions,
240     ALTER_get_column_info,
241     ALTER_modify,
242     ALTER_delete,
243     ALTER_find_matching_rows,
244     NULL,
245     NULL,
246     NULL,
247     NULL,
248     NULL,
249     NULL,
250 };
251
252 UINT ALTER_CreateView( MSIDATABASE *db, MSIVIEW **view, LPCWSTR name, column_info *colinfo, int hold )
253 {
254     MSIALTERVIEW *av;
255     UINT r;
256
257     TRACE("%p %p %s %d\n", view, colinfo, debugstr_w(name), hold );
258
259     av = msi_alloc_zero( sizeof *av );
260     if( !av )
261         return ERROR_FUNCTION_FAILED;
262
263     r = TABLE_CreateView( db, name, &av->table );
264     if (r != ERROR_SUCCESS)
265     {
266         msi_free( av );
267         return r;
268     }
269
270     if (colinfo)
271         colinfo->table = name;
272
273     /* fill the structure */
274     av->view.ops = &alter_ops;
275     av->db = db;
276     av->hold = hold;
277     av->colinfo = colinfo;
278
279     *view = &av->view;
280
281     return ERROR_SUCCESS;
282 }