X-Git-Url: http://git.hungrycats.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=hacks%2Fpenrose.c;h=603db735ebeadd22562326f5eb61354a1843f78e;hb=6afd6db0ae9396cd7ff897ade597cd5483f49b0e;hp=aa62ab03634250dda84b08e3712a6e2cb0956ea8;hpb=3f9592851ce4ed76a9979bfdd6ec7dc5c457e183;p=xscreensaver

diff --git a/hacks/penrose.c b/hacks/penrose.c
index aa62ab03..603db735 100644
--- a/hacks/penrose.c
+++ b/hacks/penrose.c
@@ -18,9 +18,8 @@
                                 http://www.nine.org/notw/notw.html
  */
 
-#if !defined( lint ) && !defined( SABER )
+#if 0
 static const char sccsid[] = "@(#)penrose.c	5.00 2000/11/01 xlockmore";
-
 #endif
 
 /*-
@@ -84,16 +83,16 @@ If one of these are hit penrose will reinitialize.
 
 #ifdef STANDALONE
 #define MODE_penrose
-#define PROGCLASS "Penrose"
-#define HACK_INIT init_penrose
-#define HACK_DRAW draw_penrose
-#define penrose_opts xlockmore_opts
-#define DEFAULTS "*delay: 10000 \n" \
- "*size: 40 \n" \
- "*ncolors: 64 \n"
-#include "xlockmore.h"		/* from the xscreensaver distribution */
+#define DEFAULTS	"*delay: 10000 \n" \
+					"*size: 40 \n" \
+					"*ncolors: 64 \n" \
+					"*fpsSolid: true \n" \
+					"*ignoreRotation: True \n" \
+
+# define refresh_penrose 0
+# include "xlockmore.h"		/* from the xscreensaver distribution */
 #else /* !STANDALONE */
-#include "xlock.h"		/* from the xlockmore distribution */
+# include "xlock.h"		/* from the xlockmore distribution */
 #endif /* !STANDALONE */
 
 #ifdef MODE_penrose
@@ -104,19 +103,19 @@ static Bool ammann;
 
 static XrmOptionDescRec opts[] =
 {
-	{(char *) "-ammann", (char *) ".penrose.ammann", XrmoptionNoArg, (caddr_t) "on"},
-	{(char *) "+ammann", (char *) ".penrose.ammann", XrmoptionNoArg, (caddr_t) "off"}
+	{"-ammann", ".penrose.ammann", XrmoptionNoArg, "on"},
+	{"+ammann", ".penrose.ammann", XrmoptionNoArg, "off"}
 };
 static argtype vars[] =
 {
-	{(caddr_t *) & ammann, (char *) "ammann", (char *) "Ammann", (char *) DEF_AMMANN, t_Bool}
+	{&ammann, "ammann", "Ammann", DEF_AMMANN, t_Bool}
 };
 static OptionStruct desc[] =
 {
-	{(char *) "-/+ammann", (char *) "turn on/off Ammann lines"}
+	{"-/+ammann", "turn on/off Ammann lines"}
 };
 
-ModeSpecOpt penrose_opts =
+ENTRYPOINT ModeSpecOpt penrose_opts =
 {sizeof opts / sizeof opts[0], opts, sizeof vars / sizeof vars[0], vars, desc};
 
 #ifdef USE_MODULES
@@ -256,21 +255,6 @@ typedef struct {
 } forced_pool_c;
 
 
-/* This is the data related to the tiling of one screen. */
-typedef struct {
-	int         width, height;
-	XPoint      origin;
-	int         edge_length;
-	fringe_c    fringe;
-	forced_pool_c forced;
-	int         done, failures;
-	unsigned long thick_color, thin_color;
-	int         busyLoop;
-	Bool        ammann;
-} tiling_c;
-
-static tiling_c *tilings = (tiling_c *) NULL;
-
 /* The tiles are listed in counterclockwise order. */
 typedef struct {
 	vertex_type_c tiles[MAX_TILES_PER_VERTEX];
@@ -322,6 +306,25 @@ static angle_c vtype_angles[] =
 #define vtype_angle( v) (vtype_angles[ v])
 
 
+/* This is the data related to the tiling of one screen. */
+typedef struct {
+	int         width, height;
+	XPoint      origin;
+	int         edge_length;
+	fringe_c    fringe;
+	forced_pool_c forced;
+	int         done, failures;
+	unsigned long thick_color, thin_color;
+	int         busyLoop;
+	Bool        ammann;
+    float       ammann_r;
+    fcoord_c    fived_table[5];
+} tiling_c;
+
+static tiling_c *tilings = (tiling_c *) NULL;
+
+
+
 /* Direction angle of an edge. */
 static      angle_c
 vertex_dir(ModeInfo * mi, fringe_node_c * vertex, unsigned side)
@@ -355,8 +358,7 @@ vertex_dir(ModeInfo * mi, fringe_node_c * vertex, unsigned side)
 static void
 add_unit_vec(angle_c dir, int *fived)
 {
-	static int  dir2i[] =
-	{0, 3, 1, 4, 2};
+	static const int dir2i[] = {0, 3, 1, 4, 2};
 
 	while (dir < 0)
 		dir += 10;
@@ -375,9 +377,6 @@ add_unit_vec(angle_c dir, int *fived)
 static void
 fived_to_loc(int fived[], tiling_c * tp, XPoint *pt)
 {
-	static fcoord_c fived_table[5] =
-	{
-		{.0, .0}};
 	float       fifth = 8 * atan(1.) / 5;
 	register int i;
 	register float r;
@@ -386,15 +385,15 @@ fived_to_loc(int fived[], tiling_c * tp, XPoint *pt)
 	*pt = tp->origin;
 	offset.x = 0.0;
 	offset.y = 0.0;
-	if (fived_table[0].x == .0)
+	if (tp->fived_table[0].x == .0)
 		for (i = 0; i < 5; i++) {
-			fived_table[i].x = cos(fifth * i);
-			fived_table[i].y = sin(fifth * i);
+			tp->fived_table[i].x = cos(fifth * i);
+			tp->fived_table[i].y = sin(fifth * i);
 		}
 	for (i = 0; i < 5; i++) {
 		r = fived[i] * tp->edge_length;
-		offset.x += r * fived_table[i].x;
-		offset.y -= r * fived_table[i].y;
+		offset.x += r * tp->fived_table[i].x;
+		offset.y -= r * tp->fived_table[i].y;
 	}
 	(*pt).x += (int) (offset.x + .5);
 	(*pt).y += (int) (offset.y + .5);
@@ -427,7 +426,7 @@ free_penrose(tiling_c * tp)
 
 
 /* Called to init the mode. */
-void
+ENTRYPOINT void
 init_penrose(ModeInfo * mi)
 {
 	tiling_c   *tp;
@@ -692,12 +691,11 @@ draw_tile(fringe_node_c * v1, fringe_node_c * v2,
 		   fail miserably on a b&w display. */
 
 		if ((vtype & VT_TYPE_MASK) == VT_THICK) {
-			static float r = .0;
 
-			if (r == .0) {
+			if (tp->ammann_r == .0) {
 				float       pi10 = 2 * atan(1.) / 5;
 
-				r = 1 - sin(pi10) / (2 * sin(3 * pi10));
+				tp->ammann_r = 1 - sin(pi10) / (2 * sin(3 * pi10));
 			}
 			if (MI_NPIXELS(mi) > 2)
 				XSetForeground(display, gc, MI_PIXEL(mi, tp->thin_color));
@@ -706,10 +704,10 @@ draw_tile(fringe_node_c * v1, fringe_node_c * v2,
 				XSetLineAttributes(display, gc, 1, LineOnOffDash, CapNotLast, JoinMiter);
 			}
 			XDrawLine(display, window, gc,
-			      (int) (r * pts[3].x + (1 - r) * pts[0].x + .5),
-			      (int) (r * pts[3].y + (1 - r) * pts[0].y + .5),
-			      (int) (r * pts[1].x + (1 - r) * pts[0].x + .5),
-			     (int) (r * pts[1].y + (1 - r) * pts[0].y + .5));
+			      (int) (tp->ammann_r * pts[3].x + (1 - tp->ammann_r) * pts[0].x + .5),
+			      (int) (tp->ammann_r * pts[3].y + (1 - tp->ammann_r) * pts[0].y + .5),
+			      (int) (tp->ammann_r * pts[1].x + (1 - tp->ammann_r) * pts[0].x + .5),
+			     (int) (tp->ammann_r * pts[1].y + (1 - tp->ammann_r) * pts[0].y + .5));
 			if (MI_NPIXELS(mi) <= 2)
 				XSetLineAttributes(display, gc, 1, LineSolid, CapNotLast, JoinMiter);
 		} else {
@@ -1257,7 +1255,7 @@ add_random_tile(fringe_node_c * vertex, ModeInfo * mi)
 }
 
 /* One step of the growth algorithm. */
-void
+ENTRYPOINT void
 draw_penrose(ModeInfo * mi)
 {
 	int         i = 0, n;
@@ -1330,8 +1328,16 @@ draw_penrose(ModeInfo * mi)
 }
 
 
+ENTRYPOINT void
+reshape_penrose(ModeInfo * mi, int width, int height)
+{
+	tiling_c   *tp = &tilings[MI_SCREEN(mi)];
+	tp->width = width;
+	tp->height = height;
+}
+
 /* Total clean-up. */
-void
+ENTRYPOINT void
 release_penrose(ModeInfo * mi)
 {
 	if (tilings != NULL) {
@@ -1344,4 +1350,18 @@ release_penrose(ModeInfo * mi)
 	}
 }
 
+ENTRYPOINT Bool
+penrose_handle_event (ModeInfo *mi, XEvent *event)
+{
+  if (screenhack_event_helper (MI_DISPLAY(mi), MI_WINDOW(mi), event))
+    {
+      init_penrose (mi);
+      return True;
+    }
+  return False;
+}
+
+
+XSCREENSAVER_MODULE ("Penrose", penrose)
+
 #endif /* MODE_penrose */