Ticket #263: lock_1.patch

ATOOLS/Org/My_File.C

@@ -103 +103 @@
 #endif
   }
   else {
-    int res=sqlite3_open(file.c_str(),&db);
+    int res=0;
+    if (s_sqlopenflag.length()==0) res=sqlite3_open(file.c_str(),&db);
+    else res=sqlite3_open_v2(file.c_str(),&db,SQLITE_OPEN_READWRITE|
+                             SQLITE_OPEN_CREATE,s_sqlopenflag.c_str());
     if (res!=SQLITE_OK) {
       msg_IODebugging()<<METHOD<<"(): '"<<file<<"' returns '"
                        <<sqlite3_errmsg(db)<<"'."<<std::endl;
@@ -130 +133 @@
 #ifdef USING__MPI
   }
 #endif
-  int res=sqlite3_open(file.c_str(),&db);
+  int res=0;
+  if (s_sqlopenflag.length()==0) res=sqlite3_open(file.c_str(),&db);
+  else res=sqlite3_open_v2(file.c_str(),&db,SQLITE_OPEN_READWRITE,
+                           s_sqlopenflag.c_str());
   if (res!=SQLITE_OK) {
     msg_IODebugging()<<METHOD<<"(): '"<<file<<"' returns '"
                      <<sqlite3_errmsg(db)<<"'."<<std::endl;
@@ -430 +436 @@
   return m_mode; 
 }
 
+template <class FileType>
+std::string My_File<FileType>::s_sqlopenflag="";
+
 namespace ATOOLS {
 
   template class My_In_File;

ATOOLS/Org/My_File.H

@@ -44 +44 @@
     
     fom::code m_mode;
 
+    static std::string s_sqlopenflag;
+
   public:
 
     // constructor
@@ -79 +81 @@
                        const std::string &cmd);
     static bool CopyInDB(std::string oldfile, std::string newfile);
 
+    inline static void SetSQLOpenFlag(const std::string &flag)
+    { s_sqlopenflag=flag; }
+
   };// end of class My_File
 
   template<class FileType>

ATOOLS/Org/Run_Parameter.C

@@ -240 +240 @@
   dr.SetAllowUnits(false);
   s_loader->AddPath(rpa->gen.Variable("SHERPA_RUN_PATH"));
 
+  std::string sqlopenflag=dr.GetValue<std::string>("SQLITE_OPEN_FLAG","");
+  My_In_File::SetSQLOpenFlag(sqlopenflag);
+  My_Out_File::SetSQLOpenFlag(sqlopenflag);
   // read only if defined (no error message if not defined)
   long int seed;
   std::vector<long int> seeds;