]> Pileus Git - grits/blob - src/gis-opengl.c
Miscellaneous updates
[grits] / src / gis-opengl.c
1 /*
2  * Copyright (C) 2009 Andy Spencer <spenceal@rose-hulman.edu>
3  *
4  * This program is free software: you can redistribute it and/or modify
5  * it under the terms of the GNU General Public License as published by
6  * the Free Software Foundation, either version 3 of the License, or
7  * (at your option) any later version.
8  *
9  * This program is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * GNU General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License
15  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
16  */
17
18 /* Tessellation, "finding intersecting triangles" */
19 /* http://research.microsoft.com/pubs/70307/tr-2006-81.pdf */
20 /* http://www.opengl.org/wiki/Alpha_Blending */
21
22 #include <config.h>
23 #include <math.h>
24 #include <gdk/gdkkeysyms.h>
25 #include <gtk/gtk.h>
26 #include <gtk/gtkgl.h>
27 #include <GL/gl.h>
28 #include <GL/glu.h>
29
30 #include "gis-opengl.h"
31 #include "roam.h"
32 #include "wms.h"
33
34 #define FOV_DIST   2000.0
35 #define MPPX(dist) (4*dist/FOV_DIST)
36
37 // #define ROAM_DEBUG
38
39 /*************
40  * ROAM Code *
41  *************/
42 void roam_queue_draw(WmsCacheNode *node, gpointer _self)
43 {
44         gtk_widget_queue_draw(GTK_WIDGET(_self));
45 }
46
47 static void set_camera(GisOpenGL *self)
48 {
49         glMatrixMode(GL_MODELVIEW);
50         glLoadIdentity();
51         double lat, lon, elev, rx, ry, rz;
52         gis_view_get_location(self->view, &lat, &lon, &elev);
53         gis_view_get_rotation(self->view, &rx, &ry, &rz);
54         glRotatef(rx, 1, 0, 0);
55         glRotatef(rz, 0, 0, 1);
56         glTranslatef(0, 0, -elev2rad(elev));
57         glRotatef(lat, 1, 0, 0);
58         glRotatef(-lon, 0, 1, 0);
59 }
60
61 static void set_visuals(GisOpenGL *self)
62 {
63         /* Lighting */
64         glMatrixMode(GL_MODELVIEW);
65         glLoadIdentity();
66 #ifdef ROAM_DEBUG
67         float light_ambient[]  = {0.7f, 0.7f, 0.7f, 1.0f};
68         float light_diffuse[]  = {2.0f, 2.0f, 2.0f, 1.0f};
69 #else
70         float light_ambient[]  = {0.2f, 0.2f, 0.2f, 1.0f};
71         float light_diffuse[]  = {5.0f, 5.0f, 5.0f, 1.0f};
72 #endif
73         float light_position[] = {-13*EARTH_R, 1*EARTH_R, 3*EARTH_R, 1.0f};
74         glLightfv(GL_LIGHT0, GL_AMBIENT,  light_ambient);
75         glLightfv(GL_LIGHT0, GL_DIFFUSE,  light_diffuse);
76         glLightfv(GL_LIGHT0, GL_POSITION, light_position);
77         glEnable(GL_LIGHT0);
78         glEnable(GL_LIGHTING);
79
80         float material_ambient[]  = {0.2, 0.2, 0.2, 1.0};
81         float material_diffuse[]  = {0.8, 0.8, 0.8, 1.0};
82         float material_specular[] = {0.0, 0.0, 0.0, 1.0};
83         float material_emission[] = {0.0, 0.0, 0.0, 1.0};
84         glMaterialfv(GL_FRONT_AND_BACK, GL_AMBIENT,  material_ambient);
85         glMaterialfv(GL_FRONT_AND_BACK, GL_DIFFUSE,  material_diffuse);
86         glMaterialfv(GL_FRONT_AND_BACK, GL_SPECULAR, material_specular);
87         glMaterialfv(GL_FRONT_AND_BACK, GL_EMISSION, material_emission);
88         glDisable(GL_TEXTURE_2D);
89         glDisable(GL_COLOR_MATERIAL);
90
91         /* Camera */
92         set_camera(self);
93
94         /* Misc */
95         gdouble lat, lon, elev;
96         gis_view_get_location(self->view, &lat, &lon, &elev);
97         gdouble rg   = MAX(0, 1-(elev/20000));
98         gdouble blue = MAX(0, 1-(elev/50000));
99         glClearColor(MIN(0.65,rg), MIN(0.65,rg), MIN(1,blue), 1.0f);
100
101         glDisable(GL_ALPHA_TEST);
102
103         glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
104         glEnable(GL_BLEND);
105
106 #ifndef ROAM_DEBUG
107         glCullFace(GL_BACK);
108         glEnable(GL_CULL_FACE);
109 #endif
110
111         glClearDepth(1.0);
112         glDepthFunc(GL_LEQUAL);
113         glEnable(GL_DEPTH_TEST);
114
115         glEnable(GL_LINE_SMOOTH);
116
117         glPolygonMode(GL_FRONT_AND_BACK, GL_FILL);
118         //glShadeModel(GL_FLAT);
119 }
120
121
122 /*************
123  * Callbacks *
124  *************/
125 static void on_realize(GisOpenGL *self, gpointer _)
126 {
127         g_debug("GisOpenGL: on_realize");
128         set_visuals(self);
129         roam_sphere_update_errors(self->sphere);
130 }
131 static gboolean on_configure(GisOpenGL *self, GdkEventConfigure *event, gpointer _)
132 {
133         g_debug("GisOpenGL: on_configure");
134         gis_opengl_begin(self);
135
136         double width  = GTK_WIDGET(self)->allocation.width;
137         double height = GTK_WIDGET(self)->allocation.height;
138         glViewport(0, 0, width, height);
139
140         glMatrixMode(GL_PROJECTION);
141         glLoadIdentity();
142         double ang = atan(height/FOV_DIST);
143         gluPerspective(rad2deg(ang)*2, width/height, 1, 20*EARTH_R);
144
145 #ifndef ROAM_DEBUG
146         roam_sphere_update_errors(self->sphere);
147 #endif
148
149         gis_opengl_end(self);
150         return FALSE;
151 }
152
153 static void on_expose_plugin(GisPlugin *plugin, gchar *name, GisOpenGL *self)
154 {
155         set_visuals(self);
156         glMatrixMode(GL_PROJECTION); glPushMatrix();
157         glMatrixMode(GL_MODELVIEW);  glPushMatrix();
158         gis_plugin_expose(plugin);
159         glMatrixMode(GL_PROJECTION); glPopMatrix();
160         glMatrixMode(GL_MODELVIEW);  glPopMatrix();
161 }
162 static gboolean on_expose(GisOpenGL *self, GdkEventExpose *event, gpointer _)
163 {
164         g_debug("GisOpenGL: on_expose - begin");
165         gis_opengl_begin(self);
166
167         glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
168
169 #ifndef ROAM_DEBUG
170         set_visuals(self);
171         glEnable(GL_TEXTURE_2D);
172         glPolygonMode(GL_FRONT_AND_BACK, GL_LINE);
173         roam_sphere_draw(self->sphere);
174 #else
175         set_visuals(self);
176         glColor4f(0.0, 0.0, 9.0, 0.6);
177         glDisable(GL_TEXTURE_2D);
178         glPolygonMode(GL_FRONT_AND_BACK, GL_LINE);
179         roam_sphere_draw(self->sphere);
180
181         //roam_sphere_draw_normals(self->sphere);
182 #endif
183
184         gis_plugins_foreach(self->plugins, G_CALLBACK(on_expose_plugin), self);
185
186         set_visuals(self);
187         gis_opengl_end(self);
188         gis_opengl_flush(self);
189         g_debug("GisOpenGL: on_expose - end\n");
190         return FALSE;
191 }
192
193 static gboolean on_button_press(GisOpenGL *self, GdkEventButton *event, gpointer _)
194 {
195         g_debug("GisOpenGL: on_button_press - Grabbing focus");
196         gtk_widget_grab_focus(GTK_WIDGET(self));
197         return TRUE;
198 }
199
200 static gboolean on_key_press(GisOpenGL *self, GdkEventKey *event, gpointer _)
201 {
202         g_debug("GisOpenGL: on_key_press - key=%x, state=%x, plus=%x",
203                         event->keyval, event->state, GDK_plus);
204
205         double lat, lon, elev, pan;
206         gis_view_get_location(self->view, &lat, &lon, &elev);
207         pan = MIN(elev/(EARTH_R/2), 30);
208         guint kv = event->keyval;
209         if      (kv == GDK_Left  || kv == GDK_h) gis_view_pan(self->view,  0,  -pan, 0);
210         else if (kv == GDK_Down  || kv == GDK_j) gis_view_pan(self->view, -pan, 0,   0);
211         else if (kv == GDK_Up    || kv == GDK_k) gis_view_pan(self->view,  pan, 0,   0);
212         else if (kv == GDK_Right || kv == GDK_l) gis_view_pan(self->view,  0,   pan, 0);
213         else if (kv == GDK_minus || kv == GDK_o) gis_view_zoom(self->view, 10./9);
214         else if (kv == GDK_plus  || kv == GDK_i) gis_view_zoom(self->view, 9./10);
215         else if (kv == GDK_H) gis_view_rotate(self->view,  0, 0, -2);
216         else if (kv == GDK_J) gis_view_rotate(self->view,  2, 0,  0);
217         else if (kv == GDK_K) gis_view_rotate(self->view, -2, 0,  0);
218         else if (kv == GDK_L) gis_view_rotate(self->view,  0, 0,  2);
219
220         /* Testing */
221 #ifdef ROAM_DEBUG
222         else if (kv == GDK_n) roam_sphere_split_one(self->sphere);
223         else if (kv == GDK_p) roam_sphere_merge_one(self->sphere);
224         else if (kv == GDK_r) roam_sphere_split_merge(self->sphere);
225         else if (kv == GDK_u) roam_sphere_update_errors(self->sphere);
226         gtk_widget_queue_draw(GTK_WIDGET(self));
227 #endif
228
229         return TRUE;
230 }
231
232 static void on_view_changed(GisView *view,
233                 gdouble _1, gdouble _2, gdouble _3, GisOpenGL *self)
234 {
235         g_debug("GisOpenGL: on_view_changed");
236         gis_opengl_begin(self);
237         set_visuals(self);
238 #ifndef ROAM_DEBUG
239         roam_sphere_update_errors(self->sphere);
240 #endif
241         gis_opengl_redraw(self);
242         gis_opengl_end(self);
243 }
244
245 static gboolean on_idle(GisOpenGL *self)
246 {
247         //g_debug("GisOpenGL: on_idle");
248         gis_opengl_begin(self);
249         if (roam_sphere_split_merge(self->sphere))
250                 gis_opengl_redraw(self);
251         gis_opengl_end(self);
252         return TRUE;
253 }
254
255
256 /***********
257  * Methods *
258  ***********/
259 GisOpenGL *gis_opengl_new(GisWorld *world, GisView *view, GisPlugins *plugins)
260 {
261         g_debug("GisOpenGL: new");
262         GisOpenGL *self = g_object_new(GIS_TYPE_OPENGL, NULL);
263         self->world   = world;
264         self->view    = view;
265         self->plugins = plugins;
266         g_object_ref(world);
267         g_object_ref(view);
268
269         g_signal_connect(self->view, "location-changed", G_CALLBACK(on_view_changed), self);
270         g_signal_connect(self->view, "rotation-changed", G_CALLBACK(on_view_changed), self);
271
272         self->sphere = roam_sphere_new(self);
273
274         return g_object_ref(self);
275 }
276
277 void gis_opengl_center_position(GisOpenGL *self, gdouble lat, gdouble lon, gdouble elev)
278 {
279         glRotatef(lon, 0, 1, 0);
280         glRotatef(-lat, 1, 0, 0);
281         glTranslatef(0, 0, elev2rad(elev));
282 }
283
284 void gis_opengl_redraw(GisOpenGL *self)
285 {
286         g_debug("GisOpenGL: redraw");
287         gtk_widget_queue_draw(GTK_WIDGET(self));
288 }
289 void gis_opengl_begin(GisOpenGL *self)
290 {
291         g_assert(GIS_IS_OPENGL(self));
292
293         GdkGLContext   *glcontext  = gtk_widget_get_gl_context(GTK_WIDGET(self));
294         GdkGLDrawable  *gldrawable = gtk_widget_get_gl_drawable(GTK_WIDGET(self));
295
296         if (!gdk_gl_drawable_gl_begin(gldrawable, glcontext))
297                 g_assert_not_reached();
298 }
299 void gis_opengl_end(GisOpenGL *self)
300 {
301         g_assert(GIS_IS_OPENGL(self));
302         GdkGLDrawable *gldrawable = gtk_widget_get_gl_drawable(GTK_WIDGET(self));
303         gdk_gl_drawable_gl_end(gldrawable);
304 }
305 void gis_opengl_flush(GisOpenGL *self)
306 {
307         g_assert(GIS_IS_OPENGL(self));
308         GdkGLDrawable *gldrawable = gtk_widget_get_gl_drawable(GTK_WIDGET(self));
309         if (gdk_gl_drawable_is_double_buffered(gldrawable))
310                 gdk_gl_drawable_swap_buffers(gldrawable);
311         else
312                 glFlush();
313         gdk_gl_drawable_gl_end(gldrawable);
314 }
315
316
317 /****************
318  * GObject code *
319  ****************/
320 G_DEFINE_TYPE(GisOpenGL, gis_opengl, GTK_TYPE_DRAWING_AREA);
321 static void gis_opengl_init(GisOpenGL *self)
322 {
323         g_debug("GisOpenGL: init");
324         /* OpenGL setup */
325         GdkGLConfig *glconfig = gdk_gl_config_new_by_mode(
326                         GDK_GL_MODE_RGBA   | GDK_GL_MODE_DEPTH |
327                         GDK_GL_MODE_DOUBLE | GDK_GL_MODE_ALPHA);
328         if (!glconfig)
329                 g_error("Failed to create glconfig");
330         if (!gtk_widget_set_gl_capability(GTK_WIDGET(self),
331                                 glconfig, NULL, TRUE, GDK_GL_RGBA_TYPE))
332                 g_error("GL lacks required capabilities");
333         g_object_unref(glconfig);
334
335         gtk_widget_set_size_request(GTK_WIDGET(self), 600, 550);
336         gtk_widget_set_events(GTK_WIDGET(self),
337                         GDK_BUTTON_PRESS_MASK |
338                         GDK_ENTER_NOTIFY_MASK |
339                         GDK_KEY_PRESS_MASK);
340         g_object_set(self, "can-focus", TRUE, NULL);
341
342 #ifndef ROAM_DEBUG
343         self->sm_source = g_timeout_add(10, (GSourceFunc)on_idle, self);
344 #endif
345
346         g_signal_connect(self, "realize",            G_CALLBACK(on_realize),      NULL);
347         g_signal_connect(self, "configure-event",    G_CALLBACK(on_configure),    NULL);
348         g_signal_connect(self, "expose-event",       G_CALLBACK(on_expose),       NULL);
349
350         g_signal_connect(self, "button-press-event", G_CALLBACK(on_button_press), NULL);
351         g_signal_connect(self, "enter-notify-event", G_CALLBACK(on_button_press), NULL);
352         g_signal_connect(self, "key-press-event",    G_CALLBACK(on_key_press),    NULL);
353 }
354 static GObject *gis_opengl_constructor(GType gtype, guint n_properties,
355                 GObjectConstructParam *properties)
356 {
357         g_debug("GisOpengl: constructor");
358         GObjectClass *parent_class = G_OBJECT_CLASS(gis_opengl_parent_class);
359         return parent_class->constructor(gtype, n_properties, properties);
360 }
361 static void gis_opengl_dispose(GObject *_self)
362 {
363         g_debug("GisOpenGL: dispose");
364         GisOpenGL *self = GIS_OPENGL(_self);
365         if (self->sm_source) {
366                 g_source_remove(self->sm_source);
367                 self->sm_source = 0;
368         }
369         if (self->sphere) {
370                 roam_sphere_free(self->sphere);
371                 self->sphere = NULL;
372         }
373         if (self->world) {
374                 g_object_unref(self->world);
375                 self->world = NULL;
376         }
377         if (self->view) {
378                 g_object_unref(self->view);
379                 self->view = NULL;
380         }
381         G_OBJECT_CLASS(gis_opengl_parent_class)->dispose(_self);
382 }
383 static void gis_opengl_finalize(GObject *_self)
384 {
385         g_debug("GisOpenGL: finalize");
386         GisOpenGL *self = GIS_OPENGL(_self);
387         G_OBJECT_CLASS(gis_opengl_parent_class)->finalize(_self);
388 }
389 static void gis_opengl_class_init(GisOpenGLClass *klass)
390 {
391         g_debug("GisOpenGL: class_init");
392         GObjectClass *gobject_class = G_OBJECT_CLASS(klass);
393         gobject_class->constructor  = gis_opengl_constructor;
394         gobject_class->dispose      = gis_opengl_dispose;
395         gobject_class->finalize     = gis_opengl_finalize;
396 }