/* --------------------------------------------------------- TestSQLTransact --------------------------------------------------------- */ PassFail TestSQLTransact(TestInfo *pTestInfo) { TEST_DECLARE; RETCODE returncode; TCHAR Heading[MAX_STRING_SIZE]; SQLHANDLE henv; SQLHANDLE hdbc; SQLHANDLE hstmt; TCHAR *ExecDirStr[6]; UWORD fType[] = { SQL_ROLLBACK,SQL_COMMIT }; TCHAR *TypeDesc[] = { _T("SQL_ROLLBACK"),_T("SQL_COMMIT") }; TCHAR *Output; SQLLEN OutputLen; struct { SWORD ExeRes[2]; SWORD FetchRes[2]; TCHAR *DataRes[2]; } CheckRes[] = { {SQL_ERROR,SQL_SUCCESS,SQL_NO_DATA_FOUND,SQL_NO_DATA_FOUND,_T(""),_T("")}, {SQL_SUCCESS,SQL_SUCCESS,SQL_NO_DATA_FOUND,SQL_SUCCESS,_T(""),_T("--")}, {SQL_SUCCESS,SQL_SUCCESS,SQL_SUCCESS,SQL_SUCCESS,_T("--"),_T("--")}, {SQL_SUCCESS,SQL_SUCCESS,SQL_SUCCESS,SQL_NO_DATA_FOUND,_T("--"),_T("")}, {SQL_SUCCESS,SQL_ERROR,SQL_NO_DATA_FOUND,SQL_NO_DATA_FOUND,_T(""),_T("")} }; int i = 0, j = 0, iend = 5, jend = 1, commit_on_off = 0; //=========================================================================================================== var_list_t *var_list; var_list = load_api_vars(_T("SQLTransact"), charset_file); if (var_list == NULL) return FAILED; ExecDirStr[0] = var_mapping(_T("SQLTransact_ExecDirStr_0"), var_list); ExecDirStr[1] = var_mapping(_T("SQLTransact_ExecDirStr_1"), var_list); ExecDirStr[2] = var_mapping(_T("SQLTransact_ExecDirStr_2"), var_list); ExecDirStr[3] = var_mapping(_T("SQLTransact_ExecDirStr_3"), var_list); ExecDirStr[4] = var_mapping(_T("SQLTransact_ExecDirStr_4"), var_list); ExecDirStr[5] = var_mapping(_T("SQLTransact_ExecDirStr_5"), var_list); CheckRes[1].DataRes[1] = var_mapping(_T("SQLTransact_Insert"), var_list); CheckRes[2].DataRes[0] = var_mapping(_T("SQLTransact_Insert"), var_list); CheckRes[2].DataRes[1] = var_mapping(_T("SQLTransact_Update"), var_list); CheckRes[3].DataRes[0] = var_mapping(_T("SQLTransact_Update"), var_list); //======================================================================================================== LogMsg(LINEBEFORE+SHORTTIMESTAMP,_T("Begin testing API => SQLTransact.\n")); TEST_INIT; TESTCASE_BEGIN("Initializing SQLTransact test environment\n"); // if(!FullConnect(pTestInfo)) { LogMsg(NONE,_T("Unable to connect\n")); TEST_FAILED; TEST_RETURN; } henv = pTestInfo->henv; hdbc = pTestInfo->hdbc; hstmt = (SQLHANDLE)pTestInfo->hstmt; returncode = SQLAllocStmt((SQLHANDLE)hdbc, &hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLAllocStmt")) { LogAllErrors(henv,hdbc,hstmt); FullDisconnect(pTestInfo); TEST_FAILED; TEST_RETURN; } for (commit_on_off = 0; commit_on_off < 10; commit_on_off++) { returncode = SQLSetConnectOption((SQLHANDLE)hdbc,SQL_AUTOCOMMIT,SQL_AUTOCOMMIT_ON); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLSetConnectOption")) { LogAllErrors(henv,hdbc,hstmt); FullDisconnect(pTestInfo); TEST_FAILED; TEST_RETURN; } TESTCASE_END; SQLExecDirect(hstmt, (SQLTCHAR*)ExecDirStr[4], SQL_NTS); /* CLEANUP */ for (i = 0; i <= (iend-1); i++) { _stprintf(Heading,_T("Test Positive Functionality of SQLTransact while Autocommit is ON and executing\n")); _tcscat(Heading, ExecDirStr[i]); _tcscat(Heading, _T("\n")); TESTCASE_BEGINW(Heading); returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i],SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } } SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[4],SQL_NTS); /* CLEANUP */ returncode = SQLSetConnectOption((SQLHANDLE)hdbc,SQL_AUTOCOMMIT,SQL_AUTOCOMMIT_OFF); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLSetConnectOption")) { LogAllErrors(henv,hdbc,hstmt); FullDisconnect(pTestInfo); TEST_FAILED; TEST_RETURN; } TESTCASE_END; for (i = 0; i <= (iend-1); i++) { for (j = 0; j <= jend; j++) { _stprintf(Heading,_T("Test Positive Functionality of SQLTransact while Autocommit is OFF and executing\n")); _tcscat(Heading, ExecDirStr[i]); _tcscat(Heading, _T(" & ")); _tcscat(Heading, TypeDesc[j]); _tcscat(Heading, _T("\n")); TESTCASE_BEGINW(Heading); //MAY 9, 2014 - TURNING AUTOCOMMIT ON FOR DDLs FOR TRAF, AS DDLs ARE NOT SUPPORTED WITH AUTOCOMMIT OFF if (i == 4 || i == 0) SQLSetConnectOption((SQLHANDLE)hdbc, SQL_AUTOCOMMIT, SQL_AUTOCOMMIT_ON); returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i],SQL_NTS); SQLSetConnectOption((SQLHANDLE)hdbc, SQL_AUTOCOMMIT, SQL_AUTOCOMMIT_OFF); if (!CHECKRC(SQL_SUCCESS, returncode, "SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { returncode=SQLTransact((SQLHANDLE)henv,(SQLHANDLE)hdbc,fType[j]); Sleep(2); // tmf rollback is slower. if(!CHECKRC(SQL_SUCCESS,returncode,"SQLTransact")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[iend],SQL_NTS); if(!CHECKRC(CheckRes[i].ExeRes[j],returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { if (returncode == SQL_SUCCESS || returncode == SQL_SUCCESS_WITH_INFO) { Output = (TCHAR *)malloc(NAME_LEN); returncode=SQLBindCol(hstmt,1,SQL_C_TCHAR,Output,NAME_LEN,&OutputLen); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindCol")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { returncode = SQLFetch(hstmt); if(!CHECKRC(CheckRes[i].FetchRes[j],returncode,"SQLFetch")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { if (returncode != SQL_NO_DATA_FOUND && returncode != SQL_ERROR) { if (_tcscspn(CheckRes[i].DataRes[j],Output) == 0) { LogMsg(NONE,_T("expect: %s and actual: %s are matched\n"),Output,CheckRes[i].DataRes[j]); } else { LogMsg(NONE,_T("expect: %s and actual: %s are not matched\n"),Output,CheckRes[i].DataRes[j]); TEST_FAILED; } } } free(Output); SQLFreeStmt(hstmt,SQL_CLOSE); } } } } TESTCASE_END; }/* end j loop */ }/* end i loop */ } //======================================================================================================== SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[4],SQL_NTS); /* CLEANUP */ returncode = SQLDisconnect((SQLHANDLE)hdbc); if(!CHECKRC(SQL_ERROR,returncode,"SQLDisconnect")) { LogAllErrorsVer3(henv,hdbc,hstmt); TEST_FAILED; } // Free the open transactions. returncode=SQLTransact((SQLHANDLE)henv,(SQLHANDLE)hdbc,SQL_ROLLBACK); Sleep(2); returncode=FullDisconnect(pTestInfo); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLFullDisconnect")) { LogAllErrorsVer3(henv,hdbc,hstmt); TEST_FAILED; } LogMsg(SHORTTIMESTAMP+LINEAFTER,_T("End testing API => SQLTransact.\n")); free_list(var_list); TEST_RETURN; }
/* --------------------------------------------------------- TestSQLProcedureColumns --------------------------------------------------------- */ PassFail TestMXSQLProcedureColumns(TestInfo *pTestInfo) { TEST_DECLARE; TCHAR Heading[MAX_HEADING_SIZE]; RETCODE returncode; SQLHANDLE henv; SQLHANDLE hdbc; SQLHANDLE hstmt; TCHAR *ProcStr; TCHAR ProcCatalog[NAME_LEN],ProcSchema[NAME_LEN],ProcName[NAME_LEN]; TCHAR ColName[NAME_LEN]; /* SEAQUEST */ char tmpbuf[1024]; TCHAR *myTestSch; TCHAR *createSchStr; TCHAR *setSchStr; TCHAR *dropSchStr; /* end of SEAQUEST */ TCHAR oProcCatalog[NAME_LEN]; TCHAR oProcSchema[NAME_LEN]; TCHAR oProcName[NAME_LEN]; TCHAR oColName[NAME_LEN]; SWORD oColType; SWORD oColDataType; TCHAR oColTypeName[NAME_LEN]; SDWORD oColSize; SDWORD oBufferLen; SWORD oDecDigits; SWORD oColRadix; SWORD oColNullable; TCHAR oRemark[REM_LEN]; TCHAR oColDef[NAME_LEN]; SWORD oSQLDataType; SWORD oSQLDateTimeSub; SDWORD oCharOctetLen; SDWORD oOrdinalPos; TCHAR oIsNullable[NAME_LEN]; SQLLEN oProcCataloglen; // sushil SQLLEN oProcSchemalen; SQLLEN oProcNamelen; SQLLEN oColNamelen; SQLLEN oColTypelen; SQLLEN oColDataTypelen; SQLLEN oColTypeNamelen; SQLLEN oColSizelen; SQLLEN oBufferLenlen; SQLLEN oDecDigitslen; SQLLEN oColRadixlen; SQLLEN oColNullablelen; SQLLEN oRemarklen; SQLLEN oColDeflen; SQLLEN oSQLDataTypelen; SQLLEN oSQLDateTimeSublen; SQLLEN oCharOctetLenlen; SQLLEN oOrdinalPoslen; SQLLEN oIsNullablelen; struct { TCHAR *DropProc; TCHAR *CrtProc; } CreateProc[] = { {_T("DROP PROCEDURE N4210"), _T("CREATE PROCEDURE N4210 (IN IN1 TIME) EXTERNAL NAME 'Procs.N4210' EXTERNAL PATH '/home/SQFQA/SPJRoot/spjrs/nci/spjrs.jar' LANGUAGE JAVA PARAMETER STYLE JAVA NO SQL NO ISOLATE")}, {_T("DROP PROCEDURE N4260"), _T("CREATE PROCEDURE N4260 (IN IN1 REAL, INOUT INOUT1 INTEGER) EXTERNAL NAME 'Procs.N4260' EXTERNAL PATH '/home/SQFQA/SPJRoot/spjrs/nci/spjrs.jar' LANGUAGE JAVA PARAMETER STYLE JAVA NO SQL NO ISOLATE")}, {_T("DROP PROCEDURE N4261"), _T("CREATE PROCEDURE N4261 (IN IN1 NUMERIC, INOUT INOUT1 REAL) EXTERNAL NAME 'Procs.N4261' EXTERNAL PATH '/home/SQFQA/SPJRoot/spjrs/nci/spjrs.jar' LANGUAGE JAVA PARAMETER STYLE JAVA NO SQL NO ISOLATE")}, {_T("DROP PROCEDURE N4264"), _T("CREATE PROCEDURE N4264 (IN IN1 VARCHAR(30) CHARACTER SET ISO88591, OUT OUT1 VARCHAR(45) CHARACTER SET ISO88591) EXTERNAL NAME 'Procs.N4264' EXTERNAL PATH '/home/SQFQA/SPJRoot/spjrs/nci/spjrs.jar' LANGUAGE JAVA PARAMETER STYLE JAVA NO SQL NO ISOLATE")}, {_T("DROP PROCEDURE N4264A"), _T("CREATE PROCEDURE N4264A (IN IN1 CHAR(30) CHARACTER SET ISO88591, OUT OUT1 CHAR(45) CHARACTER SET ISO88591) EXTERNAL NAME 'Procs.N4264' EXTERNAL PATH '/home/SQFQA/SPJRoot/spjrs/nci/spjrs.jar' LANGUAGE JAVA PARAMETER STYLE JAVA NO SQL NO ISOLATE")}, {_T("DROP PROCEDURE N4264B"), _T("CREATE PROCEDURE N4264B (IN IN1 VARCHAR(2000) CHARACTER SET ISO88591, OUT OUT1 VARCHAR(2000) CHARACTER SET ISO88591) EXTERNAL NAME 'Procs.N4264' EXTERNAL PATH '/home/SQFQA/SPJRoot/spjrs/nci/spjrs.jar' LANGUAGE JAVA PARAMETER STYLE JAVA NO SQL NO ISOLATE")}, {_T("DROP PROCEDURE N4264C"), _T("CREATE PROCEDURE N4264C (IN IN1 VARCHAR(30) CHARACTER SET UCS2, OUT OUT1 VARCHAR(45) CHARACTER SET UCS2) EXTERNAL NAME 'Procs.N4264' EXTERNAL PATH '/home/SQFQA/SPJRoot/spjrs/nci/spjrs.jar' LANGUAGE JAVA PARAMETER STYLE JAVA NO SQL NO ISOLATE")}, {_T("DROP PROCEDURE N4264D"), _T("CREATE PROCEDURE N4264D (IN IN1 CHAR(30) CHARACTER SET UCS2, OUT OUT1 CHAR(45) CHARACTER SET UCS2) EXTERNAL NAME 'Procs.N4264' EXTERNAL PATH '/home/SQFQA/SPJRoot/spjrs/nci/spjrs.jar' LANGUAGE JAVA PARAMETER STYLE JAVA NO SQL NO ISOLATE")}, {_T("DROP PROCEDURE N4264E"), _T("CREATE PROCEDURE N4264E (IN IN1 VARCHAR(2000) CHARACTER SET UCS2, OUT OUT1 VARCHAR(2000) CHARACTER SET UCS2) EXTERNAL NAME 'Procs.N4264' EXTERNAL PATH '/home/SQFQA/SPJRoot/spjrs/nci/spjrs.jar' LANGUAGE JAVA PARAMETER STYLE JAVA NO SQL NO ISOLATE")}, {_T("DROP PROCEDURE N4267"), _T("CREATE PROCEDURE N4267 (IN IN1 NUMERIC, INOUT INOUT1 REAL) EXTERNAL NAME 'Procs.N4267' EXTERNAL PATH '/home/SQFQA/SPJRoot/spjrs/nci/spjrs.jar' LANGUAGE JAVA PARAMETER STYLE JAVA NO SQL NO ISOLATE")}, {_T("endloop"),_T("endloop")} }; struct { TCHAR *ProcName; TCHAR *ColName; SWORD ColType; SWORD ColDataType; TCHAR *ColTypeName; SDWORD ColSize; SDWORD BufferLen; SWORD DecDigits; SWORD ColRadix; SWORD ColNullable; TCHAR *Remark; TCHAR *ColDef; SWORD SQLDataType; SWORD SQLDateTimeSub; SDWORD CharOctetLen; SDWORD OrdinalPos; TCHAR *IsNullable; } ProcCol[] = { /* {"N4210", "IN1", SQL_PARAM_INPUT, SQL_TYPE_TIME, "TIME", 8, 6, 0, <Null>, SQL_NULLABLE, <Null>, <Null>, 9, 2, <Null>, 1, "YES"}, {"N4260", "IN1", SQL_PARAM_INPUT, SQL_REAL, "REAL", 22, 4, 0, 2, SQL_NULLABLE, <Null>, <Null>, 7, <Null>, <Null>, 1, "YES"}, {"N4260", "INOUT1", SQL_PARAM_INPUT_OUTPUT, SQL_INTEGER, "INTEGER SIGNED", 10, 4, 0, 10, SQL_NULLABLE, <Null>, <Null>, 4, <Null>, <Null>, 2, "YES"}, {"N4261", "IN1", SQL_PARAM_INPUT, SQL_NUMERIC, "NUMERIC", 9, 11, 0, 10, SQL_NULLABLE, <Null>, <Null>, 2, <Null>, <Null>, 1, "YES"}, {"N4261", "INOUT1", SQL_PARAM_INPUT_OUTPUT, SQL_REAL, "REAL", 22, 4, 0, 2, SQL_NULLABLE, <Null>, <Null>, 7, <Null>, <Null>, 2, "YES"}, {"N4264", "IN1", SQL_PARAM_INPUT, SQL_WVARCHAR, "VARCHAR", 30, 30, 0, <Null>, SQL_NULLABLE, <Null>, <Null>, 12,<Null>, 30, 1, "YES"}, {"N4264", "OUT1", SQL_PARAM_OUTPUT, SQL_WVARCHAR, "VARCHAR", 45, 45, 0, <Null>, SQL_NULLABLE, <Null>, <Null>, 12,<Null>, 45, 2, "YES"}, {"N4267", "IN1", SQL_PARAM_INPUT, SQL_NUMERIC, "NUMERIC", 9, 11, 0, 10, SQL_NULLABLE, <Null>, <Null>, 2, <Null>, <Null>, 1, "YES"}, {"N4267", "INOUT1", SQL_PARAM_INPUT_OUTPUT, SQL_REAL, "REAL", 22, 4, 0, 2, SQL_NULLABLE, <Null>, <Null>, 7, <Null>, <Null>, 2, "YES"}, */ {_T("N4210"), _T("IN1"), SQL_PARAM_INPUT, SQL_TYPE_TIME, _T("TIME"), 8, 6, 0, 0, SQL_NULLABLE, _T(""), _T(""), 9, 2, 0, 1, _T("YES")}, {_T("N4260"), _T("IN1"), SQL_PARAM_INPUT, SQL_REAL, _T("REAL"), 22, 4, 0, 2, SQL_NULLABLE, _T(""), _T(""), 7, 0, 0, 1, _T("YES")}, {_T("N4260"), _T("INOUT1"), SQL_PARAM_INPUT_OUTPUT, SQL_INTEGER, _T("INTEGER SIGNED"),10, 4, 0, 10, SQL_NULLABLE, _T(""), _T(""), 4, 0, 0, 2, _T("YES")}, {_T("N4261"), _T("IN1"), SQL_PARAM_INPUT, SQL_NUMERIC, _T("NUMERIC SIGNED"),9, 11, 0, 10, SQL_NULLABLE, _T(""), _T(""), 2, 0, 0, 1, _T("YES")}, {_T("N4261"), _T("INOUT1"), SQL_PARAM_INPUT_OUTPUT, SQL_REAL, _T("REAL"), 22, 4, 0, 2, SQL_NULLABLE, _T(""), _T(""), 7, 0, 0, 2, _T("YES")}, {_T("N4264"), _T("IN1"), SQL_PARAM_INPUT, SQL_VARCHAR, _T("VARCHAR"), 30, 30, 0, 0, SQL_NULLABLE, _T(""), _T(""), 12,0, 30,1, _T("YES")}, {_T("N4264"), _T("OUT1"), SQL_PARAM_OUTPUT, SQL_VARCHAR, _T("VARCHAR"), 45, 45, 0, 0, SQL_NULLABLE, _T(""), _T(""), 12,0, 45,2, _T("YES")}, {_T("N4264A"), _T("IN1"), SQL_PARAM_INPUT, SQL_CHAR, _T("CHAR"), 30, 30, 0, 0, SQL_NULLABLE, _T(""), _T(""), 1,0, 30,1, _T("YES")}, {_T("N4264A"), _T("OUT1"), SQL_PARAM_OUTPUT, SQL_CHAR, _T("CHAR"), 45, 45, 0, 0, SQL_NULLABLE, _T(""), _T(""), 1,0, 45,2, _T("YES")}, {_T("N4264B"), _T("IN1"), SQL_PARAM_INPUT, SQL_VARCHAR, _T("VARCHAR"),2000,2000,0,0, SQL_NULLABLE, _T(""), _T(""), 12,0,2000,1, _T("YES")}, {_T("N4264B"), _T("OUT1"), SQL_PARAM_OUTPUT, SQL_VARCHAR, _T("VARCHAR"),2000,2000,0,0, SQL_NULLABLE, _T(""), _T(""), 12,0,2000,2, _T("YES")}, {_T("N4264C"), _T("IN1"), SQL_PARAM_INPUT, SQL_WVARCHAR, _T("NCHAR VARYING"),30, 60, 0, 0, SQL_NULLABLE, _T(""), _T(""), -9,0, 60,1, _T("YES")}, {_T("N4264C"), _T("OUT1"), SQL_PARAM_OUTPUT, SQL_WVARCHAR, _T("NCHAR VARYING"),45, 90, 0, 0, SQL_NULLABLE, _T(""), _T(""), -9,0, 90,2, _T("YES")}, {_T("N4264D"), _T("IN1"), SQL_PARAM_INPUT, SQL_WCHAR, _T("NCHAR"), 30, 60, 0, 0, SQL_NULLABLE, _T(""), _T(""), -8,0, 60,1, _T("YES")}, {_T("N4264D"), _T("OUT1"), SQL_PARAM_OUTPUT, SQL_WCHAR, _T("NCHAR"), 45, 90, 0, 0, SQL_NULLABLE, _T(""), _T(""), -8,0, 90,2, _T("YES")}, {_T("N4264E"), _T("IN1"), SQL_PARAM_INPUT, SQL_WVARCHAR,_T("NCHAR VARYING"),2000,4000,0,0, SQL_NULLABLE, _T(""), _T(""),-9,0,4000,1, _T("YES")}, {_T("N4264E"), _T("OUT1"), SQL_PARAM_OUTPUT, SQL_WVARCHAR,_T("NCHAR VARYING"),2000,4000,0,0, SQL_NULLABLE, _T(""), _T(""),-9,0,4000,2, _T("YES")}, {_T("N4267"), _T("IN1"), SQL_PARAM_INPUT, SQL_NUMERIC, _T("NUMERIC SIGNED"),9, 11, 0, 10, SQL_NULLABLE, _T(""), _T(""), 2, 0, 0, 1, _T("YES")}, {_T("N4267"), _T("INOUT1"), SQL_PARAM_INPUT_OUTPUT, SQL_REAL, _T("REAL"), 22, 4, 0, 2, SQL_NULLABLE, _T(""), _T(""), 7, 0, 0, 2, _T("YES")}, {_T("endloop"),} }; int i = 0, k = 0; TCHAR State[STATE_SIZE]; SDWORD NativeError; TCHAR buf[MAX_STRING_SIZE]; //TCHAR *charNameUCS2 = _T("NCHAR"); //TCHAR *varcharNameUCS2 = _T("NCHAR VARYING"); LogMsg(SHORTTIMESTAMP,_T("Begin testing API => MX Specific SQLProcedureColumns.\n")); //================================================================================================= //if(isUCS2) { // LogMsg(LINEBEFORE,_T("Setup for UCS2 mode testing: ColSize,BufferLen and CharOctetlen has to be doubled\n")); // k = sizeof(ProcCol)/sizeof(ProcCol[0]); // while(i < k) { // if(ProcCol[i].ColDataType == SQL_WCHAR) // { // ProcCol[i].ColDataType = SQL_WCHAR; // ProcCol[i].SQLDataType = SQL_WCHAR; // ProcCol[i].ColTypeName = charNameUCS2; // //ProcCol[i].ColSize *= 2; --> This is in character, no need to double // ProcCol[i].BufferLen *= 2; // ProcCol[i].CharOctetLen *= 2; // } // else if (ProcCol[i].ColDataType == SQL_WVARCHAR) // { // ProcCol[i].ColDataType = SQL_WVARCHAR; // ProcCol[i].SQLDataType = SQL_WVARCHAR; // ProcCol[i].ColTypeName = varcharNameUCS2; // //ProcCol[i].ColSize *= 2; --> This is in character, no need to double // ProcCol[i].BufferLen *= 2; // ProcCol[i].CharOctetLen *= 2; // } // else if (ProcCol[i].ColDataType == SQL_WLONGVARCHAR) // { // ProcCol[i].ColDataType = SQL_WLONGVARCHAR; // ProcCol[i].SQLDataType = SQL_WLONGVARCHAR; // ProcCol[i].ColTypeName = varcharNameUCS2; // //ProcCol[i].ColSize *= 2; --> This is in character, no need to double // ProcCol[i].BufferLen *= 2; // ProcCol[i].CharOctetLen *= 2; // } // else {} // i++; // } // i = 0; // k = 0; //} //================================================================================================= TEST_INIT; TESTCASE_BEGIN("Setup for SQLProcedureColumns tests\n"); if(!FullConnectWithOptions(pTestInfo, CONNECT_ODBC_VERSION_3)) { LogMsg(NONE,_T("Unable to connect\n")); //TEST_FAILED; TEST_RETURN; } henv = pTestInfo->henv; hdbc = pTestInfo->hdbc; hstmt = (SQLHANDLE)pTestInfo->hstmt; returncode = SQLAllocHandle(SQL_HANDLE_STMT, (SQLHANDLE)hdbc, &hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLAllocHandle")) { LogAllErrorsVer3(henv,hdbc,hstmt); FullDisconnect3(pTestInfo); //TEST_FAILED; TEST_RETURN; } //TESTCASE_END; ProcStr = (TCHAR *)malloc(MAX_NOS_SIZE); /* SEAQUEST */ myTestSch = (TCHAR *)malloc(MAX_NOS_SIZE); createSchStr = (TCHAR *)malloc(MAX_NOS_SIZE); setSchStr = (TCHAR *)malloc(MAX_NOS_SIZE); dropSchStr = (TCHAR *)malloc(MAX_NOS_SIZE); _tcscpy (myTestSch, _T("ODBC_PROCCOL_TEST")); _tcscpy (createSchStr, _T("create schema ")); _tcscat (createSchStr, pTestInfo->Catalog); _tcscat (createSchStr, _T(".")); _tcscat (createSchStr, myTestSch); _tcscpy (setSchStr, _T("set schema ")); _tcscat (setSchStr, pTestInfo->Catalog); _tcscat (setSchStr, _T(".")); _tcscat (setSchStr, myTestSch); _tcscpy (dropSchStr, _T("drop schema ")); _tcscat (dropSchStr, pTestInfo->Catalog); _tcscat (dropSchStr, _T(".")); _tcscat (dropSchStr, myTestSch); _tcscat (dropSchStr, _T(" cascade")); returncode = SQLExecDirect(hstmt,(SQLTCHAR*) dropSchStr,SQL_NTS); // if(!CHECKRC(SQL_SUCCESS,returncode,"Drop Schema")) // { // TEST_FAILED; // LogAllErrors(henv,hdbc,hstmt); // } returncode = SQLExecDirect(hstmt,(SQLTCHAR*) createSchStr,SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"Create Schema")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } returncode = SQLExecDirect(hstmt,(SQLTCHAR*) setSchStr,SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"Set Schema")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } /* end of SEAQUEST */ while (_tcsicmp(CreateProc[i].DropProc,_T("endloop")) != 0) { _tcscpy(ProcStr,_T("")); _tcscat(ProcStr,CreateProc[i].DropProc); SQLExecDirect(hstmt,(SQLTCHAR*) ProcStr,SQL_NTS); // cleanup _tcscpy(ProcStr,_T("")); _tcscat(ProcStr,CreateProc[i].CrtProc); _stprintf(Heading,_T("Adding Procedure => ")); _tcscat(Heading,ProcStr); _tcscat(Heading,_T("\n")); TESTCASE_BEGINW(Heading); returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ProcStr,SQL_NTS); if(returncode != SQL_SUCCESS) { returncode = SQLError((SQLHANDLE)NULL, (SQLHANDLE)NULL, hstmt, (SQLTCHAR*)State, &NativeError, (SQLTCHAR*)buf, MAX_STRING_SIZE, NULL); if (NativeError == -2013) { LogMsg(NONE, _T("Stored Procedures not supported\n")); _gTestCount--; free(ProcStr); FullDisconnect(pTestInfo); LogMsg(SHORTTIMESTAMP,_T("End testing API => MX Specific SQLProcedureColumns.\n")); TEST_RETURN; } else { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } } TESTCASE_END; i++; } _tcscpy(ProcCatalog, pTestInfo->Catalog); _tcscpy(ProcSchema, myTestSch /*SEAQUEST pTestInfo->Schema*/); _stprintf(Heading,_T("Test Positive Functionality of SQLProcedureColumns \n")); TESTCASE_BEGINW(Heading); returncode = SQLProcedureColumns(hstmt,(SQLTCHAR*)pTestInfo->Catalog,(SWORD)_tcslen(pTestInfo->Catalog),(SQLTCHAR*)myTestSch/* SEAQUEST pTestInfo->Schema*/,(SWORD)_tcslen(myTestSch/* SEAQUEST pTestInfo->Schema*/),(SQLTCHAR *)_T("%"),(SWORD)1,(SQLTCHAR *)_T("%"),(SWORD)1); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLProcedureColumns")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } if (returncode == SQL_SUCCESS) { _tcscpy(oProcCatalog,_T("")); _tcscpy(oProcSchema,_T("")); _tcscpy(oProcName,_T("")); _tcscpy(oColName,_T("")); oColType = 0; oColDataType = 0; _tcscpy(oColTypeName,_T("")); oColSize = 0; oBufferLen = 0; oDecDigits = 0; oColRadix = 0; oColNullable = 0; _tcscpy(oRemark,_T("")); _tcscpy(oColDef,_T("")); oSQLDataType = 0; oSQLDateTimeSub = 0; oCharOctetLen = 0; oOrdinalPos = 0; _tcscpy(oIsNullable,_T("")); SQLBindCol(hstmt,1,SQL_C_TCHAR,oProcCatalog,NAME_LEN,&oProcCataloglen); SQLBindCol(hstmt,2,SQL_C_TCHAR,oProcSchema,NAME_LEN,&oProcSchemalen); SQLBindCol(hstmt,3,SQL_C_TCHAR,oProcName,NAME_LEN,&oProcNamelen); SQLBindCol(hstmt,4,SQL_C_TCHAR,oColName,NAME_LEN,&oColNamelen); SQLBindCol(hstmt,5,SQL_C_SHORT,&oColType,0,&oColTypelen); SQLBindCol(hstmt,6,SQL_C_SHORT,&oColDataType,0,&oColDataTypelen); SQLBindCol(hstmt,7,SQL_C_TCHAR,oColTypeName,NAME_LEN,&oColTypeNamelen); SQLBindCol(hstmt,8,SQL_C_LONG,&oColSize,0,&oColSizelen); SQLBindCol(hstmt,9,SQL_C_LONG,&oBufferLen,0,&oBufferLenlen); SQLBindCol(hstmt,10,SQL_C_SHORT,&oDecDigits,0,&oDecDigitslen); SQLBindCol(hstmt,11,SQL_C_SHORT,&oColRadix,0,&oColRadixlen); SQLBindCol(hstmt,12,SQL_C_SHORT,&oColNullable,0,&oColNullablelen); SQLBindCol(hstmt,13,SQL_C_TCHAR,oRemark,REM_LEN,&oRemarklen); SQLBindCol(hstmt,14,SQL_C_TCHAR,oColDef,NAME_LEN,&oColDeflen); SQLBindCol(hstmt,15,SQL_C_SHORT,&oSQLDataType,0,&oSQLDataTypelen); SQLBindCol(hstmt,16,SQL_C_SHORT,&oSQLDateTimeSub,0,&oSQLDateTimeSublen); SQLBindCol(hstmt,17,SQL_C_LONG,&oCharOctetLen,0,&oCharOctetLenlen); SQLBindCol(hstmt,18,SQL_C_LONG,&oOrdinalPos,0,&oOrdinalPoslen); SQLBindCol(hstmt,19,SQL_C_TCHAR,oIsNullable,NAME_LEN,&oIsNullablelen); k = 0; i = 0; while (returncode == SQL_SUCCESS) { if(_tcscmp(ProcCol[i].ProcName,_T("endloop")) == 0) break; returncode = SQLFetch(hstmt); if((returncode!=SQL_NO_DATA_FOUND) &&(!CHECKRC(SQL_SUCCESS,returncode,"SQLFetch"))) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { if (returncode == SQL_SUCCESS) { k++; _stprintf(Heading,_T("SQLProcedureColumns: Comparing Results\n")); TESTCASE_BEGINW(Heading); if ((_tcsicmp(ProcCatalog,oProcCatalog) == 0) && (_tcsicmp(ProcSchema,oProcSchema) == 0) && (_tcsicmp(ProcCol[i].ProcName,oProcName) == 0) && (_tcsicmp(ProcCol[i].ColName,oColName) == 0) && (ProcCol[i].ColType == oColType) && (ProcCol[i].ColDataType == oColDataType) && (_tcsicmp(ProcCol[i].ColTypeName,oColTypeName) == 0) && (ProcCol[i].ColSize == oColSize) && (ProcCol[i].BufferLen == oBufferLen) && (ProcCol[i].DecDigits == oDecDigits) && (ProcCol[i].ColRadix == oColRadix) && (ProcCol[i].ColNullable == oColNullable) && (_tcsicmp(ProcCol[i].Remark,oRemark) == 0) && (_tcsicmp(ProcCol[i].ColDef,oColDef) == 0) && (ProcCol[i].SQLDataType == oSQLDataType) && (ProcCol[i].SQLDateTimeSub == oSQLDateTimeSub) && (ProcCol[i].CharOctetLen == oCharOctetLen) && (ProcCol[i].OrdinalPos == oOrdinalPos) && (_tcsicmp(ProcCol[i].IsNullable,oIsNullable) == 0)){ LogMsg(NONE,_T("ProcCatalog expect: %s and actual: %s are matched\n"),ProcCatalog,oProcCatalog); LogMsg(NONE,_T("ProcSchema expect: %s and actual: %s are matched\n"),ProcSchema,oProcSchema); LogMsg(NONE,_T("ProcName expect: %s and actual: %s are matched\n"),ProcCol[i].ProcName,oProcName); LogMsg(NONE,_T("ColName expect: %s and actual: %s are matched\n"),ProcCol[i].ColName,oColName); LogMsg(NONE,_T("ColType expect: %d and actual: %d are matched\n"),ProcCol[i].ColType,oColType); LogMsg(NONE,_T("ColDataType expect: %d and actual: %d are matched\n"),ProcCol[i].ColDataType,oColDataType); LogMsg(NONE,_T("ColTypeName expect: %s and actual: %s are matched\n"),ProcCol[i].ColTypeName,oColTypeName); LogMsg(NONE,_T("ColSize expect: %d and actual: %d are matched\n"),ProcCol[i].ColSize,oColSize); LogMsg(NONE,_T("BufferLen expect: %d and actual: %d are matched\n"),ProcCol[i].BufferLen,oBufferLen); LogMsg(NONE,_T("DecDigits expect: %d and actual: %d are matched\n"),ProcCol[i].DecDigits,oDecDigits); LogMsg(NONE,_T("ColRadix expect: %d and actual: %d are matched\n"),ProcCol[i].ColRadix,oColRadix); LogMsg(NONE,_T("ColNullable expect: %d and actual: %d are matched\n"),ProcCol[i].ColNullable,oColNullable); LogMsg(NONE,_T("Remark expect: %s and actual: %s are matched\n"),ProcCol[i].Remark,oRemark); LogMsg(NONE,_T("ColDef expect: %s and actual: %s are matched\n"),ProcCol[i].ColDef,oColDef); LogMsg(NONE,_T("SQLDataType expect: %d and actual: %d are matched\n"),ProcCol[i].SQLDataType,oSQLDataType); LogMsg(NONE,_T("SQLDateTimeSub expect: %d and actual: %d are matched\n"),ProcCol[i].SQLDateTimeSub,oSQLDateTimeSub); LogMsg(NONE,_T("CharOctetLen expect: %d and actual: %d are matched\n"),ProcCol[i].CharOctetLen,oCharOctetLen); LogMsg(NONE,_T("OrdinalPos expect: %d and actual: %d are matched\n"),ProcCol[i].OrdinalPos,oOrdinalPos); LogMsg(NONE,_T("IsNullable expect: %s and actual: %s are matched\n"),ProcCol[i].IsNullable,oIsNullable); } else { TEST_FAILED; if (_tcsicmp(ProcCatalog,oProcCatalog) != 0) LogMsg(ERRMSG,_T("ProcCatalog expect: %s and actual: %s are not matched\n"),ProcCatalog,oProcCatalog); else LogMsg(NONE,_T("ProcCatalog expect: %s and actual: %s are matched\n"),ProcCatalog,oProcCatalog); if (_tcsicmp(ProcSchema,oProcSchema) != 0) LogMsg(ERRMSG,_T("ProcSchema expect: %s and actual: %s are not matched\n"),ProcSchema,oProcSchema); else LogMsg(NONE,_T("ProcSchema expect: %s and actual: %s are matched\n"),ProcSchema,oProcSchema); if (_tcsicmp(ProcCol[i].ProcName,oProcName) != 0) LogMsg(ERRMSG,_T("ProcName expect: %s and actual: %s are not matched\n"),ProcCol[i].ProcName,oProcName); else LogMsg(NONE,_T("ProcName expect: %s and actual: %s are matched\n"),ProcCol[i].ProcName,oProcName); if (_tcsicmp(ProcCol[i].ColName,oColName) != 0) LogMsg(ERRMSG,_T("ColName expect: %s and actual: %s are not matched\n"),ProcCol[i].ColName,oColName); else LogMsg(NONE,_T("ColName expect: %s and actual: %s are matched\n"),ProcCol[i].ColName,oColName); if (ProcCol[i].ColType != oColType) LogMsg(ERRMSG,_T("ColType expect: %d and actual: %d are not matched\n"),ProcCol[i].ColType,oColType); else LogMsg(NONE,_T("ColType expect: %d and actual: %d are matched\n"),ProcCol[i].ColType,oColType); if (ProcCol[i].ColDataType != oColDataType) LogMsg(ERRMSG,_T("ColDataType expect: %d and actual: %d are not matched\n"),ProcCol[i].ColDataType,oColDataType); else LogMsg(NONE,_T("ColDataType expect: %d and actual: %d are matched\n"),ProcCol[i].ColDataType,oColDataType); if (_tcsicmp(ProcCol[i].ColTypeName,oColTypeName) != 0) LogMsg(ERRMSG,_T("ColTypeName expect: %s and actual: %s are not matched\n"),ProcCol[i].ColTypeName,oColTypeName); else LogMsg(NONE,_T("ColTypeName expect: %s and actual: %s are matched\n"),ProcCol[i].ColTypeName,oColTypeName); if (ProcCol[i].ColSize != oColSize) LogMsg(ERRMSG,_T("ColSize expect: %d and actual: %d are not matched\n"),ProcCol[i].ColSize,oColSize); else LogMsg(NONE,_T("ColSize expect: %d and actual: %d are matched\n"),ProcCol[i].ColSize,oColSize); if (ProcCol[i].BufferLen != oBufferLen) LogMsg(ERRMSG,_T("BufferLen expect: %d and actual: %d are not matched\n"),ProcCol[i].BufferLen,oBufferLen); else LogMsg(NONE,_T("BufferLen expect: %d and actual: %d are matched\n"),ProcCol[i].BufferLen,oBufferLen); if (ProcCol[i].DecDigits != oDecDigits) LogMsg(ERRMSG,_T("DecDigits expect: %d and actual: %d are not matched\n"),ProcCol[i].DecDigits,oDecDigits); else LogMsg(NONE,_T("DecDigits expect: %d and actual: %d are matched\n"),ProcCol[i].DecDigits,oDecDigits); if (ProcCol[i].ColRadix != oColRadix) LogMsg(ERRMSG,_T("ColRadix expect: %d and actual: %d are not matched\n"),ProcCol[i].ColRadix,oColRadix); else LogMsg(NONE,_T("ColRadix expect: %d and actual: %d are matched\n"),ProcCol[i].ColRadix,oColRadix); if (ProcCol[i].ColNullable != oColNullable) LogMsg(ERRMSG,_T("ColNullable expect: %d and actual: %d are not matched\n"),ProcCol[i].ColNullable,oColNullable); else LogMsg(NONE,_T("ColNullable expect: %d and actual: %d are matched\n"),ProcCol[i].ColNullable,oColNullable); if (_tcsicmp(ProcCol[i].Remark,oRemark) != 0) LogMsg(ERRMSG,_T("Remark expect: %s and actual: %s are not matched\n"),ProcCol[i].Remark,oRemark); else LogMsg(NONE,_T("Remark expect: %s and actual: %s are matched\n"),ProcCol[i].Remark,oRemark); if (_tcsicmp(ProcCol[i].ColDef,oColDef) != 0) LogMsg(ERRMSG,_T("Remark expect: %s and actual: %s are not matched\n"),ProcCol[i].ColDef,oColDef); else LogMsg(NONE,_T("Remark expect: %s and actual: %s are matched\n"),ProcCol[i].ColDef,oColDef); if (ProcCol[i].SQLDataType != oSQLDataType) LogMsg(ERRMSG,_T("SQLDataType expect: %d and actual: %d are not matched\n"),ProcCol[i].SQLDataType,oSQLDataType); else LogMsg(NONE,_T("SQLDataType expect: %d and actual: %d are matched\n"),ProcCol[i].SQLDataType,oSQLDataType); if (ProcCol[i].SQLDateTimeSub != oSQLDateTimeSub) LogMsg(ERRMSG,_T("SQLDateTimeSub expect: %d and actual: %d are not matched\n"),ProcCol[i].SQLDateTimeSub,oSQLDateTimeSub); else LogMsg(NONE,_T("SQLDateTimeSub expect: %d and actual: %d are matched\n"),ProcCol[i].SQLDateTimeSub,oSQLDateTimeSub); if (ProcCol[i].CharOctetLen != oCharOctetLen) LogMsg(ERRMSG,_T("CharOctetLen expect: %d and actual: %d are not matched\n"),ProcCol[i].CharOctetLen,oCharOctetLen); else LogMsg(NONE,_T("CharOctetLen expect: %d and actual: %d are matched\n"),ProcCol[i].CharOctetLen,oCharOctetLen); if (ProcCol[i].OrdinalPos != oOrdinalPos) LogMsg(ERRMSG,_T("OrdinalPos expect: %d and actual: %d are not matched\n"),ProcCol[i].OrdinalPos,oOrdinalPos); else LogMsg(NONE,_T("OrdinalPos expect: %d and actual: %d are matched\n"),ProcCol[i].OrdinalPos,oOrdinalPos); if (_tcsicmp(ProcCol[i].IsNullable,oIsNullable) != 0) LogMsg(ERRMSG,_T("IsNullable expect: %s and actual: %s are not matched\n"),ProcCol[i].IsNullable,oIsNullable); else LogMsg(NONE,_T("IsNullable expect: %s and actual: %s are matched\n"),ProcCol[i].IsNullable,oIsNullable); } } } if(k == 0) { TEST_FAILED; LogMsg(ERRMSG,_T("No Data Found => Atleast one row should be fetched\n")); } TESTCASE_END; _tcscpy(oProcCatalog,_T("")); _tcscpy(oProcSchema,_T("")); _tcscpy(oProcName,_T("")); _tcscpy(oColName,_T("")); oColType = 0; oColDataType = 0; _tcscpy(oColTypeName,_T("")); oColSize = 0; oBufferLen = 0; oDecDigits = 0; oColRadix = 0; oColNullable = 0; _tcscpy(oRemark,_T("")); _tcscpy(oColDef,_T("")); oSQLDataType = 0; oSQLDateTimeSub = 0; oCharOctetLen = 0; oOrdinalPos = 0; _tcscpy(oIsNullable,_T("")); i++; } // while } SQLFreeStmt(hstmt,SQL_UNBIND); SQLFreeStmt(hstmt,SQL_CLOSE); i=0; while (_tcsicmp(CreateProc[i].DropProc,_T("endloop")) != 0) { _tcscpy(ProcStr,_T("")); _tcscat(ProcStr,CreateProc[i].DropProc); returncode = SQLExecDirect(hstmt,(SQLTCHAR*) ProcStr,SQL_NTS); // cleanup if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } i++; } SQLFreeStmt(hstmt,SQL_UNBIND); SQLFreeStmt(hstmt,SQL_CLOSE); //======================================================================================================== _stprintf(Heading,_T("SQLProcedureColumns: Negative test with NULL handle\n")); TESTCASE_BEGINW(Heading); hstmt = (SQLHANDLE)NULL; _tcscpy(ProcName,_T("junkproc")); _tcscpy(ColName,_T("C1")); returncode = SQLProcedureColumns(hstmt,(SQLTCHAR*)pTestInfo->Catalog,(SWORD)_tcslen(pTestInfo->Catalog),(SQLTCHAR*)myTestSch /* SEAQUEST pTestInfo->Schema */,(SWORD)_tcslen(myTestSch /* SEAQUEST pTestInfo->Schema*/),(SQLTCHAR*)ProcName,(SWORD)_tcslen(ProcName),(SQLTCHAR*)ColName,(SWORD)_tcslen(ColName)); if(!CHECKRC(SQL_INVALID_HANDLE,returncode,"SQLProcedureColumns")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } TESTCASE_END; //======================================================================================================== returncode = SQLExecDirect(hstmt,(SQLTCHAR*) dropSchStr,SQL_NTS); free(ProcStr); FullDisconnect3(pTestInfo); LogMsg(SHORTTIMESTAMP+LINEAFTER,_T("End testing API => MX Specific SQLProcedureColumns.\n")); TEST_RETURN; }
/* --------------------------------------------------------- TestSQLNumResultsCol --------------------------------------------------------- */ PassFail TestSQLNumResultCols(TestInfo *pTestInfo) { TEST_DECLARE; TCHAR Heading[MAX_STRING_SIZE]; RETCODE returncode; SQLHANDLE henv; SQLHANDLE hdbc; SQLHANDLE hstmt; SWORD col; TCHAR *ExecDirStr[] = {_T("--"),_T("--"),_T("--"),_T("--"),_T("--"),_T("--"),_T("--"),_T("--"),_T("--"),_T("--"),_T("--"),_T("--"),_T("--"),_T("--"),_T("--"),_T("--"),_T("--"),_T("--"),_T("--"),_T("--")}; TCHAR *TestCase[] = { _T("after preparing stmt "), _T("after preparing & executing stmt "), _T("after preparing, executing & fetching stmt "), _T("after execdirect stmt "), _T("after execdirect & fetching stmt "), _T("after preparing param stmt "), _T("after preparing & binding stmt "), _T("after preparing, binding & executing stmt "), _T("after preparing, binding, executing & fetching stmt ") }; int lend = 9, iend = 5; SQLUSMALLINT i = 0, l = 0; int expcol[] = {1,2,6,9,2}; SQLLEN cbIn = SQL_NTS; //=========================================================================================================== var_list_t *var_list; var_list = load_api_vars(_T("SQLNumResultCols"), charset_file); if (var_list == NULL) return FAILED; ExecDirStr[0] = var_mapping(_T("SQLNumResultCols_ExecDirStr_0"), var_list); ExecDirStr[1] = var_mapping(_T("SQLNumResultCols_ExecDirStr_1"), var_list); ExecDirStr[2] = var_mapping(_T("SQLNumResultCols_ExecDirStr_2"), var_list); ExecDirStr[3] = var_mapping(_T("SQLNumResultCols_ExecDirStr_3"), var_list); ExecDirStr[4] = var_mapping(_T("SQLNumResultCols_ExecDirStr_4"), var_list); ExecDirStr[5] = var_mapping(_T("SQLNumResultCols_ExecDirStr_5"), var_list); ExecDirStr[6] = var_mapping(_T("SQLNumResultCols_ExecDirStr_6"), var_list); ExecDirStr[7] = var_mapping(_T("SQLNumResultCols_ExecDirStr_7"), var_list); ExecDirStr[8] = var_mapping(_T("SQLNumResultCols_ExecDirStr_8"), var_list); ExecDirStr[9] = var_mapping(_T("SQLNumResultCols_ExecDirStr_9"), var_list); ExecDirStr[10] = var_mapping(_T("SQLNumResultCols_ExecDirStr_10"), var_list); ExecDirStr[11] = var_mapping(_T("SQLNumResultCols_ExecDirStr_11"), var_list); ExecDirStr[12] = var_mapping(_T("SQLNumResultCols_ExecDirStr_12"), var_list); ExecDirStr[13] = var_mapping(_T("SQLNumResultCols_ExecDirStr_13"), var_list); ExecDirStr[14] = var_mapping(_T("SQLNumResultCols_ExecDirStr_14"), var_list); ExecDirStr[15] = var_mapping(_T("SQLNumResultCols_ExecDirStr_15"), var_list); ExecDirStr[16] = var_mapping(_T("SQLNumResultCols_ExecDirStr_16"), var_list); ExecDirStr[17] = var_mapping(_T("SQLNumResultCols_ExecDirStr_17"), var_list); ExecDirStr[18] = var_mapping(_T("SQLNumResultCols_ExecDirStr_18"), var_list); ExecDirStr[19] = var_mapping(_T("SQLNumResultCols_ExecDirStr_19"), var_list); //=========================================================================================================== LogMsg(LINEBEFORE+SHORTTIMESTAMP,_T("Begin testing API =>SQLNumResultcols.\n")); TEST_INIT; TESTCASE_BEGIN("Setup for SQLNumResultCols tests\n"); if(!FullConnect(pTestInfo)){ LogMsg(NONE,_T("Unable to connect\n")); TEST_FAILED; TEST_RETURN; } henv = pTestInfo->henv; hdbc = pTestInfo->hdbc; hstmt = (SQLHANDLE)pTestInfo->hstmt; returncode = SQLAllocStmt((SQLHANDLE)hdbc, &hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLAllocStmt")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } TESTCASE_END; // end of setup for (l = 0; l < lend; l++){ for (i = 0; i < iend; i++){ //================================================================================== _stprintf(Heading,_T("Test Positive Functionality of SQLNumResultCols ")); _tcscat(Heading, TestCase[l]); _tcscat(Heading, ExecDirStr[i+iend+iend+iend]); _tcscat(Heading, _T("\n")); TESTCASE_BEGINW(Heading); if ((i != (iend-1)) && (l < 5)){ SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i],SQL_NTS); /* cleanup */ returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i+iend],SQL_NTS); /* create table */ if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else{ returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend],SQL_NTS); /* insert into table */ if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else{ switch( l ) { case 0: returncode = SQLPrepare(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend+iend], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLPrepare")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } break; case 1 : returncode = SQLPrepare(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend+iend], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLPrepare")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else{ returncode = SQLExecute(hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecute")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } } break; case 2 : returncode = SQLPrepare(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend+iend], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLPrepare")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else{ returncode = SQLExecute(hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecute")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else{ returncode = SQLFetch(hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLFetch")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } } } break; case 3 : returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend+iend], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } break; case 4 : returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend+iend], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else{ returncode = SQLFetch(hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLFetch")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } } break; } if (returncode == SQL_SUCCESS){ returncode = SQLNumResultCols(hstmt, &col); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLNumResultCols")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } if (col == expcol[i]) { LogMsg(NONE,_T("expect: %d and actual: %d are matched\n"),expcol[i], col); } else { TEST_FAILED; LogMsg(NONE,_T("expect: %d and actual: %d are not matched\n"),expcol[i], col); } } SQLFreeStmt(hstmt,SQL_CLOSE); SQLExecDirect(hstmt,(SQLTCHAR*) ExecDirStr[i],SQL_NTS); /* cleanup */ } } } else if ((i == (iend-1)) && (l >= 5)){ SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i],SQL_NTS); /* cleanup */ returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i+iend],SQL_NTS); /* create table */ if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else{ returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend],SQL_NTS); /* insert into table */ if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else{ switch( l ){ case 5 : returncode = SQLPrepare(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend+iend], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLPrepare")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } break; case 6 : returncode = SQLPrepare(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend+iend], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLPrepare")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else{ returncode = SQLBindParameter(hstmt,1,SQL_PARAM_INPUT,SQL_C_TCHAR,SQL_INTEGER,0,0,(SQLPOINTER)_T("10"),300,&cbIn); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindparameter")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else{ returncode = SQLBindParameter(hstmt,2,SQL_PARAM_INPUT,SQL_C_TCHAR,SQL_INTEGER,0,0,(SQLPOINTER)_T("20"),300,&cbIn); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindParameter")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } } } break; case 7 : returncode = SQLPrepare(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend+iend], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLPrepare")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else{ returncode = SQLBindParameter(hstmt,1,SQL_PARAM_INPUT,SQL_C_TCHAR,SQL_INTEGER,0,0,(SQLPOINTER)_T("10"),300,&cbIn); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindparameter")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else{ returncode = SQLBindParameter(hstmt,2,SQL_PARAM_INPUT,SQL_C_TCHAR,SQL_INTEGER,0,0,(SQLPOINTER)_T("20"),300,&cbIn); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindParameter")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else{ returncode = SQLExecute(hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecute")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } } } } break; case 8 : returncode = SQLPrepare(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend+iend], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLPrepare")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else{ returncode = SQLBindParameter(hstmt,1,SQL_PARAM_INPUT,SQL_C_TCHAR,SQL_INTEGER,0,0,(SQLPOINTER)_T("10"),300,&cbIn); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindparameter")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else{ returncode = SQLBindParameter(hstmt,2,SQL_PARAM_INPUT,SQL_C_TCHAR,SQL_INTEGER,0,0,(SQLPOINTER)_T("20"),300,&cbIn); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindParameter")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else{ returncode = SQLExecute(hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecute")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else{ returncode = SQLFetch(hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLFetch")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } } } } } break; } if (returncode == SQL_SUCCESS){ returncode = SQLNumResultCols(hstmt, &col); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLNumResultCols")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } if (col == expcol[i]) { LogMsg(NONE,_T("expect: %d and actual: %d are matched\n"),expcol[i], col); } else { TEST_FAILED; LogMsg(NONE,_T("expect: %d and actual: %d are not matched\n"),expcol[i], col); } } SQLFreeStmt(hstmt,SQL_CLOSE); SQLExecDirect(hstmt,(SQLTCHAR*) ExecDirStr[i],SQL_NTS); /* cleanup */ } } } TESTCASE_END; } /* iend loop */ } /* lend loop */ FullDisconnect(pTestInfo); LogMsg(SHORTTIMESTAMP+LINEAFTER,_T("End testing API => SQLNumResultcols.\n")); free_list(var_list); TEST_RETURN; }
/* --------------------------------------------------------- TestSQLDescribeCol for MP Specific --------------------------------------------------------- */ PassFail TestMXSQLDescribeCol(TestInfo *pTestInfo) { TEST_DECLARE; TCHAR Heading[MAX_STRING_SIZE]; RETCODE returncode; SQLHANDLE henv, hdbc, hstmt; UWORD icol; SWORD numcol, st, cs, cnull, cl, colsize = 2; SQLULEN cp; TCHAR cn[COLNAME_LEN]; TCHAR *colname[COL_LEN]; TCHAR *ExecDirStr[12]; TCHAR *colVal[2]; #ifndef _WM #ifdef UNICODE SWORD SQLType[] = {SQL_WCHAR,SQL_WVARCHAR,SQL_DECIMAL,SQL_NUMERIC,SQL_SMALLINT,SQL_INTEGER, SQL_REAL,SQL_DOUBLE,SQL_DOUBLE,SQL_DATE,SQL_TIME,SQL_TIMESTAMP,SQL_WVARCHAR,SQL_BIGINT, SQL_NUMERIC,SQL_NUMERIC,SQL_NUMERIC,SQL_NUMERIC,SQL_NUMERIC,SQL_NUMERIC,SQL_NUMERIC, SQL_WCHAR,SQL_WVARCHAR,SQL_WVARCHAR,SQL_CHAR,SQL_VARCHAR,SQL_WVARCHAR}; SQLULEN ColPrec[] = {254,254,18,18,5,10,7,15,15,10,8,26,2000,19,19,19,128,128,10,18,30,254,254,2000,1016,1016,2000}; SWORD ColScale[]= {0,0,6,6,0,0,0,0,0,0,0,6,0,0,0,6,0,128,5,5,10,0,0,0,0,0,0}; #else SWORD SQLType[] = {SQL_CHAR,SQL_VARCHAR,SQL_DECIMAL,SQL_NUMERIC,SQL_SMALLINT,SQL_INTEGER, SQL_REAL,SQL_DOUBLE,SQL_DOUBLE,SQL_DATE,SQL_TIME,SQL_TIMESTAMP,SQL_VARCHAR,SQL_BIGINT, SQL_WCHAR,SQL_WVARCHAR,SQL_WVARCHAR, SQL_NUMERIC,SQL_NUMERIC,SQL_NUMERIC,SQL_NUMERIC,SQL_NUMERIC,SQL_NUMERIC,SQL_NUMERIC }; SQLULEN ColPrec[] = {254,254,18,18,5,10,7,15,15,10,8,26,2000,19,254,127,2000,19,19,128,128,10,18,30}; SWORD ColScale[]= {0, 0, 6, 6, 0,0, 0,0, 0, 0, 0,6, 0, 0, 0, 0, 0, 0, 6, 0, 128,5, 5, 10}; #endif #else SWORD SQLType[] = {SQL_CHAR,SQL_VARCHAR,SQL_DECIMAL,SQL_NUMERIC,SQL_SMALLINT,SQL_INTEGER, SQL_REAL,SQL_DOUBLE,SQL_DOUBLE,SQL_CHAR,SQL_TIME,SQL_TIMESTAMP,SQL_LONGVARCHAR,SQL_BIGINT, SQL_WCHAR,SQL_WVARCHAR,SQL_WLONGVARCHAR, SQL_NUMERIC,SQL_NUMERIC,SQL_NUMERIC,SQL_NUMERIC,SQL_NUMERIC,SQL_NUMERIC,SQL_NUMERIC}; SQLULEN ColPrec[] = {254,127,18,18,5,10,7,15,15,8,8,26,2000,19,254,127,2000,19,19,128,128,10,18,30}; SWORD ColScale[]= {0,0,6,6,0,0,0,0,0,0,0,6,0,0,0,6,0,128,5,5,10,0,0,0,0,0,0}; #endif TCHAR TempType1[50],TempType2[50]; SWORD ColNullable[] = {SQL_NULLABLE,SQL_NO_NULLS,SQL_NULLABLE}; TCHAR *TestCase[] = { _T("before preparing stmt "), _T("before preparing & executing stmt "), _T("before preparing, executing & fetching stmt "), _T("before execdirect stmt "), _T("before execdirect & fetching stmt "), _T("before preparing param stmt "), _T("before preparing & binding stmt "), _T("before preparing, binding & executing stmt "), _T("before preparing, binding, executing & fetching stmt ") }; int lend = 9, iend = 3; SQLUSMALLINT i = 0, l = 0; SQLLEN cbIn = SQL_NTS; //=========================================================================================================== var_list_t *var_list; var_list = load_api_vars(_T("SQLDescribeColumns"), charset_file); if (var_list == NULL) return FAILED; //print_list(var_list); colname[0] = var_mapping(_T("SQLDescribeColumns_colname_1"), var_list); colname[1] = var_mapping(_T("SQLDescribeColumns_colname_2"), var_list); colname[2] = var_mapping(_T("SQLDescribeColumns_colname_3"), var_list); colname[3] = var_mapping(_T("SQLDescribeColumns_colname_4"), var_list); colname[4] = var_mapping(_T("SQLDescribeColumns_colname_5"), var_list); colname[5] = var_mapping(_T("SQLDescribeColumns_colname_6"), var_list); colname[6] = var_mapping(_T("SQLDescribeColumns_colname_7"), var_list); colname[7] = var_mapping(_T("SQLDescribeColumns_colname_8"), var_list); colname[8] = var_mapping(_T("SQLDescribeColumns_colname_9"), var_list); colname[9] = var_mapping(_T("SQLDescribeColumns_colname_10"), var_list); colname[10] = var_mapping(_T("SQLDescribeColumns_colname_11"), var_list); colname[11] = var_mapping(_T("SQLDescribeColumns_colname_12"), var_list); colname[12] = var_mapping(_T("SQLDescribeColumns_colname_13"), var_list); colname[13] = var_mapping(_T("SQLDescribeColumns_colname_14"), var_list); colname[14] = var_mapping(_T("SQLDescribeColumns_colname_15"), var_list); colname[15] = var_mapping(_T("SQLDescribeColumns_colname_16"), var_list); colname[16] = var_mapping(_T("SQLDescribeColumns_colname_17"), var_list); colname[17] = var_mapping(_T("SQLDescribeColumns_colname_18"), var_list); colname[18] = var_mapping(_T("SQLDescribeColumns_colname_19"), var_list); colname[19] = var_mapping(_T("SQLDescribeColumns_colname_20"), var_list); colname[20] = var_mapping(_T("SQLDescribeColumns_colname_21"), var_list); colname[21] = var_mapping(_T("SQLDescribeColumns_colname_22"), var_list); colname[22] = var_mapping(_T("SQLDescribeColumns_colname_23"), var_list); colname[23] = var_mapping(_T("SQLDescribeColumns_colname_24"), var_list); #ifdef UNICODE colname[24] = var_mapping(_T("SQLDescribeColumns_colname_25"), var_list); colname[25] = var_mapping(_T("SQLDescribeColumns_colname_26"), var_list); colname[26] = var_mapping(_T("SQLDescribeColumns_colname_27"), var_list); #endif ExecDirStr[0] = var_mapping(_T("SQLDescribeColumns_ExecDirStr_1"), var_list); ExecDirStr[1] = var_mapping(_T("SQLDescribeColumns_ExecDirStr_2"), var_list); ExecDirStr[2] = var_mapping(_T("SQLDescribeColumns_ExecDirStr_3"), var_list); ExecDirStr[3] = var_mapping(_T("SQLDescribeColumns_ExecDirStr_4"), var_list); ExecDirStr[4] = var_mapping(_T("SQLDescribeColumns_ExecDirStr_5"), var_list); ExecDirStr[5] = var_mapping(_T("SQLDescribeColumns_ExecDirStr_6"), var_list); ExecDirStr[6] = var_mapping(_T("SQLDescribeColumns_ExecDirStr_7"), var_list); ExecDirStr[7] = var_mapping(_T("SQLDescribeColumns_ExecDirStr_8"), var_list); ExecDirStr[8] = var_mapping(_T("SQLDescribeColumns_ExecDirStr_9"), var_list); ExecDirStr[9] = var_mapping(_T("SQLDescribeColumns_ExecDirStr_10"), var_list); ExecDirStr[10] = var_mapping(_T("SQLDescribeColumns_ExecDirStr_11"), var_list); ExecDirStr[11] = var_mapping(_T("SQLDescribeColumns_ExecDirStr_12"), var_list); colVal[0] = var_mapping(_T("SQLDescribeColumns_colVal_1"), var_list); colVal[1] = var_mapping(_T("SQLDescribeColumns_colVal_2"), var_list); //=========================================================================================================== //if(isUCS2) { // LogMsg(NONE,_T("Setup for UCS2 mode testing: ColPrec has to be doubled\n")); // l = sizeof(SQLType)/sizeof(SQLType[0]); // while(i < l) { // if(SQLType[i] == SQL_WCHAR) { // SQLType[i] = SQL_WCHAR; // //ColPrec[i] *= 2; --> This is in character, so no need to double // } // else if (SQLType[i] == SQL_WVARCHAR) { // SQLType[i] = SQL_WVARCHAR; // //ColPrec[i] *= 2; --> This is in character, so no need to double // } // else if (SQLType[i] == SQL_WLONGVARCHAR) { // SQLType[i] = SQL_WLONGVARCHAR; // //ColPrec[i] *= 2; --> This is in character, so no need to double // } // else { // } // i++; // } // i = 0; // l = 0; //} //=========================================================================================================== LogMsg(LINEBEFORE+SHORTTIMESTAMP,_T("Begin testing API => MX Specific SQLDescribeColumns.\n")); TEST_INIT; TESTCASE_BEGIN("Setup for SQLDescribCol tests\n"); if(!FullConnect(pTestInfo)) { LogMsg(NONE,_T("Unable to connect\n")); TEST_FAILED; TEST_RETURN; } henv = pTestInfo->henv; hdbc = pTestInfo->hdbc; hstmt = (SQLHANDLE)pTestInfo->hstmt; returncode = SQLAllocStmt((SQLHANDLE)hdbc, &hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLAllocStmt")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } TESTCASE_END; // end of setup for (l = 0; l < lend; l++) { for (i = 0; i < iend; i++) { //================================================================================== _stprintf(Heading,_T("SQLDescribeCol: Test #%d.%d\n"),l,i); TESTCASE_BEGINW(Heading); if ((i != (iend-1)) && (l < 5)) { SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i],SQL_NTS); /* cleanup */ returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i+iend],SQL_NTS); /* create table */ LogMsg(NONE,_T("%s\n"), ExecDirStr[i+iend]); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend],SQL_NTS); /* insert into table */ if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { LogMsg(NONE,_T("SQLDescribeCol: %s\n"),TestCase[l]); LogMsg(NONE,_T(" %s\n"),ExecDirStr[i+iend+iend+iend]); switch( l ) { case 0: returncode = SQLPrepare(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend+iend], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLPrepare")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } break; case 1 : returncode = SQLPrepare(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend+iend], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLPrepare")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { returncode = SQLExecute(hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecute")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } } break; case 2 : returncode = SQLPrepare(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend+iend], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLPrepare")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { returncode = SQLExecute(hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecute")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { returncode = SQLFetch(hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLFetch")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } } } break; case 3 : returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend+iend], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } break; case 4 : returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend+iend], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { returncode = SQLFetch(hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLFetch")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } } break; } if (returncode == SQL_SUCCESS) { returncode=SQLNumResultCols(hstmt, &numcol); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLNumResultCols")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } for (icol = 1; icol <= numcol; icol++) { LogMsg(LINEBEFORE,_T("SQLDescribeCol: checking Column #%d\n"),icol); returncode = SQLDescribeCol(hstmt,icol,(SQLTCHAR*)cn,COLNAME_LEN,&cl,&st,&cp,&cs,&cnull); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLDescribeCol")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } colsize=_tcslen(colname[icol-1]); if(isCharSet == TRUE) colsize -= 2; if ((cwcscmp(cn,colname[icol-1],FALSE) == 0) && (cl == colsize) && (st == SQLType[icol-1]) && (cp == ColPrec[icol-1]) && (cs == ColScale[icol-1]) && (cnull == ColNullable[i])) { LogMsg(NONE,_T("colname expect: %s and actual: %s are matched\n"),colname[icol-1],cn); LogMsg(NONE,_T("ColNameLen expect: %d and actual: %d are matched\n"),colsize,cl); LogMsg(NONE,_T("SQLType expect: %s and actual: %s are matched\n"), SQLTypeToChar(SQLType[icol-1],TempType1),SQLTypeToChar(st,TempType2)); LogMsg(NONE,_T("ColPrec expect: %d and actual: %d are matched\n"),ColPrec[icol-1],cp); LogMsg(NONE,_T("ColScale expect: %d and actual: %d are matched\n"),ColScale[icol-1],cs); LogMsg(NONE,_T("ColNullable expect: %s and actual: %s are matched\n\n"), SQLNullToChar(ColNullable[i],TempType1),SQLNullToChar(cnull,TempType2)); } else { TEST_FAILED; if (cwcscmp(cn,colname[icol-1],FALSE) != 0) LogMsg(ERRMSG,_T("colname expect: %s and actual: %s are not matched line %d\n"),colname[icol-1],cn,__LINE__); if (cl != colsize) LogMsg(ERRMSG,_T("ColNameLen expect: %d and actual: %d are not matched line %d\n"),colsize,cl,__LINE__); if (st != SQLType[icol-1]) LogMsg(ERRMSG,_T("SQLType expect: %s and actual: %s are not matched line %d\n"), SQLTypeToChar(SQLType[icol-1],TempType1),SQLTypeToChar(st,TempType2),__LINE__); if (cp != ColPrec[icol-1]) LogMsg(ERRMSG,_T("ColPrec expect: %d and actual: %d are not matched line %d\n"),ColPrec[icol-1],cp,__LINE__); if (cs != ColScale[icol-1]) LogMsg(ERRMSG,_T("ColScale expect: %d and actual: %d are not matched line %d\n"),ColScale[icol-1],cs,__LINE__); if (cnull != ColNullable[i]) LogMsg(ERRMSG,_T("ColNullable expect: %s and actual: %s are not matched line %d\n\n"), SQLNullToChar(ColNullable[i],TempType1),SQLNullToChar(cnull,TempType2),__LINE__); } } /* end icol loop */ } else { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } SQLFreeStmt(hstmt,SQL_CLOSE); SQLExecDirect(hstmt,(SQLTCHAR*) ExecDirStr[i],SQL_NTS); /* cleanup */ } } } else if ((i == (iend-1)) && (l >= 5)) { SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i],SQL_NTS); /* cleanup */ returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i+iend],SQL_NTS); /* create table */ LogMsg(NONE,_T("%s\n"), ExecDirStr[i+iend]); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend],SQL_NTS); /* insert into table */ if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { LogMsg(NONE,_T("SQLDescribeCol: %s\n"),TestCase[l]); LogMsg(NONE,_T(" %s\n"),ExecDirStr[i+iend+iend+iend]); switch( l ) { case 5 : returncode = SQLPrepare(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend+iend], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLPrepare")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } break; case 6 : returncode = SQLPrepare(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend+iend], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLPrepare")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { returncode = SQLBindParameter(hstmt,1,SQL_PARAM_INPUT,SQL_C_TCHAR,SQL_WCHAR,2000,0,(SQLPOINTER)colVal[0],300,&cbIn); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindParameter")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } returncode = SQLBindParameter(hstmt,2,SQL_PARAM_INPUT,SQL_C_TCHAR,SQL_WCHAR,2000,0,(SQLPOINTER)colVal[1],300,&cbIn); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindParameter")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } } break; case 7 : returncode = SQLPrepare(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend+iend], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLPrepare")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { returncode = SQLBindParameter(hstmt,1,SQL_PARAM_INPUT,SQL_C_TCHAR,SQL_WCHAR,2000,0,(SQLPOINTER)colVal[0],300,&cbIn); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindParameter")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } returncode = SQLBindParameter(hstmt,2,SQL_PARAM_INPUT,SQL_C_TCHAR,SQL_WCHAR,2000,0,(SQLPOINTER)colVal[1],300,&cbIn); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindParameter")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } returncode = SQLExecute(hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecute")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } } break; case 8 : returncode = SQLPrepare(hstmt,(SQLTCHAR*)ExecDirStr[i+iend+iend+iend], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLPrepare")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { returncode = SQLBindParameter(hstmt,1,SQL_PARAM_INPUT,SQL_C_TCHAR,SQL_WCHAR,2000,0,(SQLPOINTER)colVal[0],300,&cbIn); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindParameter")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } returncode = SQLBindParameter(hstmt,2,SQL_PARAM_INPUT,SQL_C_TCHAR,SQL_WCHAR,2000,0,(SQLPOINTER)colVal[1],300,&cbIn); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindParameter")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } returncode = SQLExecute(hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecute")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { returncode = SQLFetch(hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLFetch")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } } } break; } if (returncode == SQL_SUCCESS) { SQLNumResultCols(hstmt, &numcol); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLNumResultCols")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } for (icol = 1; icol <= numcol; icol++) { LogMsg(LINEBEFORE,_T("SQLDescribeCol: checking Column #%d\n"),icol); returncode = SQLDescribeCol(hstmt,icol,(SQLTCHAR*)cn,COLNAME_LEN,&cl,&st,&cp,&cs,&cnull); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLDescribeCol")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } colsize=_tcslen(colname[icol-1]); if(isCharSet == TRUE) colsize -= 2; if ((cwcscmp(cn,colname[icol-1],FALSE) == 0) && (cl == colsize) && (st == SQLType[icol-1]) && (cp == ColPrec[icol-1]) && (cs == ColScale[icol-1]) && (cnull == ColNullable[i])) { LogMsg(NONE,_T("colname expect: %s and actual: %s are matched\n"),colname[icol-1],cn); LogMsg(NONE,_T("ColNameLen expect: %d and actual: %d are matched\n"),colsize,cl); LogMsg(NONE,_T("SQLType expect: %s and actual: %s are matched\n"), SQLTypeToChar(SQLType[icol-1],TempType1),SQLTypeToChar(st,TempType2)); LogMsg(NONE,_T("ColPrec expect: %d and actual: %d are matched\n"),ColPrec[icol-1],cp); LogMsg(NONE,_T("ColScale expect: %d and actual: %d are matched\n"),ColScale[icol-1],cs); LogMsg(NONE,_T("ColNullable expect: %s and actual: %s are matched\n\n"), SQLNullToChar(ColNullable[i],TempType1),SQLNullToChar(cnull,TempType2)); } else { TEST_FAILED; if (cwcscmp(cn,colname[icol-1],FALSE) != 0) LogMsg(ERRMSG,_T("colname expect: %s and actual: %s are not matched at line %d\n"),colname[icol-1],cn,__LINE__); if (cl != colsize) LogMsg(ERRMSG,_T("ColNameLen expect: %d and actual: %d are not matched at line %d\n"),colsize,cl,__LINE__); if (st != SQLType[icol-1]) LogMsg(ERRMSG,_T("SQLType expect: %s and actual: %s are not matched at line %d\n"), SQLTypeToChar(SQLType[icol-1],TempType1),SQLTypeToChar(st,TempType2),__LINE__); if (cp != ColPrec[icol-1]) LogMsg(ERRMSG,_T("ColPrec expect: %d and actual: %d are not matched at line %d\n"),ColPrec[icol-1],cp,__LINE__); if (cs != ColScale[icol-1]) LogMsg(ERRMSG,_T("ColScale expect: %d and actual: %d are not matched at line %d\n"),ColScale[icol-1],cs,__LINE__); if (cnull != ColNullable[i]) LogMsg(ERRMSG,_T("ColNullable expect: %s and actual: %s are not matched at line %d\n\n"), SQLNullToChar(ColNullable[i],TempType1),SQLNullToChar(cnull,TempType2),__LINE__); } } } } SQLFreeStmt(hstmt,SQL_CLOSE); SQLExecDirect(hstmt,(SQLTCHAR*) ExecDirStr[i],SQL_NTS); } } TESTCASE_END; } /* iend loop */ } /* lend loop */ FullDisconnect(pTestInfo); LogMsg(SHORTTIMESTAMP+LINEAFTER,_T("End testing API => MX Specific SQLDescribeColumns.\n")); free_list(var_list); TEST_RETURN; }
/* --------------------------------------------------------- TestSQLEndTran --------------------------------------------------------- */ PassFail TestMXSQLEndTran(TestInfo *pTestInfo) { TEST_DECLARE; RETCODE returncode; TCHAR Heading[MAX_STRING_SIZE]; SQLHANDLE henv; SQLHANDLE hdbc; SQLHANDLE hstmt; TCHAR *ExecDirStr[] = { //"create table testtransact(c1 TCHAR(20),c2 integer)", //"create table testtransact(c1 TCHAR(20),c2 integer) NO PARTITION", // The NO PARTITION is to help speed up this test on NEO/clustered systems with POS turned on. _T("--"), _T("--"), _T("--"), _T("--"), _T("--"), _T("--") }; UWORD fType[] = { SQL_ROLLBACK, SQL_COMMIT }; TCHAR *TypeDesc[] = { _T("SQL_ROLLBACK"), _T("SQL_COMMIT") }; TCHAR *Output; SQLLEN OutputLen; // sushil struct { SWORD ExeRes[2]; SWORD FetchRes[2]; TCHAR *DataRes[2]; } CheckRes[] = { {SQL_ERROR,SQL_SUCCESS,SQL_NO_DATA_FOUND,SQL_NO_DATA_FOUND,_T(""),_T("")}, {SQL_SUCCESS,SQL_SUCCESS,SQL_NO_DATA_FOUND,SQL_SUCCESS,_T(""),_T("--")}, {SQL_SUCCESS,SQL_SUCCESS,SQL_SUCCESS,SQL_SUCCESS,_T("--"),_T("--")}, {SQL_SUCCESS,SQL_SUCCESS,SQL_SUCCESS,SQL_NO_DATA_FOUND,_T("--"),_T("")}, {SQL_SUCCESS,SQL_ERROR,SQL_NO_DATA_FOUND,SQL_NO_DATA_FOUND,_T(""),_T("")} }; int i = 0, j = 0, iend = 5, jend = 1, commit_on_off = 0; //=========================================================================================================== var_list_t *var_list; var_list = load_api_vars(_T("SQLEndTran"), charset_file); if (var_list == NULL) return FAILED; ExecDirStr[0] = var_mapping(_T("SQLEndTran_ExecDirStr_0"), var_list); ExecDirStr[1] = var_mapping(_T("SQLEndTran_ExecDirStr_1"), var_list); ExecDirStr[2] = var_mapping(_T("SQLEndTran_ExecDirStr_2"), var_list); ExecDirStr[3] = var_mapping(_T("SQLEndTran_ExecDirStr_3"), var_list); ExecDirStr[4] = var_mapping(_T("SQLEndTran_ExecDirStr_4"), var_list); ExecDirStr[5] = var_mapping(_T("SQLEndTran_ExecDirStr_5"), var_list); CheckRes[1].DataRes[1] = var_mapping(_T("SQLEndTran_Insert"), var_list); CheckRes[2].DataRes[0] = var_mapping(_T("SQLEndTran_Insert"), var_list); CheckRes[2].DataRes[1] = var_mapping(_T("SQLEndTran_Update"), var_list); CheckRes[3].DataRes[0] = var_mapping(_T("SQLEndTran_Update"), var_list); //======================================================================================================== LogMsg(LINEBEFORE+SHORTTIMESTAMP,_T("Begin testing API => SQLEndTran.\n")); TEST_INIT; TESTCASE_BEGIN("Initializing SQLEndTran test environment\n"); if(!FullConnectWithOptions(pTestInfo, CONNECT_ODBC_VERSION_3)) { LogMsg(NONE,_T("Unable to connect\n")); TEST_FAILED; TEST_RETURN; } henv = pTestInfo->henv; hdbc = pTestInfo->hdbc; hstmt = (SQLHANDLE)pTestInfo->hstmt; returncode = SQLAllocHandle(SQL_HANDLE_STMT, (SQLHANDLE)hdbc, &hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLAllocHandle")) { LogAllErrorsVer3(henv,hdbc,hstmt); FullDisconnect(pTestInfo); TEST_FAILED; TEST_RETURN; } //setting CQD to set POS OFF,as some tests fail otherwise. (to be fixed) //SQLExecDirect (hstmt,"CONTROL QUERY DEFAULT POS 'OFF'",SQL_NTS); for (commit_on_off = 0; commit_on_off < 10; commit_on_off++) { returncode = SQLSetConnectAttr((SQLHANDLE)hdbc,SQL_AUTOCOMMIT,(void *)SQL_AUTOCOMMIT_ON,0); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLSetConnectAttr")) { LogAllErrorsVer3(henv,hdbc,hstmt); FullDisconnect(pTestInfo); TEST_FAILED; TEST_RETURN; } TESTCASE_END; SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[4],SQL_NTS); /* CLEANUP */ for (i = 0; i <= (iend-1); i++) { _stprintf(Heading,_T("Test Positive Functionality of SQLEndTran while Autocommit is ON and executing\n")); _tcscat(Heading, ExecDirStr[i]); _tcscat(Heading, _T("\n")); TESTCASE_BEGINW(Heading); returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i],SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrorsVer3(henv,hdbc,hstmt); TEST_FAILED; } } SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[4],SQL_NTS); /* CLEANUP */ returncode = SQLSetConnectAttr((SQLHANDLE)hdbc,SQL_AUTOCOMMIT,(void *)SQL_AUTOCOMMIT_OFF,0); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLSetConnectAttr")) { LogAllErrorsVer3(henv,hdbc,hstmt); FullDisconnect(pTestInfo); TEST_FAILED; TEST_RETURN; } TESTCASE_END; for (i = 0; i <= (iend-1); i++) { for (j = 0; j <= jend; j++) { _stprintf(Heading,_T("Test Positive Functionality of SQLEndTran while Autocommit is OFF and executing\n")); _tcscat(Heading, ExecDirStr[i]); _tcscat(Heading, _T(" & ")); _tcscat(Heading, TypeDesc[j]); _tcscat(Heading, _T("\n")); TESTCASE_BEGINW(Heading); returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[i],SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrorsVer3(henv,hdbc,hstmt); TEST_FAILED; } else { returncode=SQLEndTran(SQL_HANDLE_DBC,(SQLHANDLE)hdbc,fType[j]); Sleep(2); // tmf rollback is slower. if(!CHECKRC(SQL_SUCCESS,returncode,"SQLTransact")) { LogAllErrorsVer3(henv,hdbc,hstmt); TEST_FAILED; } returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[iend],SQL_NTS); if(!CHECKRC(CheckRes[i].ExeRes[j],returncode,"SQLExecDirect")) { LogAllErrorsVer3(henv,hdbc,hstmt); TEST_FAILED; } else { if (returncode == SQL_SUCCESS || returncode == SQL_SUCCESS_WITH_INFO) { Output = (TCHAR *)malloc(NAME_LEN); returncode=SQLBindCol(hstmt,1,SQL_C_TCHAR,Output,NAME_LEN,&OutputLen); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindCol")) { LogAllErrorsVer3(henv,hdbc,hstmt); TEST_FAILED; } else { returncode = SQLFetch(hstmt); if(!CHECKRC(CheckRes[i].FetchRes[j],returncode,"SQLFetch")) { LogAllErrorsVer3(henv,hdbc,hstmt); TEST_FAILED; } else { if (returncode != SQL_NO_DATA_FOUND && returncode != SQL_ERROR) { if (_tcscspn(CheckRes[i].DataRes[j],Output) == 0) { //LogMsg(NONE,_T("expect: %s and actual: %s are matched\n"),Output,CheckRes[i].DataRes[j]); } else { LogMsg(ERRMSG,_T("expect: %s and actual: %s are not matched at line %d \n"),Output,CheckRes[i].DataRes[j],__LINE__); TEST_FAILED; } } } free(Output); SQLFreeStmt(hstmt,SQL_CLOSE); } } } } //SQLFreeStmt(hstmt,SQL_CLOSE); TESTCASE_END; }/* end i loop */ //SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[4],SQL_NTS); /* CLEANUP */ }/* end j loop */ } //======================================================================================================== SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[4],SQL_NTS); /* CLEANUP */ returncode = SQLDisconnect((SQLHANDLE)hdbc); if(!CHECKRC(SQL_ERROR,returncode,"SQLDisconnect")) { LogAllErrorsVer3(henv,hdbc,hstmt); TEST_FAILED; } // Free the open transactions. returncode=SQLEndTran(SQL_HANDLE_DBC,(SQLHANDLE)hdbc,SQL_ROLLBACK); Sleep(2); returncode=FullDisconnect3(pTestInfo); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLFullDisconnect")) { LogAllErrorsVer3(henv,hdbc,hstmt); TEST_FAILED; } LogMsg(SHORTTIMESTAMP+LINEAFTER,_T("End testing API => SQLEndTran.\n")); free_list(var_list); TEST_RETURN; }
PassFail TestSQLFetch(TestInfo *pTestInfo) { TEST_DECLARE; TCHAR Heading[MAX_STRING_SIZE]; RETCODE returncode; SQLHANDLE henv; SQLHANDLE hdbc; SQLHANDLE hstmt; SQLUSMALLINT i, j, k, fn, h; SWORD col; TCHAR *CCharOutput1[MAX_NUM1], CCharOutput2[NAME_LEN]; SQLLEN OutputLen1[MAX_NUM1], OutputLen2; SQLSMALLINT CType[] = {SQL_C_TCHAR}; //TCHAR *TestCType[] = // { // "SQL_C_TCHAR","SQL_C_BINARY","SQL_C_SSHORT","SQL_C_USHORT","SQL_C_SHORT","SQL_C_SLONG", // "SQL_C_ULONG","SQL_C_FLOAT","SQL_C_DOUBLE","SQL_C_DATE","SQL_C_TIME","SQL_C_TIMESTAMP" // }; //TCHAR *TestSQLType[] = // { // "SQL_CHAR","SQL_VARCHAR","SQL_DECIMAL","SQL_NUMERIC","SQL_SMALLINT","SQL_INTEGER","SQL_REAL", // "SQL_FLOAT","SQL_DOUBLE","SQL_DATE","SQL_TIME","SQL_TIMESTAMP","SQL_BIGINT", // "SQL_DECIMAL","SQL_DECIMAL","SQL_DECIMAL","SQL_DECIMAL","SQL_DECIMAL","SQL_DECIMAL","SQL_DECIMAL","SQL_DECIMAL" // "SQL_LONGVARCHAR","SQL_WCHAR","SQL_WVARCHAR","SQL_WLONGVARCHAR" // }; TCHAR *ExecDirStr[5]; TCHAR *CResults[] = { #ifndef _WM _T("--"),_T("--"),_T("1234.56789"),_T("1234.56789"),_T("1200"),_T("12000"), _T("12345.0"),_T("123450.0"),_T("1234500.0"),_T("1993-07-01"),_T("09:45:30"), _T("1993-08-02 08:44:31.001000"),_T("120000"), _T("1234567890123456789"), _T("1234567890123.456789"), _T("1234567890123456789012345678901234567890"), _T("0.12345678901234567890123456789012345678900000000000000000000000000000000000000000000000000000000000000000000000000000000000000000"), _T("1234567890.1234567890123456789012345678901234567890000000000000000000000000"), _T("12345.56789"), _T("1234567890123.56789"), _T("12345678901234567890.0123456789"), #ifdef UNICODE _T("--"),_T("--"),_T("--"),_T("--"),_T("--"),_T("--") #else _T("--"),_T("--"),_T("--"),_T("--") #endif #else _T("--"),_T("--"),_T("1234.56789"),_T("1234.56789"),_T("1200"),_T("12000"), _T("12345.0"),_T("123450.0"),_T("1234500.0"),_T("93/07/01"),_T("09:45:30"), _T("1993-08-02 08:44:31.001000"),_T("120000"), _T("1234567890123456789"), _T("1234567890123.456789"), _T("1234567890123456789012345678901234567890"), _T(".12345678901234567890123456789012345678900000000000000000000000000000000000000000000000000000000000000000000000000000000000000000"), _T("1234567890.1234567890123456789012345678901234567890000000000000000000000000"), _T("12345.56789"), _T("1234567890123.56789"), _T("12345678901234567890.0123456789"), _T("--"),_T("--"),_T("--"),_T("--"),_T("--") #endif }; TCHAR *FetchNStr[5]; struct { SQLULEN AccessParam[2]; SQLULEN TransactParam[2]; } ConnOption = { SQL_MODE_READ_WRITE, SQL_MODE_READ_ONLY, SQL_TXN_READ_COMMITTED, SQL_TXN_READ_UNCOMMITTED }; struct _timeb fetchstarttime; struct _timeb fetchendtime; long AccessTime[2]; //Added for transaction isolation problems TCHAR *iso_level_cqd[] = { _T("control query default isolation_level 'READ_COMMITTED'"), _T("control query default isolation_level 'READ_UNCOMMITTED'"), _T("control query default isolation_level 'REPEATABLE_READ'"), _T("control query default isolation_level 'SERIALIZABLE'"), _T("endloop") }; TCHAR *access_mode[] = { _T("default"), _T("set transaction READ ONLY"), _T("set transaction READ WRITE"), _T("endloop") }; SQLTCHAR *sqlstring0 = (SQLTCHAR*)_T("DROP TABLE YRWK_TY_POS_2"); SQLTCHAR *sqlstring1 = (SQLTCHAR*)_T("CREATE TABLE YRWK_TY_POS_2 ( C1 NUMERIC (9, 2) , C2 NUMERIC (9, 2)) NO PARTITION"); SQLTCHAR *sqlstring2 = (SQLTCHAR*)_T("INSERT INTO YRWK_TY_POS_2 VALUES (119.28, 6)"); SQLTCHAR *sqlstring3 = (SQLTCHAR*)_T("SELECT SUM(C1) + SUM(C2) FROM YRWK_TY_POS_2"); //SQLTCHAR sqlstring0[] = _T("DROP TABLE YRWK_TY_POS_2"); //SQLTCHAR sqlstring1[] = _T("CREATE TABLE YRWK_TY_POS_2 ( C1 NUMERIC (9, 2) , C2 NUMERIC (9, 2)) NO PARTITION"); //SQLTCHAR sqlstring2[] = _T("INSERT INTO YRWK_TY_POS_2 VALUES (119.28, 6)"); //SQLTCHAR sqlstring3[] = _T("SELECT SUM(C1) + SUM(C2) FROM YRWK_TY_POS_2"); //=========================================================================================================== var_list_t *var_list; var_list = load_api_vars(_T("SQLFetch"), charset_file); if (var_list == NULL) return FAILED; //print_list(var_list); ExecDirStr[0] = var_mapping(_T("SQLFetch_ExecDirStr_1"), var_list); ExecDirStr[1] = var_mapping(_T("SQLFetch_ExecDirStr_2"), var_list); ExecDirStr[2] = var_mapping(_T("SQLFetch_ExecDirStr_3"), var_list); ExecDirStr[3] = var_mapping(_T("SQLFetch_ExecDirStr_4"), var_list); ExecDirStr[4] = var_mapping(_T("SQLFetch_ExecDirStr_5"), var_list); CResults[0] = var_mapping(_T("SQLFetch_CResults_1"), var_list); CResults[1] = var_mapping(_T("SQLFetch_CResults_2"), var_list); #ifdef UNICODE CResults[21] = var_mapping(_T("SQLFetch_datastr1"), var_list); CResults[22] = var_mapping(_T("SQLFetch_datastr2"), var_list); CResults[23] = var_mapping(_T("SQLFetch_datastr3"), var_list); CResults[24] = var_mapping(_T("SQLFetch_CResults_24"), var_list); CResults[25] = var_mapping(_T("SQLFetch_CResults_25"), var_list); CResults[26] = var_mapping(_T("SQLFetch_CResults_26"), var_list); #else CResults[21] = var_mapping(_T("SQLFetch_CResults_21"), var_list); CResults[22] = var_mapping(_T("SQLFetch_CResults_22"), var_list); CResults[23] = var_mapping(_T("SQLFetch_CResults_23"), var_list); CResults[24] = var_mapping(_T("SQLFetch_CResults_24"), var_list); #endif FetchNStr[0] = var_mapping(_T("SQLFetch_FetchNStr_1"), var_list); FetchNStr[1] = var_mapping(_T("SQLFetch_FetchNStr_2"), var_list); FetchNStr[2] = var_mapping(_T("SQLFetch_FetchNStr_3"), var_list); FetchNStr[3] = var_mapping(_T("SQLFetch_FetchNStr_4"), var_list); FetchNStr[4] = var_mapping(_T("SQLFetch_FetchNStr_5"), var_list); //================================================================================================= LogMsg(LINEBEFORE+SHORTTIMESTAMP,_T("Begin testing API =>SQLFetch.\n")); TEST_INIT; TESTCASE_BEGIN("Setup for SQLFetch tests\n"); if(!FullConnect(pTestInfo)) { LogMsg(ERRMSG,_T("Unable to connect\n")); TEST_FAILED; TEST_RETURN; } henv = pTestInfo->henv; hdbc = pTestInfo->hdbc; hstmt = (SQLHANDLE)pTestInfo->hstmt; returncode = SQLAllocStmt((SQLHANDLE)hdbc, &hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLAllocStmt")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } SQLExecDirect(hstmt,(SQLTCHAR*) ExecDirStr[0],SQL_NTS); /* cleanup */ returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[1],SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[2], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } TESTCASE_END; // end of setup for (i = 0; i < 1; i++) { // begin of 1st for loop _stprintf(Heading,_T("Test 1.%d: Positive functionality of SQLFetch by doing SQLBindcol\n"),i); TESTCASE_BEGINW(Heading); returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[3], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } for (j=0; j<MAX_NUM1; j++) { CCharOutput1[j] = (TCHAR *)malloc(sizeof(TCHAR)*NAME_LEN); *(CCharOutput1[j])=(TCHAR)'\0'; returncode = SQLBindCol(hstmt,(SWORD)(j+1),CType[i],CCharOutput1[j],NAME_LEN,&OutputLen1[j]); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindCol")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); TEST_RETURN; } } returncode = SQLFetch(hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLFetch")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } else { for (j=0; j<MAX_NUM1; j++) { if (_tcscmp(CCharOutput1[j],CResults[j]) == 0) { LogMsg(NONE,_T("expect: '%s' and actual: '%s' of column %d are matched\n"),CResults[j],CCharOutput1[j],j+1); } else { TEST_FAILED; LogMsg(ERRMSG,_T("expect: '%s' and actual: '%s' of column %d are not match, at line %d\n"), CResults[j],CCharOutput1[j],j+1,__LINE__); } free(CCharOutput1[j]); } } SQLFreeStmt(hstmt,SQL_CLOSE); TESTCASE_END; } // end of 1st for loop //============================================================================================ TESTCASE_BEGIN("Setup for more SQLFetch tests\n"); SQLFreeStmt(hstmt,SQL_DROP); SQLAllocStmt((SQLHANDLE)hdbc, &hstmt); SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[4],SQL_NTS); returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[2], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } TESTCASE_END; for (i = 0; i < 1; i++) { _stprintf(Heading,_T("Test 2.%d: Positive functionality of SQLFetch by doing SQLGetData\n"),i); TESTCASE_BEGINW(Heading); returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[3], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } returncode = SQLFetch(hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLFetch")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } else { for (j=0; j<MAX_NUM1; j++) { returncode = SQLGetData(hstmt,(SWORD)(j+1),CType[i],CCharOutput2,NAME_LEN,&OutputLen2); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLGetData")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } if (_tcscmp(CCharOutput2,CResults[j]) == 0) { LogMsg(NONE,_T("expect: '%s' and actual: '%s' of column %d are matched\n"), CResults[j],CCharOutput2,j+1); } else { TEST_FAILED; LogMsg(ERRMSG,_T("expect: '%s' and actual: '%s' of column %d are not match, at line %d\n"),CResults[j],CCharOutput2,j+1,__LINE__); } } } SQLFreeStmt(hstmt,SQL_CLOSE); TESTCASE_END; } //============================================================================================ for (fn = 0; fn < NUM_FETCH_LOOP; fn++) { _stprintf(Heading,_T("Setup for Fetch %d tests\n"),(ROWS_INSERTED*(fn+1))); TESTCASE_BEGINW(Heading); SQLFreeStmt(hstmt,SQL_DROP); SQLAllocStmt((SQLHANDLE)hdbc, &hstmt); SQLSetConnectOption((SQLHANDLE)hdbc,SQL_ACCESS_MODE,SQL_MODE_READ_WRITE); SQLSetConnectOption((SQLHANDLE)hdbc,SQL_TXN_ISOLATION,SQL_TXN_READ_COMMITTED); SQLExecDirect(hstmt,(SQLTCHAR*) FetchNStr[0],SQL_NTS); /* cleanup */ returncode = SQLExecDirect(hstmt,(SQLTCHAR*)FetchNStr[1],SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } for (i = 0; i < (ROWS_INSERTED*(fn+1)); i++) { returncode = SQLExecDirect(hstmt,(SQLTCHAR*)FetchNStr[2], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } } TESTCASE_END; // end of setup _stprintf(Heading,_T("Test Positive functionality of Fetch %d by doing SQLBindcol\n"),(ROWS_INSERTED*(fn+1))); TESTCASE_BEGINW(Heading); for (k = 0; k < 2; k++) { returncode = SQLSetConnectOption((SQLHANDLE)hdbc,SQL_ACCESS_MODE,ConnOption.AccessParam[k]); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLSetConnection Access")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); TEST_RETURN; } returncode = SQLSetConnectOption((SQLHANDLE)hdbc,SQL_TXN_ISOLATION,ConnOption.TransactParam[k]); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLSetConnection Transact")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); TEST_RETURN; } returncode = SQLSetStmtOption(hstmt,SQL_ROWSET_SIZE,1); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLSetStmtOption")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); TEST_RETURN; } returncode = SQLExecDirect(hstmt,(SQLTCHAR*)FetchNStr[3], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } returncode = SQLNumResultCols(hstmt, &col); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLNumResultCols")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } for (j = 0; j < col; j++) { CCharOutput1[j] = (TCHAR *)malloc(NAME_LEN); *(CCharOutput1[j])=(TCHAR)'\0'; returncode = SQLBindCol(hstmt,(SWORD)(j+1),SQL_C_TCHAR,CCharOutput1[j],NAME_LEN,&OutputLen1[j]); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindCol")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); TEST_RETURN; } } // end of 2nd for loop returncode = SQL_SUCCESS; _ftime(&fetchstarttime); j = 0; while (returncode == SQL_SUCCESS) { returncode = SQLFetch(hstmt); if((returncode != SQL_SUCCESS) && (j < col)) // need to make sure we haven't fallen off the end of the table { if (returncode == SQL_NO_DATA_FOUND) { if (!FindError(_T("00000"),henv,hdbc,hstmt)) // SQLState should be "00000" when return code is SQL_NO_DATA_FOUND. { TEST_FAILED; //assert(0); LogMsg(NONE,_T("Rows #: %d : array %d suppose to be %d at line %d.\n"),j,k, (ROWS_INSERTED*(fn+1)),__LINE__); LogAllErrors(henv,hdbc,hstmt); } } else { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } } if (returncode == SQL_SUCCESS) j++; } _ftime(&fetchendtime); if (j == (ROWS_INSERTED*(fn+1))) { LogMsg(NONE,_T("Rows inserted Expected: %d and Actual: %d.\n"),(ROWS_INSERTED*(fn+1)),j); } else { TEST_FAILED; LogMsg(ERRMSG,_T("Rows inserted Expected: %d and Actual: %d at line%d.\n"),(ROWS_INSERTED*(fn+1)),j,__LINE__); } AccessTime[k] = (long)(((fetchendtime.time - fetchstarttime.time) * 1000) + (fetchendtime.millitm - fetchstarttime.millitm)); for (j = 0; j < col; j++) { free(CCharOutput1[j]); } // end of 3rd for loop SQLFreeStmt(hstmt,SQL_CLOSE); } /* if (AccessTime[0] >= AccessTime[1]) { LogMsg(NONE,_T("FETCH ONE: %d millisecs and FETCH N: %d millisecs.\n"),AccessTime[0],AccessTime[1]); } else { TEST_FAILED; LogMsg(ERRMSG,_T("FETCH ONE: %d millisecs and FETCH N: %d millisecs.\n"),AccessTime[0],AccessTime[1]); } */ LogMsg(NONE,_T("FETCH ONE: %d millisecs and FETCH N: %d millisecs.\n"),AccessTime[0],AccessTime[1]); TESTCASE_END; SQLSetConnectOption((SQLHANDLE)hdbc,SQL_ACCESS_MODE,SQL_MODE_READ_WRITE); SQLSetConnectOption((SQLHANDLE)hdbc,SQL_TXN_ISOLATION,SQL_TXN_READ_COMMITTED); SQLExecDirect(hstmt,(SQLTCHAR*) FetchNStr[0],SQL_NTS); /* cleanup */ } SQLExecDirect(hstmt,(SQLTCHAR*) ExecDirStr[0],SQL_NTS); /* cleanup */ //===================================================================================================== TESTCASE_BEGIN("Setup for SQLFetch isolation level tests\n"); SQLFreeStmt(hstmt,SQL_DROP); SQLAllocStmt((SQLHANDLE)hdbc, &hstmt); SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[0],SQL_NTS);/*clean up*/ returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[1], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[2], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } TESTCASE_END; i = 0; k = 0; while (_tcsicmp(iso_level_cqd[k],_T("endloop")) != 0) { h = 0; while (_tcsicmp(access_mode[h],_T("endloop")) != 0) { if ((_tcsstr(iso_level_cqd[k],_T("READ_UNCOMMITTED")) != NULL && _tcsstr(access_mode[h],_T("READ WRITE")) != NULL) || (_tcsstr(iso_level_cqd[k],_T("REPEATABLE_READ")) != NULL && _tcsstr(access_mode[h],_T("default")) != NULL) || (_tcsstr(iso_level_cqd[k],_T("SERIALIZABLE")) != NULL && _tcsstr(access_mode[h],_T("default")) != NULL)) { h++; continue; } FullDisconnect(pTestInfo); _stprintf(Heading, _T("Setup for SQLFetch with: %s\nAnd access-mode: %s\n"), iso_level_cqd[k], access_mode[h]); TESTCASE_BEGINW(Heading); if(!FullConnect(pTestInfo)) { LogMsg(ERRMSG,_T("Unable to connect\n")); TEST_FAILED; TEST_RETURN; } henv = pTestInfo->henv; hdbc = pTestInfo->hdbc; hstmt = (SQLHANDLE)pTestInfo->hstmt; returncode = SQLAllocStmt((SQLHANDLE)hdbc, &hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLAllocStmt")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } returncode = SQLExecDirect(hstmt,(SQLTCHAR*)iso_level_cqd[k],SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } if (_tcsicmp(access_mode[h],_T("default")) != 0) { returncode = SQLExecDirect(hstmt,(SQLTCHAR*)access_mode[h],SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } } TESTCASE_END; // end of setup _stprintf(Heading,_T("SQLFetch by doing SQLGetData\n")); TESTCASE_BEGINW(Heading); returncode = SQLExecDirect(hstmt,(SQLTCHAR*)ExecDirStr[3], SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; //TEST_RETURN; } returncode = SQLFetch(hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLFetch")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } else { for (j=0; j<MAX_NUM1; j++) { returncode = SQLGetData(hstmt,(SWORD)(j+1),CType[i],CCharOutput2,NAME_LEN,&OutputLen2); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLGetData")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } if (_tcscmp(CCharOutput2,CResults[j]) == 0) { LogMsg(NONE,_T("expect: '%s' and actual: '%s' of column %d are matched\n"),CResults[j],CCharOutput2,j+1); } else { TEST_FAILED; LogMsg(ERRMSG,_T("expect: '%s' and actual: '%s' of column %d are not match, at line %d\n"),CResults[j],CCharOutput2,j+1,__LINE__); } } } SQLFreeStmt(hstmt,SQL_CLOSE); TESTCASE_END; h++; } k++; }//End while SQLExecDirect(hstmt,(SQLTCHAR*) ExecDirStr[0],SQL_NTS); /* cleanup */ //============================================================================================ TESTCASE_BEGIN("Testcase for Mode_special_1\n"); returncode = SQLExecDirect(hstmt,sqlstring0,SQL_NTS); returncode = SQLExecDirect(hstmt,sqlstring1,SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } returncode = SQLExecDirect(hstmt,sqlstring2,SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } returncode = SQLPrepare(hstmt,sqlstring3,SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLPrepare")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } returncode = SQLBindCol(hstmt,1,SQL_C_TCHAR,CCharOutput2,300,NULL); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindCol")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } returncode = SQLExecute(hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecute")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } returncode = SQLFetch(hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLFetch")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } #ifndef _WM if (_tcscmp(CCharOutput2,_T("125.2")) == 0) { LogMsg(NONE,_T("expect: '125.2' and actual: '%s' are matched\n"),CCharOutput2); } else { TEST_FAILED; LogMsg(ERRMSG,_T("expect: '125.2' and actual: '%s' are not match, at line %d\n"),CCharOutput2,__LINE__); } #else if (_tcscmp(CCharOutput2,"125.28") == 0) { LogMsg(NONE,_T("expect: '125.28' and actual: '%s' are matched\n"),CCharOutput2); } else { TEST_FAILED; LogMsg(ERRMSG,_T("expect: '125.28' and actual: '%s' are not match, at line %d\n"),CCharOutput2,__LINE__); } #endif //============================================================================================ FullDisconnect(pTestInfo); LogMsg(SHORTTIMESTAMP+LINEAFTER,_T("End testing API => SQLFetch.\n")); free_list(var_list); TEST_RETURN; }
PassFail TestSQLSpecialColumns(TestInfo *pTestInfo, int MX_MP_SPECIFIC) { TEST_DECLARE; TCHAR Heading[MAX_HEADING_SIZE]; RETCODE returncode; SQLHANDLE henv; SQLHANDLE hdbc; SQLHANDLE hstmt; TCHAR TQualifier[NAME_LEN],TOwner[NAME_LEN],TName[NAME_LEN]; UWORD fColType[NUM_COLTYPE] = {SQL_BEST_ROWID,SQL_ROWVER}; UWORD Scope[NUM_SCOPE] = {SQL_SCOPE_CURROW,SQL_SCOPE_TRANSACTION,SQL_SCOPE_SESSION}; UWORD Nullable[NUM_NULL] = {SQL_NO_NULLS,SQL_NULLABLE}; TCHAR ocname[MAX_COLUMN_NAME],octype[MAX_COLUMN_NAME]; SWORD oscope,ocdatatype,ocsca,ocpc; SDWORD ocprec,oclen; SQLLEN oscopelen,ocnamelen,ocdatatypelen,octypelen,ocpreclen,oclenlen,ocscalen,ocpclen; struct { TCHAR *ColName; SWORD ColDataType; TCHAR *ColTypeName; TCHAR *ColTypeOutput; TCHAR *ColTypeLen; SDWORD ColPrec; SWORD ColSca; SDWORD ColLen; } Columns[] = { {_T("--"),SQL_CHAR,_T("char"),_T("CHAR"),_T("(10) CHARACTER SET ISO88591"),10,0,10}, {_T("--"),SQL_VARCHAR,_T("varchar"),_T("VARCHAR"),_T("(10) CHARACTER SET ISO88591"),10,0,10}, {_T("--"),SQL_VARCHAR,_T("varchar"),_T("VARCHAR"),_T("(255) CHARACTER SET ISO88591"),255,0,255}, {_T("--"),SQL_WCHAR,_T("char"),_T("NCHAR"),_T("(10) CHARACTER SET UCS2"),10,0,20}, {_T("--"),SQL_WVARCHAR,_T("varchar"),_T("NCHAR VARYING"),_T("(10) CHARACTER SET UCS2"),10,0,20}, {_T("--"),SQL_WVARCHAR,_T("varchar"),_T("NCHAR VARYING"),_T("(255) CHARACTER SET UCS2"),255,0,510}, {_T("--"),SQL_DECIMAL,_T("decimal"),_T("DECIMAL SIGNED"),_T("(10,5)"),10,5,12}, {_T("--"),SQL_NUMERIC,_T("numeric"),_T("NUMERIC SIGNED"),_T("(10,5)"),10,5,12}, {_T("--"),SQL_NUMERIC,_T("numeric"),_T("NUMERIC SIGNED"),_T("(19,0)"),19,0,21}, //Bignum {_T("--"),SQL_NUMERIC,_T("numeric"),_T("NUMERIC SIGNED"),_T("(19,6)"),19,6,21}, //Bignum {_T("--"),SQL_NUMERIC,_T("numeric"),_T("NUMERIC SIGNED"),_T("(128,0)"),128,0,130}, //Bignum {_T("--"),SQL_NUMERIC,_T("numeric"),_T("NUMERIC SIGNED"),_T("(128,128)"),128,128,130}, //Bignum {_T("--"),SQL_NUMERIC,_T("numeric"),_T("NUMERIC SIGNED"),_T("(128,64)"),128,64,130}, //Bignum {_T("--"),SQL_NUMERIC,_T("numeric"),_T("NUMERIC UNSIGNED"),_T("(10,5) unsigned"),10,5,12}, //Bignum {_T("--"),SQL_NUMERIC,_T("numeric"),_T("NUMERIC UNSIGNED"),_T("(18,5) unsigned"),18,5,20}, //Bignum {_T("--"),SQL_NUMERIC,_T("numeric"),_T("NUMERIC UNSIGNED"),_T("(30,10) unsigned"),30,10,32}, //Bignum {_T("--"),SQL_SMALLINT,_T("smallint"),_T("SMALLINT SIGNED"),_T(""),5,0,2}, {_T("--"),SQL_INTEGER,_T("integer"),_T("INTEGER SIGNED"),_T(""),10,0,4}, {_T("--"),SQL_BIGINT,_T("bigint"),_T("BIGINT SIGNED"),_T(""),19,0,20}, {_T("--"),SQL_DATE,_T("date"),_T("DATE"),_T(""),10,0,6}, {_T("--"),SQL_TIME,_T("time"),_T("TIME"),_T(""),8,0,6}, {_T("--"),SQL_TIMESTAMP,_T("TIMESTAMP"),_T("timestamp"),_T(""),26,6,16}, {_T("--"),SQL_BIT,_T("bit"),_T("BIT"),_T(""),1,1,0}, {_T("--"),SQL_TINYINT,_T("tinyint"),_T("TINYINT"),_T(""),3,0,2}, {_T("--"),SQL_BINARY,_T("binary"),_T("BINARY"),_T("(10)"),10,0,10}, {_T("--"),SQL_VARBINARY,_T("varbinary"),_T("VARBINARY"),_T("(10)"),10,0,10}, {_T("--"),SQL_WCHAR,_T("char"),_T("NCHAR"),_T("(10) CHARACTER SET UTF8"),10,0,20}, {_T("--"),SQL_WVARCHAR,_T("varchar"),_T("NCHAR VARYING"),_T("(10) CHARACTER SET UTF8"),10,0,20}, {_T("--"),SQL_WVARCHAR,_T("varchar"),_T("NCHAR VARYING"),_T("(255) CHARACTER SET UTF8"),255,0,510}, {_T("--"),0,_T("endloop"),_T(""),0,0,0,0} }; TCHAR *TableStr[4]; TCHAR ColStr[MAX_NOS_SIZE], KeyStr[MAX_NOS_SIZE], CreateTbl[MAX_NOS_SIZE],END_LOOP[10]; int i = 0, k = 0,ct = 0, s = 0, t = 0, n = 0, psc = 1; BOOL found = FALSE; //TCHAR *charNameUCS2 = _T("NCHAR"); //TCHAR *varcharNameUCS2 = _T("NCHAR VARYING"); //=========================================================================================================== var_list_t *var_list; var_list = load_api_vars(_T("SQLSpecialColumns"), charset_file); if (var_list == NULL) return FAILED; //print_list(var_list); Columns[0].ColName = var_mapping(_T("SQLSpecialColumns_Columns_1"), var_list); Columns[1].ColName = var_mapping(_T("SQLSpecialColumns_Columns_2"), var_list); Columns[2].ColName = var_mapping(_T("SQLSpecialColumns_Columns_3"), var_list); Columns[3].ColName = var_mapping(_T("SQLSpecialColumns_Columns_4"), var_list); Columns[4].ColName = var_mapping(_T("SQLSpecialColumns_Columns_5"), var_list); Columns[5].ColName = var_mapping(_T("SQLSpecialColumns_Columns_6"), var_list); Columns[6].ColName = var_mapping(_T("SQLSpecialColumns_Columns_7"), var_list); Columns[7].ColName = var_mapping(_T("SQLSpecialColumns_Columns_8"), var_list); Columns[8].ColName = var_mapping(_T("SQLSpecialColumns_Columns_9"), var_list); Columns[9].ColName = var_mapping(_T("SQLSpecialColumns_Columns_10"), var_list); Columns[10].ColName = var_mapping(_T("SQLSpecialColumns_Columns_11"), var_list); Columns[11].ColName = var_mapping(_T("SQLSpecialColumns_Columns_12"), var_list); Columns[12].ColName = var_mapping(_T("SQLSpecialColumns_Columns_13"), var_list); Columns[13].ColName = var_mapping(_T("SQLSpecialColumns_Columns_14"), var_list); Columns[14].ColName = var_mapping(_T("SQLSpecialColumns_Columns_15"), var_list); Columns[15].ColName = var_mapping(_T("SQLSpecialColumns_Columns_16"), var_list); Columns[16].ColName = var_mapping(_T("SQLSpecialColumns_Columns_17"), var_list); Columns[17].ColName = var_mapping(_T("SQLSpecialColumns_Columns_18"), var_list); Columns[18].ColName = var_mapping(_T("SQLSpecialColumns_Columns_19"), var_list); Columns[19].ColName = var_mapping(_T("SQLSpecialColumns_Columns_20"), var_list); Columns[20].ColName = var_mapping(_T("SQLSpecialColumns_Columns_21"), var_list); Columns[21].ColName = var_mapping(_T("SQLSpecialColumns_Columns_22"), var_list); Columns[22].ColName = var_mapping(_T("SQLSpecialColumns_Columns_23"), var_list); Columns[23].ColName = var_mapping(_T("SQLSpecialColumns_Columns_24"), var_list); Columns[24].ColName = var_mapping(_T("SQLSpecialColumns_Columns_25"), var_list); Columns[25].ColName = var_mapping(_T("SQLSpecialColumns_Columns_26"), var_list); Columns[26].ColName = var_mapping(_T("SQLSpecialColumns_Columns_27"), var_list); Columns[27].ColName = var_mapping(_T("SQLSpecialColumns_Columns_28"), var_list); Columns[28].ColName = var_mapping(_T("SQLSpecialColumns_Columns_29"), var_list); TableStr[0] = var_mapping(_T("SQLSpecialColumns_TableStr_1"), var_list); TableStr[1] = var_mapping(_T("SQLSpecialColumns_TableStr_2"), var_list); TableStr[2] = var_mapping(_T("SQLSpecialColumns_TableStr_3"), var_list); TableStr[3] = var_mapping(_T("SQLSpecialColumns_TableStr_4"), var_list); //========================================================================================= //if(isUCS2) { // LogMsg(NONE,_T("Setup for UCS2 mode testing: ColPrec has to be doubled\n")); // i = 0; // while(_tcsicmp(Columns[i].ColTypeName,_T("endloop")) != 0) { // if (Columns[i].ColDataType == SQL_WCHAR){ // Columns[i].ColDataType = SQL_WCHAR; // Columns[i].ColTypeOutput = charNameUCS2; // //Columns[i].ColPrec *= 2; --> This is in character, no need to double // Columns[i].ColLen *= 2; // } // else if (Columns[i].ColDataType == SQL_WVARCHAR) { // Columns[i].ColDataType = SQL_WVARCHAR; // Columns[i].ColTypeOutput = varcharNameUCS2; // //Columns[i].ColPrec *= 2; --> This is in character, no need to double // Columns[i].ColLen *= 2; // } // else if (Columns[i].ColDataType == SQL_WLONGVARCHAR) { // Columns[i].ColDataType = SQL_WLONGVARCHAR; // Columns[i].ColTypeOutput = varcharNameUCS2; // //Columns[i].ColPrec *= 2; --> This is in character, no need to double // Columns[i].ColLen *= 2; // } // i++; // } // i = 0; //} //========================================================================================= if (MX_MP_SPECIFIC == MX_SPECIFIC) LogMsg(LINEBEFORE+SHORTTIMESTAMP,_T("Begin testing API => MX Specific SQLSpecialColumns.\n")); else LogMsg(LINEBEFORE+SHORTTIMESTAMP,_T("Begin testing API => MP Specific SQLSpecialColumns.\n")); TEST_INIT; TESTCASE_BEGIN("Setup for SQLSpecialColumns tests\n"); if(!FullConnect(pTestInfo)){ LogMsg(NONE,_T("Unable to connect\n")); TEST_FAILED; TEST_RETURN; } henv = pTestInfo->henv; hdbc = pTestInfo->hdbc; hstmt = (SQLHANDLE)pTestInfo->hstmt; returncode = SQLAllocStmt((SQLHANDLE)hdbc, &hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLAllocStmt")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } TESTCASE_END; _tcscpy(ColStr,_T("")); _tcscpy(KeyStr,_T("")); _tcscpy(END_LOOP,_T("")); _tcscpy(TName,TableStr[2]); if (MX_MP_SPECIFIC == MX_SPECIFIC) { _tcscpy(TQualifier,pTestInfo->Catalog); _tcscpy(TOwner,pTestInfo->Schema); _tcscpy(END_LOOP,_T("bit")); } else { _tcscpy(TQualifier,_T("")); _tcscpy(TOwner,pTestInfo->UserID); _tcscpy(END_LOOP,_T("endloop")); } while (_tcsicmp(Columns[i].ColTypeName,END_LOOP) != 0) { SQLExecDirect(hstmt,(SQLTCHAR*) (SQLTCHAR *)TableStr[1],SQL_NTS); // cleanup if (i > 0) { _tcscat(ColStr,_T(",")); _tcscat(KeyStr,_T(",")); } _tcscat(ColStr,Columns[i].ColName); _tcscat(ColStr,_T(" ")); _tcscat(ColStr,Columns[i].ColTypeName); _tcscat(ColStr,Columns[i].ColTypeLen); _tcscat(ColStr,_T(" not null")); _tcscat(KeyStr,Columns[i].ColName); _tcscpy(CreateTbl,_T("")); _tcscat(CreateTbl,TableStr[0]); _tcscat(CreateTbl,_T("(")); _tcscat(CreateTbl,ColStr); _tcscat(CreateTbl,_T(", primary key(")); _tcscat(CreateTbl,KeyStr); _tcscat(CreateTbl,_T("))")); _stprintf(Heading,_T("Test Positive Functionality of SQLSpecialColumns for this table:\n")); _tcscat(Heading,CreateTbl); _tcscat(Heading,_T("\n")); TESTCASE_BEGINW(Heading); returncode = SQLExecDirect(hstmt,(SQLTCHAR*)CreateTbl,SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")){ TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } else{ if (_tcslen(TQualifier) > 0) returncode = SQLSpecialColumns(hstmt,fColType[ct],(SQLTCHAR*)TQualifier,(SWORD)_tcslen(TQualifier),(SQLTCHAR*)TOwner,(SWORD)_tcslen(TOwner),(SQLTCHAR*)TName,(SWORD)_tcslen(TName),Scope[s],Nullable[n]); else returncode = SQLSpecialColumns(hstmt,fColType[ct],NULL,0,(SQLTCHAR*)TOwner,(SWORD)_tcslen(TOwner),(SQLTCHAR*)TName,(SWORD)_tcslen(TName),Scope[s],Nullable[n]); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLSpecialColumns")){ TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } else{ oscope = 0; _tcscpy(ocname,_T("")); ocdatatype = 0; _tcscpy(octype,_T("")); ocprec = 0; oclen = 0; ocsca = 0; ocpc = 0; SQLBindCol(hstmt,1,SQL_C_SHORT,&oscope,0,&oscopelen); SQLBindCol(hstmt,2,SQL_C_TCHAR,ocname,MAX_COLUMN_NAME,&ocnamelen); SQLBindCol(hstmt,3,SQL_C_SHORT,&ocdatatype,0,&ocdatatypelen); SQLBindCol(hstmt,4,SQL_C_TCHAR,octype,MAX_COLUMN_NAME,&octypelen); SQLBindCol(hstmt,5,SQL_C_LONG,&ocprec,0,&ocpreclen); SQLBindCol(hstmt,6,SQL_C_LONG,&oclen,0,&oclenlen); SQLBindCol(hstmt,7,SQL_C_SHORT,&ocsca,0,&ocscalen); SQLBindCol(hstmt,8,SQL_C_SHORT,&ocpc,0,&ocpclen); k = 0; while (returncode == SQL_SUCCESS){ returncode = SQLFetch(hstmt); if((returncode!=SQL_NO_DATA_FOUND) &&(!CHECKRC(SQL_SUCCESS,returncode,"SQLFetch"))){ TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } else{ if (returncode == SQL_SUCCESS){ if (MX_MP_SPECIFIC == MX_SPECIFIC) { psc = SQL_PC_NOT_PSEUDO; } else { psc = 1; } LogMsg(NONE,_T("Comparing results for SQLSpecialColumns\n")); t = 0; found = FALSE; while(_tcscmp(Columns[t].ColTypeName,_T("endloop"))!=0) { if(cwcscmp(ocname, Columns[t].ColName,TRUE) == 0) { if ((oscope == Scope[s]) && (ocdatatype == Columns[t].ColDataType) && (_tcsicmp(octype,Columns[t].ColTypeOutput) == 0) && (ocprec == Columns[t].ColPrec) && (oclen == Columns[t].ColLen) && (ocsca == Columns[t].ColSca) && (ocpc == (SWORD)psc)){ /* LogMsg(NONE,_T("Scope expect: %d and actual: %d are matched\n"),Scope[s],oscope); LogMsg(NONE,_T("colname expect: %s and actual: %s are matched\n"),Columns[t].ColName,ocname); LogMsg(NONE,_T("ColDataType expect: %d and actual: %d are matched\n"),Columns[t].ColDataType,ocdatatype); LogMsg(NONE,_T("ColTypeOutput expect: %s and actual: %s are matched\n"),Columns[t].ColTypeOutput,octype); LogMsg(NONE,_T("ColPrec expect: %d and actual: %d are matched\n"),Columns[t].ColPrec,ocprec); LogMsg(NONE,_T("ColLen expect: %d and actual: %d are matched\n"),Columns[t].ColLen,oclen); LogMsg(NONE,_T("ColScale expect: %d and actual: %d are matched\n"),Columns[t].ColSca,ocsca); LogMsg(NONE,_T("ColPseudoCol expect: %d and actual: %d are matched\n\n"),(SWORD)psc,ocpc); */ } else { TEST_FAILED; if (oscope != Scope[s]) LogMsg(ERRMSG,_T("Scope expect: %d and actual: %d are not matched\n"),Scope[t],oscope); if (ocdatatype != Columns[t].ColDataType) LogMsg(ERRMSG,_T("ColDataType expect: %d and actual: %d are not matched\n"),Columns[t].ColDataType,ocdatatype); if (_tcsicmp(octype,Columns[t].ColTypeOutput) != 0) LogMsg(ERRMSG,_T("ColTypeName expect: %s and actual: %s are not matched\n"),Columns[t].ColTypeOutput,octype); if (ocprec != Columns[t].ColPrec) LogMsg(ERRMSG,_T("ColPrec expect: %d and actual: %d are not matched\n"),Columns[t].ColPrec,ocprec); if (oclen != Columns[t].ColLen) LogMsg(ERRMSG,_T("ColLen expect: %d and actual: %d are not matched\n"),Columns[t].ColLen,oclen); if (ocsca != Columns[t].ColSca) LogMsg(ERRMSG,_T("ColScale expect: %d and actual: %d are not matched\n"),Columns[t].ColSca,ocsca); if (ocpc != (SWORD)psc) LogMsg(ERRMSG,_T("ColPseudoCol expect: %d and actual: %d are not matched\n\n"),(SWORD)psc,ocpc); } found = TRUE; break; } else { t++; } } if(!found) { TEST_FAILED; LogMsg(ERRMSG,_T("Unexpected returned data: %s\n"), ocname); } } } if (returncode == SQL_SUCCESS) k++; } // end while if(k == 0) { TEST_FAILED; LogMsg(ERRMSG,_T("No Data Found => Atleast one row should be fetched\n")); } } SQLFreeStmt(hstmt,SQL_UNBIND); SQLFreeStmt(hstmt,SQL_CLOSE); } SQLExecDirect(hstmt,(SQLTCHAR*) (SQLTCHAR *)TableStr[1],SQL_NTS); i++; TESTCASE_END; } // end while //======================================================================================================== _stprintf(Heading,_T("SQLSpecialColumns: Negative test with NULL handle\n")); TESTCASE_BEGINW(Heading); hstmt = (SQLHANDLE)NULL; _tcscpy(TQualifier,_T("")); _tcscpy(TOwner,pTestInfo->UserID); _tcscpy(TName,TableStr[3]); i = 0; returncode = SQLSpecialColumns(hstmt,fColType[i],(SQLTCHAR*)TQualifier,(SWORD)_tcslen(TQualifier),(SQLTCHAR*)TOwner,(SWORD)_tcslen(TOwner),(SQLTCHAR*)TName,(SWORD)_tcslen(TName),Scope[i],Nullable[i]); if(!CHECKRC(SQL_INVALID_HANDLE,returncode,"SQLSpecialColumns")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } TESTCASE_END; //======================================================================================================== FullDisconnect(pTestInfo); LogMsg(SHORTTIMESTAMP+LINEAFTER,_T("End testing API => SQLSpecialColumns.\n")); free_list(var_list); TEST_RETURN; }
PassFail TestMXSQLTables (TestInfo *pTestInfo) { TEST_DECLARE; TCHAR Heading[MAX_HEADING_SIZE]; RETCODE returncode; SQLHANDLE henv; SQLHANDLE hdbc; SQLHANDLE hstmt, hstmt1; TCHAR TableQualifier[NAME_LEN],TableOwner[NAME_LEN],Remark[REM_LEN],*TableStr; TCHAR oTableQualifier[NAME_LEN]; TCHAR oTableOwner[NAME_LEN]; TCHAR oTableName[NAME_LEN]; TCHAR oTableType[NAME_LEN]; TCHAR oRemark[REM_LEN]; SQLLEN oTableQualifierlen,oTableOwnerlen,oTableNamelen,oTableTypelen,oRemarklen; int cols, iatt; SWORD numOfCols = 0; SWORD pcbDesc; SQLLEN pfDesc; TCHAR cn[TabType_LEN]; SWORD cl; SWORD st; SQLULEN cp; SWORD cs, cnull; TCHAR rgbDesc[RGB_MAX_LEN]; TCHAR *CharOutput[12]; SQLLEN stringlength; struct { TCHAR *TableName; TCHAR *TableType; TCHAR *TableTypeIn; } Table[] = { {_T("--") ,_T("TABLE") ,_T("")}, {_T("--") ,_T("TABLE") ,_T("TABLE")}, {_T("--") ,_T("TABLE") ,_T("TABLE,VIEW,SYSTEM TABLE")}, {_T("--") ,_T("TABLE") ,_T("TABLE,SYSTEM TABLE,VIEW")}, {_T("--") ,_T("TABLE") ,_T("TABLE,VIEW,SYSTEM TABLE,SYNONYM,MV,MVG")}, {_T("--") ,_T("VIEW"),_T("VIEW")}, {_T("--") ,_T("VIEW"),_T("TABLE,VIEW,SYSTEM TABLE")}, {_T("--") ,_T("MATERIALIZED VIEW"),_T("")}, {_T("--") ,_T("MATERIALIZED VIEW"),_T("MV")}, {_T("--") ,_T("SYNONYM"),_T("")}, {_T("--") ,_T("SYNONYM"),_T("SYNONYM")}, {_T("endloop"),} }; struct { TCHAR *TabQua; TCHAR *TabOwner; TCHAR *TabName; TCHAR *TabType; int changedSchema; } TableWC[] = { {_T(SQL_ALL_CATALOGS),_T("") ,_T("--") ,_T("") ,-1}, //0 {_T("") ,_T(SQL_ALL_SCHEMAS),_T("--") ,_T("") ,-1}, //1 {_T("") ,_T("") ,_T("--") ,_T(SQL_ALL_TABLE_TYPES) ,-1}, //2 {pTestInfo->Catalog ,pTestInfo->Schema ,_T("--") ,_T("TABLE") ,-1}, //3 {pTestInfo->Catalog ,_T(SQL_ALL_SCHEMAS),_T("--") ,_T(SQL_ALL_TABLE_TYPES) ,-1}, //4 {pTestInfo->Catalog ,_T(SQL_ALL_SCHEMAS),_T("--") ,_T(SQL_ALL_TABLE_TYPES) ,-1}, //5 {pTestInfo->Catalog ,_T(SQL_ALL_SCHEMAS),_T("--") ,_T("TABLE") ,-1}, //6 {pTestInfo->Catalog ,_T(SQL_ALL_SCHEMAS),_T("--") ,_T(SQL_ALL_TABLE_TYPES) ,-1}, //7 {pTestInfo->Catalog ,_T(SQL_ALL_SCHEMAS),_T("--") ,_T(SQL_ALL_TABLE_TYPES) ,-1}, //8 {pTestInfo->Catalog ,_T(SQL_ALL_SCHEMAS),_T("--") ,_T("TABLE") ,-1}, //9 {pTestInfo->Catalog ,_T("--") ,_T("--") ,_T("TABLE") ,1}, //10 {pTestInfo->Catalog ,_T("--") ,_T("--") ,_T("TABLE") ,1}, //11 {pTestInfo->Catalog ,pTestInfo->Schema ,_T("--") ,_T("TABLE") ,-1}, //12 {pTestInfo->Catalog ,pTestInfo->Schema ,_T("--") ,_T("TABLE") ,-1}, //13 {pTestInfo->Catalog ,pTestInfo->Schema ,_T("--") ,_T(SQL_ALL_TABLE_TYPES) ,-1}, //14 {pTestInfo->Catalog ,pTestInfo->Schema ,_T("--") ,_T("TABLE") ,-1}, //15 {pTestInfo->Catalog ,pTestInfo->Schema ,_T("--") ,_T("TABLE") ,-1}, //16 {pTestInfo->Catalog ,pTestInfo->Schema ,_T("--") ,_T("TABLE") ,-1}, //17 {pTestInfo->Catalog ,pTestInfo->Schema ,_T("--") ,_T("TABLE") ,-1}, //18 {pTestInfo->Catalog ,_T(SQL_ALL_SCHEMAS),_T("--") ,_T(SQL_ALL_TABLE_TYPES) ,-1}, //19 {pTestInfo->Catalog ,_T(SQL_ALL_SCHEMAS),_T("--") ,_T("TABLE") ,-1}, //20 {pTestInfo->Catalog ,_T(SQL_ALL_SCHEMAS),_T("--") ,_T("TABLE") ,-1}, //21 {pTestInfo->Catalog ,_T("--") ,_T("--") ,_T("TABLE") ,1}, //22 {pTestInfo->Catalog ,_T(SQL_ALL_SCHEMAS),_T("--") ,_T("TABLE") ,-1}, //23 {pTestInfo->Catalog ,_T("--") ,_T("--") ,_T("TABLE") ,1}, //24 {pTestInfo->Catalog ,pTestInfo->Schema ,_T("--") ,_T("TABLE") ,-1}, //25 {pTestInfo->Catalog ,_T("--") ,_T("--") ,_T("TABLE") ,1}, //26 {pTestInfo->Catalog ,pTestInfo->Schema ,_T("--") ,_T("VIEW") ,-1}, //27 {pTestInfo->Catalog ,pTestInfo->Schema ,_T("--") ,_T("TABLE") ,-1}, //28 {pTestInfo->Catalog ,pTestInfo->Schema ,_T("--") ,_T(SQL_ALL_TABLE_TYPES) ,-1}, //29 {pTestInfo->Catalog ,pTestInfo->Schema ,_T("--") ,_T("TABLE") ,-1}, //30 {pTestInfo->Catalog ,pTestInfo->Schema ,_T("--") ,_T("VIEW") ,-1}, //31 {pTestInfo->Catalog ,pTestInfo->Schema ,_T("--") ,_T("TABLE") ,-1}, //32 {pTestInfo->Catalog ,pTestInfo->Schema ,_T("--") ,_T("TABLE") ,-1}, //33 {pTestInfo->Catalog ,pTestInfo->Schema ,_T("--") ,_T("TABLE") ,-1}, //34 {_T("NULL") ,pTestInfo->Schema ,_T("--") ,_T("TABLE") ,-1}, //35 {pTestInfo->Catalog ,pTestInfo->Schema ,_T("--") ,_T("TABLE") ,-1}, //36 {pTestInfo->Catalog ,pTestInfo->Schema ,_T("--") ,_T("TABLE") ,-1}, //37 {_T("NULL") ,_T("--") ,_T("--") ,_T("TABLE") ,0}, //38 {_T("NULL") ,pTestInfo->Schema ,_T("--") ,_T("TABLE") ,-1}, //39 {_T("NULL") ,_T("NULL") ,_T("--") ,_T("TABLE") ,-1}, //40 {pTestInfo->Catalog ,_T("--") ,_T("--") ,_T(SQL_ALL_TABLE_TYPES) ,0}, //41 {pTestInfo->Catalog ,_T("--") ,_T("--") ,_T(SQL_ALL_TABLE_TYPES) ,0}, //42 {pTestInfo->Catalog ,_T("--") ,_T("--") ,_T(SQL_ALL_TABLE_TYPES) ,2}, //43 {_T("endloop"),} }; struct { TCHAR *TabQua; SWORD TabQuaLen; TCHAR *TabOwner; SWORD TabOwnerLen; TCHAR *TabName; SWORD TabNameLen; TCHAR *TabType; SWORD TabTypeLen; } TableWC2[] = { // wild cards from here {pTestInfo->Catalog, (SWORD)-1, pTestInfo->Schema,(SWORD)-1, _T("--"),(SWORD)-1, _T(""), (SWORD)-1}, //{pTestInfo->Catalog, (SWORD)4, pTestInfo->Schema,(SWORD)2, "OBJECTS",(SWORD)2, _T(""), (SWORD)2}, //{pTestInfo->Catalog, (SWORD)3, pTestInfo->Schema,(SWORD)7, "OBJECTS",(SWORD)3, _T(""), (SWORD)0}, {_T("endloop"),} }; //attributes for columns added for negative testing UWORD DescrType[] = { SQL_COLUMN_AUTO_INCREMENT,SQL_COLUMN_CASE_SENSITIVE,SQL_COLUMN_COUNT, SQL_COLUMN_DISPLAY_SIZE,SQL_COLUMN_LENGTH,SQL_COLUMN_MONEY, SQL_COLUMN_NULLABLE,SQL_COLUMN_PRECISION,SQL_COLUMN_SCALE, SQL_COLUMN_SEARCHABLE,SQL_COLUMN_TYPE,SQL_COLUMN_UNSIGNED, SQL_COLUMN_UPDATABLE,SQL_COLUMN_NAME,SQL_COLUMN_TYPE_NAME, SQL_COLUMN_OWNER_NAME,SQL_COLUMN_QUALIFIER_NAME,SQL_COLUMN_TABLE_NAME, SQL_COLUMN_LABEL }; struct { TCHAR cat[STR_LEN]; TCHAR sch[STR_LEN]; TCHAR tab[STR_LEN]; TCHAR typ[STR_LEN]; } displayBuf; int i = 0, k = 0, NullValue = 0; TCHAR tmpSchema[129]; TCHAR schemaList[3][256]; int myInd=1; int len = _tcslen(pTestInfo->Schema); TCHAR *CrtCol[] = { _T("--"), _T("--") }; TCHAR *DrpTab[] = { _T("--"), _T("--"), _T("--")}; TCHAR *CrtTab[] = { _T("--"), _T("--"), _T("--")}; //=========================================================================================================== var_list_t *var_list; var_list = load_api_vars(_T("SQLTables"), charset_file); if (var_list == NULL) return FAILED; Table[0].TableName = var_mapping(_T("SQLTables_Table_TableName_0"), var_list); Table[1].TableName = var_mapping(_T("SQLTables_Table_TableName_1"), var_list); Table[2].TableName = var_mapping(_T("SQLTables_Table_TableName_2"), var_list); Table[3].TableName = var_mapping(_T("SQLTables_Table_TableName_3"), var_list); Table[4].TableName = var_mapping(_T("SQLTables_Table_TableName_4"), var_list); Table[5].TableName = var_mapping(_T("SQLTables_Table_TableName_5"), var_list); Table[6].TableName = var_mapping(_T("SQLTables_Table_TableName_6"), var_list); Table[7].TableName = var_mapping(_T("SQLTables_Table_TableName_7"), var_list); Table[8].TableName = var_mapping(_T("SQLTables_Table_TableName_8"), var_list); Table[9].TableName = var_mapping(_T("SQLTables_Table_TableName_9"), var_list); Table[10].TableName = var_mapping(_T("SQLTables_Table_TableName_10"), var_list); TableWC[10].TabOwner = var_mapping(_T("SQLTables_TableWC_TabOwner_10"), var_list); TableWC[11].TabOwner = var_mapping(_T("SQLTables_TableWC_TabOwner_11"), var_list); TableWC[22].TabOwner = var_mapping(_T("SQLTables_TableWC_TabOwner_22"), var_list); TableWC[24].TabOwner = var_mapping(_T("SQLTables_TableWC_TabOwner_24"), var_list); TableWC[26].TabOwner = var_mapping(_T("SQLTables_TableWC_TabOwner_26"), var_list); TableWC[38].TabOwner = var_mapping(_T("SQLTables_TableWC_TabOwner_38"), var_list); TableWC[41].TabOwner = var_mapping(_T("SQLTables_TableWC_TabOwner_10"), var_list); TableWC[42].TabOwner = var_mapping(_T("SQLTables_TableWC_TabOwner_41"), var_list); TableWC[43].TabOwner = var_mapping(_T("SQLTables_TableWC_TabOwner_43"), var_list); TableWC[0].TabName = var_mapping(_T("SQLTables_TableWC_TabName_0"), var_list); TableWC[1].TabName = var_mapping(_T("SQLTables_TableWC_TabName_1"), var_list); TableWC[2].TabName = var_mapping(_T("SQLTables_TableWC_TabName_2"), var_list); TableWC[3].TabName = var_mapping(_T("SQLTables_TableWC_TabName_3"), var_list); TableWC[4].TabName = var_mapping(_T("SQLTables_TableWC_TabName_4"), var_list); TableWC[5].TabName = var_mapping(_T("SQLTables_TableWC_TabName_5"), var_list); TableWC[6].TabName = var_mapping(_T("SQLTables_TableWC_TabName_6"), var_list); TableWC[7].TabName = var_mapping(_T("SQLTables_TableWC_TabName_7"), var_list); TableWC[8].TabName = var_mapping(_T("SQLTables_TableWC_TabName_8"), var_list); TableWC[9].TabName = var_mapping(_T("SQLTables_TableWC_TabName_9"), var_list); TableWC[10].TabName = var_mapping(_T("SQLTables_TableWC_TabName_10"), var_list); TableWC[11].TabName = var_mapping(_T("SQLTables_TableWC_TabName_11"), var_list); TableWC[12].TabName = var_mapping(_T("SQLTables_TableWC_TabName_12"), var_list); TableWC[13].TabName = var_mapping(_T("SQLTables_TableWC_TabName_13"), var_list); TableWC[14].TabName = var_mapping(_T("SQLTables_TableWC_TabName_14"), var_list); TableWC[15].TabName = var_mapping(_T("SQLTables_TableWC_TabName_15"), var_list); TableWC[16].TabName = var_mapping(_T("SQLTables_TableWC_TabName_16"), var_list); TableWC[17].TabName = var_mapping(_T("SQLTables_TableWC_TabName_17"), var_list); TableWC[18].TabName = var_mapping(_T("SQLTables_TableWC_TabName_18"), var_list); TableWC[19].TabName = var_mapping(_T("SQLTables_TableWC_TabName_19"), var_list); TableWC[20].TabName = var_mapping(_T("SQLTables_TableWC_TabName_20"), var_list); TableWC[21].TabName = var_mapping(_T("SQLTables_TableWC_TabName_21"), var_list); TableWC[22].TabName = var_mapping(_T("SQLTables_TableWC_TabName_22"), var_list); TableWC[23].TabName = var_mapping(_T("SQLTables_TableWC_TabName_23"), var_list); TableWC[24].TabName = var_mapping(_T("SQLTables_TableWC_TabName_24"), var_list); TableWC[25].TabName = var_mapping(_T("SQLTables_TableWC_TabName_25"), var_list); TableWC[26].TabName = var_mapping(_T("SQLTables_TableWC_TabName_26"), var_list); TableWC[27].TabName = var_mapping(_T("SQLTables_TableWC_TabName_27"), var_list); TableWC[28].TabName = var_mapping(_T("SQLTables_TableWC_TabName_28"), var_list); TableWC[29].TabName = var_mapping(_T("SQLTables_TableWC_TabName_29"), var_list); TableWC[30].TabName = var_mapping(_T("SQLTables_TableWC_TabName_30"), var_list); TableWC[31].TabName = var_mapping(_T("SQLTables_TableWC_TabName_31"), var_list); TableWC[32].TabName = var_mapping(_T("SQLTables_TableWC_TabName_32"), var_list); TableWC[33].TabName = var_mapping(_T("SQLTables_TableWC_TabName_33"), var_list); TableWC[34].TabName = var_mapping(_T("SQLTables_TableWC_TabName_34"), var_list); TableWC[35].TabName = var_mapping(_T("SQLTables_TableWC_TabName_35"), var_list); TableWC[36].TabName = var_mapping(_T("SQLTables_TableWC_TabName_36"), var_list); TableWC[37].TabName = var_mapping(_T("SQLTables_TableWC_TabName_37"), var_list); TableWC[38].TabName = var_mapping(_T("SQLTables_TableWC_TabName_38"), var_list); TableWC[39].TabName = var_mapping(_T("SQLTables_TableWC_TabName_39"), var_list); TableWC[40].TabName = var_mapping(_T("SQLTables_TableWC_TabName_40"), var_list); TableWC[41].TabName = var_mapping(_T("SQLTables_TableWC_TabName_41"), var_list); TableWC[42].TabName = var_mapping(_T("SQLTables_TableWC_TabName_42"), var_list); TableWC[43].TabName = var_mapping(_T("SQLTables_TableWC_TabName_43"), var_list); TableWC2[0].TabName = var_mapping(_T("SQLTables_TableWC2_TabName_0"), var_list); CrtCol[0] = var_mapping(_T("SQLTables_CrtCol_0"), var_list); CrtCol[1] = var_mapping(_T("SQLTables_CrtCol_1"), var_list); DrpTab[0] = var_mapping(_T("SQLTables_DrpTab_0"), var_list); DrpTab[1] = var_mapping(_T("SQLTables_DrpTab_1"), var_list); DrpTab[2] = var_mapping(_T("SQLTables_DrpTab_2"), var_list); CrtTab[0] = var_mapping(_T("SQLTables_CrtTab_0"), var_list); CrtTab[1] = var_mapping(_T("SQLTables_CrtTab_1"), var_list); CrtTab[2] = var_mapping(_T("SQLTables_CrtTab_2"), var_list); //=========================================================================================================== memset(schemaList[0],'\0', 256*sizeof(TCHAR)); memset(schemaList[1],'\0', 256*sizeof(TCHAR)); memset(schemaList[2],'\0', 256*sizeof(TCHAR)); myInd = len - 2; if (len>5) myInd=4; /* #ifndef UNICODE if (_tcscmp("English", _tsetlocale(LC_ALL, _T(""))) != 0) { _mbsncpy(schemaList[0],pTestInfo->Schema,myInd); _mbscat(schemaList[0], "%"); _mbsncpy(schemaList[1],pTestInfo->Schema,myInd+1); _mbscat(schemaList[1], "%"); } else { #endif */ _tcsncpy(schemaList[0],pTestInfo->Schema,myInd); _tcscat(schemaList[0], _T("%")); _tcsncpy(schemaList[1],pTestInfo->Schema,myInd+1); _tcscat(schemaList[1], _T("%")); /* #ifndef UNICODE } #endif */ len = 0; myInd = 0; do { if (pTestInfo->Schema[myInd] == '_') schemaList[2][len++] = '\\'; schemaList[2][len++] = pTestInfo->Schema[myInd]; } while (pTestInfo->Schema[myInd++] != '\0'); LogMsg(NONE,_T("%s %s %s\n"), schemaList[0], schemaList[1], schemaList[2]); if (isCharSet) { _stprintf(tmpSchema, _T("\"SQLTABLES_%s\""), pTestInfo->Schema); } else { _stprintf(tmpSchema, _T("SQLTABLES_%s"), pTestInfo->Schema); } _tcsupr(tmpSchema); //====================================================================================================== LogMsg(LINEBEFORE+SHORTTIMESTAMP,_T("Begin testing API => MX SPECIFIC SQLTables.\n")); TEST_INIT; TESTCASE_BEGIN("Setup for SQLTables tests\n"); // for ODBC 3.0 if(!FullConnectWithOptions(pTestInfo, CONNECT_ODBC_VERSION_3)) { LogMsg(NONE,_T("Unable to connect as ODBC3.0 application.\n")); TEST_FAILED; TEST_RETURN; } henv = pTestInfo->henv; hdbc = pTestInfo->hdbc; hstmt = (SQLHANDLE)pTestInfo->hstmt; returncode = SQLAllocStmt((SQLHANDLE)hdbc, &hstmt); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLAllocStmt")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } else { LogMsg(NONE,_T("Allocate a stmt handle successfully.\n")); } TESTCASE_END; _tcscpy(pTestInfo->Catalog, _T("TRAFODION")); if (returncode == SQL_SUCCESS) { _stprintf(Heading,_T("drop schema %s.%s cascade"),pTestInfo->Catalog,tmpSchema); returncode = SQLExecDirect(hstmt,(SQLTCHAR*)Heading, SQL_NTS); _stprintf(Heading,_T("create schema %s.%s"),pTestInfo->Catalog,tmpSchema); returncode = SQLExecDirect(hstmt,(SQLTCHAR*)Heading, SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } _stprintf(Heading,_T("set schema %s.%s"),pTestInfo->Catalog,tmpSchema); returncode = SQLExecDirect(hstmt,(SQLTCHAR*)Heading, SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } _tcscpy(TableQualifier,pTestInfo->Catalog); _tcscpy(TableOwner, tmpSchema); _tcscpy(Remark,_T("")); TableStr = (TCHAR *)malloc(MAX_NOS_SIZE); i = 0; while (_tcsicmp(Table[i].TableName,_T("endloop")) != 0) // cleanup { _tcscpy(TableStr,_T("")); _tcscat(TableStr,_T("drop ")); _tcscat(TableStr,Table[i].TableType); _tcscat(TableStr,_T(" ")); _tcscat(TableStr,Table[i].TableName); _tcscat(TableStr,_T(" cascade")); LogMsg(NONE,_T("Cleanup: %s\n"),TableStr); returncode = SQLExecDirect(hstmt,(SQLTCHAR*) TableStr,SQL_NTS); i++; } i = 0; while (_tcsicmp(Table[i].TableName,_T("endloop")) != 0) { _tcscpy(TableStr,_T("")); _tcscat(TableStr,_T("create ")); _tcscat(TableStr,Table[i].TableType); _tcscat(TableStr,_T(" ")); _tcscat(TableStr,Table[i].TableName); if (_tcsicmp(Table[i].TableType,_T("VIEW")) == 0) { _tcscat(TableStr,CrtCol[1]); _tcscat(TableStr, Table[0].TableName); } else if (_tcsicmp(Table[i].TableType,_T("MATERIALIZED VIEW")) == 0) { _tcscat(TableStr, _T(" REFRESH ON REQUEST INITIALIZE ON REFRESH ")); _tcscat(TableStr,CrtCol[1]); _tcscat(TableStr, Table[0].TableName); } else if (_tcsicmp(Table[i].TableType,_T("SYNONYM")) == 0) { _tcscat(TableStr, _T(" FOR ")); _tcscat(TableStr, Table[0].TableName); } else { _tcscat(TableStr,CrtCol[0]); } _stprintf(Heading,_T("SQLTables: Test %d: using the following table create command=> \n"),i); _tcscat(Heading,TableStr); _tcscat(Heading,_T("\n")); TESTCASE_BEGINW(Heading); returncode = SQLExecDirect(hstmt,(SQLTCHAR*)TableStr,SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { LogMsg(NONE,_T("Created table successfully.\n")); } if(isCharSet) { returncode = SQLSetStmtAttr(hstmt,SQL_ATTR_METADATA_ID,(SQLPOINTER)SQL_TRUE,0); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLSetStmtAttr(SQL_ATTR_METADATA_ID")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } } if (returncode == SQL_SUCCESS) { if (_tcslen(TableQualifier) > 0) returncode = SQLTables(hstmt,(SQLTCHAR*)TableQualifier,(SWORD)_tcslen(TableQualifier),(SQLTCHAR*)TableOwner,(SWORD)_tcslen(TableOwner),(SQLTCHAR*)Table[i].TableName,(SWORD)_tcslen(Table[i].TableName),(SQLTCHAR*)Table[i].TableTypeIn,(SWORD)_tcslen(Table[i].TableTypeIn)); else returncode = SQLTables(hstmt,NULL,(SWORD)_tcslen(TableQualifier),(SQLTCHAR*)TableOwner,(SWORD)_tcslen(TableOwner),(SQLTCHAR*)Table[i].TableName,(SWORD)_tcslen(Table[i].TableName),(SQLTCHAR*)Table[i].TableTypeIn,(SWORD)_tcslen(Table[i].TableTypeIn)); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLTables")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } else { LogMsg(NONE,_T("Call to SQLTables() executed successfully.\n")); _tcscpy(oTableQualifier,_T("")); _tcscpy(oTableOwner,_T("")); _tcscpy(oTableName,_T("")); _tcscpy(oTableType,_T("")); _tcscpy(oRemark,_T("")); returncode=SQLBindCol(hstmt,1,SQL_C_TCHAR,oTableQualifier,NAME_LEN,&oTableQualifierlen); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindCol")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } returncode=SQLBindCol(hstmt,2,SQL_C_TCHAR,oTableOwner,NAME_LEN,&oTableOwnerlen); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindCol")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } returncode=SQLBindCol(hstmt,3,SQL_C_TCHAR,oTableName,NAME_LEN,&oTableNamelen); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindCol")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } returncode=SQLBindCol(hstmt,4,SQL_C_TCHAR,oTableType,NAME_LEN,&oTableTypelen); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindCol")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } returncode=SQLBindCol(hstmt,5,SQL_C_TCHAR,oRemark,NAME_LEN,&oRemarklen); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindCol")){ LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } k = 0; while (returncode == SQL_SUCCESS) { returncode = SQLFetch(hstmt); if((returncode != SQL_NO_DATA_FOUND)&&(!CHECKRC(SQL_SUCCESS,returncode,"SQLFetch"))) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else if (returncode == SQL_SUCCESS) { if (_tcslen(TableQualifier) == 0) { //_tcscpy(TableQualifier, _T("TRAFODION")); _tcscpy(TableQualifier, _T("TRAFODION")); } if ((_tcsicmp(TableQualifier,oTableQualifier) == 0) && (cwcscmp(TableOwner,oTableOwner,TRUE) == 0) && (cwcscmp(Table[i].TableName,oTableName,TRUE) == 0) && (_tcsnicmp(Table[i].TableType,oTableType,_tcslen(Table[i].TableType)) == 0) && (_tcsicmp(Remark,oRemark) == 0)) { LogMsg(NONE,_T("TableQualifier expect: '%s' and actual: '%s' are matched\n"),(SQLTCHAR*)TableQualifier,oTableQualifier); LogMsg(NONE,_T("TableOwner expect: '%s' and actual: '%s' are matched\n"),(SQLTCHAR*)TableOwner,oTableOwner); LogMsg(NONE,_T("TableName expect: '%s' and actual: '%s' are matched\n"),(SQLTCHAR*)Table[i].TableName,oTableName); LogMsg(NONE,_T("TableType expect: '%s' and actual: '%s' are matched\n"),Table[i].TableType,oTableType); LogMsg(NONE,_T("Remark expect: '%s' and actual: '%s' are matched\n"),Remark,oRemark); } else { TEST_FAILED; if (_tcsicmp(TableQualifier,oTableQualifier) != 0) LogMsg(ERRMSG,_T("TableQualifier expect: '%s' and actual: '%s' are not matched\n"),(SQLTCHAR*)TableQualifier,oTableQualifier); if (cwcscmp(TableOwner,oTableOwner,TRUE) != 0) LogMsg(ERRMSG,_T("TableOwner expect: '%s' and actual: '%s' are not matched\n"),(SQLTCHAR*)TableOwner,oTableOwner); if (cwcscmp(Table[i].TableName,oTableName,TRUE) != 0) LogMsg(ERRMSG,_T("TableName expect: '%s' and actual: '%s' are not matched\n"),(SQLTCHAR*)Table[i].TableName,oTableName); if (_tcsnicmp(Table[i].TableType,oTableType,10) != 0) LogMsg(ERRMSG,_T("TableType expect: '%s' and actual: '%s' are not matched\n"),Table[i].TableType,oTableType); if (_tcsicmp(Remark,oRemark) != 0) LogMsg(ERRMSG,_T("Remark expect: '%s' and actual: '%s' are not matched\n"),Remark,oRemark); } k++; } }//End while loop if(k != 1) { TEST_FAILED; LogMsg(ERRMSG,_T("Only one row should be fetched, the actual number of rows fetched: %d\n"), k); } else { LogMsg(NONE, _T("Number of rows fetched: %d\n"), k); } } SQLFreeStmt(hstmt,SQL_UNBIND); SQLFreeStmt(hstmt,SQL_CLOSE); } TESTCASE_END; i++; } // i = 0; // while (_tcsicmp(Table[i].TableName,"endloop") != 0) // cleanup // { // _tcscpy(TableStr,_T("")); // _tcscat(TableStr,"drop "); // _tcscat(TableStr,Table[i].TableType); // _tcscat(TableStr," "); // _tcscat(TableStr,Table[i].TableName); // SQLExecDirect(hstmt,(SQLTCHAR*) TableStr,SQL_NTS); // i++; // } _stprintf(Heading,_T("drop schema %s.%s cascade"),pTestInfo->Catalog,tmpSchema); returncode = SQLExecDirect(hstmt,(SQLTCHAR*)Heading, SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } if (isCharSet) { _stprintf(Heading,_T("set schema %s.\"%s\""),pTestInfo->Catalog,pTestInfo->Schema); } else { _stprintf(Heading,_T("set schema %s.%s"),pTestInfo->Catalog,pTestInfo->Schema); } returncode = SQLExecDirect(hstmt,(SQLTCHAR*)Heading, SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; TEST_RETURN; } //====================================================================================================== _stprintf(Heading,_T("Setting up Table & view to test SQLTables for wildcard options => \n")); _tcscat(Heading,_T("\n")); TESTCASE_BEGINW(Heading); SQLExecDirect(hstmt,(SQLTCHAR*)DrpTab[0],SQL_NTS); SQLExecDirect(hstmt,(SQLTCHAR*)DrpTab[1],SQL_NTS); SQLExecDirect(hstmt,(SQLTCHAR*)DrpTab[2],SQL_NTS); LogMsg(NONE,_T("%s\n"), CrtTab[0]); returncode = SQLExecDirect(hstmt,(SQLTCHAR*)CrtTab[0],SQL_NTS); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { returncode = SQLExecDirect(hstmt,(SQLTCHAR*)CrtTab[1],SQL_NTS); LogMsg(NONE,_T("%s\n"), CrtTab[1]); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } else { LogMsg(NONE,_T("setting up tables & views executed successfully.\n")); TESTCASE_END; } } returncode = SQLExecDirect(hstmt,(SQLTCHAR*)CrtTab[2],SQL_NTS); LogMsg(NONE,_T("%s\n"), CrtTab[2]); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLExecDirect")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } i = 0; while (_tcsicmp(TableWC[i].TabQua,_T("endloop")) != 0) { if(TableWC[i].changedSchema == -1) { printSymbol(TableWC[i].TabQua,displayBuf.cat); printSymbol(TableWC[i].TabOwner,displayBuf.sch); printSymbol(TableWC[i].TabName,displayBuf.tab); printSymbol(TableWC[i].TabType,displayBuf.typ); _stprintf(Heading,_T("Test Positive Functionality of SQLTables for following wildcard options => \n TableQualifier: %s\n TableOwner: %s\n TableName: %s\n TableType: %s\n"), displayBuf.cat, displayBuf.sch, displayBuf.tab, displayBuf.typ); } else { printSymbol(TableWC[i].TabQua,displayBuf.cat); printSymbol(schemaList[TableWC[i].changedSchema],displayBuf.sch); printSymbol(TableWC[i].TabName,displayBuf.tab); printSymbol(TableWC[i].TabType,displayBuf.typ); _stprintf(Heading,_T("Test Positive Functionality of SQLTables for following wildcard options => \n TableQualifier: %s\n TableOwner: %s\n TableName: %s\n TableType: %s\n"), displayBuf.cat, displayBuf.sch, displayBuf.tab, displayBuf.typ); } TESTCASE_BEGINW(Heading); NullValue = 0; returncode = SQLSetStmtAttr(hstmt,SQL_ATTR_METADATA_ID,(SQLPOINTER)SQL_FALSE,0); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLSetStmtAttr(SQL_ATTR_METADATA_ID")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } if (_tcsicmp(TableWC[i].TabType,_T("NULL")) == 0) { TableWC[i].TabType = NULL; NullValue = 1; returncode = SQLTables(hstmt,NULL,0,NULL,0,NULL,0,NULL,0); } else if (_tcsicmp(TableWC[i].TabName,_T("NULL")) == 0) { TableWC[i].TabName = NULL; NullValue = 1; returncode = SQLTables(hstmt,NULL,0,NULL,0,NULL,0,(SQLTCHAR*)TableWC[i].TabType,(SWORD)_tcslen(TableWC[i].TabType)); } else if (_tcsicmp(TableWC[i].TabOwner,_T("NULL")) == 0) { TableWC[i].TabOwner = NULL; NullValue = 1; returncode = SQLTables(hstmt,NULL,0,NULL,0,(SQLTCHAR*)removeQuotes(TableWC[i].TabName,displayBuf.tab),(SWORD)_tcslen(displayBuf.tab),(SQLTCHAR*)TableWC[i].TabType,(SWORD)_tcslen(TableWC[i].TabType)); } else if (_tcsicmp(TableWC[i].TabQua,_T("NULL")) == 0) { TableWC[i].TabQua = NULL; NullValue = 1; if (TableWC[i].changedSchema == -1) returncode = SQLTables(hstmt,NULL,0,(SQLTCHAR*)TableWC[i].TabOwner,(SWORD)_tcslen(TableWC[i].TabOwner),(SQLTCHAR*)removeQuotes(TableWC[i].TabName,displayBuf.tab),(SWORD)_tcslen(displayBuf.tab),(SQLTCHAR*)TableWC[i].TabType,(SWORD)_tcslen(TableWC[i].TabType)); else returncode = SQLTables(hstmt,NULL,0,(SQLTCHAR*)schemaList[TableWC[i].changedSchema],(SWORD)_tcslen(schemaList[TableWC[i].changedSchema]),(SQLTCHAR*)removeQuotes(TableWC[i].TabName,displayBuf.tab),(SWORD)_tcslen(displayBuf.tab),(SQLTCHAR*)TableWC[i].TabType,(SWORD)_tcslen(TableWC[i].TabType)); } else { if (TableWC[i].changedSchema == -1) returncode = SQLTables(hstmt,(SQLTCHAR*)TableWC[i].TabQua,(SWORD)_tcslen(TableWC[i].TabQua),(SQLTCHAR*)TableWC[i].TabOwner,(SWORD)_tcslen(TableWC[i].TabOwner),(SQLTCHAR*)removeQuotes(TableWC[i].TabName,displayBuf.tab),(SWORD)_tcslen(displayBuf.tab),(SQLTCHAR*)TableWC[i].TabType,(SWORD)_tcslen(TableWC[i].TabType)); else returncode = SQLTables(hstmt,(SQLTCHAR*)TableWC[i].TabQua,(SWORD)_tcslen(TableWC[i].TabQua),(SQLTCHAR*)schemaList[TableWC[i].changedSchema],(SWORD)_tcslen(schemaList[TableWC[i].changedSchema]),(SQLTCHAR*)removeQuotes(TableWC[i].TabName,displayBuf.tab),(SWORD)_tcslen(displayBuf.tab),(SQLTCHAR*)TableWC[i].TabType,(SWORD)_tcslen(TableWC[i].TabType)); } if(!CHECKRC(SQL_SUCCESS,returncode,"SQLTables")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } else { LogMsg(NONE,_T("Call to SQLTables() executed successfully.\n")); _tcscpy(oTableQualifier,_T("")); _tcscpy(oTableOwner,_T("")); _tcscpy(oTableName,_T("")); _tcscpy(oTableType,_T("")); _tcscpy(oRemark,_T("")); returncode=SQLBindCol(hstmt,1,SQL_C_TCHAR,oTableQualifier,NAME_LEN,&oTableQualifierlen); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindCol")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } returncode=SQLBindCol(hstmt,2,SQL_C_TCHAR,oTableOwner,NAME_LEN,&oTableOwnerlen); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindCol")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } returncode=SQLBindCol(hstmt,3,SQL_C_TCHAR,oTableName,NAME_LEN,&oTableNamelen); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindCol")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } returncode=SQLBindCol(hstmt,4,SQL_C_TCHAR,oTableType,NAME_LEN,&oTableTypelen); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindCol")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } returncode=SQLBindCol(hstmt,5,SQL_C_TCHAR,oRemark,NAME_LEN,&oRemarklen); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindCol")) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } k = 0; while (returncode == SQL_SUCCESS) { returncode = SQLFetch(hstmt); if((returncode!=SQL_NO_DATA_FOUND) && (!CHECKRC(SQL_SUCCESS,returncode,"SQLFetch"))) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } if (returncode == SQL_SUCCESS) k++; } if(k == 0) { TEST_FAILED; LogMsg(ERRMSG,_T("No Data Found => Atleast one row should be fetched\n")); } else { LogMsg(NONE, _T("Number of rows fetched: %d\n"), k); } } SQLFreeStmt(hstmt,SQL_CLOSE); i++; TESTCASE_END; } free(TableStr); } //========================================================================================= TESTCASE_BEGIN("SQLTables: Negative test with NULL handle.\n"); hstmt1 = (SQLHANDLE)NULL; i = 0; returncode = SQLTables(hstmt1,(SQLTCHAR*)TableWC[i].TabQua,(SWORD)_tcslen(TableWC[i].TabQua),(SQLTCHAR*)TableWC[i].TabOwner,(SWORD)_tcslen(TableWC[i].TabOwner),(SQLTCHAR*)TableWC[i].TabName,(SWORD)_tcslen(TableWC[i].TabName),(SQLTCHAR*)TableWC[i].TabType,(SWORD)_tcslen(TableWC[i].TabType)); if(!CHECKRC(SQL_INVALID_HANDLE,returncode,"SQLTables")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } TESTCASE_END; //========================================================================================= TESTCASE_BEGIN("SQLTables: Negative test with invalid arg lengths.\n"); i = 0; while (_tcsicmp(TableWC2[i].TabQua,_T("endloop")) != 0) { returncode = SQLTables(hstmt,(SQLTCHAR*)TableWC2[i].TabQua,TableWC2[i].TabQuaLen,(SQLTCHAR*)TableWC2[i].TabOwner,TableWC2[i].TabOwnerLen,(SQLTCHAR*)TableWC2[i].TabName,TableWC2[i].TabNameLen,(SQLTCHAR*)TableWC2[i].TabType,TableWC2[i].TabTypeLen); if(!CHECKRC(SQL_ERROR,returncode,"SQLTables")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } i++; } TESTCASE_END; //========================================================================================= TESTCASE_BEGIN("Testing SQLColAttribute, SQLDescribeCol, SQLBindCol and SQLFetch functions for catalog names.\n"); if(isCharSet) { returncode = SQLSetStmtAttr(hstmt,SQL_ATTR_METADATA_ID,(SQLPOINTER)SQL_FALSE,0); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLSetStmtAttr(SQL_ATTR_METADATA_ID")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } } for(i = 0; i < 5; i++) { returncode = SQLTables(hstmt,(SQLTCHAR*)TableWC[i].TabQua,(SWORD)_tcslen(TableWC[i].TabQua),(SQLTCHAR*)TableWC[i].TabOwner,(SWORD)_tcslen(TableWC[i].TabOwner),(SQLTCHAR*)TableWC[i].TabName,(SWORD)_tcslen(TableWC[i].TabName),(SQLTCHAR*)TableWC[i].TabType,(SWORD)_tcslen(TableWC[i].TabType)); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLColumns")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } returncode = SQLNumResultCols(hstmt, &numOfCols); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLNumResultsCol")) { TEST_FAILED; LogMsg(ERRMSG,_T("Test failed while executing call for SQLNUMRESULTSCOL")); LogAllErrors(henv,hdbc,hstmt); } for(cols = 0; cols < numOfCols; cols++) { returncode = SQLDescribeCol(hstmt,(SWORD)(cols+1),(SQLTCHAR*)cn,TabType_LEN,&cl,&st,&cp,&cs,&cnull); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLDescribeCol")) { TEST_FAILED; LogMsg(ERRMSG,_T("Test failed while executing call for SQLDESCRIBECOL of column")); LogAllErrors(henv,hdbc,hstmt); } CharOutput[cols] = (TCHAR *)malloc(STR_LEN); for (iatt = 0; iatt <= TOTALATTRIBS; iatt++) { _tcscpy(rgbDesc,_T("")); pcbDesc = 0; pfDesc = 0; returncode = SQLColAttributes(hstmt,(SWORD)(cols+1),DescrType[iatt],(SQLTCHAR*)rgbDesc,STR_LEN,&pcbDesc,&pfDesc); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLColAttribute")) { TEST_FAILED; LogAllErrors(henv,hdbc,hstmt); } } returncode = SQLBindCol(hstmt,(SWORD)(cols+1),SQL_C_TCHAR,(SQLTCHAR*)CharOutput[cols],STR_LEN,&stringlength); if(!CHECKRC(SQL_SUCCESS,returncode,"SQLBindCol")) { TEST_FAILED; LogMsg(ERRMSG,_T("Test failed while executing call for SQLBindCols of column : %d.\n"),cols); LogAllErrors(henv,hdbc,hstmt); } } k = 0; while (returncode == SQL_SUCCESS) { returncode = SQLFetch(hstmt); if((returncode!=SQL_NO_DATA_FOUND) && (!CHECKRC(SQL_SUCCESS,returncode,"SQLFetch"))) { LogAllErrors(henv,hdbc,hstmt); TEST_FAILED; } if (returncode == SQL_SUCCESS) k++; } if(k == 0) { _stprintf(Heading,_T("\n TableQualifier: %s\n TableOwner: %s\n TableName: %s\n TableType: %s\n"), printSymbol(TableWC[i].TabQua,displayBuf.cat), printSymbol(TableWC[i].TabOwner,displayBuf.sch), printSymbol(TableWC[i].TabName,displayBuf.tab), printSymbol(TableWC[i].TabType,displayBuf.typ)); LogMsg(NONE,Heading); TEST_FAILED; LogMsg(ERRMSG,_T("No Data Found => Atleast one row should be fetched\n")); } else { LogMsg(NONE, _T("Number of rows fetched: %d\n"), k); } for(cols = 0; cols < numOfCols; cols++) { free(CharOutput[cols]); } TESTCASE_END; } // Clean up SQLExecDirect(hstmt,(SQLTCHAR*)DrpTab[0],SQL_NTS); SQLExecDirect(hstmt,(SQLTCHAR*)DrpTab[1],SQL_NTS); SQLExecDirect(hstmt,(SQLTCHAR*)DrpTab[2],SQL_NTS); //========================================================================================= FullDisconnect(pTestInfo); LogMsg(SHORTTIMESTAMP+LINEAFTER,_T("End testing API => SQLTables.\n")); free_list(var_list); TEST_RETURN; }