summaryrefslogtreecommitdiff
path: root/libs/cairo-1.16.0/src/cairo-mesh-pattern-rasterizer.c
diff options
context:
space:
mode:
Diffstat (limited to 'libs/cairo-1.16.0/src/cairo-mesh-pattern-rasterizer.c')
-rw-r--r--libs/cairo-1.16.0/src/cairo-mesh-pattern-rasterizer.c941
1 files changed, 941 insertions, 0 deletions
diff --git a/libs/cairo-1.16.0/src/cairo-mesh-pattern-rasterizer.c b/libs/cairo-1.16.0/src/cairo-mesh-pattern-rasterizer.c
new file mode 100644
index 0000000..e7f0db6
--- /dev/null
+++ b/libs/cairo-1.16.0/src/cairo-mesh-pattern-rasterizer.c
@@ -0,0 +1,941 @@
+/* -*- Mode: c; tab-width: 8; c-basic-offset: 4; indent-tabs-mode: t; -*- */
+/* cairo - a vector graphics library with display and print output
+ *
+ * Copyright 2009 Andrea Canciani
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it either under the terms of the GNU Lesser General Public
+ * License version 2.1 as published by the Free Software Foundation
+ * (the "LGPL") or, at your option, under the terms of the Mozilla
+ * Public License Version 1.1 (the "MPL"). If you do not alter this
+ * notice, a recipient may use your version of this file under either
+ * the MPL or the LGPL.
+ *
+ * You should have received a copy of the LGPL along with this library
+ * in the file COPYING-LGPL-2.1; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Suite 500, Boston, MA 02110-1335, USA
+ * You should have received a copy of the MPL along with this library
+ * in the file COPYING-MPL-1.1
+ *
+ * The contents of this file are subject to the Mozilla Public License
+ * Version 1.1 (the "License"); you may not use this file except in
+ * compliance with the License. You may obtain a copy of the License at
+ * http://www.mozilla.org/MPL/
+ *
+ * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY
+ * OF ANY KIND, either express or implied. See the LGPL or the MPL for
+ * the specific language governing rights and limitations.
+ *
+ * The Original Code is the cairo graphics library.
+ *
+ * The Initial Developer of the Original Code is Andrea Canciani.
+ *
+ * Contributor(s):
+ * Andrea Canciani <ranma42@gmail.com>
+ */
+
+#include "cairoint.h"
+
+#include "cairo-array-private.h"
+#include "cairo-pattern-private.h"
+
+/*
+ * Rasterizer for mesh patterns.
+ *
+ * This implementation is based on techniques derived from several
+ * papers (available from ACM):
+ *
+ * - Lien, Shantz and Pratt "Adaptive Forward Differencing for
+ * Rendering Curves and Surfaces" (discussion of the AFD technique,
+ * bound of 1/sqrt(2) on step length without proof)
+ *
+ * - Popescu and Rosen, "Forward rasterization" (description of
+ * forward rasterization, proof of the previous bound)
+ *
+ * - Klassen, "Integer Forward Differencing of Cubic Polynomials:
+ * Analysis and Algorithms"
+ *
+ * - Klassen, "Exact Integer Hybrid Subdivision and Forward
+ * Differencing of Cubics" (improving the bound on the minimum
+ * number of steps)
+ *
+ * - Chang, Shantz and Rocchetti, "Rendering Cubic Curves and Surfaces
+ * with Integer Adaptive Forward Differencing" (analysis of forward
+ * differencing applied to Bezier patches)
+ *
+ * Notes:
+ * - Poor performance expected in degenerate cases
+ *
+ * - Patches mostly outside the drawing area are drawn completely (and
+ * clipped), wasting time
+ *
+ * - Both previous problems are greatly reduced by splitting until a
+ * reasonably small size and clipping the new tiles: execution time
+ * is quadratic in the convex-hull diameter instead than linear to
+ * the painted area. Splitting the tiles doesn't change the painted
+ * area but (usually) reduces the bounding box area (bbox area can
+ * remain the same after splitting, but cannot grow)
+ *
+ * - The initial implementation used adaptive forward differencing,
+ * but simple forward differencing scored better in benchmarks
+ *
+ * Idea:
+ *
+ * We do a sampling over the cubic patch with step du and dv (in the
+ * two parameters) that guarantees that any point of our sampling will
+ * be at most at 1/sqrt(2) from its adjacent points. In formulae
+ * (assuming B is the patch):
+ *
+ * |B(u,v) - B(u+du,v)| < 1/sqrt(2)
+ * |B(u,v) - B(u,v+dv)| < 1/sqrt(2)
+ *
+ * This means that every pixel covered by the patch will contain at
+ * least one of the samples, thus forward rasterization can be
+ * performed. Sketch of proof (from Popescu and Rosen):
+ *
+ * Let's take the P pixel we're interested into. If we assume it to be
+ * square, its boundaries define 9 regions on the plane:
+ *
+ * 1|2|3
+ * -+-+-
+ * 8|P|4
+ * -+-+-
+ * 7|6|5
+ *
+ * Let's check that the pixel P will contain at least one point
+ * assuming that it is covered by the patch.
+ *
+ * Since the pixel is covered by the patch, its center will belong to
+ * (at least) one of the quads:
+ *
+ * {(B(u,v), B(u+du,v), B(u,v+dv), B(u+du,v+dv)) for u,v in [0,1]}
+ *
+ * If P doesn't contain any of the corners of the quad:
+ *
+ * - if one of the corners is in 1,3,5 or 7, other two of them have to
+ * be in 2,4,6 or 8, thus if the last corner is not in P, the length
+ * of one of the edges will be > 1/sqrt(2)
+ *
+ * - if none of the corners is in 1,3,5 or 7, all of them are in 2,4,6
+ * and/or 8. If they are all in different regions, they can't
+ * satisfy the distance constraint. If two of them are in the same
+ * region (let's say 2), no point is in 6 and again it is impossible
+ * to have the center of P in the quad respecting the distance
+ * constraint (both these assertions can be checked by continuity
+ * considering the length of the edges of a quad with the vertices
+ * on the edges of P)
+ *
+ * Each of the cases led to a contradiction, so P contains at least
+ * one of the corners of the quad.
+ */
+
+/*
+ * Make sure that errors are less than 1 in fixed point math if you
+ * change these values.
+ *
+ * The error is amplified by about steps^3/4 times.
+ * The rasterizer always uses a number of steps that is a power of 2.
+ *
+ * 256 is the maximum allowed number of steps (to have error < 1)
+ * using 8.24 for the differences.
+ */
+#define STEPS_MAX_V 256.0
+#define STEPS_MAX_U 256.0
+
+/*
+ * If the patch/curve is only partially visible, split it to a finer
+ * resolution to get higher chances to clip (part of) it.
+ *
+ * These values have not been computed, but simply obtained
+ * empirically (by benchmarking some patches). They should never be
+ * greater than STEPS_MAX_V (or STEPS_MAX_U), but they can be as small
+ * as 1 (depending on how much you want to spend time in splitting the
+ * patch/curve when trying to save some rasterization time).
+ */
+#define STEPS_CLIP_V 64.0
+#define STEPS_CLIP_U 64.0
+
+
+/* Utils */
+static inline double
+sqlen (cairo_point_double_t p0, cairo_point_double_t p1)
+{
+ cairo_point_double_t delta;
+
+ delta.x = p0.x - p1.x;
+ delta.y = p0.y - p1.y;
+
+ return delta.x * delta.x + delta.y * delta.y;
+}
+
+static inline int16_t
+_color_delta_to_shifted_short (int32_t from, int32_t to, int shift)
+{
+ int32_t delta = to - from;
+
+ /* We need to round toward zero, because otherwise adding the
+ * delta 2^shift times can overflow */
+ if (delta >= 0)
+ return delta >> shift;
+ else
+ return -((-delta) >> shift);
+}
+
+/*
+ * Convert a number of steps to the equivalent shift.
+ *
+ * Input: the square of the minimum number of steps
+ *
+ * Output: the smallest integer x such that 2^x > steps
+ */
+static inline int
+sqsteps2shift (double steps_sq)
+{
+ int r;
+ frexp (MAX (1.0, steps_sq), &r);
+ return (r + 1) >> 1;
+}
+
+/*
+ * FD functions
+ *
+ * A Bezier curve is defined (with respect to a parameter t in
+ * [0,1]) from its nodes (x,y,z,w) like this:
+ *
+ * B(t) = x(1-t)^3 + 3yt(1-t)^2 + 3zt^2(1-t) + wt^3
+ *
+ * To efficiently evaluate a Bezier curve, the rasterizer uses forward
+ * differences. Given x, y, z, w (the 4 nodes of the Bezier curve), it
+ * is possible to convert them to forward differences form and walk
+ * over the curve using fd_init (), fd_down () and fd_fwd ().
+ *
+ * f[0] is always the value of the Bezier curve for "current" t.
+ */
+
+/*
+ * Initialize the coefficient for forward differences.
+ *
+ * Input: x,y,z,w are the 4 nodes of the Bezier curve
+ *
+ * Output: f[i] is the i-th difference of the curve
+ *
+ * f[0] is the value of the curve for t==0, i.e. f[0]==x.
+ *
+ * The initial step is 1; this means that each step increases t by 1
+ * (so fd_init () immediately followed by fd_fwd (f) n times makes
+ * f[0] be the value of the curve for t==n).
+ */
+static inline void
+fd_init (double x, double y, double z, double w, double f[4])
+{
+ f[0] = x;
+ f[1] = w - x;
+ f[2] = 6. * (w - 2. * z + y);
+ f[3] = 6. * (w - 3. * z + 3. * y - x);
+}
+
+/*
+ * Halve the step of the coefficients for forward differences.
+ *
+ * Input: f[i] is the i-th difference of the curve
+ *
+ * Output: f[i] is the i-th difference of the curve with half the
+ * original step
+ *
+ * f[0] is not affected, so the current t is not changed.
+ *
+ * The other coefficients are changed so that the step is half the
+ * original step. This means that doing fd_fwd (f) n times with the
+ * input f results in the same f[0] as doing fd_fwd (f) 2n times with
+ * the output f.
+ */
+static inline void
+fd_down (double f[4])
+{
+ f[3] *= 0.125;
+ f[2] = f[2] * 0.25 - f[3];
+ f[1] = (f[1] - f[2]) * 0.5;
+}
+
+/*
+ * Perform one step of forward differences along the curve.
+ *
+ * Input: f[i] is the i-th difference of the curve
+ *
+ * Output: f[i] is the i-th difference of the curve after one step
+ */
+static inline void
+fd_fwd (double f[4])
+{
+ f[0] += f[1];
+ f[1] += f[2];
+ f[2] += f[3];
+}
+
+/*
+ * Transform to integer forward differences.
+ *
+ * Input: d[n] is the n-th difference (in double precision)
+ *
+ * Output: i[n] is the n-th difference (in fixed point precision)
+ *
+ * i[0] is 9.23 fixed point, other differences are 4.28 fixed point.
+ */
+static inline void
+fd_fixed (double d[4], int32_t i[4])
+{
+ i[0] = _cairo_fixed_16_16_from_double (256 * 2 * d[0]);
+ i[1] = _cairo_fixed_16_16_from_double (256 * 16 * d[1]);
+ i[2] = _cairo_fixed_16_16_from_double (256 * 16 * d[2]);
+ i[3] = _cairo_fixed_16_16_from_double (256 * 16 * d[3]);
+}
+
+/*
+ * Perform one step of integer forward differences along the curve.
+ *
+ * Input: f[n] is the n-th difference
+ *
+ * Output: f[n] is the n-th difference
+ *
+ * f[0] is 9.23 fixed point, other differences are 4.28 fixed point.
+ */
+static inline void
+fd_fixed_fwd (int32_t f[4])
+{
+ f[0] += (f[1] >> 5) + ((f[1] >> 4) & 1);
+ f[1] += f[2];
+ f[2] += f[3];
+}
+
+/*
+ * Compute the minimum number of steps that guarantee that walking
+ * over a curve will leave no holes.
+ *
+ * Input: p[0..3] the nodes of the Bezier curve
+ *
+ * Returns: the square of the number of steps
+ *
+ * Idea:
+ *
+ * We want to make sure that at every step we move by less than
+ * 1/sqrt(2).
+ *
+ * The derivative of the cubic Bezier with nodes (p0, p1, p2, p3) is
+ * the quadratic Bezier with nodes (p1-p0, p2-p1, p3-p2) scaled by 3,
+ * so (since a Bezier curve is always bounded by its convex hull), we
+ * can say that:
+ *
+ * max(|B'(t)|) <= 3 max (|p1-p0|, |p2-p1|, |p3-p2|)
+ *
+ * We can improve this by noticing that a quadratic Bezier (a,b,c) is
+ * bounded by the quad (a,lerp(a,b,t),lerp(b,c,t),c) for any t, so
+ * (substituting the previous values, using t=0.5 and simplifying):
+ *
+ * max(|B'(t)|) <= 3 max (|p1-p0|, |p2-p0|/2, |p3-p1|/2, |p3-p2|)
+ *
+ * So, to guarantee a maximum step length of 1/sqrt(2) we must do:
+ *
+ * 3 max (|p1-p0|, |p2-p0|/2, |p3-p1|/2, |p3-p2|) sqrt(2) steps
+ */
+static inline double
+bezier_steps_sq (cairo_point_double_t p[4])
+{
+ double tmp = sqlen (p[0], p[1]);
+ tmp = MAX (tmp, sqlen (p[2], p[3]));
+ tmp = MAX (tmp, sqlen (p[0], p[2]) * .25);
+ tmp = MAX (tmp, sqlen (p[1], p[3]) * .25);
+ return 18.0 * tmp;
+}
+
+/*
+ * Split a 1D Bezier cubic using de Casteljau's algorithm.
+ *
+ * Input: x,y,z,w the nodes of the Bezier curve
+ *
+ * Output: x0,y0,z0,w0 and x1,y1,z1,w1 are respectively the nodes of
+ * the first half and of the second half of the curve
+ *
+ * The output control nodes have to be distinct.
+ */
+static inline void
+split_bezier_1D (double x, double y, double z, double w,
+ double *x0, double *y0, double *z0, double *w0,
+ double *x1, double *y1, double *z1, double *w1)
+{
+ double tmp;
+
+ *x0 = x;
+ *w1 = w;
+
+ tmp = 0.5 * (y + z);
+ *y0 = 0.5 * (x + y);
+ *z1 = 0.5 * (z + w);
+
+ *z0 = 0.5 * (*y0 + tmp);
+ *y1 = 0.5 * (tmp + *z1);
+
+ *w0 = *x1 = 0.5 * (*z0 + *y1);
+}
+
+/*
+ * Split a Bezier curve using de Casteljau's algorithm.
+ *
+ * Input: p[0..3] the nodes of the Bezier curve
+ *
+ * Output: fst_half[0..3] and snd_half[0..3] are respectively the
+ * nodes of the first and of the second half of the curve
+ *
+ * fst_half and snd_half must be different, but they can be the same as
+ * nodes.
+ */
+static void
+split_bezier (cairo_point_double_t p[4],
+ cairo_point_double_t fst_half[4],
+ cairo_point_double_t snd_half[4])
+{
+ split_bezier_1D (p[0].x, p[1].x, p[2].x, p[3].x,
+ &fst_half[0].x, &fst_half[1].x, &fst_half[2].x, &fst_half[3].x,
+ &snd_half[0].x, &snd_half[1].x, &snd_half[2].x, &snd_half[3].x);
+
+ split_bezier_1D (p[0].y, p[1].y, p[2].y, p[3].y,
+ &fst_half[0].y, &fst_half[1].y, &fst_half[2].y, &fst_half[3].y,
+ &snd_half[0].y, &snd_half[1].y, &snd_half[2].y, &snd_half[3].y);
+}
+
+
+typedef enum _intersection {
+ INSIDE = -1, /* the interval is entirely contained in the reference interval */
+ OUTSIDE = 0, /* the interval has no intersection with the reference interval */
+ PARTIAL = 1 /* the interval intersects the reference interval (but is not fully inside it) */
+} intersection_t;
+
+/*
+ * Check if an interval if inside another.
+ *
+ * Input: a,b are the extrema of the first interval
+ * c,d are the extrema of the second interval
+ *
+ * Returns: INSIDE iff [a,b) intersection [c,d) = [a,b)
+ * OUTSIDE iff [a,b) intersection [c,d) = {}
+ * PARTIAL otherwise
+ *
+ * The function assumes a < b and c < d
+ *
+ * Note: Bitwise-anding the results along each component gives the
+ * expected result for [a,b) x [A,B) intersection [c,d) x [C,D).
+ */
+static inline int
+intersect_interval (double a, double b, double c, double d)
+{
+ if (c <= a && b <= d)
+ return INSIDE;
+ else if (a >= d || b <= c)
+ return OUTSIDE;
+ else
+ return PARTIAL;
+}
+
+/*
+ * Set the color of a pixel.
+ *
+ * Input: data is the base pointer of the image
+ * width, height are the dimensions of the image
+ * stride is the stride in bytes between adjacent rows
+ * x, y are the coordinates of the pixel to be colored
+ * r,g,b,a are the color components of the color to be set
+ *
+ * Output: the (x,y) pixel in data has the (r,g,b,a) color
+ *
+ * The input color components are not premultiplied, but the data
+ * stored in the image is assumed to be in CAIRO_FORMAT_ARGB32 (8 bpc,
+ * premultiplied).
+ *
+ * If the pixel to be set is outside the image, this function does
+ * nothing.
+ */
+static inline void
+draw_pixel (unsigned char *data, int width, int height, int stride,
+ int x, int y, uint16_t r, uint16_t g, uint16_t b, uint16_t a)
+{
+ if (likely (0 <= x && 0 <= y && x < width && y < height)) {
+ uint32_t tr, tg, tb, ta;
+
+ /* Premultiply and round */
+ ta = a;
+ tr = r * ta + 0x8000;
+ tg = g * ta + 0x8000;
+ tb = b * ta + 0x8000;
+
+ tr += tr >> 16;
+ tg += tg >> 16;
+ tb += tb >> 16;
+
+ *((uint32_t*) (data + y*(ptrdiff_t)stride + 4*x)) = ((ta << 16) & 0xff000000) |
+ ((tr >> 8) & 0xff0000) | ((tg >> 16) & 0xff00) | (tb >> 24);
+ }
+}
+
+/*
+ * Forward-rasterize a cubic curve using forward differences.
+ *
+ * Input: data is the base pointer of the image
+ * width, height are the dimensions of the image
+ * stride is the stride in bytes between adjacent rows
+ * ushift is log2(n) if n is the number of desired steps
+ * dxu[i], dyu[i] are the x,y forward differences of the curve
+ * r0,g0,b0,a0 are the color components of the start point
+ * r3,g3,b3,a3 are the color components of the end point
+ *
+ * Output: data will be changed to have the requested curve drawn in
+ * the specified colors
+ *
+ * The input color components are not premultiplied, but the data
+ * stored in the image is assumed to be in CAIRO_FORMAT_ARGB32 (8 bpc,
+ * premultiplied).
+ *
+ * The function draws n+1 pixels, that is from the point at step 0 to
+ * the point at step n, both included. This is the discrete equivalent
+ * to drawing the curve for values of the interpolation parameter in
+ * [0,1] (including both extremes).
+ */
+static inline void
+rasterize_bezier_curve (unsigned char *data, int width, int height, int stride,
+ int ushift, double dxu[4], double dyu[4],
+ uint16_t r0, uint16_t g0, uint16_t b0, uint16_t a0,
+ uint16_t r3, uint16_t g3, uint16_t b3, uint16_t a3)
+{
+ int32_t xu[4], yu[4];
+ int x0, y0, u, usteps = 1 << ushift;
+
+ uint16_t r = r0, g = g0, b = b0, a = a0;
+ int16_t dr = _color_delta_to_shifted_short (r0, r3, ushift);
+ int16_t dg = _color_delta_to_shifted_short (g0, g3, ushift);
+ int16_t db = _color_delta_to_shifted_short (b0, b3, ushift);
+ int16_t da = _color_delta_to_shifted_short (a0, a3, ushift);
+
+ fd_fixed (dxu, xu);
+ fd_fixed (dyu, yu);
+
+ /*
+ * Use (dxu[0],dyu[0]) as origin for the forward differences.
+ *
+ * This makes it possible to handle much larger coordinates (the
+ * ones that can be represented as cairo_fixed_t)
+ */
+ x0 = _cairo_fixed_from_double (dxu[0]);
+ y0 = _cairo_fixed_from_double (dyu[0]);
+ xu[0] = 0;
+ yu[0] = 0;
+
+ for (u = 0; u <= usteps; ++u) {
+ /*
+ * This rasterizer assumes that pixels are integer aligned
+ * squares, so a generic (x,y) point belongs to the pixel with
+ * top-left coordinates (floor(x), floor(y))
+ */
+
+ int x = _cairo_fixed_integer_floor (x0 + (xu[0] >> 15) + ((xu[0] >> 14) & 1));
+ int y = _cairo_fixed_integer_floor (y0 + (yu[0] >> 15) + ((yu[0] >> 14) & 1));
+
+ draw_pixel (data, width, height, stride, x, y, r, g, b, a);
+
+ fd_fixed_fwd (xu);
+ fd_fixed_fwd (yu);
+ r += dr;
+ g += dg;
+ b += db;
+ a += da;
+ }
+}
+
+/*
+ * Clip, split and rasterize a Bezier curve.
+ *
+ * Input: data is the base pointer of the image
+ * width, height are the dimensions of the image
+ * stride is the stride in bytes between adjacent rows
+ * p[i] is the i-th node of the Bezier curve
+ * c0[i] is the i-th color component at the start point
+ * c3[i] is the i-th color component at the end point
+ *
+ * Output: data will be changed to have the requested curve drawn in
+ * the specified colors
+ *
+ * The input color components are not premultiplied, but the data
+ * stored in the image is assumed to be in CAIRO_FORMAT_ARGB32 (8 bpc,
+ * premultiplied).
+ *
+ * The color components are red, green, blue and alpha, in this order.
+ *
+ * The function guarantees that it will draw the curve with a step
+ * small enough to never have a distance above 1/sqrt(2) between two
+ * consecutive points (which is needed to ensure that no hole can
+ * appear when using this function to rasterize a patch).
+ */
+static void
+draw_bezier_curve (unsigned char *data, int width, int height, int stride,
+ cairo_point_double_t p[4], double c0[4], double c3[4])
+{
+ double top, bottom, left, right, steps_sq;
+ int i, v;
+
+ top = bottom = p[0].y;
+ for (i = 1; i < 4; ++i) {
+ top = MIN (top, p[i].y);
+ bottom = MAX (bottom, p[i].y);
+ }
+
+ /* Check visibility */
+ v = intersect_interval (top, bottom, 0, height);
+ if (v == OUTSIDE)
+ return;
+
+ left = right = p[0].x;
+ for (i = 1; i < 4; ++i) {
+ left = MIN (left, p[i].x);
+ right = MAX (right, p[i].x);
+ }
+
+ v &= intersect_interval (left, right, 0, width);
+ if (v == OUTSIDE)
+ return;
+
+ steps_sq = bezier_steps_sq (p);
+ if (steps_sq >= (v == INSIDE ? STEPS_MAX_U * STEPS_MAX_U : STEPS_CLIP_U * STEPS_CLIP_U)) {
+ /*
+ * The number of steps is greater than the threshold. This
+ * means that either the error would become too big if we
+ * directly rasterized it or that we can probably save some
+ * time by splitting the curve and clipping part of it
+ */
+ cairo_point_double_t first[4], second[4];
+ double midc[4];
+ split_bezier (p, first, second);
+ midc[0] = (c0[0] + c3[0]) * 0.5;
+ midc[1] = (c0[1] + c3[1]) * 0.5;
+ midc[2] = (c0[2] + c3[2]) * 0.5;
+ midc[3] = (c0[3] + c3[3]) * 0.5;
+ draw_bezier_curve (data, width, height, stride, first, c0, midc);
+ draw_bezier_curve (data, width, height, stride, second, midc, c3);
+ } else {
+ double xu[4], yu[4];
+ int ushift = sqsteps2shift (steps_sq), k;
+
+ fd_init (p[0].x, p[1].x, p[2].x, p[3].x, xu);
+ fd_init (p[0].y, p[1].y, p[2].y, p[3].y, yu);
+
+ for (k = 0; k < ushift; ++k) {
+ fd_down (xu);
+ fd_down (yu);
+ }
+
+ rasterize_bezier_curve (data, width, height, stride, ushift,
+ xu, yu,
+ _cairo_color_double_to_short (c0[0]),
+ _cairo_color_double_to_short (c0[1]),
+ _cairo_color_double_to_short (c0[2]),
+ _cairo_color_double_to_short (c0[3]),
+ _cairo_color_double_to_short (c3[0]),
+ _cairo_color_double_to_short (c3[1]),
+ _cairo_color_double_to_short (c3[2]),
+ _cairo_color_double_to_short (c3[3]));
+
+ /* Draw the end point, to make sure that we didn't leave it
+ * out because of rounding */
+ draw_pixel (data, width, height, stride,
+ _cairo_fixed_integer_floor (_cairo_fixed_from_double (p[3].x)),
+ _cairo_fixed_integer_floor (_cairo_fixed_from_double (p[3].y)),
+ _cairo_color_double_to_short (c3[0]),
+ _cairo_color_double_to_short (c3[1]),
+ _cairo_color_double_to_short (c3[2]),
+ _cairo_color_double_to_short (c3[3]));
+ }
+}
+
+/*
+ * Forward-rasterize a cubic Bezier patch using forward differences.
+ *
+ * Input: data is the base pointer of the image
+ * width, height are the dimensions of the image
+ * stride is the stride in bytes between adjacent rows
+ * vshift is log2(n) if n is the number of desired steps
+ * p[i][j], p[i][j] are the the nodes of the Bezier patch
+ * col[i][j] is the j-th color component of the i-th corner
+ *
+ * Output: data will be changed to have the requested patch drawn in
+ * the specified colors
+ *
+ * The nodes of the patch are as follows:
+ *
+ * u\v 0 - > 1
+ * 0 p00 p01 p02 p03
+ * | p10 p11 p12 p13
+ * v p20 p21 p22 p23
+ * 1 p30 p31 p32 p33
+ *
+ * i.e. u varies along the first component (rows), v varies along the
+ * second one (columns).
+ *
+ * The color components are red, green, blue and alpha, in this order.
+ * c[0..3] are the colors in p00, p30, p03, p33 respectively
+ *
+ * The input color components are not premultiplied, but the data
+ * stored in the image is assumed to be in CAIRO_FORMAT_ARGB32 (8 bpc,
+ * premultiplied).
+ *
+ * If the patch folds over itself, the part with the highest v
+ * parameter is considered above. If both have the same v, the one
+ * with the highest u parameter is above.
+ *
+ * The function draws n+1 curves, that is from the curve at step 0 to
+ * the curve at step n, both included. This is the discrete equivalent
+ * to drawing the patch for values of the interpolation parameter in
+ * [0,1] (including both extremes).
+ */
+static inline void
+rasterize_bezier_patch (unsigned char *data, int width, int height, int stride, int vshift,
+ cairo_point_double_t p[4][4], double col[4][4])
+{
+ double pv[4][2][4], cstart[4], cend[4], dcstart[4], dcend[4];
+ int v, i, k;
+
+ v = 1 << vshift;
+
+ /*
+ * pv[i][0] is the function (represented using forward
+ * differences) mapping v to the x coordinate of the i-th node of
+ * the Bezier curve with parameter u.
+ * (Likewise p[i][0] gives the y coordinate).
+ *
+ * This means that (pv[0][0][0],pv[0][1][0]),
+ * (pv[1][0][0],pv[1][1][0]), (pv[2][0][0],pv[2][1][0]) and
+ * (pv[3][0][0],pv[3][1][0]) are the nodes of the Bezier curve for
+ * the "current" v value (see the FD comments for more details).
+ */
+ for (i = 0; i < 4; ++i) {
+ fd_init (p[i][0].x, p[i][1].x, p[i][2].x, p[i][3].x, pv[i][0]);
+ fd_init (p[i][0].y, p[i][1].y, p[i][2].y, p[i][3].y, pv[i][1]);
+ for (k = 0; k < vshift; ++k) {
+ fd_down (pv[i][0]);
+ fd_down (pv[i][1]);
+ }
+ }
+
+ for (i = 0; i < 4; ++i) {
+ cstart[i] = col[0][i];
+ cend[i] = col[1][i];
+ dcstart[i] = (col[2][i] - col[0][i]) / v;
+ dcend[i] = (col[3][i] - col[1][i]) / v;
+ }
+
+ v++;
+ while (v--) {
+ cairo_point_double_t nodes[4];
+ for (i = 0; i < 4; ++i) {
+ nodes[i].x = pv[i][0][0];
+ nodes[i].y = pv[i][1][0];
+ }
+
+ draw_bezier_curve (data, width, height, stride, nodes, cstart, cend);
+
+ for (i = 0; i < 4; ++i) {
+ fd_fwd (pv[i][0]);
+ fd_fwd (pv[i][1]);
+ cstart[i] += dcstart[i];
+ cend[i] += dcend[i];
+ }
+ }
+}
+
+/*
+ * Clip, split and rasterize a Bezier cubic patch.
+ *
+ * Input: data is the base pointer of the image
+ * width, height are the dimensions of the image
+ * stride is the stride in bytes between adjacent rows
+ * p[i][j], p[i][j] are the nodes of the patch
+ * col[i][j] is the j-th color component of the i-th corner
+ *
+ * Output: data will be changed to have the requested patch drawn in
+ * the specified colors
+ *
+ * The nodes of the patch are as follows:
+ *
+ * u\v 0 - > 1
+ * 0 p00 p01 p02 p03
+ * | p10 p11 p12 p13
+ * v p20 p21 p22 p23
+ * 1 p30 p31 p32 p33
+ *
+ * i.e. u varies along the first component (rows), v varies along the
+ * second one (columns).
+ *
+ * The color components are red, green, blue and alpha, in this order.
+ * c[0..3] are the colors in p00, p30, p03, p33 respectively
+ *
+ * The input color components are not premultiplied, but the data
+ * stored in the image is assumed to be in CAIRO_FORMAT_ARGB32 (8 bpc,
+ * premultiplied).
+ *
+ * If the patch folds over itself, the part with the highest v
+ * parameter is considered above. If both have the same v, the one
+ * with the highest u parameter is above.
+ *
+ * The function guarantees that it will draw the patch with a step
+ * small enough to never have a distance above 1/sqrt(2) between two
+ * adjacent points (which guarantees that no hole can appear).
+ *
+ * This function can be used to rasterize a tile of PDF type 7
+ * shadings (see http://www.adobe.com/devnet/pdf/pdf_reference.html).
+ */
+static void
+draw_bezier_patch (unsigned char *data, int width, int height, int stride,
+ cairo_point_double_t p[4][4], double c[4][4])
+{
+ double top, bottom, left, right, steps_sq;
+ int i, j, v;
+
+ top = bottom = p[0][0].y;
+ for (i = 0; i < 4; ++i) {
+ for (j= 0; j < 4; ++j) {
+ top = MIN (top, p[i][j].y);
+ bottom = MAX (bottom, p[i][j].y);
+ }
+ }
+
+ v = intersect_interval (top, bottom, 0, height);
+ if (v == OUTSIDE)
+ return;
+
+ left = right = p[0][0].x;
+ for (i = 0; i < 4; ++i) {
+ for (j= 0; j < 4; ++j) {
+ left = MIN (left, p[i][j].x);
+ right = MAX (right, p[i][j].x);
+ }
+ }
+
+ v &= intersect_interval (left, right, 0, width);
+ if (v == OUTSIDE)
+ return;
+
+ steps_sq = 0;
+ for (i = 0; i < 4; ++i)
+ steps_sq = MAX (steps_sq, bezier_steps_sq (p[i]));
+
+ if (steps_sq >= (v == INSIDE ? STEPS_MAX_V * STEPS_MAX_V : STEPS_CLIP_V * STEPS_CLIP_V)) {
+ /* The number of steps is greater than the threshold. This
+ * means that either the error would become too big if we
+ * directly rasterized it or that we can probably save some
+ * time by splitting the curve and clipping part of it. The
+ * patch is only split in the v direction to guarantee that
+ * rasterizing each part will overwrite parts with low v with
+ * overlapping parts with higher v. */
+
+ cairo_point_double_t first[4][4], second[4][4];
+ double subc[4][4];
+
+ for (i = 0; i < 4; ++i)
+ split_bezier (p[i], first[i], second[i]);
+
+ for (i = 0; i < 4; ++i) {
+ subc[0][i] = c[0][i];
+ subc[1][i] = c[1][i];
+ subc[2][i] = 0.5 * (c[0][i] + c[2][i]);
+ subc[3][i] = 0.5 * (c[1][i] + c[3][i]);
+ }
+
+ draw_bezier_patch (data, width, height, stride, first, subc);
+
+ for (i = 0; i < 4; ++i) {
+ subc[0][i] = subc[2][i];
+ subc[1][i] = subc[3][i];
+ subc[2][i] = c[2][i];
+ subc[3][i] = c[3][i];
+ }
+ draw_bezier_patch (data, width, height, stride, second, subc);
+ } else {
+ rasterize_bezier_patch (data, width, height, stride, sqsteps2shift (steps_sq), p, c);
+ }
+}
+
+/*
+ * Draw a tensor product shading pattern.
+ *
+ * Input: mesh is the mesh pattern
+ * data is the base pointer of the image
+ * width, height are the dimensions of the image
+ * stride is the stride in bytes between adjacent rows
+ *
+ * Output: data will be changed to have the pattern drawn on it
+ *
+ * data is assumed to be clear and its content is assumed to be in
+ * CAIRO_FORMAT_ARGB32 (8 bpc, premultiplied).
+ *
+ * This function can be used to rasterize a PDF type 7 shading (see
+ * http://www.adobe.com/devnet/pdf/pdf_reference.html).
+ */
+void
+_cairo_mesh_pattern_rasterize (const cairo_mesh_pattern_t *mesh,
+ void *data,
+ int width,
+ int height,
+ int stride,
+ double x_offset,
+ double y_offset)
+{
+ cairo_point_double_t nodes[4][4];
+ double colors[4][4];
+ cairo_matrix_t p2u;
+ unsigned int i, j, k, n;
+ cairo_status_t status;
+ const cairo_mesh_patch_t *patch;
+ const cairo_color_t *c;
+
+ assert (mesh->base.status == CAIRO_STATUS_SUCCESS);
+ assert (mesh->current_patch == NULL);
+
+ p2u = mesh->base.matrix;
+ status = cairo_matrix_invert (&p2u);
+ assert (status == CAIRO_STATUS_SUCCESS);
+
+ n = _cairo_array_num_elements (&mesh->patches);
+ patch = _cairo_array_index_const (&mesh->patches, 0);
+ for (i = 0; i < n; i++) {
+ for (j = 0; j < 4; j++) {
+ for (k = 0; k < 4; k++) {
+ nodes[j][k] = patch->points[j][k];
+ cairo_matrix_transform_point (&p2u, &nodes[j][k].x, &nodes[j][k].y);
+ nodes[j][k].x += x_offset;
+ nodes[j][k].y += y_offset;
+ }
+ }
+
+ c = &patch->colors[0];
+ colors[0][0] = c->red;
+ colors[0][1] = c->green;
+ colors[0][2] = c->blue;
+ colors[0][3] = c->alpha;
+
+ c = &patch->colors[3];
+ colors[1][0] = c->red;
+ colors[1][1] = c->green;
+ colors[1][2] = c->blue;
+ colors[1][3] = c->alpha;
+
+ c = &patch->colors[1];
+ colors[2][0] = c->red;
+ colors[2][1] = c->green;
+ colors[2][2] = c->blue;
+ colors[2][3] = c->alpha;
+
+ c = &patch->colors[2];
+ colors[3][0] = c->red;
+ colors[3][1] = c->green;
+ colors[3][2] = c->blue;
+ colors[3][3] = c->alpha;
+
+ draw_bezier_patch (data, width, height, stride, nodes, colors);
+ patch++;
+ }
+}