Import Geant4 0.0.0 source tree

2016-06-01 15:25:35 +02:00
parent 54d6b71f95
commit b97f8d0df7
3237 changed files with 807095 additions and 0 deletions
@@ -0,0 +1,272 @@
+// This code implementation is the intellectual property of
+// the RD44 GEANT4 collaboration.
+//
+// By copying, distributing or modifying the Program (or any work
+// based on the Program) you indicate your acceptance of this statement,
+// and all its terms.
+//
+// $Id: G4OpenGLXmStyleCallbacks.cc,v 2.3 1998/10/11 15:58:24 ajw Exp $
+// GEANT4 tag $Name: geant4-00 $
+//
+// 
+// Andrew Walkden  16th April 1997
+// G4OpenGLXmStyleCallbacks : 
+//                       Several callback functions used by
+//                       elements of the control panel to
+//                       determine how to visualize the view.
+
+#ifdef G4VIS_BUILD_OPENGLXM_DRIVER
+
+#include "G4OpenGLXmView.hh"
+
+void G4OpenGLXmView::drawing_style_callback (Widget w, 
+					     XtPointer clientData, 
+					     XtPointer) 
+{
+  G4long choice = (G4long)clientData;
+  G4OpenGLXmView* pView;
+  XtVaGetValues (XtParent(w),
+		 XmNuserData, &pView,
+		 NULL);
+  G4ViewParameters::DrawingStyle style;
+
+  switch (choice) {
+    
+  case 0:
+    style = G4ViewParameters::wireframe;
+    break;
+
+  case 1:
+    style = G4ViewParameters::hlr;
+    break;
+
+  case 2:
+    style = G4ViewParameters::hsr;
+    break;
+
+  case 3:
+    style = G4ViewParameters::hlhsr;
+    break;
+
+  default:
+    G4Exception("Unrecognised case in drawing_style_callback.");
+  }
+
+  pView->fVP.SetDrawingStyle (style);
+  
+  pView->SetView ();
+  pView->ClearView ();
+  pView->DrawView ();
+}
+
+void G4OpenGLXmView::rep_style_callback (Widget w, 
+					 XtPointer clientData, 
+					 XtPointer) 
+{
+  G4long choice = (G4long)clientData;
+  G4OpenGLXmView* pView;
+  XtVaGetValues (XtParent(w),
+		 XmNuserData, &pView,
+		 NULL);
+  G4ViewParameters::RepStyle style;
+
+  switch (choice) {
+    
+  case 0:
+    style = G4ViewParameters::polyhedron;
+    break;
+
+  case 1:
+    style = G4ViewParameters::nurbs;
+    break;
+
+  default:
+    G4Exception("Unrecognised case in rep_style_callback.");
+  }
+
+  pView->fVP.SetRepStyle (style);
+
+  pView->SetView ();
+  pView->ClearView ();
+  pView->DrawView ();
+}
+
+void G4OpenGLXmView::background_color_callback (Widget w, 
+						XtPointer clientData, 
+						XtPointer) 
+{
+  G4long choice = (G4long)clientData;
+  G4OpenGLXmView* pView;
+  XtVaGetValues (XtParent(w),
+		 XmNuserData, &pView,
+		 NULL);
+
+
+  //I need to revisit the kernel if the background colour changes and hidden
+  //line removal is enabled, because hlr drawing utilises the background
+  //colour in its drawing...
+  switch (choice) {
+    
+  case 0:
+    if (!pView->white_background) {
+      pView->white_background = true;
+      if (pView->GetViewParameters().GetDrawingStyle() == G4ViewParameters::hlr) {
+	pView->SetNeedKernelVisit ();
+      }
+    }
+    break;
+
+  case 1:
+    if (pView->white_background) {
+      pView->white_background = false;
+      if (pView->GetViewParameters().GetDrawingStyle() == G4ViewParameters::hlr) {
+	pView->SetNeedKernelVisit ();
+      }
+    }
+    break;
+
+  default:
+    G4Exception("Unrecognised case in background_color_callback.");
+  }
+
+  pView->SetView ();
+  pView->ClearView ();
+  pView->DrawView ();
+}
+
+void G4OpenGLXmView::transparency_callback (Widget w, 
+					    XtPointer clientData, 
+					    XtPointer) 
+{
+  G4long choice = (G4long)clientData;
+  G4OpenGLXmView* pView;
+  XtVaGetValues (XtParent(w),
+		 XmNuserData, &pView,
+		 NULL);
+
+  switch (choice) {
+    
+  case 0:
+    pView->transparency_enabled = false;
+    glDisable (GL_BLEND);
+    break;
+
+  case 1:
+    pView->transparency_enabled = true;
+    glEnable (GL_BLEND);
+    glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
+    glShadeModel (GL_FLAT);
+    break;
+
+  default:
+    G4Exception("Unrecognised case in transparency_callback.");
+  }
+
+  pView->SetView ();
+  pView->ClearView ();
+  pView->DrawView ();
+}
+
+void G4OpenGLXmView::antialias_callback (Widget w, 
+					 XtPointer clientData, 
+					 XtPointer) 
+{
+  G4long choice = (G4long)clientData;
+  G4OpenGLXmView* pView;
+  XtVaGetValues (XtParent(w),
+		 XmNuserData, &pView,
+		 NULL);
+
+  switch (choice) {
+    
+  case 0:
+    pView->antialiasing_enabled = false;
+    glDisable (GL_LINE_SMOOTH);
+    glDisable (GL_POLYGON_SMOOTH);
+    break;
+
+  case 1:
+    pView->antialiasing_enabled = true;
+    glEnable (GL_LINE_SMOOTH);
+    glHint (GL_LINE_SMOOTH_HINT, GL_NICEST);
+    glEnable (GL_POLYGON_SMOOTH);
+    glHint (GL_POLYGON_SMOOTH_HINT, GL_NICEST);
+    break;
+
+  default:
+    G4Exception("Unrecognised case in antialiasing_callback.");
+  }
+
+  pView->SetView ();
+  pView->ClearView ();
+  pView->DrawView ();
+}
+
+void G4OpenGLXmView::haloing_callback (Widget w, 
+				       XtPointer clientData, 
+				       XtPointer) 
+{
+  G4long choice = (G4long)clientData;
+  G4OpenGLXmView* pView;
+  XtVaGetValues (XtParent(w),
+		 XmNuserData, &pView,
+		 NULL);
+
+  switch (choice) {
+    
+  case 0:
+    pView->haloing_enabled = false;
+    break;
+
+  case 1:
+    pView->haloing_enabled = true;
+    break;
+
+  default:
+    G4Exception("Unrecognised case in haloing_callback.");
+  }
+
+  pView->SetView ();
+  pView->ClearView ();
+  pView->DrawView ();
+}
+
+void G4OpenGLXmView::projection_callback (Widget w, 
+					  XtPointer clientData, 
+					  XtPointer) 
+{
+  G4OpenGLXmView* pView = (G4OpenGLXmView*)clientData;
+
+  G4int choice = G4OpenGLXmView::get_int_userData (w);
+
+  switch (choice) {
+  case 0:
+    {
+      pView->fVP.SetFieldHalfAngle (0.);
+      break;
+    }
+
+  case 1:
+    {
+      if (pView->fov > 89.5 || pView->fov <= 0.0) {
+	G4cout << "Field half angle should be 0 < angle <= 89.5 degrees.";
+	G4cout << endl;
+      }
+      else {
+	pView->fVP.SetFieldHalfAngle (pView->fov * deg);
+      }
+      break;
+    }
+  default:
+    {
+      G4Exception("Unrecognised choice made in projection_callback");
+    }
+  }
+
+  pView->SetView ();
+  pView->ClearView ();
+  pView->DrawView ();
+}  
+
+#endif
+