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
  17 #include <Standard_Type.hxx>
  18 #include <TColStd_HArray1OfReal.hxx>
  19 #include <TColStd_ListIteratorOfListOfInteger.hxx>
  20 #include <TColStd_ListOfInteger.hxx>
  21 #include <TDataStd_DeltaOnModificationOfRealArray.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 {
  41   Handle(TDataStd_RealArray) CurrAtt;
  42   if (Label().FindAttribute(OldAtt->ID(),CurrAtt)) {
  43     Handle(TColStd_HArray1OfReal) Arr1, Arr2;
  44     Arr1 = OldAtt->Array();
  45     Arr2 = CurrAtt->Array();
  46 #ifdef OCCT_DEBUG
  47     if(Arr1.IsNull())
  48       std::cout <<"DeltaOnModificationOfRealArray:: Old Array is Null" <<std::endl;
  49     if(Arr2.IsNull())
  50       std::cout <<"DeltaOnModificationOfRealArray:: Current Array is Null" <<std::endl;
  51 #endif
  52
  53     if(Arr1.IsNull() || Arr2.IsNull()) return;
  54     if(Arr1 != Arr2) {
  55       myUp1 = Arr1->Upper();
  56       myUp2 = Arr2->Upper();
  57       Standard_Integer i, N =0, aCase=0;
  58       if(myUp1 == myUp2)
  59         {aCase = 1; N = myUp1;}
  60       else if(myUp1 < myUp2)
  61         {aCase = 2; N = myUp1;}
  62       else
  63         {aCase = 3; N = myUp2;}//Up1 > Up2
  64
  65       TColStd_ListOfInteger aList;
  66       for(i=Arr1->Lower();i <= N; i++)
  67         if(Arr1->Value(i) != Arr2->Value(i))
  68           aList.Append(i);
  69       if(aCase == 3) {
  70         for(i = N+1;i <= myUp1; i++)
  71           aList.Append(i);
  72       }
  73       if(aList.Extent()) {
  74         myIndxes = new TColStd_HArray1OfInteger(1,aList.Extent());
  75         myValues = new TColStd_HArray1OfReal(1,aList.Extent());
  76         TColStd_ListIteratorOfListOfInteger anIt(aList);
  77         for(i =1;anIt.More();anIt.Next(),i++) {
  78           myIndxes->SetValue(i, anIt.Value());
  79           myValues->SetValue(i, Arr1->Value(anIt.Value()));
  80         }
  81       }
  82     }
  83     OldAtt->RemoveArray();
  84 #ifdef OCCT_DEBUG
  85     if(OldAtt->Array().IsNull())
  86       std::cout << "BackUp Arr is Nullified" << std::endl;
  87 #endif
  88   }
  89 }
  90
  91
  92 //=======================================================================
  93 //function : Apply
  94 //purpose  :
  95 //=======================================================================
  96
  97 void TDataStd_DeltaOnModificationOfRealArray::Apply()
  98 {
  99
 100   Handle(TDF_Attribute) TDFAttribute = Attribute();
 101   Handle(TDataStd_RealArray) BackAtt = Handle(TDataStd_RealArray)::DownCast (TDFAttribute);
 102   if(BackAtt.IsNull()) {
 103 #ifdef OCCT_DEBUG
 104     std::cout << "DeltaOnModificationOfRealArray::Apply: OldAtt is Null" <<std::endl;
 105 #endif
 106     return;
 107   }
 108
 109   Handle(TDataStd_RealArray) aCurAtt;
 110   if (!Label().FindAttribute(BackAtt->ID(),aCurAtt)) {
 111
 112     Label().AddAttribute(BackAtt);
 113   }
 114
 115   if(aCurAtt.IsNull()) {
 116 #ifdef OCCT_DEBUG
 117     std::cout << "DeltaOnModificationOfRealArray::Apply: CurAtt is Null" <<std::endl;
 118 #endif
 119     return;
 120   }
 121   else
 122     aCurAtt->Backup();
 123
 124   Standard_Integer aCase;
 125   if(myUp1 == myUp2)
 126     aCase = 1;
 127   else if(myUp1 < myUp2)
 128     aCase = 2;
 129   else
 130     aCase = 3;//Up1 > Up2
 131
 132   if (aCase == 1 && (myIndxes.IsNull() || myValues.IsNull()))
 133     return;
 134
 135   Standard_Integer i;
 136   Handle(TColStd_HArray1OfReal) aRealArr = aCurAtt->Array();
 137   if(aRealArr.IsNull()) return;
 138   if(aCase == 1)
 139     for(i = 1; i <= myIndxes->Upper();i++)
 140       aRealArr->ChangeArray1().SetValue(myIndxes->Value(i), myValues->Value(i));
 141   else if(aCase == 2) {
 142     Handle(TColStd_HArray1OfReal) realArr = new TColStd_HArray1OfReal(aRealArr->Lower(), myUp1);
 143     for(i = aRealArr->Lower(); i <= myUp1 && i <= aRealArr->Upper(); i++)
 144       realArr->SetValue(i, aRealArr->Value(i));
 145     if(!myIndxes.IsNull() && !myValues.IsNull())
 146       for(i = 1; i <= myIndxes->Upper();i++)
 147         realArr->ChangeArray1().SetValue(myIndxes->Value(i), myValues->Value(i));
 148     aCurAtt->myValue = realArr;
 149   }
 150   else { // == 3
 151     Standard_Integer low = aRealArr->Lower();
 152     Handle(TColStd_HArray1OfReal) realArr = new TColStd_HArray1OfReal(low, myUp1);
 153     for(i = aRealArr->Lower(); i <= myUp2 && i <= aRealArr->Upper(); i++)
 154       realArr->SetValue(i, aRealArr->Value(i));
 155     if(!myIndxes.IsNull() && !myValues.IsNull())
 156       for(i = 1; i <= myIndxes->Upper();i++) {
 157 #ifdef OCCT_DEBUG
 158         std::cout << "i = " << i << "  myIndxes->Upper = " << myIndxes->Upper() << std::endl;
 159         std::cout << "myIndxes->Value(i) = " << myIndxes->Value(i) << std::endl;
 160         std::cout << "myValues->Value(i) = " << myValues->Value(i) << std::endl;
 161 #endif
 162         realArr->ChangeArray1().SetValue(myIndxes->Value(i), myValues->Value(i));
 163       }
 164     aCurAtt->myValue = realArr;
 165   }
 166
 167
 168 #ifdef OCCT_DEBUG
 169   std::cout << " << RealArray Dump after Delta Apply >>" <<std::endl;
 170   Handle(TColStd_HArray1OfReal) aRArr = aCurAtt->Array();
 171   for(i=aRArr->Lower(); i<=aRArr->Upper() && i <= MAXUP;i++)
 172     std::cout << aRArr->Value(i) << "  ";
 173   std::cout <<std::endl;
 174 #endif
 175 }
 176
 177