msi: Make WHEREVIEW able to deal directly with multiple tables.

This commit is contained in:
Bernhard Loos 2011-08-26 04:53:34 +02:00 committed by Alexandre Julliard
parent 9b79fd5777
commit a52c2bf941
5 changed files with 480 additions and 213 deletions

View File

@ -68,10 +68,19 @@ struct complex_expr
struct expr *right; struct expr *right;
}; };
struct ext_column struct tagJOINTABLE;
union ext_column
{
struct
{ {
LPCWSTR column; LPCWSTR column;
LPCWSTR table; LPCWSTR table;
} unparsed;
struct
{
UINT column;
struct tagJOINTABLE *table;
} parsed;
}; };
struct expr struct expr
@ -83,8 +92,7 @@ struct expr
INT ival; INT ival;
UINT uval; UINT uval;
LPCWSTR sval; LPCWSTR sval;
struct ext_column column; union ext_column column;
UINT col_number;
} u; } u;
}; };
@ -101,7 +109,7 @@ UINT DISTINCT_CreateView( MSIDATABASE *db, MSIVIEW **view, MSIVIEW *table ) DECL
UINT ORDER_CreateView( MSIDATABASE *db, MSIVIEW **view, MSIVIEW *table, UINT ORDER_CreateView( MSIDATABASE *db, MSIVIEW **view, MSIVIEW *table,
column_info *columns ) DECLSPEC_HIDDEN; column_info *columns ) DECLSPEC_HIDDEN;
UINT WHERE_CreateView( MSIDATABASE *db, MSIVIEW **view, MSIVIEW *table, UINT WHERE_CreateView( MSIDATABASE *db, MSIVIEW **view, LPWSTR tables,
struct expr *cond ) DECLSPEC_HIDDEN; struct expr *cond ) DECLSPEC_HIDDEN;
UINT CREATE_CreateView( MSIDATABASE *db, MSIVIEW **view, LPCWSTR table, UINT CREATE_CreateView( MSIDATABASE *db, MSIVIEW **view, LPCWSTR table,
@ -110,7 +118,7 @@ UINT CREATE_CreateView( MSIDATABASE *db, MSIVIEW **view, LPCWSTR table,
UINT INSERT_CreateView( MSIDATABASE *db, MSIVIEW **view, LPCWSTR table, UINT INSERT_CreateView( MSIDATABASE *db, MSIVIEW **view, LPCWSTR table,
column_info *columns, column_info *values, BOOL temp ) DECLSPEC_HIDDEN; column_info *columns, column_info *values, BOOL temp ) DECLSPEC_HIDDEN;
UINT UPDATE_CreateView( MSIDATABASE *db, MSIVIEW **view, LPCWSTR table, UINT UPDATE_CreateView( MSIDATABASE *db, MSIVIEW **view, LPWSTR table,
column_info *list, struct expr *expr ) DECLSPEC_HIDDEN; column_info *list, struct expr *expr ) DECLSPEC_HIDDEN;
UINT DELETE_CreateView( MSIDATABASE *db, MSIVIEW **view, MSIVIEW *table ) DECLSPEC_HIDDEN; UINT DELETE_CreateView( MSIDATABASE *db, MSIVIEW **view, MSIVIEW *table ) DECLSPEC_HIDDEN;

View File

@ -478,13 +478,13 @@ selcollist:
from: from:
fromtable fromtable
| fromtable TK_WHERE expr | TK_FROM tablelist TK_WHERE expr
{ {
SQL_input* sql = (SQL_input*) info; SQL_input* sql = (SQL_input*) info;
MSIVIEW* where = NULL; MSIVIEW* where = NULL;
UINT r; UINT r;
r = WHERE_CreateView( sql->db, &where, $1, $3 ); r = WHERE_CreateView( sql->db, &where, $2, $4 );
if( r != ERROR_SUCCESS ) if( r != ERROR_SUCCESS )
YYABORT; YYABORT;
@ -877,8 +877,8 @@ static struct expr * EXPR_column( void *info, const column_info *column )
if( e ) if( e )
{ {
e->type = EXPR_COLUMN; e->type = EXPR_COLUMN;
e->u.column.column = column->column; e->u.column.unparsed.column = column->column;
e->u.column.table = column->table; e->u.column.unparsed.table = column->table;
} }
return e; return e;
} }

View File

@ -3895,7 +3895,7 @@ static void test_join(void)
/* primary key cannot be updated */ /* primary key cannot be updated */
r = MsiViewModify(hview, MSIMODIFY_UPDATE, hrec); r = MsiViewModify(hview, MSIMODIFY_UPDATE, hrec);
todo_wine ok( r == ERROR_FUNCTION_FAILED, "failed to update row: %d\n", r ); ok( r == ERROR_FUNCTION_FAILED, "failed to update row: %d\n", r );
MsiCloseHandle(hrec); MsiCloseHandle(hrec);
MsiViewClose(hview); MsiViewClose(hview);

View File

@ -225,31 +225,22 @@ static const MSIVIEWOPS update_ops =
NULL, NULL,
}; };
UINT UPDATE_CreateView( MSIDATABASE *db, MSIVIEW **view, LPCWSTR table, UINT UPDATE_CreateView( MSIDATABASE *db, MSIVIEW **view, LPWSTR table,
column_info *columns, struct expr *expr ) column_info *columns, struct expr *expr )
{ {
MSIUPDATEVIEW *uv = NULL; MSIUPDATEVIEW *uv = NULL;
UINT r; UINT r;
MSIVIEW *tv = NULL, *sv = NULL, *wv = NULL; MSIVIEW *sv = NULL, *wv = NULL;
TRACE("%p\n", uv ); TRACE("%p\n", uv );
r = TABLE_CreateView( db, table, &tv );
if( r != ERROR_SUCCESS )
return r;
if (expr) if (expr)
{ r = WHERE_CreateView( db, &wv, table, expr );
/* add conditions first */
r = WHERE_CreateView( db, &wv, tv, expr );
if( r != ERROR_SUCCESS )
{
tv->ops->delete( tv );
return r;
}
}
else else
wv = tv; r = TABLE_CreateView( db, table, &wv );
if( r != ERROR_SUCCESS )
return r;
/* then select the columns we want */ /* then select the columns we want */
r = SELECT_CreateView( db, &sv, wv, columns ); r = SELECT_CreateView( db, &sv, wv, columns );

View File

@ -19,6 +19,7 @@
*/ */
#include <stdarg.h> #include <stdarg.h>
#include <assert.h>
#include "windef.h" #include "windef.h"
#include "winbase.h" #include "winbase.h"
@ -36,19 +37,30 @@
WINE_DEFAULT_DEBUG_CHANNEL(msidb); WINE_DEFAULT_DEBUG_CHANNEL(msidb);
/* below is the query interface to a table */
typedef struct tagMSIROWENTRY typedef struct tagMSIROWENTRY
{ {
UINT value; UINT values[1];
} MSIROWENTRY; } MSIROWENTRY;
/* below is the query interface to a table */ typedef struct tagJOINTABLE
{
struct tagJOINTABLE *next;
MSIVIEW *view;
UINT col_count;
UINT row_count;
UINT table_index;
} JOINTABLE;
typedef struct tagMSIWHEREVIEW typedef struct tagMSIWHEREVIEW
{ {
MSIVIEW view; MSIVIEW view;
MSIDATABASE *db; MSIDATABASE *db;
MSIVIEW *table; JOINTABLE *tables;
UINT row_count; UINT row_count;
UINT col_count;
UINT table_count;
MSIROWENTRY **reorder; MSIROWENTRY **reorder;
UINT reorder_size; /* number of entries available in reorder */ UINT reorder_size; /* number of entries available in reorder */
struct expr *cond; struct expr *cond;
@ -89,20 +101,17 @@ static void free_reorder(MSIWHEREVIEW *wv)
wv->row_count = 0; wv->row_count = 0;
} }
static inline UINT find_row(MSIWHEREVIEW *wv, UINT row, UINT *value) static inline UINT find_row(MSIWHEREVIEW *wv, UINT row, UINT *(values[]))
{ {
if (row >= wv->row_count) if (row >= wv->row_count)
{
*value = -2;
return ERROR_NO_MORE_ITEMS; return ERROR_NO_MORE_ITEMS;
}
*value = wv->reorder[row]->value; *values = wv->reorder[row]->values;
return ERROR_SUCCESS; return ERROR_SUCCESS;
} }
static UINT add_row(MSIWHEREVIEW *wv, UINT val) static UINT add_row(MSIWHEREVIEW *wv, UINT vals[])
{ {
MSIROWENTRY *new; MSIROWENTRY *new;
@ -119,101 +128,204 @@ static UINT add_row(MSIWHEREVIEW *wv, UINT val)
wv->reorder_size = newsize; wv->reorder_size = newsize;
} }
new = msi_alloc(sizeof(MSIROWENTRY)); new = msi_alloc(FIELD_OFFSET( MSIROWENTRY, values[wv->table_count] ));
if (!new) if (!new)
return ERROR_OUTOFMEMORY; return ERROR_OUTOFMEMORY;
wv->reorder[wv->row_count++] = new; wv->reorder[wv->row_count++] = new;
new->value = val; memcpy(new->values, vals, wv->table_count * sizeof(UINT));
return ERROR_SUCCESS; return ERROR_SUCCESS;
} }
JOINTABLE *find_table(MSIWHEREVIEW *wv, UINT col, UINT *table_col)
{
JOINTABLE *table = wv->tables;
if(col == 0 || col > wv->col_count)
return NULL;
while (col > table->col_count)
{
col -= table->col_count;
table = table->next;
assert(table);
}
*table_col = col;
return table;
}
static UINT parse_column(MSIWHEREVIEW *wv, union ext_column *column,
UINT *column_type)
{
JOINTABLE *table = wv->tables;
UINT i, r;
do
{
LPCWSTR table_name;
if (column->unparsed.table)
{
r = table->view->ops->get_column_info(table->view, 1, NULL, NULL,
NULL, &table_name);
if (r != ERROR_SUCCESS)
return r;
if (strcmpW(table_name, column->unparsed.table) != 0)
continue;
}
for(i = 1; i <= table->col_count; i++)
{
LPCWSTR col_name;
r = table->view->ops->get_column_info(table->view, i, &col_name, column_type,
NULL, NULL);
if(r != ERROR_SUCCESS )
return r;
if(strcmpW(col_name, column->unparsed.column))
continue;
column->parsed.column = i;
column->parsed.table = table;
return ERROR_SUCCESS;
break;
}
}
while ((table = table->next));
WARN("Couldn't find column %s.%s\n", debugstr_w( column->unparsed.table ), debugstr_w( column->unparsed.column ) );
return ERROR_BAD_QUERY_SYNTAX;
}
static UINT WHERE_fetch_int( struct tagMSIVIEW *view, UINT row, UINT col, UINT *val ) static UINT WHERE_fetch_int( struct tagMSIVIEW *view, UINT row, UINT col, UINT *val )
{ {
MSIWHEREVIEW *wv = (MSIWHEREVIEW*)view; MSIWHEREVIEW *wv = (MSIWHEREVIEW*)view;
JOINTABLE *table;
UINT *rows;
UINT r; UINT r;
TRACE("%p %d %d %p\n", wv, row, col, val ); TRACE("%p %d %d %p\n", wv, row, col, val );
if( !wv->table ) if( !wv->tables )
return ERROR_FUNCTION_FAILED; return ERROR_FUNCTION_FAILED;
r = find_row(wv, row, &row); r = find_row(wv, row, &rows);
if (r != ERROR_SUCCESS) if (r != ERROR_SUCCESS)
return r; return r;
return wv->table->ops->fetch_int( wv->table, row, col, val ); table = find_table(wv, col, &col);
if (!table)
return ERROR_FUNCTION_FAILED;
return table->view->ops->fetch_int(table->view, rows[table->table_index], col, val);
} }
static UINT WHERE_fetch_stream( struct tagMSIVIEW *view, UINT row, UINT col, IStream **stm ) static UINT WHERE_fetch_stream( struct tagMSIVIEW *view, UINT row, UINT col, IStream **stm )
{ {
MSIWHEREVIEW *wv = (MSIWHEREVIEW*)view; MSIWHEREVIEW *wv = (MSIWHEREVIEW*)view;
JOINTABLE *table;
UINT *rows;
UINT r; UINT r;
TRACE("%p %d %d %p\n", wv, row, col, stm ); TRACE("%p %d %d %p\n", wv, row, col, stm );
if( !wv->table ) if( !wv->tables )
return ERROR_FUNCTION_FAILED; return ERROR_FUNCTION_FAILED;
r = find_row(wv, row, &row); r = find_row(wv, row, &rows);
if (r != ERROR_SUCCESS) if (r != ERROR_SUCCESS)
return r; return r;
return wv->table->ops->fetch_stream( wv->table, row, col, stm ); table = find_table(wv, col, &col);
if (!table)
return ERROR_FUNCTION_FAILED;
return table->view->ops->fetch_stream( table->view, rows[table->table_index], col, stm );
} }
static UINT WHERE_get_row( struct tagMSIVIEW *view, UINT row, MSIRECORD **rec ) static UINT WHERE_get_row( struct tagMSIVIEW *view, UINT row, MSIRECORD **rec )
{ {
MSIWHEREVIEW *wv = (MSIWHEREVIEW *)view; MSIWHEREVIEW *wv = (MSIWHEREVIEW *)view;
UINT r;
TRACE("%p %d %p\n", wv, row, rec ); TRACE("%p %d %p\n", wv, row, rec );
if (!wv->table) if (!wv->tables)
return ERROR_FUNCTION_FAILED; return ERROR_FUNCTION_FAILED;
r = find_row(wv, row, &row); return msi_view_get_row( wv->db, view, row, rec );
if (r != ERROR_SUCCESS)
return r;
return wv->table->ops->get_row(wv->table, row, rec);
} }
static UINT WHERE_set_row( struct tagMSIVIEW *view, UINT row, MSIRECORD *rec, UINT mask ) static UINT WHERE_set_row( struct tagMSIVIEW *view, UINT row, MSIRECORD *rec, UINT mask )
{ {
MSIWHEREVIEW *wv = (MSIWHEREVIEW*)view; MSIWHEREVIEW *wv = (MSIWHEREVIEW*)view;
UINT r; UINT r, offset = 0, reduced_mask = 0;
JOINTABLE *table = wv->tables;
UINT *rows;
TRACE("%p %d %p %08x\n", wv, row, rec, mask ); TRACE("%p %d %p %08x\n", wv, row, rec, mask );
if( !wv->table ) if( !wv->tables )
return ERROR_FUNCTION_FAILED; return ERROR_FUNCTION_FAILED;
r = find_row(wv, row, &row); r = find_row(wv, row, &rows);
if (r != ERROR_SUCCESS) if (r != ERROR_SUCCESS)
return r; return r;
return wv->table->ops->set_row( wv->table, row, rec, mask ); if(mask >= 1 << wv->col_count)
return ERROR_INVALID_PARAMETER;
do
{
const UINT col_count = table->col_count;
UINT i;
MSIRECORD *reduced;
reduced = MSI_CreateRecord(col_count);
if (!reduced)
return ERROR_FUNCTION_FAILED;
for (i = 0; i < col_count; i++)
{
r = MSI_RecordCopyField(rec, i + offset + 1, reduced, i + 1);
if (r != ERROR_SUCCESS)
break;
}
offset += col_count;
reduced_mask = mask >> (wv->col_count - offset) & ((1 << col_count) - 1);
if (r == ERROR_SUCCESS)
r = table->view->ops->set_row(table->view, rows[table->table_index], reduced, reduced_mask);
msiobj_release(&reduced->hdr);
}
while ((table = table->next));
return r;
} }
static UINT WHERE_delete_row(struct tagMSIVIEW *view, UINT row) static UINT WHERE_delete_row(struct tagMSIVIEW *view, UINT row)
{ {
MSIWHEREVIEW *wv = (MSIWHEREVIEW *)view; MSIWHEREVIEW *wv = (MSIWHEREVIEW *)view;
UINT r; UINT r;
UINT *rows;
TRACE("(%p %d)\n", view, row); TRACE("(%p %d)\n", view, row);
if ( !wv->table ) if (!wv->tables)
return ERROR_FUNCTION_FAILED; return ERROR_FUNCTION_FAILED;
r = find_row( wv, row, &row ); r = find_row(wv, row, &rows);
if ( r != ERROR_SUCCESS ) if ( r != ERROR_SUCCESS )
return r; return r;
return wv->table->ops->delete_row( wv->table, row ); if (wv->table_count > 1)
return ERROR_CALL_NOT_IMPLEMENTED;
return wv->tables->view->ops->delete_row(wv->tables->view, rows[0]);
} }
static INT INT_evaluate_binary( INT lval, UINT op, INT rval ) static INT INT_evaluate_binary( INT lval, UINT op, INT rval )
@ -242,6 +354,15 @@ static INT INT_evaluate_binary( INT lval, UINT op, INT rval )
return 0; return 0;
} }
static inline UINT expr_fetch_value(const union ext_column *expr, const UINT rows[], UINT *val)
{
JOINTABLE *table = expr->parsed.table;
return table->view->ops->fetch_int(table->view, rows[table->table_index],
expr->parsed.column, val);
}
static INT INT_evaluate_unary( INT lval, UINT op ) static INT INT_evaluate_unary( INT lval, UINT op )
{ {
switch( op ) switch( op )
@ -256,7 +377,7 @@ static INT INT_evaluate_unary( INT lval, UINT op )
return 0; return 0;
} }
static const WCHAR *STRING_evaluate( MSIWHEREVIEW *wv, UINT row, static const WCHAR *STRING_evaluate( MSIWHEREVIEW *wv, const UINT rows[],
const struct expr *expr, const struct expr *expr,
const MSIRECORD *record ) const MSIRECORD *record )
{ {
@ -265,7 +386,7 @@ static const WCHAR *STRING_evaluate( MSIWHEREVIEW *wv, UINT row,
switch( expr->type ) switch( expr->type )
{ {
case EXPR_COL_NUMBER_STRING: case EXPR_COL_NUMBER_STRING:
r = wv->table->ops->fetch_int( wv->table, row, expr->u.col_number, &val ); r = expr_fetch_value(&expr->u.column, rows, &val);
if( r != ERROR_SUCCESS ) if( r != ERROR_SUCCESS )
return NULL; return NULL;
return msi_string_lookup_id( wv->db->strings, val ); return msi_string_lookup_id( wv->db->strings, val );
@ -283,14 +404,14 @@ static const WCHAR *STRING_evaluate( MSIWHEREVIEW *wv, UINT row,
return NULL; return NULL;
} }
static UINT STRCMP_Evaluate( MSIWHEREVIEW *wv, UINT row, const struct expr *cond, static UINT STRCMP_Evaluate( MSIWHEREVIEW *wv, const UINT rows[], const struct expr *cond,
INT *val, const MSIRECORD *record ) INT *val, const MSIRECORD *record )
{ {
int sr; int sr;
const WCHAR *l_str, *r_str; const WCHAR *l_str, *r_str;
l_str = STRING_evaluate( wv, row, cond->u.expr.left, record ); l_str = STRING_evaluate( wv, rows, cond->u.expr.left, record );
r_str = STRING_evaluate( wv, row, cond->u.expr.right, record ); r_str = STRING_evaluate( wv, rows, cond->u.expr.right, record );
if( l_str == r_str || if( l_str == r_str ||
((!l_str || !*l_str) && (!r_str || !*r_str)) ) ((!l_str || !*l_str) && (!r_str || !*r_str)) )
sr = 0; sr = 0;
@ -307,26 +428,29 @@ static UINT STRCMP_Evaluate( MSIWHEREVIEW *wv, UINT row, const struct expr *cond
return ERROR_SUCCESS; return ERROR_SUCCESS;
} }
static UINT WHERE_evaluate( MSIWHEREVIEW *wv, UINT row, static UINT WHERE_evaluate( MSIWHEREVIEW *wv, const UINT rows[],
struct expr *cond, INT *val, MSIRECORD *record ) struct expr *cond, INT *val, MSIRECORD *record )
{ {
UINT r, tval; UINT r, tval;
INT lval, rval; INT lval, rval;
if( !cond ) if( !cond )
{
*val = TRUE;
return ERROR_SUCCESS; return ERROR_SUCCESS;
}
switch( cond->type ) switch( cond->type )
{ {
case EXPR_COL_NUMBER: case EXPR_COL_NUMBER:
r = wv->table->ops->fetch_int( wv->table, row, cond->u.col_number, &tval ); r = expr_fetch_value(&cond->u.column, rows, &tval);
if( r != ERROR_SUCCESS ) if( r != ERROR_SUCCESS )
return r; return r;
*val = tval - 0x8000; *val = tval - 0x8000;
return ERROR_SUCCESS; return ERROR_SUCCESS;
case EXPR_COL_NUMBER32: case EXPR_COL_NUMBER32:
r = wv->table->ops->fetch_int( wv->table, row, cond->u.col_number, &tval ); r = expr_fetch_value(&cond->u.column, rows, &tval);
if( r != ERROR_SUCCESS ) if( r != ERROR_SUCCESS )
return r; return r;
*val = tval - 0x80000000; *val = tval - 0x80000000;
@ -337,24 +461,24 @@ static UINT WHERE_evaluate( MSIWHEREVIEW *wv, UINT row,
return ERROR_SUCCESS; return ERROR_SUCCESS;
case EXPR_COMPLEX: case EXPR_COMPLEX:
r = WHERE_evaluate( wv, row, cond->u.expr.left, &lval, record ); r = WHERE_evaluate( wv, rows, cond->u.expr.left, &lval, record );
if( r != ERROR_SUCCESS ) if( r != ERROR_SUCCESS )
return r; return r;
r = WHERE_evaluate( wv, row, cond->u.expr.right, &rval, record ); r = WHERE_evaluate( wv, rows, cond->u.expr.right, &rval, record );
if( r != ERROR_SUCCESS ) if( r != ERROR_SUCCESS )
return r; return r;
*val = INT_evaluate_binary( lval, cond->u.expr.op, rval ); *val = INT_evaluate_binary( lval, cond->u.expr.op, rval );
return ERROR_SUCCESS; return ERROR_SUCCESS;
case EXPR_UNARY: case EXPR_UNARY:
r = wv->table->ops->fetch_int( wv->table, row, cond->u.expr.left->u.col_number, &tval ); r = expr_fetch_value(&cond->u.expr.left->u.column, rows, &tval);
if( r != ERROR_SUCCESS ) if( r != ERROR_SUCCESS )
return r; return r;
*val = INT_evaluate_unary( tval, cond->u.expr.op ); *val = INT_evaluate_unary( tval, cond->u.expr.op );
return ERROR_SUCCESS; return ERROR_SUCCESS;
case EXPR_STRCMP: case EXPR_STRCMP:
return STRCMP_Evaluate( wv, row, cond, val, record ); return STRCMP_Evaluate( wv, rows, cond, val, record );
case EXPR_WILDCARD: case EXPR_WILDCARD:
*val = MSI_RecordGetInteger( record, ++wv->rec_index ); *val = MSI_RecordGetInteger( record, ++wv->rec_index );
@ -368,102 +492,88 @@ static UINT WHERE_evaluate( MSIWHEREVIEW *wv, UINT row,
return ERROR_SUCCESS; return ERROR_SUCCESS;
} }
static UINT check_condition( MSIWHEREVIEW *wv, MSIRECORD *record, JOINTABLE *table,
UINT table_rows[] )
{
UINT r = ERROR_FUNCTION_FAILED;
INT val;
for (table_rows[table->table_index] = 0; table_rows[table->table_index] < table->row_count;
table_rows[table->table_index]++)
{
if (table->next)
{
r = check_condition(wv, record, table->next, table_rows);
if(r != ERROR_SUCCESS)
break;
}
else
{
val = 0;
wv->rec_index = 0;
r = WHERE_evaluate (wv, table_rows, wv->cond, &val, record);
if(r != ERROR_SUCCESS)
break;
if (!val)
continue;
add_row(wv, table_rows);
}
}
return r;
}
static UINT WHERE_execute( struct tagMSIVIEW *view, MSIRECORD *record ) static UINT WHERE_execute( struct tagMSIVIEW *view, MSIRECORD *record )
{ {
MSIWHEREVIEW *wv = (MSIWHEREVIEW*)view; MSIWHEREVIEW *wv = (MSIWHEREVIEW*)view;
UINT count = 0, r, i; UINT r;
INT val; JOINTABLE *table = wv->tables;
MSIVIEW *table = wv->table; UINT rows[wv->table_count];
TRACE("%p %p\n", wv, record); TRACE("%p %p\n", wv, record);
if( !table ) if( !table )
return ERROR_FUNCTION_FAILED; return ERROR_FUNCTION_FAILED;
r = table->ops->execute( table, record );
if( r != ERROR_SUCCESS )
return r;
r = table->ops->get_dimensions( table, &count, NULL );
if( r != ERROR_SUCCESS )
return r;
r = init_reorder(wv); r = init_reorder(wv);
if (r != ERROR_SUCCESS) if (r != ERROR_SUCCESS)
return r; return r;
if (0) /* disable optimization, there's no guarantee that strings are in the string table */
{
if (wv->cond->type == EXPR_STRCMP)
{
MSIITERHANDLE handle = NULL;
UINT row, value, col;
struct expr *col_cond = wv->cond->u.expr.left;
struct expr *val_cond = wv->cond->u.expr.right;
/* swap conditionals */
if (col_cond->type != EXPR_COL_NUMBER_STRING)
{
val_cond = wv->cond->u.expr.left;
col_cond = wv->cond->u.expr.right;
}
if ((col_cond->type == EXPR_COL_NUMBER_STRING) && (val_cond->type == EXPR_SVAL))
{
col = col_cond->u.col_number;
/* special case for "" - translate it into nil */
if (!val_cond->u.sval[0])
value = 0;
else
{
r = msi_string2idW(wv->db->strings, val_cond->u.sval, &value);
if (r != ERROR_SUCCESS)
{
TRACE("no id for %s, assuming it doesn't exist in the table\n", debugstr_w(wv->cond->u.expr.right->u.sval));
return ERROR_SUCCESS;
}
}
do do
{ {
r = table->ops->find_matching_rows(table, col, value, &row, &handle); table->view->ops->execute(table->view, NULL);
if (r == ERROR_SUCCESS)
add_row(wv, row);
} while (r == ERROR_SUCCESS);
if (r == ERROR_NO_MORE_ITEMS) r = table->view->ops->get_dimensions(table->view, &table->row_count, NULL);
return ERROR_SUCCESS;
else
return r;
}
/* else fallback to slow case */
}
}
for( i=0; i<count; i++ )
{
val = 0;
wv->rec_index = 0;
r = WHERE_evaluate( wv, i, wv->cond, &val, record );
if (r != ERROR_SUCCESS) if (r != ERROR_SUCCESS)
{
ERR("failed to get table dimensions\n");
return r; return r;
if( val )
add_row( wv, i );
} }
/* each table must have at least one row */
if (table->row_count == 0)
return ERROR_SUCCESS; return ERROR_SUCCESS;
} }
while ((table = table->next));
r = check_condition(wv, record, wv->tables, rows);
return r;
}
static UINT WHERE_close( struct tagMSIVIEW *view ) static UINT WHERE_close( struct tagMSIVIEW *view )
{ {
MSIWHEREVIEW *wv = (MSIWHEREVIEW*)view; MSIWHEREVIEW *wv = (MSIWHEREVIEW*)view;
JOINTABLE *table = wv->tables;
TRACE("%p\n", wv ); TRACE("%p\n", wv );
if( !wv->table ) if (!table)
return ERROR_FUNCTION_FAILED; return ERROR_FUNCTION_FAILED;
return wv->table->ops->close( wv->table ); do
table->view->ops->close(table->view);
while ((table = table->next));
return ERROR_SUCCESS;
} }
static UINT WHERE_get_dimensions( struct tagMSIVIEW *view, UINT *rows, UINT *cols ) static UINT WHERE_get_dimensions( struct tagMSIVIEW *view, UINT *rows, UINT *cols )
@ -472,7 +582,7 @@ static UINT WHERE_get_dimensions( struct tagMSIVIEW *view, UINT *rows, UINT *col
TRACE("%p %p %p\n", wv, rows, cols ); TRACE("%p %p %p\n", wv, rows, cols );
if( !wv->table ) if(!wv->tables)
return ERROR_FUNCTION_FAILED; return ERROR_FUNCTION_FAILED;
if (rows) if (rows)
@ -482,45 +592,142 @@ static UINT WHERE_get_dimensions( struct tagMSIVIEW *view, UINT *rows, UINT *col
*rows = wv->row_count; *rows = wv->row_count;
} }
return wv->table->ops->get_dimensions( wv->table, NULL, cols ); if (cols)
*cols = wv->col_count;
return ERROR_SUCCESS;
} }
static UINT WHERE_get_column_info( struct tagMSIVIEW *view, UINT n, LPCWSTR *name, static UINT WHERE_get_column_info( struct tagMSIVIEW *view, UINT n, LPCWSTR *name,
UINT *type, BOOL *temporary, LPCWSTR *table_name ) UINT *type, BOOL *temporary, LPCWSTR *table_name )
{ {
MSIWHEREVIEW *wv = (MSIWHEREVIEW*)view; MSIWHEREVIEW *wv = (MSIWHEREVIEW*)view;
JOINTABLE *table;
TRACE("%p %d %p %p %p %p\n", wv, n, name, type, temporary, table_name ); TRACE("%p %d %p %p %p %p\n", wv, n, name, type, temporary, table_name );
if( !wv->table ) if(!wv->tables)
return ERROR_FUNCTION_FAILED; return ERROR_FUNCTION_FAILED;
return wv->table->ops->get_column_info( wv->table, n, name, table = find_table(wv, n, &n);
if (!table)
return ERROR_FUNCTION_FAILED;
return table->view->ops->get_column_info(table->view, n, name,
type, temporary, table_name); type, temporary, table_name);
} }
static UINT join_find_row( MSIWHEREVIEW *wv, MSIRECORD *rec, UINT *row )
{
LPCWSTR str;
UINT r, i, id, data;
str = MSI_RecordGetString( rec, 1 );
r = msi_string2idW( wv->db->strings, str, &id );
if (r != ERROR_SUCCESS)
return r;
for (i = 0; i < wv->row_count; i++)
{
WHERE_fetch_int( &wv->view, i, 1, &data );
if (data == id)
{
*row = i;
return ERROR_SUCCESS;
}
}
return ERROR_FUNCTION_FAILED;
}
static UINT join_modify_update( struct tagMSIVIEW *view, MSIRECORD *rec )
{
MSIWHEREVIEW *wv = (MSIWHEREVIEW *)view;
UINT r, row;
r = join_find_row( wv, rec, &row );
if (r != ERROR_SUCCESS)
return r;
return WHERE_set_row( view, row, rec, (1 << wv->col_count) - 1 );
}
static UINT WHERE_modify( struct tagMSIVIEW *view, MSIMODIFY eModifyMode, static UINT WHERE_modify( struct tagMSIVIEW *view, MSIMODIFY eModifyMode,
MSIRECORD *rec, UINT row ) MSIRECORD *rec, UINT row )
{ {
MSIWHEREVIEW *wv = (MSIWHEREVIEW*)view; MSIWHEREVIEW *wv = (MSIWHEREVIEW*)view;
JOINTABLE *table = wv->tables;
UINT r;
TRACE("%p %d %p\n", wv, eModifyMode, rec); TRACE("%p %d %p\n", wv, eModifyMode, rec);
find_row(wv, row - 1, &row); if (!table)
row++; return ERROR_FUNCTION_FAILED;
return wv->table->ops->modify( wv->table, eModifyMode, rec, row ); if (!table->next)
{
UINT *rows;
if (find_row(wv, row - 1, &rows) == ERROR_SUCCESS)
row = rows[0] + 1;
else
row = -1;
return table->view->ops->modify(table->view, eModifyMode, rec, row);
}
switch (eModifyMode)
{
case MSIMODIFY_UPDATE:
return join_modify_update( view, rec );
case MSIMODIFY_ASSIGN:
case MSIMODIFY_DELETE:
case MSIMODIFY_INSERT:
case MSIMODIFY_INSERT_TEMPORARY:
case MSIMODIFY_MERGE:
case MSIMODIFY_REPLACE:
case MSIMODIFY_SEEK:
case MSIMODIFY_VALIDATE:
case MSIMODIFY_VALIDATE_DELETE:
case MSIMODIFY_VALIDATE_FIELD:
case MSIMODIFY_VALIDATE_NEW:
r = ERROR_FUNCTION_FAILED;
break;
case MSIMODIFY_REFRESH:
r = ERROR_CALL_NOT_IMPLEMENTED;
break;
default:
WARN("%p %d %p %u - unknown mode\n", view, eModifyMode, rec, row );
r = ERROR_INVALID_PARAMETER;
break;
}
return r;
} }
static UINT WHERE_delete( struct tagMSIVIEW *view ) static UINT WHERE_delete( struct tagMSIVIEW *view )
{ {
MSIWHEREVIEW *wv = (MSIWHEREVIEW*)view; MSIWHEREVIEW *wv = (MSIWHEREVIEW*)view;
JOINTABLE *table = wv->tables;
TRACE("%p\n", wv ); TRACE("%p\n", wv );
if( wv->table ) while(table)
wv->table->ops->delete( wv->table ); {
wv->table = 0; JOINTABLE *next;
table->view->ops->delete(table->view);
table->view = NULL;
next = table->next;
msi_free(table);
table = next;
}
wv->tables = NULL;
wv->table_count = 0;
free_reorder(wv); free_reorder(wv);
@ -534,27 +741,52 @@ static UINT WHERE_find_matching_rows( struct tagMSIVIEW *view, UINT col,
UINT val, UINT *row, MSIITERHANDLE *handle ) UINT val, UINT *row, MSIITERHANDLE *handle )
{ {
MSIWHEREVIEW *wv = (MSIWHEREVIEW*)view; MSIWHEREVIEW *wv = (MSIWHEREVIEW*)view;
UINT r; UINT i, row_value;
TRACE("%p, %d, %u, %p\n", view, col, val, *handle); TRACE("%p, %d, %u, %p\n", view, col, val, *handle);
if( !wv->table ) if (!wv->tables)
return ERROR_FUNCTION_FAILED; return ERROR_FUNCTION_FAILED;
r = wv->table->ops->find_matching_rows( wv->table, col, val, row, handle ); if (col == 0 || col > wv->col_count)
if (r != ERROR_SUCCESS) return ERROR_INVALID_PARAMETER;
return r;
return find_row(wv, *row, row); for (i = PtrToUlong(*handle); i < wv->row_count; i++)
{
if (view->ops->fetch_int( view, i, col, &row_value ) != ERROR_SUCCESS)
continue;
if (row_value == val)
{
*row = i;
*handle = UlongToPtr(i + 1);
return ERROR_SUCCESS;
}
}
return ERROR_NO_MORE_ITEMS;
} }
static UINT WHERE_sort(struct tagMSIVIEW *view, column_info *columns) static UINT WHERE_sort(struct tagMSIVIEW *view, column_info *columns)
{ {
MSIWHEREVIEW *wv = (MSIWHEREVIEW *)view; MSIWHEREVIEW *wv = (MSIWHEREVIEW *)view;
JOINTABLE *table = wv->tables;
UINT r;
TRACE("%p %p\n", view, columns); TRACE("%p %p\n", view, columns);
return wv->table->ops->sort(wv->table, columns); if (!table)
return ERROR_FUNCTION_FAILED;
do
{
r = table->view->ops->sort(table->view, columns);
if (r != ERROR_SUCCESS)
return r;
}
while ((table = table->next));
return ERROR_SUCCESS;
} }
static const MSIVIEWOPS where_ops = static const MSIVIEWOPS where_ops =
@ -580,48 +812,40 @@ static const MSIVIEWOPS where_ops =
NULL, NULL,
}; };
static UINT WHERE_VerifyCondition( MSIDATABASE *db, MSIVIEW *table, struct expr *cond, static UINT WHERE_VerifyCondition( MSIWHEREVIEW *wv, struct expr *cond,
UINT *valid ) UINT *valid )
{ {
UINT r, val = 0; UINT r;
switch( cond->type ) switch( cond->type )
{ {
case EXPR_COLUMN: case EXPR_COLUMN:
r = VIEW_find_column( table, cond->u.column.column,
cond->u.column.table, &val );
if( r == ERROR_SUCCESS )
{
UINT type = 0;
r = table->ops->get_column_info( table, val, NULL, &type,
NULL, NULL );
if( r == ERROR_SUCCESS )
{ {
UINT type;
*valid = FALSE;
r = parse_column(wv, &cond->u.column, &type);
if (r != ERROR_SUCCESS)
break;
if (type&MSITYPE_STRING) if (type&MSITYPE_STRING)
cond->type = EXPR_COL_NUMBER_STRING; cond->type = EXPR_COL_NUMBER_STRING;
else if ((type&0xff) == 4) else if ((type&0xff) == 4)
cond->type = EXPR_COL_NUMBER32; cond->type = EXPR_COL_NUMBER32;
else else
cond->type = EXPR_COL_NUMBER; cond->type = EXPR_COL_NUMBER;
cond->u.col_number = val;
*valid = 1; *valid = TRUE;
}
else
*valid = 0;
}
else
{
*valid = 0;
WARN("Couldn't find column %s.%s\n", debugstr_w( cond->u.column.table ), debugstr_w( cond->u.column.column ) );
}
break; break;
}
case EXPR_COMPLEX: case EXPR_COMPLEX:
r = WHERE_VerifyCondition( db, table, cond->u.expr.left, valid ); r = WHERE_VerifyCondition( wv, cond->u.expr.left, valid );
if( r != ERROR_SUCCESS ) if( r != ERROR_SUCCESS )
return r; return r;
if( !*valid ) if( !*valid )
return ERROR_SUCCESS; return ERROR_SUCCESS;
r = WHERE_VerifyCondition( db, table, cond->u.expr.right, valid ); r = WHERE_VerifyCondition( wv, cond->u.expr.right, valid );
if( r != ERROR_SUCCESS ) if( r != ERROR_SUCCESS )
return r; return r;
@ -653,7 +877,7 @@ static UINT WHERE_VerifyCondition( MSIDATABASE *db, MSIVIEW *table, struct expr
*valid = FALSE; *valid = FALSE;
return ERROR_INVALID_PARAMETER; return ERROR_INVALID_PARAMETER;
} }
r = WHERE_VerifyCondition( db, table, cond->u.expr.left, valid ); r = WHERE_VerifyCondition( wv, cond->u.expr.left, valid );
if( r != ERROR_SUCCESS ) if( r != ERROR_SUCCESS )
return r; return r;
break; break;
@ -677,29 +901,15 @@ static UINT WHERE_VerifyCondition( MSIDATABASE *db, MSIVIEW *table, struct expr
return ERROR_SUCCESS; return ERROR_SUCCESS;
} }
UINT WHERE_CreateView( MSIDATABASE *db, MSIVIEW **view, MSIVIEW *table, UINT WHERE_CreateView( MSIDATABASE *db, MSIVIEW **view, LPWSTR tables,
struct expr *cond ) struct expr *cond )
{ {
MSIWHEREVIEW *wv = NULL; MSIWHEREVIEW *wv = NULL;
UINT count = 0, r, valid = 0; UINT r, valid = 0;
WCHAR *ptr;
JOINTABLE **lastnext;
TRACE("%p\n", table ); TRACE("(%s)\n", debugstr_w(tables) );
r = table->ops->get_dimensions( table, NULL, &count );
if( r != ERROR_SUCCESS )
{
ERR("can't get table dimensions\n");
return r;
}
if( cond )
{
r = WHERE_VerifyCondition( db, table, cond, &valid );
if( r != ERROR_SUCCESS )
return r;
if( !valid )
return ERROR_FUNCTION_FAILED;
}
wv = msi_alloc_zero( sizeof *wv ); wv = msi_alloc_zero( sizeof *wv );
if( !wv ) if( !wv )
@ -709,12 +919,70 @@ UINT WHERE_CreateView( MSIDATABASE *db, MSIVIEW **view, MSIVIEW *table,
wv->view.ops = &where_ops; wv->view.ops = &where_ops;
msiobj_addref( &db->hdr ); msiobj_addref( &db->hdr );
wv->db = db; wv->db = db;
wv->table = table;
wv->row_count = 0;
wv->reorder = NULL;
wv->cond = cond; wv->cond = cond;
wv->rec_index = 0;
lastnext = &wv->tables;
while (*tables)
{
JOINTABLE *table;
if ((ptr = strchrW(tables, ' ')))
*ptr = '\0';
table = msi_alloc(sizeof(JOINTABLE));
if (!table)
{
r = ERROR_OUTOFMEMORY;
goto end;
}
r = TABLE_CreateView(db, tables, &table->view);
if (r != ERROR_SUCCESS)
{
WARN("can't create table: %s\n", debugstr_w(tables));
msi_free(table);
r = ERROR_BAD_QUERY_SYNTAX;
goto end;
}
r = table->view->ops->get_dimensions(table->view, NULL,
&table->col_count);
if (r != ERROR_SUCCESS)
{
ERR("can't get table dimensions\n");
goto end;
}
wv->col_count += table->col_count;
table->table_index = wv->table_count++;
table->next = NULL;
*lastnext = table;
lastnext = &table->next;
if (!ptr)
break;
tables = ptr + 1;
}
if( cond )
{
r = WHERE_VerifyCondition( wv, cond, &valid );
if( r != ERROR_SUCCESS )
goto end;
if( !valid ) {
r = ERROR_FUNCTION_FAILED;
goto end;
}
}
*view = (MSIVIEW*) wv; *view = (MSIVIEW*) wv;
return ERROR_SUCCESS; return ERROR_SUCCESS;
end:
WHERE_delete(&wv->view);
return r;
} }