static void
blendmask(fz_renderer *gc, fz_pixmap *src, fz_pixmap *msk, fz_pixmap *dst, int over)
{
unsigned char *sp, *dp, *mp;
fz_irect sr, dr, mr;
int x, y, w, h;
sr.x0 = src->x;
sr.y0 = src->y;
sr.x1 = src->x + src->w;
sr.y1 = src->y + src->h;
dr.x0 = dst->x;
dr.y0 = dst->y;
dr.x1 = dst->x + dst->w;
dr.y1 = dst->y + dst->h;
mr.x0 = msk->x;
mr.y0 = msk->y;
mr.x1 = msk->x + msk->w;
mr.y1 = msk->y + msk->h;
dr = fz_intersectirects(sr, dr);
dr = fz_intersectirects(dr, mr);
x = dr.x0;
y = dr.y0;
w = dr.x1 - dr.x0;
h = dr.y1 - dr.y0;
sp = src->samples + ((y - src->y) * src->w + (x - src->x)) * src->n;
mp = msk->samples + ((y - msk->y) * msk->w + (x - msk->x)) * msk->n;
dp = dst->samples + ((y - dst->y) * dst->w + (x - dst->x)) * dst->n;
if (over)
{
if (src->n == 1 && msk->n == 1 && dst->n == 1)
fz_duff_1i1o1(sp, src->w, mp, msk->w, dp, dst->w, w, h);
else if (src->n == 4 && msk->n == 1 && dst->n == 4)
fz_duff_4i1o4(sp, src->w * 4, mp, msk->w, dp, dst->w * 4, w, h);
else if (src->n == dst->n)
fz_duff_nimon(sp, src->w * src->n, src->n, mp, msk->w * msk->n, msk->n, dp, dst->w * dst->n, w, h);
else
assert(!"blendmaskover src and msk and dst mismatch");
}
else
{
if (src->n == 1 && msk->n == 1 && dst->n == 1)
fz_duff_1i1c1(sp, src->w, mp, msk->w, dp, dst->w, w, h);
else if (src->n == 4 && msk->n == 1 && dst->n == 4)
fz_duff_4i1c4(sp, src->w * 4, mp, msk->w, dp, dst->w * 4, w, h);
else if (src->n == dst->n)
fz_duff_nimcn(sp, src->w * src->n, src->n, mp, msk->w * msk->n, msk->n, dp, dst->w * dst->n, w, h);
else
assert(!"blendmask src and msk and dst mismatch");
}
}
static void
blendover(fz_renderer *gc, fz_pixmap *src, fz_pixmap *dst)
{
unsigned char *sp, *dp;
fz_irect sr, dr;
int x, y, w, h;
sr.x0 = src->x;
sr.y0 = src->y;
sr.x1 = src->x + src->w;
sr.y1 = src->y + src->h;
dr.x0 = dst->x;
dr.y0 = dst->y;
dr.x1 = dst->x + dst->w;
dr.y1 = dst->y + dst->h;
dr = fz_intersectirects(sr, dr);
x = dr.x0;
y = dr.y0;
w = dr.x1 - dr.x0;
h = dr.y1 - dr.y0;
sp = src->samples + ((y - src->y) * src->w + (x - src->x)) * src->n;
dp = dst->samples + ((y - dst->y) * dst->w + (x - dst->x)) * dst->n;
if (src->n == 1 && dst->n == 1)
fz_duff_1o1(sp, src->w, dp, dst->w, w, h);
else if (src->n == 4 && dst->n == 4)
fz_duff_4o4(sp, src->w * 4, dp, dst->w * 4, w, h);
else if (src->n == dst->n)
fz_duff_non(sp, src->w * src->n, src->n, dp, dst->w * dst->n, w, h);
else
assert(!"blendover src and dst mismatch");
}
static fz_error *
renderpath(fz_renderer *gc, fz_pathnode *path, fz_matrix ctm)
{
fz_error *error;
float flatness;
fz_irect gbox;
fz_irect clip;
flatness = 0.3 / fz_matrixexpansion(ctm);
if (flatness < 0.1)
flatness = 0.1;
fz_resetgel(gc->gel, HS, VS);
if (path->paint == FZ_STROKE)
{
if (path->dash)
error = fz_dashpath(gc->gel, path, ctm, flatness);
else
error = fz_strokepath(gc->gel, path, ctm, flatness);
}
else
error = fz_fillpath(gc->gel, path, ctm, flatness);
if (error)
return error;
fz_sortgel(gc->gel);
gbox = fz_boundgel(gc->gel);
clip = fz_intersectirects(gc->clip, gbox);
if (fz_isemptyrect(clip))
return nil;
DEBUG("path %s;\n", path->paint == FZ_STROKE ? "stroke" : "fill");
if (gc->flag & FRGB)
{
return fz_scanconvert(gc->gel, gc->ael, path->paint == FZ_EOFILL,
clip, gc->over, gc->rgb, 1);
}
else if (gc->flag & FOVER)
{
return fz_scanconvert(gc->gel, gc->ael, path->paint == FZ_EOFILL,
clip, gc->over, nil, 1);
}
else
{
error = fz_newpixmapwithrect(&gc->dest, clip, 1);
if (error)
return error;
fz_clearpixmap(gc->dest);
return fz_scanconvert(gc->gel, gc->ael, path->paint == FZ_EOFILL,
clip, gc->dest, nil, 0);
}
}
static fz_error *
rendertext(fz_renderer *gc, fz_textnode *text, fz_matrix ctm)
{
fz_error *error;
fz_irect tbox;
fz_irect clip;
fz_matrix tm, trm;
fz_glyph glyph;
int i, x, y, cid;
tbox = fz_roundrect(fz_boundnode((fz_node*)text, ctm));
clip = fz_intersectirects(gc->clip, tbox);
DEBUG("text %s n=%d [%g %g %g %g];\n",
text->font->name, text->len,
text->trm.a, text->trm.b, text->trm.c, text->trm.d);
if (fz_isemptyrect(clip))
return fz_okay;
if (!(gc->flag & FOVER))
{
error = fz_newpixmapwithrect(&gc->dest, clip, 1);
if (error)
return error;
fz_clearpixmap(gc->dest);
}
tm = text->trm;
for (i = 0; i < text->len; i++)
{
cid = text->els[i].cid;
tm.e = text->els[i].x;
tm.f = text->els[i].y;
trm = fz_concat(tm, ctm);
x = fz_floor(trm.e);
y = fz_floor(trm.f);
trm.e = QUANT(trm.e - fz_floor(trm.e), HSUBPIX);
trm.f = QUANT(trm.f - fz_floor(trm.f), VSUBPIX);
error = fz_renderglyph(gc->cache, &glyph, text->font, cid, trm);
if (error)
return error;
if (!(gc->flag & FOVER))
drawglyph(gc, gc->dest, &glyph, x, y);
else
drawglyph(gc, gc->over, &glyph, x, y);
}
return fz_okay;
}
static fz_error *
rendershade(fz_renderer *gc, fz_shadenode *node, fz_matrix ctm)
{
fz_error *error;
fz_irect bbox;
assert(!gc->maskonly);
DEBUG("shade;\n");
bbox = fz_roundrect(fz_boundnode((fz_node*)node, ctm));
bbox = fz_intersectirects(gc->clip, bbox);
error = fz_newpixmapwithrect(&gc->dest, bbox, gc->model->n + 1);
if (error)
return error;
return fz_rendershade(node->shade, ctm, gc->model, gc->dest);
}
static fz_error *
rendermask(fz_renderer *gc, fz_masknode *mask, fz_matrix ctm)
{
fz_error *error;
int oldmaskonly;
fz_pixmap *oldover;
fz_irect oldclip;
fz_irect bbox;
fz_irect clip;
fz_pixmap *shapepix = nil;
fz_pixmap *colorpix = nil;
fz_node *shape;
fz_node *color;
float rgb[3];
shape = mask->super.first;
color = shape->next;
/* special case black voodo */
if (gc->flag & FOVER)
{
if (fz_issolidnode(color))
{
fz_solidnode *solid = (fz_solidnode*)color;
fz_convertcolor(solid->cs, solid->samples, gc->model, rgb);
gc->argb[0] = solid->a * 255;
gc->argb[1] = rgb[0] * solid->a * 255;
gc->argb[2] = rgb[1] * solid->a * 255;
gc->argb[3] = rgb[2] * solid->a * 255;
gc->argb[4] = rgb[0] * 255;
gc->argb[5] = rgb[1] * 255;
gc->argb[6] = rgb[2] * 255;
gc->flag |= FRGB;
/* we know these can handle the FRGB shortcut */
if (fz_ispathnode(shape))
return renderpath(gc, (fz_pathnode*)shape, ctm);
if (fz_istextnode(shape))
return rendertext(gc, (fz_textnode*)shape, ctm);
if (fz_isimagenode(shape))
return renderimage(gc, (fz_imagenode*)shape, ctm);
}
}
oldclip = gc->clip;
oldover = gc->over;
bbox = fz_roundrect(fz_boundnode(shape, ctm));
clip = fz_intersectirects(bbox, gc->clip);
bbox = fz_roundrect(fz_boundnode(color, ctm));
clip = fz_intersectirects(bbox, clip);
if (fz_isemptyrect(clip))
return fz_okay;
DEBUG("mask [%d %d %d %d]\n{\n", clip.x0, clip.y0, clip.x1, clip.y1);
{
fz_irect sbox = fz_roundrect(fz_boundnode(shape, ctm));
fz_irect cbox = fz_roundrect(fz_boundnode(color, ctm));
if (cbox.x0 >= sbox.x0 && cbox.x1 <= sbox.x1)
if (cbox.y0 >= sbox.y0 && cbox.y1 <= sbox.y1)
DEBUG("potentially useless mask\n");
}
gc->clip = clip;
gc->over = nil;
oldmaskonly = gc->maskonly;
gc->maskonly = 1;
error = rendernode(gc, shape, ctm);
if (error)
goto cleanup;
shapepix = gc->dest;
gc->dest = nil;
gc->maskonly = oldmaskonly;
error = rendernode(gc, color, ctm);
if (error)
goto cleanup;
colorpix = gc->dest;
gc->dest = nil;
gc->clip = oldclip;
gc->over = oldover;
if (shapepix && colorpix)
{
if (gc->over)
{
blendmask(gc, colorpix, shapepix, gc->over, 1);
}
else
{
clip.x0 = MAX(colorpix->x, shapepix->x);
clip.y0 = MAX(colorpix->y, shapepix->y);
clip.x1 = MIN(colorpix->x+colorpix->w, shapepix->x+shapepix->w);
clip.y1 = MIN(colorpix->y+colorpix->h, shapepix->y+shapepix->h);
error = fz_newpixmapwithrect(&gc->dest, clip, colorpix->n);
if (error)
goto cleanup;
blendmask(gc, colorpix, shapepix, gc->dest, 0);
}
}
DEBUG("}\n");
if (shapepix) fz_droppixmap(shapepix);
if (colorpix) fz_droppixmap(colorpix);
return fz_okay;
cleanup:
if (shapepix) fz_droppixmap(shapepix);
if (colorpix) fz_droppixmap(colorpix);
return error;
}
static fz_error *
renderimage(fz_renderer *gc, fz_imagenode *node, fz_matrix ctm)
{
fz_error *error;
fz_image *image = node->image;
fz_irect bbox;
fz_irect clip;
int dx, dy;
fz_pixmap *tile;
fz_pixmap *temp;
fz_matrix imgmat;
fz_matrix invmat;
int fa, fb, fc, fd;
int u0, v0;
int x0, y0;
int w, h;
int tileheight;
DEBUG("image %dx%d %d+%d %s\n{\n", image->w, image->h, image->n, image->a, image->cs?image->cs->name:"(nil)");
bbox = fz_roundrect(fz_boundnode((fz_node*)node, ctm));
clip = fz_intersectirects(gc->clip, bbox);
if (fz_isemptyrect(clip))
return fz_okay;
if (image->w == 0 || image->h == 0)
return fz_okay;
if (image->n + image->a == 0)
return fz_okay;
calcimagescale(ctm, image->w, image->h, &dx, &dy);
/* try to fit tile into a typical L2 cachce */
tileheight = 512 * 1024 / (image->w * (image->n + image->a));
/* tileheight must be an even multiple of dy, except for last band */
tileheight = (tileheight + dy - 1) / dy * dy;
if ((dx != 1 || dy != 1) && image->h > tileheight) {
int y = 0;
DEBUG(" load image tile size = %dx%d\n", image->w, tileheight);
error = fz_newpixmap(&tile, 0, 0, image->w,
tileheight, image->n + 1);
if (error)
return error;
error = fz_newscaledpixmap(&temp, image->w, image->h, image->n + 1, dx, dy);
if (error)
goto cleanup;
do {
if (y + tileheight > image->h)
tileheight = image->h - y;
tile->y = y;
tile->h = tileheight;
DEBUG(" tile xywh=%d %d %d %d sxsy=1/%d 1/%d\n",
0, y, image->w, tileheight, dx, dy);
error = image->loadtile(image, tile);
if (error)
goto cleanup1;
error = fz_scalepixmaptile(temp, 0, y, tile, dx, dy);
if (error)
goto cleanup1;
y += tileheight;
} while (y < image->h);
fz_droppixmap(tile);
tile = temp;
}
else {
DEBUG(" load image\n");
error = fz_newpixmap(&tile, 0, 0, image->w, image->h, image->n + 1);
if (error)
return error;
error = image->loadtile(image, tile);
if (error)
goto cleanup;
if (dx != 1 || dy != 1)
{
DEBUG(" scale image 1/%d 1/%d\n", dx, dy);
error = fz_scalepixmap(&temp, tile, dx, dy);
if (error)
goto cleanup;
fz_droppixmap(tile);
tile = temp;
}
}
if (image->cs && image->cs != gc->model)
{
DEBUG(" convert from %s to %s\n", image->cs->name, gc->model->name);
error = fz_newpixmap(&temp, tile->x, tile->y, tile->w, tile->h, gc->model->n + 1);
if (error)
goto cleanup;
fz_convertpixmap(image->cs, tile, gc->model, temp);
fz_droppixmap(tile);
tile = temp;
}
imgmat.a = 1.0 / tile->w;
imgmat.b = 0.0;
imgmat.c = 0.0;
imgmat.d = -1.0 / tile->h;
imgmat.e = 0.0;
imgmat.f = 1.0;
invmat = fz_invertmatrix(fz_concat(imgmat, ctm));
w = clip.x1 - clip.x0;
h = clip.y1 - clip.y0;
x0 = clip.x0;
y0 = clip.y0;
u0 = (invmat.a * (x0+0.5) + invmat.c * (y0+0.5) + invmat.e) * 65536;
v0 = (invmat.b * (x0+0.5) + invmat.d * (y0+0.5) + invmat.f) * 65536;
fa = invmat.a * 65536;
fb = invmat.b * 65536;
fc = invmat.c * 65536;
fd = invmat.d * 65536;
#define PSRC tile->samples, tile->w, tile->h
#define PDST(p) p->samples + ((y0-p->y) * p->w + (x0-p->x)) * p->n, p->w * p->n
#define PCTM u0, v0, fa, fb, fc, fd, w, h
switch (gc->flag)
{
case FNONE:
{
DEBUG(" fnone %d x %d\n", w, h);
if (image->cs)
error = fz_newpixmapwithrect(&gc->dest, clip, gc->model->n + 1);
else
error = fz_newpixmapwithrect(&gc->dest, clip, 1);
if (error)
goto cleanup;
if (image->cs)
fz_img_4c4(PSRC, PDST(gc->dest), PCTM);
else
fz_img_1c1(PSRC, PDST(gc->dest), PCTM);
}
break;
case FOVER:
{
DEBUG(" fover %d x %d\n", w, h);
if (image->cs)
fz_img_4o4(PSRC, PDST(gc->over), PCTM);
else
fz_img_1o1(PSRC, PDST(gc->over), PCTM);
}
break;
case FOVER | FRGB:
DEBUG(" fover+rgb %d x %d\n", w, h);
fz_img_w4i1o4(gc->argb, PSRC, PDST(gc->over), PCTM);
break;
default:
assert(!"impossible flag in image span function");
}
DEBUG("}\n");
fz_droppixmap(tile);
return fz_okay;
cleanup1:
fz_droppixmap(temp);
cleanup:
fz_droppixmap(tile);
return error;
}
static fz_error *
renderpath(fz_renderer *gc, fz_pathnode *path, fz_matrix ctm)
{
fz_error *error;
float flatness;
fz_irect gbox;
fz_irect clip;
float expansion = fz_matrixexpansion(ctm);
flatness = 0.3 / expansion;
if (flatness < 0.1)
flatness = 0.1;
fz_resetgel(gc->gel, gc->clip);
if (path->paint == FZ_STROKE)
{
float lw = path->linewidth;
/* Check for hairline */
if (lw * expansion < 0.1) {
lw = 1.0f / expansion;
}
if (path->dash)
error = fz_dashpath(gc->gel, path, ctm, flatness, lw);
else
error = fz_strokepath(gc->gel, path, ctm, flatness, lw);
}
else
error = fz_fillpath(gc->gel, path, ctm, flatness);
if (error)
return error;
fz_sortgel(gc->gel);
gbox = fz_boundgel(gc->gel);
clip = fz_intersectirects(gc->clip, gbox);
if (fz_isemptyrect(clip))
return fz_okay;
DEBUG("path %s;\n", path->paint == FZ_STROKE ? "stroke" : "fill");
if (gc->flag & FRGB)
{
DEBUG(" path rgb %d %d %d %d, %d %d %d\n", gc->argb[0], gc->argb[1], gc->argb[2], gc->argb[3], gc->argb[4], gc->argb[5], gc->argb[6]);
return fz_scanconvert(gc->gel, gc->ael, path->paint == FZ_EOFILL,
clip, gc->over, gc->argb, 1);
}
else if (gc->flag & FOVER)
{
return fz_scanconvert(gc->gel, gc->ael, path->paint == FZ_EOFILL,
clip, gc->over, nil, 1);
}
else
{
error = fz_newpixmapwithrect(&gc->dest, clip, 1);
if (error)
return error;
fz_clearpixmap(gc->dest);
return fz_scanconvert(gc->gel, gc->ael, path->paint == FZ_EOFILL,
clip, gc->dest, nil, 0);
}
}
static fz_error *
renderimage(fz_renderer *gc, fz_imagenode *node, fz_matrix ctm)
{
fz_error *error;
fz_image *image = node->image;
fz_irect bbox;
fz_irect clip;
int dx, dy;
fz_pixmap *tile;
fz_pixmap *temp;
fz_matrix imgmat;
fz_matrix invmat;
int fa, fb, fc, fd;
int u0, v0;
int x0, y0;
int w, h;
DEBUG("image %dx%d %d+%d %s\n{\n", image->w, image->h, image->n, image->a, image->cs?image->cs->name:"(nil)");
bbox = fz_roundrect(fz_boundnode((fz_node*)node, ctm));
clip = fz_intersectirects(gc->clip, bbox);
if (fz_isemptyrect(clip))
return nil;
calcimagescale(ctm, image->w, image->h, &dx, &dy);
DEBUG(" load image\n");
error = fz_newpixmap(&tile, 0, 0, image->w, image->h, image->n + 1);
if (error)
return error;
error = image->loadtile(image, tile);
if (error)
goto cleanup;
if (dx != 1 || dy != 1)
{
DEBUG(" scale image 1/%d 1/%d\n", dx, dy);
error = fz_scalepixmap(&temp, tile, dx, dy);
if (error)
goto cleanup;
fz_droppixmap(tile);
tile = temp;
}
if (image->cs && image->cs != gc->model)
{
DEBUG(" convert from %s to %s\n", image->cs->name, gc->model->name);
error = fz_newpixmap(&temp, tile->x, tile->y, tile->w, tile->h, gc->model->n + 1);
if (error)
goto cleanup;
fz_convertpixmap(image->cs, tile, gc->model, temp);
fz_droppixmap(tile);
tile = temp;
}
imgmat.a = 1.0 / tile->w;
imgmat.b = 0.0;
imgmat.c = 0.0;
imgmat.d = -1.0 / tile->h;
imgmat.e = 0.0;
imgmat.f = 1.0;
invmat = fz_invertmatrix(fz_concat(imgmat, ctm));
w = clip.x1 - clip.x0;
h = clip.y1 - clip.y0;
x0 = clip.x0;
y0 = clip.y0;
u0 = (invmat.a * (x0+0.5) + invmat.c * (y0+0.5) + invmat.e) * 65536;
v0 = (invmat.b * (x0+0.5) + invmat.d * (y0+0.5) + invmat.f) * 65536;
fa = invmat.a * 65536;
fb = invmat.b * 65536;
fc = invmat.c * 65536;
fd = invmat.d * 65536;
#define PSRC tile->samples, tile->w, tile->h
#define PDST(p) p->samples + ((y0-p->y) * p->w + (x0-p->x)) * p->n, p->w * p->n
#define PCTM u0, v0, fa, fb, fc, fd, w, h
switch (gc->flag)
{
case FNONE:
{
DEBUG(" fnone %d x %d\n", w, h);
if (image->cs)
error = fz_newpixmapwithrect(&gc->dest, clip, gc->model->n + 1);
else
error = fz_newpixmapwithrect(&gc->dest, clip, 1);
if (error)
goto cleanup;
if (image->cs)
fz_img_4c4(PSRC, PDST(gc->dest), PCTM);
else
fz_img_1c1(PSRC, PDST(gc->dest), PCTM);
}
break;
case FOVER:
{
DEBUG(" fover %d x %d\n", w, h);
if (image->cs)
fz_img_4o4(PSRC, PDST(gc->over), PCTM);
else
fz_img_1o1(PSRC, PDST(gc->over), PCTM);
}
break;
case FOVER | FRGB:
DEBUG(" fover+rgb %d x %d\n", w, h);
fz_img_w3i1o4(gc->rgb, PSRC, PDST(gc->over), PCTM);
break;
default:
assert(!"impossible flag in image span function");
}
DEBUG("}\n");
fz_droppixmap(tile);
return nil;
cleanup:
fz_droppixmap(tile);
return error;
}