extern wxList TablesInUse;
#endif
-
// SQL Log defaults to be used by GetDbConnection
enum sqlLog SQLLOGstate = sqlLogOFF;
char DBerrorList[DB_MAX_ERROR_HISTORY][DB_MAX_ERROR_MSG_LEN];
/********** wxDB Constructor **********/
-wxDB::wxDB(HENV &aHenv)
+wxDB::wxDB(HENV &aHenv, bool FwdOnlyCursors)
{
int i;
sqlLogState = sqlLogOFF; // By default, logging is turned off
nTables = 0;
- strcpy(sqlState,"");
- strcpy(errorMsg,"");
+ wxStrcpy(sqlState,"");
+ wxStrcpy(errorMsg,"");
nativeError = cbErrorMsg = 0;
for (i = 0; i < DB_MAX_ERROR_HISTORY; i++)
- strcpy(errorList[i], "");
+ wxStrcpy(errorList[i], "");
// Init typeInf structures
- strcpy(typeInfVarchar.TypeName,"");
+ wxStrcpy(typeInfVarchar.TypeName,"");
typeInfVarchar.FsqlType = 0;
typeInfVarchar.Precision = 0;
typeInfVarchar.CaseSensitive = 0;
typeInfVarchar.MaximumScale = 0;
- strcpy(typeInfInteger.TypeName,"");
+ wxStrcpy(typeInfInteger.TypeName,"");
typeInfInteger.FsqlType = 0;
typeInfInteger.Precision = 0;
typeInfInteger.CaseSensitive = 0;
typeInfInteger.MaximumScale = 0;
- strcpy(typeInfFloat.TypeName,"");
+ wxStrcpy(typeInfFloat.TypeName,"");
typeInfFloat.FsqlType = 0;
typeInfFloat.Precision = 0;
typeInfFloat.CaseSensitive = 0;
typeInfFloat.MaximumScale = 0;
- strcpy(typeInfDate.TypeName,"");
+ wxStrcpy(typeInfDate.TypeName,"");
typeInfDate.FsqlType = 0;
typeInfDate.Precision = 0;
typeInfDate.CaseSensitive = 0;
// Copy the HENV into the db class
henv = aHenv;
+ fwdOnlyCursors = FwdOnlyCursors;
// Allocate a data source connection handle
if (SQLAllocConnect(henv, &hdbc) != SQL_SUCCESS)
/********** wxDB::Open() **********/
bool wxDB::Open(char *Dsn, char *Uid, char *AuthStr)
{
- assert(Dsn && strlen(Dsn));
+ assert(Dsn && wxStrlen(Dsn));
dsn = Dsn;
uid = Uid;
authStr = AuthStr;
RETCODE retcode;
-#if !wxODBC_FWD_ONLY_CURSORS
-
- // Specify that the ODBC cursor library be used, if needed. This must be
- // specified before the connection is made.
- retcode = SQLSetConnectOption(hdbc, SQL_ODBC_CURSORS, SQL_CUR_USE_IF_NEEDED);
+ if (!FwdOnlyCursors())
+ {
+ // Specify that the ODBC cursor library be used, if needed. This must be
+ // specified before the connection is made.
+ retcode = SQLSetConnectOption(hdbc, SQL_ODBC_CURSORS, SQL_CUR_USE_IF_NEEDED);
- #ifdef DBDEBUG_CONSOLE
+#ifdef DBDEBUG_CONSOLE
if (retcode == SQL_SUCCESS)
cout << "SQLSetConnectOption(CURSOR_LIB) successful" << endl;
else
cout << "SQLSetConnectOption(CURSOR_LIB) failed" << endl;
- #endif
-
#endif
+ }
// Connect to the data source
retcode = SQLConnect(hdbc, (UCHAR FAR *) Dsn, SQL_NTS,
// Copy the error messages to a global variable
int i;
for (i = 0; i < DB_MAX_ERROR_HISTORY; i++)
- strcpy(DBerrorList[i],errorList[i]);
+ wxStrcpy(DBerrorList[i],errorList[i]);
} // wxDB::Close()
} // wxDB::DispNextError()
/********** wxDB::logError() **********/
-void wxDB::logError(char *errMsg, char *SQLState)
+void wxDB::logError(const char *errMsg, const char *SQLState)
{
- assert(errMsg && strlen(errMsg));
+ assert(errMsg && wxStrlen(errMsg));
static int pLast = -1;
int dbStatus;
{
int i;
for (i = 0; i < DB_MAX_ERROR_HISTORY; i++)
- strcpy(errorList[i], errorList[i+1]);
+ wxStrcpy(errorList[i], errorList[i+1]);
pLast--;
}
- strcpy(errorList[pLast], errMsg);
+ wxStrcpy(errorList[pLast], errMsg);
- if (SQLState && strlen(SQLState))
+ if (SQLState && wxStrlen(SQLState))
if ((dbStatus = TranslateSqlState(SQLState)) != DB_ERR_FUNCTION_SEQUENCE_ERROR)
DB_STATUS = dbStatus;
} // wxDB::logError()
/**********wxDB::TranslateSqlState() **********/
-int wxDB::TranslateSqlState(char *SQLState)
+int wxDB::TranslateSqlState(const char *SQLState)
{
if (!wxStrcmp(SQLState, "01000"))
return(DB_ERR_GENERAL_WARNING);
} // wxDB::TranslateSqlState()
/********** wxDB::Grant() **********/
-bool wxDB::Grant(int privileges, char *tableName, char *userList)
+bool wxDB::Grant(int privileges, const char *tableName, const char *userList)
{
char sqlStmt[DB_MAX_STATEMENT_LEN];
// Build the grant statement
- strcpy(sqlStmt, "GRANT ");
+ wxStrcpy(sqlStmt, "GRANT ");
if (privileges == DB_GRANT_ALL)
- strcat(sqlStmt, "ALL");
+ wxStrcat(sqlStmt, "ALL");
else
{
int c = 0;
if (privileges & DB_GRANT_SELECT)
{
- strcat(sqlStmt, "SELECT");
+ wxStrcat(sqlStmt, "SELECT");
c++;
}
if (privileges & DB_GRANT_INSERT)
{
if (c++)
- strcat(sqlStmt, ", ");
- strcat(sqlStmt, "INSERT");
+ wxStrcat(sqlStmt, ", ");
+ wxStrcat(sqlStmt, "INSERT");
}
if (privileges & DB_GRANT_UPDATE)
{
if (c++)
- strcat(sqlStmt, ", ");
- strcat(sqlStmt, "UPDATE");
+ wxStrcat(sqlStmt, ", ");
+ wxStrcat(sqlStmt, "UPDATE");
}
if (privileges & DB_GRANT_DELETE)
{
if (c++)
- strcat(sqlStmt, ", ");
- strcat(sqlStmt, "DELETE");
+ wxStrcat(sqlStmt, ", ");
+ wxStrcat(sqlStmt, "DELETE");
}
}
- strcat(sqlStmt, " ON ");
- strcat(sqlStmt, tableName);
- strcat(sqlStmt, " TO ");
- strcat(sqlStmt, userList);
+ wxStrcat(sqlStmt, " ON ");
+ wxStrcat(sqlStmt, tableName);
+ wxStrcat(sqlStmt, " TO ");
+ wxStrcat(sqlStmt, userList);
#ifdef DBDEBUG_CONSOLE
cout << endl << sqlStmt << endl;
} // wxDB::Grant()
/********** wxDB::CreateView() **********/
-bool wxDB::CreateView(char *viewName, char *colList, char *pSqlStmt, bool attemptDrop)
+bool wxDB::CreateView(const char *viewName, const char *colList, const char *pSqlStmt, bool attemptDrop)
{
char sqlStmt[DB_MAX_STATEMENT_LEN];
return FALSE;
// Build the create view statement
- strcpy(sqlStmt, "CREATE VIEW ");
- strcat(sqlStmt, viewName);
+ wxStrcpy(sqlStmt, "CREATE VIEW ");
+ wxStrcat(sqlStmt, viewName);
- if (strlen(colList))
+ if (wxStrlen(colList))
{
- strcat(sqlStmt, " (");
- strcat(sqlStmt, colList);
- strcat(sqlStmt, ")");
+ wxStrcat(sqlStmt, " (");
+ wxStrcat(sqlStmt, colList);
+ wxStrcat(sqlStmt, ")");
}
- strcat(sqlStmt, " AS ");
- strcat(sqlStmt, pSqlStmt);
+ wxStrcat(sqlStmt, " AS ");
+ wxStrcat(sqlStmt, pSqlStmt);
WriteSqlLog(sqlStmt);
} // wxDB::CreateView()
/********** wxDB::DropView() **********/
-bool wxDB::DropView(char *viewName)
+bool wxDB::DropView(const char *viewName)
{
// NOTE: This function returns TRUE if the View does not exist, but
// only for identified databases. Code will need to be added
/********** wxDB::ExecSql() **********/
-bool wxDB::ExecSql(char *pSqlStmt)
+bool wxDB::ExecSql(const char *pSqlStmt)
{
SQLFreeStmt(hstmt, SQL_CLOSE);
if (SQLExecDirect(hstmt, (UCHAR FAR *) pSqlStmt, SQL_NTS) == SQL_SUCCESS)
* delete [] colInf;
* }
*/
-CcolInf *wxDB::GetColumns(char *tableName[], char *userID)
+CcolInf *wxDB::GetColumns(char *tableName[], const char *userID)
{
- UINT noCols = 0;
- UINT colNo = 0;
+ UINT noCols = 0;
+ UINT colNo = 0;
CcolInf *colInf = 0;
- RETCODE retcode;
- SDWORD cb;
- char tblName[DB_MAX_TABLE_NAME_LEN+1];
- char colName[DB_MAX_COLUMN_NAME_LEN+1];
- SWORD sqlDataType;
- char userIdUC[80+1];
- char tableNameUC[DB_MAX_TABLE_NAME_LEN+1];
- if (!userID || !strlen(userID))
- userID = uid;
+ RETCODE retcode;
+ SDWORD cb;
+ char tblName[DB_MAX_TABLE_NAME_LEN+1];
+ char colName[DB_MAX_COLUMN_NAME_LEN+1];
+ SWORD sqlDataType;
+
+ wxString UserID;
+ wxString TableName;
+
+ if (!userID || !wxStrlen(userID))
+ UserID = uid;
+ else
+ UserID = userID;
// dBase does not use user names, and some drivers fail if you try to pass one
if (Dbms() == dbmsDBASE)
- userID = "";
+ UserID = "";
// Oracle user names may only be in uppercase, so force
// the name to uppercase
if (Dbms() == dbmsORACLE)
- {
- int i = 0;
- for (char *p = userID; *p; p++)
- userIdUC[i++] = toupper(*p);
- userIdUC[i] = 0;
- userID = userIdUC;
- }
+ UserID = UserID.Upper();
// Pass 1 - Determine how many columns there are.
// Pass 2 - Allocate the CcolInf array and fill in
if (!colInf)
break;
// Mark the end of the array
- strcpy(colInf[noCols].tableName, "");
- strcpy(colInf[noCols].colName, "");
+ wxStrcpy(colInf[noCols].tableName, "");
+ wxStrcpy(colInf[noCols].colName, "");
colInf[noCols].sqlDataType = 0;
}
// Loop through each table name
int tbl;
for (tbl = 0; tableName[tbl]; tbl++)
{
+ TableName = tableName[tbl];
// Oracle table names are uppercase only, so force
// the name to uppercase just in case programmer forgot to do this
if (Dbms() == dbmsORACLE)
- {
- int i = 0;
- for (char *p = tableName[tbl]; *p; p++)
- tableNameUC[i++] = toupper(*p);
- tableNameUC[i] = 0;
- }
- else
- sprintf(tableNameUC,tableName[tbl]);
+ TableName = TableName.Upper();
SQLFreeStmt(hstmt, SQL_CLOSE);
// MySQL and Access cannot accept a user name when looking up column names, so we
// use the call below that leaves out the user name
- if (wxStrcmp(userID,"") &&
+ if (wxStrcmp(UserID.GetData(),"") &&
Dbms() != dbmsMY_SQL &&
Dbms() != dbmsACCESS)
{
retcode = SQLColumns(hstmt,
NULL, 0, // All qualifiers
- (UCHAR *) userID, SQL_NTS, // Owner
- (UCHAR *) tableNameUC, SQL_NTS,
+ (UCHAR *) UserID.GetData(), SQL_NTS, // Owner
+ (UCHAR *) TableName.GetData(), SQL_NTS,
NULL, 0); // All columns
}
else
retcode = SQLColumns(hstmt,
NULL, 0, // All qualifiers
NULL, 0, // Owner
- (UCHAR *) tableNameUC, SQL_NTS,
+ (UCHAR *) TableName.GetData(), SQL_NTS,
NULL, 0); // All columns
}
if (retcode != SQL_SUCCESS)
SQLFreeStmt(hstmt, SQL_CLOSE);
return(0);
}
- SQLBindCol(hstmt, 3, SQL_C_CHAR, (UCHAR*) tblName, DB_MAX_TABLE_NAME_LEN+1, &cb);
- SQLBindCol(hstmt, 4, SQL_C_CHAR, (UCHAR*) colName, DB_MAX_COLUMN_NAME_LEN+1, &cb);
+ SQLBindCol(hstmt, 3, SQL_C_CHAR, (UCHAR*) tblName, DB_MAX_TABLE_NAME_LEN+1, &cb);
+ SQLBindCol(hstmt, 4, SQL_C_CHAR, (UCHAR*) colName, DB_MAX_COLUMN_NAME_LEN+1, &cb);
SQLBindCol(hstmt, 5, SQL_C_SSHORT, (UCHAR*) &sqlDataType, 0, &cb);
while ((retcode = SQLFetch(hstmt)) == SQL_SUCCESS)
{
{
if (colNo < noCols) // Some extra error checking to prevent memory overwrites
{
- strcpy(colInf[colNo].tableName, tblName);
- strcpy(colInf[colNo].colName, colName);
+ wxStrcpy(colInf[colNo].tableName, tblName);
+ wxStrcpy(colInf[colNo].colName, colName);
colInf[colNo].sqlDataType = sqlDataType;
colNo++;
}
/********** wxDB::Catalog() **********/
-bool wxDB::Catalog(char *userID, char *fileName)
+bool wxDB::Catalog(const char *userID, const char *fileName)
{
- assert(fileName && strlen(fileName));
+ assert(fileName && wxStrlen(fileName));
RETCODE retcode;
SDWORD cb;
char typeName[30+1];
SWORD precision, length;
+ wxString UserID;
+
FILE *fp = fopen(fileName,"wt");
if (fp == NULL)
return(FALSE);
SQLFreeStmt(hstmt, SQL_CLOSE);
- if (!userID || !strlen(userID))
- userID = uid;
+ if (!userID || !wxStrlen(userID))
+ UserID = uid;
+ else
+ UserID = userID;
- char userIdUC[80+1];
// Oracle user names may only be in uppercase, so force
// the name to uppercase
if (Dbms() == dbmsORACLE)
- {
- int i = 0;
- for (char *p = userID; *p; p++)
- userIdUC[i++] = toupper(*p);
- userIdUC[i] = 0;
- userID = userIdUC;
- }
+ UserID = UserID.Upper();
- if (wxStrcmp(userID,""))
+ if (wxStrcmp(UserID.GetData(),""))
{
retcode = SQLColumns(hstmt,
NULL, 0, // All qualifiers
- (UCHAR *) userID, SQL_NTS, // User specified
+ (UCHAR *) UserID.GetData(), SQL_NTS, // User specified
NULL, 0, // All tables
NULL, 0); // All columns
}
SQLBindCol(hstmt, 8, SQL_C_SSHORT, (UCHAR*) &length, 0, &cb);
char outStr[256];
- strcpy(tblNameSave,"");
+ wxStrcpy(tblNameSave,"");
int cnt = 0;
while ((retcode = SQLFetch(hstmt)) == SQL_SUCCESS)
fputs("===================== ", fp);
fputs("========= ", fp);
fputs("=========\n", fp);
- strcpy(tblNameSave,tblName);
+ wxStrcpy(tblNameSave,tblName);
}
sprintf(outStr, "%-32s %-32s (%04d)%-15s %9d %9d\n",
tblName, colName, sqlDataType, typeName, precision, length);
// if the object exists in the database. This function does not indicate
// whether or not the user has privleges to query or perform other functions
// on the table.
-bool wxDB::TableExists(char *tableName, char *userID, char *tablePath)
+bool wxDB::TableExists(const char *tableName, const char *userID, const char *tablePath)
{
- assert(tableName && strlen(tableName));
+ wxString UserID;
+ wxString TableName;
+
+ assert(tableName && wxStrlen(tableName));
if (Dbms() == dbmsDBASE)
{
wxString dbName;
- if (tablePath && strlen(tablePath))
+ if (tablePath && wxStrlen(tablePath))
dbName.sprintf("%s/%s.dbf",tablePath,tableName);
else
dbName.sprintf("%s.dbf",tableName);
- bool glt;
- glt = wxFileExists(dbName.GetData());
- return glt;
+
+ bool exists;
+ exists = wxFileExists(dbName.GetData());
+ return exists;
}
- if (!userID || !strlen(userID))
- userID = uid;
+ if (!userID || !wxStrlen(userID))
+ UserID = uid;
+ else
+ UserID = userID;
- char userIdUC[80+1];
// Oracle user names may only be in uppercase, so force
// the name to uppercase
if (Dbms() == dbmsORACLE)
- {
- int i = 0;
- for (char *p = userID; *p; p++)
- userIdUC[i++] = toupper(*p);
- userIdUC[i] = 0;
- userID = userIdUC;
- }
+ UserID = UserID.Upper();
- char tableNameUC[DB_MAX_TABLE_NAME_LEN+1];
+ TableName = tableName;
// Oracle table names are uppercase only, so force
// the name to uppercase just in case programmer forgot to do this
if (Dbms() == dbmsORACLE)
- {
- int i = 0;
- for (char *p = tableName; *p; p++)
- tableNameUC[i++] = toupper(*p);
- tableNameUC[i] = 0;
- }
- else
- sprintf(tableNameUC,tableName);
+ TableName = TableName.Upper();
SQLFreeStmt(hstmt, SQL_CLOSE);
RETCODE retcode;
// MySQL and Access cannot accept a user name when looking up table names, so we
// use the call below that leaves out the user name
- if (wxStrcmp(userID,"") &&
+ if (wxStrcmp(UserID,"") &&
Dbms() != dbmsMY_SQL &&
Dbms() != dbmsACCESS)
{
retcode = SQLTables(hstmt,
- NULL, 0, // All qualifiers
- (UCHAR *) userID, SQL_NTS, // All owners
- (UCHAR FAR *)tableNameUC, SQL_NTS,
- NULL, 0); // All table types
+ NULL, 0, // All qualifiers
+ (UCHAR *) UserID.GetData(), SQL_NTS, // All owners
+ (UCHAR FAR *)TableName.GetData(), SQL_NTS,
+ NULL, 0); // All table types
}
else
{
retcode = SQLTables(hstmt,
- NULL, 0, // All qualifiers
- NULL, 0, // All owners
- (UCHAR FAR *)tableNameUC, SQL_NTS,
- NULL, 0); // All table types
+ NULL, 0, // All qualifiers
+ NULL, 0, // All owners
+ (UCHAR FAR *)TableName.GetData(), SQL_NTS,
+ NULL, 0); // All table types
}
if (retcode != SQL_SUCCESS)
return(DispAllErrors(henv, hdbc, hstmt));
/********** wxDB::SqlLog() **********/
-bool wxDB::SqlLog(enum sqlLog state, char *filename, bool append)
+bool wxDB::SqlLog(enum sqlLog state, const char *filename, bool append)
{
assert(state == sqlLogON || state == sqlLogOFF);
assert(state == sqlLogOFF || filename);
/********** wxDB::WriteSqlLog() **********/
-bool wxDB::WriteSqlLog(char *logMsg)
+bool wxDB::WriteSqlLog(const char *logMsg)
{
assert(logMsg);
*/
DBMS wxDB::Dbms(void)
{
- wxChar baseName[20];
+ wxChar baseName[25+1];
- wxStrncpy(baseName,dbInf.dbmsName,6);
- baseName[6] = 0;
-// if (!wxStrnicmp(dbInf.dbmsName,"Oracle",6))
- if (!wxStricmp(baseName,"Oracle"))
- return(dbmsORACLE);
+ wxStrncpy(baseName,dbInf.dbmsName,25);
if (!wxStricmp(dbInf.dbmsName,"Adaptive Server Anywhere"))
return(dbmsSYBASE_ASA);
- if (!wxStricmp(dbInf.dbmsName,"SQL Server")) // Sybase Adaptive Server Enterprise
+ if (!wxStricmp(dbInf.dbmsName,"SQL Server")) // Sybase Adaptive Server
return(dbmsSYBASE_ASE);
if (!wxStricmp(dbInf.dbmsName,"Microsoft SQL Server"))
return(dbmsMS_SQL_SERVER);
return(dbmsMY_SQL);
if (!wxStricmp(dbInf.dbmsName,"PostgreSQL")) // v6.5.0
return(dbmsPOSTGRES);
+
+ baseName[8] = 0;
+ if (!wxStricmp(baseName,"Informix"))
+ return(dbmsINFORMIX);
+
+ baseName[6] = 0;
+ if (!wxStricmp(baseName,"Oracle"))
+ return(dbmsORACLE);
if (!wxStricmp(dbInf.dbmsName,"ACCESS"))
return(dbmsACCESS);
- wxStrncpy(baseName,dbInf.dbmsName,5);
+ if (!wxStricmp(dbInf.dbmsName,"MySQL"))
+ return(dbmsMY_SQL);
+
baseName[5] = 0;
-// if (!wxStrnicmp(dbInf.dbmsName,"DBASE",5))
if (!wxStricmp(baseName,"DBASE"))
return(dbmsDBASE);
- return(dbmsUNIDENTIFIED);
+ return(dbmsUNIDENTIFIED);
} // wxDB::Dbms()
/********** GetDbConnection() **********/
-wxDB WXDLLEXPORT *GetDbConnection(DbStuff *pDbStuff)
+wxDB WXDLLEXPORT *GetDbConnection(DbStuff *pDbStuff, bool FwdOnlyCursors)
{
DbList *pList;
// Initialize new node in the linked list
pList->PtrNext = 0;
pList->Free = FALSE;
- strcpy(pList->Dsn, pDbStuff->Dsn);
- pList->PtrDb = new wxDB(pDbStuff->Henv);
+ wxStrcpy(pList->Dsn, pDbStuff->Dsn);
+ pList->PtrDb = new wxDB(pDbStuff->Henv,FwdOnlyCursors);
// Connect to the datasource
if (pList->PtrDb->Open(pDbStuff->Dsn, pDbStuff->Uid, pDbStuff->AuthStr))
}
SQLLOGstate = state;
- strcpy(SQLLOGfn,filename);
+ wxStrcpy(SQLLOGfn,filename);
return(TRUE);
} // SqlLog()
/********** GetDataSource() **********/
-bool GetDataSource(HENV henv, char *Dsn, SWORD DsnMax, char *DsDesc, SWORD DsDescMax,
+bool GetDataSource(HENV henv, const char *Dsn, SWORD DsnMax, const char *DsDesc, SWORD DsDescMax,
UWORD direction)
{
SWORD cb;
projects / wxWidgets.git / blobdiff