-/* xscreensaver, Copyright (c) 1998 Jamie Zawinski <jwz@jwz.org>
+/* xscreensaver, Copyright (c) 1998-2004 Jamie Zawinski <jwz@jwz.org>
*
* Permission to use, copy, modify, distribute, and sell this software and its
* documentation for any purpose is hereby granted without fee, provided that
duplicated on the "Unnatural History 2" compilation, WORLN M04699.)
*/
-#include <X11/Intrinsic.h>
-
-#define PROGCLASS "Lament"
-#define HACK_INIT init_lament
-#define HACK_DRAW draw_lament
-#define HACK_RESHAPE reshape_lament
-#define HACK_HANDLE_EVENT lament_handle_event
-#define EVENT_MASK PointerMotionMask
-#define lament_opts xlockmore_opts
-#define DEFAULTS "*delay: 10000 \n" \
+#define DEFAULTS "*delay: 20000 \n" \
"*showFPS: False \n" \
- "*wireframe: False \n" \
- "*texture: True \n"
+ "*wireframe: False \n"
+# define refresh_lament 0
+# define release_lament 0
#include "xlockmore.h"
#ifdef USE_GL /* whole file */
#define DEF_TEXTURE "True"
static int do_texture;
+
static XrmOptionDescRec opts[] = {
- {"-texture", ".lament.texture", XrmoptionNoArg, (caddr_t) "true" },
- {"+texture", ".lament.texture", XrmoptionNoArg, (caddr_t) "false" },
+ {"-texture", ".lament.texture", XrmoptionNoArg, "true" },
+ {"+texture", ".lament.texture", XrmoptionNoArg, "false" },
};
static argtype vars[] = {
- {(caddr_t *) &do_texture, "texture", "Texture", DEF_TEXTURE, t_Bool},
+ {&do_texture, "texture", "Texture", DEF_TEXTURE, t_Bool},
};
-ModeSpecOpt lament_opts = {countof(opts), opts, countof(vars), vars, NULL};
+ENTRYPOINT ModeSpecOpt lament_opts = {countof(opts), opts, countof(vars), vars, NULL};
+#include "normals.h"
#include "xpm-ximage.h"
#include "rotator.h"
#include "gltrackball.h"
} lament_type;
-static GLfloat exterior_color[] = { 0.33, 0.22, 0.03, 1.00, /* ambient */
- 0.78, 0.57, 0.11, 1.00, /* specular */
- 0.99, 0.91, 0.81, 1.00, /* diffuse */
- 27.80 /* shininess */
- };
-static GLfloat interior_color[] = { 0.20, 0.20, 0.15, 1.00, /* ambient */
- 0.40, 0.40, 0.32, 1.00, /* specular */
- 0.99, 0.99, 0.81, 1.00, /* diffuse */
- 50.80 /* shininess */
- };
+static const GLfloat exterior_color[] =
+ { 0.33, 0.22, 0.03, 1.00, /* ambient */
+ 0.78, 0.57, 0.11, 1.00, /* specular */
+ 0.99, 0.91, 0.81, 1.00, /* diffuse */
+ 27.80 /* shininess */
+ };
+static const GLfloat interior_color[] =
+ { 0.20, 0.20, 0.15, 1.00, /* ambient */
+ 0.40, 0.40, 0.32, 1.00, /* specular */
+ 0.99, 0.99, 0.81, 1.00, /* diffuse */
+ 50.80 /* shininess */
+ };
typedef struct {
int anim_pause; /* countdown before animating again */
GLfloat anim_r, anim_y, anim_z; /* relative position during anims */
+ int state, nstates;
+ lament_type *states;
+
} lament_configuration;
static lament_configuration *lcs = NULL;
lament_faces);
}
-\f
-typedef struct {
- double x,y,z;
-} XYZ;
-
-static void
-normalize (XYZ *p)
-{
- double length;
- length = sqrt (p->x * p->x +
- p->y * p->y +
- p->z * p->z);
- if (length != 0)
- {
- p->x /= length;
- p->y /= length;
- p->z /= length;
- }
- else
- {
- p->x = 0;
- p->y = 0;
- p->z = 0;
- }
-}
-
-/* Calculate the unit normal at p given two other points p1,p2 on the
- surface. The normal points in the direction of p1 crossproduct p2
- */
-static XYZ
-calc_normal (XYZ p, XYZ p1, XYZ p2)
-{
- XYZ n, pa, pb;
- pa.x = p1.x - p.x;
- pa.y = p1.y - p.y;
- pa.z = p1.z - p.z;
- pb.x = p2.x - p.x;
- pb.y = p2.y - p.y;
- pb.z = p2.z - p.z;
- n.x = pa.y * pb.z - pa.z * pb.y;
- n.y = pa.z * pb.x - pa.x * pb.z;
- n.z = pa.x * pb.y - pa.y * pb.x;
- normalize (&n);
- return (n);
-}
-
-
-static void
-do_normal(GLfloat x1, GLfloat y1, GLfloat z1,
- GLfloat x2, GLfloat y2, GLfloat z2,
- GLfloat x3, GLfloat y3, GLfloat z3)
-{
- XYZ p1, p2, p3, p;
- p1.x = x1; p1.y = y1; p1.z = z1;
- p2.x = x2; p2.y = y2; p2.z = z2;
- p3.x = x3; p3.y = y3; p3.z = z3;
-
- p = calc_normal (p1, p2, p3);
-
- glNormal3f (p.x, p.y, p.z);
-
-#ifdef DEBUG
- /* Draw a line in the direction of this face's normal. */
- {
- glPushMatrix();
- glTranslatef ((x1 + x2 + x3) / 3,
- (y1 + y2 + y3) / 3,
- (z1 + z2 + z3) / 3);
- glScalef (0.5, 0.5, 0.5);
- glBegin(GL_LINE_LOOP);
- glVertex3f(0, 0, 0);
- glVertex3f(p.x, p.y, p.z);
- glEnd();
- glPopMatrix();
- }
-#endif /* DEBUG */
-}
-
\f
/* Shorthand utilities for making faces, with proper normals.
*/
static void
-set_colors (GLfloat *color)
+set_colors (const GLfloat *color)
{
glMaterialfv(GL_FRONT, GL_AMBIENT, color+0);
glMaterialfv(GL_FRONT, GL_DIFFUSE, color+4);
}
static void
-face3(GLint texture, GLfloat *color, Bool wire,
+face3(GLint texture, const GLfloat *color, Bool wire,
GLfloat s1, GLfloat t1, GLfloat x1, GLfloat y1, GLfloat z1,
GLfloat s2, GLfloat t2, GLfloat x2, GLfloat y2, GLfloat z2,
GLfloat s3, GLfloat t3, GLfloat x3, GLfloat y3, GLfloat z3)
}
static void
-face4(GLint texture, GLfloat *color, Bool wire,
+face4(GLint texture, const GLfloat *color, Bool wire,
GLfloat s1, GLfloat t1, GLfloat x1, GLfloat y1, GLfloat z1,
GLfloat s2, GLfloat t2, GLfloat x2, GLfloat y2, GLfloat z2,
GLfloat s3, GLfloat t3, GLfloat x3, GLfloat y3, GLfloat z3,
}
static void
-face5(GLint texture, GLfloat *color, Bool wire,
+face5(GLint texture, const GLfloat *color, Bool wire,
GLfloat s1, GLfloat t1, GLfloat x1, GLfloat y1, GLfloat z1,
GLfloat s2, GLfloat t2, GLfloat x2, GLfloat y2, GLfloat z2,
GLfloat s3, GLfloat t3, GLfloat x3, GLfloat y3, GLfloat z3,
/* Rendering and animating object models
*/
-Bool
+ENTRYPOINT Bool
lament_handle_event (ModeInfo *mi, XEvent *event)
{
lament_configuration *lc = &lcs[MI_SCREEN(mi)];
if (event->xany.type == ButtonPress &&
- event->xbutton.button & Button1)
+ event->xbutton.button == Button1)
{
lc->button_down_p = True;
gltrackball_start (lc->trackball,
return True;
}
else if (event->xany.type == ButtonRelease &&
- event->xbutton.button & Button1)
+ event->xbutton.button == Button1)
{
lc->button_down_p = False;
return True;
}
+ else if (event->xany.type == ButtonPress &&
+ (event->xbutton.button == Button4 ||
+ event->xbutton.button == Button5 ||
+ event->xbutton.button == Button6 ||
+ event->xbutton.button == Button7))
+ {
+ gltrackball_mousewheel (lc->trackball, event->xbutton.button, 5,
+ !!event->xbutton.state);
+ return True;
+ }
else if (event->xany.type == MotionNotify &&
lc->button_down_p)
{
}
+/* Rather than just picking states randomly, pick an ordering randomly, do it,
+ and then re-randomize. That way one can be assured of seeing all states in
+ a short time period, though not always in the same order (it's frustrating
+ to see it pick the same state 5x in a row.)
+ */
+static void
+shuffle_states (lament_configuration *lc)
+{
+ int i;
+ for (i = 0; i < lc->nstates; i++)
+ {
+ int a = random() % lc->nstates;
+ lament_type swap = lc->states[a];
+ lc->states[a] = lc->states[i];
+ lc->states[i] = swap;
+ }
+}
+
+
static void
animate(ModeInfo *mi)
{
{
case LAMENT_BOX:
{
- /* Rather than just picking states randomly, pick an ordering randomly,
- do it, and then re-randomize. That way one can be assured of seeing
- all states in a short time period, though not always in the same
- order (it's frustrating to see it pick the same state 5x in a row.)
- */
- static lament_type states[] = {
- LAMENT_STAR_OUT, LAMENT_STAR_OUT,
- LAMENT_TETRA_UNE, LAMENT_TETRA_USW,
- LAMENT_TETRA_DWN, LAMENT_TETRA_DSE,
- LAMENT_LID_OPEN, LAMENT_LID_OPEN, LAMENT_LID_OPEN,
- LAMENT_TASER_OUT, LAMENT_TASER_OUT,
- LAMENT_BOX, LAMENT_BOX, LAMENT_BOX, LAMENT_BOX, LAMENT_BOX,
- LAMENT_BOX, LAMENT_BOX, LAMENT_BOX, LAMENT_BOX, LAMENT_BOX,
- };
- static int state = countof(states);
-
- if (state < countof(states))
- {
- lc->type = states[state++];
- }
- else
- {
- int i;
- state = 0;
- for (i = 0; i < countof(states); i++)
- {
- int a = random() % countof(states);
- lament_type swap = states[a];
- states[a] = states[i];
- states[i] = swap;
- }
- }
+ lc->state++;
+ if (lc->state >= lc->nstates)
+ {
+ shuffle_states (lc);
+ lc->state = 0;
+ }
+ lc->type = lc->states[lc->state];
if (lc->type == LAMENT_BOX)
lc->anim_pause = pause3;
/* Window management, etc
*/
-void
+ENTRYPOINT void
reshape_lament(ModeInfo *mi, int width, int height)
{
int target_size = 180;
if (!wire)
{
- static GLfloat pos0[] = { -4.0, 2.0, 5.0, 1.0 };
- static GLfloat pos1[] = { 6.0, -1.0, 3.0, 1.0 };
+ static const GLfloat pos0[] = { -4.0, 2.0, 5.0, 1.0 };
+ static const GLfloat pos1[] = { 6.0, -1.0, 3.0, 1.0 };
- static GLfloat amb0[] = { 0.7, 0.7, 0.7, 1.0 };
-/* static GLfloat amb1[] = { 0.7, 0.0, 0.0, 1.0 }; */
- static GLfloat dif0[] = { 1.0, 1.0, 1.0, 1.0 };
- static GLfloat dif1[] = { 0.3, 0.1, 0.1, 1.0 };
+ static const GLfloat amb0[] = { 0.7, 0.7, 0.7, 1.0 };
+/* static const GLfloat amb1[] = { 0.7, 0.0, 0.0, 1.0 }; */
+ static const GLfloat dif0[] = { 1.0, 1.0, 1.0, 1.0 };
+ static const GLfloat dif1[] = { 0.3, 0.1, 0.1, 1.0 };
glLightfv(GL_LIGHT0, GL_POSITION, pos0);
glLightfv(GL_LIGHT1, GL_POSITION, pos1);
# endif /* HAVE_MESA_GL */
-void
+ENTRYPOINT void
init_lament(ModeInfo *mi)
{
lament_configuration *lc;
gl_init(mi);
}
+ lc->states = (lament_type *) calloc (50, sizeof (*lc->states));
+ lc->nstates = 0;
+ lc->states[lc->nstates++] = LAMENT_STAR_OUT;
+ lc->states[lc->nstates++] = LAMENT_STAR_OUT;
+ lc->states[lc->nstates++] = LAMENT_TETRA_UNE;
+ lc->states[lc->nstates++] = LAMENT_TETRA_USW;
+ lc->states[lc->nstates++] = LAMENT_TETRA_DWN;
+ lc->states[lc->nstates++] = LAMENT_TETRA_DSE;
+ lc->states[lc->nstates++] = LAMENT_LID_OPEN;
+ lc->states[lc->nstates++] = LAMENT_LID_OPEN;
+ lc->states[lc->nstates++] = LAMENT_LID_OPEN;
+ lc->states[lc->nstates++] = LAMENT_TASER_OUT;
+ lc->states[lc->nstates++] = LAMENT_TASER_OUT;
+ lc->states[lc->nstates++] = LAMENT_BOX;
+ lc->states[lc->nstates++] = LAMENT_BOX;
+ lc->states[lc->nstates++] = LAMENT_BOX;
+ lc->states[lc->nstates++] = LAMENT_BOX;
+ lc->states[lc->nstates++] = LAMENT_BOX;
+ lc->states[lc->nstates++] = LAMENT_BOX;
+ lc->states[lc->nstates++] = LAMENT_BOX;
+ lc->states[lc->nstates++] = LAMENT_BOX;
+ lc->states[lc->nstates++] = LAMENT_BOX;
+ lc->states[lc->nstates++] = LAMENT_BOX;
+ shuffle_states (lc);
+
# ifdef HAVE_MESA_GL
handle_signals ();
# endif /* HAVE_MESA_GL */
}
-void
+ENTRYPOINT void
draw_lament(ModeInfo *mi)
{
lament_configuration *lc = &lcs[MI_SCREEN(mi)];
animate(mi);
}
+XSCREENSAVER_MODULE ("Lament", lament)
+
#endif /* USE_GL */
projects / xscreensaver / blobdiff