]> Creatis software - bbtk.git/blobdiff - kernel/src/bbtkConfigurationFile.cxx
Changes under win32
[bbtk.git] / kernel / src / bbtkConfigurationFile.cxx
index c8e155c6c89777b27fbb712adfa7664c5e17f9e6..45f39dc9732e18e89dbbd539b4adf0a6bf5db538 100644 (file)
@@ -2,8 +2,8 @@
   Program:   bbtk
   Module:    $RCSfile: bbtkConfigurationFile.cxx,v $
   Language:  C++
-  Date:      $Date: 2008/12/09 13:47:29 $
-  Version:   $Revision: 1.23 $
+  Date:      $Date: 2009/03/24 13:42:59 $
+  Version:   $Revision: 1.30 $
 =========================================================================*/
 
 /* ---------------------------------------------------------------------
 # include <windows.h>
 #endif
 
-#if defined(MACOSX) // assume this is OSX 
-# include <sys/param.h>
-# include <mach-o/dyld.h> // _NSGetExecutablePath : must add -framework CoreFoundation to link line 
-# include <string.h>
-# ifndef PATH_MAX
-#  define PATH_MAX MAXPATHLEN
-# endif
-#endif // MACOSX
-
-#ifndef PATH_MAX // If not defined yet : do it 
-#  define PATH_MAX 2048
-#endif
+
 
 
 namespace bbtk
@@ -68,40 +57,65 @@ namespace bbtk
        mFile_separator = VALID_FILE_SEPARATOR;
     
     // ==> Set system paths 
-    mBin_path = GetExecutablePath();
-//EED    mInstall_path = mBin_path + mFile_separator + "..";
+    mBin_path = Utilities::GetExecutablePath();
+
+         
+         
+         
+/*     EED 23 Mars 2009  
 #ifdef MACOSX
-         mInstall_path = mBin_path + "/../../../..";
+    mInstall_path = mBin_path + "/../../../..";
 #else
-         mInstall_path = mBin_path + "/..";
+    mInstall_path = mBin_path + "/..";
 #endif
-         // The relative path to the doc folder (=BBTK_DOC_REL_PATH)
-    mDoc_rel_path = BBTK_STRINGIFY_SYMBOL(BBTK_DOC_REL_PATH);
+*/    
+#ifdef MACOSX
+         
+         std::string macPath("Contents/MacOS"); 
+         int sbp = mBin_path.length();
+         int smp = macPath.length();
+         if (mBin_path.compare( sbp-smp, smp, macPath )==0 )
+         {
+                 mBin_path = mBin_path + "/../../..";
+         }
+         
+         
+#endif   
+         mInstall_path = mBin_path + "/..";
+
+         
+         
+    // The relative path to the doc folder (=BBTK_DOC_REL_PATH)
+    //    mDoc_rel_path = BBTK_STRINGIFY_SYMBOL(BBTK_DOC_REL_PATH);
     // The path to the doc folder (=mInstall_path+"/"+mDoc_rel_path)
-//EED    mDoc_path = mInstall_path + mFile_separator + mDoc_rel_path;
-    mDoc_path = mInstall_path + "/" + mDoc_rel_path;
+    //    mDoc_path = mInstall_path + "/" + mDoc_rel_path;
+    // Have to create bbtk user's dirs if needed 
+
+    // LG 27/01/09 : doc is now user dependent 
+    //               and located in user's .bbtk dir /doc
+    // All dirs under .bbtk user's dir are set and created by:
+    InitializeDotBbtkStructure();
+
     // The relative path to the doc folder (=BBTK_BBS_REL_PATH)
     mBbs_rel_path = BBTK_STRINGIFY_SYMBOL(BBTK_BBS_REL_PATH);
     // The path to the bbs folder (=mInstall_path+"/"+mBbs_rel_path)
-//EED    mBbs_path = mInstall_path + mFile_separator + mBbs_rel_path;
     mBbs_path = mInstall_path + "/" + mBbs_rel_path;
-    // The relative path to the rsc folder (=BBTK_RSC_REL_PATH)
-    //   mRsc_rel_path = BBTK_STRINGIFY_SYMBOL(BBTK_RSC_REL_PATH);
-    // The path to the rsc folder (=mInstall_path+"/"+mRsc_rel_path)
-    //   mRsc_path = mInstall_path + mFile_separator + mRsc_rel_path;
-    // The path to the bbtk data folder 
-    // Initialized to mInstall_path+"/"+BBTK_DATA_REL_PATH
-    // But can be overriden by value read from bbtk_config.xml
-//EED    mData_path = mInstall_path + mFile_separator + BBTK_STRINGIFY_SYMBOL(BBTK_DATA_REL_PATH);
+    
     mData_path = mInstall_path + "/" + BBTK_STRINGIFY_SYMBOL(BBTK_DATA_REL_PATH);
-
-       Utilities::replace( mBin_path           , INVALID_FILE_SEPARATOR , VALID_FILE_SEPARATOR);
-       Utilities::replace( mInstall_path       , INVALID_FILE_SEPARATOR , VALID_FILE_SEPARATOR);
-       Utilities::replace( mDoc_rel_path       , INVALID_FILE_SEPARATOR , VALID_FILE_SEPARATOR);
-       Utilities::replace( mDoc_path           , INVALID_FILE_SEPARATOR , VALID_FILE_SEPARATOR);
-       Utilities::replace( mBbs_path           , INVALID_FILE_SEPARATOR , VALID_FILE_SEPARATOR);
-       Utilities::replace( mData_path          , INVALID_FILE_SEPARATOR , VALID_FILE_SEPARATOR);
-
+    
+    Utilities::replace( mBin_path, 
+                       INVALID_FILE_SEPARATOR,
+                       VALID_FILE_SEPARATOR);
+    Utilities::replace( mInstall_path,
+                       INVALID_FILE_SEPARATOR,
+                       VALID_FILE_SEPARATOR);
+    Utilities::replace( mBbs_path,
+                       INVALID_FILE_SEPARATOR,
+                       VALID_FILE_SEPARATOR);
+    Utilities::replace( mData_path,
+                       INVALID_FILE_SEPARATOR,
+                       VALID_FILE_SEPARATOR);
+    
     bbtkMessage("Config",1," ==> bin    : '"<<mBin_path<<"'"<<std::endl);
     bbtkMessage("Config",1," ==> prefix : '"<<mInstall_path<<"'"<<std::endl);
     bbtkMessage("Config",1," ==> doc    : '"<<mDoc_path<<"'"<<std::endl);
@@ -113,7 +127,7 @@ namespace bbtk
     
     // bbs_paths
     // always add "." (current working directory) at the begining
-       mBbs_paths.push_back( "." ); 
+    mBbs_paths.push_back( "." ); 
     // add system bbs path 
     mBbs_paths.push_back(mBbs_path);
     // add toolsbbtk/appli 
@@ -133,32 +147,32 @@ namespace bbtk
     for (iStrVec=0;iStrVec<sizeStrVec;iStrVec++){
       Utilities::replace( mBbs_paths[iStrVec] , INVALID_FILE_SEPARATOR , VALID_FILE_SEPARATOR);
     }
-
+    
     
     // always add "." (current working directory) at the begining
     mPackage_paths.push_back(".");   
     // add system bin path (for build tree / standalone folder install)
     mPackage_paths.push_back(mBin_path);
     // add system lib path (for install tree)
-//EED    mPackage_paths.push_back(mInstall_path + mFile_separator + "lib");
+    //EED    mPackage_paths.push_back(mInstall_path + mFile_separator + "lib");
     mPackage_paths.push_back(mInstall_path + "/lib");
 #ifdef WIN32
     // add bin/Debug bin/Release paths (for build/install tree)
-//EED    mPackage_paths.push_back(mBin_path + mFile_separator + "Debug");
+    //EED    mPackage_paths.push_back(mBin_path + mFile_separator + "Debug");
     mPackage_paths.push_back(mBin_path + "/Debug");
-//EED    mPackage_paths.push_back(mBin_path + mFile_separator + "Release");
+    //EED    mPackage_paths.push_back(mBin_path + mFile_separator + "Release");
     mPackage_paths.push_back(mBin_path + "/Release");
 #endif
-
-       sizeStrVec = mPackage_paths.size();
-       for (iStrVec=0;iStrVec<sizeStrVec;iStrVec++){
-               Utilities::replace( mPackage_paths[iStrVec] , INVALID_FILE_SEPARATOR , VALID_FILE_SEPARATOR);
-       }
-
-
-
+    
+    sizeStrVec = mPackage_paths.size();
+    for (iStrVec=0;iStrVec<sizeStrVec;iStrVec++){
+      Utilities::replace( mPackage_paths[iStrVec] , INVALID_FILE_SEPARATOR , VALID_FILE_SEPARATOR);
+    }
+    
+    
+    
     GetHelp(2);
-   
+    
     // ==> First we look for bbtk_config.xml in "."
     char buf[2048];
     const char *currentDir = getcwd(buf, 2048);
@@ -171,11 +185,11 @@ namespace bbtk
        // LG : throw an exception 
       }
     
-//    std::string configXmlFullPathName = currentDir + mFile_separator + "bbtk_config.xml";
+    //    std::string configXmlFullPathName = currentDir + mFile_separator + "bbtk_config.xml";
     std::string configXmlFullPathName = currentDir ;
-                configXmlFullPathName += "/bbtk_config.xml";
-       Utilities::replace( configXmlFullPathName , INVALID_FILE_SEPARATOR , VALID_FILE_SEPARATOR);
-
+    configXmlFullPathName += "/bbtk_config.xml";
+    Utilities::replace( configXmlFullPathName , INVALID_FILE_SEPARATOR , VALID_FILE_SEPARATOR);
+    
     if ( Utilities::FileExists( configXmlFullPathName ))
       {
        bbtkMessage("Config",1, "ConfigurationFile : [" << configXmlFullPathName << 
@@ -207,8 +221,75 @@ namespace bbtk
   }
   //=========================================================================
   
+  //=========================================================================
+  void ConfigurationFile::InitializeDotBbtkStructure()
+  {
+    mDot_bbtk_path = Utilities::GetUserSettingsDir();
+    mDot_bbtk_is_new = false;
+    if (!Utilities::FileExists(mDot_bbtk_path)) mDot_bbtk_is_new = true;      
+    Utilities::CreateDirectoryIfNeeded(mDot_bbtk_path);
+    
+    mDoc_path = Utilities::MakeUserSettingsFullFileName("doc");
+    Utilities::CreateDirectoryIfNeeded(mDoc_path);
+
+    std::string bbdoc_path = 
+      Utilities::MakeUserSettingsFullFileName("doc/bbdoc");
+    Utilities::CreateDirectoryIfNeeded(bbdoc_path);
+    
+    // Create help_contents.html if does not exist
+    std::string filename = Utilities::MakeUserSettingsFullFileName("doc/help_contents.html");
+    if (!Utilities::FileExists(filename))
+      {
+       bbtkDebugMessage("Config",1, 
+                        "* Creating [" << filename << "]" << std::endl);
+       // The path to the doc folder (=mInstall_path+"/"+mDoc_rel_path)
+       std::string doc_path = mInstall_path + "/" 
+         + BBTK_STRINGIFY_SYMBOL(BBTK_DOC_REL_PATH) + "/";
+       Utilities::MakeValidFileName(doc_path); 
+       std::ofstream f;
+       f.open(filename.c_str(), std::ios::out );
+       f << "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD "
+         << "HTML 4.01 Transitional//EN\">"
+         << "<html><head><title>Help Contents - bbtk "
+         << GetVersion() << "</title>"
+         << "<meta http-equiv=\"Content-Type\" content=\"text/html; "
+         << "charset=iso-8859-1\"></head><H1>Help Contents</H1>"
+         << "<a href=\"bbdoc/index-category.html#demo\" "
+         << "target=\"information\">Demos</a><br>"
+         << "<a href=\"bbdoc/index-category.html#example\" "
+         << "target=\"information\">Examples</a>"
+         << "<H2>Guides</H2>"
+         << "<a href=\""
+         << doc_path 
+         << "bbtkUsersGuide/bbtkUsersGuide.html"
+         << "\" target=\"information\">User's Guide</a><br>"
+         << "<a href=\""
+         << doc_path
+         << "bbtkPackageDevelopersGuide/bbtkPackageDevelopersGuide.html"
+         << "\" target=\"information\">Package Developer's Guide</a><br>"
+         << "<a href=\""
+         << doc_path
+         << "doxygen/bbtk/main.html"
+         << "\" target=\"information\">bbtk library doxygen doc</a><br>"
+         << "<H2>Boxes</H2>"
+         << "<a target=\"information\" href=\"bbdoc/index-alpha.html\">"
+         << "Alphabetical list</a><br>"
+         << "<a target=\"information\" href=\"bbdoc/index-package.html\">"
+         << "List by package</a><br>"
+         << "<a target=\"information\" href=\"bbdoc/index-category.html\">"
+         << "List by category</a><br>"
+         << "<a target=\"information\" href=\"bbdoc/index-adaptors.html\">"
+         << "List of adaptors</a><br>"
+         << "</body>"
+         << "</html>";
+      }
 
 
+    mTemp_path = Utilities::MakeUserSettingsFullFileName("tmp");
+    Utilities::CreateDirectoryIfNeeded(mTemp_path);
+
+  }
+  //=========================================================================
 
   //=========================================================================
   void ConfigurationFile::CreateConfigXML( char *rootDirectory )
@@ -222,7 +303,6 @@ namespace bbtk
     fprintf(fp, "<config>\n");
     fprintf(fp, "   <bbs_path>     </bbs_path>\n");
     fprintf(fp, "   <package_path> </package_path>\n");
-    fprintf(fp, "   <default_temp_dir> $ </default_temp_dir>\n");    
     fprintf(fp, "</config>\n");
     fclose(fp);
   }
@@ -230,193 +310,6 @@ namespace bbtk
 
        
        
-       //=========================================================================  
-       // From http://www.fltk.org/newsgroups.php?gfltk.general+v:22083
-       //
-       int get_app_path (char *pname, size_t pathsize)
-       {
-#ifdef LINUX
-        /* Oddly, the readlink(2) man page says no NULL is appended. */
-        /* So you have to do it yourself, based on the return value: */
-        pathsize --; /* Preserve a space to add the trailing NULL */
-        long result = readlink("/proc/self/exe", pname, pathsize);
-        if (result > 0)
-        {
-                       pname[result] = 0; /* add the #@!%ing NULL */
-                       
-                       if ((access(pname, 0) == 0))
-                               return 0; /* file exists, return OK */
-                       /*else name doesn't seem to exist, return FAIL (falls
-                        through) */
-        }
-#endif /* LINUX */
-               
-#ifdef WIN32
-        long result = GetModuleFileName(NULL, pname, pathsize);
-        if (result > 0)
-        {
-                       /* fix up the dir slashes... */
-                       int len = strlen(pname);
-                       int idx;
-                       for (idx = 0; idx < len; idx++)
-                       {
-                               if (pname[idx] == '\\') pname[idx] = '/';
-                       }
-
-                       for (idx = len-1; idx >=0 ; idx--)
-                       {
-                               if (pname[idx] == '/')
-                               { 
-                                       pname[idx+1] = '\0';
-                                       idx = -1;
-                               }
-                       }
-
-                       if ((access(pname, 0) == 0))
-                               return 0; /* file exists, return OK */
-                       /*else name doesn't seem to exist, return FAIL (falls
-                        through) */
-        }
-#endif /* WIN32 */
-               
-#ifdef SOLARIS
-        char *p = getexecname();
-        if (p)
-        {
-                       /* According to the Sun manpages, getexecname will
-                        "normally" return an */
-                       /* absolute path - BUT might not... AND that IF it is not,
-                        pre-pending */
-                       /* getcwd() will "usually" be the correct thing... Urgh!
-                        */
-                       
-                       /* check pathname is absolute (begins with a / ???) */
-                       if (p[0] == '/') /* assume this means we have an
-                        absolute path */
-                       {
-                               strncpy(pname, p, pathsize);
-                               if ((access(pname, 0) == 0))
-                                       return 0; /* file exists, return OK */
-                       }
-                       else /* if not, prepend getcwd() then check if file
-                        exists */
-                       {
-                               getcwd(pname, pathsize);
-                               long result = strlen(pname);
-                               strncat(pname, "/", (pathsize - result));
-                               result ++;
-                               strncat(pname, p, (pathsize - result));
-                               
-                               if ((access(pname, 0) == 0))
-                                       return 0; /* file exists, return OK */
-                               /*else name doesn't seem to exist, return FAIL
-                                (falls through) */
-                       }
-        }
-#endif /* SOLARIS */
-               
-#ifdef MACOSX /* assume this is OSX */
-               /*
-                from http://www.hmug.org/man/3/NSModule.html
-                
-                extern int _NSGetExecutablePath(char *buf, unsigned long
-                *bufsize);
-                
-                _NSGetExecutablePath  copies  the  path  of the executable
-                into the buffer and returns 0 if the path was successfully
-                copied  in the provided buffer. If the buffer is not large
-                enough, -1 is returned and the  expected  buffer  size  is
-                copied  in  *bufsize.  Note that _NSGetExecutablePath will
-                return "a path" to the executable not a "real path" to the
-                executable.  That  is  the path may be a symbolic link and
-                not the real file. And with  deep  directories  the  total
-                bufsize needed could be more than MAXPATHLEN.
-                */
-        int status = -1;
-        char *given_path = (char*)malloc(MAXPATHLEN * 2);
-        if (!given_path) return status;
-               
-        uint32_t npathsize = MAXPATHLEN * 2;
-        long result = _NSGetExecutablePath(given_path, &npathsize);
-        if (result == 0)
-        { /* OK, we got something - now try and resolve the real path...
-                */
-                       if (realpath(given_path, pname) != NULL)
-                       {
-                               if ((access(pname, 0) == 0))
-                                       status = 0; /* file exists, return OK */
-                       }
-        }
-        free (given_path);
-        return status;
-#endif /* MACOSX */
-               
-        return -1; /* Path Lookup Failed */
-       } 
-       
-
-       
-  //=========================================================================
-  std::string ConfigurationFile::GetExecutablePath()
-  {
-         char name[PATH_MAX];
-         int err = get_app_path(name, PATH_MAX);
-         if (err) 
-         {
-               bbtkError("Could not determine current executable path ?");  
-         }
-         
-         // remove the exe name
-         char *slash;          
-         slash = strrchr(name, VALID_FILE_SEPARATOR_CHAR);
-         if (slash)
-         {
-                 *slash = 0;
-         }
-         //printf("EED ConfigurationFile::GetExecutablePath  %s\n",name);
-         return name;
-  }
-         
-/*       
-    /// \todo : Think to delete it!
-    char *buf = (char *)malloc(512);
-       if (!buf) 
-       {
-               bbtkError("Could not allocate 512 bytes !");
-       }
-    char *slash;
-    
-#if defined(WIN32)
-    GetModuleFileName(NULL, buf, 511);
-    slash = strrchr(buf, '\\');
-    if (slash)
-      {
-        *slash = 0;
-      }
-#endif 
-         
-
-#if defined(__GNUC__)
-    int res;
-    res = readlink("/proc/self/exe", buf, 512);
-    if (res == -1)
-       {
-           free(buf);
-               
-       }
-    buf[res] = 0;
-    slash = strrchr(buf, '/');
-    if (slash)
-      {
-        *slash = 0;
-      }
-#endif
-    std::string ret(buf);
-    free(buf);
-    return ret;
-  }
-  //=========================================================================
-*/
 
   //=========================================================================
   void ConfigurationFile::InstallPath ()
@@ -455,10 +348,6 @@ namespace bbtk
     char configPath[200];
     sprintf(configPath, "%s/bbtk_config.xml",rootDirectory);
     
-    // makeDir
-    char makeDir[250];
-    sprintf( makeDir, "mkdir \"%s\" ", rootDirectory);
-    
     // configXmlTmp
     char configXmlTmp[250]; 
     sprintf(configXmlTmp, "%s/bbtk_config.xml.tmp", bbtk_path);
@@ -468,23 +357,12 @@ namespace bbtk
     
     if (!Utilities::FileExists(configXmlTmp)) // bbtk_config.xml.tmp not found (not installed)
       {  
-       if (!Utilities::FileExists(rootDirectory)) // .bbtk not found
-         {
-           system(makeDir);  // create .bbtk
-         }
-       
        // if "bbtk_path/bbtk_config.xml.tmp" doesn't exist, hard-create a minimum version in .bbtk
        CreateConfigXML( rootDirectory );// create .bbtk
       }
     else
       {
        sprintf(copyFile,"cp %s  %s/bbtk_config.xml ",configXmlTmp,rootDirectory );
-       if (!Utilities::FileExists(rootDirectory))
-         {
-           //std::cout << "makeDir[" << makeDir << "]" << std::endl;
-           system(makeDir);
-         }
-       
        if (!Utilities::FileExists(configPath))
          {
            system(copyFile);
@@ -524,11 +402,6 @@ namespace bbtk
     
     if (!Utilities::FileExists(configXmlTmp)) // bbtk_config.xml.tmp not found
       {
-       if (!Utilities::FileExists(rootDirectory)) // .bbtk not found
-         {
-           system(makeDir);  // create .bbtk
-         }
-       
        // if "bbtk_path/bbtk_config.xml.tmp" doesn't exist, hard-create a minimum version in .bbtk
        CreateConfigXML( rootDirectory );// create .bbtk
        return;
@@ -631,6 +504,7 @@ namespace bbtk
       }
     
     // default_temp_dir
+    /*
     if( BB.nChildNode((XMLCSTR)"default_temp_dir") ) 
       GetTextOrClear(BB.getChildNode((XMLCSTR)"default_temp_dir"),mDefault_temp_dir);
     
@@ -639,6 +513,7 @@ namespace bbtk
        size_t pos = mConfig_xml_full_path.find("bbtk_config.xml");
        mDefault_temp_dir = mConfig_xml_full_path.substr (0,pos); 
       }    
+    */
 
     GetHelp(2);
   }
@@ -686,6 +561,11 @@ namespace bbtk
     mPackage_paths.push_back(pack_path);
 
 #ifdef _WIN32
+    pack_path = path + "/RelWithDebInfo";
+    PACKPATH = BB.addChild((XMLCSTR)"package_path");
+    PACKPATH.addText((XMLCSTR)pack_path.c_str());
+    Utilities::replace(pack_path,INVALID_FILE_SEPARATOR,VALID_FILE_SEPARATOR);
+    mPackage_paths.push_back(pack_path);
     pack_path = path + "/Debug";
     PACKPATH = BB.addChild((XMLCSTR)"package_path");
     PACKPATH.addText((XMLCSTR)pack_path.c_str());