1 // SALOME SALOMEDS : data structure of SALOME and sources of Salome data server
3 // Copyright (C) 2003 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
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.
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.
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
20 // See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org
24 // File : SALOMEDS_SComponent_i.cxx
25 // Author : Yves FRICAUD
29 #include "SALOMEDS_SComponent_i.hxx"
30 #include "utilities.h"
33 //============================================================================
34 /*! Function : constructor
37 //============================================================================
38 SALOMEDS_SComponent_i::SALOMEDS_SComponent_i(const TDF_Label lab, CORBA::ORB_ptr orb)
39 :SALOMEDS_SObject_i(lab,orb)
43 //============================================================================
44 /*! Function : destructor
47 //============================================================================
48 SALOMEDS_SComponent_i::~SALOMEDS_SComponent_i()
53 //============================================================================
54 /*! Function : ComponentDataType
57 //============================================================================
58 char* SALOMEDS_SComponent_i::ComponentDataType()
61 // MESSAGE("In SALOMEDS_SComponent_i::ComponentDataType");
62 // TCollection_AsciiString anEntry;
63 // TDF_Tool::Entry (_lab,anEntry);
64 // MESSAGE("in SALOMEDS_SComponent_i, Entry :"<<anEntry);
67 Standard_CString res = "";
68 Handle(TDataStd_Comment) type;
69 if ( _lab.FindAttribute(TDataStd_Comment::GetID(),type) ) {
70 TCollection_AsciiString ch(type->Get());
74 return CORBA::string_dup(res);
78 //============================================================================
79 /*! Function : ComponentIOR
82 //============================================================================
83 CORBA::Boolean SALOMEDS_SComponent_i::ComponentIOR(CORBA::String_out IOR)
85 Handle(SALOMEDS_IORAttribute) ior;
86 if (!_lab.FindAttribute(SALOMEDS_IORAttribute::GetID(),ior) )
88 TCollection_AsciiString ch(ior->Get());
89 IOR = strdup(ch.ToCString());
94 //============================================================================
98 //============================================================================
99 Standard_Boolean SALOMEDS_SComponent_i::IsA(const TDF_Label Lab)
101 Handle(TDF_Attribute) Att;
102 // scomponent must contain comment and belong to the 2th depth label
103 if ( Lab.FindAttribute(TDataStd_Comment::GetID(), Att) && Lab.Depth() == 2) {
104 return Standard_True;
106 return Standard_False;