0022879: Possible bug in Opengl_togl_begin_layer_mode.cxx
[occt.git] / src / ViewerTest / ViewerTest_ViewerCommands.cxx
1 // File:  ViewerTest_ViewerCommands.cxx
2 // Created: Tue Sep  1 10:28:35 1998
3 // Author:  Robert COUBLANC
4 //    <rob@robox.paris1.matra-dtv.fr>
5
6 // Robert Boehne 30 May 2000 : Dec Osf
7
8 #ifdef HAVE_CONFIG_H
9 # include <config.h>
10 #endif
11
12 #ifdef WNT
13 #include <windows.h>
14 #endif
15
16 #include <Graphic3d_ExportFormat.hxx>
17 #include <ViewerTest.hxx>
18 #include <ViewerTest_EventManager.hxx>
19 #include <Visual3d_View.hxx>
20 #include <Visual3d_ViewManager.hxx>
21 #include <V3d_LayerMgr.hxx>
22 #include <NIS_View.hxx>
23 #include <NIS_Triangulated.hxx>
24 #include <NIS_InteractiveContext.hxx>
25 #include <AIS_InteractiveContext.hxx>
26 #include <Draw_Interpretor.hxx>
27 #include <Draw.hxx>
28 #include <Draw_Appli.hxx>
29 #include <Aspect_PrintAlgo.hxx>
30 #include <Image_PixMap.hxx>
31 #include <TColStd_SequenceOfInteger.hxx>
32
33 #ifdef WNT
34 #undef DrawText
35 #endif
36
37 #include <Visual3d_Layer.hxx>
38
39 #ifndef WNT
40 #include <Graphic3d_GraphicDevice.hxx>
41 #include <Xw_GraphicDevice.hxx>
42 #include <Xw_WindowQuality.hxx>
43 #include <Xw_Window.hxx>
44 #include <X11/Xlib.h> /* contains some dangerous #defines such as Status, True etc. */
45 #include <X11/Xutil.h>
46 #include <tk.h>
47
48 #else
49
50 #include <Graphic3d_WNTGraphicDevice.hxx>
51 #include <WNT_WClass.hxx>
52 #include <WNT_Window.hxx>
53
54 #define _CRT_SECURE_NO_DEPRECATE
55 #pragma warning (disable:4996)
56
57 #endif
58
59 #define OCC120
60
61 //==============================================================================
62
63 //==============================================================================
64 //  VIEWER GLOBAL VARIABLES
65 //==============================================================================
66
67 Standard_IMPORT Standard_Boolean Draw_VirtualWindows;
68
69 Standard_EXPORT int ViewerMainLoop(Standard_Integer , const char** argv);
70 extern const Handle(NIS_InteractiveContext)& TheNISContext();
71
72 #ifdef WNT
73 static Handle(Graphic3d_WNTGraphicDevice)& GetG3dDevice(){
74   static Handle(Graphic3d_WNTGraphicDevice) GD;
75   return GD;
76 }
77
78 static Handle(WNT_Window)& VT_GetWindow() {
79   static Handle(WNT_Window) WNTWin;
80   return WNTWin;
81 }
82
83 #else
84 static Handle(Graphic3d_GraphicDevice)& GetG3dDevice(){
85   static Handle(Graphic3d_GraphicDevice) GD;
86   return GD;
87 }
88 static Handle(Xw_Window)& VT_GetWindow(){
89   static Handle(Xw_Window) XWWin;
90   return XWWin;
91 }
92 static Display *display;
93
94 static void VProcessEvents(ClientData,int);
95 #endif
96
97 #ifdef OCC120
98 static Standard_Boolean DegenerateMode = Standard_True;
99 #endif
100
101 #define ZCLIPWIDTH 1.
102
103 static void OSWindowSetup();
104
105 //==============================================================================
106 //  EVENT GLOBAL VARIABLES
107 //==============================================================================
108
109 static int Start_Rot = 0;
110 static int ZClipIsOn = 0;
111 static int X_Motion= 0,Y_Motion=0; // Current cursor position
112 static int X_ButtonPress = 0, Y_ButtonPress = 0; // Last ButtonPress position
113
114
115 //==============================================================================
116
117 #ifdef WNT
118 static LRESULT WINAPI ViewerWindowProc(
119                                        HWND hwnd,
120                                        UINT uMsg,
121                                        WPARAM wParam,
122                                        LPARAM lParam );
123 static LRESULT WINAPI AdvViewerWindowProc(
124   HWND hwnd,
125   UINT uMsg,
126   WPARAM wParam,
127   LPARAM lParam );
128 #endif
129
130
131 //==============================================================================
132 //function : WClass
133 //purpose  :
134 //==============================================================================
135
136 const Handle(MMgt_TShared)& ViewerTest::WClass()
137 {
138   static Handle(MMgt_TShared) theWClass;
139 #ifdef WNT
140   if (theWClass.IsNull()) {
141     theWClass = new WNT_WClass ("GW3D_Class", AdvViewerWindowProc,
142       CS_VREDRAW | CS_HREDRAW, 0, 0,
143       ::LoadCursor (NULL, IDC_ARROW));
144   }
145 #endif
146   return theWClass;
147 }
148
149 //==============================================================================
150 //function : ViewerInit
151 //purpose  : Create the window viewer and initialize all the global variable
152 //==============================================================================
153
154 void ViewerTest::ViewerInit (const Standard_Integer thePxLeft,  const Standard_Integer thePxTop,
155                              const Standard_Integer thePxWidth, const Standard_Integer thePxHeight)
156 {
157   static Standard_Boolean isFirst = Standard_True;
158
159   Standard_Integer aPxLeft   = 0;
160   Standard_Integer aPxTop    = 460;
161   Standard_Integer aPxWidth  = 409;
162   Standard_Integer aPxHeight = 409;
163   if (thePxWidth != 0 && thePxHeight != 0)
164   {
165     aPxLeft   = thePxLeft;
166     aPxTop    = thePxTop;
167     aPxWidth  = thePxWidth;
168     aPxHeight = thePxHeight;
169   }
170
171   if (isFirst)
172   {
173     // Create the Graphic device
174 #ifdef WNT
175     if (GetG3dDevice().IsNull()) GetG3dDevice() = new Graphic3d_WNTGraphicDevice();
176     if (VT_GetWindow().IsNull())
177     {
178       // Create the Graphic device and the window
179       Handle(WNT_GraphicDevice) g_Device = new WNT_GraphicDevice();
180
181       VT_GetWindow() = new WNT_Window (g_Device, "Test3d",
182                                        Handle(WNT_WClass)::DownCast (WClass()),
183                                        WS_OVERLAPPEDWINDOW,
184                                        aPxLeft, aPxTop,
185                                        aPxWidth, aPxHeight,
186                                        Quantity_NOC_BLACK);
187       VT_GetWindow()->SetVirtual (Draw_VirtualWindows);
188     }
189 #else
190     if (GetG3dDevice().IsNull()) GetG3dDevice() =
191       new Graphic3d_GraphicDevice (getenv ("DISPLAY"), Xw_TOM_READONLY);
192     if (VT_GetWindow().IsNull())
193     {
194       VT_GetWindow() = new Xw_Window (GetG3dDevice(),
195                                       "Test3d",
196                                       aPxLeft, aPxTop,
197                                       aPxWidth, aPxHeight,
198                                       Xw_WQ_3DQUALITY,
199                                       Quantity_NOC_BLACK);
200       VT_GetWindow()->SetVirtual (Draw_VirtualWindows);
201     }
202 #endif
203
204     Handle(V3d_Viewer) a3DViewer, a3DCollector;
205     // Viewer and View creation
206
207     TCollection_ExtendedString NameOfWindow("Visu3D");
208
209     a3DViewer = new V3d_Viewer(GetG3dDevice(), NameOfWindow.ToExtString());
210     NameOfWindow = TCollection_ExtendedString("Collector");
211     a3DCollector = new V3d_Viewer(GetG3dDevice(), NameOfWindow.ToExtString());
212     a3DViewer->SetDefaultBackgroundColor(Quantity_NOC_BLACK);
213     a3DCollector->SetDefaultBackgroundColor(Quantity_NOC_STEELBLUE);
214     Handle(NIS_View) aView =
215       Handle(NIS_View)::DownCast(ViewerTest::CurrentView());
216     if ( aView.IsNull() ) {
217       //       Handle (V3d_View) V = a3DViewer->CreateView();
218       aView = new NIS_View (a3DViewer, VT_GetWindow());
219       ViewerTest::CurrentView(aView);
220       TheNISContext()->AttachView (aView);
221     }
222     Handle(V3d_View) a3DViewCol;
223     if ( a3DViewCol.IsNull() ) a3DViewCol    = a3DViewer->CreateView();
224
225     // AIS setup
226     if ( ViewerTest::GetAISContext().IsNull() ) {
227       Handle(AIS_InteractiveContext) C =
228         new AIS_InteractiveContext(a3DViewer,a3DCollector);
229       ViewerTest::SetAISContext(C);
230     }
231
232     // Setup for X11 or NT
233     OSWindowSetup();
234     // Viewer and View creation
235
236     a3DViewer->SetDefaultBackgroundColor(Quantity_NOC_BLACK);
237
238     Handle (V3d_View) V = ViewerTest::CurrentView();
239
240     V->SetDegenerateModeOn();
241 #ifdef OCC120
242     DegenerateMode = V->DegenerateModeIsOn();
243 #endif
244     //    V->SetWindow(VT_GetWindow(), NULL, MyViewProc, NULL);
245
246     V->SetZClippingDepth(0.5);
247     V->SetZClippingWidth(ZCLIPWIDTH/2.);
248     a3DViewer->SetDefaultLights();
249     a3DViewer->SetLightOn();
250
251 #ifndef WNT
252 #if TCL_MAJOR_VERSION  < 8
253     Tk_CreateFileHandler((void*)ConnectionNumber(display),
254       TK_READABLE, VProcessEvents, (ClientData) VT_GetWindow()->XWindow() );
255 #else
256     Tk_CreateFileHandler(ConnectionNumber(display),
257       TK_READABLE, VProcessEvents, (ClientData) VT_GetWindow()->XWindow() );
258 #endif
259 #endif
260
261     isFirst = Standard_False;
262   }
263   VT_GetWindow()->Map();
264 }
265
266 //==============================================================================
267 //function : Vinit
268 //purpose  : Create the window viewer and initialize all the global variable
269 //    Use Tk_CreateFileHandler on UNIX to cath the X11 Viewer event
270 //==============================================================================
271
272 static int VInit (Draw_Interpretor& , Standard_Integer argc, const char** argv)
273 {
274   Standard_Integer aPxLeft   = (argc > 1) ? atoi (argv[1]) : 0;
275   Standard_Integer aPxTop    = (argc > 2) ? atoi (argv[2]) : 0;
276   Standard_Integer aPxWidth  = (argc > 3) ? atoi (argv[3]) : 0;
277   Standard_Integer aPxHeight = (argc > 4) ? atoi (argv[4]) : 0;
278   ViewerTest::ViewerInit (aPxLeft, aPxTop, aPxWidth, aPxHeight);
279   return 0;
280 }
281
282 //==============================================================================
283 //function : ProcessKeyPress
284 //purpose  : Handle KeyPress event from a CString
285 //==============================================================================
286
287 static void ProcessKeyPress( char *buf_ret )
288 {
289   //cout << "KeyPress" << endl;
290   const Handle(V3d_View) aView = ViewerTest::CurrentView();
291   const Handle(NIS_View) aNisView = Handle(NIS_View)::DownCast (aView);
292   // Letter in alphabetic order
293
294   if ( !strcasecmp(buf_ret, "A") ) {
295     // AXO
296     aView->SetProj(V3d_XposYnegZpos);
297   }
298   else if ( !strcasecmp(buf_ret, "D") ) {
299     // Reset
300     aView->Reset();
301   }
302   else if ( !strcasecmp(buf_ret, "F") ) {
303     // FitAll
304     if (aNisView.IsNull())
305       aView->FitAll();
306     else
307       aNisView->FitAll3d();
308   }
309   else if ( !strcasecmp(buf_ret, "H") ) {
310     // HLR
311     cout << "HLR" << endl;
312 #ifdef OCC120
313     if (aView->DegenerateModeIsOn()) ViewerTest::CurrentView()->SetDegenerateModeOff();
314     else aView->SetDegenerateModeOn();
315     DegenerateMode = aView->DegenerateModeIsOn();
316 #else
317     ViewerTest::CurrentView()->SetDegenerateModeOff();
318 #endif
319   }
320   else if ( !strcasecmp(buf_ret, "D") ) {
321     // Reset
322     aView->Reset();
323   }
324   else if ( !strcasecmp(buf_ret, "S") ) {
325     // SHADING
326     cout << "passage en mode 1 (shading pour les shapes)" << endl;
327 #ifndef OCC120
328     ViewerTest::CurrentView()->SetDegenerateModeOn();
329 #endif
330     Handle(AIS_InteractiveContext) Ctx = ViewerTest::GetAISContext();
331     if(Ctx->NbCurrents()==0 ||
332       Ctx->NbSelected()==0)
333       Ctx->SetDisplayMode(AIS_Shaded);
334     else{
335       if(Ctx->HasOpenedContext()){
336         for(Ctx->InitSelected();Ctx->MoreSelected();Ctx->NextSelected())
337           Ctx->SetDisplayMode(Ctx->Interactive(),1,Standard_False);
338       }
339       else{
340         for(Ctx->InitCurrent();Ctx->MoreCurrent();Ctx->NextCurrent())
341           Ctx->SetDisplayMode(Ctx->Current(),1,Standard_False);
342       }
343       Ctx->UpdateCurrentViewer();
344     }
345   }
346   else if ( !strcasecmp(buf_ret, "U") ) {
347     // SHADING
348     cout<<"passage au mode par defaut"<<endl;
349 #ifndef OCC120
350     ViewerTest::CurrentView()->SetDegenerateModeOn();
351 #endif
352     Handle(AIS_InteractiveContext) Ctx = ViewerTest::GetAISContext();
353     if(Ctx->NbCurrents()==0 ||
354       Ctx->NbSelected()==0)
355       Ctx->SetDisplayMode(AIS_WireFrame);
356     else{
357       if(Ctx->HasOpenedContext()){
358         for(Ctx->InitSelected();Ctx->MoreSelected();Ctx->NextSelected())
359           Ctx->UnsetDisplayMode(Ctx->Interactive(),Standard_False);
360       }
361       else{
362         for(Ctx->InitCurrent();Ctx->MoreCurrent();Ctx->NextCurrent())
363           Ctx->UnsetDisplayMode(Ctx->Current(),Standard_False);
364       }
365       Ctx->UpdateCurrentViewer();
366     }
367
368   }
369   else if ( !strcasecmp(buf_ret, "T") ) {
370     // Top
371     aView->SetProj(V3d_Zpos);
372   }
373   else if ( !strcasecmp(buf_ret, "B") ) {
374     // Top
375     aView->SetProj(V3d_Zneg);
376   }
377   else if ( !strcasecmp(buf_ret, "L") ) {
378     // Top
379     aView->SetProj(V3d_Xneg);
380   }
381   else if ( !strcasecmp(buf_ret, "R") ) {
382     // Top
383     aView->SetProj(V3d_Xpos);
384   }
385
386   else if ( !strcasecmp(buf_ret, "W") ) {
387     // WIREFRAME
388 #ifndef OCC120
389     ViewerTest::CurrentView()->SetDegenerateModeOn();
390 #endif
391     cout << "passage en mode 0 (filaire pour les shapes)" << endl;
392 #ifndef OCC120
393     ViewerTest::CurrentView()->SetDegenerateModeOn();
394 #endif
395     Handle(AIS_InteractiveContext) Ctx = ViewerTest::GetAISContext();
396     if(Ctx->NbCurrents()==0 ||
397       Ctx->NbSelected()==0)
398       Ctx->SetDisplayMode(AIS_WireFrame);
399     else{
400       if(Ctx->HasOpenedContext()){
401         for(Ctx->InitSelected();Ctx->MoreSelected();Ctx->NextSelected())
402           Ctx->SetDisplayMode(Ctx->Interactive(),0,Standard_False);
403       }
404       else{
405         for(Ctx->InitCurrent();Ctx->MoreCurrent();Ctx->NextCurrent())
406           Ctx->SetDisplayMode(Ctx->Current(),0,Standard_False);
407       }
408       Ctx->UpdateCurrentViewer();
409     }
410   }
411   else if ( !strcasecmp(buf_ret, "Z") ) {
412     // ZCLIP
413
414     if ( ZClipIsOn ) {
415       cout << "ZClipping OFF" << endl;
416       ZClipIsOn = 0;
417
418       aView->SetZClippingType(V3d_OFF);
419       aView->Redraw();
420     }
421     else {
422       cout << "ZClipping ON" << endl;
423       ZClipIsOn = 1;
424
425       aView->SetZClippingType(V3d_FRONT);
426       aView->Redraw();
427     }
428   }
429   else if ( !strcasecmp(buf_ret, ",") ) {
430     ViewerTest::GetAISContext()->HilightNextDetected(ViewerTest::CurrentView());
431
432
433   }
434   else if ( !strcasecmp(buf_ret, ".") ) {
435     ViewerTest::GetAISContext()->HilightPreviousDetected(ViewerTest::CurrentView());
436   }
437   // Number
438   else{
439     Standard_Integer Num = atoi(buf_ret);
440     if(Num>=0 && Num<=7)
441       ViewerTest::StandardModeActivation(Num);
442   }
443 }
444
445 //==============================================================================
446 //function : ProcessExpose
447 //purpose  : Redraw the View on an Expose Event
448 //==============================================================================
449
450 static void ProcessExpose(  )
451 { //cout << "Expose" << endl;
452   ViewerTest::CurrentView()->Redraw();
453 }
454
455 //==============================================================================
456 //function : ProcessConfigure
457 //purpose  : Resize the View on an Configure Event
458 //==============================================================================
459
460 static void ProcessConfigure()
461 {
462   Handle(V3d_View) V = ViewerTest::CurrentView();
463   V->MustBeResized();
464   V->Update();
465   V->Redraw();
466 }
467
468 //==============================================================================
469 //function : ProcessButton1Press
470 //purpose  : Picking
471 //==============================================================================
472
473 static Standard_Boolean ProcessButton1Press(
474   Standard_Integer ,
475   const char** argv,
476   Standard_Boolean pick,
477   Standard_Boolean shift )
478 {
479   Handle(ViewerTest_EventManager) EM = ViewerTest::CurrentEventManager();
480   if ( pick ) {
481     Standard_Real X, Y, Z;
482
483     ViewerTest::CurrentView()->Convert(X_Motion, Y_Motion, X, Y, Z);
484
485     Draw::Set(argv[1], X);
486     Draw::Set(argv[2], Y);
487     Draw::Set(argv[3], Z);}
488
489   if(shift)
490     EM->ShiftSelect();
491   else
492     EM->Select();
493
494   pick = 0;
495   return pick;
496 }
497
498 //==============================================================================
499 //function : ProcessButton3Press
500 //purpose  : Start Rotation
501 //==============================================================================
502
503 static void ProcessButton3Press()
504
505 { // Start rotation
506   Start_Rot = 1;
507   ViewerTest::CurrentView()->SetDegenerateModeOn();
508   ViewerTest::CurrentView()->StartRotation( X_ButtonPress, Y_ButtonPress );
509
510 }
511 //==============================================================================
512 //function : ProcessButtonRelease
513 //purpose  : Start Rotation
514 //==============================================================================
515
516 static void ProcessButtonRelease()
517
518 { // End rotation
519 #ifdef OCC120
520   if (Start_Rot) {
521     Start_Rot = 0;
522     if (!DegenerateMode) ViewerTest::CurrentView()->SetDegenerateModeOff();
523   }
524 #else
525   Start_Rot = 0;
526   ViewerTest::CurrentView()->SetDegenerateModeOff();
527 #endif
528 }
529
530 //==============================================================================
531 //function : ProcessZClipMotion
532 //purpose  : Zoom
533 //==============================================================================
534
535 void ProcessZClipMotion()
536 {
537   Handle(V3d_View)  a3DView = ViewerTest::CurrentView();
538   if ( Abs(X_Motion - X_ButtonPress) > 2 ) {
539     static Standard_Real CurZPos = 0.;
540
541     //Quantity_Length VDX, VDY;
542     //a3DView->Size(VDX,VDY);
543     //Standard_Real VDZ = a3DView->ZSize();
544     //printf("View size (%lf,%lf,%lf)\n", VDX, VDY, VDZ);
545
546     Quantity_Length dx = a3DView->Convert(X_Motion - X_ButtonPress);
547
548     // Front = Depth + width/2.
549     Standard_Real D = 0.5;
550     Standard_Real W = 0.1;
551
552     CurZPos += (dx);
553
554     D += CurZPos;
555
556     //printf("dx %lf Depth %lf Width %lf\n", dx, D, W);
557
558     a3DView->SetZClippingType(V3d_OFF);
559     a3DView->SetZClippingDepth(D);
560     a3DView->SetZClippingWidth(W);
561     a3DView->SetZClippingType(V3d_FRONT);
562
563     a3DView->Redraw();
564
565     X_ButtonPress = X_Motion;
566     Y_ButtonPress = Y_Motion;
567   }
568 }
569
570 //==============================================================================
571 //function : ProcessControlButton1Motion
572 //purpose  : Zoom
573 //==============================================================================
574
575 static void ProcessControlButton1Motion()
576 {
577   ViewerTest::CurrentView()->Zoom( X_ButtonPress, Y_ButtonPress, X_Motion, Y_Motion);
578
579   X_ButtonPress = X_Motion;
580   Y_ButtonPress = Y_Motion;
581 }
582
583 //==============================================================================
584 //function : ProcessControlButton2Motion
585 //purpose  : Pann
586 //==============================================================================
587
588 static void ProcessControlButton2Motion()
589 {
590   Quantity_Length dx = ViewerTest::CurrentView()->Convert(X_Motion - X_ButtonPress);
591   Quantity_Length dy = ViewerTest::CurrentView()->Convert(Y_Motion - Y_ButtonPress);
592
593   dy = -dy; // Xwindow Y axis is from top to Bottom
594
595   ViewerTest::CurrentView()->Panning( dx, dy );
596
597   X_ButtonPress = X_Motion;
598   Y_ButtonPress = Y_Motion;
599 }
600
601 //==============================================================================
602 //function : ProcessControlButton3Motion
603 //purpose  : Rotation
604 //==============================================================================
605
606 static void ProcessControlButton3Motion()
607 {
608   if ( Start_Rot ) ViewerTest::CurrentView()->Rotation( X_Motion, Y_Motion);
609 }
610
611 //==============================================================================
612 //function : ProcessPointerMotion
613 //purpose  : Rotation
614 //==============================================================================
615
616 static void ProcessMotion()
617 {
618   //pre-hilights detected objects at mouse position
619
620   Handle(ViewerTest_EventManager) EM = ViewerTest::CurrentEventManager();
621   EM->MoveTo(X_Motion, Y_Motion);
622 }
623
624
625 void ViewerTest::GetMousePosition(Standard_Integer& Xpix,Standard_Integer& Ypix)
626 {
627   Xpix = X_Motion;Ypix=Y_Motion;
628 }
629
630 //==============================================================================
631 //function : VAxo
632 //purpose  : Switch to an Axonometric view
633 //Draw arg : No args
634 //==============================================================================
635
636 static int VAxo(Draw_Interpretor& di, Standard_Integer , const char** )
637 { if ( ViewerTest::CurrentView().IsNull() ) {
638   di<<"La commande vinit n'a pas ete appele avant"<<"\n";
639   //  VInit(di, argc, argv);
640 }
641
642 ViewerTest::CurrentView()->SetProj(V3d_XposYnegZpos);
643
644 return 0;
645 }
646
647 //==============================================================================
648 //function : VTop
649 //purpose  : Switch to a Top View
650 //Draw arg : No args
651 //==============================================================================
652
653 static int VTop(Draw_Interpretor& di, Standard_Integer , const char** )
654 {
655
656   if ( ViewerTest::CurrentView().IsNull() ) {
657     di<<"La commande vinit n'a pas ete appele avant"<<"\n";
658
659     //  VInit(di, , argv);
660   }
661
662   ViewerTest::CurrentView()->SetProj(V3d_Zpos);
663   return 0;
664
665 }
666
667 //==============================================================================
668 //function : VHelp
669 //purpose  : Dsiplay help on viewer Keyboead and mouse commands
670 //Draw arg : No args
671 //==============================================================================
672
673 static int VHelp(Draw_Interpretor& di, Standard_Integer , const char** )
674 {
675
676   di << "Q : Quit the application" << "\n";
677
678   di << "========================="<<"\n";
679   di << "F : FitAll" << "\n";
680   di << "T : TopView" << "\n";
681   di << "A : AxonometricView" << "\n";
682   di << "R : ResetView" << "\n";
683
684   di << "========================="<<"\n";
685   di << "S : Shading" << "\n";
686   di << "W : Wireframe" << "\n";
687   di << "H : HidelLineRemoval" << "\n";
688
689   di << "========================="<<"\n";
690   di << "Selection mode "<<"\n";
691   di << "0 : Shape" <<"\n";
692   di << "1 : Vertex" <<"\n";
693   di << "2 : Edge" <<"\n";
694   di << "3 : Wire" <<"\n";
695   di << "4 : Face" <<"\n";
696   di << "5 : Shell" <<"\n";
697   di << "6 : Solid" <<"\n";
698   di << "7 : Compound" <<"\n";
699
700   di << "=========================="<<"\n";
701   di << "D : Remove Selected Object"<<"\n";
702   di << "=========================="<<"\n";
703
704   return 0;
705 }
706
707 Standard_Boolean IsDragged = Standard_False;
708
709 Standard_Integer xx1, yy1, xx2, yy2;
710 //the first and last point in viewer co-ordinates
711
712 Standard_Boolean DragFirst;
713
714
715 #ifdef WNT
716
717 static Standard_Boolean Ppick = 0;
718 static Standard_Integer Pargc = 0;
719 static const char**           Pargv = NULL;
720
721
722 static LRESULT WINAPI AdvViewerWindowProc( HWND hwnd,
723                                           UINT Msg,
724                                           WPARAM wParam,
725                                           LPARAM lParam )
726 {
727   if ( !ViewerTest::CurrentView().IsNull() ) {
728
729     WPARAM fwKeys = wParam;
730
731     switch( Msg ) {
732
733     case WM_LBUTTONUP:
734       IsDragged = Standard_False;
735       if( !DragFirst )
736       {
737         HDC hdc = GetDC( hwnd );
738         HGDIOBJ anObj = SelectObject( hdc, GetStockObject( WHITE_PEN ) );
739         SelectObject( hdc, GetStockObject( HOLLOW_BRUSH ) );
740         SetROP2( hdc, R2_NOT );
741         Rectangle( hdc, xx1, yy1, xx2, yy2 );
742         ReleaseDC( hwnd, hdc );
743
744         const Handle(ViewerTest_EventManager) EM =
745           ViewerTest::CurrentEventManager();
746         if ( fwKeys & MK_SHIFT )
747           EM->ShiftSelect( min( xx1, xx2 ), max( yy1, yy2 ),
748           max( xx1, xx2 ), min( yy1, yy2 ));
749         else
750           EM->Select( min( xx1, xx2 ), max( yy1, yy2 ),
751           max( xx1, xx2 ), min( yy1, yy2 ));
752       }
753       return ViewerWindowProc( hwnd, Msg, wParam, lParam );
754
755     case WM_LBUTTONDOWN:
756       if( fwKeys == MK_LBUTTON || fwKeys == ( MK_LBUTTON | MK_SHIFT ) )
757       {
758         IsDragged = Standard_True;
759         DragFirst = Standard_True;
760         xx1 = LOWORD(lParam);
761         yy1 = HIWORD(lParam);
762       }
763       return ViewerWindowProc( hwnd, Msg, wParam, lParam );
764
765       break;
766
767     case WM_MOUSEMOVE:
768       if( IsDragged )
769       {
770         HDC hdc = GetDC( hwnd );
771
772         HGDIOBJ anObj = SelectObject( hdc, GetStockObject( WHITE_PEN ) );
773         SelectObject( hdc, GetStockObject( HOLLOW_BRUSH ) );
774         SetROP2( hdc, R2_NOT );
775
776         if( !DragFirst )
777           Rectangle( hdc, xx1, yy1, xx2, yy2 );
778
779         DragFirst = Standard_False;
780         xx2 = LOWORD(lParam);
781         yy2 = HIWORD(lParam);
782
783         Rectangle( hdc, xx1, yy1, xx2, yy2 );
784
785         SelectObject( hdc, anObj );
786
787         ReleaseDC( hwnd, hdc );
788       }
789       else
790         return ViewerWindowProc( hwnd, Msg, wParam, lParam );
791       break;
792
793     default:
794       return ViewerWindowProc( hwnd, Msg, wParam, lParam );
795     }
796     return 0;
797   }
798   return ViewerWindowProc( hwnd, Msg, wParam, lParam );
799 }
800
801
802 static LRESULT WINAPI ViewerWindowProc( HWND hwnd,
803                                        UINT Msg,
804                                        WPARAM wParam,
805                                        LPARAM lParam )
806 {
807   /*static Standard_Boolean Ppick = 0;
808   static Standard_Integer Pargc = 0;
809   static char**           Pargv = NULL;*/
810
811   static int Up = 1;
812
813   if ( !ViewerTest::CurrentView().IsNull() ) {
814     PAINTSTRUCT    ps;
815
816     switch( Msg ) {
817     case WM_CLOSE:
818       // do not destroy the window - just hide it!
819       VT_GetWindow()->Unmap();
820       return 0;
821     case WM_PAINT:
822       //cout << "\t WM_PAINT" << endl;
823       BeginPaint(hwnd, &ps);
824       EndPaint(hwnd, &ps);
825       ProcessExpose();
826       break;
827
828     case WM_SIZE:
829       //cout << "\t WM_SIZE" << endl;
830       ProcessConfigure();
831       break;
832
833     case WM_KEYDOWN:
834       //cout << "\t WM_KEYDOWN " << (int) wParam << endl;
835
836       if ( (wParam != VK_SHIFT) && (wParam != VK_CONTROL) ) {
837         char c[2];
838         c[0] = (char) wParam;
839         c[1] = '\0';
840         ProcessKeyPress( c);
841       }
842       break;
843
844     case WM_LBUTTONUP:
845     case WM_MBUTTONUP:
846     case WM_RBUTTONUP:
847       //cout << "\t WM_xBUTTONUP" << endl;
848       Up = 1;
849       ProcessButtonRelease();
850       break;
851
852     case WM_LBUTTONDOWN:
853     case WM_MBUTTONDOWN:
854     case WM_RBUTTONDOWN:
855       {
856         //cout << "\t WM_xBUTTONDOWN" << endl;
857         WPARAM fwKeys = wParam;
858
859         Up = 0;
860
861         X_ButtonPress = LOWORD(lParam);
862         Y_ButtonPress = HIWORD(lParam);
863
864         if ( Msg == WM_LBUTTONDOWN) {
865           if(fwKeys & MK_CONTROL) {
866             Ppick = ProcessButton1Press( Pargc, Pargv, Ppick,  (fwKeys & MK_SHIFT) );
867           } else
868             ProcessButton1Press( Pargc, Pargv, Ppick,  (fwKeys & MK_SHIFT) );
869         }
870         else if ( Msg == WM_RBUTTONDOWN ) {
871           // Start rotation
872           ProcessButton3Press( );
873         }
874       }
875       break;
876
877     case WM_MOUSEMOVE:
878       {
879         //cout << "\t WM_MOUSEMOVE" << endl;
880         WPARAM fwKeys = wParam;
881         X_Motion = LOWORD(lParam);
882         Y_Motion = HIWORD(lParam);
883
884         if ( Up &&
885           fwKeys & ( MK_LBUTTON|MK_MBUTTON|MK_RBUTTON ) ) {
886             Up = 0;
887             X_ButtonPress = LOWORD(lParam);
888             Y_ButtonPress = HIWORD(lParam);
889
890             if ( fwKeys & MK_RBUTTON ) {
891               // Start rotation
892               ProcessButton3Press();
893             }
894           }
895
896           if ( fwKeys & MK_CONTROL ) {
897             if ( fwKeys & MK_LBUTTON ) {
898               ProcessControlButton1Motion();
899             }
900             else if ( fwKeys & MK_MBUTTON ||
901               ((fwKeys&MK_LBUTTON) &&
902               (fwKeys&MK_RBUTTON) ) ){
903                 ProcessControlButton2Motion();
904               }
905             else if ( fwKeys & MK_RBUTTON ) {
906               ProcessControlButton3Motion();
907             }
908           }
909 #ifdef BUG
910           else if ( fwKeys & MK_SHIFT ) {
911             if ( fwKeys & MK_MBUTTON ||
912               ((fwKeys&MK_LBUTTON) &&
913               (fwKeys&MK_RBUTTON) ) ) {
914                 cout << "ProcessZClipMotion()" << endl;
915                 ProcessZClipMotion();
916               }
917           }
918 #endif
919           else
920             if (( fwKeys & MK_MBUTTON || ((fwKeys&MK_LBUTTON) && (fwKeys&MK_RBUTTON) ) )){
921               ProcessZClipMotion();
922             }
923             else {
924               ProcessMotion();
925             }
926       }
927       break;
928
929     default:
930       return( DefWindowProc( hwnd, Msg, wParam, lParam ));
931     }
932     return 0L;
933   }
934
935   return DefWindowProc( hwnd, Msg, wParam, lParam );
936 }
937
938
939
940
941 //==============================================================================
942 //function : ViewerMainLoop
943 //purpose  : Get a Event on the view and dispatch it
944 //==============================================================================
945
946
947 static int ViewerMainLoop(Standard_Integer argc, const char** argv)
948 {
949
950   //cout << "No yet implemented on WNT" << endl;
951   /*static Standard_Boolean Ppick = 0;
952   static Standard_Integer Pargc = 0;
953   static char**           Pargv = NULL;*/
954
955   //Ppick = (argc > 0)? -1 : 0;
956   Ppick = (argc > 0)? 1 : 0;
957   Pargc = argc;
958   Pargv = argv;
959
960   if ( Ppick ) {
961     MSG msg;
962     msg.wParam = 1;
963
964     cout << "Start picking" << endl;
965
966     //while ( Ppick == -1 ) {
967     while ( Ppick == 1 ) {
968       // Wait for a ProcessButton1Press() to toggle pick to 1 or 0
969       if (GetMessage(&msg, NULL, 0, 0) ) {
970         TranslateMessage(&msg);
971         DispatchMessage(&msg);
972       }
973     }
974
975     cout << "Picking done" << endl;
976   }
977
978   return Ppick;
979 }
980
981
982 #else
983
984 int min( int a, int b )
985 {
986   if( a<b )
987     return a;
988   else
989     return b;
990 }
991
992 int max( int a, int b )
993 {
994   if( a>b )
995     return a;
996   else
997     return b;
998 }
999
1000 int ViewerMainLoop(Standard_Integer argc, const char** argv)
1001
1002 { Standard_Boolean pick = argc > 0;
1003
1004 // X11 Event loop
1005
1006 static XEvent report;
1007
1008 XNextEvent( display, &report );
1009 //    cout << "rep type = " << report.type << endl;
1010 //    cout << "rep button = " << report.xbutton.button << endl;
1011
1012 switch ( report.type ) {
1013       case Expose:
1014         {
1015           ProcessExpose();
1016         }
1017         break;
1018       case ConfigureNotify:
1019         {
1020           ProcessConfigure();
1021         }
1022         break;
1023       case KeyPress:
1024         {
1025
1026           KeySym ks_ret ;
1027           char buf_ret[11] ;
1028           int ret_len ;
1029           XComposeStatus status_in_out;
1030
1031           ret_len = XLookupString( ( XKeyEvent *)&report ,
1032             (char *) buf_ret , 10 ,
1033             &ks_ret , &status_in_out ) ;
1034
1035
1036           buf_ret[ret_len] = '\0' ;
1037
1038           if ( ret_len ) {
1039             ProcessKeyPress( buf_ret);
1040           }
1041         }
1042         break;
1043       case ButtonPress:
1044         //  cout << "ButtonPress" << endl;
1045         {
1046           X_ButtonPress = report.xbutton.x;
1047           Y_ButtonPress = report.xbutton.y;
1048
1049           if ( report.xbutton.button == Button1 )
1050             if(  report.xbutton.state & ControlMask )
1051               pick = ProcessButton1Press( argc, argv, pick,
1052               ( report.xbutton.state & ShiftMask) );
1053             else
1054             {
1055               IsDragged = Standard_True;
1056               xx1 = X_ButtonPress;
1057               yy1 = Y_ButtonPress;
1058               DragFirst = Standard_True;
1059             }
1060           else if ( report.xbutton.button == Button3 )
1061             // Start rotation
1062             ProcessButton3Press();
1063         }
1064         break;
1065       case ButtonRelease:
1066         {
1067           //    cout<<"relachement du bouton "<<(report.xbutton.button==3 ? "3": "on s'en fout") <<endl;
1068           //    cout << IsDragged << endl;
1069           //    cout << DragFirst << endl;
1070
1071           if( IsDragged )
1072           {
1073             if( !DragFirst )
1074             {
1075               Aspect_Handle aWindow = VT_GetWindow()->XWindow();
1076               GC gc = XCreateGC( display, aWindow, 0, 0 );
1077               //  XSetFunction( display, gc, GXinvert );
1078               XDrawRectangle( display, aWindow, gc, min( xx1, xx2 ), min( yy1, yy2 ), abs( xx2-xx1 ), abs( yy2-yy1 ) );
1079             }
1080
1081             Handle( AIS_InteractiveContext ) aContext = ViewerTest::GetAISContext();
1082             if( aContext.IsNull() )
1083             {
1084               cout << "The context is null. Please use vinit before createmesh" << endl;
1085               return 0;
1086             }
1087
1088             Standard_Boolean ShiftPressed = ( report.xbutton.state & ShiftMask );
1089             if( report.xbutton.button==1 )
1090               if( DragFirst )
1091                 if( ShiftPressed )
1092                 {
1093                   aContext->ShiftSelect();
1094                   //                   cout << "shift select" << endl;
1095                 }
1096                 else
1097                 {
1098                   aContext->Select();
1099                   //                   cout << "select" << endl;
1100                 }
1101               else
1102                 if( ShiftPressed )
1103                 {
1104                   aContext->ShiftSelect( min( xx1, xx2 ), min( yy1, yy2 ),
1105                     max( xx1, xx2 ), max( yy1, yy2 ),
1106                     ViewerTest::CurrentView());
1107                   //                   cout << "shift select" << endl;
1108                 }
1109                 else
1110                 {
1111                   aContext->Select( min( xx1, xx2 ), min( yy1, yy2 ),
1112                     max( xx1, xx2 ), max( yy1, yy2 ),
1113                     ViewerTest::CurrentView() );
1114                   //                   cout << "select" << endl;
1115                 }
1116             else
1117               ProcessButtonRelease();
1118
1119             IsDragged = Standard_False;
1120           }
1121           else
1122             ProcessButtonRelease();
1123         }
1124         break;
1125       case MotionNotify:
1126         {
1127           //    XEvent dummy;
1128
1129           X_Motion = report.xmotion.x;
1130           Y_Motion = report.xmotion.y;
1131
1132           if( IsDragged )
1133           {
1134             Aspect_Handle aWindow = VT_GetWindow()->XWindow();
1135             GC gc = XCreateGC( display, aWindow, 0, 0 );
1136             XSetFunction( display, gc, GXinvert );
1137
1138             if( !DragFirst )
1139               XDrawRectangle( display, aWindow, gc, min( xx1, xx2 ), min( yy1, yy2 ), abs( xx2-xx1 ), abs( yy2-yy1 ) );
1140
1141             xx2 = X_Motion;
1142             yy2 = Y_Motion;
1143             DragFirst = Standard_False;
1144
1145             //cout << "draw rect : " << xx2 << ", " << yy2 << endl;
1146             XDrawRectangle( display, aWindow, gc, min( xx1, xx2 ), min( yy1, yy2 ), abs( xx2-xx1 ), abs( yy2-yy1 ) );
1147           }
1148           else
1149           {
1150
1151             //cout << "MotionNotify " << X_Motion << "," << Y_Motion << endl;
1152
1153             // remove all the ButtonMotionMask
1154             while( XCheckMaskEvent( display, ButtonMotionMask, &report) ) ;
1155
1156             if ( ZClipIsOn && report.xmotion.state & ShiftMask ) {
1157               if ( Abs(X_Motion - X_ButtonPress) > 2 ) {
1158
1159                 Quantity_Length VDX, VDY;
1160
1161                 ViewerTest::CurrentView()->Size(VDX,VDY);
1162                 Standard_Real VDZ =0 ;
1163                 VDZ = ViewerTest::CurrentView()->ZSize();
1164
1165                 //          printf("%lf,%lf,%lf\n", VDX, VDY, VDZ);
1166                 printf("%f,%f,%f\n", VDX, VDY, VDZ);
1167
1168                 Quantity_Length dx = 0 ;
1169                 dx = ViewerTest::CurrentView()->Convert(X_Motion - X_ButtonPress);
1170
1171                 cout << dx << endl;
1172
1173                 dx = dx / VDX * VDZ;
1174
1175                 cout << dx << endl;
1176
1177                 // Front = Depth + width/2.
1178                 //ViewerTest::CurrentView()->SetZClippingDepth(dx);
1179                 //ViewerTest::CurrentView()->SetZClippingWidth(0.);
1180
1181                 ViewerTest::CurrentView()->Redraw();
1182               }
1183             }
1184
1185             if ( report.xmotion.state & ControlMask ) {
1186               if ( report.xmotion.state & Button1Mask ) {
1187                 ProcessControlButton1Motion();
1188               }
1189               else if ( report.xmotion.state & Button2Mask ) {
1190                 ProcessControlButton2Motion();
1191               }
1192               else if ( report.xmotion.state & Button3Mask ) {
1193                 ProcessControlButton3Motion();
1194               }
1195             }
1196             else {
1197               ProcessMotion();
1198             }
1199           }
1200         }
1201         break;
1202 }
1203
1204
1205 return pick;
1206 }
1207
1208 //==============================================================================
1209 //function : VProcessEvents
1210 //purpose  : call by Tk_CreateFileHandler() to be able to manage the
1211 //       event in the Viewer window
1212 //==============================================================================
1213
1214 static void VProcessEvents(ClientData,int)
1215 {
1216   //cout << "VProcessEvents" << endl;
1217
1218   // test for X Event
1219   while (XPending(display)) {
1220     ViewerMainLoop( 0, NULL);
1221   }
1222 }
1223 #endif
1224
1225 //==============================================================================
1226 //function : OSWindowSetup
1227 //purpose  : Setup for the X11 window to be able to cath the event
1228 //==============================================================================
1229
1230
1231 static void OSWindowSetup()
1232 {
1233 #ifndef WNT
1234   // X11
1235
1236   Window  window   = VT_GetWindow()->XWindow();
1237
1238   Standard_Address theDisplay = GetG3dDevice()->XDisplay();
1239   display = (Display * ) theDisplay;
1240   //  display = (Display *)GetG3dDevice()->XDisplay();
1241
1242   XSynchronize(display, 1);
1243
1244   VT_GetWindow()->Map();
1245
1246   // X11 : For keyboard on SUN
1247   XWMHints wmhints;
1248   wmhints.flags = InputHint;
1249   wmhints.input = 1;
1250
1251   XSetWMHints( display, window, &wmhints);
1252
1253   XSelectInput( display, window,  ExposureMask | KeyPressMask |
1254     ButtonPressMask | ButtonReleaseMask |
1255     StructureNotifyMask |
1256     PointerMotionMask |
1257     Button1MotionMask | Button2MotionMask |
1258     Button3MotionMask
1259     );
1260
1261   XSynchronize(display, 0);
1262
1263 #else
1264   // WNT
1265 #endif
1266
1267 }
1268
1269
1270 //==============================================================================
1271 //function : VFit
1272
1273 //purpose  : Fitall, no DRAW arguments
1274 //Draw arg : No args
1275 //==============================================================================
1276
1277 static int VFit(Draw_Interpretor& , Standard_Integer , const char** )
1278 {
1279   const Handle(V3d_View) aView = ViewerTest::CurrentView();
1280   Handle(NIS_View) V = Handle(NIS_View)::DownCast(aView);
1281   if (V.IsNull() == Standard_False) {
1282     V->FitAll3d();
1283   } else if (aView.IsNull() == Standard_False) {
1284     aView->FitAll();
1285   }
1286   return 0;
1287 }
1288
1289 //==============================================================================
1290 //function : VZFit
1291 //purpose  : ZFitall, no DRAW arguments
1292 //Draw arg : No args
1293 //==============================================================================
1294
1295 static int VZFit(Draw_Interpretor& , Standard_Integer , const char** )
1296 {
1297   Handle(V3d_View) V = ViewerTest::CurrentView();
1298   if ( !V.IsNull() ) V->ZFitAll(); return 0; }
1299
1300
1301 static int VRepaint(Draw_Interpretor& , Standard_Integer , const char** )
1302 {
1303   Handle(V3d_View) V = ViewerTest::CurrentView();
1304   if ( !V.IsNull() ) V->Redraw(); return 0;
1305 }
1306
1307
1308 //==============================================================================
1309 //function : VClear
1310 //purpose  : Remove all the object from the viewer
1311 //Draw arg : No args
1312 //==============================================================================
1313
1314 static int VClear(Draw_Interpretor& , Standard_Integer , const char** )
1315 {
1316   Handle(V3d_View) V = ViewerTest::CurrentView();
1317   if(!V.IsNull())
1318     ViewerTest::Clear();
1319   return 0;
1320 }
1321
1322 //==============================================================================
1323 //function : VPick
1324 //purpose  :
1325 //==============================================================================
1326
1327 static int VPick(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
1328 { if (ViewerTest::CurrentView().IsNull() ) return 1;
1329
1330 if ( argc < 4 ) {
1331   di << argv[0] << "Invalid number of arguments" << "\n";
1332   return 1;
1333 }
1334
1335 while (ViewerMainLoop( argc, argv)) {
1336 }
1337
1338 return 0;
1339 }
1340
1341
1342
1343 //==============================================================================
1344 //function : InitViewerTest
1345 //purpose  : initialisation de toutes les variables static de  ViewerTest (dp)
1346 //==============================================================================
1347
1348 void ViewerTest_InitViewerTest (const Handle(AIS_InteractiveContext)& context)
1349 {
1350   Handle(V3d_Viewer) viewer = context->CurrentViewer();
1351   ViewerTest::SetAISContext(context);
1352   viewer->InitActiveViews();
1353   Handle(V3d_View) view = viewer->ActiveView();
1354   if (viewer->MoreActiveViews()) ViewerTest::CurrentView(view);
1355   ViewerTest::ResetEventManager();
1356   Handle(Aspect_GraphicDevice) device = viewer->Device();
1357   Handle(Aspect_Window) window = view->Window();
1358 #ifndef WNT
1359   // X11
1360   VT_GetWindow() = Handle(Xw_Window)::DownCast(window);
1361   GetG3dDevice() = Handle(Graphic3d_GraphicDevice)::DownCast(device);
1362   OSWindowSetup();
1363   static int first = 1;
1364   if ( first ) {
1365 #if TCL_MAJOR_VERSION  < 8
1366     Tk_CreateFileHandler((void*)ConnectionNumber(display),
1367       TK_READABLE, VProcessEvents, (ClientData) 0);
1368 #else
1369     Tk_CreateFileHandler(ConnectionNumber(display),
1370       TK_READABLE, VProcessEvents, (ClientData) 0);
1371 #endif
1372     first = 0;
1373   }
1374 #endif
1375 }
1376
1377
1378 //==============================================================================
1379 //function : VSetBg
1380 //purpose  : Load image as background
1381 //==============================================================================
1382
1383 static int VSetBg(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
1384 {
1385   if (argc < 2 || argc > 3)
1386   {
1387     di << "Usage : " << argv[0] << " imagefile [filltype] : Load image as background" << "\n";
1388     di << "filltype can be one of CENTERED, TILED, STRETCH, NONE" << "\n";
1389     return 1;
1390   }
1391
1392   Handle(AIS_InteractiveContext) AISContext = ViewerTest::GetAISContext();
1393   if(AISContext.IsNull())
1394   {
1395     di << "use 'vinit' command before " << argv[0] << "\n";
1396     return 1;
1397   }
1398
1399   Aspect_FillMethod aFillType = Aspect_FM_CENTERED;
1400   if (argc == 3)
1401   {
1402     const char* szType = argv[2];
1403     if      (strcmp(szType, "NONE"    ) == 0) aFillType = Aspect_FM_NONE;
1404     else if (strcmp(szType, "CENTERED") == 0) aFillType = Aspect_FM_CENTERED;
1405     else if (strcmp(szType, "TILED"   ) == 0) aFillType = Aspect_FM_TILED;
1406     else if (strcmp(szType, "STRETCH" ) == 0) aFillType = Aspect_FM_STRETCH;
1407     else
1408     {
1409       di << "Wrong fill type : " << szType << "\n";
1410       di << "Must be one of CENTERED, TILED, STRETCH, NONE" << "\n";
1411       return 1;
1412     }
1413   }
1414
1415   Handle(V3d_View) V3dView = ViewerTest::CurrentView();
1416   V3dView->SetBackgroundImage(argv[1], aFillType, Standard_True);
1417
1418   return 0;
1419 }
1420
1421 //==============================================================================
1422 //function : VSetBgMode
1423 //purpose  : Change background image fill type
1424 //==============================================================================
1425
1426 static int VSetBgMode(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
1427 {
1428   if (argc != 2)
1429   {
1430     di << "Usage : " << argv[0] << " filltype : Change background image mode" << "\n";
1431     di << "filltype must be one of CENTERED, TILED, STRETCH, NONE" << "\n";
1432     return 1;
1433   }
1434
1435   Handle(AIS_InteractiveContext) AISContext = ViewerTest::GetAISContext();
1436   if(AISContext.IsNull())
1437   {
1438     di << "use 'vinit' command before " << argv[0] << "\n";
1439     return 1;
1440   }
1441
1442   Aspect_FillMethod aFillType;
1443   if (argc == 2)
1444   {
1445     const char* szType = argv[1];
1446     if      (strcmp(szType, "NONE"    ) == 0) aFillType = Aspect_FM_NONE;
1447     else if (strcmp(szType, "CENTERED") == 0) aFillType = Aspect_FM_CENTERED;
1448     else if (strcmp(szType, "TILED"   ) == 0) aFillType = Aspect_FM_TILED;
1449     else if (strcmp(szType, "STRETCH" ) == 0) aFillType = Aspect_FM_STRETCH;
1450     else
1451     {
1452       di << "Wrong fill type : " << szType << "\n";
1453       di << "Must be one of CENTERED, TILED, STRETCH, NONE" << "\n";
1454       return 1;
1455     }
1456   }
1457
1458   Handle(V3d_View) V3dView = ViewerTest::CurrentView();
1459   V3dView->SetBgImageStyle(aFillType, Standard_True);
1460
1461   return 0;
1462 }
1463
1464 //==============================================================================
1465 //function : VSetGradientBg
1466 //purpose  : Mount gradient background
1467 //==============================================================================
1468 static int VSetGradientBg(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
1469 {
1470   if (argc != 8 )
1471   {
1472     di << "Usage : " << argv[0] << " R1 G1 B1 R2 G2 B2 Type : Mount gradient background" << "\n";
1473     di << "R1,G1,B1,R2,G2,B2 = [0..255]" << "\n";
1474     di << "Type must be one of 0 = NONE, 1 = HOR, 2 = VER, 3 = DIAG1, 4 = DIAG2" << "\n";
1475     di << "                    5 = CORNER1, 6 = CORNER2, 7 = CORNER3, 8 = CORNER4" << "\n";
1476     return 1;
1477   }
1478
1479   Handle(AIS_InteractiveContext) AISContext = ViewerTest::GetAISContext();
1480   if(AISContext.IsNull())
1481   {
1482     di << "use 'vinit' command before " << argv[0] << "\n";
1483     return 1;
1484   }
1485   if (argc == 8)
1486   {
1487
1488     Standard_Real R1 = atof(argv[1])/255.;
1489     Standard_Real G1 = atof(argv[2])/255.;
1490     Standard_Real B1 = atof(argv[3])/255.;
1491     Quantity_Color aColor1(R1,G1,B1,Quantity_TOC_RGB);
1492
1493     Standard_Real R2 = atof(argv[4])/255.;
1494     Standard_Real G2 = atof(argv[5])/255.;
1495     Standard_Real B2 = atof(argv[6])/255.;
1496
1497     Quantity_Color aColor2(R2,G2,B2,Quantity_TOC_RGB);
1498     int aType = atoi(argv[7]);
1499     if( aType < 0 || aType > 8 )
1500     {
1501       di << "Wrong fill type " << "\n";
1502       di << "Must be one of 0 = NONE, 1 = HOR, 2 = VER, 3 = DIAG1, 4 = DIAG2" << "\n";
1503       di << "               5 = CORNER1, 6 = CORNER2, 7 = CORNER3, 8 = CORNER4" << "\n";
1504       return 1;
1505     }
1506
1507     Aspect_GradientFillMethod aMethod = Aspect_GradientFillMethod(aType);
1508
1509     Handle(V3d_View) V3dView = ViewerTest::CurrentView();
1510     V3dView->SetBgGradientColors( aColor1, aColor2, aMethod, 1);
1511   }
1512
1513   return 0;
1514 }
1515
1516 //==============================================================================
1517 //function : VSetGradientBgMode
1518 //purpose  : Change gradient background fill style
1519 //==============================================================================
1520 static int VSetGradientBgMode(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
1521 {
1522   if (argc != 2 )
1523   {
1524     di << "Usage : " << argv[0] << " Type : Change gradient background fill type" << "\n";
1525     di << "Type must be one of 0 = NONE, 1 = HOR, 2 = VER, 3 = DIAG1, 4 = DIAG2" << "\n";
1526     di << "                    5 = CORNER1, 6 = CORNER2, 7 = CORNER3, 8 = CORNER4" << "\n";
1527     return 1;
1528   }
1529
1530   Handle(AIS_InteractiveContext) AISContext = ViewerTest::GetAISContext();
1531   if(AISContext.IsNull())
1532   {
1533     di << "use 'vinit' command before " << argv[0] << "\n";
1534     return 1;
1535   }
1536   if (argc == 2)
1537   {
1538     int aType = atoi(argv[1]);
1539     if( aType < 0 || aType > 8 )
1540     {
1541       di << "Wrong fill type " << "\n";
1542       di << "Must be one of 0 = NONE, 1 = HOR, 2 = VER, 3 = DIAG1, 4 = DIAG2" << "\n";
1543       di << "               5 = CORNER1, 6 = CORNER2, 7 = CORNER3, 8 = CORNER4" << "\n";
1544       return 1;
1545     }
1546
1547     Aspect_GradientFillMethod aMethod = Aspect_GradientFillMethod(aType);
1548
1549     Handle(V3d_View) V3dView = ViewerTest::CurrentView();
1550     V3dView->SetBgGradientStyle( aMethod, 1 );
1551   }
1552
1553   return 0;
1554 }
1555
1556 //==============================================================================
1557 //function : VSetColorBg
1558 //purpose  : Set color background
1559 //==============================================================================
1560 static int VSetColorBg(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
1561 {
1562   if (argc != 4 )
1563   {
1564     di << "Usage : " << argv[0] << " R G B : Set color background" << "\n";
1565     di << "R,G,B = [0..255]" << "\n";
1566     return 1;
1567   }
1568
1569   Handle(AIS_InteractiveContext) AISContext = ViewerTest::GetAISContext();
1570   if(AISContext.IsNull())
1571   {
1572     di << "use 'vinit' command before " << argv[0] << "\n";
1573     return 1;
1574   }
1575   if (argc == 4)
1576   {
1577
1578     Standard_Real R = atof(argv[1])/255.;
1579     Standard_Real G = atof(argv[2])/255.;
1580     Standard_Real B = atof(argv[3])/255.;
1581     Quantity_Color aColor(R,G,B,Quantity_TOC_RGB);
1582
1583     Handle(V3d_View) V3dView = ViewerTest::CurrentView();
1584     V3dView->SetBackgroundColor( aColor );
1585     V3dView->Update();
1586   }
1587
1588   return 0;
1589 }
1590
1591 //==============================================================================
1592 //function : VScale
1593 //purpose  : View Scaling
1594 //==============================================================================
1595
1596 static int VScale(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
1597 {
1598   Handle(V3d_View) V3dView = ViewerTest::CurrentView();
1599   if ( V3dView.IsNull() ) return 1;
1600
1601   if ( argc != 4 ) {
1602     di << argv[0] << "Invalid number of arguments" << "\n";
1603     return 1;
1604   }
1605   V3dView->SetAxialScale( atof(argv[1]),  atof(argv[2]),  atof(argv[3]) );
1606   return 0;
1607 }
1608 //==============================================================================
1609 //function : VTestZBuffTrihedron
1610 //purpose  : Displays a V3d_ZBUFFER'ed trihedron at the bottom left corner of the view
1611 //==============================================================================
1612
1613 static int VTestZBuffTrihedron(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
1614 {
1615   Handle(V3d_View) V3dView = ViewerTest::CurrentView();
1616   if ( V3dView.IsNull() ) return 1;
1617
1618   // Set up default trihedron parameters
1619   V3dView->ZBufferTriedronSetup();
1620   V3dView->TriedronDisplay( Aspect_TOTP_LEFT_LOWER, Quantity_NOC_WHITE, 0.1, V3d_ZBUFFER );
1621   V3dView->ZFitAll();
1622   return 0;
1623 }
1624
1625 //==============================================================================
1626 //function : VRotate
1627 //purpose  : Camera Rotating
1628 //==============================================================================
1629
1630 static int VRotate( Draw_Interpretor& di, Standard_Integer argc, const char** argv ) {
1631   Handle(V3d_View) V3dView = ViewerTest::CurrentView();
1632   if ( V3dView.IsNull() ) {
1633     return 1;
1634   }
1635
1636   if ( argc == 4 ) {
1637     V3dView->Rotate( atof(argv[1]), atof(argv[2]), atof(argv[3]) );
1638     return 0;
1639   } else if ( argc == 7 ) {
1640     V3dView->Rotate( atof(argv[1]), atof(argv[2]), atof(argv[3]), atof(argv[4]), atof(argv[5]), atof(argv[6]) );
1641     return 0;
1642   } else {
1643     di << argv[0] << " Invalid number of arguments" << "\n";
1644     return 1;
1645   }
1646 }
1647
1648 //==============================================================================
1649 //function : VZoom
1650 //purpose  : View zoom in / out (relative to current zoom)
1651 //==============================================================================
1652
1653 static int VZoom( Draw_Interpretor& di, Standard_Integer argc, const char** argv ) {
1654   Handle(V3d_View) V3dView = ViewerTest::CurrentView();
1655   if ( V3dView.IsNull() ) {
1656     return 1;
1657   }
1658
1659   if ( argc == 2 ) {
1660     Standard_Real coef = atof(argv[1]);
1661     if ( coef <= 0.0 ) {
1662       di << argv[1] << "Invalid value" << "\n";
1663       return 1;
1664     }
1665     V3dView->SetZoom( atof(argv[1]) );
1666     return 0;
1667   } else {
1668     di << argv[0] << " Invalid number of arguments" << "\n";
1669     return 1;
1670   }
1671 }
1672
1673 //==============================================================================
1674 //function : VPan
1675 //purpose  : View panning (in pixels)
1676 //==============================================================================
1677
1678 static int VPan( Draw_Interpretor& di, Standard_Integer argc, const char** argv ) {
1679   Handle(V3d_View) V3dView = ViewerTest::CurrentView();
1680   if ( V3dView.IsNull() ) return 1;
1681
1682   if ( argc == 3 ) {
1683     V3dView->Pan( atoi(argv[1]), atoi(argv[2]) );
1684     return 0;
1685   } else {
1686     di << argv[0] << " Invalid number of arguments" << "\n";
1687     return 1;
1688   }
1689 }
1690
1691
1692 //==============================================================================
1693 //function : VExport
1694 //purpose  : Export the view to a vector graphic format (PS, EMF, PDF)
1695 //==============================================================================
1696
1697 static int VExport(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
1698 {
1699   Handle(V3d_View) V3dView = ViewerTest::CurrentView();
1700   if (V3dView.IsNull())
1701     return 1;
1702
1703   if (argc == 1)
1704   {
1705     std::cout << "Usage: " << argv[0] << " Filename [Format]\n";
1706     return 1;
1707   }
1708
1709   Graphic3d_ExportFormat anExpFormat = Graphic3d_EF_PDF;
1710   TCollection_AsciiString aFormatStr;
1711
1712   TCollection_AsciiString aFileName (argv[1]);
1713   Standard_Integer aLen = aFileName.Length();
1714
1715   if (argc > 2)
1716   {
1717     aFormatStr = TCollection_AsciiString (argv[2]);
1718   }
1719   else if (aLen >= 4)
1720   {
1721     if (aFileName.Value (aLen - 2) == '.')
1722     {
1723       aFormatStr = aFileName.SubString (aLen - 1, aLen);
1724     }
1725     else if (aFileName.Value (aLen - 3) == '.')
1726     {
1727       aFormatStr = aFileName.SubString (aLen - 2, aLen);
1728     }
1729     else
1730     {
1731       std::cout << "Export format couln't be detected from filename '" << argv[1] << "'\n";
1732       return 1;
1733     }
1734   }
1735   else
1736   {
1737     std::cout << "Export format couln't be detected from filename '" << argv[1] << "'\n";
1738     return 1;
1739   }
1740
1741   aFormatStr.UpperCase();
1742   if (aFormatStr == "PS")
1743     anExpFormat = Graphic3d_EF_PostScript;
1744   else if (aFormatStr == "EPS")
1745     anExpFormat = Graphic3d_EF_EnhPostScript;
1746   else if (aFormatStr == "TEX")
1747     anExpFormat = Graphic3d_EF_TEX;
1748   else if (aFormatStr == "PDF")
1749     anExpFormat = Graphic3d_EF_PDF;
1750   else if (aFormatStr == "SVG")
1751     anExpFormat = Graphic3d_EF_SVG;
1752   else if (aFormatStr == "PGF")
1753     anExpFormat = Graphic3d_EF_PGF;
1754   else if (aFormatStr == "EMF")
1755     anExpFormat = Graphic3d_EF_EMF;
1756   else
1757   {
1758     std::cout << "Invalid export format '" << aFormatStr << "'\n";
1759     return 1;
1760   }
1761
1762   if (!V3dView->View()->Export (argv[1], anExpFormat))
1763   {
1764     std::cout << "Export failed!\n";
1765     return 1;
1766   }
1767   return 0;
1768 }
1769
1770 //==============================================================================
1771 //function : VColorScale
1772 //purpose  : representation color scale
1773 //==============================================================================
1774 #include <V3d_ColorScale.hxx>
1775
1776 static int VColorScale (Draw_Interpretor& di, Standard_Integer argc, const char ** argv)
1777 {
1778   if ( argc != 1 && argc != 4 && argc != 5 && argc != 6 && argc != 8 )
1779   {
1780     di << "Usage : " << argv[0] << " [RangeMin = 0 RangeMax = 100 Intervals = 10 HeightFont = 16 Position = Right X = 0 Y = 0]  " << "\n";
1781     return 1;
1782   }
1783
1784   Handle(AIS_InteractiveContext) aContext = ViewerTest::GetAISContext();
1785   if(aContext.IsNull()) {
1786     di << argv[0] << " ERROR : use 'vinit' command before " << "\n";
1787     return -1;
1788   }
1789
1790   Standard_Real minRange = 0. , maxRange = 100. ;
1791
1792   Standard_Integer numIntervals = 10 ;
1793   Standard_Real textHeight = 16. ;
1794   Aspect_TypeOfColorScalePosition position = Aspect_TOCSP_RIGHT;
1795   Standard_Real X = 0., Y = 0. ;
1796
1797   if ( argc < 9 )
1798   {
1799      if( argc > 3 )
1800      {
1801        minRange = atof( argv[1] );
1802        maxRange = atof( argv[2] );
1803        numIntervals = atoi( argv[3] );
1804      }
1805      if ( argc > 4 )
1806        textHeight = atof( argv[4] );
1807      if ( argc > 5 )
1808        position = (Aspect_TypeOfColorScalePosition)atoi( argv[5] );
1809      if ( argc > 7 )
1810      {
1811        X = atof( argv[6] );
1812        Y = atof( argv[7] );
1813      }
1814   }
1815   Handle(V3d_View) curView = ViewerTest::CurrentView( );
1816   if ( curView.IsNull( ) )
1817     return 1;
1818   Handle(Aspect_ColorScale) aCSV = curView->ColorScale( );
1819   Handle(V3d_ColorScale) aCS = ( Handle( V3d_ColorScale )::DownCast( aCSV ) );
1820   if( ! aCS.IsNull( ) )
1821   {
1822     aCS->SetPosition( X , Y );
1823     aCS->SetHeight( 0.95) ;
1824     aCS->SetTextHeight( textHeight );
1825     aCS->SetRange( minRange , maxRange );
1826     aCS->SetNumberOfIntervals( numIntervals );
1827     aCS->SetLabelPosition( position );
1828     if( !curView->ColorScaleIsDisplayed() )
1829       curView->ColorScaleDisplay( );
1830   }
1831   return 0;
1832 }
1833
1834 //==============================================================================
1835 //function : VGraduatedTrihedron
1836 //purpose  : Displays a graduated trihedron
1837 //==============================================================================
1838
1839 static void AddMultibyteString (TCollection_ExtendedString &name, const char *arg)
1840 {
1841   const char *str = arg;
1842   while (*str)
1843   {
1844     unsigned short c1 = *str++;
1845     unsigned short c2 = *str++;
1846     if (!c1 || !c2) break;
1847     name += (Standard_ExtCharacter)((c1 << 8) | c2);
1848   }
1849 }
1850
1851 static int VGraduatedTrihedron(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
1852 {
1853   // Check arguments
1854   if (argc != 2 && argc < 5)
1855   {
1856     di<<"Error: "<<argv[0]<<" - invalid number of arguments\n";
1857     di<<"Usage: type help "<<argv[0]<<"\n";
1858     return 1; //TCL_ERROR
1859   }
1860
1861   Handle(V3d_View) aV3dView = ViewerTest::CurrentView();
1862
1863   // Create 3D view if it doesn't exist
1864   if ( aV3dView.IsNull() )
1865   {
1866     ViewerTest::ViewerInit(); 
1867     aV3dView = ViewerTest::CurrentView();
1868     if( aV3dView.IsNull() )
1869     {
1870       di << "Error: Cannot create a 3D view\n";
1871       return 1; //TCL_ERROR
1872     }
1873   }
1874
1875   // Erase (==0) or display (!=0)
1876   const int display = atoi(argv[1]);
1877
1878   if (display)
1879   {
1880     // Text font
1881     TCollection_AsciiString font;
1882     if (argc < 6)
1883       font.AssignCat("Courier");
1884     else
1885       font.AssignCat(argv[5]);
1886
1887     // Text is multibyte
1888     const Standard_Boolean isMultibyte = (argc < 7)? Standard_False : (atoi(argv[6]) != 0);
1889
1890     // Set axis names
1891     TCollection_ExtendedString xname, yname, zname;
1892     if (argc >= 5)
1893     {
1894       if (isMultibyte)
1895       {
1896         AddMultibyteString(xname, argv[2]);
1897         AddMultibyteString(yname, argv[3]);
1898         AddMultibyteString(zname, argv[4]);
1899       }
1900       else
1901       {
1902         xname += argv[2];
1903         yname += argv[3];
1904         zname += argv[4];
1905       }
1906     }
1907     else
1908     {
1909       xname += "X (mm)";
1910       yname += "Y (mm)";
1911       zname += "Z (mm)";
1912     }
1913
1914     aV3dView->GraduatedTrihedronDisplay(xname, yname, zname,
1915                                         Standard_True/*xdrawname*/, Standard_True/*ydrawname*/, Standard_True/*zdrawname*/,
1916                                         Standard_True/*xdrawvalues*/, Standard_True/*ydrawvalues*/, Standard_True/*zdrawvalues*/,
1917                                         Standard_True/*drawgrid*/,
1918                                         Standard_True/*drawaxes*/,
1919                                         5/*nbx*/, 5/*nby*/, 5/*nbz*/,
1920                                         10/*xoffset*/, 10/*yoffset*/, 10/*zoffset*/,
1921                                         30/*xaxisoffset*/, 30/*yaxisoffset*/, 30/*zaxisoffset*/,
1922                                         Standard_True/*xdrawtickmarks*/, Standard_True/*ydrawtickmarks*/, Standard_True/*zdrawtickmarks*/,
1923                                         10/*xtickmarklength*/, 10/*ytickmarklength*/, 10/*ztickmarklength*/,
1924                                         Quantity_NOC_WHITE/*gridcolor*/,
1925                                         Quantity_NOC_RED/*xnamecolor*/,Quantity_NOC_GREEN/*ynamecolor*/,Quantity_NOC_BLUE1/*znamecolor*/,
1926                                         Quantity_NOC_RED/*xcolor*/,Quantity_NOC_GREEN/*ycolor*/,Quantity_NOC_BLUE1/*zcolor*/,font);
1927   }
1928   else
1929     aV3dView->GraduatedTrihedronErase();
1930
1931   ViewerTest::GetAISContext()->UpdateCurrentViewer();
1932   aV3dView->Redraw();
1933
1934   return 0;
1935 }
1936
1937 //==============================================================================
1938 //function : VPrintView
1939 //purpose  : Test printing algorithm, print the view to image file with given
1940 //           width and height. Printing implemented only for WNT.
1941 //==============================================================================
1942 static int VPrintView (Draw_Interpretor& di, Standard_Integer argc, 
1943                        const char** argv)
1944 {
1945 #ifndef WNT
1946   di << "Printing implemented only for wnt!\n";
1947   return 1;
1948 #else
1949
1950   Handle(AIS_InteractiveContext) aContextAIS = NULL;
1951   Handle(V3d_View) aView = NULL;
1952   aContextAIS = ViewerTest::GetAISContext();
1953   if (!aContextAIS.IsNull())
1954   {
1955     const Handle(V3d_Viewer)& Vwr = aContextAIS->CurrentViewer();
1956     Vwr->InitActiveViews();
1957     if(Vwr->MoreActiveViews())
1958       aView = Vwr->ActiveView();
1959   }
1960
1961   // check for errors
1962   if (aView.IsNull())
1963   {
1964     di << "Call vinit before!\n";
1965     return 1;
1966   }
1967   else if (argc < 4)
1968   {
1969     di << "Use: " << argv[0];
1970     di << " width height filename [print algo=0]\n";
1971     di << "width, height of the intermediate buffer for operation\n";
1972     di << "algo : {0|1}\n";
1973     di << "        0 - stretch algorithm\n";
1974     di << "        1 - tile algorithm\n";
1975     di << "test printing algorithms into an intermediate buffer\n";
1976     di << "with saving output to an image file\n";
1977     return 1;
1978   }
1979
1980   // get the input params
1981   Standard_Integer aWidth  = atoi (argv[1]);
1982   Standard_Integer aHeight = atoi (argv[2]);
1983   Standard_Integer aMode   = 0;
1984   TCollection_AsciiString aFileName = TCollection_AsciiString (argv[3]);
1985   if (argc==5)
1986     aMode = atoi (argv[4]);
1987
1988   // check the input parameters
1989   if (aWidth <= 0 || aHeight <= 0)
1990   {
1991     di << "Width and height must be positive values!\n";
1992     return 1;
1993   }
1994   if (aMode != 0 && aMode != 1)
1995     aMode = 0;
1996
1997   Image_CRawBufferData aRawBuffer;
1998   HDC anDC = CreateCompatibleDC(0);
1999
2000   // define compatible bitmap
2001   BITMAPINFO aBitmapData;
2002   memset (&aBitmapData, 0, sizeof (BITMAPINFOHEADER));
2003   aBitmapData.bmiHeader.biSize          = sizeof (BITMAPINFOHEADER);
2004   aBitmapData.bmiHeader.biWidth         = aWidth ;
2005   aBitmapData.bmiHeader.biHeight        = aHeight;
2006   aBitmapData.bmiHeader.biPlanes        = 1;
2007   aBitmapData.bmiHeader.biBitCount      = 24;
2008   aBitmapData.bmiHeader.biXPelsPerMeter = 0;
2009   aBitmapData.bmiHeader.biYPelsPerMeter = 0;
2010   aBitmapData.bmiHeader.biClrUsed       = 0;
2011   aBitmapData.bmiHeader.biClrImportant  = 0;
2012   aBitmapData.bmiHeader.biCompression   = BI_RGB;
2013   aBitmapData.bmiHeader.biSizeImage     = 0;
2014
2015   // Create Device Independent Bitmap
2016   HBITMAP aMemoryBitmap = CreateDIBSection (anDC, &aBitmapData, DIB_RGB_COLORS,
2017                                             &aRawBuffer.dataPtr, NULL, 0);
2018   HGDIOBJ anOldBitmap   = SelectObject(anDC, aMemoryBitmap);
2019
2020   Standard_Boolean isSaved = Standard_False, isPrinted = Standard_False;
2021   if (aRawBuffer.dataPtr != 0)
2022   {    
2023     if (aMode == 0)
2024       isPrinted = aView->Print(anDC,1,1,0,Aspect_PA_STRETCH);
2025     else
2026       isPrinted = aView->Print(anDC,1,1,0,Aspect_PA_TILE);
2027
2028     // succesfully printed into an intermediate buffer
2029     if (isPrinted)
2030     {
2031       Handle(Image_PixMap) anImageBitmap =
2032                          new Image_PixMap ((Standard_PByte)aRawBuffer.dataPtr,
2033                                            aWidth, aHeight,
2034                                            aWidth*3 + aWidth%4, 24, 0);
2035       isSaved = anImageBitmap->Dump(aFileName.ToCString());
2036     }
2037     else
2038     {
2039       di << "Print operation failed due to printing errors or\n";
2040       di << "insufficient memory available\n";
2041       di << "Please, try to use smaller dimensions for this test\n";
2042       di << "command, as it allocates intermediate buffer for storing\n";
2043       di << "the result\n";
2044     }
2045   }
2046   else
2047   {
2048     di << "Can't allocate memory for intermediate buffer\n";
2049     di << "Please use smaller dimensions\n";
2050   }
2051
2052   if (aMemoryBitmap)
2053   {
2054     SelectObject (anDC, anOldBitmap);
2055     DeleteObject (aMemoryBitmap);
2056     DeleteDC(anDC);
2057   }
2058
2059   if (!isSaved)
2060   {
2061     di << "Save to file operation failed. This operation may fail\n";
2062     di << "if you don't have enough available memory, then you can\n";
2063     di << "use smaller dimensions for the output file\n";
2064     return 1;
2065   }
2066
2067   return 0;
2068
2069 #endif
2070 }
2071
2072 //==============================================================================
2073 //function : VZLayer
2074 //purpose  : Test z layer operations for v3d viewer
2075 //==============================================================================
2076 static int VZLayer (Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2077 {
2078   Handle(AIS_InteractiveContext) aContextAIS = ViewerTest::GetAISContext ();
2079   if (aContextAIS.IsNull())
2080   {
2081     di << "Call vinit before!\n";
2082     return 1;
2083   }
2084   else if (argc < 2)
2085   {
2086     di << "Use: vzlayer " << argv[0];
2087     di << " add/del/get [id]\n";
2088     di << " add - add new z layer to viewer and print its id\n";
2089     di << " del - del z layer by its id\n";
2090     di << " get - print sequence of z layers in increasing order of their overlay level\n";
2091     di << "id - the layer identificator value defined when removing z layer\n";
2092     return 1;
2093   }
2094
2095   const Handle(V3d_Viewer)& aViewer = aContextAIS->CurrentViewer();
2096   if (aViewer.IsNull())
2097   {
2098     di << "No active viewer!\n";
2099     return 1;
2100   }
2101
2102   // perform operation
2103   TCollection_AsciiString anOp = TCollection_AsciiString (argv[1]);
2104   if (anOp == "add")
2105   {
2106     Standard_Integer aNewId;
2107     if (!aViewer->AddZLayer (aNewId))
2108     {
2109       di << "Impossible to add new z layer!\n";
2110       return 1;
2111     }
2112
2113     di << "New z layer added with index: " << aNewId << "\n";
2114   }
2115   else if (anOp == "del")
2116   {
2117     if (argc < 3)
2118     {
2119       di << "Please also provide as argument id of z layer to remove\n";
2120       return 1;
2121     }
2122
2123     Standard_Integer aDelId = atoi (argv[2]);
2124     if (!aViewer->RemoveZLayer (aDelId))
2125     {
2126       di << "Impossible to remove the z layer or invalid id!\n";
2127       return 1;
2128     }
2129
2130     di << "Z layer " << aDelId << " has been removed\n";
2131   }
2132   else if (anOp == "get")
2133   {
2134     TColStd_SequenceOfInteger anIds;
2135     aViewer->GetAllZLayers (anIds);
2136     for (Standard_Integer aSeqIdx = 1; aSeqIdx <= anIds.Length(); aSeqIdx++)
2137     {
2138       di << anIds.Value (aSeqIdx) << " ";
2139     }
2140
2141     di << "\n";
2142   }
2143   else
2144   {
2145     di << "Invalid operation, please use { add / del / get }\n";
2146     return 1;
2147   }
2148
2149   return 0;
2150 }
2151
2152 DEFINE_STANDARD_HANDLE(V3d_TextItem, Visual3d_LayerItem)
2153
2154 // this class provides a presentation of text item in v3d view under-/overlayer
2155 class V3d_TextItem : public Visual3d_LayerItem
2156 {
2157 public:
2158
2159   // CASCADE RTTI
2160   DEFINE_STANDARD_RTTI(V3d_TextItem)
2161
2162   // constructor
2163   Standard_EXPORT V3d_TextItem(const TCollection_AsciiString& theText,
2164                                const Standard_Real theX1,
2165                                const Standard_Real theY1,
2166                                const Standard_Real theHeight,
2167                                const TCollection_AsciiString& theFontName,
2168                                const Quantity_Color& theColor,
2169                                const Quantity_Color& theSubtitleColor,
2170                                const Aspect_TypeOfDisplayText& theTypeOfDisplay,
2171                                const Handle(Visual3d_Layer)& theLayer);
2172
2173   // redraw method
2174   Standard_EXPORT void RedrawLayerPrs();
2175
2176 private:
2177
2178   Standard_Real            myX1;
2179   Standard_Real            myY1;
2180   Standard_Real            myHeight;
2181   TCollection_AsciiString  myText;
2182   TCollection_AsciiString  myFontName;
2183   Quantity_Color           myColor;
2184   Quantity_Color           mySubtitleColor;
2185   Aspect_TypeOfDisplayText myType;
2186   Handle(Visual3d_Layer)   myLayer;
2187
2188 };
2189
2190 IMPLEMENT_STANDARD_HANDLE(V3d_TextItem, Visual3d_LayerItem)
2191 IMPLEMENT_STANDARD_RTTIEXT(V3d_TextItem, Visual3d_LayerItem)
2192
2193 // create and add to display the text item
2194 V3d_TextItem::V3d_TextItem (const TCollection_AsciiString& theText,
2195                             const Standard_Real theX1,
2196                             const Standard_Real theY1,
2197                             const Standard_Real theHeight,
2198                             const TCollection_AsciiString& theFontName,
2199                             const Quantity_Color& theColor,
2200                             const Quantity_Color& theSubtitleColor,
2201                             const Aspect_TypeOfDisplayText& theTypeOfDisplay,
2202                             const Handle(Visual3d_Layer)& theLayer)
2203  : myX1 (theX1), myY1 (theY1),
2204    myText (theText),
2205    myHeight (theHeight),
2206    myLayer (theLayer),
2207    myColor (theColor),
2208    mySubtitleColor (theSubtitleColor),
2209    myType (theTypeOfDisplay),
2210    myFontName (theFontName)
2211 {
2212   if (!myLayer.IsNull ())
2213     myLayer->AddLayerItem (this);
2214 }
2215
2216 // render item
2217 void V3d_TextItem::RedrawLayerPrs ()
2218
2219   if (myLayer.IsNull ())
2220     return;
2221
2222   myLayer->SetColor (myColor);
2223   myLayer->SetTextAttributes (myFontName.ToCString (), myType, mySubtitleColor);
2224   myLayer->DrawText (myText.ToCString (), myX1, myY1, myHeight);
2225 }
2226
2227 //=======================================================================
2228 //function : VOverlayText
2229 //purpose  : Test text displaying in view overlay
2230 //=======================================================================
2231 static int VOverlayText (Draw_Interpretor& di, Standard_Integer argc, const char**argv)
2232 {
2233   // get the active view
2234   Handle(V3d_View) aView = ViewerTest::CurrentView();
2235   if (aView.IsNull())
2236   {
2237     di << "No active view. Please call vinit.\n";
2238     return 1;
2239   }
2240   else if (argc < 4 || argc > 13)
2241   {
2242     di << "Use: " << argv[0];
2243     di << " text x y [height] [font_name] [text_color: R G B] [displayType]\n";
2244     di << "[background_color: R G B]\n";
2245     di << "  height - pixel height of the text (default=10.0)\n";
2246     di << "  font_name - name of font (default=courier)\n";
2247     di << "  text_color - R G B values of text color (default=255.0 255.0 255.0)\n";
2248     di << "  display_type = {normal/subtitle/decal/blend}, (default=normal)\n";
2249     di << "  background_color- R G B values used for subtitle and decal text\n";
2250     di << "(default=255.0 255.0 255.0)\n";
2251     return 1;
2252   }
2253   
2254   TCollection_AsciiString aText (argv[1]);
2255   Standard_Real aPosX = atof(argv[2]);
2256   Standard_Real aPosY = atof(argv[3]);
2257   Standard_Real aHeight = (argc >= 5) ? atof (argv[4]) : 10.0;
2258
2259   // font name
2260   TCollection_AsciiString aFontName = "Courier";
2261   if (argc >= 6)
2262     aFontName = TCollection_AsciiString (argv[5]);
2263
2264   // text colors
2265   Quantity_Parameter aColorRed   = 1.0;
2266   Quantity_Parameter aColorGreen = 1.0;
2267   Quantity_Parameter aColorBlue  = 1.0;
2268   if (argc >= 9)
2269   {
2270     aColorRed   = atof (argv[6])/255.;
2271     aColorGreen = atof (argv[7])/255.;
2272     aColorBlue  = atof (argv[8])/255.;
2273   }
2274
2275   // display type
2276   TCollection_AsciiString aDispStr;
2277   if (argc >= 10)
2278     aDispStr = TCollection_AsciiString (argv[9]);
2279
2280   Aspect_TypeOfDisplayText aTextType = Aspect_TODT_NORMAL;
2281   if (aDispStr.IsEqual ("subtitle"))
2282     aTextType = Aspect_TODT_SUBTITLE;
2283   else if (aDispStr.IsEqual ("decal"))
2284     aTextType = Aspect_TODT_DEKALE;
2285   else if (aDispStr.IsEqual ("blend"))
2286     aTextType = Aspect_TODT_BLEND;
2287
2288   // subtitle color
2289   Quantity_Parameter aSubRed   = 1.0;
2290   Quantity_Parameter aSubGreen = 1.0;
2291   Quantity_Parameter aSubBlue  = 1.0;
2292   if (argc == 13)
2293   {
2294     aSubRed   = atof (argv[10])/255.;
2295     aSubGreen = atof (argv[11])/255.;
2296     aSubBlue  = atof (argv[12])/255.;
2297   }
2298
2299   // check fo current overlay
2300   Handle(Visual3d_Layer) anOverlay = aView->Viewer()->Viewer()->OverLayer ();
2301   if (anOverlay.IsNull ())
2302   {
2303     Handle(V3d_LayerMgr) aMgr = new V3d_LayerMgr (aView);
2304     anOverlay = aMgr->Overlay ();
2305     aView->SetLayerMgr (aMgr);
2306   }
2307
2308   Quantity_Color aTextColor (aColorRed, aColorGreen, 
2309     aColorBlue, Quantity_TOC_RGB);
2310   Quantity_Color aSubtColor (aSubRed, aSubGreen, 
2311     aSubBlue, Quantity_TOC_RGB);
2312
2313   // add text item
2314   Handle(V3d_TextItem) anItem = new V3d_TextItem (aText, aPosX, aPosY,
2315     aHeight, aFontName, aTextColor, aSubtColor, aTextType, anOverlay);
2316
2317   // update view
2318   aView->MustBeResized();
2319   aView->Redraw();
2320
2321   return 0;
2322 }
2323
2324 //=======================================================================
2325 //function : ViewerCommands
2326 //purpose  :
2327 //=======================================================================
2328
2329 void ViewerTest::ViewerCommands(Draw_Interpretor& theCommands)
2330 {
2331
2332   const char *group = "ZeViewer";
2333   theCommands.Add("vinit" ,
2334     "vinit            : vinit [leftPx topPx widthPx heightPx] : Create the Viewer window",
2335     __FILE__,VInit,group);
2336   theCommands.Add("vhelp" ,
2337     "vhelp            : display help on the viewer commands",
2338     __FILE__,VHelp,group);
2339   theCommands.Add("vtop" ,
2340     "vtop or <T>         : Top view" ,
2341     __FILE__,VTop,group);
2342   theCommands.Add("vaxo" ,
2343     " vaxo or <A>     : Axonometric view ",
2344     __FILE__,VAxo,group);
2345   theCommands.Add("vpick" ,
2346     "vpick           : vpick X Y Z [shape subshape] ( all variables as string )",
2347     VPick,group);
2348   theCommands.Add("vfit"    ,
2349     "vfit or <F>         : vfit",
2350     __FILE__,VFit,group);
2351   theCommands.Add("vzfit"    ,
2352     "vzfit",
2353     __FILE__,VZFit,group);
2354   theCommands.Add("vrepaint",
2355     "vrepaint        : vrepaint, force redraw",
2356     __FILE__,VRepaint,group);
2357   theCommands.Add("vclear",
2358     "vclear          : vclear",
2359     __FILE__,VClear,group);
2360   theCommands.Add("vsetbg",
2361     "vsetbg          : vsetbg imagefile [filltype] : Load image as background",
2362     __FILE__,VSetBg,group);
2363   theCommands.Add("vsetbgmode",
2364     "vsetbgmode      : vsetbgmode filltype : Change background image fill type",
2365     __FILE__,VSetBgMode,group);
2366   theCommands.Add("vsetgradientbg",
2367     "vsetgradientbg  : vsetgradientbg r1 g1 b1 r2 g2 b2 filltype : Mount gradient background",
2368     __FILE__,VSetGradientBg,group);
2369   theCommands.Add("vsetgrbgmode",
2370     "vsetgrbgmode    : vsetgrbgmode filltype : Change gradient background fill type",
2371     __FILE__,VSetGradientBgMode,group);
2372   theCommands.Add("vsetcolorbg",
2373     "vsetcolorbg     : vsetcolorbg r g b : Set background color",
2374     __FILE__,VSetColorBg,group);
2375   theCommands.Add("vscale",
2376     "vscale          : vscale X Y Z",
2377     __FILE__,VScale,group);
2378   theCommands.Add("vzbufftrihedron",
2379     "vzbufftrihedron : Displays a V3d_ZBUFFER'ed trihedron at the bottom left corner of the view",
2380     __FILE__,VTestZBuffTrihedron,group);
2381   theCommands.Add("vrotate",
2382     "vrotate         : vrotate AX AY AZ [X Y Z]",
2383     __FILE__,VRotate,group);
2384   theCommands.Add("vzoom",
2385     "vzoom           : vzoom coef",
2386     __FILE__,VZoom,group);
2387   theCommands.Add("vpan",
2388     "vpan            : vpan dx dy",
2389     __FILE__,VPan,group);
2390   theCommands.Add("vexport",
2391     "vexport         : vexport full_file_path {PS | EPS | TEX | PDF | SVG | PGF | EMF }"
2392     " : exports the view to a vector file of a given format"
2393     " : notice that EMF format requires patched gl2ps",
2394     __FILE__,VExport,group);
2395   theCommands.Add("vcolorscale",
2396     "vcolorscale     : vcolorscale [RangeMin = 0 RangeMax = 100 Intervals = 10 HeightFont = 16 Position = 2 X = 0 Y = 0]: draw color scale",
2397     __FILE__,VColorScale,group);
2398   theCommands.Add("vgraduatedtrihedron",
2399     "vgraduatedtrihedron : 1/0 (display/erase) [Xname Yname Zname [Font [isMultibyte]]]",
2400     __FILE__,VGraduatedTrihedron,group);
2401   theCommands.Add("vprintview" ,
2402     "vprintview : width height filename [algo=0] : Test print algorithm: algo = 0 - stretch, algo = 1 - tile",
2403     __FILE__,VPrintView,group);
2404   theCommands.Add("vzlayer",
2405     "vzlayer : add/del/get [id] : Z layer operations in v3d viewer: add new z layer, delete z layer, get z layer ids",
2406     __FILE__,VZLayer,group);
2407   theCommands.Add("voverlaytext",
2408     "voverlaytext : text x y [height] [font_name] [text_color: R G B] [display_type] [background_color: R G B]"
2409     " : height - pixel height of the text (default=10.0)"
2410     " : font_name - name of font (default=courier)"
2411     " : text_color - three values: RedColor GreenColor BlueColor (default = 255.0 255.0 255.0) "
2412     " : display_type = {normal/subtitle/decal/blend}, (default=normal) "
2413     " : background_color - three values: RedColor GreenColor BlueColor (default = 255.0 255.0 255.0), the parameter is defined for subtitle and decal display types ",
2414     __FILE__,VOverlayText,group);
2415 }