Updated to latest version's exports, and added a few more forwards.
[wine] / dlls / msi / create.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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  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(msi);
37
38
39 /* below is the query interface to a table */
40
41 typedef struct tagMSICREATEVIEW
42 {
43     MSIVIEW          view;
44     MSIDATABASE     *db;
45     LPWSTR           name;
46     BOOL             bIsTemp;
47     create_col_info *col_info;
48 } MSICREATEVIEW;
49
50 static UINT CREATE_fetch_int( struct tagMSIVIEW *view, UINT row, UINT col, UINT *val )
51 {
52     MSICREATEVIEW *cv = (MSICREATEVIEW*)view;
53
54     TRACE("%p %d %d %p\n", cv, row, col, val );
55
56     return ERROR_FUNCTION_FAILED;
57 }
58
59 static UINT CREATE_execute( struct tagMSIVIEW *view, MSIHANDLE record )
60 {
61     MSICREATEVIEW *cv = (MSICREATEVIEW*)view;
62     create_col_info *col;
63     UINT r, nField, row, table_val, column_val;
64     const WCHAR szTables[] =  { '_','T','a','b','l','e','s',0 };
65     const WCHAR szColumns[] = { '_','C','o','l','u','m','n','s',0 };
66     MSIVIEW *tv = NULL;
67
68     TRACE("%p Table %s (%s)\n", cv, debugstr_w(cv->name), 
69           cv->bIsTemp?"temporary":"permanent");
70
71     /* only add tables that don't exist already */
72     if( TABLE_Exists(cv->db, cv->name ) )
73         return ERROR_BAD_QUERY_SYNTAX;
74
75     /* add the name to the _Tables table */
76     table_val = msi_addstringW( cv->db->strings, 0, cv->name, -1, 1 );
77     TRACE("New string %s -> %d\n", debugstr_w( cv->name ), table_val );
78     if( table_val < 0 )
79         return ERROR_FUNCTION_FAILED;
80
81     r = TABLE_CreateView( cv->db, szTables, &tv );
82     TRACE("CreateView returned %x\n", r);
83     if( r )
84         return r;
85
86     r = tv->ops->execute( tv, 0 );
87     TRACE("tv execute returned %x\n", r);
88     if( r )
89         return r;
90
91     row = -1;
92     r = tv->ops->insert_row( tv, &row );
93     TRACE("insert_row returned %x\n", r);
94     if( r )
95         goto err;
96
97     r = tv->ops->set_int( tv, row, 1, table_val );
98     if( r )
99         goto err;
100     tv->ops->delete( tv );
101     tv = NULL;
102
103     /* add each column to the _Columns table */
104     r = TABLE_CreateView( cv->db, szColumns, &tv );
105     if( r )
106         return r;
107
108     r = tv->ops->execute( tv, 0 );
109     TRACE("tv execute returned %x\n", r);
110     if( r )
111         return r;
112
113     /*
114      * need to set the table, column number, col name and type
115      * for each column we enter in the table
116      */
117     nField = 1;
118     for( col = cv->col_info; col; col = col->next )
119     {
120         row = -1;
121         r = tv->ops->insert_row( tv, &row );
122         if( r )
123             goto err;
124
125         column_val = msi_addstringW( cv->db->strings, 0, col->colname, -1, 1 );
126         TRACE("New string %s -> %d\n", debugstr_w( col->colname ), column_val );
127         if( column_val < 0 )
128             break;
129
130         r = tv->ops->set_int( tv, row, 1, table_val );
131         if( r )
132             break;
133
134         r = tv->ops->set_int( tv, row, 2, 0x8000|nField );
135         if( r )
136             break;
137
138         r = tv->ops->set_int( tv, row, 3, column_val );
139         if( r )
140             break;
141
142         r = tv->ops->set_int( tv, row, 4, 0x8000|col->type );
143         if( r )
144             break;
145     }
146     if( !col )
147         r = ERROR_SUCCESS;
148
149 err:
150     /* FIXME: remove values from the string table on error */
151     if( tv )
152         tv->ops->delete( tv );
153     return r;
154 }
155
156 static UINT CREATE_close( struct tagMSIVIEW *view )
157 {
158     MSICREATEVIEW *cv = (MSICREATEVIEW*)view;
159
160     TRACE("%p\n", cv);
161
162     return ERROR_SUCCESS;
163 }
164
165 static UINT CREATE_get_dimensions( struct tagMSIVIEW *view, UINT *rows, UINT *cols )
166 {
167     MSICREATEVIEW *cv = (MSICREATEVIEW*)view;
168
169     TRACE("%p %p %p\n", cv, rows, cols );
170
171     return ERROR_FUNCTION_FAILED;
172 }
173
174 static UINT CREATE_get_column_info( struct tagMSIVIEW *view,
175                 UINT n, LPWSTR *name, UINT *type )
176 {
177     MSICREATEVIEW *cv = (MSICREATEVIEW*)view;
178
179     TRACE("%p %d %p %p\n", cv, n, name, type );
180
181     return ERROR_FUNCTION_FAILED;
182 }
183
184 static UINT CREATE_modify( struct tagMSIVIEW *view, MSIMODIFY eModifyMode, MSIHANDLE hrec)
185 {
186     MSICREATEVIEW *cv = (MSICREATEVIEW*)view;
187
188     TRACE("%p %d %ld\n", cv, eModifyMode, hrec );
189
190     return ERROR_FUNCTION_FAILED;
191 }
192
193 static UINT CREATE_delete( struct tagMSIVIEW *view )
194 {
195     MSICREATEVIEW *cv = (MSICREATEVIEW*)view;
196     create_col_info *col;
197
198     TRACE("%p\n", cv );
199
200     col = cv->col_info; 
201     while( col )
202     {
203         create_col_info *t = col;
204         col = col->next;
205         HeapFree( GetProcessHeap(), 0, t->colname );
206         HeapFree( GetProcessHeap(), 0, t );
207     }
208     HeapFree( GetProcessHeap(), 0, cv->name );
209     HeapFree( GetProcessHeap(), 0, cv );
210
211     return ERROR_SUCCESS;
212 }
213
214
215 MSIVIEWOPS create_ops =
216 {
217     CREATE_fetch_int,
218     NULL,
219     NULL,
220     CREATE_execute,
221     CREATE_close,
222     CREATE_get_dimensions,
223     CREATE_get_column_info,
224     CREATE_modify,
225     CREATE_delete
226 };
227
228 UINT CREATE_CreateView( MSIDATABASE *db, MSIVIEW **view, LPWSTR table,
229                         create_col_info *col_info, BOOL temp )
230 {
231     MSICREATEVIEW *cv = NULL;
232
233     TRACE("%p\n", cv );
234
235     cv = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof *cv );
236     if( !cv )
237         return ERROR_FUNCTION_FAILED;
238     
239     /* fill the structure */
240     cv->view.ops = &create_ops;
241     cv->db = db;
242     cv->name = table;  /* FIXME: strdupW it? */
243     cv->col_info = col_info;
244     cv->bIsTemp = temp;
245     *view = (MSIVIEW*) cv;
246
247     return ERROR_SUCCESS;
248 }