unixodbc/DriverManager/SQLStatisticsW.c

443 lines
13 KiB
C

/*********************************************************************
*
* This is based on code created by Peter Harvey,
* (pharvey@codebydesign.com).
*
* Modified and extended by Nick Gorham
* (nick@lurcher.org).
*
* Any bugs or problems should be considered the fault of Nick and not
* Peter.
*
* copyright (c) 1999 Nick Gorham
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
**********************************************************************
*
* $Id: SQLStatisticsW.c,v 1.9 2009/02/18 17:59:08 lurcher Exp $
*
* $Log: SQLStatisticsW.c,v $
* Revision 1.9 2009/02/18 17:59:08 lurcher
* Shift to using config.h, the compile lines were making it hard to spot warnings
*
* Revision 1.8 2008/08/29 08:01:39 lurcher
* Alter the way W functions are passed to the driver
*
* Revision 1.7 2007/02/28 15:37:49 lurcher
* deal with drivers that call internal W functions and end up in the driver manager. controlled by the --enable-handlemap configure arg
*
* Revision 1.6 2004/01/12 09:54:39 lurcher
*
* Fix problem where STATE_S5 stops metadata calls
*
* Revision 1.5 2003/10/30 18:20:46 lurcher
*
* Fix broken thread protection
* Remove SQLNumResultCols after execute, lease S4/S% to driver
* Fix string overrun in SQLDriverConnect
* Add initial support for Interix
*
* Revision 1.4 2002/12/05 17:44:31 lurcher
*
* Display unknown return values in return logging
*
* Revision 1.3 2002/08/23 09:42:37 lurcher
*
* Fix some build warnings with casts, and a AIX linker mod, to include
* deplib's on the link line, but not the libtool generated ones
*
* Revision 1.2 2002/07/24 08:49:52 lurcher
*
* Alter UNICODE support to use iconv for UNICODE-ANSI conversion
*
* Revision 1.1.1.1 2001/10/17 16:40:07 lurcher
*
* First upload to SourceForge
*
* Revision 1.3 2001/07/03 09:30:41 nick
*
* Add ability to alter size of displayed message in the log
*
* Revision 1.2 2001/04/12 17:43:36 nick
*
* Change logging and added autotest to odbctest
*
* Revision 1.1 2000/12/31 20:30:54 nick
*
* Add UNICODE support
*
*
**********************************************************************/
#include <config.h>
#include "drivermanager.h"
static char const rcsid[]= "$RCSfile: SQLStatisticsW.c,v $";
SQLRETURN SQLStatisticsW( SQLHSTMT statement_handle,
SQLWCHAR *catalog_name,
SQLSMALLINT name_length1,
SQLWCHAR *schema_name,
SQLSMALLINT name_length2,
SQLWCHAR *table_name,
SQLSMALLINT name_length3,
SQLUSMALLINT unique,
SQLUSMALLINT reserved )
{
DMHSTMT statement = (DMHSTMT) statement_handle;
SQLRETURN ret;
SQLCHAR s1[ 100 + LOG_MESSAGE_LEN ], s2[ 100 + LOG_MESSAGE_LEN ], s3[ 100 + LOG_MESSAGE_LEN ];
/*
* check statement
*/
if ( !__validate_stmt( statement ))
{
dm_log_write( __FILE__,
__LINE__,
LOG_INFO,
LOG_INFO,
"Error: SQL_INVALID_HANDLE" );
#ifdef WITH_HANDLE_REDIRECT
{
DMHSTMT parent_statement;
parent_statement = find_parent_handle( statement, SQL_HANDLE_STMT );
if ( parent_statement ) {
dm_log_write( __FILE__,
__LINE__,
LOG_INFO,
LOG_INFO,
"Info: found parent handle" );
if ( CHECK_SQLSTATISTICSW( parent_statement -> connection ))
{
dm_log_write( __FILE__,
__LINE__,
LOG_INFO,
LOG_INFO,
"Info: calling redirected driver function" );
return SQLSTATISTICSW( parent_statement -> connection,
statement_handle,
catalog_name,
name_length1,
schema_name,
name_length2,
table_name,
name_length3,
unique,
reserved );
}
}
}
#endif
return SQL_INVALID_HANDLE;
}
function_entry( statement );
if ( log_info.log_flag )
{
sprintf( statement -> msg, "\n\t\tEntry:\
\n\t\t\tStatement = %p\
\n\t\t\tCatalog Name = %s\
\n\t\t\tSchema Name = %s\
\n\t\t\tTable Name = %s\
\n\t\t\tUnique = %d\
\n\t\t\tReserved = %d",
statement,
__wstring_with_length( s1, catalog_name, name_length1 ),
__wstring_with_length( s2, schema_name, name_length2 ),
__wstring_with_length( s3, table_name, name_length3 ),
unique,
reserved );
dm_log_write( __FILE__,
__LINE__,
LOG_INFO,
LOG_INFO,
statement -> msg );
}
thread_protect( SQL_HANDLE_STMT, statement );
if (( name_length1 < 0 && name_length1 != SQL_NTS ) ||
( name_length2 < 0 && name_length2 != SQL_NTS ) ||
( name_length3 < 0 && name_length3 != SQL_NTS ))
{
dm_log_write( __FILE__,
__LINE__,
LOG_INFO,
LOG_INFO,
"Error: HY090" );
__post_internal_error( &statement -> error,
ERROR_HY090, NULL,
statement -> connection -> environment -> requested_version );
return function_return_nodrv( SQL_HANDLE_STMT, statement, SQL_ERROR );
}
if ( reserved != SQL_ENSURE &&
reserved != SQL_QUICK )
{
dm_log_write( __FILE__,
__LINE__,
LOG_INFO,
LOG_INFO,
"Error: HY101" );
__post_internal_error( &statement -> error,
ERROR_HY101, NULL,
statement -> connection -> environment -> requested_version );
return function_return_nodrv( SQL_HANDLE_STMT, statement, SQL_ERROR );
}
if ( unique != SQL_INDEX_UNIQUE &&
unique != SQL_INDEX_ALL )
{
dm_log_write( __FILE__,
__LINE__,
LOG_INFO,
LOG_INFO,
"Error: HY100" );
__post_internal_error( &statement -> error,
ERROR_HY100, NULL,
statement -> connection -> environment -> requested_version );
return function_return_nodrv( SQL_HANDLE_STMT, statement, SQL_ERROR );
}
/*
* check states
*/
#ifdef NR_PROBE
if ( statement -> state == STATE_S5 ||
statement -> state == STATE_S6 ||
statement -> state == STATE_S7 )
#else
if (( statement -> state == STATE_S6 && statement -> eod == 0 ) ||
statement -> state == STATE_S7 )
#endif
{
dm_log_write( __FILE__,
__LINE__,
LOG_INFO,
LOG_INFO,
"Error: 24000" );
__post_internal_error( &statement -> error,
ERROR_24000, NULL,
statement -> connection -> environment -> requested_version );
return function_return_nodrv( SQL_HANDLE_STMT, statement, SQL_ERROR );
}
else if ( statement -> state == STATE_S8 ||
statement -> state == STATE_S9 ||
statement -> state == STATE_S10 ||
statement -> state == STATE_S13 ||
statement -> state == STATE_S14 ||
statement -> state == STATE_S15 )
{
dm_log_write( __FILE__,
__LINE__,
LOG_INFO,
LOG_INFO,
"Error: HY010" );
__post_internal_error( &statement -> error,
ERROR_HY010, NULL,
statement -> connection -> environment -> requested_version );
return function_return_nodrv( SQL_HANDLE_STMT, statement, SQL_ERROR );
}
if ( statement -> state == STATE_S11 ||
statement -> state == STATE_S12 )
{
if ( statement -> interupted_func != SQL_API_SQLSTATISTICS )
{
dm_log_write( __FILE__,
__LINE__,
LOG_INFO,
LOG_INFO,
"Error: HY010" );
__post_internal_error( &statement -> error,
ERROR_HY010, NULL,
statement -> connection -> environment -> requested_version );
return function_return_nodrv( SQL_HANDLE_STMT, statement, SQL_ERROR );
}
}
if ( table_name == NULL )
{
dm_log_write( __FILE__,
__LINE__,
LOG_INFO,
LOG_INFO,
"Error: HY009" );
__post_internal_error( &statement -> error,
ERROR_HY009, NULL,
statement -> connection -> environment -> requested_version );
return function_return_nodrv( SQL_HANDLE_STMT, statement, SQL_ERROR );
}
if ( statement -> metadata_id == SQL_TRUE ) {
if ( schema_name == NULL )
{
dm_log_write( __FILE__,
__LINE__,
LOG_INFO,
LOG_INFO,
"Error: HY009" );
__post_internal_error( &statement -> error,
ERROR_HY009, NULL,
statement -> connection -> environment -> requested_version );
return function_return_nodrv( SQL_HANDLE_STMT, statement, SQL_ERROR );
}
}
if ( statement -> connection -> unicode_driver ||
CHECK_SQLSTATISTICSW( statement -> connection ))
{
if ( !CHECK_SQLSTATISTICSW( statement -> connection ))
{
dm_log_write( __FILE__,
__LINE__,
LOG_INFO,
LOG_INFO,
"Error: IM001" );
__post_internal_error( &statement -> error,
ERROR_IM001, NULL,
statement -> connection -> environment -> requested_version );
return function_return_nodrv( SQL_HANDLE_STMT, statement, SQL_ERROR );
}
ret = SQLSTATISTICSW( statement -> connection,
statement -> driver_stmt,
catalog_name,
name_length1,
schema_name,
name_length2,
table_name,
name_length3,
unique,
reserved );
}
else
{
SQLCHAR *as1, *as2, *as3;
int clen;
if ( !CHECK_SQLSTATISTICS( statement -> connection ))
{
dm_log_write( __FILE__,
__LINE__,
LOG_INFO,
LOG_INFO,
"Error: IM001" );
__post_internal_error( &statement -> error,
ERROR_IM001, NULL,
statement -> connection -> environment -> requested_version );
return function_return_nodrv( SQL_HANDLE_STMT, statement, SQL_ERROR );
}
as1 = (SQLCHAR*) unicode_to_ansi_alloc( catalog_name, name_length1, statement -> connection, &clen );
name_length1 = clen;
as2 = (SQLCHAR*) unicode_to_ansi_alloc( schema_name, name_length2, statement -> connection, &clen );
name_length2 = clen;
as3 = (SQLCHAR*) unicode_to_ansi_alloc( table_name, name_length3, statement -> connection, &clen );
name_length3 = clen;
ret = SQLSTATISTICS( statement -> connection,
statement -> driver_stmt,
as1,
name_length1,
as2,
name_length2,
as3,
name_length3,
unique,
reserved );
if ( as1 ) free( as1 );
if ( as2 ) free( as2 );
if ( as3 ) free( as3 );
}
if ( SQL_SUCCEEDED( ret ))
{
#ifdef NR_PROBE
/********
* Added this to get num cols from drivers which can only tell
* us after execute - PAH
*/
/*
ret = SQLNUMRESULTCOLS( statement -> connection,
statement -> driver_stmt, &statement -> numcols );
*/
statement -> numcols = 1;
/******/
#endif
statement -> hascols = 1;
statement -> state = STATE_S5;
statement -> prepared = 0;
}
else if ( ret == SQL_STILL_EXECUTING )
{
statement -> interupted_func = SQL_API_SQLSTATISTICS;
if ( statement -> state != STATE_S11 &&
statement -> state != STATE_S12 )
statement -> state = STATE_S11;
}
else
{
statement -> state = STATE_S1;
}
if ( log_info.log_flag )
{
sprintf( statement -> msg,
"\n\t\tExit:[%s]",
__get_return_status( ret, s1 ));
dm_log_write( __FILE__,
__LINE__,
LOG_INFO,
LOG_INFO,
statement -> msg );
}
return function_return( SQL_HANDLE_STMT, statement, ret );
}