Salome HOME
Fix on [Bug PAL7750] Regression of UNDO in GEOM
[modules/kernel.git] / src / SALOMEDS / SALOMEDS_AttributePythonObject_i.cxx
1 //  SALOME SALOMEDS : data structure of SALOME and sources of Salome data server 
2 //
3 //  Copyright (C) 2003  CEA/DEN, EDF R&D
4 //
5 //
6 //
7 //  File   : SALOMEDS_AttributePythonObject_i.cxx
8 //  Author : Michael Ponikarov
9 //  Module : SALOME
10 //  $Header$
11
12 #include "SALOMEDS_AttributePythonObject_i.hxx"
13 #include <TCollection_ExtendedString.hxx>
14 #include <TColStd_HArray1OfCharacter.hxx>
15
16 using namespace std;
17
18 void SALOMEDS_AttributePythonObject_i::SetObject(const char* theSequence, CORBA::Boolean IsScript) {
19   CheckLocked();
20   Handle(SALOMEDS_PythonObjectAttribute)::DownCast(_myAttr)->SetObject(const_cast<char*>(theSequence), IsScript);
21 }
22
23 char* SALOMEDS_AttributePythonObject_i::GetObject() {
24   char* aSeq = Handle(SALOMEDS_PythonObjectAttribute)::DownCast(_myAttr)->GetObject();
25   CORBA::String_var aStr = CORBA::string_dup(aSeq);
26   return aStr._retn();
27 }
28
29 CORBA::Boolean SALOMEDS_AttributePythonObject_i::IsScript() {
30   return Handle(SALOMEDS_PythonObjectAttribute)::DownCast(_myAttr)->IsScript();
31 }
32
33 char* SALOMEDS_AttributePythonObject_i::Store() {
34   CORBA::String_var aString = GetObject();
35   char* aResult = new char[strlen(aString) + 2];
36   aResult[0] = IsScript()?'s':'n';
37   strcpy(aResult+1, aString);
38   return aResult;
39 }
40
41 void SALOMEDS_AttributePythonObject_i::Restore(const char* theValue) {
42   SetObject(&theValue[1], theValue[0]=='s');
43 }