1 // Created on: 1998-09-01
2 // Created by: Robert COUBLANC
3 // Copyright (c) 1998-1999 Matra Datavision
4 // Copyright (c) 1999-2014 OPEN CASCADE SAS
6 // This file is part of Open CASCADE Technology software library.
8 // This library is free software; you can redistribute it and/or modify it under
9 // the terms of the GNU Lesser General Public License version 2.1 as published
10 // by the Free Software Foundation, with special exception defined in the file
11 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
12 // distribution for complete text of the license and disclaimer of any warranty.
14 // Alternatively, this file may be used under the terms of Open CASCADE
15 // commercial license or contractual agreement.
21 #include <OpenGl_GlCore20.hxx>
22 #include <AIS_Shape.hxx>
23 #include <AIS_Drawer.hxx>
24 #include <AIS_InteractiveObject.hxx>
25 #include <AIS_ListOfInteractive.hxx>
26 #include <AIS_ListIteratorOfListOfInteractive.hxx>
28 #include <Graphic3d_AspectMarker3d.hxx>
29 #include <Graphic3d_ExportFormat.hxx>
30 #include <Graphic3d_NameOfTextureEnv.hxx>
31 #include <Graphic3d_TextureEnv.hxx>
32 #include <Graphic3d_TextureParams.hxx>
33 #include <Graphic3d_TypeOfTextureFilter.hxx>
34 #include <Graphic3d_AspectFillArea3d.hxx>
35 #include <ViewerTest.hxx>
36 #include <ViewerTest_EventManager.hxx>
37 #include <ViewerTest_DoubleMapOfInteractiveAndName.hxx>
38 #include <ViewerTest_DoubleMapIteratorOfDoubleMapOfInteractiveAndName.hxx>
39 #include <Visual3d_View.hxx>
40 #include <Visual3d_ViewManager.hxx>
41 #include <V3d_AmbientLight.hxx>
42 #include <V3d_DirectionalLight.hxx>
43 #include <V3d_LayerMgr.hxx>
44 #include <V3d_LayerMgrPointer.hxx>
45 #include <V3d_PositionalLight.hxx>
46 #include <V3d_SpotLight.hxx>
47 #include <NCollection_DoubleMap.hxx>
48 #include <NCollection_List.hxx>
49 #include <NCollection_Vector.hxx>
50 #include <NIS_View.hxx>
51 #include <NIS_Triangulated.hxx>
52 #include <NIS_InteractiveContext.hxx>
53 #include <AIS_InteractiveContext.hxx>
54 #include <Draw_Interpretor.hxx>
56 #include <Draw_Appli.hxx>
57 #include <Aspect_PrintAlgo.hxx>
58 #include <Image_AlienPixMap.hxx>
59 #include <OpenGl_GraphicDriver.hxx>
60 #include <OSD_Timer.hxx>
61 #include <TColStd_HSequenceOfAsciiString.hxx>
62 #include <TColStd_SequenceOfInteger.hxx>
63 #include <TColStd_HSequenceOfReal.hxx>
64 #include <TColgp_Array1OfPnt2d.hxx>
65 #include <TColStd_MapOfAsciiString.hxx>
66 #include <Visual3d_LayerItem.hxx>
67 #include <Aspect_TypeOfLine.hxx>
68 #include <Image_Diff.hxx>
69 #include <Aspect_DisplayConnection.hxx>
70 #include <Graphic3d.hxx>
74 #include <PrsMgr_PresentableObject.hxx>
75 #include <Graphic3d_ClipPlane.hxx>
76 #include <NCollection_DataMap.hxx>
77 #include <Graphic3d_Texture2Dmanual.hxx>
78 #include <Prs3d_ShadingAspect.hxx>
84 #include <Visual3d_Layer.hxx>
88 #include <WNT_WClass.hxx>
89 #include <WNT_Window.hxx>
92 #define _CRT_SECURE_NO_DEPRECATE
93 #pragma warning (disable:4996)
95 #elif defined(__APPLE__) && !defined(MACOSX_USE_GLX)
96 #include <Cocoa_Window.hxx>
98 #include <Xw_Window.hxx>
99 #include <X11/Xlib.h> /* contains some dangerous #defines such as Status, True etc. */
100 #include <X11/Xutil.h>
104 // Auxiliary definitions
105 static const char THE_KEY_DELETE = 127;
107 //==============================================================================
108 // VIEWER GLOBAL VARIABLES
109 //==============================================================================
111 Standard_IMPORT Standard_Boolean Draw_VirtualWindows;
112 Standard_IMPORT Standard_Boolean Draw_Interprete (const char* theCommand);
114 Standard_EXPORT int ViewerMainLoop(Standard_Integer , const char** argv);
115 extern const Handle(NIS_InteractiveContext)& TheNISContext();
116 extern ViewerTest_DoubleMapOfInteractiveAndName& GetMapOfAIS();
118 extern int VErase (Draw_Interpretor& theDI,
119 Standard_Integer theArgNb,
120 const char** theArgVec);
123 static Handle(WNT_Window)& VT_GetWindow() {
124 static Handle(WNT_Window) WNTWin;
127 #elif defined(__APPLE__) && !defined(MACOSX_USE_GLX)
128 static Handle(Cocoa_Window)& VT_GetWindow()
130 static Handle(Cocoa_Window) aWindow;
133 extern void ViewerTest_SetCocoaEventManagerView (const Handle(Cocoa_Window)& theWindow);
134 extern void SetCocoaWindowTitle (const Handle(Cocoa_Window)& theWindow, Standard_CString theTitle);
135 extern void GetCocoaScreenResolution (Standard_Integer& theWidth, Standard_Integer& theHeight);
138 static Handle(Xw_Window)& VT_GetWindow(){
139 static Handle(Xw_Window) XWWin;
143 static void VProcessEvents(ClientData,int);
146 static Handle(Aspect_DisplayConnection)& GetDisplayConnection()
148 static Handle(Aspect_DisplayConnection) aDisplayConnection;
149 return aDisplayConnection;
152 static void SetDisplayConnection (const Handle(Aspect_DisplayConnection)& theDisplayConnection)
154 GetDisplayConnection() = theDisplayConnection;
157 #if defined(_WIN32) || (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
158 Aspect_Handle GetWindowHandle(const Handle(Aspect_Window)& theWindow)
160 Aspect_Handle aWindowHandle = (Aspect_Handle)NULL;
162 const Handle (WNT_Window) aWindow = Handle(WNT_Window)::DownCast (theWindow);
163 if (!aWindow.IsNull())
164 return aWindow->HWindow();
165 #elif (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
166 const Handle (Xw_Window) aWindow = Handle(Xw_Window)::DownCast (theWindow);
167 if (!aWindow.IsNull())
168 return aWindow->XWindow();
170 return aWindowHandle;
174 static Standard_Boolean MyHLRIsOn = Standard_False;
176 NCollection_DoubleMap <TCollection_AsciiString, Handle(V3d_View)> ViewerTest_myViews;
177 static NCollection_DoubleMap <TCollection_AsciiString, Handle(AIS_InteractiveContext)> ViewerTest_myContexts;
178 static NCollection_DoubleMap <TCollection_AsciiString, Handle(Graphic3d_GraphicDriver)> ViewerTest_myDrivers;
179 static OpenGl_Caps ViewerTest_myDefaultCaps;
181 #define ZCLIPWIDTH 1.
183 static void OSWindowSetup();
185 //==============================================================================
186 // EVENT GLOBAL VARIABLES
187 //==============================================================================
189 static int Start_Rot = 0;
190 static int ZClipIsOn = 0;
191 int X_Motion = 0; // Current cursor position
193 int X_ButtonPress = 0; // Last ButtonPress position
194 int Y_ButtonPress = 0;
195 Standard_Boolean IsDragged = Standard_False;
196 Standard_Boolean DragFirst;
198 //==============================================================================
201 static LRESULT WINAPI ViewerWindowProc(
206 static LRESULT WINAPI AdvViewerWindowProc(
214 //==============================================================================
217 //==============================================================================
219 const Handle(MMgt_TShared)& ViewerTest::WClass()
221 static Handle(MMgt_TShared) theWClass;
223 if (theWClass.IsNull())
225 theWClass = new WNT_WClass ("GW3D_Class", AdvViewerWindowProc,
226 CS_VREDRAW | CS_HREDRAW, 0, 0,
227 ::LoadCursor (NULL, IDC_ARROW));
233 //==============================================================================
234 //function : CreateName
235 //purpose : Create numerical name for new object in theMap
236 //==============================================================================
237 template <typename ObjectType>
238 TCollection_AsciiString CreateName (const NCollection_DoubleMap <TCollection_AsciiString, ObjectType>& theObjectMap,
239 const TCollection_AsciiString& theDefaultString)
241 if (theObjectMap.IsEmpty())
242 return theDefaultString + TCollection_AsciiString(1);
244 Standard_Integer aNextKey = 1;
245 Standard_Boolean isFound = Standard_False;
248 TCollection_AsciiString aStringKey = theDefaultString + TCollection_AsciiString(aNextKey);
249 // Look for objects with default names
250 if (theObjectMap.IsBound1(aStringKey))
255 isFound = Standard_True;
258 return theDefaultString + TCollection_AsciiString(aNextKey);
261 //==============================================================================
262 //structure : ViewerTest_Names
263 //purpose : Allow to operate with full view name: driverName/viewerName/viewName
264 //==============================================================================
265 struct ViewerTest_Names
268 TCollection_AsciiString myDriverName;
269 TCollection_AsciiString myViewerName;
270 TCollection_AsciiString myViewName;
274 const TCollection_AsciiString& GetDriverName () const
278 void SetDriverName (const TCollection_AsciiString& theDriverName)
280 myDriverName = theDriverName;
282 const TCollection_AsciiString& GetViewerName () const
286 void SetViewerName (const TCollection_AsciiString& theViewerName)
288 myViewerName = theViewerName;
290 const TCollection_AsciiString& GetViewName () const
294 void SetViewName (const TCollection_AsciiString& theViewName)
296 myViewName = theViewName;
299 //===========================================================================
300 //function : Constructor for ViewerTest_Names
301 //purpose : Get view, viewer, driver names from custom string
302 //===========================================================================
304 ViewerTest_Names (const TCollection_AsciiString& theInputString)
306 TCollection_AsciiString aName(theInputString);
307 if (theInputString.IsEmpty())
309 // Get current configuration
310 if (ViewerTest_myDrivers.IsEmpty())
311 myDriverName = CreateName<Handle(Graphic3d_GraphicDriver)>
312 (ViewerTest_myDrivers, TCollection_AsciiString("Driver"));
314 myDriverName = ViewerTest_myDrivers.Find2
315 (ViewerTest::GetAISContext()->CurrentViewer()->Driver());
317 if(ViewerTest_myContexts.IsEmpty())
319 myViewerName = CreateName <Handle(AIS_InteractiveContext)>
320 (ViewerTest_myContexts, TCollection_AsciiString (myDriverName + "/Viewer"));
323 myViewerName = ViewerTest_myContexts.Find2 (ViewerTest::GetAISContext());
325 myViewName = CreateName <Handle(V3d_View)>
326 (ViewerTest_myViews, TCollection_AsciiString(myViewerName + "/View"));
330 // There is at least view name
331 Standard_Integer aParserNumber = 0;
332 for (Standard_Integer i = 0; i < 3; ++i)
334 Standard_Integer aParserPos = aName.SearchFromEnd("/");
338 aName.Split(aParserPos-1);
343 if (aParserNumber == 0)
346 if (!ViewerTest::GetAISContext().IsNull())
348 myDriverName = ViewerTest_myDrivers.Find2
349 (ViewerTest::GetAISContext()->CurrentViewer()->Driver());
350 myViewerName = ViewerTest_myContexts.Find2
351 (ViewerTest::GetAISContext());
355 // There is no opened contexts here, need to create names for viewer and driver
356 myDriverName = CreateName<Handle(Graphic3d_GraphicDriver)>
357 (ViewerTest_myDrivers, TCollection_AsciiString("Driver"));
359 myViewerName = CreateName <Handle(AIS_InteractiveContext)>
360 (ViewerTest_myContexts, TCollection_AsciiString (myDriverName + "/Viewer"));
362 myViewName = TCollection_AsciiString(myViewerName + "/" + theInputString);
364 else if (aParserNumber == 1)
366 // Here is viewerName/viewName
367 if (!ViewerTest::GetAISContext().IsNull())
368 myDriverName = ViewerTest_myDrivers.Find2
369 (ViewerTest::GetAISContext()->CurrentViewer()->Driver());
372 // There is no opened contexts here, need to create name for driver
373 myDriverName = CreateName<Handle(Graphic3d_GraphicDriver)>
374 (ViewerTest_myDrivers, TCollection_AsciiString("Driver"));
376 myViewerName = TCollection_AsciiString(myDriverName + "/" + aName);
378 myViewName = TCollection_AsciiString(myDriverName + "/" + theInputString);
382 //Here is driverName/viewerName/viewName
383 myDriverName = TCollection_AsciiString(aName);
385 TCollection_AsciiString aViewerName(theInputString);
386 aViewerName.Split(aViewerName.SearchFromEnd("/") - 1);
387 myViewerName = TCollection_AsciiString(aViewerName);
389 myViewName = TCollection_AsciiString(theInputString);
395 //==============================================================================
396 //function : FindContextByView
397 //purpose : Find AIS_InteractiveContext by View
398 //==============================================================================
400 Handle(AIS_InteractiveContext) FindContextByView (const Handle(V3d_View)& theView)
402 Handle(AIS_InteractiveContext) anAISContext;
404 for (NCollection_DoubleMap<TCollection_AsciiString, Handle(AIS_InteractiveContext)>::Iterator
405 anIter (ViewerTest_myContexts); anIter.More(); anIter.Next())
407 if (anIter.Value()->CurrentViewer() == theView->Viewer())
408 return anIter.Key2();
414 //==============================================================================
415 //function : SetWindowTitle
416 //purpose : Set window title
417 //==============================================================================
419 void SetWindowTitle (const Handle(Aspect_Window)& theWindow,
420 Standard_CString theTitle)
423 SetWindowText ((HWND)Handle(WNT_Window)::DownCast(theWindow)->HWindow(),
425 #elif defined(__APPLE__) && !defined(MACOSX_USE_GLX)
426 SetCocoaWindowTitle (Handle(Cocoa_Window)::DownCast(theWindow), theTitle);
428 if(GetDisplayConnection()->GetDisplay())
431 Handle(Xw_Window)::DownCast(theWindow)->XWindow();
432 XStoreName (GetDisplayConnection()->GetDisplay(), aWindow , theTitle);
437 //==============================================================================
438 //function : IsWindowOverlapped
439 //purpose : Check if theWindow overlapp another view
440 //==============================================================================
442 Standard_Boolean IsWindowOverlapped (const Standard_Integer thePxLeft,
443 const Standard_Integer thePxTop,
444 const Standard_Integer thePxRight,
445 const Standard_Integer thePxBottom,
446 TCollection_AsciiString& theViewId)
448 for(NCollection_DoubleMap <TCollection_AsciiString, Handle(V3d_View)>::Iterator
449 anIter(ViewerTest_myViews); anIter.More(); anIter.Next())
451 Standard_Integer aTop = 0,
455 anIter.Value()->Window()->Position(aLeft, aTop, aRight, aBottom);
456 if ((thePxLeft >= aLeft && thePxLeft <= aRight && thePxTop >= aTop && thePxTop <= aBottom) ||
457 (thePxLeft >= aLeft && thePxLeft <= aRight && thePxBottom >= aTop && thePxBottom <= aBottom) ||
458 (thePxRight >= aLeft && thePxRight <= aRight && thePxTop >= aTop && thePxTop <= aBottom) ||
459 (thePxRight >= aLeft && thePxRight <= aRight && thePxBottom >= aTop && thePxBottom <= aBottom))
461 theViewId = anIter.Key1();
462 return Standard_True;
465 return Standard_False;
468 // Workaround: to create and delete non-orthographic views outside ViewerTest
469 void ViewerTest::RemoveViewName (const TCollection_AsciiString& theName)
471 ViewerTest_myViews.UnBind1 (theName);
474 void ViewerTest::InitViewName (const TCollection_AsciiString& theName,
475 const Handle(V3d_View)& theView)
477 ViewerTest_myViews.Bind (theName, theView);
480 TCollection_AsciiString ViewerTest::GetCurrentViewName ()
482 return ViewerTest_myViews.Find2( ViewerTest::CurrentView());
484 //==============================================================================
485 //function : ViewerInit
486 //purpose : Create the window viewer and initialize all the global variable
487 //==============================================================================
489 TCollection_AsciiString ViewerTest::ViewerInit (const Standard_Integer thePxLeft,
490 const Standard_Integer thePxTop,
491 const Standard_Integer thePxWidth,
492 const Standard_Integer thePxHeight,
493 Standard_CString theViewName,
494 Standard_CString theDisplayName)
496 // Default position and dimension of the viewer window.
497 // Note that left top corner is set to be sufficiently small to have
498 // window fit in the small screens (actual for remote desktops, see #23003).
499 // The position corresponds to the window's client area, thus some
500 // gap is added for window frame to be visible.
501 Standard_Integer aPxLeft = 20;
502 Standard_Integer aPxTop = 40;
503 Standard_Integer aPxWidth = 409;
504 Standard_Integer aPxHeight = 409;
505 Standard_Boolean toCreateViewer = Standard_False;
507 Handle(OpenGl_GraphicDriver) aGraphicDriver;
508 ViewerTest_Names aViewNames(theViewName);
509 if (ViewerTest_myViews.IsBound1 (aViewNames.GetViewName ()))
510 aViewNames.SetViewName (aViewNames.GetViewerName() + "/" + CreateName<Handle(V3d_View)>(ViewerTest_myViews, "View"));
517 aPxWidth = thePxWidth;
518 if (thePxHeight != 0)
519 aPxHeight = thePxHeight;
521 // Get graphic driver (create it or get from another view)
522 if (!ViewerTest_myDrivers.IsBound1 (aViewNames.GetDriverName()))
524 // Get connection string
525 #if !defined(_WIN32) && (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
526 TCollection_AsciiString aDisplayName(theDisplayName);
527 if (!aDisplayName.IsEmpty())
528 SetDisplayConnection (new Aspect_DisplayConnection ());
530 SetDisplayConnection (new Aspect_DisplayConnection (aDisplayName));
532 (void)theDisplayName; // avoid warning on unused argument
533 SetDisplayConnection (new Aspect_DisplayConnection ());
535 aGraphicDriver = new OpenGl_GraphicDriver (GetDisplayConnection());
536 aGraphicDriver->ChangeOptions() = ViewerTest_myDefaultCaps;
537 ViewerTest_myDrivers.Bind (aViewNames.GetDriverName(), aGraphicDriver);
538 toCreateViewer = Standard_True;
542 aGraphicDriver = Handle(OpenGl_GraphicDriver)::DownCast (ViewerTest_myDrivers.Find1 (aViewNames.GetDriverName()));
545 //Dispose the window if input parameters are default
546 if (!ViewerTest_myViews.IsEmpty() && thePxLeft == 0 && thePxTop == 0)
548 Standard_Integer aTop = 0,
555 // Get screen resolution
556 #if defined(_WIN32) || defined(__WIN32__)
558 GetClientRect(GetDesktopWindow(), &aWindowSize);
559 aScreenHeight = aWindowSize.bottom;
560 aScreenWidth = aWindowSize.right;
561 #elif defined(__APPLE__) && !defined(MACOSX_USE_GLX)
562 GetCocoaScreenResolution (aScreenWidth, aScreenHeight);
564 Screen *aScreen = DefaultScreenOfDisplay(GetDisplayConnection()->GetDisplay());
565 aScreenWidth = WidthOfScreen(aScreen);
566 aScreenHeight = HeightOfScreen(aScreen);
569 TCollection_AsciiString anOverlappedViewId("");
571 while (IsWindowOverlapped (aPxLeft, aPxTop, aPxLeft + aPxWidth, aPxTop + aPxHeight, anOverlappedViewId))
573 ViewerTest_myViews.Find1(anOverlappedViewId)->Window()->Position (aLeft, aTop, aRight, aBottom);
575 if (IsWindowOverlapped (aRight + 20, aPxTop, aRight + 20 + aPxWidth, aPxTop + aPxHeight, anOverlappedViewId)
576 && aRight + 2*aPxWidth + 40 > aScreenWidth)
578 if (aBottom + aPxHeight + 40 > aScreenHeight)
585 aPxTop = aBottom + 40;
588 aPxLeft = aRight + 20;
593 TCollection_AsciiString aTitle("3D View - ");
594 aTitle = aTitle + aViewNames.GetViewName() + "(*)";
596 // Change name of current active window
597 if (!ViewerTest::CurrentView().IsNull())
599 TCollection_AsciiString aTitle("3D View - ");
601 + ViewerTest_myViews.Find2 (ViewerTest::CurrentView());
602 SetWindowTitle (ViewerTest::CurrentView()->Window(), aTitle.ToCString());
606 Handle(V3d_Viewer) a3DViewer;
607 // If it's the single view, we first look for empty context
608 if (ViewerTest_myViews.IsEmpty() && !ViewerTest_myContexts.IsEmpty())
610 NCollection_DoubleMap <TCollection_AsciiString, Handle(AIS_InteractiveContext)>::Iterator
611 anIter(ViewerTest_myContexts);
613 ViewerTest::SetAISContext (anIter.Value());
614 a3DViewer = ViewerTest::GetAISContext()->CurrentViewer();
616 else if (ViewerTest_myContexts.IsBound1(aViewNames.GetViewerName()))
618 ViewerTest::SetAISContext(ViewerTest_myContexts.Find1(aViewNames.GetViewerName()));
619 a3DViewer = ViewerTest::GetAISContext()->CurrentViewer();
621 else if (a3DViewer.IsNull())
623 toCreateViewer = Standard_True;
624 TCollection_ExtendedString NameOfWindow("Viewer3D");
625 a3DViewer = new V3d_Viewer(aGraphicDriver, NameOfWindow.ToExtString());
627 NameOfWindow = TCollection_ExtendedString("Collector");
629 a3DViewer->SetDefaultBackgroundColor(Quantity_NOC_BLACK);
633 if (ViewerTest::GetAISContext().IsNull() ||
634 !(ViewerTest_myContexts.IsBound1(aViewNames.GetViewerName())))
636 Handle(AIS_InteractiveContext) aContext = new AIS_InteractiveContext (a3DViewer);
637 ViewerTest::SetAISContext (aContext);
638 ViewerTest_myContexts.Bind (aViewNames.GetViewerName(), ViewerTest::GetAISContext());
642 ViewerTest::ResetEventManager();
647 VT_GetWindow() = new WNT_Window (aTitle.ToCString(),
648 Handle(WNT_WClass)::DownCast (WClass()),
649 Draw_VirtualWindows ? WS_POPUPWINDOW : WS_OVERLAPPEDWINDOW,
653 #elif defined(__APPLE__) && !defined(MACOSX_USE_GLX)
654 VT_GetWindow() = new Cocoa_Window (aTitle.ToCString(),
656 aPxWidth, aPxHeight);
657 ViewerTest_SetCocoaEventManagerView (VT_GetWindow());
659 VT_GetWindow() = new Xw_Window (aGraphicDriver->GetDisplayConnection(),
662 aPxWidth, aPxHeight);
664 VT_GetWindow()->SetVirtual (Draw_VirtualWindows);
667 Handle(NIS_View) aView = new NIS_View (a3DViewer, VT_GetWindow());
669 ViewerTest::CurrentView(aView);
670 ViewerTest_myViews.Bind (aViewNames.GetViewName(), aView);
671 TheNISContext()->AttachView (aView);
673 // Setup for X11 or NT
676 // Set parameters for V3d_View and V3d_Viewer
677 const Handle (V3d_View) aV3dView = ViewerTest::CurrentView();
678 aV3dView->SetComputedMode(Standard_False);
679 MyHLRIsOn = aV3dView->ComputedMode();
680 aV3dView->SetZClippingDepth(0.5);
681 aV3dView->SetZClippingWidth(ZCLIPWIDTH/2.);
683 a3DViewer->SetDefaultBackgroundColor(Quantity_NOC_BLACK);
686 a3DViewer->SetDefaultLights();
687 a3DViewer->SetLightOn();
690 #if !defined(_WIN32) && (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
691 #if TCL_MAJOR_VERSION < 8
692 Tk_CreateFileHandler((void*)XConnectionNumber(GetDisplayConnection()->GetDisplay()),
693 TK_READABLE, VProcessEvents, (ClientData) VT_GetWindow()->XWindow() );
695 Tk_CreateFileHandler(XConnectionNumber(GetDisplayConnection()->GetDisplay()),
696 TK_READABLE, VProcessEvents, (ClientData) VT_GetWindow()->XWindow() );
700 VT_GetWindow()->Map();
702 // Set the handle of created view in the event manager
703 ViewerTest::ResetEventManager();
705 ViewerTest::CurrentView()->Redraw();
710 return aViewNames.GetViewName();
713 //==============================================================================
714 //function : RedrawAllViews
715 //purpose : Redraw all created views
716 //==============================================================================
717 void ViewerTest::RedrawAllViews()
719 NCollection_DoubleMap<TCollection_AsciiString, Handle(V3d_View)>::Iterator aViewIt(ViewerTest_myViews);
720 for (; aViewIt.More(); aViewIt.Next())
722 const Handle(V3d_View)& aView = aViewIt.Key2();
727 //==============================================================================
729 //purpose : Create the window viewer and initialize all the global variable
730 // Use Tk_CreateFileHandler on UNIX to catch the X11 Viewer event
731 //==============================================================================
733 static int VInit (Draw_Interpretor& theDi, Standard_Integer theArgsNb, const char** theArgVec)
737 std::cerr << theArgVec[0] << ": incorrect number of command arguments.\n"
738 << "Type help for more information.\n";
742 TCollection_AsciiString aViewName, aDisplayName;
743 Standard_Integer aPxLeft = 0, aPxTop = 0, aPxWidth = 0, aPxHeight = 0;
744 TCollection_AsciiString aName, aValue;
745 for (Standard_Integer anArgIt = 1; anArgIt < theArgsNb; ++anArgIt)
747 const TCollection_AsciiString anArg = theArgVec[anArgIt];
748 TCollection_AsciiString anArgCase = anArg;
749 anArgCase.UpperCase();
750 if (ViewerTest::SplitParameter (anArg, aName, aValue))
753 if (aName.IsEqual ("NAME"))
757 else if (aName.IsEqual ("L")
758 || aName.IsEqual ("LEFT"))
760 aPxLeft = aValue.IntegerValue();
762 else if (aName.IsEqual ("T")
763 || aName.IsEqual ("TOP"))
765 aPxTop = aValue.IntegerValue();
767 #if !defined(_WIN32) && (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
768 else if (aName.IsEqual ("DISP")
769 || aName.IsEqual ("DISPLAY"))
771 aDisplayName = aValue;
774 else if (aName.IsEqual ("W")
775 || aName.IsEqual ("WIDTH"))
777 aPxWidth = aValue.IntegerValue();
779 else if (aName.IsEqual ("H")
780 || aName.IsEqual ("HEIGHT"))
782 aPxHeight = aValue.IntegerValue();
786 std::cerr << theArgVec[0] << ": Warning: unknown argument " << anArg << ".\n";
789 else if (aViewName.IsEmpty())
795 std::cerr << theArgVec[0] << ": Warning: unknown argument " << anArg << ".\n";
799 ViewerTest_Names aViewNames (aViewName);
800 if (ViewerTest_myViews.IsBound1 (aViewNames.GetViewName()))
802 TCollection_AsciiString aCommand = TCollection_AsciiString ("vactivate ") + aViewNames.GetViewName();
803 theDi.Eval (aCommand.ToCString());
807 TCollection_AsciiString aViewId = ViewerTest::ViewerInit (aPxLeft, aPxTop, aPxWidth, aPxHeight,
808 aViewName.ToCString(),
809 aDisplayName.ToCString());
814 //==============================================================================
816 //purpose : hidden lines removal algorithm
817 //draw args: vhlr is_enabled={on|off} [show_hidden={1|0}]
818 //==============================================================================
820 static int VHLR (Draw_Interpretor& di, Standard_Integer argc, const char** argv)
822 if (ViewerTest::CurrentView().IsNull())
824 di << argv[0] << ": Call vinit before this command, please.\n";
830 di << argv[0] << ": Wrong number of command arguments.\n"
831 << "Type help " << argv[0] << " for more information.\n";
835 // Enable or disable HLR mode.
836 Standard_Boolean isHLROn =
837 (!strcasecmp (argv[1], "on")) ? Standard_True : Standard_False;
839 if (isHLROn != MyHLRIsOn)
842 ViewerTest::CurrentView()->SetComputedMode (MyHLRIsOn);
845 // Show or hide hidden lines in HLR mode.
846 Standard_Boolean isCurrentShowHidden
847 = ViewerTest::GetAISContext()->DefaultDrawer()->DrawHiddenLine();
849 Standard_Boolean isShowHidden =
850 (argc == 3) ? (atoi(argv[2]) == 1 ? Standard_True : Standard_False)
851 : isCurrentShowHidden;
854 if (isShowHidden != isCurrentShowHidden)
858 ViewerTest::GetAISContext()->DefaultDrawer()->EnableDrawHiddenLine();
862 ViewerTest::GetAISContext()->DefaultDrawer()->DisableDrawHiddenLine();
868 AIS_ListOfInteractive aListOfShapes;
869 ViewerTest::GetAISContext()->DisplayedObjects (aListOfShapes);
871 for (AIS_ListIteratorOfListOfInteractive anIter(aListOfShapes); anIter.More(); anIter.Next())
873 Handle(AIS_Shape) aShape = Handle(AIS_Shape)::DownCast (anIter.Value());
883 ViewerTest::CurrentView()->Update();
887 //==============================================================================
888 //function : VHLRType
889 //purpose : change type of using HLR algorithm
890 //==============================================================================
892 static int VHLRType (Draw_Interpretor& di, Standard_Integer argc, const char** argv)
894 if (ViewerTest::CurrentView().IsNull())
896 di << argv[0] << ": Call vinit before this command, please.\n";
902 di << argv[0] << ": Wrong number of command arguments.\n"
903 << "Type help " << argv[0] << " for more information.\n";
907 Prs3d_TypeOfHLR aTypeOfHLR =
908 (!strcasecmp (argv[1], "algo")) ? Prs3d_TOH_Algo : Prs3d_TOH_PolyAlgo;
912 AIS_ListOfInteractive aListOfShapes;
913 ViewerTest::GetAISContext()->DisplayedObjects (aListOfShapes);
914 ViewerTest::GetAISContext()->DefaultDrawer()->SetTypeOfHLR(aTypeOfHLR);
915 for (AIS_ListIteratorOfListOfInteractive anIter(aListOfShapes);
916 anIter.More(); anIter.Next())
918 Handle(AIS_Shape) aShape = Handle(AIS_Shape)::DownCast(anIter.Value());
921 if (aShape->TypeOfHLR() != aTypeOfHLR)
922 aShape->SetTypeOfHLR (aTypeOfHLR);
926 ViewerTest::CurrentView()->Update();
931 for (Standard_Integer i = 2; i < argc; ++i)
933 ViewerTest_DoubleMapOfInteractiveAndName& aMap = GetMapOfAIS();
934 TCollection_AsciiString aName (argv[i]);
936 if (!aMap.IsBound2 (aName))
938 di << argv[0] << ":" << " Wrong shape name:" << aName.ToCString() << ".\n";
941 Handle(AIS_Shape) anAISObject =
942 Handle(AIS_Shape)::DownCast (aMap.Find2(aName));
943 if (anAISObject.IsNull())
945 anAISObject->SetTypeOfHLR (aTypeOfHLR);
947 anAISObject->Redisplay();
949 ViewerTest::CurrentView()->Update();
955 //==============================================================================
956 //function : FindViewIdByWindowHandle
957 //purpose : Find theView Id in the map of views by window handle
958 //==============================================================================
959 #if defined(_WIN32) || defined(__WIN32__) || (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
960 TCollection_AsciiString FindViewIdByWindowHandle(const Aspect_Handle theWindowHandle)
962 for (NCollection_DoubleMap<TCollection_AsciiString, Handle(V3d_View)>::Iterator
963 anIter(ViewerTest_myViews); anIter.More(); anIter.Next())
965 Aspect_Handle aWindowHandle = GetWindowHandle(anIter.Value()->Window());
966 if (aWindowHandle == theWindowHandle)
967 return anIter.Key1();
969 return TCollection_AsciiString("");
973 //==============================================================================
974 //function : ActivateView
975 //purpose : Make the view active
976 //==============================================================================
978 void ActivateView (const TCollection_AsciiString& theViewName)
980 const Handle(V3d_View) aView = ViewerTest_myViews.Find1(theViewName);
983 Handle(AIS_InteractiveContext) anAISContext = FindContextByView(aView);
984 if (!anAISContext.IsNull())
986 if (!ViewerTest::CurrentView().IsNull())
988 TCollection_AsciiString aTitle("3D View - ");
989 aTitle = aTitle + ViewerTest_myViews.Find2 (ViewerTest::CurrentView());
990 SetWindowTitle (ViewerTest::CurrentView()->Window(), aTitle.ToCString());
993 ViewerTest::CurrentView (aView);
994 // Update degenerate mode
995 MyHLRIsOn = ViewerTest::CurrentView()->ComputedMode();
996 ViewerTest::SetAISContext (anAISContext);
997 TCollection_AsciiString aTitle = TCollection_AsciiString("3D View - ");
998 aTitle = aTitle + theViewName + "(*)";
999 SetWindowTitle (ViewerTest::CurrentView()->Window(), aTitle.ToCString());
1000 #if defined(_WIN32) || defined(__WIN32__)
1001 VT_GetWindow() = Handle(WNT_Window)::DownCast(ViewerTest::CurrentView()->Window());
1002 #elif defined(__APPLE__) && !defined(MACOSX_USE_GLX)
1003 VT_GetWindow() = Handle(Cocoa_Window)::DownCast(ViewerTest::CurrentView()->Window());
1005 VT_GetWindow() = Handle(Xw_Window)::DownCast(ViewerTest::CurrentView()->Window());
1007 SetDisplayConnection(ViewerTest::CurrentView()->Viewer()->Driver()->GetDisplayConnection());
1008 ViewerTest::CurrentView()->Redraw();
1013 //==============================================================================
1014 //function : RemoveView
1015 //purpose : Close and remove view from display, clear maps if neccessary
1016 //==============================================================================
1017 void ViewerTest::RemoveView (const TCollection_AsciiString& theViewName, const Standard_Boolean isContextRemoved)
1019 if (!ViewerTest_myViews.IsBound1(theViewName))
1021 cout << "Wrong view name\n";
1025 // Activate another view if it's active now
1026 if (ViewerTest_myViews.Find1(theViewName) == ViewerTest::CurrentView())
1028 if (ViewerTest_myViews.Extent() > 1)
1030 TCollection_AsciiString aNewViewName;
1031 for (NCollection_DoubleMap <TCollection_AsciiString, Handle(V3d_View)> :: Iterator
1032 anIter(ViewerTest_myViews); anIter.More(); anIter.Next())
1033 if (anIter.Key1() != theViewName)
1035 aNewViewName = anIter.Key1();
1038 ActivateView (aNewViewName);
1042 Handle(V3d_View) anEmptyView;
1043 #if defined(_WIN32) || defined(__WIN32__)
1044 Handle(WNT_Window) anEmptyWindow;
1045 #elif defined(__APPLE__) && !defined(MACOSX_USE_GLX)
1046 Handle(Cocoa_Window) anEmptyWindow;
1048 Handle(Xw_Window) anEmptyWindow;
1050 VT_GetWindow() = anEmptyWindow;
1051 ViewerTest::CurrentView (anEmptyView);
1052 if (isContextRemoved)
1054 Handle(AIS_InteractiveContext) anEmptyContext;
1055 ViewerTest::SetAISContext(anEmptyContext);
1061 Handle(V3d_View) aView = ViewerTest_myViews.Find1(theViewName);
1062 Handle(AIS_InteractiveContext) aCurrentContext = FindContextByView(aView);
1064 // Remove view resources
1065 TheNISContext()->DetachView(Handle(NIS_View)::DownCast(aView));
1066 ViewerTest_myViews.UnBind1(theViewName);
1069 #if !defined(_WIN32) && !defined(__WIN32__) && (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
1070 XFlush (GetDisplayConnection()->GetDisplay());
1073 // Keep context opened only if the closed view is last to avoid
1074 // unused empty contexts
1075 if (!aCurrentContext.IsNull())
1077 // Check if there are more difined views in the viewer
1078 aCurrentContext->CurrentViewer()->InitDefinedViews();
1079 if ((isContextRemoved || ViewerTest_myContexts.Size() != 1) && !aCurrentContext->CurrentViewer()->MoreDefinedViews())
1081 // Remove driver if there is no viewers that use it
1082 Standard_Boolean isRemoveDriver = Standard_True;
1083 for(NCollection_DoubleMap<TCollection_AsciiString, Handle(AIS_InteractiveContext)>::Iterator
1084 anIter(ViewerTest_myContexts); anIter.More(); anIter.Next())
1086 if (aCurrentContext != anIter.Key2() &&
1087 aCurrentContext->CurrentViewer()->Driver() == anIter.Value()->CurrentViewer()->Driver())
1089 isRemoveDriver = Standard_False;
1095 ViewerTest_myDrivers.UnBind2 (aCurrentContext->CurrentViewer()->Driver());
1096 #if !defined(_WIN32) && !defined(__WIN32__) && (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
1097 #if TCL_MAJOR_VERSION < 8
1098 Tk_DeleteFileHandler((void*)XConnectionNumber(aCurrentContext->CurrentViewer()->Driver()->GetDisplayConnection()->GetDisplay()));
1100 Tk_DeleteFileHandler(XConnectionNumber(aCurrentContext->CurrentViewer()->Driver()->GetDisplayConnection()->GetDisplay()));
1105 ViewerTest_myContexts.UnBind2(aCurrentContext);
1108 cout << "3D View - " << theViewName << " was deleted.\n";
1112 //==============================================================================
1114 //purpose : Remove the view defined by its name
1115 //==============================================================================
1117 static int VClose (Draw_Interpretor& /*theDi*/,
1118 Standard_Integer theArgsNb,
1119 const char** theArgVec)
1121 NCollection_List<TCollection_AsciiString> aViewList;
1124 TCollection_AsciiString anArg (theArgVec[1]);
1126 if (anArg.IsEqual ("ALL")
1127 || anArg.IsEqual ("*"))
1129 for (NCollection_DoubleMap<TCollection_AsciiString, Handle(V3d_View)>::Iterator anIter (ViewerTest_myViews);
1130 anIter.More(); anIter.Next())
1132 aViewList.Append (anIter.Key1());
1134 if (aViewList.IsEmpty())
1136 std::cout << "No view to close\n";
1142 ViewerTest_Names aViewName (theArgVec[1]);
1143 if (!ViewerTest_myViews.IsBound1 (aViewName.GetViewName()))
1145 std::cerr << "The view with name '" << theArgVec[1] << "' does not exist\n";
1148 aViewList.Append (aViewName.GetViewName());
1153 // close active view
1154 if (ViewerTest::CurrentView().IsNull())
1156 std::cerr << "No active view!\n";
1159 aViewList.Append (ViewerTest_myViews.Find2 (ViewerTest::CurrentView()));
1162 Standard_Boolean toRemoveContext = (theArgsNb != 3 || Draw::Atoi (theArgVec[2]) != 1);
1163 for (NCollection_List<TCollection_AsciiString>::Iterator anIter(aViewList);
1164 anIter.More(); anIter.Next())
1166 ViewerTest::RemoveView (anIter.Value(), toRemoveContext);
1172 //==============================================================================
1173 //function : VActivate
1174 //purpose : Activate the view defined by its ID
1175 //==============================================================================
1177 static int VActivate (Draw_Interpretor& theDi, Standard_Integer theArgsNb, const char** theArgVec)
1181 theDi << theArgVec[0] << ": wrong number of command arguments.\n"
1182 << "Usage: " << theArgVec[0] << " ViewID\n";
1187 theDi.Eval("vviewlist");
1191 TCollection_AsciiString aNameString(theArgVec[1]);
1192 if ( strcasecmp( aNameString.ToCString(), "NONE" ) == 0 )
1194 TCollection_AsciiString aTitle("3D View - ");
1195 aTitle = aTitle + ViewerTest_myViews.Find2(ViewerTest::CurrentView());
1196 SetWindowTitle (ViewerTest::CurrentView()->Window(), aTitle.ToCString());
1197 Handle(V3d_View) anEmptyView;
1198 #if defined(_WIN32) || defined(__WIN32__)
1199 Handle(WNT_Window) anEmptyWindow;
1200 #elif defined(__APPLE__) && !defined(MACOSX_USE_GLX)
1201 Handle(Cocoa_Window) anEmptyWindow;
1203 Handle(Xw_Window) anEmptyWindow;
1205 VT_GetWindow() = anEmptyWindow;
1206 ViewerTest::CurrentView (anEmptyView);
1207 ViewerTest::ResetEventManager();
1208 theDi << theArgVec[0] << ": all views are inactive\n";
1212 ViewerTest_Names aViewNames(aNameString);
1214 // Check if this view exists in the viewer with the driver
1215 if (!ViewerTest_myViews.IsBound1(aViewNames.GetViewName()))
1217 theDi << "Wrong view name\n";
1221 // Check if it is active already
1222 if (ViewerTest::CurrentView() == ViewerTest_myViews.Find1(aViewNames.GetViewName()))
1224 theDi << theArgVec[0] << ": the view is active already\n";
1228 ActivateView (aViewNames.GetViewName());
1232 //==============================================================================
1233 //function : VViewList
1234 //purpose : Print current list of views per viewer and graphic driver ID
1235 // shared between viewers
1236 //==============================================================================
1238 static int VViewList (Draw_Interpretor& theDi, Standard_Integer theArgsNb, const char** theArgVec)
1242 theDi << theArgVec[0] << ": Wrong number of command arguments\n"
1243 << "Usage: " << theArgVec[0] << " name";
1246 if (ViewerTest_myContexts.Size() < 1)
1249 Standard_Boolean isTreeView =
1250 (( theArgsNb==1 ) || ( strcasecmp( theArgVec[1], "long" ) != 0 ));
1253 theDi << theArgVec[0] <<":\n";
1255 for (NCollection_DoubleMap <TCollection_AsciiString, Handle(Graphic3d_GraphicDriver)>::Iterator
1256 aDriverIter(ViewerTest_myDrivers); aDriverIter.More(); aDriverIter.Next())
1259 theDi << aDriverIter.Key1() << ":\n";
1261 for (NCollection_DoubleMap <TCollection_AsciiString, Handle(AIS_InteractiveContext)>::Iterator
1262 aContextIter(ViewerTest_myContexts); aContextIter.More(); aContextIter.Next())
1264 if (aContextIter.Key1().Search(aDriverIter.Key1()) != -1)
1268 TCollection_AsciiString aContextName(aContextIter.Key1());
1269 theDi << " " << aContextName.Split(aDriverIter.Key1().Length() + 1) << ":" << "\n";
1272 for (NCollection_DoubleMap <TCollection_AsciiString, Handle(V3d_View)>::Iterator
1273 aViewIter(ViewerTest_myViews); aViewIter.More(); aViewIter.Next())
1275 if (aViewIter.Key1().Search(aContextIter.Key1()) != -1)
1277 TCollection_AsciiString aViewName(aViewIter.Key1());
1280 if (aViewIter.Value() == ViewerTest::CurrentView())
1281 theDi << " " << aViewName.Split(aContextIter.Key1().Length() + 1) << "(*)" << "\n";
1283 theDi << " " << aViewName.Split(aContextIter.Key1().Length() + 1) << "\n";
1287 theDi << aViewName << " ";
1297 //==============================================================================
1298 //function : VT_ProcessKeyPress
1299 //purpose : Handle KeyPress event from a CString
1300 //==============================================================================
1301 void VT_ProcessKeyPress (const char* buf_ret)
1303 //cout << "KeyPress" << endl;
1304 const Handle(V3d_View) aView = ViewerTest::CurrentView();
1305 const Handle(NIS_View) aNisView = Handle(NIS_View)::DownCast (aView);
1306 // Letter in alphabetic order
1308 if (!strcasecmp (buf_ret, "A"))
1311 aView->SetProj(V3d_XposYnegZpos);
1313 else if (!strcasecmp (buf_ret, "D"))
1318 else if (!strcasecmp (buf_ret, "F"))
1321 if (aNisView.IsNull())
1324 aNisView->FitAll3d();
1326 else if (!strcasecmp (buf_ret, "H"))
1329 cout << "HLR" << endl;
1330 aView->SetComputedMode (!aView->ComputedMode());
1331 MyHLRIsOn = aView->ComputedMode();
1333 else if (!strcasecmp (buf_ret, "P"))
1336 Handle(AIS_InteractiveContext) aContext = ViewerTest::GetAISContext();
1337 if (aContext->DefaultDrawer()->TypeOfHLR() == Prs3d_TOH_Algo)
1338 aContext->DefaultDrawer()->SetTypeOfHLR(Prs3d_TOH_PolyAlgo);
1340 aContext->DefaultDrawer()->SetTypeOfHLR(Prs3d_TOH_Algo);
1341 if (aContext->NbCurrents()==0 || aContext->NbSelected() == 0)
1343 AIS_ListOfInteractive aListOfShapes;
1344 aContext->DisplayedObjects(aListOfShapes);
1345 for (AIS_ListIteratorOfListOfInteractive anIter(aListOfShapes);
1346 anIter.More(); anIter.Next())
1348 Handle(AIS_Shape) aShape = Handle(AIS_Shape)::DownCast(anIter.Value());
1349 if (aShape.IsNull())
1351 if (aShape->TypeOfHLR() == Prs3d_TOH_PolyAlgo)
1352 aShape->SetTypeOfHLR (Prs3d_TOH_Algo);
1354 aShape->SetTypeOfHLR (Prs3d_TOH_PolyAlgo);
1355 aShape->Redisplay();
1360 for (aContext->InitCurrent();aContext->MoreCurrent();aContext->NextCurrent())
1362 Handle(AIS_Shape) aShape = Handle(AIS_Shape)::DownCast(aContext->Current());
1363 if (aShape.IsNull())
1365 if(aShape->TypeOfHLR() == Prs3d_TOH_PolyAlgo)
1366 aShape->SetTypeOfHLR (Prs3d_TOH_Algo);
1368 aShape->SetTypeOfHLR (Prs3d_TOH_PolyAlgo);
1369 aShape->Redisplay();
1373 aContext->UpdateCurrentViewer();
1376 else if (!strcasecmp (buf_ret, "S"))
1378 std::cout << "setup Shaded display mode" << std::endl;
1380 Handle(AIS_InteractiveContext) Ctx = ViewerTest::GetAISContext();
1381 if(Ctx->NbCurrents()==0 ||
1382 Ctx->NbSelected()==0)
1383 Ctx->SetDisplayMode(AIS_Shaded);
1385 if(Ctx->HasOpenedContext()){
1386 for(Ctx->InitSelected();Ctx->MoreSelected();Ctx->NextSelected())
1387 Ctx->SetDisplayMode(Ctx->Interactive(),1,Standard_False);
1390 for(Ctx->InitCurrent();Ctx->MoreCurrent();Ctx->NextCurrent())
1391 Ctx->SetDisplayMode(Ctx->Current(),1,Standard_False);
1393 Ctx->UpdateCurrentViewer();
1396 else if (!strcasecmp (buf_ret, "U"))
1398 // Unset display mode
1399 std::cout << "reset display mode to defaults" << std::endl;
1401 Handle(AIS_InteractiveContext) Ctx = ViewerTest::GetAISContext();
1402 if(Ctx->NbCurrents()==0 ||
1403 Ctx->NbSelected()==0)
1404 Ctx->SetDisplayMode(AIS_WireFrame);
1406 if(Ctx->HasOpenedContext()){
1407 for(Ctx->InitSelected();Ctx->MoreSelected();Ctx->NextSelected())
1408 Ctx->UnsetDisplayMode(Ctx->Interactive(),Standard_False);
1411 for(Ctx->InitCurrent();Ctx->MoreCurrent();Ctx->NextCurrent())
1412 Ctx->UnsetDisplayMode(Ctx->Current(),Standard_False);
1414 Ctx->UpdateCurrentViewer();
1418 else if (!strcasecmp (buf_ret, "T"))
1421 aView->SetProj(V3d_Zpos);
1423 else if (!strcasecmp (buf_ret, "B"))
1426 aView->SetProj(V3d_Zneg);
1428 else if (!strcasecmp (buf_ret, "L"))
1431 aView->SetProj(V3d_Xneg);
1433 else if (!strcasecmp (buf_ret, "R"))
1436 aView->SetProj(V3d_Xpos);
1438 else if (!strcasecmp (buf_ret, "W"))
1440 std::cout << "setup WireFrame display mode" << std::endl;
1441 Handle(AIS_InteractiveContext) Ctx = ViewerTest::GetAISContext();
1442 if(Ctx->NbCurrents()==0 ||
1443 Ctx->NbSelected()==0)
1444 Ctx->SetDisplayMode(AIS_WireFrame);
1446 if(Ctx->HasOpenedContext()){
1447 for(Ctx->InitSelected();Ctx->MoreSelected();Ctx->NextSelected())
1448 Ctx->SetDisplayMode(Ctx->Interactive(),0,Standard_False);
1451 for(Ctx->InitCurrent();Ctx->MoreCurrent();Ctx->NextCurrent())
1452 Ctx->SetDisplayMode(Ctx->Current(),0,Standard_False);
1454 Ctx->UpdateCurrentViewer();
1457 else if (!strcasecmp (buf_ret, "Z"))
1461 cout << "ZClipping OFF" << endl;
1464 aView->SetZClippingType(V3d_OFF);
1468 cout << "ZClipping ON" << endl;
1471 aView->SetZClippingType(V3d_FRONT);
1475 else if (!strcasecmp (buf_ret, ","))
1477 ViewerTest::GetAISContext()->HilightNextDetected(ViewerTest::CurrentView());
1479 else if (!strcasecmp (buf_ret, "."))
1481 ViewerTest::GetAISContext()->HilightPreviousDetected(ViewerTest::CurrentView());
1483 else if (*buf_ret == THE_KEY_DELETE)
1485 Handle(AIS_InteractiveContext) aCtx = ViewerTest::GetAISContext();
1487 && aCtx->NbCurrents() > 0
1488 && aCtx->NbSelected() > 0)
1490 Draw_Interprete ("verase");
1496 Standard_Integer Num = Draw::Atoi(buf_ret);
1497 if(Num>=0 && Num<=7)
1498 ViewerTest::StandardModeActivation(Num);
1502 //==============================================================================
1503 //function : VT_ProcessExpose
1504 //purpose : Redraw the View on an Expose Event
1505 //==============================================================================
1506 void VT_ProcessExpose()
1508 Handle(V3d_View) aView3d = ViewerTest::CurrentView();
1509 if (!aView3d.IsNull())
1515 //==============================================================================
1516 //function : VT_ProcessConfigure
1517 //purpose : Resize the View on an Configure Event
1518 //==============================================================================
1519 void VT_ProcessConfigure()
1521 Handle(V3d_View) aView3d = ViewerTest::CurrentView();
1522 if (aView3d.IsNull())
1527 aView3d->MustBeResized();
1532 //==============================================================================
1533 //function : VT_ProcessButton1Press
1535 //==============================================================================
1536 Standard_Boolean VT_ProcessButton1Press (Standard_Integer ,
1537 const char** theArgVec,
1538 Standard_Boolean theToPick,
1539 Standard_Boolean theIsShift)
1543 Standard_Real X, Y, Z;
1544 ViewerTest::CurrentView()->Convert (X_Motion, Y_Motion, X, Y, Z);
1546 Draw::Set (theArgVec[1], X);
1547 Draw::Set (theArgVec[2], Y);
1548 Draw::Set (theArgVec[3], Z);
1553 ViewerTest::CurrentEventManager()->ShiftSelect();
1557 ViewerTest::CurrentEventManager()->Select();
1560 return Standard_False;
1563 //==============================================================================
1564 //function : VT_ProcessButton1Release
1565 //purpose : End selecting
1566 //==============================================================================
1567 void VT_ProcessButton1Release (Standard_Boolean theIsShift)
1571 IsDragged = Standard_False;
1572 Handle(ViewerTest_EventManager) EM = ViewerTest::CurrentEventManager();
1575 EM->ShiftSelect (Min (X_ButtonPress, X_Motion), Max (Y_ButtonPress, Y_Motion),
1576 Max (X_ButtonPress, X_Motion), Min (Y_ButtonPress, Y_Motion));
1580 EM->Select (Min (X_ButtonPress, X_Motion), Max (Y_ButtonPress, Y_Motion),
1581 Max (X_ButtonPress, X_Motion), Min (Y_ButtonPress, Y_Motion));
1586 //==============================================================================
1587 //function : VT_ProcessButton3Press
1588 //purpose : Start Rotation
1589 //==============================================================================
1590 void VT_ProcessButton3Press()
1595 ViewerTest::CurrentView()->SetComputedMode (Standard_False);
1597 ViewerTest::CurrentView()->StartRotation( X_ButtonPress, Y_ButtonPress );
1600 //==============================================================================
1601 //function : VT_ProcessButton3Release
1602 //purpose : End rotation
1603 //==============================================================================
1604 void VT_ProcessButton3Release()
1611 ViewerTest::CurrentView()->SetComputedMode (Standard_True);
1616 //==============================================================================
1617 //function : ProcessZClipMotion
1619 //==============================================================================
1621 void ProcessZClipMotion()
1623 Handle(V3d_View) a3DView = ViewerTest::CurrentView();
1624 if ( Abs(X_Motion - X_ButtonPress) > 2 ) {
1625 static Standard_Real CurZPos = 0.;
1627 //Quantity_Length VDX, VDY;
1628 //a3DView->Size(VDX,VDY);
1629 //Standard_Real VDZ = a3DView->ZSize();
1630 //printf("View size (%lf,%lf,%lf)\n", VDX, VDY, VDZ);
1632 Quantity_Length dx = a3DView->Convert(X_Motion - X_ButtonPress);
1634 // Front = Depth + width/2.
1635 Standard_Real D = 0.5;
1636 Standard_Real W = 0.1;
1642 //printf("dx %lf Depth %lf Width %lf\n", dx, D, W);
1644 a3DView->SetZClippingType(V3d_OFF);
1645 a3DView->SetZClippingDepth(D);
1646 a3DView->SetZClippingWidth(W);
1647 a3DView->SetZClippingType(V3d_FRONT);
1651 X_ButtonPress = X_Motion;
1652 Y_ButtonPress = Y_Motion;
1656 //==============================================================================
1657 //function : ProcessControlButton1Motion
1659 //==============================================================================
1661 #if defined(_WIN32) || ! defined(__APPLE__) || defined(MACOSX_USE_GLX)
1662 static void ProcessControlButton1Motion()
1664 ViewerTest::CurrentView()->Zoom( X_ButtonPress, Y_ButtonPress, X_Motion, Y_Motion);
1666 X_ButtonPress = X_Motion;
1667 Y_ButtonPress = Y_Motion;
1671 //==============================================================================
1672 //function : VT_ProcessControlButton2Motion
1674 //==============================================================================
1675 void VT_ProcessControlButton2Motion()
1677 Standard_Integer aDx = X_Motion - X_ButtonPress;
1678 Standard_Integer aDy = Y_Motion - Y_ButtonPress;
1680 aDy = -aDy; // Xwindow Y axis is from top to Bottom
1682 ViewerTest::CurrentView()->Pan (aDx, aDy);
1684 X_ButtonPress = X_Motion;
1685 Y_ButtonPress = Y_Motion;
1688 //==============================================================================
1689 //function : VT_ProcessControlButton3Motion
1690 //purpose : Rotation
1691 //==============================================================================
1692 void VT_ProcessControlButton3Motion()
1696 ViewerTest::CurrentView()->Rotation (X_Motion, Y_Motion);
1700 //==============================================================================
1701 //function : VT_ProcessMotion
1703 //==============================================================================
1704 void VT_ProcessMotion()
1706 //pre-hilights detected objects at mouse position
1708 Handle(ViewerTest_EventManager) EM = ViewerTest::CurrentEventManager();
1709 EM->MoveTo(X_Motion, Y_Motion);
1713 void ViewerTest::GetMousePosition(Standard_Integer& Xpix,Standard_Integer& Ypix)
1715 Xpix = X_Motion;Ypix=Y_Motion;
1718 //==============================================================================
1719 //function : ViewProject: implements VAxo, VTop, VLeft, ...
1720 //purpose : Switches to an axonometric, top, left and other views
1721 //==============================================================================
1723 static int ViewProject(Draw_Interpretor& di, const V3d_TypeOfOrientation ori)
1725 if ( ViewerTest::CurrentView().IsNull() )
1727 di<<"Call vinit before this command, please"<<"\n";
1731 ViewerTest::CurrentView()->SetProj(ori);
1735 //==============================================================================
1737 //purpose : Switch to an Axonometric view
1738 //Draw arg : No args
1739 //==============================================================================
1741 static int VAxo(Draw_Interpretor& di, Standard_Integer , const char** )
1743 return ViewProject(di, V3d_XposYnegZpos);
1746 //==============================================================================
1748 //purpose : Switch to a Top View
1749 //Draw arg : No args
1750 //==============================================================================
1752 static int VTop(Draw_Interpretor& di, Standard_Integer , const char** )
1754 return ViewProject(di, V3d_Zpos);
1757 //==============================================================================
1758 //function : VBottom
1759 //purpose : Switch to a Bottom View
1760 //Draw arg : No args
1761 //==============================================================================
1763 static int VBottom(Draw_Interpretor& di, Standard_Integer , const char** )
1765 return ViewProject(di, V3d_Zneg);
1768 //==============================================================================
1770 //purpose : Switch to a Left View
1771 //Draw arg : No args
1772 //==============================================================================
1774 static int VLeft(Draw_Interpretor& di, Standard_Integer , const char** )
1776 return ViewProject(di, V3d_Ypos);
1779 //==============================================================================
1781 //purpose : Switch to a Right View
1782 //Draw arg : No args
1783 //==============================================================================
1785 static int VRight(Draw_Interpretor& di, Standard_Integer , const char** )
1787 return ViewProject(di, V3d_Yneg);
1790 //==============================================================================
1792 //purpose : Switch to a Front View
1793 //Draw arg : No args
1794 //==============================================================================
1796 static int VFront(Draw_Interpretor& di, Standard_Integer , const char** )
1798 return ViewProject(di, V3d_Xpos);
1801 //==============================================================================
1803 //purpose : Switch to a Back View
1804 //Draw arg : No args
1805 //==============================================================================
1807 static int VBack(Draw_Interpretor& di, Standard_Integer , const char** )
1809 return ViewProject(di, V3d_Xneg);
1812 //==============================================================================
1814 //purpose : Dsiplay help on viewer Keyboead and mouse commands
1815 //Draw arg : No args
1816 //==============================================================================
1818 static int VHelp(Draw_Interpretor& di, Standard_Integer , const char** )
1821 di << "Q : Quit the application" << "\n";
1823 di << "========================="<<"\n";
1824 di << "F : FitAll" << "\n";
1825 di << "T : TopView" << "\n";
1826 di << "B : BottomView" << "\n";
1827 di << "R : RightView" << "\n";
1828 di << "L : LeftView" << "\n";
1829 di << "A : AxonometricView" << "\n";
1830 di << "D : ResetView" << "\n";
1832 di << "========================="<<"\n";
1833 di << "S : Shading" << "\n";
1834 di << "W : Wireframe" << "\n";
1835 di << "H : HidelLineRemoval" << "\n";
1836 di << "U : Unset display mode" << "\n";
1837 di << "Delete : Remove selection from viewer" << "\n";
1839 di << "========================="<<"\n";
1840 di << "Selection mode "<<"\n";
1841 di << "0 : Shape" <<"\n";
1842 di << "1 : Vertex" <<"\n";
1843 di << "2 : Edge" <<"\n";
1844 di << "3 : Wire" <<"\n";
1845 di << "4 : Face" <<"\n";
1846 di << "5 : Shell" <<"\n";
1847 di << "6 : Solid" <<"\n";
1848 di << "7 : Compound" <<"\n";
1850 di << "========================="<<"\n";
1851 di << "Z : Switch Z clipping On/Off" << "\n";
1852 di << ", : Hilight next detected" << "\n";
1853 di << ". : Hilight previous detected" << "\n";
1860 static Standard_Boolean Ppick = 0;
1861 static Standard_Integer Pargc = 0;
1862 static const char** Pargv = NULL;
1865 static LRESULT WINAPI AdvViewerWindowProc( HWND hwnd,
1870 if (!ViewerTest_myViews.IsEmpty()) {
1872 WPARAM fwKeys = wParam;
1877 // Delete view from map of views
1878 ViewerTest::RemoveView(FindViewIdByWindowHandle(hwnd));
1883 if(LOWORD(wParam) == WA_CLICKACTIVE || LOWORD(wParam) == WA_ACTIVE
1884 || ViewerTest::CurrentView().IsNull())
1886 // Activate inactive window
1887 if(GetWindowHandle(VT_GetWindow()) != hwnd)
1889 ActivateView (FindViewIdByWindowHandle(hwnd));
1894 IsDragged = Standard_False;
1897 HDC hdc = GetDC( hwnd );
1898 SelectObject( hdc, GetStockObject( HOLLOW_BRUSH ) );
1899 SetROP2( hdc, R2_NOT );
1900 Rectangle( hdc, X_ButtonPress, Y_ButtonPress, X_Motion, Y_Motion );
1901 ReleaseDC( hwnd, hdc );
1903 const Handle(ViewerTest_EventManager) EM =
1904 ViewerTest::CurrentEventManager();
1905 if ( fwKeys & MK_SHIFT )
1906 EM->ShiftSelect( min( X_ButtonPress, X_Motion ), max( Y_ButtonPress, Y_Motion ),
1907 max( X_ButtonPress, X_Motion ), min( Y_ButtonPress, Y_Motion ));
1909 EM->Select( min( X_ButtonPress, X_Motion ), max( Y_ButtonPress, Y_Motion ),
1910 max( X_ButtonPress, X_Motion ), min( Y_ButtonPress, Y_Motion ));
1912 return ViewerWindowProc( hwnd, Msg, wParam, lParam );
1914 case WM_LBUTTONDOWN:
1915 if( fwKeys == MK_LBUTTON || fwKeys == ( MK_LBUTTON | MK_SHIFT ) )
1917 IsDragged = Standard_True;
1918 DragFirst = Standard_True;
1919 X_ButtonPress = LOWORD(lParam);
1920 Y_ButtonPress = HIWORD(lParam);
1922 return ViewerWindowProc( hwnd, Msg, wParam, lParam );
1929 HDC hdc = GetDC( hwnd );
1931 HGDIOBJ anObj = SelectObject( hdc, GetStockObject( WHITE_PEN ) );
1932 SelectObject( hdc, GetStockObject( HOLLOW_BRUSH ) );
1933 SetROP2( hdc, R2_NOT );
1936 Rectangle( hdc, X_ButtonPress, Y_ButtonPress, X_Motion, Y_Motion );
1938 DragFirst = Standard_False;
1939 X_Motion = LOWORD(lParam);
1940 Y_Motion = HIWORD(lParam);
1942 Rectangle( hdc, X_ButtonPress, Y_ButtonPress, X_Motion, Y_Motion );
1944 SelectObject( hdc, anObj );
1946 ReleaseDC( hwnd, hdc );
1949 return ViewerWindowProc( hwnd, Msg, wParam, lParam );
1953 return ViewerWindowProc( hwnd, Msg, wParam, lParam );
1957 return ViewerWindowProc( hwnd, Msg, wParam, lParam );
1961 static LRESULT WINAPI ViewerWindowProc( HWND hwnd,
1968 if ( !ViewerTest::CurrentView().IsNull() ) {
1973 BeginPaint(hwnd, &ps);
1974 EndPaint(hwnd, &ps);
1979 VT_ProcessConfigure();
1983 if ((wParam != VK_SHIFT) && (wParam != VK_CONTROL))
1986 c[0] = (char) wParam;
1988 if (wParam == VK_DELETE)
1990 c[0] = THE_KEY_DELETE;
1992 VT_ProcessKeyPress (c);
2000 VT_ProcessButton3Release();
2003 case WM_LBUTTONDOWN:
2004 case WM_MBUTTONDOWN:
2005 case WM_RBUTTONDOWN:
2007 WPARAM fwKeys = wParam;
2011 X_ButtonPress = LOWORD(lParam);
2012 Y_ButtonPress = HIWORD(lParam);
2014 if (Msg == WM_LBUTTONDOWN)
2016 if (fwKeys & MK_CONTROL)
2018 Ppick = VT_ProcessButton1Press (Pargc, Pargv, Ppick, (fwKeys & MK_SHIFT));
2022 VT_ProcessButton1Press (Pargc, Pargv, Ppick, (fwKeys & MK_SHIFT));
2025 else if (Msg == WM_RBUTTONDOWN)
2028 VT_ProcessButton3Press();
2035 //cout << "\t WM_MOUSEMOVE" << endl;
2036 WPARAM fwKeys = wParam;
2037 X_Motion = LOWORD(lParam);
2038 Y_Motion = HIWORD(lParam);
2041 fwKeys & ( MK_LBUTTON|MK_MBUTTON|MK_RBUTTON ) ) {
2043 X_ButtonPress = LOWORD(lParam);
2044 Y_ButtonPress = HIWORD(lParam);
2046 if ( fwKeys & MK_RBUTTON ) {
2048 VT_ProcessButton3Press();
2052 if ( fwKeys & MK_CONTROL ) {
2053 if ( fwKeys & MK_LBUTTON ) {
2054 ProcessControlButton1Motion();
2056 else if ( fwKeys & MK_MBUTTON ||
2057 ((fwKeys&MK_LBUTTON) &&
2058 (fwKeys&MK_RBUTTON) ) ){
2059 VT_ProcessControlButton2Motion();
2061 else if ( fwKeys & MK_RBUTTON ) {
2062 VT_ProcessControlButton3Motion();
2066 else if ( fwKeys & MK_SHIFT ) {
2067 if ( fwKeys & MK_MBUTTON ||
2068 ((fwKeys&MK_LBUTTON) &&
2069 (fwKeys&MK_RBUTTON) ) ) {
2070 cout << "ProcessZClipMotion()" << endl;
2071 ProcessZClipMotion();
2075 else if (GetWindowHandle (VT_GetWindow()) == hwnd)
2077 if ((fwKeys & MK_MBUTTON
2078 || ((fwKeys & MK_LBUTTON) && (fwKeys & MK_RBUTTON))))
2080 ProcessZClipMotion();
2091 return( DefWindowProc( hwnd, Msg, wParam, lParam ));
2096 return DefWindowProc( hwnd, Msg, wParam, lParam );
2102 //==============================================================================
2103 //function : ViewerMainLoop
2104 //purpose : Get a Event on the view and dispatch it
2105 //==============================================================================
2108 int ViewerMainLoop(Standard_Integer argc, const char** argv)
2110 Ppick = (argc > 0)? 1 : 0;
2118 cout << "Start picking" << endl;
2120 while ( Ppick == 1 ) {
2121 // Wait for a VT_ProcessButton1Press() to toggle pick to 1 or 0
2122 if (GetMessage(&msg, NULL, 0, 0) ) {
2123 TranslateMessage(&msg);
2124 DispatchMessage(&msg);
2128 cout << "Picking done" << endl;
2134 #elif !defined(__APPLE__) || defined(MACOSX_USE_GLX)
2136 int min( int a, int b )
2144 int max( int a, int b )
2152 int ViewerMainLoop(Standard_Integer argc, const char** argv)
2155 static XEvent aReport;
2156 Standard_Boolean pick = argc > 0;
2157 Display *aDisplay = GetDisplayConnection()->GetDisplay();
2158 XNextEvent (aDisplay, &aReport);
2160 // Handle event for the chosen display connection
2161 switch (aReport.type) {
2164 if(aReport.xclient.data.l[0] == GetDisplayConnection()->GetAtom(Aspect_XA_DELETE_WINDOW))
2167 ViewerTest::RemoveView(FindViewIdByWindowHandle (aReport.xclient.window));
2173 // Activate inactive view
2174 Window aWindow = GetWindowHandle(VT_GetWindow());
2175 if(aWindow != aReport.xfocus.window)
2177 ActivateView (FindViewIdByWindowHandle (aReport.xfocus.window));
2186 case ConfigureNotify:
2188 VT_ProcessConfigure();
2197 XComposeStatus status_in_out;
2199 ret_len = XLookupString( ( XKeyEvent *)&aReport ,
2200 (char *) buf_ret , 10 ,
2201 &ks_ret , &status_in_out ) ;
2204 buf_ret[ret_len] = '\0' ;
2208 VT_ProcessKeyPress (buf_ret);
2214 X_ButtonPress = aReport.xbutton.x;
2215 Y_ButtonPress = aReport.xbutton.y;
2217 if (aReport.xbutton.button == Button1)
2219 if (aReport.xbutton.state & ControlMask)
2221 pick = VT_ProcessButton1Press (argc, argv, pick, (aReport.xbutton.state & ShiftMask));
2225 IsDragged = Standard_True;
2226 DragFirst = Standard_True;
2229 else if (aReport.xbutton.button == Button3)
2232 VT_ProcessButton3Press();
2242 Aspect_Handle aWindow = VT_GetWindow()->XWindow();
2243 GC gc = XCreateGC( aDisplay, aWindow, 0, 0 );
2244 XDrawRectangle( aDisplay, aWindow, gc, min( X_ButtonPress, X_Motion ), min( Y_ButtonPress, Y_Motion ), abs( X_Motion-X_ButtonPress ), abs( Y_Motion-Y_ButtonPress ) );
2247 Handle( AIS_InteractiveContext ) aContext = ViewerTest::GetAISContext();
2248 if( aContext.IsNull() )
2250 cout << "The context is null. Please use vinit before createmesh" << endl;
2254 Standard_Boolean ShiftPressed = ( aReport.xbutton.state & ShiftMask );
2255 if( aReport.xbutton.button==1 )
2259 aContext->ShiftSelect();
2268 aContext->ShiftSelect( min( X_ButtonPress, X_Motion ), min( Y_ButtonPress, Y_Motion ),
2269 max( X_ButtonPress, X_Motion ), max( Y_ButtonPress, Y_Motion ),
2270 ViewerTest::CurrentView());
2274 aContext->Select( min( X_ButtonPress, X_Motion ), min( Y_ButtonPress, Y_Motion ),
2275 max( X_ButtonPress, X_Motion ), max( Y_ButtonPress, Y_Motion ),
2276 ViewerTest::CurrentView() );
2279 VT_ProcessButton3Release();
2281 IsDragged = Standard_False;
2284 VT_ProcessButton3Release();
2289 if (GetWindowHandle (VT_GetWindow()) != aReport.xmotion.window)
2295 Aspect_Handle aWindow = VT_GetWindow()->XWindow();
2296 GC gc = XCreateGC( aDisplay, aWindow, 0, 0 );
2297 XSetFunction( aDisplay, gc, GXinvert );
2300 XDrawRectangle(aDisplay, aWindow, gc, min( X_ButtonPress, X_Motion ), min( Y_ButtonPress, Y_Motion ), abs( X_Motion-X_ButtonPress ), abs( Y_Motion-Y_ButtonPress ) );
2302 X_Motion = aReport.xmotion.x;
2303 Y_Motion = aReport.xmotion.y;
2304 DragFirst = Standard_False;
2306 XDrawRectangle( aDisplay, aWindow, gc, min( X_ButtonPress, X_Motion ), min( Y_ButtonPress, Y_Motion ), abs( X_Motion-X_ButtonPress ), abs( Y_Motion-Y_ButtonPress ) );
2310 X_Motion = aReport.xmotion.x;
2311 Y_Motion = aReport.xmotion.y;
2313 // remove all the ButtonMotionMaskr
2314 while( XCheckMaskEvent( aDisplay, ButtonMotionMask, &aReport) ) ;
2316 if ( ZClipIsOn && aReport.xmotion.state & ShiftMask ) {
2317 if ( Abs(X_Motion - X_ButtonPress) > 2 ) {
2319 Quantity_Length VDX, VDY;
2321 ViewerTest::CurrentView()->Size(VDX,VDY);
2322 Standard_Real VDZ =0 ;
2323 VDZ = ViewerTest::CurrentView()->ZSize();
2325 printf("%f,%f,%f\n", VDX, VDY, VDZ);
2327 Quantity_Length dx = 0 ;
2328 dx = ViewerTest::CurrentView()->Convert(X_Motion - X_ButtonPress);
2332 dx = dx / VDX * VDZ;
2336 ViewerTest::CurrentView()->Redraw();
2340 if ( aReport.xmotion.state & ControlMask ) {
2341 if ( aReport.xmotion.state & Button1Mask ) {
2342 ProcessControlButton1Motion();
2344 else if ( aReport.xmotion.state & Button2Mask ) {
2345 VT_ProcessControlButton2Motion();
2347 else if ( aReport.xmotion.state & Button3Mask ) {
2348 VT_ProcessControlButton3Motion();
2362 //==============================================================================
2363 //function : VProcessEvents
2364 //purpose : call by Tk_CreateFileHandler() to be able to manage the
2365 // event in the Viewer window
2366 //==============================================================================
2368 static void VProcessEvents(ClientData,int)
2370 NCollection_Vector<int> anEventNumbers;
2371 // Get number of messages from every display
2372 for (NCollection_DoubleMap <TCollection_AsciiString, Handle(Graphic3d_GraphicDriver)>::Iterator
2373 anIter (ViewerTest_myDrivers); anIter.More(); anIter.Next())
2375 anEventNumbers.Append(XPending (anIter.Key2()->GetDisplayConnection()->GetDisplay()));
2377 // Handle events for every display
2378 int anEventIter = 0;
2379 for (NCollection_DoubleMap <TCollection_AsciiString, Handle(Graphic3d_GraphicDriver)>::Iterator
2380 anIter (ViewerTest_myDrivers); anIter.More(); anIter.Next(), anEventIter++)
2382 for (int i = 0; i < anEventNumbers.Value(anEventIter) &&
2383 XPending (anIter.Key2()->GetDisplayConnection()->GetDisplay()) > 0; ++i)
2385 SetDisplayConnection (anIter.Key2()->GetDisplayConnection());
2386 int anEventResult = ViewerMainLoop( 0, NULL);
2387 // If window is closed or context was not found finish current event processing loop
2393 SetDisplayConnection (ViewerTest::GetAISContext()->CurrentViewer()->Driver()->GetDisplayConnection());
2398 //==============================================================================
2399 //function : OSWindowSetup
2400 //purpose : Setup for the X11 window to be able to cath the event
2401 //==============================================================================
2404 static void OSWindowSetup()
2406 #if !defined(_WIN32) && !defined(__WIN32__) && (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
2409 Window window = VT_GetWindow()->XWindow();
2410 SetDisplayConnection (ViewerTest::CurrentView()->Viewer()->Driver()->GetDisplayConnection());
2411 Display *aDisplay = GetDisplayConnection()->GetDisplay();
2412 XSynchronize(aDisplay, 1);
2414 // X11 : For keyboard on SUN
2416 wmhints.flags = InputHint;
2419 XSetWMHints( aDisplay, window, &wmhints);
2421 XSelectInput( aDisplay, window, ExposureMask | KeyPressMask |
2422 ButtonPressMask | ButtonReleaseMask |
2423 StructureNotifyMask |
2425 Button1MotionMask | Button2MotionMask |
2426 Button3MotionMask | FocusChangeMask
2428 Atom aDeleteWindowAtom = GetDisplayConnection()->GetAtom(Aspect_XA_DELETE_WINDOW);
2429 XSetWMProtocols(aDisplay, window, &aDeleteWindowAtom, 1);
2431 XSynchronize(aDisplay, 0);
2440 //==============================================================================
2443 //purpose : Fitall, no DRAW arguments
2444 //Draw arg : No args
2445 //==============================================================================
2447 static int VFit(Draw_Interpretor& , Standard_Integer , const char** )
2449 const Handle(V3d_View) aView = ViewerTest::CurrentView();
2450 Handle(NIS_View) V = Handle(NIS_View)::DownCast(aView);
2451 if (V.IsNull() == Standard_False) {
2453 } else if (aView.IsNull() == Standard_False) {
2459 //==============================================================================
2461 //purpose : ZFitall, no DRAW arguments
2462 //Draw arg : No args
2463 //==============================================================================
2464 static int VZFit (Draw_Interpretor& /*theDi*/, Standard_Integer theArgsNb, const char** theArgVec)
2466 const Handle(V3d_View)& aCurrentView = ViewerTest::CurrentView();
2468 if (aCurrentView.IsNull())
2470 std::cout << theArgVec[0] << ": Call vinit before this command, please.\n";
2476 aCurrentView->ZFitAll();
2477 aCurrentView->Redraw();
2481 Standard_Real aScale = 1.0;
2485 aScale = Draw::Atoi (theArgVec[1]);
2488 aCurrentView->ZFitAll (aScale);
2489 aCurrentView->Redraw();
2494 //==============================================================================
2495 //function : VRepaint
2497 //==============================================================================
2498 static int VRepaint (Draw_Interpretor& , Standard_Integer , const char** )
2500 Handle(V3d_View) V = ViewerTest::CurrentView();
2501 if ( !V.IsNull() ) V->Redraw(); return 0;
2504 //==============================================================================
2506 //purpose : Remove all the object from the viewer
2507 //Draw arg : No args
2508 //==============================================================================
2510 static int VClear(Draw_Interpretor& , Standard_Integer , const char** )
2512 Handle(V3d_View) V = ViewerTest::CurrentView();
2514 ViewerTest::Clear();
2518 //==============================================================================
2521 //==============================================================================
2523 static int VPick(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2524 { if (ViewerTest::CurrentView().IsNull() ) return 1;
2527 di << argv[0] << "Invalid number of arguments" << "\n";
2531 while (ViewerMainLoop( argc, argv)) {
2537 //==============================================================================
2538 //function : InitViewerTest
2539 //purpose : initialisation de toutes les variables static de ViewerTest (dp)
2540 //==============================================================================
2542 void ViewerTest_InitViewerTest (const Handle(AIS_InteractiveContext)& theContext)
2544 Handle(V3d_Viewer) aViewer = theContext->CurrentViewer();
2545 ViewerTest::SetAISContext(theContext);
2546 aViewer->InitActiveViews();
2547 Handle(V3d_View) aView = aViewer->ActiveView();
2548 if (aViewer->MoreActiveViews()) ViewerTest::CurrentView(aView);
2549 ViewerTest::ResetEventManager();
2550 Handle(Aspect_Window) aWindow = aView->Window();
2551 #if !defined(_WIN32) && !defined(__WIN32__) && (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
2553 VT_GetWindow() = Handle(Xw_Window)::DownCast(aWindow);
2555 static int aFirst = 1;
2557 #if TCL_MAJOR_VERSION < 8
2558 Tk_CreateFileHandler((void*)XConnectionNumber(GetDisplayConnection()->GetDisplay()),
2559 TK_READABLE, VProcessEvents, (ClientData) 0);
2561 Tk_CreateFileHandler(XConnectionNumber(GetDisplayConnection()->GetDisplay()),
2562 TK_READABLE, VProcessEvents, (ClientData) 0);
2569 //==============================================================================
2571 //purpose : Load image as background
2572 //==============================================================================
2574 static int VSetBg(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2576 if (argc < 2 || argc > 3)
2578 di << "Usage : " << argv[0] << " imagefile [filltype] : Load image as background" << "\n";
2579 di << "filltype can be one of CENTERED, TILED, STRETCH, NONE" << "\n";
2583 Handle(AIS_InteractiveContext) AISContext = ViewerTest::GetAISContext();
2584 if(AISContext.IsNull())
2586 di << "use 'vinit' command before " << argv[0] << "\n";
2590 Aspect_FillMethod aFillType = Aspect_FM_CENTERED;
2593 const char* szType = argv[2];
2594 if (strcmp(szType, "NONE" ) == 0) aFillType = Aspect_FM_NONE;
2595 else if (strcmp(szType, "CENTERED") == 0) aFillType = Aspect_FM_CENTERED;
2596 else if (strcmp(szType, "TILED" ) == 0) aFillType = Aspect_FM_TILED;
2597 else if (strcmp(szType, "STRETCH" ) == 0) aFillType = Aspect_FM_STRETCH;
2600 di << "Wrong fill type : " << szType << "\n";
2601 di << "Must be one of CENTERED, TILED, STRETCH, NONE" << "\n";
2606 Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2607 V3dView->SetBackgroundImage(argv[1], aFillType, Standard_True);
2612 //==============================================================================
2613 //function : VSetBgMode
2614 //purpose : Change background image fill type
2615 //==============================================================================
2617 static int VSetBgMode(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2621 di << "Usage : " << argv[0] << " filltype : Change background image mode" << "\n";
2622 di << "filltype must be one of CENTERED, TILED, STRETCH, NONE" << "\n";
2626 Handle(AIS_InteractiveContext) AISContext = ViewerTest::GetAISContext();
2627 if(AISContext.IsNull())
2629 di << "use 'vinit' command before " << argv[0] << "\n";
2632 Aspect_FillMethod aFillType = Aspect_FM_NONE;
2633 const char* szType = argv[1];
2634 if (strcmp(szType, "NONE" ) == 0) aFillType = Aspect_FM_NONE;
2635 else if (strcmp(szType, "CENTERED") == 0) aFillType = Aspect_FM_CENTERED;
2636 else if (strcmp(szType, "TILED" ) == 0) aFillType = Aspect_FM_TILED;
2637 else if (strcmp(szType, "STRETCH" ) == 0) aFillType = Aspect_FM_STRETCH;
2640 di << "Wrong fill type : " << szType << "\n";
2641 di << "Must be one of CENTERED, TILED, STRETCH, NONE" << "\n";
2644 Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2645 V3dView->SetBgImageStyle(aFillType, Standard_True);
2649 //==============================================================================
2650 //function : VSetGradientBg
2651 //purpose : Mount gradient background
2652 //==============================================================================
2653 static int VSetGradientBg(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2657 di << "Usage : " << argv[0] << " R1 G1 B1 R2 G2 B2 Type : Mount gradient background" << "\n";
2658 di << "R1,G1,B1,R2,G2,B2 = [0..255]" << "\n";
2659 di << "Type must be one of 0 = NONE, 1 = HOR, 2 = VER, 3 = DIAG1, 4 = DIAG2" << "\n";
2660 di << " 5 = CORNER1, 6 = CORNER2, 7 = CORNER3, 8 = CORNER4" << "\n";
2664 Handle(AIS_InteractiveContext) AISContext = ViewerTest::GetAISContext();
2665 if(AISContext.IsNull())
2667 di << "use 'vinit' command before " << argv[0] << "\n";
2673 Standard_Real R1 = Draw::Atof(argv[1])/255.;
2674 Standard_Real G1 = Draw::Atof(argv[2])/255.;
2675 Standard_Real B1 = Draw::Atof(argv[3])/255.;
2676 Quantity_Color aColor1(R1,G1,B1,Quantity_TOC_RGB);
2678 Standard_Real R2 = Draw::Atof(argv[4])/255.;
2679 Standard_Real G2 = Draw::Atof(argv[5])/255.;
2680 Standard_Real B2 = Draw::Atof(argv[6])/255.;
2682 Quantity_Color aColor2(R2,G2,B2,Quantity_TOC_RGB);
2683 int aType = Draw::Atoi(argv[7]);
2684 if( aType < 0 || aType > 8 )
2686 di << "Wrong fill type " << "\n";
2687 di << "Must be one of 0 = NONE, 1 = HOR, 2 = VER, 3 = DIAG1, 4 = DIAG2" << "\n";
2688 di << " 5 = CORNER1, 6 = CORNER2, 7 = CORNER3, 8 = CORNER4" << "\n";
2692 Aspect_GradientFillMethod aMethod = Aspect_GradientFillMethod(aType);
2694 Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2695 V3dView->SetBgGradientColors( aColor1, aColor2, aMethod, 1);
2701 //==============================================================================
2702 //function : VSetGradientBgMode
2703 //purpose : Change gradient background fill style
2704 //==============================================================================
2705 static int VSetGradientBgMode(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2709 di << "Usage : " << argv[0] << " Type : Change gradient background fill type" << "\n";
2710 di << "Type must be one of 0 = NONE, 1 = HOR, 2 = VER, 3 = DIAG1, 4 = DIAG2" << "\n";
2711 di << " 5 = CORNER1, 6 = CORNER2, 7 = CORNER3, 8 = CORNER4" << "\n";
2715 Handle(AIS_InteractiveContext) AISContext = ViewerTest::GetAISContext();
2716 if(AISContext.IsNull())
2718 di << "use 'vinit' command before " << argv[0] << "\n";
2723 int aType = Draw::Atoi(argv[1]);
2724 if( aType < 0 || aType > 8 )
2726 di << "Wrong fill type " << "\n";
2727 di << "Must be one of 0 = NONE, 1 = HOR, 2 = VER, 3 = DIAG1, 4 = DIAG2" << "\n";
2728 di << " 5 = CORNER1, 6 = CORNER2, 7 = CORNER3, 8 = CORNER4" << "\n";
2732 Aspect_GradientFillMethod aMethod = Aspect_GradientFillMethod(aType);
2734 Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2735 V3dView->SetBgGradientStyle( aMethod, 1 );
2741 //==============================================================================
2742 //function : VSetColorBg
2743 //purpose : Set color background
2744 //==============================================================================
2745 static int VSetColorBg(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2749 di << "Usage : " << argv[0] << " R G B : Set color background" << "\n";
2750 di << "R,G,B = [0..255]" << "\n";
2754 Handle(AIS_InteractiveContext) AISContext = ViewerTest::GetAISContext();
2755 if(AISContext.IsNull())
2757 di << "use 'vinit' command before " << argv[0] << "\n";
2763 Standard_Real R = Draw::Atof(argv[1])/255.;
2764 Standard_Real G = Draw::Atof(argv[2])/255.;
2765 Standard_Real B = Draw::Atof(argv[3])/255.;
2766 Quantity_Color aColor(R,G,B,Quantity_TOC_RGB);
2768 Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2769 V3dView->SetBackgroundColor( aColor );
2776 //==============================================================================
2778 //purpose : View Scaling
2779 //==============================================================================
2781 static int VScale(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2783 Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2784 if ( V3dView.IsNull() ) return 1;
2787 di << argv[0] << "Invalid number of arguments" << "\n";
2790 V3dView->SetAxialScale( Draw::Atof(argv[1]), Draw::Atof(argv[2]), Draw::Atof(argv[3]) );
2793 //==============================================================================
2794 //function : VTestZBuffTrihedron
2795 //purpose : Displays a V3d_ZBUFFER'ed or V3d_WIREFRAME'd trihedron
2796 //==============================================================================
2798 static int VTestZBuffTrihedron(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2800 Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2801 if ( V3dView.IsNull() ) return 1;
2803 V3dView->ZBufferTriedronSetup();
2806 // Set up default trihedron parameters
2807 V3dView->TriedronDisplay( Aspect_TOTP_LEFT_LOWER, Quantity_NOC_WHITE, 0.1, V3d_ZBUFFER );
2811 Aspect_TypeOfTriedronPosition aPosition = Aspect_TOTP_LEFT_LOWER;
2812 const char* aPosType = argv[1];
2814 if ( strcmp(aPosType, "center") == 0 )
2816 aPosition = Aspect_TOTP_CENTER;
2818 if (strcmp(aPosType, "left_lower") == 0)
2820 aPosition = Aspect_TOTP_LEFT_LOWER;
2822 if (strcmp(aPosType, "left_upper") == 0)
2824 aPosition = Aspect_TOTP_LEFT_UPPER;
2826 if (strcmp(aPosType, "right_lower") == 0)
2828 aPosition = Aspect_TOTP_RIGHT_LOWER;
2830 if (strcmp(aPosType, "right_upper") == 0)
2832 aPosition = Aspect_TOTP_RIGHT_UPPER;
2835 di << argv[1] << " Invalid type of alignment" << "\n";
2836 di << "Must be one of [ center, left_lower," << "\n";
2837 di << "left_upper, right_lower, right_upper ]" << "\n";
2841 Standard_Real R = Draw::Atof(argv[2])/255.;
2842 Standard_Real G = Draw::Atof(argv[3])/255.;
2843 Standard_Real B = Draw::Atof(argv[4])/255.;
2844 Quantity_Color aColor(R, G, B, Quantity_TOC_RGB);
2846 Standard_Real aScale = Draw::Atof(argv[5]);
2850 di << argv[5] << " Invalid value. Must be > 0" << "\n";
2854 V3d_TypeOfVisualization aPresentation = V3d_ZBUFFER;
2855 const char* aPresType = argv[6];
2857 if ( strcmp(aPresType, "wireframe") == 0 )
2859 aPresentation = V3d_WIREFRAME;
2861 if (strcmp(aPresType, "zbuffer") == 0)
2863 aPresentation = V3d_ZBUFFER;
2866 di << argv[6] << " Invalid type of visualization" << "\n";
2867 di << "Must be one of [ wireframe, zbuffer ]" << "\n";
2871 V3dView->TriedronDisplay( aPosition, aColor.Name(), aScale, aPresentation );
2875 di << argv[0] << " Invalid number of arguments" << "\n";
2884 //==============================================================================
2885 //function : VRotate
2886 //purpose : Camera Rotating
2887 //==============================================================================
2889 static int VRotate( Draw_Interpretor& di, Standard_Integer argc, const char** argv ) {
2890 Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2891 if ( V3dView.IsNull() ) {
2896 V3dView->Rotate( Draw::Atof(argv[1]), Draw::Atof(argv[2]), Draw::Atof(argv[3]) );
2898 } else if ( argc == 7 ) {
2899 V3dView->Rotate( Draw::Atof(argv[1]), Draw::Atof(argv[2]), Draw::Atof(argv[3]), Draw::Atof(argv[4]), Draw::Atof(argv[5]), Draw::Atof(argv[6]) );
2902 di << argv[0] << " Invalid number of arguments" << "\n";
2907 //==============================================================================
2909 //purpose : View zoom in / out (relative to current zoom)
2910 //==============================================================================
2912 static int VZoom( Draw_Interpretor& di, Standard_Integer argc, const char** argv ) {
2913 Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2914 if ( V3dView.IsNull() ) {
2919 Standard_Real coef = Draw::Atof(argv[1]);
2920 if ( coef <= 0.0 ) {
2921 di << argv[1] << "Invalid value" << "\n";
2924 V3dView->SetZoom( Draw::Atof(argv[1]) );
2927 di << argv[0] << " Invalid number of arguments" << "\n";
2932 //==============================================================================
2934 //purpose : View panning (in pixels)
2935 //==============================================================================
2937 static int VPan( Draw_Interpretor& di, Standard_Integer argc, const char** argv ) {
2938 Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2939 if ( V3dView.IsNull() ) return 1;
2942 V3dView->Pan( Draw::Atoi(argv[1]), Draw::Atoi(argv[2]) );
2945 di << argv[0] << " Invalid number of arguments" << "\n";
2951 //==============================================================================
2952 //function : VExport
2953 //purpose : Export the view to a vector graphic format (PS, EMF, PDF)
2954 //==============================================================================
2956 static int VExport(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2958 Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2959 if (V3dView.IsNull())
2964 std::cout << "Usage: " << argv[0] << " Filename [Format]\n";
2968 Graphic3d_ExportFormat anExpFormat = Graphic3d_EF_PDF;
2969 TCollection_AsciiString aFormatStr;
2971 TCollection_AsciiString aFileName (argv[1]);
2972 Standard_Integer aLen = aFileName.Length();
2976 aFormatStr = TCollection_AsciiString (argv[2]);
2980 if (aFileName.Value (aLen - 2) == '.')
2982 aFormatStr = aFileName.SubString (aLen - 1, aLen);
2984 else if (aFileName.Value (aLen - 3) == '.')
2986 aFormatStr = aFileName.SubString (aLen - 2, aLen);
2990 std::cout << "Export format couln't be detected from filename '" << argv[1] << "'\n";
2996 std::cout << "Export format couln't be detected from filename '" << argv[1] << "'\n";
3000 aFormatStr.UpperCase();
3001 if (aFormatStr == "PS")
3002 anExpFormat = Graphic3d_EF_PostScript;
3003 else if (aFormatStr == "EPS")
3004 anExpFormat = Graphic3d_EF_EnhPostScript;
3005 else if (aFormatStr == "TEX")
3006 anExpFormat = Graphic3d_EF_TEX;
3007 else if (aFormatStr == "PDF")
3008 anExpFormat = Graphic3d_EF_PDF;
3009 else if (aFormatStr == "SVG")
3010 anExpFormat = Graphic3d_EF_SVG;
3011 else if (aFormatStr == "PGF")
3012 anExpFormat = Graphic3d_EF_PGF;
3013 else if (aFormatStr == "EMF")
3014 anExpFormat = Graphic3d_EF_EMF;
3017 std::cout << "Invalid export format '" << aFormatStr << "'\n";
3022 if (!V3dView->View()->Export (argv[1], anExpFormat))
3024 di << "Error: export of image to " << aFormatStr << " failed!\n";
3027 catch (Standard_Failure)
3029 di << "Error: export of image to " << aFormatStr << " failed";
3030 di << " (exception: " << Standard_Failure::Caught()->GetMessageString() << ")";
3035 //==============================================================================
3036 //function : VColorScale
3037 //purpose : representation color scale
3038 //==============================================================================
3039 #include <V3d_ColorScale.hxx>
3041 static int VColorScale (Draw_Interpretor& di, Standard_Integer argc, const char ** argv)
3043 if ( argc != 1 && argc != 4 && argc != 5 && argc != 6 && argc != 8 )
3045 di << "Usage : " << argv[0] << " [RangeMin = 0 RangeMax = 100 Intervals = 10 HeightFont = 16 Position = Right X = 0 Y = 0] " << "\n";
3049 Handle(AIS_InteractiveContext) aContext = ViewerTest::GetAISContext();
3050 if(aContext.IsNull()) {
3051 di << argv[0] << " ERROR : use 'vinit' command before " << "\n";
3055 Standard_Real minRange = 0. , maxRange = 100. ;
3057 Standard_Integer numIntervals = 10 ;
3058 Standard_Integer textHeight = 16;
3059 Aspect_TypeOfColorScalePosition position = Aspect_TOCSP_RIGHT;
3060 Standard_Real X = 0., Y = 0. ;
3066 minRange = Draw::Atof( argv[1] );
3067 maxRange = Draw::Atof( argv[2] );
3068 numIntervals = Draw::Atoi( argv[3] );
3071 textHeight = Draw::Atoi( argv[4] );
3073 position = (Aspect_TypeOfColorScalePosition)Draw::Atoi( argv[5] );
3076 X = Draw::Atof( argv[6] );
3077 Y = Draw::Atof( argv[7] );
3080 Handle(V3d_View) curView = ViewerTest::CurrentView( );
3081 if ( curView.IsNull( ) )
3083 Handle(Aspect_ColorScale) aCSV = curView->ColorScale( );
3084 Handle(V3d_ColorScale) aCS = ( Handle( V3d_ColorScale )::DownCast( aCSV ) );
3085 if( ! aCS.IsNull( ) )
3087 aCS->SetPosition( X , Y );
3088 aCS->SetHeight( 0.95) ;
3089 aCS->SetTextHeight( textHeight );
3090 aCS->SetRange( minRange , maxRange );
3091 aCS->SetNumberOfIntervals( numIntervals );
3092 aCS->SetLabelPosition( position );
3093 if( !curView->ColorScaleIsDisplayed() )
3094 curView->ColorScaleDisplay( );
3099 //==============================================================================
3100 //function : VGraduatedTrihedron
3101 //purpose : Displays a graduated trihedron
3102 //==============================================================================
3104 static void AddMultibyteString (TCollection_ExtendedString &name, const char *arg)
3106 const char *str = arg;
3109 unsigned short c1 = *str++;
3110 unsigned short c2 = *str++;
3111 if (!c1 || !c2) break;
3112 name += (Standard_ExtCharacter)((c1 << 8) | c2);
3116 static int VGraduatedTrihedron(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
3119 if (argc != 2 && argc < 5)
3121 di<<"Error: "<<argv[0]<<" - invalid number of arguments\n";
3122 di<<"Usage: type help "<<argv[0]<<"\n";
3123 return 1; //TCL_ERROR
3126 Handle(V3d_View) aV3dView = ViewerTest::CurrentView();
3128 // Create 3D view if it doesn't exist
3129 if ( aV3dView.IsNull() )
3131 ViewerTest::ViewerInit();
3132 aV3dView = ViewerTest::CurrentView();
3133 if( aV3dView.IsNull() )
3135 di << "Error: Cannot create a 3D view\n";
3136 return 1; //TCL_ERROR
3140 // Erase (==0) or display (!=0)
3141 const int display = Draw::Atoi(argv[1]);
3146 TCollection_AsciiString font;
3148 font.AssignCat("Courier");
3150 font.AssignCat(argv[5]);
3152 // Text is multibyte
3153 const Standard_Boolean isMultibyte = (argc < 7)? Standard_False : (Draw::Atoi(argv[6]) != 0);
3156 TCollection_ExtendedString xname, yname, zname;
3161 AddMultibyteString(xname, argv[2]);
3162 AddMultibyteString(yname, argv[3]);
3163 AddMultibyteString(zname, argv[4]);
3179 aV3dView->GraduatedTrihedronDisplay(xname, yname, zname,
3180 Standard_True/*xdrawname*/, Standard_True/*ydrawname*/, Standard_True/*zdrawname*/,
3181 Standard_True/*xdrawvalues*/, Standard_True/*ydrawvalues*/, Standard_True/*zdrawvalues*/,
3182 Standard_True/*drawgrid*/,
3183 Standard_True/*drawaxes*/,
3184 5/*nbx*/, 5/*nby*/, 5/*nbz*/,
3185 10/*xoffset*/, 10/*yoffset*/, 10/*zoffset*/,
3186 30/*xaxisoffset*/, 30/*yaxisoffset*/, 30/*zaxisoffset*/,
3187 Standard_True/*xdrawtickmarks*/, Standard_True/*ydrawtickmarks*/, Standard_True/*zdrawtickmarks*/,
3188 10/*xtickmarklength*/, 10/*ytickmarklength*/, 10/*ztickmarklength*/,
3189 Quantity_NOC_WHITE/*gridcolor*/,
3190 Quantity_NOC_RED/*xnamecolor*/,Quantity_NOC_GREEN/*ynamecolor*/,Quantity_NOC_BLUE1/*znamecolor*/,
3191 Quantity_NOC_RED/*xcolor*/,Quantity_NOC_GREEN/*ycolor*/,Quantity_NOC_BLUE1/*zcolor*/,font);
3194 aV3dView->GraduatedTrihedronErase();
3196 ViewerTest::GetAISContext()->UpdateCurrentViewer();
3202 //==============================================================================
3203 //function : VPrintView
3204 //purpose : Test printing algorithm, print the view to image file with given
3205 // width and height. Printing implemented only for WNT.
3206 //==============================================================================
3207 static int VPrintView (Draw_Interpretor& di, Standard_Integer argc,
3211 di << "Printing implemented only for wnt!\n";
3215 Handle(AIS_InteractiveContext) aContextAIS = NULL;
3216 Handle(V3d_View) aView = NULL;
3217 aContextAIS = ViewerTest::GetAISContext();
3218 if (!aContextAIS.IsNull())
3220 const Handle(V3d_Viewer)& Vwr = aContextAIS->CurrentViewer();
3221 Vwr->InitActiveViews();
3222 if(Vwr->MoreActiveViews())
3223 aView = Vwr->ActiveView();
3229 di << "Call vinit before!\n";
3234 di << "Use: " << argv[0];
3235 di << " width height filename [print algo=0] [tile_width tile_height]\n";
3236 di << "width, height of the intermediate buffer for operation\n";
3237 di << "algo : {0|1}\n";
3238 di << " 0 - stretch algorithm\n";
3239 di << " 1 - tile algorithm\n";
3240 di << "test printing algorithms into an intermediate buffer\n";
3241 di << "using specific tile size if provided\n";
3242 di << "with saving output to an image file\n";
3246 // get the input params
3247 Standard_Integer aWidth = Draw::Atoi (argv[1]);
3248 Standard_Integer aHeight = Draw::Atoi (argv[2]);
3249 Standard_Integer aMode = 0;
3250 TCollection_AsciiString aFileName = TCollection_AsciiString (argv[3]);
3252 aMode = Draw::Atoi (argv[4]);
3254 Standard_Integer aTileWidth = 0;
3255 Standard_Integer aTileHeight = 0;
3256 Standard_Boolean isTileSizeProvided = Standard_False;
3259 isTileSizeProvided = Standard_True;
3260 aTileWidth = Draw::Atoi (argv[5]);
3261 aTileHeight = Draw::Atoi (argv[6]);
3264 // check the input parameters
3265 if (aWidth <= 0 || aHeight <= 0)
3267 di << "Width and height must be positive values!\n";
3270 if (aMode != 0 && aMode != 1)
3273 // define compatible bitmap
3274 HDC anDC = CreateCompatibleDC(0);
3275 BITMAPINFO aBitmapData;
3276 memset (&aBitmapData, 0, sizeof (BITMAPINFOHEADER));
3277 aBitmapData.bmiHeader.biSize = sizeof (BITMAPINFOHEADER);
3278 aBitmapData.bmiHeader.biWidth = aWidth ;
3279 aBitmapData.bmiHeader.biHeight = aHeight;
3280 aBitmapData.bmiHeader.biPlanes = 1;
3281 aBitmapData.bmiHeader.biBitCount = 24;
3282 aBitmapData.bmiHeader.biXPelsPerMeter = 0;
3283 aBitmapData.bmiHeader.biYPelsPerMeter = 0;
3284 aBitmapData.bmiHeader.biClrUsed = 0;
3285 aBitmapData.bmiHeader.biClrImportant = 0;
3286 aBitmapData.bmiHeader.biCompression = BI_RGB;
3287 aBitmapData.bmiHeader.biSizeImage = 0;
3289 // Create Device Independent Bitmap
3290 void* aBitsOut = NULL;
3291 HBITMAP aMemoryBitmap = CreateDIBSection (anDC, &aBitmapData, DIB_RGB_COLORS,
3292 &aBitsOut, NULL, 0);
3293 HGDIOBJ anOldBitmap = SelectObject(anDC, aMemoryBitmap);
3295 Standard_Boolean isSaved = Standard_False, isPrinted = Standard_False;
3296 if (aBitsOut != NULL)
3299 isPrinted = aView->Print(anDC,1,1,0,Aspect_PA_STRETCH);
3302 if (isTileSizeProvided)
3304 Graphic3d_CView* aCView = static_cast<Graphic3d_CView*> (ViewerTest::CurrentView()->View()->CView());
3305 Graphic3d_PtrFrameBuffer anOldBuffer = static_cast<Graphic3d_PtrFrameBuffer> (aCView->ptrFBO);
3306 aCView->ptrFBO = aView->View()->FBOCreate (aTileWidth, aTileHeight);
3308 isPrinted = aView->Print (anDC, 1, 1, 0, Aspect_PA_TILE);
3310 Graphic3d_PtrFrameBuffer aNewBuffer = static_cast<Graphic3d_PtrFrameBuffer> (aCView->ptrFBO);
3311 aView->View()->FBORelease (aNewBuffer);
3312 aCView->ptrFBO = anOldBuffer;
3316 isPrinted = aView->Print (anDC, 1, 1, 0, Aspect_PA_TILE);
3320 // succesfully printed into an intermediate buffer
3323 Image_PixMap aWrapper;
3324 aWrapper.InitWrapper (Image_PixMap::ImgBGR, (Standard_Byte* )aBitsOut, aWidth, aHeight, aWidth * 3 + aWidth % 4);
3325 aWrapper.SetTopDown (false);
3327 Image_AlienPixMap anImageBitmap;
3328 anImageBitmap.InitCopy (aWrapper);
3329 isSaved = anImageBitmap.Save (aFileName);
3333 di << "Print operation failed due to printing errors or\n";
3334 di << "insufficient memory available\n";
3335 di << "Please, try to use smaller dimensions for this test\n";
3336 di << "command, as it allocates intermediate buffer for storing\n";
3337 di << "the result\n";
3342 di << "Can't allocate memory for intermediate buffer\n";
3343 di << "Please use smaller dimensions\n";
3348 SelectObject (anDC, anOldBitmap);
3349 DeleteObject (aMemoryBitmap);
3355 di << "Save to file operation failed. This operation may fail\n";
3356 di << "if you don't have enough available memory, then you can\n";
3357 di << "use smaller dimensions for the output file\n";
3366 //==============================================================================
3367 //function : VZLayer
3368 //purpose : Test z layer operations for v3d viewer
3369 //==============================================================================
3370 static int VZLayer (Draw_Interpretor& di, Standard_Integer argc, const char** argv)
3372 Handle(AIS_InteractiveContext) aContextAIS = ViewerTest::GetAISContext ();
3373 if (aContextAIS.IsNull())
3375 di << "Call vinit before!\n";
3380 di << "Use: vzlayer " << argv[0];
3381 di << " add/del/get [id]\n";
3382 di << " add - add new z layer to viewer and print its id\n";
3383 di << " del - del z layer by its id\n";
3384 di << " get - print sequence of z layers in increasing order of their overlay level\n";
3385 di << "id - the layer identificator value defined when removing z layer\n";
3389 const Handle(V3d_Viewer)& aViewer = aContextAIS->CurrentViewer();
3390 if (aViewer.IsNull())
3392 di << "No active viewer!\n";
3396 // perform operation
3397 TCollection_AsciiString anOp = TCollection_AsciiString (argv[1]);
3400 Standard_Integer aNewId;
3401 if (!aViewer->AddZLayer (aNewId))
3403 di << "Impossible to add new z layer!\n";
3407 di << "New z layer added with index: " << aNewId << "\n";
3409 else if (anOp == "del")
3413 di << "Please also provide as argument id of z layer to remove\n";
3417 Standard_Integer aDelId = Draw::Atoi (argv[2]);
3418 if (!aViewer->RemoveZLayer (aDelId))
3420 di << "Impossible to remove the z layer or invalid id!\n";
3424 di << "Z layer " << aDelId << " has been removed\n";
3426 else if (anOp == "get")
3428 TColStd_SequenceOfInteger anIds;
3429 aViewer->GetAllZLayers (anIds);
3430 for (Standard_Integer aSeqIdx = 1; aSeqIdx <= anIds.Length(); aSeqIdx++)
3432 di << anIds.Value (aSeqIdx) << " ";
3439 di << "Invalid operation, please use { add / del / get }\n";
3446 DEFINE_STANDARD_HANDLE(V3d_TextItem, Visual3d_LayerItem)
3448 // this class provides a presentation of text item in v3d view under-/overlayer
3449 class V3d_TextItem : public Visual3d_LayerItem
3454 DEFINE_STANDARD_RTTI(V3d_TextItem)
3457 Standard_EXPORT V3d_TextItem(const TCollection_AsciiString& theText,
3458 const Standard_Real theX1,
3459 const Standard_Real theY1,
3460 const Standard_Real theHeight,
3461 const TCollection_AsciiString& theFontName,
3462 const Quantity_Color& theColor,
3463 const Quantity_Color& theSubtitleColor,
3464 const Aspect_TypeOfDisplayText& theTypeOfDisplay,
3465 const Handle(Visual3d_Layer)& theLayer);
3468 Standard_EXPORT void RedrawLayerPrs();
3474 TCollection_AsciiString myText;
3475 Standard_Real myHeight;
3476 Handle(Visual3d_Layer) myLayer;
3477 Quantity_Color myColor;
3478 Quantity_Color mySubtitleColor;
3479 Aspect_TypeOfDisplayText myType;
3480 TCollection_AsciiString myFontName;
3483 IMPLEMENT_STANDARD_HANDLE(V3d_TextItem, Visual3d_LayerItem)
3484 IMPLEMENT_STANDARD_RTTIEXT(V3d_TextItem, Visual3d_LayerItem)
3486 // create and add to display the text item
3487 V3d_TextItem::V3d_TextItem (const TCollection_AsciiString& theText,
3488 const Standard_Real theX1,
3489 const Standard_Real theY1,
3490 const Standard_Real theHeight,
3491 const TCollection_AsciiString& theFontName,
3492 const Quantity_Color& theColor,
3493 const Quantity_Color& theSubtitleColor,
3494 const Aspect_TypeOfDisplayText& theTypeOfDisplay,
3495 const Handle(Visual3d_Layer)& theLayer)
3496 : myX1 (theX1), myY1 (theY1),
3498 myHeight (theHeight),
3501 mySubtitleColor (theSubtitleColor),
3502 myType (theTypeOfDisplay),
3503 myFontName (theFontName)
3505 if (!myLayer.IsNull ())
3506 myLayer->AddLayerItem (this);
3510 void V3d_TextItem::RedrawLayerPrs ()
3512 if (myLayer.IsNull ())
3515 myLayer->SetColor (myColor);
3516 myLayer->SetTextAttributes (myFontName.ToCString (), myType, mySubtitleColor);
3517 myLayer->DrawText (myText.ToCString (), myX1, myY1, myHeight);
3520 DEFINE_STANDARD_HANDLE(V3d_LineItem, Visual3d_LayerItem)
3522 // The Visual3d_LayerItem line item for "vlayerline" command
3523 // it provides a presentation of line with user-defined
3524 // linewidth, linetype and transparency.
3525 class V3d_LineItem : public Visual3d_LayerItem
3529 DEFINE_STANDARD_RTTI(V3d_LineItem)
3532 Standard_EXPORT V3d_LineItem(Standard_Real X1, Standard_Real Y1,
3533 Standard_Real X2, Standard_Real Y2,
3534 V3d_LayerMgrPointer theLayerMgr,
3535 Aspect_TypeOfLine theType = Aspect_TOL_SOLID,
3536 Standard_Real theWidth = 0.5,
3537 Standard_Real theTransp = 1.0);
3540 Standard_EXPORT void RedrawLayerPrs();
3544 Standard_Real myX1, myY1, myX2, myY2;
3545 V3d_LayerMgrPointer myLayerMgr;
3546 Aspect_TypeOfLine myType;
3547 Standard_Real myWidth;
3548 Standard_Real myTransparency;
3551 IMPLEMENT_STANDARD_HANDLE(V3d_LineItem, Visual3d_LayerItem)
3552 IMPLEMENT_STANDARD_RTTIEXT(V3d_LineItem, Visual3d_LayerItem)
3554 // default constructor for line item
3555 V3d_LineItem::V3d_LineItem(Standard_Real X1, Standard_Real Y1,
3556 Standard_Real X2, Standard_Real Y2,
3557 V3d_LayerMgrPointer theLayerMgr,
3558 Aspect_TypeOfLine theType,
3559 Standard_Real theWidth,
3560 Standard_Real theTransp) :
3561 myX1(X1), myY1(Y1), myX2(X2), myY2(Y2), myLayerMgr(theLayerMgr),
3562 myType(theType), myWidth(theWidth), myTransparency(theTransp)
3564 if (myLayerMgr && !myLayerMgr->Overlay().IsNull())
3565 myLayerMgr->Overlay()->AddLayerItem (this);
3569 void V3d_LineItem::RedrawLayerPrs ()
3571 Handle (Visual3d_Layer) aOverlay;
3574 aOverlay = myLayerMgr->Overlay();
3576 if (!aOverlay.IsNull())
3578 Quantity_Color aColor(1.0, 0, 0, Quantity_TOC_RGB);
3579 aOverlay->SetColor(aColor);
3580 aOverlay->SetTransparency((Standard_ShortReal)myTransparency);
3581 aOverlay->SetLineAttributes((Aspect_TypeOfLine)myType, myWidth);
3582 aOverlay->BeginPolyline();
3583 aOverlay->AddVertex(myX1, myY1);
3584 aOverlay->AddVertex(myX2, myY2);
3585 aOverlay->ClosePrimitive();
3589 //=============================================================================
3590 //function : VLayerLine
3591 //purpose : Draws line in the v3d view layer with given attributes: linetype,
3592 // : linewidth, transparency coefficient
3593 //============================================================================
3594 static int VLayerLine(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
3596 // get the active view
3597 Handle(V3d_View) aView = ViewerTest::CurrentView();
3600 di << "Call vinit before!\n";
3605 di << "Use: " << argv[0];
3606 di << " x1 y1 x2 y2 [linewidth = 0.5] [linetype = 0] [transparency = 1]\n";
3607 di << " linetype : { 0 | 1 | 2 | 3 } \n";
3608 di << " 0 - solid \n";
3609 di << " 1 - dashed \n";
3610 di << " 2 - dot \n";
3611 di << " 3 - dashdot\n";
3612 di << " transparency : { 0.0 - 1.0 } \n";
3613 di << " 0.0 - transparent\n";
3614 di << " 1.0 - visible \n";
3618 // get the input params
3619 Standard_Real X1 = Draw::Atof(argv[1]);
3620 Standard_Real Y1 = Draw::Atof(argv[2]);
3621 Standard_Real X2 = Draw::Atof(argv[3]);
3622 Standard_Real Y2 = Draw::Atof(argv[4]);
3624 Standard_Real aWidth = 0.5;
3625 Standard_Integer aType = 0;
3626 Standard_Real aTransparency = 1.0;
3630 aWidth = Draw::Atof(argv[5]);
3634 aType = (Standard_Integer) Draw::Atoi(argv[6]);
3639 aTransparency = Draw::Atof(argv[7]);
3640 if (aTransparency < 0 || aTransparency > 1.0)
3641 aTransparency = 1.0;
3644 // select appropriate line type
3645 Aspect_TypeOfLine aLineType;
3649 aLineType = Aspect_TOL_DASH;
3653 aLineType = Aspect_TOL_DOT;
3657 aLineType = Aspect_TOL_DOTDASH;
3661 aLineType = Aspect_TOL_SOLID;
3664 // replace layer manager
3665 Handle(V3d_LayerMgr) aMgr = new V3d_LayerMgr(aView);
3666 aView->SetLayerMgr(aMgr);
3669 Handle (V3d_LineItem) anItem = new V3d_LineItem(X1, Y1, X2, Y2,
3675 aView->MustBeResized();
3681 //=======================================================================
3682 //function : VOverlayText
3683 //purpose : Test text displaying in view overlay
3684 //=======================================================================
3685 static int VOverlayText (Draw_Interpretor& di, Standard_Integer argc, const char**argv)
3687 // get the active view
3688 Handle(V3d_View) aView = ViewerTest::CurrentView();
3691 di << "No active view. Please call vinit.\n";
3694 else if (argc < 4 || argc > 13)
3696 di << "Use: " << argv[0];
3697 di << " text x y [height] [font_name] [text_color: R G B] [displayType]\n";
3698 di << "[background_color: R G B]\n";
3699 di << " height - pixel height of the text (default=10.0)\n";
3700 di << " font_name - name of font (default=courier)\n";
3701 di << " text_color - R G B values of text color (default=255.0 255.0 255.0)\n";
3702 di << " display_type = {normal/subtitle/decal/blend/dimension}, (default=normal)\n";
3703 di << " background_color- R G B values used for subtitle and decal text\n";
3704 di << "(default=255.0 255.0 255.0)\n";
3708 TCollection_AsciiString aText (argv[1]);
3709 Standard_Real aPosX = Draw::Atof(argv[2]);
3710 Standard_Real aPosY = Draw::Atof(argv[3]);
3711 Standard_Real aHeight = (argc >= 5) ? Draw::Atof (argv[4]) : 10.0;
3714 TCollection_AsciiString aFontName = "Courier";
3716 aFontName = TCollection_AsciiString (argv[5]);
3719 Quantity_Parameter aColorRed = 1.0;
3720 Quantity_Parameter aColorGreen = 1.0;
3721 Quantity_Parameter aColorBlue = 1.0;
3724 aColorRed = Draw::Atof (argv[6])/255.;
3725 aColorGreen = Draw::Atof (argv[7])/255.;
3726 aColorBlue = Draw::Atof (argv[8])/255.;
3730 TCollection_AsciiString aDispStr;
3732 aDispStr = TCollection_AsciiString (argv[9]);
3734 Aspect_TypeOfDisplayText aTextType = Aspect_TODT_NORMAL;
3735 if (aDispStr.IsEqual ("subtitle"))
3736 aTextType = Aspect_TODT_SUBTITLE;
3737 else if (aDispStr.IsEqual ("decal"))
3738 aTextType = Aspect_TODT_DEKALE;
3739 else if (aDispStr.IsEqual ("blend"))
3740 aTextType = Aspect_TODT_BLEND;
3741 else if (aDispStr.IsEqual ("dimension"))
3742 aTextType = Aspect_TODT_DIMENSION;
3745 Quantity_Parameter aSubRed = 1.0;
3746 Quantity_Parameter aSubGreen = 1.0;
3747 Quantity_Parameter aSubBlue = 1.0;
3750 aSubRed = Draw::Atof (argv[10])/255.;
3751 aSubGreen = Draw::Atof (argv[11])/255.;
3752 aSubBlue = Draw::Atof (argv[12])/255.;
3755 // check fo current overlay
3756 Handle(Visual3d_Layer) anOverlay = aView->Viewer()->Viewer()->OverLayer ();
3757 if (anOverlay.IsNull ())
3759 Handle(V3d_LayerMgr) aMgr = new V3d_LayerMgr (aView);
3760 anOverlay = aMgr->Overlay ();
3761 aView->SetLayerMgr (aMgr);
3764 Quantity_Color aTextColor (aColorRed, aColorGreen,
3765 aColorBlue, Quantity_TOC_RGB);
3766 Quantity_Color aSubtColor (aSubRed, aSubGreen,
3767 aSubBlue, Quantity_TOC_RGB);
3770 Handle(V3d_TextItem) anItem = new V3d_TextItem (aText, aPosX, aPosY,
3771 aHeight, aFontName, aTextColor, aSubtColor, aTextType, anOverlay);
3774 aView->MustBeResized();
3780 //==============================================================================
3783 //==============================================================================
3785 static int VGrid (Draw_Interpretor& /*theDI*/,
3786 Standard_Integer theArgNb,
3787 const char** theArgVec)
3789 // get the active view
3790 Handle(V3d_View) aView = ViewerTest::CurrentView();
3791 Handle(V3d_Viewer) aViewer = ViewerTest::GetViewerFromContext();
3792 if (aView.IsNull() || aViewer.IsNull())
3794 std::cerr << "No active view. Please call vinit.\n";
3798 Aspect_GridType aType = aViewer->GridType();
3799 Aspect_GridDrawMode aMode = aViewer->GridDrawMode();
3801 Standard_Integer anIter = 1;
3802 for (; anIter < theArgNb; ++anIter)
3804 const char* aValue = theArgVec[anIter];
3807 aType = Aspect_GT_Rectangular;
3809 else if (*aValue == 'c')
3811 aType = Aspect_GT_Circular;
3813 else if (*aValue == 'l')
3815 aMode = Aspect_GDM_Lines;
3817 else if (*aValue == 'p')
3819 aMode = Aspect_GDM_Points;
3821 else if (strcmp (aValue, "off" ) == 0)
3823 aViewer->DeactivateGrid();
3832 Standard_Integer aTail = (theArgNb - anIter);
3835 aViewer->ActivateGrid (aType, aMode);
3838 else if (aTail != 2 && aTail != 5)
3840 std::cerr << "Incorrect arguments number! Usage:\n"
3841 << "vgrid [off] [Mode={r|c}] [Type={l|p}] [OriginX OriginY [StepX/StepRadius StepY/DivNb RotAngle]]\n";
3845 Quantity_Length anOriginX, anOriginY;
3846 Quantity_PlaneAngle aRotAngle;
3847 if (aType == Aspect_GT_Rectangular)
3849 Quantity_Length aRStepX, aRStepY;
3850 aViewer->RectangularGridValues (anOriginX, anOriginY, aRStepX, aRStepY, aRotAngle);
3852 anOriginX = Draw::Atof (theArgVec[anIter++]);
3853 anOriginY = Draw::Atof (theArgVec[anIter++]);
3856 aRStepX = Draw::Atof (theArgVec[anIter++]);
3857 aRStepY = Draw::Atof (theArgVec[anIter++]);
3858 aRotAngle = Draw::Atof (theArgVec[anIter++]);
3860 aViewer->SetRectangularGridValues (anOriginX, anOriginY, aRStepX, aRStepY, aRotAngle);
3861 aViewer->ActivateGrid (aType, aMode);
3863 else if (aType == Aspect_GT_Circular)
3865 Quantity_Length aRadiusStep;
3866 Standard_Integer aDivisionNumber;
3867 aViewer->CircularGridValues (anOriginX, anOriginY, aRadiusStep, aDivisionNumber, aRotAngle);
3869 anOriginX = Draw::Atof (theArgVec[anIter++]);
3870 anOriginY = Draw::Atof (theArgVec[anIter++]);
3873 aRadiusStep = Draw::Atof (theArgVec[anIter++]);
3874 aDivisionNumber = Draw::Atoi (theArgVec[anIter++]);
3875 aRotAngle = Draw::Atof (theArgVec[anIter++]);
3878 aViewer->SetCircularGridValues (anOriginX, anOriginY, aRadiusStep, aDivisionNumber, aRotAngle);
3879 aViewer->ActivateGrid (aType, aMode);
3885 //==============================================================================
3888 //==============================================================================
3890 static int VFps (Draw_Interpretor& theDI,
3891 Standard_Integer theArgNb,
3892 const char** theArgVec)
3894 // get the active view
3895 Handle(V3d_View) aView = ViewerTest::CurrentView();
3898 std::cerr << "No active view. Please call vinit.\n";
3902 Standard_Integer aFramesNb = (theArgNb > 1) ? Draw::Atoi(theArgVec[1]) : 100;
3905 std::cerr << "Incorrect arguments!\n";
3909 // the time is meaningless for first call
3910 // due to async OpenGl rendering
3913 // redraw view in loop to estimate average values
3916 for (Standard_Integer anInter = 0; anInter < aFramesNb; ++anInter)
3922 const Standard_Real aTime = aTimer.ElapsedTime();
3923 aTimer.OSD_Chronometer::Show (aCpu);
3925 const Standard_Real aFpsAver = Standard_Real(aFramesNb) / aTime;
3926 const Standard_Real aCpuAver = aCpu / Standard_Real(aFramesNb);
3928 // return statistics
3929 theDI << "FPS: " << aFpsAver << "\n"
3930 << "CPU: " << (1000.0 * aCpuAver) << " msec\n";
3935 //==============================================================================
3936 //function : VGlDebug
3938 //==============================================================================
3940 static int VGlDebug (Draw_Interpretor& theDI,
3941 Standard_Integer theArgNb,
3942 const char** theArgVec)
3946 Handle(V3d_View) aView = ViewerTest::CurrentView();
3949 std::cerr << "No active view. Please call vinit.\n";
3953 Standard_Boolean isActive = OpenGl_Context::CheckExtension ((const char* )glGetString (GL_EXTENSIONS),
3954 "GL_ARB_debug_output");
3955 std::cout << "Active graphic driver: debug " << (isActive ? "ON" : "OFF") << "\n";
3956 theDI << (isActive ? "1" : "0");
3960 ViewerTest_myDefaultCaps.contextDebug = Draw::Atoi (theArgVec[1]) != 0;
3964 //==============================================================================
3967 //==============================================================================
3969 static int VVbo (Draw_Interpretor& theDI,
3970 Standard_Integer theArgNb,
3971 const char** theArgVec)
3973 const Standard_Boolean toSet = (theArgNb > 1);
3974 const Standard_Boolean toUseVbo = toSet ? (Draw::Atoi (theArgVec[1]) == 0) : 1;
3977 ViewerTest_myDefaultCaps.vboDisable = toUseVbo;
3981 Handle(AIS_InteractiveContext) aContextAIS = ViewerTest::GetAISContext();
3982 if (aContextAIS.IsNull())
3986 std::cerr << "No active view!\n";
3990 Handle(OpenGl_GraphicDriver) aDriver = Handle(OpenGl_GraphicDriver)::DownCast (aContextAIS->CurrentViewer()->Driver());
3991 if (!aDriver.IsNull())
3995 theDI << (aDriver->Options().vboDisable ? "0" : "1") << "\n";
3999 aDriver->ChangeOptions().vboDisable = toUseVbo;
4006 //==============================================================================
4009 //==============================================================================
4011 static int VCaps (Draw_Interpretor& theDI,
4012 Standard_Integer theArgNb,
4013 const char** theArgVec)
4015 OpenGl_Caps* aCaps = &ViewerTest_myDefaultCaps;
4016 Handle(OpenGl_GraphicDriver) aDriver;
4017 Handle(AIS_InteractiveContext) aContextAIS = ViewerTest::GetAISContext();
4018 if (!aContextAIS.IsNull())
4020 aDriver = Handle(OpenGl_GraphicDriver)::DownCast (aContextAIS->CurrentViewer()->Driver());
4021 aCaps = &aDriver->ChangeOptions();
4026 theDI << "VBO: " << (aCaps->vboDisable ? "0" : "1") << "\n";
4027 theDI << "Sprites: " << (aCaps->pntSpritesDisable ? "0" : "1") << "\n";
4028 theDI << "SoftMode:" << (aCaps->contextNoAccel ? "1" : "0") << "\n";
4032 for (Standard_Integer anArgIter = 1; anArgIter < theArgNb; ++anArgIter)
4034 const TCollection_AsciiString anArg (theArgVec[anArgIter]);
4035 if (anArg.Search ("vbo=") > -1)
4037 aCaps->vboDisable = anArg.Token ("=", 2).IntegerValue() == 0;
4039 else if (anArg.Search ("sprites=") > -1)
4041 aCaps->pntSpritesDisable = anArg.Token ("=", 2).IntegerValue() == 0;
4043 else if (anArg.Search ("soft=") > -1)
4045 aCaps->contextNoAccel = anArg.Token ("=", 2).IntegerValue() != 0;
4049 std::cerr << "Unknown argument: " << anArg << "\n";
4052 if (aCaps != &ViewerTest_myDefaultCaps)
4054 ViewerTest_myDefaultCaps = *aCaps;
4059 //==============================================================================
4060 //function : VMemGpu
4062 //==============================================================================
4064 static int VMemGpu (Draw_Interpretor& theDI,
4065 Standard_Integer theArgNb,
4066 const char** theArgVec)
4069 Handle(AIS_InteractiveContext) aContextAIS = ViewerTest::GetAISContext();
4070 if (aContextAIS.IsNull())
4072 std::cerr << "No active view. Please call vinit.\n";
4076 Handle(Graphic3d_GraphicDriver) aDriver = aContextAIS->CurrentViewer()->Driver();
4077 if (aDriver.IsNull())
4079 std::cerr << "Graphic driver not available.\n";
4083 Standard_Size aFreeBytes = 0;
4084 TCollection_AsciiString anInfo;
4085 if (!aDriver->MemoryInfo (aFreeBytes, anInfo))
4087 std::cerr << "Information not available.\n";
4091 if (theArgNb > 1 && *theArgVec[1] == 'f')
4093 theDI << Standard_Real (aFreeBytes);
4103 // ==============================================================================
4104 // function : VReadPixel
4106 // ==============================================================================
4107 static int VReadPixel (Draw_Interpretor& theDI,
4108 Standard_Integer theArgNb,
4109 const char** theArgVec)
4111 // get the active view
4112 Handle(V3d_View) aView = ViewerTest::CurrentView();
4115 std::cerr << "No active view. Please call vinit.\n";
4118 else if (theArgNb < 3)
4120 std::cerr << "Usage : " << theArgVec[0] << " xPixel yPixel [{rgb|rgba|depth|hls|rgbf|rgbaf}=rgba] [name]\n";
4124 Image_PixMap::ImgFormat aFormat = Image_PixMap::IsBigEndianHost() ? Image_PixMap::ImgRGBA : Image_PixMap::ImgBGRA;
4125 Graphic3d_BufferType aBufferType = Graphic3d_BT_RGBA;
4127 Standard_Integer aWidth, aHeight;
4128 aView->Window()->Size (aWidth, aHeight);
4129 const Standard_Integer anX = Draw::Atoi (theArgVec[1]);
4130 const Standard_Integer anY = Draw::Atoi (theArgVec[2]);
4131 if (anX < 0 || anX >= aWidth || anY < 0 || anY > aHeight)
4133 std::cerr << "Pixel coordinates (" << anX << "; " << anY << ") are out of view (" << aWidth << " x " << aHeight << ")\n";
4137 Standard_Boolean toShowName = Standard_False;
4138 Standard_Boolean toShowHls = Standard_False;
4139 for (Standard_Integer anIter = 3; anIter < theArgNb; ++anIter)
4141 const char* aParam = theArgVec[anIter];
4142 if ( strcasecmp( aParam, "rgb" ) == 0 )
4144 aFormat = Image_PixMap::IsBigEndianHost() ? Image_PixMap::ImgRGB : Image_PixMap::ImgBGR;
4145 aBufferType = Graphic3d_BT_RGB;
4147 else if ( strcasecmp( aParam, "hls" ) == 0 )
4149 aFormat = Image_PixMap::IsBigEndianHost() ? Image_PixMap::ImgRGB : Image_PixMap::ImgBGR;
4150 aBufferType = Graphic3d_BT_RGB;
4151 toShowHls = Standard_True;
4153 else if ( strcasecmp( aParam, "rgbf" ) == 0 )
4155 aFormat = Image_PixMap::ImgRGBF;
4156 aBufferType = Graphic3d_BT_RGB;
4158 else if ( strcasecmp( aParam, "rgba" ) == 0 )
4160 aFormat = Image_PixMap::IsBigEndianHost() ? Image_PixMap::ImgRGBA : Image_PixMap::ImgBGRA;
4161 aBufferType = Graphic3d_BT_RGBA;
4163 else if ( strcasecmp( aParam, "rgbaf" ) == 0 )
4165 aFormat = Image_PixMap::ImgRGBAF;
4166 aBufferType = Graphic3d_BT_RGBA;
4168 else if ( strcasecmp( aParam, "depth" ) == 0 )
4170 aFormat = Image_PixMap::ImgGrayF;
4171 aBufferType = Graphic3d_BT_Depth;
4173 else if ( strcasecmp( aParam, "name" ) == 0 )
4175 toShowName = Standard_True;
4179 Image_PixMap anImage;
4180 if (!anImage.InitTrash (aFormat, aWidth, aHeight))
4182 std::cerr << "Image allocation failed\n";
4185 else if (!aView->ToPixMap (anImage, aWidth, aHeight, aBufferType))
4187 std::cerr << "Image dump failed\n";
4191 Quantity_Parameter anAlpha;
4192 Quantity_Color aColor = anImage.PixelColor (anX, anY, anAlpha);
4195 if (aBufferType == Graphic3d_BT_RGBA)
4197 theDI << Quantity_Color::StringName (aColor.Name()) << " " << anAlpha;
4201 theDI << Quantity_Color::StringName (aColor.Name());
4206 switch (aBufferType)
4209 case Graphic3d_BT_RGB:
4213 theDI << aColor.Hue() << " " << aColor.Light() << " " << aColor.Saturation();
4217 theDI << aColor.Red() << " " << aColor.Green() << " " << aColor.Blue();
4221 case Graphic3d_BT_RGBA:
4223 theDI << aColor.Red() << " " << aColor.Green() << " " << aColor.Blue() << " " << anAlpha;
4226 case Graphic3d_BT_Depth:
4228 theDI << aColor.Red();
4237 //==============================================================================
4238 //function : VDiffImage
4239 //purpose : The draw-command compares two images.
4240 //==============================================================================
4242 static int VDiffImage (Draw_Interpretor& theDI, Standard_Integer theArgNb, const char** theArgVec)
4246 theDI << "Not enough arguments.\n";
4251 const char* anImgPathRef = theArgVec[1];
4252 const char* anImgPathNew = theArgVec[2];
4254 // get string tolerance and check its validity
4255 Standard_Real aTolColor = Draw::Atof (theArgVec[3]);
4256 if (aTolColor < 0.0)
4258 if (aTolColor > 1.0)
4261 Standard_Boolean toBlackWhite = (Draw::Atoi (theArgVec[4]) == 1);
4262 Standard_Boolean isBorderFilterOn = (Draw::Atoi (theArgVec[5]) == 1);
4264 // image file of difference
4265 const char* aDiffImagePath = (theArgNb >= 7) ? theArgVec[6] : NULL;
4267 // compare the images
4268 Image_Diff aComparer;
4269 if (!aComparer.Init (anImgPathRef, anImgPathNew, toBlackWhite))
4274 aComparer.SetColorTolerance (aTolColor);
4275 aComparer.SetBorderFilterOn (isBorderFilterOn);
4276 Standard_Integer aDiffColorsNb = aComparer.Compare();
4277 theDI << aDiffColorsNb << "\n";
4279 // save image of difference
4280 if (aDiffImagePath != NULL)
4282 aComparer.SaveDiffImage (aDiffImagePath);
4288 //=======================================================================
4289 //function : VSelect
4290 //purpose : Emulates different types of selection by mouse:
4291 // 1) single click selection
4292 // 2) selection with rectangle having corners at pixel positions (x1,y1) and (x2,y2)
4293 // 3) selection with polygon having corners at
4294 // pixel positions (x1,y1),...,(xn,yn)
4295 // 4) any of these selections with shift button pressed
4296 //=======================================================================
4297 static Standard_Integer VSelect (Draw_Interpretor& di,
4298 Standard_Integer argc,
4303 di << "Usage : " << argv[0] << " x1 y1 [x2 y2 [... xn yn]] [shift_selection = 1|0]" << "\n";
4307 Handle(AIS_InteractiveContext) myAIScontext = ViewerTest::GetAISContext();
4308 if(myAIScontext.IsNull())
4310 di << "use 'vinit' command before " << argv[0] << "\n";
4313 const Standard_Boolean isShiftSelection = (argc>3 && !(argc%2) && (atoi(argv[argc-1])==1));
4314 Handle(ViewerTest_EventManager) aCurrentEventManager = ViewerTest::CurrentEventManager();
4315 aCurrentEventManager->MoveTo(atoi(argv[1]),atoi(argv[2]));
4318 if(isShiftSelection)
4319 aCurrentEventManager->ShiftSelect();
4321 aCurrentEventManager->Select();
4325 if(isShiftSelection)
4326 aCurrentEventManager->ShiftSelect(atoi(argv[1]),atoi(argv[2]),atoi(argv[3]),atoi(argv[4]));
4328 aCurrentEventManager->Select(atoi(argv[1]),atoi(argv[2]),atoi(argv[3]),atoi(argv[4]));
4332 Standard_Integer anUpper = 0;
4334 if(isShiftSelection)
4335 anUpper = (argc-1)/2;
4338 TColgp_Array1OfPnt2d aPolyline(1,anUpper);
4340 for(Standard_Integer i=1;i<=anUpper;++i)
4341 aPolyline.SetValue(i,gp_Pnt2d(atoi(argv[2*i-1]),atoi(argv[2*i])));
4343 if(isShiftSelection)
4344 aCurrentEventManager->ShiftSelect(aPolyline);
4346 aCurrentEventManager->Select(aPolyline);
4351 //=======================================================================
4352 //function : VMoveTo
4353 //purpose : Emulates cursor movement to defined pixel position
4354 //=======================================================================
4355 static Standard_Integer VMoveTo (Draw_Interpretor& di,
4356 Standard_Integer argc,
4361 di << "Usage : " << argv[0] << " x y" << "\n";
4365 Handle(AIS_InteractiveContext) aContext = ViewerTest::GetAISContext();
4366 if(aContext.IsNull())
4368 di << "use 'vinit' command before " << argv[0] << "\n";
4371 ViewerTest::CurrentEventManager()->MoveTo(atoi(argv[1]),atoi(argv[2]));
4375 //=================================================================================================
4376 //function : VViewParams
4377 //purpose : Gets or sets AIS View characteristics
4378 //=================================================================================================
4379 static int VViewParams (Draw_Interpretor& theDi, Standard_Integer theArgsNb, const char** theArgVec)
4381 Handle(V3d_View) anAISView = ViewerTest::CurrentView();
4382 if (anAISView.IsNull())
4384 std::cout << theArgVec[0] << ": please initialize or activate view.\n";
4390 // print all of the available view parameters
4391 Quantity_Factor anAISViewScale = anAISView->Scale();
4393 Standard_Real anAISViewProjX = 0.0;
4394 Standard_Real anAISViewProjY = 0.0;
4395 Standard_Real anAISViewProjZ = 0.0;
4396 anAISView->Proj (anAISViewProjX, anAISViewProjY, anAISViewProjZ);
4398 Standard_Real anAISViewUpX = 0.0;
4399 Standard_Real anAISViewUpY = 0.0;
4400 Standard_Real anAISViewUpZ = 0.0;
4401 anAISView->Up (anAISViewUpX, anAISViewUpY, anAISViewUpZ);
4403 Standard_Real anAISViewAtX = 0.0;
4404 Standard_Real anAISViewAtY = 0.0;
4405 Standard_Real anAISViewAtZ = 0.0;
4406 anAISView->At (anAISViewAtX, anAISViewAtY, anAISViewAtZ);
4408 Standard_Real anAISViewEyeX = 0.0;
4409 Standard_Real anAISViewEyeY = 0.0;
4410 Standard_Real anAISViewEyeZ = 0.0;
4411 anAISView->Eye (anAISViewEyeX, anAISViewEyeY, anAISViewEyeZ);
4413 theDi << "Scale of current view: " << anAISViewScale << "\n";
4414 theDi << "Proj on X : " << anAISViewProjX << "; on Y: " << anAISViewProjY << "; on Z: " << anAISViewProjZ << "\n";
4415 theDi << "Up on X : " << anAISViewUpX << "; on Y: " << anAISViewUpY << "; on Z: " << anAISViewUpZ << "\n";
4416 theDi << "At on X : " << anAISViewAtX << "; on Y: " << anAISViewAtY << "; on Z: " << anAISViewAtZ << "\n";
4417 theDi << "Eye on X : " << anAISViewEyeX << "; on Y: " << anAISViewEyeY << "; on Z: " << anAISViewEyeZ << "\n";
4421 // -------------------------
4422 // Parse options and values
4423 // -------------------------
4425 NCollection_DataMap<TCollection_AsciiString, Handle(TColStd_HSequenceOfAsciiString)> aMapOfKeysByValues;
4426 TCollection_AsciiString aParseKey;
4427 for (Standard_Integer anArgIt = 1; anArgIt < theArgsNb; ++anArgIt)
4429 TCollection_AsciiString anArg (theArgVec [anArgIt]);
4431 if (anArg.Value (1) == '-' && !anArg.IsRealValue())
4434 aParseKey.Remove (1);
4435 aParseKey.UpperCase();
4436 aMapOfKeysByValues.Bind (aParseKey, new TColStd_HSequenceOfAsciiString);
4440 if (aParseKey.IsEmpty())
4442 std::cout << theArgVec[0] << ": values should be passed with key.\n";
4443 std::cout << "Type help for more information.\n";
4447 aMapOfKeysByValues(aParseKey)->Append (anArg);
4450 // ---------------------------------------------
4451 // Change or print parameters, order plays role
4452 // ---------------------------------------------
4454 // Check arguments for validity
4455 NCollection_DataMap<TCollection_AsciiString, Handle(TColStd_HSequenceOfAsciiString)>::Iterator aMapIt (aMapOfKeysByValues);
4456 for (; aMapIt.More(); aMapIt.Next())
4458 const TCollection_AsciiString& aKey = aMapIt.Key();
4459 const Handle(TColStd_HSequenceOfAsciiString)& aValues = aMapIt.Value();
4461 if (!(aKey.IsEqual ("SCALE") && (aValues->Length() == 1 || aValues->IsEmpty()))
4462 && !(aKey.IsEqual ("SIZE") && (aValues->Length() == 1 || aValues->IsEmpty()))
4463 && !(aKey.IsEqual ("EYE") && (aValues->Length() == 3 || aValues->IsEmpty()))
4464 && !(aKey.IsEqual ("AT") && (aValues->Length() == 3 || aValues->IsEmpty()))
4465 && !(aKey.IsEqual ("UP") && (aValues->Length() == 3 || aValues->IsEmpty()))
4466 && !(aKey.IsEqual ("PROJ") && (aValues->Length() == 3 || aValues->IsEmpty()))
4467 && !(aKey.IsEqual ("CENTER") && aValues->Length() == 2))
4469 TCollection_AsciiString aLowerKey;
4472 aLowerKey.LowerCase();
4473 std::cout << theArgVec[0] << ": " << aLowerKey << " is unknown option, or number of arguments is invalid.\n";
4474 std::cout << "Type help for more information.\n";
4479 Handle(TColStd_HSequenceOfAsciiString) aValues;
4481 // Change view parameters in proper order
4482 if (aMapOfKeysByValues.Find ("SCALE", aValues))
4484 if (aValues->IsEmpty())
4486 theDi << "Scale: " << anAISView->Scale() << "\n";
4490 anAISView->SetScale (aValues->Value(1).RealValue());
4493 if (aMapOfKeysByValues.Find ("SIZE", aValues))
4495 if (aValues->IsEmpty())
4497 Standard_Real aSizeX = 0.0;
4498 Standard_Real aSizeY = 0.0;
4499 anAISView->Size (aSizeX, aSizeY);
4500 theDi << "Size X: " << aSizeX << " Y: " << aSizeY << "\n";
4504 anAISView->SetSize (aValues->Value(1).RealValue());
4507 if (aMapOfKeysByValues.Find ("EYE", aValues))
4509 if (aValues->IsEmpty())
4511 Standard_Real anEyeX = 0.0;
4512 Standard_Real anEyeY = 0.0;
4513 Standard_Real anEyeZ = 0.0;
4514 anAISView->Eye (anEyeX, anEyeY, anEyeZ);
4515 theDi << "Eye X: " << anEyeX << " Y: " << anEyeY << " Z: " << anEyeZ << "\n";
4519 anAISView->SetEye (aValues->Value(1).RealValue(), aValues->Value(2).RealValue(), aValues->Value(3).RealValue());
4522 if (aMapOfKeysByValues.Find ("AT", aValues))
4524 if (aValues->IsEmpty())
4526 Standard_Real anAtX = 0.0;
4527 Standard_Real anAtY = 0.0;
4528 Standard_Real anAtZ = 0.0;
4529 anAISView->At (anAtX, anAtY, anAtZ);
4530 theDi << "At X: " << anAtX << " Y: " << anAtY << " Z: " << anAtZ << "\n";
4534 anAISView->SetAt (aValues->Value(1).RealValue(), aValues->Value(2).RealValue(), aValues->Value(3).RealValue());
4537 if (aMapOfKeysByValues.Find ("PROJ", aValues))
4539 if (aValues->IsEmpty())
4541 Standard_Real aProjX = 0.0;
4542 Standard_Real aProjY = 0.0;
4543 Standard_Real aProjZ = 0.0;
4544 anAISView->Proj (aProjX, aProjY, aProjZ);
4545 theDi << "Proj X: " << aProjX << " Y: " << aProjY << " Z: " << aProjZ << "\n";
4549 anAISView->SetProj (aValues->Value(1).RealValue(), aValues->Value(2).RealValue(), aValues->Value(3).RealValue());
4552 if (aMapOfKeysByValues.Find ("UP", aValues))
4554 if (aValues->IsEmpty())
4556 Standard_Real anUpX = 0.0;
4557 Standard_Real anUpY = 0.0;
4558 Standard_Real anUpZ = 0.0;
4559 anAISView->Up (anUpX, anUpY, anUpZ);
4560 theDi << "Up X: " << anUpX << " Y: " << anUpY << " Z: " << anUpZ << "\n";
4564 anAISView->SetUp (aValues->Value(1).RealValue(), aValues->Value(2).RealValue(), aValues->Value(3).RealValue());
4567 if (aMapOfKeysByValues.Find ("CENTER", aValues))
4569 anAISView->SetCenter (aValues->Value(1).IntegerValue(), aValues->Value(2).IntegerValue());
4575 //=======================================================================
4576 //function : VChangeSelected
4577 //purpose : Adds the shape to selection or remove one from it
4578 //=======================================================================
4579 static Standard_Integer VChangeSelected (Draw_Interpretor& di,
4580 Standard_Integer argc,
4585 di<<"Usage : " << argv[0] << " shape \n";
4589 Handle(AIS_InteractiveContext) aContext = ViewerTest::GetAISContext();
4590 ViewerTest_DoubleMapOfInteractiveAndName& aMap = GetMapOfAIS();
4591 TCollection_AsciiString aName(argv[1]);
4592 Handle(AIS_InteractiveObject) anAISObject;
4594 if(!aMap.IsBound2(aName))
4596 di<<"Use 'vdisplay' before";
4601 anAISObject = Handle(AIS_InteractiveObject)::DownCast(aMap.Find2(aName));
4602 if(anAISObject.IsNull()){
4603 di<<"No interactive object \n";
4607 if(aContext->HasOpenedContext())
4609 aContext->AddOrRemoveSelected(anAISObject);
4613 aContext->AddOrRemoveCurrentObject(anAISObject);
4619 //=======================================================================
4620 //function : VZClipping
4621 //purpose : Gets or sets ZClipping mode, width and depth
4622 //=======================================================================
4623 static Standard_Integer VZClipping (Draw_Interpretor& di,
4624 Standard_Integer argc,
4629 di << "Usage : " << argv[0] << " [mode] [depth width]" << "\n"
4630 <<"mode = OFF|BACK|FRONT|SLICE depth = [0..1] width = [0..1]" << "\n";
4633 Handle(AIS_InteractiveContext) aContext = ViewerTest::GetAISContext();
4634 if(aContext.IsNull())
4636 di << "use 'vinit' command before " << argv[0] << "\n";
4639 Handle(V3d_View) aView = ViewerTest::CurrentView();
4640 V3d_TypeOfZclipping aZClippingMode = V3d_OFF;
4643 TCollection_AsciiString aZClippingModeString;
4644 Quantity_Length aDepth, aWidth;
4645 aZClippingMode = aView->ZClipping(aDepth, aWidth);
4646 switch (aZClippingMode)
4649 aZClippingModeString.Copy("OFF");
4652 aZClippingModeString.Copy("BACK");
4655 aZClippingModeString.Copy("FRONT");
4658 aZClippingModeString.Copy("SLICE");
4661 aZClippingModeString.Copy(TCollection_AsciiString(aZClippingMode));
4664 di << "ZClippingMode = " << aZClippingModeString.ToCString() << "\n"
4665 << "ZClipping depth = " << aDepth << "\n"
4666 << "ZClipping width = " << aWidth << "\n";
4672 Standard_Integer aStatus = 0;
4673 if ( strcmp (argv [1], "OFF") == 0 ) {
4675 aZClippingMode = V3d_OFF;
4677 if ( strcmp (argv [1], "BACK") == 0 ) {
4679 aZClippingMode = V3d_BACK;
4681 if ( strcmp (argv [1], "FRONT") == 0 ) {
4683 aZClippingMode = V3d_FRONT;
4685 if ( strcmp (argv [1], "SLICE") == 0 ) {
4687 aZClippingMode = V3d_SLICE;
4691 di << "Bad mode; Usage : " << argv[0] << " [mode] [depth width]" << "\n"
4692 << "mode = OFF|BACK|FRONT|SLICE depth = [0..1] width = [0..1]" << "\n";
4695 aView->SetZClippingType(aZClippingMode);
4699 Quantity_Length aDepth = 0., aWidth = 1.;
4702 aDepth = atof(argv[1]);
4703 aWidth = atof(argv[2]);
4707 aDepth = atof(argv[2]);
4708 aWidth = atof(argv[3]);
4711 if(aDepth<0. || aDepth>1.)
4713 di << "Bad depth; Usage : " << argv[0] << " [mode] [depth width]" << "\n"
4714 << "mode = OFF|BACK|FRONT|SLICE depth = [0..1] width = [0..1]" << "\n";
4717 if(aWidth<0. || aWidth>1.)
4719 di << "Bad width; Usage : " << argv[0] << " [mode] [depth width]" << "\n"
4720 << "mode = OFF|BACK|FRONT|SLICE depth = [0..1] width = [0..1]" << "\n";
4724 aView->SetZClippingDepth(aDepth);
4725 aView->SetZClippingWidth(aWidth);
4732 //=======================================================================
4733 //function : VNbSelected
4734 //purpose : Returns number of selected objects
4735 //=======================================================================
4736 static Standard_Integer VNbSelected (Draw_Interpretor& di,
4737 Standard_Integer argc,
4742 di << "Usage : " << argv[0] << "\n";
4745 Handle(AIS_InteractiveContext) aContext = ViewerTest::GetAISContext();
4746 if(aContext.IsNull())
4748 di << "use 'vinit' command before " << argv[0] << "\n";
4751 di << aContext->NbSelected() << "\n";
4755 //=======================================================================
4756 //function : VAntialiasing
4757 //purpose : Switches altialiasing on or off
4758 //=======================================================================
4759 static Standard_Integer VAntialiasing (Draw_Interpretor& di,
4760 Standard_Integer argc,
4765 di << "Usage : " << argv[0] << " [1|0]" << "\n";
4769 Handle(AIS_InteractiveContext) aContext = ViewerTest::GetAISContext();
4770 if(aContext.IsNull())
4772 di << "use 'vinit' command before " << argv[0] << "\n";
4776 Handle(V3d_View) aView = ViewerTest::CurrentView();
4778 if((argc == 2) && (atof(argv[1]) == 0))
4779 aView->SetAntialiasingOff();
4781 aView->SetAntialiasingOn();
4786 //=======================================================================
4787 //function : VPurgeDisplay
4788 //purpose : Switches altialiasing on or off
4789 //=======================================================================
4790 static Standard_Integer VPurgeDisplay (Draw_Interpretor& di,
4791 Standard_Integer argc,
4796 di << "Usage : " << argv[0] << "\n";
4799 Handle(AIS_InteractiveContext) aContext = ViewerTest::GetAISContext();
4800 if (aContext.IsNull())
4802 di << "use 'vinit' command before " << argv[0] << "\n";
4805 aContext->CloseAllContexts(Standard_False);
4806 di << aContext->PurgeDisplay() << "\n";
4810 //=======================================================================
4811 //function : VSetViewSize
4813 //=======================================================================
4814 static Standard_Integer VSetViewSize (Draw_Interpretor& di,
4815 Standard_Integer argc,
4818 Handle(AIS_InteractiveContext) aContext = ViewerTest::GetAISContext();
4819 if(aContext.IsNull())
4821 di << "use 'vinit' command before " << argv[0] << "\n";
4826 di<<"Usage : " << argv[0] << " Size\n";
4829 Standard_Real aSize = atof(argv[1]);
4832 di<<"Bad Size value : " << aSize << "\n";
4836 Handle(V3d_View) aView = ViewerTest::CurrentView();
4837 aView->SetSize(aSize);
4841 //=======================================================================
4842 //function : VMoveView
4844 //=======================================================================
4845 static Standard_Integer VMoveView (Draw_Interpretor& di,
4846 Standard_Integer argc,
4849 Handle(AIS_InteractiveContext) aContext = ViewerTest::GetAISContext();
4850 if(aContext.IsNull())
4852 di << "use 'vinit' command before " << argv[0] << "\n";
4855 if(argc < 4 || argc > 5)
4857 di<<"Usage : " << argv[0] << " Dx Dy Dz [Start = 1|0]\n";
4860 Standard_Real Dx = atof(argv[1]);
4861 Standard_Real Dy = atof(argv[2]);
4862 Standard_Real Dz = atof(argv[3]);
4863 Standard_Boolean aStart = Standard_True;
4866 aStart = (atoi(argv[4]) > 0);
4869 Handle(V3d_View) aView = ViewerTest::CurrentView();
4870 aView->Move(Dx,Dy,Dz,aStart);
4874 //=======================================================================
4875 //function : VTranslateView
4877 //=======================================================================
4878 static Standard_Integer VTranslateView (Draw_Interpretor& di,
4879 Standard_Integer argc,
4882 Handle(AIS_InteractiveContext) aContext = ViewerTest::GetAISContext();
4883 if(aContext.IsNull())
4885 di << "use 'vinit' command before " << argv[0] << "\n";
4888 if(argc < 4 || argc > 5)
4890 di<<"Usage : " << argv[0] << " Dx Dy Dz [Start = 1|0]\n";
4893 Standard_Real Dx = atof(argv[1]);
4894 Standard_Real Dy = atof(argv[2]);
4895 Standard_Real Dz = atof(argv[3]);
4896 Standard_Boolean aStart = Standard_True;
4899 aStart = (atoi(argv[4]) > 0);
4902 Handle(V3d_View) aView = ViewerTest::CurrentView();
4903 aView->Translate(Dx,Dy,Dz,aStart);
4907 //=======================================================================
4908 //function : VTurnView
4910 //=======================================================================
4911 static Standard_Integer VTurnView (Draw_Interpretor& di,
4912 Standard_Integer argc,
4915 Handle(AIS_InteractiveContext) aContext = ViewerTest::GetAISContext();
4916 if(aContext.IsNull()) {
4917 di << "use 'vinit' command before " << argv[0] << "\n";
4920 if(argc < 4 || argc > 5){
4921 di<<"Usage : " << argv[0] << " Ax Ay Az [Start = 1|0]\n";
4924 Standard_Real Ax = atof(argv[1]);
4925 Standard_Real Ay = atof(argv[2]);
4926 Standard_Real Az = atof(argv[3]);
4927 Standard_Boolean aStart = Standard_True;
4930 aStart = (atoi(argv[4]) > 0);
4933 Handle(V3d_View) aView = ViewerTest::CurrentView();
4934 aView->Turn(Ax,Ay,Az,aStart);
4938 //==============================================================================
4939 //function : VTextureEnv
4940 //purpose : ENables or disables environment mapping
4941 //==============================================================================
4942 class OCC_TextureEnv : public Graphic3d_TextureEnv
4945 OCC_TextureEnv(const Standard_CString FileName);
4946 OCC_TextureEnv(const Graphic3d_NameOfTextureEnv aName);
4947 void SetTextureParameters(const Standard_Boolean theRepeatFlag,
4948 const Standard_Boolean theModulateFlag,
4949 const Graphic3d_TypeOfTextureFilter theFilter,
4950 const Standard_ShortReal theXScale,
4951 const Standard_ShortReal theYScale,
4952 const Standard_ShortReal theXShift,
4953 const Standard_ShortReal theYShift,
4954 const Standard_ShortReal theAngle);
4955 DEFINE_STANDARD_RTTI(OCC_TextureEnv);
4957 DEFINE_STANDARD_HANDLE(OCC_TextureEnv, Graphic3d_TextureEnv);
4958 IMPLEMENT_STANDARD_HANDLE(OCC_TextureEnv, Graphic3d_TextureEnv);
4959 IMPLEMENT_STANDARD_RTTIEXT(OCC_TextureEnv, Graphic3d_TextureEnv);
4961 OCC_TextureEnv::OCC_TextureEnv(const Standard_CString theFileName)
4962 : Graphic3d_TextureEnv(theFileName)
4966 OCC_TextureEnv::OCC_TextureEnv(const Graphic3d_NameOfTextureEnv theTexId)
4967 : Graphic3d_TextureEnv(theTexId)
4971 void OCC_TextureEnv::SetTextureParameters(const Standard_Boolean theRepeatFlag,
4972 const Standard_Boolean theModulateFlag,
4973 const Graphic3d_TypeOfTextureFilter theFilter,
4974 const Standard_ShortReal theXScale,
4975 const Standard_ShortReal theYScale,
4976 const Standard_ShortReal theXShift,
4977 const Standard_ShortReal theYShift,
4978 const Standard_ShortReal theAngle)
4980 myParams->SetRepeat (theRepeatFlag);
4981 myParams->SetModulate (theModulateFlag);
4982 myParams->SetFilter (theFilter);
4983 myParams->SetScale (Graphic3d_Vec2(theXScale, theYScale));
4984 myParams->SetTranslation(Graphic3d_Vec2(theXShift, theYShift));
4985 myParams->SetRotation (theAngle);
4988 static int VTextureEnv (Draw_Interpretor& /*theDI*/, Standard_Integer theArgNb, const char** theArgVec)
4990 // get the active view
4991 Handle(V3d_View) aView = ViewerTest::CurrentView();
4994 std::cerr << "No active view. Please call vinit.\n";
4998 // Checking the input arguments
4999 Standard_Boolean anEnableFlag = Standard_False;
5000 Standard_Boolean isOk = theArgNb >= 2;
5003 TCollection_AsciiString anEnableOpt(theArgVec[1]);
5004 anEnableFlag = anEnableOpt.IsEqual("on");
5005 isOk = anEnableFlag || anEnableOpt.IsEqual("off");
5009 isOk = (theArgNb == 3 || theArgNb == 11);
5012 TCollection_AsciiString aTextureOpt(theArgVec[2]);
5013 isOk = (!aTextureOpt.IsIntegerValue() ||
5014 (aTextureOpt.IntegerValue() >= 0 && aTextureOpt.IntegerValue() < Graphic3d_NOT_ENV_UNKNOWN));
5016 if (isOk && theArgNb == 11)
5018 TCollection_AsciiString aRepeatOpt (theArgVec[3]),
5019 aModulateOpt(theArgVec[4]),
5020 aFilterOpt (theArgVec[5]),
5021 aSScaleOpt (theArgVec[6]),
5022 aTScaleOpt (theArgVec[7]),
5023 aSTransOpt (theArgVec[8]),
5024 aTTransOpt (theArgVec[9]),
5025 anAngleOpt (theArgVec[10]);
5026 isOk = ((aRepeatOpt. IsEqual("repeat") || aRepeatOpt. IsEqual("clamp")) &&
5027 (aModulateOpt.IsEqual("modulate") || aModulateOpt.IsEqual("decal")) &&
5028 (aFilterOpt. IsEqual("nearest") || aFilterOpt. IsEqual("bilinear") || aFilterOpt.IsEqual("trilinear")) &&
5029 aSScaleOpt.IsRealValue() && aTScaleOpt.IsRealValue() &&
5030 aSTransOpt.IsRealValue() && aTTransOpt.IsRealValue() &&
5031 anAngleOpt.IsRealValue());
5038 std::cerr << "Usage :" << std::endl;
5039 std::cerr << theArgVec[0] << " off" << std::endl;
5040 std::cerr << theArgVec[0] << " on {index_of_std_texture(0..7)|texture_file_name} [{clamp|repeat} {decal|modulate} {nearest|bilinear|trilinear} scale_s scale_t translation_s translation_t rotation_degrees]" << std::endl;
5046 TCollection_AsciiString aTextureOpt(theArgVec[2]);
5047 Handle(OCC_TextureEnv) aTexEnv = aTextureOpt.IsIntegerValue() ?
5048 new OCC_TextureEnv((Graphic3d_NameOfTextureEnv)aTextureOpt.IntegerValue()) :
5049 new OCC_TextureEnv(theArgVec[2]);
5053 TCollection_AsciiString aRepeatOpt(theArgVec[3]), aModulateOpt(theArgVec[4]), aFilterOpt(theArgVec[5]);
5054 aTexEnv->SetTextureParameters(
5055 aRepeatOpt. IsEqual("repeat"),
5056 aModulateOpt.IsEqual("modulate"),
5057 aFilterOpt. IsEqual("nearest") ? Graphic3d_TOTF_NEAREST :
5058 aFilterOpt.IsEqual("bilinear") ? Graphic3d_TOTF_BILINEAR :
5059 Graphic3d_TOTF_TRILINEAR,
5060 (Standard_ShortReal)Draw::Atof(theArgVec[6]),
5061 (Standard_ShortReal)Draw::Atof(theArgVec[7]),
5062 (Standard_ShortReal)Draw::Atof(theArgVec[8]),
5063 (Standard_ShortReal)Draw::Atof(theArgVec[9]),
5064 (Standard_ShortReal)Draw::Atof(theArgVec[10])
5067 aView->SetTextureEnv(aTexEnv);
5068 aView->SetSurfaceDetail(V3d_TEX_ENVIRONMENT);
5070 else // Disabling environment mapping
5072 aView->SetSurfaceDetail(V3d_TEX_NONE);
5073 Handle(Graphic3d_TextureEnv) aTexture;
5074 aView->SetTextureEnv(aTexture); // Passing null handle to clear the texture data
5081 //===============================================================================================
5082 //function : VClipPlane
5084 //===============================================================================================
5085 static int VClipPlane (Draw_Interpretor& theDi, Standard_Integer theArgsNb, const char** theArgVec)
5087 // use short-cut for created clip planes map of created (or "registered by name") clip planes
5088 typedef NCollection_DataMap<TCollection_AsciiString, Handle(Graphic3d_ClipPlane)> MapOfPlanes;
5089 static MapOfPlanes aRegPlanes;
5093 theDi << theArgVec[0] << ": command argument is required. Type help for more information.\n";
5097 TCollection_AsciiString aCommand (theArgVec[1]);
5099 // print maximum number of planes for current viewer
5100 if (aCommand == "maxplanes")
5104 theDi << theArgVec[0] << ": view name is required. Type help for more information.\n";
5108 TCollection_AsciiString aViewName (theArgVec[2]);
5110 if (!ViewerTest_myViews.IsBound1 (aViewName))
5112 theDi << theArgVec[0] << ": view is not found.\n";
5116 const Handle(V3d_View)& aView = ViewerTest_myViews.Find1 (aViewName);
5118 theDi << theArgVec[0] << ": "
5119 << aView->Viewer()->Driver()->InquirePlaneLimit()
5120 << " plane slots provided by driver."
5121 << " Note that 2 more planes might be used (reserved for z-clipping).\n";
5126 // create / delete plane instance
5127 if (aCommand == "create" || aCommand == "delete" || aCommand == "clone")
5131 theDi << theArgVec[0] << ": plane name is required. Type help for more information.\n";
5135 Standard_Boolean toCreate = (aCommand == "create");
5136 Standard_Boolean toClone = (aCommand == "clone");
5137 TCollection_AsciiString aPlane (theArgVec[2]);
5141 if (aRegPlanes.IsBound (aPlane))
5143 theDi << theArgVec[0] << ": plane name is in use.\n";
5147 aRegPlanes.Bind (aPlane, new Graphic3d_ClipPlane());
5149 else if (toClone) // toClone
5151 if (!aRegPlanes.IsBound (aPlane))
5153 theDi << theArgVec[0] << ": no such plane.\n";
5159 theDi << theArgVec[0] << ": enter name for new plane. Type help for more information.\n";
5163 TCollection_AsciiString aClone (theArgVec[3]);
5164 if (aRegPlanes.IsBound (aClone))
5166 theDi << theArgVec[0] << ": plane name is in use.\n";
5170 const Handle(Graphic3d_ClipPlane)& aClipPlane = aRegPlanes.Find (aPlane);
5172 aRegPlanes.Bind (aClone, aClipPlane->Clone());
5176 if (!aRegPlanes.IsBound (aPlane))
5178 theDi << theArgVec[0] << ": no such plane.\n";
5182 Handle(Graphic3d_ClipPlane) aClipPlane = aRegPlanes.Find (aPlane);
5183 aRegPlanes.UnBind (aPlane);
5185 ViewerTest_DoubleMapIteratorOfDoubleMapOfInteractiveAndName anIObjIt (GetMapOfAIS());
5186 for (; anIObjIt.More(); anIObjIt.Next())
5188 Handle(PrsMgr_PresentableObject) aPrs = Handle(PrsMgr_PresentableObject)::DownCast (anIObjIt.Key1());
5189 aPrs->RemoveClipPlane(aClipPlane);
5192 NCollection_DoubleMap<TCollection_AsciiString, Handle(V3d_View)>::Iterator aViewIt(ViewerTest_myViews);
5193 for (; aViewIt.More(); aViewIt.Next())
5195 const Handle(V3d_View)& aView = aViewIt.Key2();
5196 aView->RemoveClipPlane(aClipPlane);
5199 ViewerTest::RedrawAllViews();
5205 // set / unset plane command
5206 if (aCommand == "set" || aCommand == "unset")
5210 theDi << theArgVec[0] << ": need more arguments. Type help for more information.\n";
5214 Standard_Boolean toSet = (aCommand == "set");
5215 TCollection_AsciiString aPlane (theArgVec [2]);
5216 if (!aRegPlanes.IsBound (aPlane))
5218 theDi << theArgVec[0] << ": no such plane.\n";
5222 const Handle(Graphic3d_ClipPlane)& aClipPlane = aRegPlanes.Find (aPlane);
5224 TCollection_AsciiString aTarget (theArgVec [3]);
5225 if (aTarget != "object" && aTarget != "view")
5227 theDi << theArgVec[0] << ": invalid target.\n";
5231 if (aTarget == "object" || aTarget == "view")
5235 theDi << theArgVec[0] << ": need more arguments. Type help for more information.\n";
5239 Standard_Boolean isObject = (aTarget == "object");
5241 for (Standard_Integer anIt = 4; anIt < theArgsNb; ++anIt)
5243 TCollection_AsciiString anEntityName (theArgVec[anIt]);
5244 if (isObject) // to object
5246 if (!GetMapOfAIS().IsBound2 (anEntityName))
5248 theDi << theArgVec[0] << ": can not find IO with name " << anEntityName << ".\n";
5252 Handle(AIS_InteractiveObject) aIObj =
5253 Handle(AIS_InteractiveObject)::DownCast (GetMapOfAIS().Find2 (anEntityName));
5256 aIObj->AddClipPlane (aClipPlane);
5258 aIObj->RemoveClipPlane (aClipPlane);
5262 if (!ViewerTest_myViews.IsBound1 (anEntityName))
5264 theDi << theArgVec[0] << ": can not find View with name " << anEntityName << ".\n";
5268 Handle(V3d_View) aView = ViewerTest_myViews.Find1(anEntityName);
5270 aView->AddClipPlane (aClipPlane);
5272 aView->RemoveClipPlane (aClipPlane);
5276 ViewerTest::RedrawAllViews();
5282 // change plane command
5283 if (aCommand == "change")
5287 theDi << theArgVec[0] << ": need more arguments. Type help for more information.\n";
5291 TCollection_AsciiString aPlane (theArgVec [2]);
5292 if (!aRegPlanes.IsBound (aPlane))
5294 theDi << theArgVec[0] << ": no such plane.\n";
5298 const Handle(Graphic3d_ClipPlane)& aClipPlane = aRegPlanes.Find (aPlane);
5300 TCollection_AsciiString aChangeArg (theArgVec [3]);
5301 if (aChangeArg != "on" && aChangeArg != "off" && aChangeArg != "capping" && aChangeArg != "equation")
5303 theDi << theArgVec[0] << ": invalid arguments. Type help for more information.\n";
5307 if (aChangeArg == "on" || aChangeArg == "off") // on / off
5309 aClipPlane->SetOn (aChangeArg == "on");
5311 else if (aChangeArg == "equation") // change equation
5315 theDi << theArgVec[0] << ": need more arguments. Type help for more information.\n";
5319 Standard_Real aCoeffA = atof (theArgVec [4]);
5320 Standard_Real aCoeffB = atof (theArgVec [5]);
5321 Standard_Real aCoeffC = atof (theArgVec [6]);
5322 Standard_Real aCoeffD = atof (theArgVec [7]);
5323 aClipPlane->SetEquation (gp_Pln (aCoeffA, aCoeffB, aCoeffC, aCoeffD));
5325 else if (aChangeArg == "capping") // change capping aspects
5329 theDi << theArgVec[0] << ": need more arguments. Type help for more information.\n";
5333 TCollection_AsciiString aCappingArg (theArgVec [4]);
5334 if (aCappingArg != "on" && aCappingArg != "off" &&
5335 aCappingArg != "color" && aCappingArg != "texname" &&
5336 aCappingArg != "texscale" && aCappingArg != "texorigin" &&
5337 aCappingArg != "texrotate" && aCappingArg != "hatch")
5339 theDi << theArgVec[0] << ": invalid arguments. Type help for more information.\n";
5343 if (aCappingArg == "on" || aCappingArg == "off") // on / off capping
5345 aClipPlane->SetCapping (aCappingArg == "on");
5347 else if (aCappingArg == "color") // color aspect for capping
5351 theDi << theArgVec[0] << ": need more arguments. Type help for more information.\n";
5355 Standard_Real aRed = atof (theArgVec [5]);
5356 Standard_Real aGrn = atof (theArgVec [6]);
5357 Standard_Real aBlu = atof (theArgVec [7]);
5359 Graphic3d_MaterialAspect aMat = aClipPlane->CappingMaterial();
5360 aMat.SetColor (Quantity_Color (aRed, aGrn, aBlu, Quantity_TOC_RGB));
5361 aClipPlane->SetCappingMaterial (aMat);
5363 else if (aCappingArg == "texname") // texture name
5367 theDi << theArgVec[0] << ": need more arguments. Type help for more information.\n";
5371 TCollection_AsciiString aTextureName (theArgVec [5]);
5373 Handle(Graphic3d_Texture2Dmanual) aTexture = new Graphic3d_Texture2Dmanual(aTextureName);
5374 if (!aTexture->IsDone ())
5376 aClipPlane->SetCappingTexture (NULL);
5380 aTexture->EnableModulate();
5381 aTexture->EnableRepeat();
5382 aClipPlane->SetCappingTexture (aTexture);
5385 else if (aCappingArg == "texscale") // texture scale
5387 if (aClipPlane->CappingTexture().IsNull())
5389 theDi << theArgVec[0] << ": no texture is set.\n";
5395 theDi << theArgVec[0] << ": need more arguments. Type help for more information.\n";
5399 Standard_ShortReal aSx = (Standard_ShortReal)atof (theArgVec [5]);
5400 Standard_ShortReal aSy = (Standard_ShortReal)atof (theArgVec [6]);
5402 aClipPlane->CappingTexture()->GetParams()->SetScale (Graphic3d_Vec2 (aSx, aSy));
5404 else if (aCappingArg == "texorigin") // texture origin
5406 if (aClipPlane->CappingTexture().IsNull())
5408 theDi << theArgVec[0] << ": no texture is set.\n";
5414 theDi << theArgVec[0] << ": need more arguments. Type help for more information.\n";
5418 Standard_ShortReal aTx = (Standard_ShortReal)atof (theArgVec [5]);
5419 Standard_ShortReal aTy = (Standard_ShortReal)atof (theArgVec [6]);
5421 aClipPlane->CappingTexture()->GetParams()->SetTranslation (Graphic3d_Vec2 (aTx, aTy));
5423 else if (aCappingArg == "texrotate") // texture rotation
5425 if (aClipPlane->CappingTexture().IsNull())
5427 theDi << theArgVec[0] << ": no texture is set.\n";
5433 theDi << theArgVec[0] << ": need more arguments. Type help for more information.\n";
5437 Standard_ShortReal aRot = (Standard_ShortReal)atof (theArgVec[5]);
5439 aClipPlane->CappingTexture()->GetParams()->SetRotation (aRot);
5441 else if (aCappingArg == "hatch") // hatch style
5445 theDi << theArgVec[0] << ": need more arguments. Type help for more information.\n";
5449 TCollection_AsciiString aHatchStr (theArgVec [5]);
5450 if (aHatchStr == "on")
5452 aClipPlane->SetCappingHatchOn();
5454 else if (aHatchStr == "off")
5456 aClipPlane->SetCappingHatchOff();
5460 aClipPlane->SetCappingHatch ((Aspect_HatchStyle)atoi (theArgVec[5]));
5465 ViewerTest::RedrawAllViews();
5470 theDi << theArgVec[0] << ": invalid command. Type help for more information.\n";
5474 //===============================================================================================
5475 //function : VSetTextureMode
5477 //===============================================================================================
5478 static int VSetTextureMode (Draw_Interpretor& theDi, Standard_Integer theArgsNb, const char** theArgVec)
5482 theDi << theArgVec[0] << ": insufficient command arguments. Type help for more information.\n";
5486 TCollection_AsciiString aViewName (theArgVec[1]);
5487 if (!ViewerTest_myViews.IsBound1 (aViewName))
5489 theDi << theArgVec[0] << ": view is not found.\n";
5493 const Handle(V3d_View)& aView = ViewerTest_myViews.Find1 (aViewName);
5494 switch (atoi (theArgVec[2]))
5496 case 0: aView->SetSurfaceDetail (V3d_TEX_NONE); break;
5497 case 1: aView->SetSurfaceDetail (V3d_TEX_ENVIRONMENT); break;
5498 case 2: aView->SetSurfaceDetail (V3d_TEX_ALL); break;
5500 theDi << theArgVec[0] << ": invalid mode.\n";
5508 //===============================================================================================
5509 //function : VZRange
5511 //===============================================================================================
5512 static int VZRange (Draw_Interpretor& theDi, Standard_Integer theArgsNb, const char** theArgVec)
5514 const Handle(V3d_View)& aCurrentView = ViewerTest::CurrentView();
5516 if (aCurrentView.IsNull())
5518 std::cout << theArgVec[0] << ": Call vinit before this command, please.\n";
5522 Handle(Graphic3d_Camera) aCamera = aCurrentView->Camera();
5526 theDi << "ZNear: " << aCamera->ZNear() << "\n";
5527 theDi << "ZFar: " << aCamera->ZFar() << "\n";
5533 Standard_Real aNewZNear = atof (theArgVec[1]);
5534 Standard_Real aNewZFar = atof (theArgVec[2]);
5536 if (aNewZNear >= aNewZFar)
5538 std::cout << theArgVec[0] << ": invalid arguments: znear should be less than zfar.\n";
5542 if (!aCamera->IsOrthographic() && (aNewZNear <= 0.0 || aNewZFar <= 0.0))
5544 std::cout << theArgVec[0] << ": invalid arguments: ";
5545 std::cout << "znear, zfar should be positive for perspective camera.\n";
5549 aCamera->SetZRange (aNewZNear, aNewZFar);
5553 std::cout << theArgVec[0] << ": wrong command arguments. Type help for more information.\n";
5557 aCurrentView->Redraw();
5562 //===============================================================================================
5563 //function : VAutoZFit
5565 //===============================================================================================
5566 static int VAutoZFit (Draw_Interpretor& theDi, Standard_Integer theArgsNb, const char** theArgVec)
5568 const Handle(V3d_View)& aCurrentView = ViewerTest::CurrentView();
5570 if (aCurrentView.IsNull())
5572 std::cout << theArgVec[0] << ": Call vinit before this command, please.\n";
5576 Standard_Real aScale = aCurrentView->AutoZFitScaleFactor();
5580 std::cout << theArgVec[0] << ": wrong command arguments. Type help for more information.\n";
5586 theDi << "Auto z-fit mode: " << "\n"
5587 << "On: " << (aCurrentView->AutoZFitMode() ? "enabled" : "disabled") << "\n"
5588 << "Scale: " << aScale << "\n";
5592 Standard_Boolean isOn = Draw::Atoi (theArgVec[1]) == 1;
5596 aScale = Draw::Atoi (theArgVec[2]);
5599 aCurrentView->SetAutoZFitMode (isOn, aScale);
5600 aCurrentView->AutoZFit();
5601 aCurrentView->Redraw();
5606 //===============================================================================================
5607 //function : VChangeCamera
5609 //===============================================================================================
5610 static int VChangeCamera (Draw_Interpretor& theDi, Standard_Integer theArgsNb, const char** theArgVec)
5612 if (ViewerTest::CurrentView().IsNull())
5614 theDi << theArgVec[0] << ": Call vinit before this command, please.\n";
5618 const char anErrorMessage[] = ": wrong command arguments. Type help for more information.\n";
5621 theDi << theArgVec[0] << anErrorMessage;
5625 Handle(Graphic3d_Camera) aCamera = ViewerTest::CurrentView()->Camera();
5627 TCollection_AsciiString aCommand (theArgVec[1]);
5628 TCollection_AsciiString aValue (theArgVec[2]);
5630 aCommand.LowerCase();
5633 if (aCommand == "proj")
5635 if (aValue == "ortho")
5637 aCamera->SetProjectionType (Graphic3d_Camera::Projection_Orthographic);
5639 else if (aValue == "persp")
5641 aCamera->SetProjectionType (Graphic3d_Camera::Projection_Perspective);
5643 else if (aValue == "left")
5645 aCamera->SetProjectionType (Graphic3d_Camera::Projection_MonoLeftEye);
5647 else if (aValue == "right")
5649 aCamera->SetProjectionType (Graphic3d_Camera::Projection_MonoRightEye);
5651 else if (aValue == "stereo")
5653 aCamera->SetProjectionType (Graphic3d_Camera::Projection_Stereo);
5657 theDi << theArgVec[0] << anErrorMessage;
5661 else if (aCommand == "dist")
5663 aCamera->SetDistance (aValue.RealValue());
5665 else if (aCommand == "iod")
5667 aCamera->SetIOD (aCamera->GetIODType(), aValue.RealValue());
5669 else if (aCommand == "zfocus")
5671 aCamera->SetZFocus (aCamera->ZFocusType(), aValue.RealValue());
5673 else if (aCommand == "fov")
5675 aCamera->SetFOVy (aValue.RealValue());
5677 else if (aCommand == "zfocustype")
5679 if (aValue == "absolute")
5681 aCamera->SetZFocus (Graphic3d_Camera::FocusType_Absolute, aCamera->ZFocus());
5683 else if (aValue == "relative")
5685 aCamera->SetZFocus (Graphic3d_Camera::FocusType_Relative, aCamera->ZFocus());
5689 theDi << theArgVec[0] << anErrorMessage;
5693 else if (aCommand == "iodtype")
5695 if (aValue == "absolute")
5697 aCamera->SetIOD (Graphic3d_Camera::IODType_Absolute, aCamera->IOD());
5699 else if (aValue == "relative")
5701 aCamera->SetIOD (Graphic3d_Camera::IODType_Relative, aCamera->IOD());
5705 theDi << theArgVec[0] << anErrorMessage;
5711 theDi << theArgVec[0] << anErrorMessage;
5715 ViewerTest::CurrentView()->AutoZFit();
5716 ViewerTest::CurrentView()->Redraw();
5721 //==============================================================================
5722 //function : VStereo
5724 //==============================================================================
5726 static int VStereo (Draw_Interpretor& theDI,
5727 Standard_Integer theArgNb,
5728 const char** theArgVec)
5732 Handle(V3d_View) aView = ViewerTest::CurrentView();
5735 std::cerr << "No active view. Please call vinit.\n";
5739 Standard_Boolean isActive = ViewerTest_myDefaultCaps.contextStereo;
5740 theDI << "Stereo " << (isActive ? "ON" : "OFF") << "\n";
5744 ViewerTest_myDefaultCaps.contextStereo = Draw::Atoi (theArgVec[1]) != 0;
5748 //===============================================================================================
5749 //function : VDefaults
5751 //===============================================================================================
5752 static int VDefaults (Draw_Interpretor& theDi,
5753 Standard_Integer theArgsNb,
5754 const char** theArgVec)
5756 const Handle(AIS_InteractiveContext)& aCtx = ViewerTest::GetAISContext();
5759 std::cerr << "No active viewer!\n";
5763 Handle(Prs3d_Drawer) aDefParams = aCtx->DefaultDrawer();
5766 if (aDefParams->TypeOfDeflection() == Aspect_TOD_RELATIVE)
5768 theDi << "DeflType: relative\n"
5769 << "DeviationCoeff: " << aDefParams->DeviationCoefficient() << "\n";
5773 theDi << "DeflType: absolute\n"
5774 << "AbsoluteDeflection: " << aDefParams->MaximalChordialDeviation() << "\n";
5776 theDi << "AngularDeflection: " << (180.0 * aDefParams->HLRAngle() / M_PI) << "\n";
5780 for (Standard_Integer anArgIter = 1; anArgIter < theArgsNb; ++anArgIter)
5782 TCollection_AsciiString anArg (theArgVec[anArgIter]);
5783 TCollection_AsciiString aKey, aValue;
5784 if (!ViewerTest::SplitParameter (anArg, aKey, aValue)
5785 || aValue.IsEmpty())
5787 std::cerr << "Error, wrong syntax at: '" << anArg.ToCString() << "'!\n";
5792 if (aKey == "ABSDEFL"
5793 || aKey == "ABSOLUTEDEFLECTION"
5795 || aKey == "DEFLECTION")
5797 aDefParams->SetTypeOfDeflection (Aspect_TOD_ABSOLUTE);
5798 aDefParams->SetMaximalChordialDeviation (aValue.RealValue());
5800 else if (aKey == "RELDEFL"
5801 || aKey == "RELATIVEDEFLECTION"
5802 || aKey == "DEVCOEFF"
5803 || aKey == "DEVIATIONCOEFF"
5804 || aKey == "DEVIATIONCOEFFICIENT")
5806 aDefParams->SetTypeOfDeflection (Aspect_TOD_RELATIVE);
5807 aDefParams->SetDeviationCoefficient (aValue.RealValue());
5809 else if (aKey == "ANGDEFL"
5810 || aKey == "ANGULARDEFL"
5811 || aKey == "ANGULARDEFLECTION")
5813 // currently HLRDeviationAngle is used instead of DeviationAngle in most places
5814 aDefParams->SetHLRAngle (M_PI * aValue.RealValue() / 180.0);
5818 std::cerr << "Warning, unknown argument '" << anArg.ToCString() << "'\n";
5825 //! Auxiliary method
5826 inline void addLight (const Handle(V3d_Light)& theLightNew,
5827 const Standard_Boolean theIsGlobal)
5829 if (theLightNew.IsNull())
5836 ViewerTest::GetViewerFromContext()->SetLightOn (theLightNew);
5840 ViewerTest::CurrentView()->SetLightOn (theLightNew);
5844 //! Auxiliary method
5845 inline Standard_Integer getLightId (const TCollection_AsciiString& theArgNext)
5847 TCollection_AsciiString anArgNextCase (theArgNext);
5848 anArgNextCase.UpperCase();
5849 if (anArgNextCase.Length() > 5
5850 && anArgNextCase.SubString (1, 5).IsEqual ("LIGHT"))
5852 return theArgNext.SubString (6, theArgNext.Length()).IntegerValue();
5856 return theArgNext.IntegerValue();
5860 //===============================================================================================
5863 //===============================================================================================
5864 static int VLight (Draw_Interpretor& theDi,
5865 Standard_Integer theArgsNb,
5866 const char** theArgVec)
5868 Handle(V3d_View) aView = ViewerTest::CurrentView();
5869 Handle(V3d_Viewer) aViewer = ViewerTest::GetViewerFromContext();
5871 || aViewer.IsNull())
5873 std::cerr << "No active viewer!\n";
5877 Standard_Real anXYZ[3];
5878 Quantity_Coefficient anAtten[2];
5881 // print lights info
5882 Standard_Integer aLightId = 0;
5883 for (aView->InitActiveLights(); aView->MoreActiveLights(); aView->NextActiveLights(), ++aLightId)
5885 Handle(V3d_Light) aLight = aView->ActiveLight();
5886 const Quantity_Color aColor = aLight->Color();
5887 theDi << "Light" << aLightId << "\n";
5888 switch (aLight->Type())
5892 theDi << " Type: Ambient\n";
5895 case V3d_DIRECTIONAL:
5897 Handle(V3d_DirectionalLight) aLightDir = Handle(V3d_DirectionalLight)::DownCast (aLight);
5898 theDi << " Type: Directional\n";
5899 theDi << " Headlight: " << (aLight->Headlight() ? "TRUE" : "FALSE") << "\n";
5900 if (!aLightDir.IsNull())
5902 aLightDir->Position (anXYZ[0], anXYZ[1], anXYZ[2]);
5903 theDi << " Position: " << anXYZ[0] << ", " << anXYZ[1] << ", " << anXYZ[2] << "\n";
5904 aLightDir->Direction (anXYZ[0], anXYZ[1], anXYZ[2]);
5905 theDi << " Direction: " << anXYZ[0] << ", " << anXYZ[1] << ", " << anXYZ[2] << "\n";
5909 case V3d_POSITIONAL:
5911 Handle(V3d_PositionalLight) aLightPos = Handle(V3d_PositionalLight)::DownCast (aLight);
5912 theDi << " Type: Positional\n";
5913 theDi << " Headlight: " << (aLight->Headlight() ? "TRUE" : "FALSE") << "\n";
5914 if (!aLightPos.IsNull())
5916 aLightPos->Position (anXYZ[0], anXYZ[1], anXYZ[2]);
5917 theDi << " Position: " << anXYZ[0] << ", " << anXYZ[1] << ", " << anXYZ[2] << "\n";
5918 aLightPos->Attenuation (anAtten[0], anAtten[1]);
5919 theDi << " Atten.: " << anAtten[0] << " " << anAtten[1] << "\n";
5925 Handle(V3d_SpotLight) aLightSpot = Handle(V3d_SpotLight)::DownCast (aLight);
5926 theDi << " Type: Spot\n";
5927 theDi << " Headlight: " << (aLight->Headlight() ? "TRUE" : "FALSE") << "\n";
5928 if (!aLightSpot.IsNull())
5930 aLightSpot->Position (anXYZ[0], anXYZ[1], anXYZ[2]);
5931 theDi << " Position: " << anXYZ[0] << ", " << anXYZ[1] << ", " << anXYZ[2] << "\n";
5932 aLightSpot->Direction (anXYZ[0], anXYZ[1], anXYZ[2]);
5933 theDi << " Direction: " << anXYZ[0] << ", " << anXYZ[1] << ", " << anXYZ[2] << "\n";
5934 aLightSpot->Attenuation (anAtten[0], anAtten[1]);
5935 theDi << " Atten.: " << anAtten[0] << " " << anAtten[1] << "\n";
5936 theDi << " Angle: " << (aLightSpot->Angle() * 180.0 / M_PI) << "\n";
5937 theDi << " Exponent: " << aLightSpot->Concentration() << "\n";
5943 theDi << " Type: UNKNOWN\n";
5947 theDi << " Color: " << aColor.Red() << ", " << aColor.Green() << ", " << aColor.Blue() << "\n";
5951 Handle(V3d_Light) aLightNew;
5952 Handle(V3d_Light) aLightOld;
5953 Standard_Boolean isGlobal = Standard_True;
5954 Standard_Boolean toCreate = Standard_False;
5955 for (Standard_Integer anArgIt = 1; anArgIt < theArgsNb; ++anArgIt)
5957 Handle(V3d_Light) aLightCurr = aLightNew.IsNull() ? aLightOld : aLightNew;
5958 Handle(V3d_AmbientLight) aLightAmb = Handle(V3d_AmbientLight) ::DownCast (aLightCurr);
5959 Handle(V3d_DirectionalLight) aLightDir = Handle(V3d_DirectionalLight)::DownCast (aLightCurr);
5960 Handle(V3d_PositionalLight) aLightPos = Handle(V3d_PositionalLight) ::DownCast (aLightCurr);
5961 Handle(V3d_SpotLight) aLightSpot = Handle(V3d_SpotLight) ::DownCast (aLightCurr);
5963 TCollection_AsciiString aName, aValue;
5964 const TCollection_AsciiString anArg (theArgVec[anArgIt]);
5965 TCollection_AsciiString anArgCase (anArg);
5966 anArgCase.UpperCase();
5967 if (anArgCase.IsEqual ("NEW")
5968 || anArgCase.IsEqual ("ADD")
5969 || anArgCase.IsEqual ("CREATE"))
5971 toCreate = Standard_True;
5973 else if (anArgCase.IsEqual ("GLOB")
5974 || anArgCase.IsEqual ("GLOBAL"))
5976 isGlobal = Standard_True;
5978 else if (anArgCase.IsEqual ("LOC")
5979 || anArgCase.IsEqual ("LOCAL"))
5981 isGlobal = Standard_False;
5983 else if (anArgCase.IsEqual ("DEF")
5984 || anArgCase.IsEqual ("DEFAULTS"))
5986 toCreate = Standard_False;
5987 aViewer->SetDefaultLights();
5989 else if (anArgCase.IsEqual ("CLR")
5990 || anArgCase.IsEqual ("CLEAR"))
5992 toCreate = Standard_False;
5993 aView->InitActiveLights();
5994 while (aView->MoreActiveLights())
5996 aViewer->DelLight (aView->ActiveLight());
5997 aView->InitActiveLights();
6000 else if (anArgCase.IsEqual ("AMB")
6001 || anArgCase.IsEqual ("AMBIENT")
6002 || anArgCase.IsEqual ("AMBLIGHT"))
6004 addLight (aLightNew, isGlobal);
6007 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6010 toCreate = Standard_False;
6011 aLightNew = new V3d_AmbientLight (aViewer);
6013 else if (anArgCase.IsEqual ("DIRECTIONAL")
6014 || anArgCase.IsEqual ("DIRLIGHT"))
6016 addLight (aLightNew, isGlobal);
6019 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6022 toCreate = Standard_False;
6023 aLightNew = new V3d_DirectionalLight (aViewer);
6025 else if (anArgCase.IsEqual ("SPOT")
6026 || anArgCase.IsEqual ("SPOTLIGHT"))
6028 addLight (aLightNew, isGlobal);
6031 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6034 toCreate = Standard_False;
6035 aLightNew = new V3d_SpotLight (aViewer, 0.0, 0.0, 0.0);
6037 else if (anArgCase.IsEqual ("POSLIGHT")
6038 || anArgCase.IsEqual ("POSITIONAL"))
6040 addLight (aLightNew, isGlobal);
6043 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6046 toCreate = Standard_False;
6047 aLightNew = new V3d_PositionalLight (aViewer, 0.0, 0.0, 0.0);
6049 else if (anArgCase.IsEqual ("CHANGE"))
6051 addLight (aLightNew, isGlobal);
6052 aLightNew.Nullify();
6053 if (++anArgIt >= theArgsNb)
6055 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6059 const Standard_Integer aLightId = getLightId (theArgVec[anArgIt]);
6060 Standard_Integer aLightIt = 0;
6061 for (aView->InitActiveLights(); aView->MoreActiveLights(); aView->NextActiveLights(), ++aLightIt)
6063 if (aLightIt == aLightId)
6065 aLightOld = aView->ActiveLight();
6070 if (aLightOld.IsNull())
6072 std::cerr << "Light " << theArgVec[anArgIt] << " is undefined!\n";
6076 else if (anArgCase.IsEqual ("DEL")
6077 || anArgCase.IsEqual ("DELETE"))
6079 Handle(V3d_Light) aLightDel;
6080 if (++anArgIt >= theArgsNb)
6082 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6086 const TCollection_AsciiString anArgNext (theArgVec[anArgIt]);
6087 const Standard_Integer aLightDelId = getLightId (theArgVec[anArgIt]);
6088 Standard_Integer aLightIt = 0;
6089 for (aView->InitActiveLights(); aView->MoreActiveLights(); aView->NextActiveLights(), ++aLightIt)
6091 aLightDel = aView->ActiveLight();
6092 if (aLightIt == aLightDelId)
6097 if (!aLightDel.IsNull())
6099 aViewer->DelLight (aLightDel);
6102 else if (anArgCase.IsEqual ("COLOR")
6103 || anArgCase.IsEqual ("COLOUR"))
6105 if (++anArgIt >= theArgsNb)
6107 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6111 TCollection_AsciiString anArgNext (theArgVec[anArgIt]);
6112 anArgNext.UpperCase();
6113 const Quantity_Color aColor = ViewerTest::GetColorFromName (anArgNext.ToCString());
6114 if (!aLightCurr.IsNull())
6116 aLightCurr->SetColor (aColor);
6119 else if (anArgCase.IsEqual ("POS")
6120 || anArgCase.IsEqual ("POSITION"))
6122 if ((anArgIt + 3) >= theArgsNb)
6124 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6128 anXYZ[0] = Atof (theArgVec[++anArgIt]);
6129 anXYZ[1] = Atof (theArgVec[++anArgIt]);
6130 anXYZ[2] = Atof (theArgVec[++anArgIt]);
6131 if (!aLightDir.IsNull())
6133 aLightDir->SetPosition (anXYZ[0], anXYZ[1], anXYZ[2]);
6135 else if (!aLightPos.IsNull())
6137 aLightPos->SetPosition (anXYZ[0], anXYZ[1], anXYZ[2]);
6139 else if (!aLightSpot.IsNull())
6141 aLightSpot->SetPosition (anXYZ[0], anXYZ[1], anXYZ[2]);
6145 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6149 else if (anArgCase.IsEqual ("DIR")
6150 || anArgCase.IsEqual ("DIRECTION"))
6152 if ((anArgIt + 3) >= theArgsNb)
6154 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6158 anXYZ[0] = Atof (theArgVec[++anArgIt]);
6159 anXYZ[1] = Atof (theArgVec[++anArgIt]);
6160 anXYZ[2] = Atof (theArgVec[++anArgIt]);
6161 if (!aLightDir.IsNull())
6163 aLightDir->SetDirection (anXYZ[0], anXYZ[1], anXYZ[2]);
6165 else if (!aLightSpot.IsNull())
6167 aLightSpot->SetDirection (anXYZ[0], anXYZ[1], anXYZ[2]);
6171 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6175 else if (anArgCase.IsEqual ("ANG")
6176 || anArgCase.IsEqual ("ANGLE"))
6178 if (++anArgIt >= theArgsNb)
6180 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6184 Standard_Real anAngle = Atof (theArgVec[anArgIt]);
6186 if (!aLightSpot.IsNull())
6188 aLightSpot->SetAngle (anAngle / 180.0 * M_PI);
6191 else if (anArgCase.IsEqual ("CONSTATTEN")
6192 || anArgCase.IsEqual ("CONSTATTENUATION"))
6194 if (++anArgIt >= theArgsNb)
6196 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6200 if (!aLightPos.IsNull())
6202 aLightPos->Attenuation (anAtten[0], anAtten[1]);
6203 anAtten[0] = Atof (theArgVec[anArgIt]);
6204 aLightPos->SetAttenuation (anAtten[0], anAtten[1]);
6206 else if (!aLightSpot.IsNull())
6208 aLightSpot->Attenuation (anAtten[0], anAtten[1]);
6209 anAtten[0] = Atof (theArgVec[anArgIt]);
6210 aLightSpot->SetAttenuation (anAtten[0], anAtten[1]);
6214 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6218 else if (anArgCase.IsEqual ("LINATTEN")
6219 || anArgCase.IsEqual ("LINEARATTEN")
6220 || anArgCase.IsEqual ("LINEARATTENUATION"))
6222 if (++anArgIt >= theArgsNb)
6224 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6228 if (!aLightPos.IsNull())
6230 aLightPos->Attenuation (anAtten[0], anAtten[1]);
6231 anAtten[1] = Atof (theArgVec[anArgIt]);
6232 aLightPos->SetAttenuation (anAtten[0], anAtten[1]);
6234 else if (!aLightSpot.IsNull())
6236 aLightSpot->Attenuation (anAtten[0], anAtten[1]);
6237 anAtten[1] = Atof (theArgVec[anArgIt]);
6238 aLightSpot->SetAttenuation (anAtten[0], anAtten[1]);
6242 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6246 else if (anArgCase.IsEqual ("EXP")
6247 || anArgCase.IsEqual ("EXPONENT")
6248 || anArgCase.IsEqual ("SPOTEXP")
6249 || anArgCase.IsEqual ("SPOTEXPONENT"))
6251 if (++anArgIt >= theArgsNb)
6253 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6257 if (!aLightSpot.IsNull())
6259 aLightSpot->SetConcentration (Atof (theArgVec[anArgIt]));
6263 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6267 else if (anArgCase.IsEqual ("HEAD")
6268 || anArgCase.IsEqual ("HEADLIGHT"))
6270 if (++anArgIt >= theArgsNb)
6272 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6276 if (aLightAmb.IsNull()
6277 && !aLightCurr.IsNull())
6279 aLightCurr->SetHeadlight (Draw::Atoi (theArgVec[anArgIt]) != 0);
6283 std::cerr << "Wrong syntax at argument '" << anArg << "'!\n";
6289 std::cerr << "Warning: unknown argument '" << anArg << "'\n";
6293 addLight (aLightNew, isGlobal);
6294 aViewer->UpdateLights();
6301 //==============================================================================
6302 //function : VClInfo
6303 //purpose : Prints info about active OpenCL device
6304 //==============================================================================
6306 static Standard_Integer VClInfo (Draw_Interpretor& theDi,
6310 Handle(AIS_InteractiveContext) aContextAIS = ViewerTest::GetAISContext();
6311 if (aContextAIS.IsNull())
6313 std::cerr << "Call vinit before!\n";
6317 Handle(OpenGl_GraphicDriver) aDrv = Handle(OpenGl_GraphicDriver)::DownCast (aContextAIS->CurrentViewer()->Driver());
6318 Graphic3d_CView* aCView = static_cast<Graphic3d_CView*> (ViewerTest::CurrentView()->View()->CView());
6319 NCollection_DataMap<TCollection_AsciiString, TCollection_AsciiString> anInfo;
6322 || !aDrv->GetOpenClDeviceInfo (*aCView, anInfo))
6324 theDi << "OpenCL device info is unavailable!\n";
6328 theDi << "OpenCL device info:\n";
6329 for (NCollection_DataMap<TCollection_AsciiString, TCollection_AsciiString>::Iterator anIter (anInfo);
6330 anIter.More(); anIter.Next())
6332 theDi << anIter.Key() << ": \t" << anIter.Value() << "\n";
6337 //=======================================================================
6338 //function : VRaytrace
6339 //purpose : Enables/disables OpenCL-based ray-tracing
6340 //=======================================================================
6342 static Standard_Integer VRaytrace (Draw_Interpretor& ,
6343 Standard_Integer theArgNb,
6344 const char** theArgVec)
6346 Handle(V3d_View) aView = ViewerTest::CurrentView();
6349 std::cerr << "Use 'vinit' command before " << theArgVec[0] << "\n";
6354 || Draw::Atoi (theArgVec[1]))
6356 aView->SetRaytracingMode();
6360 aView->SetRasterizationMode();
6366 //=======================================================================
6367 //function : VSetRaytraceMode
6368 //purpose : Enables/disables features of OpenCL-based ray-tracing
6369 //=======================================================================
6371 static Standard_Integer VSetRaytraceMode (Draw_Interpretor&,
6372 Standard_Integer theArgNb,
6373 const char ** theArgVec)
6375 Handle(V3d_View) aView = ViewerTest::CurrentView();
6378 std::cerr << "Use 'vinit' command before " << theArgVec[0] << "\n";
6381 else if (theArgNb < 2)
6383 std::cerr << "Usage : " << theArgVec[0] << " [shad=0|1] [refl=0|1] [aa=0|1]\n";
6387 for (Standard_Integer anArgIter = 1; anArgIter < theArgNb; ++anArgIter)
6389 const TCollection_AsciiString anArg (theArgVec[anArgIter]);
6391 if (anArg.Search ("shad=") > -1)
6393 if (anArg.Token ("=", 2).IntegerValue() != 0)
6394 aView->EnableRaytracedShadows();
6396 aView->DisableRaytracedShadows();
6398 else if (anArg.Search ("refl=") > -1)
6400 if (anArg.Token ("=", 2).IntegerValue() != 0)
6401 aView->EnableRaytracedReflections();
6403 aView->DisableRaytracedReflections();
6405 else if (anArg.Search ("aa=") > -1)
6407 if (anArg.Token ("=", 2).IntegerValue() != 0)
6408 aView->EnableRaytracedAntialiasing();
6410 aView->DisableRaytracedAntialiasing();
6414 std::cerr << "Unknown argument: " << anArg << "\n";
6422 //=======================================================================
6423 //function : ViewerCommands
6425 //=======================================================================
6427 void ViewerTest::ViewerCommands(Draw_Interpretor& theCommands)
6430 const char *group = "ZeViewer";
6431 theCommands.Add("vinit",
6432 #if !defined(_WIN32) && !defined(__WIN32__) && (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
6433 "[name=view_name] [display=display_name] [l=leftPx t=topPx] [w=widthPx h=heightPx]\n"
6435 "[name=view_name] [l=leftPx t=topPx] [w=widthPx h=heightPx]\n"
6437 " - Creates new View window with specified name view_name.\n"
6438 "By default the new view is created in the viewer and in"
6439 " graphic driver shared with active view.\n"
6440 " - name = {driverName/viewerName/viewName | viewerName/viewName | viewName}.\n"
6441 "If driverName isn't specified the driver will be shared with active view.\n"
6442 "If viewerName isn't specified the viewer will be shared with active view.\n"
6443 #if !defined(_WIN32) && !defined(__WIN32__) && (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
6444 " - display = HostName.DisplayNumber[:ScreenNumber] : if specified"
6445 "is used in creation of graphic driver\n"
6447 " - l, t: pixel position of left top corner of the window\n"
6448 " - w,h: width and heigth of window respectively.\n"
6449 "Additional commands for operations with views: vclose, vactivate, vviewlist.\n",
6450 __FILE__,VInit,group);
6451 theCommands.Add("vclose" ,
6452 "[view_id [keep_context=0|1]]\n"
6453 "or vclose ALL - to remove all created views\n"
6454 " - removes view(viewer window) defined by its view_id.\n"
6455 " - keep_context: by default 0; if 1 and the last view is deleted"
6456 " the current context is not removed.",
6457 __FILE__,VClose,group);
6458 theCommands.Add("vactivate" ,
6460 " - activates view(viewer window) defined by its view_id",
6461 __FILE__,VActivate,group);
6462 theCommands.Add("vviewlist",
6463 "vviewlist [format={tree, long}]"
6464 " - prints current list of views per viewer and graphic_driver ID shared between viewers"
6465 " - format: format of result output, if tree the output is a tree view;"
6466 "otherwise it's a list of full view names. By default format = tree",
6467 __FILE__,VViewList,group);
6468 theCommands.Add("vhelp" ,
6469 "vhelp : display help on the viewer commands",
6470 __FILE__,VHelp,group);
6471 theCommands.Add("vtop" ,
6472 "vtop or <T> : Top view" ,
6473 __FILE__,VTop,group);
6474 theCommands.Add("vbottom" ,
6475 "vbottom : Bottom view" ,
6476 __FILE__,VBottom,group);
6477 theCommands.Add("vleft" ,
6478 "vleft : Left view" ,
6479 __FILE__,VLeft,group);
6480 theCommands.Add("vright" ,
6481 "vright : Right view" ,
6482 __FILE__,VRight,group);
6483 theCommands.Add("vaxo" ,
6484 " vaxo or <A> : Axonometric view ",
6485 __FILE__,VAxo,group);
6486 theCommands.Add("vfront" ,
6487 "vfront : Front view" ,
6488 __FILE__,VFront,group);
6489 theCommands.Add("vback" ,
6490 "vback : Back view" ,
6491 __FILE__,VBack,group);
6492 theCommands.Add("vpick" ,
6493 "vpick : vpick X Y Z [shape subshape] ( all variables as string )",
6495 theCommands.Add("vfit" ,
6496 "vfit or <F> : vfit",
6497 __FILE__,VFit,group);
6498 theCommands.Add ("vzfit", "vzfit [scale]\n"
6499 " Matches Z near, Z far view volume planes to the displayed objects.\n"
6500 " \"scale\" - specifies factor to scale computed z range.\n",
6501 __FILE__, VZFit, group);
6502 theCommands.Add("vrepaint",
6503 "vrepaint : vrepaint, force redraw",
6504 __FILE__,VRepaint,group);
6505 theCommands.Add("vclear",
6507 __FILE__,VClear,group);
6508 theCommands.Add("vsetbg",
6509 "vsetbg : vsetbg imagefile [filltype] : Load image as background",
6510 __FILE__,VSetBg,group);
6511 theCommands.Add("vsetbgmode",
6512 "vsetbgmode : vsetbgmode filltype : Change background image fill type",
6513 __FILE__,VSetBgMode,group);
6514 theCommands.Add("vsetgradientbg",
6515 "vsetgradientbg : vsetgradientbg r1 g1 b1 r2 g2 b2 filltype : Mount gradient background",
6516 __FILE__,VSetGradientBg,group);
6517 theCommands.Add("vsetgrbgmode",
6518 "vsetgrbgmode : vsetgrbgmode filltype : Change gradient background fill type",
6519 __FILE__,VSetGradientBgMode,group);
6520 theCommands.Add("vsetcolorbg",
6521 "vsetcolorbg : vsetcolorbg r g b : Set background color",
6522 __FILE__,VSetColorBg,group);
6523 theCommands.Add("vscale",
6524 "vscale : vscale X Y Z",
6525 __FILE__,VScale,group);
6526 theCommands.Add("vzbufftrihedron",
6527 "vzbufftrihedron [center|left_lower|left_upper|right_lower|right_upper"
6528 " textR=255 textG=255 textB=255 scale=0.1 wireframe|zbuffer]"
6529 " : Displays a V3d_ZBUFFER'ed or V3d_WIREFRAME'd trihedron",
6530 __FILE__,VTestZBuffTrihedron,group);
6531 theCommands.Add("vrotate",
6532 "vrotate : vrotate AX AY AZ [X Y Z]",
6533 __FILE__,VRotate,group);
6534 theCommands.Add("vzoom",
6535 "vzoom : vzoom coef",
6536 __FILE__,VZoom,group);
6537 theCommands.Add("vpan",
6538 "vpan : vpan dx dy",
6539 __FILE__,VPan,group);
6540 theCommands.Add("vexport",
6541 "vexport : vexport full_file_path {PS | EPS | TEX | PDF | SVG | PGF | EMF }"
6542 " : exports the view to a vector file of a given format"
6543 " : notice that EMF format requires patched gl2ps",
6544 __FILE__,VExport,group);
6545 theCommands.Add("vcolorscale",
6546 "vcolorscale : vcolorscale [RangeMin = 0 RangeMax = 100 Intervals = 10 HeightFont = 16 Position = 2 X = 0 Y = 0]: draw color scale",
6547 __FILE__,VColorScale,group);
6548 theCommands.Add("vgraduatedtrihedron",
6549 "vgraduatedtrihedron : 1/0 (display/erase) [Xname Yname Zname [Font [isMultibyte]]]",
6550 __FILE__,VGraduatedTrihedron,group);
6551 theCommands.Add("vprintview" ,
6552 "vprintview : width height filename [algo=0] [tile_width tile_height] : Test print algorithm: algo = 0 - stretch, algo = 1 - tile",
6553 __FILE__,VPrintView,group);
6554 theCommands.Add("vzlayer",
6555 "vzlayer : add/del/get [id] : Z layer operations in v3d viewer: add new z layer, delete z layer, get z layer ids",
6556 __FILE__,VZLayer,group);
6557 theCommands.Add("voverlaytext",
6558 "voverlaytext : text x y [height] [font_name] [text_color: R G B] [display_type] [background_color: R G B]"
6559 " : height - pixel height of the text (default=10.0)"
6560 " : font_name - name of font (default=courier)"
6561 " : text_color - three values: RedColor GreenColor BlueColor (default = 255.0 255.0 255.0) "
6562 " : display_type = {normal/subtitle/decal/blend}, (default=normal) "
6563 " : background_color - three values: RedColor GreenColor BlueColor (default = 255.0 255.0 255.0), the parameter is defined for subtitle and decal display types ",
6564 __FILE__,VOverlayText,group);
6565 theCommands.Add("vlayerline",
6566 "vlayerline : vlayerline x1 y1 x2 y2 [linewidth=0.5] [linetype=0] [transparency=1.0]",
6567 __FILE__,VLayerLine,group);
6568 theCommands.Add ("vgrid",
6569 "vgrid [off] [Mode={r|c}] [Type={l|p}] [OriginX OriginY [StepX/StepRadius StepY/DivNb RotAngle]]"
6570 " : Mode - rectangular or circular"
6571 " : Type - lines or points",
6572 __FILE__, VGrid, group);
6573 theCommands.Add ("vfps",
6574 "vfps [framesNb=100] : estimate average frame rate for active view",
6575 __FILE__, VFps, group);
6576 theCommands.Add ("vgldebug",
6577 "vgldebug [{0|1}] : request debug GL context, should be called before vinit\n"
6578 " : this function is implemented only for Windows\n"
6579 " : GL_ARB_debug_output extension should be exported by OpenGL driver!",
6580 __FILE__, VGlDebug, group);
6581 theCommands.Add ("vvbo",
6582 "vvbo [{0|1}] : turn VBO usage On/Off; affects only newly displayed objects",
6583 __FILE__, VVbo, group);
6584 theCommands.Add ("vstereo",
6585 "\nvstereo [{0|1}] : turn stereo usage On/Off; affects only newly displayed objects",
6586 __FILE__, VStereo, group);
6587 theCommands.Add ("vcaps",
6588 "vcaps [vbo={0|1}] [sprites={0|1}] [soft={0|1}] : modify particular graphic driver options",
6589 __FILE__, VCaps, group);
6590 theCommands.Add ("vmemgpu",
6591 "vmemgpu [f]: print system-dependent GPU memory information if available;"
6592 " with f option returns free memory in bytes",
6593 __FILE__, VMemGpu, group);
6594 theCommands.Add ("vreadpixel",
6595 "vreadpixel xPixel yPixel [{rgb|rgba|depth|hls|rgbf|rgbaf}=rgba] [name]"
6596 " : Read pixel value for active view",
6597 __FILE__, VReadPixel, group);
6598 theCommands.Add("diffimage",
6599 "diffimage : diffimage imageFile1 imageFile2 toleranceOfColor(0..1) blackWhite(1|0) borderFilter(1|0) [diffImageFile]",
6600 __FILE__, VDiffImage, group);
6601 theCommands.Add ("vselect",
6602 "vselect x1 y1 [x2 y2 [x3 y3 ... xn yn]] [shift_selection = 0|1]\n"
6603 "- emulates different types of selection:\n"
6604 "- 1) single click selection\n"
6605 "- 2) selection with rectangle having corners at pixel positions (x1,y1) and (x2,y2)\n"
6606 "- 3) selection with polygon having corners in pixel positions (x1,y1), (x2,y2),...,(xn,yn)\n"
6607 "- 4) any of these selections with shift button pressed",
6608 __FILE__, VSelect, group);
6609 theCommands.Add ("vmoveto",
6611 "- emulates cursor movement to pixel postion (x,y)",
6612 __FILE__, VMoveTo, group);
6613 theCommands.Add ("vviewparams", "vviewparams usage:\n"
6615 "- vviewparams [-scale [s]] [-eye [x y z]] [-at [x y z]] [-up [x y z]]\n"
6616 " [-proj [x y z]] [-center x y] [-size sx]\n"
6617 "- Gets or sets current view parameters.\n"
6618 "- If called without arguments, all view parameters are printed.\n"
6619 "- The options are:\n"
6620 " -scale [s] : prints or sets viewport relative scale.\n"
6621 " -eye [x y z] : prints or sets eye location.\n"
6622 " -at [x y z] : prints or sets center of look.\n"
6623 " -up [x y z] : prints or sets direction of up vector.\n"
6624 " -proj [x y z] : prints or sets direction of look.\n"
6625 " -center x y : sets location of center of the screen in pixels.\n"
6626 " -size [sx] : prints viewport projection width and height sizes\n"
6627 " : or changes the size of its maximum dimension.\n",
6628 __FILE__, VViewParams, group);
6629 theCommands.Add("vchangeselected",
6630 "vchangeselected shape"
6631 "- adds to shape to selection or remove one from it",
6632 __FILE__, VChangeSelected, group);
6633 theCommands.Add("vzclipping",
6634 "vzclipping [mode] [depth width]\n"
6635 "- mode = OFF|BACK|FRONT|SLICE depth = [0..1] width = [0..1]\n"
6636 "- gets or sets ZClipping mode, width and depth",
6637 __FILE__,VZClipping,group);
6638 theCommands.Add ("vnbselected",
6639 "vnbselected", __FILE__, VNbSelected, group);
6640 theCommands.Add ("vchangecamera",
6641 " changes camera parameters \n"
6642 "- vchangecamera [param_type] [value]\n"
6643 "- vchangecamera proj {ortho/persp/left/right/stereo}\n"
6644 " Projection type including left and right stereo parts.\n"
6645 "- vchangecamera dist [real]\n"
6646 " Sets distance from target point to camera eye (moving eye).\n"
6647 "- vchangecamera iod [real]\n"
6648 " Intraocular distance value.\n"
6649 "- vchangecamera zfocus [real]\n"
6650 " Stereographic focus value.\n"
6651 "- vchangecamera fov [real]\n"
6652 " Field Of View value (in degrees).\n"
6653 "- vchangecamera zfocustype {absolute/relative}\n"
6654 " Stereographic focus definition type (absolute value or coefficient).\n"
6655 "- vchangecamera iodtype {absolute/relative}\n"
6656 " Intraocular distance definition type (absolute value or coefficient).\n",
6657 __FILE__, VChangeCamera, group);
6658 theCommands.Add ("vautozfit", "command to enable or disable automatic z-range adjusting\n"
6659 "- vautozfit [on={1|0}] [scale]\n"
6660 " Prints or changes parameters of automatic z-fit mode:\n"
6661 " \"on\" - turns automatic z-fit on or off\n"
6662 " \"scale\" - specifies factor to scale computed z range.\n",
6663 __FILE__, VAutoZFit, group);
6664 theCommands.Add ("vzrange", "command to manually access znear and zfar values\n"
6665 " vzrange - without parameters shows current values\n"
6666 " vzrange [znear] [zfar] - applies provided values to view",
6667 __FILE__,VZRange, group);
6668 theCommands.Add("vantialiasing",
6669 "vantialiasing 1|0",
6670 __FILE__,VAntialiasing,group);
6671 theCommands.Add ("vpurgedisplay",
6673 "- removes structures which don't belong to objects displayed in neutral point",
6674 __FILE__, VPurgeDisplay, group);
6675 theCommands.Add("vsetviewsize",
6676 "vsetviewsize size",
6677 __FILE__,VSetViewSize,group);
6678 theCommands.Add("vmoveview",
6679 "vmoveview Dx Dy Dz [Start = 1|0]",
6680 __FILE__,VMoveView,group);
6681 theCommands.Add("vtranslateview",
6682 "vtranslateview Dx Dy Dz [Start = 1|0)]",
6683 __FILE__,VTranslateView,group);
6684 theCommands.Add("vturnview",
6685 "vturnview Ax Ay Az [Start = 1|0]",
6686 __FILE__,VTurnView,group);
6687 theCommands.Add("vtextureenv",
6688 "Enables or disables environment mapping in the 3D view, loading the texture from the given standard "
6689 "or user-defined file and optionally applying texture mapping parameters\n"
6691 " vtextureenv off - disables environment mapping\n"
6692 " vtextureenv on {std_texture|texture_file_name} [rep mod flt ss st ts tt rot] - enables environment mapping\n"
6693 " std_texture = (0..7)\n"
6694 " rep = {clamp|repeat}\n"
6695 " mod = {decal|modulate}\n"
6696 " flt = {nearest|bilinear|trilinear}\n"
6697 " ss, st - scale factors for s and t texture coordinates\n"
6698 " ts, tt - translation for s and t texture coordinates\n"
6699 " rot - texture rotation angle in degrees",
6700 __FILE__, VTextureEnv, group);
6701 theCommands.Add("vhlr" ,
6702 "is_enabled={on|off} [show_hidden={1|0}]"
6703 " - Hidden line removal algorithm:"
6704 " - is_enabled: if is on HLR algorithm is applied\n"
6705 " - show_hidden: if equals to 1, hidden lines are drawn as dotted ones.\n",
6706 __FILE__,VHLR,group);
6707 theCommands.Add("vhlrtype" ,
6708 "algo_type={algo|polyalgo} [shape_1 ... shape_n]"
6709 " - Changes the type of HLR algorithm using for shapes."
6710 " - algo_type: if equals to algo, exact HLR algorithm is applied;\n"
6711 " if equals to polyalgo, polygonal HLR algorithm is applied."
6712 "If shapes are not given HLR algoithm of given type is applied"
6713 " to all shapes in the view\n",
6714 __FILE__,VHLRType,group);
6715 theCommands.Add("vclipplane", "vclipplane usage: \n"
6716 " maxplanes <view_name> - get plane limit for view.\n"
6717 " create <plane_name> - create new plane.\n"
6718 " delete <plane_name> - delete plane.\n"
6719 " clone <source_plane> <plane_name> - clone the plane definition.\n"
6720 " set/unset <plane_name> object <object list> - set/unset plane for IO.\n"
6721 " set/unset <plane_name> view <view list> - set/unset plane for view.\n"
6722 " change <plane_name> on/off - turn clipping on/off.\n"
6723 " change <plane_name> equation <a> <b> <c> <d> - change plane equation.\n"
6724 " change <plane_name> capping on/off - turn capping on/off.\n"
6725 " change <plane_name> capping color <r> <g> <b> - set color.\n"
6726 " change <plane name> capping texname <texture> - set texture.\n"
6727 " change <plane_name> capping texscale <sx> <sy> - set tex scale.\n"
6728 " change <plane_name> capping texorigin <tx> <ty> - set tex origin.\n"
6729 " change <plane_name> capping texrotate <angle> - set tex rotation.\n"
6730 " change <plane_name> capping hatch on/off/<id> - set hatching mask.\n"
6731 " please use VSetTextureMode command to enable texture rendering in view.\n"
6732 , __FILE__, VClipPlane, group);
6733 theCommands.Add("vsettexturemode", "vsettexturemode view_name mode \n"
6735 " 0 - no textures enabled in view.\n"
6736 " 1 - only environment textures enabled.\n"
6737 " 2 - all textures enabled.\n"
6738 " this command sets texture details mode for the specified view.\n"
6739 , __FILE__, VSetTextureMode, group);
6740 theCommands.Add("vdefaults",
6741 "vdefaults [absDefl=value] [devCoeff=value] [angDefl=value]",
6742 __FILE__, VDefaults, group);
6743 theCommands.Add("vlight",
6744 "tool to manage light sources, without arguments shows list of lights."
6745 "\n Main commands: "
6746 "\n 'clear' to clear lights"
6747 "\n '{def}aults' to load deafault lights"
6748 "\n 'add' (or 'new') <type> to add any light source"
6749 "\n where <type> is one of {amb}ient|directional|{spot}light|positional"
6750 "\n 'change' <lightId> to edit light source with specified lightId"
6751 "\n\n In addition to 'add' and 'change' commands you can use light parameters:"
6752 "\n {pos}ition X Y Z"
6753 "\n {dir}ection X Y Z (for directional light or for spotlight)"
6754 "\n color colorName"
6755 "\n {head}light 0|1"
6756 "\n {constAtten}uation value"
6757 "\n {linearAtten}uation value"
6759 "\n {spotexp}onent value"
6761 "\n\n example: vlight add positional head 1 pos 0 1 1 color red"
6762 "\n example: vlight change 0 direction 0 -1 0 linearAttenuation 0.2",
6763 __FILE__, VLight, group);
6764 theCommands.Add("vraytrace",
6766 __FILE__,VRaytrace,group);
6767 theCommands.Add("vclinfo",
6769 __FILE__,VClInfo,group);
6770 theCommands.Add("vsetraytracemode",
6771 "vsetraytracemode [shad=0|1] [refl=0|1] [aa=0|1]",
6772 __FILE__,VSetRaytraceMode,group);