| Geant4 Cross Reference |
1 // 1 //
2 // ******************************************* 2 // ********************************************************************
3 // * License and Disclaimer 3 // * License and Disclaimer *
4 // * 4 // * *
5 // * The Geant4 software is copyright of th 5 // * The Geant4 software is copyright of the Copyright Holders of *
6 // * the Geant4 Collaboration. It is provided 6 // * the Geant4 Collaboration. It is provided under the terms and *
7 // * conditions of the Geant4 Software License 7 // * conditions of the Geant4 Software License, included in the file *
8 // * LICENSE and available at http://cern.ch/ 8 // * LICENSE and available at http://cern.ch/geant4/license . These *
9 // * include a list of copyright holders. 9 // * include a list of copyright holders. *
10 // * 10 // * *
11 // * Neither the authors of this software syst 11 // * Neither the authors of this software system, nor their employing *
12 // * institutes,nor the agencies providing fin 12 // * institutes,nor the agencies providing financial support for this *
13 // * work make any representation or warran 13 // * work make any representation or warranty, express or implied, *
14 // * regarding this software system or assum 14 // * regarding this software system or assume any liability for its *
15 // * use. Please see the license in the file 15 // * use. Please see the license in the file LICENSE and URL above *
16 // * for the full disclaimer and the limitatio 16 // * for the full disclaimer and the limitation of liability. *
17 // * 17 // * *
18 // * This code implementation is the result 18 // * This code implementation is the result of the scientific and *
19 // * technical work of the GEANT4 collaboratio 19 // * technical work of the GEANT4 collaboration. *
20 // * By using, copying, modifying or distri 20 // * By using, copying, modifying or distributing the software (or *
21 // * any work based on the software) you ag 21 // * any work based on the software) you agree to acknowledge its *
22 // * use in resulting scientific publicati 22 // * use in resulting scientific publications, and indicate your *
23 // * acceptance of all terms of the Geant4 Sof 23 // * acceptance of all terms of the Geant4 Software license. *
24 // ******************************************* 24 // ********************************************************************
25 // 25 //
26 // 26 //
>> 27 // $Id: G4RTXScanner.cc,v 1.4 2006/06/29 21:24:09 gunter Exp $
>> 28 // GEANT4 tag $Name: geant4-08-01-patch-01 $
27 // 29 //
28 // 30 //
29 31
>> 32 #ifdef G4VIS_BUILD_RAYTRACERX_DRIVER
>> 33
30 #include "G4RTXScanner.hh" 34 #include "G4RTXScanner.hh"
31 35
32 #include "G4TheRayTracer.hh" 36 #include "G4TheRayTracer.hh"
33 #include "G4RayTracerXViewer.hh" 37 #include "G4RayTracerXViewer.hh"
34 #include "G4ViewParameters.hh" 38 #include "G4ViewParameters.hh"
35 #include <X11/Xlib.h> 39 #include <X11/Xlib.h>
36 #include <X11/Xutil.h> 40 #include <X11/Xutil.h>
37 #include <X11/Xatom.h> 41 #include <X11/Xatom.h>
38 42
39 #define G4warn G4cout <<
40 <<
41 extern "C" { 43 extern "C" {
42 Bool G4RayTracerXScannerWaitForNotify (Displ 44 Bool G4RayTracerXScannerWaitForNotify (Display*, XEvent* e, char* arg) {
43 return (e->type == MapNotify) && (e->xmap. 45 return (e->type == MapNotify) && (e->xmap.window == (Window) arg);
44 } 46 }
45 } 47 }
46 48
47 G4RTXScanner::G4RTXScanner(): 49 G4RTXScanner::G4RTXScanner():
48 G4VRTScanner(), theNRow(0), theNColumn(0), t << 50 theGSName("RayTracerX"), theGSNickname("RayTracerX"),
49 ,theIRow(0), theIColumn(0) << 51 theNRow(0), theNColumn(0), theIRow(0), theIColumn(0) {}
50 ,display(0), win(0), scmap(0) <<
51 { <<
52 theGSName = "RayTracerX"; <<
53 theGSNickname = "RayTracerX"; <<
54 } <<
55 <<
56 G4RTXScanner::~G4RTXScanner() {} <<
57 52
58 const G4String& G4RTXScanner::GetGSName() cons 53 const G4String& G4RTXScanner::GetGSName() const
59 {return theGSName;} 54 {return theGSName;}
60 55
61 const G4String& G4RTXScanner::GetGSNickname() 56 const G4String& G4RTXScanner::GetGSNickname() const
62 {return theGSNickname;} 57 {return theGSNickname;}
63 58
64 void G4RTXScanner::Initialize(G4int nRow, G4in 59 void G4RTXScanner::Initialize(G4int nRow, G4int nColumn) {
65 theNRow = nRow; 60 theNRow = nRow;
66 theNColumn = nColumn; 61 theNColumn = nColumn;
67 G4int nMax = std::max (nRow, nColumn); 62 G4int nMax = std::max (nRow, nColumn);
68 theStep = 1; 63 theStep = 1;
69 if (nMax > 3) { 64 if (nMax > 3) {
70 for (;;) { 65 for (;;) {
71 theStep *= 3; 66 theStep *= 3;
72 if (theStep > nMax) break; 67 if (theStep > nMax) break;
73 } 68 }
74 } 69 }
75 theIRow = theStep / 2; 70 theIRow = theStep / 2;
76 theIColumn = theStep / 2 - theStep; 71 theIColumn = theStep / 2 - theStep;
77 } 72 }
78 73
79 G4bool G4RTXScanner::Coords(G4int& iRow, G4int 74 G4bool G4RTXScanner::Coords(G4int& iRow, G4int& iColumn)
80 { 75 {
81 // Increment column... 76 // Increment column...
82 theIColumn += theStep; 77 theIColumn += theStep;
83 78
84 // Skip coordinates covered in the previous 79 // Skip coordinates covered in the previous scan...
85 if ((theIColumn + (3 * theStep) / 2 + 1)%(3 80 if ((theIColumn + (3 * theStep) / 2 + 1)%(3 * theStep) == 0 &&
86 (theIRow + (3 * theStep) / 2 + 1)%(3 * t 81 (theIRow + (3 * theStep) / 2 + 1)%(3 * theStep) == 0)
87 theIColumn += theStep; 82 theIColumn += theStep;
88 83
89 // If necessary, increment row... 84 // If necessary, increment row...
90 if (theIColumn >= theNColumn) { 85 if (theIColumn >= theNColumn) {
91 theIColumn = theStep / 2; 86 theIColumn = theStep / 2;
92 theIRow += theStep; 87 theIRow += theStep;
93 } 88 }
94 89
95 // Return if finished... 90 // Return if finished...
96 if (theIRow >= theNRow && theStep <= 1) retu 91 if (theIRow >= theNRow && theStep <= 1) return false;
97 92
98 // Start next scan if necessary... 93 // Start next scan if necessary...
99 if (theIRow >= theNRow) { 94 if (theIRow >= theNRow) {
100 theStep /= 3; 95 theStep /= 3;
101 theIRow = theStep / 2; 96 theIRow = theStep / 2;
102 theIColumn = theStep / 2; 97 theIColumn = theStep / 2;
103 } 98 }
104 99
105 // Return current row and column... 100 // Return current row and column...
106 iRow = theIRow; 101 iRow = theIRow;
107 iColumn = theIColumn; 102 iColumn = theIColumn;
108 return true; 103 return true;
109 } 104 }
110 105
111 G4bool G4RTXScanner::GetXWindow(const G4String 106 G4bool G4RTXScanner::GetXWindow(const G4String& name, G4ViewParameters& vp)
112 { 107 {
113 display = XOpenDisplay(0); // Use display d 108 display = XOpenDisplay(0); // Use display defined by DISPLAY environment.
114 if (!display) { 109 if (!display) {
115 G4warn << "G4RTXScanner::Initialize(): can << 110 G4cerr << "G4RTXScanner::Initialize(): cannot get display."
116 << G4endl; 111 << G4endl;
117 return false; 112 return false;
118 } 113 }
119 114
120 int screen_num = DefaultScreen(display); 115 int screen_num = DefaultScreen(display);
121 116
122 // Window size and position... 117 // Window size and position...
123 int xOffset = 0, yOffset = 0; 118 int xOffset = 0, yOffset = 0;
124 XSizeHints* size_hints = XAllocSizeHints(); <<
125 unsigned int width, height; 119 unsigned int width, height;
>> 120 XSizeHints* size_hints = XAllocSizeHints();
126 const G4String& XGeometryString = vp.GetXGeo 121 const G4String& XGeometryString = vp.GetXGeometryString();
127 if (!XGeometryString.empty()) { 122 if (!XGeometryString.empty()) {
128 G4int geometryResultMask = XParseGeometry 123 G4int geometryResultMask = XParseGeometry
129 ((char*)XGeometryString.c_str(), 124 ((char*)XGeometryString.c_str(),
130 &xOffset, &yOffset, &width, &height); 125 &xOffset, &yOffset, &width, &height);
131 if (geometryResultMask & (WidthValue | Hei 126 if (geometryResultMask & (WidthValue | HeightValue)) {
132 if (geometryResultMask & XValue) { 127 if (geometryResultMask & XValue) {
133 if (geometryResultMask & XNegative) { 128 if (geometryResultMask & XNegative) {
134 xOffset = DisplayWidth(display, screen_num 129 xOffset = DisplayWidth(display, screen_num) + xOffset - width;
135 } 130 }
136 size_hints->flags |= PPosition; 131 size_hints->flags |= PPosition;
137 size_hints->x = xOffset; 132 size_hints->x = xOffset;
138 } 133 }
139 if (geometryResultMask & YValue) { 134 if (geometryResultMask & YValue) {
140 if (geometryResultMask & YNegative) { 135 if (geometryResultMask & YNegative) {
141 yOffset = DisplayHeight(display, screen_nu 136 yOffset = DisplayHeight(display, screen_num) + yOffset - height;
142 } 137 }
143 size_hints->flags |= PPosition; 138 size_hints->flags |= PPosition;
144 size_hints->y = yOffset; 139 size_hints->y = yOffset;
145 } 140 }
146 } else { 141 } else {
147 G4warn << "ERROR: Geometry string \"" << 142 G4cout << "ERROR: Geometry string \""
148 << XGeometryString 143 << XGeometryString
149 << "\" invalid. Using \"600x600\"." 144 << "\" invalid. Using \"600x600\"."
150 << G4endl; 145 << G4endl;
151 width = 600; 146 width = 600;
152 height = 600; 147 height = 600;
153 } 148 }
154 } else { <<
155 G4warn << "ERROR: Geometry string \"" <<
156 << XGeometryString <<
157 << "\" is empty. Using \"600x600\"." <<
158 << G4endl; <<
159 width = 600; <<
160 height = 600; <<
161 } 149 }
162 size_hints->width = width; 150 size_hints->width = width;
163 size_hints->height = height; 151 size_hints->height = height;
164 size_hints->flags |= PSize; 152 size_hints->flags |= PSize;
165 153
166 win = XCreateSimpleWindow 154 win = XCreateSimpleWindow
167 (display, RootWindow(display, screen_num), 155 (display, RootWindow(display, screen_num),
168 xOffset, yOffset, width, height, 156 xOffset, yOffset, width, height,
169 0, // Bor 157 0, // Border width.
170 WhitePixel(display, screen_num), // Bor 158 WhitePixel(display, screen_num), // Border colour.
171 BlackPixel(display, screen_num)); // Bac 159 BlackPixel(display, screen_num)); // Background colour.
172 160
173 XGCValues values; 161 XGCValues values;
174 gc = XCreateGC(display, win, 0, &values); 162 gc = XCreateGC(display, win, 0, &values);
175 163
176 int nMaps; 164 int nMaps;
177 Status status = XGetRGBColormaps 165 Status status = XGetRGBColormaps
178 (display, RootWindow(display, screen_num), 166 (display, RootWindow(display, screen_num),
179 &scmap, &nMaps, XA_RGB_BEST_MAP); 167 &scmap, &nMaps, XA_RGB_BEST_MAP);
180 if (!status) { 168 if (!status) {
181 system("xstdcmap -best"); // ...and try a 169 system("xstdcmap -best"); // ...and try again...
182 status = XGetRGBColormaps << 170 Status status = XGetRGBColormaps
183 (display, RootWindow(display, screen_num 171 (display, RootWindow(display, screen_num),
184 &scmap, &nMaps, XA_RGB_BEST_MAP); 172 &scmap, &nMaps, XA_RGB_BEST_MAP);
185 if (!status) { 173 if (!status) {
186 G4warn << << 174 G4cerr <<
187 "G4RTXScanner::Initialize(): cannot get colo 175 "G4RTXScanner::Initialize(): cannot get color map."
188 "\n Perhaps your system does not support XA << 176 "\n Perhaps your system does not support RGB_BEST_MAP."
189 << G4endl; 177 << G4endl;
190 return false; 178 return false;
191 } 179 }
192 } 180 }
193 if (!scmap->colormap) { 181 if (!scmap->colormap) {
194 G4warn << "G4RTXScanner::Initialize(): col << 182 G4cerr << "G4RTXScanner::Initialize(): color map empty."
195 << G4endl; 183 << G4endl;
196 return false; 184 return false;
197 } 185 }
198 186
199 XWMHints* wm_hints = XAllocWMHints(); 187 XWMHints* wm_hints = XAllocWMHints();
200 XClassHint* class_hint = XAllocClassHint(); 188 XClassHint* class_hint = XAllocClassHint();
201 const char* window_name = name.c_str(); 189 const char* window_name = name.c_str();
202 XTextProperty windowName; 190 XTextProperty windowName;
203 XStringListToTextProperty((char**)&window_na 191 XStringListToTextProperty((char**)&window_name, 1, &windowName);
204 192
205 XSetWMProperties(display, win, &windowName, 193 XSetWMProperties(display, win, &windowName, &windowName,
206 0, 0, size_hints, wm_hints, class_hint) 194 0, 0, size_hints, wm_hints, class_hint);
207 195
208 XMapWindow(display, win); 196 XMapWindow(display, win);
209 197
210 // Wait for window to appear (wait for an "m 198 // Wait for window to appear (wait for an "map notify" event).
211 XSelectInput(display, win, StructureNotifyMa 199 XSelectInput(display, win, StructureNotifyMask);
212 XEvent event; 200 XEvent event;
213 XIfEvent (display, &event, G4RayTracerXScann 201 XIfEvent (display, &event, G4RayTracerXScannerWaitForNotify, (char*) win);
214 202
215 return true; 203 return true;
216 } 204 }
217 205
218 void G4RTXScanner::Draw 206 void G4RTXScanner::Draw
219 (unsigned char red, unsigned char green, unsig 207 (unsigned char red, unsigned char green, unsigned char blue)
220 // Draw coloured square at current position. 208 // Draw coloured square at current position.
221 { 209 {
222 unsigned long pixel_value = scmap->base_pixe 210 unsigned long pixel_value = scmap->base_pixel +
223 ((unsigned long) ((red * scmap->red_max) / 211 ((unsigned long) ((red * scmap->red_max) / 256.) * scmap->red_mult) +
224 ((unsigned long) ((green * scmap->green_ma 212 ((unsigned long) ((green * scmap->green_max) / 256.) * scmap->green_mult) +
225 ((unsigned long) ((blue * scmap->blue_max) 213 ((unsigned long) ((blue * scmap->blue_max) / 256.) * scmap->blue_mult);
226 XSetForeground(display, gc, pixel_value); 214 XSetForeground(display, gc, pixel_value);
227 215
228 if (theStep > 1) { 216 if (theStep > 1) {
229 XFillRectangle(display, win, gc, 217 XFillRectangle(display, win, gc,
230 theIColumn - theStep / 2, 218 theIColumn - theStep / 2,
231 theIRow - theStep / 2, 219 theIRow - theStep / 2,
232 theStep, theStep); 220 theStep, theStep);
233 } else { 221 } else {
234 XDrawPoint(display, win, gc, theIColumn, t 222 XDrawPoint(display, win, gc, theIColumn, theIRow);
235 } 223 }
236 224
237 XFlush(display); 225 XFlush(display);
238 } 226 }
>> 227
>> 228 #endif
239 229