src/GEOM_I/GEOM_I3DPrimOperations_i.cc

   1 //  Copyright (C) 2007-2008  CEA/DEN, EDF R&D, OPEN CASCADE
   2 //
   3 //  Copyright (C) 2003-2007  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
   4 //  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
   5 //
   6 //  This library is free software; you can redistribute it and/or
   7 //  modify it under the terms of the GNU Lesser General Public
   8 //  License as published by the Free Software Foundation; either
   9 //  version 2.1 of the License.
  10 //
  11 //  This library is distributed in the hope that it will be useful,
  12 //  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14 //  Lesser General Public License for more details.
  15 //
  16 //  You should have received a copy of the GNU Lesser General Public
  17 //  License along with this library; if not, write to the Free Software
  18 //  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  19 //
  20 //  See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
  21
  22 #include <Standard_Stream.hxx>
  23
  24 #include "GEOM_I3DPrimOperations_i.hh"
  25
  26 #include "utilities.h"
  27 #include "OpUtil.hxx"
  28 #include "Utils_ExceptHandlers.hxx"
  29
  30 #include "GEOM_Engine.hxx"
  31 #include "GEOM_Object.hxx"
  32
  33 //=============================================================================
  34 /*!
  35  *   constructor:
  36  */
  37 //=============================================================================
  38 GEOM_I3DPrimOperations_i::GEOM_I3DPrimOperations_i(PortableServer::POA_ptr thePOA, GEOM::GEOM_Gen_ptr theEngine, ::GEOMImpl_I3DPrimOperations* theImpl)
  39 :GEOM_IOperations_i(thePOA, theEngine, theImpl)
  40 {
  41   MESSAGE("GEOM_I3DPrimOperations_i::GEOM_I3DPrimOperations_i");
  42 }
  43
  44 //=============================================================================
  45 /*!
  46  *  destructor
  47  */
  48 //=============================================================================
  49 GEOM_I3DPrimOperations_i::~GEOM_I3DPrimOperations_i()
  50 {
  51   MESSAGE("GEOM_I3DPrimOperations_i::~GEOM_I3DPrimOperations_i");
  52 }
  53
  54
  55 //=============================================================================
  56 /*!
  57  *  MakeBoxDXDYDZ
  58  */
  59 //=============================================================================
  60 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakeBoxDXDYDZ (CORBA::Double theDX,
  61                                                                CORBA::Double theDY,
  62                                                                CORBA::Double theDZ)
  63 {
  64   GEOM::GEOM_Object_var aGEOMObject;
  65
  66   //Set a not done flag
  67   GetOperations()->SetNotDone();
  68
  69   //Create the Box
  70   Handle(GEOM_Object) anObject = GetOperations()->MakeBoxDXDYDZ(theDX, theDY, theDZ);
  71   if (!GetOperations()->IsDone() || anObject.IsNull())
  72     return aGEOMObject._retn();
  73
  74   return GetObject(anObject);
  75 }
  76
  77 //=============================================================================
  78 /*!
  79  *  MakeBoxTwoPnt
  80  */
  81 //=============================================================================
  82 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakeBoxTwoPnt
  83                       (GEOM::GEOM_Object_ptr thePnt1, GEOM::GEOM_Object_ptr thePnt2)
  84 {
  85   GEOM::GEOM_Object_var aGEOMObject;
  86
  87   //Set a not done flag
  88   GetOperations()->SetNotDone();
  89
  90   Handle(GEOM_Object) aPnt1 = GetObjectImpl(thePnt1);
  91   Handle(GEOM_Object) aPnt2 = GetObjectImpl(thePnt2);
  92
  93   if (aPnt1.IsNull() || aPnt2.IsNull()) return aGEOMObject._retn();
  94
  95   //Create the Box
  96   Handle(GEOM_Object) anObject = GetOperations()->MakeBoxTwoPnt(aPnt1, aPnt2);
  97   if (!GetOperations()->IsDone() || anObject.IsNull())
  98     return aGEOMObject._retn();
  99
 100   return GetObject(anObject);
 101 }
 102
 103 //=============================================================================
 104 /*!
 105  *  MakeFaceHW
 106  */
 107 //=============================================================================
 108 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakeFaceHW (CORBA::Double theH,
 109                                                             CORBA::Double theW,
 110                                                             CORBA::Short  theOrientation)
 111 {
 112   GEOM::GEOM_Object_var aGEOMObject;
 113
 114   //Set a not done flag
 115   GetOperations()->SetNotDone();
 116
 117   if (theH == 0 || theW == 0)
 118     return aGEOMObject._retn();
 119
 120   //Create the Face
 121   Handle(GEOM_Object) anObject = GetOperations()->MakeFaceHW(theH, theW, theOrientation);
 122   if (!GetOperations()->IsDone() || anObject.IsNull())
 123     return aGEOMObject._retn();
 124
 125   return GetObject(anObject);
 126 }
 127
 128 //=============================================================================
 129 /*!
 130  *  MakeFaceObjHW
 131  */
 132 //=============================================================================
 133 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakeFaceObjHW
 134                                                (GEOM::GEOM_Object_ptr theObj,
 135                                                 CORBA::Double theH,
 136                                                 CORBA::Double theW)
 137 {
 138   GEOM::GEOM_Object_var aGEOMObject;
 139
 140   //Set a not done flag
 141   GetOperations()->SetNotDone();
 142
 143   //Get the reference object
 144   Handle(GEOM_Object) anObj = GetObjectImpl(theObj);
 145
 146   if (anObj.IsNull())
 147     return aGEOMObject._retn();
 148
 149   //Create the Face
 150   Handle(GEOM_Object) anObject = GetOperations()->MakeFaceObjHW(anObj, theH, theW);
 151   if (!GetOperations()->IsDone() || anObject.IsNull())
 152     return aGEOMObject._retn();
 153
 154   return GetObject(anObject);
 155 }
 156
 157 //=============================================================================
 158 /*!
 159  *  MakeDiskPntVecR
 160  */
 161 //=============================================================================
 162 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakeDiskPntVecR
 163                       (GEOM::GEOM_Object_ptr thePnt, GEOM::GEOM_Object_ptr theVec,
 164                        CORBA::Double theR)
 165 {
 166   GEOM::GEOM_Object_var aGEOMObject;
 167
 168   //Set a not done flag
 169   GetOperations()->SetNotDone();
 170
 171   //Get the reference points
 172   Handle(GEOM_Object) aPnt = GetObjectImpl(thePnt);
 173   Handle(GEOM_Object) aVec = GetObjectImpl(theVec);
 174
 175   if (aPnt.IsNull() || aVec.IsNull()) return aGEOMObject._retn();
 176
 177   // Make Disk
 178   Handle(GEOM_Object) anObject =
 179     GetOperations()->MakeDiskPntVecR(aPnt, aVec, theR);
 180   if (!GetOperations()->IsDone() || anObject.IsNull())
 181     return aGEOMObject._retn();
 182
 183   return GetObject(anObject);
 184 }
 185
 186 //=============================================================================
 187 /*!
 188  *  MakeDiskThreePnt
 189  */
 190 //=============================================================================
 191 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakeDiskThreePnt
 192                       (GEOM::GEOM_Object_ptr thePnt1, GEOM::GEOM_Object_ptr thePnt2,
 193                        GEOM::GEOM_Object_ptr thePnt3)
 194 {
 195   GEOM::GEOM_Object_var aGEOMObject;
 196
 197   //Set a not done flag
 198   GetOperations()->SetNotDone();
 199
 200   //Get the reference points
 201   Handle(GEOM_Object) aPnt1 = GetObjectImpl(thePnt1);
 202   Handle(GEOM_Object) aPnt2 = GetObjectImpl(thePnt2);
 203   Handle(GEOM_Object) aPnt3 = GetObjectImpl(thePnt3);
 204
 205   if (aPnt1.IsNull() || aPnt2.IsNull() || aPnt3.IsNull()) return aGEOMObject._retn();
 206
 207   // Make Disk
 208   Handle(GEOM_Object) anObject =
 209       GetOperations()->MakeDiskThreePnt(aPnt1, aPnt2, aPnt3);
 210   if (!GetOperations()->IsDone() || anObject.IsNull())
 211     return aGEOMObject._retn();
 212
 213   return GetObject(anObject);
 214 }
 215
 216 //=============================================================================
 217 /*!
 218  *  MakeDiskR
 219  */
 220 //=============================================================================
 221 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakeDiskR (CORBA::Double theR,
 222                                                            CORBA::Short  theOrientation)
 223 {
 224   GEOM::GEOM_Object_var aGEOMObject;
 225
 226   //Set a not done flag
 227   GetOperations()->SetNotDone();
 228
 229   if (theR == 0)
 230     return aGEOMObject._retn();
 231
 232   //Create the Face
 233   Handle(GEOM_Object) anObject = GetOperations()->MakeDiskR(theR, theOrientation);
 234   if (!GetOperations()->IsDone() || anObject.IsNull())
 235     return aGEOMObject._retn();
 236
 237   return GetObject(anObject);
 238 }
 239
 240 //=============================================================================
 241 /*!
 242  *  MakeCylinderRH
 243  */
 244 //=============================================================================
 245 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakeCylinderRH (CORBA::Double theR,
 246                                                                 CORBA::Double theH)
 247 {
 248   GEOM::GEOM_Object_var aGEOMObject;
 249
 250   //Set a not done flag
 251   GetOperations()->SetNotDone();
 252
 253   //Create the Cylinder
 254   Handle(GEOM_Object) anObject = GetOperations()->MakeCylinderRH(theR, theH);
 255   if (!GetOperations()->IsDone() || anObject.IsNull())
 256     return aGEOMObject._retn();
 257
 258   return GetObject(anObject);
 259 }
 260
 261 //=============================================================================
 262 /*!
 263  *  MakeCylinderPntVecRH
 264  */
 265 //=============================================================================
 266 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakeCylinderPntVecRH
 267                       (GEOM::GEOM_Object_ptr thePnt, GEOM::GEOM_Object_ptr theVec,
 268                        CORBA::Double theR, CORBA::Double theH)
 269 {
 270   GEOM::GEOM_Object_var aGEOMObject;
 271
 272   //Set a not done flag
 273   GetOperations()->SetNotDone();
 274
 275   //Get the reference points
 276   Handle(GEOM_Object) aPnt = GetObjectImpl(thePnt);
 277   Handle(GEOM_Object) aVec = GetObjectImpl(theVec);
 278
 279   if (aPnt.IsNull() || aVec.IsNull()) return aGEOMObject._retn();
 280
 281   //Create the Cylinder
 282   Handle(GEOM_Object) anObject = GetOperations()->MakeCylinderPntVecRH(aPnt, aVec, theR, theH);
 283   if (!GetOperations()->IsDone() || anObject.IsNull())
 284     return aGEOMObject._retn();
 285
 286   return GetObject(anObject);
 287 }
 288
 289 //=============================================================================
 290 /*!
 291  *  MakeConeR1R2H
 292  */
 293 //=============================================================================
 294 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakeConeR1R2H (CORBA::Double theR1,
 295                                                                CORBA::Double theR2,
 296                                                                CORBA::Double theH)
 297 {
 298   GEOM::GEOM_Object_var aGEOMObject;
 299
 300   //Set a not done flag
 301   GetOperations()->SetNotDone();
 302
 303   //Create the Cone
 304   Handle(GEOM_Object) anObject = GetOperations()->MakeConeR1R2H(theR1, theR2, theH);
 305   if (!GetOperations()->IsDone() || anObject.IsNull())
 306     return aGEOMObject._retn();
 307
 308   return GetObject(anObject);
 309 }
 310
 311 //=============================================================================
 312 /*!
 313  *  MakeConePntVecR1R2H
 314  */
 315 //=============================================================================
 316 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakeConePntVecR1R2H
 317                       (GEOM::GEOM_Object_ptr thePnt, GEOM::GEOM_Object_ptr theVec,
 318                        CORBA::Double theR1, CORBA::Double theR2, CORBA::Double theH)
 319 {
 320   GEOM::GEOM_Object_var aGEOMObject;
 321
 322   //Set a not done flag
 323   GetOperations()->SetNotDone();
 324
 325   //Get the reference points
 326   Handle(GEOM_Object) aPnt = GetObjectImpl(thePnt);
 327   Handle(GEOM_Object) aVec = GetObjectImpl(theVec);
 328
 329   if (aPnt.IsNull() || aVec.IsNull()) return aGEOMObject._retn();
 330
 331   //Create the Cone
 332   Handle(GEOM_Object) anObject =
 333       GetOperations()->MakeConePntVecR1R2H(aPnt, aVec, theR1, theR2, theH);
 334   if (!GetOperations()->IsDone() || anObject.IsNull())
 335     return aGEOMObject._retn();
 336
 337   return GetObject(anObject);
 338 }
 339
 340 //=============================================================================
 341 /*!
 342  *  MakeSphereR
 343  */
 344 //=============================================================================
 345 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakeSphereR (CORBA::Double theR)
 346 {
 347   GEOM::GEOM_Object_var aGEOMObject;
 348
 349   //Set a not done flag
 350   GetOperations()->SetNotDone();
 351
 352   //Create the Cone
 353   Handle(GEOM_Object) anObject = GetOperations()->MakeSphereR(theR);
 354   if (!GetOperations()->IsDone() || anObject.IsNull())
 355     return aGEOMObject._retn();
 356
 357   return GetObject(anObject);
 358 }
 359
 360 //=============================================================================
 361 /*!
 362  *  MakeSpherePntR
 363  */
 364 //=============================================================================
 365 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakeSpherePntR
 366                       (GEOM::GEOM_Object_ptr thePnt, CORBA::Double theR)
 367 {
 368   GEOM::GEOM_Object_var aGEOMObject;
 369
 370   //Set a not done flag
 371   GetOperations()->SetNotDone();
 372
 373   //Get the reference point
 374   Handle(GEOM_Object) aPnt = GetObjectImpl(thePnt);
 375
 376   if (aPnt.IsNull()) return aGEOMObject._retn();
 377
 378   //Create the Sphere
 379   Handle(GEOM_Object) anObject =
 380     GetOperations()->MakeSpherePntR(aPnt, theR);
 381   if (!GetOperations()->IsDone() || anObject.IsNull())
 382     return aGEOMObject._retn();
 383
 384   return GetObject(anObject);
 385 }
 386
 387 //=============================================================================
 388 /*!
 389  *  MakeTorusRR
 390  */
 391 //=============================================================================
 392 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakeTorusRR
 393                       (CORBA::Double theRMajor, CORBA::Double theRMinor)
 394 {
 395   GEOM::GEOM_Object_var aGEOMObject;
 396
 397   //Set a not done flag
 398   GetOperations()->SetNotDone();
 399
 400   // Make Torus
 401   Handle(GEOM_Object) anObject =
 402     GetOperations()->MakeTorusRR(theRMajor, theRMinor);
 403   if (!GetOperations()->IsDone() || anObject.IsNull())
 404     return aGEOMObject._retn();
 405
 406   return GetObject(anObject);
 407 }
 408
 409 //=============================================================================
 410 /*!
 411  *  MakeTorusPntVecRR
 412  */
 413 //=============================================================================
 414 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakeTorusPntVecRR
 415                       (GEOM::GEOM_Object_ptr thePnt, GEOM::GEOM_Object_ptr theVec,
 416                        CORBA::Double theRMajor, CORBA::Double theRMinor)
 417 {
 418   GEOM::GEOM_Object_var aGEOMObject;
 419
 420   //Set a not done flag
 421   GetOperations()->SetNotDone();
 422
 423   //Get the reference points
 424   Handle(GEOM_Object) aPnt = GetObjectImpl(thePnt);
 425   Handle(GEOM_Object) aVec = GetObjectImpl(theVec);
 426
 427   if (aPnt.IsNull() || aVec.IsNull()) return aGEOMObject._retn();
 428
 429   // Make Torus
 430   Handle(GEOM_Object) anObject =
 431     GetOperations()->MakeTorusPntVecRR(aPnt, aVec, theRMajor, theRMinor);
 432   if (!GetOperations()->IsDone() || anObject.IsNull())
 433     return aGEOMObject._retn();
 434
 435   return GetObject(anObject);
 436 }
 437
 438 //=============================================================================
 439 /*!
 440  *  MakePrismVecH
 441  */
 442 //=============================================================================
 443 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakePrismVecH
 444                       (GEOM::GEOM_Object_ptr theBase, GEOM::GEOM_Object_ptr theVec,
 445                        CORBA::Double theH)
 446 {
 447   GEOM::GEOM_Object_var aGEOMObject;
 448
 449   //Set a not done flag
 450   GetOperations()->SetNotDone();
 451
 452   //Get the reference objects
 453   Handle(GEOM_Object) aBase = GetObjectImpl(theBase);
 454   Handle(GEOM_Object) aVec = GetObjectImpl(theVec);
 455
 456   if (aBase.IsNull() || aVec.IsNull()) return aGEOMObject._retn();
 457
 458   //Create the Prism
 459   Handle(GEOM_Object) anObject =
 460       GetOperations()->MakePrismVecH(aBase, aVec, theH);
 461   if (!GetOperations()->IsDone() || anObject.IsNull())
 462     return aGEOMObject._retn();
 463
 464   return GetObject(anObject);
 465 }
 466
 467 //=============================================================================
 468 /*!
 469  *  MakePrismVecH2Ways
 470  */
 471 //=============================================================================
 472 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakePrismVecH2Ways
 473                       (GEOM::GEOM_Object_ptr theBase, GEOM::GEOM_Object_ptr theVec,
 474                        CORBA::Double theH)
 475 {
 476   GEOM::GEOM_Object_var aGEOMObject;
 477
 478   //Set a not done flag
 479   GetOperations()->SetNotDone();
 480
 481   //Get the reference objects
 482   Handle(GEOM_Object) aBase = GetObjectImpl(theBase);
 483   Handle(GEOM_Object) aVec = GetObjectImpl(theVec);
 484
 485   if (aBase.IsNull() || aVec.IsNull()) return aGEOMObject._retn();
 486
 487   //Create the Prism
 488   Handle(GEOM_Object) anObject =
 489       GetOperations()->MakePrismVecH2Ways(aBase, aVec, theH);
 490   if (!GetOperations()->IsDone() || anObject.IsNull())
 491     return aGEOMObject._retn();
 492
 493   return GetObject(anObject);
 494 }
 495
 496 //=============================================================================
 497 /*!
 498  *  MakePrismTwoPnt
 499  */
 500 //=============================================================================
 501 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakePrismTwoPnt
 502                                              (GEOM::GEOM_Object_ptr theBase,
 503                                               GEOM::GEOM_Object_ptr thePoint1,
 504                                               GEOM::GEOM_Object_ptr thePoint2)
 505 {
 506   GEOM::GEOM_Object_var aGEOMObject;
 507
 508   //Set a not done flag
 509   GetOperations()->SetNotDone();
 510
 511   //Get the reference objects
 512   Handle(GEOM_Object) aBase = GetObjectImpl(theBase);
 513   Handle(GEOM_Object) aPoint1 = GetObjectImpl(thePoint1);
 514   Handle(GEOM_Object) aPoint2 = GetObjectImpl(thePoint2);
 515
 516   if (aBase.IsNull() || aPoint1.IsNull() || aPoint2.IsNull())
 517     return aGEOMObject._retn();
 518
 519   //Create the Prism
 520   Handle(GEOM_Object) anObject =
 521     GetOperations()->MakePrismTwoPnt(aBase, aPoint1, aPoint2);
 522   if (!GetOperations()->IsDone() || anObject.IsNull())
 523     return aGEOMObject._retn();
 524
 525   return GetObject(anObject);
 526 }
 527
 528 //=============================================================================
 529 /*!
 530  *  MakePrismTwoPnt2Ways
 531  */
 532 //=============================================================================
 533 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakePrismTwoPnt2Ways
 534                                              (GEOM::GEOM_Object_ptr theBase,
 535                                               GEOM::GEOM_Object_ptr thePoint1,
 536                                               GEOM::GEOM_Object_ptr thePoint2)
 537 {
 538   GEOM::GEOM_Object_var aGEOMObject;
 539
 540   //Set a not done flag
 541   GetOperations()->SetNotDone();
 542
 543   //Get the reference objects
 544   Handle(GEOM_Object) aBase = GetObjectImpl(theBase);
 545   Handle(GEOM_Object) aPoint1 = GetObjectImpl(thePoint1);
 546   Handle(GEOM_Object) aPoint2 = GetObjectImpl(thePoint2);
 547
 548   if (aBase.IsNull() || aPoint1.IsNull() || aPoint2.IsNull())
 549     return aGEOMObject._retn();
 550
 551   //Create the Prism
 552   Handle(GEOM_Object) anObject =
 553     GetOperations()->MakePrismTwoPnt2Ways(aBase, aPoint1, aPoint2);
 554   if (!GetOperations()->IsDone() || anObject.IsNull())
 555     return aGEOMObject._retn();
 556
 557   return GetObject(anObject);
 558 }
 559
 560 //=============================================================================
 561 /*!
 562  *  MakePrismDXDYDZ
 563  */
 564 //=============================================================================
 565 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakePrismDXDYDZ
 566                       (GEOM::GEOM_Object_ptr theBase, CORBA::Double theDX,
 567                        CORBA::Double theDY, CORBA::Double theDZ)
 568 {
 569   GEOM::GEOM_Object_var aGEOMObject;
 570
 571   //Set a not done flag
 572   GetOperations()->SetNotDone();
 573
 574   //Get the reference objects
 575   Handle(GEOM_Object) aBase = GetObjectImpl(theBase);
 576
 577   if (aBase.IsNull()) return aGEOMObject._retn();
 578
 579   //Create the Prism
 580   Handle(GEOM_Object) anObject =
 581       GetOperations()->MakePrismDXDYDZ(aBase, theDX, theDY, theDZ);
 582   if (!GetOperations()->IsDone() || anObject.IsNull())
 583     return aGEOMObject._retn();
 584
 585   return GetObject(anObject);
 586 }
 587
 588 //=============================================================================
 589 /*!
 590  *  MakePrismDXDYDZ2Ways
 591  */
 592 //=============================================================================
 593 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakePrismDXDYDZ2Ways
 594                       (GEOM::GEOM_Object_ptr theBase, CORBA::Double theDX,
 595                        CORBA::Double theDY, CORBA::Double theDZ)
 596 {
 597   GEOM::GEOM_Object_var aGEOMObject;
 598
 599   //Set a not done flag
 600   GetOperations()->SetNotDone();
 601
 602   //Get the reference objects
 603   Handle(GEOM_Object) aBase = GetObjectImpl(theBase);
 604
 605   if (aBase.IsNull()) return aGEOMObject._retn();
 606
 607   //Create the Prism
 608   Handle(GEOM_Object) anObject =
 609       GetOperations()->MakePrismDXDYDZ2Ways(aBase, theDX, theDY, theDZ);
 610   if (!GetOperations()->IsDone() || anObject.IsNull())
 611     return aGEOMObject._retn();
 612
 613   return GetObject(anObject);
 614 }
 615
 616 //=============================================================================
 617 /*!
 618  *  MakePipe
 619  */
 620 //=============================================================================
 621 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakePipe
 622                  (GEOM::GEOM_Object_ptr theBase, GEOM::GEOM_Object_ptr thePath)
 623 {
 624   GEOM::GEOM_Object_var aGEOMObject;
 625
 626   //Set a not done flag
 627   GetOperations()->SetNotDone();
 628
 629   //Get the reference objects
 630   Handle(GEOM_Object) aBase = GetObjectImpl(theBase);
 631   Handle(GEOM_Object) aPath = GetObjectImpl(thePath);
 632
 633   if (aBase.IsNull() || aPath.IsNull()) return aGEOMObject._retn();
 634
 635   //Create the Pipe
 636   Handle(GEOM_Object) anObject =
 637     GetOperations()->MakePipe(aBase, aPath);
 638   if (!GetOperations()->IsDone() || anObject.IsNull())
 639     return aGEOMObject._retn();
 640
 641   return GetObject(anObject);
 642 }
 643
 644 //=============================================================================
 645 /*!
 646  *  MakeRevolutionAxisAngle
 647  */
 648 //=============================================================================
 649 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakeRevolutionAxisAngle
 650                       (GEOM::GEOM_Object_ptr theBase, GEOM::GEOM_Object_ptr theAxis,
 651                        CORBA::Double theAngle)
 652 {
 653   GEOM::GEOM_Object_var aGEOMObject;
 654
 655   //Set a not done flag
 656   GetOperations()->SetNotDone();
 657
 658   //Get the reference objects
 659   Handle(GEOM_Object) aBase = GetObjectImpl(theBase);
 660   Handle(GEOM_Object) anAxis = GetObjectImpl(theAxis);
 661
 662   if (aBase.IsNull() || anAxis.IsNull()) return aGEOMObject._retn();
 663
 664   //Create the Revolution
 665   Handle(GEOM_Object) anObject =
 666       GetOperations()->MakeRevolutionAxisAngle(aBase, anAxis, theAngle);
 667   if (!GetOperations()->IsDone() || anObject.IsNull())
 668     return aGEOMObject._retn();
 669
 670   return GetObject(anObject);
 671 }
 672
 673 //=============================================================================
 674 /*!
 675  *  MakeRevolutionAxisAngle2Ways
 676  */
 677 //=============================================================================
 678 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakeRevolutionAxisAngle2Ways
 679                       (GEOM::GEOM_Object_ptr theBase, GEOM::GEOM_Object_ptr theAxis,
 680                        CORBA::Double theAngle)
 681 {
 682   GEOM::GEOM_Object_var aGEOMObject;
 683
 684   //Set a not done flag
 685   GetOperations()->SetNotDone();
 686
 687   //Get the reference objects
 688   Handle(GEOM_Object) aBase = GetObjectImpl(theBase);
 689   Handle(GEOM_Object) anAxis = GetObjectImpl(theAxis);
 690
 691   if (aBase.IsNull() || anAxis.IsNull()) return aGEOMObject._retn();
 692
 693   //Create the Revolution
 694   Handle(GEOM_Object) anObject =
 695       GetOperations()->MakeRevolutionAxisAngle2Ways(aBase, anAxis, theAngle);
 696   if (!GetOperations()->IsDone() || anObject.IsNull())
 697     return aGEOMObject._retn();
 698
 699   return GetObject(anObject);
 700 }
 701
 702 //=============================================================================
 703 /*!
 704  *  MakeFilling
 705  */
 706 //=============================================================================
 707 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakeFilling(GEOM::GEOM_Object_ptr theShape,
 708                                                             CORBA::Long theMinDeg,
 709                                                             CORBA::Long theMaxDeg,
 710                                                             CORBA::Double theTol2D,
 711                                                             CORBA::Double theTol3D,
 712                                                             CORBA::Long theNbIter,
 713                                                             CORBA::Boolean theApprox)
 714 {
 715   GEOM::GEOM_Object_var aGEOMObject;
 716
 717   //Set a not done flag
 718   GetOperations()->SetNotDone();
 719
 720   //Get the reference objects
 721   Handle(GEOM_Object) aShape = GetObjectImpl(theShape);
 722
 723   if (aShape.IsNull()) return aGEOMObject._retn();
 724
 725   //Create the Solid
 726   Handle(GEOM_Object) anObject = GetOperations()->MakeFilling
 727     (aShape, theMinDeg, theMaxDeg, theTol2D, theTol3D, theNbIter, theApprox);
 728   if (!GetOperations()->IsDone() || anObject.IsNull())
 729     return aGEOMObject._retn();
 730
 731   return GetObject(anObject);
 732 }
 733
 734 //=============================================================================
 735 /*!
 736  *  MakeThruSections
 737  */
 738 //=============================================================================
 739 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakeThruSections(const GEOM::ListOfGO& theSeqSections,
 740                                                                  CORBA::Boolean theModeSolid,
 741                                                                  CORBA::Double thePreci,
 742                                                                  CORBA::Boolean theRuled)
 743 {
 744    GEOM::GEOM_Object_var aGEOMObject;
 745
 746   //Set a not done flag
 747   GetOperations()->SetNotDone();
 748   Handle(TColStd_HSequenceOfTransient) aSeqSections = new TColStd_HSequenceOfTransient;
 749   int ind, aLen;
 750
 751   //Get the shapes
 752   aLen = theSeqSections.length();
 753   for (ind = 0; ind < aLen; ind++) {
 754     Handle(GEOM_Object) aSh = GetObjectImpl(theSeqSections[ind]);
 755     if (!aSh.IsNull())
 756       aSeqSections->Append(aSh);
 757   }
 758   if (!aSeqSections->Length())
 759     return aGEOMObject._retn();
 760
 761   // Make shell or solid
 762   Handle(GEOM_Object) anObject =
 763     GetOperations()->MakeThruSections(aSeqSections,theModeSolid,thePreci,theRuled);
 764   if (!GetOperations()->IsDone() || anObject.IsNull())
 765     return aGEOMObject._retn();
 766
 767   return GetObject(anObject);
 768 }
 769
 770 //=============================================================================
 771 /*!
 772  *  MakePipeWithDifferentSections
 773  */
 774 //=============================================================================
 775 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakePipeWithDifferentSections
 776                       (const GEOM::ListOfGO& theBases,
 777                        const GEOM::ListOfGO& theLocations,
 778                        GEOM::GEOM_Object_ptr thePath,
 779                        CORBA::Boolean theWithContact,
 780                        CORBA::Boolean theWithCorrections)
 781 {
 782   GEOM::GEOM_Object_var aGEOMObject;
 783
 784   //Set a not done flag
 785   GetOperations()->SetNotDone();
 786   Handle(TColStd_HSequenceOfTransient) aSeqBases = new TColStd_HSequenceOfTransient;
 787   Handle(TColStd_HSequenceOfTransient) aSeqLocations = new TColStd_HSequenceOfTransient;
 788   int ind=0, aNbBases =0,aNbLocs=0;
 789
 790   //Get the shapes
 791   aNbBases = theBases.length();
 792   aNbLocs = theLocations.length();
 793
 794   if (aNbLocs && aNbBases != aNbLocs)
 795     return aGEOMObject._retn();
 796
 797   Handle(GEOM_Object) aPath = GetObjectImpl(thePath);
 798   if (aPath.IsNull())
 799     return aGEOMObject._retn();
 800
 801   for (ind = 0; ind < aNbBases; ind++) {
 802     Handle(GEOM_Object) aBase = GetObjectImpl(theBases[ind]);
 803     if (aBase.IsNull())
 804       continue;
 805     if (aNbLocs)
 806     {
 807       Handle(GEOM_Object) aLoc = GetObjectImpl(theLocations[ind]);
 808       if (aLoc.IsNull())
 809         continue;
 810       aSeqLocations->Append(aLoc);
 811     }
 812     aSeqBases->Append(aBase);
 813   }
 814   if (!aSeqBases->Length())
 815     return aGEOMObject._retn();
 816
 817   // Make pipe
 818   Handle(GEOM_Object) anObject =
 819     GetOperations()->MakePipeWithDifferentSections(aSeqBases,aSeqLocations ,aPath,
 820                                                    theWithContact,theWithCorrections);
 821   if (!GetOperations()->IsDone() || anObject.IsNull())
 822     return aGEOMObject._retn();
 823
 824   return GetObject(anObject);
 825 }
 826
 827
 828 //=============================================================================
 829 /*!
 830  *  MakePipeWithShellSections
 831  */
 832 //=============================================================================
 833 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakePipeWithShellSections
 834                  (const GEOM::ListOfGO& theBases,
 835                   const GEOM::ListOfGO& theSubBases,
 836                   const GEOM::ListOfGO& theLocations,
 837                   GEOM::GEOM_Object_ptr thePath,
 838                   CORBA::Boolean theWithContact,
 839                   CORBA::Boolean theWithCorrections)
 840 {
 841   GEOM::GEOM_Object_var aGEOMObject;
 842
 843   //Set a not done flag
 844   GetOperations()->SetNotDone();
 845   Handle(TColStd_HSequenceOfTransient) aSeqBases = new TColStd_HSequenceOfTransient;
 846   Handle(TColStd_HSequenceOfTransient) aSeqSubBases = new TColStd_HSequenceOfTransient;
 847   Handle(TColStd_HSequenceOfTransient) aSeqLocations = new TColStd_HSequenceOfTransient;
 848   int ind=0, aNbBases=0, aNbSubBases=0, aNbLocs=0;
 849
 850   //Get the shapes
 851   aNbBases = theBases.length();
 852   aNbSubBases = theSubBases.length();
 853   aNbLocs = theLocations.length();
 854
 855   if (aNbLocs && aNbBases != aNbLocs)
 856     return aGEOMObject._retn();
 857
 858   Handle(GEOM_Object) aPath = GetObjectImpl(thePath);
 859   if (aPath.IsNull())
 860     return aGEOMObject._retn();
 861
 862   for (ind = 0; ind < aNbBases; ind++) {
 863     Handle(GEOM_Object) aBase = GetObjectImpl(theBases[ind]);
 864     if (aBase.IsNull())
 865       continue;
 866     if (aNbLocs) {
 867       Handle(GEOM_Object) aLoc = GetObjectImpl(theLocations[ind]);
 868       if (aLoc.IsNull())
 869         continue;
 870       aSeqLocations->Append(aLoc);
 871     }
 872     aSeqBases->Append(aBase);
 873
 874     if (aNbSubBases >= aNbBases) {
 875       Handle(GEOM_Object) aSubBase = GetObjectImpl(theSubBases[ind]);
 876       if (aSubBase.IsNull()) {
 877         aSeqSubBases->Clear();
 878         aNbSubBases = 0;
 879         continue;
 880       }
 881       aSeqSubBases->Append(aSubBase);
 882     }
 883   }
 884   if (!aSeqBases->Length())
 885     return aGEOMObject._retn();
 886
 887   // Make pipe
 888   Handle(GEOM_Object) anObject =
 889     GetOperations()->MakePipeWithShellSections(aSeqBases, aSeqSubBases,
 890                                                aSeqLocations, aPath,
 891                                                theWithContact, theWithCorrections);
 892   if (!GetOperations()->IsDone() || anObject.IsNull())
 893     return aGEOMObject._retn();
 894
 895   return GetObject(anObject);
 896 }
 897
 898
 899 //=============================================================================
 900 /*!
 901  *  MakePipeShellsWithoutPath
 902  */
 903 //=============================================================================
 904 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakePipeShellsWithoutPath
 905                  (const GEOM::ListOfGO& theBases,
 906                   const GEOM::ListOfGO& theLocations)
 907 {
 908   GEOM::GEOM_Object_var aGEOMObject;
 909
 910   //Set a not done flag
 911   GetOperations()->SetNotDone();
 912   Handle(TColStd_HSequenceOfTransient) aSeqBases = new TColStd_HSequenceOfTransient;
 913   Handle(TColStd_HSequenceOfTransient) aSeqLocations = new TColStd_HSequenceOfTransient;
 914   int ind=0, aNbBases=0, aNbLocs=0;
 915
 916   //Get the shapes
 917   aNbBases = theBases.length();
 918   aNbLocs = theLocations.length();
 919
 920   if (aNbLocs && aNbBases != aNbLocs)
 921     return aGEOMObject._retn();
 922
 923   for (ind = 0; ind < aNbBases; ind++) {
 924     Handle(GEOM_Object) aBase = GetObjectImpl(theBases[ind]);
 925     if (aBase.IsNull())
 926       continue;
 927     if (aNbLocs) {
 928       Handle(GEOM_Object) aLoc = GetObjectImpl(theLocations[ind]);
 929       if (aLoc.IsNull())
 930         continue;
 931       aSeqLocations->Append(aLoc);
 932     }
 933     aSeqBases->Append(aBase);
 934   }
 935
 936   if (!aSeqBases->Length())
 937     return aGEOMObject._retn();
 938
 939   // Make pipe
 940   Handle(GEOM_Object) anObject =
 941     GetOperations()->MakePipeShellsWithoutPath(aSeqBases,aSeqLocations);
 942
 943   if (!GetOperations()->IsDone() || anObject.IsNull())
 944     return aGEOMObject._retn();
 945
 946   return GetObject(anObject);
 947 }
 948
 949
 950 //=============================================================================
 951 /*!
 952  *  MakePipeBiNormalAlongVector
 953  */
 954 //=============================================================================
 955 GEOM::GEOM_Object_ptr GEOM_I3DPrimOperations_i::MakePipeBiNormalAlongVector
 956                  (GEOM::GEOM_Object_ptr theBase,
 957                   GEOM::GEOM_Object_ptr thePath,
 958                   GEOM::GEOM_Object_ptr theVec)
 959 {
 960   GEOM::GEOM_Object_var aGEOMObject;
 961
 962   //Set a not done flag
 963   GetOperations()->SetNotDone();
 964
 965   //Get the reference objects
 966   Handle(GEOM_Object) aBase = GetObjectImpl(theBase);
 967   Handle(GEOM_Object) aPath = GetObjectImpl(thePath);
 968   Handle(GEOM_Object) aVec = GetObjectImpl(theVec);
 969
 970   if (aBase.IsNull() || aPath.IsNull() || aVec.IsNull()) return aGEOMObject._retn();
 971
 972   //Create the Pipe
 973   Handle(GEOM_Object) anObject =
 974     GetOperations()->MakePipeBiNormalAlongVector(aBase, aPath, aVec);
 975   if (!GetOperations()->IsDone() || anObject.IsNull())
 976     return aGEOMObject._retn();
 977
 978   return GetObject(anObject);
 979 }