hlink: Added HlinkGetSpecialReference implementation.
[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         return ERROR_BAD_QUERY_SYNTAX;
129
130     r = MSI_OpenQuery(av->db, &view, query, av->colinfo->table, av->colinfo->column);
131     if (r == ERROR_SUCCESS)
132     {
133         r = MSI_IterateRecords(view, NULL, ITERATE_columns, &colnum);
134         msiobj_release(&view->hdr);
135     }
136
137     r = columns->ops->add_column(columns, av->colinfo->table,
138                                  colnum, av->colinfo->column,
139                                  av->colinfo->type, (av->hold == 1));
140
141     columns->ops->delete(columns);
142     return r;
143 }
144
145 static UINT ALTER_execute( struct tagMSIVIEW *view, MSIRECORD *record )
146 {
147     MSIALTERVIEW *av = (MSIALTERVIEW*)view;
148     UINT ref;
149
150     TRACE("%p %p\n", av, record);
151
152     if (av->hold == 1)
153         av->table->ops->add_ref(av->table);
154     else if (av->hold == -1)
155     {
156         ref = av->table->ops->release(av->table);
157         if (ref == 0)
158             av->table = NULL;
159     }
160
161     if (av->colinfo)
162         return alter_add_column(av);
163
164     return ERROR_SUCCESS;
165 }
166
167 static UINT ALTER_close( struct tagMSIVIEW *view )
168 {
169     MSIALTERVIEW *av = (MSIALTERVIEW*)view;
170
171     TRACE("%p\n", av );
172
173     return ERROR_SUCCESS;
174 }
175
176 static UINT ALTER_get_dimensions( struct tagMSIVIEW *view, UINT *rows, UINT *cols )
177 {
178     MSIALTERVIEW *av = (MSIALTERVIEW*)view;
179
180     TRACE("%p %p %p\n", av, rows, cols );
181
182     return ERROR_FUNCTION_FAILED;
183 }
184
185 static UINT ALTER_get_column_info( struct tagMSIVIEW *view,
186                 UINT n, LPWSTR *name, UINT *type )
187 {
188     MSIALTERVIEW *av = (MSIALTERVIEW*)view;
189
190     TRACE("%p %d %p %p\n", av, n, name, type );
191
192     return ERROR_FUNCTION_FAILED;
193 }
194
195 static UINT ALTER_modify( struct tagMSIVIEW *view, MSIMODIFY eModifyMode,
196                           MSIRECORD *rec, UINT row )
197 {
198     MSIALTERVIEW *av = (MSIALTERVIEW*)view;
199
200     TRACE("%p %d %p\n", av, eModifyMode, rec );
201
202     return ERROR_FUNCTION_FAILED;
203 }
204
205 static UINT ALTER_delete( struct tagMSIVIEW *view )
206 {
207     MSIALTERVIEW *av = (MSIALTERVIEW*)view;
208
209     TRACE("%p\n", av );
210     if (av->table)
211         av->table->ops->delete( av->table );
212     msi_free( av );
213
214     return ERROR_SUCCESS;
215 }
216
217 static UINT ALTER_find_matching_rows( struct tagMSIVIEW *view, UINT col,
218     UINT val, UINT *row, MSIITERHANDLE *handle )
219 {
220     TRACE("%p, %d, %u, %p\n", view, col, val, *handle);
221
222     return ERROR_FUNCTION_FAILED;
223 }
224
225 static const MSIVIEWOPS alter_ops =
226 {
227     ALTER_fetch_int,
228     ALTER_fetch_stream,
229     ALTER_get_row,
230     NULL,
231     NULL,
232     NULL,
233     ALTER_execute,
234     ALTER_close,
235     ALTER_get_dimensions,
236     ALTER_get_column_info,
237     ALTER_modify,
238     ALTER_delete,
239     ALTER_find_matching_rows,
240     NULL,
241     NULL,
242     NULL,
243     NULL,
244 };
245
246 UINT ALTER_CreateView( MSIDATABASE *db, MSIVIEW **view, LPCWSTR name, column_info *colinfo, int hold )
247 {
248     MSIALTERVIEW *av;
249     UINT r;
250
251     TRACE("%p %p %s %d\n", view, colinfo, debugstr_w(name), hold );
252
253     av = msi_alloc_zero( sizeof *av );
254     if( !av )
255         return ERROR_FUNCTION_FAILED;
256
257     r = TABLE_CreateView( db, name, &av->table );
258     if (r != ERROR_SUCCESS || !av->table)
259         return r;
260
261     if (colinfo)
262         colinfo->table = name;
263
264     /* fill the structure */
265     av->view.ops = &alter_ops;
266     av->db = db;
267     av->hold = hold;
268     av->colinfo = colinfo;
269
270     *view = &av->view;
271
272     return ERROR_SUCCESS;
273 }