1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
|
// 25.12.98 pdn renaming
// 02.02.99 cky/rln PRO17746: transmitting 'sketch' command to XSDRAWEUC
// 23.02.99 abv: method ShapeFix::FillFace() removed
// 02.03.99 cky/rln: command edgeregul only accepts tolerance
// 15.06.99 abv/pdn: command comptol added (from S4030)
#include <SWDRAW_ShapeTool.ixx>
#include <DBRep.hxx>
#include <TopAbs_ShapeEnum.hxx>
#include <TopoDS.hxx>
#include <TopoDS_Shape.hxx>
#include <TopoDS_Compound.hxx>
#include <TopoDS_Shell.hxx>
#include <TopoDS_Solid.hxx>
#include <TopoDS_Face.hxx>
#include <TopoDS_Wire.hxx>
#include <TopoDS_Edge.hxx>
#include <TopoDS_Vertex.hxx>
#include <BRepBuilderAPI.hxx>
// + edge, face
#include <TopoDS_Iterator.hxx>
#include <TopExp_Explorer.hxx>
#include <TopExp.hxx>
#include <BRep_Tool.hxx>
#include <Geom_Curve.hxx>
#include <Geom_Surface.hxx>
#include <gp_Pnt.hxx>
#include <gp_Pnt2d.hxx>
#include <TopTools_IndexedMapOfShape.hxx>
#include <BRepClass3d_SolidClassifier.hxx>
#include <BRepTools_WireExplorer.hxx>
#include <TopoDS_Iterator.hxx>
#include <BRep_Builder.hxx>
// + edgeregul/updtol
#include <BRepLib.hxx>
// + fillface
#include <Geom_TrimmedCurve.hxx>
#include <stdio.h>
#include <Precision.hxx>
#include <DrawTrSurf.hxx>
#include <GeomLib.hxx>
static Standard_Integer XSHAPE_edge
(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
{
if (argc < 2) { di<<"donner un nom de shape"<<"\n"; return 1 /* Error */; }
Standard_CString arg1 = argv[1];
TopoDS_Shape Shape = DBRep::Get(arg1);
if (Shape.IsNull()) { di<<arg1<<" inconnu"<<"\n"; return 1 /* Error */; }
Standard_Integer nbe = 0, nbf = 0; Standard_Real f3d,l3d;
for (TopExp_Explorer exp(Shape,TopAbs_EDGE); exp.More(); exp.Next()) {
TopoDS_Edge Edge = TopoDS::Edge (exp.Current()); nbe ++;
if (BRep_Tool::Degenerated(Edge)) continue;
Handle(Geom_Curve) curve3d = BRep_Tool::Curve (Edge,f3d,l3d);
if (curve3d.IsNull()) {
char nomsh[30];
nbf ++;
sprintf (nomsh,"faultedge_%d",nbf);
di<<"Edge sans Curve3d, n0 "<<nbe<<"\n";
DBRep::Set (nomsh,Edge);
}
}
return 0;
}
static Standard_Integer XSHAPE_explorewire
(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
{
char nomsh[30];
if (argc < 2) { di<<"donner un nom de wire"<<"\n"; return 1 /* Error */; }
Standard_CString arg1 = argv[1];
TopoDS_Shape Shape = DBRep::Get(arg1);
if (Shape.IsNull()) { di<<arg1<<" inconnu"<<"\n"; return 1 /* Error */; }
if (Shape.ShapeType() != TopAbs_WIRE) { di<<"Pas un WIRE"<<"\n"; return 1 /* Error */; }
TopoDS_Wire W = TopoDS::Wire (Shape);
TopoDS_Face F;
if (argc > 2) {
Standard_CString arg2 = argv[2];
TopoDS_Shape aLocalShape = DBRep::Get(arg2);
F = TopoDS::Face ( aLocalShape );
}
Standard_Integer i,num = 0, nbw, nbe = 0;
TopTools_IndexedMapOfShape map;
for (TopoDS_Iterator ext(W); ext.More(); ext.Next()) {
if (ext.Value().ShapeType() != TopAbs_EDGE) continue;
TopoDS_Edge E = TopoDS::Edge (ext.Value());
nbe ++; num = map.Add(E);
}
int* nbs = new int[nbe+1]; for (i = 0; i <= nbe; i ++) nbs[i] = 0;
di<<"TopoDS_Iterator(EDGE) donne "<<nbe<<" Edges dont "<<num<<" distinctes"<<"\n";
nbe = num;
nbw = 0;
for (TopExp_Explorer exe(W.Oriented(TopAbs_FORWARD),TopAbs_EDGE); exe.More(); exe.Next()) nbw ++;
di<<"TopExp_Explorer(EDGE) donne "<<nbw<<" Edges"<<"\n";
nbw = 0;
BRepTools_WireExplorer bwe;
if (F.IsNull()) bwe.Init(W);
else bwe.Init (W,F);
for (; bwe.More(); bwe.Next()) {
TopoDS_Edge E = TopoDS::Edge (bwe.Current());
nbw ++;
num = map.FindIndex(E);
nbs[num] ++;
}
di<<"BRepTools_WireExplorer donne "<<nbw<<" Edges"<<"\n";
di<<"Par rapport a la map, edges sautees par WE en NOWE_num, passees > 1 fois en MULTWE_num"<<"\n";
if (nbs[0] > 0) di<<"NB : Edge n0 0 comptee "<<nbs[0]<<" fois"<<"\n";
for (i = 1; i <= nbe; i ++) {
if (nbs[i] < 1) {
di<<"Edge n0 "<<i<<" pas vue par WE"<<"\n";
sprintf (nomsh,"NOWE_%d",i);
DBRep::Set (nomsh,map.FindKey(i));
} else if (nbs[i] > 1) {
di<<"Edge n0 "<<i<<" vue par WE : "<<nbs[i]<<" fois"<<"\n";
sprintf (nomsh,"MULT_%d",i);
DBRep::Set (nomsh,map.FindKey(i));
}
}
delete [] nbs;
return 0;
}
static Standard_Integer XSHAPE_ssolid
(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
{
if (argc < 3) { di<<"Give new solid name + shell name"<<"\n"; return 1 /* Error */; }
Standard_CString arg1 = argv[1];
TopoDS_Shape Shape = DBRep::Get(arg1);
if (Shape.IsNull()) { di<<"Shape unknown : "<<arg1<<"\n"; return 1 /* Error */; }
TopAbs_ShapeEnum shen = Shape.ShapeType();
if (shen == TopAbs_SOLID) {
di<<" Already a Solide ! nothing done"<<"\n";
return 0;
}
if (shen != TopAbs_SHELL) {
di<<" Not a Shell"<<"\n"; return 1 /* Error */;
}
if (!Shape.Free ()) {
di<<"Shape non Free -> Freeing"<<"\n";
Shape.Free(Standard_True);
}
TopoDS_Shell sh = TopoDS::Shell (Shape);
TopoDS_Solid solid;
BRep_Builder B;
B.MakeSolid (solid);
B.Add (solid,sh);
// Pas encore fini : il faut une bonne orientation
BRepClass3d_SolidClassifier bsc3d (solid);
bsc3d.PerformInfinitePoint(BRepBuilderAPI::Precision());
if (bsc3d.State() == TopAbs_IN) {
// Ensuite, inverser C-A-D REPRENDRE LES SHELLS
// (l inversion du solide n est pas bien prise en compte)
di<<"NB : Shell to be reversed"<<"\n";
TopoDS_Solid soli2;
B.MakeSolid (soli2); // on recommence
sh.Reverse();
B.Add (soli2,sh);
solid = soli2;
}
DBRep::Set(argv[2],solid);
return 0; // Done
}
static Standard_Integer XSHAPE_edgeregul
(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
{
//cky/rln 03.02.99 To eliminate dependence of SWDRAW on TKXSBase (to use only ShapeHealing)
Standard_Real tolang = -1; // = Interface_Static::RVal("XSTEP.encoderegularity.angle");
// if (argc < 3) di<<"Current value for regularity angle : "<<tolang<<"\n";
if (argc < 3) {
di<<"Donner nom de shape.\n + option : angle en radian, sinon la valeur courante est prise"<<"\n";
return 0;
}
Standard_CString arg1 = argv[1];
Standard_CString arg2 = argv[2];
if (argc > 2) tolang = atof (arg2);
if (tolang <= 0) {
di<<"Not a suitable value : "<<tolang<<"\n";
return 1 /* Error */;
}
TopoDS_Shape Shape = DBRep::Get(arg1);
if (Shape.IsNull()) { di<<"Shape unknown : "<<arg1<<"\n"; return 1 /* Error */; }
BRepLib::EncodeRegularity (Shape,tolang);
return 0; // Done
}
static Standard_Integer samerange (Draw_Interpretor& di, Standard_Integer argc, const char** argv)
{
if ( argc ==2 ) {
TopoDS_Shape Shape = DBRep::Get(argv[1]);
if (Shape.IsNull()) { di<<"Shape unknown: "<<argv[2]<<"\n"; return 1; }
for ( TopExp_Explorer exp(Shape,TopAbs_EDGE); exp.More(); exp.Next() ) {
TopoDS_Edge edge = TopoDS::Edge ( exp.Current() );
BRepLib::SameRange ( edge, Precision::PConfusion() );
}
}
else if ( argc == 7 ) {
Handle(Geom2d_Curve) C = DrawTrSurf::GetCurve2d(argv[2]);
if (C.IsNull()) { di<<"Curve unknown: "<<argv[2]<<"\n"; return 1; }
Standard_Real oldFirst = atof(argv[3]);
Standard_Real oldLast = atof(argv[4]);
Standard_Real current_first = atof(argv[5]);
Standard_Real current_last = atof(argv[6]);
Standard_Real Tol = Precision::PConfusion();
Handle(Geom2d_Curve) NewC2d;
GeomLib::SameRange(Tol, C, oldFirst,oldLast,
current_first, current_last, NewC2d);
DrawTrSurf::Set(argv[1],NewC2d);
}
else {
di << "Apply BRepLib::SameRange() to shape or GeomLib::SameRange() to pcurve:" << "\n";
di << "> samerange shape" << "\n";
di << "or" << "\n";
di << "> samerange newcurve curve2d first last newfirst newlast" << "\n";
}
return 0;
}
// ########################################
// ## DECLARATIONS ##
// ########################################
static int initactor = 0;
void SWDRAW_ShapeTool::InitCommands (Draw_Interpretor& theCommands)
{
if (initactor) return; initactor = 1;
const char* g;
g = "DE: old";
theCommands.Add ("anaedges","nom shape",
__FILE__,XSHAPE_edge,g);
theCommands.Add ("expwire","nom wire [nom face]",
__FILE__,XSHAPE_explorewire,g);
theCommands.Add ("ssolid","nom shell + nouveau nom solid",
__FILE__,XSHAPE_ssolid,g);
theCommands.Add ("edgeregul","shape val",
__FILE__,XSHAPE_edgeregul,g);
theCommands.Add ("samerange","{ shape | result curve2d first last newfirst newlast }",
__FILE__,samerange,g);
}
|
