]> Creatis software - bbtk.git/blobdiff - kernel/src/bbtkWxGUIScriptingInterface.cxx
*** empty log message ***
[bbtk.git] / kernel / src / bbtkWxGUIScriptingInterface.cxx
index a1d274df8542aba28916fae0ea479290d022067d..77a0d3ae2748adba01919358d4195222e070abe4 100644 (file)
@@ -3,8 +3,8 @@
   Program:   bbtk
   Module:    $RCSfile: bbtkWxGUIScriptingInterface.cxx,v $
   Language:  C++
-  Date:      $Date: 2008/03/25 10:31:18 $
-  Version:   $Revision: 1.3 $
+  Date:      $Date: 2008/05/14 12:32:26 $
+  Version:   $Revision: 1.9 $
                                                                                 
   Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
   l'Image). All rights reserved. See Doc/License.txt or
@@ -69,9 +69,10 @@ namespace bbtk
 //    m_mgr = new wxAuiManager(this);
        m_mgr.SetManagedWindow(this);
    
-    mInterpreter = new bbtk::Interpreter();
+       mInterpreter = bbtk::Interpreter::New();
     mInterpreter->SetUser(this);
     mInterpreter->SetCommandLine(true);
+    mInterpreter->SetThrow(true);
     //==============
     // Menu
     wxInitAllImageHandlers();
@@ -102,9 +103,15 @@ namespace bbtk
     menuWindows->AppendSeparator();
     menuWindows->Append ( ID_Menu_Windows_Save, _T("Save interface configuration"));
 
+    wxMenu *menuOptions = new wxMenu;
+    mwxMenuItemReset = menuOptions->AppendCheckItem(-1,
+                                                   _T("Reset before running") );
+    mwxMenuItemReset->Check();
+
     wxMenuBar *menuBar = new wxMenuBar;
     menuBar->Append( menuFile, _T("&File") );
     menuBar->Append( menuTools, _T("&Tools") );
+    menuBar->Append( menuOptions, _T("&Options") );
     menuBar->Append( menuWindows, _T("&Windows") );
     menuBar->Append( menuAbout, _T("About") );
     
@@ -130,12 +137,40 @@ namespace bbtk
    
     mWxGUICommand->SetFocus();
 
-    // Creates and sets the parent window of all bbtk windows
-    wxWindow* top = new wxPanel(this,-1);//,_T("top"));
-    top->Hide();
-    Wx::SetTopWindow(top);
-    
+
+    mwxNotebook = new wxAuiNotebook(this,  
+                                   -1,
+                                   wxPoint(0, 0),
+                                   wxSize(500,500),
+                                   wxAUI_NB_TAB_SPLIT 
+                                   | wxAUI_NB_TAB_MOVE
+                                   | wxAUI_NB_TAB_EXTERNAL_MOVE
+                                   //| wxAUI_NB_WINDOWLIST_BUTTON
+                                   //|wxAUI_NB_SCROLL_BUTTONS
+                                   // | wxAUI_NB_CLOSE_BUTTON 
+                                   //| wxAUI_NB_CLOSE_ON_ACTIVE_TAB
+                                   //| wxAUI_NB_CLOSE_ON_ALL_TABS
+                                   | wxNO_BORDER);
+  
+
+    mwxNotebook->AddPage(mWxGUITextEditor,_T("Files"),true);
+    mwxNotebook->AddPage(mWxGUIHtmlBrowser,_T("Help"),true);
+
+    mwxNotebook->AddPage(mWxGUIOutputMessages,_T("Messages"),true);
+
+    mwxNotebook->AddPage(mWxGUICommand,_T("Command"),true);
+
+    m_mgr.AddPane(mwxNotebook,
+                 wxAuiPaneInfo().Name(wxT("nb"))
+                 .CaptionVisible(false)
+                 .MinimizeButton(false)
+                 .MaximizeButton(false)
+                 .Center()
+                 //              .MinSize(wxSize(100,100))
+                 );   
 
+  /*
     //
     m_mgr.AddPane(mWxGUITextEditor,
                  wxAuiPaneInfo().Name(wxT("editor_content"))
@@ -144,15 +179,17 @@ namespace bbtk
                  .MaximizeButton(true)
                  .Center()
                  .MinSize(wxSize(100,100))
-                 );     
+                 );   
+  
     m_mgr.AddPane(mWxGUIHtmlBrowser,
                  wxAuiPaneInfo().Name(wxT("browser_content"))
                  .Caption(wxT("Help"))
                  .MinimizeButton(true)
                  .MaximizeButton(true)
                  .Right()
-                 .MinSize(wxSize(100,100))
+                 .MinSize(wxSize(200,100))
                  );
+
     m_mgr.AddPane(mWxGUIOutputMessages,
                  wxAuiPaneInfo().Name(wxT("messages_content"))
                  .Caption(wxT("Messages"))
@@ -170,15 +207,22 @@ namespace bbtk
                  .Position(1)
                  .MinSize(wxSize(100,100))
                  );     
+    */
     //    m_mgr.AddPane(mwxButtonRun,
     //           wxAuiPaneInfo().Name(wxT("button_run_content")));     
 
+    // Creates the parent window of all bbtk windows as a child of this
+    Wx::CreateTopWindow(this);
+    // Add the method OnWxSignal as a Wx::Signal observer 
+    //bbtkAddWxSignalObserver(WxGUIPackageBrowser2Window::OnWxSignal);
 
 //.PaneBorder(false)); 
     m_mgr.Update();
        
     SetAutoLayout(true);
     Layout();
+    mwxNotebook->SetSelection(1);
+    mWxGUIHtmlBrowser->GoHome();
 //    Refresh();
 //    m_mgr.Update();
   }
@@ -197,31 +241,50 @@ namespace bbtk
     mWxGUITextEditor->Open(filename);
   }
   //================================================================
-
+  
+#define CATCH_MACRO                                                    \
+  catch (QuitException e)                                              \
+    {                                                                  \
+      std::cout << "* quit exception caught"<<std::endl;               \
+    }                                                                  \
+  catch (InterpreterError e)                                           \
+    {                                                                  \
+      std::cerr << "* IERROR : "<<e.GetMessage()<<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;     \
+      }                                                                        \
+    }
+  
   //================================================================
   void WxGUIScriptingInterface::WxGUICommandEnter(const std::string& command)
   {
     std::string s("> ");
     s += command + "\n";
     mWxGUIOutputMessages->Print(s,wxRED);
-
-    if (  mInterpreter->InterpretLine( command ) == 
-         Interpreter::Interpreter_QUIT )
+    
+    try
       {
-       Close(true); 
+       mInterpreter->InterpretLine( command );
       }
+    CATCH_MACRO;
   }
   //================================================================
-
+  
   //================================================================
   /// Runs the interpretation of a file
   bool WxGUIScriptingInterface::InterpretFile( const std::string& filename) 
   { 
-    if ( mInterpreter->InterpretFile(filename) ==
-        Interpreter::Interpreter_ERROR ) 
+    try
       {
-       return false;
+       mInterpreter->InterpretFile(filename);
       }
+    CATCH_MACRO;
     return true;
   }
   //================================================================
@@ -232,55 +295,22 @@ namespace bbtk
     //    wxString temp = mWxGUIHtmlBrowser->GetCurrentPage();
     std::stringstream* buf = new std::stringstream;
     (*buf) << mWxGUITextEditor->GetCurrentPage()->GetText();
-
-    mInterpreter->SetThrow(true);
     try 
       {
+       std::cout << "RUN"<<std::endl;
+       if (mwxMenuItemReset->IsChecked()) WxGUICommandEnter("reset");
        mInterpreter->InterpretBuffer(buf);
+       std::cout << "EO RUN"<<std::endl;
       }
-    catch (InterpreterError e)
-      {
-       std::cerr << "* IERROR : "<<e.GetMessage()<<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;
-       }         
-      }
-    /*
-   //    wxString temp = mWxGUIHtmlBrowser->GetCurrentPage();
-    std::string filename = mWxGUITextEditor->GetCurrentPage();//wx2std(temp);
-    size_t s = filename.length();
-
-    Interpreter* I = new Interpreter;
-    
-    if ((s>3) && (filename[s-1]=='s')
-       && (filename[s-2]=='b')
-       && (filename[s-3]=='b')
-       && (filename[s-4]=='.'))
-      {
-        std::string tmp("Executing ");
-        tmp += filename;
-       SetStatusText(std2wx(tmp));
-       I->InterpretFile(filename);
-      }
-    else
-      {
-       SetStatusText(_T("The current page is not a bbs file : cannot execute it"));
-      }
-    
-    delete I;
-    */
+    CATCH_MACRO;
+    std::cout << "EO RUN 3"<<std::endl;
   }
   //================================================================  
 
   //================================================================
   void WxGUIScriptingInterface::OnMenuQuit(wxCommandEvent& WXUNUSED(event))
   {
+    if (!mWxGUITextEditor->CloseAllPages()) return;
     Close(true);
   }
   //================================================================
@@ -309,7 +339,7 @@ namespace bbtk
        commandStr = "gedit ";
 #endif 
        commandStr = commandStr + configFile;
-       std::cout << "system: " << commandStr << std::endl;
+       //      std::cout << "system: " << commandStr << std::endl;
        system ( commandStr.c_str() );
   }
   //================================================================
@@ -318,18 +348,13 @@ namespace bbtk
   //================================================================
   void WxGUIScriptingInterface::OnMenuCreatePackage(wxCommandEvent& WXUNUSED(event))
   {
-printf("EED WxGUIScriptingInterface::OnMenuCreatePackage 01 \n");
-    std::string command("toolsbbtk/appli/CreatePackage");
-printf("EED WxGUIScriptingInterface::OnMenuCreatePackage 02 \n");
 
+    std::string command("toolsbbtk/appli/CreatePackage");
     bbtkMessage("Debug",1,"Executing : '"<<command<<"'"<<std::endl);
-printf("EED WxGUIScriptingInterface::OnMenuCreatePackage 03 \n");
-    Interpreter* I = new Interpreter;    
-printf("EED WxGUIScriptingInterface::OnMenuCreatePackage 04 \n");
+    
+    Interpreter::Pointer I = Interpreter::New();    
     I->InterpretFile(command);
-printf("EED WxGUIScriptingInterface::OnMenuCreatePackage 05 \n");
-    delete I;
-printf("EED WxGUIScriptingInterface::OnMenuCreatePackage 06 \n");
+
   }
   //================================================================
 
@@ -339,9 +364,9 @@ printf("EED WxGUIScriptingInterface::OnMenuCreatePackage 06 \n");
   {
     std::string command("toolsbbtk/appli/CreateBlackBox");
     bbtkMessage("Debug",1,"Executing : '"<<command<<"'"<<std::endl);
-    Interpreter* I = new Interpreter;    
+    
+    Interpreter::Pointer I = Interpreter::New();    
     I->InterpretFile(command);
-    delete I;
   }
   //================================================================
   
@@ -356,7 +381,7 @@ printf("EED WxGUIScriptingInterface::OnMenuCreatePackage 06 \n");
     std::string strappli="gnome-open ";
 #endif
     std::string strcommand = strappli +default_temp_dir+"/temp_dir/workspace_workspacePrototype.png";
-       std::cout << "system: " << strcommand << std::endl;
+    // std::cout << "system: " << strcommand << std::endl;
     system ( strcommand.c_str() );
 
   }
@@ -368,10 +393,8 @@ printf("EED WxGUIScriptingInterface::OnMenuCreatePackage 06 \n");
   {
     std::string doc_path = ConfigurationFile::GetInstance().Get_doc_path();
     std::string filepath = doc_path+"/bbdoc/make-index.bbs";
-    Interpreter* I = new Interpreter;    
 
-//EED  std::cout << "bbi: include "<<filepath<<std::endl;
-//EED  I->InterpretFile( filepath );
+    Interpreter::Pointer I = Interpreter::New();    
 
     I->InterpretLine( "exec freeze");
     I->InterpretLine( "include *");
@@ -380,7 +403,6 @@ printf("EED WxGUIScriptingInterface::OnMenuCreatePackage 06 \n");
     I->InterpretLine( "index "+doc_path+"/bbdoc/index-category.html Categories");
     I->InterpretLine( "index "+doc_path+"/bbdoc/index-adaptors.html Adaptors");
     
-    delete I;
   }
   //================================================================
 
@@ -405,7 +427,6 @@ printf("EED WxGUIScriptingInterface::OnMenuCreatePackage 06 \n");
   //================================================================  
   bool WxGUIScriptingInterface::WxGUIHtmlBrowserUserOnLinkClicked(const std::string& target)
   {
-    std::cout << "OnLink"<<std::endl; 
     size_t s = target.length();
     if ((s>3) && (target[s-1]=='s')
        && (target[s-2]=='b')
@@ -413,6 +434,8 @@ printf("EED WxGUIScriptingInterface::OnMenuCreatePackage 06 \n");
        && (target[s-4]=='.'))
       {
        mWxGUITextEditor->Open(target);
+       mwxNotebook->SetSelection(0);
+       mWxGUITextEditor->SetFocus();
        return false;
       }
     return true;