0024927: Getting rid of "Persistent" functionality -- Storable
[occt.git] / src / BinMXCAFDoc / BinMXCAFDoc_LocationDriver.cxx
1 // Created on: 2005-05-17
2 // Created by: Eugeny NAPALKOV
3 // Copyright (c) 2005-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 <BinMXCAFDoc_LocationDriver.ixx>
17 #include <XCAFDoc_Location.hxx>
18
19 #include <TopLoc_Datum3D.hxx>
20 #include <TopLoc_Location.hxx>
21 #include <gp_Trsf.hxx>
22 #include <gp_Mat.hxx>
23 #include <gp_XYZ.hxx>
24 //#include <Precision.hxx>
25 #include <BinMDataStd.hxx>
26 #include <BinTools_LocationSet.hxx>
27
28
29 //=======================================================================
30 //function :
31 //purpose  : 
32 //=======================================================================
33 BinMXCAFDoc_LocationDriver::BinMXCAFDoc_LocationDriver(const Handle(CDM_MessageDriver)& theMsgDriver)
34      : BinMDF_ADriver(theMsgDriver, STANDARD_TYPE(XCAFDoc_Location)->Name())
35      , myLocations(0) {
36 }
37
38 //=======================================================================
39 //function :
40 //purpose  : 
41 //=======================================================================
42 Handle(TDF_Attribute) BinMXCAFDoc_LocationDriver::NewEmpty() const {
43   return new XCAFDoc_Location();
44 }
45
46 //=======================================================================
47 //function :
48 //purpose  : 
49 //=======================================================================
50 Standard_Boolean BinMXCAFDoc_LocationDriver::Paste(const BinObjMgt_Persistent& theSource,
51                                                    const Handle(TDF_Attribute)& theTarget,
52                                                    BinObjMgt_RRelocationTable& theRelocTable) const
53 {
54   Handle(XCAFDoc_Location) anAtt = Handle(XCAFDoc_Location)::DownCast(theTarget);
55   TopLoc_Location aLoc;
56   Standard_Boolean aRes = Translate(theSource, aLoc, theRelocTable);
57   anAtt->Set(aLoc);
58   return aRes;
59 }
60
61 //=======================================================================
62 //function :
63 //purpose  : 
64 //=======================================================================
65 void BinMXCAFDoc_LocationDriver::Paste(const Handle(TDF_Attribute)& theSource,
66                                        BinObjMgt_Persistent& theTarget,
67                                        BinObjMgt_SRelocationTable& theRelocTable) const
68 {
69   Handle(XCAFDoc_Location) anAtt = Handle(XCAFDoc_Location)::DownCast(theSource);
70   TopLoc_Location aLoc = anAtt->Get();
71   Translate(aLoc, theTarget, theRelocTable);
72 }
73
74 //=======================================================================
75 //function :
76 //purpose  : 
77 //=======================================================================
78 Standard_Boolean BinMXCAFDoc_LocationDriver::Translate(const BinObjMgt_Persistent& theSource,
79                                                        TopLoc_Location& theLoc,
80                                                        BinObjMgt_RRelocationTable& theMap) const
81 {
82   Standard_Integer anId = 0;
83   theSource >> anId;
84   
85   if(anId == 0)
86   {
87     return Standard_True;
88   }
89   
90   Standard_Integer aFileVer = BinMDataStd::DocumentVersion();
91   if( aFileVer > 5 && myLocations == 0 )
92   {
93     return Standard_False;
94   }
95   
96   Standard_Integer aPower;
97   Handle(TopLoc_Datum3D) aDatum;
98   
99   if( aFileVer > 5 )
100   {
101     const TopLoc_Location& aLoc = myLocations->Location(anId);
102     aPower = aLoc.FirstPower();
103     aDatum = aLoc.FirstDatum();
104   } else {
105     theSource >> aPower;
106
107     Standard_Integer aDatumID = -1;
108     Standard_Integer aReadDatum = -1;
109     theSource >> aReadDatum;
110     theSource >> aDatumID;
111     if(aReadDatum != -1) {
112       if(theMap.IsBound(aDatumID)) {
113         aDatum = Handle(TopLoc_Datum3D)::DownCast(theMap.Find(aDatumID));
114       } else
115         return Standard_False;
116     } else {
117       // read the datum's trasformation
118       gp_Trsf aTrsf;
119
120       Standard_Real aScaleFactor;
121       theSource >> aScaleFactor;
122       aTrsf.SetScaleFactor(aScaleFactor);
123
124       Standard_Integer aForm;
125       theSource >> aForm;
126       aTrsf.SetForm((gp_TrsfForm)aForm);
127
128       Standard_Integer R, C;
129       gp_Mat& aMat = (gp_Mat&)aTrsf.HVectorialPart();
130       for(R = 1; R <= 3; R++)
131         for(C = 1; C <= 3; C++) {
132           Standard_Real aVal;
133           theSource >> aVal;
134           aMat.SetValue(R, C, aVal);
135         }
136
137       Standard_Real x, y, z;
138       theSource >> x >> y >> z;
139       gp_XYZ& aLoc = (gp_XYZ&)aTrsf.TranslationPart();
140       aLoc.SetX(x);
141       aLoc.SetY(y);
142       aLoc.SetZ(z);
143
144       aDatum = new TopLoc_Datum3D(aTrsf);
145       theMap.Bind(aDatumID, aDatum);
146     }
147   }
148   
149   //  Get Next Location
150   TopLoc_Location aNextLoc;
151   Translate(theSource, aNextLoc, theMap);
152   
153   //  Calculate the result
154   theLoc = aNextLoc * TopLoc_Location(aDatum).Powered(aPower);
155   return Standard_True;
156 }
157
158 //=======================================================================
159 //function :
160 //purpose  : 
161 //=======================================================================
162 void BinMXCAFDoc_LocationDriver::Translate(const TopLoc_Location& theLoc,
163                                            BinObjMgt_Persistent& theTarget,
164                                            BinObjMgt_SRelocationTable& theMap) const
165 {
166   if(theLoc.IsIdentity()) 
167   {
168     theTarget.PutInteger(0);
169     return;
170   }
171   
172   // The location is not identity  
173   if( myLocations == 0 )
174   {
175 #ifdef OCCT_DEBUG
176     cout<<"Pointer to LocationSet is NULL\n";
177 #endif
178     return;
179   }
180   
181   Standard_Integer anId = myLocations->Add(theLoc);
182   theTarget << anId;
183   
184   // In earlier version of this driver a datums from location stored in 
185   // the relocation table, but now it's not necessary
186   // (try to uncomment it if some problems appear)
187   /*
188   Handle(TopLoc_Datum3D) aDatum = theLoc.FirstDatum();
189   
190   if(!theMap.Contains(aDatum)) {
191     theMap.Add(aDatum);
192   }
193   */
194   
195   Translate(theLoc.NextLocation(), theTarget, theMap);
196 }
197