mirror of
https://github.com/mdbtools/mdbtools.git
synced 2026-03-10 00:20:54 +08:00
odbc stuff
This commit is contained in:
brianb
243
src/odbc/unittest.c
Normal file
243
src/odbc/unittest.c
Normal file
@@ -0,0 +1,243 @@
|
||||
/* FreeTDS - Library of routines accessing Sybase and Microsoft databases
|
||||
* Copyright (C) 1998-1999 Brian Bruns
|
||||
*
|
||||
* This library is free software; you can redistribute it and/or
|
||||
* modify it under the terms of the GNU Library 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
|
||||
* Library General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU Library 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.
|
||||
*/
|
||||
|
||||
/* #include <windows.h> */
|
||||
#include <isql.h>
|
||||
#include <isqlext.h>
|
||||
|
||||
#include <stdio.h>
|
||||
|
||||
static char software_version[] = "$Id: unittest.c,v 1.1 2001/07/10 22:36:20 brianb Exp $";
|
||||
static void *no_unused_var_warn[] = {software_version,
|
||||
no_unused_var_warn};
|
||||
|
||||
|
||||
|
||||
#define SALES_PERSON_LEN 2
|
||||
#define STATUS_LEN 6
|
||||
|
||||
SQLSMALLINT sOrderID;
|
||||
SQLSMALLINT sCustID;
|
||||
DATE_STRUCT dsOpenDate;
|
||||
SQLCHAR szSalesPerson[SALES_PERSON_LEN] = "D";
|
||||
SQLCHAR szStatus[STATUS_LEN];
|
||||
SQLINTEGER cbOrderID = 0, cbCustID = 0, cbOpenDate = 0, cbSalesPerson = SQL_NTS,
|
||||
cbStatus = SQL_NTS;
|
||||
SQLRETURN retcode;
|
||||
HENV henv;
|
||||
HDBC hdbc;
|
||||
SQLHSTMT hstmt;
|
||||
|
||||
|
||||
static void printStatementError(HSTMT hstmt, char *msg)
|
||||
{
|
||||
UCHAR szSqlState[6];
|
||||
UCHAR szErrorMsg[SQL_MAX_MESSAGE_LENGTH];
|
||||
SDWORD dwNativeError;
|
||||
SWORD wErrorMsg;
|
||||
|
||||
SQLError(SQL_NULL_HENV, SQL_NULL_HDBC, hstmt,
|
||||
szSqlState, &dwNativeError, szErrorMsg,
|
||||
SQL_MAX_MESSAGE_LENGTH-1, &wErrorMsg);
|
||||
|
||||
fprintf(stderr,"%s\n%s\n%s\n",msg,
|
||||
szSqlState, szErrorMsg);
|
||||
}
|
||||
|
||||
|
||||
int main()
|
||||
{
|
||||
retcode = SQLAllocEnv(&henv);
|
||||
|
||||
if (SQLAllocConnect(henv, &hdbc) != SQL_SUCCESS)
|
||||
{
|
||||
UCHAR szSqlState[6];
|
||||
UCHAR szErrorMsg[SQL_MAX_MESSAGE_LENGTH];
|
||||
SDWORD dwNativeError;
|
||||
SWORD wErrorMsg;
|
||||
|
||||
SQLError(henv, SQL_NULL_HDBC, SQL_NULL_HSTMT,
|
||||
szSqlState, &dwNativeError, szErrorMsg,
|
||||
SQL_MAX_MESSAGE_LENGTH-1, &wErrorMsg);
|
||||
|
||||
fprintf(stderr,"problem with SQLAllocConnect\n%s\n%s\n",
|
||||
szSqlState, szErrorMsg);
|
||||
exit(1);
|
||||
}
|
||||
|
||||
|
||||
retcode = SQLSetConnectOption(hdbc, SQL_ACCESS_MODE, SQL_MODE_READ_ONLY);
|
||||
if (retcode != SQL_SUCCESS && retcode != SQL_SUCCESS_WITH_INFO)
|
||||
{
|
||||
UCHAR szSqlState[6];
|
||||
UCHAR szErrorMsg[SQL_MAX_MESSAGE_LENGTH];
|
||||
SDWORD dwNativeError;
|
||||
SWORD wErrorMsg;
|
||||
|
||||
SQLError(SQL_NULL_HENV, hdbc, SQL_NULL_HSTMT,
|
||||
szSqlState, &dwNativeError, szErrorMsg,
|
||||
SQL_MAX_MESSAGE_LENGTH-1, &wErrorMsg);
|
||||
|
||||
fprintf(stderr,"problem with SQLSetConnectOption\n%s\n%s\n",
|
||||
szSqlState, szErrorMsg);
|
||||
exit(1);
|
||||
}
|
||||
|
||||
retcode = SQLSetConnectOption(hdbc, SQL_AUTOCOMMIT, SQL_AUTOCOMMIT_ON);
|
||||
if (retcode != SQL_SUCCESS && retcode != SQL_SUCCESS_WITH_INFO)
|
||||
{
|
||||
UCHAR szSqlState[6];
|
||||
UCHAR szErrorMsg[SQL_MAX_MESSAGE_LENGTH];
|
||||
SDWORD dwNativeError;
|
||||
SWORD wErrorMsg;
|
||||
|
||||
SQLError(SQL_NULL_HENV, hdbc, SQL_NULL_HSTMT,
|
||||
szSqlState, &dwNativeError, szErrorMsg,
|
||||
SQL_MAX_MESSAGE_LENGTH-1, &wErrorMsg);
|
||||
|
||||
fprintf(stderr,"problem with SQLSetConnectOption\n%s\n%s\n",
|
||||
szSqlState, szErrorMsg);
|
||||
exit(1);
|
||||
}
|
||||
|
||||
|
||||
retcode = SQLConnect(hdbc,
|
||||
/*
|
||||
(UCHAR *)"SYBASE", SQL_NTS,
|
||||
(UCHAR *)"ken", SQL_NTS,
|
||||
(UCHAR *)"asdfasdf", SQL_NTS);
|
||||
*/
|
||||
(UCHAR *)"Northwind", SQL_NTS,
|
||||
(UCHAR *)"", SQL_NTS,
|
||||
(UCHAR *)"", SQL_NTS);
|
||||
/* sleep(600); */
|
||||
if (retcode != SQL_SUCCESS && retcode != SQL_SUCCESS_WITH_INFO)
|
||||
{
|
||||
UCHAR szSqlState[6];
|
||||
UCHAR szErrorMsg[SQL_MAX_MESSAGE_LENGTH];
|
||||
SDWORD dwNativeError;
|
||||
SWORD wErrorMsg;
|
||||
|
||||
SQLError(SQL_NULL_HENV, hdbc, SQL_NULL_HSTMT,
|
||||
szSqlState, &dwNativeError, szErrorMsg,
|
||||
SQL_MAX_MESSAGE_LENGTH-1, &wErrorMsg);
|
||||
|
||||
fprintf(stderr,"problem with SQLConnect\n%s\n%s\n",
|
||||
szSqlState, szErrorMsg);
|
||||
exit(1);
|
||||
}
|
||||
|
||||
|
||||
if (SQLAllocStmt(hdbc, &hstmt)!= SQL_SUCCESS)
|
||||
{
|
||||
UCHAR szSqlState[6];
|
||||
UCHAR szErrorMsg[SQL_MAX_MESSAGE_LENGTH];
|
||||
SDWORD dwNativeError;
|
||||
SWORD wErrorMsg;
|
||||
|
||||
SQLError(SQL_NULL_HENV, hdbc, SQL_NULL_HSTMT,
|
||||
szSqlState, &dwNativeError, szErrorMsg,
|
||||
SQL_MAX_MESSAGE_LENGTH-1, &wErrorMsg);
|
||||
|
||||
fprintf(stderr,"problem with SQLAllocStmt\n%s\n%s\n",
|
||||
szSqlState, szErrorMsg);
|
||||
exit(1);
|
||||
}
|
||||
|
||||
|
||||
#if 0
|
||||
retcode = SQLTables(hstmt,
|
||||
(unsigned char *) NULL, 0,
|
||||
(unsigned char *) "%", 1,
|
||||
(unsigned char *) "%", 1,
|
||||
(unsigned char *) "VIEW,TABLE", 10);
|
||||
if (! (retcode == SQL_SUCCESS || retcode == SQL_SUCCESS_WITH_INFO))
|
||||
{
|
||||
printf("got table stuff\n");
|
||||
}
|
||||
else
|
||||
{
|
||||
printStatementError(hstmt, "SQLTable");
|
||||
}
|
||||
#else
|
||||
/* Prepare the SQL statement with parameter markers. */
|
||||
|
||||
retcode = SQLPrepare(hstmt,
|
||||
(unsigned char *)"select ShipName from Orders where OrderID > 11000",
|
||||
SQL_NTS);
|
||||
|
||||
if (retcode == SQL_SUCCESS || retcode == SQL_SUCCESS_WITH_INFO)
|
||||
{
|
||||
long p1;
|
||||
// char p2[256];
|
||||
long p1Len = sizeof(p1);
|
||||
// long p2Len;
|
||||
long sAge = 1023;
|
||||
long cbAge = sizeof(long);
|
||||
UCHAR szCol1[60];
|
||||
|
||||
SQLBindParameter(hstmt, 1, SQL_PARAM_INPUT, SQL_C_SLONG, SQL_INTEGER,
|
||||
0, 0, szCol1, 0, &p1Len);
|
||||
|
||||
// p1Len = SQL_NULL_DATA;
|
||||
/* Execute statement with first row. */
|
||||
|
||||
p1 = 8192;
|
||||
// p1[0] = '%';
|
||||
// p1Len = 1;
|
||||
// p2[0] = '%';
|
||||
// p2Len = 1;
|
||||
printf("excecuting first statement\n");
|
||||
retcode = SQLExecute(hstmt);
|
||||
if (retcode != SQL_SUCCESS)
|
||||
{
|
||||
UCHAR szSqlState[6];
|
||||
UCHAR szErrorMsg[SQL_MAX_MESSAGE_LENGTH];
|
||||
SDWORD dwNativeError;
|
||||
SWORD wErrorMsg;
|
||||
|
||||
SQLError(SQL_NULL_HENV, SQL_NULL_HDBC, hstmt,
|
||||
szSqlState, &dwNativeError, szErrorMsg,
|
||||
SQL_MAX_MESSAGE_LENGTH-1, &wErrorMsg);
|
||||
|
||||
fprintf(stderr,"problem with SQLExecute\n%s\n%s\n",
|
||||
szSqlState, szErrorMsg);
|
||||
exit(1);
|
||||
}
|
||||
while ((retcode = SQLFetch(hstmt)) == SQL_SUCCESS)
|
||||
{
|
||||
// nop
|
||||
printf("szCol1 = %s\n",szCol1);
|
||||
}
|
||||
if (retcode != SQL_NO_DATA_FOUND)
|
||||
{
|
||||
printStatementError(hstmt, "problem with SQLFetch");
|
||||
exit(1);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
SQLCloseCursor(hstmt);
|
||||
*/
|
||||
}
|
||||
#endif
|
||||
printf("Done\n");
|
||||
|
||||
return 1;
|
||||
}
|
||||
Reference in New Issue
Block a user