Salome HOME
f1abd61d09d33cc6fa8c1b82747a07e4fa23b9ff
[modules/geom.git] / src / GEOMToolsGUI / GEOMToolsGUI.cxx
1 // Copyright (C) 2007-2011  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 //=======================================================================
262 // function : GEOMToolsGUI()
263 // purpose  : Constructor
264 //=======================================================================
265 GEOMToolsGUI::GEOMToolsGUI( GeometryGUI* parent )
266 : GEOMGUI( parent )
267 {
268 }
269
270
271 //=======================================================================
272 // function : ~GEOMToolsGUI()
273 // purpose  : Destructor
274 //=======================================================================
275 GEOMToolsGUI::~GEOMToolsGUI()
276 {
277 }
278
279
280 //=======================================================================
281 // function : OnGUIEvent()
282 // purpose  :
283 //=======================================================================
284 bool GEOMToolsGUI::OnGUIEvent(int theCommandID, SUIT_Desktop* parent)
285 {
286   getGeometryGUI()->EmitSignalDeactivateDialog();
287
288   switch ( theCommandID ) {
289   case GEOMOp::OpDelete:         // EDIT - DELETE
290     OnEditDelete();
291     break;
292   case GEOMOp::OpImport:         // FILE - IMPORT
293     Import();
294     break;
295   case GEOMOp::OpExport:         // FILE - EXPORT
296     Export();
297     break;
298   case GEOMOp::OpCheckGeom:      // TOOLS - CHECK GEOMETRY
299     OnCheckGeometry();
300     break;
301   case GEOMOp::OpSelectVertex:   // POPUP - SELECT ONLY - VERTEX
302     OnSelectOnly( GEOM_POINT );
303     break;
304   case GEOMOp::OpSelectEdge:     // POPUP - SELECT ONLY - EDGE
305     OnSelectOnly( GEOM_EDGE );
306     break;
307   case GEOMOp::OpSelectWire:     // POPUP - SELECT ONLY - WIRE
308     OnSelectOnly( GEOM_WIRE );
309     break;
310   case GEOMOp::OpSelectFace:     // POPUP - SELECT ONLY - FACE
311     OnSelectOnly( GEOM_FACE );
312     break;
313   case GEOMOp::OpSelectShell:    // POPUP - SELECT ONLY - SHELL
314     OnSelectOnly( GEOM_SHELL );
315     break;
316   case GEOMOp::OpSelectSolid:    // POPUP - SELECT ONLY - SOLID
317     OnSelectOnly( GEOM_SOLID );
318     break;
319   case GEOMOp::OpSelectCompound: // POPUP - SELECT ONLY - COMPOUND
320     OnSelectOnly( GEOM_COMPOUND );
321     break;
322   case GEOMOp::OpSelectAll:      // POPUP - SELECT ONLY - SELECT ALL
323     OnSelectOnly( GEOM_ALLOBJECTS );
324     break;
325   case GEOMOp::OpDeflection:     // POPUP - DEFLECTION ANGLE
326     OnDeflection();
327     break;
328   case GEOMOp::OpColor:          // POPUP - COLOR
329     OnColor();
330     break;
331   case GEOMOp::OpSetTexture:        // POPUP - TEXTURE
332     OnTexture();
333     break;
334   case GEOMOp::OpTransparency:   // POPUP - TRANSPARENCY
335     OnTransparency();
336     break;
337   case GEOMOp::OpIncrTransparency: // SHORTCUT   - INCREASE TRANSPARENCY
338     OnChangeTransparency( true );
339     break;
340   case GEOMOp::OpDecrTransparency: // SHORTCUT   - DECREASE TRANSPARENCY
341     OnChangeTransparency( false );
342     break;
343   case GEOMOp::OpIsos:           // POPUP - ISOS
344     OnNbIsos();
345     break;
346   case GEOMOp::OpIncrNbIsos:     // SHORTCUT   - INCREASE NB ISOLINES
347     OnNbIsos( INCR );
348     break;
349   case GEOMOp::OpDecrNbIsos:     // SHORTCUT   - DECREASE NB ISOLINES
350     OnNbIsos( DECR );
351     break;
352   case GEOMOp::OpMaterialProperties: // POPUP - MATERIAL PROPERTIES
353     OnMaterialProperties();
354     break;
355   case GEOMOp::OpAutoColor:      // POPUP - AUTO COLOR
356     OnAutoColor();
357     break;
358   case GEOMOp::OpNoAutoColor:    // POPUP - DISABLE AUTO COLOR
359     OnDisableAutoColor();
360     break;
361   case GEOMOp::OpShowChildren:   // POPUP - SHOW CHILDREN
362   case GEOMOp::OpHideChildren:   // POPUP - HIDE CHILDREN
363     OnShowHideChildren( theCommandID == GEOMOp::OpShowChildren );
364     break;
365   case GEOMOp::OpPointMarker:    // POPUP - POINT MARKER
366     OnPointMarker();
367     break;
368   case GEOMOp::OpUnpublishObject:// POPUP - UNPUBLISH
369     OnUnpublishObject();
370     break;
371   case GEOMOp::OpPublishObject:// GEOM ROOT OBJECT - POPUP - PUBLISH
372     OnPublishObject();
373     break;
374   default:
375     SUIT_Session::session()->activeApplication()->putInfo(tr("GEOM_PRP_COMMAND").arg(theCommandID));
376     break;
377   }
378   return true;
379 }
380
381
382 //===============================================================================
383 // function : OnEditDelete()
384 // purpose  :
385 //===============================================================================
386 void GEOMToolsGUI::OnEditDelete()
387 {
388   SALOME_ListIO selected;
389   SalomeApp_Application* app =
390     dynamic_cast< SalomeApp_Application* >( SUIT_Session::session()->activeApplication() );
391   if ( !app )
392     return;
393
394   LightApp_SelectionMgr* aSelMgr = app->selectionMgr();
395   SalomeApp_Study* appStudy = dynamic_cast<SalomeApp_Study*>( app->activeStudy() );
396   if ( !aSelMgr || !appStudy )
397     return;
398
399   // get selection
400   aSelMgr->selectedObjects( selected, "ObjectBrowser", false );
401   if ( selected.IsEmpty() )
402     return;
403
404   _PTR(Study) aStudy = appStudy->studyDS();
405   
406   // check if study is locked
407   if ( _PTR(AttributeStudyProperties)( aStudy->GetProperties() )->IsLocked() ) {
408     SUIT_MessageBox::warning( app->desktop(),
409                               tr("WRN_WARNING"),
410                               tr("WRN_STUDY_LOCKED") );
411     return; // study is locked
412   }
413   
414   // get GEOM component
415   CORBA::String_var geomIOR = app->orb()->object_to_string( GeometryGUI::GetGeomGen() );
416   QString geomComp = getParentComponent( aStudy->FindObjectIOR( geomIOR.in() ) );
417
418   // check each selected object: if belongs to GEOM, if not reference...
419   QMap<QString,QString> toBeDeleted;
420   QMap<QString,QString> allDeleted;
421   bool isComponentSelected = false;
422   
423   for ( SALOME_ListIteratorOfListIO It( selected ); It.More(); It.Next() ) {
424     Handle(SALOME_InteractiveObject) anIObject = It.Value();
425     if ( !anIObject->hasEntry() )
426       continue; // invalid object
427     // ...
428     QString entry = anIObject->getEntry();
429     _PTR(SObject) obj = aStudy->FindObjectID( entry.toLatin1().data() );
430     // check parent component
431     QString parentComp = getParentComponent( obj );
432     if ( parentComp != geomComp )  {
433       SUIT_MessageBox::warning( app->desktop(),
434                                 QObject::tr("ERR_ERROR"),
435                                 QObject::tr("NON_GEOM_OBJECTS_SELECTED").arg( getGeometryGUI()->moduleName() ) );
436       return; // not GEOM object selected
437     }
438
439     ///////////////////////////////////////////////////////
440     // if GEOM component is selected, so skip other checks
441     if ( isComponentSelected ) continue; 
442     ///////////////////////////////////////////////////////
443         
444     // check if object is reference
445     _PTR(SObject) refobj;
446     if ( obj && obj->ReferencedObject( refobj ) ) {
447       // get the main object by reference IPAL 21354
448       obj = refobj;
449       entry = obj->GetID().c_str();
450     }
451     // ...
452     QString aName = obj->GetName().c_str();
453     if ( entry == geomComp ) {
454       // GEOM component is selected, skip other checks
455       isComponentSelected = true;
456       continue;
457     }
458     toBeDeleted.insert( entry, aName );
459     allDeleted.insert( entry, aName ); // skip GEOM component
460     // browse through all children recursively
461     _PTR(ChildIterator) it ( aStudy->NewChildIterator( obj ) );
462     for ( it->InitEx( true ); it->More(); it->Next() ) {
463       _PTR(SObject) child( it->Value() );
464       if ( child && child->ReferencedObject( refobj ) )
465         continue; // skip references
466       aName = child->GetName().c_str();
467       if ( !aName.isEmpty() )
468         allDeleted.insert( child->GetID().c_str(), aName );
469     }
470   }
471   
472   // is there is anything to delete?
473   if ( !isComponentSelected && allDeleted.count() <= 0 )
474     return; // nothing to delete
475
476   // show confirmation dialog box
477   GEOMToolsGUI_DeleteDlg dlg( app->desktop(), allDeleted, isComponentSelected );
478   if ( !dlg.exec() )
479     return; // operation is cancelled by user
480   
481   // get currently opened views
482   QList<SALOME_View*> views;
483   SALOME_View* view;
484   ViewManagerList vmans = app->viewManagers();
485   SUIT_ViewManager* vman;
486   foreach ( vman, vmans ) {
487     SUIT_ViewModel* vmod = vman->getViewModel();
488     view = dynamic_cast<SALOME_View*> ( vmod ); // must work for OCC and VTK views
489     if ( view )
490       views.append( view );
491   }
492   
493   _PTR(StudyBuilder) aStudyBuilder (aStudy->NewBuilder());
494   GEOM_Displayer* disp = new GEOM_Displayer( appStudy );
495   
496   if ( isComponentSelected ) {
497     // GEOM component is selected: delete all objects recursively
498     _PTR(SObject) comp = aStudy->FindObjectID( geomComp.toLatin1().data() );
499     if ( !comp )
500       return;
501     _PTR(ChildIterator) it ( aStudy->NewChildIterator( comp ) );
502     // remove top-level objects only
503     for ( it->InitEx( false ); it->More(); it->Next() ) {
504       _PTR(SObject) child( it->Value() );
505       // remove object from GEOM engine
506       removeObjectWithChildren( child, aStudy, views, disp );
507       // remove object from study
508       aStudyBuilder->RemoveObjectWithChildren( child );
509     }
510   }
511   else {
512     // GEOM component is not selected: check if selected objects are in use
513     if ( inUse( aStudy, geomComp, allDeleted ) ) {
514       SUIT_MessageBox::warning( app->desktop(),
515                                 QObject::tr("WRN_WARNING"),
516                                 QObject::tr("DEP_OBJECT") );
517       return; // object(s) in use
518     }
519     // ... and then delete all objects
520     QMap<QString, QString>::Iterator it;
521     for ( it = toBeDeleted.begin(); it != toBeDeleted.end(); ++it ) {
522       _PTR(SObject) obj ( aStudy->FindObjectID( it.key().toLatin1().data() ) );
523       // remove object from GEOM engine
524       removeObjectWithChildren( obj, aStudy, views, disp );
525       // remove objects from study
526       aStudyBuilder->RemoveObjectWithChildren( obj );      
527     }
528   }
529
530   
531   
532   selected.Clear();
533   aSelMgr->setSelectedObjects( selected );
534   getGeometryGUI()->updateObjBrowser();
535   app->updateActions(); //SRN: To update a Save button in the toolbar
536 }
537
538 //=====================================================================================
539 // function : Import
540 // purpose  : BRep, Iges, Step, ...
541 //=====================================================================================
542 bool GEOMToolsGUI::Import()
543 {
544   SalomeApp_Application* app = dynamic_cast< SalomeApp_Application* >( getGeometryGUI()->getApp() );
545   if ( !app ) return false;
546
547   SalomeApp_Study* stud = dynamic_cast<SalomeApp_Study*> ( app->activeStudy() );
548   if ( !stud ) {
549     MESSAGE ( "FAILED to cast active study to SalomeApp_Study" );
550     return false;
551   }
552   _PTR(Study) aStudy = stud->studyDS();
553
554   // check if study is locked
555   bool aLocked = (_PTR(AttributeStudyProperties)(aStudy->GetProperties()))->IsLocked();
556   if ( aLocked ) {
557     SUIT_MessageBox::warning( app->desktop(),
558                               QObject::tr("WRN_WARNING"),
559                               QObject::tr("WRN_STUDY_LOCKED") );
560     return false;
561   }
562
563   // check if GEOM engine is available
564   GEOM::GEOM_Gen_var eng = GeometryGUI::GetGeomGen();
565   if ( CORBA::is_nil( eng ) ) {
566     SUIT_MessageBox::critical( app->desktop(),
567                                QObject::tr("WRN_WARNING"),
568                                QObject::tr( "GEOM Engine is not started" ) );
569     return false;
570   }
571
572   GEOM::GEOM_IInsertOperations_var aInsOp = eng->GetIInsertOperations( aStudy->StudyId() );
573   if ( aInsOp->_is_nil() )
574     return false;
575
576   // obtain a list of available import formats
577   FilterMap aMap;
578   GEOM::string_array_var aFormats, aPatterns;
579   aInsOp->ImportTranslators( aFormats, aPatterns );
580
581   for ( int i = 0, n = aFormats->length(); i < n; i++ )
582     aMap.insert( (char*)aPatterns[i], (char*)aFormats[i] );
583
584   // select files to be imported
585   QString fileType;
586   QStringList fileNames = getFileNames( app->desktop(), "", aMap,
587                                         tr( "GEOM_MEN_IMPORT" ), fileType, true );
588
589   // set Wait cursor
590   SUIT_OverrideCursor wc;
591
592   if ( fileNames.count() == 0 )
593     return false; // nothing selected, return
594
595   QStringList errors;
596
597   QList< GEOM::GEOM_Object_var > objsForDisplay;
598
599   QStringList anEntryList;
600
601   // iterate through all selected files
602
603   SUIT_MessageBox::StandardButton igesAnswer = SUIT_MessageBox::NoButton;
604   SUIT_MessageBox::StandardButton acisAnswer = SUIT_MessageBox::NoButton;
605
606   for ( int i = 0; i < fileNames.count(); i++ ) {
607     QString fileName = fileNames[i];
608
609     if ( fileName.isEmpty() )
610       continue;
611
612     QString aCurrentType;
613     if ( fileType.isEmpty() ) {
614       // file type is not defined, try to detect
615       QString ext = QFileInfo( fileName ).suffix().toUpper();
616       QRegExp re( "\\*\\.(\\w+)" );
617       for ( FilterMap::const_iterator it = aMap.begin(); 
618             it != aMap.end() && aCurrentType.isEmpty(); ++it ) {
619         int pos = 0;
620         while ( re.indexIn( it.key(), pos ) >= 0 ) {
621           QString f = re.cap(1).trimmed().toUpper();
622           if ( ext == f ) { aCurrentType = it.value(); break; }
623           pos = re.pos() + re.cap(1).length() + 2;
624         }
625       }
626     }
627     else {
628       aCurrentType = fileType;
629     }
630
631     if ( aCurrentType.isEmpty() ) {
632       errors.append( QString( "%1 : %2" ).arg( fileName ).arg( tr( "GEOM_UNSUPPORTED_TYPE" ) ) );
633       continue;
634     }
635
636     GEOM_Operation* anOp = new GEOM_Operation( app, aInsOp.in() );
637     try {
638       app->putInfo( tr( "GEOM_PRP_LOADING" ).arg( SUIT_Tools::file( fileName, /*withExten=*/true ) ) );
639       anOp->start();
640
641       CORBA::String_var fileN = fileName.toLatin1().constData();
642       CORBA::String_var fileT = aCurrentType.toLatin1().constData();
643
644       // skl 29.05.2009
645       if ( aCurrentType == "IGES" ) {
646         GEOM::GEOM_Object_var anObj = aInsOp->ImportFile( fileN, "IGES_UNIT" );
647         bool needConvert = false;
648         TCollection_AsciiString aUnitName = aInsOp->GetErrorCode();
649         if ( aUnitName.SubString( 1, 4 ) == "UNIT" )
650           needConvert = aUnitName.SubString( 6, aUnitName.Length() ) != "M";
651
652         if ( needConvert ) {
653           if ( igesAnswer == SUIT_MessageBox::NoToAll ) {
654             // converting for all files is already approved
655             fileT = "IGES_SCALE";
656           }
657           else if ( igesAnswer != SUIT_MessageBox::YesToAll ) {
658             SUIT_MessageBox::StandardButtons btns = SUIT_MessageBox::Yes | SUIT_MessageBox::No;
659             if ( i < fileNames.count()-1 ) btns = btns | SUIT_MessageBox::YesToAll | SUIT_MessageBox::NoToAll;
660             igesAnswer = SUIT_MessageBox::question( app->desktop(),
661                                                     "Question",//tr("WRN_WARNING"),
662                                                     tr("GEOM_SCALE_DIMENSIONS"),
663                                                     btns | SUIT_MessageBox::Cancel,
664                                                     SUIT_MessageBox::No );
665             switch ( igesAnswer ) {
666             case SUIT_MessageBox::Cancel:
667               return false;                // cancel (break) import operation
668             case SUIT_MessageBox::Yes:
669             case SUIT_MessageBox::YesToAll:
670               break;                       // scaling is confirmed
671             case SUIT_MessageBox::No:
672             case SUIT_MessageBox::NoAll:
673               fileT = "IGES_SCALE";
674             default:
675               break;                       // scaling is rejected
676             } // switch ( igesAnswer )
677           } // if ( igeAnswer != NoToAll )
678         } // if ( needConvert )
679       } // if ( aCurrentType == "IGES" )
680       else if ( aCurrentType == "ACIS" ) {
681         if ( acisAnswer != SUIT_MessageBox::YesToAll && acisAnswer != SUIT_MessageBox::NoToAll ) {
682           SUIT_MessageBox::StandardButtons btns = SUIT_MessageBox::Yes | SUIT_MessageBox::No;
683           if ( i < fileNames.count()-1 ) btns = btns | SUIT_MessageBox::YesToAll | SUIT_MessageBox::NoToAll;
684           acisAnswer = SUIT_MessageBox::question( app->desktop(),
685                                                   "Question",//tr("WRN_WARNING"),
686                                                   tr("GEOM_PUBLISH_NAMED_SHAPES"),
687                                                   btns | SUIT_MessageBox::Cancel,
688                                                   SUIT_MessageBox::No );
689           if ( acisAnswer == SUIT_MessageBox::Cancel )
690             return false; // cancel (break) import operation
691         } // if ( acisAnswer != YesToAll && acisAnswer != NoToAll )
692       } // else if ( aCurrentType == "ACIS" )
693       
694       GEOM::GEOM_Object_var anObj = aInsOp->ImportFile( fileN, fileT );
695
696       if ( !anObj->_is_nil() && aInsOp->IsDone() ) {
697         QString aPublishObjName = 
698           GEOMBase::GetDefaultName( SUIT_Tools::file( fileName, /*withExten=*/true ) );
699         
700         SALOMEDS::Study_var aDSStudy = GeometryGUI::ClientStudyToStudy( aStudy );
701         SALOMEDS::SObject_var aSO = GeometryGUI::GetGeomGen()->PublishInStudy( aDSStudy,
702                                                                                SALOMEDS::SObject::_nil(),
703                                                                                anObj,
704                                                                                aPublishObjName.toLatin1().constData() );
705         if( ( !aSO->_is_nil() ) )
706           anEntryList.append( aSO->GetID() );
707         
708         objsForDisplay.append( anObj );
709         
710         if ( aCurrentType == "ACIS" ) {
711           if ( acisAnswer == SUIT_MessageBox::Yes || acisAnswer == SUIT_MessageBox::YesToAll )
712             GeometryGUI::GetGeomGen()->PublishNamedShapesInStudy( aDSStudy, anObj );
713         }
714
715         anOp->commit();
716       }
717       else {
718         anOp->abort();
719         errors.append( QString( "%1 : %2" ).arg( fileName ).arg( aInsOp->GetErrorCode() ) );
720       }
721     }
722     catch( const SALOME::SALOME_Exception& S_ex ) {
723       anOp->abort();
724       errors.append( QString( "%1 : %2" ).arg( fileName ).arg( tr( "GEOM_UNKNOWN_IMPORT_ERROR" ) ) );
725     }
726   }
727
728   // update object browser
729   getGeometryGUI()->updateObjBrowser( true );
730
731   // browse published objects
732   app->browseObjects( anEntryList );
733
734   // display imported model (if only one file is selected)
735   if ( objsForDisplay.count() == 1 )
736     GEOM_Displayer( stud ).Display( objsForDisplay[0].in() );
737
738   if ( errors.count() > 0 ) {
739     SUIT_MessageBox::critical( app->desktop(),
740                                QObject::tr( "GEOM_ERROR" ),
741                                QObject::tr( "GEOM_IMPORT_ERRORS" ) + "\n" + errors.join( "\n" ) );
742   }
743
744   app->updateActions(); //SRN: To update a Save button in the toolbar
745
746   return objsForDisplay.count() > 0;
747 }
748
749
750 //=====================================================================================
751 // function : Export
752 // purpose  : BRep, Iges, Step
753 //=====================================================================================
754 bool GEOMToolsGUI::Export()
755 {
756   SalomeApp_Application* app = getGeometryGUI()->getApp();
757   if (!app) return false;
758
759   SalomeApp_Study* stud = dynamic_cast<SalomeApp_Study*> ( app->activeStudy() );
760   if ( !stud ) {
761     MESSAGE ( "FAILED to cast active study to SalomeApp_Study" );
762     return false;
763   }
764   _PTR(Study) aStudy = stud->studyDS();
765
766   GEOM::GEOM_Gen_var eng = GeometryGUI::GetGeomGen();
767   if ( CORBA::is_nil( eng ) ) {
768     SUIT_MessageBox::critical( app->desktop(),
769                                QObject::tr("WRN_WARNING"),
770                                QObject::tr( "GEOM Engine is not started" ) );
771     return false;
772   }
773
774   GEOM::GEOM_IInsertOperations_var aInsOp = eng->GetIInsertOperations( aStudy->StudyId() );
775   if ( aInsOp->_is_nil() )
776     return false;
777
778   // Obtain a list of available export formats
779   FilterMap aMap;
780   QStringList filters;
781   GEOM::string_array_var aFormats, aPatterns;
782   aInsOp->ExportTranslators( aFormats, aPatterns );
783   for ( int i = 0, n = aFormats->length(); i < n; i++ ) {
784     aMap.insert( (char*)aPatterns[i], (char*)aFormats[i] );
785     filters.push_back( (char*)aPatterns[i] );
786   }
787
788   // Get selected objects
789   LightApp_SelectionMgr* sm = app->selectionMgr();
790   if ( !sm )
791     return false;
792
793   SALOME_ListIO selectedObjects;
794   sm->selectedObjects( selectedObjects );
795   bool appropriateObj = false;
796
797   SALOME_ListIteratorOfListIO It( selectedObjects );
798   for(;It.More();It.Next()) {
799     Handle(SALOME_InteractiveObject) IObject = It.Value();
800     GEOM::GEOM_Object_var anObj = GEOMBase::ConvertIOinGEOMObject( IObject );
801
802     if ( anObj->_is_nil() )
803       continue;
804
805     QString fileType;
806     QString file = getFileName(app->desktop(), QString( IObject->getName() ), aMap, filters,
807                                tr("GEOM_MEN_EXPORT"), false, fileType, true);
808
809     // User has pressed "Cancel" --> stop the operation
810     if ( file.isEmpty() || fileType.isEmpty() )
811       return false;
812
813     GEOM_Operation* anOp = new GEOM_Operation( app, aInsOp.in() );
814     try {
815       SUIT_OverrideCursor wc;
816
817       app->putInfo( tr("GEOM_PRP_EXPORT").arg(SUIT_Tools::file( file, /*withExten=*/true )) );
818
819       anOp->start();
820
821
822       aInsOp->Export( anObj, file.toStdString().c_str(), fileType.toLatin1().constData() );
823
824       if ( aInsOp->IsDone() )
825         anOp->commit();
826       else
827         {
828           anOp->abort();
829           wc.suspend();
830           SUIT_MessageBox::critical( app->desktop(),
831                                      QObject::tr( "GEOM_ERROR" ),
832                                      QObject::tr("GEOM_PRP_ABORT") + "\n" + QString( aInsOp->GetErrorCode() ) );
833           return false;
834         }
835     }
836     catch (const SALOME::SALOME_Exception& S_ex) {
837       //QtCatchCorbaException(S_ex);
838       anOp->abort();
839       return false;
840     }
841     appropriateObj = true;
842   }
843
844   if ( !appropriateObj )
845     SUIT_MessageBox::warning( app->desktop(),
846                               QObject::tr("WRN_WARNING"),
847                               QObject::tr("GEOM_WRN_NO_APPROPRIATE_SELECTION") );
848   return true;
849 }
850
851 //=====================================================================================
852 // function : RemoveObjectWithChildren
853 // purpose  : used by OnEditDelete() method
854 //=====================================================================================
855 void GEOMToolsGUI::removeObjectWithChildren(_PTR(SObject) obj,
856                                             _PTR(Study) aStudy,
857                                             QList<SALOME_View*> views,
858                                             GEOM_Displayer* disp)
859 {
860   // iterate through all children of obj
861   for (_PTR(ChildIterator) it (aStudy->NewChildIterator(obj)); it->More(); it->Next()) {
862     _PTR(SObject) child (it->Value());
863     removeObjectWithChildren(child, aStudy, views, disp);
864   }
865
866   // erase object and remove it from engine
867   _PTR(GenericAttribute) anAttr;
868   if (obj->FindAttribute(anAttr, "AttributeIOR")) {
869     _PTR(AttributeIOR) anIOR (anAttr);
870     
871     SalomeApp_Study* appStudy = dynamic_cast<SalomeApp_Study*>( SUIT_Session::session()->activeApplication()->activeStudy() );
872
873     // Delete shape in Client
874     const TCollection_AsciiString ASCIor ((char*)anIOR->Value().c_str());
875     getGeometryGUI()->GetShapeReader().RemoveShapeFromBuffer(ASCIor);
876
877     CORBA::Object_var corbaObj = GeometryGUI::ClientSObjectToObject(obj);
878     GEOM::GEOM_Object_var geomObj = GEOM::GEOM_Object::_narrow( corbaObj );
879     if (!CORBA::is_nil(geomObj)) {
880       
881       //Remove visual properties of the object
882       appStudy->removeObjectFromAll(obj->GetID().c_str());
883       
884       // Erase graphical object
885       QListIterator<SALOME_View*> it( views );
886       while ( it.hasNext() )
887         if ( SALOME_View* view = it.next() )
888           disp->Erase(geomObj, true, view);
889       
890       // Remove object from Engine
891       // We can't directly remove object from engine. All we can do is to unpublish the object
892       // from the study. Another client could be using the object.
893       // Unpublishing is done just after in aStudyBuilder->RemoveObjectWithChildren( child );
894       //GeometryGUI::GetGeomGen()->RemoveObject( geomObj );
895     }
896   }
897 }
898
899 //=================================================================================
900 // function : deactivate()
901 // purpose  : Called when GEOM component is deactivated
902 //=================================================================================
903 void GEOMToolsGUI::deactivate()
904 {
905   SalomeApp_Application* app = dynamic_cast< SalomeApp_Application* >( SUIT_Session::session()->activeApplication() );
906   if ( app ) {
907     SalomeApp_Study* appStudy = dynamic_cast<SalomeApp_Study*>( app->activeStudy() );
908     GEOM_Displayer aDisp (appStudy);
909     aDisp.GlobalSelection();
910     getGeometryGUI()->setLocalSelectionMode(GEOM_ALLOBJECTS);
911   }
912 }
913
914 //=====================================================================================
915 // EXPORTED METHODS
916 //=====================================================================================
917 extern "C"
918 {
919 #ifdef WIN32
920   __declspec( dllexport )
921 #endif
922   GEOMGUI* GetLibGUI( GeometryGUI* parent )
923   {
924     return new GEOMToolsGUI( parent );
925   }
926 }