627 lines
19 KiB
C
627 lines
19 KiB
C
/* atlantis --- Shows moving 3D sea animals */
|
|
|
|
#if !defined( lint ) && !defined( SABER )
|
|
static const char sccsid[] = "@(#)atlantis.c 5.12 2004/03/03 xlockmore";
|
|
|
|
#endif
|
|
|
|
/* Copyright (c) E. Lassauge, 1998. */
|
|
|
|
/*
|
|
* Permission to use, copy, modify, and distribute this software and its
|
|
* documentation for any purpose and without fee is hereby granted,
|
|
* provided that the above copyright notice appear in all copies and that
|
|
* both that copyright notice and this permission notice appear in
|
|
* supporting documentation.
|
|
*
|
|
* This file is provided AS IS with no warranties of any kind. The author
|
|
* shall have no liability with respect to the infringement of copyrights,
|
|
* trade secrets or any patents by this file or any part thereof. In no
|
|
* event will the author be liable for any lost revenue or profits or
|
|
* other special, indirect and consequential damages.
|
|
*
|
|
* The original code for this mode was written by Mark J. Kilgard
|
|
* as a demo for openGL programming.
|
|
*
|
|
* Porting it to xlock was possible by comparing the original Mesa's morph3d
|
|
* demo with it's ported version to xlock, so thanks for Marcelo F. Vianna
|
|
* (look at morph3d.c) for his indirect help.
|
|
*
|
|
* Thanks goes also to Brian Paul for making it possible and inexpensive
|
|
* to use OpenGL at home.
|
|
*
|
|
* My e-mail address is <lassauge AT users.sourceforge.net>
|
|
*
|
|
* Eric Lassauge (May-13-1998)
|
|
*
|
|
* REVISION HISTORY:
|
|
*
|
|
* E.Lassauge - 03-Feb-2004: Integrated diffs from xscreensaver-4.15 : corrected gradient stuff
|
|
*
|
|
* E.Lassauge - 09-Apr-2003: Corrected parse_image_data to finally have the texture !!!
|
|
*
|
|
* E.Lassauge - 21-Jan-2002: Integrated diffs from xscreensaver-4.00
|
|
*
|
|
* E.Lassauge - 28-Nov-2001: Integrated diffs from xscreensaver-3.34
|
|
*
|
|
* Jamie Zawinski, 2-Apr-01: - The fishies were inside out! The back faces
|
|
* were being drawn, not the front faces.
|
|
* - Added a texture to simulate light from the
|
|
* surface, like in the SGI version.
|
|
*
|
|
* E.Lassauge - 01/03/01 : Added FPS stuff
|
|
*
|
|
* David A. Bagley - 98/06/17 : Add whalespeed option. Global options to
|
|
* initialize local variables are now:
|
|
* XLock.atlantis.cycles: 100 ! SharkSpeed
|
|
* XLock.atlantis.batchcount: 4 ! SharkNum
|
|
* XLock.atlantis.whalespeed: 250 ! WhaleSpeed
|
|
* XLock.atlantis.size: 6000 ! SharkSize
|
|
* Add random direction for whales/dolphins
|
|
*
|
|
* E.Lassauge - 98/06/16: Use the following global options to initialize
|
|
* local variables :
|
|
* XLock.atlantis.delay: 100 ! SharkSpeed
|
|
* XLock.atlantis.batchcount: 4 ! SharkNum
|
|
* XLock.atlantis.cycles: 250 ! WhaleSpeed
|
|
* XLock.atlantis.size: 6000 ! SharkSize
|
|
* Add support for -/+ wireframe (t'was so easy to do!)
|
|
*
|
|
* TODO :
|
|
* - better handling of sizes and speeds
|
|
* - test standalone and module modes
|
|
* - purify it (!)
|
|
*/
|
|
|
|
/* Copyright (c) Mark J. Kilgard, 1994. */
|
|
|
|
/**
|
|
* (c) Copyright 1993, 1994, Silicon Graphics, Inc.
|
|
* ALL RIGHTS RESERVED
|
|
* Permission to use, copy, modify, and distribute this software for
|
|
* any purpose and without fee is hereby granted, provided that the above
|
|
* copyright notice appear in all copies and that both the copyright notice
|
|
* and this permission notice appear in supporting documentation, and that
|
|
* the name of Silicon Graphics, Inc. not be used in advertising
|
|
* or publicity pertaining to distribution of the software without specific,
|
|
* written prior permission.
|
|
*
|
|
* THE MATERIAL EMBODIED ON THIS SOFTWARE IS PROVIDED TO YOU "AS-IS"
|
|
* AND WITHOUT WARRANTY OF ANY KIND, EXPRESS, IMPLIED OR OTHERWISE,
|
|
* INCLUDING WITHOUT LIMITATION, ANY WARRANTY OF MERCHANTABILITY OR
|
|
* FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL SILICON
|
|
* GRAPHICS, INC. BE LIABLE TO YOU OR ANYONE ELSE FOR ANY DIRECT,
|
|
* SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY
|
|
* KIND, OR ANY DAMAGES WHATSOEVER, INCLUDING WITHOUT LIMITATION,
|
|
* LOSS OF PROFIT, LOSS OF USE, SAVINGS OR REVENUE, OR THE CLAIMS OF
|
|
* THIRD PARTIES, WHETHER OR NOT SILICON GRAPHICS, INC. HAS BEEN
|
|
* ADVISED OF THE POSSIBILITY OF SUCH LOSS, HOWEVER CAUSED AND ON
|
|
* ANY THEORY OF LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE
|
|
* POSSESSION, USE OR PERFORMANCE OF THIS SOFTWARE.
|
|
*
|
|
* US Government Users Restricted Rights
|
|
* Use, duplication, or disclosure by the Government is subject to
|
|
* restrictions set forth in FAR 52.227.19(c)(2) or subparagraph
|
|
* (c)(1)(ii) of the Rights in Technical Data and Computer Software
|
|
* clause at DFARS 252.227-7013 and/or in similar or successor
|
|
* clauses in the FAR or the DOD or NASA FAR Supplement.
|
|
* Unpublished-- rights reserved under the copyright laws of the
|
|
* United States. Contractor/manufacturer is Silicon Graphics,
|
|
* Inc., 2011 N. Shoreline Blvd., Mountain View, CA 94039-7311.
|
|
*
|
|
* OpenGL(TM) is a trademark of Silicon Graphics, Inc.
|
|
*/
|
|
|
|
#define DEF_TEXTURE "True"
|
|
#define DEF_GRADIENT "False"
|
|
#define DEF_WHALESPEED "250"
|
|
|
|
#ifdef STANDALONE
|
|
# define MODE_atlantis
|
|
# define PROGCLASS "Atlantis"
|
|
# define HACK_INIT init_atlantis
|
|
# define HACK_DRAW draw_atlantis
|
|
# define HACK_RESHAPE reshape_atlantis
|
|
# define atlantis_opts xlockmore_opts
|
|
# define DEFAULTS "*delay: 25000 \n" \
|
|
"*count: 4 \n" \
|
|
"*showFPS: False \n" \
|
|
"*cycles: 100 \n" \
|
|
"*size: 6000 \n" \
|
|
"*wireframe: False \n" \
|
|
"*texture: " DEF_TEXTURE " \n" \
|
|
"*gradient: " DEF_GRADIENT " \n" \
|
|
"*whalespeed: " DEF_WHALESPEED " \n"
|
|
# include "xlockmore.h" /* from the xscreensaver distribution */
|
|
#else /* !STANDALONE */
|
|
# include "xlock.h" /* from the xlockmore distribution */
|
|
# include "visgl.h"
|
|
#endif /* !STANDALONE */
|
|
|
|
#ifdef MODE_atlantis
|
|
|
|
#include "atlantis.h"
|
|
#include <GL/glu.h>
|
|
|
|
#ifdef HAVE_XPM
|
|
# include "xpm-ximage.h"
|
|
|
|
# ifdef STANDALONE
|
|
# include "../images/sea-texture.xpm"
|
|
# else /* !STANDALONE */
|
|
# include "pixmaps/sea-texture.xpm"
|
|
# endif /* !STANDALONE */
|
|
#endif
|
|
|
|
static int whalespeed;
|
|
static int do_texture;
|
|
static int do_gradient;
|
|
|
|
static XrmOptionDescRec opts[] =
|
|
{
|
|
{(char *) "-whalespeed", (char *) ".atlantis.whalespeed", XrmoptionSepArg,(caddr_t)NULL},
|
|
{(char *) "-texture", (char *) ".atlantis.texture", XrmoptionNoArg, (caddr_t)"True"},
|
|
{(char *) "+texture", (char *) ".atlantis.texture", XrmoptionNoArg, (caddr_t)"False"},
|
|
{(char *) "-gradient", (char *) ".atlantis.gradient", XrmoptionNoArg, (caddr_t)"True"},
|
|
{(char *) "+gradient", (char *) ".atlantis.gradient", XrmoptionNoArg, (caddr_t)"False"},
|
|
};
|
|
|
|
static argtype vars[] =
|
|
{
|
|
{(void *) & whalespeed, (char *) "whalespeed", (char *) "WhaleSpeed", (char *) DEF_WHALESPEED, t_Int},
|
|
{(void *) & do_texture, (char *) "texture", (char *) "Texture", (char *) DEF_TEXTURE, t_Bool},
|
|
{(void *) & do_gradient,(char *) "gradient", (char *) "Gradient", (char *) DEF_GRADIENT, t_Bool},
|
|
};
|
|
|
|
static OptionStruct desc[] =
|
|
{
|
|
{(char *) "-whalespeed num", (char *) "speed of whales and the dolphin"},
|
|
{(char *) "-texture", (char *) "whether to introduce water-like distortion"},
|
|
{(char *) "-gradient", (char *) "whether to introduce gradient-filled background"},
|
|
};
|
|
|
|
ModeSpecOpt atlantis_opts =
|
|
{sizeof opts / sizeof opts[0], opts, sizeof vars / sizeof vars[0], vars, desc};
|
|
|
|
#ifdef USE_MODULES
|
|
ModStruct atlantis_description =
|
|
{"atlantis", "init_atlantis", "draw_atlantis", "release_atlantis",
|
|
"refresh_atlantis", "change_atlantis", (char *) NULL, &atlantis_opts,
|
|
25000, NUM_SHARKS, SHARKSPEED, SHARKSIZE, 64, 1.0, "",
|
|
"Shows moving sharks/whales/dolphin", 0, NULL};
|
|
|
|
#endif
|
|
|
|
static atlantisstruct *atlantis = (atlantisstruct *) NULL;
|
|
|
|
#ifdef HAVE_XPM
|
|
static Bool
|
|
parse_image_data(ModeInfo *mi)
|
|
{
|
|
atlantisstruct *ap = &atlantis[MI_SCREEN(mi)];
|
|
|
|
if ((ap->texture = xpm_to_ximage (MI_DISPLAY(mi),
|
|
MI_VISUAL(mi),
|
|
MI_COLORMAP(mi),
|
|
sea_texture)) == None)
|
|
return False;
|
|
return True;
|
|
}
|
|
#endif
|
|
|
|
static void
|
|
InitFishs(atlantisstruct * ap)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < ap->num_sharks; i++) {
|
|
ap->sharks[i].x = 70000.0 + NRAND(ap->sharksize);
|
|
ap->sharks[i].y = NRAND(ap->sharksize);
|
|
ap->sharks[i].z = NRAND(ap->sharksize);
|
|
ap->sharks[i].psi = NRAND(360) - 180.0;
|
|
ap->sharks[i].v = 1.0;
|
|
}
|
|
|
|
/* Random whale direction */
|
|
ap->whaledir = LRAND() & 1;
|
|
|
|
ap->dolph.x = 30000.0;
|
|
ap->dolph.y = 0.0;
|
|
ap->dolph.z = (float) (ap->sharksize);
|
|
ap->dolph.psi = (ap->whaledir) ? 90.0 : -90.0;
|
|
ap->dolph.theta = 0.0;
|
|
ap->dolph.v = 6.0;
|
|
|
|
ap->momWhale.x = 70000.0;
|
|
ap->momWhale.y = 0.0;
|
|
ap->momWhale.z = 0.0;
|
|
ap->momWhale.psi = (ap->whaledir) ? 90.0 : -90.0;
|
|
ap->momWhale.theta = 0.0;
|
|
ap->momWhale.v = 3.0;
|
|
|
|
ap->babyWhale.x = 60000.0;
|
|
ap->babyWhale.y = -2000.0;
|
|
ap->babyWhale.z = -2000.0;
|
|
ap->babyWhale.psi = (ap->whaledir) ? 90.0 : -90.0;
|
|
ap->babyWhale.theta = 0.0;
|
|
ap->babyWhale.v = 3.0;
|
|
}
|
|
|
|
static void
|
|
Init(ModeInfo * mi)
|
|
{
|
|
atlantisstruct *ap = &atlantis[MI_SCREEN(mi)];
|
|
|
|
static float ambient[] =
|
|
{0.1, 0.1, 0.1, 1.0};
|
|
static float diffuse[] =
|
|
{1.0, 1.0, 1.0, 1.0};
|
|
static float position[] =
|
|
{0.0, 1.0, 0.0, 0.0};
|
|
static float mat_shininess[] =
|
|
{90.0};
|
|
static float mat_specular[] =
|
|
{0.8, 0.8, 0.8, 1.0};
|
|
static float mat_diffuse[] =
|
|
{0.46, 0.66, 0.795, 1.0};
|
|
static float mat_ambient[] =
|
|
{0.0, 0.1, 0.2, 1.0};
|
|
static float lmodel_ambient[] =
|
|
{0.4, 0.4, 0.4, 1.0};
|
|
static float lmodel_localviewer[] =
|
|
{0.0};
|
|
float fblue, fgreen;
|
|
|
|
glFrontFace(GL_CCW);
|
|
|
|
if (ap->wire)
|
|
{
|
|
glDisable(GL_DEPTH_TEST);
|
|
glDisable(GL_CULL_FACE);
|
|
glDisable(GL_LIGHTING);
|
|
glDisable(GL_NORMALIZE);
|
|
}
|
|
else
|
|
{
|
|
glDepthFunc(GL_LEQUAL);
|
|
glEnable(GL_DEPTH_TEST);
|
|
glEnable(GL_CULL_FACE);
|
|
glEnable(GL_NORMALIZE);
|
|
glShadeModel(GL_SMOOTH);
|
|
|
|
glLightfv(GL_LIGHT0, GL_AMBIENT, ambient);
|
|
glLightfv(GL_LIGHT0, GL_DIFFUSE, diffuse);
|
|
glLightfv(GL_LIGHT0, GL_POSITION, position);
|
|
glLightModelfv(GL_LIGHT_MODEL_AMBIENT, lmodel_ambient);
|
|
glLightModelfv(GL_LIGHT_MODEL_LOCAL_VIEWER, lmodel_localviewer);
|
|
glEnable(GL_LIGHTING);
|
|
glEnable(GL_LIGHT0);
|
|
|
|
glMaterialfv(GL_FRONT_AND_BACK, GL_SHININESS, mat_shininess);
|
|
glMaterialfv(GL_FRONT_AND_BACK, GL_SPECULAR, mat_specular);
|
|
glMaterialfv(GL_FRONT_AND_BACK, GL_DIFFUSE, mat_diffuse);
|
|
glMaterialfv(GL_FRONT_AND_BACK, GL_AMBIENT, mat_ambient);
|
|
}
|
|
|
|
#ifdef HAVE_XPM
|
|
if (ap->wire)
|
|
do_texture = False;
|
|
if (do_texture && !ap->texture) {
|
|
do_texture = parse_image_data (mi);
|
|
clear_gl_error();
|
|
}
|
|
#else
|
|
do_texture = False;
|
|
#endif
|
|
if (!do_texture)
|
|
{
|
|
glDisable(GL_TEXTURE_2D);
|
|
}
|
|
#ifdef HAVE_XPM
|
|
else
|
|
{
|
|
GLfloat s_plane[] = { 1, 0, 0, 0 };
|
|
GLfloat t_plane[] = { 0, 0, 1, 0 };
|
|
GLfloat scale = 0.0005;
|
|
|
|
glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA,
|
|
ap->texture->width, ap->texture->height, 0,
|
|
GL_RGBA, GL_UNSIGNED_BYTE,
|
|
ap->texture->data);
|
|
if (check_gl_error("texture")) {
|
|
do_texture = False;
|
|
glDisable(GL_TEXTURE_2D);
|
|
} else {
|
|
|
|
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_REPEAT);
|
|
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_REPEAT);
|
|
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
|
|
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
|
|
|
|
glTexEnvf(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);
|
|
|
|
glTexGeni (GL_S, GL_TEXTURE_GEN_MODE, GL_EYE_LINEAR);
|
|
glTexGeni (GL_T, GL_TEXTURE_GEN_MODE, GL_EYE_LINEAR);
|
|
glTexGenfv(GL_S, GL_EYE_PLANE, s_plane);
|
|
glTexGenfv(GL_T, GL_EYE_PLANE, t_plane);
|
|
|
|
glEnable(GL_TEXTURE_GEN_S);
|
|
glEnable(GL_TEXTURE_GEN_T);
|
|
glEnable(GL_TEXTURE_2D);
|
|
|
|
glMatrixMode(GL_TEXTURE);
|
|
glLoadIdentity();
|
|
glScalef(scale, scale, 1);
|
|
glMatrixMode(GL_MODELVIEW);
|
|
}
|
|
}
|
|
#endif
|
|
|
|
InitFishs(ap);
|
|
|
|
/* Add a little randomness */
|
|
fblue = ((float) (NRAND(30)) / 100.0) + 0.70;
|
|
fgreen = fblue * 0.56;
|
|
glClearColor(0.0, fgreen, fblue, 0.0);
|
|
}
|
|
|
|
void
|
|
reshape_atlantis(ModeInfo * mi, int width, int height)
|
|
{
|
|
atlantisstruct *ap = &atlantis[MI_SCREEN(mi)];
|
|
|
|
glViewport(0, 0, ap->WinW = (GLint) width, ap->WinH = (GLint) height);
|
|
|
|
glMatrixMode(GL_PROJECTION);
|
|
glLoadIdentity();
|
|
gluPerspective(400.0, (GLdouble) width / (GLdouble) height, 1.0, 2000000.0);
|
|
glMatrixMode(GL_MODELVIEW);
|
|
}
|
|
|
|
/* Fill the background with a gradient -- thanks to
|
|
Phil Carrig <pod@internode.on.net> for figuring out
|
|
how to do this more efficiently!
|
|
*/
|
|
static void
|
|
clear_tank (atlantisstruct * ap)
|
|
{
|
|
glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
|
|
|
|
if (do_gradient && !ap->wire)
|
|
{
|
|
GLfloat top[3] = { 0.00, 0.40, 0.70 };
|
|
GLfloat bot[3] = { 0.00, 0.05, 0.18 };
|
|
|
|
glMatrixMode(GL_PROJECTION);
|
|
glPushMatrix();
|
|
{
|
|
glLoadIdentity();
|
|
glMatrixMode(GL_MODELVIEW);
|
|
glPushMatrix();
|
|
{
|
|
glLoadIdentity();
|
|
|
|
/* save GL_COLOR_MATERIAL, GL_COLOR_MATERIAL_FACE, etc.
|
|
This stalls the pipeline, so it would be better to do this
|
|
with explicit enable/disable calls, but I can't figure
|
|
out how to undo the glEnable() and glColor() calls below!
|
|
Simply calling glDisable(GL_COLOR_MATERIAL) is insufficient!
|
|
*/
|
|
glPushAttrib (GL_LIGHTING_BIT);
|
|
{
|
|
glEnable (GL_COLOR_MATERIAL);
|
|
|
|
glShadeModel(GL_SMOOTH);
|
|
glBegin(GL_QUADS);
|
|
glColor3f (bot[0], bot[1], bot[2]); glVertex3f (-1, -1, 1);
|
|
glColor3f (bot[0], bot[1], bot[2]); glVertex3f ( 1, -1, 1);
|
|
glColor3f (top[0], top[1], top[2]); glVertex3f ( 1, 1, 1);
|
|
glColor3f (top[0], top[1], top[2]); glVertex3f (-1, 1, 1);
|
|
glEnd();
|
|
}
|
|
glPopAttrib();
|
|
}
|
|
glPopMatrix();
|
|
}
|
|
glMatrixMode(GL_PROJECTION);
|
|
glPopMatrix();
|
|
|
|
glMatrixMode(GL_MODELVIEW);
|
|
}
|
|
}
|
|
|
|
static void
|
|
Animate(atlantisstruct * ap)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < ap->num_sharks; i++) {
|
|
SharkPilot(&(ap->sharks[i]), ap->sharkspeed);
|
|
SharkMiss(ap, i);
|
|
}
|
|
WhalePilot(&(ap->dolph), ap->whalespeed, ap->whaledir);
|
|
ap->dolph.phi++;
|
|
WhalePilot(&(ap->momWhale), ap->whalespeed, ap->whaledir);
|
|
ap->momWhale.phi++;
|
|
WhalePilot(&(ap->babyWhale), ap->whalespeed, ap->whaledir);
|
|
ap->babyWhale.phi++;
|
|
}
|
|
|
|
static void
|
|
AllDisplay(atlantisstruct * ap)
|
|
{
|
|
int i;
|
|
|
|
clear_tank(ap);
|
|
|
|
for (i = 0; i < ap->num_sharks; i++) {
|
|
glPushMatrix();
|
|
FishTransform(&(ap->sharks[i]));
|
|
DrawShark(&(ap->sharks[i]), ap->wire);
|
|
glPopMatrix();
|
|
}
|
|
|
|
glPushMatrix();
|
|
FishTransform(&(ap->dolph));
|
|
DrawDolphin(&(ap->dolph), ap->wire);
|
|
glPopMatrix();
|
|
|
|
glPushMatrix();
|
|
FishTransform(&(ap->momWhale));
|
|
DrawWhale(&(ap->momWhale), ap->wire);
|
|
glPopMatrix();
|
|
|
|
glPushMatrix();
|
|
FishTransform(&(ap->babyWhale));
|
|
glScalef(0.45, 0.45, 0.3);
|
|
DrawWhale(&(ap->babyWhale), ap->wire);
|
|
glPopMatrix();
|
|
}
|
|
|
|
/*
|
|
*-----------------------------------------------------------------------------
|
|
*-----------------------------------------------------------------------------
|
|
* Xlock hooks.
|
|
*-----------------------------------------------------------------------------
|
|
*-----------------------------------------------------------------------------
|
|
*/
|
|
|
|
/*
|
|
*-----------------------------------------------------------------------------
|
|
* Initialize atlantis. Called each time the window changes.
|
|
*-----------------------------------------------------------------------------
|
|
*/
|
|
|
|
void
|
|
init_atlantis(ModeInfo * mi)
|
|
{
|
|
int screen = MI_SCREEN(mi);
|
|
atlantisstruct *ap;
|
|
Display *display = MI_DISPLAY(mi);
|
|
Window window = MI_WINDOW(mi);
|
|
|
|
if (atlantis == NULL) {
|
|
if ((atlantis = (atlantisstruct *) calloc(MI_NUM_SCREENS(mi),
|
|
sizeof (atlantisstruct))) == NULL)
|
|
return;
|
|
}
|
|
ap = &atlantis[screen];
|
|
ap->num_sharks = MI_COUNT(mi);
|
|
if (ap->sharks == NULL) {
|
|
if ((ap->sharks = (fishRec *) calloc(ap->num_sharks,
|
|
sizeof (fishRec))) == NULL) {
|
|
/* free everything up to now */
|
|
(void)free((void *)atlantis);
|
|
atlantis = (atlantisstruct *) NULL;
|
|
return;
|
|
}
|
|
}
|
|
ap->sharkspeed = MI_CYCLES(mi); /* has influence on the "width"
|
|
of the movement */
|
|
ap->sharksize = MI_SIZE(mi)?MI_SIZE(mi):SHARKSIZE; /* has influence on the "distance"
|
|
of the sharks */
|
|
ap->whalespeed = whalespeed;
|
|
ap->wire = MI_IS_WIREFRAME(mi);
|
|
|
|
if (MI_IS_DEBUG(mi)) {
|
|
(void) fprintf(stderr,
|
|
"%s:\n\tnum_sharks=%d\n\tsharkspeed=%.1f\n\tsharksize=%d\n\twhalespeed=%.1f\n\twireframe=%s\n",
|
|
MI_NAME(mi),
|
|
ap->num_sharks,
|
|
ap->sharkspeed,
|
|
ap->sharksize,
|
|
ap->whalespeed,
|
|
ap->wire ? "yes" : "no"
|
|
);
|
|
}
|
|
if ((ap->glx_context = init_GL(mi)) != NULL) {
|
|
|
|
reshape_atlantis(mi, MI_WIDTH(mi), MI_HEIGHT(mi));
|
|
glDrawBuffer(GL_BACK);
|
|
Init(mi);
|
|
AllDisplay(ap);
|
|
glXSwapBuffers(display, window);
|
|
|
|
} else {
|
|
MI_CLEARWINDOW(mi);
|
|
}
|
|
}
|
|
|
|
/*
|
|
*-----------------------------------------------------------------------------
|
|
* Called by the mainline code periodically to update the display.
|
|
*-----------------------------------------------------------------------------
|
|
*/
|
|
void
|
|
draw_atlantis(ModeInfo * mi)
|
|
{
|
|
atlantisstruct *ap = &atlantis[MI_SCREEN(mi)];
|
|
|
|
Display *display = MI_DISPLAY(mi);
|
|
Window window = MI_WINDOW(mi);
|
|
|
|
MI_IS_DRAWN(mi) = True;
|
|
|
|
if (!ap->glx_context)
|
|
return;
|
|
|
|
glXMakeCurrent(display, window, *(ap->glx_context));
|
|
|
|
glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
|
|
|
|
AllDisplay(ap);
|
|
Animate(ap);
|
|
|
|
if (MI_IS_FPS(mi)) do_fps (mi);
|
|
glXSwapBuffers(display, window);
|
|
}
|
|
|
|
/*
|
|
*-----------------------------------------------------------------------------
|
|
* The display is being taken away from us. Free up malloc'ed
|
|
* memory and X resources that we've alloc'ed. Only called
|
|
* once, we must zap everything for every screen.
|
|
*-----------------------------------------------------------------------------
|
|
*/
|
|
|
|
void
|
|
release_atlantis(ModeInfo * mi)
|
|
{
|
|
int screen;
|
|
|
|
if (atlantis != NULL) {
|
|
for (screen = 0; screen < MI_NUM_SCREENS(mi); screen++) {
|
|
atlantisstruct *ap = &atlantis[screen];
|
|
|
|
if (ap->sharks)
|
|
(void)free((void *)ap->sharks);
|
|
if (ap->texture)
|
|
{
|
|
XDestroyImage(ap->texture);
|
|
}
|
|
}
|
|
(void)free((void *)atlantis);
|
|
atlantis = (atlantisstruct *) NULL;
|
|
}
|
|
FreeAllGL(mi);
|
|
}
|
|
|
|
void
|
|
refresh_atlantis(ModeInfo * mi)
|
|
{
|
|
}
|
|
|
|
void
|
|
change_atlantis(ModeInfo * mi)
|
|
{
|
|
atlantisstruct *ap = &atlantis[MI_SCREEN(mi)];
|
|
|
|
if (!ap->glx_context)
|
|
return;
|
|
|
|
glXMakeCurrent(MI_DISPLAY(mi), MI_WINDOW(mi), *(ap->glx_context));
|
|
Init(mi);
|
|
}
|
|
|
|
#endif /* MODE_atlantis */
|