projects / occt.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
0022898: IGES import fails in german environment
[occt.git] / src / TestTopOpeDraw / TestTopOpeDraw_OtherCommands.cxx
CommitLineData
b311480e 1// Created on: 1996-02-02
2// Created by: Jean Yves LEBEY
3// Copyright (c) 1996-1999 Matra Datavision
4// Copyright (c) 1999-2012 OPEN CASCADE SAS
5//
6// The content of this file is subject to the Open CASCADE Technology Public
7// License Version 6.5 (the "License"). You may not use the content of this file
8// except in compliance with the License. Please obtain a copy of the License
9// at http://www.opencascade.org and read it completely before using this file.
10//
11// The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
12// main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
13//
14// The Original Code and all software distributed under the License is
15// distributed on an "AS IS" basis, without warranty of any kind, and the
16// Initial Developer hereby disclaims all such warranties, including without
17// limitation, any warranties of merchantability, fitness for a particular
18// purpose or non-infringement. Please see the License for the specific terms
19// and conditions governing the rights and limitations under the License.
20
7fd59977 21
22#ifdef HAVE_CONFIG_H
23# include <config.h>
24#endif
25#include <TestTopOpeDraw.hxx>
26#include <TestTopOpeDraw_Displayer.hxx>
27#include <TestTopOpeDraw_TTOT.hxx>
28#include <DBRep.hxx>
29#include <BRepTools.hxx>
30#include <BRep_Tool.hxx>
31#include <Draw_Interpretor.hxx>
32#include <Draw_Appli.hxx>
33#include <TopOpeBRepTool_define.hxx>
34#include <stdio.h>
35#ifdef HAVE_STRINGS_H
36# include <strings.h>
37#endif
38
39//-----------------------------------------------------------------------
40// 0 = testtopopedraw_cdinp
41// 1,2,3,4 = display point p of coords x y z
42//-----------------------------------------------------------------------
43Standard_Integer testtopopedraw_cdinp(Draw_Interpretor&,Standard_Integer na,const char** a)
44{
45 if ( na < 5 ) return 0;
91322f44 46 TestTopOpeDraw_P3DDisplayer PD(a[1],Draw::Atof(a[2]),Draw::Atof(a[3]),Draw::Atof(a[4]));
7fd59977 47 return 0;
48}
49
50//-----------------------------------------------------------------------
51// DRAWsuppressarg : remove a[d], modify na--
52//-----------------------------------------------------------------------
53Standard_EXPORT void DRAWsuppressarg(Standard_Integer& na,const char** a,const Standard_Integer d)
54{
55 for(Standard_Integer i=d;i<na;i++) {
56 a[i]=a[i+1];
57 a[i+1]=NULL;
58 }
59 na--;
60}
61
62//-----------------------------------------------------------------------
63// DRAWsuppressargs : remove a[*] from <f> to <l>, modify na = na - (l - f)
64//-----------------------------------------------------------------------
65Standard_EXPORT void DRAWsuppressargs(Standard_Integer& na,const char** a,const Standard_Integer f,const Standard_Integer l)
66{
67 if(l == f)
68 DRAWsuppressarg(na,a,l);
69 if(l <= f) return;
70 for(Standard_Integer i=0;i<na-l;i++) {
71 a[i+f]=a[i+l+1];
72 a[i+l+1]=NULL;
73 }
74 na -= l-f+1;
75}
76
77//-----------------------------------------------------------------------
1d0a9d4d 78void OthersCommands_flags(Standard_Integer& na,const char** a,TestTopOpeDraw_Displayer& TD)
7fd59977 79//-----------------------------------------------------------------------
80{
81 Standard_Integer i,j,l,dloc = 0,iloc,decal = 0, NbArg = na;
82 Standard_Boolean dori = Standard_False; // display orientation
83 Standard_Boolean tgeo = Standard_False; // name with geometry
84 Standard_Boolean tori = Standard_False; // name with orientation
85 Standard_Real tpar = -1.0;
86 Standard_Integer inbr = 2; Standard_Boolean inbrdef = Standard_False;
87 Standard_Boolean col = Standard_False; // display specific color
88 Standard_Boolean tolflag = Standard_False;
89 Draw_Color Color;
90 for (i=1; i<NbArg; i++) {
91 iloc = i - decal;
92 if(!a[iloc]) break;
93 if (a[iloc][0] == '-') {
94 l = strlen(a[iloc]);
95 for (j=1; j<l; j++) {
96 if (a[iloc][j] == 'g') tgeo=Standard_True;
97 else if(!strcmp(a[iloc],"-tol")) tolflag = Standard_True;
98 else if(a[iloc][j] == 'o') tori=Standard_True;
99 else if(a[iloc][j] == 'O') dori=Standard_True;
100 else if(a[iloc][j] == 'i') {
101 if (j<(l-1)) {
102 char sis[40]; sis[0] = '\0';
103 Standard_Integer kk = 0, k = j+1;
104 for (; k<l; k++,kk++,sis[kk] = '\0' ) sis[kk] = a[iloc][k];
91322f44 105 inbr = Draw::Atoi(sis);
7fd59977 106 inbrdef = Standard_True;
107 }
108 }
109 else if(a[iloc][j] == 'p') {
110 if (iloc < na - 1) {
91322f44 111 tpar = Draw::Atof(a[iloc+1]);
7fd59977 112 dloc++; decal++;
113 }
114 }
115 else if(a[iloc][j] == 'c') {
116 col=Standard_True;
0d532383
S		 117 if(strcmp(a[iloc+1], "blanc") == 0) Color = Draw_blanc;
118 else if (strcmp(a[iloc+1], "rouge") == 0) Color = Draw_rouge;
119 else if (strcmp(a[iloc+1], "vert") == 0) Color = Draw_vert;
120 else if (strcmp(a[iloc+1], "bleu") == 0) Color = Draw_bleu;
121 else if (strcmp(a[iloc+1], "cyan") == 0) Color = Draw_cyan;
122 else if (strcmp(a[iloc+1], "or") == 0) Color = Draw_or;
123 else if (strcmp(a[iloc+1], "magenta") == 0) Color = Draw_magenta;
124 else if (strcmp(a[iloc+1], "marron") == 0) Color = Draw_marron;
125 else if (strcmp(a[iloc+1], "orange") == 0) Color = Draw_orange;
126 else if (strcmp(a[iloc+1], "rose") == 0) Color = Draw_rose;
127 else if (strcmp(a[iloc+1], "saumon") == 0) Color = Draw_saumon;
128 else if (strcmp(a[iloc+1], "violet") == 0) Color = Draw_violet;
129 else if (strcmp(a[iloc+1], "jaune") == 0) Color = Draw_jaune;
130 else if (strcmp(a[iloc+1], "kaki") == 0) Color = Draw_kaki;
131 else if (strcmp(a[iloc+1], "corail") == 0) Color = Draw_corail;
7fd59977 132 decal++;dloc++;
133 }
134 }
135 DRAWsuppressargs(na,a,iloc,iloc+dloc);
136 decal++;
137 dloc = 0;
138 }
139 }
140 if (inbr < 0 ) inbr = 2;
141 TD.DisplayNameWithGeometry(tgeo);
142 TD.DisplayNameWithOrientation(tori);
143 TD.DisplayGeometry(dori);
144 TD.NbIsos(inbr); TD.NbIsosDef(inbrdef);
145 TD.SetPar(tpar);
146 TD.TolIs(tolflag);
147 if(col) TD.SetColor(Color);
148}
149
150//-----------------------------------------------------------------------
151// OthersCommands_help
152//-----------------------------------------------------------------------
153
154Standard_EXPORT void OthersCommands_help(const char* CommandName, const char* syntaxe = "")
155{
156 if(strlen(syntaxe))
157 cout<<CommandName<<syntaxe<<endl;
158 cout<<" -p <parameter> to display the name of an edge round a point of <parameter>"<<endl;
159 cout<<" in [0,1] on edge curve range. Default value is 0.3"<<endl;
160// cout<<" -p <par> : on edge , diplay name at t in [0..1]"<<endl;
161 cout<<" -o : display name = DBRep name + orientation"<<endl;
162 cout<<" -g : display name = DBRep name + geometry"<<endl;
163 cout<<" -O : visualize shape orientation"<<endl;
164 cout<<" -i<n> : visualize face with <n> isos"<<endl;
165 cout<<" -c <col> : display name with color col (Draw_blanc, Draw_rouge, ...)"<<endl;
166 cout<<" -tol to display vertices with a circle of radius equal to its tolerance."<<endl;
167 cout<<"example : '"<<CommandName<<" -p 0.8 e 8 9 23'"<<endl;
168 cout<<""<<endl;
169}
170//-----------------------------------------------------------------------
171// 0 = testtopopedraw_cdins
172// 1,2,3,... = display shapes and visualise their names
173//-----------------------------------------------------------------------
174
175Standard_Integer testtopopedraw_cdins(Draw_Interpretor&,Standard_Integer na,const char** a)
176{
177 if (na == 1) {
178 const char* syntaxe = " [arg] S : display shape S with its DBRep name";
179 OthersCommands_help(a[0], syntaxe);
180 return 0;
181 }
182
183 TestTopOpeDraw_Displayer TD;
184 OthersCommands_flags(na, a, TD);
185
186 Standard_Integer i ;
187 for ( i=1;i<na;i++) {
188 const TopoDS_Shape& S = DBRep::Get(a[i]);
189 if (S.IsNull()) continue;
190 const TopAbs_ShapeEnum t = S.ShapeType();
191 if (t == TopAbs_FACE) continue;
192 if (t == TopAbs_EDGE) continue;
193 if (t == TopAbs_VERTEX) continue;
194 TD.DisplayShape(a[i],S);
195 }
196
197 for (i=1;i<na;i++) {
198 const TopoDS_Shape& S = DBRep::Get(a[i]); if (S.IsNull()) continue;
199 const TopAbs_ShapeEnum t = S.ShapeType();
200 if (t == TopAbs_FACE) TD.DisplayShape(a[i],S);
201 }
202
203 for (i=1;i<na;i++) {
204 const TopoDS_Shape& S = DBRep::Get(a[i]); if (S.IsNull()) continue;
205 const TopAbs_ShapeEnum t = S.ShapeType();
206 if (t == TopAbs_EDGE) TD.DisplayShape(a[i],S);
207 }
208
209 for (i=1;i<na;i++) {
210 const TopoDS_Shape& S = DBRep::Get(a[i]); if (S.IsNull()) continue;
211 const TopAbs_ShapeEnum t = S.ShapeType();
212 if (t != TopAbs_VERTEX) continue;
213 if(TD.TolIs()) {
214 const TopoDS_Vertex& V = TopoDS::Vertex(S);
215 Standard_Real Tol = BRep_Tool::Tolerance(V);
216 TD.SetTol(Tol);
217 }
218 TD.DisplayShape(a[i],S);
219 }
220
221 return 0;
222}
223
224static void BoopReadInitFile(Draw_Interpretor& di, const char* filename)
225{
226 if (filename == NULL) return;
227 di.EvalFile(filename);
228}
229
230static Standard_Integer ttab(Draw_Interpretor& di, Standard_Integer narg, const char** a) {
231 char s[2000]; strcpy(s,"");
91322f44 232 Sprintf(s,"%s%s",s,"proc addt {at args} {upvar $at x;set L \"\";addl L [join $args];");
233 Sprintf(s,"%s%s",s,"foreach l $L {set x([array size x]) $l}};");
7fd59977 234 di.Eval(s);
235 return 0;
236}
237
238Standard_IMPORT Draw_Color DrawTrSurf_CurveColor(const Draw_Color col);
239Standard_IMPORT void DBRep_WriteColorOrientation ();
240Standard_IMPORT Draw_Color DBRep_ColorOrientation (const TopAbs_Orientation Or);
241
242#include <Geom2d_TrimmedCurve.hxx>
243#include <DrawTrSurf.hxx>
244#include <TopExp.hxx>
245
246#include <TopTools_DataMapIteratorOfDataMapOfOrientedShapeInteger.hxx>
247#include <TopTools_DataMapOfOrientedShapeInteger.hxx>
248#include <TopTools_DataMapIteratorOfDataMapOfIntegerShape.hxx>
249#include <TopTools_DataMapOfIntegerShape.hxx>
250
251#include <TopTools_IndexedDataMapOfShapeListOfShape.hxx>
252#include <TopExp_Explorer.hxx>
253#include <TopoDS_Face.hxx>
254#include <TopoDS_Edge.hxx>
255#include <TopoDS_Vertex.hxx>
256#include <TColStd_ListIteratorOfListOfAsciiString.hxx>
257#include <TColStd_ListOfAsciiString.hxx>
258#include <TestTopOpeDraw_ListOfPnt2d.hxx>
259
260class cvx2d {
261
262public:
263 cvx2d(Draw_Interpretor& di) {
264 clearall();
265 mypdi = &di;
266 }
267
268 const TopoDS_Face& face() const { return myface; }
269 const TCollection_AsciiString& facename() const { return myfacename; }
270
271 void erasevisible() {
272 TColStd_ListIteratorOfListOfAsciiString i(myvis);
273 Standard_Boolean ya = i.More();
274 TCollection_AsciiString str = "erase";
275 for (; i.More(); i.Next()) {
276 const TCollection_AsciiString& s = i.Value();
277 str = str + " " + s;
278 }
279 if (ya) {
280 TCollection_AsciiString str1 = "erase -mute;"; mypdi->Eval(str1.ToCString());
281 str = str + ";"; mypdi->Eval(str.ToCString());
282 }
283 clearvisible();
284 }
285
286 void addvisible(const TCollection_AsciiString& N) { myvis.Append(N); }
287 void clearvisible() { myvis.Clear(); }
288
289 const TopoDS_Edge& edge(const Standard_Integer ie) const {
290 if ( ie >= 1 && ie <= mymapis.Extent()) {
291 const TopoDS_Edge& E = TopoDS::Edge(mymapis.Find(ie));
292 return E;
293 }
294 return myemptyedge;
295 }
296
297 Standard_Integer nedge() const { return mymapis.Extent(); }
298
299 void clearall() {
300 clearvisible();
301 mymapve.Clear();
302 mymapsi.Clear(); mymapis.Clear(); mynemap = 0; myiemap = 1; myedgedisplayed = 0;
303 myface.Nullify();
304 myfacename = "";
305 }
306
307 void addedge(const TopoDS_Shape& E) {
308 mynemap++;
309 mymapsi.Bind(E,mynemap);
310 mymapis.Bind(mynemap,E);
311 }
312
313 void initface(const TopoDS_Face& F,const TCollection_AsciiString& N) {
314 clearall();
315 myface = F; myfacename = N;
316 TopExp::MapShapesAndAncestors(myface,TopAbs_VERTEX,TopAbs_EDGE,mymapve);
317 TopExp_Explorer e;
318 for (e.Init(F,TopAbs_EDGE);e.More();e.Next()) addedge(e.Current());
319// for (TopExp_Explorer e(F,TopAbs_EDGE);e.More();e.Next()) addedge(e.Current());
320 initedgeiter();
321 setedgedisplayed(0);
322 }
323
324 void displayface() const {
325 char s[1000];
326 mypdi->Eval("info proc vx2d_displayface");
327 if (mypdi->Result()) {
91322f44 328 Sprintf(s,"vx2d_displayface %s",myfacename.ToCString());
7fd59977 329 mypdi->Eval(s);
330 }
331 else cout<<"procedure vx2d_displayface non trouvee"<<endl;
332 }
333
334 Standard_Integer eindex(const TopoDS_Shape& E) const {
335 const Standard_Integer ie = mymapsi.Find(E);
336 return ie;
337 }
338
339 void ename(const TopoDS_Shape& S,TCollection_AsciiString& ste) const {
340 ste = "";
341 if (S.ShapeType() != TopAbs_EDGE) return;
342 const TopoDS_Edge& E = TopoDS::Edge(S);
343 const Standard_Integer ie = eindex(E);
344 TopAbs_Orientation oe = E.Orientation();
345 TCollection_AsciiString stoe;TestTopOpeDraw_TTOT::OrientationToString(oe,stoe);
346 stoe = stoe.SubString(1,1);stoe.LowerCase();
347 Standard_Boolean deg = BRep_Tool::Degenerated(E);
348 if (deg) ste="D";
349 ste=ste+"e"+ie+stoe;
350 }
351
352 void vname(const TopoDS_Shape& V, const TopoDS_Shape& E,TCollection_AsciiString& stv) const {
353 stv = "";
354 if (V.ShapeType() != TopAbs_VERTEX) return;
355 TopAbs_Orientation ov = V.Orientation();
356 TCollection_AsciiString sto;TestTopOpeDraw_TTOT::OrientationToString(ov,sto);
357 TCollection_AsciiString sto11 = sto.SubString(1,1); sto11.LowerCase();
358 const TopTools_ListOfShape& l = mymapve.FindFromKey(V);
359 Standard_Integer ne=l.Extent(); TCollection_AsciiString ste; ename(E,ste);
360 stv.Copy("v"); stv=stv+sto11+ste+"."+ne;
361 }
362
363 void fenames(TCollection_AsciiString& stef) const {
364 stef="";
365 Standard_Integer i=1,n=nedge();
366 for (;i<=n;i++) {
367 TCollection_AsciiString ste;ename(edge(i),ste);
368 stef=stef+ste+" ";
369 }
370 }
371
372 Draw_Color color(const TopoDS_Shape& S) const {
373 Draw_Color col = Draw_blanc;
374 TopAbs_Orientation o = S.Orientation();
375 TopAbs_ShapeEnum t = S.ShapeType();
376 if ( t == TopAbs_VERTEX ) {
377 if ( o == TopAbs_FORWARD ) col = Draw_magenta;
378 else if ( o == TopAbs_REVERSED ) col = Draw_cyan;
379 else col = DBRep_ColorOrientation(o);
380 }
381 else if ( t == TopAbs_EDGE ) {
382 if (o == TopAbs_FORWARD) col = Draw_magenta;
383 else if (o == TopAbs_REVERSED) col = Draw_cyan;
384 else col = DBRep_ColorOrientation(o);
385 }
386 return col;
387 }
388
389 const TopTools_ListOfShape& incidentedges(const TopoDS_Shape& V) const {
390 if ( ! mymapve.Contains(V) ) return myemptylos;
391 return mymapve.FindFromKey(V);
392 }
393
394 void lenames(const TopTools_ListOfShape& l,TCollection_AsciiString& stel) const {
395 stel = "";Standard_Integer j = 0;
396 for (TopTools_ListIteratorOfListOfShape it(l);it.More();it.Next(),j++) {
397 if (j) stel = stel + " ";
398 TCollection_AsciiString ste; ename(it.Value(),ste);
399 stel = stel + ste;
400 }
401 }
402
403 void subshapename(const TCollection_AsciiString& sts,const TopAbs_ShapeEnum tss,const Standard_Integer i,TCollection_AsciiString& stss) const {
404 TCollection_AsciiString s; TestTopOpeDraw_TTOT::ShapeEnumToString(tss,s);
405 stss=sts+"_"+s+i;
406 }
407
408 Handle(Geom2d_Curve) curve2d(const TopoDS_Edge& E) const {
409 Standard_Real f,l; const Handle(Geom2d_Curve) c = BRep_Tool::CurveOnSurface(E,myface,f,l);
410 if (c.IsNull()) return c;
411 Handle(Geom2d_Curve) nc = new Geom2d_TrimmedCurve(c,f,l);
412 return nc;
413 }
414
415 void printedges() const {
416 Standard_Integer n=nedge();if (!n) return;
417//JR/Hp
418 TCollection_AsciiString se=(Standard_CString ) ((n==1)?" edge :":" edges :");
419// TCollection_AsciiString se=(n==1)?" edge :":" edges :";
420 TCollection_AsciiString s;s=s+"# face "+myfacename+" : "+n+se;
421 TCollection_AsciiString sb(s.Length()-1,' ');
422 cout<<endl<<s;
423 for (Standard_Integer i=1;i<=n;i++) {
424 TCollection_AsciiString stei;ename(edge(i),stei);cout<<" "<<stei;
425 if ((i>1) && (i%4 == 0) && (i<n)) cout<<endl<<"#"<<sb;
426 }
427 cout<<endl;
428 cout.flush();
429 }
430
431 Standard_Integer displayface(const TopoDS_Shape& S, const TCollection_AsciiString& sta);
432 Standard_Integer displayedge(const TopoDS_Shape& S);
433
434 void initedgeiter() { myiemap = 1; }
435 Standard_Boolean moreedgeiter() const { return myiemap <= mynemap; }
436 void nextedgeiter(const Standard_Integer incr = +1);
437 Standard_Integer curredgeiter() const { return myiemap; }
438 void setcurredgeiter(const Standard_Integer i) { if (i>=1 &&i<=mynemap) myiemap = i; }
439 Standard_Integer edgedisplayed() const { return myedgedisplayed; }
440 void setedgedisplayed(const Standard_Integer i) { if (i>=1 &&i<=mynemap) myedgedisplayed = i; }
441
442 TopoDS_Face myface; TCollection_AsciiString myfacename;
443 TColStd_ListOfAsciiString myvis;
444 TopTools_IndexedDataMapOfShapeListOfShape mymapve;
445
446 TopTools_DataMapOfOrientedShapeInteger mymapsi;
447 TopTools_DataMapOfIntegerShape mymapis;
448 Standard_Integer mynemap;
449 Standard_Integer myiemap;
450 Standard_Integer myedgedisplayed;
451
452 Draw_Interpretor* mypdi;
453 TopoDS_Edge myemptyedge;
454 TopTools_ListOfShape myemptylos;
455}; // cvx2d
456
457void cvx2d::nextedgeiter(const Standard_Integer incr)
458{
459 if (!moreedgeiter()) return;
460 myiemap += incr;
461 if (myiemap>mynemap) myiemap = 1;
462 else if (myiemap<1) myiemap = mynemap;
463}
464
465Standard_Integer cvx2d::displayface(const TopoDS_Shape& S, const TCollection_AsciiString& sta) {
466 TopoDS_Shape aLocalShape = S.Oriented(TopAbs_FORWARD) ;
467 TopoDS_Face F = TopoDS::Face(aLocalShape);
468// TopoDS_Face F = TopoDS::Face(S.Oriented(TopAbs_FORWARD));
469 Standard_Boolean init = Standard_True;
470 if (init) initface(F,sta);
471 displayface();
472 printedges();
473 return 0;
474} // displayface
475
476Standard_Integer cvx2d::displayedge(const TopoDS_Shape& S) {
477 if (S.IsNull()) return 0;
478 const TopoDS_Edge& E = TopoDS::Edge(S);
479 const TopoDS_Face& F = face();
480 if (F.IsNull()) return 0;
481
482 Draw_Color savecol = DrawTrSurf_CurveColor(Draw_Color(Draw_rouge));
483
484 Standard_Real u,v,V,U;BRepTools::UVBounds(F,E,u,U,v,V);
485 Standard_Boolean deg = BRep_Tool::Degenerated(E);
486 gp_Pnt2d pe1(u,v);gp_Pnt2d pe2(U,V);
487 gp_Pnt2d p1,p2;BRep_Tool::UVPoints(E,F,p1,p2);
488 TopoDS_Vertex v1,v2; TopExp::Vertices(E,v1,v2);
489 gp_Pnt P1 = BRep_Tool::Pnt(v1);
490 gp_Pnt P2 = BRep_Tool::Pnt(v2);
491 Standard_Real v1v2 = P1.Distance(P2);
492 Standard_Real tole = BRep_Tool::Tolerance(E);
493 Standard_Real tol1 = BRep_Tool::Tolerance(v1);
494 Standard_Real tol2 = BRep_Tool::Tolerance(v2);
495 const TopTools_ListOfShape& l1 = incidentedges(v1);
496 const TopTools_ListOfShape& l2 = incidentedges(v2);
497 Handle(Geom2d_Curve) c2d = curve2d(E);
498
499// char sdi[1000];
500 char stol[1000];
501 TCollection_AsciiString ste,stc,sv1,sv1a,sv2,sv2a,ste1,ste2;
502
503 ename(E,ste);
504 stc = "c"; stc = stc + ste;
505 vname(v1,E,sv1); sv1a = "V"; sv1a = sv1a + sv1;
506 vname(v2,E,sv2); sv2a = "V"; sv2a = sv2a + sv2;
507 lenames(l1,ste1);
508 lenames(l2,ste2);
509
510 cout<<endl;
91322f44 511 Sprintf(stol,"%g",tole);
7fd59977 512 cout<<"# "<<ste<<" : tole "<<stol<<" : uv "<<pe1.X()<<" "<<pe1.Y()<<" UV "<<pe2.X()<<" "<<pe2.Y();
513 cout<<endl;
91322f44 514 Sprintf(stol,"%g",tol1);
7fd59977 515 cout<<"# "<<sv1<<" : tol1 "<<stol<<" : uv "<<p1.X()<<" "<<p1.Y()<<" : edges "<<ste1;
516 cout<<endl;
91322f44 517 Sprintf(stol,"%g",tol2);
7fd59977 518 cout<<"# "<<sv2<<" : tol2 "<<stol<<" : uv "<<p2.X()<<" "<<p2.Y()<<" : edges "<<ste2;
519 cout<<endl;
91322f44 520 Sprintf(stol,"%g",v1v2); cout<<"# v1v2 = "<<stol;
7fd59977 521 cout<<endl;
522 cout.flush();
523
524 erasevisible();
525 TestTopOpeDraw_C2DDisplayer TDC2D;
526 TestTopOpeDraw_P2DDisplayer TDP2D;
527 TestTopOpeDraw_Displayer TD;
528
529 TDC2D.AllColors(color(E)); TDC2D.DisplayC2D(stc,ste,c2d);
530 TDP2D.AllColors(color(v1));TDP2D.DisplayP2D(sv1,p1);
531 TDP2D.AllColors(color(v2));TDP2D.DisplayP2D(sv2,p2);
532 TD.AllColors(color(E));TD.DisplayShape(ste,ste,E);
533 if (!deg) {
534 TD.AllColors(color(v1));TD.DisplayShape(sv1a,sv1,v1);
535 TD.AllColors(color(v2));TD.DisplayShape(sv2a,sv2,v2);
536 }
537 else {
538 TD.AllColors(Draw_Color(Draw_blanc));TD.DisplayShape(sv1a,"",v1);
539 }
540 addvisible(stc);
541 addvisible(sv1);
542 addvisible(sv2);
543 addvisible(ste);
544 addvisible(sv1a);
545 addvisible(sv2a);
546 Standard_Integer ie = eindex(E);
547 setcurredgeiter(ie);
548 setedgedisplayed(ie);
549
550 DrawTrSurf_CurveColor(savecol);
551 return 0;
552} // displayedge
553
554//=======================================================================
555// vx2d
556//=======================================================================
557Standard_Integer vx2d(Draw_Interpretor& di, Standard_Integer na, const char** a)
558{
559 static cvx2d *pv2d = NULL;
560#define ISINTEGER(MMstr) ((strspn((MMstr),"0123456789") == strlen((MMstr))))
561
562 BoopReadInitFile(di,"vx2d.tcl");
563 if (na < 2) return 0;
564 if (pv2d == NULL) pv2d = (cvx2d*) new cvx2d(di);
565
566 Standard_Integer dostep = 0;Standard_Integer doiedge= 0;
567 for(Standard_Integer ia=1;ia<na;ia++) {
568 if (!strcasecmp(a[1],"-n")) { dostep=+1; DRAWsuppressarg(na,a,ia); }
569 else if(!strcasecmp(a[1],"-p")) { dostep=-1; DRAWsuppressarg(na,a,ia); }
91322f44 570 else if (ISINTEGER(a[1])) { doiedge=Draw::Atoi(a[1]); DRAWsuppressarg(na,a,ia); }
7fd59977 571 }
572
573 if (dostep) {
574 if (pv2d->edgedisplayed()) pv2d->nextedgeiter(dostep);
575 if (pv2d->moreedgeiter()) pv2d->displayedge(pv2d->edge(pv2d->curredgeiter()));
576 return 0;
577 }
578 else if (doiedge) {
579 pv2d->setcurredgeiter(doiedge);
580 if (pv2d->moreedgeiter()) pv2d->displayedge(pv2d->edge(pv2d->curredgeiter()));
581 return 0;
582 }
583
584 TopoDS_Shape S = DBRep::Get(a[1]); if (S.IsNull()) return 0;
585 TCollection_AsciiString sta1(a[1]); TopAbs_ShapeEnum t = S.ShapeType();
586 TopAbs_ShapeEnum tt = ( t == TopAbs_FACE) ? TopAbs_EDGE : TopAbs_FACE;
587
91322f44 588 Standard_Integer iearg = (na >= 3) ? Draw::Atoi(a[2]) : 0;
7fd59977 589 TCollection_AsciiString stss; Standard_Integer i = 1;
590 TopExp_Explorer ex;
591 for (ex.Init(S,tt);ex.More();ex.Next(),i++) {
592// for (TopExp_Explorer ex(S,tt);ex.More();ex.Next(),i++) {
593 Standard_Boolean cond = Standard_False;
594 cond = cond || (!iearg);
595 cond = cond || (iearg && (iearg == i));
596 if (cond) {
597 pv2d->subshapename(sta1,tt,i,stss);
598 DBRep::Set(stss.ToCString(),ex.Current());
599 di<<"vx2d "<<stss.ToCString()<<"\n";
600 //cout.flush();
601 }
602 }
603
604 Standard_Integer r = 0;
605 if (t == TopAbs_FACE) r = pv2d->displayface(S,sta1);
606 else if (t == TopAbs_EDGE) r = pv2d->displayedge(S);
607 return r;
608} // vx2d
609
610//=======================================================================
611//function : OtherCommands
612//purpose :
613//=======================================================================
614
615void TestTopOpeDraw::OtherCommands(Draw_Interpretor& theCommands)
616{
617 const char* g = "Topological Operation other commands";
618 theCommands.Add("cdinp","cdinp p x y z",__FILE__,testtopopedraw_cdinp,g);
619 theCommands.Add("cdins","cdins s1 ... ",__FILE__,testtopopedraw_cdins,g);
620 theCommands.Add("vx2d","vx2d f",__FILE__,vx2d,g);
621 BoopReadInitFile(theCommands,getenv("BOOPGLOB"));
622 theCommands.Add("ttab","",__FILE__,ttab,g);
623}
Open CASCADE Technology repository