src/ViewerTest/ViewerTest_ViewerCommands.cxx

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