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