eBookReaderSwitch/mupdf/source/fitz/halftone.c

639 lines
17 KiB
C

#include "mupdf/fitz.h"
#include "fitz-imp.h"
#include <assert.h>
struct fz_halftone_s
{
int refs;
int n;
fz_pixmap *comp[1];
};
static fz_halftone *
fz_new_halftone(fz_context *ctx, int comps)
{
fz_halftone *ht;
int i;
ht = Memento_label(fz_malloc(ctx, sizeof(fz_halftone) + (comps-1)*sizeof(fz_pixmap *)), "fz_halftone");
ht->refs = 1;
ht->n = comps;
for (i = 0; i < comps; i++)
ht->comp[i] = NULL;
return ht;
}
fz_halftone *
fz_keep_halftone(fz_context *ctx, fz_halftone *ht)
{
return fz_keep_imp(ctx, ht, &ht->refs);
}
void
fz_drop_halftone(fz_context *ctx, fz_halftone *ht)
{
int i;
if (fz_drop_imp(ctx, ht, &ht->refs))
{
for (i = 0; i < ht->n; i++)
fz_drop_pixmap(ctx, ht->comp[i]);
fz_free(ctx, ht);
}
}
/* Default mono halftone, lifted from Ghostscript. */
/* The 0x00 entry has been changed to 0x01 to avoid problems with white
* pixels appearing in the output; as we use < 0 should not appear in the
* array. I think that gs scales this slightly and hence never actually uses
* the raw values here. */
static unsigned char mono_ht[] =
{
0x0E, 0x8E, 0x2E, 0xAE, 0x06, 0x86, 0x26, 0xA6, 0x0C, 0x8C, 0x2C, 0xAC, 0x04, 0x84, 0x24, 0xA4,
0xCE, 0x4E, 0xEE, 0x6E, 0xC6, 0x46, 0xE6, 0x66, 0xCC, 0x4C, 0xEC, 0x6C, 0xC4, 0x44, 0xE4, 0x64,
0x3E, 0xBE, 0x1E, 0x9E, 0x36, 0xB6, 0x16, 0x96, 0x3C, 0xBC, 0x1C, 0x9C, 0x34, 0xB4, 0x14, 0x94,
0xFE, 0x7E, 0xDE, 0x5E, 0xF6, 0x76, 0xD6, 0x56, 0xFC, 0x7C, 0xDC, 0x5C, 0xF4, 0x74, 0xD4, 0x54,
0x01, 0x81, 0x21, 0xA1, 0x09, 0x89, 0x29, 0xA9, 0x03, 0x83, 0x23, 0xA3, 0x0B, 0x8B, 0x2B, 0xAB,
0xC1, 0x41, 0xE1, 0x61, 0xC9, 0x49, 0xE9, 0x69, 0xC3, 0x43, 0xE3, 0x63, 0xCB, 0x4B, 0xEB, 0x6B,
0x31, 0xB1, 0x11, 0x91, 0x39, 0xB9, 0x19, 0x99, 0x33, 0xB3, 0x13, 0x93, 0x3B, 0xBB, 0x1B, 0x9B,
0xF1, 0x71, 0xD1, 0x51, 0xF9, 0x79, 0xD9, 0x59, 0xF3, 0x73, 0xD3, 0x53, 0xFB, 0x7B, 0xDB, 0x5B,
0x0D, 0x8D, 0x2D, 0xAD, 0x05, 0x85, 0x25, 0xA5, 0x0F, 0x8F, 0x2F, 0xAF, 0x07, 0x87, 0x27, 0xA7,
0xCD, 0x4D, 0xED, 0x6D, 0xC5, 0x45, 0xE5, 0x65, 0xCF, 0x4F, 0xEF, 0x6F, 0xC7, 0x47, 0xE7, 0x67,
0x3D, 0xBD, 0x1D, 0x9D, 0x35, 0xB5, 0x15, 0x95, 0x3F, 0xBF, 0x1F, 0x9F, 0x37, 0xB7, 0x17, 0x97,
0xFD, 0x7D, 0xDD, 0x5D, 0xF5, 0x75, 0xD5, 0x55, 0xFF, 0x7F, 0xDF, 0x5F, 0xF7, 0x77, 0xD7, 0x57,
0x02, 0x82, 0x22, 0xA2, 0x0A, 0x8A, 0x2A, 0xAA, 0x01 /*0x00*/, 0x80, 0x20, 0xA0, 0x08, 0x88, 0x28, 0xA8,
0xC2, 0x42, 0xE2, 0x62, 0xCA, 0x4A, 0xEA, 0x6A, 0xC0, 0x40, 0xE0, 0x60, 0xC8, 0x48, 0xE8, 0x68,
0x32, 0xB2, 0x12, 0x92, 0x3A, 0xBA, 0x1A, 0x9A, 0x30, 0xB0, 0x10, 0x90, 0x38, 0xB8, 0x18, 0x98,
0xF2, 0x72, 0xD2, 0x52, 0xFA, 0x7A, 0xDA, 0x5A, 0xF0, 0x70, 0xD0, 0x50, 0xF8, 0x78, 0xD8, 0x58
};
/*
Create a 'default' halftone structure
for the given number of components.
num_comps: The number of components to use.
Returns a simple default halftone. The default halftone uses
the same halftone tile for each plane, which may not be ideal
for all purposes.
*/
fz_halftone *fz_default_halftone(fz_context *ctx, int num_comps)
{
fz_halftone *ht = fz_new_halftone(ctx, num_comps);
fz_try(ctx)
{
int i;
for (i = 0; i < num_comps; i++)
ht->comp[i] = fz_new_pixmap_with_data(ctx, NULL, 16, 16, NULL, 1, 16, mono_ht);
}
fz_catch(ctx)
{
fz_drop_halftone(ctx, ht);
fz_rethrow(ctx);
}
return ht;
}
/* Finally, code to actually perform halftoning. */
static void make_ht_line(unsigned char *buf, fz_halftone *ht, int x, int y, int w)
{
int k, n;
n = ht->n;
for (k = 0; k < n; k++)
{
fz_pixmap *tile = ht->comp[k];
unsigned char *b = buf++;
unsigned char *t;
unsigned char *tbase;
int px = x + tile->x;
int py = y + tile->y;
int tw = tile->w;
int th = tile->h;
int w2 = w;
int len;
px = px % tw;
if (px < 0)
px += tw;
py = py % th;
if (py < 0)
py += th;
assert(tile->n == 1);
/* Left hand section; from x to tile width */
tbase = tile->samples + (unsigned int)(py * tw);
t = tbase + px;
len = tw - px;
if (len > w2)
len = w2;
w2 -= len;
while (len--)
{
*b = *t++;
b += n;
}
/* Centre section - complete copies */
w2 -= tw;
while (w2 >= 0)
{
len = tw;
t = tbase;
while (len--)
{
*b = *t++;
b += n;
}
w2 -= tw;
}
w2 += tw;
/* Right hand section - stragglers */
t = tbase;
while (w2--)
{
*b = *t++;
b += n;
}
}
}
/* Inner mono thresholding code */
typedef void (threshold_fn)(const unsigned char *ht_line, const unsigned char *pixmap, unsigned char *out, int w, int ht_len);
#ifdef ARCH_ARM
static void
do_threshold_1(const unsigned char * FZ_RESTRICT ht_line, const unsigned char * FZ_RESTRICT pixmap, unsigned char * FZ_RESTRICT out, int w, int ht_len)
__attribute__((naked));
static void
do_threshold_1(const unsigned char * FZ_RESTRICT ht_line, const unsigned char * FZ_RESTRICT pixmap, unsigned char * FZ_RESTRICT out, int w, int ht_len)
{
asm volatile(
ENTER_ARM
// Store one more reg that required to keep double stack alignment
".syntax unified\n"
"stmfd r13!,{r4-r7,r9,r14} \n"
"@ r0 = ht_line \n"
"@ r1 = pixmap \n"
"@ r2 = out \n"
"@ r3 = w \n"
"@ <> = ht_len \n"
"ldr r9, [r13,#6*4] @ r9 = ht_len \n"
"subs r3, r3, #7 @ r3 = w -= 7 \n"
"ble 2f @ while (w > 0) { \n"
"mov r12,r9 @ r12= l = ht_len \n"
"b 1f \n"
"9: \n"
"strb r14,[r2], #1 @ *out++ = 0 \n"
"subs r12,r12,#8 @ r12 = l -= 8 \n"
"moveq r12,r9 @ if(l==0) l = ht_len \n"
"subeq r0, r0, r9 @ ht_line -= l \n"
"subs r3, r3, #8 @ w -= 8 \n"
"ble 2f @ } \n"
"1: \n"
"ldr r14,[r1], #4 @ r14= pixmap[0..3] \n"
"ldr r5, [r1], #4 @ r5 = pixmap[4..7] \n"
"ldrb r4, [r0], #8 @ r0 = ht_line += 8 \n"
"adds r14,r14,#1 @ set eq iff r14=-1 \n"
"addseq r5, r5, #1 @ set eq iff r14=r5=-1 \n"
"beq 9b @ white \n"
"ldrb r5, [r1, #-8] @ r5 = pixmap[0] \n"
"ldrb r6, [r0, #-7] @ r6 = ht_line[1] \n"
"ldrb r7, [r1, #-7] @ r7 = pixmap[1] \n"
"mov r14,#0 @ r14= h = 0 \n"
"cmp r5, r4 @ if (r5 < r4) \n"
"orrlt r14,r14,#0x80 @ h |= 0x80 \n"
"ldrb r4, [r0, #-6] @ r4 = ht_line[2] \n"
"ldrb r5, [r1, #-6] @ r5 = pixmap[2] \n"
"cmp r7, r6 @ if (r7 < r6) \n"
"orrlt r14,r14,#0x40 @ h |= 0x40 \n"
"ldrb r6, [r0, #-5] @ r6 = ht_line[3] \n"
"ldrb r7, [r1, #-5] @ r7 = pixmap[3] \n"
"cmp r5, r4 @ if (r5 < r4) \n"
"orrlt r14,r14,#0x20 @ h |= 0x20 \n"
"ldrb r4, [r0, #-4] @ r4 = ht_line[4] \n"
"ldrb r5, [r1, #-4] @ r5 = pixmap[4] \n"
"cmp r7, r6 @ if (r7 < r6) \n"
"orrlt r14,r14,#0x10 @ h |= 0x10 \n"
"ldrb r6, [r0, #-3] @ r6 = ht_line[5] \n"
"ldrb r7, [r1, #-3] @ r7 = pixmap[5] \n"
"cmp r5, r4 @ if (r5 < r4) \n"
"orrlt r14,r14,#0x08 @ h |= 0x08 \n"
"ldrb r4, [r0, #-2] @ r4 = ht_line[6] \n"
"ldrb r5, [r1, #-2] @ r5 = pixmap[6] \n"
"cmp r7, r6 @ if (r7 < r6) \n"
"orrlt r14,r14,#0x04 @ h |= 0x04 \n"
"ldrb r6, [r0, #-1] @ r6 = ht_line[7] \n"
"ldrb r7, [r1, #-1] @ r7 = pixmap[7] \n"
"cmp r5, r4 @ if (r5 < r4) \n"
"orrlt r14,r14,#0x02 @ h |= 0x02 \n"
"cmp r7, r6 @ if (r7 < r6) \n"
"orrlt r14,r14,#0x01 @ h |= 0x01 \n"
"subs r12,r12,#8 @ r12 = l -= 8 \n"
"strb r14,[r2], #1 @ *out++ = h \n"
"moveq r12,r9 @ if(l==0) l = ht_len \n"
"subeq r0, r0, r9 @ ht_line -= l \n"
"subs r3, r3, #8 @ w -= 8 \n"
"bgt 1b @ } \n"
"2: \n"
"adds r3, r3, #7 @ w += 7 \n"
"ble 4f @ if (w >= 0) { \n"
"ldrb r4, [r0], #1 @ r4 = ht_line[0] \n"
"ldrb r5, [r1], #1 @ r5 = pixmap[0] \n"
"mov r14, #0 @ r14= h = 0 \n"
"cmp r5, r4 @ if (r5 < r4) \n"
"orrlt r14,r14,#0x80 @ h |= 0x80 \n"
"cmp r3, #1 @ \n"
"ldrbgt r4, [r0], #1 @ r6 = ht_line[1] \n"
"ldrbgt r5, [r1], #1 @ r7 = pixmap[1] \n"
"ble 3f @ \n"
"cmp r5, r4 @ if (r5 < r4) \n"
"orrlt r14,r14,#0x40 @ h |= 0x40 \n"
"cmp r3, #2 @ \n"
"ldrbgt r4, [r0], #1 @ r6 = ht_line[2] \n"
"ldrbgt r5, [r1], #1 @ r7 = pixmap[2] \n"
"ble 3f @ \n"
"cmp r5, r4 @ if (r5 < r4) \n"
"orrlt r14,r14,#0x20 @ h |= 0x20 \n"
"cmp r3, #3 @ \n"
"ldrbgt r4, [r0], #1 @ r6 = ht_line[3] \n"
"ldrbgt r5, [r1], #1 @ r7 = pixmap[3] \n"
"ble 3f @ \n"
"cmp r5, r4 @ if (r5 < r4) \n"
"orrlt r14,r14,#0x10 @ h |= 0x10 \n"
"cmp r3, #4 @ \n"
"ldrbgt r4, [r0], #1 @ r6 = ht_line[4] \n"
"ldrbgt r5, [r1], #1 @ r7 = pixmap[4] \n"
"ble 3f @ \n"
"cmp r5, r4 @ if (r5 < r4) \n"
"orrlt r14,r14,#0x08 @ h |= 0x08 \n"
"cmp r3, #5 @ \n"
"ldrbgt r4, [r0], #1 @ r6 = ht_line[5] \n"
"ldrbgt r5, [r1], #1 @ r7 = pixmap[5] \n"
"ble 3f @ \n"
"cmp r5, r4 @ if (r5 < r4) \n"
"orrlt r14,r14,#0x04 @ h |= 0x04 \n"
"cmp r3, #6 @ \n"
"ldrbgt r4, [r0], #1 @ r6 = ht_line[6] \n"
"ldrbgt r5, [r1], #1 @ r7 = pixmap[6] \n"
"ble 3f @ \n"
"cmp r5, r4 @ if (r5 < r4) \n"
"orrlt r14,r14,#0x02 @ h |= 0x02 \n"
"3: \n"
"strb r14,[r2] @ *out = h \n"
"4: \n"
"ldmfd r13!,{r4-r7,r9,PC} @ pop, return to thumb \n"
ENTER_THUMB
);
}
#else
static void do_threshold_1(const unsigned char * FZ_RESTRICT ht_line, const unsigned char * FZ_RESTRICT pixmap, unsigned char * FZ_RESTRICT out, int w, int ht_len)
{
int h;
int l = ht_len;
w -= 7;
while (w > 0)
{
h = 0;
if (pixmap[0] < ht_line[0])
h |= 0x80;
if (pixmap[1] < ht_line[1])
h |= 0x40;
if (pixmap[2] < ht_line[2])
h |= 0x20;
if (pixmap[3] < ht_line[3])
h |= 0x10;
if (pixmap[4] < ht_line[4])
h |= 0x08;
if (pixmap[5] < ht_line[5])
h |= 0x04;
if (pixmap[6] < ht_line[6])
h |= 0x02;
if (pixmap[7] < ht_line[7])
h |= 0x01;
pixmap += 8;
ht_line += 8;
l -= 8;
if (l == 0)
{
l = ht_len;
ht_line -= ht_len;
}
*out++ = h;
w -= 8;
}
if (w > -7)
{
h = 0;
if (pixmap[0] < ht_line[0])
h |= 0x80;
if (w > -6 && pixmap[1] < ht_line[1])
h |= 0x40;
if (w > -5 && pixmap[2] < ht_line[2])
h |= 0x20;
if (w > -4 && pixmap[3] < ht_line[3])
h |= 0x10;
if (w > -3 && pixmap[4] < ht_line[4])
h |= 0x08;
if (w > -2 && pixmap[5] < ht_line[5])
h |= 0x04;
if (w > -1 && pixmap[6] < ht_line[6])
h |= 0x02;
*out++ = h;
}
}
#endif
/*
Note that the tests in do_threshold_4 are inverted compared to those
in do_threshold_1. This is to allow for the fact that the CMYK
contone renderings have white = 0, whereas rgb, and greyscale have
white = 0xFF. Reversing these tests enables us to maintain that
BlackIs1 in bitmaps.
*/
#ifdef ARCH_ARM
static void
do_threshold_4(const unsigned char * FZ_RESTRICT ht_line, const unsigned char * FZ_RESTRICT pixmap, unsigned char * FZ_RESTRICT out, int w, int ht_len)
__attribute__((naked));
static void
do_threshold_4(const unsigned char * FZ_RESTRICT ht_line, const unsigned char * FZ_RESTRICT pixmap, unsigned char * FZ_RESTRICT out, int w, int ht_len)
{
asm volatile(
ENTER_ARM
// Store one more reg that required to keep double stack alignment
"stmfd r13!,{r4-r7,r9,r14} \n"
"@ r0 = ht_line \n"
"@ r1 = pixmap \n"
"@ r2 = out \n"
"@ r3 = w \n"
"@ <> = ht_len \n"
"ldr r9, [r13,#6*4] @ r9 = ht_len \n"
"subs r3, r3, #1 @ r3 = w -= 1 \n"
"ble 2f @ while (w > 0) { \n"
"mov r12,r9 @ r12= l = ht_len \n"
"b 1f @ \n"
"9: @ \n"
"strb r14,[r2], #1 @ *out++ = h \n"
"subs r12,r12,#2 @ r12 = l -= 2 \n"
"moveq r12,r9 @ if(l==0) l = ht_len \n"
"subeq r0, r0, r9, LSL #2 @ ht_line -= l \n"
"subs r3, r3, #2 @ w -= 2 \n"
"beq 2f @ } \n"
"blt 3f @ \n"
"1: \n"
"ldr r5, [r1], #4 @ r5 = pixmap[0..3] \n"
"ldr r7, [r1], #4 @ r7 = pixmap[4..7] \n"
"add r0, r0, #8 @ r0 = ht_line += 8 \n"
"mov r14,#0 @ r14= h = 0 \n"
"orrs r5, r5, r7 @ if (r5 | r7 == 0) \n"
"beq 9b @ white \n"
"ldrb r4, [r0, #-8] @ r4 = ht_line[0] \n"
"ldrb r5, [r1, #-8] @ r5 = pixmap[0] \n"
"ldrb r6, [r0, #-7] @ r6 = ht_line[1] \n"
"ldrb r7, [r1, #-7] @ r7 = pixmap[1] \n"
"cmp r4, r5 @ if (r4 < r5) \n"
"orrle r14,r14,#0x80 @ h |= 0x80 \n"
"ldrb r4, [r0, #-6] @ r4 = ht_line[2] \n"
"ldrb r5, [r1, #-6] @ r5 = pixmap[2] \n"
"cmp r6, r7 @ if (r6 < r7) \n"
"orrle r14,r14,#0x40 @ h |= 0x40 \n"
"ldrb r6, [r0, #-5] @ r6 = ht_line[3] \n"
"ldrb r7, [r1, #-5] @ r7 = pixmap[3] \n"
"cmp r4, r5 @ if (r4 < r5) \n"
"orrle r14,r14,#0x20 @ h |= 0x20 \n"
"ldrb r4, [r0, #-4] @ r4 = ht_line[4] \n"
"ldrb r5, [r1, #-4] @ r5 = pixmap[4] \n"
"cmp r6, r7 @ if (r6 < r7) \n"
"orrle r14,r14,#0x10 @ h |= 0x10 \n"
"ldrb r6, [r0, #-3] @ r6 = ht_line[5] \n"
"ldrb r7, [r1, #-3] @ r7 = pixmap[5] \n"
"cmp r4, r5 @ if (r4 < r5) \n"
"orrle r14,r14,#0x08 @ h |= 0x08 \n"
"ldrb r4, [r0, #-2] @ r4 = ht_line[6] \n"
"ldrb r5, [r1, #-2] @ r5 = pixmap[6] \n"
"cmp r6, r7 @ if (r6 < r7) \n"
"orrle r14,r14,#0x04 @ h |= 0x04 \n"
"ldrb r6, [r0, #-1] @ r6 = ht_line[7] \n"
"ldrb r7, [r1, #-1] @ r7 = pixmap[7] \n"
"cmp r4, r5 @ if (r4 < r5) \n"
"orrle r14,r14,#0x02 @ h |= 0x02 \n"
"cmp r6, r7 @ if (r7 < r6) \n"
"orrle r14,r14,#0x01 @ h |= 0x01 \n"
"subs r12,r12,#2 @ r12 = l -= 2 \n"
"strb r14,[r2], #1 @ *out++ = h \n"
"moveq r12,r9 @ if(l==0) l = ht_len \n"
"subeq r0, r0, r9, LSL #2 @ ht_line -= l \n"
"subs r3, r3, #2 @ w -= 2 \n"
"bgt 1b @ } \n"
"blt 3f @ \n"
"2: \n"
"ldrb r4, [r0], #1 @ r4 = ht_line[0] \n"
"ldrb r5, [r1], #1 @ r5 = pixmap[0] \n"
"mov r14, #0 @ r14= h = 0 \n"
"ldrb r6, [r0], #1 @ r6 = ht_line[1] \n"
"ldrb r7, [r1], #1 @ r7 = pixmap[1] \n"
"cmp r4, r5 @ if (r4 < r5) \n"
"orrle r14,r14,#0x80 @ h |= 0x80 \n"
"ldrb r4, [r0], #1 @ r6 = ht_line[2] \n"
"ldrb r5, [r1], #1 @ r7 = pixmap[2] \n"
"cmp r6, r7 @ if (r6 < r7) \n"
"orrle r14,r14,#0x40 @ h |= 0x40 \n"
"ldrb r6, [r0], #1 @ r6 = ht_line[1] \n"
"ldrb r7, [r1], #1 @ r7 = pixmap[3] \n"
"cmp r4, r5 @ if (r4 < r5) \n"
"orrle r14,r14,#0x20 @ h |= 0x20 \n"
"cmp r6, r7 @ if (r6 < r7) \n"
"orrle r14,r14,#0x10 @ h |= 0x10 \n"
"strb r14,[r2] @ *out = h \n"
"3: \n"
"ldmfd r13!,{r4-r7,r9,PC} @ pop, return to thumb \n"
ENTER_THUMB
);
}
#else
static void do_threshold_4(const unsigned char * FZ_RESTRICT ht_line, const unsigned char * FZ_RESTRICT pixmap, unsigned char * FZ_RESTRICT out, int w, int ht_len)
{
int l = ht_len;
w--;
while (w > 0)
{
int h = 0;
if (pixmap[0] >= ht_line[0])
h |= 0x80;
if (pixmap[1] >= ht_line[1])
h |= 0x40;
if (pixmap[2] >= ht_line[2])
h |= 0x20;
if (pixmap[3] >= ht_line[3])
h |= 0x10;
if (pixmap[4] >= ht_line[4])
h |= 0x08;
if (pixmap[5] >= ht_line[5])
h |= 0x04;
if (pixmap[6] >= ht_line[6])
h |= 0x02;
if (pixmap[7] >= ht_line[7])
h |= 0x01;
*out++ = h;
l -= 2;
if (l == 0)
{
l = ht_len;
ht_line -= ht_len<<2;
}
pixmap += 8;
ht_line += 8;
w -= 2;
}
if (w == 0)
{
int h = 0;
if (pixmap[0] >= ht_line[0])
h |= 0x80;
if (pixmap[1] >= ht_line[1])
h |= 0x40;
if (pixmap[2] >= ht_line[2])
h |= 0x20;
if (pixmap[3] >= ht_line[3])
h |= 0x10;
*out = h;
}
}
#endif
/*
Make a bitmap from a pixmap and a halftone.
pix: The pixmap to generate from. Currently must be a single color
component with no alpha.
ht: The halftone to use. NULL implies the default halftone.
Returns the resultant bitmap. Throws exceptions in the case of
failure to allocate.
*/
fz_bitmap *fz_new_bitmap_from_pixmap(fz_context *ctx, fz_pixmap *pix, fz_halftone *ht)
{
return fz_new_bitmap_from_pixmap_band(ctx, pix, ht, 0);
}
/* TAOCP, vol 2, p337 */
static int gcd(int u, int v)
{
int r;
do
{
if (v == 0)
return u;
r = u % v;
u = v;
v = r;
}
while (1);
}
/*
Make a bitmap from a pixmap and a
halftone, allowing for the position of the pixmap within an
overall banded rendering.
pix: The pixmap to generate from. Currently must be a single color
component with no alpha.
ht: The halftone to use. NULL implies the default halftone.
band_start: Vertical offset within the overall banded rendering
(in pixels)
Returns the resultant bitmap. Throws exceptions in the case of
failure to allocate.
*/
fz_bitmap *fz_new_bitmap_from_pixmap_band(fz_context *ctx, fz_pixmap *pix, fz_halftone *ht, int band_start)
{
fz_bitmap *out = NULL;
unsigned char *ht_line = NULL;
unsigned char *o, *p;
int w, h, x, y, n, pstride, ostride, lcm, i;
fz_halftone *ht_ = NULL;
threshold_fn *thresh;
fz_var(ht_line);
if (!pix)
return NULL;
if (pix->alpha != 0)
fz_throw(ctx, FZ_ERROR_GENERIC, "pixmap may not have alpha channel to convert to bitmap");
n = pix->n;
switch(n)
{
case 1:
thresh = do_threshold_1;
break;
case 4:
thresh = do_threshold_4;
break;
default:
fz_throw(ctx, FZ_ERROR_GENERIC, "pixmap must be grayscale or CMYK to convert to bitmap");
return NULL;
}
if (ht == NULL)
ht_ = ht = fz_default_halftone(ctx, n);
/* Find the minimum length for the halftone line. This
* is the LCM of the halftone lengths and 8. (We need a
* multiple of 8 for the unrolled threshold routines - if
* we ever use SSE, we may need longer.) We use the fact
* that LCM(a,b) = a * b / GCD(a,b) and use euclids
* algorithm.
*/
lcm = 8;
for (i = 0; i < ht->n; i++)
{
w = ht->comp[i]->w;
lcm = lcm / gcd(lcm, w) * w;
}
fz_try(ctx)
{
ht_line = fz_malloc(ctx, lcm * n);
out = fz_new_bitmap(ctx, pix->w, pix->h, n, pix->xres, pix->yres);
o = out->samples;
p = pix->samples;
h = pix->h;
x = pix->x;
y = pix->y + band_start;
w = pix->w;
ostride = out->stride;
pstride = pix->stride;
while (h--)
{
make_ht_line(ht_line, ht, x, y++, lcm);
thresh(ht_line, p, o, w, lcm);
o += ostride;
p += pstride;
}
}
fz_always(ctx)
{
fz_drop_halftone(ctx, ht_);
fz_free(ctx, ht_line);
}
fz_catch(ctx)
fz_rethrow(ctx);
return out;
}