src/TDataStd/TDataStd_DeltaOnModificationOfRealArray.cxx

   1 // Created on: 2007-10-30
   2 // Created by: Sergey ZARITCHNY
   3 // Copyright (c) 2007-2014 OPEN CASCADE SAS
   4 //
   5 // This file is part of Open CASCADE Technology software library.
   6 //
   7 // This library is free software; you can redistribute it and/or modify it under
   8 // the terms of the GNU Lesser General Public License version 2.1 as published
   9 // by the Free Software Foundation, with special exception defined in the file
  10 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
  11 // distribution for complete text of the license and disclaimer of any warranty.
  12 //
  13 // Alternatively, this file may be used under the terms of Open CASCADE
  14 // commercial license or contractual agreement.
  15
  16 #include <TDataStd_DeltaOnModificationOfRealArray.hxx>
  17
  18 #include <Standard_Type.hxx>
  19 #include <TColStd_HArray1OfReal.hxx>
  20 #include <TColStd_ListIteratorOfListOfInteger.hxx>
  21 #include <TColStd_ListOfInteger.hxx>
  22 #include <TDataStd_RealArray.hxx>
  23 #include <TDF_AttributeIterator.hxx>
  24 #include <TDF_DeltaOnModification.hxx>
  25 #include <TDF_Label.hxx>
  26
  27 IMPLEMENT_STANDARD_RTTIEXT(TDataStd_DeltaOnModificationOfRealArray,TDF_DeltaOnModification)
  28
  29 #ifdef OCCT_DEBUG
  30 #define MAXUP 1000
  31 #endif
  32 //=======================================================================
  33 //function : TDataStd_DeltaOnModificationOfRealArray
  34 //purpose  :
  35 //=======================================================================
  36
  37 TDataStd_DeltaOnModificationOfRealArray::
  38   TDataStd_DeltaOnModificationOfRealArray(const Handle(TDataStd_RealArray)& OldAtt)
  39 : TDF_DeltaOnModification(OldAtt),
  40   myUp1(0),
  41   myUp2(0)
  42 {
  43   Handle(TDataStd_RealArray) CurrAtt;
  44   if (Label().FindAttribute(OldAtt->ID(),CurrAtt)) {
  45     Handle(TColStd_HArray1OfReal) Arr1, Arr2;
  46     Arr1 = OldAtt->Array();
  47     Arr2 = CurrAtt->Array();
  48 #ifdef OCCT_DEBUG
  49     if(Arr1.IsNull())
  50       std::cout <<"DeltaOnModificationOfRealArray:: Old Array is Null" <<std::endl;
  51     if(Arr2.IsNull())
  52       std::cout <<"DeltaOnModificationOfRealArray:: Current Array is Null" <<std::endl;
  53 #endif
  54
  55     if(Arr1.IsNull() || Arr2.IsNull()) return;
  56     if(Arr1 != Arr2) {
  57       myUp1 = Arr1->Upper();
  58       myUp2 = Arr2->Upper();
  59       Standard_Integer i, N =0, aCase=0;
  60       if(myUp1 == myUp2)
  61         {aCase = 1; N = myUp1;}
  62       else if(myUp1 < myUp2)
  63         {aCase = 2; N = myUp1;}
  64       else
  65         {aCase = 3; N = myUp2;}//Up1 > Up2
  66
  67       TColStd_ListOfInteger aList;
  68       for(i=Arr1->Lower();i <= N; i++)
  69         if(Arr1->Value(i) != Arr2->Value(i))
  70           aList.Append(i);
  71       if(aCase == 3) {
  72         for(i = N+1;i <= myUp1; i++)
  73           aList.Append(i);
  74       }
  75       if(aList.Extent()) {
  76         myIndxes = new TColStd_HArray1OfInteger(1,aList.Extent());
  77         myValues = new TColStd_HArray1OfReal(1,aList.Extent());
  78         TColStd_ListIteratorOfListOfInteger anIt(aList);
  79         for(i =1;anIt.More();anIt.Next(),i++) {
  80           myIndxes->SetValue(i, anIt.Value());
  81           myValues->SetValue(i, Arr1->Value(anIt.Value()));
  82         }
  83       }
  84     }
  85     OldAtt->RemoveArray();
  86 #ifdef OCCT_DEBUG
  87     if(OldAtt->Array().IsNull())
  88       std::cout << "BackUp Arr is Nullified" << std::endl;
  89 #endif
  90   }
  91 }
  92
  93
  94 //=======================================================================
  95 //function : Apply
  96 //purpose  :
  97 //=======================================================================
  98
  99 void TDataStd_DeltaOnModificationOfRealArray::Apply()
 100 {
 101
 102   Handle(TDF_Attribute) TDFAttribute = Attribute();
 103   Handle(TDataStd_RealArray) BackAtt = Handle(TDataStd_RealArray)::DownCast (TDFAttribute);
 104   if(BackAtt.IsNull()) {
 105 #ifdef OCCT_DEBUG
 106     std::cout << "DeltaOnModificationOfRealArray::Apply: OldAtt is Null" <<std::endl;
 107 #endif
 108     return;
 109   }
 110
 111   Handle(TDataStd_RealArray) aCurAtt;
 112   if (!Label().FindAttribute(BackAtt->ID(),aCurAtt)) {
 113
 114     Label().AddAttribute(BackAtt);
 115   }
 116
 117   if(aCurAtt.IsNull()) {
 118 #ifdef OCCT_DEBUG
 119     std::cout << "DeltaOnModificationOfRealArray::Apply: CurAtt is Null" <<std::endl;
 120 #endif
 121     return;
 122   }
 123   else
 124     aCurAtt->Backup();
 125
 126   Standard_Integer aCase;
 127   if(myUp1 == myUp2)
 128     aCase = 1;
 129   else if(myUp1 < myUp2)
 130     aCase = 2;
 131   else
 132     aCase = 3;//Up1 > Up2
 133
 134   if (aCase == 1 && (myIndxes.IsNull() || myValues.IsNull()))
 135     return;
 136
 137   Standard_Integer i;
 138   Handle(TColStd_HArray1OfReal) aRealArr = aCurAtt->Array();
 139   if(aRealArr.IsNull()) return;
 140   if(aCase == 1)
 141     for(i = 1; i <= myIndxes->Upper();i++)
 142       aRealArr->ChangeArray1().SetValue(myIndxes->Value(i), myValues->Value(i));
 143   else if(aCase == 2) {
 144     Handle(TColStd_HArray1OfReal) realArr = new TColStd_HArray1OfReal(aRealArr->Lower(), myUp1);
 145     for(i = aRealArr->Lower(); i <= myUp1 && i <= aRealArr->Upper(); i++)
 146       realArr->SetValue(i, aRealArr->Value(i));
 147     if(!myIndxes.IsNull() && !myValues.IsNull())
 148       for(i = 1; i <= myIndxes->Upper();i++)
 149         realArr->ChangeArray1().SetValue(myIndxes->Value(i), myValues->Value(i));
 150     aCurAtt->myValue = realArr;
 151   }
 152   else { // == 3
 153     Standard_Integer low = aRealArr->Lower();
 154     Handle(TColStd_HArray1OfReal) realArr = new TColStd_HArray1OfReal(low, myUp1);
 155     for(i = aRealArr->Lower(); i <= myUp2 && i <= aRealArr->Upper(); i++)
 156       realArr->SetValue(i, aRealArr->Value(i));
 157     if(!myIndxes.IsNull() && !myValues.IsNull())
 158       for(i = 1; i <= myIndxes->Upper();i++) {
 159 #ifdef OCCT_DEBUG
 160         std::cout << "i = " << i << "  myIndxes->Upper = " << myIndxes->Upper() << std::endl;
 161         std::cout << "myIndxes->Value(i) = " << myIndxes->Value(i) << std::endl;
 162         std::cout << "myValues->Value(i) = " << myValues->Value(i) << std::endl;
 163 #endif
 164         realArr->ChangeArray1().SetValue(myIndxes->Value(i), myValues->Value(i));
 165       }
 166     aCurAtt->myValue = realArr;
 167   }
 168
 169
 170 #ifdef OCCT_DEBUG
 171   std::cout << " << RealArray Dump after Delta Apply >>" <<std::endl;
 172   Handle(TColStd_HArray1OfReal) aRArr = aCurAtt->Array();
 173   for(i=aRArr->Lower(); i<=aRArr->Upper() && i <= MAXUP;i++)
 174     std::cout << aRArr->Value(i) << "  ";
 175   std::cout <<std::endl;
 176 #endif
 177 }
 178
 179