0025436: Visualization - AIS_InteractiveContext::HilightPreviousDetected() should...
[occt.git] / src / ViewerTest / ViewerTest_ViewerCommands.cxx
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
5 //
6 // This file is part of Open CASCADE Technology software library.
7 //
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.
13 //
14 // Alternatively, this file may be used under the terms of Open CASCADE
15 // commercial license or contractual agreement.
16
17 #include <OpenGl_GlCore20.hxx>
18 #include <AIS_Shape.hxx>
19 #include <AIS_Drawer.hxx>
20 #include <AIS_InteractiveObject.hxx>
21 #include <AIS_ListOfInteractive.hxx>
22 #include <AIS_ListIteratorOfListOfInteractive.hxx>
23 #include <DBRep.hxx>
24 #include <Graphic3d_AspectMarker3d.hxx>
25 #include <Graphic3d_ExportFormat.hxx>
26 #include <Graphic3d_NameOfTextureEnv.hxx>
27 #include <Graphic3d_TextureEnv.hxx>
28 #include <Graphic3d_TextureParams.hxx>
29 #include <Graphic3d_TypeOfTextureFilter.hxx>
30 #include <Graphic3d_AspectFillArea3d.hxx>
31 #include <ViewerTest.hxx>
32 #include <ViewerTest_AutoUpdater.hxx>
33 #include <ViewerTest_EventManager.hxx>
34 #include <ViewerTest_DoubleMapOfInteractiveAndName.hxx>
35 #include <ViewerTest_DoubleMapIteratorOfDoubleMapOfInteractiveAndName.hxx>
36 #include <Visual3d_View.hxx>
37 #include <Visual3d_ViewManager.hxx>
38 #include <V3d_AmbientLight.hxx>
39 #include <V3d_DirectionalLight.hxx>
40 #include <V3d_LayerMgr.hxx>
41 #include <V3d_LayerMgrPointer.hxx>
42 #include <V3d_PositionalLight.hxx>
43 #include <V3d_SpotLight.hxx>
44 #include <NCollection_DoubleMap.hxx>
45 #include <NCollection_List.hxx>
46 #include <NCollection_Vector.hxx>
47 #include <NIS_View.hxx>
48 #include <NIS_Triangulated.hxx>
49 #include <NIS_InteractiveContext.hxx>
50 #include <AIS_InteractiveContext.hxx>
51 #include <Draw_Interpretor.hxx>
52 #include <Draw.hxx>
53 #include <Draw_Appli.hxx>
54 #include <Aspect_PrintAlgo.hxx>
55 #include <Image_AlienPixMap.hxx>
56 #include <OpenGl_GraphicDriver.hxx>
57 #include <OSD_Timer.hxx>
58 #include <TColStd_HSequenceOfAsciiString.hxx>
59 #include <TColStd_SequenceOfInteger.hxx>
60 #include <TColStd_HSequenceOfReal.hxx>
61 #include <TColgp_Array1OfPnt2d.hxx>
62 #include <TColStd_MapOfAsciiString.hxx>
63 #include <Visual3d_LayerItem.hxx>
64 #include <Aspect_TypeOfLine.hxx>
65 #include <Image_Diff.hxx>
66 #include <Aspect_DisplayConnection.hxx>
67 #include <gp_Pnt.hxx>
68 #include <gp_Dir.hxx>
69 #include <gp_Pln.hxx>
70 #include <PrsMgr_PresentableObject.hxx>
71 #include <Graphic3d_ClipPlane.hxx>
72 #include <NCollection_DataMap.hxx>
73 #include <Graphic3d_Texture2Dmanual.hxx>
74 #include <Prs3d_ShadingAspect.hxx>
75
76 #ifdef WNT
77 #undef DrawText
78 #endif
79
80 #include <Visual3d_Layer.hxx>
81 #include <cstdlib>
82
83 #if defined(_WIN32)
84   #include <WNT_WClass.hxx>
85   #include <WNT_Window.hxx>
86
87   #if defined(_MSC_VER)
88     #define _CRT_SECURE_NO_DEPRECATE
89     #pragma warning (disable:4996)
90   #endif
91 #elif defined(__APPLE__) && !defined(MACOSX_USE_GLX)
92   #include <Cocoa_Window.hxx>
93 #else
94   #include <Xw_Window.hxx>
95   #include <X11/Xlib.h> /* contains some dangerous #defines such as Status, True etc. */
96   #include <X11/Xutil.h>
97   #include <tk.h>
98 #endif
99
100 inline Standard_Boolean parseOnOff (Standard_CString  theArg,
101                                     Standard_Boolean& theIsOn)
102 {
103   TCollection_AsciiString aFlag (theArg);
104   aFlag.LowerCase();
105   if (aFlag == "on"
106    || aFlag == "1")
107   {
108     theIsOn = Standard_True;
109     return Standard_True;
110   }
111   else if (aFlag == "off"
112         || aFlag == "0")
113   {
114     theIsOn = Standard_False;
115     return Standard_True;
116   }
117   return Standard_False;
118 }
119
120 // Auxiliary definitions
121 static const char THE_KEY_DELETE = 127;
122
123 //==============================================================================
124 //  VIEWER GLOBAL VARIABLES
125 //==============================================================================
126
127 Standard_IMPORT Standard_Boolean Draw_VirtualWindows;
128 Standard_IMPORT Standard_Boolean Draw_Interprete (const char* theCommand);
129
130 Standard_EXPORT int ViewerMainLoop(Standard_Integer , const char** argv);
131 extern const Handle(NIS_InteractiveContext)& TheNISContext();
132 extern ViewerTest_DoubleMapOfInteractiveAndName& GetMapOfAIS();
133
134 extern int VErase (Draw_Interpretor& theDI,
135                    Standard_Integer  theArgNb,
136                    const char**      theArgVec);
137
138 #if defined(_WIN32)
139 static Handle(WNT_Window)& VT_GetWindow() {
140   static Handle(WNT_Window) WNTWin;
141   return WNTWin;
142 }
143 #elif defined(__APPLE__) && !defined(MACOSX_USE_GLX)
144 static Handle(Cocoa_Window)& VT_GetWindow()
145 {
146   static Handle(Cocoa_Window) aWindow;
147   return aWindow;
148 }
149 extern void ViewerTest_SetCocoaEventManagerView (const Handle(Cocoa_Window)& theWindow);
150 extern void SetCocoaWindowTitle (const Handle(Cocoa_Window)& theWindow, Standard_CString theTitle);
151 extern void GetCocoaScreenResolution (Standard_Integer& theWidth, Standard_Integer& theHeight);
152
153 #else
154 static Handle(Xw_Window)& VT_GetWindow(){
155   static Handle(Xw_Window) XWWin;
156   return XWWin;
157 }
158
159 static void VProcessEvents(ClientData,int);
160 #endif
161
162 static Handle(Aspect_DisplayConnection)& GetDisplayConnection()
163 {
164   static Handle(Aspect_DisplayConnection) aDisplayConnection;
165   return aDisplayConnection;
166 }
167
168 static void SetDisplayConnection (const Handle(Aspect_DisplayConnection)& theDisplayConnection)
169 {
170   GetDisplayConnection() = theDisplayConnection;
171 }
172
173 #if defined(_WIN32) || (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
174 Aspect_Handle GetWindowHandle(const Handle(Aspect_Window)& theWindow)
175 {
176   Aspect_Handle aWindowHandle = (Aspect_Handle)NULL;
177 #if defined(_WIN32)
178   const Handle (WNT_Window) aWindow = Handle(WNT_Window)::DownCast (theWindow);
179   if (!aWindow.IsNull())
180     return aWindow->HWindow();
181 #elif (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
182   const Handle (Xw_Window) aWindow = Handle(Xw_Window)::DownCast (theWindow);
183   if (!aWindow.IsNull())
184   return aWindow->XWindow();
185 #endif
186   return aWindowHandle;
187 }
188 #endif
189
190 static Standard_Boolean MyHLRIsOn = Standard_False;
191
192 NCollection_DoubleMap <TCollection_AsciiString, Handle(V3d_View)> ViewerTest_myViews;
193 static NCollection_DoubleMap <TCollection_AsciiString, Handle(AIS_InteractiveContext)>  ViewerTest_myContexts;
194 static NCollection_DoubleMap <TCollection_AsciiString, Handle(Graphic3d_GraphicDriver)> ViewerTest_myDrivers;
195 static OpenGl_Caps ViewerTest_myDefaultCaps;
196
197 #define ZCLIPWIDTH 1.
198
199 static void OSWindowSetup();
200
201 //==============================================================================
202 //  EVENT GLOBAL VARIABLES
203 //==============================================================================
204
205 static int Start_Rot = 0;
206 static int ZClipIsOn = 0;
207 int X_Motion = 0; // Current cursor position
208 int Y_Motion = 0;
209 int X_ButtonPress = 0; // Last ButtonPress position
210 int Y_ButtonPress = 0;
211 Standard_Boolean IsDragged = Standard_False;
212 Standard_Boolean DragFirst = Standard_False;
213
214 //==============================================================================
215
216 #ifdef WNT
217 static LRESULT WINAPI ViewerWindowProc(
218                                        HWND hwnd,
219                                        UINT uMsg,
220                                        WPARAM wParam,
221                                        LPARAM lParam );
222 static LRESULT WINAPI AdvViewerWindowProc(
223   HWND hwnd,
224   UINT uMsg,
225   WPARAM wParam,
226   LPARAM lParam );
227 #endif
228
229
230 //==============================================================================
231 //function : WClass
232 //purpose  :
233 //==============================================================================
234
235 const Handle(MMgt_TShared)& ViewerTest::WClass()
236 {
237   static Handle(MMgt_TShared) theWClass;
238 #if defined(_WIN32)
239   if (theWClass.IsNull())
240   {
241     theWClass = new WNT_WClass ("GW3D_Class", AdvViewerWindowProc,
242       CS_VREDRAW | CS_HREDRAW, 0, 0,
243       ::LoadCursor (NULL, IDC_ARROW));
244   }
245 #endif
246   return theWClass;
247 }
248
249 //==============================================================================
250 //function : CreateName
251 //purpose  : Create numerical name for new object in theMap
252 //==============================================================================
253 template <typename ObjectType>
254 TCollection_AsciiString CreateName (const NCollection_DoubleMap <TCollection_AsciiString, ObjectType>& theObjectMap,
255                                     const TCollection_AsciiString& theDefaultString)
256 {
257   if (theObjectMap.IsEmpty())
258     return theDefaultString + TCollection_AsciiString(1);
259
260   Standard_Integer aNextKey = 1;
261   Standard_Boolean isFound = Standard_False;
262   while (!isFound)
263   {
264     TCollection_AsciiString aStringKey = theDefaultString + TCollection_AsciiString(aNextKey);
265     // Look for objects with default names
266     if (theObjectMap.IsBound1(aStringKey))
267     {
268       aNextKey++;
269     }
270     else
271       isFound = Standard_True;
272   }
273
274   return theDefaultString + TCollection_AsciiString(aNextKey);
275 }
276
277 //==============================================================================
278 //structure : ViewerTest_Names
279 //purpose   : Allow to operate with full view name: driverName/viewerName/viewName
280 //==============================================================================
281 struct ViewerTest_Names
282 {
283 private:
284   TCollection_AsciiString myDriverName;
285   TCollection_AsciiString myViewerName;
286   TCollection_AsciiString myViewName;
287
288 public:
289
290   const TCollection_AsciiString& GetDriverName () const
291   {
292     return myDriverName;
293   }
294   void SetDriverName (const TCollection_AsciiString& theDriverName)
295   {
296     myDriverName = theDriverName;
297   }
298   const TCollection_AsciiString& GetViewerName () const
299   {
300     return myViewerName;
301   }
302   void SetViewerName (const TCollection_AsciiString& theViewerName)
303   {
304     myViewerName = theViewerName;
305   }
306   const TCollection_AsciiString& GetViewName () const
307   {
308     return myViewName;
309   }
310   void SetViewName (const TCollection_AsciiString& theViewName)
311   {
312     myViewName = theViewName;
313   }
314
315   //===========================================================================
316   //function : Constructor for ViewerTest_Names
317   //purpose  : Get view, viewer, driver names from custom string
318   //===========================================================================
319
320   ViewerTest_Names (const TCollection_AsciiString& theInputString)
321   {
322     TCollection_AsciiString aName(theInputString);
323     if (theInputString.IsEmpty())
324     {
325       // Get current configuration
326       if (ViewerTest_myDrivers.IsEmpty())
327         myDriverName = CreateName<Handle(Graphic3d_GraphicDriver)>
328           (ViewerTest_myDrivers, TCollection_AsciiString("Driver"));
329       else
330         myDriverName = ViewerTest_myDrivers.Find2
331         (ViewerTest::GetAISContext()->CurrentViewer()->Driver());
332
333       if(ViewerTest_myContexts.IsEmpty())
334       {
335         myViewerName = CreateName <Handle(AIS_InteractiveContext)>
336           (ViewerTest_myContexts, TCollection_AsciiString (myDriverName + "/Viewer"));
337       }
338       else
339         myViewerName = ViewerTest_myContexts.Find2 (ViewerTest::GetAISContext());
340
341         myViewName = CreateName <Handle(V3d_View)>
342           (ViewerTest_myViews, TCollection_AsciiString(myViewerName + "/View"));
343     }
344     else
345     {
346       // There is at least view name
347       Standard_Integer aParserNumber = 0;
348       for (Standard_Integer i = 0; i < 3; ++i)
349       {
350         Standard_Integer aParserPos = aName.SearchFromEnd("/");
351         if(aParserPos != -1)
352         {
353           aParserNumber++;
354           aName.Split(aParserPos-1);
355         }
356         else
357           break;
358       }
359       if (aParserNumber == 0)
360       {
361         // Only view name
362         if (!ViewerTest::GetAISContext().IsNull())
363         {
364           myDriverName = ViewerTest_myDrivers.Find2
365           (ViewerTest::GetAISContext()->CurrentViewer()->Driver());
366           myViewerName = ViewerTest_myContexts.Find2
367           (ViewerTest::GetAISContext());
368         }
369         else
370         {
371           // There is no opened contexts here, need to create names for viewer and driver
372           myDriverName = CreateName<Handle(Graphic3d_GraphicDriver)>
373             (ViewerTest_myDrivers, TCollection_AsciiString("Driver"));
374
375           myViewerName = CreateName <Handle(AIS_InteractiveContext)>
376             (ViewerTest_myContexts, TCollection_AsciiString (myDriverName + "/Viewer"));
377         }
378         myViewName = TCollection_AsciiString(myViewerName + "/" + theInputString);
379       }
380       else if (aParserNumber == 1)
381       {
382         // Here is viewerName/viewName
383         if (!ViewerTest::GetAISContext().IsNull())
384           myDriverName = ViewerTest_myDrivers.Find2
385           (ViewerTest::GetAISContext()->CurrentViewer()->Driver());
386         else
387         {
388           // There is no opened contexts here, need to create name for driver
389           myDriverName = CreateName<Handle(Graphic3d_GraphicDriver)>
390             (ViewerTest_myDrivers, TCollection_AsciiString("Driver"));
391         }
392         myViewerName = TCollection_AsciiString(myDriverName + "/" + aName);
393
394         myViewName = TCollection_AsciiString(myDriverName + "/" + theInputString);
395       }
396       else
397       {
398         //Here is driverName/viewerName/viewName
399         myDriverName = TCollection_AsciiString(aName);
400
401         TCollection_AsciiString aViewerName(theInputString);
402         aViewerName.Split(aViewerName.SearchFromEnd("/") - 1);
403         myViewerName = TCollection_AsciiString(aViewerName);
404
405         myViewName = TCollection_AsciiString(theInputString);
406       }
407     }
408   }
409 };
410
411 //==============================================================================
412 //function : FindContextByView
413 //purpose  : Find AIS_InteractiveContext by View
414 //==============================================================================
415
416 Handle(AIS_InteractiveContext) FindContextByView (const Handle(V3d_View)& theView)
417 {
418   Handle(AIS_InteractiveContext) anAISContext;
419
420   for (NCollection_DoubleMap<TCollection_AsciiString, Handle(AIS_InteractiveContext)>::Iterator
421        anIter (ViewerTest_myContexts); anIter.More(); anIter.Next())
422   {
423     if (anIter.Value()->CurrentViewer() == theView->Viewer())
424        return anIter.Key2();
425   }
426   return anAISContext;
427 }
428
429
430 //==============================================================================
431 //function : SetWindowTitle
432 //purpose  : Set window title
433 //==============================================================================
434
435 void SetWindowTitle (const Handle(Aspect_Window)& theWindow,
436                      Standard_CString theTitle)
437 {
438 #if defined(_WIN32)
439   SetWindowText ((HWND)Handle(WNT_Window)::DownCast(theWindow)->HWindow(),
440     theTitle);
441 #elif defined(__APPLE__) && !defined(MACOSX_USE_GLX)
442   SetCocoaWindowTitle (Handle(Cocoa_Window)::DownCast(theWindow), theTitle);
443 #else
444   if(GetDisplayConnection()->GetDisplay())
445   {
446     Window aWindow =
447       Handle(Xw_Window)::DownCast(theWindow)->XWindow();
448     XStoreName (GetDisplayConnection()->GetDisplay(), aWindow , theTitle);
449   }
450 #endif
451 }
452
453 //==============================================================================
454 //function : IsWindowOverlapped
455 //purpose  : Check if theWindow overlapp another view
456 //==============================================================================
457
458 Standard_Boolean IsWindowOverlapped (const Standard_Integer thePxLeft,
459                                      const Standard_Integer thePxTop,
460                                      const Standard_Integer thePxRight,
461                                      const Standard_Integer thePxBottom,
462                                      TCollection_AsciiString& theViewId)
463 {
464   for(NCollection_DoubleMap <TCollection_AsciiString, Handle(V3d_View)>::Iterator
465       anIter(ViewerTest_myViews); anIter.More(); anIter.Next())
466   {
467     Standard_Integer aTop = 0,
468       aLeft = 0,
469       aRight = 0,
470       aBottom = 0;
471     anIter.Value()->Window()->Position(aLeft, aTop, aRight, aBottom);
472     if ((thePxLeft >= aLeft && thePxLeft <= aRight && thePxTop >= aTop && thePxTop <= aBottom) ||
473         (thePxLeft >= aLeft && thePxLeft <= aRight && thePxBottom >= aTop && thePxBottom <= aBottom) ||
474         (thePxRight >= aLeft && thePxRight <= aRight && thePxTop >= aTop && thePxTop <= aBottom) ||
475         (thePxRight >= aLeft && thePxRight <= aRight && thePxBottom >= aTop && thePxBottom <= aBottom))
476     {
477       theViewId = anIter.Key1();
478       return Standard_True;
479     }
480   }
481   return Standard_False;
482 }
483
484 // Workaround: to create and delete non-orthographic views outside ViewerTest
485 void ViewerTest::RemoveViewName (const TCollection_AsciiString& theName)
486 {
487   ViewerTest_myViews.UnBind1 (theName);
488 }
489
490 void ViewerTest::InitViewName (const TCollection_AsciiString& theName,
491                                const Handle(V3d_View)& theView)
492 {
493   ViewerTest_myViews.Bind (theName, theView);
494 }
495
496 TCollection_AsciiString ViewerTest::GetCurrentViewName ()
497 {
498   return ViewerTest_myViews.Find2( ViewerTest::CurrentView());
499 }
500 //==============================================================================
501 //function : ViewerInit
502 //purpose  : Create the window viewer and initialize all the global variable
503 //==============================================================================
504
505 TCollection_AsciiString ViewerTest::ViewerInit (const Standard_Integer thePxLeft,
506                                                 const Standard_Integer thePxTop,
507                                                 const Standard_Integer thePxWidth,
508                                                 const Standard_Integer thePxHeight,
509                                                 Standard_CString theViewName,
510                                                 Standard_CString theDisplayName)
511 {
512   // Default position and dimension of the viewer window.
513   // Note that left top corner is set to be sufficiently small to have
514   // window fit in the small screens (actual for remote desktops, see #23003).
515   // The position corresponds to the window's client area, thus some
516   // gap is added for window frame to be visible.
517   Standard_Integer aPxLeft   = 20;
518   Standard_Integer aPxTop    = 40;
519   Standard_Integer aPxWidth  = 409;
520   Standard_Integer aPxHeight = 409;
521   Standard_Boolean toCreateViewer = Standard_False;
522
523   Handle(OpenGl_GraphicDriver) aGraphicDriver;
524   ViewerTest_Names aViewNames(theViewName);
525   if (ViewerTest_myViews.IsBound1 (aViewNames.GetViewName ()))
526     aViewNames.SetViewName (aViewNames.GetViewerName() + "/" + CreateName<Handle(V3d_View)>(ViewerTest_myViews, "View"));
527
528   if (thePxLeft != 0)
529     aPxLeft = thePxLeft;
530   if (thePxTop != 0)
531     aPxTop = thePxTop;
532   if (thePxWidth != 0)
533     aPxWidth = thePxWidth;
534   if (thePxHeight != 0)
535     aPxHeight = thePxHeight;
536
537   // Get graphic driver (create it or get from another view)
538   if (!ViewerTest_myDrivers.IsBound1 (aViewNames.GetDriverName()))
539   {
540     // Get connection string
541   #if !defined(_WIN32) && (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
542     TCollection_AsciiString aDisplayName(theDisplayName);
543     if (!aDisplayName.IsEmpty())
544       SetDisplayConnection (new Aspect_DisplayConnection ());
545     else
546       SetDisplayConnection (new Aspect_DisplayConnection (aDisplayName));
547   #else
548     (void)theDisplayName; // avoid warning on unused argument
549     SetDisplayConnection (new Aspect_DisplayConnection ());
550   #endif
551     aGraphicDriver = new OpenGl_GraphicDriver (GetDisplayConnection());
552     aGraphicDriver->ChangeOptions() = ViewerTest_myDefaultCaps;
553     ViewerTest_myDrivers.Bind (aViewNames.GetDriverName(), aGraphicDriver);
554     toCreateViewer = Standard_True;
555   }
556   else
557   {
558     aGraphicDriver = Handle(OpenGl_GraphicDriver)::DownCast (ViewerTest_myDrivers.Find1 (aViewNames.GetDriverName()));
559   }
560
561   //Dispose the window if input parameters are default
562   if (!ViewerTest_myViews.IsEmpty() && thePxLeft == 0 && thePxTop == 0)
563   {
564     Standard_Integer aTop = 0,
565                      aLeft = 0,
566                      aRight = 0,
567                      aBottom = 0,
568                      aScreenWidth = 0,
569                      aScreenHeight = 0;
570
571     // Get screen resolution
572 #if defined(_WIN32) || defined(__WIN32__)
573     RECT aWindowSize;
574     GetClientRect(GetDesktopWindow(), &aWindowSize);
575     aScreenHeight = aWindowSize.bottom;
576     aScreenWidth = aWindowSize.right;
577 #elif defined(__APPLE__) && !defined(MACOSX_USE_GLX)
578     GetCocoaScreenResolution (aScreenWidth, aScreenHeight);
579 #else
580     Screen *aScreen = DefaultScreenOfDisplay(GetDisplayConnection()->GetDisplay());
581     aScreenWidth = WidthOfScreen(aScreen);
582     aScreenHeight = HeightOfScreen(aScreen);
583 #endif
584
585     TCollection_AsciiString anOverlappedViewId("");
586
587     while (IsWindowOverlapped (aPxLeft, aPxTop, aPxLeft + aPxWidth, aPxTop + aPxHeight, anOverlappedViewId))
588     {
589       ViewerTest_myViews.Find1(anOverlappedViewId)->Window()->Position (aLeft, aTop, aRight, aBottom);
590
591       if (IsWindowOverlapped (aRight + 20, aPxTop, aRight + 20 + aPxWidth, aPxTop + aPxHeight, anOverlappedViewId)
592         && aRight + 2*aPxWidth + 40 > aScreenWidth)
593       {
594         if (aBottom + aPxHeight + 40 > aScreenHeight)
595         {
596           aPxLeft = 20;
597           aPxTop = 40;
598           break;
599         }
600         aPxLeft = 20;
601         aPxTop = aBottom + 40;
602       }
603       else
604         aPxLeft = aRight + 20;
605     }
606   }
607
608   // Get viewer name
609   TCollection_AsciiString aTitle("3D View - ");
610   aTitle = aTitle + aViewNames.GetViewName() + "(*)";
611
612   // Change name of current active window
613   if (!ViewerTest::CurrentView().IsNull())
614   {
615     TCollection_AsciiString aTitle("3D View - ");
616     aTitle = aTitle
617       + ViewerTest_myViews.Find2 (ViewerTest::CurrentView());
618     SetWindowTitle (ViewerTest::CurrentView()->Window(), aTitle.ToCString());
619   }
620
621   // Create viewer
622   Handle(V3d_Viewer) a3DViewer;
623   // If it's the single view, we first look for empty context
624   if (ViewerTest_myViews.IsEmpty() && !ViewerTest_myContexts.IsEmpty())
625   {
626     NCollection_DoubleMap <TCollection_AsciiString, Handle(AIS_InteractiveContext)>::Iterator
627       anIter(ViewerTest_myContexts);
628     if (anIter.More())
629       ViewerTest::SetAISContext (anIter.Value());
630     a3DViewer = ViewerTest::GetAISContext()->CurrentViewer();
631   }
632   else if (ViewerTest_myContexts.IsBound1(aViewNames.GetViewerName()))
633   {
634     ViewerTest::SetAISContext(ViewerTest_myContexts.Find1(aViewNames.GetViewerName()));
635     a3DViewer = ViewerTest::GetAISContext()->CurrentViewer();
636   }
637   else if (a3DViewer.IsNull())
638   {
639     toCreateViewer = Standard_True;
640     TCollection_ExtendedString NameOfWindow("Viewer3D");
641     a3DViewer = new V3d_Viewer(aGraphicDriver, NameOfWindow.ToExtString());
642
643     NameOfWindow = TCollection_ExtendedString("Collector");
644
645     a3DViewer->SetDefaultBackgroundColor(Quantity_NOC_BLACK);
646   }
647
648   // AIS context setup
649   if (ViewerTest::GetAISContext().IsNull() ||
650       !(ViewerTest_myContexts.IsBound1(aViewNames.GetViewerName())))
651   {
652     Handle(AIS_InteractiveContext) aContext = new AIS_InteractiveContext (a3DViewer);
653     ViewerTest::SetAISContext (aContext);
654     ViewerTest_myContexts.Bind (aViewNames.GetViewerName(), ViewerTest::GetAISContext());
655   }
656   else
657   {
658     ViewerTest::ResetEventManager();
659   }
660
661   // Create window
662 #if defined(_WIN32)
663   VT_GetWindow() = new WNT_Window (aTitle.ToCString(),
664                                     Handle(WNT_WClass)::DownCast (WClass()),
665                                     Draw_VirtualWindows ? WS_POPUPWINDOW : WS_OVERLAPPEDWINDOW,
666                                     aPxLeft, aPxTop,
667                                     aPxWidth, aPxHeight,
668                                     Quantity_NOC_BLACK);
669 #elif defined(__APPLE__) && !defined(MACOSX_USE_GLX)
670   VT_GetWindow() = new Cocoa_Window (aTitle.ToCString(),
671                                      aPxLeft, aPxTop,
672                                      aPxWidth, aPxHeight);
673   ViewerTest_SetCocoaEventManagerView (VT_GetWindow());
674 #else
675   VT_GetWindow() = new Xw_Window (aGraphicDriver->GetDisplayConnection(),
676                                   aTitle.ToCString(),
677                                   aPxLeft, aPxTop,
678                                   aPxWidth, aPxHeight);
679 #endif
680   VT_GetWindow()->SetVirtual (Draw_VirtualWindows);
681
682   // NIS setup
683   Handle(NIS_View) aView = new NIS_View (a3DViewer, VT_GetWindow());
684
685   ViewerTest::CurrentView(aView);
686   ViewerTest_myViews.Bind (aViewNames.GetViewName(), aView);
687   TheNISContext()->AttachView (aView);
688
689   // Setup for X11 or NT
690   OSWindowSetup();
691
692   // Set parameters for V3d_View and V3d_Viewer
693   const Handle (V3d_View) aV3dView = ViewerTest::CurrentView();
694   aV3dView->SetComputedMode(Standard_False);
695   MyHLRIsOn = aV3dView->ComputedMode();
696   aV3dView->SetZClippingDepth(0.5);
697   aV3dView->SetZClippingWidth(ZCLIPWIDTH/2.);
698
699   a3DViewer->SetDefaultBackgroundColor(Quantity_NOC_BLACK);
700   if (toCreateViewer)
701   {
702     a3DViewer->SetDefaultLights();
703     a3DViewer->SetLightOn();
704   }
705
706   #if !defined(_WIN32) && (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
707   #if TCL_MAJOR_VERSION  < 8
708   Tk_CreateFileHandler((void*)XConnectionNumber(GetDisplayConnection()->GetDisplay()),
709       TK_READABLE, VProcessEvents, (ClientData) VT_GetWindow()->XWindow() );
710   #else
711   Tk_CreateFileHandler(XConnectionNumber(GetDisplayConnection()->GetDisplay()),
712       TK_READABLE, VProcessEvents, (ClientData) VT_GetWindow()->XWindow() );
713   #endif
714   #endif
715
716   VT_GetWindow()->Map();
717
718   // Set the handle of created view in the event manager
719   ViewerTest::ResetEventManager();
720
721   ViewerTest::CurrentView()->Redraw();
722
723   aView.Nullify();
724   a3DViewer.Nullify();
725
726   return aViewNames.GetViewName();
727 }
728
729 //==============================================================================
730 //function : RedrawAllViews
731 //purpose  : Redraw all created views
732 //==============================================================================
733 void ViewerTest::RedrawAllViews()
734 {
735   NCollection_DoubleMap<TCollection_AsciiString, Handle(V3d_View)>::Iterator aViewIt(ViewerTest_myViews);
736   for (; aViewIt.More(); aViewIt.Next())
737   {
738     const Handle(V3d_View)& aView = aViewIt.Key2();
739     aView->Redraw();
740   }
741 }
742
743 //==============================================================================
744 //function : Vinit
745 //purpose  : Create the window viewer and initialize all the global variable
746 //    Use Tk_CreateFileHandler on UNIX to catch the X11 Viewer event
747 //==============================================================================
748
749 static int VInit (Draw_Interpretor& theDi, Standard_Integer theArgsNb, const char** theArgVec)
750 {
751   if (theArgsNb > 9)
752   {
753     std::cerr << theArgVec[0] << ": incorrect number of command arguments.\n"
754               << "Type help for more information.\n";
755     return 1;
756   }
757
758   TCollection_AsciiString aViewName, aDisplayName;
759   Standard_Integer aPxLeft = 0, aPxTop = 0, aPxWidth = 0, aPxHeight = 0;
760   TCollection_AsciiString aName, aValue;
761   for (Standard_Integer anArgIt = 1; anArgIt < theArgsNb; ++anArgIt)
762   {
763     const TCollection_AsciiString anArg = theArgVec[anArgIt];
764     TCollection_AsciiString anArgCase = anArg;
765     anArgCase.UpperCase();
766     if (ViewerTest::SplitParameter (anArg, aName, aValue))
767     {
768       aName.UpperCase();
769       if (aName.IsEqual ("NAME"))
770       {
771         aViewName = aValue;
772       }
773       else if (aName.IsEqual ("L")
774             || aName.IsEqual ("LEFT"))
775       {
776         aPxLeft = aValue.IntegerValue();
777       }
778       else if (aName.IsEqual ("T")
779             || aName.IsEqual ("TOP"))
780       {
781         aPxTop = aValue.IntegerValue();
782       }
783     #if !defined(_WIN32) && (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
784       else if (aName.IsEqual ("DISP")
785             || aName.IsEqual ("DISPLAY"))
786       {
787         aDisplayName = aValue;
788       }
789     #endif
790       else if (aName.IsEqual ("W")
791             || aName.IsEqual ("WIDTH"))
792       {
793         aPxWidth = aValue.IntegerValue();
794       }
795       else if (aName.IsEqual ("H")
796             || aName.IsEqual ("HEIGHT"))
797       {
798         aPxHeight = aValue.IntegerValue();
799       }
800       else
801       {
802         std::cerr << theArgVec[0] << ": Warning: unknown argument " << anArg << ".\n";
803       }
804     }
805     else if (aViewName.IsEmpty())
806     {
807       aViewName = anArg;
808     }
809     else
810     {
811       std::cerr << theArgVec[0] << ": Warning: unknown argument " << anArg << ".\n";
812     }
813   }
814
815   ViewerTest_Names aViewNames (aViewName);
816   if (ViewerTest_myViews.IsBound1 (aViewNames.GetViewName()))
817   {
818     TCollection_AsciiString aCommand = TCollection_AsciiString ("vactivate ") + aViewNames.GetViewName();
819     theDi.Eval (aCommand.ToCString());
820     return 0;
821   }
822
823   TCollection_AsciiString aViewId = ViewerTest::ViewerInit (aPxLeft, aPxTop, aPxWidth, aPxHeight,
824                                                             aViewName.ToCString(),
825                                                             aDisplayName.ToCString());
826   theDi << aViewId;
827   return 0;
828 }
829
830 //==============================================================================
831 //function : VHLR
832 //purpose  : hidden lines removal algorithm
833 //draw args: vhlr is_enabled={on|off} [show_hidden={1|0}]
834 //==============================================================================
835
836 static int VHLR (Draw_Interpretor& di, Standard_Integer argc, const char** argv)
837 {
838   if (ViewerTest::CurrentView().IsNull())
839   {
840     di << argv[0] << ": Call vinit before this command, please.\n";
841     return 1;
842   }
843
844   if (argc < 2)
845   {
846     di << argv[0] << ": Wrong number of command arguments.\n"
847       << "Type help " << argv[0] << " for more information.\n";
848     return 1;
849   }
850
851   // Enable or disable HLR mode.
852   Standard_Boolean isHLROn =
853     (!strcasecmp (argv[1], "on")) ? Standard_True : Standard_False;
854
855   if (isHLROn != MyHLRIsOn)
856   {
857     MyHLRIsOn = isHLROn;
858     ViewerTest::CurrentView()->SetComputedMode (MyHLRIsOn);
859   }
860
861   // Show or hide hidden lines in HLR mode.
862   Standard_Boolean isCurrentShowHidden
863     = ViewerTest::GetAISContext()->DefaultDrawer()->DrawHiddenLine();
864
865   Standard_Boolean isShowHidden =
866     (argc == 3) ? (atoi(argv[2]) == 1 ? Standard_True : Standard_False)
867                 : isCurrentShowHidden;
868
869
870   if (isShowHidden != isCurrentShowHidden)
871   {
872     if (isShowHidden)
873     {
874       ViewerTest::GetAISContext()->DefaultDrawer()->EnableDrawHiddenLine();
875     }
876     else
877     {
878       ViewerTest::GetAISContext()->DefaultDrawer()->DisableDrawHiddenLine();
879     }
880
881     // Redisplay shapes.
882     if (MyHLRIsOn)
883     {
884       AIS_ListOfInteractive aListOfShapes;
885       ViewerTest::GetAISContext()->DisplayedObjects (aListOfShapes);
886
887       for (AIS_ListIteratorOfListOfInteractive anIter(aListOfShapes); anIter.More(); anIter.Next())
888       {
889         Handle(AIS_Shape) aShape = Handle(AIS_Shape)::DownCast (anIter.Value());
890         if (aShape.IsNull())
891         {
892           continue;
893         }
894         aShape->Redisplay();
895       }
896     }
897   }
898
899   ViewerTest::CurrentView()->Update();
900   return 0;
901 }
902
903 //==============================================================================
904 //function : VHLRType
905 //purpose  : change type of using HLR algorithm
906 //==============================================================================
907
908 static int VHLRType (Draw_Interpretor& di, Standard_Integer argc, const char** argv)
909 {
910   if (ViewerTest::CurrentView().IsNull())
911   {
912     di << argv[0] << ": Call vinit before this command, please.\n";
913     return 1;
914   }
915
916   if (argc < 2)
917   {
918     di << argv[0] << ": Wrong number of command arguments.\n"
919       << "Type help " << argv[0] << " for more information.\n";
920     return 1;
921   }
922
923   Prs3d_TypeOfHLR aTypeOfHLR =
924     (!strcasecmp (argv[1], "algo")) ? Prs3d_TOH_Algo : Prs3d_TOH_PolyAlgo;
925
926   if (argc == 2)
927   {
928     AIS_ListOfInteractive aListOfShapes;
929     ViewerTest::GetAISContext()->DisplayedObjects (aListOfShapes);
930     ViewerTest::GetAISContext()->DefaultDrawer()->SetTypeOfHLR(aTypeOfHLR);
931     for (AIS_ListIteratorOfListOfInteractive anIter(aListOfShapes);
932       anIter.More(); anIter.Next())
933     {
934       Handle(AIS_Shape) aShape = Handle(AIS_Shape)::DownCast(anIter.Value());
935       if (aShape.IsNull())
936         continue;
937       if (aShape->TypeOfHLR() != aTypeOfHLR)
938         aShape->SetTypeOfHLR (aTypeOfHLR);
939       if (MyHLRIsOn)
940         aShape->Redisplay();
941     }
942     ViewerTest::CurrentView()->Update();
943     return 0;
944   }
945   else
946   {
947     for (Standard_Integer i = 2; i < argc; ++i)
948     {
949       ViewerTest_DoubleMapOfInteractiveAndName& aMap = GetMapOfAIS();
950       TCollection_AsciiString aName (argv[i]);
951
952       if (!aMap.IsBound2 (aName))
953       {
954         di << argv[0] << ":" << " Wrong shape name:" << aName.ToCString() << ".\n";
955         continue;
956       }
957       Handle(AIS_Shape) anAISObject =
958         Handle(AIS_Shape)::DownCast (aMap.Find2(aName));
959       if (anAISObject.IsNull())
960         continue;
961       anAISObject->SetTypeOfHLR (aTypeOfHLR);
962       if (MyHLRIsOn)
963         anAISObject->Redisplay();
964     }
965     ViewerTest::CurrentView()->Update();
966   }
967
968   return 0;
969 }
970
971 //==============================================================================
972 //function : FindViewIdByWindowHandle
973 //purpose  : Find theView Id in the map of views by window handle
974 //==============================================================================
975 #if defined(_WIN32) || defined(__WIN32__) || (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
976 TCollection_AsciiString FindViewIdByWindowHandle(const Aspect_Handle theWindowHandle)
977 {
978   for (NCollection_DoubleMap<TCollection_AsciiString, Handle(V3d_View)>::Iterator
979        anIter(ViewerTest_myViews); anIter.More(); anIter.Next())
980   {
981     Aspect_Handle aWindowHandle = GetWindowHandle(anIter.Value()->Window());
982     if (aWindowHandle == theWindowHandle)
983       return anIter.Key1();
984   }
985   return TCollection_AsciiString("");
986 }
987 #endif
988
989 //==============================================================================
990 //function : ActivateView
991 //purpose  : Make the view active
992 //==============================================================================
993
994 void ActivateView (const TCollection_AsciiString& theViewName)
995 {
996   const Handle(V3d_View) aView = ViewerTest_myViews.Find1(theViewName);
997   if (!aView.IsNull())
998   {
999     Handle(AIS_InteractiveContext) anAISContext = FindContextByView(aView);
1000     if (!anAISContext.IsNull())
1001     {
1002       if (!ViewerTest::CurrentView().IsNull())
1003       {
1004         TCollection_AsciiString aTitle("3D View - ");
1005         aTitle = aTitle + ViewerTest_myViews.Find2 (ViewerTest::CurrentView());
1006         SetWindowTitle (ViewerTest::CurrentView()->Window(), aTitle.ToCString());
1007       }
1008
1009       ViewerTest::CurrentView (aView);
1010       // Update degenerate mode
1011       MyHLRIsOn = ViewerTest::CurrentView()->ComputedMode();
1012       ViewerTest::SetAISContext (anAISContext);
1013       TCollection_AsciiString aTitle = TCollection_AsciiString("3D View - ");
1014       aTitle = aTitle + theViewName + "(*)";
1015       SetWindowTitle (ViewerTest::CurrentView()->Window(), aTitle.ToCString());
1016 #if defined(_WIN32) || defined(__WIN32__)
1017       VT_GetWindow() = Handle(WNT_Window)::DownCast(ViewerTest::CurrentView()->Window());
1018 #elif defined(__APPLE__) && !defined(MACOSX_USE_GLX)
1019       VT_GetWindow() = Handle(Cocoa_Window)::DownCast(ViewerTest::CurrentView()->Window());
1020 #else
1021       VT_GetWindow() = Handle(Xw_Window)::DownCast(ViewerTest::CurrentView()->Window());
1022 #endif
1023       SetDisplayConnection(ViewerTest::CurrentView()->Viewer()->Driver()->GetDisplayConnection());
1024       ViewerTest::CurrentView()->Redraw();
1025     }
1026   }
1027 }
1028
1029 //==============================================================================
1030 //function : RemoveView
1031 //purpose  :
1032 //==============================================================================
1033 void ViewerTest::RemoveView (const Handle(V3d_View)& theView,
1034                              const Standard_Boolean  theToRemoveContext)
1035 {
1036   if (!ViewerTest_myViews.IsBound2 (theView))
1037   {
1038     return;
1039   }
1040
1041   const TCollection_AsciiString aViewName = ViewerTest_myViews.Find2 (theView);
1042   RemoveView (aViewName, theToRemoveContext);
1043 }
1044
1045 //==============================================================================
1046 //function : RemoveView
1047 //purpose  : Close and remove view from display, clear maps if neccessary
1048 //==============================================================================
1049 void ViewerTest::RemoveView (const TCollection_AsciiString& theViewName, const Standard_Boolean isContextRemoved)
1050 {
1051   if (!ViewerTest_myViews.IsBound1(theViewName))
1052   {
1053     cout << "Wrong view name\n";
1054     return;
1055   }
1056
1057   // Activate another view if it's active now
1058   if (ViewerTest_myViews.Find1(theViewName) == ViewerTest::CurrentView())
1059   {
1060     if (ViewerTest_myViews.Extent() > 1)
1061     {
1062       TCollection_AsciiString aNewViewName;
1063       for (NCollection_DoubleMap <TCollection_AsciiString, Handle(V3d_View)> :: Iterator
1064            anIter(ViewerTest_myViews); anIter.More(); anIter.Next())
1065         if (anIter.Key1() != theViewName)
1066         {
1067           aNewViewName = anIter.Key1();
1068           break;
1069         }
1070         ActivateView (aNewViewName);
1071     }
1072     else
1073     {
1074       Handle(V3d_View) anEmptyView;
1075 #if defined(_WIN32) || defined(__WIN32__)
1076       Handle(WNT_Window) anEmptyWindow;
1077 #elif defined(__APPLE__) && !defined(MACOSX_USE_GLX)
1078       Handle(Cocoa_Window) anEmptyWindow;
1079 #else
1080       Handle(Xw_Window) anEmptyWindow;
1081 #endif
1082       VT_GetWindow() = anEmptyWindow;
1083       ViewerTest::CurrentView (anEmptyView);
1084       if (isContextRemoved)
1085       {
1086         Handle(AIS_InteractiveContext) anEmptyContext;
1087         ViewerTest::SetAISContext(anEmptyContext);
1088       }
1089     }
1090   }
1091
1092   // Delete view
1093   Handle(V3d_View) aView = ViewerTest_myViews.Find1(theViewName);
1094   Handle(AIS_InteractiveContext) aCurrentContext = FindContextByView(aView);
1095
1096   // Remove view resources
1097   TheNISContext()->DetachView(Handle(NIS_View)::DownCast(aView));
1098   ViewerTest_myViews.UnBind1(theViewName);
1099   aView->Remove();
1100
1101 #if !defined(_WIN32) && !defined(__WIN32__) && (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
1102   XFlush (GetDisplayConnection()->GetDisplay());
1103 #endif
1104
1105   // Keep context opened only if the closed view is last to avoid
1106   // unused empty contexts
1107   if (!aCurrentContext.IsNull())
1108   {
1109     // Check if there are more difined views in the viewer
1110     aCurrentContext->CurrentViewer()->InitDefinedViews();
1111     if ((isContextRemoved || ViewerTest_myContexts.Size() != 1) && !aCurrentContext->CurrentViewer()->MoreDefinedViews())
1112     {
1113       // Remove driver if there is no viewers that use it
1114       Standard_Boolean isRemoveDriver = Standard_True;
1115       for(NCollection_DoubleMap<TCollection_AsciiString, Handle(AIS_InteractiveContext)>::Iterator
1116           anIter(ViewerTest_myContexts); anIter.More(); anIter.Next())
1117       {
1118         if (aCurrentContext != anIter.Key2() &&
1119           aCurrentContext->CurrentViewer()->Driver() == anIter.Value()->CurrentViewer()->Driver())
1120         {
1121           isRemoveDriver = Standard_False;
1122           break;
1123         }
1124       }
1125       if(isRemoveDriver)
1126       {
1127         ViewerTest_myDrivers.UnBind2 (aCurrentContext->CurrentViewer()->Driver());
1128       #if !defined(_WIN32) && !defined(__WIN32__) && (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
1129         #if TCL_MAJOR_VERSION  < 8
1130         Tk_DeleteFileHandler((void*)XConnectionNumber(aCurrentContext->CurrentViewer()->Driver()->GetDisplayConnection()->GetDisplay()));
1131         #else
1132         Tk_DeleteFileHandler(XConnectionNumber(aCurrentContext->CurrentViewer()->Driver()->GetDisplayConnection()->GetDisplay()));
1133         #endif
1134       #endif
1135       }
1136
1137       ViewerTest_myContexts.UnBind2(aCurrentContext);
1138     }
1139   }
1140   cout << "3D View - " << theViewName << " was deleted.\n";
1141
1142 }
1143
1144 //==============================================================================
1145 //function : VClose
1146 //purpose  : Remove the view defined by its name
1147 //==============================================================================
1148
1149 static int VClose (Draw_Interpretor& /*theDi*/,
1150                    Standard_Integer  theArgsNb,
1151                    const char**      theArgVec)
1152 {
1153   NCollection_List<TCollection_AsciiString> aViewList;
1154   if (theArgsNb > 1)
1155   {
1156     TCollection_AsciiString anArg (theArgVec[1]);
1157     anArg.UpperCase();
1158     if (anArg.IsEqual ("ALL")
1159      || anArg.IsEqual ("*"))
1160     {
1161       for (NCollection_DoubleMap<TCollection_AsciiString, Handle(V3d_View)>::Iterator anIter (ViewerTest_myViews);
1162            anIter.More(); anIter.Next())
1163       {
1164         aViewList.Append (anIter.Key1());
1165       }
1166       if (aViewList.IsEmpty())
1167       {
1168         std::cout << "No view to close\n";
1169         return 0;
1170       }
1171     }
1172     else
1173     {
1174       ViewerTest_Names aViewName (theArgVec[1]);
1175       if (!ViewerTest_myViews.IsBound1 (aViewName.GetViewName()))
1176       {
1177         std::cerr << "The view with name '" << theArgVec[1] << "' does not exist\n";
1178         return 1;
1179       }
1180       aViewList.Append (aViewName.GetViewName());
1181     }
1182   }
1183   else
1184   {
1185     // close active view
1186     if (ViewerTest::CurrentView().IsNull())
1187     {
1188       std::cerr << "No active view!\n";
1189       return 1;
1190     }
1191     aViewList.Append (ViewerTest_myViews.Find2 (ViewerTest::CurrentView()));
1192   }
1193
1194   Standard_Boolean toRemoveContext = (theArgsNb != 3 || Draw::Atoi (theArgVec[2]) != 1);
1195   for (NCollection_List<TCollection_AsciiString>::Iterator anIter(aViewList);
1196        anIter.More(); anIter.Next())
1197   {
1198     ViewerTest::RemoveView (anIter.Value(), toRemoveContext);
1199   }
1200
1201   return 0;
1202 }
1203
1204 //==============================================================================
1205 //function : VActivate
1206 //purpose  : Activate the view defined by its ID
1207 //==============================================================================
1208
1209 static int VActivate (Draw_Interpretor& theDi, Standard_Integer theArgsNb, const char** theArgVec)
1210 {
1211   if (theArgsNb > 2)
1212   {
1213     theDi << theArgVec[0] << ": wrong number of command arguments.\n"
1214     << "Usage: " << theArgVec[0] << " ViewID\n";
1215     return 1;
1216   }
1217   if(theArgsNb == 1)
1218   {
1219     theDi.Eval("vviewlist");
1220     return 0;
1221   }
1222
1223   TCollection_AsciiString aNameString(theArgVec[1]);
1224   if ( strcasecmp( aNameString.ToCString(), "NONE" ) == 0 )
1225   {
1226     TCollection_AsciiString aTitle("3D View - ");
1227     aTitle = aTitle + ViewerTest_myViews.Find2(ViewerTest::CurrentView());
1228     SetWindowTitle (ViewerTest::CurrentView()->Window(), aTitle.ToCString());
1229     Handle(V3d_View) anEmptyView;
1230 #if defined(_WIN32) || defined(__WIN32__)
1231     Handle(WNT_Window) anEmptyWindow;
1232 #elif defined(__APPLE__) && !defined(MACOSX_USE_GLX)
1233     Handle(Cocoa_Window) anEmptyWindow;
1234 #else
1235     Handle(Xw_Window) anEmptyWindow;
1236 #endif
1237     VT_GetWindow() = anEmptyWindow;
1238     ViewerTest::CurrentView (anEmptyView);
1239     ViewerTest::ResetEventManager();
1240     theDi << theArgVec[0] << ": all views are inactive\n";
1241     return 0;
1242   }
1243
1244   ViewerTest_Names aViewNames(aNameString);
1245
1246   // Check if this view exists in the viewer with the driver
1247   if (!ViewerTest_myViews.IsBound1(aViewNames.GetViewName()))
1248   {
1249     theDi << "Wrong view name\n";
1250     return 1;
1251   }
1252
1253   // Check if it is active already
1254   if (ViewerTest::CurrentView() == ViewerTest_myViews.Find1(aViewNames.GetViewName()))
1255   {
1256     theDi << theArgVec[0] << ": the view is active already\n";
1257     return 0;
1258   }
1259
1260   ActivateView (aViewNames.GetViewName());
1261   return 0;
1262 }
1263
1264 //==============================================================================
1265 //function : VViewList
1266 //purpose  : Print current list of views per viewer and graphic driver ID
1267 //           shared between viewers
1268 //==============================================================================
1269
1270 static int VViewList (Draw_Interpretor& theDi, Standard_Integer theArgsNb, const char** theArgVec)
1271 {
1272   if (theArgsNb > 2)
1273   {
1274     theDi << theArgVec[0] << ": Wrong number of command arguments\n"
1275           << "Usage: " << theArgVec[0] << " name";
1276     return 1;
1277   }
1278   if (ViewerTest_myContexts.Size() < 1)
1279     return 0;
1280
1281   Standard_Boolean isTreeView =
1282     (( theArgsNb==1 ) || ( strcasecmp( theArgVec[1], "long" ) != 0 ));
1283
1284   if (isTreeView)
1285     theDi << theArgVec[0] <<":\n";
1286
1287     for (NCollection_DoubleMap <TCollection_AsciiString, Handle(Graphic3d_GraphicDriver)>::Iterator
1288       aDriverIter(ViewerTest_myDrivers); aDriverIter.More(); aDriverIter.Next())
1289     {
1290       if (isTreeView)
1291         theDi << aDriverIter.Key1() << ":\n";
1292
1293       for (NCollection_DoubleMap <TCollection_AsciiString, Handle(AIS_InteractiveContext)>::Iterator
1294         aContextIter(ViewerTest_myContexts); aContextIter.More(); aContextIter.Next())
1295       {
1296         if (aContextIter.Key1().Search(aDriverIter.Key1()) != -1)
1297         {
1298           if (isTreeView)
1299           {
1300             TCollection_AsciiString aContextName(aContextIter.Key1());
1301             theDi << " " << aContextName.Split(aDriverIter.Key1().Length() + 1) << ":" << "\n";
1302           }
1303
1304           for (NCollection_DoubleMap <TCollection_AsciiString, Handle(V3d_View)>::Iterator
1305             aViewIter(ViewerTest_myViews); aViewIter.More(); aViewIter.Next())
1306           {
1307             if (aViewIter.Key1().Search(aContextIter.Key1()) != -1)
1308             {
1309               TCollection_AsciiString aViewName(aViewIter.Key1());
1310               if (isTreeView)
1311               {
1312                 if (aViewIter.Value() == ViewerTest::CurrentView())
1313                   theDi << "  " << aViewName.Split(aContextIter.Key1().Length() + 1) << "(*)" << "\n";
1314                 else
1315                   theDi << "  " << aViewName.Split(aContextIter.Key1().Length() + 1) << "\n";
1316               }
1317               else
1318               {
1319                 theDi << aViewName << " ";
1320               }
1321             }
1322           }
1323         }
1324       }
1325     }
1326   return 0;
1327 }
1328
1329 //==============================================================================
1330 //function : VT_ProcessKeyPress
1331 //purpose  : Handle KeyPress event from a CString
1332 //==============================================================================
1333 void VT_ProcessKeyPress (const char* buf_ret)
1334 {
1335   //cout << "KeyPress" << endl;
1336   const Handle(V3d_View) aView = ViewerTest::CurrentView();
1337   const Handle(NIS_View) aNisView = Handle(NIS_View)::DownCast (aView);
1338   // Letter in alphabetic order
1339
1340   if (!strcasecmp (buf_ret, "A"))
1341   {
1342     // AXO
1343     aView->SetProj(V3d_XposYnegZpos);
1344   }
1345   else if (!strcasecmp (buf_ret, "D"))
1346   {
1347     // Reset
1348     aView->Reset();
1349   }
1350   else if (!strcasecmp (buf_ret, "F"))
1351   {
1352     // FitAll
1353     if (aNisView.IsNull())
1354       aView->FitAll();
1355     else
1356       aNisView->FitAll3d();
1357   }
1358   else if (!strcasecmp (buf_ret, "H"))
1359   {
1360     // HLR
1361     cout << "HLR" << endl;
1362     aView->SetComputedMode (!aView->ComputedMode());
1363     MyHLRIsOn = aView->ComputedMode();
1364   }
1365   else if (!strcasecmp (buf_ret, "P"))
1366   {
1367     // Type of HLR
1368     Handle(AIS_InteractiveContext) aContext = ViewerTest::GetAISContext();
1369     if (aContext->DefaultDrawer()->TypeOfHLR() == Prs3d_TOH_Algo)
1370       aContext->DefaultDrawer()->SetTypeOfHLR(Prs3d_TOH_PolyAlgo);
1371     else
1372       aContext->DefaultDrawer()->SetTypeOfHLR(Prs3d_TOH_Algo);
1373     if (aContext->NbCurrents()==0 || aContext->NbSelected() == 0)
1374     {
1375       AIS_ListOfInteractive aListOfShapes;
1376       aContext->DisplayedObjects(aListOfShapes);
1377       for (AIS_ListIteratorOfListOfInteractive anIter(aListOfShapes);
1378         anIter.More(); anIter.Next())
1379       {
1380         Handle(AIS_Shape) aShape = Handle(AIS_Shape)::DownCast(anIter.Value());
1381         if (aShape.IsNull())
1382           continue;
1383         if (aShape->TypeOfHLR() == Prs3d_TOH_PolyAlgo)
1384           aShape->SetTypeOfHLR (Prs3d_TOH_Algo);
1385         else
1386           aShape->SetTypeOfHLR (Prs3d_TOH_PolyAlgo);
1387         aShape->Redisplay();
1388       }
1389     }
1390     else
1391     {
1392       for (aContext->InitCurrent();aContext->MoreCurrent();aContext->NextCurrent())
1393       {
1394         Handle(AIS_Shape) aShape = Handle(AIS_Shape)::DownCast(aContext->Current());
1395         if (aShape.IsNull())
1396           continue;
1397         if(aShape->TypeOfHLR() == Prs3d_TOH_PolyAlgo)
1398           aShape->SetTypeOfHLR (Prs3d_TOH_Algo);
1399         else
1400           aShape->SetTypeOfHLR (Prs3d_TOH_PolyAlgo);
1401         aShape->Redisplay();
1402       }
1403     }
1404
1405     aContext->UpdateCurrentViewer();
1406
1407   }
1408   else if (!strcasecmp (buf_ret, "S"))
1409   {
1410     std::cout << "setup Shaded display mode" << std::endl;
1411
1412     Handle(AIS_InteractiveContext) Ctx = ViewerTest::GetAISContext();
1413     if(Ctx->NbCurrents()==0 ||
1414       Ctx->NbSelected()==0)
1415       Ctx->SetDisplayMode(AIS_Shaded);
1416     else{
1417       if(Ctx->HasOpenedContext()){
1418         for(Ctx->InitSelected();Ctx->MoreSelected();Ctx->NextSelected())
1419           Ctx->SetDisplayMode(Ctx->Interactive(),1,Standard_False);
1420       }
1421       else{
1422         for(Ctx->InitCurrent();Ctx->MoreCurrent();Ctx->NextCurrent())
1423           Ctx->SetDisplayMode(Ctx->Current(),1,Standard_False);
1424       }
1425       Ctx->UpdateCurrentViewer();
1426     }
1427   }
1428   else if (!strcasecmp (buf_ret, "U"))
1429   {
1430     // Unset display mode
1431     std::cout << "reset display mode to defaults" << std::endl;
1432
1433     Handle(AIS_InteractiveContext) Ctx = ViewerTest::GetAISContext();
1434     if(Ctx->NbCurrents()==0 ||
1435       Ctx->NbSelected()==0)
1436       Ctx->SetDisplayMode(AIS_WireFrame);
1437     else{
1438       if(Ctx->HasOpenedContext()){
1439         for(Ctx->InitSelected();Ctx->MoreSelected();Ctx->NextSelected())
1440           Ctx->UnsetDisplayMode(Ctx->Interactive(),Standard_False);
1441       }
1442       else{
1443         for(Ctx->InitCurrent();Ctx->MoreCurrent();Ctx->NextCurrent())
1444           Ctx->UnsetDisplayMode(Ctx->Current(),Standard_False);
1445       }
1446       Ctx->UpdateCurrentViewer();
1447     }
1448
1449   }
1450   else if (!strcasecmp (buf_ret, "T"))
1451   {
1452     // Top
1453     aView->SetProj(V3d_Zpos);
1454   }
1455   else if (!strcasecmp (buf_ret, "B"))
1456   {
1457     // Bottom
1458     aView->SetProj(V3d_Zneg);
1459   }
1460   else if (!strcasecmp (buf_ret, "L"))
1461   {
1462     // Left
1463     aView->SetProj(V3d_Xneg);
1464   }
1465   else if (!strcasecmp (buf_ret, "R"))
1466   {
1467     // Right
1468     aView->SetProj(V3d_Xpos);
1469   }
1470   else if (!strcasecmp (buf_ret, "W"))
1471   {
1472     std::cout << "setup WireFrame display mode" << std::endl;
1473     Handle(AIS_InteractiveContext) Ctx = ViewerTest::GetAISContext();
1474     if(Ctx->NbCurrents()==0 ||
1475       Ctx->NbSelected()==0)
1476       Ctx->SetDisplayMode(AIS_WireFrame);
1477     else{
1478       if(Ctx->HasOpenedContext()){
1479         for(Ctx->InitSelected();Ctx->MoreSelected();Ctx->NextSelected())
1480           Ctx->SetDisplayMode(Ctx->Interactive(),0,Standard_False);
1481       }
1482       else{
1483         for(Ctx->InitCurrent();Ctx->MoreCurrent();Ctx->NextCurrent())
1484           Ctx->SetDisplayMode(Ctx->Current(),0,Standard_False);
1485       }
1486       Ctx->UpdateCurrentViewer();
1487     }
1488   }
1489   else if (!strcasecmp (buf_ret, "Z"))
1490   {
1491     // ZCLIP
1492     if ( ZClipIsOn ) {
1493       cout << "ZClipping OFF" << endl;
1494       ZClipIsOn = 0;
1495
1496       aView->SetZClippingType(V3d_OFF);
1497       aView->Redraw();
1498     }
1499     else {
1500       cout << "ZClipping ON" << endl;
1501       ZClipIsOn = 1;
1502
1503       aView->SetZClippingType(V3d_FRONT);
1504       aView->Redraw();
1505     }
1506   }
1507   else if (!strcasecmp (buf_ret, ","))
1508   {
1509     ViewerTest::GetAISContext()->HilightNextDetected(ViewerTest::CurrentView());
1510   }
1511   else if (!strcasecmp (buf_ret, "."))
1512   {
1513     ViewerTest::GetAISContext()->HilightPreviousDetected(ViewerTest::CurrentView());
1514   }
1515   else if (*buf_ret == THE_KEY_DELETE)
1516   {
1517     Handle(AIS_InteractiveContext) aCtx = ViewerTest::GetAISContext();
1518     if (!aCtx.IsNull()
1519      && aCtx->NbCurrents() > 0
1520      && aCtx->NbSelected() > 0)
1521     {
1522       Draw_Interprete ("verase");
1523     }
1524   }
1525   else
1526   {
1527     // Number
1528     Standard_Integer Num = Draw::Atoi(buf_ret);
1529     if(Num>=0 && Num<=7)
1530       ViewerTest::StandardModeActivation(Num);
1531   }
1532 }
1533
1534 //==============================================================================
1535 //function : VT_ProcessExpose
1536 //purpose  : Redraw the View on an Expose Event
1537 //==============================================================================
1538 void VT_ProcessExpose()
1539 {
1540   Handle(V3d_View) aView3d = ViewerTest::CurrentView();
1541   if (!aView3d.IsNull())
1542   {
1543     aView3d->Redraw();
1544   }
1545 }
1546
1547 //==============================================================================
1548 //function : VT_ProcessConfigure
1549 //purpose  : Resize the View on an Configure Event
1550 //==============================================================================
1551 void VT_ProcessConfigure()
1552 {
1553   Handle(V3d_View) aView3d = ViewerTest::CurrentView();
1554   if (aView3d.IsNull())
1555   {
1556     return;
1557   }
1558
1559   aView3d->MustBeResized();
1560   aView3d->Update();
1561   aView3d->Redraw();
1562 }
1563
1564 //==============================================================================
1565 //function : VT_ProcessButton1Press
1566 //purpose  : Picking
1567 //==============================================================================
1568 Standard_Boolean VT_ProcessButton1Press (Standard_Integer ,
1569                                          const char**     theArgVec,
1570                                          Standard_Boolean theToPick,
1571                                          Standard_Boolean theIsShift)
1572 {
1573   if (theToPick)
1574   {
1575     Standard_Real X, Y, Z;
1576     ViewerTest::CurrentView()->Convert (X_Motion, Y_Motion, X, Y, Z);
1577
1578     Draw::Set (theArgVec[1], X);
1579     Draw::Set (theArgVec[2], Y);
1580     Draw::Set (theArgVec[3], Z);
1581   }
1582
1583   if (theIsShift)
1584   {
1585     ViewerTest::CurrentEventManager()->ShiftSelect();
1586   }
1587   else
1588   {
1589     ViewerTest::CurrentEventManager()->Select();
1590   }
1591
1592   return Standard_False;
1593 }
1594
1595 //==============================================================================
1596 //function : VT_ProcessButton1Release
1597 //purpose  : End selecting
1598 //==============================================================================
1599 void VT_ProcessButton1Release (Standard_Boolean theIsShift)
1600 {
1601   if (IsDragged)
1602   {
1603     IsDragged = Standard_False;
1604     Handle(ViewerTest_EventManager) EM = ViewerTest::CurrentEventManager();
1605     if (theIsShift)
1606     {
1607       EM->ShiftSelect (Min (X_ButtonPress, X_Motion), Max (Y_ButtonPress, Y_Motion),
1608                        Max (X_ButtonPress, X_Motion), Min (Y_ButtonPress, Y_Motion));
1609     }
1610     else
1611     {
1612       EM->Select (Min (X_ButtonPress, X_Motion), Max (Y_ButtonPress, Y_Motion),
1613                   Max (X_ButtonPress, X_Motion), Min (Y_ButtonPress, Y_Motion));
1614     }
1615   }
1616 }
1617
1618 //==============================================================================
1619 //function : VT_ProcessButton3Press
1620 //purpose  : Start Rotation
1621 //==============================================================================
1622 void VT_ProcessButton3Press()
1623 {
1624   Start_Rot = 1;
1625   if (MyHLRIsOn)
1626   {
1627     ViewerTest::CurrentView()->SetComputedMode (Standard_False);
1628   }
1629   ViewerTest::CurrentView()->StartRotation( X_ButtonPress, Y_ButtonPress );
1630 }
1631
1632 //==============================================================================
1633 //function : VT_ProcessButton3Release
1634 //purpose  : End rotation
1635 //==============================================================================
1636 void VT_ProcessButton3Release()
1637 {
1638   if (Start_Rot)
1639   {
1640     Start_Rot = 0;
1641     if (MyHLRIsOn)
1642     {
1643       ViewerTest::CurrentView()->SetComputedMode (Standard_True);
1644     }
1645   }
1646 }
1647
1648 //==============================================================================
1649 //function : ProcessZClipMotion
1650 //purpose  : Zoom
1651 //==============================================================================
1652
1653 void ProcessZClipMotion()
1654 {
1655   Handle(V3d_View)  a3DView = ViewerTest::CurrentView();
1656   if ( Abs(X_Motion - X_ButtonPress) > 2 ) {
1657     static Standard_Real CurZPos = 0.;
1658
1659     //Quantity_Length VDX, VDY;
1660     //a3DView->Size(VDX,VDY);
1661     //Standard_Real VDZ = a3DView->ZSize();
1662     //printf("View size (%lf,%lf,%lf)\n", VDX, VDY, VDZ);
1663
1664     Quantity_Length dx = a3DView->Convert(X_Motion - X_ButtonPress);
1665
1666     // Front = Depth + width/2.
1667     Standard_Real D = 0.5;
1668     Standard_Real W = 0.1;
1669
1670     CurZPos += (dx);
1671
1672     D += CurZPos;
1673
1674     //printf("dx %lf Depth %lf Width %lf\n", dx, D, W);
1675
1676     a3DView->SetZClippingType(V3d_OFF);
1677     a3DView->SetZClippingDepth(D);
1678     a3DView->SetZClippingWidth(W);
1679     a3DView->SetZClippingType(V3d_FRONT);
1680
1681     a3DView->Redraw();
1682
1683     X_ButtonPress = X_Motion;
1684     Y_ButtonPress = Y_Motion;
1685   }
1686 }
1687
1688 //==============================================================================
1689 //function : ProcessControlButton1Motion
1690 //purpose  : Zoom
1691 //==============================================================================
1692
1693 #if defined(_WIN32) || ! defined(__APPLE__) || defined(MACOSX_USE_GLX)
1694 static void ProcessControlButton1Motion()
1695 {
1696   ViewerTest::CurrentView()->Zoom( X_ButtonPress, Y_ButtonPress, X_Motion, Y_Motion);
1697
1698   X_ButtonPress = X_Motion;
1699   Y_ButtonPress = Y_Motion;
1700 }
1701 #endif
1702
1703 //==============================================================================
1704 //function : VT_ProcessControlButton2Motion
1705 //purpose  : Panning
1706 //==============================================================================
1707 void VT_ProcessControlButton2Motion()
1708 {
1709   Standard_Integer aDx = X_Motion - X_ButtonPress;
1710   Standard_Integer aDy = Y_Motion - Y_ButtonPress;
1711
1712   aDy = -aDy; // Xwindow Y axis is from top to Bottom
1713
1714   ViewerTest::CurrentView()->Pan (aDx, aDy);
1715
1716   X_ButtonPress = X_Motion;
1717   Y_ButtonPress = Y_Motion;
1718 }
1719
1720 //==============================================================================
1721 //function : VT_ProcessControlButton3Motion
1722 //purpose  : Rotation
1723 //==============================================================================
1724 void VT_ProcessControlButton3Motion()
1725 {
1726   if (Start_Rot)
1727   {
1728     ViewerTest::CurrentView()->Rotation (X_Motion, Y_Motion);
1729   }
1730 }
1731
1732 //==============================================================================
1733 //function : VT_ProcessMotion
1734 //purpose  :
1735 //==============================================================================
1736 void VT_ProcessMotion()
1737 {
1738   //pre-hilights detected objects at mouse position
1739
1740   Handle(ViewerTest_EventManager) EM = ViewerTest::CurrentEventManager();
1741   EM->MoveTo(X_Motion, Y_Motion);
1742 }
1743
1744
1745 void ViewerTest::GetMousePosition(Standard_Integer& Xpix,Standard_Integer& Ypix)
1746 {
1747   Xpix = X_Motion;Ypix=Y_Motion;
1748 }
1749
1750 //==============================================================================
1751 //function : ViewProject: implements VAxo, VTop, VLeft, ...
1752 //purpose  : Switches to an axonometric, top, left and other views
1753 //==============================================================================
1754
1755 static int ViewProject(Draw_Interpretor& di, const V3d_TypeOfOrientation ori)
1756 {
1757   if ( ViewerTest::CurrentView().IsNull() )
1758   {
1759     di<<"Call vinit before this command, please"<<"\n";
1760     return 1;
1761   }
1762
1763   ViewerTest::CurrentView()->SetProj(ori);
1764   return 0;
1765 }
1766
1767 //==============================================================================
1768 //function : VAxo
1769 //purpose  : Switch to an Axonometric view
1770 //Draw arg : No args
1771 //==============================================================================
1772
1773 static int VAxo(Draw_Interpretor& di, Standard_Integer , const char** )
1774 {
1775   return ViewProject(di, V3d_XposYnegZpos);
1776 }
1777
1778 //==============================================================================
1779 //function : VTop
1780 //purpose  : Switch to a Top View
1781 //Draw arg : No args
1782 //==============================================================================
1783
1784 static int VTop(Draw_Interpretor& di, Standard_Integer , const char** )
1785 {
1786   return ViewProject(di, V3d_Zpos);
1787 }
1788
1789 //==============================================================================
1790 //function : VBottom
1791 //purpose  : Switch to a Bottom View
1792 //Draw arg : No args
1793 //==============================================================================
1794
1795 static int VBottom(Draw_Interpretor& di, Standard_Integer , const char** )
1796 {
1797   return ViewProject(di, V3d_Zneg);
1798 }
1799
1800 //==============================================================================
1801 //function : VLeft
1802 //purpose  : Switch to a Left View
1803 //Draw arg : No args
1804 //==============================================================================
1805
1806 static int VLeft(Draw_Interpretor& di, Standard_Integer , const char** )
1807 {
1808   return ViewProject(di, V3d_Ypos);
1809 }
1810
1811 //==============================================================================
1812 //function : VRight
1813 //purpose  : Switch to a Right View
1814 //Draw arg : No args
1815 //==============================================================================
1816
1817 static int VRight(Draw_Interpretor& di, Standard_Integer , const char** )
1818 {
1819   return ViewProject(di, V3d_Yneg);
1820 }
1821
1822 //==============================================================================
1823 //function : VFront
1824 //purpose  : Switch to a Front View
1825 //Draw arg : No args
1826 //==============================================================================
1827
1828 static int VFront(Draw_Interpretor& di, Standard_Integer , const char** )
1829 {
1830   return ViewProject(di, V3d_Xpos);
1831 }
1832
1833 //==============================================================================
1834 //function : VBack
1835 //purpose  : Switch to a Back View
1836 //Draw arg : No args
1837 //==============================================================================
1838
1839 static int VBack(Draw_Interpretor& di, Standard_Integer , const char** )
1840 {
1841   return ViewProject(di, V3d_Xneg);
1842 }
1843
1844 //==============================================================================
1845 //function : VHelp
1846 //purpose  : Dsiplay help on viewer Keyboead and mouse commands
1847 //Draw arg : No args
1848 //==============================================================================
1849
1850 static int VHelp(Draw_Interpretor& di, Standard_Integer , const char** )
1851 {
1852
1853   di << "Q : Quit the application" << "\n";
1854
1855   di << "========================="<<"\n";
1856   di << "F : FitAll" << "\n";
1857   di << "T : TopView" << "\n";
1858   di << "B : BottomView" << "\n";
1859   di << "R : RightView" << "\n";
1860   di << "L : LeftView" << "\n";
1861   di << "A : AxonometricView" << "\n";
1862   di << "D : ResetView" << "\n";
1863
1864   di << "========================="<<"\n";
1865   di << "S : Shading" << "\n";
1866   di << "W : Wireframe" << "\n";
1867   di << "H : HidelLineRemoval" << "\n";
1868   di << "U : Unset display mode" << "\n";
1869   di << "Delete : Remove selection from viewer" << "\n";
1870
1871   di << "========================="<<"\n";
1872   di << "Selection mode "<<"\n";
1873   di << "0 : Shape" <<"\n";
1874   di << "1 : Vertex" <<"\n";
1875   di << "2 : Edge" <<"\n";
1876   di << "3 : Wire" <<"\n";
1877   di << "4 : Face" <<"\n";
1878   di << "5 : Shell" <<"\n";
1879   di << "6 : Solid" <<"\n";
1880   di << "7 : Compound" <<"\n";
1881
1882   di << "========================="<<"\n";
1883   di << "Z : Switch Z clipping On/Off" << "\n";
1884   di << ", : Hilight next detected" << "\n";
1885   di << ". : Hilight previous detected" << "\n";
1886
1887   return 0;
1888 }
1889
1890 #ifdef WNT
1891
1892 static Standard_Boolean Ppick = 0;
1893 static Standard_Integer Pargc = 0;
1894 static const char**           Pargv = NULL;
1895
1896
1897 static LRESULT WINAPI AdvViewerWindowProc( HWND hwnd,
1898                                           UINT Msg,
1899                                           WPARAM wParam,
1900                                           LPARAM lParam )
1901 {
1902   if (!ViewerTest_myViews.IsEmpty()) {
1903
1904     WPARAM fwKeys = wParam;
1905
1906     switch( Msg ) {
1907     case WM_CLOSE:
1908        {
1909          // Delete view from map of views
1910          ViewerTest::RemoveView(FindViewIdByWindowHandle(hwnd));
1911          return 0;
1912        }
1913        break;
1914     case WM_ACTIVATE:
1915       if(LOWORD(wParam) == WA_CLICKACTIVE || LOWORD(wParam) == WA_ACTIVE
1916         || ViewerTest::CurrentView().IsNull())
1917       {
1918         // Activate inactive window
1919         if(GetWindowHandle(VT_GetWindow()) != hwnd)
1920         {
1921           ActivateView (FindViewIdByWindowHandle(hwnd));
1922         }
1923       }
1924       break;
1925     case WM_LBUTTONUP:
1926       if (!DragFirst)
1927       {
1928         HDC hdc = GetDC( hwnd );
1929         SelectObject( hdc, GetStockObject( HOLLOW_BRUSH ) );
1930         SetROP2( hdc, R2_NOT );
1931         Rectangle( hdc, X_ButtonPress, Y_ButtonPress, X_Motion, Y_Motion );
1932         ReleaseDC( hwnd, hdc );
1933         VT_ProcessButton1Release (fwKeys & MK_SHIFT);
1934       }
1935       IsDragged = Standard_False;
1936       return ViewerWindowProc( hwnd, Msg, wParam, lParam );
1937
1938     case WM_LBUTTONDOWN:
1939       if( fwKeys == MK_LBUTTON || fwKeys == ( MK_LBUTTON | MK_SHIFT ) )
1940       {
1941         IsDragged = Standard_True;
1942         DragFirst = Standard_True;
1943         X_ButtonPress = LOWORD(lParam);
1944         Y_ButtonPress = HIWORD(lParam);
1945       }
1946       return ViewerWindowProc( hwnd, Msg, wParam, lParam );
1947
1948       break;
1949
1950     case WM_MOUSEMOVE:
1951       if( IsDragged )
1952       {
1953         HDC hdc = GetDC( hwnd );
1954
1955         HGDIOBJ anObj = SelectObject( hdc, GetStockObject( WHITE_PEN ) );
1956         SelectObject( hdc, GetStockObject( HOLLOW_BRUSH ) );
1957         SetROP2( hdc, R2_NOT );
1958
1959         if( !DragFirst )
1960           Rectangle( hdc, X_ButtonPress, Y_ButtonPress, X_Motion, Y_Motion );
1961
1962         DragFirst = Standard_False;
1963         X_Motion = LOWORD(lParam);
1964         Y_Motion = HIWORD(lParam);
1965
1966         Rectangle( hdc, X_ButtonPress, Y_ButtonPress, X_Motion, Y_Motion );
1967
1968         SelectObject( hdc, anObj );
1969
1970         ReleaseDC( hwnd, hdc );
1971       }
1972       else
1973         return ViewerWindowProc( hwnd, Msg, wParam, lParam );
1974       break;
1975
1976     default:
1977       return ViewerWindowProc( hwnd, Msg, wParam, lParam );
1978     }
1979     return 0;
1980   }
1981   return ViewerWindowProc( hwnd, Msg, wParam, lParam );
1982 }
1983
1984
1985 static LRESULT WINAPI ViewerWindowProc( HWND hwnd,
1986                                        UINT Msg,
1987                                        WPARAM wParam,
1988                                        LPARAM lParam )
1989 {
1990   static int Up = 1;
1991
1992   if ( !ViewerTest::CurrentView().IsNull() ) {
1993     PAINTSTRUCT    ps;
1994
1995     switch( Msg ) {
1996     case WM_PAINT:
1997       BeginPaint(hwnd, &ps);
1998       EndPaint(hwnd, &ps);
1999       VT_ProcessExpose();
2000       break;
2001
2002     case WM_SIZE:
2003       VT_ProcessConfigure();
2004       break;
2005
2006     case WM_KEYDOWN:
2007       if ((wParam != VK_SHIFT) && (wParam != VK_CONTROL))
2008       {
2009         char c[2];
2010         c[0] = (char) wParam;
2011         c[1] = '\0';
2012         if (wParam == VK_DELETE)
2013         {
2014           c[0] = THE_KEY_DELETE;
2015         }
2016         // comma
2017         else if (wParam == VK_OEM_COMMA)
2018         {
2019           c[0] = ',';
2020         }
2021         // dot
2022         else if (wParam == VK_OEM_PERIOD)
2023         {
2024           c[0] = '.';
2025         }
2026         VT_ProcessKeyPress (c);
2027       }
2028       break;
2029
2030     case WM_LBUTTONUP:
2031     case WM_MBUTTONUP:
2032     case WM_RBUTTONUP:
2033       Up = 1;
2034       VT_ProcessButton3Release();
2035       break;
2036
2037     case WM_LBUTTONDOWN:
2038     case WM_MBUTTONDOWN:
2039     case WM_RBUTTONDOWN:
2040       {
2041         WPARAM fwKeys = wParam;
2042
2043         Up = 0;
2044
2045         X_ButtonPress = LOWORD(lParam);
2046         Y_ButtonPress = HIWORD(lParam);
2047
2048         if (Msg == WM_LBUTTONDOWN)
2049         {
2050           if (fwKeys & MK_CONTROL)
2051           {
2052             Ppick = VT_ProcessButton1Press (Pargc, Pargv, Ppick, (fwKeys & MK_SHIFT));
2053           }
2054           else
2055           {
2056             VT_ProcessButton1Press (Pargc, Pargv, Ppick, (fwKeys & MK_SHIFT));
2057           }
2058         }
2059         else if (Msg == WM_RBUTTONDOWN)
2060         {
2061           // Start rotation
2062           VT_ProcessButton3Press();
2063         }
2064       }
2065       break;
2066
2067     case WM_MOUSEMOVE:
2068       {
2069         //cout << "\t WM_MOUSEMOVE" << endl;
2070         WPARAM fwKeys = wParam;
2071         X_Motion = LOWORD(lParam);
2072         Y_Motion = HIWORD(lParam);
2073
2074         if ( Up &&
2075           fwKeys & ( MK_LBUTTON|MK_MBUTTON|MK_RBUTTON ) ) {
2076             Up = 0;
2077             X_ButtonPress = LOWORD(lParam);
2078             Y_ButtonPress = HIWORD(lParam);
2079
2080             if ( fwKeys & MK_RBUTTON ) {
2081               // Start rotation
2082               VT_ProcessButton3Press();
2083             }
2084           }
2085
2086           if ( fwKeys & MK_CONTROL ) {
2087             if ( fwKeys & MK_LBUTTON ) {
2088               ProcessControlButton1Motion();
2089             }
2090             else if ( fwKeys & MK_MBUTTON ||
2091               ((fwKeys&MK_LBUTTON) &&
2092               (fwKeys&MK_RBUTTON) ) ){
2093                 VT_ProcessControlButton2Motion();
2094               }
2095             else if ( fwKeys & MK_RBUTTON ) {
2096               VT_ProcessControlButton3Motion();
2097             }
2098           }
2099 #ifdef BUG
2100           else if ( fwKeys & MK_SHIFT ) {
2101             if ( fwKeys & MK_MBUTTON ||
2102               ((fwKeys&MK_LBUTTON) &&
2103               (fwKeys&MK_RBUTTON) ) ) {
2104                 cout << "ProcessZClipMotion()" << endl;
2105                 ProcessZClipMotion();
2106               }
2107           }
2108 #endif
2109           else if (GetWindowHandle (VT_GetWindow()) == hwnd)
2110           {
2111             if ((fwKeys & MK_MBUTTON
2112             || ((fwKeys & MK_LBUTTON) && (fwKeys & MK_RBUTTON))))
2113             {
2114               ProcessZClipMotion();
2115             }
2116             else
2117             {
2118               VT_ProcessMotion();
2119             }
2120           }
2121       }
2122       break;
2123
2124     default:
2125       return( DefWindowProc( hwnd, Msg, wParam, lParam ));
2126     }
2127     return 0L;
2128   }
2129
2130   return DefWindowProc( hwnd, Msg, wParam, lParam );
2131 }
2132
2133
2134
2135
2136 //==============================================================================
2137 //function : ViewerMainLoop
2138 //purpose  : Get a Event on the view and dispatch it
2139 //==============================================================================
2140
2141
2142 int ViewerMainLoop(Standard_Integer argc, const char** argv)
2143 {
2144   Ppick = (argc > 0)? 1 : 0;
2145   Pargc = argc;
2146   Pargv = argv;
2147
2148   if ( Ppick ) {
2149     MSG msg;
2150     msg.wParam = 1;
2151
2152     cout << "Start picking" << endl;
2153
2154     while ( Ppick == 1 ) {
2155       // Wait for a VT_ProcessButton1Press() to toggle pick to 1 or 0
2156       if (GetMessage(&msg, NULL, 0, 0) ) {
2157         TranslateMessage(&msg);
2158         DispatchMessage(&msg);
2159       }
2160     }
2161
2162     cout << "Picking done" << endl;
2163   }
2164
2165   return Ppick;
2166 }
2167
2168 #elif !defined(__APPLE__) || defined(MACOSX_USE_GLX)
2169
2170 int min( int a, int b )
2171 {
2172   if( a<b )
2173     return a;
2174   else
2175     return b;
2176 }
2177
2178 int max( int a, int b )
2179 {
2180   if( a>b )
2181     return a;
2182   else
2183     return b;
2184 }
2185
2186 int ViewerMainLoop(Standard_Integer argc, const char** argv)
2187
2188 {
2189   static XEvent aReport;
2190   Standard_Boolean pick = argc > 0;
2191   Display *aDisplay = GetDisplayConnection()->GetDisplay();
2192   XNextEvent (aDisplay, &aReport);
2193
2194   // Handle event for the chosen display connection
2195   switch (aReport.type) {
2196       case ClientMessage:
2197         {
2198           if((Atom)aReport.xclient.data.l[0] == GetDisplayConnection()->GetAtom(Aspect_XA_DELETE_WINDOW))
2199           {
2200             // Close the window
2201             ViewerTest::RemoveView(FindViewIdByWindowHandle (aReport.xclient.window));
2202           }
2203         }
2204         return 0;
2205      case FocusIn:
2206       {
2207          // Activate inactive view
2208          Window aWindow = GetWindowHandle(VT_GetWindow());
2209          if(aWindow != aReport.xfocus.window)
2210          {
2211            ActivateView (FindViewIdByWindowHandle (aReport.xfocus.window));
2212          }
2213       }
2214       break;
2215       case Expose:
2216         {
2217           VT_ProcessExpose();
2218         }
2219         break;
2220       case ConfigureNotify:
2221         {
2222           VT_ProcessConfigure();
2223         }
2224         break;
2225       case KeyPress:
2226         {
2227
2228           KeySym ks_ret ;
2229           char buf_ret[11] ;
2230           int ret_len ;
2231           XComposeStatus status_in_out;
2232
2233           ret_len = XLookupString( ( XKeyEvent *)&aReport ,
2234             (char *) buf_ret , 10 ,
2235             &ks_ret , &status_in_out ) ;
2236
2237
2238           buf_ret[ret_len] = '\0' ;
2239
2240           if (ret_len)
2241           {
2242             VT_ProcessKeyPress (buf_ret);
2243           }
2244         }
2245         break;
2246       case ButtonPress:
2247         {
2248           X_ButtonPress = aReport.xbutton.x;
2249           Y_ButtonPress = aReport.xbutton.y;
2250
2251           if (aReport.xbutton.button == Button1)
2252           {
2253             if (aReport.xbutton.state & ControlMask)
2254             {
2255               pick = VT_ProcessButton1Press (argc, argv, pick, (aReport.xbutton.state & ShiftMask));
2256             }
2257             else
2258             {
2259               IsDragged = Standard_True;
2260               DragFirst = Standard_True;
2261             }
2262           }
2263           else if (aReport.xbutton.button == Button3)
2264           {
2265             // Start rotation
2266             VT_ProcessButton3Press();
2267           }
2268         }
2269         break;
2270       case ButtonRelease:
2271         {
2272           if( IsDragged )
2273           {
2274             if( !DragFirst )
2275             {
2276               Aspect_Handle aWindow = VT_GetWindow()->XWindow();
2277               GC gc = XCreateGC( aDisplay, aWindow, 0, 0 );
2278               XDrawRectangle( aDisplay, aWindow, gc, min( X_ButtonPress, X_Motion ), min( Y_ButtonPress, Y_Motion ), abs( X_Motion-X_ButtonPress ), abs( Y_Motion-Y_ButtonPress ) );
2279             }
2280
2281             Handle( AIS_InteractiveContext ) aContext = ViewerTest::GetAISContext();
2282             if( aContext.IsNull() )
2283             {
2284               cout << "The context is null. Please use vinit before createmesh" << endl;
2285               return 0;
2286             }
2287
2288             Standard_Boolean ShiftPressed = ( aReport.xbutton.state & ShiftMask );
2289             if( aReport.xbutton.button==1 )
2290               if( DragFirst )
2291                 if( ShiftPressed )
2292                 {
2293                   aContext->ShiftSelect();
2294                 }
2295                 else
2296                 {
2297                   aContext->Select();
2298                 }
2299               else
2300                 if( ShiftPressed )
2301                 {
2302                   aContext->ShiftSelect( min( X_ButtonPress, X_Motion ), min( Y_ButtonPress, Y_Motion ),
2303                     max( X_ButtonPress, X_Motion ), max( Y_ButtonPress, Y_Motion ),
2304                     ViewerTest::CurrentView());
2305                 }
2306                 else
2307                 {
2308                   aContext->Select( min( X_ButtonPress, X_Motion ), min( Y_ButtonPress, Y_Motion ),
2309                     max( X_ButtonPress, X_Motion ), max( Y_ButtonPress, Y_Motion ),
2310                     ViewerTest::CurrentView() );
2311                 }
2312             else
2313               VT_ProcessButton3Release();
2314
2315             IsDragged = Standard_False;
2316           }
2317           else
2318             VT_ProcessButton3Release();
2319         }
2320         break;
2321       case MotionNotify:
2322         {
2323           if (GetWindowHandle (VT_GetWindow()) != aReport.xmotion.window)
2324           {
2325             break;
2326           }
2327           if( IsDragged )
2328           {
2329             Aspect_Handle aWindow = VT_GetWindow()->XWindow();
2330             GC gc = XCreateGC( aDisplay, aWindow, 0, 0 );
2331             XSetFunction( aDisplay, gc, GXinvert );
2332
2333             if( !DragFirst )
2334               XDrawRectangle(aDisplay, aWindow, gc, min( X_ButtonPress, X_Motion ), min( Y_ButtonPress, Y_Motion ), abs( X_Motion-X_ButtonPress ), abs( Y_Motion-Y_ButtonPress ) );
2335
2336             X_Motion = aReport.xmotion.x;
2337             Y_Motion = aReport.xmotion.y;
2338             DragFirst = Standard_False;
2339
2340             XDrawRectangle( aDisplay, aWindow, gc, min( X_ButtonPress, X_Motion ), min( Y_ButtonPress, Y_Motion ), abs( X_Motion-X_ButtonPress ), abs( Y_Motion-Y_ButtonPress ) );
2341           }
2342           else
2343           {
2344             X_Motion = aReport.xmotion.x;
2345             Y_Motion = aReport.xmotion.y;
2346
2347             // remove all the ButtonMotionMaskr
2348             while( XCheckMaskEvent( aDisplay, ButtonMotionMask, &aReport) ) ;
2349
2350             if ( ZClipIsOn && aReport.xmotion.state & ShiftMask ) {
2351               if ( Abs(X_Motion - X_ButtonPress) > 2 ) {
2352
2353                 Quantity_Length VDX, VDY;
2354
2355                 ViewerTest::CurrentView()->Size(VDX,VDY);
2356                 Standard_Real VDZ =0 ;
2357                 VDZ = ViewerTest::CurrentView()->ZSize();
2358
2359                 printf("%f,%f,%f\n", VDX, VDY, VDZ);
2360
2361                 Quantity_Length dx = 0 ;
2362                 dx = ViewerTest::CurrentView()->Convert(X_Motion - X_ButtonPress);
2363
2364                 cout << dx << endl;
2365
2366                 dx = dx / VDX * VDZ;
2367
2368                 cout << dx << endl;
2369
2370                 ViewerTest::CurrentView()->Redraw();
2371               }
2372             }
2373
2374             if ( aReport.xmotion.state & ControlMask ) {
2375               if ( aReport.xmotion.state & Button1Mask ) {
2376                 ProcessControlButton1Motion();
2377               }
2378               else if ( aReport.xmotion.state & Button2Mask ) {
2379                 VT_ProcessControlButton2Motion();
2380               }
2381               else if ( aReport.xmotion.state & Button3Mask ) {
2382                 VT_ProcessControlButton3Motion();
2383               }
2384             }
2385             else
2386             {
2387               VT_ProcessMotion();
2388             }
2389           }
2390         }
2391         break;
2392 }
2393 return pick;
2394 }
2395
2396 //==============================================================================
2397 //function : VProcessEvents
2398 //purpose  : call by Tk_CreateFileHandler() to be able to manage the
2399 //       event in the Viewer window
2400 //==============================================================================
2401
2402 static void VProcessEvents(ClientData,int)
2403 {
2404   NCollection_Vector<int> anEventNumbers;
2405   // Get number of messages from every display
2406   for (NCollection_DoubleMap <TCollection_AsciiString, Handle(Graphic3d_GraphicDriver)>::Iterator
2407        anIter (ViewerTest_myDrivers); anIter.More(); anIter.Next())
2408   {
2409     anEventNumbers.Append(XPending (anIter.Key2()->GetDisplayConnection()->GetDisplay()));
2410   }
2411     // Handle events for every display
2412   int anEventIter = 0;
2413   for (NCollection_DoubleMap <TCollection_AsciiString, Handle(Graphic3d_GraphicDriver)>::Iterator
2414        anIter (ViewerTest_myDrivers); anIter.More(); anIter.Next(), anEventIter++)
2415   {
2416     for (int i = 0; i < anEventNumbers.Value(anEventIter) &&
2417          XPending (anIter.Key2()->GetDisplayConnection()->GetDisplay()) > 0; ++i)
2418     {
2419       SetDisplayConnection (anIter.Key2()->GetDisplayConnection());
2420       int anEventResult = ViewerMainLoop( 0, NULL);
2421       // If window is closed or context was not found finish current event processing loop
2422       if (!anEventResult)
2423         return;
2424     }
2425   }
2426
2427   SetDisplayConnection (ViewerTest::GetAISContext()->CurrentViewer()->Driver()->GetDisplayConnection());
2428
2429 }
2430 #endif
2431
2432 //==============================================================================
2433 //function : OSWindowSetup
2434 //purpose  : Setup for the X11 window to be able to cath the event
2435 //==============================================================================
2436
2437
2438 static void OSWindowSetup()
2439 {
2440 #if !defined(_WIN32) && !defined(__WIN32__) && (!defined(__APPLE__) || defined(MACOSX_USE_GLX))
2441   // X11
2442
2443   Window  window   = VT_GetWindow()->XWindow();
2444   SetDisplayConnection (ViewerTest::CurrentView()->Viewer()->Driver()->GetDisplayConnection());
2445   Display *aDisplay = GetDisplayConnection()->GetDisplay();
2446   XSynchronize(aDisplay, 1);
2447
2448   // X11 : For keyboard on SUN
2449   XWMHints wmhints;
2450   wmhints.flags = InputHint;
2451   wmhints.input = 1;
2452
2453   XSetWMHints( aDisplay, window, &wmhints);
2454
2455   XSelectInput( aDisplay, window,  ExposureMask | KeyPressMask |
2456     ButtonPressMask | ButtonReleaseMask |
2457     StructureNotifyMask |
2458     PointerMotionMask |
2459     Button1MotionMask | Button2MotionMask |
2460     Button3MotionMask | FocusChangeMask
2461     );
2462   Atom aDeleteWindowAtom = GetDisplayConnection()->GetAtom(Aspect_XA_DELETE_WINDOW);
2463   XSetWMProtocols(aDisplay, window, &aDeleteWindowAtom, 1);
2464
2465   XSynchronize(aDisplay, 0);
2466
2467 #else
2468   // WNT
2469 #endif
2470
2471 }
2472
2473
2474 //==============================================================================
2475 //function : VFit
2476
2477 //purpose  : Fitall, no DRAW arguments
2478 //Draw arg : No args
2479 //==============================================================================
2480
2481 static int VFit(Draw_Interpretor& , Standard_Integer , const char** )
2482 {
2483   const Handle(V3d_View) aView = ViewerTest::CurrentView();
2484   Handle(NIS_View) V = Handle(NIS_View)::DownCast(aView);
2485   if (V.IsNull() == Standard_False) {
2486     V->FitAll3d();
2487   } else if (aView.IsNull() == Standard_False) {
2488     aView->FitAll();
2489   }
2490   return 0;
2491 }
2492
2493 //=======================================================================
2494 //function : VFitArea
2495 //purpose  : Fit view to show area located between two points
2496 //         : given in world 2D or 3D coordinates.
2497 //=======================================================================
2498 static int VFitArea (Draw_Interpretor& theDI, Standard_Integer  theArgNb, const char** theArgVec)
2499 {
2500   Handle(V3d_View) aView = ViewerTest::CurrentView();
2501   if (aView.IsNull())
2502   {
2503     std::cerr << theArgVec[0] << "Error: No active view.\n";
2504     return 1;
2505   }
2506
2507   // Parse arguments.
2508   gp_Pnt aWorldPnt1 (0.0, 0.0, 0.0);
2509   gp_Pnt aWorldPnt2 (0.0, 0.0, 0.0);
2510
2511   if (theArgNb == 5)
2512   {
2513     aWorldPnt1.SetX (Draw::Atof (theArgVec[1]));
2514     aWorldPnt1.SetY (Draw::Atof (theArgVec[2]));
2515     aWorldPnt2.SetX (Draw::Atof (theArgVec[3]));
2516     aWorldPnt2.SetY (Draw::Atof (theArgVec[4]));
2517   }
2518   else if (theArgNb == 7)
2519   {
2520     aWorldPnt1.SetX (Draw::Atof (theArgVec[1]));
2521     aWorldPnt1.SetY (Draw::Atof (theArgVec[2]));
2522     aWorldPnt1.SetZ (Draw::Atof (theArgVec[3]));
2523     aWorldPnt2.SetX (Draw::Atof (theArgVec[4]));
2524     aWorldPnt2.SetY (Draw::Atof (theArgVec[5]));
2525     aWorldPnt2.SetZ (Draw::Atof (theArgVec[6]));
2526   }
2527   else
2528   {
2529     std::cerr << theArgVec[0] << "Error: Invalid number of arguments.\n";
2530     theDI.PrintHelp(theArgVec[0]);
2531     return 1;
2532   }
2533
2534   // Convert model coordinates to view space
2535   Handle(Graphic3d_Camera) aCamera = aView->Camera();
2536   gp_Pnt aViewPnt1 = aCamera->ConvertWorld2View (aWorldPnt1);
2537   gp_Pnt aViewPnt2 = aCamera->ConvertWorld2View (aWorldPnt2);
2538
2539   // Determine fit area
2540   gp_Pnt2d aMinCorner (Min (aViewPnt1.X(), aViewPnt2.X()), Min (aViewPnt1.Y(), aViewPnt2.Y()));
2541   gp_Pnt2d aMaxCorner (Max (aViewPnt1.X(), aViewPnt2.X()), Max (aViewPnt1.Y(), aViewPnt2.Y()));
2542
2543   Standard_Real aDiagonal = aMinCorner.Distance (aMaxCorner);
2544
2545   if (aDiagonal < Precision::Confusion())
2546   {
2547     std::cerr << theArgVec[0] << "Error: view area is too small.\n";
2548     return 1;
2549   }
2550
2551   aView->FitAll (aMinCorner.X(), aMinCorner.Y(), aMaxCorner.X(), aMaxCorner.Y());
2552   return 0;
2553 }
2554
2555 //==============================================================================
2556 //function : VZFit
2557 //purpose  : ZFitall, no DRAW arguments
2558 //Draw arg : No args
2559 //==============================================================================
2560 static int VZFit (Draw_Interpretor& /*theDi*/, Standard_Integer theArgsNb, const char** theArgVec)
2561 {
2562   const Handle(V3d_View)& aCurrentView = ViewerTest::CurrentView();
2563
2564   if (aCurrentView.IsNull())
2565   {
2566     std::cout << theArgVec[0] << ": Call vinit before this command, please.\n";
2567     return 1;
2568   }
2569
2570   if (theArgsNb == 1)
2571   {
2572     aCurrentView->View()->ZFitAll();
2573     aCurrentView->Redraw();
2574     return 0;
2575   }
2576
2577   Standard_Real aScale = 1.0;
2578
2579   if (theArgsNb >= 2)
2580   {
2581     aScale = Draw::Atoi (theArgVec[1]);
2582   }
2583
2584   aCurrentView->View()->ZFitAll (aScale);
2585   aCurrentView->Redraw();
2586
2587   return 0;
2588 }
2589
2590 //==============================================================================
2591 //function : VRepaint
2592 //purpose  :
2593 //==============================================================================
2594 static int VRepaint (Draw_Interpretor& , Standard_Integer , const char** )
2595 {
2596   Handle(V3d_View) V = ViewerTest::CurrentView();
2597   if ( !V.IsNull() ) V->Redraw(); return 0;
2598 }
2599
2600 //==============================================================================
2601 //function : VClear
2602 //purpose  : Remove all the object from the viewer
2603 //Draw arg : No args
2604 //==============================================================================
2605
2606 static int VClear(Draw_Interpretor& , Standard_Integer , const char** )
2607 {
2608   Handle(V3d_View) V = ViewerTest::CurrentView();
2609   if(!V.IsNull())
2610     ViewerTest::Clear();
2611   return 0;
2612 }
2613
2614 //==============================================================================
2615 //function : VPick
2616 //purpose  :
2617 //==============================================================================
2618
2619 static int VPick(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2620 { if (ViewerTest::CurrentView().IsNull() ) return 1;
2621
2622 if ( argc < 4 ) {
2623   di << argv[0] << "Invalid number of arguments" << "\n";
2624   return 1;
2625 }
2626
2627 while (ViewerMainLoop( argc, argv)) {
2628 }
2629
2630 return 0;
2631 }
2632
2633 //==============================================================================
2634 //function : VSetBg
2635 //purpose  : Load image as background
2636 //==============================================================================
2637
2638 static int VSetBg(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2639 {
2640   if (argc < 2 || argc > 3)
2641   {
2642     di << "Usage : " << argv[0] << " imagefile [filltype] : Load image as background" << "\n";
2643     di << "filltype can be one of CENTERED, TILED, STRETCH, NONE" << "\n";
2644     return 1;
2645   }
2646
2647   Handle(AIS_InteractiveContext) AISContext = ViewerTest::GetAISContext();
2648   if(AISContext.IsNull())
2649   {
2650     di << "use 'vinit' command before " << argv[0] << "\n";
2651     return 1;
2652   }
2653
2654   Aspect_FillMethod aFillType = Aspect_FM_CENTERED;
2655   if (argc == 3)
2656   {
2657     const char* szType = argv[2];
2658     if      (strcmp(szType, "NONE"    ) == 0) aFillType = Aspect_FM_NONE;
2659     else if (strcmp(szType, "CENTERED") == 0) aFillType = Aspect_FM_CENTERED;
2660     else if (strcmp(szType, "TILED"   ) == 0) aFillType = Aspect_FM_TILED;
2661     else if (strcmp(szType, "STRETCH" ) == 0) aFillType = Aspect_FM_STRETCH;
2662     else
2663     {
2664       di << "Wrong fill type : " << szType << "\n";
2665       di << "Must be one of CENTERED, TILED, STRETCH, NONE" << "\n";
2666       return 1;
2667     }
2668   }
2669
2670   Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2671   V3dView->SetBackgroundImage(argv[1], aFillType, Standard_True);
2672
2673   return 0;
2674 }
2675
2676 //==============================================================================
2677 //function : VSetBgMode
2678 //purpose  : Change background image fill type
2679 //==============================================================================
2680
2681 static int VSetBgMode(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2682 {
2683   if (argc != 2)
2684   {
2685     di << "Usage : " << argv[0] << " filltype : Change background image mode" << "\n";
2686     di << "filltype must be one of CENTERED, TILED, STRETCH, NONE" << "\n";
2687     return 1;
2688   }
2689
2690   Handle(AIS_InteractiveContext) AISContext = ViewerTest::GetAISContext();
2691   if(AISContext.IsNull())
2692   {
2693     di << "use 'vinit' command before " << argv[0] << "\n";
2694     return 1;
2695   }
2696   Aspect_FillMethod aFillType = Aspect_FM_NONE;
2697   const char* szType = argv[1];
2698   if      (strcmp(szType, "NONE"    ) == 0) aFillType = Aspect_FM_NONE;
2699   else if (strcmp(szType, "CENTERED") == 0) aFillType = Aspect_FM_CENTERED;
2700   else if (strcmp(szType, "TILED"   ) == 0) aFillType = Aspect_FM_TILED;
2701   else if (strcmp(szType, "STRETCH" ) == 0) aFillType = Aspect_FM_STRETCH;
2702   else
2703   {
2704     di << "Wrong fill type : " << szType << "\n";
2705     di << "Must be one of CENTERED, TILED, STRETCH, NONE" << "\n";
2706     return 1;
2707   }
2708   Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2709   V3dView->SetBgImageStyle(aFillType, Standard_True);
2710   return 0;
2711 }
2712
2713 //==============================================================================
2714 //function : VSetGradientBg
2715 //purpose  : Mount gradient background
2716 //==============================================================================
2717 static int VSetGradientBg(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2718 {
2719   if (argc != 8 )
2720   {
2721     di << "Usage : " << argv[0] << " R1 G1 B1 R2 G2 B2 Type : Mount gradient background" << "\n";
2722     di << "R1,G1,B1,R2,G2,B2 = [0..255]" << "\n";
2723     di << "Type must be one of 0 = NONE, 1 = HOR, 2 = VER, 3 = DIAG1, 4 = DIAG2" << "\n";
2724     di << "                    5 = CORNER1, 6 = CORNER2, 7 = CORNER3, 8 = CORNER4" << "\n";
2725     return 1;
2726   }
2727
2728   Handle(AIS_InteractiveContext) AISContext = ViewerTest::GetAISContext();
2729   if(AISContext.IsNull())
2730   {
2731     di << "use 'vinit' command before " << argv[0] << "\n";
2732     return 1;
2733   }
2734   if (argc == 8)
2735   {
2736
2737     Standard_Real R1 = Draw::Atof(argv[1])/255.;
2738     Standard_Real G1 = Draw::Atof(argv[2])/255.;
2739     Standard_Real B1 = Draw::Atof(argv[3])/255.;
2740     Quantity_Color aColor1(R1,G1,B1,Quantity_TOC_RGB);
2741
2742     Standard_Real R2 = Draw::Atof(argv[4])/255.;
2743     Standard_Real G2 = Draw::Atof(argv[5])/255.;
2744     Standard_Real B2 = Draw::Atof(argv[6])/255.;
2745
2746     Quantity_Color aColor2(R2,G2,B2,Quantity_TOC_RGB);
2747     int aType = Draw::Atoi(argv[7]);
2748     if( aType < 0 || aType > 8 )
2749     {
2750       di << "Wrong fill type " << "\n";
2751       di << "Must be one of 0 = NONE, 1 = HOR, 2 = VER, 3 = DIAG1, 4 = DIAG2" << "\n";
2752       di << "               5 = CORNER1, 6 = CORNER2, 7 = CORNER3, 8 = CORNER4" << "\n";
2753       return 1;
2754     }
2755
2756     Aspect_GradientFillMethod aMethod = Aspect_GradientFillMethod(aType);
2757
2758     Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2759     V3dView->SetBgGradientColors( aColor1, aColor2, aMethod, 1);
2760   }
2761
2762   return 0;
2763 }
2764
2765 //==============================================================================
2766 //function : VSetGradientBgMode
2767 //purpose  : Change gradient background fill style
2768 //==============================================================================
2769 static int VSetGradientBgMode(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2770 {
2771   if (argc != 2 )
2772   {
2773     di << "Usage : " << argv[0] << " Type : Change gradient background fill type" << "\n";
2774     di << "Type must be one of 0 = NONE, 1 = HOR, 2 = VER, 3 = DIAG1, 4 = DIAG2" << "\n";
2775     di << "                    5 = CORNER1, 6 = CORNER2, 7 = CORNER3, 8 = CORNER4" << "\n";
2776     return 1;
2777   }
2778
2779   Handle(AIS_InteractiveContext) AISContext = ViewerTest::GetAISContext();
2780   if(AISContext.IsNull())
2781   {
2782     di << "use 'vinit' command before " << argv[0] << "\n";
2783     return 1;
2784   }
2785   if (argc == 2)
2786   {
2787     int aType = Draw::Atoi(argv[1]);
2788     if( aType < 0 || aType > 8 )
2789     {
2790       di << "Wrong fill type " << "\n";
2791       di << "Must be one of 0 = NONE, 1 = HOR, 2 = VER, 3 = DIAG1, 4 = DIAG2" << "\n";
2792       di << "               5 = CORNER1, 6 = CORNER2, 7 = CORNER3, 8 = CORNER4" << "\n";
2793       return 1;
2794     }
2795
2796     Aspect_GradientFillMethod aMethod = Aspect_GradientFillMethod(aType);
2797
2798     Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2799     V3dView->SetBgGradientStyle( aMethod, 1 );
2800   }
2801
2802   return 0;
2803 }
2804
2805 //==============================================================================
2806 //function : VSetColorBg
2807 //purpose  : Set color background
2808 //==============================================================================
2809 static int VSetColorBg(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2810 {
2811   if (argc != 4 )
2812   {
2813     di << "Usage : " << argv[0] << " R G B : Set color background" << "\n";
2814     di << "R,G,B = [0..255]" << "\n";
2815     return 1;
2816   }
2817
2818   Handle(AIS_InteractiveContext) AISContext = ViewerTest::GetAISContext();
2819   if(AISContext.IsNull())
2820   {
2821     di << "use 'vinit' command before " << argv[0] << "\n";
2822     return 1;
2823   }
2824   if (argc == 4)
2825   {
2826
2827     Standard_Real R = Draw::Atof(argv[1])/255.;
2828     Standard_Real G = Draw::Atof(argv[2])/255.;
2829     Standard_Real B = Draw::Atof(argv[3])/255.;
2830     Quantity_Color aColor(R,G,B,Quantity_TOC_RGB);
2831
2832     Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2833     V3dView->SetBackgroundColor( aColor );
2834     V3dView->Update();
2835   }
2836
2837   return 0;
2838 }
2839
2840 //==============================================================================
2841 //function : VScale
2842 //purpose  : View Scaling
2843 //==============================================================================
2844
2845 static int VScale(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2846 {
2847   Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2848   if ( V3dView.IsNull() ) return 1;
2849
2850   if ( argc != 4 ) {
2851     di << argv[0] << "Invalid number of arguments" << "\n";
2852     return 1;
2853   }
2854   V3dView->SetAxialScale( Draw::Atof(argv[1]),  Draw::Atof(argv[2]),  Draw::Atof(argv[3]) );
2855   return 0;
2856 }
2857 //==============================================================================
2858 //function : VTestZBuffTrihedron
2859 //purpose  : Displays a V3d_ZBUFFER'ed or V3d_WIREFRAME'd trihedron
2860 //==============================================================================
2861
2862 static int VTestZBuffTrihedron(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2863 {
2864   Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2865   if ( V3dView.IsNull() ) return 1;
2866
2867   V3dView->ZBufferTriedronSetup();
2868
2869   if ( argc == 1 ) {
2870     // Set up default trihedron parameters
2871     V3dView->TriedronDisplay( Aspect_TOTP_LEFT_LOWER, Quantity_NOC_WHITE, 0.1, V3d_ZBUFFER );
2872   } else
2873   if ( argc == 7 )
2874   {
2875     Aspect_TypeOfTriedronPosition aPosition = Aspect_TOTP_LEFT_LOWER;
2876     const char* aPosType = argv[1];
2877
2878     if ( strcmp(aPosType, "center") == 0 )
2879     {
2880       aPosition = Aspect_TOTP_CENTER;
2881     } else
2882     if (strcmp(aPosType, "left_lower") == 0)
2883     {
2884       aPosition = Aspect_TOTP_LEFT_LOWER;
2885     } else
2886     if (strcmp(aPosType, "left_upper") == 0)
2887     {
2888       aPosition = Aspect_TOTP_LEFT_UPPER;
2889     } else
2890     if (strcmp(aPosType, "right_lower") == 0)
2891     {
2892       aPosition = Aspect_TOTP_RIGHT_LOWER;
2893     } else
2894     if (strcmp(aPosType, "right_upper") == 0)
2895     {
2896       aPosition = Aspect_TOTP_RIGHT_UPPER;
2897     } else
2898     {
2899       di << argv[1] << " Invalid type of alignment"  << "\n";
2900       di << "Must be one of [ center, left_lower,"   << "\n";
2901       di << "left_upper, right_lower, right_upper ]" << "\n";
2902       return 1;
2903     }
2904
2905     Standard_Real R = Draw::Atof(argv[2])/255.;
2906     Standard_Real G = Draw::Atof(argv[3])/255.;
2907     Standard_Real B = Draw::Atof(argv[4])/255.;
2908     Quantity_Color aColor(R, G, B, Quantity_TOC_RGB);
2909
2910     Standard_Real aScale = Draw::Atof(argv[5]);
2911
2912     if( aScale <= 0.0 )
2913     {
2914       di << argv[5] << " Invalid value. Must be > 0" << "\n";
2915       return 1;
2916     }
2917
2918     V3d_TypeOfVisualization aPresentation = V3d_ZBUFFER;
2919     const char* aPresType = argv[6];
2920
2921     if ( strcmp(aPresType, "wireframe") == 0 )
2922     {
2923       aPresentation = V3d_WIREFRAME;
2924     } else
2925     if (strcmp(aPresType, "zbuffer") == 0)
2926     {
2927       aPresentation = V3d_ZBUFFER;
2928     } else
2929     {
2930       di << argv[6] << " Invalid type of visualization" << "\n";
2931       di << "Must be one of [ wireframe, zbuffer ]"     << "\n";
2932       return 1;
2933     }
2934
2935     V3dView->TriedronDisplay( aPosition, aColor.Name(), aScale, aPresentation );
2936
2937   } else
2938   {
2939     di << argv[0] << " Invalid number of arguments" << "\n";
2940     return 1;
2941   }
2942
2943   V3dView->View()->ZFitAll();
2944
2945   return 0;
2946 }
2947
2948 //==============================================================================
2949 //function : VRotate
2950 //purpose  : Camera Rotating
2951 //==============================================================================
2952
2953 static int VRotate( Draw_Interpretor& di, Standard_Integer argc, const char** argv ) {
2954   Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2955   if ( V3dView.IsNull() ) {
2956     return 1;
2957   }
2958
2959   if ( argc == 4 ) {
2960     V3dView->Rotate( Draw::Atof(argv[1]), Draw::Atof(argv[2]), Draw::Atof(argv[3]) );
2961     return 0;
2962   } else if ( argc == 7 ) {
2963     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]) );
2964     return 0;
2965   } else {
2966     di << argv[0] << " Invalid number of arguments" << "\n";
2967     return 1;
2968   }
2969 }
2970
2971 //==============================================================================
2972 //function : VZoom
2973 //purpose  : View zoom in / out (relative to current zoom)
2974 //==============================================================================
2975
2976 static int VZoom( Draw_Interpretor& di, Standard_Integer argc, const char** argv ) {
2977   Handle(V3d_View) V3dView = ViewerTest::CurrentView();
2978   if ( V3dView.IsNull() ) {
2979     return 1;
2980   }
2981
2982   if ( argc == 2 ) {
2983     Standard_Real coef = Draw::Atof(argv[1]);
2984     if ( coef <= 0.0 ) {
2985       di << argv[1] << "Invalid value" << "\n";
2986       return 1;
2987     }
2988     V3dView->SetZoom( Draw::Atof(argv[1]) );
2989     return 0;
2990   } else {
2991     di << argv[0] << " Invalid number of arguments" << "\n";
2992     return 1;
2993   }
2994 }
2995
2996 //==============================================================================
2997 //function : VPan
2998 //purpose  : View panning (in pixels)
2999 //==============================================================================
3000
3001 static int VPan( Draw_Interpretor& di, Standard_Integer argc, const char** argv ) {
3002   Handle(V3d_View) V3dView = ViewerTest::CurrentView();
3003   if ( V3dView.IsNull() ) return 1;
3004
3005   if ( argc == 3 ) {
3006     V3dView->Pan( Draw::Atoi(argv[1]), Draw::Atoi(argv[2]) );
3007     return 0;
3008   } else {
3009     di << argv[0] << " Invalid number of arguments" << "\n";
3010     return 1;
3011   }
3012 }
3013
3014
3015 //==============================================================================
3016 //function : VExport
3017 //purpose  : Export the view to a vector graphic format (PS, EMF, PDF)
3018 //==============================================================================
3019
3020 static int VExport(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
3021 {
3022   Handle(V3d_View) V3dView = ViewerTest::CurrentView();
3023   if (V3dView.IsNull())
3024     return 1;
3025
3026   if (argc == 1)
3027   {
3028     std::cout << "Usage: " << argv[0] << " Filename [Format]\n";
3029     return 1;
3030   }
3031
3032   Graphic3d_ExportFormat anExpFormat = Graphic3d_EF_PDF;
3033   TCollection_AsciiString aFormatStr;
3034
3035   TCollection_AsciiString aFileName (argv[1]);
3036   Standard_Integer aLen = aFileName.Length();
3037
3038   if (argc > 2)
3039   {
3040     aFormatStr = TCollection_AsciiString (argv[2]);
3041   }
3042   else if (aLen >= 4)
3043   {
3044     if (aFileName.Value (aLen - 2) == '.')
3045     {
3046       aFormatStr = aFileName.SubString (aLen - 1, aLen);
3047     }
3048     else if (aFileName.Value (aLen - 3) == '.')
3049     {
3050       aFormatStr = aFileName.SubString (aLen - 2, aLen);
3051     }
3052     else
3053     {
3054       std::cout << "Export format couln't be detected from filename '" << argv[1] << "'\n";
3055       return 1;
3056     }
3057   }
3058   else
3059   {
3060     std::cout << "Export format couln't be detected from filename '" << argv[1] << "'\n";
3061     return 1;
3062   }
3063
3064   aFormatStr.UpperCase();
3065   if (aFormatStr == "PS")
3066     anExpFormat = Graphic3d_EF_PostScript;
3067   else if (aFormatStr == "EPS")
3068     anExpFormat = Graphic3d_EF_EnhPostScript;
3069   else if (aFormatStr == "TEX")
3070     anExpFormat = Graphic3d_EF_TEX;
3071   else if (aFormatStr == "PDF")
3072     anExpFormat = Graphic3d_EF_PDF;
3073   else if (aFormatStr == "SVG")
3074     anExpFormat = Graphic3d_EF_SVG;
3075   else if (aFormatStr == "PGF")
3076     anExpFormat = Graphic3d_EF_PGF;
3077   else if (aFormatStr == "EMF")
3078     anExpFormat = Graphic3d_EF_EMF;
3079   else
3080   {
3081     std::cout << "Invalid export format '" << aFormatStr << "'\n";
3082     return 1;
3083   }
3084
3085   try {
3086     if (!V3dView->View()->Export (argv[1], anExpFormat))
3087     {
3088       di << "Error: export of image to " << aFormatStr << " failed!\n";
3089     }
3090   }
3091   catch (Standard_Failure)
3092   {
3093     di << "Error: export of image to " << aFormatStr << " failed";
3094     di << " (exception: " << Standard_Failure::Caught()->GetMessageString() << ")";
3095   }
3096   return 0;
3097 }
3098
3099 //==============================================================================
3100 //function : VColorScale
3101 //purpose  : representation color scale
3102 //==============================================================================
3103 #include <V3d_ColorScale.hxx>
3104
3105 static int VColorScale (Draw_Interpretor& di, Standard_Integer argc, const char ** argv)
3106 {
3107   if ( argc != 1 && argc != 4 && argc != 5 && argc != 6 && argc != 8 )
3108   {
3109     di << "Usage : " << argv[0] << " [RangeMin = 0 RangeMax = 100 Intervals = 10 HeightFont = 16 Position = Right X = 0 Y = 0]  " << "\n";
3110     return 1;
3111   }
3112
3113   Handle(AIS_InteractiveContext) aContext = ViewerTest::GetAISContext();
3114   if(aContext.IsNull()) {
3115     di << argv[0] << " ERROR : use 'vinit' command before " << "\n";
3116     return -1;
3117   }
3118
3119   Standard_Real minRange = 0. , maxRange = 100. ;
3120
3121   Standard_Integer numIntervals = 10 ;
3122   Standard_Integer textHeight = 16;
3123   Aspect_TypeOfColorScalePosition position = Aspect_TOCSP_RIGHT;
3124   Standard_Real X = 0., Y = 0. ;
3125
3126   if ( argc < 9 )
3127   {
3128      if( argc > 3 )
3129      {
3130        minRange = Draw::Atof( argv[1] );
3131        maxRange = Draw::Atof( argv[2] );
3132        numIntervals = Draw::Atoi( argv[3] );
3133      }
3134      if ( argc > 4 )
3135        textHeight = Draw::Atoi( argv[4] );
3136      if ( argc > 5 )
3137        position = (Aspect_TypeOfColorScalePosition)Draw::Atoi( argv[5] );
3138      if ( argc > 7 )
3139      {
3140        X = Draw::Atof( argv[6] );
3141        Y = Draw::Atof( argv[7] );
3142      }
3143   }
3144   Handle(V3d_View) curView = ViewerTest::CurrentView( );
3145   if ( curView.IsNull( ) )
3146     return 1;
3147   Handle(Aspect_ColorScale) aCSV = curView->ColorScale( );
3148   Handle(V3d_ColorScale) aCS = ( Handle( V3d_ColorScale )::DownCast( aCSV ) );
3149   if( ! aCS.IsNull( ) )
3150   {
3151     aCS->SetPosition( X , Y );
3152     aCS->SetHeight( 0.95) ;
3153     aCS->SetTextHeight( textHeight );
3154     aCS->SetRange( minRange , maxRange );
3155     aCS->SetNumberOfIntervals( numIntervals );
3156     aCS->SetLabelPosition( position );
3157     if( !curView->ColorScaleIsDisplayed() )
3158       curView->ColorScaleDisplay( );
3159   }
3160   return 0;
3161 }
3162
3163 //==============================================================================
3164 //function : VGraduatedTrihedron
3165 //purpose  : Displays a graduated trihedron
3166 //==============================================================================
3167
3168 static void AddMultibyteString (TCollection_ExtendedString &name, const char *arg)
3169 {
3170   const char *str = arg;
3171   while (*str)
3172   {
3173     unsigned short c1 = *str++;
3174     unsigned short c2 = *str++;
3175     if (!c1 || !c2) break;
3176     name += (Standard_ExtCharacter)((c1 << 8) | c2);
3177   }
3178 }
3179
3180 static int VGraduatedTrihedron(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
3181 {
3182   // Check arguments
3183   if (argc != 2 && argc < 5)
3184   {
3185     di<<"Error: "<<argv[0]<<" - invalid number of arguments\n";
3186     di<<"Usage: type help "<<argv[0]<<"\n";
3187     return 1; //TCL_ERROR
3188   }
3189
3190   Handle(V3d_View) aV3dView = ViewerTest::CurrentView();
3191
3192   // Create 3D view if it doesn't exist
3193   if ( aV3dView.IsNull() )
3194   {
3195     ViewerTest::ViewerInit();
3196     aV3dView = ViewerTest::CurrentView();
3197     if( aV3dView.IsNull() )
3198     {
3199       di << "Error: Cannot create a 3D view\n";
3200       return 1; //TCL_ERROR
3201     }
3202   }
3203
3204   // Erase (==0) or display (!=0)
3205   const int display = Draw::Atoi(argv[1]);
3206
3207   if (display)
3208   {
3209     // Text font
3210     TCollection_AsciiString font;
3211     if (argc < 6)
3212       font.AssignCat("Courier");
3213     else
3214       font.AssignCat(argv[5]);
3215
3216     // Text is multibyte
3217     const Standard_Boolean isMultibyte = (argc < 7)? Standard_False : (Draw::Atoi(argv[6]) != 0);
3218
3219     // Set axis names
3220     TCollection_ExtendedString xname, yname, zname;
3221     if (argc >= 5)
3222     {
3223       if (isMultibyte)
3224       {
3225         AddMultibyteString(xname, argv[2]);
3226         AddMultibyteString(yname, argv[3]);
3227         AddMultibyteString(zname, argv[4]);
3228       }
3229       else
3230       {
3231         xname += argv[2];
3232         yname += argv[3];
3233         zname += argv[4];
3234       }
3235     }
3236     else
3237     {
3238       xname += "X (mm)";
3239       yname += "Y (mm)";
3240       zname += "Z (mm)";
3241     }
3242
3243     aV3dView->GraduatedTrihedronDisplay(xname, yname, zname,
3244                                         Standard_True/*xdrawname*/, Standard_True/*ydrawname*/, Standard_True/*zdrawname*/,
3245                                         Standard_True/*xdrawvalues*/, Standard_True/*ydrawvalues*/, Standard_True/*zdrawvalues*/,
3246                                         Standard_True/*drawgrid*/,
3247                                         Standard_True/*drawaxes*/,
3248                                         5/*nbx*/, 5/*nby*/, 5/*nbz*/,
3249                                         10/*xoffset*/, 10/*yoffset*/, 10/*zoffset*/,
3250                                         30/*xaxisoffset*/, 30/*yaxisoffset*/, 30/*zaxisoffset*/,
3251                                         Standard_True/*xdrawtickmarks*/, Standard_True/*ydrawtickmarks*/, Standard_True/*zdrawtickmarks*/,
3252                                         10/*xtickmarklength*/, 10/*ytickmarklength*/, 10/*ztickmarklength*/,
3253                                         Quantity_NOC_WHITE/*gridcolor*/,
3254                                         Quantity_NOC_RED/*xnamecolor*/,Quantity_NOC_GREEN/*ynamecolor*/,Quantity_NOC_BLUE1/*znamecolor*/,
3255                                         Quantity_NOC_RED/*xcolor*/,Quantity_NOC_GREEN/*ycolor*/,Quantity_NOC_BLUE1/*zcolor*/,font);
3256   }
3257   else
3258     aV3dView->GraduatedTrihedronErase();
3259
3260   ViewerTest::GetAISContext()->UpdateCurrentViewer();
3261   aV3dView->Redraw();
3262
3263   return 0;
3264 }
3265
3266 //==============================================================================
3267 //function : VPrintView
3268 //purpose  : Test printing algorithm, print the view to image file with given
3269 //           width and height. Printing implemented only for WNT.
3270 //==============================================================================
3271 static int VPrintView (Draw_Interpretor& di, Standard_Integer argc,
3272                        const char** argv)
3273 {
3274 #ifndef WNT
3275   di << "Printing implemented only for wnt!\n";
3276   return 0;
3277 #else
3278
3279   Handle(AIS_InteractiveContext) aContextAIS = NULL;
3280   Handle(V3d_View) aView = NULL;
3281   aContextAIS = ViewerTest::GetAISContext();
3282   if (!aContextAIS.IsNull())
3283   {
3284     const Handle(V3d_Viewer)& Vwr = aContextAIS->CurrentViewer();
3285     Vwr->InitActiveViews();
3286     if(Vwr->MoreActiveViews())
3287       aView = Vwr->ActiveView();
3288   }
3289
3290   // check for errors
3291   if (aView.IsNull())
3292   {
3293     di << "Call vinit before!\n";
3294     return 1;
3295   }
3296   else if (argc < 4)
3297   {
3298     di << "Use: " << argv[0];
3299     di << " width height filename [print algo=0] [tile_width tile_height]\n";
3300     di << "width, height of the intermediate buffer for operation\n";
3301     di << "algo : {0|1}\n";
3302     di << "        0 - stretch algorithm\n";
3303     di << "        1 - tile algorithm\n";
3304     di << "test printing algorithms into an intermediate buffer\n";
3305     di << "using specific tile size if provided\n";
3306     di << "with saving output to an image file\n";
3307     return 1;
3308   }
3309
3310   // get the input params
3311   Standard_Integer aWidth  = Draw::Atoi (argv[1]);
3312   Standard_Integer aHeight = Draw::Atoi (argv[2]);
3313   Standard_Integer aMode   = 0;
3314   TCollection_AsciiString aFileName = TCollection_AsciiString (argv[3]);
3315   if (argc >= 5)
3316     aMode = Draw::Atoi (argv[4]);
3317
3318   Standard_Integer aTileWidth  = 0;
3319   Standard_Integer aTileHeight = 0;
3320   Standard_Boolean isTileSizeProvided = Standard_False;
3321   if (argc == 7)
3322   {
3323     isTileSizeProvided = Standard_True;
3324     aTileWidth  = Draw::Atoi (argv[5]);
3325     aTileHeight = Draw::Atoi (argv[6]);
3326   }
3327
3328   // check the input parameters
3329   if (aWidth <= 0 || aHeight <= 0)
3330   {
3331     di << "Width and height must be positive values!\n";
3332     return 1;
3333   }
3334   if (aMode != 0 && aMode != 1)
3335     aMode = 0;
3336
3337   // define compatible bitmap
3338   HDC anDC = CreateCompatibleDC(0);
3339   BITMAPINFO aBitmapData;
3340   memset (&aBitmapData, 0, sizeof (BITMAPINFOHEADER));
3341   aBitmapData.bmiHeader.biSize          = sizeof (BITMAPINFOHEADER);
3342   aBitmapData.bmiHeader.biWidth         = aWidth ;
3343   aBitmapData.bmiHeader.biHeight        = aHeight;
3344   aBitmapData.bmiHeader.biPlanes        = 1;
3345   aBitmapData.bmiHeader.biBitCount      = 24;
3346   aBitmapData.bmiHeader.biXPelsPerMeter = 0;
3347   aBitmapData.bmiHeader.biYPelsPerMeter = 0;
3348   aBitmapData.bmiHeader.biClrUsed       = 0;
3349   aBitmapData.bmiHeader.biClrImportant  = 0;
3350   aBitmapData.bmiHeader.biCompression   = BI_RGB;
3351   aBitmapData.bmiHeader.biSizeImage     = 0;
3352
3353   // Create Device Independent Bitmap
3354   void* aBitsOut = NULL;
3355   HBITMAP aMemoryBitmap = CreateDIBSection (anDC, &aBitmapData, DIB_RGB_COLORS,
3356                                             &aBitsOut, NULL, 0);
3357   HGDIOBJ anOldBitmap   = SelectObject(anDC, aMemoryBitmap);
3358
3359   Standard_Boolean isSaved = Standard_False, isPrinted = Standard_False;
3360   if (aBitsOut != NULL)
3361   {
3362     if (aMode == 0)
3363       isPrinted = aView->Print(anDC,1,1,0,Aspect_PA_STRETCH);
3364     else
3365     {
3366       if (isTileSizeProvided)
3367       {
3368         Graphic3d_CView* aCView = static_cast<Graphic3d_CView*> (ViewerTest::CurrentView()->View()->CView());
3369         Graphic3d_PtrFrameBuffer anOldBuffer = static_cast<Graphic3d_PtrFrameBuffer> (aCView->ptrFBO);
3370         aCView->ptrFBO = aView->View()->FBOCreate (aTileWidth, aTileHeight);
3371
3372         isPrinted = aView->Print (anDC, 1, 1, 0, Aspect_PA_TILE);
3373
3374         Graphic3d_PtrFrameBuffer aNewBuffer = static_cast<Graphic3d_PtrFrameBuffer> (aCView->ptrFBO);
3375         aView->View()->FBORelease (aNewBuffer);
3376         aCView->ptrFBO = anOldBuffer;
3377       }
3378       else
3379       {
3380         isPrinted = aView->Print (anDC, 1, 1, 0, Aspect_PA_TILE);
3381       }
3382     }
3383
3384     // succesfully printed into an intermediate buffer
3385     if (isPrinted)
3386     {
3387       Image_PixMap aWrapper;
3388       aWrapper.InitWrapper (Image_PixMap::ImgBGR, (Standard_Byte* )aBitsOut, aWidth, aHeight, aWidth * 3 + aWidth % 4);
3389       aWrapper.SetTopDown (false);
3390
3391       Image_AlienPixMap anImageBitmap;
3392       anImageBitmap.InitCopy (aWrapper);
3393       isSaved = anImageBitmap.Save (aFileName);
3394     }
3395     else
3396     {
3397       di << "Print operation failed due to printing errors or\n";
3398       di << "insufficient memory available\n";
3399       di << "Please, try to use smaller dimensions for this test\n";
3400       di << "command, as it allocates intermediate buffer for storing\n";
3401       di << "the result\n";
3402     }
3403   }
3404   else
3405   {
3406     di << "Can't allocate memory for intermediate buffer\n";
3407     di << "Please use smaller dimensions\n";
3408   }
3409
3410   if (aMemoryBitmap)
3411   {
3412     SelectObject (anDC, anOldBitmap);
3413     DeleteObject (aMemoryBitmap);
3414     DeleteDC(anDC);
3415   }
3416
3417   if (!isSaved)
3418   {
3419     di << "Save to file operation failed. This operation may fail\n";
3420     di << "if you don't have enough available memory, then you can\n";
3421     di << "use smaller dimensions for the output file\n";
3422     return 1;
3423   }
3424
3425   return 0;
3426
3427 #endif
3428 }
3429
3430 //==============================================================================
3431 //function : VZLayer
3432 //purpose  : Test z layer operations for v3d viewer
3433 //==============================================================================
3434 static int VZLayer (Draw_Interpretor& di, Standard_Integer argc, const char** argv)
3435 {
3436   Handle(AIS_InteractiveContext) aContextAIS = ViewerTest::GetAISContext ();
3437   if (aContextAIS.IsNull())
3438   {
3439     di << "Call vinit before!\n";
3440     return 1;
3441   }
3442   else if (argc < 2)
3443   {
3444     di << "Use: vzlayer ";
3445     di << " add/del/get/settings/enable/disable [id]\n";
3446     di << " add - add new z layer to viewer and print its id\n";
3447     di << " del - del z layer by its id\n";
3448     di << " get - print sequence of z layers in increasing order of their overlay level\n";
3449     di << " settings - print status of z layer settings\n";
3450     di << " enable ([depth]test/[depth]write/[depth]clear/[depth]offset) \n    enables given setting for the z layer\n";
3451     di << " enable (p[ositive]offset/n[egative]offset) \n    enables given setting for the z layer\n";
3452     di << " disable ([depth]test/[depth]write/[depth]clear/[depth]offset) \n    disables given setting for the z layer\n";
3453     di << "\nWhere id is the layer identificator\n";
3454     di << "\nExamples:\n";
3455     di << "   vzlayer add\n";
3456     di << "   vzlayer enable poffset 1\n";
3457     di << "   vzlayer disable depthtest 1\n";
3458     di << "   vzlayer del 1\n";
3459     return 1;
3460   }
3461
3462   const Handle(V3d_Viewer)& aViewer = aContextAIS->CurrentViewer();
3463   if (aViewer.IsNull())
3464   {
3465     di << "No active viewer!\n";
3466     return 1;
3467   }
3468
3469   // perform operation
3470   TCollection_AsciiString anOp = TCollection_AsciiString (argv[1]);
3471   if (anOp == "add")
3472   {
3473     Standard_Integer aNewId;
3474     if (!aViewer->AddZLayer (aNewId))
3475     {
3476       di << "Impossible to add new z layer!\n";
3477       return 1;
3478     }
3479
3480     di << "New z layer added with index: " << aNewId << "\n";
3481   }
3482   else if (anOp == "del")
3483   {
3484     if (argc < 3)
3485     {
3486       di << "Please also provide as argument id of z layer to remove\n";
3487       return 1;
3488     }
3489
3490     Standard_Integer aDelId = Draw::Atoi (argv[2]);
3491     if (!aViewer->RemoveZLayer (aDelId))
3492     {
3493       di << "Impossible to remove the z layer or invalid id!\n";
3494       return 1;
3495     }
3496