1 /* dangerball, Copyright (c) 2001-2017 Jamie Zawinski <jwz@jwz.org>
3 * Permission to use, copy, modify, distribute, and sell this software and its
4 * documentation for any purpose is hereby granted without fee, provided that
5 * the above copyright notice appear in all copies and that both that
6 * copyright notice and this permission notice appear in supporting
7 * documentation. No representations are made about the suitability of this
8 * software for any purpose. It is provided "as is" without express or
12 #define DEFAULTS "*delay: 30000 \n" \
14 "*showFPS: False \n" \
15 "*wireframe: False \n" \
16 "*suppressRotationAnimation: True\n" \
19 # define release_ball 0
21 #define countof(x) (sizeof((x))/sizeof((*x)))
23 #include "xlockmore.h"
28 #include "gltrackball.h"
31 #ifdef USE_GL /* whole file */
34 #define DEF_SPIN "True"
35 #define DEF_WANDER "True"
36 #define DEF_SPEED "0.05"
38 #define SPIKE_FACES 12 /* how densely to render spikes */
39 #define SMOOTH_SPIKES True
40 #define SPHERE_SLICES 32 /* how densely to render spheres */
41 #define SPHERE_STACKS 16
45 GLXContext *glx_context;
47 trackball_state *trackball;
63 static ball_configuration *bps = NULL;
67 static Bool do_wander;
69 static XrmOptionDescRec opts[] = {
70 { "-spin", ".spin", XrmoptionNoArg, "True" },
71 { "+spin", ".spin", XrmoptionNoArg, "False" },
72 { "-speed", ".speed", XrmoptionSepArg, 0 },
73 { "-wander", ".wander", XrmoptionNoArg, "True" },
74 { "+wander", ".wander", XrmoptionNoArg, "False" }
77 static argtype vars[] = {
78 {&do_spin, "spin", "Spin", DEF_SPIN, t_Bool},
79 {&do_wander, "wander", "Wander", DEF_WANDER, t_Bool},
80 {&speed, "speed", "Speed", DEF_SPEED, t_Float},
83 ENTRYPOINT ModeSpecOpt ball_opts = {countof(opts), opts, countof(vars), vars, NULL};
86 /* Window management, etc
89 reshape_ball (ModeInfo *mi, int width, int height)
91 GLfloat h = (GLfloat) height / (GLfloat) width;
94 if (width > height * 5) { /* tiny window: show middle */
95 height = width * 9/16;
97 h = height / (GLfloat) width;
100 glViewport (0, y, (GLint) width, (GLint) height);
102 glMatrixMode(GL_PROJECTION);
104 gluPerspective (30.0, 1/h, 1.0, 100.0);
106 glMatrixMode(GL_MODELVIEW);
108 gluLookAt( 0.0, 0.0, 30.0,
112 # ifdef HAVE_MOBILE /* Keep it the same relative size when rotated. */
114 int o = (int) current_device_rotation();
115 if (o != 0 && o != 180 && o != -180)
116 glScalef (1/h, 1/h, 1/h);
120 glClear(GL_COLOR_BUFFER_BIT);
125 randomize_spikes (ModeInfo *mi)
127 ball_configuration *bp = &bps[MI_SCREEN(mi)];
130 for (i = 0; i < MI_COUNT(mi); i++)
132 bp->spikes[i*2] = (random() % 360) - 180;
133 bp->spikes[i*2+1] = (random() % 180) - 90;
136 # define ROT_SCALE 22
137 for (i = 0; i < MI_COUNT(mi) * 2; i++)
138 bp->spikes[i] = (bp->spikes[i] / ROT_SCALE) * ROT_SCALE;
140 if ((random() % 3) == 0)
141 bp->color_shift = random() % (bp->ncolors / 2);
147 draw_spikes (ModeInfo *mi)
149 ball_configuration *bp = &bps[MI_SCREEN(mi)];
151 GLfloat pos = bp->pos;
154 if (pos < 0) pos = -pos;
156 pos = (asin (0.5 + pos/2) - 0.5) * 2;
158 for (i = 0; i < MI_COUNT(mi); i++)
161 glRotatef(bp->spikes[i*2], 0, 1, 0);
162 glRotatef(bp->spikes[i*2+1], 0, 0, 1);
163 glTranslatef(0.7, 0, 0);
164 glRotatef(-90, 0, 0, 1);
165 glScalef (diam, pos, diam);
166 glCallList (bp->spike_list);
169 mi->polygon_count += (SPIKE_FACES + 1);
175 move_spikes (ModeInfo *mi)
177 ball_configuration *bp = &bps[MI_SCREEN(mi)];
179 if (bp->pos >= 0) /* moving outward */
182 if (bp->pos >= 1) /* reverse gears at apex */
185 else /* moving inward */
188 if (bp->pos >= 0) /* stop at end */
189 randomize_spikes (mi);
195 ball_handle_event (ModeInfo *mi, XEvent *event)
197 ball_configuration *bp = &bps[MI_SCREEN(mi)];
199 if (gltrackball_event_handler (event, bp->trackball,
200 MI_WIDTH (mi), MI_HEIGHT (mi),
209 init_ball (ModeInfo *mi)
211 ball_configuration *bp;
212 int wire = MI_IS_WIREFRAME(mi);
215 bp = &bps[MI_SCREEN(mi)];
217 bp->glx_context = init_GL(mi);
219 reshape_ball (mi, MI_WIDTH(mi), MI_HEIGHT(mi));
223 GLfloat pos[4] = {1.0, 1.0, 1.0, 0.0};
224 GLfloat amb[4] = {0.0, 0.0, 0.0, 1.0};
225 GLfloat dif[4] = {1.0, 1.0, 1.0, 1.0};
226 GLfloat spc[4] = {0.0, 1.0, 1.0, 1.0};
228 glEnable(GL_LIGHTING);
230 glEnable(GL_DEPTH_TEST);
231 glEnable(GL_CULL_FACE);
233 glLightfv(GL_LIGHT0, GL_POSITION, pos);
234 glLightfv(GL_LIGHT0, GL_AMBIENT, amb);
235 glLightfv(GL_LIGHT0, GL_DIFFUSE, dif);
236 glLightfv(GL_LIGHT0, GL_SPECULAR, spc);
240 double spin_speed = 10.0;
241 double wander_speed = 0.12;
242 double spin_accel = 2.0;
244 bp->rot = make_rotator (do_spin ? spin_speed : 0,
245 do_spin ? spin_speed : 0,
246 do_spin ? spin_speed : 0,
248 do_wander ? wander_speed : 0,
250 bp->trackball = gltrackball_init (True);
254 bp->colors = (XColor *) calloc(bp->ncolors, sizeof(XColor));
255 make_smooth_colormap (0, 0, 0,
256 bp->colors, &bp->ncolors,
259 bp->spikes = (int *) calloc(MI_COUNT(mi), sizeof(*bp->spikes) * 2);
261 bp->ball_list = glGenLists (1);
262 bp->spike_list = glGenLists (1);
264 glNewList (bp->ball_list, GL_COMPILE);
265 unit_sphere (SPHERE_STACKS, SPHERE_SLICES, wire);
268 glNewList (bp->spike_list, GL_COMPILE);
271 1, 0, SPIKE_FACES, SMOOTH_SPIKES, False, wire);
274 randomize_spikes (mi);
279 draw_ball (ModeInfo *mi)
281 ball_configuration *bp = &bps[MI_SCREEN(mi)];
282 Display *dpy = MI_DISPLAY(mi);
283 Window window = MI_WINDOW(mi);
286 static const GLfloat bspec[4] = {1.0, 1.0, 1.0, 1.0};
287 static const GLfloat sspec[4] = {0.0, 0.0, 0.0, 1.0};
288 static const GLfloat bshiny = 128.0;
289 static const GLfloat sshiny = 0.0;
291 GLfloat bcolor[4] = {0.0, 0.0, 0.0, 1.0};
292 GLfloat scolor[4] = {0.0, 0.0, 0.0, 1.0};
294 if (!bp->glx_context)
297 glXMakeCurrent(MI_DISPLAY(mi), MI_WINDOW(mi), *(bp->glx_context));
299 glShadeModel(GL_SMOOTH);
301 glEnable(GL_DEPTH_TEST);
302 glEnable(GL_NORMALIZE);
303 glEnable(GL_CULL_FACE);
305 glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
309 glScalef(1.1, 1.1, 1.1);
313 get_position (bp->rot, &x, &y, &z, !bp->button_down_p);
314 glTranslatef((x - 0.5) * 8,
318 gltrackball_rotate (bp->trackball);
320 get_rotation (bp->rot, &x, &y, &z, !bp->button_down_p);
321 glRotatef (x * 360, 1.0, 0.0, 0.0);
322 glRotatef (y * 360, 0.0, 1.0, 0.0);
323 glRotatef (z * 360, 0.0, 0.0, 1.0);
326 bcolor[0] = bp->colors[bp->ccolor].red / 65536.0;
327 bcolor[1] = bp->colors[bp->ccolor].green / 65536.0;
328 bcolor[2] = bp->colors[bp->ccolor].blue / 65536.0;
330 c2 = (bp->ccolor + bp->color_shift) % bp->ncolors;
331 scolor[0] = bp->colors[c2].red / 65536.0;
332 scolor[1] = bp->colors[c2].green / 65536.0;
333 scolor[2] = bp->colors[c2].blue / 65536.0;
336 if (bp->ccolor >= bp->ncolors) bp->ccolor = 0;
338 mi->polygon_count = 0;
340 glScalef (2.0, 2.0, 2.0);
344 glMaterialfv (GL_FRONT, GL_SPECULAR, bspec);
345 glMateriali (GL_FRONT, GL_SHININESS, bshiny);
346 glMaterialfv (GL_FRONT, GL_AMBIENT_AND_DIFFUSE, bcolor);
347 glCallList (bp->ball_list);
348 mi->polygon_count += (SPHERE_SLICES * SPHERE_STACKS);
350 glMaterialfv (GL_FRONT, GL_SPECULAR, sspec);
351 glMaterialf (GL_FRONT, GL_SHININESS, sshiny);
352 glMaterialfv (GL_FRONT, GL_AMBIENT_AND_DIFFUSE, scolor);
356 if (mi->fps_p) do_fps (mi);
359 glXSwapBuffers(dpy, window);
362 XSCREENSAVER_MODULE_2 ("DangerBall", dangerball, ball)