821 lines
20 KiB
C
821 lines
20 KiB
C
/* -*- Mode: C; tab-width: 4 -*- */
|
|
/* kumppa --- */
|
|
|
|
#if !defined( lint ) && !defined( SABER )
|
|
static const char sccsid[] = "@(#)kumppa.c 5.00 2000/11/01 xlockmore";
|
|
|
|
#endif
|
|
|
|
/*-
|
|
Copyright (C) Teemu Suutari (temisu@utu.fi) Feb 1998
|
|
|
|
Permission is hereby granted, free of charge, to any person obtaining
|
|
a copy of this software and associated documentation files (the
|
|
"Software"), to deal in the Software without restriction, including
|
|
without limitation the rights to use, copy, modify, merge, publish,
|
|
distribute, sublicense, and/or sell copies of the Software, and to
|
|
permit persons to whom the Software is furnished to do so, subject to
|
|
the following conditions:
|
|
|
|
The above copyright notice and this permission notice shall be included
|
|
in all copies or substantial portions of the Software.
|
|
|
|
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
|
|
OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
|
|
MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
|
|
IN NO EVENT SHALL THE X CONSORTIUM BE LIABLE FOR ANY CLAIM, DAMAGES OR
|
|
OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
|
|
ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
|
|
OTHER DEALINGS IN THE SOFTWARE.
|
|
|
|
Except as contained in this notice, the name of the X Consortium shall
|
|
not be used in advertising or otherwise to promote the sale, use or
|
|
other dealings in this Software without prior written authorization
|
|
from the X Consortium.
|
|
|
|
* Revision History:
|
|
* 01-Nov-2000: Allocation checks
|
|
* 16-Jul-1998: xlockmore version by Jouk Jansen <joukj@hrem.stm.tudelft.nl>
|
|
* Feb 1998 : original xscreensaver version by Teemu Suutari <temisu@utu.fi>
|
|
*/
|
|
|
|
/*-
|
|
*** This is contest-version. Don't look any further, code is *very* ugly.
|
|
*/
|
|
|
|
|
|
#if 0
|
|
/* commented out since xlockmore does not support (yet) double buffering */
|
|
#ifdef HAVE_XDBE_EXTENSION
|
|
#include <X11/extensions/Xdbe.h>
|
|
#endif /* HAVE_XDBE_EXTENSION */
|
|
#endif
|
|
|
|
#ifdef STANDALONE
|
|
#define MODE_kumppa
|
|
#define PROGCLASS "kumppa"
|
|
#define HACK_INIT init_kumppa
|
|
#define HACK_DRAW draw_kumppa
|
|
#define kumppa_opts xlockmore_opts
|
|
#define DEFAULTS "*delay: 0 \n" \
|
|
"*cycles: 1000 \n" \
|
|
".background: black\n",\
|
|
"*speed: 0.1",\
|
|
#include "xlockmore.h" /* in xscreensaver distribution */
|
|
#else /* STANDALONE */
|
|
#include "xlock.h" /* in xlockmore distribution */
|
|
|
|
#endif /* STANDALONE */
|
|
|
|
#ifdef MODE_kumppa
|
|
|
|
#define DEF_COSILINES "True"
|
|
#define DEF_SPEED "0.1"
|
|
|
|
#if 0
|
|
#ifdef HAVE_XDBE_EXTENSION
|
|
#define DEF_USEDOUBLE "False"
|
|
|
|
static Bool usedouble;
|
|
|
|
#endif /* HAVE_XDBE_EXTENSION */
|
|
#endif
|
|
|
|
static Bool cosilines;
|
|
static float speed;
|
|
|
|
static XrmOptionDescRec opts[] =
|
|
{
|
|
{(char *) "-speed", (char *) ".kumppa.speed", XrmoptionSepArg, (caddr_t) NULL},
|
|
#if 0
|
|
#ifdef HAVE_XDBE_EXTENSION
|
|
{(char *) "-dbuf", (char *) ".kumppa.dbuf", XrmoptionNoArg, (caddr_t) "on"},
|
|
{(char *) "+dbuf", (char *) ".kumppa.dbuf", XrmoptionNoArg, (caddr_t) "off"},
|
|
#endif /* HAVE_XDBE_EXTENSION */
|
|
#endif
|
|
{(char *) "-rrandom", (char *) ".kumppa.rrandom", XrmoptionNoArg, (caddr_t) "on"},
|
|
{(char *) "+rrandom", (char *) ".kumppa.rrandom", XrmoptionNoArg, (caddr_t) "off"}
|
|
};
|
|
|
|
static argtype vars[] =
|
|
{
|
|
{(void *) & speed, (char *) "speed", (char *) "speed", (char *) DEF_SPEED, t_Float},
|
|
#if 0
|
|
#ifdef HAVE_XDBE_EXTENSION
|
|
{(void *) & usedouble, (char *) "dbuf", (char *) "dbuf", (char *) DEF_USEDOUBLE, t_Bool},
|
|
#endif /* HAVE_XDBE_EXTENSION */
|
|
#endif
|
|
{(void *) & cosilines, (char *) "rrandom", (char *) "rrandom", (char *) DEF_COSILINES, t_Bool}
|
|
};
|
|
static OptionStruct desc[] =
|
|
{
|
|
{(char *) "-speed num", (char *) "Speed"},
|
|
#if 0
|
|
#ifdef HAVE_XDBE_EXTENSION
|
|
{(char *) "-/+dbuf", (char *) "turn on/off double buffering"},
|
|
#endif /* HAVE_XDBE_EXTENSION */
|
|
#endif
|
|
{(char *) "-/+rrandom", (char *) "turn on/off random"}
|
|
};
|
|
|
|
ModeSpecOpt kumppa_opts =
|
|
{sizeof opts / sizeof opts[0], opts, sizeof vars / sizeof vars[0], vars, desc};
|
|
|
|
#ifdef USE_MODULES
|
|
ModStruct kumppa_description =
|
|
{"kumppa", "init_kumppa", "draw_kumppa", "release_kumppa",
|
|
"init_kumppa", "init_kumppa", (char *) NULL, &kumppa_opts,
|
|
10000, 1, 1000, 1, 64, 1.0, "",
|
|
"Shows Kumppa", 0, NULL};
|
|
|
|
#endif
|
|
|
|
static const unsigned char colors[96] =
|
|
{0, 0, 255, 0, 51, 255, 0, 102, 255, 0, 153, 255, 0, 204, 255,
|
|
0, 255, 255, 0, 255, 204, 0, 255, 153, 0, 255, 102, 0, 255, 51,
|
|
0, 255, 0, 51, 255, 0, 102, 255, 0, 153, 255, 0, 204, 255, 0,
|
|
255, 255, 0, 255, 204, 0, 255, 153, 0, 255, 102, 0, 255, 51, 0,
|
|
255, 0, 0, 255, 0, 51, 255, 0, 102, 255, 0, 153, 255, 0, 204,
|
|
255, 0, 255, 219, 0, 255, 182, 0, 255, 146, 0, 255, 109, 0, 255,
|
|
73, 0, 255, 37, 0, 255};
|
|
|
|
static const float cosinus[8][6] =
|
|
{
|
|
{-0.07, 0.12, -0.06, 32, 25, 37},
|
|
{0.08, -0.03, 0.05, 51, 46, 32},
|
|
{0.12, 0.07, -0.13, 27, 45, 36},
|
|
{0.05, -0.04, -0.07, 36, 27, 39},
|
|
{-0.02, -0.07, 0.1, 21, 43, 42},
|
|
{-0.11, 0.06, 0.02, 51, 25, 34},
|
|
{0.04, -0.15, 0.02, 42, 32, 25},
|
|
{-0.02, -0.04, -0.13, 34, 20, 15}};
|
|
|
|
static const float acosinus[24] =
|
|
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
|
|
|
|
static const int ocoords[8] =
|
|
{0, 0, 0, 0, 0, 0, 0, 0};
|
|
|
|
typedef struct {
|
|
Colormap cmap;
|
|
float *acosinus;
|
|
unsigned long blackpixel, whitepixel, fg, bg;
|
|
int coords[8];
|
|
int ocoords[8];
|
|
|
|
GC fgc[33];
|
|
GC cgc;
|
|
int sizx, sizy;
|
|
int midx, midy;
|
|
|
|
int *Xrotations;
|
|
int *Yrotations;
|
|
int *Xrottable;
|
|
int *Yrottable;
|
|
|
|
int *rotateX;
|
|
int *rotateY;
|
|
|
|
int rotsizeX, rotsizeY;
|
|
int stateX, stateY;
|
|
int dir, time;
|
|
int rx, ry;
|
|
int c;
|
|
long c1;
|
|
Bool cosilines;
|
|
ModeInfo *mi;
|
|
} kumppastruct;
|
|
|
|
static kumppastruct *kumppas = (kumppastruct *) NULL;
|
|
|
|
|
|
|
|
static int
|
|
Satnum(int maxi)
|
|
{
|
|
return (int) (maxi * ((double) NRAND(2500) / 2500.0));
|
|
}
|
|
|
|
|
|
static void
|
|
palaRotate(ModeInfo * mi, int x, int y)
|
|
{
|
|
Display *display = MI_DISPLAY(mi);
|
|
Window window = MI_WINDOW(mi);
|
|
int ax, ay, bx, by, cx, cy;
|
|
kumppastruct *s = &kumppas[MI_SCREEN(mi)];
|
|
|
|
ax = s->rotateX[x];
|
|
ay = s->rotateY[y];
|
|
bx = s->rotateX[x + 1] + 2;
|
|
by = s->rotateY[y + 1] + 2;
|
|
cx = s->rotateX[x] + (x - s->rx) - s->dir * (y - s->ry);
|
|
cy = s->rotateY[y] + s->dir * (x - s->rx) + (y - s->ry);
|
|
if (cx < 0) {
|
|
ax -= cx;
|
|
cx = 0;
|
|
}
|
|
if (cy < 0) {
|
|
ay -= cy;
|
|
cy = 0;
|
|
}
|
|
if (cx + bx - ax > s->sizx)
|
|
bx = ax - cx + s->sizx;
|
|
if (cy + by - ay > s->sizy)
|
|
by = ay - cy + s->sizy;
|
|
if (ax < bx && ay < by) {
|
|
if (MI_IS_INSTALL(mi) && MI_NPIXELS(mi) > 2) {
|
|
XCopyArea(display, window, window, s->cgc, ax, ay, bx - ax, by - ay, cx, cy);
|
|
} else {
|
|
XCopyArea(display, window, window, MI_GC(mi), ax, ay, bx - ax, by - ay, cx, cy);
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
static void
|
|
rotate(ModeInfo * mi)
|
|
{
|
|
int x, y;
|
|
int dx, dy;
|
|
kumppastruct *s = &kumppas[MI_SCREEN(mi)];
|
|
|
|
s->rx = s->Xrottable[s->stateX + 1] - s->Xrottable[s->stateX];
|
|
s->ry = s->Yrottable[s->stateX + 1] - s->Yrottable[s->stateY];
|
|
|
|
|
|
for (x = 0; x <= s->rx; x++)
|
|
s->rotateX[x] = (x) ? s->midx - 1 - s->Xrotations[s->Xrottable[s->stateX + 1] - x] : 0;
|
|
for (x = 0; x <= s->rx; x++)
|
|
s->rotateX[x + s->rx + 1] = (x == s->rx) ? s->sizx - 1 : s->midx + s->Xrotations[s->Xrottable[s->stateX] + x];
|
|
for (y = 0; y <= s->ry; y++)
|
|
s->rotateY[y] = (y) ? s->midy - 1 - s->Yrotations[s->Yrottable[s->stateY + 1] - y] : 0;
|
|
for (y = 0; y <= s->ry; y++)
|
|
s->rotateY[y + s->ry + 1] = (y == s->ry) ? s->sizy - 1 : s->midy + s->Yrotations[s->Yrottable[s->stateY] + y];
|
|
|
|
x = (s->rx > s->ry) ? s->rx : s->ry;
|
|
for (dy = 0; dy < (x + 1) << 1; dy++)
|
|
for (dx = 0; dx < (x + 1) << 1; dx++) {
|
|
y = (s->rx > s->ry) ? s->ry - s->rx : 0;
|
|
if (dy + y >= 0 && dy < (s->ry + 1) << 1 && dx < (s->rx + 1) << 1)
|
|
if (dy + y + dx <= s->ry + s->rx && dy + y - dx <= s->ry - s->rx) {
|
|
palaRotate(mi, (s->rx << 1) + 1 - dx, dy + y);
|
|
palaRotate(mi, dx, (s->ry << 1) + 1 - dy - y);
|
|
}
|
|
y = (s->ry > s->rx) ? s->rx - s->ry : 0;
|
|
if (dy + y >= 0 && dx < (s->ry + 1) << 1 && dy < (s->rx + 1) << 1)
|
|
if (dy + y + dx <= s->ry + s->rx && dx - dy - y >= s->ry - s->rx) {
|
|
palaRotate(mi, dy + y, dx);
|
|
palaRotate(mi, (s->rx << 1) + 1 - dy - y, (s->ry << 1) + 1 - dx);
|
|
}
|
|
}
|
|
s->stateX++;
|
|
if (s->stateX == s->rotsizeX)
|
|
s->stateX = 0;
|
|
s->stateY++;
|
|
if (s->stateY == s->rotsizeY)
|
|
s->stateY = 0;
|
|
}
|
|
|
|
static void
|
|
free_kumppa(Display *display, kumppastruct *s)
|
|
{
|
|
ModeInfo *mi = s->mi;
|
|
|
|
if (MI_IS_INSTALL(mi) && MI_NPIXELS(mi) > 2) {
|
|
int i;
|
|
|
|
MI_WHITE_PIXEL(mi) = s->whitepixel;
|
|
MI_BLACK_PIXEL(mi) = s->blackpixel;
|
|
#ifndef STANDALONE
|
|
MI_FG_PIXEL(mi) = s->fg;
|
|
MI_BG_PIXEL(mi) = s->bg;
|
|
#endif
|
|
if (s->fgc[32] != None) {
|
|
XFreeGC(display, s->fgc[32]);
|
|
s->fgc[32] = None;
|
|
}
|
|
#if 0
|
|
if (mono_p) {
|
|
if (s->fgc[1] != None) {
|
|
XFreeGC(display, s->fgc[1]);
|
|
s->fgc[1] = None;
|
|
}
|
|
} else
|
|
#endif
|
|
for (i = 0; i < 32; i++) {
|
|
if (s->fgc[i] != None) {
|
|
XFreeGC(display, s->fgc[i]);
|
|
s->fgc[i] = None;
|
|
}
|
|
}
|
|
if (s->cgc != None) {
|
|
XFreeGC(display, s->cgc);
|
|
s->cgc = None;
|
|
}
|
|
if (s->cmap != None) {
|
|
XFreeColormap(display, s->cmap);
|
|
s->cmap = None;
|
|
}
|
|
}
|
|
if (s->acosinus != NULL) {
|
|
free(s->acosinus);
|
|
s->acosinus = (float *) NULL;
|
|
}
|
|
if (s->Xrotations != NULL) {
|
|
free(s->Xrotations);
|
|
s->Xrotations = (int *) NULL;
|
|
}
|
|
if (s->Yrotations != NULL) {
|
|
free(s->Yrotations);
|
|
s->Yrotations = (int *) NULL;
|
|
}
|
|
if (s->Xrottable != NULL) {
|
|
free(s->Xrottable);
|
|
s->Xrottable = (int *) NULL;
|
|
}
|
|
if (s->Yrottable != NULL) {
|
|
free(s->Yrottable);
|
|
s->Yrottable = (int *) NULL;
|
|
}
|
|
if (s->rotateX != NULL) {
|
|
free(s->rotateX);
|
|
s->rotateX = (int *) NULL;
|
|
}
|
|
if (s->rotateY != NULL) {
|
|
free(s->rotateY);
|
|
s->rotateY = (int *) NULL;
|
|
}
|
|
}
|
|
|
|
static void
|
|
make_rots(ModeInfo * mi, double xspeed, double yspeed)
|
|
{
|
|
int a, b, c, f, g, j, k = 0, l;
|
|
double m, om, ok;
|
|
double d, ix, iy;
|
|
int maxi;
|
|
kumppastruct *s = &kumppas[MI_SCREEN(mi)];
|
|
|
|
Bool *chks;
|
|
|
|
s->rotsizeX = (int) (2 / xspeed + 1);
|
|
ix = (double) (s->midx + 1) / (double) (s->rotsizeX);
|
|
s->rotsizeY = (int) (2 / yspeed + 1);
|
|
iy = (double) (s->midy + 1) / (double) (s->rotsizeY);
|
|
|
|
if (s->Xrotations != NULL)
|
|
free(s->Xrotations);
|
|
if (s->Yrotations != NULL)
|
|
free(s->Yrotations);
|
|
if (s->Xrottable != NULL)
|
|
free(s->Xrottable);
|
|
if (s->Yrottable != NULL)
|
|
free(s->Yrottable);
|
|
|
|
if (((s->Xrotations = (int *) calloc((s->midx + 2),
|
|
sizeof (int))) == NULL) ||
|
|
((s->Yrotations = (int *) calloc((s->midy + 2),
|
|
sizeof (int))) == NULL) ||
|
|
((s->Xrottable = (int *) malloc((s->rotsizeX + 1) *
|
|
sizeof (int))) == NULL) ||
|
|
((s->Yrottable = (int *) malloc((s->rotsizeY + 1) *
|
|
sizeof (int))) == NULL) ||
|
|
((chks = (Bool *) malloc(((s->midx > s->midy) ? s->midx : s->midy) *
|
|
sizeof (Bool))) == NULL)) {
|
|
free_kumppa(MI_DISPLAY(mi), s);
|
|
return;
|
|
}
|
|
|
|
|
|
maxi = 0;
|
|
c = 0;
|
|
d = 0;
|
|
g = 0;
|
|
for (a = 0; a < s->midx; a++)
|
|
chks[a] = True;
|
|
for (a = 0; a < s->rotsizeX; a++) {
|
|
s->Xrottable[a] = c;
|
|
f = (int) (d + ix) - g; /*viivojen lkm. */
|
|
g += f;
|
|
if (g > s->midx) {
|
|
f -= g - s->midx;
|
|
g = s->midx;
|
|
}
|
|
for (b = 0; b < f; b++) {
|
|
m = 0;
|
|
for (j = 0; j < s->midx; j++) { /*testi */
|
|
if (chks[j]) {
|
|
om = 0;
|
|
ok = 1;
|
|
l = 0;
|
|
while (j + l < s->midx && om + 12 * ok > m) {
|
|
if (j - l >= 0) {
|
|
if (chks[j - l])
|
|
om += ok;
|
|
} else if (chks[l - j])
|
|
om += ok;
|
|
if (chks[j + l])
|
|
om += ok;
|
|
ok /= 1.5;
|
|
l++;
|
|
}
|
|
if (om >= m) {
|
|
k = j;
|
|
m = om;
|
|
}
|
|
}
|
|
}
|
|
chks[k] = False;
|
|
l = c;
|
|
while (l >= s->Xrottable[a]) {
|
|
if (l != s->Xrottable[a])
|
|
s->Xrotations[l] = s->Xrotations[l - 1];
|
|
if (k > s->Xrotations[l] || l == s->Xrottable[a]) {
|
|
s->Xrotations[l] = k;
|
|
c++;
|
|
l = s->Xrottable[a];
|
|
}
|
|
l--;
|
|
}
|
|
}
|
|
d += ix;
|
|
if (maxi < c - s->Xrottable[a])
|
|
maxi = c - s->Xrottable[a];
|
|
}
|
|
s->Xrottable[a] = c;
|
|
if (s->rotateX)
|
|
free(s->rotateX);
|
|
if ((s->rotateX = (int *) calloc((maxi + 2) << 1,
|
|
sizeof (int))) == NULL) {
|
|
free_kumppa(MI_DISPLAY(mi), s);
|
|
free(chks);
|
|
return;
|
|
}
|
|
|
|
maxi = 0;
|
|
c = 0;
|
|
d = 0;
|
|
g = 0;
|
|
for (a = 0; a < s->midy; a++)
|
|
chks[a] = True;
|
|
for (a = 0; a < s->rotsizeY; a++) {
|
|
s->Yrottable[a] = c;
|
|
f = (int) (d + iy) - g; /*viivojen lkm. */
|
|
g += f;
|
|
if (g > s->midy) {
|
|
f -= g - s->midy;
|
|
g = s->midy;
|
|
}
|
|
for (b = 0; b < f; b++) {
|
|
m = 0;
|
|
for (j = 0; j < s->midy; j++) { /*testi */
|
|
if (chks[j]) {
|
|
om = 0;
|
|
ok = 1;
|
|
l = 0;
|
|
while (j + l < s->midy && om + 12 * ok > m) {
|
|
if (j - l >= 0) {
|
|
if (chks[j - l])
|
|
om += ok;
|
|
} else if (chks[l - j])
|
|
om += ok;
|
|
if (chks[j + l])
|
|
om += ok;
|
|
ok /= 1.5;
|
|
l++;
|
|
}
|
|
if (om >= m) {
|
|
k = j;
|
|
m = om;
|
|
}
|
|
}
|
|
}
|
|
chks[k] = False;
|
|
l = c;
|
|
while (l >= s->Yrottable[a]) {
|
|
if (l != s->Yrottable[a])
|
|
s->Yrotations[l] = s->Yrotations[l - 1];
|
|
if (k > s->Yrotations[l] || l == s->Yrottable[a]) {
|
|
s->Yrotations[l] = k;
|
|
c++;
|
|
l = s->Yrottable[a];
|
|
}
|
|
l--;
|
|
}
|
|
|
|
}
|
|
d += iy;
|
|
if (maxi < c - s->Yrottable[a])
|
|
maxi = c - s->Yrottable[a];
|
|
}
|
|
s->Yrottable[a] = c;
|
|
if (s->rotateY)
|
|
free(s->rotateY);
|
|
if ((s->rotateY = (int *) calloc((maxi + 2) << 1,
|
|
sizeof (int))) == NULL) {
|
|
free_kumppa(MI_DISPLAY(mi), s);
|
|
/* free(chks); */
|
|
/* return; */
|
|
}
|
|
|
|
free(chks);
|
|
}
|
|
|
|
#ifndef STANDALONE
|
|
extern char *background;
|
|
extern char *foreground;
|
|
#endif
|
|
|
|
void
|
|
init_kumppa(ModeInfo * mi)
|
|
{
|
|
Display *display = MI_DISPLAY(mi);
|
|
Window window = MI_WINDOW(mi);
|
|
XGCValues xgcv;
|
|
int n, i;
|
|
double rspeed;
|
|
kumppastruct *s;
|
|
|
|
if (kumppas == NULL) {
|
|
if ((kumppas = (kumppastruct *) calloc(MI_NUM_SCREENS(mi),
|
|
sizeof (kumppastruct))) == NULL)
|
|
return;
|
|
}
|
|
s = &kumppas[MI_SCREEN(mi)];
|
|
s->mi = mi;
|
|
|
|
if (!s->acosinus) {
|
|
if (MI_IS_INSTALL(mi) && MI_NPIXELS(mi) > 2) {
|
|
XColor color;
|
|
|
|
#ifndef STANDALONE
|
|
s->fg = MI_FG_PIXEL(mi);
|
|
s->bg = MI_BG_PIXEL(mi);
|
|
#endif
|
|
s->blackpixel = MI_BLACK_PIXEL(mi);
|
|
s->whitepixel = MI_WHITE_PIXEL(mi);
|
|
if ((s->cmap = XCreateColormap(display, window,
|
|
MI_VISUAL(mi), AllocNone)) == None) {
|
|
free_kumppa(display, s);
|
|
return;
|
|
}
|
|
|
|
XSetWindowColormap(display, window, s->cmap);
|
|
(void) XParseColor(display, s->cmap, "black", &color);
|
|
(void) XAllocColor(display, s->cmap, &color);
|
|
MI_BLACK_PIXEL(mi) = color.pixel;
|
|
(void) XParseColor(display, s->cmap, "white", &color);
|
|
(void) XAllocColor(display, s->cmap, &color);
|
|
MI_WHITE_PIXEL(mi) = color.pixel;
|
|
#ifndef STANDALONE
|
|
(void) XParseColor(display, s->cmap, background, &color);
|
|
(void) XAllocColor(display, s->cmap, &color);
|
|
MI_BG_PIXEL(mi) = color.pixel;
|
|
(void) XParseColor(display, s->cmap, foreground, &color);
|
|
(void) XAllocColor(display, s->cmap, &color);
|
|
MI_FG_PIXEL(mi) = color.pixel;
|
|
#endif
|
|
|
|
xgcv.function = GXcopy;
|
|
xgcv.foreground = MI_BLACK_PIXEL(mi);
|
|
if ((s->fgc[32] = XCreateGC(display, window,
|
|
GCForeground | GCFunction,
|
|
&xgcv)) == None) {
|
|
free_kumppa(display, s);
|
|
return;
|
|
}
|
|
|
|
n = 0;
|
|
#if 0
|
|
if (mono_p) {
|
|
s->fgc[0] = s->fgc[32];
|
|
xgcv.foreground = MI_BLACK_PIXEL(mi);
|
|
if ((s->fgc[1] = XCreateGC(display, window,
|
|
GCForeground | GCFunction,
|
|
&xgcv)) == None) {
|
|
free_kumppa(display, s);
|
|
return;
|
|
}
|
|
for (i = 0; i < 32; i += 2)
|
|
s->fgc[i] = s->fgc[0];
|
|
for (i = 1; i < 32; i += 2)
|
|
s->fgc[i] = s->fgc[1];
|
|
} else
|
|
#endif
|
|
for (i = 0; i < 32; i++) {
|
|
color.red = colors[n++] * 256;
|
|
color.green = colors[n++] * 256;
|
|
color.blue = colors[n++] * 256;
|
|
color.flags = DoRed | DoGreen | DoBlue;
|
|
(void) XAllocColor(display, s->cmap, &color);
|
|
xgcv.foreground = color.pixel;
|
|
if ((s->fgc[i] = XCreateGC(display, window,
|
|
GCForeground | GCFunction,
|
|
&xgcv)) == None) {
|
|
free_kumppa(display, s);
|
|
return;
|
|
}
|
|
}
|
|
xgcv.foreground = MI_BLACK_PIXEL(mi);
|
|
xgcv.function = GXcopy;
|
|
if ((s->cgc = XCreateGC(display, window,
|
|
GCForeground | GCFunction,
|
|
&xgcv)) == None) {
|
|
free_kumppa(display, s);
|
|
return;
|
|
}
|
|
}
|
|
if ((s->acosinus = (float *) malloc(24 *
|
|
sizeof (float))) == NULL) {
|
|
free_kumppa(display, s);
|
|
return;
|
|
}
|
|
(void) memcpy(s->acosinus, acosinus, 24 * sizeof (float));
|
|
(void) memcpy(s->ocoords, ocoords, 8 * sizeof (int));
|
|
}
|
|
|
|
if (MI_IS_FULLRANDOM(mi)) {
|
|
if (NRAND(2) == 1)
|
|
s->cosilines = False;
|
|
else
|
|
s->cosilines = True;
|
|
} else {
|
|
s->cosilines = cosilines;
|
|
}
|
|
if (MI_IS_INSTALL(mi) && MI_NPIXELS(mi) > 2) {
|
|
XInstallColormap(display, s->cmap);
|
|
XSetGraphicsExposures(display, s->cgc, False);
|
|
} else {
|
|
XSetGraphicsExposures(display, MI_GC(mi), False);
|
|
s->c1 = NRAND(MI_NPIXELS(mi));
|
|
}
|
|
if (MI_CYCLES(mi) < 1)
|
|
s->time = 1;
|
|
else
|
|
s->time = MI_CYCLES(mi) + NRAND(MI_CYCLES(mi));
|
|
|
|
#if 0
|
|
#ifdef HAVE_XDBE_EXTENSION
|
|
if (get_string_resource("dbuf", "String") != NULL && get_string_resource("dbuf", "String")[0] != 0)
|
|
usedouble = True;
|
|
if (usedouble) {
|
|
XdbeQueryExtension(display, &n, &i);
|
|
if (n == 0 && i == 0) {
|
|
(void) fprintf(stderr, "Double buffer extension not supported!\n");
|
|
usedouble = False;
|
|
}
|
|
}
|
|
if (usedouble)
|
|
win[1] = XdbeAllocateBackBufferName(display, win[0], XdbeUndefined);
|
|
#endif /* HAVE_XDBE_EXTENSION */
|
|
#endif
|
|
|
|
rspeed = (double) speed;
|
|
if (rspeed < 0.0001 || rspeed > 0.2) {
|
|
(void) fprintf(stderr,
|
|
"Speed not in valid range! (0.0001 - 0.2), using 0.1 \n");
|
|
rspeed = 0.1;
|
|
}
|
|
s->sizx = MI_WIDTH(mi);
|
|
s->sizy = MI_HEIGHT(mi);
|
|
s->midx = s->sizx >> 1;
|
|
s->midy = s->sizy >> 1;
|
|
s->stateX = 0;
|
|
s->stateY = 0;
|
|
s->c = 0;
|
|
s->dir = (LRAND() & 1) ? -1 : 1;
|
|
MI_CLEARWINDOW(mi);
|
|
|
|
make_rots(mi, rspeed, rspeed);
|
|
}
|
|
|
|
|
|
void
|
|
draw_kumppa(ModeInfo * mi)
|
|
{
|
|
Display *display = MI_DISPLAY(mi);
|
|
Window window = MI_WINDOW(mi);
|
|
GC gc;
|
|
|
|
#if 0
|
|
#ifdef HAVE_XDBE_EXTENSION
|
|
XdbeSwapInfo xdswp;
|
|
|
|
#endif /* HAVE_XDBE_EXTENSION */
|
|
#endif
|
|
int a, b, e;
|
|
float f;
|
|
kumppastruct *s;
|
|
|
|
if (kumppas == NULL)
|
|
return;
|
|
s = &kumppas[MI_SCREEN(mi)];
|
|
if (s->Xrotations == NULL)
|
|
return;
|
|
|
|
MI_IS_DRAWN(mi) = True;
|
|
|
|
#if 0
|
|
#ifdef HAVE_XDBE_EXTENSION
|
|
if (usedouble) {
|
|
xdswp.swap_action = XdbeUndefined;
|
|
xdswp.swap_window = win[0];
|
|
} else
|
|
#endif /* HAVE_XDBE_EXTENSION */
|
|
win[1] = win[0];
|
|
#endif
|
|
|
|
if (s->cosilines) {
|
|
s->c++;
|
|
for (a = 0; a < 8; a++) {
|
|
f = 0;
|
|
for (b = 0; b < 3; b++) {
|
|
s->acosinus[a * 3 + b] += cosinus[a][b];
|
|
f += cosinus[a][b + 3] *
|
|
sin((double) s->acosinus[a * 3 + b]);
|
|
}
|
|
s->coords[a] = (int) f;
|
|
}
|
|
for (a = 0; a < 4; a++) {
|
|
if (MI_IS_INSTALL(mi) && MI_NPIXELS(mi) > 2) {
|
|
#if 0
|
|
gc = (mono_p) ? s->fgc[1] : s->fgc[((a << 2) + s->c) & 31];
|
|
#endif
|
|
gc = s->fgc[((a << 2) + s->c) & 31];
|
|
} else {
|
|
gc = MI_GC(mi);
|
|
if (MI_NPIXELS(mi) <= 2)
|
|
XSetForeground(display, gc, MI_WHITE_PIXEL(mi));
|
|
else
|
|
XSetForeground(display, gc, MI_PIXEL(mi, ((((a << 2) + s->c) & 31) * MI_NPIXELS(mi) / 32) % MI_NPIXELS(mi)));
|
|
}
|
|
XDrawLine(display, window, gc,
|
|
s->midx + s->ocoords[a << 1], s->midy + s->ocoords[(a << 1) + 1],
|
|
s->midx + s->coords[a << 1], s->midy + s->coords[(a << 1) + 1]);
|
|
s->ocoords[a << 1] = s->coords[a << 1];
|
|
s->ocoords[(a << 1) + 1] = s->coords[(a << 1) + 1];
|
|
}
|
|
|
|
} else {
|
|
for (e = 0; e < 8; e++) {
|
|
a = Satnum(50);
|
|
if (a >= 32)
|
|
a = 32;
|
|
b = Satnum(32) - 16 + s->midx;
|
|
s->c = Satnum(32) - 16 + s->midy;
|
|
if (MI_IS_INSTALL(mi) && MI_NPIXELS(mi) > 2) {
|
|
gc = s->fgc[a];
|
|
} else {
|
|
gc = MI_GC(mi);
|
|
if (a == 32)
|
|
XSetForeground(display, gc, MI_BLACK_PIXEL(mi));
|
|
else if (MI_NPIXELS(mi) > 2)
|
|
XSetForeground(display, gc, MI_PIXEL(mi, (a * MI_NPIXELS(mi) / 32) % MI_NPIXELS(mi)));
|
|
else if (a == 0)
|
|
XSetForeground(display, gc, MI_BLACK_PIXEL(mi));
|
|
else
|
|
XSetForeground(display, gc, MI_WHITE_PIXEL(mi));
|
|
}
|
|
XFillRectangle(display, window, gc, b, s->c, 2, 2);
|
|
}
|
|
}
|
|
if (MI_IS_INSTALL(mi) && MI_NPIXELS(mi) > 2) {
|
|
gc = s->fgc[32];
|
|
} else {
|
|
gc = MI_GC(mi);
|
|
XSetForeground(display, gc, MI_BLACK_PIXEL(mi));
|
|
}
|
|
XFillRectangle(display, window, gc, s->midx - 2, s->midy - 2, 4, 4);
|
|
rotate(mi);
|
|
#if 0
|
|
#ifdef HAVE_XDBE_EXTENSION
|
|
if (usedouble)
|
|
XdbeSwapBuffers(display, &xdswp, 1);
|
|
#endif /* HAVE_XDBE_EXTENSION */
|
|
#endif
|
|
if (--s->time <= 0) {
|
|
if (MI_CYCLES(mi) < 1)
|
|
s->time = 1;
|
|
else
|
|
s->time = MI_CYCLES(mi) + NRAND(MI_CYCLES(mi));
|
|
s->dir = s->dir * (-1);
|
|
}
|
|
}
|
|
|
|
void
|
|
release_kumppa(ModeInfo * mi)
|
|
{
|
|
|
|
if (kumppas != NULL) {
|
|
int screen;
|
|
|
|
for (screen = 0; screen < MI_NUM_SCREENS(mi); screen++)
|
|
free_kumppa(MI_DISPLAY(mi), &kumppas[screen]);
|
|
free(kumppas);
|
|
kumppas = (kumppastruct *) NULL;
|
|
}
|
|
}
|
|
|
|
#endif /* MODE_kumppa */
|