src/TDataStd/TDataStd_RealArray.cxx

   1 // Created on: 1999-06-16
   2 // Created by: Sergey RUIN
   3 // Copyright (c) 1999-1999 Matra Datavision
   4 // Copyright (c) 1999-2014 OPEN CASCADE SAS
   5 //
   6 // This file is part of Open CASCADE Technology software library.
   7 //
   8 // This library is free software; you can redistribute it and/or modify it under
   9 // the terms of the GNU Lesser General Public License version 2.1 as published
  10 // by the Free Software Foundation, with special exception defined in the file
  11 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
  12 // distribution for complete text of the license and disclaimer of any warranty.
  13 //
  14 // Alternatively, this file may be used under the terms of Open CASCADE
  15 // commercial license or contractual agreement.
  16
  17
  18 #include <Standard_GUID.hxx>
  19 #include <Standard_Type.hxx>
  20 #include <TDataStd_DeltaOnModificationOfRealArray.hxx>
  21 #include <TDataStd_RealArray.hxx>
  22 #include <TDF_Attribute.hxx>
  23 #include <TDF_DefaultDeltaOnModification.hxx>
  24 #include <TDF_DeltaOnModification.hxx>
  25 #include <TDF_Label.hxx>
  26 #include <TDF_RelocationTable.hxx>
  27
  28 IMPLEMENT_STANDARD_RTTIEXT(TDataStd_RealArray,TDF_Attribute)
  29
  30 //=======================================================================
  31 //function : GetID
  32 //purpose  :
  33 //=======================================================================
  34 const Standard_GUID& TDataStd_RealArray::GetID()
  35 {
  36   static Standard_GUID TDataStd_RealArrayID ("2a96b61e-ec8b-11d0-bee7-080009dc3333");
  37   return TDataStd_RealArrayID;
  38 }
  39
  40 //=======================================================================
  41 //function : SetAttr
  42 //purpose  : Implements Set functionality
  43 //=======================================================================
  44 static Handle(TDataStd_RealArray) SetAttr(const TDF_Label&       label,
  45                                           const Standard_Integer lower,
  46                                           const Standard_Integer upper,
  47                                           const Standard_Boolean isDelta,
  48                                           const Standard_GUID&   theGuid)
  49 {
  50   Handle(TDataStd_RealArray) A;
  51   if (!label.FindAttribute (theGuid, A))
  52   {
  53     A = new TDataStd_RealArray;
  54     A->Init (lower, upper);
  55     A->SetDelta(isDelta);
  56     A->SetID(theGuid);
  57     label.AddAttribute(A);
  58   }
  59   else if (lower != A->Lower() || upper != A->Upper())
  60   {
  61     A->Init(lower, upper);
  62   }
  63   return A;
  64 }
  65
  66 //=======================================================================
  67 //function : TDataStd_RealArray
  68 //purpose  : Empty Constructor
  69 //=======================================================================
  70
  71 TDataStd_RealArray::TDataStd_RealArray() : myIsDelta(Standard_False),
  72   myID(GetID())
  73 {}
  74
  75 //=======================================================================
  76 //function : Init
  77 //purpose  :
  78 //=======================================================================
  79
  80 void TDataStd_RealArray::Init(const Standard_Integer lower,
  81                               const Standard_Integer upper)
  82 {
  83   Standard_RangeError_Raise_if(upper < lower,"TDataStd_RealArray::Init");
  84   Backup(); // jfa 15.01.2003 for LH3D1378
  85   myValue = new TColStd_HArray1OfReal(lower, upper, 0.);
  86 }
  87
  88 //=======================================================================
  89 //function : Set
  90 //purpose  :
  91 //=======================================================================
  92
  93 Handle(TDataStd_RealArray) TDataStd_RealArray::Set
  94                                           (const TDF_Label&       label,
  95                                            const Standard_Integer lower,
  96                                            const Standard_Integer upper,
  97                                            const Standard_Boolean isDelta)
  98 {
  99   return SetAttr(label, lower, upper, isDelta, GetID());
 100 }
 101
 102 //=======================================================================
 103 //function : Set
 104 //purpose  : Set user defined attribute with specific ID
 105 //=======================================================================
 106
 107 Handle(TDataStd_RealArray) TDataStd_RealArray::Set
 108                                           (const TDF_Label&       label,
 109                                            const Standard_GUID&   theGuid,
 110                                            const Standard_Integer lower,
 111                                            const Standard_Integer upper,
 112                                            const Standard_Boolean isDelta)
 113 {
 114   return SetAttr(label, lower, upper, isDelta, theGuid);
 115 }
 116 //=======================================================================
 117 //function : SetValue
 118 //purpose  :
 119 //=======================================================================
 120
 121 void TDataStd_RealArray::SetValue (const Standard_Integer index,
 122                                    const Standard_Real value)
 123 {
 124   // OCC2932 correction
 125   if(myValue.IsNull()) return;
 126   if(myValue->Value(index) == value)
 127     return;
 128   Backup();
 129   myValue->SetValue(index, value);
 130 }
 131
 132
 133 //=======================================================================
 134 //function : GetValue
 135 //purpose  :
 136 //=======================================================================
 137
 138 Standard_Real TDataStd_RealArray::Value (const Standard_Integer index) const
 139 {
 140   if(myValue.IsNull()) return RealFirst();
 141   return myValue->Value(index);
 142 }
 143
 144
 145
 146 //=======================================================================
 147 //function : Lower
 148 //purpose  :
 149 //=======================================================================
 150 Standard_Integer TDataStd_RealArray::Lower (void) const
 151 {
 152   if(myValue.IsNull()) return 0;
 153   return myValue->Lower();
 154 }
 155
 156
 157 //=======================================================================
 158 //function : Upper
 159 //purpose  :
 160 //=======================================================================
 161 Standard_Integer TDataStd_RealArray::Upper (void) const
 162 {
 163   if(myValue.IsNull()) return 0;
 164   return myValue->Upper();
 165 }
 166
 167
 168 //=======================================================================
 169 //function : Length
 170 //purpose  :
 171 //=======================================================================
 172 Standard_Integer TDataStd_RealArray::Length (void) const
 173 {
 174   if(myValue.IsNull()) return 0;
 175   return myValue->Length();
 176 }
 177
 178
 179 //=======================================================================
 180 //function : ChangeArray
 181 //purpose  : If value of <newArray> differs from <myValue>, Backup
 182 //         : performed and myValue refers to new instance of HArray1OfReal
 183 //         : that holds <newArray>
 184 //=======================================================================
 185
 186 void TDataStd_RealArray::ChangeArray(const Handle(TColStd_HArray1OfReal)& newArray,
 187                                      const Standard_Boolean isCheckItems)
 188 {
 189   Standard_Integer aLower    = newArray->Lower();
 190   Standard_Integer anUpper   = newArray->Upper();
 191   Standard_Boolean aDimEqual = Standard_False;
 192   Standard_Integer i;
 193
 194   if (Lower() == aLower && Upper() == anUpper ) {
 195     aDimEqual = Standard_True;
 196     Standard_Boolean isEqual = Standard_True;
 197     if(isCheckItems) {
 198       for(i = aLower; i <= anUpper; i++) {
 199         if(myValue->Value(i) != newArray->Value(i)) {
 200           isEqual = Standard_False;
 201           break;
 202         }
 203       }
 204       if(isEqual)
 205         return;
 206     }
 207   }
 208
 209   Backup();
 210
 211   if(myValue.IsNull() || !aDimEqual)
 212     myValue = new TColStd_HArray1OfReal(aLower, anUpper);
 213
 214   for(i = aLower; i <= anUpper; i++)
 215     myValue->SetValue(i, newArray->Value(i));
 216 }
 217
 218 //=======================================================================
 219 //function : ID
 220 //purpose  :
 221 //=======================================================================
 222
 223 const Standard_GUID& TDataStd_RealArray::ID () const { return myID; }
 224
 225 //=======================================================================
 226 //function : SetID
 227 //purpose  :
 228 //=======================================================================
 229
 230 void TDataStd_RealArray::SetID( const Standard_GUID&  theGuid)
 231 {
 232   if(myID == theGuid) return;
 233   Backup();
 234   myID = theGuid;
 235 }
 236
 237 //=======================================================================
 238 //function : SetID
 239 //purpose  : sets default ID
 240 //=======================================================================
 241
 242 void TDataStd_RealArray::SetID()
 243 {
 244   Backup();
 245   myID = GetID();
 246 }
 247
 248 //=======================================================================
 249 //function : NewEmpty
 250 //purpose  :
 251 //=======================================================================
 252
 253 Handle(TDF_Attribute) TDataStd_RealArray::NewEmpty () const
 254 {
 255   return new TDataStd_RealArray();
 256 }
 257
 258 //=======================================================================
 259 //function : Restore
 260 //purpose  :
 261 //=======================================================================
 262
 263 void TDataStd_RealArray::Restore(const Handle(TDF_Attribute)& With)
 264 {
 265   Standard_Integer i, lower, upper;
 266   Handle(TDataStd_RealArray) anArray = Handle(TDataStd_RealArray)::DownCast(With);
 267   if(!anArray->myValue.IsNull()) {
 268     lower = anArray->Lower();
 269     upper = anArray->Upper();
 270     myIsDelta = anArray->myIsDelta;
 271     myValue = new TColStd_HArray1OfReal(lower, upper);
 272     for(i = lower; i<=upper; i++)
 273       myValue->SetValue(i, anArray->Value(i));
 274     myID = anArray->ID();
 275   }
 276   else
 277     myValue.Nullify();
 278 }
 279
 280 //=======================================================================
 281 //function : Paste
 282 //purpose  :
 283 //=======================================================================
 284
 285 void TDataStd_RealArray::Paste (const Handle(TDF_Attribute)& Into,
 286                                 const Handle(TDF_RelocationTable)& ) const
 287 {
 288   if(!myValue.IsNull()) {
 289     Handle(TDataStd_RealArray) anAtt = Handle(TDataStd_RealArray)::DownCast(Into);
 290     if(!anAtt.IsNull()) {
 291       anAtt->ChangeArray( myValue, Standard_False );
 292       anAtt->SetDelta(myIsDelta);
 293       anAtt->SetID(myID);
 294     }
 295   }
 296 }
 297
 298 //=======================================================================
 299 //function : Dump
 300 //purpose  :
 301 //=======================================================================
 302
 303 Standard_OStream& TDataStd_RealArray::Dump (Standard_OStream& anOS) const
 304 {
 305   anOS << "\nRealArray::" << this <<" :";
 306   if(!myValue.IsNull()) {
 307     Standard_Integer i, lower, upper;
 308     lower = myValue->Lower();
 309     upper = myValue->Upper();
 310     for(i = lower; i<=upper; i++)
 311       anOS << " " <<myValue->Value(i);
 312   }
 313   anOS << " Delta is " << (myIsDelta ? "ON":"OFF");
 314   Standard_Character sguid[Standard_GUID_SIZE_ALLOC];
 315   myID.ToCString(sguid);
 316   anOS << sguid;
 317   anOS << endl;
 318   return anOS;
 319 }
 320
 321 //=======================================================================
 322 //function : DeltaOnModification
 323 //purpose  :
 324 //=======================================================================
 325
 326 Handle(TDF_DeltaOnModification) TDataStd_RealArray::DeltaOnModification
 327 (const Handle(TDF_Attribute)& OldAtt) const
 328 {
 329   if(myIsDelta)
 330     return new TDataStd_DeltaOnModificationOfRealArray(Handle(TDataStd_RealArray)::DownCast (OldAtt));
 331   else return new TDF_DefaultDeltaOnModification(OldAtt);
 332 }