| 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 // 27 //
28 // 28 //
29 29
>> 30 #ifdef G4VIS_BUILD_RAYTRACERX_DRIVER
>> 31
30 #include "G4RTXScanner.hh" 32 #include "G4RTXScanner.hh"
31 33
32 #include "G4TheRayTracer.hh" 34 #include "G4TheRayTracer.hh"
33 #include "G4RayTracerXViewer.hh" 35 #include "G4RayTracerXViewer.hh"
34 #include "G4ViewParameters.hh" 36 #include "G4ViewParameters.hh"
35 #include <X11/Xlib.h> 37 #include <X11/Xlib.h>
36 #include <X11/Xutil.h> 38 #include <X11/Xutil.h>
37 #include <X11/Xatom.h> 39 #include <X11/Xatom.h>
38 40
39 #define G4warn G4cout <<
40 <<
41 extern "C" { 41 extern "C" {
42 Bool G4RayTracerXScannerWaitForNotify (Displ 42 Bool G4RayTracerXScannerWaitForNotify (Display*, XEvent* e, char* arg) {
43 return (e->type == MapNotify) && (e->xmap. 43 return (e->type == MapNotify) && (e->xmap.window == (Window) arg);
44 } 44 }
45 } 45 }
46 46
47 G4RTXScanner::G4RTXScanner(): 47 G4RTXScanner::G4RTXScanner():
48 G4VRTScanner(), theNRow(0), theNColumn(0), t 48 G4VRTScanner(), theNRow(0), theNColumn(0), theStep(0)
49 ,theIRow(0), theIColumn(0) 49 ,theIRow(0), theIColumn(0)
50 ,display(0), win(0), scmap(0) 50 ,display(0), win(0), scmap(0)
51 { 51 {
52 theGSName = "RayTracerX"; 52 theGSName = "RayTracerX";
53 theGSNickname = "RayTracerX"; 53 theGSNickname = "RayTracerX";
54 } 54 }
55 55
56 G4RTXScanner::~G4RTXScanner() {} 56 G4RTXScanner::~G4RTXScanner() {}
57 57
58 const G4String& G4RTXScanner::GetGSName() cons 58 const G4String& G4RTXScanner::GetGSName() const
59 {return theGSName;} 59 {return theGSName;}
60 60
61 const G4String& G4RTXScanner::GetGSNickname() 61 const G4String& G4RTXScanner::GetGSNickname() const
62 {return theGSNickname;} 62 {return theGSNickname;}
63 63
64 void G4RTXScanner::Initialize(G4int nRow, G4in 64 void G4RTXScanner::Initialize(G4int nRow, G4int nColumn) {
65 theNRow = nRow; 65 theNRow = nRow;
66 theNColumn = nColumn; 66 theNColumn = nColumn;
67 G4int nMax = std::max (nRow, nColumn); 67 G4int nMax = std::max (nRow, nColumn);
68 theStep = 1; 68 theStep = 1;
69 if (nMax > 3) { 69 if (nMax > 3) {
70 for (;;) { 70 for (;;) {
71 theStep *= 3; 71 theStep *= 3;
72 if (theStep > nMax) break; 72 if (theStep > nMax) break;
73 } 73 }
74 } 74 }
75 theIRow = theStep / 2; 75 theIRow = theStep / 2;
76 theIColumn = theStep / 2 - theStep; 76 theIColumn = theStep / 2 - theStep;
77 } 77 }
78 78
79 G4bool G4RTXScanner::Coords(G4int& iRow, G4int 79 G4bool G4RTXScanner::Coords(G4int& iRow, G4int& iColumn)
80 { 80 {
81 // Increment column... 81 // Increment column...
82 theIColumn += theStep; 82 theIColumn += theStep;
83 83
84 // Skip coordinates covered in the previous 84 // Skip coordinates covered in the previous scan...
85 if ((theIColumn + (3 * theStep) / 2 + 1)%(3 85 if ((theIColumn + (3 * theStep) / 2 + 1)%(3 * theStep) == 0 &&
86 (theIRow + (3 * theStep) / 2 + 1)%(3 * t 86 (theIRow + (3 * theStep) / 2 + 1)%(3 * theStep) == 0)
87 theIColumn += theStep; 87 theIColumn += theStep;
88 88
89 // If necessary, increment row... 89 // If necessary, increment row...
90 if (theIColumn >= theNColumn) { 90 if (theIColumn >= theNColumn) {
91 theIColumn = theStep / 2; 91 theIColumn = theStep / 2;
92 theIRow += theStep; 92 theIRow += theStep;
93 } 93 }
94 94
95 // Return if finished... 95 // Return if finished...
96 if (theIRow >= theNRow && theStep <= 1) retu 96 if (theIRow >= theNRow && theStep <= 1) return false;
97 97
98 // Start next scan if necessary... 98 // Start next scan if necessary...
99 if (theIRow >= theNRow) { 99 if (theIRow >= theNRow) {
100 theStep /= 3; 100 theStep /= 3;
101 theIRow = theStep / 2; 101 theIRow = theStep / 2;
102 theIColumn = theStep / 2; 102 theIColumn = theStep / 2;
103 } 103 }
104 104
105 // Return current row and column... 105 // Return current row and column...
106 iRow = theIRow; 106 iRow = theIRow;
107 iColumn = theIColumn; 107 iColumn = theIColumn;
108 return true; 108 return true;
109 } 109 }
110 110
111 G4bool G4RTXScanner::GetXWindow(const G4String 111 G4bool G4RTXScanner::GetXWindow(const G4String& name, G4ViewParameters& vp)
112 { 112 {
113 display = XOpenDisplay(0); // Use display d 113 display = XOpenDisplay(0); // Use display defined by DISPLAY environment.
114 if (!display) { 114 if (!display) {
115 G4warn << "G4RTXScanner::Initialize(): can << 115 G4cerr << "G4RTXScanner::Initialize(): cannot get display."
116 << G4endl; 116 << G4endl;
117 return false; 117 return false;
118 } 118 }
119 119
120 int screen_num = DefaultScreen(display); 120 int screen_num = DefaultScreen(display);
121 121
122 // Window size and position... 122 // Window size and position...
123 int xOffset = 0, yOffset = 0; 123 int xOffset = 0, yOffset = 0;
124 XSizeHints* size_hints = XAllocSizeHints(); 124 XSizeHints* size_hints = XAllocSizeHints();
125 unsigned int width, height; 125 unsigned int width, height;
126 const G4String& XGeometryString = vp.GetXGeo 126 const G4String& XGeometryString = vp.GetXGeometryString();
127 if (!XGeometryString.empty()) { 127 if (!XGeometryString.empty()) {
128 G4int geometryResultMask = XParseGeometry 128 G4int geometryResultMask = XParseGeometry
129 ((char*)XGeometryString.c_str(), 129 ((char*)XGeometryString.c_str(),
130 &xOffset, &yOffset, &width, &height); 130 &xOffset, &yOffset, &width, &height);
131 if (geometryResultMask & (WidthValue | Hei 131 if (geometryResultMask & (WidthValue | HeightValue)) {
132 if (geometryResultMask & XValue) { 132 if (geometryResultMask & XValue) {
133 if (geometryResultMask & XNegative) { 133 if (geometryResultMask & XNegative) {
134 xOffset = DisplayWidth(display, screen_num 134 xOffset = DisplayWidth(display, screen_num) + xOffset - width;
135 } 135 }
136 size_hints->flags |= PPosition; 136 size_hints->flags |= PPosition;
137 size_hints->x = xOffset; 137 size_hints->x = xOffset;
138 } 138 }
139 if (geometryResultMask & YValue) { 139 if (geometryResultMask & YValue) {
140 if (geometryResultMask & YNegative) { 140 if (geometryResultMask & YNegative) {
141 yOffset = DisplayHeight(display, screen_nu 141 yOffset = DisplayHeight(display, screen_num) + yOffset - height;
142 } 142 }
143 size_hints->flags |= PPosition; 143 size_hints->flags |= PPosition;
144 size_hints->y = yOffset; 144 size_hints->y = yOffset;
145 } 145 }
146 } else { 146 } else {
147 G4warn << "ERROR: Geometry string \"" << 147 G4cout << "ERROR: Geometry string \""
148 << XGeometryString 148 << XGeometryString
149 << "\" invalid. Using \"600x600\"." 149 << "\" invalid. Using \"600x600\"."
150 << G4endl; 150 << G4endl;
151 width = 600; 151 width = 600;
152 height = 600; 152 height = 600;
153 } 153 }
154 } else { 154 } else {
155 G4warn << "ERROR: Geometry string \"" << 155 G4cout << "ERROR: Geometry string \""
156 << XGeometryString 156 << XGeometryString
157 << "\" is empty. Using \"600x600\"." 157 << "\" is empty. Using \"600x600\"."
158 << G4endl; 158 << G4endl;
159 width = 600; 159 width = 600;
160 height = 600; 160 height = 600;
161 } 161 }
162 size_hints->width = width; 162 size_hints->width = width;
163 size_hints->height = height; 163 size_hints->height = height;
164 size_hints->flags |= PSize; 164 size_hints->flags |= PSize;
165 165
166 win = XCreateSimpleWindow 166 win = XCreateSimpleWindow
167 (display, RootWindow(display, screen_num), 167 (display, RootWindow(display, screen_num),
168 xOffset, yOffset, width, height, 168 xOffset, yOffset, width, height,
169 0, // Bor 169 0, // Border width.
170 WhitePixel(display, screen_num), // Bor 170 WhitePixel(display, screen_num), // Border colour.
171 BlackPixel(display, screen_num)); // Bac 171 BlackPixel(display, screen_num)); // Background colour.
172 172
173 XGCValues values; 173 XGCValues values;
174 gc = XCreateGC(display, win, 0, &values); 174 gc = XCreateGC(display, win, 0, &values);
175 175
176 int nMaps; 176 int nMaps;
177 Status status = XGetRGBColormaps 177 Status status = XGetRGBColormaps
178 (display, RootWindow(display, screen_num), 178 (display, RootWindow(display, screen_num),
179 &scmap, &nMaps, XA_RGB_BEST_MAP); 179 &scmap, &nMaps, XA_RGB_BEST_MAP);
180 if (!status) { 180 if (!status) {
181 system("xstdcmap -best"); // ...and try a 181 system("xstdcmap -best"); // ...and try again...
182 status = XGetRGBColormaps 182 status = XGetRGBColormaps
183 (display, RootWindow(display, screen_num 183 (display, RootWindow(display, screen_num),
184 &scmap, &nMaps, XA_RGB_BEST_MAP); 184 &scmap, &nMaps, XA_RGB_BEST_MAP);
185 if (!status) { 185 if (!status) {
186 G4warn << << 186 G4cerr <<
187 "G4RTXScanner::Initialize(): cannot get colo 187 "G4RTXScanner::Initialize(): cannot get color map."
188 "\n Perhaps your system does not support XA 188 "\n Perhaps your system does not support XA_RGB_BEST_MAP."
189 << G4endl; 189 << G4endl;
190 return false; 190 return false;
191 } 191 }
192 } 192 }
193 if (!scmap->colormap) { 193 if (!scmap->colormap) {
194 G4warn << "G4RTXScanner::Initialize(): col << 194 G4cerr << "G4RTXScanner::Initialize(): color map empty."
195 << G4endl; 195 << G4endl;
196 return false; 196 return false;
197 } 197 }
198 198
199 XWMHints* wm_hints = XAllocWMHints(); 199 XWMHints* wm_hints = XAllocWMHints();
200 XClassHint* class_hint = XAllocClassHint(); 200 XClassHint* class_hint = XAllocClassHint();
201 const char* window_name = name.c_str(); 201 const char* window_name = name.c_str();
202 XTextProperty windowName; 202 XTextProperty windowName;
203 XStringListToTextProperty((char**)&window_na 203 XStringListToTextProperty((char**)&window_name, 1, &windowName);
204 204
205 XSetWMProperties(display, win, &windowName, 205 XSetWMProperties(display, win, &windowName, &windowName,
206 0, 0, size_hints, wm_hints, class_hint) 206 0, 0, size_hints, wm_hints, class_hint);
207 207
208 XMapWindow(display, win); 208 XMapWindow(display, win);
209 209
210 // Wait for window to appear (wait for an "m 210 // Wait for window to appear (wait for an "map notify" event).
211 XSelectInput(display, win, StructureNotifyMa 211 XSelectInput(display, win, StructureNotifyMask);
212 XEvent event; 212 XEvent event;
213 XIfEvent (display, &event, G4RayTracerXScann 213 XIfEvent (display, &event, G4RayTracerXScannerWaitForNotify, (char*) win);
214 214
215 return true; 215 return true;
216 } 216 }
217 217
218 void G4RTXScanner::Draw 218 void G4RTXScanner::Draw
219 (unsigned char red, unsigned char green, unsig 219 (unsigned char red, unsigned char green, unsigned char blue)
220 // Draw coloured square at current position. 220 // Draw coloured square at current position.
221 { 221 {
222 unsigned long pixel_value = scmap->base_pixe 222 unsigned long pixel_value = scmap->base_pixel +
223 ((unsigned long) ((red * scmap->red_max) / 223 ((unsigned long) ((red * scmap->red_max) / 256.) * scmap->red_mult) +
224 ((unsigned long) ((green * scmap->green_ma 224 ((unsigned long) ((green * scmap->green_max) / 256.) * scmap->green_mult) +
225 ((unsigned long) ((blue * scmap->blue_max) 225 ((unsigned long) ((blue * scmap->blue_max) / 256.) * scmap->blue_mult);
226 XSetForeground(display, gc, pixel_value); 226 XSetForeground(display, gc, pixel_value);
227 227
228 if (theStep > 1) { 228 if (theStep > 1) {
229 XFillRectangle(display, win, gc, 229 XFillRectangle(display, win, gc,
230 theIColumn - theStep / 2, 230 theIColumn - theStep / 2,
231 theIRow - theStep / 2, 231 theIRow - theStep / 2,
232 theStep, theStep); 232 theStep, theStep);
233 } else { 233 } else {
234 XDrawPoint(display, win, gc, theIColumn, t 234 XDrawPoint(display, win, gc, theIColumn, theIRow);
235 } 235 }
236 236
237 XFlush(display); 237 XFlush(display);
238 } 238 }
>> 239
>> 240 #endif
239 241