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 }