Changeset 5129d30 in tol

Timestamp:

Jun 24, 2010, 1:44:48 PM (16 years ago)

Author:

Víctor de Buen <vdebuen@…>

Branches:

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

Children:

b40b25f

Parents:

532b6fb

Message:

Refs #921
Using new method CheckNonDeclarativeAction

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

Location:

tol/btol/bdb

Files:

• filehandle.cpp (modified) (6 diffs)
• tol_filehandle.h (modified) (2 diffs)

tol/btol/bdb/filehandle.cpp

@@ -203 +203 @@
 /////////////////////////////////////////////////////////////////////////////
 {
+  if(CheckNonDeclarativeAction("FOpen")) { return; }
   static BText allowedAccess_ = " r w a rb wb ab r+ w+ a+ r+b w+b a+b ";
   BText& path   = Text(Arg(1));
@@ -246 +247 @@
 /////////////////////////////////////////////////////////////////////////////
 {
+  if(CheckNonDeclarativeAction("FGetText")) { return; }
   int handle  = (int)Real(Arg(1));
   int maxSize = (int)Real(Arg(2));
@@ -270 +272 @@
 /////////////////////////////////////////////////////////////////////////////
 {
+  if(CheckNonDeclarativeAction("FPutText")) { return; }
   int    handle = (int)Real(Arg(1));
   BText& txt    = Text(Arg(2));
@@ -293 +296 @@
 /////////////////////////////////////////////////////////////////////////////
 {
+  if(CheckNonDeclarativeAction("FEof")) { return; }
   int handle  = (int)Real(Arg(1));
   contens_ = EOF;
@@ -319 +323 @@
 /////////////////////////////////////////////////////////////////////////////
 {
+  if(CheckNonDeclarativeAction("FFlush")) { return; }
   int handle  = (int)Real(Arg(1));
   contens_ = EOF;
@@ -351 +356 @@
 /////////////////////////////////////////////////////////////////////////////
 {
+  if(CheckNonDeclarativeAction("FClose")) { return; }
   bool clean   = true;
   bool verbose = false;

tol/btol/bdb/tol_filehandle.h

@@ -19 +19 @@
    USA.
  */
+
+#ifndef TOL_FILEHANLER_H
+#define TOL_FILEHANLER_H
 
 #if defined(_MSC_VER)
@@ -57 +60 @@
 
 
+#endif // TOL_FILEHANLER_H