SQLRETURN
MNDBFreeHandle(SQLSMALLINT HandleType,
SQLHANDLE Handle)
{
/* Check parameter handle */
if (Handle == NULL) {
/* can not set an error message because the handle is NULL */
return SQL_INVALID_HANDLE;
}
switch (HandleType) {
case SQL_HANDLE_ENV:
{
ODBCEnv *env = (ODBCEnv *) Handle;
/* check it's validity */
if (!isValidEnv(env))
return SQL_INVALID_HANDLE;
clearEnvErrors(env);
return ODBCFreeEnv_(env);
}
case SQL_HANDLE_DBC:
{
ODBCDbc *dbc = (ODBCDbc *) Handle;
/* check it's validity */
if (!isValidDbc(dbc))
return SQL_INVALID_HANDLE;
clearDbcErrors(dbc);
return ODBCFreeDbc_(dbc);
}
case SQL_HANDLE_STMT:
{
ODBCStmt *stmt = (ODBCStmt *) Handle;
/* check it's validity */
if (!isValidStmt(stmt))
return SQL_INVALID_HANDLE;
clearStmtErrors(stmt);
return ODBCFreeStmt_(stmt);
}
case SQL_HANDLE_DESC:
{
ODBCDesc *desc = (ODBCDesc *) Handle;
/* check it's validity */
if (!isValidDesc(desc))
return SQL_INVALID_HANDLE;
clearDescErrors(desc);
return ODBCFreeDesc_(desc);
}
default:
return SQL_INVALID_HANDLE;
}
/* not reached */
}
SQLRETURN SQL_API
SQLSetDescFieldW(SQLHDESC DescriptorHandle,
SQLSMALLINT RecNumber,
SQLSMALLINT FieldIdentifier,
SQLPOINTER ValuePtr,
SQLINTEGER BufferLength)
{
ODBCDesc *desc = (ODBCDesc *) DescriptorHandle;
SQLRETURN rc;
SQLPOINTER ptr;
SQLINTEGER n;
#ifdef ODBCDEBUG
ODBCLOG("SQLSetDescFieldW %p %d %s %p %d\n",
DescriptorHandle, (int) RecNumber,
translateFieldIdentifier(FieldIdentifier),
ValuePtr, (int) BufferLength);
#endif
if (!isValidDesc(desc))
return SQL_INVALID_HANDLE;
clearDescErrors(desc);
switch (FieldIdentifier) {
case SQL_DESC_NAME:
if (BufferLength > 0) /* convert from bytes to characters */
BufferLength /= 2;
fixWcharIn(ValuePtr, BufferLength, SQLCHAR, ptr,
addDescError, desc, return SQL_ERROR);
n = SQL_NTS;
break;
default:
ptr = ValuePtr;
n = BufferLength;
break;
}
rc = MNDBSetDescField(desc, RecNumber, FieldIdentifier, ptr, n);
if (ptr && ptr != ValuePtr)
free(ptr);
return rc;
}
SQLRETURN SQL_API
SQLSetDescField(SQLHDESC DescriptorHandle,
SQLSMALLINT RecNumber,
SQLSMALLINT FieldIdentifier,
SQLPOINTER ValuePtr,
SQLINTEGER BufferLength)
{
#ifdef ODBCDEBUG
ODBCLOG("SQLSetDescField %p %d %s %p %d\n",
DescriptorHandle, (int) RecNumber,
translateFieldIdentifier(FieldIdentifier),
ValuePtr, (int) BufferLength);
#endif
if (!isValidDesc((ODBCDesc *) DescriptorHandle))
return SQL_INVALID_HANDLE;
clearDescErrors((ODBCDesc *) DescriptorHandle);
return MNDBSetDescField((ODBCDesc *) DescriptorHandle, RecNumber, FieldIdentifier, ValuePtr, BufferLength);
}
SQLRETURN
MNDBEndTran(SQLSMALLINT HandleType,
SQLHANDLE Handle,
SQLSMALLINT CompletionType)
{
ODBCEnv *env = NULL;
ODBCDbc *dbc = NULL;
SQLHANDLE StatementHandle;
RETCODE rc;
/* check parameters HandleType and Handle for validity */
switch (HandleType) {
case SQL_HANDLE_DBC:
dbc = (ODBCDbc *) Handle;
if (!isValidDbc(dbc))
return SQL_INVALID_HANDLE;
clearDbcErrors(dbc);
if (!dbc->Connected) {
/* Connection does not exist */
addDbcError(dbc, "08003", NULL, 0);
return SQL_ERROR;
}
break;
case SQL_HANDLE_ENV:
env = (ODBCEnv *) Handle;
if (!isValidEnv(env))
return SQL_INVALID_HANDLE;
clearEnvErrors(env);
if (env->sql_attr_odbc_version == 0) {
/* Function sequence error */
addEnvError(env, "HY010", NULL, 0);
return SQL_ERROR;
}
break;
case SQL_HANDLE_STMT:
if (isValidStmt((ODBCStmt *) Handle)) {
clearStmtErrors((ODBCStmt *) Handle);
/* Invalid attribute/option identifier */
addStmtError((ODBCStmt *) Handle, "HY092", NULL, 0);
return SQL_ERROR;
}
return SQL_INVALID_HANDLE;
case SQL_HANDLE_DESC:
if (isValidDesc((ODBCDesc *) Handle)) {
clearDescErrors((ODBCDesc *) Handle);
/* Invalid attribute/option identifier */
addDescError((ODBCDesc *) Handle, "HY092", NULL, 0);
return SQL_ERROR;
}
return SQL_INVALID_HANDLE;
default:
return SQL_INVALID_HANDLE;
}
/* check parameter CompletionType */
if (CompletionType != SQL_COMMIT && CompletionType != SQL_ROLLBACK) {
/* Invalid transaction operation code */
if (HandleType == SQL_HANDLE_DBC)
addDbcError(dbc, "HY012", NULL, 0);
else
addEnvError(env, "HY012", NULL, 0);
return SQL_ERROR;
}
if (HandleType == SQL_HANDLE_ENV) {
RETCODE rc1 = SQL_SUCCESS;
for (dbc = env->FirstDbc; dbc; dbc = dbc->next) {
assert(isValidDbc(dbc));
if (!dbc->Connected)
continue;
rc = MNDBEndTran(SQL_HANDLE_DBC, dbc, CompletionType);
if (rc == SQL_ERROR)
rc1 = SQL_ERROR;
else if (rc == SQL_SUCCESS_WITH_INFO &&
rc1 != SQL_ERROR)
rc1 = rc;
}
return rc1;
}
assert(HandleType == SQL_HANDLE_DBC);
if (dbc->sql_attr_autocommit == SQL_AUTOCOMMIT_ON) {
/* nothing to do if in autocommit mode */
return SQL_SUCCESS;
}
/* construct a statement object and excute a SQL COMMIT or ROLLBACK */
rc = MNDBAllocStmt(dbc, &StatementHandle);
if (SQL_SUCCEEDED(rc)) {
ODBCStmt *stmt = (ODBCStmt *) StatementHandle;
rc = MNDBExecDirect(stmt,
CompletionType == SQL_COMMIT ? (SQLCHAR *) "commit" : (SQLCHAR *) "rollback",
SQL_NTS);
if (rc == SQL_ERROR || rc == SQL_SUCCESS_WITH_INFO) {
/* get the error/warning and post in on the
* dbc handle */
SQLCHAR sqlState[SQL_SQLSTATE_SIZE + 1];
SQLINTEGER nativeErrCode;
SQLCHAR msgText[SQL_MAX_MESSAGE_LENGTH + 1];
(void) MNDBGetDiagRec(SQL_HANDLE_STMT, stmt, 1,
sqlState, &nativeErrCode,
msgText, sizeof(msgText), NULL);
addDbcError(dbc, (char *) sqlState,
(char *) msgText + ODBCErrorMsgPrefixLength,
nativeErrCode);
}
/* clean up the statement handle */
ODBCResetStmt(stmt);
ODBCFreeStmt_(stmt);
for (stmt = dbc->FirstStmt; stmt; stmt = stmt->next)
ODBCResetStmt(stmt);
} else {
/* could not allocate a statement object */
/* Memory management error */
addDbcError(dbc, "HY013", NULL, 0);
return SQL_ERROR;
}
return rc;
}
