]> Creatis software - bbtk.git/blobdiff - kernel/src/bbtkWxGUIScriptingInterface.cxx
*** empty log message ***
[bbtk.git] / kernel / src / bbtkWxGUIScriptingInterface.cxx
index 245e1f2a927ebfcb3258f1c350b2090e3b66b68f..c311ee2aaa303367d4b2a0c413eed65ce129db91 100644 (file)
@@ -2,8 +2,8 @@
   Program:   bbtk
   Module:    $RCSfile: bbtkWxGUIScriptingInterface.cxx,v $
   Language:  C++
-  Date:      $Date: 2008/10/21 14:38:31 $
-  Version:   $Revision: 1.31 $
+  Date:      $Date: 2009/12/08 14:10:36 $
+  Version:   $Revision: 1.40 $
 =========================================================================*/
 
 /* ---------------------------------------------------------------------
@@ -55,6 +55,8 @@
 #include "bbtkUtilities.h"
 
 #include <wx/tipwin.h>
+#include <wx/splash.h>
+
 
 //#include "icons/cc_run.xpm"
 
@@ -88,14 +90,14 @@ namespace bbtk
     : wxFrame((wxFrame *)parent, -1, _T("bbStudio"), 
              wxDefaultPosition, wxSize(1200,800) )
   {    
-    //    m_mgr = new wxAuiManager(this);
     m_mgr.SetManagedWindow(this);
     
     mInterpreter = bbtk::Interpreter::New();
     mInterpreter->SetUser(this);
-    mInterpreter->SetCommandLine(true);
+       mInterpreter->SetCommandLine(true);
     mInterpreter->SetThrow(true);
-    
+    //    mInterpreter->AddBreakObserver
+    //boost::bind( &WxGUIScriptingInterface::InterpreterUserOnBreak, this ));
     //==============
     // Menu
     wxInitAllImageHandlers();
@@ -229,6 +231,7 @@ namespace bbtk
                  .Bottom()
                  .MinSize(wxSize(100,100))
                  );
+         
     m_mgr.AddPane(mWxGUICommand,
                  wxAuiPaneInfo().Name(wxT("command_content"))
                  .Caption(wxT("Command"))
@@ -241,8 +244,10 @@ namespace bbtk
 #endif
 
     // parent window of all bbtk windows will be a child of this
-    Wx::SetTopWindowParent(this);
-    // Add the method OnWxSignal as a Wx::Signal observer 
+    //    Wx::SetTopWindowParent(this);
+    Wx::SetTopWindow(this);
+    // Wx::SetAutoDestroyTopWindow(false);
+  // Add the method OnWxSignal as a Wx::Signal observer 
     //bbtkAddWxSignalObserver(WxGUIPackageBrowser2Window::OnWxSignal);
 
     //.PaneBorder(false)); 
@@ -260,46 +265,122 @@ namespace bbtk
     m_mgr.Update();
     //   LoadPerspective();
 
+    mBreaked = false;  
+
+    wxBitmap bitmap;   
+    wxSplashScreen* splash;
+    long style = wxSPLASH_CENTRE_ON_SCREEN | wxSPLASH_TIMEOUT;
+    if (ConfigurationFile::GetInstance().DotBbtkIsNew())
+      style = wxSPLASH_CENTRE_ON_SCREEN | wxSPLASH_NO_TIMEOUT;
+    std::string splash_file = ConfigurationFile::GetInstance().Get_data_path();
+    splash_file += "/kernel/icons/bbStudioSplashScreen.png";
+
+    if (bitmap.LoadFile(std2wx(splash_file),wxBITMAP_TYPE_PNG))
+      splash = 
+       new wxSplashScreen(bitmap,
+                          style,
+                          1000, 0, -1, wxDefaultPosition, wxDefaultSize,
+                          wxSIMPLE_BORDER|wxSTAY_ON_TOP);
+       
+    
+    if (ConfigurationFile::GetInstance().DotBbtkIsNew())
+      {
+
+       DoRegeneratePackageDoc("-a");   
+       DoRegenerateBoxesLists();
+
+       /*
+       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();
+       tip->Show();
+       */
+       if (splash) splash->Destroy();
+      }
 
-    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();
-    tip->Show();
   }
   //================================================================
 
  //================================================================
   WxGUIScriptingInterface::~WxGUIScriptingInterface()
   {
+  bbtkDebugMessage("widget",9,"bbStudio::~bbStudio()"<<std::endl);
     SavePerspective();
     m_mgr.UnInit();
   }
   //================================================================
 
+  //================================================================
+  void WxGUIScriptingInterface::OnClose(wxCloseEvent& event)
+  {
+    bbtkDebugMessage("widget",9,"bbStudio::OnClose()"<<std::endl);
+    //Wx::SetWindowsHaveBeenDestroyedByParent();
+    //mInterpreter.reset();
+    wxWindowList& list = GetChildren();
+    wxWindowList::iterator iter;
+    for (iter = list.begin(); iter != list.end(); ++iter)
+      {
+       (*iter)->Close();
+      }
+    this->Destroy();
+  }
+  //================================================================
+
+
   //================================================================
   void WxGUIScriptingInterface::Open(const std::string& filename)
   {
     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; \
+         }                                                             \
+       }                                                               \
     }
   
   //================================================================
@@ -330,6 +411,52 @@ namespace bbtk
   }
   //================================================================
  
+       
+  //================================================================
+       void WxGUIScriptingInterface::WxGUITextEditorGraphSimple()
+       {
+               WxGUICommandEnter("exec freeze_no_error");
+               WxGUITextEditorRun();
+               WxGUICommandEnter("exec unfreeze");
+               WxGUICommandEnter("graph");
+       }
+  //================================================================
+       
+       //================================================================
+       void WxGUIScriptingInterface::WxGUITextEditorGraphDetail()
+       {
+               WxGUICommandEnter("exec freeze_no_error");
+               WxGUITextEditorRun();
+               WxGUICommandEnter("exec unfreeze");
+               WxGUICommandEnter("graph . 1");
+       }
+       //================================================================
+
+       
+       //================================================================
+       void WxGUIScriptingInterface::WxGUITextEditorRunBBI()
+       {
+         std::string separator = ConfigurationFile::GetInstance().Get_file_separator ();
+         std::string dir = ConfigurationFile::GetInstance().Get_default_temp_dir();
+         std::string filename = dir + separator + "tmp_bbtk.bbs";
+         mWxGUITextEditor->GetCurrentPage()->SaveFile(filename);
+       
+               std::string command = "\"";
+         command += ConfigurationFile::GetInstance().Get_bin_path();
+#ifdef MACOSX
+         command += separator + "bbi.app/Contents/MacOS/bbi\" ";
+#else 
+         command += separator + "bbi\" ";
+#endif
+         command += "\""+filename + "\"";
+         command += " & ";
+         
+         printf ("EED WxGUIScriptingInterface::WxGUITextEditorRunBBI %s \n" , command.c_str() );
+         system( command.c_str() );
+       }
+       //================================================================
+       
+       
   //================================================================
   void WxGUIScriptingInterface::WxGUITextEditorRun()
   {
@@ -338,9 +465,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;
@@ -372,9 +506,12 @@ namespace bbtk
   //================================================================
   void WxGUIScriptingInterface::OnMenuEditConfig(wxCommandEvent& WXUNUSED(event))
   {
+
     std::string configFile = 
       ConfigurationFile::GetInstance().Get_config_xml_full_path();
     Open(configFile);
+       wxMessageDialog ww(NULL,_T("If you change the bbtk_config.xml, you have to restart this appliaction..."), _T("Alert !"), wxOK);
+       ww.ShowModal();
   }
   //================================================================
 
@@ -452,14 +589,27 @@ namespace bbtk
   //================================================================
   void WxGUIScriptingInterface::OnMenuShowImageGraph(wxCommandEvent& WXUNUSED(event))
   {
-    std::string default_temp_dir = ConfigurationFile::GetInstance().Get_default_temp_dir();
 
+      std::string doc_path = bbtk::ConfigurationFile::GetInstance().Get_doc_path();
+      doc_path += bbtk::ConfigurationFile::GetInstance().Get_file_separator();
+      doc_path += "bbdoc";
+      doc_path += bbtk::ConfigurationFile::GetInstance().Get_file_separator();
+         
+         std::string pack_name("User");
+         std::string pack_path = doc_path + pack_name;
+         
+         
 #if defined(WIN32)
     std::string strappli="start ";
 #else
-    std::string strappli="gnome-open ";
+  #if defined(MACOSX)
+      std::string strappli="open ";
+  #else
+      std::string strappli="gnome-open ";        
+  #endif
 #endif
-    std::string strcommand = strappli +default_temp_dir+"/temp_dir/workspace_workspacePrototype.png";
+         
+         std::string strcommand = strappli +pack_path+"/workspace_workspacePrototype.png";
     // std::cout << "system: " << strcommand << std::endl;
     system ( strcommand.c_str() );
 
@@ -468,11 +618,22 @@ namespace bbtk
 
   void WxGUIScriptingInterface::DoRegeneratePackageDoc( const std::string& pack )
   {
-           std::string command;
+    std::string mess("Regenerating doc for package '");
+    if (pack!="-a") 
+      mess += pack + "'";
+    else 
+      mess = "Regenerating doc for all packages";
+    mess += " ... please wait";
+
+    SetStatusText( std2wx(mess) );
+
+    BBTK_BUSY_CURSOR;
+
+    std::string command;
 #if defined(WIN32)
-       command = "\"";
+    command = "\"";
 #endif
-       command += ConfigurationFile::GetInstance().Get_bin_path();
+    command += ConfigurationFile::GetInstance().Get_bin_path();
     command += ConfigurationFile::GetInstance().Get_file_separator();
     command += "bbRegeneratePackageDoc";
 #if defined(WIN32)
@@ -480,19 +641,27 @@ namespace bbtk
 #endif
        command += " " + pack + " -q";
     bbtkMessage("debug",1,"Executing system command '"<<command<<"'"<<std::endl);
-    
+
 
     if ( ! system ( command.c_str() ) )
       {
-       wxMessageBox(_T("Done !"),_T("Regenerate package '")+std2wx(pack)+_T("' doc"),
+       SetStatusText( _T("Done !"));
+       /*
+       wxMessageBox(_T("Done !"),_T("Regenerate package '")
+                    +std2wx(pack)+_T("' doc"),
                     wxOK | wxICON_INFORMATION);
+       */
       }
     else 
       {
+       SetStatusText( _T("Done !"));
        wxString err(_T("An error occured while running '"));
        err +=  bbtk::std2wx(command) + _T("'");
        wxMessageBox(err,_T("Regenerate package doc"),wxOK | wxICON_ERROR);      
       }
+
+
+
   }
 
 
@@ -510,8 +679,12 @@ namespace bbtk
   //================================================================
 
 
+  //================================================================
   void WxGUIScriptingInterface::DoRegenerateBoxesLists()
   {
+    SetStatusText( _T("Regenerating boxes lists ... please wait") );
+    BBTK_BUSY_CURSOR ;
+
     std::string command;
 #if defined(WIN32)
        command = "\"";
@@ -525,18 +698,24 @@ namespace bbtk
        command += " -q";
        bbtkMessage("debug",1,"Executing system command '"<<command<<"'"<<std::endl);
 
-       if ( ! system ( command.c_str() ) )
-    {
-       wxMessageBox(_T("Done !"),_T("Regenerate boxes lists"),
-                   wxOK | wxICON_INFORMATION);
-     }
-   else 
-     {
-       wxString err(_T("An error occured while running '"));
-       err +=  bbtk::std2wx(command) + _T("'");
-       wxMessageBox(err,_T("Regenerate boxes lists"),wxOK | wxICON_ERROR);      
-     }
+    if ( ! system ( command.c_str() ) )
+      {
+       SetStatusText( _T("Done !"));
+       /*
+       wxMessageBox(_T("Done !"),_T("Regenerate boxes lists"),
+                    wxOK | wxICON_INFORMATION);
+       */
+      }
+    else 
+      {
+       SetStatusText( _T("Done !"));
+       wxString err(_T("An error occured while running '"));
+       err +=  bbtk::std2wx(command) + _T("'");
+       wxMessageBox(err,_T("Regenerate boxes lists"),wxOK | wxICON_ERROR);      
+      }
   }
+  //================================================================
+
 
   //================================================================
   void WxGUIScriptingInterface::OnMenuRegenerateBoxesLists(wxCommandEvent& WXUNUSED(event))
@@ -609,22 +788,64 @@ namespace bbtk
   } 
   //================================================================  
   
+  /*
+  //================================================================
+  void WxGUIScriptingInterface::InterpreterUserOnBreak()
+  {
+    //    std::cout << "Break" << std::endl;
+    
+  }
+  //================================================================
+  */
+
   //================================================================  
   bool WxGUIScriptingInterface::WxGUIHtmlBrowserUserOnLinkClicked(const std::string& target)
   {
     size_t s = target.length();
     if ((s>3) && (target[s-1]=='s')
-       && (target[s-2]=='b')
-       && (target[s-3]=='b')
-       && (target[s-4]=='.'))
-      {
-       mWxGUITextEditor->Open(target);
-#if NOTEBOOK
-       mwxNotebook->SetSelection(0);
-#endif
-       mWxGUITextEditor->SetFocus();
-       return false;
-      }
+               && (target[s-2]=='b')
+               && (target[s-3]=='b')
+               && (target[s-4]=='.'))
+       {
+                       mWxGUITextEditor->Open(target);
+                       #if NOTEBOOK
+                               mwxNotebook->SetSelection(0);
+                       #endif
+                       mWxGUITextEditor->SetFocus();
+                       return false;
+       }
+
+       if ((s>3) && (target[s-1]=='f')
+               && (target[s-2]=='d')
+               && (target[s-3]=='p')
+               && (target[s-4]=='.'))
+       {
+
+               // Open pdf in linux
+                 // gnome-open target
+
+               // Open pdf in macOS
+
+               // Open pdf in windows
+                       int size=target.size();
+                       int pos=target.rfind("\\");
+                       std::string commandStart("start ");
+                       std::string commandPath("/D \""+target.substr(0,pos) +"\"");
+                       std::string commandPDF( target.substr(pos+1,size-pos+1) );
+
+                       printf("EED WxGUIScriptingInterface::WxGUIHtmlBrowserUserOnLinkClicked cc %s \n",commandPath.c_str() );
+                       // cleanning path
+                       while (commandPath.rfind("\\\\")!=-1 )
+                       {
+                               commandPath.erase( commandPath.rfind("\\\\") , 1 );
+                       printf("EED WxGUIScriptingInterface::WxGUIHtmlBrowserUserOnLinkClicked cc %s \n",commandPath.c_str() );
+                       }
+
+                       std::string command = commandStart+commandPath+" "+commandPDF;
+                       printf("EED WxGUIScriptingInterface::WxGUIHtmlBrowserUserOnLinkClicked BB %s \n",command.c_str() );
+                       system( command.c_str() );
+                       return false;
+     }
     return true;
   }
   //================================================================  
@@ -749,6 +970,7 @@ namespace bbtk
   
   //================================================================  
   BEGIN_EVENT_TABLE(WxGUIScriptingInterface, wxFrame)
+    EVT_CLOSE(  WxGUIScriptingInterface::OnClose)
     EVT_MENU(ID_Menu_Quit, WxGUIScriptingInterface::OnMenuQuit)
     EVT_MENU(ID_Menu_About, WxGUIScriptingInterface::OnMenuAbout)
     EVT_MENU(ID_Menu_EditConfig, WxGUIScriptingInterface::OnMenuEditConfig)