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