test: Add an xcb surface source test

test/Makefile.am

@@ -41,6 +41,10 @@ if CAIRO_HAS_TEST_SURFACES
 test_sources += $(test_fallback16_surface_test_sources)
 endif
 
+if CAIRO_HAS_XCB_SURFACE
+test_sources += $(xcb_surface_test_sources)
+endif
+
 if CAIRO_HAS_XLIB_SURFACE
 test_sources += $(xlib_surface_test_sources)
 endif
@@ -1057,6 +1061,8 @@ REFERENCE_IMAGES = \
 	user-font.ref.png \
 	user-font.svg.ref.png \
 	user-font.xlib.ref.png \
+	xcb-surface-source.rgb24.ref.png \
+	xcb-surface-source.argb32.ref.png \
 	xlib-expose-event.ref.png \
 	xlib-surface-source.rgb24.ref.png \
 	xlib-surface-source.argb32.ref.png \

test/Makefile.sources

@@ -286,6 +286,9 @@ svg_surface_test_sources = \
 test_fallback16_surface_test_sources = \
 	test-fallback16-surface-source.c
 
+xcb_surface_test_sources = \
+	xcb-surface-source.c
+
 xlib_surface_test_sources = \
 	xlib-expose-event.c \
 	xlib-surface.c \

test/xcb-surface-source.c

@@ -0,0 +1,145 @@
+/*
+ * Copyright © 2009 Chris Wilson
+ *
+ * Permission to use, copy, modify, distribute, and sell this software
+ * and its documentation for any purpose is hereby granted without
+ * fee, provided that the above copyright notice appear in all copies
+ * and that both that copyright notice and this permission notice
+ * appear in supporting documentation, and that the name of
+ * Chris Wilson not be used in advertising or publicity pertaining to
+ * distribution of the software without specific, written prior
+ * permission. Chris Wilson makes no representations about the
+ * suitability of this software for any purpose.  It is provided "as
+ * is" without express or implied warranty.
+ *
+ * CHRIS WILSON DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS
+ * SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND
+ * FITNESS, IN NO EVENT SHALL CHRIS WILSON BE LIABLE FOR ANY SPECIAL,
+ * INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER
+ * RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION
+ * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR
+ * IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+ *
+ * Author: Chris Wilson <chris@chris-wilson.co.uk>
+ */
+
+#include "cairo-test.h"
+#if CAIRO_HAS_XCB_SURFACE
+#include <cairo-xcb.h>
+#include <cairo-xcb-xrender.h>
+#endif
+
+#include "surface-source.c"
+
+#if CAIRO_HAS_XCB_SURFACE
+static cairo_user_data_key_t closure_key;
+
+struct closure {
+    cairo_device_t *device;
+    xcb_connection_t *connection;
+    xcb_pixmap_t pixmap;
+};
+
+static void
+cleanup (void *data)
+{
+    struct closure *arg = data;
+
+    cairo_device_finish (arg->device);
+    cairo_device_destroy (arg->device);
+
+    xcb_free_pixmap (arg->connection, arg->pixmap);
+    xcb_disconnect (arg->connection);
+
+    free (arg);
+}
+
+static xcb_render_pictforminfo_t *
+find_depth (xcb_connection_t *connection, int depth, void **formats_out)
+{
+    xcb_render_query_pict_formats_reply_t	*formats;
+    xcb_render_query_pict_formats_cookie_t cookie;
+    xcb_render_pictforminfo_iterator_t i;
+
+    cookie = xcb_render_query_pict_formats (connection);
+    xcb_flush (connection);
+
+    formats = xcb_render_query_pict_formats_reply (connection, cookie, 0);
+    if (formats == NULL)
+	return NULL;
+
+    for (i = xcb_render_query_pict_formats_formats_iterator (formats);
+	 i.rem;
+	 xcb_render_pictforminfo_next (&i))
+    {
+	if (XCB_RENDER_PICT_TYPE_DIRECT != i.data->type)
+	    continue;
+
+	if (depth != i.data->depth)
+	    continue;
+
+	*formats_out = formats;
+	return i.data;
+    }
+
+    free (formats);
+    return NULL;
+}
+#endif
+
+static cairo_surface_t *
+create_source_surface (int size)
+{
+#if CAIRO_HAS_XCB_SURFACE
+    xcb_render_pictforminfo_t *render_format;
+    struct closure *data;
+    cairo_surface_t *surface;
+    xcb_screen_t *root;
+    xcb_void_cookie_t cookie;
+    void *formats;
+
+    data = xmalloc (sizeof (struct closure));
+
+    data->connection = xcb_connect (NULL, NULL);
+    render_format = find_depth (data->connection, 32, &formats);
+    if (render_format == NULL) {
+	xcb_disconnect (data->connection);
+	free (data);
+	return NULL;
+    }
+
+    root = xcb_setup_roots_iterator (xcb_get_setup (data->connection)).data;
+
+    data->pixmap = xcb_generate_id (data->connection);
+    cookie = xcb_create_pixmap_checked (data->connection, 32,
+					data->pixmap, root->root, size, size);
+    /* slow, but sure */
+    if (xcb_request_check (data->connection, cookie) != NULL) {
+	free (formats);
+	xcb_disconnect (data->connection);
+	free (data);
+	return NULL;
+    }
+
+    surface = cairo_xcb_surface_create_with_xrender_format (data->connection,
+							    root,
+							    data->pixmap,
+							    render_format,
+							    size, size);
+    free (formats);
+
+    data->device = cairo_device_reference (cairo_surface_get_device (surface));
+    cairo_surface_set_user_data (surface, &closure_key, data, cleanup);
+
+    return surface;
+#else
+    return NULL;
+#endif
+}
+
+CAIRO_TEST (xcb_surface_source,
+	    "Test using a XCB surface as the source",
+	    "source", /* keywords */
+	    NULL, /* requirements */
+	    SIZE, SIZE,
+	    preamble, draw)