1 files changed, 622 insertions, 0 deletions
diff --git a/savers/gste-popsquares.c b/savers/gste-popsquares.c
new file mode 100644
index 0000000..6a6f2e3
--- /dev/null
+++ b/savers/gste-popsquares.c
@@ -0,0 +1,622 @@
+/* -*- Mode: C; indent-tabs-mode: nil; c-basic-offset: 8; tab-width: 8 -*-
+ *
+ * Copyright (C) 2005 William Jon McCann <[email protected]>
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of the
+ * License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+ * 02111-1307, USA.
+ *
+ */
+
+#include "config.h"
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <unistd.h>
+#include <string.h>
+
+#include <glib.h>
+#include <gtk/gtk.h>
+
+#include "gs-theme-engine.h"
+#include "gste-popsquares.h"
+
+static void gste_popsquares_class_init (GSTEPopsquaresClass *klass);
+static void gste_popsquares_init (GSTEPopsquares *engine);
+static void gste_popsquares_finalize (GObject *object);
+
+typedef struct _square
+{
+ int x, y, w, h;
+ int color;
+} square;
+
+struct GSTEPopsquaresPrivate
+{
+ guint timeout_id;
+
+ int ncolors;
+ int subdivision;
+
+ GdkGC *gc;
+ GdkColor *colors;
+ square *squares;
+
+};
+
+#define GSTE_POPSQUARES_GET_PRIVATE(o) (G_TYPE_INSTANCE_GET_PRIVATE ((o), GSTE_TYPE_POPSQUARES, GSTEPopsquaresPrivate))
+
+static GObjectClass *parent_class = NULL;
+
+G_DEFINE_TYPE (GSTEPopsquares, gste_popsquares, GS_TYPE_THEME_ENGINE)
+
+static void
+hsv_to_rgb (int h,
+ double s,
+ double v,
+ unsigned short *r,
+ unsigned short *g,
+ unsigned short *b)
+{
+ double H, S, V, R, G, B;
+ double p1, p2, p3;
+ double f;
+ int i;
+
+ if (s < 0)
+ {
+ s = 0;
+ }
+ if (v < 0)
+ {
+ v = 0;
+ }
+ if (s > 1)
+ {
+ s = 1;
+ }
+ if (v > 1)
+ {
+ v = 1;
+ }
+
+ S = s;
+ V = v;
+ H = (h % 360) / 60.0;
+ i = H;
+ f = H - i;
+ p1 = V * (1 - S);
+ p2 = V * (1 - (S * f));
+ p3 = V * (1 - (S * (1 - f)));
+
+ if (i == 0)
+ {
+ R = V;
+ G = p3;
+ B = p1;
+ }
+ else if (i == 1)
+ {
+ R = p2;
+ G = V;
+ B = p1;
+ }
+ else if (i == 2)
+ {
+ R = p1;
+ G = V;
+ B = p3;
+ }
+ else if (i == 3)
+ {
+ R = p1;
+ G = p2;
+ B = V;
+ }
+ else if (i == 4)
+ {
+ R = p3;
+ G = p1;
+ B = V;
+ }
+ else
+ {
+ R = V;
+ G = p1;
+ B = p2;
+ }
+
+ *r = R * 65535;
+ *g = G * 65535;
+ *b = B * 65535;
+}
+
+static void
+rgb_to_hsv (unsigned short r,
+ unsigned short g,
+ unsigned short b,
+ int *h,
+ double *s,
+ double *v)
+{
+ double R, G, B, H, S, V;
+ double cmax, cmin;
+ double cmm;
+ int imax;
+
+ R = ((double) r) / 65535.0;
+ G = ((double) g) / 65535.0;
+ B = ((double) b) / 65535.0;
+ cmax = R;
+ cmin = G;
+ imax = 1;
+
+ if (cmax < G)
+ {
+ cmax = G;
+ cmin = R;
+ imax = 2;
+ }
+ if (cmax < B)
+ {
+ cmax = B;
+ imax = 3;
+ }
+ if (cmin > B)
+ {
+ cmin = B;
+ }
+
+ cmm = cmax - cmin;
+ V = cmax;
+
+ if (cmm == 0)
+ {
+ S = H = 0;
+ }
+ else
+ {
+ S = cmm / cmax;
+ if (imax == 1)
+ {
+ H = (G - B) / cmm;
+ }
+ else if (imax == 2)
+ {
+ H = 2.0 + (B - R) / cmm;
+ }
+ else
+ {
+ /*if (imax == 3)*/
+ H = 4.0 + (R - G) / cmm;
+ }
+
+ if (H < 0)
+ {
+ H += 6.0;
+ }
+ }
+
+ *h = (H * 60.0);
+ *s = S;
+ *v = V;
+}
+
+static void
+make_color_ramp (GdkColormap *colormap,
+ int h1,
+ double s1,
+ double v1,
+ int h2,
+ double s2,
+ double v2,
+ GdkColor *colors,
+ int n_colors,
+ gboolean closed,
+ gboolean allocate,
+ gboolean writable)
+{
+ double dh, ds, dv; /* deltas */
+ int i;
+ int ncolors, wanted;
+ int total_ncolors = n_colors;
+
+ wanted = total_ncolors;
+ if (closed)
+ {
+ wanted = (wanted / 2) + 1;
+ }
+
+ ncolors = total_ncolors;
+
+ memset (colors, 0, n_colors * sizeof (*colors));
+
+ if (closed)
+ {
+ ncolors = (ncolors / 2) + 1;
+ }
+
+ /* Note: unlike other routines in this module, this function assumes that
+ if h1 and h2 are more than 180 degrees apart, then the desired direction
+ is always from h1 to h2 (rather than the shorter path.) make_uniform
+ depends on this.
+ */
+ dh = ((double)h2 - (double)h1) / ncolors;
+ ds = (s2 - s1) / ncolors;
+ dv = (v2 - v1) / ncolors;
+
+ for (i = 0; i < ncolors; i++)
+ {
+ hsv_to_rgb ((int) (h1 + (i * dh)),
+ (s1 + (i * ds)),
+ (v1 + (i * dv)),
+ &colors [i].red,
+ &colors [i].green,
+ &colors [i].blue);
+ if (allocate)
+ {
+ gdk_colormap_alloc_color (colormap,
+ &colors [i],
+ writable,
+ TRUE);
+ }
+ }
+
+ if (closed)
+ {
+ for (i = ncolors; i < n_colors; i++)
+ {
+ colors [i] = colors [n_colors - i];
+ }
+ }
+
+}
+
+static void
+randomize_square_colors (square *squares,
+ int nsquares,
+ int ncolors)
+{
+ int i;
+ square *s;
+
+ s = squares;
+
+ for (i = 0; i < nsquares; i++)
+ {
+ s[i].color = g_random_int_range (0, ncolors);
+ }
+}
+
+static void
+set_colors (GdkWindow *window,
+ GdkColor *fg,
+ GdkColor *bg)
+{
+ GtkWidget *widget;
+ GdkColor color;
+
+ widget = gtk_invisible_new ();
+
+ color = widget->style->dark [GTK_STATE_SELECTED];
+ fg->red = color.red;
+ fg->green = color.green;
+ fg->blue = color.blue;
+ color = widget->style->bg [GTK_STATE_SELECTED];
+ bg->red = color.red;
+ bg->green = color.green;
+ bg->blue = color.blue;
+}
+
+static void
+gste_popsquares_set_property (GObject *object,
+ guint prop_id,
+ const GValue *value,
+ GParamSpec *pspec)
+{
+ GSTEPopsquares *self;
+
+ self = GSTE_POPSQUARES (object);
+
+ switch (prop_id)
+ {
+ default:
+ G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
+ break;
+ }
+}
+
+static void
+gste_popsquares_get_property (GObject *object,
+ guint prop_id,
+ GValue *value,
+ GParamSpec *pspec)
+{
+ GSTEPopsquares *self;
+
+ self = GSTE_POPSQUARES (object);
+
+ switch (prop_id)
+ {
+ default:
+ G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
+ break;
+ }
+}
+
+static void
+setup_squares (GSTEPopsquares *pop)
+{
+ int window_width;
+ int window_height;
+ int nsquares;
+ int x, y;
+ int sw, sh, gw, gh;
+ GdkWindow *window;
+
+ window = gs_theme_engine_get_window (GS_THEME_ENGINE (pop));
+
+ if (window == NULL)
+ {
+ return;
+ }
+
+ gs_theme_engine_get_window_size (GS_THEME_ENGINE (pop), &window_width, &window_height);
+
+ sw = window_width / pop->priv->subdivision;
+ sh = window_height / pop->priv->subdivision;
+
+ gw = pop->priv->subdivision;
+ gh = pop->priv->subdivision;
+ nsquares = gw * gh;
+
+ if (pop->priv->squares)
+ {
+ g_free (pop->priv->squares);
+ }
+ pop->priv->squares = g_new0 (square, nsquares);
+
+ for (y = 0; y < gh; y++)
+ {
+ for (x = 0; x < gw; x++)
+ {
+ square *s = (square *) &pop->priv->squares [gw * y + x];
+ s->w = sw;
+ s->h = sh;
+ s->x = x * sw;
+ s->y = y * sh;
+ }
+ }
+}
+
+static void
+setup_colors (GSTEPopsquares *pop)
+{
+ double s1, v1, s2, v2 = 0;
+ int h1, h2 = 0;
+ int nsquares;
+ GdkColor fg;
+ GdkColor bg;
+ GdkWindow *window;
+
+ window = gs_theme_engine_get_window (GS_THEME_ENGINE (pop));
+
+ if (window == NULL)
+ {
+ return;
+ }
+
+ set_colors (window, &fg, &bg);
+
+ if (pop->priv->gc)
+ {
+ g_object_unref (pop->priv->gc);
+ }
+ pop->priv->gc = gdk_gc_new (window);
+
+ if (pop->priv->colors)
+ {
+ g_free (pop->priv->colors);
+ }
+ pop->priv->colors = g_new0 (GdkColor, pop->priv->ncolors);
+
+ rgb_to_hsv (fg.red, fg.green, fg.blue, &h1, &s1, &v1);
+ rgb_to_hsv (bg.red, bg.green, bg.blue, &h2, &s2, &v2);
+
+ make_color_ramp (gtk_widget_get_colormap (GTK_WIDGET (pop)),
+ h1, s1, v1,
+ h2, s2, v2,
+ pop->priv->colors,
+ pop->priv->ncolors,
+ TRUE,
+ TRUE,
+ FALSE);
+
+ nsquares = pop->priv->subdivision * pop->priv->subdivision;
+
+ randomize_square_colors (pop->priv->squares, nsquares, pop->priv->ncolors);
+}
+
+static void
+gste_popsquares_real_show (GtkWidget *widget)
+{
+ GSTEPopsquares *pop = GSTE_POPSQUARES (widget);
+
+ /* start */
+ setup_squares (pop);
+ setup_colors (pop);
+
+ if (GTK_WIDGET_CLASS (parent_class)->show)
+ {
+ GTK_WIDGET_CLASS (parent_class)->show (widget);
+ }
+}
+
+static gboolean
+gste_popsquares_real_expose (GtkWidget *widget,
+ GdkEventExpose *event)
+{
+ gboolean handled = FALSE;
+
+ /* draw */
+
+ /* FIXME: should double buffer? */
+
+ if (GTK_WIDGET_CLASS (parent_class)->expose_event)
+ {
+ handled = GTK_WIDGET_CLASS (parent_class)->expose_event (widget, event);
+ }
+
+ return handled;
+}
+
+static gboolean
+gste_popsquares_real_configure (GtkWidget *widget,
+ GdkEventConfigure *event)
+{
+ GSTEPopsquares *pop = GSTE_POPSQUARES (widget);
+ gboolean handled = FALSE;
+
+ /* resize */
+
+ /* just reset everything */
+ setup_squares (pop);
+ setup_colors (pop);
+
+ /* schedule a redraw */
+ gtk_widget_queue_draw (widget);
+
+ if (GTK_WIDGET_CLASS (parent_class)->configure_event)
+ {
+ handled = GTK_WIDGET_CLASS (parent_class)->configure_event (widget, event);
+ }
+
+ return handled;
+}
+
+static void
+gste_popsquares_class_init (GSTEPopsquaresClass *klass)
+{
+ GObjectClass *object_class = G_OBJECT_CLASS (klass);
+ GtkWidgetClass *widget_class = GTK_WIDGET_CLASS (klass);
+
+ parent_class = g_type_class_peek_parent (klass);
+
+ object_class->finalize = gste_popsquares_finalize;
+ object_class->get_property = gste_popsquares_get_property;
+ object_class->set_property = gste_popsquares_set_property;
+
+ widget_class->show = gste_popsquares_real_show;
+ widget_class->expose_event = gste_popsquares_real_expose;
+ widget_class->configure_event = gste_popsquares_real_configure;
+
+ g_type_class_add_private (klass, sizeof (GSTEPopsquaresPrivate));
+}
+
+static gboolean
+draw_iter (GSTEPopsquares *pop)
+{
+ int border = 1;
+ gboolean twitch = FALSE;
+ int x, y;
+ int sw, sh, gw, gh;
+ int nsquares;
+ int window_width;
+ int window_height;
+ GdkWindow *window;
+
+ window = gs_theme_engine_get_window (GS_THEME_ENGINE (pop));
+
+ if (window == NULL)
+ {
+ return TRUE;
+ }
+
+ gs_theme_engine_get_window_size (GS_THEME_ENGINE (pop),
+ &window_width,
+ &window_height);
+ sw = window_width / pop->priv->subdivision;
+ sh = window_height / pop->priv->subdivision;
+
+ gw = pop->priv->subdivision;
+ gh = pop->priv->subdivision;
+ nsquares = gw * gh;
+
+ for (y = 0; y < gh; y++)
+ {
+ for (x = 0; x < gw; x++)
+ {
+ square *s = (square *) &pop->priv->squares [gw * y + x];
+
+ gdk_gc_set_foreground (pop->priv->gc, &(pop->priv->colors [s->color]));
+ gdk_draw_rectangle (window, pop->priv->gc, TRUE, s->x, s->y,
+ border ? s->w - border : s->w,
+ border ? s->h - border : s->h);
+ s->color++;
+
+ if (s->color == pop->priv->ncolors)
+ {
+ if (twitch && ((g_random_int_range (0, 4)) == 0))
+ {
+ randomize_square_colors (pop->priv->squares, nsquares, pop->priv->ncolors);
+ }
+ else
+ {
+ s->color = g_random_int_range (0, pop->priv->ncolors);
+ }
+ }
+ }
+ }
+
+ return TRUE;
+}
+
+static void
+gste_popsquares_init (GSTEPopsquares *pop)
+{
+ int delay;
+
+ pop->priv = GSTE_POPSQUARES_GET_PRIVATE (pop);
+
+ pop->priv->ncolors = 128;
+ pop->priv->subdivision = 5;
+
+ delay = 25;
+ pop->priv->timeout_id = g_timeout_add (delay, (GSourceFunc)draw_iter, pop);
+}
+
+static void
+gste_popsquares_finalize (GObject *object)
+{
+ GSTEPopsquares *pop;
+
+ g_return_if_fail (object != NULL);
+ g_return_if_fail (GSTE_IS_POPSQUARES (object));
+
+ pop = GSTE_POPSQUARES (object);
+
+ g_return_if_fail (pop->priv != NULL);
+
+ if (pop->priv->timeout_id > 0)
+ {
+ g_source_remove (pop->priv->timeout_id);
+ pop->priv->timeout_id = 0;
+ }
+
+ g_free (pop->priv->squares);
+ g_free (pop->priv->colors);
+ g_object_unref (pop->priv->gc);
+
+ G_OBJECT_CLASS (parent_class)->finalize (object);
+}