Salome HOME
Implementation of 0021855: EDF 2321 GEOM : Add folders to group objects in the object...
[modules/geom.git] / src / GEOMToolsGUI / GEOMToolsGUI.cxx
1 // Copyright (C) 2007-2013  CEA/DEN, EDF R&D, OPEN CASCADE
2 //
3 // Copyright (C) 2003-2007  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
5 //
6 // This library is free software; you can redistribute it and/or
7 // modify it under the terms of the GNU Lesser General Public
8 // License as published by the Free Software Foundation; either
9 // version 2.1 of the License.
10 //
11 // This library is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14 // Lesser General Public License for more details.
15 //
16 // You should have received a copy of the GNU Lesser General Public
17 // License along with this library; if not, write to the Free Software
18 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
19 //
20 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
21 //
22
23 // GEOM GEOMGUI : GUI for Geometry component
24 // File   : GEOMBase_Tools.cxx
25 // Author : Damien COQUERET, Open CASCADE S.A.S.
26
27 #include "GEOMToolsGUI.h"
28 #include "GEOMToolsGUI_DeleteDlg.h"
29
30 #include <GeometryGUI.h>
31 #include "GeometryGUI_Operations.h"
32 #include <GEOMBase.h>
33 #include <GEOM_Operation.h>
34 #include <GEOM_Displayer.h>
35
36 #include <SUIT_Session.h>
37 #include <SUIT_OverrideCursor.h>
38 #include <SUIT_MessageBox.h>
39 #include <SUIT_Tools.h>
40 #include <SUIT_FileDlg.h>
41 #include <SUIT_Desktop.h>
42 #include <SUIT_ViewModel.h>
43 #include <SUIT_ViewManager.h>
44
45 #include <SalomeApp_Application.h>
46 #include <SalomeApp_Study.h>
47 #include <LightApp_SelectionMgr.h>
48 #include <GEOMImpl_Types.hxx>
49
50 #include <SALOME_ListIO.hxx>
51 #include <SALOME_ListIteratorOfListIO.hxx>
52 #include <SALOME_Prs.h>
53
54 // QT Includes
55 #include <QApplication>
56 #include <QMap>
57 #include <QRegExp>
58
59 // OCCT Includes
60 #include <TCollection_AsciiString.hxx>
61
62 typedef QMap<QString, QString> FilterMap;
63 static QString lastUsedFilter;
64
65 //=======================================================================
66 // function : getFileName
67 // purpose  : Selection of a file name for Import/Export. Returns also
68 //            the selected file type code through <filter> argument.
69 //=======================================================================
70 static QString getFileName( QWidget*           parent,
71                             const QString&     initial,
72                             const FilterMap&   filterMap,
73                             const QStringList& filters,
74                             const QString&     caption,
75                             bool               open,
76                             QString&           format,
77                             bool               showCurrentDirInitially = false )
78 {
79   //QStringList filters;
80   QString aBrepFilter;
81   for (FilterMap::const_iterator it = filterMap.begin(); it != filterMap.end(); ++it) {
82     //filters.push_back( it.key() );
83     if (it.key().contains( "BREP", Qt::CaseInsensitive ))
84       aBrepFilter = it.key();
85   }
86
87   SUIT_FileDlg* fd = new SUIT_FileDlg( parent, open, true, true );
88   if ( !caption.isEmpty() )
89     fd->setWindowTitle( caption );
90
91   if ( !initial.isEmpty() )
92     fd->selectFile( initial );
93
94   if ( showCurrentDirInitially && SUIT_FileDlg::getLastVisitedPath().isEmpty() )
95     fd->setDirectory( QDir::currentPath() );
96
97   fd->setFilters( filters );
98
99   if ( !lastUsedFilter.isEmpty() && filterMap.contains( lastUsedFilter ) ) {
100     fd->selectFilter( lastUsedFilter );
101   }
102   else if ( !aBrepFilter.isEmpty() ) {
103     fd->selectFilter( aBrepFilter );
104   }
105
106   QString filename;
107   if ( fd->exec() == QDialog::Accepted ) {
108     filename = fd->selectedFile();
109     format = filterMap[fd->selectedFilter()];
110     lastUsedFilter = fd->selectedFilter();
111   }
112
113   delete fd;
114   qApp->processEvents();
115   return filename;
116 }
117
118 //=======================================================================
119 // function : getFileNames
120 // purpose  : Select list of files for Import operation. Returns also
121 //            the selected file type code through <format> argument.
122 //=======================================================================
123 static QStringList getFileNames( QWidget*           parent,
124                                  const QString&     initial,
125                                  const FilterMap&   filterMap,
126                                  const QString&     caption,
127                                  QString&           format,
128                                  bool               showCurrentDirInitially = false)
129 {
130   QString aBrepFilter;
131   QStringList allFilters;
132   QStringList filters;
133   QRegExp re( "\\((.*)\\)" );
134   re.setMinimal( true );
135   for ( FilterMap::const_iterator it = filterMap.begin(); it != filterMap.end(); ++it ) {
136     if ( it.value().contains( "BREP", Qt::CaseInsensitive ) && aBrepFilter.isEmpty() )
137       aBrepFilter = it.key();
138     filters.append( it.key() );
139     int pos = 0;
140     while ( re.indexIn( it.key(), pos ) >= 0 ) {
141       QString f = re.cap(1);
142       pos = re.pos() + f.length() + 2;
143       allFilters.append( f.simplified() );
144     }
145   }
146   filters.append( QObject::tr( "GEOM_ALL_IMPORT_FILES" ).arg( allFilters.join( " " ) ) );
147
148   SUIT_FileDlg fd( parent, true, true, true );
149   fd.setFileMode( SUIT_FileDlg::ExistingFiles );
150   if ( !caption.isEmpty() )
151     fd.setWindowTitle( caption );
152   if ( !initial.isEmpty() )
153     fd.selectFile( initial );
154
155   if ( showCurrentDirInitially && SUIT_FileDlg::getLastVisitedPath().isEmpty() )
156     fd.setDirectory( QDir::currentPath() );
157
158   fd.setFilters( filters );
159
160   if ( !lastUsedFilter.isEmpty() && filterMap.contains( lastUsedFilter ) )
161     fd.selectFilter( lastUsedFilter );
162   else if ( !aBrepFilter.isEmpty() )
163     fd.selectFilter( aBrepFilter );
164
165   QStringList filenames;
166   if ( fd.exec() ) {
167     filenames = fd.selectedFiles();
168     format = filterMap.contains( fd.selectedFilter() ) ? filterMap[ fd.selectedFilter() ] : QString();
169     lastUsedFilter = fd.selectedFilter();
170   }
171   qApp->processEvents();
172   return filenames;
173 }
174
175 //=======================================================================
176 // function : getParentComponent
177 // purpose  : Get object's parent component entry
178 //=======================================================================
179 static QString getParentComponent( _PTR( SObject ) obj )
180 {
181   if ( obj ) {
182     _PTR(SComponent) comp = obj->GetFatherComponent();
183     if ( comp )
184       return QString( comp->GetID().c_str() );
185   }
186   return QString();
187 }
188
189 //=====================================================================================
190 // function : inUse
191 // purpose  : check if the object(s) passed as the the second arguments are used
192 //            by the other objects in the study
193 //=====================================================================================
194 static bool inUse( _PTR(Study) study, const QString& component, const QMap<QString,QString>& objects )
195 {
196   _PTR(SObject) comp = study->FindObjectID( component.toLatin1().data() );
197   if ( !comp )
198     return false;
199
200   // collect all GEOM objects being deleted
201   QMap<QString, GEOM::GEOM_Object_var> gobjects;
202   QMap<QString, QString>::ConstIterator oit;
203   std::list<_PTR(SObject)> aSelectedSO;
204   for ( oit = objects.begin(); oit != objects.end(); ++oit ) {
205     _PTR(SObject) so = study->FindObjectID( oit.key().toLatin1().data() );
206     if ( !so )
207       continue;
208     aSelectedSO.push_back(so);
209     CORBA::Object_var corbaObj_rem = GeometryGUI::ClientSObjectToObject( so );
210     GEOM::GEOM_Object_var geomObj_rem = GEOM::GEOM_Object::_narrow( corbaObj_rem );
211     if( CORBA::is_nil( geomObj_rem ) )
212       continue;
213     gobjects.insert( oit.key(), geomObj_rem );
214   }
215
216   // Search References with other Modules
217   std::list< _PTR(SObject) >::iterator itSO = aSelectedSO.begin();
218   for ( ; itSO != aSelectedSO.end(); ++itSO ) {
219     std::vector<_PTR(SObject)> aReferences = study->FindDependances( *itSO  );
220     int aRefLength = aReferences.size();
221     if (aRefLength) {
222       for (int i = 0; i < aRefLength; i++) {
223         _PTR(SObject) firstSO( aReferences[i] );
224         _PTR(SComponent) aComponent = firstSO->GetFatherComponent();
225         QString type = aComponent->ComponentDataType().c_str();
226         if ( type == "SMESH" )
227           return true;
228       }
229     }
230   }
231
232   // browse through all GEOM data tree
233   _PTR(ChildIterator) it ( study->NewChildIterator( comp ) );
234   for ( it->InitEx( true ); it->More(); it->Next() ) {
235     _PTR(SObject) child( it->Value() );
236     CORBA::Object_var corbaObj = GeometryGUI::ClientSObjectToObject( child );
237     GEOM::GEOM_Object_var geomObj = GEOM::GEOM_Object::_narrow( corbaObj );
238     if( CORBA::is_nil( geomObj ) )
239       continue;
240
241     GEOM::ListOfGO_var list = geomObj->GetDependency();
242     if( list->length() == 0 )
243       continue;
244
245     for( int i = 0; i < list->length(); i++ ) {
246       bool depends = false;
247       bool deleted = false;
248       QMap<QString, GEOM::GEOM_Object_var>::Iterator git;
249       for ( git = gobjects.begin(); git != gobjects.end() && ( !depends || !deleted ); ++git ) {
250         depends = depends || list[i]->_is_equivalent( *git );
251         deleted = deleted || git.key() == child->GetID().c_str() ;//geomObj->_is_equivalent( *git );
252       }
253       if ( depends && !deleted )
254         return true;
255     }
256   }
257   return false;
258 }
259
260 //=======================================================================
261 // function : GEOMToolsGUI()
262 // purpose  : Constructor
263 //=======================================================================
264 GEOMToolsGUI::GEOMToolsGUI( GeometryGUI* parent )
265 : GEOMGUI( parent )
266 {
267 }
268
269 //=======================================================================
270 // function : ~GEOMToolsGUI()
271 // purpose  : Destructor
272 //=======================================================================
273 GEOMToolsGUI::~GEOMToolsGUI()
274 {
275 }
276
277 //=======================================================================
278 // function : OnGUIEvent()
279 // purpose  :
280 //=======================================================================
281 bool GEOMToolsGUI::OnGUIEvent(int theCommandID, SUIT_Desktop* parent)
282 {
283   getGeometryGUI()->EmitSignalDeactivateDialog();
284
285   switch ( theCommandID ) {
286   case GEOMOp::OpDelete:         // EDIT - DELETE
287     OnEditDelete();
288     break;
289   case GEOMOp::OpImport:         // FILE - IMPORT
290     Import();
291     break;
292   case GEOMOp::OpExport:         // FILE - EXPORT
293     Export();
294     break;
295   case GEOMOp::OpCheckGeom:      // TOOLS - CHECK GEOMETRY
296     OnCheckGeometry();
297     break;
298   case GEOMOp::OpSelectVertex:   // POPUP - SELECT ONLY - VERTEX
299     OnSelectOnly( GEOM_POINT );
300     break;
301   case GEOMOp::OpSelectEdge:     // POPUP - SELECT ONLY - EDGE
302     OnSelectOnly( GEOM_EDGE );
303     break;
304   case GEOMOp::OpSelectWire:     // POPUP - SELECT ONLY - WIRE
305     OnSelectOnly( GEOM_WIRE );
306     break;
307   case GEOMOp::OpSelectFace:     // POPUP - SELECT ONLY - FACE
308     OnSelectOnly( GEOM_FACE );
309     break;
310   case GEOMOp::OpSelectShell:    // POPUP - SELECT ONLY - SHELL
311     OnSelectOnly( GEOM_SHELL );
312     break;
313   case GEOMOp::OpSelectSolid:    // POPUP - SELECT ONLY - SOLID
314     OnSelectOnly( GEOM_SOLID );
315     break;
316   case GEOMOp::OpSelectCompound: // POPUP - SELECT ONLY - COMPOUND
317     OnSelectOnly( GEOM_COMPOUND );
318     break;
319   case GEOMOp::OpSelectAll:      // POPUP - SELECT ONLY - SELECT ALL
320     OnSelectOnly( GEOM_ALLOBJECTS );
321     break;
322   case GEOMOp::OpDeflection:     // POPUP - DEFLECTION ANGLE
323     OnDeflection();
324     break;
325   case GEOMOp::OpColor:          // POPUP - COLOR
326     OnColor();
327     break;
328   case GEOMOp::OpSetTexture:     // POPUP - TEXTURE
329     OnTexture();
330     break;
331   case GEOMOp::OpTransparency:   // POPUP - TRANSPARENCY
332     OnTransparency();
333     break;
334   case GEOMOp::OpIncrTransparency: // SHORTCUT   - INCREASE TRANSPARENCY
335     OnChangeTransparency( true );
336     break;
337   case GEOMOp::OpDecrTransparency: // SHORTCUT   - DECREASE TRANSPARENCY
338     OnChangeTransparency( false );
339     break;
340   case GEOMOp::OpIsos:           // POPUP - ISOS
341     OnNbIsos();
342     break;
343   case GEOMOp::OpIncrNbIsos:     // SHORTCUT   - INCREASE NB ISOLINES
344     OnNbIsos( INCR );
345     break;
346   case GEOMOp::OpDecrNbIsos:     // SHORTCUT   - DECREASE NB ISOLINES
347     OnNbIsos( DECR );
348     break;
349   case GEOMOp::OpMaterialProperties: // POPUP - MATERIAL PROPERTIES
350     OnMaterialProperties();
351     break;
352   case GEOMOp::OpPredefMaterCustom:  // POPUP  - MATERIAL PROPERTIES - CUSTOM...
353     OnMaterialProperties();
354     break;
355   case GEOMOp::OpMaterialsLibrary:    // POPUP MENU - MATERIAL PROPERTIES
356     OnMaterialsLibrary();
357     break;
358   case GEOMOp::OpAutoColor:      // POPUP - AUTO COLOR
359     OnAutoColor();
360     break;
361   case GEOMOp::OpNoAutoColor:    // POPUP - DISABLE AUTO COLOR
362     OnDisableAutoColor();
363     break;
364   case GEOMOp::OpDiscloseChildren:   // POPUP - SHOW CHILDREN
365   case GEOMOp::OpConcealChildren:   // POPUP - HIDE CHILDREN
366     OnDiscloseConcealChildren( theCommandID == GEOMOp::OpDiscloseChildren );
367     break;
368   case GEOMOp::OpPointMarker:    // POPUP - POINT MARKER
369     OnPointMarker();
370     break;
371   case GEOMOp::OpUnpublishObject:// POPUP - UNPUBLISH
372     OnUnpublishObject();
373     break;
374   case GEOMOp::OpPublishObject:// GEOM ROOT OBJECT - POPUP - PUBLISH
375     OnPublishObject();
376     break;
377   case GEOMOp::OpEdgeWidth:
378     OnEdgeWidth();
379     break;
380   case GEOMOp::OpIsosWidth:
381     OnIsosWidth();
382     break;
383   case GEOMOp::OpBringToFront:
384     OnBringToFront();
385     break;
386   case GEOMOp::OpClsBringToFront:
387     OnClsBringToFront();
388      break;
389   case GEOMOp::OpCreateFolder:
390     OnCreateFolder();
391      break;
392   default:
393     SUIT_Session::session()->activeApplication()->putInfo(tr("GEOM_PRP_COMMAND").arg(theCommandID));
394     break;
395   }
396   return true;
397 }
398
399 //=======================================================================
400 // function : OnGUIEvent()
401 // purpose  :
402 //=======================================================================
403 bool GEOMToolsGUI::OnGUIEvent(int theCommandID, SUIT_Desktop* parent, const QVariant& theParam )
404 {
405   getGeometryGUI()->EmitSignalDeactivateDialog();
406
407   switch ( theCommandID ) {
408   case GEOMOp::OpPredefMaterial:         // POPUP MENU - MATERIAL PROPERTIES - <SOME MATERIAL>
409     OnSetMaterial( theParam );
410     break;
411   default:
412     SUIT_Session::session()->activeApplication()->putInfo(tr("GEOM_PRP_COMMAND").arg(theCommandID));
413     break;
414   }
415   return true;
416 }
417
418 //===============================================================================
419 // function : OnEditDelete()
420 // purpose  :
421 //===============================================================================
422 void GEOMToolsGUI::OnEditDelete()
423 {
424   SALOME_ListIO selected;
425   SalomeApp_Application* app =
426     dynamic_cast< SalomeApp_Application* >( SUIT_Session::session()->activeApplication() );
427   if ( !app )
428     return;
429
430   LightApp_SelectionMgr* aSelMgr = app->selectionMgr();
431   SalomeApp_Study* appStudy = dynamic_cast<SalomeApp_Study*>( app->activeStudy() );
432   if ( !aSelMgr || !appStudy )
433     return;
434
435   // get selection
436   aSelMgr->selectedObjects( selected, "ObjectBrowser", false );
437   if ( selected.IsEmpty() )
438     return;
439
440   _PTR(Study) aStudy = appStudy->studyDS();
441
442   // check if study is locked
443   if ( _PTR(AttributeStudyProperties)( aStudy->GetProperties() )->IsLocked() ) {
444     SUIT_MessageBox::warning( app->desktop(),
445                               tr("WRN_WARNING"),
446                               tr("WRN_STUDY_LOCKED") );
447     return; // study is locked
448   }
449
450   // get GEOM component
451   CORBA::String_var geomIOR = app->orb()->object_to_string( GeometryGUI::GetGeomGen() );
452   QString geomComp = getParentComponent( aStudy->FindObjectIOR( geomIOR.in() ) );
453
454   // check each selected object: if belongs to GEOM, if not reference...
455   QMap<QString,QString> toBeDeleted;
456   QMap<QString,QString> allDeleted;
457   bool isComponentSelected = false;
458
459   for ( SALOME_ListIteratorOfListIO It( selected ); It.More(); It.Next() ) {
460     Handle(SALOME_InteractiveObject) anIObject = It.Value();
461     if ( !anIObject->hasEntry() )
462       continue; // invalid object
463     // ...
464     QString entry = anIObject->getEntry();
465     _PTR(SObject) obj = aStudy->FindObjectID( entry.toLatin1().data() );
466     // check parent component
467     QString parentComp = getParentComponent( obj );
468     if ( parentComp != geomComp )  {
469       SUIT_MessageBox::warning( app->desktop(),
470                                 QObject::tr("ERR_ERROR"),
471                                 QObject::tr("NON_GEOM_OBJECTS_SELECTED").arg( getGeometryGUI()->moduleName() ) );
472       return; // not GEOM object selected
473     }
474
475     ///////////////////////////////////////////////////////
476     // if GEOM component is selected, so skip other checks
477     if ( isComponentSelected ) continue;
478     ///////////////////////////////////////////////////////
479
480     // check if object is reference
481     _PTR(SObject) refobj;
482     if ( obj && obj->ReferencedObject( refobj ) ) {
483       // get the main object by reference IPAL 21354
484       obj = refobj;
485       entry = obj->GetID().c_str();
486     }
487     // ...
488     QString aName = obj->GetName().c_str();
489     if ( entry == geomComp ) {
490       // GEOM component is selected, skip other checks
491       isComponentSelected = true;
492       continue;
493     }
494     toBeDeleted.insert( entry, aName );
495     allDeleted.insert( entry, aName ); // skip GEOM component
496     // browse through all children recursively
497     _PTR(ChildIterator) it ( aStudy->NewChildIterator( obj ) );
498     for ( it->InitEx( true ); it->More(); it->Next() ) {
499       _PTR(SObject) child( it->Value() );
500       if ( child && child->ReferencedObject( refobj ) )
501         continue; // skip references
502       aName = child->GetName().c_str();
503       if ( !aName.isEmpty() )
504         allDeleted.insert( child->GetID().c_str(), aName );
505     }
506   }
507
508   // is there is anything to delete?
509   if ( !isComponentSelected && allDeleted.count() <= 0 )
510     return; // nothing to delete
511
512   // show confirmation dialog box
513   GEOMToolsGUI_DeleteDlg dlg( app->desktop(), allDeleted, isComponentSelected );
514   if ( !dlg.exec() )
515     return; // operation is cancelled by user
516
517   // get currently opened views
518   QList<SALOME_View*> views;
519   SALOME_View* view;
520   ViewManagerList vmans = app->viewManagers();
521   SUIT_ViewManager* vman;
522   foreach ( vman, vmans ) {
523     SUIT_ViewModel* vmod = vman->getViewModel();
524     view = dynamic_cast<SALOME_View*> ( vmod ); // must work for OCC and VTK views
525     if ( view )
526       views.append( view );
527   }
528
529   _PTR(StudyBuilder) aStudyBuilder (aStudy->NewBuilder());
530   GEOM_Displayer* disp = new GEOM_Displayer( appStudy );
531
532   if ( isComponentSelected ) {
533     // GEOM component is selected: delete all objects recursively
534     _PTR(SObject) comp = aStudy->FindObjectID( geomComp.toLatin1().data() );
535     if ( !comp )
536       return;
537     _PTR(ChildIterator) it ( aStudy->NewChildIterator( comp ) );
538     // remove top-level objects only
539     for ( it->InitEx( false ); it->More(); it->Next() ) {
540       _PTR(SObject) child( it->Value() );
541       // remove object from GEOM engine
542       removeObjectWithChildren( child, aStudy, views, disp );
543       // remove object from study
544       aStudyBuilder->RemoveObjectWithChildren( child );
545     }
546   }
547   else {
548     // GEOM component is not selected: check if selected objects are in use
549     if ( inUse( aStudy, geomComp, allDeleted ) && 
550          SUIT_MessageBox::question( app->desktop(),
551                                     QObject::tr("WRN_WARNING"),
552                                     QObject::tr("DEP_OBJECT"),
553                                     SUIT_MessageBox::Yes | SUIT_MessageBox::No,
554                                     SUIT_MessageBox::No ) != SUIT_MessageBox::Yes ) {
555       return; // object(s) in use
556     }
557     // ... and then delete all objects
558     QMap<QString, QString>::Iterator it;
559     for ( it = toBeDeleted.begin(); it != toBeDeleted.end(); ++it ) {
560       _PTR(SObject) obj ( aStudy->FindObjectID( it.key().toLatin1().data() ) );
561       // remove object from GEOM engine
562       removeObjectWithChildren( obj, aStudy, views, disp );
563       // remove objects from study
564       aStudyBuilder->RemoveObjectWithChildren( obj );
565     }
566   }
567
568   selected.Clear();
569   aSelMgr->setSelectedObjects( selected );
570   getGeometryGUI()->updateObjBrowser();
571   app->updateActions(); //SRN: To update a Save button in the toolbar
572 }
573
574 //=====================================================================================
575 // function : Import
576 // purpose  : BRep, Iges, Step, ...
577 //=====================================================================================
578 bool GEOMToolsGUI::Import()
579 {
580   SalomeApp_Application* app = dynamic_cast< SalomeApp_Application* >( getGeometryGUI()->getApp() );
581   if ( !app ) return false;
582
583   SalomeApp_Study* stud = dynamic_cast<SalomeApp_Study*> ( app->activeStudy() );
584   if ( !stud ) {
585     MESSAGE ( "FAILED to cast active study to SalomeApp_Study" );
586     return false;
587   }
588   _PTR(Study) aStudy = stud->studyDS();
589
590   // check if study is locked
591   bool aLocked = (_PTR(AttributeStudyProperties)(aStudy->GetProperties()))->IsLocked();
592   if ( aLocked ) {
593     SUIT_MessageBox::warning( app->desktop(),
594                               QObject::tr("WRN_WARNING"),
595                               QObject::tr("WRN_STUDY_LOCKED") );
596     return false;
597   }
598
599   // check if GEOM engine is available
600   GEOM::GEOM_Gen_var eng = GeometryGUI::GetGeomGen();
601   if ( CORBA::is_nil( eng ) ) {
602     SUIT_MessageBox::critical( app->desktop(),
603                                QObject::tr("WRN_WARNING"),
604                                QObject::tr( "GEOM Engine is not started" ) );
605     return false;
606   }
607
608   GEOM::GEOM_IInsertOperations_var aInsOp = eng->GetIInsertOperations( aStudy->StudyId() );
609   if ( aInsOp->_is_nil() )
610     return false;
611
612   // obtain a list of available import formats
613   FilterMap aMap;
614   GEOM::string_array_var aFormats, aPatterns;
615   aInsOp->ImportTranslators( aFormats, aPatterns );
616
617   for ( int i = 0, n = aFormats->length(); i < n; i++ )
618     aMap.insert( (char*)aPatterns[i], (char*)aFormats[i] );
619
620   // select files to be imported
621   QString fileType;
622   QStringList fileNames = getFileNames( app->desktop(), "", aMap,
623                                         tr( "GEOM_MEN_IMPORT" ), fileType, true );
624
625   // set Wait cursor
626   SUIT_OverrideCursor wc;
627
628   if ( fileNames.count() == 0 )
629     return false; // nothing selected, return
630
631   QStringList errors;
632
633   QList< GEOM::GEOM_Object_var > objsForDisplay;
634
635   QStringList anEntryList;
636
637   // iterate through all selected files
638
639   SUIT_MessageBox::StandardButton igesAnswer = SUIT_MessageBox::NoButton;
640   SUIT_MessageBox::StandardButton acisAnswer = SUIT_MessageBox::NoButton;
641
642   for ( int i = 0; i < fileNames.count(); i++ ) {
643     QString fileName = fileNames[i];
644
645     if ( fileName.isEmpty() )
646       continue;
647
648     QString aCurrentType;
649     if ( fileType.isEmpty() ) {
650       // file type is not defined, try to detect
651       QString ext = QFileInfo( fileName ).suffix().toUpper();
652       QRegExp re( "\\*\\.(\\w+)" );
653       for ( FilterMap::const_iterator it = aMap.begin();
654             it != aMap.end() && aCurrentType.isEmpty(); ++it ) {
655         int pos = 0;
656         while ( re.indexIn( it.key(), pos ) >= 0 ) {
657           QString f = re.cap(1).trimmed().toUpper();
658           if ( ext == f ) { aCurrentType = it.value(); break; }
659           pos = re.pos() + re.cap(1).length() + 2;
660         }
661       }
662     }
663     else {
664       aCurrentType = fileType;
665     }
666
667     if ( aCurrentType.isEmpty() ) {
668       errors.append( QString( "%1 : %2" ).arg( fileName ).arg( tr( "GEOM_UNSUPPORTED_TYPE" ) ) );
669       continue;
670     }
671
672     GEOM_Operation* anOp = new GEOM_Operation( app, aInsOp.in() );
673     try {
674       app->putInfo( tr( "GEOM_PRP_LOADING" ).arg( SUIT_Tools::file( fileName, /*withExten=*/true ) ) );
675       anOp->start();
676
677       CORBA::String_var fileN = fileName.toLatin1().constData();
678       CORBA::String_var fileT = aCurrentType.toLatin1().constData();
679
680       // jfa 21.08.2012 for mantis issue 21511 (STEP file units)
681       CORBA::String_var aUnits = aInsOp->ReadValue(fileN, fileT, "LEN_UNITS");
682       QString aUnitsStr (aUnits.in());
683       bool needConvert = true;
684       if (aUnitsStr.isEmpty() || aUnitsStr == "M" || aUnitsStr.toLower() == "metre")
685         needConvert = false;
686
687       if (needConvert) {
688         if (igesAnswer == SUIT_MessageBox::NoToAll) {
689           // converting for all files is already approved
690           fileT = (aCurrentType + "_SCALE").toLatin1().constData();
691         }
692         else if (igesAnswer != SUIT_MessageBox::YesToAll) {
693           SUIT_MessageBox::StandardButtons btns = SUIT_MessageBox::Yes | SUIT_MessageBox::No;
694           if (i < fileNames.count() - 1) btns = btns | SUIT_MessageBox::YesToAll | SUIT_MessageBox::NoToAll;
695           igesAnswer = SUIT_MessageBox::question(app->desktop(),
696                                                  "Question",//tr("WRN_WARNING"),
697                                                  tr("GEOM_SCALE_DIMENSIONS").arg(aUnitsStr),
698                                                  btns | SUIT_MessageBox::Cancel,
699                                                  SUIT_MessageBox::No);
700           switch (igesAnswer) {
701           case SUIT_MessageBox::Cancel:
702             return false;                // cancel (break) import operation
703           case SUIT_MessageBox::Yes:
704           case SUIT_MessageBox::YesToAll:
705             break;                       // scaling is confirmed
706           case SUIT_MessageBox::No:
707           case SUIT_MessageBox::NoAll:
708             fileT = (aCurrentType + "_SCALE").toLatin1().constData();
709           default:
710             break;                       // scaling is rejected
711           } // switch ( igesAnswer )
712         } // if ( igeAnswer != NoToAll )
713       } // if ( needConvert )
714
715       /*
716       // skl 29.05.2009
717       if ( aCurrentType == "IGES" ) {
718         GEOM::GEOM_Object_var anObj = aInsOp->ImportFile( fileN, "IGES_UNIT" );
719         bool needConvert = false;
720         TCollection_AsciiString aUnitName = aInsOp->GetErrorCode();
721         if ( aUnitName.SubString( 1, 4 ) == "UNIT" )
722           needConvert = aUnitName.SubString( 6, aUnitName.Length() ) != "M";
723
724         if ( needConvert ) {
725           if ( igesAnswer == SUIT_MessageBox::NoToAll ) {
726             // converting for all files is already approved
727             fileT = "IGES_SCALE";
728           }
729           else if ( igesAnswer != SUIT_MessageBox::YesToAll ) {
730             SUIT_MessageBox::StandardButtons btns = SUIT_MessageBox::Yes | SUIT_MessageBox::No;
731             if ( i < fileNames.count()-1 ) btns = btns | SUIT_MessageBox::YesToAll | SUIT_MessageBox::NoToAll;
732             igesAnswer = SUIT_MessageBox::question( app->desktop(),
733                                                     "Question",//tr("WRN_WARNING"),
734                                                     tr("GEOM_SCALE_DIMENSIONS"),
735                                                     btns | SUIT_MessageBox::Cancel,
736                                                     SUIT_MessageBox::No );
737             switch ( igesAnswer ) {
738             case SUIT_MessageBox::Cancel:
739               return false;                // cancel (break) import operation
740             case SUIT_MessageBox::Yes:
741             case SUIT_MessageBox::YesToAll:
742               break;                       // scaling is confirmed
743             case SUIT_MessageBox::No:
744             case SUIT_MessageBox::NoAll:
745               fileT = "IGES_SCALE";
746             default:
747               break;                       // scaling is rejected
748             } // switch ( igesAnswer )
749           } // if ( igeAnswer != NoToAll )
750         } // if ( needConvert )
751       } // if ( aCurrentType == "IGES" )
752       else if ( aCurrentType == "ACIS" ) {
753       */
754
755       if ( aCurrentType == "ACIS" ) {
756         if ( acisAnswer != SUIT_MessageBox::YesToAll && acisAnswer != SUIT_MessageBox::NoToAll ) {
757           SUIT_MessageBox::StandardButtons btns = SUIT_MessageBox::Yes | SUIT_MessageBox::No;
758           if ( i < fileNames.count()-1 ) btns = btns | SUIT_MessageBox::YesToAll | SUIT_MessageBox::NoToAll;
759           acisAnswer = SUIT_MessageBox::question( app->desktop(),
760                                                   "Question",//tr("WRN_WARNING"),
761                                                   tr("GEOM_PUBLISH_NAMED_SHAPES"),
762                                                   btns | SUIT_MessageBox::Cancel,
763                                                   SUIT_MessageBox::No );
764           if ( acisAnswer == SUIT_MessageBox::Cancel )
765             return false; // cancel (break) import operation
766         } // if ( acisAnswer != YesToAll && acisAnswer != NoToAll )
767       } // else if ( aCurrentType == "ACIS" )
768
769       // IMPORT
770       GEOM::GEOM_Object_var anObj = aInsOp->ImportFile( fileN, fileT );
771
772       if ( !anObj->_is_nil() && aInsOp->IsDone() ) {
773         QString aPublishObjName =
774           GEOMBase::GetDefaultName( SUIT_Tools::file( fileName, /*withExten=*/true ) );
775
776         SALOMEDS::Study_var aDSStudy = GeometryGUI::ClientStudyToStudy( aStudy );
777         SALOMEDS::SObject_var aSO =
778           GeometryGUI::GetGeomGen()->PublishInStudy( aDSStudy,
779                                                      SALOMEDS::SObject::_nil(),
780                                                      anObj,
781                                                      aPublishObjName.toLatin1().constData() );
782         if ( ( !aSO->_is_nil() ) )
783           anEntryList.append( aSO->GetID() );
784
785         objsForDisplay.append( anObj );
786
787         if ( aCurrentType == "ACIS" ) {
788           if ( acisAnswer == SUIT_MessageBox::Yes || acisAnswer == SUIT_MessageBox::YesToAll )
789             GeometryGUI::GetGeomGen()->PublishNamedShapesInStudy( aDSStudy, anObj );
790         }
791
792         anOp->commit();
793       }
794       else {
795         anOp->abort();
796         errors.append( QString( "%1 : %2" ).arg( fileName ).arg( aInsOp->GetErrorCode() ) );
797       }
798     }
799     catch( const SALOME::SALOME_Exception& S_ex ) {
800       anOp->abort();
801       errors.append( QString( "%1 : %2" ).arg( fileName ).arg( tr( "GEOM_UNKNOWN_IMPORT_ERROR" ) ) );
802     }
803   }
804
805   // update object browser
806   getGeometryGUI()->updateObjBrowser( true );
807
808   // browse published objects
809   app->browseObjects( anEntryList );
810
811   // display imported model (if only one file is selected)
812   if ( objsForDisplay.count() == 1 )
813     GEOM_Displayer( stud ).Display( objsForDisplay[0].in() );
814
815   if ( errors.count() > 0 ) {
816     SUIT_MessageBox::critical( app->desktop(),
817                                QObject::tr( "GEOM_ERROR" ),
818                                QObject::tr( "GEOM_IMPORT_ERRORS" ) + "\n" + errors.join( "\n" ) );
819   }
820
821   app->updateActions(); //SRN: To update a Save button in the toolbar
822
823   return objsForDisplay.count() > 0;
824 }
825
826 //=====================================================================================
827 // function : Export
828 // purpose  : BRep, Iges, Step
829 //=====================================================================================
830 bool GEOMToolsGUI::Export()
831 {
832   SalomeApp_Application* app = getGeometryGUI()->getApp();
833   if (!app) return false;
834
835   SalomeApp_Study* stud = dynamic_cast<SalomeApp_Study*> ( app->activeStudy() );
836   if ( !stud ) {
837     MESSAGE ( "FAILED to cast active study to SalomeApp_Study" );
838     return false;
839   }
840   _PTR(Study) aStudy = stud->studyDS();
841
842   GEOM::GEOM_Gen_var eng = GeometryGUI::GetGeomGen();
843   if ( CORBA::is_nil( eng ) ) {
844     SUIT_MessageBox::critical( app->desktop(),
845                                QObject::tr("WRN_WARNING"),
846                                QObject::tr( "GEOM Engine is not started" ) );
847     return false;
848   }
849
850   GEOM::GEOM_IInsertOperations_var aInsOp = eng->GetIInsertOperations( aStudy->StudyId() );
851   if ( aInsOp->_is_nil() )
852     return false;
853
854   // Obtain a list of available export formats
855   FilterMap aMap;
856   QStringList filters;
857   GEOM::string_array_var aFormats, aPatterns;
858   aInsOp->ExportTranslators( aFormats, aPatterns );
859   for ( int i = 0, n = aFormats->length(); i < n; i++ ) {
860     aMap.insert( (char*)aPatterns[i], (char*)aFormats[i] );
861     filters.push_back( (char*)aPatterns[i] );
862   }
863
864   // Get selected objects
865   LightApp_SelectionMgr* sm = app->selectionMgr();
866   if ( !sm )
867     return false;
868
869   SALOME_ListIO selectedObjects;
870   sm->selectedObjects( selectedObjects );
871   bool appropriateObj = false;
872
873   SALOME_ListIteratorOfListIO It( selectedObjects );
874   for (; It.More(); It.Next()) {
875     Handle(SALOME_InteractiveObject) IObject = It.Value();
876     GEOM::GEOM_Object_var anObj = GEOMBase::ConvertIOinGEOMObject( IObject );
877
878     if ( anObj->_is_nil() )
879       continue;
880
881     QString fileType;
882     QString file = getFileName(app->desktop(), QString( IObject->getName() ), aMap, filters,
883                                tr("GEOM_MEN_EXPORT"), false, fileType, true);
884
885     // User has pressed "Cancel" --> stop the operation
886     if ( file.isEmpty() || fileType.isEmpty() )
887       return false;
888
889     GEOM_Operation* anOp = new GEOM_Operation( app, aInsOp.in() );
890     try {
891       SUIT_OverrideCursor wc;
892
893       app->putInfo( tr("GEOM_PRP_EXPORT").arg(SUIT_Tools::file( file, /*withExten=*/true )) );
894
895       anOp->start();
896
897       aInsOp->Export( anObj, file.toStdString().c_str(), fileType.toLatin1().constData() );
898
899       if (aInsOp->IsDone())
900         anOp->commit();
901       else {
902         anOp->abort();
903         wc.suspend();
904         SUIT_MessageBox::critical(app->desktop(),
905                                   QObject::tr("GEOM_ERROR"),
906                                   QObject::tr("GEOM_PRP_ABORT") + "\n" + QObject::tr(aInsOp->GetErrorCode()));
907         return false;
908       }
909     }
910     catch (const SALOME::SALOME_Exception& S_ex) {
911       //QtCatchCorbaException(S_ex);
912       anOp->abort();
913       return false;
914     }
915     appropriateObj = true;
916   }
917
918   if ( !appropriateObj )
919     SUIT_MessageBox::warning( app->desktop(),
920                               QObject::tr("WRN_WARNING"),
921                               QObject::tr("GEOM_WRN_NO_APPROPRIATE_SELECTION") );
922   return true;
923 }
924
925 //=====================================================================================
926 // function : RemoveObjectWithChildren
927 // purpose  : used by OnEditDelete() method
928 //=====================================================================================
929 void GEOMToolsGUI::removeObjectWithChildren(_PTR(SObject) obj,
930                                             _PTR(Study) aStudy,
931                                             QList<SALOME_View*> views,
932                                             GEOM_Displayer* disp)
933 {
934   // iterate through all children of obj
935   for (_PTR(ChildIterator) it (aStudy->NewChildIterator(obj)); it->More(); it->Next()) {
936     _PTR(SObject) child (it->Value());
937     removeObjectWithChildren(child, aStudy, views, disp);
938   }
939
940   // erase object and remove it from engine
941   _PTR(GenericAttribute) anAttr;
942   if (obj->FindAttribute(anAttr, "AttributeIOR")) {
943     _PTR(AttributeIOR) anIOR (anAttr);
944
945     SalomeApp_Study* appStudy = dynamic_cast<SalomeApp_Study*>( SUIT_Session::session()->activeApplication()->activeStudy() );
946
947     // Delete shape in Client
948     const TCollection_AsciiString ASCIor ((char*)anIOR->Value().c_str());
949     getGeometryGUI()->GetShapeReader().RemoveShapeFromBuffer(ASCIor);
950
951     CORBA::Object_var corbaObj = GeometryGUI::ClientSObjectToObject(obj);
952     GEOM::GEOM_Object_var geomObj = GEOM::GEOM_Object::_narrow( corbaObj );
953     if (!CORBA::is_nil(geomObj)) {
954
955       //Remove visual properties of the object
956       appStudy->removeObjectFromAll(obj->GetID().c_str());
957
958       // Erase graphical object
959       QListIterator<SALOME_View*> it( views );
960       while ( it.hasNext() )
961         if ( SALOME_View* view = it.next() )
962           disp->Erase(geomObj, true, view);
963
964       // Remove object from Engine
965       // We can't directly remove object from engine. All we can do is to unpublish the object
966       // from the study. Another client could be using the object.
967       // Unpublishing is done just after in aStudyBuilder->RemoveObjectWithChildren( child );
968       //GeometryGUI::GetGeomGen()->RemoveObject( geomObj );
969     }
970   }
971 }
972
973 //=================================================================================
974 // function : deactivate()
975 // purpose  : Called when GEOM component is deactivated
976 //=================================================================================
977 void GEOMToolsGUI::deactivate()
978 {
979   SalomeApp_Application* app = dynamic_cast< SalomeApp_Application* >( SUIT_Session::session()->activeApplication() );
980   if ( app ) {
981     SalomeApp_Study* appStudy = dynamic_cast<SalomeApp_Study*>( app->activeStudy() );
982     GEOM_Displayer aDisp (appStudy);
983     aDisp.GlobalSelection();
984     getGeometryGUI()->setLocalSelectionMode(GEOM_ALLOBJECTS);
985   }
986 }
987
988 //=====================================================================================
989 // EXPORTED METHODS
990 //=====================================================================================
991 extern "C"
992 {
993 #ifdef WIN32
994   __declspec( dllexport )
995 #endif
996   GEOMGUI* GetLibGUI( GeometryGUI* parent )
997   {
998     return new GEOMToolsGUI( parent );
999   }
1000 }