/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*- */

/* Small example demonstrating emulating knockout-groups as in PDF-1.4
 * using cairo_set_operator().
 *
 * Owen Taylor,

 * v0.1  30 November  2002
 * v0.2   1 December  2002 - typo fixes from Keith Packard
 * v0.3  17 April     2003 - Tracking changes in Xr, (Removal of Xr{Push,Pop}Group)
 * v0.4  29 September 2003 - Use cairo_rectangle rather than private rect_path
 *			     Use cairo_arc for oval_path
 * Keeping log of changes in ChangeLog/CVS now. (2003-11-19) Carl Worth
 */
#include "conky.h"
#include <X11/Xlib.h>
#include <X11/Xutil.h>
#include <cairo.h>
#include <cairo-xlib.h>
#include <math.h>
#include <stdio.h>

/* Fill the given area with checks in the standard style
 * for showing compositing effects.
 */
static void fill_checks(cairo_t * cr, int x, int y, int width, int height)
{
	cairo_surface_t *check;
	cairo_pattern_t *check_pattern;

	cairo_save(cr);

#define CHECK_SIZE 32

	check =
	    cairo_surface_create_similar(cairo_current_target_surface(cr),
					 CAIRO_FORMAT_RGB24,
					 2 * CHECK_SIZE, 2 * CHECK_SIZE);
	cairo_surface_set_repeat(check, 1);

	/* Draw the check */
	{
		cairo_save(cr);

		cairo_set_target_surface(cr, check);

		cairo_set_operator(cr, CAIRO_OPERATOR_SRC);

		cairo_set_rgb_color(cr, 0.4, 0.4, 0.4);

		cairo_rectangle(cr, 0, 0, 2 * CHECK_SIZE, 2 * CHECK_SIZE);
		cairo_fill(cr);

		cairo_set_rgb_color(cr, 0.7, 0.7, 0.7);

		cairo_rectangle(cr, x, y, CHECK_SIZE, CHECK_SIZE);
		cairo_fill(cr);
		cairo_rectangle(cr, x + CHECK_SIZE, y + CHECK_SIZE,
				CHECK_SIZE, CHECK_SIZE);
		cairo_fill(cr);

		cairo_restore(cr);
	}

	/* Fill the whole surface with the check */

	check_pattern = cairo_pattern_create_for_surface(check);
	cairo_set_pattern(cr, check_pattern);
	cairo_rectangle(cr, 0, 0, width, height);
	cairo_fill(cr);

	cairo_pattern_destroy(check_pattern);
	cairo_surface_destroy(check);

	cairo_restore(cr);
}

static void draw_pee(cairo_t * cr, double xc, double yc)
{
	cairo_set_rgb_color(cr, 0, 0, 0);
	cairo_show_text(cr, "Conky");
}

static void draw(cairo_t * cr, int width, int height)
{
	cairo_surface_t *overlay;

	/* Fill the background */
	double xc = width / 2.;
	double yc = height / 2.;

	overlay =
	    cairo_surface_create_similar(cairo_current_target_surface(cr),
					 CAIRO_FORMAT_ARGB32, width,
					 height);
	if (overlay == NULL)
		return;

	fill_checks(cr, 0, 0, width, height);

	cairo_save(cr);
	cairo_set_target_surface(cr, overlay);

	cairo_set_alpha(cr, 0.5);
	cairo_set_operator(cr, CAIRO_OPERATOR_OVER);
	draw_pee(cr, xc, yc);

	cairo_restore(cr);

	cairo_show_surface(cr, overlay, width, height);

	cairo_surface_destroy(overlay);
}

int do_it(void)
{
	Display *dpy;
	int screen;
	Window w;
	Pixmap pixmap;
	char *title = "cairo: Knockout Groups";
	unsigned int quit_keycode;
	int needs_redraw;
	GC gc;
	XWMHints *wmhints;
	XSizeHints *normalhints;
	XClassHint *classhint;

	int width = 400;
	int height = 400;

	dpy = XOpenDisplay(NULL);
	screen = DefaultScreen(dpy);

	w = XCreateSimpleWindow(dpy, RootWindow(dpy, screen),
				0, 0, width, height, 0,
				BlackPixel(dpy, screen), WhitePixel(dpy,
								    screen));

	normalhints = XAllocSizeHints();
	normalhints->flags = 0;
	normalhints->x = 0;
	normalhints->y = 0;
	normalhints->width = width;
	normalhints->height = height;

	classhint = XAllocClassHint();
	classhint->res_name = "cairo-knockout";
	classhint->res_class = "Cairo-knockout";

	wmhints = XAllocWMHints();
	wmhints->flags = InputHint;
	wmhints->input = True;

	XmbSetWMProperties(dpy, w, title, "cairo-knockout", 0, 0,
			   normalhints, wmhints, classhint);
	XFree(wmhints);
	XFree(classhint);
	XFree(normalhints);

	pixmap =
	    XCreatePixmap(dpy, w, width, height,
			  DefaultDepth(dpy, screen));
	gc = XCreateGC(dpy, pixmap, 0, NULL);

	quit_keycode = XKeysymToKeycode(dpy, XStringToKeysym("Q"));

	XSelectInput(dpy, w,
		     ExposureMask | StructureNotifyMask | ButtonPressMask |
		     KeyPressMask);
	XMapWindow(dpy, w);

	needs_redraw = 1;

	while (1) {
		XEvent xev;

		/* Only do the redraw if there are no events pending.  This
		 * avoids us getting behind doing several redraws for several
		 * consecutive resize events for example.
		 */
		if (!XPending(dpy) && needs_redraw) {
			cairo_t *cr = cairo_create();

			cairo_set_target_drawable(cr, dpy, pixmap);

			draw(cr, width, height);

			cairo_destroy(cr);

			XCopyArea(dpy, pixmap, w, gc,
				  0, 0, width, height, 0, 0);

			needs_redraw = 0;
		}

		XNextEvent(dpy, &xev);

		switch (xev.xany.type) {
		case ButtonPress:
			/* A click on the canvas ends the program */
			goto DONE;
		case KeyPress:
			if (xev.xkey.keycode == quit_keycode)
				goto DONE;
			break;
		case ConfigureNotify:
			/* Note new size and create new pixmap. */
			width = xev.xconfigure.width;
			height = xev.xconfigure.height;
			XFreePixmap(dpy, pixmap);
			pixmap =
			    XCreatePixmap(dpy, w, width, height,
					  DefaultDepth(dpy, screen));
			needs_redraw = 1;
			break;
		case Expose:
			XCopyArea(dpy, pixmap, w, gc,
				  xev.xexpose.x, xev.xexpose.y,
				  xev.xexpose.width, xev.xexpose.height,
				  xev.xexpose.x, xev.xexpose.y);
			break;
		}
	}
      DONE:

	XFreeGC(dpy, gc);
	XCloseDisplay(dpy);

	return 0;
}