]> Pileus Git - grits/blob - src/plugins/env.c
3a1f324f787c7f3b6744017694d8bd3d3691cd67
[grits] / src / plugins / env.c
1 /*
2  * Copyright (C) 2009-2010 Andy Spencer <andy753421@gmail.com>
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 /**
19  * SECTION:env
20  * @short_description: Environment plugin
21  *
22  * #GritsPluginEnv provides environmental information such as sky images. It can
23  * also paint a blank overlay on the surface so that other plugins can draw
24  * transparent overlays nicely.
25  */
26
27 #include <math.h>
28 #include <gtk/gtkgl.h>
29 #include <GL/gl.h>
30
31 #include <grits.h>
32
33 #include "env.h"
34
35 /***********
36  * Helpers *
37  ***********/
38 static void expose(GritsCallback *callback, GritsOpenGL *opengl, gpointer _env)
39 {
40         GritsPluginEnv *env = GRITS_PLUGIN_ENV(_env);
41         g_debug("GritsPluginEnv: expose");
42
43         gdouble lat, lon, elev;
44         grits_viewer_get_location(env->viewer, &lat, &lon, &elev);
45
46         /* Misc */
47         gdouble rg   = MAX(0, 1-(elev/40000));
48         gdouble blue = MAX(0, 1-(elev/100000));
49         glClearColor(MIN(0.4,rg), MIN(0.4,rg), MIN(1,blue), 1.0f);
50         glClear(GL_COLOR_BUFFER_BIT);
51
52         /* Attempt to render an atmosphere */
53         glEnable(GL_COLOR_MATERIAL);
54         glDisable(GL_CULL_FACE);
55         glDisable(GL_LIGHTING);
56         glMatrixMode(GL_MODELVIEW);
57         glBlendFunc(GL_SRC_ALPHA, GL_DST_ALPHA);
58         grits_viewer_center_position(env->viewer, lat, lon, -EARTH_R);
59
60         gdouble ds  = EARTH_R+elev;     // distance to self
61         gdouble da  = EARTH_R+300000;   // distance to top of atmosphere
62         gdouble dg  = EARTH_R-100000;   // distance to top of atmosphere
63         gdouble ang = acos(EARTH_R/ds); // angle to horizon
64         ang = MAX(ang,0.1);
65
66         gdouble ar  = sin(ang)*da;      // top of quad fan "atomosphere"j
67         gdouble az  = cos(ang)*da;      //
68
69         gdouble gr  = sin(ang)*dg;      // bottom of quad fan "ground"
70         gdouble gz  = cos(ang)*dg;      //
71
72         glBegin(GL_QUAD_STRIP);
73         for (gdouble i = 0; i <= 2*G_PI; i += G_PI/30) {
74                 glColor4f(0.3, 0.3, 1.0, 1.0); glVertex3f(gr*sin(i), gr*cos(i), gz);
75                 glColor4f(0.3, 0.3, 1.0, 0.0); glVertex3f(ar*sin(i), ar*cos(i), az);
76         }
77         glEnd();
78 }
79
80
81 /***********
82  * Methods *
83  ***********/
84 /**
85  * grits_plugin_env_new:
86  * @viewer: the #GritsViewer to use for drawing
87  * @prefs:  the #GritsPrefs for storing configurations
88  *
89  * Create a new instance of the environment plugin.
90  *
91  * Returns: the new #GritsPluginEnv
92  */
93 GritsPluginEnv *grits_plugin_env_new(GritsViewer *viewer, GritsPrefs *prefs)
94 {
95         g_debug("GritsPluginEnv: new");
96         GritsPluginEnv *env = g_object_new(GRITS_TYPE_PLUGIN_ENV, NULL);
97         env->viewer = g_object_ref(viewer);
98
99         /* Create objects */
100         GritsCallback *callback   = grits_callback_new(expose, env);
101         GritsTile     *background = grits_tile_new(NULL, NORTH, SOUTH, EAST, WEST);
102         glGenTextures(1, &env->tex);
103         background->data = &env->tex;
104
105         /* Add renderers */
106         gpointer ref1, ref2;
107         ref1 = grits_viewer_add(viewer, GRITS_OBJECT(callback),   GRITS_LEVEL_BACKGROUND, FALSE);
108         ref2 = grits_viewer_add(viewer, GRITS_OBJECT(background), GRITS_LEVEL_BACKGROUND, FALSE);
109         env->refs = g_list_prepend(env->refs, ref1);
110         env->refs = g_list_prepend(env->refs, ref2);
111
112         return env;
113 }
114
115
116 /****************
117  * GObject code *
118  ****************/
119 /* Plugin init */
120 static void grits_plugin_env_plugin_init(GritsPluginInterface *iface);
121 G_DEFINE_TYPE_WITH_CODE(GritsPluginEnv, grits_plugin_env, G_TYPE_OBJECT,
122                 G_IMPLEMENT_INTERFACE(GRITS_TYPE_PLUGIN,
123                         grits_plugin_env_plugin_init));
124 static void grits_plugin_env_plugin_init(GritsPluginInterface *iface)
125 {
126         g_debug("GritsPluginEnv: plugin_init");
127         /* Add methods to the interface */
128 }
129 /* Class/Object init */
130 static void grits_plugin_env_init(GritsPluginEnv *env)
131 {
132         g_debug("GritsPluginEnv: init");
133         /* Set defaults */
134 }
135 static void grits_plugin_env_dispose(GObject *gobject)
136 {
137         g_debug("GritsPluginEnv: dispose");
138         GritsPluginEnv *env = GRITS_PLUGIN_ENV(gobject);
139         /* Drop references */
140         if (env->viewer) {
141                 for (GList *cur = env->refs; cur; cur = cur->next)
142                         grits_viewer_remove(env->viewer, cur->data);
143                 g_list_free(env->refs);
144                 g_object_unref(env->viewer);
145                 glDeleteTextures(1, &env->tex);
146                 env->viewer = NULL;
147         }
148         G_OBJECT_CLASS(grits_plugin_env_parent_class)->dispose(gobject);
149 }
150 static void grits_plugin_env_class_init(GritsPluginEnvClass *klass)
151 {
152         g_debug("GritsPluginEnv: class_init");
153         GObjectClass *gobject_class = (GObjectClass*)klass;
154         gobject_class->dispose = grits_plugin_env_dispose;
155 }