0031501: Foundation Classes, Message_Printer - remove theToPutEndl argument -- prepar...
[occt.git] / src / IGESGeom / IGESGeom_ToolTrimmedSurface.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 <IGESData_DirChecker.hxx>
20 #include <IGESData_Dump.hxx>
21 #include <IGESData_IGESDumper.hxx>
22 #include <IGESData_IGESEntity.hxx>
23 #include <IGESData_IGESReaderData.hxx>
24 #include <IGESData_IGESWriter.hxx>
25 #include <IGESData_ParamCursor.hxx>
26 #include <IGESData_ParamReader.hxx>
27 #include <IGESData_Status.hxx>
28 #include <IGESGeom_CurveOnSurface.hxx>
29 #include <IGESGeom_HArray1OfCurveOnSurface.hxx>
30 #include <IGESGeom_ToolTrimmedSurface.hxx>
31 #include <IGESGeom_TrimmedSurface.hxx>
32 #include <Interface_Check.hxx>
33 #include <Interface_CopyTool.hxx>
34 #include <Interface_EntityIterator.hxx>
35 #include <Interface_Macros.hxx>
36 #include <Interface_ShareTool.hxx>
37 #include <Message_Msg.hxx>
38 #include <Standard_DomainError.hxx>
39
40 // MGE 31/07/98
41 //=======================================================================
42 //function : IGESGeom_ToolTrimmedSurface
43 //purpose  : 
44 //=======================================================================
45 IGESGeom_ToolTrimmedSurface::IGESGeom_ToolTrimmedSurface ()
46 {
47 }
48
49
50 //=======================================================================
51 //function : ReadOwnParams
52 //purpose  : 
53 //=======================================================================
54
55 void IGESGeom_ToolTrimmedSurface::ReadOwnParams
56   (const Handle(IGESGeom_TrimmedSurface)& ent,
57    const Handle(IGESData_IGESReaderData)& IR, IGESData_ParamReader& PR) const
58 {
59   // MGE 31/07/98
60   // Building of messages
61   //========================================
62   //========================================
63
64   //Standard_Boolean st; //szv#4:S4163:12Mar99 not needed
65   Standard_Integer aFlag;
66   Standard_Integer count;
67   Handle(IGESData_IGESEntity) aSurface;
68   Handle(IGESGeom_CurveOnSurface) anOuter;
69   Handle(IGESGeom_HArray1OfCurveOnSurface) anInner;
70   IGESData_Status aStatus;
71
72   //szv#4:S4163:12Mar99 `st=` not needed
73   if (!PR.ReadEntity(IR, PR.Current(), aStatus, aSurface)){
74     Message_Msg Msg169("XSTEP_169");
75     switch(aStatus) {
76     case IGESData_ReferenceError: {  
77       Message_Msg Msg216 ("IGES_216");
78       Msg169.Arg(Msg216.Value());
79       PR.SendFail(Msg169);
80       break; }
81     case IGESData_EntityError: {
82       Message_Msg Msg217 ("IGES_217");
83       Msg169.Arg(Msg217.Value());
84       PR.SendFail(Msg169);
85       break; }
86     default:{
87     }
88     }
89   }
90   if (!PR.ReadInteger(PR.Current(), aFlag)){
91     Message_Msg Msg170("XSTEP_170");
92     PR.SendFail(Msg170);
93   }
94   //st = PR.ReadInteger(PR.Current(), Msg171, count); //szv#4:S4163:12Mar99 moved in if
95
96 /*
97   st = PR.ReadEntity(IR, PR.Current(), "Surface to be trimmed", aSurface);
98   st = PR.ReadInteger(PR.Current(), "Outer boundary type", aFlag);
99   st = PR.ReadInteger(PR.Current(), "Number of inner boundary closed curves", count);
100 */
101   if (PR.ReadInteger(PR.Current(), count)) {
102     if (count < 0){
103       Message_Msg Msg171("XSTEP_171");
104       PR.SendFail (Msg171);
105     }
106     else  if (count > 0) anInner =
107       new IGESGeom_HArray1OfCurveOnSurface(1, count);
108   }
109   else {
110     Message_Msg Msg171("XSTEP_171");
111     PR.SendFail(Msg171);
112   }
113
114   if (!PR.ReadEntity(IR, PR.Current(), aStatus,
115                 STANDARD_TYPE(IGESGeom_CurveOnSurface), anOuter,Standard_True)){
116     Message_Msg Msg172("XSTEP_172");
117     switch(aStatus) {
118     case IGESData_ReferenceError: {  
119       Message_Msg Msg216 ("IGES_216");
120       Msg172.Arg(Msg216.Value());
121       PR.SendFail(Msg172);
122       break; }
123     case IGESData_EntityError: {
124       Message_Msg Msg217 ("IGES_217");
125       Msg172.Arg(Msg217.Value());
126       PR.SendFail(Msg172);
127       break; }
128     case IGESData_TypeError: {
129       Message_Msg Msg218 ("IGES_218");
130       Msg172.Arg(Msg218.Value());
131       PR.SendFail(Msg172);
132       break; }
133     default:{
134     }
135     }
136   } //szv#4:S4163:12Mar99 `st=` not needed
137 /*  st = PR.ReadEntity(IR, PR.Current(), "Outer boundary curve",
138                      STANDARD_TYPE(IGESGeom_CurveOnSurface), anOuter,Standard_True);
139 */
140   if (! anInner.IsNull()) {
141     Standard_Integer I;
142     for (I = 1; I <= count; I++ ) {
143       Handle(IGESGeom_CurveOnSurface) tempEnt;
144       //st = PR.ReadEntity(IR, PR.Current(), Msg173,
145                            //STANDARD_TYPE(IGESGeom_CurveOnSurface), tempEnt); //szv#4:S4163:12Mar99 moved in if
146 /*      st = PR.ReadEntity(IR, PR.Current(), "Inner boundary curves",
147                          STANDARD_TYPE(IGESGeom_CurveOnSurface), tempEnt);
148 */
149       if (PR.ReadEntity(IR, PR.Current(), aStatus, STANDARD_TYPE(IGESGeom_CurveOnSurface), tempEnt))
150         anInner->SetValue(I, tempEnt);
151       else{
152         Message_Msg Msg173("XSTEP_173");
153         switch(aStatus) {
154         case IGESData_ReferenceError: {  
155           Message_Msg Msg216 ("IGES_216");
156           Msg173.Arg(Msg216.Value());
157           PR.SendFail(Msg173);
158           break; }
159         case IGESData_EntityError: {
160           Message_Msg Msg217 ("IGES_217");
161           Msg173.Arg(Msg217.Value());
162           PR.SendFail(Msg173);
163           break; }
164         case IGESData_TypeError: {
165           Message_Msg Msg218 ("IGES_218");
166           Msg173.Arg(Msg218.Value());
167           PR.SendFail(Msg173);
168           break; }
169         default:{
170         }
171         }
172       }
173     }
174   }
175
176   DirChecker(ent).CheckTypeAndForm(PR.CCheck(),ent);
177   ent->Init(aSurface, aFlag, anOuter, anInner);
178 }
179
180
181 //=======================================================================
182 //function : WriteOwnParams
183 //purpose  : 
184 //=======================================================================
185
186 void IGESGeom_ToolTrimmedSurface::WriteOwnParams
187   (const Handle(IGESGeom_TrimmedSurface)& ent, IGESData_IGESWriter& IW)  const
188 {
189   Standard_Integer up  = ent->NbInnerContours();
190   IW.Send(ent->Surface());
191   IW.Send(ent->OuterBoundaryType());
192   IW.Send(up);
193
194   if (ent->OuterBoundaryType())
195     IW.Send(ent->OuterContour());
196   else 
197     IW.Send(0);
198   Standard_Integer I;
199   for (I = 1; I <= up; I ++)
200     IW.Send(ent->InnerContour(I));
201 }
202
203
204 //=======================================================================
205 //function : OwnShared
206 //purpose  : 
207 //=======================================================================
208
209 void IGESGeom_ToolTrimmedSurface::OwnShared(const Handle(IGESGeom_TrimmedSurface)& ent,
210                                             Interface_EntityIterator& iter) const
211 {
212   Standard_Integer up  = ent->NbInnerContours();
213   iter.GetOneItem(ent->Surface());
214   iter.GetOneItem(ent->OuterContour());
215   Standard_Integer I;
216   for (I = 1; I <= up; I ++)  iter.GetOneItem(ent->InnerContour(I));
217 }
218
219
220 //=======================================================================
221 //function : OwnCopy
222 //purpose  : 
223 //=======================================================================
224
225 void IGESGeom_ToolTrimmedSurface::OwnCopy(const Handle(IGESGeom_TrimmedSurface)& another,
226                                           const Handle(IGESGeom_TrimmedSurface)& ent,
227                                           Interface_CopyTool& TC) const
228 {
229   Handle(IGESGeom_HArray1OfCurveOnSurface) anInner;
230
231   DeclareAndCast(IGESData_IGESEntity, aSurface,
232                  TC.Transferred(another->Surface()));
233   Standard_Integer aFlag = another->OuterBoundaryType();
234   DeclareAndCast(IGESGeom_CurveOnSurface, anOuter,
235                  TC.Transferred(another->OuterContour()));
236   Standard_Integer count = another->NbInnerContours();
237
238   if (count > 0) {
239     anInner = new IGESGeom_HArray1OfCurveOnSurface(1, count);
240     Standard_Integer I;
241     for (I = 1; I <= count; I++) {
242       DeclareAndCast(IGESGeom_CurveOnSurface, temp,
243                      TC.Transferred(another->InnerContour(I)));
244       anInner->SetValue(I, temp);
245     }
246   }
247
248   ent->Init(aSurface, aFlag, anOuter, anInner);
249 }
250
251
252 //=======================================================================
253 //function : DirChecker
254 //purpose  : 
255 //=======================================================================
256
257 IGESData_DirChecker IGESGeom_ToolTrimmedSurface::DirChecker
258   (const Handle(IGESGeom_TrimmedSurface)& /* ent */ )   const
259 {
260   IGESData_DirChecker DC(144, 0);
261   DC.Structure(IGESData_DefVoid);
262   DC.LineFont(IGESData_DefAny);
263 //  DC.LineWeight(IGESData_DefValue);
264   DC.Color(IGESData_DefAny);
265   DC.UseFlagRequired (0);
266   DC.HierarchyStatusIgnored();
267
268   return DC;
269 }
270
271
272 //=======================================================================
273 //function : OwnCheck
274 //purpose  : 
275 //=======================================================================
276
277 void IGESGeom_ToolTrimmedSurface::OwnCheck(const Handle(IGESGeom_TrimmedSurface)& ent,
278                                            const Interface_ShareTool&,
279                                            Handle(Interface_Check)& ach)  const
280 {
281   // MGE 31/07/98
282   // Building of messages
283   //========================================
284   //Message_Msg Msg172("XSTEP_172");
285   //========================================
286
287   if (ent->OuterBoundaryType() != 0 &&   ent->OuterBoundaryType() != 1) {
288     Message_Msg Msg172("XSTEP_172");
289     ach->SendFail(Msg172);
290   }
291 }
292
293
294 //=======================================================================
295 //function : OwnDump
296 //purpose  : 
297 //=======================================================================
298
299 void IGESGeom_ToolTrimmedSurface::OwnDump(const Handle(IGESGeom_TrimmedSurface)& ent,
300                                           const IGESData_IGESDumper& dumper,
301                                           Standard_OStream& S,
302                                           const Standard_Integer level)  const
303 {
304   Standard_Integer tempSubLevel = (level <= 4) ? 0 : 1;
305
306   S << "IGESGeom_TrimmedSurface\n"
307     << "Surface to be trimmed : ";
308   dumper.Dump(ent->Surface(),S, tempSubLevel);
309   S << "\n"
310     << "Boundary type    : " << ent->OuterBoundaryType() << "\n"
311     << "Outer Boundary   : ";
312   dumper.Dump(ent->OuterContour(),S, tempSubLevel);
313   S << "\n"
314     << "Inner Boundaries : ";
315   IGESData_DumpEntities(S,dumper ,level,1, ent->NbInnerContours(),ent->InnerContour);
316   S << std::endl;
317 }