bce0b3b3f97bda3a7e031bd3dd7b12ad90800e65
[occt.git] / src / QABugs / QABugs_1.cxx
1 // Created on: 2002-05-21
2 // Created by: QA Admin
3 // Copyright (c) 2002-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 #include <QABugs.hxx>
17
18 #include <Draw_Interpretor.hxx>
19 #include <DBRep.hxx>
20 #include <DrawTrSurf.hxx>
21 #include <AIS_InteractiveContext.hxx>
22 #include <ViewerTest.hxx>
23 #include <AIS_Shape.hxx>
24 #include <TopoDS_Shape.hxx>
25
26 #include <ViewerTest_DoubleMapOfInteractiveAndName.hxx>
27 #include <TColStd_ListIteratorOfListOfInteger.hxx>
28 #include <TColStd_MapOfInteger.hxx>
29
30 #include <TDocStd_Document.hxx>
31 #include <TDocStd_Application.hxx>
32 #include <DDocStd.hxx>
33 #include <TDocStd_Owner.hxx>
34 #include <TDF_Label.hxx>
35 #include <DDF.hxx>
36 #include <TPrsStd_AISViewer.hxx>
37 #include <TPrsStd_AISPresentation.hxx>
38
39 #include <Draw_Viewer.hxx>
40 #include <Draw.hxx>
41
42 #ifndef _WIN32
43 extern Draw_Viewer dout;
44 #else
45 Standard_IMPORT Draw_Viewer dout;
46 #endif
47
48 #include <BRep_Builder.hxx>
49 #include <BRepTools.hxx>
50 #include <TopoDS_Wire.hxx>
51 #include <BRepBuilderAPI_MakeFace.hxx>
52 #include <TopoDS.hxx>
53
54 #if ! defined(_WIN32)
55 extern ViewerTest_DoubleMapOfInteractiveAndName& GetMapOfAIS();
56 #else
57 Standard_EXPORT ViewerTest_DoubleMapOfInteractiveAndName& GetMapOfAIS();
58 #endif
59
60 #include <AIS_PlaneTrihedron.hxx>
61 #include <TopoDS_Face.hxx>
62 #include <TopExp_Explorer.hxx>
63 #include <TopoDS_Edge.hxx>
64 #include <BRepAdaptor_Curve.hxx>
65 #include <GC_MakePlane.hxx>
66
67 static Standard_Integer OCC159bug (Draw_Interpretor& di, Standard_Integer argc, const char ** argv)
68 {
69   if ( argc != 2) {
70     di << "ERROR : Usage : " << argv[0] << " Doc\n";
71     return 1;
72   }
73   
74   Handle(TDocStd_Document) D;    
75   if (!DDocStd::GetDocument(argv[1],D)) return 1; 
76
77   Standard_Integer DocRefCount1 = D->GetRefCount();
78   di << "DocRefCount1 = " << DocRefCount1 << "\n";
79
80   Handle(TDocStd_Owner) Owner;
81   if (!D->Main().Root().FindAttribute(TDocStd_Owner::GetID(),Owner)) return 1; 
82
83   Handle(TDocStd_Document) OwnerD1 = Owner->GetDocument();    
84   if (OwnerD1.IsNull()) {
85     di << "DocOwner1 = NULL\n";
86   } else {
87     di << "DocOwner1 = NOTNULL\n";
88   }
89  
90   Handle(TDocStd_Application) A = DDocStd::GetApplication();
91   A->Close(D); 
92
93   if (Handle(Draw_Drawable3D) DD = Draw::GetExisting (argv[1]))
94   {
95     dout.RemoveDrawable (DD);
96   }
97
98   Handle(TDocStd_Document) OwnerD2 = Owner->GetDocument();    
99   if (OwnerD2.IsNull()) {
100     di << "DocOwner2 = NULL\n";
101   } else {
102     di << "DocOwner2 = NOTNULL\n";
103   }
104
105   Standard_Integer DocRefCount2 = D->GetRefCount();
106   di << "DocRefCount2 = " << DocRefCount2 << "\n";
107
108   return 0;
109 }
110
111 static Standard_Integer OCC145bug (Draw_Interpretor& di, Standard_Integer argc, const char ** argv)
112 {
113   if ( argc != 3) {
114     di << "ERROR : Usage : " << argv[0] << " Shape MaxNbr\n";
115     return 1;
116   }
117
118   TCollection_AsciiString aFileName = argv[1];
119   Standard_Integer aMaxNbr = Draw::Atoi(argv[2]);
120
121   BRep_Builder aBld;
122   TopoDS_Shape aShape;
123
124   if (!BRepTools::Read(aShape, aFileName.ToCString(), aBld)) {
125     di << "ERROR :Could not read a shape!!!\n";
126     return 1;
127   }
128
129   Standard_Integer i;
130   TopoDS_Wire      aWire   = TopoDS::Wire(aShape);
131   
132   for (i = 1; i <= aMaxNbr; i++) {
133     BRepBuilderAPI_MakeFace aMF(aWire);
134     if (!aMF.IsDone()) {
135       di << "ERROR : Could not make a face\n";
136       return 1;
137     }
138   }
139
140   return 0;
141 }
142
143 static Standard_Integer OCC73_SelectionMode (Draw_Interpretor& di, Standard_Integer argc, const char ** argv)
144 {
145   if ( argc < 3) {
146     di << "ERROR : Usage : " << argv[0] << " DOC entry [SelectionMode]\n";
147     return 1;
148   }
149
150   Handle(TDocStd_Document) D;
151   //std::cout << "OCC73_SelectionMode  1" << std::endl;
152   if (!DDocStd::GetDocument(argv[1],D)) return 1;  
153   TDF_Label L;
154   //std::cout << "OCC73_SelectionMode  2" << std::endl;
155   if (!DDF::FindLabel(D->GetData(),argv[2],L)) return 1;  
156
157   Handle(TPrsStd_AISViewer) viewer;
158   //std::cout << "OCC73_SelectionMode  3" << std::endl;
159   if( !TPrsStd_AISViewer::Find(L, viewer) ) return 1;  
160
161   Handle(TPrsStd_AISPresentation) prs;
162   //std::cout << "OCC73_SelectionMode  4" << std::endl;
163   if(L.FindAttribute( TPrsStd_AISPresentation::GetID(), prs) ) {   
164     if( argc == 4 ) {
165       prs->SetSelectionMode((Standard_Integer)Draw::Atoi(argv[3]));
166       TPrsStd_AISViewer::Update(L);
167     }
168     else {
169       Standard_Integer SelectionMode = prs->SelectionMode();
170       //std::cout << "SelectionMode = " << SelectionMode << std::endl;
171       di<<SelectionMode;
172     }
173   }
174   //std::cout << "OCC73_SelectionMode  5" << std::endl;
175
176   return 0;
177 }
178
179 static Standard_Integer OCC10bug (Draw_Interpretor& di, Standard_Integer argc, const char ** argv)
180 {
181   Handle(AIS_InteractiveContext) aContext = ViewerTest::GetAISContext();
182   if(aContext.IsNull()) { 
183     di << "use 'vinit' command before " << argv[0] << "\n";
184     return 1;
185   }
186
187   if(argc != 4) {
188     di << "Usage : " << argv[0] << " name plane Length\n";
189     return 1;
190   }
191
192   TopoDS_Shape S = DBRep::Get( argv[2] );
193   if ( S.IsNull() ) {
194     di << "Shape is empty\n";
195     return 1;
196   }
197
198   TCollection_AsciiString name(argv[1]);
199   Standard_Real Length = Draw::Atof(argv[3]);
200   
201   // Construction de l'AIS_PlaneTrihedron
202   Handle(AIS_PlaneTrihedron) theAISPlaneTri;
203
204   Standard_Boolean IsBound = GetMapOfAIS().IsBound2(name);
205   if (IsBound) {
206     // on recupere la shape dans la map des objets displayes
207     Handle(AIS_InteractiveObject) aShape = GetMapOfAIS().Find2(name);
208       
209     // On verifie que l'AIS InteraciveObject est bien 
210     // un AIS_PlaneTrihedron
211     if (aShape->Type()==AIS_KOI_Datum && aShape->Signature()==4) {
212       // On downcast aShape de AIS_InteractiveObject a AIS_PlaneTrihedron
213       theAISPlaneTri = Handle(AIS_PlaneTrihedron)::DownCast (aShape);
214
215       theAISPlaneTri->SetLength(Length);
216   
217       aContext->Redisplay(theAISPlaneTri, Standard_False);
218       aContext->UpdateCurrentViewer();
219     }
220   } else {
221     TopoDS_Face  FaceB=TopoDS::Face(S);
222   
223     // Construction du Plane
224     // recuperation des edges des faces.
225     TopExp_Explorer FaceExpB(FaceB,TopAbs_EDGE);
226   
227     TopoDS_Edge EdgeB=TopoDS::Edge(FaceExpB.Current() );
228     // declarations 
229     gp_Pnt A,B,C;
230   
231     // si il y a plusieurs edges
232     if (FaceExpB.More() ) {
233       FaceExpB.Next();
234       TopoDS_Edge EdgeC=TopoDS::Edge(FaceExpB.Current() );
235       BRepAdaptor_Curve theCurveB(EdgeB);
236       BRepAdaptor_Curve theCurveC(EdgeC);
237       A=theCurveC.Value(0.1);
238       B=theCurveC.Value(0.9);
239       C=theCurveB.Value(0.5);
240     }
241     else {
242       // FaceB a 1 unique edge courbe
243       BRepAdaptor_Curve theCurveB(EdgeB);
244       A=theCurveB.Value(0.1);
245       B=theCurveB.Value(0.9);
246       C=theCurveB.Value(0.5);
247     }
248     // Construction du Geom_Plane
249     GC_MakePlane MkPlane(A,B,C);
250     Handle(Geom_Plane) theGeomPlane=MkPlane.Value();
251     
252     // on le display & bind
253     theAISPlaneTri= new AIS_PlaneTrihedron(theGeomPlane );
254     
255     theAISPlaneTri->SetLength(Length);
256     
257     GetMapOfAIS().Bind ( theAISPlaneTri, name);
258     aContext->Display (theAISPlaneTri, Standard_True);
259   }
260
261   Standard_Real getLength = theAISPlaneTri->GetLength();
262   di << "Length = " << Length << "\n";
263   di << "getLength = " << getLength << "\n";
264
265   if (getLength == Length) {
266     di << "OCC10: OK\n";
267   } else {
268     di << "OCC10: ERROR\n";
269   }
270
271   return 0;
272 }
273
274 static Standard_Integer OCC74bug_set (Draw_Interpretor& di, Standard_Integer argc, const char ** argv)
275 {
276   Handle(AIS_InteractiveContext) aContext = ViewerTest::GetAISContext();
277   if(aContext.IsNull()) { 
278     di << argv[0] << "ERROR : use 'vinit' command before \n";
279     return 1;
280   }
281
282   if ( argc != 3) {
283     di << "ERROR : Usage : " << argv[0] << " shape mode; set selection mode\n";
284     return 1;
285   }
286   
287   Standard_Boolean updateviewer = Standard_True;
288
289   ViewerTest_DoubleMapOfInteractiveAndName& aMap = GetMapOfAIS();
290   
291   TCollection_AsciiString aName(argv[1]);
292   Handle(AIS_InteractiveObject) AISObj;
293
294   Standard_Integer SelectMode = Draw::Atoi(argv[2]);
295   if (!aMap.Find2 (aName, AISObj)
296     || AISObj.IsNull())
297   {
298     di << "Use 'vdisplay' before\n";
299     return 1;
300   }
301
302   aContext->Erase(AISObj, updateviewer);
303   aContext->UpdateCurrentViewer();
304   aContext->SetAutoActivateSelection (Standard_False);
305   aContext->Display(AISObj, updateviewer);
306   aContext->Activate (AISObj, SelectMode);
307   aContext->UpdateCurrentViewer();
308   return 0;
309 }
310
311 static Standard_Integer OCC74bug_get (Draw_Interpretor& di, Standard_Integer argc, const char ** argv)
312 {
313   Handle(AIS_InteractiveContext) aContext = ViewerTest::GetAISContext();
314   if(aContext.IsNull()) { 
315     di << argv[0] << "ERROR : use 'vinit' command before \n";
316     return 1;
317   }
318
319   if ( argc != 2) {
320     di << "ERROR : Usage : " << argv[0] << " shape; get selection mode\n";
321     return 1;
322   }
323
324   ViewerTest_DoubleMapOfInteractiveAndName& aMap = GetMapOfAIS();
325   
326   TCollection_AsciiString aName(argv[1]);
327   Handle(AIS_InteractiveObject) AISObj;
328   if (!aMap.Find2(aName, AISObj)
329    || AISObj.IsNull())
330   {
331     di << "Use 'vdisplay' before\n";
332     return 1;
333   }
334
335   TColStd_ListOfInteger anActivatedModes;
336   aContext->ActivatedModes (AISObj, anActivatedModes);
337   Standard_Integer aMode = anActivatedModes.IsEmpty() ? -1 : anActivatedModes.Last();
338   di << aMode << "\n";
339   return 0;
340 }
341
342 #include <BRepPrimAPI_MakeBox.hxx>
343 #include <TDF_Data.hxx>
344 #include <TNaming_Builder.hxx>
345 #include <TNaming_NamedShape.hxx>
346 #include <AIS_InteractiveObject.hxx>
347
348 static Standard_Integer OCC361bug (Draw_Interpretor& di, Standard_Integer nb, const char ** a)
349 {
350   if ( nb != 2) {
351     di << "ERROR : Usage : " << a[0] << " Doc\n";
352     di << "-1\n";
353     return -1;
354   }
355
356   Handle(TDocStd_Document) D;    
357   if (!DDocStd::GetDocument(a[1],D)) {
358     di << "-2\n";
359     return 1;  
360   }
361
362   BRepPrimAPI_MakeBox aBox(gp_Pnt(0, 0, 0), 100, 100, 100);
363   TopoDS_Shape aTBox = aBox.Shape();
364   aTBox.Orientation(TopAbs_FORWARD);
365
366   TDF_Label aTestLabel = D->Main();
367   
368   TNaming_Builder aBuilder(aTestLabel);
369   aBuilder.Generated(aTBox);
370     
371   TopoDS_Shape aTBox1 = aTBox;
372   aTBox1.Orientation(TopAbs_REVERSED);
373   aTestLabel.ForgetAllAttributes();
374
375   TNaming_Builder aBuilder2(aTestLabel);
376   aBuilder2.Generated( aTBox1);
377
378   aTBox = aBuilder2.NamedShape()->Get();
379   if(aTBox.Orientation() != TopAbs_REVERSED) {
380     di << "1\n";
381   } else {
382     di << "0\n";
383   }
384   return 0;
385 }
386
387 #include <Graphic3d_Texture2Dmanual.hxx>
388 #include <Image_AlienPixMap.hxx>
389 #include <OSD_OpenFile.hxx>
390 #include <Prs3d_ShadingAspect.hxx>
391 #include <Standard_ArrayStreamBuffer.hxx>
392 //=======================================================================
393 //function : OCC30182
394 //purpose  : Testing different interfaces of Image_AlienPixMap::Load()
395 //=======================================================================
396 static Standard_Integer OCC30182 (Draw_Interpretor& , Standard_Integer theNbArgs, const char** theArgVec)
397 {
398   if (ViewerTest::CurrentView().IsNull())
399   {
400     std::cout << "Error: no active view\n";
401     return 1;
402   }
403
404   TCollection_AsciiString aPrsName, anImgPath;
405   Standard_Integer anOffset = 0;
406   Standard_Integer aSrc = 0; // 0 - file name, 1 - file stream, 2 - memory buffer
407   for (Standard_Integer anArgIter = 1; anArgIter < theNbArgs; ++anArgIter)
408   {
409     TCollection_AsciiString anArg (theArgVec[anArgIter]);
410     anArg.LowerCase();
411     if (anArg == "-offset"
412      && anArgIter + 1 < theNbArgs)
413     {
414       anOffset = Draw::Atoi (theArgVec[++anArgIter]);
415     }
416     else if (anArg == "-filename")
417     {
418       aSrc = 0;
419     }
420     else if (anArg == "-stream")
421     {
422       aSrc = 1;
423     }
424     else if (anArg == "-mem"
425           || anArg == "-memory")
426     {
427       aSrc = 2;
428     }
429     else if (aPrsName.IsEmpty())
430     {
431       aPrsName = theArgVec[anArgIter];
432     }
433     else if (anImgPath.IsEmpty())
434     {
435       anImgPath = theArgVec[anArgIter];
436     }
437     else
438     {
439       std::cout << "Syntax error at '" << anArg << "'\n";
440       return 1;
441     }
442   }
443   if (anImgPath.IsEmpty())
444   {
445     std::cout << "Syntax error: wrong number of arguments\n";
446     return 1;
447   }
448
449   Handle(Image_AlienPixMap) anImage = new Image_AlienPixMap();
450   if (aSrc == 0)
451   {
452     if (!anImage->Load (anImgPath))
453     {
454       return 0;
455     }
456   }
457   else
458   {
459     std::ifstream aFile;
460     OSD_OpenStream (aFile, anImgPath.ToCString(), std::ios::in | std::ios::binary);
461     if (!aFile.is_open())
462     {
463       std::cout << "Syntax error: image file '" << anImgPath << "' cannot be found\n";
464       return 1;
465     }
466     if (anOffset != 0)
467     {
468       aFile.seekg (anOffset);
469     }
470
471     if (aSrc == 2)
472     {
473       aFile.seekg (0, std::ios::end);
474       Standard_Integer aLen = (Standard_Integer )aFile.tellg() - anOffset;
475       aFile.seekg (anOffset);
476       if (aLen <= 0)
477       {
478         std::cout << "Syntax error: wrong offset\n";
479         return 1;
480       }
481       NCollection_Array1<Standard_Byte> aBuff (1, aLen);
482       if (!aFile.read ((char* )&aBuff.ChangeFirst(), aBuff.Size()))
483       {
484         std::cout << "Error: unable to read file\n";
485         return 1;
486       }
487       aFile.close();
488       if (!anImage->Load (&aBuff.ChangeFirst(), aBuff.Size(), anImgPath))
489       {
490         return 0;
491       }
492     }
493     else
494     {
495       if (!anImage->Load (aFile, anImgPath))
496       {
497         return 0;
498       }
499     }
500   }
501
502   TopoDS_Shape aShape = BRepPrimAPI_MakeBox (100.0 * anImage->Ratio(), 100.0, 1.0).Shape();
503   Handle(AIS_Shape) aPrs = new AIS_Shape (aShape);
504   aPrs->SetDisplayMode (AIS_Shaded);
505   aPrs->Attributes()->SetupOwnShadingAspect();
506   const Handle(Graphic3d_AspectFillArea3d)& anAspect = aPrs->Attributes()->ShadingAspect()->Aspect();
507   anAspect->SetShadingModel (Graphic3d_TOSM_UNLIT);
508   anAspect->SetTextureMapOn (true);
509   anAspect->SetTextureMap (new Graphic3d_Texture2Dmanual (anImage));
510   if (anImage->IsTopDown())
511   {
512     anAspect->TextureMap()->GetParams()->SetTranslation(Graphic3d_Vec2 (0.0f, -1.0f));
513     anAspect->TextureMap()->GetParams()->SetScale      (Graphic3d_Vec2 (1.0f, -1.0f));
514   }
515
516   ViewerTest::Display (aPrsName, aPrs, true, true);
517   return 0;
518 }
519
520 void QABugs::Commands_1(Draw_Interpretor& theCommands) {
521   const char *group = "QABugs";
522
523   theCommands.Add ("OCC159", "OCC159 Doc", __FILE__, OCC159bug, group);
524   theCommands.Add ("OCC145", "OCC145 Shape MaxNbr", __FILE__, OCC145bug, group);
525
526   theCommands.Add ("OCC73_SelectionMode", "OCC73_SelectionMode DOC entry [SelectionMode]", __FILE__, OCC73_SelectionMode, group);
527
528   theCommands.Add ("OCC10", "OCC10 Shape MaxNbr", __FILE__, OCC10bug, group);
529
530   theCommands.Add ("OCC74_set", "OCC74_set shape mode;   set selection mode", __FILE__, OCC74bug_set, group);
531   theCommands.Add ("OCC74_get", "OCC74_get shape;   get selection mode", __FILE__, OCC74bug_get, group);
532
533   theCommands.Add ("OCC361", "OCC361 Doc ", __FILE__, OCC361bug, group);
534   theCommands.Add ("OCC30182",
535                    "OCC30182 name image [-offset Start] [-fileName] [-stream] [-memory]\n"
536                    "Decodes image either by passing file name, file stream or memory stream", __FILE__, OCC30182, group);
537   return;
538 }