1 // Copyright (C) 2007-2008 CEA/DEN, EDF R&D, OPEN CASCADE
3 // Copyright (C) 2003-2007 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.salome-platform.org/ or email : webmaster.salome@opencascade.com
23 #pragma warning( disable:4786 )
26 #include <Standard_Stream.hxx>
28 #include "GEOM_Gen_i.hh"
30 #include <TCollection_AsciiString.hxx>
31 #include <TCollection_ExtendedString.hxx>
32 #include <TColStd_HSequenceOfAsciiString.hxx>
33 #include <Resource_DataMapOfAsciiStringAsciiString.hxx>
38 //=======================================================================
39 //function : DumpPython
41 //=======================================================================
43 Engines::TMPFile* GEOM_Gen_i::DumpPython(CORBA::Object_ptr theStudy,
44 CORBA::Boolean isPublished,
45 CORBA::Boolean& isValidScript)
47 /*ASL: temporary commented for Notebook
48 SALOMEDS::Study_var aStudy = SALOMEDS::Study::_narrow(theStudy);
49 if(CORBA::is_nil(aStudy))
50 return new Engines::TMPFile(0);
52 SALOMEDS::SObject_var aSO = aStudy->FindComponent(ComponentDataType());
53 if(CORBA::is_nil(aSO))
54 return new Engines::TMPFile(0);
56 Resource_DataMapOfAsciiStringAsciiString aMap;
58 TVariablesList aVariableMap;
60 SALOMEDS::ChildIterator_var Itr = aStudy->NewChildIterator(aSO);
61 for(Itr->InitEx(true); Itr->More(); Itr->Next()) {
62 SALOMEDS::SObject_var aValue = Itr->Value();
63 CORBA::String_var IOR = aValue->GetIOR();
64 if(strlen(IOR.in()) > 0) {
65 CORBA::Object_var obj = _orb->string_to_object(IOR);
66 GEOM::GEOM_Object_var GO = GEOM::GEOM_Object::_narrow(obj);
67 if(!CORBA::is_nil(GO)) {
68 CORBA::String_var aName = aValue->GetName();
69 CORBA::String_var anEntry = GO->GetEntry();
70 aMap.Bind( (char*)anEntry.in(), (char*)aName.in() );
72 //Find attribute with list of used notebook variables
73 SALOMEDS::GenericAttribute_var anAttr;
74 SALOMEDS::AttributeString_var anAttrStr;
75 if(aValue->FindAttribute(anAttr,"AttributeString")){
76 anAttrStr = SALOMEDS::AttributeString::_narrow(anAttr);
77 SALOMEDS::ListOfListOfStrings_var aSections = aStudy->ParseVariables(anAttrStr->Value());
78 ObjectStates* aStates = new ObjectStates();
79 for(int i = 0; i < aSections->length(); i++) {
81 SALOMEDS::ListOfStrings aListOfVars = aSections[i];
82 for(int j = 0; j < aListOfVars.length(); j++) {
83 bool isVar = aStudy->IsVariable(aListOfVars[j].in());
84 TVariable aVar = TVariable( (char*)aListOfVars[j].in(), isVar );
85 aState.push_back(aVar);
87 aStates->AddState(aState);
89 aVariableMap.insert(pair<TCollection_AsciiString,ObjectStates*>(TCollection_AsciiString(anEntry),aStates));
95 TCollection_AsciiString aScript =
96 "# -*- coding: iso-8859-1 -*-\n"
97 "### This file is generated by SALOME automatically by dump python functionality\n"
98 "### of GEOM component\n\n";
99 aScript += _impl->DumpPython(aStudy->StudyId(), aMap, aVariableMap, isPublished, isValidScript);
103 //Output the script that sets up the visual parameters.
104 char* script = aStudy->GetDefaultScript(ComponentDataType(), "\t");
105 if (script && strlen(script) > 0) {
106 aScript += "\n\t### Store presentation parameters of displayed objects\n";
108 CORBA::string_free(script);
112 aScript += "\n\tpass\n";
114 int aLen = 0;/*ASL: aScript.Length(); */
115 unsigned char* aBuffer = new unsigned char[aLen+1];
116 //ASL : strcpy((char*)aBuffer, aScript.ToCString());
118 CORBA::Octet* anOctetBuf = (CORBA::Octet*)aBuffer;
119 Engines::TMPFile_var aStreamFile = new Engines::TMPFile(aLen+1, aLen+1, anOctetBuf, 1);
121 return aStreamFile._retn();
124 //=======================================================================
125 //function : GetDumpName
127 //=======================================================================
129 char* GEOM_Gen_i::GetDumpName (const char* theStudyEntry)
131 const char* name = _impl->GetDumpName( theStudyEntry );
132 if ( name && strlen( name ) > 0 )
133 return strdup( name );
138 //=======================================================================
139 //function : GetAllDumpNames
141 //=======================================================================
143 GEOM::string_array* GEOM_Gen_i::GetAllDumpNames()
145 Handle(TColStd_HSequenceOfAsciiString) aHSeq = _impl->GetAllDumpNames();
146 int i = 0, aLen = aHSeq->Length();
148 GEOM::string_array_var seq = new GEOM::string_array();
151 for (; i < aLen; i++) {
152 seq[i] = CORBA::string_dup(aHSeq->Value(i + 1).ToCString());