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_AttributeReal_i.cxx
25 // Author : Yves FRICAUD
29 #include "SALOMEDS_AttributeReal_i.hxx"
34 static const char* write_double(double value)
36 std::ostringstream os;
37 unsigned char* array = (unsigned char*)&value;
38 for(int i = 0; i < sizeof(double); i++) {
39 unsigned tmp = (unsigned short)array[i];
42 return os.str().c_str();
45 static double read_double(const char* str)
47 std::istringstream is(str);
49 unsigned char* array = (unsigned char*)(&value);
50 for(int i = 0; i < sizeof(double); i++) {
53 array[i] = (unsigned char)tmp;
58 CORBA::Double SALOMEDS_AttributeReal_i::Value() {
59 return Handle(TDataStd_Real)::DownCast(_myAttr)->Get();
62 void SALOMEDS_AttributeReal_i::SetValue(CORBA::Double value) {
64 Handle(TDataStd_Real)::DownCast(_myAttr)->Set(value);
67 char* SALOMEDS_AttributeReal_i::Store() {
68 // char* RealVal = new char[35];
69 // sprintf(RealVal, "%.20f", Value());
71 return (char*)write_double( (double)Value() );
74 void SALOMEDS_AttributeReal_i::Restore(const char* value) {
76 //CORBA::Double r = strtod(value, &err);
77 //if (err != value) SetValue(r);
78 SetValue( read_double(value) );