1 // Copyright (C) 2005 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
2 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
4 // This library is free software; you can redistribute it and/or
5 // modify it under the terms of the GNU Lesser General Public
6 // License as published by the Free Software Foundation; either
7 // version 2.1 of the License.
9 // This library is distributed in the hope that it will be useful
10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 // Lesser General Public License for more details.
14 // You should have received a copy of the GNU Lesser General Public
15 // License along with this library; if not, write to the Free Software
16 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
20 // File : SALOMEDS_Study_i.cxx
21 // Author : Sergey RUIN
25 #include "utilities.h"
26 #include "SALOMEDS_Study_i.hxx"
27 #include "SALOMEDS_UseCaseIterator_i.hxx"
28 #include "SALOMEDS_GenericAttribute_i.hxx"
29 #include "SALOMEDS_AttributeStudyProperties_i.hxx"
30 #include "SALOMEDS_AttributeParameter_i.hxx"
31 #include "SALOMEDS_ChildIterator_i.hxx"
32 #include "SALOMEDS_Driver_i.hxx"
33 #include "SALOMEDS.hxx"
35 #include "SALOMEDSImpl_SObject.hxx"
36 #include "SALOMEDSImpl_SComponent.hxx"
37 #include "SALOMEDSImpl_UseCaseBuilder.hxx"
38 #include "SALOMEDSImpl_AttributeStudyProperties.hxx"
39 #include "SALOMEDSImpl_AttributeParameter.hxx"
40 #include "SALOMEDSImpl_ChildIterator.hxx"
41 #include "SALOMEDSImpl_IParameters.hxx"
43 #include <TColStd_SequenceOfExtendedString.hxx>
44 #include <TColStd_HSequenceOfAsciiString.hxx>
45 #include <TColStd_HSequenceOfTransient.hxx>
46 #include <TCollection_AsciiString.hxx>
47 #include <TCollection_ExtendedString.hxx>
49 #include <TDF_Label.hxx>
50 #include <TDF_Attribute.hxx>
55 #include <sys/types.h>
63 //============================================================================
64 /*! Function : SALOMEDS_Study_i
65 * Purpose : SALOMEDS_Study_i constructor
67 //============================================================================
68 SALOMEDS_Study_i::SALOMEDS_Study_i(const Handle(SALOMEDSImpl_Study) theImpl,
71 _orb = CORBA::ORB::_duplicate(orb);
74 _builder = new SALOMEDS_StudyBuilder_i(_impl->NewBuilder(), _orb);
77 //============================================================================
78 /*! Function : ~SALOMEDS_Study_i
79 * Purpose : SALOMEDS_Study_i destructor
81 //============================================================================
82 SALOMEDS_Study_i::~SALOMEDS_Study_i()
86 //============================================================================
87 /*! Function : GetPersistentReference
88 * Purpose : Get persistent reference of study (idem URL())
90 //============================================================================
91 char* SALOMEDS_Study_i::GetPersistentReference()
93 SALOMEDS::Locker lock;
94 return CORBA::string_dup(_impl->GetPersistentReference().ToCString());
96 //============================================================================
97 /*! Function : GetTransientReference
98 * Purpose : Get IOR of the Study (registred in OCAF document in doc->Root)
100 //============================================================================
101 char* SALOMEDS_Study_i::GetTransientReference()
103 SALOMEDS::Locker lock;
104 return CORBA::string_dup(_impl->GetTransientReference().ToCString());
107 //============================================================================
108 /*! Function : IsEmpty
109 * Purpose : Detect if study is empty
111 //============================================================================
112 CORBA::Boolean SALOMEDS_Study_i::IsEmpty()
114 SALOMEDS::Locker lock;
115 return _impl->IsEmpty();
118 //============================================================================
119 /*! Function : FindComponent
120 * Purpose : Find a Component with ComponentDataType = aComponentName
122 //============================================================================
123 SALOMEDS::SComponent_ptr SALOMEDS_Study_i::FindComponent (const char* aComponentName)
125 SALOMEDS::Locker lock;
127 Handle(SALOMEDSImpl_SComponent) aCompImpl = _impl->FindComponent(TCollection_AsciiString((char*)aComponentName));
128 if(aCompImpl.IsNull()) return SALOMEDS::SComponent::_nil();
130 SALOMEDS::SComponent_var sco = SALOMEDS_SComponent_i::New (aCompImpl, _orb);
134 //============================================================================
135 /*! Function : FindComponentID
136 * Purpose : Find a Component from it's ID
138 //============================================================================
139 SALOMEDS::SComponent_ptr SALOMEDS_Study_i::FindComponentID(const char* aComponentID)
141 SALOMEDS::Locker lock;
143 Handle(SALOMEDSImpl_SComponent) aCompImpl = _impl->FindComponentID(TCollection_AsciiString((char*)aComponentID));
144 if(aCompImpl.IsNull()) return SALOMEDS::SComponent::_nil();
146 SALOMEDS::SComponent_var sco = SALOMEDS_SComponent_i::New (aCompImpl, _orb);
150 //============================================================================
151 /*! Function : FindObject
152 * Purpose : Find an Object with SALOMEDS::Name = anObjectName
154 //============================================================================
155 SALOMEDS::SObject_ptr SALOMEDS_Study_i::FindObject(const char* anObjectName)
157 SALOMEDS::Locker lock;
159 Handle(SALOMEDSImpl_SObject) aSO = _impl->FindObject(TCollection_AsciiString((char*)anObjectName));
160 if(aSO.IsNull()) return SALOMEDS::SObject::_nil();
162 if(aSO->DynamicType() == STANDARD_TYPE(SALOMEDSImpl_SComponent)) {
163 Handle(SALOMEDSImpl_SComponent) aSCO = Handle(SALOMEDSImpl_SComponent)::DownCast(aSO);
164 SALOMEDS::SComponent_var sco = SALOMEDS_SComponent_i::New (aSCO, _orb);
168 SALOMEDS::SObject_var so = SALOMEDS_SObject_i::New (aSO, _orb);
173 //============================================================================
174 /*! Function : FindObjectID
175 * Purpose : Find an Object with ID = anObjectID
177 //============================================================================
178 SALOMEDS::SObject_ptr SALOMEDS_Study_i::FindObjectID(const char* anObjectID)
180 SALOMEDS::Locker lock;
182 Handle(SALOMEDSImpl_SObject) aSO = _impl->FindObjectID(TCollection_AsciiString((char*)anObjectID));
183 if(aSO.IsNull()) return SALOMEDS::SObject::_nil();
184 SALOMEDS::SObject_var so = SALOMEDS_SObject_i::New (aSO, _orb);
188 //============================================================================
189 /*! Function : CreateObjectID
190 * Purpose : Creates an Object with ID = anObjectID
192 //============================================================================
193 SALOMEDS::SObject_ptr SALOMEDS_Study_i::CreateObjectID(const char* anObjectID)
195 SALOMEDS::Locker lock;
197 Handle(SALOMEDSImpl_SObject) aSO = _impl->CreateObjectID((char*)anObjectID);
198 if(aSO.IsNull()) return SALOMEDS::SObject::_nil();
200 SALOMEDS::SObject_var so = SALOMEDS_SObject_i::New (aSO, _orb);
204 //============================================================================
205 /*! Function : FindObjectByName
206 * Purpose : Find Objects with SALOMEDS::Name = anObjectName in a Component
207 * : with ComponentDataType = aComponentName
209 //============================================================================
210 SALOMEDS::Study::ListOfSObject* SALOMEDS_Study_i::FindObjectByName( const char* anObjectName,
211 const char* aComponentName )
213 SALOMEDS::Locker lock;
215 Handle(TColStd_HSequenceOfTransient) aSeq = _impl->FindObjectByName(TCollection_AsciiString((char*)anObjectName),
216 TCollection_AsciiString((char*)aComponentName));
217 int aLength = aSeq->Length();
218 SALOMEDS::Study::ListOfSObject_var listSO = new SALOMEDS::Study::ListOfSObject ;
219 listSO->length(aLength);
220 for(int i = 1; i<=aLength; i++) {
221 Handle(SALOMEDSImpl_SObject) aSO = Handle(SALOMEDSImpl_SObject)::DownCast(aSeq->Value(i));
222 SALOMEDS::SObject_var so = SALOMEDS_SObject_i::New (aSO, _orb);
225 return listSO._retn() ;
228 //============================================================================
229 /*! Function : FindObjectIOR
230 * Purpose : Find an Object with IOR = anObjectIOR
232 //============================================================================
233 SALOMEDS::SObject_ptr SALOMEDS_Study_i::FindObjectIOR(const char* anObjectIOR)
235 SALOMEDS::Locker lock;
237 Handle(SALOMEDSImpl_SObject) aSO = _impl->FindObjectIOR(TCollection_AsciiString((char*)anObjectIOR));
238 if(aSO.IsNull()) return SALOMEDS::SObject::_nil();
240 SALOMEDS::SObject_var so = SALOMEDS_SObject_i::New (aSO, _orb);
244 //============================================================================
245 /*! Function : FindObjectByPath
246 * Purpose : Find an Object by its path = thePath
248 //============================================================================
249 SALOMEDS::SObject_ptr SALOMEDS_Study_i::FindObjectByPath(const char* thePath)
251 SALOMEDS::Locker lock;
253 Handle(SALOMEDSImpl_SObject) aSO = _impl->FindObjectByPath(TCollection_AsciiString((char*)thePath));
254 if(aSO.IsNull()) return SALOMEDS::SObject::_nil();
256 SALOMEDS::SObject_var so = SALOMEDS_SObject_i::New (aSO, _orb);
260 //============================================================================
261 /*! Function : GetObjectPath
264 //============================================================================
265 char* SALOMEDS_Study_i::GetObjectPath(CORBA::Object_ptr theObject)
267 SALOMEDS::Locker lock;
269 TCollection_AsciiString aPath("");
270 if(CORBA::is_nil(theObject)) return CORBA::string_dup(aPath.ToCString());
271 Handle(SALOMEDSImpl_SObject) aSO;
272 SALOMEDS::SObject_var aSObj = SALOMEDS::SObject::_narrow(theObject);
274 if(!CORBA::is_nil(aSObj)) {
275 aSO = _impl->FindObjectID(aSObj->GetID());
278 aSO = _impl->FindObjectIOR(_orb->object_to_string(theObject));
281 if(aSO.IsNull()) return CORBA::string_dup(aPath.ToCString());
283 aPath = _impl->GetObjectPath(aSO);
284 return CORBA::string_dup(aPath.ToCString());
288 //============================================================================
289 /*! Function : SetContext
290 * Purpose : Sets the current context
292 //============================================================================
293 void SALOMEDS_Study_i::SetContext(const char* thePath)
295 SALOMEDS::Locker lock;
297 _impl->SetContext(TCollection_AsciiString((char*)thePath));
298 if(_impl->IsError() && _impl->GetErrorCode() == "InvalidContext")
299 throw SALOMEDS::Study::StudyInvalidContext();
302 //============================================================================
303 /*! Function : GetContext
304 * Purpose : Gets the current context
306 //============================================================================
307 char* SALOMEDS_Study_i::GetContext()
309 SALOMEDS::Locker lock;
311 if(!_impl->HasCurrentContext()) throw SALOMEDS::Study::StudyInvalidContext();
312 return CORBA::string_dup(_impl->GetContext().ToCString());
315 //============================================================================
316 /*! Function : GetObjectNames
317 * Purpose : method to get all object names in the given context (or in the current context, if 'theContext' is empty)
319 //============================================================================
320 SALOMEDS::ListOfStrings* SALOMEDS_Study_i::GetObjectNames(const char* theContext)
322 SALOMEDS::Locker lock;
324 SALOMEDS::ListOfStrings_var aResult = new SALOMEDS::ListOfStrings;
325 if (strlen(theContext) == 0 && !_impl->HasCurrentContext()) throw SALOMEDS::Study::StudyInvalidContext();
326 Handle(TColStd_HSequenceOfAsciiString) aSeq = _impl->GetObjectNames(TCollection_AsciiString((char*)theContext));
327 int aLength = aSeq->Length();
328 aResult->length(aLength);
329 for(int anIndex = 1; anIndex <= aLength; anIndex++) {
330 aResult[anIndex-1] = CORBA::string_dup(TCollection_AsciiString(aSeq->Value(anIndex)).ToCString());
332 return aResult._retn();
335 //============================================================================
336 /*! Function : GetDirectoryNames
337 * Purpose : method to get all directory names in the given context (or in the current context, if 'theContext' is empty)
339 //============================================================================
340 SALOMEDS::ListOfStrings* SALOMEDS_Study_i::GetDirectoryNames(const char* theContext)
342 SALOMEDS::Locker lock;
344 SALOMEDS::ListOfStrings_var aResult = new SALOMEDS::ListOfStrings;
345 if (strlen(theContext) == 0 && !_impl->HasCurrentContext()) throw SALOMEDS::Study::StudyInvalidContext();
346 Handle(TColStd_HSequenceOfAsciiString) aSeq = _impl->GetDirectoryNames(TCollection_AsciiString((char*)theContext));
347 int aLength = aSeq->Length();
348 aResult->length(aLength);
349 for(int anIndex = 1; anIndex <= aLength; anIndex++) {
350 aResult[anIndex-1] = CORBA::string_dup(TCollection_AsciiString(aSeq->Value(anIndex)).ToCString());
352 return aResult._retn();
355 //============================================================================
356 /*! Function : GetFileNames
357 * Purpose : method to get all file names in the given context (or in the current context, if 'theContext' is empty)
359 //============================================================================
360 SALOMEDS::ListOfStrings* SALOMEDS_Study_i::GetFileNames(const char* theContext)
362 SALOMEDS::Locker lock;
364 SALOMEDS::ListOfStrings_var aResult = new SALOMEDS::ListOfStrings;
365 if (strlen(theContext) == 0 && !_impl->HasCurrentContext()) throw SALOMEDS::Study::StudyInvalidContext();
366 Handle(TColStd_HSequenceOfAsciiString) aSeq = _impl->GetFileNames(TCollection_AsciiString((char*)theContext));
367 int aLength = aSeq->Length();
368 aResult->length(aLength);
369 for(int anIndex = 1; anIndex <= aLength; anIndex++) {
370 aResult[anIndex-1] = CORBA::string_dup(TCollection_AsciiString(aSeq->Value(anIndex)).ToCString());
372 return aResult._retn();
375 //============================================================================
376 /*! Function : GetComponentNames
377 * Purpose : method to get all components names
379 //============================================================================
380 SALOMEDS::ListOfStrings* SALOMEDS_Study_i::GetComponentNames(const char* theContext)
382 SALOMEDS::Locker lock;
384 SALOMEDS::ListOfStrings_var aResult = new SALOMEDS::ListOfStrings;
385 if (strlen(theContext) == 0 && !_impl->HasCurrentContext()) throw SALOMEDS::Study::StudyInvalidContext();
386 Handle(TColStd_HSequenceOfAsciiString) aSeq = _impl->GetComponentNames(TCollection_AsciiString((char*)theContext));
387 int aLength = aSeq->Length();
388 aResult->length(aLength);
389 for(int anIndex = 1; anIndex <= aLength; anIndex++) {
390 aResult[anIndex-1] = CORBA::string_dup(TCollection_AsciiString(aSeq->Value(anIndex)).ToCString());
392 return aResult._retn();
395 //============================================================================
396 /*! Function : NewChildIterator
397 * Purpose : Create a ChildIterator from an SObject
399 //============================================================================
400 SALOMEDS::ChildIterator_ptr SALOMEDS_Study_i::NewChildIterator(SALOMEDS::SObject_ptr theSO)
402 SALOMEDS::Locker lock;
404 Handle(SALOMEDSImpl_SObject) aSO = _impl->GetSObject(theSO->GetID());
405 Handle(SALOMEDSImpl_ChildIterator) anItr = new SALOMEDSImpl_ChildIterator(aSO);
408 SALOMEDS_ChildIterator_i* it_servant = new SALOMEDS_ChildIterator_i(anItr, _orb);
409 SALOMEDS::ChildIterator_var it = SALOMEDS::ChildIterator::_narrow(it_servant->_this());
415 //============================================================================
416 /*! Function : NewComponentIterator
417 * Purpose : Create a SComponentIterator
419 //============================================================================
420 SALOMEDS::SComponentIterator_ptr SALOMEDS_Study_i::NewComponentIterator()
422 SALOMEDS::Locker lock;
423 SALOMEDS_SComponentIterator_i* _it = new SALOMEDS_SComponentIterator_i(_impl->NewComponentIterator(), _orb);
429 //============================================================================
430 /*! Function : NewBuilder
431 * Purpose : Create a StudyBuilder
433 //============================================================================
434 SALOMEDS::StudyBuilder_ptr SALOMEDS_Study_i::NewBuilder()
436 SALOMEDS::Locker lock;
437 return _builder->_this();
440 //============================================================================
442 * Purpose : get study name
444 //============================================================================
445 char* SALOMEDS_Study_i::Name()
447 SALOMEDS::Locker lock;
448 return CORBA::string_dup(_impl->Name().ToCString());
451 //============================================================================
453 * Purpose : set study name
455 //============================================================================
456 void SALOMEDS_Study_i::Name(const char* name)
458 SALOMEDS::Locker lock;
459 _impl->Name(TCollection_AsciiString((char*)name));
462 //============================================================================
463 /*! Function : IsSaved
464 * Purpose : get if study has been saved
466 //============================================================================
467 CORBA::Boolean SALOMEDS_Study_i::IsSaved()
469 SALOMEDS::Locker lock;
470 return _impl->IsSaved();
473 //============================================================================
474 /*! Function : IsSaved
475 * Purpose : set if study has been saved
477 //============================================================================
478 void SALOMEDS_Study_i::IsSaved(CORBA::Boolean save)
480 SALOMEDS::Locker lock;
481 _impl->IsSaved(save);
484 //============================================================================
485 /*! Function : IsModified
486 * Purpose : Detect if a Study has been modified since it has been saved
488 //============================================================================
489 CORBA::Boolean SALOMEDS_Study_i::IsModified()
491 SALOMEDS::Locker lock;
492 return _impl->IsModified();
495 //============================================================================
497 * Purpose : get URL of the study (persistent reference of the study)
499 //============================================================================
500 char* SALOMEDS_Study_i::URL()
502 SALOMEDS::Locker lock;
503 return CORBA::string_dup(_impl->URL().ToCString());
506 //============================================================================
508 * Purpose : set URL of the study (persistent reference of the study)
510 //============================================================================
511 void SALOMEDS_Study_i::URL(const char* url)
513 SALOMEDS::Locker lock;
514 _impl->URL(TCollection_AsciiString((char*)url));
518 CORBA::Short SALOMEDS_Study_i::StudyId()
520 SALOMEDS::Locker lock;
521 return _impl->StudyId();
524 void SALOMEDS_Study_i::StudyId(CORBA::Short id)
526 SALOMEDS::Locker lock;
530 void SALOMEDS_Study_i::UpdateIORLabelMap(const char* anIOR,const char* anEntry)
532 SALOMEDS::Locker lock;
533 _impl->UpdateIORLabelMap(TCollection_AsciiString((char*)anIOR), TCollection_AsciiString((char*)anEntry));
536 SALOMEDS::Study_ptr SALOMEDS_Study_i::GetStudy(const TDF_Label theLabel, CORBA::ORB_ptr orb)
538 SALOMEDS::Locker lock;
540 Handle(SALOMEDSImpl_AttributeIOR) Att;
541 if (theLabel.Root().FindAttribute(SALOMEDSImpl_AttributeIOR::GetID(),Att)){
542 char* IOR = CORBA::string_dup(TCollection_AsciiString(Att->Value()).ToCString());
543 CORBA::Object_var obj = orb->string_to_object(IOR);
544 SALOMEDS::Study_ptr aStudy = SALOMEDS::Study::_narrow(obj) ;
545 ASSERT(!CORBA::is_nil(aStudy));
546 return SALOMEDS::Study::_duplicate(aStudy);
548 MESSAGE("GetStudy: Problem to get study");
550 return SALOMEDS::Study::_nil();
553 void SALOMEDS_Study_i::IORUpdated(const Handle(SALOMEDSImpl_AttributeIOR) theAttribute)
555 SALOMEDS::Locker lock;
556 SALOMEDSImpl_Study::IORUpdated(theAttribute);
559 SALOMEDS::Study::ListOfSObject* SALOMEDS_Study_i::FindDependances(SALOMEDS::SObject_ptr anObject)
561 SALOMEDS::Locker lock;
563 SALOMEDS::GenericAttribute_ptr aTarget;
564 if (anObject->FindAttribute(aTarget,"AttributeTarget")) {
565 return SALOMEDS::AttributeTarget::_narrow(aTarget)->Get();
567 SALOMEDS::Study::ListOfSObject* aList = new SALOMEDS::Study::ListOfSObject;
573 SALOMEDS::AttributeStudyProperties_ptr SALOMEDS_Study_i::GetProperties()
575 SALOMEDS::Locker lock;
577 Handle(SALOMEDSImpl_AttributeStudyProperties) anAttr = _impl->GetProperties();
578 SALOMEDS_AttributeStudyProperties_i* SP = new SALOMEDS_AttributeStudyProperties_i(anAttr, _orb);
579 return SP->AttributeStudyProperties::_this();
582 char* SALOMEDS_Study_i::GetLastModificationDate()
584 SALOMEDS::Locker lock;
585 return CORBA::string_dup(_impl->GetLastModificationDate().ToCString());
588 SALOMEDS::ListOfDates* SALOMEDS_Study_i::GetModificationsDate()
590 SALOMEDS::Locker lock;
592 Handle(TColStd_HSequenceOfAsciiString) aSeq = _impl->GetModificationsDate();
593 int aLength = aSeq->Length();
594 SALOMEDS::ListOfDates_var aDates = new SALOMEDS::ListOfDates;
595 aDates->length(aLength);
597 for(int anIndex = 1; anIndex <= aLength; anIndex++) {
598 aDates[anIndex-1] = CORBA::string_dup(aSeq->Value(anIndex).ToCString());
600 return aDates._retn();
605 //============================================================================
606 /*! Function : GetUseCaseBuilder
607 * Purpose : Returns a UseCase builder
609 //============================================================================
610 SALOMEDS::UseCaseBuilder_ptr SALOMEDS_Study_i::GetUseCaseBuilder()
612 SALOMEDS::Locker lock;
613 SALOMEDS_UseCaseBuilder_i* UCBuilder = new SALOMEDS_UseCaseBuilder_i(_impl->GetUseCaseBuilder(), _orb);
614 return UCBuilder->_this();
618 //============================================================================
622 //============================================================================
623 void SALOMEDS_Study_i::Close()
625 SALOMEDS::Locker lock;
629 SALOMEDS::SComponentIterator_var itcomponent = NewComponentIterator();
631 for (; itcomponent->More(); itcomponent->Next()) {
632 SALOMEDS::SComponent_var sco = itcomponent->Value();
634 MESSAGE ( "Look for an engine for data type :"<< sco->ComponentDataType());
635 // if there is an associated Engine call its method for closing
636 CORBA::String_var IOREngine;
637 if (sco->ComponentIOR(IOREngine)) {
638 // we have found the associated engine to write the data
639 MESSAGE ( "We have found an engine for data type :"<< sco->ComponentDataType());
640 CORBA::Object_var obj = _orb->string_to_object(IOREngine);
641 if (!CORBA::is_nil(obj)) {
642 SALOMEDS::Driver_var anEngine = SALOMEDS::Driver::_narrow(obj) ;
644 if (!anEngine->_is_nil()) {
646 anEngine->Close(sco);
655 //============================================================================
656 /*! Function : AddPostponed
659 //============================================================================
660 void SALOMEDS_Study_i::AddPostponed(const char* theIOR)
662 SALOMEDS::Locker lock;
664 CORBA::Object_var obj = _orb->string_to_object(theIOR);
665 if (!CORBA::is_nil(obj)) {
666 SALOME::GenericObj_var aGeneric = SALOME::GenericObj::_narrow(obj) ;
667 if (!CORBA::is_nil(aGeneric)) _impl->AddPostponed((char*)theIOR);
671 void SALOMEDS_Study_i::AddCreatedPostponed(const char* theIOR)
673 SALOMEDS::Locker lock;
675 CORBA::Object_var obj = _orb->string_to_object(theIOR);
676 if (!CORBA::is_nil(obj)) {
677 SALOME::GenericObj_var aGeneric = SALOME::GenericObj::_narrow(obj) ;
678 if (!CORBA::is_nil(aGeneric)) _impl->AddCreatedPostponed((char*)theIOR);
682 //============================================================================
683 /*! Function : RemovePostponed
686 //============================================================================
688 void SALOMEDS_Study_i::RemovePostponed(const CORBA::Long theUndoLimit)
690 void SALOMEDS_Study_i::RemovePostponed(CORBA::Long theUndoLimit)
693 SALOMEDS::Locker lock;
695 Handle(TColStd_HSequenceOfAsciiString) aSeq = _impl->RemovePostponed(theUndoLimit);
696 int aLegth = aSeq->Length();
697 for(int i = 1; i <= aLegth; i++) {
698 TCollection_AsciiString anIOR = aSeq->Value(i);
699 //mkr : fix for bug IPAL9408 : check the length of anIOR
700 // before take value from it
701 if ( !anIOR.IsEmpty() && anIOR.Value(1) == 'c') {
702 CORBA::Object_var obj = _orb->string_to_object(anIOR.Split(1).ToCString());
703 SALOME::GenericObj_var aGeneric = SALOME::GenericObj::_narrow(obj);
704 if (!CORBA::is_nil(aGeneric)) aGeneric->Destroy();
706 else if ( !anIOR.IsEmpty() && anIOR.Value(1) == 'd') {
707 CORBA::Object_var obj = _orb->string_to_object(anIOR.Split(1).ToCString());
708 SALOME::GenericObj_var aGeneric = SALOME::GenericObj::_narrow(obj);
709 if (!CORBA::is_nil(aGeneric)) aGeneric->Destroy();
713 CORBA::Object_var obj = _orb->string_to_object(anIOR.ToCString());
714 SALOME::GenericObj_var aGeneric = SALOME::GenericObj::_narrow(obj);
715 if (!CORBA::is_nil(aGeneric)) aGeneric->Destroy();
721 //============================================================================
722 /*! Function : UndoPostponed
725 //============================================================================
727 void SALOMEDS_Study_i::UndoPostponed(const CORBA::Long theWay)
729 void SALOMEDS_Study_i::UndoPostponed(CORBA::Long theWay)
732 SALOMEDS::Locker lock;
734 _impl->UndoPostponed(theWay);
738 //============================================================================
739 /*! Function : DumpStudy
742 //============================================================================
743 CORBA::Boolean SALOMEDS_Study_i::DumpStudy(const char* thePath,
744 const char* theBaseName,
745 CORBA::Boolean isPublished)
747 SALOMEDS::Locker lock;
749 TCollection_AsciiString aPath((char*)thePath), aBaseName((char*)theBaseName);
750 SALOMEDS_DriverFactory_i* factory = new SALOMEDS_DriverFactory_i(_orb);
751 CORBA::Boolean ret = _impl->DumpStudy(aPath, aBaseName, isPublished, factory);
756 //============================================================================
757 /*! Function : GetCommonParameters
760 //============================================================================
761 SALOMEDS::AttributeParameter_ptr SALOMEDS_Study_i::GetCommonParameters(const char* theID, CORBA::Long theSavePoint)
763 SALOMEDS::Locker lock;
765 Handle(SALOMEDSImpl_AttributeParameter) anAttr = _impl->GetCommonParameters(theID, theSavePoint);
766 SALOMEDS_AttributeParameter_i* SP = new SALOMEDS_AttributeParameter_i(anAttr, _orb);
767 return SP->AttributeParameter::_this();
770 //============================================================================
771 /*! Function : GetCommonModuleParameters
774 //============================================================================
775 SALOMEDS::AttributeParameter_ptr SALOMEDS_Study_i::GetModuleParameters(const char* theID,
776 const char* theModuleName,
777 CORBA::Long theSavePoint)
779 SALOMEDS::Locker lock;
781 Handle(SALOMEDSImpl_AttributeParameter) anAttr = _impl->GetModuleParameters(theID, theModuleName, theSavePoint);
782 SALOMEDS_AttributeParameter_i* SP = new SALOMEDS_AttributeParameter_i(anAttr, _orb);
783 return SP->AttributeParameter::_this();
786 //============================================================================
787 /*! Function : GetDefaultScript
790 //============================================================================
791 char* SALOMEDS_Study_i::GetDefaultScript(const char* theModuleName, const char* theShift)
793 SALOMEDS::Locker lock;
795 string script = SALOMEDSImpl_IParameters::getDefaultScript(_impl, theModuleName, theShift);
796 return CORBA::string_dup(script.c_str());
799 //===========================================================================
801 //===========================================================================
802 CORBA::Long SALOMEDS_Study_i::GetLocalImpl(const char* theHostname, CORBA::Long thePID, CORBA::Boolean& isLocal)
805 long pid = (long)_getpid();
807 long pid = (long)getpid();
809 isLocal = (strcmp(theHostname, GetHostname().c_str()) == 0 && pid == thePID)?1:0;
810 SALOMEDSImpl_Study* local_impl = _impl.operator->();
811 return ((long)local_impl);