source: trunk/source/visualization/OpenGL/src/G4OpenGLXmViewer.cc @ 914

Last change on this file since 914 was 914, checked in by garnier, 16 years ago

test avec des predefined headers...mais +10% de temps de compilation....
  • Property svn:mime-type set to text/cpp
File size: 22.3 KB
Line 
1//
2// ********************************************************************
3// * License and Disclaimer                                           *
4// *                                                                  *
5// * The  Geant4 software  is  copyright of the Copyright Holders  of *
6// * the Geant4 Collaboration.  It is provided  under  the terms  and *
7// * conditions of the Geant4 Software License,  included in the file *
8// * LICENSE and available at  http://cern.ch/geant4/license .  These *
9// * include a list of copyright holders.                             *
10// *                                                                  *
11// * Neither the authors of this software system, nor their employing *
12// * institutes,nor the agencies providing financial support for this *
13// * work  make  any representation or  warranty, express or implied, *
14// * regarding  this  software system or assume any liability for its *
15// * use.  Please see the license in the file  LICENSE  and URL above *
16// * for the full disclaimer and the limitation of liability.         *
17// *                                                                  *
18// * This  code  implementation is the result of  the  scientific and *
19// * technical work of the GEANT4 collaboration.                      *
20// * By using,  copying,  modifying or  distributing the software (or *
21// * any work based  on the software)  you  agree  to acknowledge its *
22// * use  in  resulting  scientific  publications,  and indicate your *
23// * acceptance of all terms of the Geant4 Software license.          *
24// ********************************************************************
25//
26//
27// $Id: G4OpenGLXmViewer.cc,v 1.29 2009/01/22 15:39:55 lgarnier Exp $
28// GEANT4 tag $Name:  $
29//
30//
31// Andrew Walkden  10th February 1997
32// G4OpenGLXmViewer : Class derived from G4OpenGLXViewer, to provide
33//                  (Motif) widget OpenGL functionality for GEANT4.
34
35#ifdef G4VIS_BUILD_OPENGLXM_DRIVER
36
37#include "globals.hh"
38
39#include "G4OpenGLXmViewer.hh"
40#include "G4OpenGLSceneHandler.hh"
41
42#include "G4VisExtent.hh"
43#include "G4LogicalVolume.hh"
44#include "G4VSolid.hh"
45#include "G4Point3D.hh"
46#include "G4Normal3D.hh"
47
48#include "G4OpenGLXmSliderBar.hh"
49
50#include "G4Xt.hh"
51#include <X11/Shell.h>
52
53#include <sstream>
54
55void G4OpenGLXmViewer::ShowView () {
56
57  G4Xt::getInstance () -> SecondaryLoop ();
58
59}
60
61void G4OpenGLXmViewer::GetXmConnection () {
62 
63  G4Xt* interactorManager = G4Xt::getInstance ();
64  toplevel = (Widget)interactorManager->GetMainInteractor();
65  app      = XtWidgetToApplicationContext(toplevel);
66
67  if (!toplevel) {
68    fViewId = -1;  // This flags an error.
69    G4cerr << "G4OpenGLXmViewer::GetXmConnection unable to Initialize"
70      " application context." << G4endl;
71    return;
72  }
73
74  // Better to put this in an X11 resource file !!!
75  std::ostringstream oss;
76  oss <<
77    "*glxarea*width: " << fVP.GetWindowSizeHintX() << "\n"
78    "*glxarea*height: " << fVP.GetWindowSizeHintY() << "\n"
79    /*
80    // Tried this as a replacement for the above two lines, but
81    // sub-windows (rotation, etc.) came same size!!
82    "*geometry: " << fVP.GetXGeometryString() << "\n"
83    */
84    "*frame*x: 10\n"
85    "*frame*y: 10\n"
86    "*frame*topOffset: 10\n"
87    "*frame*bottomOffset: 10\n"
88    "*frame*rightOffset: 10\n"
89    "*frame*leftOffset: 10\n"
90    "*frame*shadowType: SHADOW_IN\n"
91    "*frame*useColorObj: False\n"
92    "*frame*primaryColorSetId: 3\n"
93    "*frame*secondaryColorSetId: 3\n"
94    "*menubar*useColorObj: False\n"
95    "*menubar*primaryColorSetId: 3\n"
96    "*menubar*secondaryColorSetId: 3\n"
97    "*toplevel*useColorObj: False\n"
98    "*toplevel*primaryColorSetId: 3\n"
99    "*toplevel*secondaryColorSetId: 3\n";
100  interactorManager->PutStringInResourceDatabase ((char*)oss.str().c_str());
101
102  //  interactorManager->AddSecondaryLoopPostAction ((G4SecondaryLoopAction)G4OpenGLXmViewerSecondaryLoopPostAction);
103 
104  shell = XtAppCreateShell ((String)fName.data(),(String)fName.data(),topLevelShellWidgetClass,XtDisplay(toplevel),NULL,0);
105  interactorManager->AddShell (shell);
106
107  dpy = XtDisplay (shell);
108
109  if (!dpy) {
110    fViewId = -1;  // This flags an error.
111    G4cerr << "G4OpenGLXmViewer::GetXmConnection unable to connect to display."
112         << G4endl;
113    return;
114  }
115
116  if (!glXQueryExtension (dpy, &errorBase, &eventBase)) {
117    fViewId = -1;  // This flags an error.
118    G4cerr << "G4OpenGLXmViewer::GetXmConnection. X Server has no GLX extension."
119         << G4endl;;
120    return;
121  }
122}
123
124void G4OpenGLXmViewer::CreateMainWindow () {
125
126  bgnd = XWhitePixelOfScreen (XtScreen(shell));
127  borcol = XBlackPixelOfScreen (XtScreen(shell));
128 
129  fWinSize_x = fVP.GetWindowSizeHintX();
130  fWinSize_y = fVP.GetWindowSizeHintY();
131  G4int x_origin = fVP.GetWindowAbsoluteLocationHintX(DisplayWidth(dpy, vi -> screen));
132
133  // FIXME,  screen size != window size on MAC, but I don't know have to get the menuBar
134  // size on MAC. L.Garnier 01/2009
135  G4int y_origin = fVP.GetWindowAbsoluteLocationHintY(DisplayHeight(dpy, vi -> screen));
136
137  if (fVP.IsWindowSizeHintX () && fVP.IsWindowLocationHintX () && fVP.IsWindowLocationHintY ()) {
138    XtVaSetValues (shell,
139                   XtNvisual, vi -> visual,
140                   XtNdepth, vi -> depth,
141                   XtNcolormap, cmap,
142                   XtNwidth, fWinSize_x,
143                   XtNheight, fWinSize_y,
144                   XtNx, x_origin,
145                   XtNy, y_origin,
146                   XtNborderColor, &borcol,
147                   XtNbackground, &bgnd,
148                   XmNtitle, fName.data(),
149                   NULL);
150  } else if (fVP.IsWindowSizeHintX () && !(fVP.IsWindowLocationHintX () || fVP.IsWindowLocationHintY ())) {
151    XtVaSetValues (shell,
152                   XtNvisual, vi -> visual,
153                   XtNdepth, vi -> depth,
154                   XtNcolormap, cmap,
155                   XtNwidth, fWinSize_x,
156                   XtNheight, fWinSize_y,
157                   XtNborderColor, &borcol,
158                   XtNbackground, &bgnd,
159                   XmNtitle, fName.data(),
160                   NULL);
161  } else if ((!fVP.IsWindowSizeHintX ()) && fVP.IsWindowLocationHintX () && fVP.IsWindowLocationHintY ()) {
162    XtVaSetValues (shell,
163                   XtNvisual, vi -> visual,
164                   XtNdepth, vi -> depth,
165                   XtNcolormap, cmap,
166                   XtNx, x_origin,
167                   XtNy, y_origin,
168                   XtNborderColor, &borcol,
169                   XtNbackground, &bgnd,
170                   XmNtitle, fName.data(),
171                   NULL);
172  } else {
173    XtVaSetValues (shell,
174                   XtNvisual, vi -> visual,
175                   XtNdepth, vi -> depth,
176                   XtNcolormap, cmap,
177                   XtNborderColor, &borcol,
178                   XtNbackground, &bgnd,
179                   XmNtitle, fName.data(),
180                   NULL);
181  }
182
183
184  main_win = XtVaCreateManagedWidget ("main_win",
185                                      xmMainWindowWidgetClass,
186                                      shell,
187                                      XtNvisual, vi -> visual,
188                                      XtNdepth, vi -> depth,
189                                      XtNcolormap, cmap,
190                                      XtNborderColor, borcol,
191                                      XtNbackground, bgnd,
192                                      NULL);
193
194  //*********Create a menu bar for the window********
195  style_str = XmStringCreateLocalized ((char*)"Style");
196  actions_str = XmStringCreateLocalized ((char*)"Actions");
197  misc_str = XmStringCreateLocalized ((char*)"Miscellany");
198  spec_str = XmStringCreateLocalized ((char*)"Special");
199
200  menubar = XmVaCreateSimpleMenuBar (main_win,
201                                     (char*)"menubar",
202                                     XmVaCASCADEBUTTON, style_str, 'S',
203                                     XmVaCASCADEBUTTON, actions_str, 'A',
204                                     XmVaCASCADEBUTTON, misc_str, 'M',
205                                     XmVaCASCADEBUTTON, spec_str, 'p',
206                                     XtNvisual, vi -> visual,
207                                     XtNdepth, vi -> depth,
208                                     XtNcolormap, cmap,
209                                     XtNborderColor, borcol,
210                                     XtNbackground, bgnd,
211                                     NULL);
212
213  XmStringFree (style_str);
214  XmStringFree (actions_str);
215  XmStringFree (misc_str);
216  XmStringFree (spec_str);
217
218  G4cout << "Created menubar" << G4endl;
219
220
221  //*********Create style pulldown menu on menubar*********
222  rep_str = XmStringCreateLocalized ((char*)"Representation");
223  draw_str = XmStringCreateLocalized ((char*)"Drawing");
224  bgnd_str = XmStringCreateLocalized ((char*)"Background color");
225
226  style_cascade = XmVaCreateSimplePulldownMenu
227    (menubar,
228     (char*)"style",
229     0,
230     NULL,
231     XmVaCASCADEBUTTON, rep_str, 'R',
232     XmVaCASCADEBUTTON, draw_str, 'D',
233     XmVaCASCADEBUTTON, bgnd_str, 'B',
234     XtNvisual, vi -> visual,
235     XtNdepth, vi -> depth,
236     XtNcolormap, cmap,
237     XtNborderColor, borcol,
238     XtNbackground, bgnd,
239     NULL);
240 
241  XmStringFree (rep_str);
242  XmStringFree (draw_str);
243  XmStringFree (bgnd_str);
244
245  //  G4cout << "Created Style pulldown menu" << G4endl;
246
247  //Add Representation pullright menu to style cascade...
248  polyhedron_str = XmStringCreateLocalized ((char*)"Polyhedron");
249  nurbs_str = XmStringCreateLocalized ((char*)"NURBS");
250
251  rep_style_pullright = XmVaCreateSimplePulldownMenu
252    (style_cascade,
253     (char*)"rep_style",
254     0,
255     rep_style_callback,
256     XmVaRADIOBUTTON, polyhedron_str, 'P', NULL, NULL,
257     XmVaRADIOBUTTON, nurbs_str, 'N', NULL, NULL,
258     XmNradioBehavior, True,
259     XmNradioAlwaysOne, True,
260     XmNuserData, this,
261     XtNvisual, vi -> visual,
262     XtNdepth, vi -> depth,
263     XtNcolormap, cmap,
264     XtNborderColor, borcol,
265     XtNbackground, bgnd,
266     NULL);
267 
268  Widget special_widget;
269
270  G4ViewParameters::RepStyle style;
271  style = fVP.GetRepStyle();
272 
273  if (style == G4ViewParameters::polyhedron) {
274    special_widget = XtNameToWidget(rep_style_pullright, "button_0");
275    if(special_widget) {
276      XtVaSetValues (special_widget, XmNset, True, NULL);
277    }
278  } else if (style == G4ViewParameters::nurbs) {
279    special_widget = XtNameToWidget(rep_style_pullright, "button_1");
280    if(special_widget) {
281      XtVaSetValues (special_widget, XmNset, True, NULL);
282    }
283  } else {
284    G4Exception("Invalid Representation style in G4OpenGLXmViewer::CreateContext");
285  }
286  XmStringFree (polyhedron_str);
287  XmStringFree (nurbs_str);
288 
289  //  G4cout << "Created Representation pulldown menu" << G4endl;
290
291  //Add Drawing pullright menu to style cascade...
292  wireframe_str = XmStringCreateLocalized ((char*)"Wireframe");
293  hlr_str = XmStringCreateLocalized ((char*)"Hidden line removal");
294  hsr_str = XmStringCreateLocalized ((char*)"Hidden surface removal");
295  hlhsr_str = XmStringCreateLocalized ((char*)"Hidden line and surface removal");
296
297  drawing_style_pullright = XmVaCreateSimplePulldownMenu
298    (style_cascade,
299     (char*)"drawing_style",
300     1,
301     drawing_style_callback,
302     XmVaRADIOBUTTON, wireframe_str, 'W', NULL, NULL,
303     XmVaRADIOBUTTON, hlr_str, 'L', NULL, NULL,
304     XmVaRADIOBUTTON, hsr_str, 'S', NULL, NULL,
305     XmVaRADIOBUTTON, hlhsr_str, 'H', NULL, NULL,
306     XmNradioBehavior, True,
307     XmNradioAlwaysOne, True,
308     XmNuserData, this,
309     XtNvisual, vi -> visual,
310     XtNdepth, vi -> depth,
311     XtNcolormap, cmap,
312     XtNborderColor, borcol,
313     XtNbackground, bgnd,
314     NULL);
315 
316  G4ViewParameters::DrawingStyle d_style;
317  d_style = fVP.GetDrawingStyle();
318 
319  if (d_style == G4ViewParameters::wireframe) {
320    special_widget = XtNameToWidget(drawing_style_pullright, "button_0");
321    if(special_widget) {
322      XtVaSetValues (special_widget, XmNset, True, NULL);
323    }
324  } else if (d_style == G4ViewParameters::hlr) {
325    special_widget = XtNameToWidget(drawing_style_pullright, "button_1");
326    if(special_widget) {
327      XtVaSetValues (special_widget, XmNset, True, NULL);
328    }
329  } else if (d_style == G4ViewParameters::hsr) {
330    special_widget = XtNameToWidget(drawing_style_pullright, "button_2");
331    if(special_widget) {
332      XtVaSetValues (special_widget, XmNset, True, NULL);
333    }
334  } else if (d_style == G4ViewParameters::hlhsr) {
335    special_widget = XtNameToWidget(drawing_style_pullright, "button_3");
336    if(special_widget) {
337      XtVaSetValues (special_widget, XmNset, True, NULL);
338    }
339  } else {
340    G4Exception("Invalid Drawing style in G4OpenGLXmViewer::CreateContext");
341  }
342
343  XmStringFree (wireframe_str);
344  XmStringFree (hlr_str);
345  XmStringFree (hsr_str);
346  XmStringFree (hlhsr_str);
347
348  //  G4cout << "Created Drawing pullright menu" << G4endl;
349
350  //Add Drawing pullright menu to style cascade...
351  white_str = XmStringCreateLocalized ((char*)"White");
352  black_str = XmStringCreateLocalized ((char*)"Black");
353
354  background_color_pullright = XmVaCreateSimplePulldownMenu
355    (style_cascade,
356     (char*)"background_color",
357     2,
358     background_color_callback,
359     XmVaRADIOBUTTON, white_str, 'W', NULL, NULL,
360     XmVaRADIOBUTTON, black_str, 'B', NULL, NULL,
361     XmNradioBehavior, True,
362     XmNradioAlwaysOne, True,
363     XmNuserData, this,
364     XtNvisual, vi -> visual,
365     XtNdepth, vi -> depth,
366     XtNcolormap, cmap,
367     XtNborderColor, borcol,
368     XtNbackground, bgnd,
369     NULL);
370 
371  if (background.GetRed() == 1. &&
372      background.GetGreen() == 1. &&
373      background.GetBlue() == 1.) {
374    special_widget = XtNameToWidget(background_color_pullright, "button_0");
375    if(special_widget) {
376      XtVaSetValues (special_widget, XmNset, True, NULL);
377    }
378  } else {
379    special_widget = XtNameToWidget(background_color_pullright, "button_1");
380    if(special_widget) {
381      XtVaSetValues (special_widget, XmNset, True, NULL);
382    }
383  }
384
385  XmStringFree (white_str);
386  XmStringFree (black_str);
387
388  //  G4cout << "Created Background color pullright menu" << G4endl;
389
390  //*********Create actions pulldown menu on menubar*********
391  rot_str = XmStringCreateLocalized ((char*)"Rotation control panel");
392  pan_str = XmStringCreateLocalized ((char*)"Panning control panel");
393  set_str = XmStringCreateLocalized ((char*)"Set control panel limits");
394
395  actions_cascade = XmVaCreateSimplePulldownMenu
396    (menubar,
397     (char*)"actions",
398     1,
399     actions_callback,
400     XmVaPUSHBUTTON, rot_str, 'R', NULL, NULL,
401     XmVaPUSHBUTTON, pan_str, 'P', NULL, NULL,
402     XmVaPUSHBUTTON, set_str, 'S', NULL, NULL,
403     XmNuserData, this,
404     XtNvisual, vi -> visual,
405     XtNdepth, vi -> depth,
406     XtNcolormap, cmap,
407     XtNborderColor, borcol,
408     XtNbackground, bgnd,
409     NULL);
410 
411  XmStringFree (rot_str);
412  XmStringFree (pan_str);
413  XmStringFree (set_str);
414  G4cout << "Created Actions pulldown menu" << G4endl;
415
416  misc_str = XmStringCreateLocalized ((char*)"Miscellany control panel");
417  exit_str = XmStringCreateLocalized ((char*)"Exit to G4Vis>");
418  print_str = XmStringCreateLocalized ((char*)"Create .eps file");
419
420  //*********Create miscellany pulldown menu on menubar*********
421  misc_cascade = XmVaCreateSimplePulldownMenu
422    (menubar,
423     (char*)"miscellany",
424     2,
425     misc_callback,
426     XmVaPUSHBUTTON, misc_str, 'M', NULL, NULL,
427     XmVaPUSHBUTTON, exit_str, 'E', NULL, NULL,
428     XmVaPUSHBUTTON, print_str, 'P', NULL, NULL,
429     XmNuserData, this,
430     XtNvisual, vi -> visual,
431     XtNdepth, vi -> depth,
432     XtNcolormap, cmap,
433     XtNborderColor, borcol,
434     XtNbackground, bgnd,
435     NULL);
436 
437  XmStringFree (misc_str);
438  XmStringFree (exit_str);
439  XmStringFree (print_str);
440  G4cout << "Created Miscellany pulldown menu" << G4endl;
441
442  trans_str = XmStringCreateLocalized ((char*)"Transparency");
443  anti_str = XmStringCreateLocalized ((char*)"Antialiasing");
444  halo_str = XmStringCreateLocalized ((char*)"Haloing");
445  aux_edge_str = XmStringCreateLocalized ((char*)"Auxiliary edges");
446
447  //*********Create special pulldown menu on menubar*********
448  spec_cascade = XmVaCreateSimplePulldownMenu
449    (menubar,
450     (char*)"special",
451     3,
452     NULL,
453     XmVaCASCADEBUTTON, trans_str, 'T',
454     XmVaCASCADEBUTTON, anti_str, 'A',
455     XmVaCASCADEBUTTON, halo_str, 'H',
456     XmVaCASCADEBUTTON, aux_edge_str, 'E',
457     XtNvisual, vi -> visual,
458     XtNdepth, vi -> depth,
459     XtNcolormap, cmap,
460     XtNborderColor, borcol,
461     XtNbackground, bgnd,
462     NULL);
463 
464  XmStringFree (trans_str);
465  XmStringFree (anti_str);
466  XmStringFree (halo_str);
467  XmStringFree (aux_edge_str);
468
469  //  G4cout << "Created Special pulldown menu" << G4endl;
470
471  //Add Transparency pullright menu to special cascade...
472  off_str = XmStringCreateLocalized ((char*)"Off");
473  on_str = XmStringCreateLocalized ((char*)"On");
474
475  transparency_pullright = XmVaCreateSimplePulldownMenu
476    (spec_cascade,
477     (char*)"transparency",
478     0,
479     transparency_callback,
480     XmVaRADIOBUTTON, off_str, 'f', NULL, NULL,
481     XmVaRADIOBUTTON, on_str, 'n', NULL, NULL,
482     XmNradioBehavior, True,
483     XmNradioAlwaysOne, True,
484     XmNuserData, this,
485     XtNvisual, vi -> visual,
486     XtNdepth, vi -> depth,
487     XtNcolormap, cmap,
488     XtNborderColor, borcol,
489     XtNbackground, bgnd,
490     NULL);
491 
492  if (transparency_enabled == false) {
493    special_widget = XtNameToWidget(transparency_pullright, "button_0");
494    if(special_widget) {
495      XtVaSetValues (special_widget, XmNset, True, NULL);
496    }
497  } else if (transparency_enabled == true) {
498    special_widget = XtNameToWidget(transparency_pullright, "button_1");
499    if(special_widget) {
500      XtVaSetValues (special_widget, XmNset, True, NULL);
501    }
502  } else {
503    G4Exception("transparency_enabled in G4OpenGLXmViewer is neither true nor false!!");
504  }
505
506  //Add antialias pullright menu to special cascade...
507  antialias_pullright = XmVaCreateSimplePulldownMenu
508    (spec_cascade,
509     (char*)"antialias",
510     1,
511     antialias_callback,
512     XmVaRADIOBUTTON, off_str, 'f', NULL, NULL,
513     XmVaRADIOBUTTON, on_str, 'n', NULL, NULL,
514     XmNradioBehavior, True,
515     XmNradioAlwaysOne, True,
516     XmNuserData, this,
517     XtNvisual, vi -> visual,
518     XtNdepth, vi -> depth,
519     XtNcolormap, cmap,
520     XtNborderColor, borcol,
521     XtNbackground, bgnd,
522     NULL);
523 
524  if (antialiasing_enabled == false) {
525    special_widget = XtNameToWidget(antialias_pullright, "button_0");
526    if(special_widget) {
527      XtVaSetValues (special_widget, XmNset, True, NULL);
528    }
529  } else if (antialiasing_enabled == true) {
530    special_widget = XtNameToWidget(antialias_pullright, "button_1");
531    if(special_widget) {
532      XtVaSetValues (special_widget, XmNset, True, NULL);
533    }
534  } else {
535    G4Exception("antialiasing_enabled in G4OpenGLXmViewer is neither true nor false!!");
536  }
537
538  //Add Haloing pullright menu to special cascade...
539  haloing_pullright = XmVaCreateSimplePulldownMenu
540    (spec_cascade,
541     (char*)"haloing",
542     2,
543     haloing_callback,
544     XmVaRADIOBUTTON, off_str, 'f', NULL, NULL,
545     XmVaRADIOBUTTON, on_str, 'n', NULL, NULL,
546     XmNradioBehavior, True,
547     XmNradioAlwaysOne, True,
548     XmNuserData, this,
549     XtNvisual, vi -> visual,
550     XtNdepth, vi -> depth,
551     XtNcolormap, cmap,
552     XtNborderColor, borcol,
553     XtNbackground, bgnd,
554     NULL);
555 
556  if (haloing_enabled == false) {
557    special_widget = XtNameToWidget(haloing_pullright, "button_0");
558    if(special_widget) {
559      XtVaSetValues (special_widget, XmNset, True, NULL);
560    }
561  } else if (haloing_enabled == true) {
562    special_widget = XtNameToWidget(haloing_pullright, "button_1");
563    if(special_widget) {
564      XtVaSetValues (special_widget, XmNset, True, NULL);
565    }
566  } else {
567    G4Exception("haloing_enabled in G4OpenGLXmViewer is neither true nor false!!");
568  }
569
570  //Add Aux_Edge pullright menu to special cascade...
571  aux_edge_pullright = XmVaCreateSimplePulldownMenu
572    (spec_cascade,
573     (char*)"aux_edge",
574     3,
575     aux_edge_callback,
576     XmVaRADIOBUTTON, off_str, 'f', NULL, NULL,
577     XmVaRADIOBUTTON, on_str, 'n', NULL, NULL,
578     XmNradioBehavior, True,
579     XmNradioAlwaysOne, True,
580     XmNuserData, this,
581     XtNvisual, vi -> visual,
582     XtNdepth, vi -> depth,
583     XtNcolormap, cmap,
584     XtNborderColor, borcol,
585     XtNbackground, bgnd,
586     NULL);
587 
588  if (!fVP.IsAuxEdgeVisible()) {
589    special_widget = XtNameToWidget(aux_edge_pullright, "button_0");
590    if(special_widget) {
591      XtVaSetValues (special_widget, XmNset, True, NULL);
592    }
593  } else {
594    special_widget = XtNameToWidget(aux_edge_pullright, "button_1");
595    if(special_widget) {
596      XtVaSetValues (special_widget, XmNset, True, NULL);
597    }
598  }
599
600  XtManageChild (menubar);
601  frame = XtVaCreateManagedWidget ((char*)"frame",
602                                   xmFrameWidgetClass, main_win,
603                                   XtNvisual, vi -> visual,
604                                   XtNdepth, vi -> depth,
605                                   XtNcolormap, cmap,
606                                   XtNborderColor, borcol,
607                                   XtNbackground, bgnd,
608                                   NULL);
609
610  glxarea = XtVaCreateManagedWidget ((char*)"glxarea",
611                                     xmDrawingAreaWidgetClass,
612                                     frame,
613                                     XtNvisual, vi -> visual,
614                                     XtNdepth, vi -> depth,
615                                     XtNcolormap, cmap,
616                                     XtNborderColor, borcol,
617                                     XtNbackground, bgnd,
618                                     NULL);
619 
620
621  XmMainWindowSetAreas (main_win,  // main widget, children are specified
622                        menubar,   // widget to use as menu bar
623                        NULL,      // widget to use as command window
624                        NULL,      // widget for horizontal scroll bar
625                        NULL,      // widget for vertical scroll bar
626                        frame      // widget to be used for work window
627                        );
628
629  XtRealizeWidget(shell);
630 
631  // Once widget is realized (ie, associated with a created X window), we
632  // can bind the OpenGL rendering context to the window.
633
634  win = XtWindow (glxarea);
635
636  glXMakeCurrent (dpy, win, cx);
637
638  // This should be add AFTER glXMakeCurrent done because it will fire a resizeCallback
639  XtAddCallback (glxarea,
640                 XmNresizeCallback,
641                 resize_callback,
642                 this);
643
644  XtAddCallback (glxarea,
645                 XmNexposeCallback,
646                 expose_callback,
647                 this);
648
649}
650
651G4OpenGLXmViewer::G4OpenGLXmViewer (G4OpenGLSceneHandler& scene):
652G4VViewer (scene, -1),
653G4OpenGLViewer (scene),
654G4OpenGLXViewer (scene),
655zoom_high (fVP.GetZoomFactor() * 10.0),
656zoom_low (fVP.GetZoomFactor() / 10.0),
657dolly_low (fVP.GetDolly() - 1000.0),
658dolly_high (fVP.GetDolly() + 1000.0),
659fov (0.0),
660rot_sens_limit (90.),
661pan_sens_limit (100.),
662rot_sens (1.),
663wob_sens (20.),
664original_vp(fVP.GetViewpointDirection()),
665frameNo (0),
666fprotation_top (0),
667fprotation_slider (0),
668fppanning_top (0),
669fppanning_slider (0),
670fpzoom_slider (0),
671fpdolly_slider (0),
672fpsetting_top (0),
673fpmiscellany_top (0),
674fpprint_top (0)
675{
676  GetXmConnection ();
677  if (fViewId < 0) return;
678}
679
680G4OpenGLXmViewer::~G4OpenGLXmViewer ()
681{
682  XtDestroyWidget  (shell);
683  win = 0; // ...to avoid XDestroyWindow in G4OpenGLXViewer base class
684  // because XtDestroyWidget has already destroyed it.
685  G4Xt::getInstance () ->RemoveShell (shell);
686
687/******************************
688  if (fprotation_top) {
689    delete fprotation_top;
690  }
691
692  if (fppanning_top) {
693    delete fppanning_top;
694  }
695
696  if (fpsetting_top) {
697    delete fpsetting_top;
698  }
699
700  if (fpmiscellany_top) {
701    delete fpmiscellany_top;
702  }
703******************************/
704
705}
706
707#endif
Note: See TracBrowser for help on using the repository browser.