0031501: Foundation Classes, Message_Printer - remove theToPutEndl argument -- prepar...
[occt.git] / src / IGESDimen / IGESDimen_ToolWitnessLine.cxx
1 // Created by: CKY / Contract Toubro-Larsen
2 // Copyright (c) 1993-1999 Matra Datavision
3 // Copyright (c) 1999-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 //--------------------------------------------------------------------
18
19 #include <gp_Pnt.hxx>
20 #include <gp_XY.hxx>
21 #include <IGESData_DirChecker.hxx>
22 #include <IGESData_Dump.hxx>
23 #include <IGESData_IGESDumper.hxx>
24 #include <IGESData_IGESReaderData.hxx>
25 #include <IGESData_IGESWriter.hxx>
26 #include <IGESData_LineFontEntity.hxx>
27 #include <IGESData_ParamCursor.hxx>
28 #include <IGESData_ParamReader.hxx>
29 #include <IGESDimen_ToolWitnessLine.hxx>
30 #include <IGESDimen_WitnessLine.hxx>
31 #include <Interface_Check.hxx>
32 #include <Interface_CopyTool.hxx>
33 #include <Interface_EntityIterator.hxx>
34 #include <Interface_Macros.hxx>
35 #include <Interface_ShareTool.hxx>
36 #include <Message_Messenger.hxx>
37 #include <Standard_DomainError.hxx>
38 #include <TColgp_HArray1OfXY.hxx>
39
40 IGESDimen_ToolWitnessLine::IGESDimen_ToolWitnessLine ()    {  }
41
42
43 void  IGESDimen_ToolWitnessLine::ReadOwnParams
44   (const Handle(IGESDimen_WitnessLine)& ent,
45    const Handle(IGESData_IGESReaderData)& /* IR */, IGESData_ParamReader& PR) const
46
47   //Standard_Boolean st; //szv#4:S4163:12Mar99 moved down
48
49   Standard_Integer datatype;
50   Standard_Real zDisplacement; 
51   Standard_Integer nbval;
52   Handle(TColgp_HArray1OfXY) dataPoints;
53
54   PR.ReadInteger(PR.Current(), "Interpretation Flag", datatype); //szv#4:S4163:12Mar99 `st=` not needed
55
56   Standard_Boolean st = PR.ReadInteger(PR.Current(), "Number of data points", nbval);
57   if (st && nbval > 0)
58     dataPoints = new TColgp_HArray1OfXY(1, nbval);
59   else  PR.AddFail("Number of data points: Not Positive");
60
61   PR.ReadReal(PR.Current(), "Common Z Displacement", zDisplacement); //szv#4:S4163:12Mar99 `st=` not needed
62
63   if (! dataPoints.IsNull())
64     for (Standard_Integer i = 1; i <= nbval; i++)
65       {
66         gp_XY tempXY;
67         PR.ReadXY(PR.CurrentList(1, 2), "Data Points", tempXY); //szv#4:S4163:12Mar99 `st=` not needed
68         dataPoints->SetValue(i, tempXY);
69       }
70
71   DirChecker(ent).CheckTypeAndForm(PR.CCheck(),ent);
72   ent->Init(datatype, zDisplacement, dataPoints);
73 }
74
75 void  IGESDimen_ToolWitnessLine::WriteOwnParams
76   (const Handle(IGESDimen_WitnessLine)& ent, IGESData_IGESWriter& IW) const 
77
78   Standard_Integer upper = ent->NbPoints();
79   IW.Send(ent->Datatype());
80   IW.Send(upper);
81   IW.Send(ent->ZDisplacement());
82   for (Standard_Integer i = 1; i <= upper; i++)
83     {
84       IW.Send((ent->Point(i)).X());
85       IW.Send((ent->Point(i)).Y());
86     }
87 }
88
89 void  IGESDimen_ToolWitnessLine::OwnShared
90   (const Handle(IGESDimen_WitnessLine)& /* ent */, Interface_EntityIterator& /* iter */) const
91 {
92 }
93
94 void  IGESDimen_ToolWitnessLine::OwnCopy
95   (const Handle(IGESDimen_WitnessLine)& another,
96    const Handle(IGESDimen_WitnessLine)& ent, Interface_CopyTool& /* TC */) const
97 {
98   Standard_Integer datatype = another->Datatype();
99   Standard_Integer nbval = another->NbPoints();
100   Standard_Real zDisplacement = another->ZDisplacement();
101
102   Handle(TColgp_HArray1OfXY) dataPoints = new TColgp_HArray1OfXY(1, nbval);
103
104   for (Standard_Integer i = 1; i <= nbval; i++)
105     {
106       gp_Pnt tempPnt = (another->Point(i));
107       gp_XY tempPnt2d(tempPnt.X(), tempPnt.Y());
108       dataPoints->SetValue(i, tempPnt2d);
109     }
110   ent->Init(datatype, zDisplacement, dataPoints);
111 }
112
113 Standard_Boolean  IGESDimen_ToolWitnessLine::OwnCorrect
114   (const Handle(IGESDimen_WitnessLine)& ent) const
115 {
116   Standard_Boolean res = (ent->RankLineFont() != 1);
117   if (res) {
118     Handle(IGESData_LineFontEntity) nulfont;
119     ent->InitLineFont(nulfont,1);
120   }
121   if (ent->Datatype() == 1) return res;
122 //  Forcer DataType = 1 -> reconstruire
123   Standard_Integer nb = ent->NbPoints();
124   if (nb == 0) return Standard_False;  // rien pu faire (est-ce possible ?)
125   Handle(TColgp_HArray1OfXY) pts = new TColgp_HArray1OfXY(1,nb);
126   for (Standard_Integer i = 1; i <= nb; i ++)
127     pts->SetValue(i,gp_XY (ent->Point(i).X(),ent->Point(i).Y()) );
128   ent->Init (1,ent->ZDisplacement(),pts);
129   return Standard_True;
130 }
131
132 IGESData_DirChecker  IGESDimen_ToolWitnessLine::DirChecker
133   (const Handle(IGESDimen_WitnessLine)& /* ent */ ) const 
134
135   IGESData_DirChecker DC (106, 40);
136   DC.Structure(IGESData_DefVoid);
137   DC.LineFont(IGESData_DefValue);
138   DC.LineWeight(IGESData_DefValue);
139   DC.Color(IGESData_DefAny);
140   DC.UseFlagRequired(1);
141   DC.HierarchyStatusIgnored();
142   return DC;
143 }
144
145 void  IGESDimen_ToolWitnessLine::OwnCheck
146   (const Handle(IGESDimen_WitnessLine)& ent,
147    const Interface_ShareTool& , Handle(Interface_Check)& ach) const 
148 {
149   if (ent->RankLineFont() != 1)
150     ach->AddFail("Line Font Pattern != 1");
151   if (ent->Datatype() != 1)
152     ach->AddFail("Interpretation Flag != 1");
153   if (ent->NbPoints() < 3)
154     ach->AddFail("Number of data points < 3");
155   if (ent->NbPoints()%2 == 0)
156     ach->AddFail("Number of data points is not odd");
157 }
158
159 void  IGESDimen_ToolWitnessLine::OwnDump
160   (const Handle(IGESDimen_WitnessLine)& ent, const IGESData_IGESDumper& /* dumper */,
161    Standard_OStream& S, const Standard_Integer level) const 
162
163   S << "IGESDimen_WitnessLine\n"
164     << "Data Type   : "           << ent->Datatype() << "  "
165     << "Number of Data Points : " << ent->NbPoints() << "  "
166     << "Common Z displacement : " << ent->ZDisplacement() << "\n"
167     << "Data Points : "; 
168   IGESData_DumpListXYLZ(S,level,1, ent->NbPoints(),ent->Point,
169                     ent->Location(), ent->ZDisplacement());
170   S << std::endl;
171 }