Changeset 2c813bc in tol

Timestamp:

Jun 3, 2013, 7:15:57 PM (13 years ago)

Author:

Jorge Pérez <josp.jorge@…>

Branches:

1941-docker-image-to-test, devel, master

Children:

27e16c6

Parents:

e4e21ee

Message:

refs #1692, implement the user functions GetDBMSName, GetDBMSVersion & GetDataBaseName

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@5901 be4846ae-f051-483a-831f-b64e7d08527f

Location:

tol/btol/bdb

Files:

• bdspool.cpp (modified) (1 diff)
• dbtol.cpp (modified) (4 diffs)
• tol_bdspool.h (modified) (3 diffs)

tol/btol/bdb/bdspool.cpp

@@ -332 +332 @@
 
   contens_ = dbClose(alias);
+}
+
+//--------------------------------------------------------------------
+DeclareContensClass(BText, BTxtTemporary, BTxtGetDBMSName);
+DefExtOpr(1, BTxtGetDBMSName, "GetDBMSName", 1, 1, "Real", "(Real void)",
+          I2("Return the name of the DBMS for the active connection",
+             "Retorna el nombre del gestor para la conexión activa"),
+          BOperClassify::BayesDataBase_);
+//--------------------------------------------------------------------
+void BTxtGetDBMSName::CalcContens()
+//--------------------------------------------------------------------
+{
+  char buffer[256];
+
+  if (!dbGetDBMSName(buffer, 255))
+    {
+    buffer[0] = '\0';
+    }
+  contens_ = buffer;
+}
+
+//--------------------------------------------------------------------
+DeclareContensClass(BText, BTxtTemporary, BTxtGetDBMSVersion);
+DefExtOpr(1, BTxtGetDBMSVersion, "GetDBMSVersion", 1, 1, "Real", "(Real void)",
+          I2("Return the version of the DBMS for the active connection",
+             "Retorna la versión del gestor para la conexión activa"),
+          BOperClassify::BayesDataBase_);
+//--------------------------------------------------------------------
+void BTxtGetDBMSVersion::CalcContens()
+//--------------------------------------------------------------------
+{
+  char buffer[256];
+
+  if (!dbGetDBMSVersion(buffer, 255))
+    {
+    buffer[0] = '\0';
+    }
+  contens_ = buffer;
+}
+
+//--------------------------------------------------------------------
+DeclareContensClass(BText, BTxtTemporary, BTxtGetDataBaseName);
+DefExtOpr(1, BTxtGetDataBaseName, "GetDataBaseName", 1, 1, "Real", "(Real void)",
+          I2("Return name of the data base for the active connection",
+             "Retorna el nombre de la base de datos para la conexión activa"),
+          BOperClassify::BayesDataBase_);
+//--------------------------------------------------------------------
+void BTxtGetDataBaseName::CalcContens()
+//--------------------------------------------------------------------
+{
+  char buffer[256];
+
+  if (!dbGetDataBaseName(buffer, 255))
+    {
+    buffer[0] = '\0';
+    }
+  contens_ = buffer;
 }
 

tol/btol/bdb/dbtol.cpp

@@ -85 +85 @@
 typedef void* (*dbOpen_fpt)(void**);
 typedef int (*dbClose_fpt)(void*);
+typedef int (*dbGetDBMSName_fpt)(void*, char *, size_t);
+typedef int (*dbGetDBMSVersion_fpt)(void*, char *, size_t);
+typedef int (*dbGetDataBaseName_fpt)(void*, char *, size_t);
 typedef int (*dbOpenQuery_fpt)(void *, const char *);
 typedef int (*dbExecQuery_fpt)(void *, const char *);
@@ -108 +111 @@
   dbOpen_fpt dbOpen_fp;
   dbClose_fpt dbClose_fp;
+  dbGetDBMSName_fpt dbGetDBMSName_fp;
+  dbGetDBMSVersion_fpt dbGetDBMSVersion_fp;
+  dbGetDataBaseName_fpt dbGetDataBaseName_fp;
   dbOpenQuery_fpt dbOpenQuery_fp;
   dbExecQuery_fpt dbExecQuery_fp;
@@ -189 +195 @@
   FUNCTION_LOAD_DECLARATION(Open);
   FUNCTION_LOAD_DECLARATION(Close);
+  FUNCTION_LOAD_DECLARATION(GetDBMSName);
+  FUNCTION_LOAD_DECLARATION(GetDBMSVersion);
+  FUNCTION_LOAD_DECLARATION(GetDataBaseName);
   FUNCTION_LOAD_DECLARATION(OpenQuery);
   FUNCTION_LOAD_DECLARATION(ExecQuery);
@@ -461 +470 @@
 #endif
   return rc;
+}
+
+int dbGetDBMSName(char *dbms, size_t size)
+{
+  if(!active_db_) {
+    Error(I2("There is no database connection.\n",
+             "No existe una conexión activa a BB.DD.\n"));
+    return 0;
+  }
+  DBM_hdl *dbm_hdl = NULL;
+
+  dbm_hdl = dbm_handlers_[active_db_->hdl_idx];
+  return dbm_hdl->dbGetDBMSName_fp(active_db_->dbd, dbms, size);
+}
+
+int dbGetDBMSVersion(char *version, size_t size)
+{
+  if(!active_db_) {
+    Error(I2("There is no database connection.\n",
+             "No existe una conexión activa a BB.DD.\n"));
+    return 0;
+  }
+  DBM_hdl *dbm_hdl = NULL;
+
+  dbm_hdl = dbm_handlers_[active_db_->hdl_idx];
+  return dbm_hdl->dbGetDBMSVersion_fp(active_db_->dbd, version, size);
+}
+
+int dbGetDataBaseName(char *database, size_t size)
+{
+  if(!active_db_) {
+    Error(I2("There is no database connection.\n",
+             "No existe una conexión activa a BB.DD.\n"));
+    return 0;
+  }
+  DBM_hdl *dbm_hdl = NULL;
+
+  dbm_hdl = dbm_handlers_[active_db_->hdl_idx];
+  return dbm_hdl->dbGetDataBaseName_fp(active_db_->dbd, database, size);
 }
 

tol/btol/bdb/tol_bdspool.h

@@ -23 +23 @@
 #define TOL_BDSPOOL_H 1
 
+#include <stdlib.h>
+
 class BSet;
 class BList;
@@ -41 +43 @@
 extern int dbOpenDirect(const char* alias, const char *user, const char *pwd, BSet * dbset=0);
 extern int dbClose(const char *alias);
+extern int dbGetDBMSName(char *dbms, size_t size);
+extern int dbGetDBMSVersion(char *version, size_t size);
+extern int dbGetDataBaseName(char *database, size_t size);
 extern int dbActivate(const char *alias);
 extern BList *dbGetOpened(const char *dbtype);
@@ -62 +67 @@
                        unsigned short& second,
                        unsigned short& msecond);
+extern int dbGetDBMSName(char *dbmsName, size_t size);
+extern int dbGetDBMSVersion(char *dbmsVersion, size_t size);
+extern int dbGetDataBaseName(char *database, size_t size);
 
 #endif // TOL_BDSPOOL_H