]> Creatis software - bbtk.git/blobdiff - kernel/src/bbtkWxGUIScriptingInterface.cxx
*** empty log message ***
[bbtk.git] / kernel / src / bbtkWxGUIScriptingInterface.cxx
index ad1d963e75d1ea9d1ddc14c3d1a4c48d56a67542..966c1f70486f924d6c5f3eb88e6b00215d0f4322 100644 (file)
@@ -1,20 +1,35 @@
-/*=========================================================================
-                                                                                
+/*=========================================================================                                                                               
   Program:   bbtk
   Module:    $RCSfile: bbtkWxGUIScriptingInterface.cxx,v $
   Language:  C++
-  Date:      $Date: 2008/10/15 13:02:14 $
-  Version:   $Revision: 1.26 $
-                                                                                
-  Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
-  l'Image). All rights reserved. See Doc/License.txt or
-  http://www.creatis.insa-lyon.fr/Public/bbtk/License.html for details.
-                                                                                
-     This software is distributed WITHOUT ANY WARRANTY; without even
-     the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
-     PURPOSE.  See the above copyright notices for more information.
-                                                                                
-=========================================================================*//**
+  Date:      $Date: 2008/12/15 09:04:47 $
+  Version:   $Revision: 1.32 $
+=========================================================================*/
+
+/* ---------------------------------------------------------------------
+
+* Copyright (c) CREATIS-LRMN (Centre de Recherche en Imagerie Medicale)
+* Authors : Eduardo Davila, Laurent Guigues, Jean-Pierre Roux
+*
+*  This software is governed by the CeCILL-B license under French law and 
+*  abiding by the rules of distribution of free software. You can  use, 
+*  modify and/ or redistribute the software under the terms of the CeCILL-B 
+*  license as circulated by CEA, CNRS and INRIA at the following URL 
+*  http://www.cecill.info/licences/Licence_CeCILL-B_V1-en.html 
+*  or in the file LICENSE.txt.
+*
+*  As a counterpart to the access to the source code and  rights to copy,
+*  modify and redistribute granted by the license, users are provided only
+*  with a limited warranty  and the software's author,  the holder of the
+*  economic rights,  and the successive licensors  have only  limited
+*  liability. 
+*
+*  The fact that you are presently reading this means that you have had
+*  knowledge of the CeCILL-B license and that you accept its terms.
+* ------------------------------------------------------------------------ */                                                                         
+   
+
+/**
  * \brief Short description in one line
  * 
  * Long description which 
@@ -80,7 +95,8 @@ namespace bbtk
     mInterpreter->SetUser(this);
     mInterpreter->SetCommandLine(true);
     mInterpreter->SetThrow(true);
-    
+    //    mInterpreter->AddBreakObserver
+    //boost::bind( &WxGUIScriptingInterface::InterpreterUserOnBreak, this ));
     //==============
     // Menu
     wxInitAllImageHandlers();
@@ -101,7 +117,7 @@ namespace bbtk
     menuTools->Append( ID_Menu_RegenerateBoxesLists,_T("Regenerate boxes &lists") );
     menuTools->Append( ID_Menu_RegenerateAll,_T("Regenerate &all") );
     menuTools->AppendSeparator();
-    menuTools->Append( ID_Menu_ShowImageGraph, _T("&Show last image graph") );
+    menuTools->Append( ID_Menu_ShowImageGraph, _T("&Show last graph") );
 
     wxMenu *menuWindows = new wxMenu;
     menuWindows->AppendCheckItem(ID_Menu_Windows_Files,
@@ -113,7 +129,7 @@ namespace bbtk
     menuWindows->AppendCheckItem(ID_Menu_Windows_Command,
                                 _T("Show 'command' panel") )->Check();
     menuWindows->AppendSeparator();
-    menuWindows->Append( ID_Menu_Windows_PackageBrowser, _T("Launch Package &Browser") );
+    menuWindows->Append( ID_Menu_Windows_PackageBrowser, _T("Start Package &Browser") );
     
     //    menuWindows->AppendSeparator();
     //    menuWindows->Append ( ID_Menu_Windows_Save, _T("Save interface configuration"));
@@ -245,7 +261,8 @@ namespace bbtk
     m_mgr.Update();
     //   LoadPerspective();
 
-
+    mBreaked = false;  
+    
     wxTipWindow* tip = new wxTipWindow(this,
                                       _T("\n                  Welcome to bbStudio !\n\n   To run a demo or example:\n     1. click on the 'Demos' or 'Examples' link\n     2. select a demo or example\n     3. click on the '[source]' link : the source file is loaded in bbStudio\n     4. click on the 'Run' button (the arrow at the bottom right of the source file)   \n"),1000);
     tip->CenterOnParent();
@@ -267,24 +284,54 @@ namespace bbtk
     mWxGUITextEditor->Open(filename);
   }
   //================================================================
-  
-#define CATCH_MACRO                                                    \
-  catch (QuitException e)                                              \
+  /*
+  catch (BreakException e)                                             \
     {                                                                  \
-      std::cout << "* quit exception caught"<<std::endl;               \
+      std::cout << "* BREAK"<<std::endl;                               \
+      if (e.IsInScriptFile())                                          \
+       std::cout << "* FILE   : '"<<e.GetScriptFile()<<"'"<<std::endl; \
+      std::cout << "* LINE   : "<<e.GetScriptLine()<<std::endl;                \
     }                                                                  \
-  catch (InterpreterError e)                                           \
+  catch (QuitException e)                                              \
     {                                                                  \
-      std::cerr << "* IERROR : "<<e.GetErrorMessage()<<std::endl;              \
+      std::cout << "* QUIT"<<std::endl;                                        \
       if (e.IsInScriptFile())                                          \
-       std::cerr << "* FILE   : '"<<e.GetScriptFile()<<"'"<<std::endl; \
-      std::cerr << "* LINE   : "<<e.GetScriptLine()<<std::endl;                \
-      int lev = bbtk::MessageManager::GetMessageLevel("Error");                \
-      if (lev > 0) {                                                   \
-       std::cerr << "* Exception thrown : "<<std::endl;                \
-       std::cerr << "*  OBJECT : " <<e.GetObject()<<std::endl;         \
-       std::cerr << "*  FILE   : " <<e.GetSourceFile()<<std::endl;     \
-      }                                                                        \
+       std::cout << "* FILE   : '"<<e.GetScriptFile()<<"'"<<std::endl; \
+      std::cout << "* LINE   : "<<e.GetScriptLine()<<std::endl;                \
+    }                                                                  \
+*/
+  
+#define CATCH_MACRO                                                    \
+  catch (InterpreterException e)                                       \
+    {                                                                  \
+      if (e.GetErrorMessage()=="quit")                                 \
+       {                                                               \
+         std::cerr << "* QUIT ENCOUNTERED"<<std::endl;                 \
+         if (e.IsInScriptFile())                                       \
+           std::cerr << "* FILE   : '"<<e.GetScriptFile()<<"'"<<std::endl; \
+         std::cerr << "* LINE   : "<<e.GetScriptLine()<<std::endl;     \
+       }                                                               \
+      else if (e.GetErrorMessage()=="break")                           \
+       {                                                               \
+         mBreaked = true;                                              \
+         std::cerr << "* BREAK"<<std::endl;                            \
+         if (e.IsInScriptFile())                                       \
+           std::cerr << "* FILE   : '"<<e.GetScriptFile()<<"'"<<std::endl; \
+         std::cerr << "* LINE   : "<<e.GetScriptLine()<<std::endl;     \
+       }                                                               \
+      else                                                             \
+       {                                                               \
+         std::cerr << "* ERROR : "<<e.GetErrorMessage()<<std::endl;    \
+         if (e.IsInScriptFile())                                       \
+           std::cerr << "* FILE   : '"<<e.GetScriptFile()<<"'"<<std::endl; \
+         std::cerr << "* LINE   : "<<e.GetScriptLine()<<std::endl;     \
+         int lev = bbtk::MessageManager::GetMessageLevel("Error");     \
+         if (lev > 0) {                                                \
+           std::cerr << "* Exception thrown : "<<std::endl;            \
+           std::cerr << "*  OBJECT : " <<e.GetObject()<<std::endl;     \
+           std::cerr << "*  FILE   : " <<e.GetSourceFile()<<std::endl; \
+         }                                                             \
+       }                                                               \
     }
   
   //================================================================
@@ -323,9 +370,16 @@ namespace bbtk
     (*buf) << mWxGUITextEditor->GetCurrentPage()->GetText();
     try 
       {
-       //      std::cout << "RUN"<<std::endl;
-       if (mwxMenuItemReset->IsChecked()) WxGUICommandEnter("reset");
-       mInterpreter->InterpretBuffer(buf);
+       if (!mBreaked)
+         {
+           if (mwxMenuItemReset->IsChecked()) WxGUICommandEnter("reset");
+           mInterpreter->InterpretBuffer(buf);
+         }
+       else 
+         {
+           mBreaked = false;
+           mInterpreter->InterpretCurrentStreams();
+         }
        //      std::cout << "EO RUN"<<std::endl;
       }
     CATCH_MACRO;
@@ -399,12 +453,18 @@ namespace bbtk
   //================================================================
   void WxGUIScriptingInterface::OnMenuCreatePackage(wxCommandEvent& WXUNUSED(event))
   {
-
+/*
     std::string command("toolsbbtk/appli/GUICreatePackage");
     bbtkMessage("Debug",1,"Executing : '"<<command<<"'"<<std::endl);
-    
-    Interpreter::Pointer I = Interpreter::New();    
+  
+       Interpreter::Pointer I = Interpreter::New();    
     I->InterpretFile(command);
+*/
+    std::string command("reset");
+       mWxGUICommand->SendCommand(command);
+    command = "include toolsbbtk/appli/GUICreatePackage";
+    bbtkMessage("Debug",1,"Executing : '"<<command<<"'"<<std::endl);
+       mWxGUICommand->SendCommand(command);
 
   }
   //================================================================
@@ -413,11 +473,18 @@ namespace bbtk
   //================================================================
   void WxGUIScriptingInterface::OnMenuCreateBlackBox(wxCommandEvent& WXUNUSED(event))
   {
+         /*
     std::string command("toolsbbtk/appli/GUICreateBlackBox");
     bbtkMessage("Debug",1,"Executing : '"<<command<<"'"<<std::endl);
     
     Interpreter::Pointer I = Interpreter::New();    
     I->InterpretFile(command);
+*/
+    std::string command("reset");
+       mWxGUICommand->SendCommand(command);
+    command = "include toolsbbtk/appli/GUICreateBlackBox";
+    bbtkMessage("Debug",1,"Executing : '"<<command<<"'"<<std::endl);
+       mWxGUICommand->SendCommand(command);
   }
   //================================================================
   
@@ -438,24 +505,25 @@ namespace bbtk
   }
   //================================================================
 
-  //================================================================
-  void WxGUIScriptingInterface::OnMenuRegeneratePackageDoc(wxCommandEvent& WXUNUSED(event))
+  void WxGUIScriptingInterface::DoRegeneratePackageDoc( const std::string& pack )
   {
-    wxString name = wxGetTextFromUser(_T("Enter package name (-a for all)"),
-                                     _T("Regenerate package doc"),
-                                     _T(""));
-    if (name.IsEmpty()) return;
-    std::string pack = bbtk::wx2std(name);
-    
-    std::string command;
-    command = ConfigurationFile::GetInstance().Get_bin_path();
+           std::string command;
+#if defined(WIN32)
+       command = "\"";
+#endif
+       command += ConfigurationFile::GetInstance().Get_bin_path();
     command += ConfigurationFile::GetInstance().Get_file_separator();
-    command += "bbRegeneratePackageDoc " + pack + " -q";
+    command += "bbRegeneratePackageDoc";
+#if defined(WIN32)
+       command += "\"";
+#endif
+       command += " " + pack + " -q";
     bbtkMessage("debug",1,"Executing system command '"<<command<<"'"<<std::endl);
     
+
     if ( ! system ( command.c_str() ) )
       {
-       wxMessageBox(_T("Done !"),_T("Regenerate package '")+name+_T("' doc"),
+       wxMessageBox(_T("Done !"),_T("Regenerate package '")+std2wx(pack)+_T("' doc"),
                     wxOK | wxICON_INFORMATION);
       }
     else 
@@ -465,15 +533,35 @@ namespace bbtk
        wxMessageBox(err,_T("Regenerate package doc"),wxOK | wxICON_ERROR);      
       }
   }
-  //================================================================
+
 
   //================================================================
-  void WxGUIScriptingInterface::OnMenuRegenerateBoxesLists(wxCommandEvent& WXUNUSED(event))
+  void WxGUIScriptingInterface::OnMenuRegeneratePackageDoc(wxCommandEvent& WXUNUSED(event))
+  {
+    wxString name = wxGetTextFromUser(_T("Enter package name (-a for all)"),
+                                     _T("Regenerate package doc"),
+                                     _T(""));
+    if (name.IsEmpty()) return;
+    std::string pack = bbtk::wx2std(name);
+    
+       DoRegeneratePackageDoc(pack);
+  }
+  //================================================================
+
+
+  void WxGUIScriptingInterface::DoRegenerateBoxesLists()
   {
     std::string command;
-    command = ConfigurationFile::GetInstance().Get_bin_path();
+#if defined(WIN32)
+       command = "\"";
+#endif
+    command += ConfigurationFile::GetInstance().Get_bin_path();
     command += ConfigurationFile::GetInstance().Get_file_separator();
-    command += "bbRegenerateBoxesLists -q";
+    command += "bbRegenerateBoxesLists";
+#if defined(WIN32)
+       command += "\"";
+#endif
+       command += " -q";
        bbtkMessage("debug",1,"Executing system command '"<<command<<"'"<<std::endl);
 
        if ( ! system ( command.c_str() ) )
@@ -488,31 +576,20 @@ namespace bbtk
        wxMessageBox(err,_T("Regenerate boxes lists"),wxOK | wxICON_ERROR);      
      }
   }
+
+  //================================================================
+  void WxGUIScriptingInterface::OnMenuRegenerateBoxesLists(wxCommandEvent& WXUNUSED(event))
+  {
+       DoRegenerateBoxesLists();
+  }
   //================================================================
 
   //================================================================
   void WxGUIScriptingInterface::OnMenuRegenerateAll(wxCommandEvent& WXUNUSED(event))
   {
-    std::string command;
-    command = ConfigurationFile::GetInstance().Get_bin_path();
-    command += ConfigurationFile::GetInstance().Get_file_separator();
-    command += "bbRegeneratePackageDoc -a -q && ";
-    command += ConfigurationFile::GetInstance().Get_bin_path();
-    command += ConfigurationFile::GetInstance().Get_file_separator();
-    command += "bbRegenerateBoxesLists -q ";
-       bbtkMessage("debug",1,"Executing system command '"<<command<<"'"<<std::endl);
-
-       if ( ! system ( command.c_str() ) )
-    {
-       wxMessageBox(_T("Done !"),_T("Regenerate all"),
-                   wxOK | wxICON_INFORMATION);
-     }
-   else 
-     {
-       wxString err(_T("An error occured while running '"));
-       err +=  bbtk::std2wx(command) + _T("'");
-       wxMessageBox(err,_T("Regenerate all"),wxOK | wxICON_ERROR);      
-     }
+       
+    DoRegeneratePackageDoc("-a");      
+       DoRegenerateBoxesLists();
   }
   //================================================================
 
@@ -547,30 +624,10 @@ namespace bbtk
        
        bbtk::ConfigurationFile::GetInstance().AddPackagePathsAndWrite( path );
        
-       std::string command;
-       command = ConfigurationFile::GetInstance().Get_bin_path();
-       command += ConfigurationFile::GetInstance().Get_file_separator();
-       command += "bbRegeneratePackageDoc " + pname + " -q && ";
-       command += ConfigurationFile::GetInstance().Get_bin_path();
-       command += ConfigurationFile::GetInstance().Get_file_separator();
-       command += "bbRegenerateBoxesLists -q ";
-       bbtkMessage("debug",1,"Executing system command '"<<command<<"'"<<std::endl);
-       
-       if ( ! system ( command.c_str() ) )
-         {
-           std::string mess("Package '");
-           mess += pname + "' successfully plugged in";
-           wxMessageBox(std2wx(mess),_T("Plug package"),
-                        wxOK | wxICON_INFORMATION);
-         }
-       else 
-         {
-           wxString err(_T("An error occured while running '"));
-           err +=  bbtk::std2wx(command) + _T("'");
-           wxMessageBox(err,_T("Regenerate all"),wxOK | wxICON_ERROR);      
-         }
-      }
+       DoRegeneratePackageDoc(pname);
+       DoRegenerateBoxesLists();
 
+         }     
   }
   //================================================================
 
@@ -591,6 +648,16 @@ namespace bbtk
   } 
   //================================================================  
   
+  /*
+  //================================================================
+  void WxGUIScriptingInterface::InterpreterUserOnBreak()
+  {
+    //    std::cout << "Break" << std::endl;
+    
+  }
+  //================================================================
+  */
+
   //================================================================  
   bool WxGUIScriptingInterface::WxGUIHtmlBrowserUserOnLinkClicked(const std::string& target)
   {