src/BRepTest/BRepTest_PrimitiveCommands.cxx

   1 // Created on: 1993-07-22
   2 // Created by: Remi LEQUETTE
   3 // Copyright (c) 1993-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
  21
  22
  23 #include <BRepTest.hxx>
  24 #include <DBRep.hxx>
  25 #include <Draw_Interpretor.hxx>
  26 #include <Draw_Appli.hxx>
  27 #include <DrawTrSurf.hxx>
  28 #include <TopoDS_Solid.hxx>
  29 #include <BRep_Builder.hxx>
  30 #include <BRepBuilderAPI.hxx>
  31 #include <BRepPrimAPI_MakeBox.hxx>
  32 #include <BRepPrimAPI_MakeWedge.hxx>
  33 #include <BRepPrimAPI_MakeCylinder.hxx>
  34 #include <BRepPrimAPI_MakeCone.hxx>
  35 #include <BRepPrimAPI_MakeSphere.hxx>
  36 #include <BRepPrimAPI_MakeTorus.hxx>
  37 #include <BRepPrimAPI_MakeSphere.hxx>
  38 #include <Geom_Plane.hxx>
  39 #include <gp_Pln.hxx>
  40
  41
  42 //=======================================================================
  43 // box
  44 //=======================================================================
  45
  46 static Standard_Integer box(Draw_Interpretor& , Standard_Integer n, const char** a)
  47 {
  48   if (n < 5) return 1;
  49   Standard_Real dx = Draw::Atof(a[n-3]);
  50   Standard_Real dy = Draw::Atof(a[n-2]);
  51   Standard_Real dz = Draw::Atof(a[n-1]);
  52
  53   TopoDS_Solid S;
  54
  55   if (n > 5) {
  56     if (n < 8) return 1;
  57     Standard_Real x = Draw::Atof(a[2]);
  58     Standard_Real y = Draw::Atof(a[3]);
  59     Standard_Real z = Draw::Atof(a[4]);
  60     S = BRepPrimAPI_MakeBox(gp_Pnt(x,y,z),dx,dy,dz);
  61   }
  62   else {
  63     S = BRepPrimAPI_MakeBox(dx,dy,dz);
  64   }
  65
  66   DBRep::Set(a[1],S);
  67   return 0;
  68 }
  69
  70 //=======================================================================
  71 // wedge
  72 //=======================================================================
  73
  74 static Standard_Integer wedge(Draw_Interpretor& , Standard_Integer n, const char** a)
  75 {
  76   TopoDS_Solid S;
  77
  78 //  Standard_Integer i = 0;
  79   if ( n == 15 || n == 18) {
  80     gp_Pnt LocalP(Draw::Atof(a[2]),Draw::Atof(a[3]),Draw::Atof(a[4]));
  81     gp_Dir LocalN(Draw::Atof(a[5]),Draw::Atof(a[6]),Draw::Atof(a[7]));
  82     gp_Dir LocalVx(Draw::Atof(a[8]),Draw::Atof(a[9]),Draw::Atof(a[10]));
  83     gp_Ax2 Axis(LocalP,LocalN,LocalVx);
  84 //    gp_Ax2 Axis(gp_Pnt(Draw::Atof(a[2]),Draw::Atof(a[3]),Draw::Atof(a[4])),
  85 //              gp_Dir(Draw::Atof(a[5]),Draw::Atof(a[6]),Draw::Atof(a[7])),
  86 //              gp_Dir(Draw::Atof(a[8]),Draw::Atof(a[9]),Draw::Atof(a[10])));
  87     if ( n == 15) {
  88       S = BRepPrimAPI_MakeWedge(Axis,
  89                             Draw::Atof(a[11]),Draw::Atof(a[12]),Draw::Atof(a[13]),Draw::Atof(a[14]));
  90     }
  91     else {
  92       S = BRepPrimAPI_MakeWedge(Axis,
  93                             Draw::Atof(a[11]),Draw::Atof(a[12]),Draw::Atof(a[13]),
  94                             Draw::Atof(a[14]),Draw::Atof(a[15]),Draw::Atof(a[16]),Draw::Atof(a[17]));
  95     }
  96   }
  97   else if (n == 6) {
  98     S = BRepPrimAPI_MakeWedge(Draw::Atof(a[2]),Draw::Atof(a[3]),Draw::Atof(a[4]),Draw::Atof(a[5]));
  99   }
 100   else if (n == 9){
 101     S = BRepPrimAPI_MakeWedge(Draw::Atof(a[2]),Draw::Atof(a[3]),Draw::Atof(a[4]),
 102                           Draw::Atof(a[5]),Draw::Atof(a[6]),Draw::Atof(a[7]),Draw::Atof(a[8]));
 103   }
 104   else
 105     return 1;
 106
 107   DBRep::Set(a[1],S);
 108   return 0;
 109 }
 110
 111 //=======================================================================
 112 // cylinder
 113 //=======================================================================
 114
 115 static Standard_Integer cylinder(Draw_Interpretor& , Standard_Integer n, const char** a)
 116 {
 117   if (n < 3) return 1;
 118   TopoDS_Solid S;
 119   Handle(Geom_Plane) P =
 120     Handle(Geom_Plane)::DownCast(DrawTrSurf::Get(a[2]));
 121
 122   if (n == 4) {
 123       S = BRepPrimAPI_MakeCylinder(Draw::Atof(a[2]),Draw::Atof(a[3]));
 124   }
 125   else if (n == 5) {
 126     if (P.IsNull())
 127       S = BRepPrimAPI_MakeCylinder(Draw::Atof(a[2]),Draw::Atof(a[3]),Draw::Atof(a[4]) * (M_PI / 180.0));
 128     else
 129       S = BRepPrimAPI_MakeCylinder(P->Pln().Position().Ax2(),Draw::Atof(a[3]),Draw::Atof(a[4]));
 130   }
 131   else if (n == 6) {
 132     if (P.IsNull())
 133       return 1;
 134     else
 135       S = BRepPrimAPI_MakeCylinder(P->Pln().Position().Ax2(),Draw::Atof(a[3]),Draw::Atof(a[4]),Draw::Atof(a[5]) * (M_PI / 180.0));
 136   }
 137   else
 138     return 1;
 139
 140   DBRep::Set(a[1],S);
 141   return 0;
 142 }
 143
 144 //=======================================================================
 145 // cone
 146 //=======================================================================
 147
 148 static Standard_Integer cone(Draw_Interpretor& , Standard_Integer n, const char** a)
 149 {
 150   if (n < 3) return 1;
 151   TopoDS_Solid S;
 152
 153   Handle(Geom_Plane) P =
 154     Handle(Geom_Plane)::DownCast(DrawTrSurf::Get(a[2]));
 155
 156   if (n == 5) {
 157     S = BRepPrimAPI_MakeCone(Draw::Atof(a[2]),Draw::Atof(a[3]),Draw::Atof(a[4]));
 158   }
 159   else if (n == 6) {
 160     if (P.IsNull())
 161       S = BRepPrimAPI_MakeCone(Draw::Atof(a[2]),Draw::Atof(a[3]),Draw::Atof(a[4]),Draw::Atof(a[5]) * (M_PI / 180.0));
 162     else
 163       S = BRepPrimAPI_MakeCone(P->Pln().Position().Ax2(),Draw::Atof(a[3]),Draw::Atof(a[4]),Draw::Atof(a[5]));
 164   }
 165   else if (n == 7) {
 166     S = BRepPrimAPI_MakeCone(P->Pln().Position().Ax2(),Draw::Atof(a[3]),Draw::Atof(a[4]),Draw::Atof(a[5]),Draw::Atof(a[6]) * (M_PI / 180.0));
 167   }
 168   else
 169     return 1;
 170
 171   DBRep::Set(a[1],S);
 172   return 0;
 173 }
 174
 175 //=======================================================================
 176 // sphere
 177 //=======================================================================
 178
 179 static Standard_Integer sphere(Draw_Interpretor& , Standard_Integer n, const char** a)
 180 {
 181   if (n < 3) return 1;
 182   TopoDS_Solid S;
 183
 184   Handle(Geom_Plane) P =
 185     Handle(Geom_Plane)::DownCast(DrawTrSurf::Get(a[2]));
 186
 187   if (n == 3) {
 188     S = BRepPrimAPI_MakeSphere(Draw::Atof(a[2]));
 189   }
 190   else if (n == 4) {
 191     if (P.IsNull())
 192       S = BRepPrimAPI_MakeSphere(Draw::Atof(a[2]),Draw::Atof(a[3]) * (M_PI / 180.0));
 193     else
 194       S = BRepPrimAPI_MakeSphere(P->Pln().Position().Ax2(),Draw::Atof(a[3]));
 195   }
 196   else if (n == 5) {
 197     if (P.IsNull())
 198       S = BRepPrimAPI_MakeSphere(Draw::Atof(a[2]),Draw::Atof(a[3]) * (M_PI / 180.0),Draw::Atof(a[4]) * (M_PI / 180.0));
 199     else
 200       S = BRepPrimAPI_MakeSphere(P->Pln().Position().Ax2(),Draw::Atof(a[3]),Draw::Atof(a[4]) * (M_PI / 180.0));
 201   }
 202   else if (n == 6) {
 203     if (P.IsNull())
 204       S = BRepPrimAPI_MakeSphere(Draw::Atof(a[2]),Draw::Atof(a[3]) * (M_PI / 180.0),Draw::Atof(a[4]) * (M_PI / 180.0),Draw::Atof(a[5]) * (M_PI / 180.0));
 205     else
 206       S = BRepPrimAPI_MakeSphere(P->Pln().Position().Ax2(),Draw::Atof(a[3]),Draw::Atof(a[4]) * (M_PI / 180.0),Draw::Atof(a[5]) * (M_PI / 180.0));
 207   }
 208   else if (n == 7) {
 209     S = BRepPrimAPI_MakeSphere(P->Pln().Position().Ax2(),Draw::Atof(a[3]),Draw::Atof(a[4]) * (M_PI / 180.0),Draw::Atof(a[5]) * (M_PI / 180.0),Draw::Atof(a[6]) * (M_PI / 180.0));
 210   }
 211   else
 212     return 1;
 213
 214   DBRep::Set(a[1],S);
 215   return 0;
 216 }
 217
 218 //=======================================================================
 219 // torus
 220 //=======================================================================
 221
 222 static Standard_Integer torus(Draw_Interpretor& , Standard_Integer n, const char** a)
 223 {
 224   if (n < 3) return 1;
 225   TopoDS_Solid S;
 226
 227   Handle(Geom_Plane) P =
 228     Handle(Geom_Plane)::DownCast(DrawTrSurf::Get(a[2]));
 229
 230   if (n == 4) {
 231     S = BRepPrimAPI_MakeTorus(Draw::Atof(a[2]),Draw::Atof(a[3]));
 232   }
 233   else if (n == 5) {
 234     if (P.IsNull())
 235       S = BRepPrimAPI_MakeTorus(Draw::Atof(a[2]),Draw::Atof(a[3]),Draw::Atof(a[4]) * (M_PI / 180.0));
 236     else
 237       S = BRepPrimAPI_MakeTorus(P->Pln().Position().Ax2(),Draw::Atof(a[3]),Draw::Atof(a[4]));
 238   }
 239   else if (n == 6) {
 240     if (P.IsNull())
 241       S = BRepPrimAPI_MakeTorus(Draw::Atof(a[2]),Draw::Atof(a[3]),
 242                             Draw::Atof(a[4]) * (M_PI / 180.0),Draw::Atof(a[5]) * (M_PI / 180.0));
 243     else
 244       S = BRepPrimAPI_MakeTorus(P->Pln().Position().Ax2(),
 245                             Draw::Atof(a[3]),Draw::Atof(a[4]),Draw::Atof(a[5]) * (M_PI / 180.0));
 246   }
 247   else if (n == 7) {
 248     if (P.IsNull())
 249       S = BRepPrimAPI_MakeTorus(Draw::Atof(a[2]),Draw::Atof(a[3]),
 250                             Draw::Atof(a[4]) * (M_PI / 180.0),Draw::Atof(a[5]) * (M_PI / 180.0),Draw::Atof(a[6]) * (M_PI / 180.0));
 251     else
 252       S = BRepPrimAPI_MakeTorus(P->Pln().Position().Ax2(),Draw::Atof(a[3]),
 253                             Draw::Atof(a[4]),Draw::Atof(a[5]) * (M_PI / 180.0),Draw::Atof(a[6]) * (M_PI / 180.0));
 254   }
 255   else if (n == 8) {
 256     S = BRepPrimAPI_MakeTorus(P->Pln().Position().Ax2(),Draw::Atof(a[3]),Draw::Atof(a[4]),
 257                           Draw::Atof(a[5]) * (M_PI / 180.0),Draw::Atof(a[6]) * (M_PI / 180.0),Draw::Atof(a[7]) * (M_PI / 180.0));
 258   }
 259   else
 260     return 1;
 261
 262   DBRep::Set(a[1],S);
 263   return 0;
 264 }
 265
 266
 267
 268 //=======================================================================
 269 //function : PrimitiveCommands
 270 //purpose  :
 271 //=======================================================================
 272
 273 void  BRepTest::PrimitiveCommands(Draw_Interpretor& theCommands)
 274 {
 275   static Standard_Boolean done = Standard_False;
 276   if (done) return;
 277   done = Standard_True;
 278
 279   DBRep::BasicCommands(theCommands);
 280
 281   const char* g = "Primitive building commands";
 282
 283   theCommands.Add("box","box name [x1 y1 z1] dx dy dz",__FILE__,box,g);
 284   theCommands.Add("wedge","wedge name [Ox Oy Oz Zx Zy Zz Xx Xy Xz] dx dy dz ltx / xmin zmin xmax zmax",__FILE__,wedge,g);
 285
 286   theCommands.Add("pcylinder","pcylinder name [plane(ax2)] R H [angle]",__FILE__,cylinder,g);
 287   theCommands.Add("pcone",    "pcone name [plane(ax2)] R1 R2 H [angle]",__FILE__,cone,g);
 288   theCommands.Add("psphere",  "psphere name [plane(ax2)] R [angle1 angle2] [angle]",__FILE__,sphere,g);
 289   theCommands.Add("ptorus",   "ptorus name [plane(ax2)] R1 R2 [angle1 angle2] [angle]",__FILE__,torus,g);
 290 }
 291
 292