#include "avcodec.h"
#include "bytestream.h"
#include "internal.h"
+#include "scpr.h"
+#include "scpr3.h"
#define TOP 0x01000000
#define BOT 0x010000
-typedef struct RangeCoder {
- unsigned code;
- unsigned range;
- unsigned code1;
-} RangeCoder;
-
-typedef struct PixelModel {
- unsigned freq[256];
- unsigned lookup[16];
- unsigned total_freq;
-} PixelModel;
-
-typedef struct SCPRContext {
- AVFrame *last_frame;
- AVFrame *current_frame;
- GetByteContext gb;
- RangeCoder rc;
- PixelModel pixel_model[3][4096];
- unsigned op_model[6][7];
- unsigned run_model[6][257];
- unsigned range_model[257];
- unsigned count_model[257];
- unsigned fill_model[6];
- unsigned sxy_model[4][17];
- unsigned mv_model[2][513];
- unsigned nbx, nby;
- unsigned nbcount;
- unsigned *blocks;
- unsigned cbits;
- int cxshift;
-
- int (*get_freq)(RangeCoder *rc, unsigned total_freq, unsigned *freq);
- int (*decode)(GetByteContext *gb, RangeCoder *rc, unsigned cumFreq, unsigned freq, unsigned total_freq);
-} SCPRContext;
+#include "scpr3.c"
static void init_rangecoder(RangeCoder *rc, GetByteContext *gb)
{
}
for (j = 0; j < 6; j++) {
- unsigned *p = s->run_model[j];
+ uint32_t *p = s->run_model[j];
for (i = 0; i < 256; i++)
p[i] = 1;
p[256] = 256;
}
for (j = 0; j < 6; j++) {
- unsigned *op = s->op_model[j];
+ uint32_t *op = s->op_model[j];
for (i = 0; i < 6; i++)
op[i] = 1;
op[6] = 6;
s->mv_model[1][512] = 512;
}
-static int decode(GetByteContext *gb, RangeCoder *rc, unsigned cumFreq, unsigned freq, unsigned total_freq)
+static int decode(GetByteContext *gb, RangeCoder *rc, uint32_t cumFreq, uint32_t freq, uint32_t total_freq)
{
rc->code -= cumFreq * rc->range;
rc->range *= freq;
while (rc->range < TOP && bytestream2_get_bytes_left(gb) > 0) {
- unsigned byte = bytestream2_get_byte(gb);
+ uint32_t byte = bytestream2_get_byteu(gb);
rc->code = (rc->code << 8) | byte;
rc->range <<= 8;
}
return 0;
}
-static int get_freq(RangeCoder *rc, unsigned total_freq, unsigned *freq)
+static int get_freq(RangeCoder *rc, uint32_t total_freq, uint32_t *freq)
{
if (total_freq == 0)
return AVERROR_INVALIDDATA;
return 0;
}
-static int decode0(GetByteContext *gb, RangeCoder *rc, unsigned cumFreq, unsigned freq, unsigned total_freq)
+static int decode0(GetByteContext *gb, RangeCoder *rc, uint32_t cumFreq, uint32_t freq, uint32_t total_freq)
{
- unsigned t;
+ uint32_t t;
if (total_freq == 0)
return AVERROR_INVALIDDATA;
rc->range = rc->range * (uint64_t)(freq + cumFreq) / total_freq - (t + 1);
while (rc->range < TOP && bytestream2_get_bytes_left(gb) > 0) {
- unsigned byte = bytestream2_get_byte(gb);
+ uint32_t byte = bytestream2_get_byteu(gb);
rc->code = (rc->code << 8) | byte;
rc->code1 <<= 8;
rc->range <<= 8;
return 0;
}
-static int get_freq0(RangeCoder *rc, unsigned total_freq, unsigned *freq)
+static int get_freq0(RangeCoder *rc, uint32_t total_freq, uint32_t *freq)
{
if (rc->range == 0)
return AVERROR_INVALIDDATA;
return 0;
}
-static int decode_value(SCPRContext *s, unsigned *cnt, unsigned maxc, unsigned step, unsigned *rval)
+static int decode_value(SCPRContext *s, uint32_t *cnt, uint32_t maxc, uint32_t step, uint32_t *rval)
{
GetByteContext *gb = &s->gb;
RangeCoder *rc = &s->rc;
- unsigned totfr = cnt[maxc];
- unsigned value;
- unsigned c = 0, cumfr = 0, cnt_c = 0;
+ uint32_t totfr = cnt[maxc];
+ uint32_t value;
+ uint32_t c = 0, cumfr = 0, cnt_c = 0;
int i, ret;
if ((ret = s->get_freq(rc, totfr, &value)) < 0)
if (totfr > BOT) {
totfr = 0;
for (i = 0; i < maxc; i++) {
- unsigned nc = (cnt[i] >> 1) + 1;
+ uint32_t nc = (cnt[i] >> 1) + 1;
cnt[i] = nc;
totfr += nc;
}
return 0;
}
-static int decode_unit(SCPRContext *s, PixelModel *pixel, unsigned step, unsigned *rval)
+static int decode_unit(SCPRContext *s, PixelModel *pixel, uint32_t step, uint32_t *rval)
{
GetByteContext *gb = &s->gb;
RangeCoder *rc = &s->rc;
- unsigned totfr = pixel->total_freq;
- unsigned value, x = 0, cumfr = 0, cnt_x = 0;
+ uint32_t totfr = pixel->total_freq;
+ uint32_t value, x = 0, cumfr = 0, cnt_x = 0;
int i, j, ret, c, cnt_c;
if ((ret = s->get_freq(rc, totfr, &value)) < 0)
if (totfr > BOT) {
totfr = 0;
for (i = 0; i < 256; i++) {
- unsigned nc = (pixel->freq[i] >> 1) + 1;
+ uint32_t nc = (pixel->freq[i] >> 1) + 1;
pixel->freq[i] = nc;
totfr += nc;
}
for (i = 0; i < 16; i++) {
- unsigned sum = 0;
- unsigned i16_17 = i << 4;
+ uint32_t sum = 0;
+ uint32_t i16_17 = i << 4;
for (j = 0; j < 16; j++)
sum += pixel->freq[i16_17 + j];
pixel->lookup[i] = sum;
return 0;
}
-static int decode_units(SCPRContext *s, unsigned *r, unsigned *g, unsigned *b,
+static int decode_units(SCPRContext *s, uint32_t *r, uint32_t *g, uint32_t *b,
int *cx, int *cx1)
{
const int cxshift = s->cxshift;
{
SCPRContext *s = avctx->priv_data;
GetByteContext *gb = &s->gb;
- int cx = 0, cx1 = 0, k = 0, clr = 0;
- int run, off, y = 0, x = 0, z, ret;
- unsigned r, g, b, backstep = linesize - avctx->width;
- unsigned lx, ly, ptype;
+ int cx = 0, cx1 = 0, k = 0;
+ int run, off, y = 0, x = 0, ret;
+ uint32_t clr = 0, r, g, b, backstep = linesize - avctx->width;
+ uint32_t lx, ly, ptype;
reinit_tables(s);
bytestream2_skip(gb, 2);
if (run <= 0)
return AVERROR_INVALIDDATA;
- switch (ptype) {
- case 0:
- while (run-- > 0) {
- if (y >= avctx->height)
- return AVERROR_INVALIDDATA;
-
- dst[y * linesize + x] = clr;
- lx = x;
- ly = y;
- x++;
- if (x >= avctx->width) {
- x = 0;
- y++;
- }
- }
- break;
- case 1:
- while (run-- > 0) {
- if (y >= avctx->height)
- return AVERROR_INVALIDDATA;
-
- dst[y * linesize + x] = dst[ly * linesize + lx];
- lx = x;
- ly = y;
- x++;
- if (x >= avctx->width) {
- x = 0;
- y++;
- }
- }
- clr = dst[ly * linesize + lx];
- break;
- case 2:
- while (run-- > 0) {
- if (y < 1 || y >= avctx->height)
- return AVERROR_INVALIDDATA;
-
- clr = dst[y * linesize + x + off + 1];
- dst[y * linesize + x] = clr;
- lx = x;
- ly = y;
- x++;
- if (x >= avctx->width) {
- x = 0;
- y++;
- }
- }
- break;
- case 4:
- while (run-- > 0) {
- uint8_t *odst = (uint8_t *)dst;
-
- if (y < 1 || y >= avctx->height ||
- (y == 1 && x == 0))
- return AVERROR_INVALIDDATA;
-
- if (x == 0) {
- z = backstep;
- } else {
- z = 0;
- }
-
- r = odst[(ly * linesize + lx) * 4] +
- odst[((y * linesize + x) + off) * 4 + 4] -
- odst[((y * linesize + x) + off - z) * 4];
- g = odst[(ly * linesize + lx) * 4 + 1] +
- odst[((y * linesize + x) + off) * 4 + 5] -
- odst[((y * linesize + x) + off - z) * 4 + 1];
- b = odst[(ly * linesize + lx) * 4 + 2] +
- odst[((y * linesize + x) + off) * 4 + 6] -
- odst[((y * linesize + x) + off - z) * 4 + 2];
- clr = ((b & 0xFF) << 16) + ((g & 0xFF) << 8) + (r & 0xFF);
- dst[y * linesize + x] = clr;
- lx = x;
- ly = y;
- x++;
- if (x >= avctx->width) {
- x = 0;
- y++;
- }
- }
- break;
- case 5:
- while (run-- > 0) {
- if (y < 1 || y >= avctx->height ||
- (y == 1 && x == 0))
- return AVERROR_INVALIDDATA;
-
- if (x == 0) {
- z = backstep;
- } else {
- z = 0;
- }
-
- clr = dst[y * linesize + x + off - z];
- dst[y * linesize + x] = clr;
- lx = x;
- ly = y;
- x++;
- if (x >= avctx->width) {
- x = 0;
- y++;
- }
- }
- break;
- }
-
- if (avctx->bits_per_coded_sample == 16) {
- cx1 = (clr & 0x3F00) >> 2;
- cx = (clr & 0x3FFFFF) >> 16;
- } else {
- cx1 = (clr & 0xFC00) >> 4;
- cx = (clr & 0xFFFFFF) >> 18;
- }
+ ret = decode_run_i(avctx, ptype, run, &x, &y, clr,
+ dst, linesize, &lx, &ly,
+ backstep, off, &cx, &cx1);
+ if (ret < 0)
+ return ret;
}
return 0;
{
SCPRContext *s = avctx->priv_data;
GetByteContext *gb = &s->gb;
- int ret, temp, min, max, x, y, cx = 0, cx1 = 0;
+ int ret, temp = 0, min, max, x, y, cx = 0, cx1 = 0;
int backstep = linesize - avctx->width;
if (bytestream2_get_byte(gb) == 0)
- return 0;
+ return 1;
bytestream2_skip(gb, 1);
init_rangecoder(&s->rc, gb);
ret = decode_value(s, s->range_model, 256, 1, &min);
ret |= decode_value(s, s->range_model, 256, 1, &temp);
+ if (ret < 0)
+ return ret;
+
min += temp << 8;
- ret |= decode_value(s, s->range_model, 256, 1, &max);
+ ret = decode_value(s, s->range_model, 256, 1, &max);
ret |= decode_value(s, s->range_model, 256, 1, &temp);
if (ret < 0)
return ret;
max += temp << 8;
- if (min > max)
+ if (min > max || min >= s->nbcount)
return AVERROR_INVALIDDATA;
memset(s->blocks, 0, sizeof(*s->blocks) * s->nbcount);
ret |= decode_value(s, s->count_model, 256, 20, &count);
if (ret < 0)
return ret;
+ if (count <= 0)
+ return AVERROR_INVALIDDATA;
while (min < s->nbcount && count-- > 0) {
s->blocks[min++] = fill;
}
}
+ ret = av_frame_copy(s->current_frame, s->last_frame);
+ if (ret < 0)
+ return ret;
+
for (y = 0; y < s->nby; y++) {
for (x = 0; x < s->nbx; x++) {
int sy1 = 0, sy2 = 16, sx1 = 0, sx2 = 16;
}
}
} else {
- int run, z, bx = x * 16 + sx1, by = y * 16 + sy1;
- unsigned r, g, b, clr, ptype = 0;
+ int run, bx = x * 16 + sx1, by = y * 16 + sy1;
+ uint32_t r, g, b, clr, ptype = 0;
for (; by < y * 16 + sy2 && by < avctx->height;) {
ret = decode_value(s, s->op_model[ptype], 6, 1000, &ptype);
if (run <= 0)
return AVERROR_INVALIDDATA;
- switch (ptype) {
- case 0:
- while (run-- > 0) {
- if (by >= avctx->height)
- return AVERROR_INVALIDDATA;
-
- dst[by * linesize + bx] = clr;
- bx++;
- if (bx >= x * 16 + sx2 || bx >= avctx->width) {
- bx = x * 16 + sx1;
- by++;
- }
- }
- break;
- case 1:
- while (run-- > 0) {
- if (bx == 0) {
- if (by < 1)
- return AVERROR_INVALIDDATA;
- z = backstep;
- } else {
- z = 0;
- }
-
- if (by >= avctx->height)
- return AVERROR_INVALIDDATA;
-
- clr = dst[by * linesize + bx - 1 - z];
- dst[by * linesize + bx] = clr;
- bx++;
- if (bx >= x * 16 + sx2 || bx >= avctx->width) {
- bx = x * 16 + sx1;
- by++;
- }
- }
- break;
- case 2:
- while (run-- > 0) {
- if (by < 1 || by >= avctx->height)
- return AVERROR_INVALIDDATA;
-
- clr = dst[(by - 1) * linesize + bx];
- dst[by * linesize + bx] = clr;
- bx++;
- if (bx >= x * 16 + sx2 || bx >= avctx->width) {
- bx = x * 16 + sx1;
- by++;
- }
- }
- break;
- case 3:
- while (run-- > 0) {
- if (by >= avctx->height)
- return AVERROR_INVALIDDATA;
-
- clr = prev[by * plinesize + bx];
- dst[by * linesize + bx] = clr;
- bx++;
- if (bx >= x * 16 + sx2 || bx >= avctx->width) {
- bx = x * 16 + sx1;
- by++;
- }
- }
- break;
- case 4:
- while (run-- > 0) {
- uint8_t *odst = (uint8_t *)dst;
-
- if (by < 1 || by >= avctx->height)
- return AVERROR_INVALIDDATA;
-
- if (bx == 0) {
- if (by < 2)
- return AVERROR_INVALIDDATA;
- z = backstep;
- } else {
- z = 0;
- }
-
- r = odst[((by - 1) * linesize + bx) * 4] +
- odst[(by * linesize + bx - 1 - z) * 4] -
- odst[((by - 1) * linesize + bx - 1 - z) * 4];
- g = odst[((by - 1) * linesize + bx) * 4 + 1] +
- odst[(by * linesize + bx - 1 - z) * 4 + 1] -
- odst[((by - 1) * linesize + bx - 1 - z) * 4 + 1];
- b = odst[((by - 1) * linesize + bx) * 4 + 2] +
- odst[(by * linesize + bx - 1 - z) * 4 + 2] -
- odst[((by - 1) * linesize + bx - 1 - z) * 4 + 2];
- clr = ((b & 0xFF) << 16) + ((g & 0xFF) << 8) + (r & 0xFF);
- dst[by * linesize + bx] = clr;
- bx++;
- if (bx >= x * 16 + sx2 || bx >= avctx->width) {
- bx = x * 16 + sx1;
- by++;
- }
- }
- break;
- case 5:
- while (run-- > 0) {
- if (by < 1 || by >= avctx->height)
- return AVERROR_INVALIDDATA;
-
- if (bx == 0) {
- if (by < 2)
- return AVERROR_INVALIDDATA;
- z = backstep;
- } else {
- z = 0;
- }
-
- clr = dst[(by - 1) * linesize + bx - 1 - z];
- dst[by * linesize + bx] = clr;
- bx++;
- if (bx >= x * 16 + sx2 || bx >= avctx->width) {
- bx = x * 16 + sx1;
- by++;
- }
- }
- break;
- }
-
- if (avctx->bits_per_coded_sample == 16) {
- cx1 = (clr & 0x3F00) >> 2;
- cx = (clr & 0x3FFFFF) >> 16;
- } else {
- cx1 = (clr & 0xFC00) >> 4;
- cx = (clr & 0xFFFFFF) >> 18;
- }
+ ret = decode_run_p(avctx, ptype, run, x, y, clr,
+ dst, prev, linesize, plinesize, &bx, &by,
+ backstep, sx1, sx2, &cx, &cx1);
+ if (ret < 0)
+ return ret;
}
}
}
return ret;
}
- if ((ret = ff_reget_buffer(avctx, s->current_frame)) < 0)
+ if ((ret = ff_reget_buffer(avctx, s->current_frame, 0)) < 0)
return ret;
bytestream2_init(gb, avpkt->data, avpkt->size);
type = bytestream2_peek_byte(gb);
if (type == 2) {
+ s->version = 1;
s->get_freq = get_freq0;
s->decode = decode0;
frame->key_frame = 1;
ret = decompress_i(avctx, (uint32_t *)s->current_frame->data[0],
s->current_frame->linesize[0] / 4);
} else if (type == 18) {
+ s->version = 2;
s->get_freq = get_freq;
s->decode = decode;
frame->key_frame = 1;
ret = decompress_i(avctx, (uint32_t *)s->current_frame->data[0],
s->current_frame->linesize[0] / 4);
- } else if (type == 17) {
+ } else if (type == 34) {
+ frame->key_frame = 1;
+ s->version = 3;
+ ret = decompress_i3(avctx, (uint32_t *)s->current_frame->data[0],
+ s->current_frame->linesize[0] / 4);
+ } else if (type == 17 || type == 33) {
uint32_t clr, *dst = (uint32_t *)s->current_frame->data[0];
- int x, y;
+ int y;
+
+ if (bytestream2_get_bytes_left(gb) < 3)
+ return AVERROR_INVALIDDATA;
frame->key_frame = 1;
bytestream2_skip(gb, 1);
clr = bytestream2_get_le24(gb);
}
for (y = 0; y < avctx->height; y++) {
- for (x = 0; x < avctx->width; x++) {
- dst[x] = clr;
- }
+ dst[0] = clr;
+ av_memcpy_backptr((uint8_t*)(dst+1), 4, 4*avctx->width - 4);
dst += s->current_frame->linesize[0] / 4;
}
} else if (type == 0 || type == 1) {
frame->key_frame = 0;
- ret = av_frame_copy(s->current_frame, s->last_frame);
- if (ret < 0)
- return ret;
-
- ret = decompress_p(avctx, (uint32_t *)s->current_frame->data[0],
- s->current_frame->linesize[0] / 4,
- (uint32_t *)s->last_frame->data[0],
- s->last_frame->linesize[0] / 4);
+ if (s->version == 1 || s->version == 2)
+ ret = decompress_p(avctx, (uint32_t *)s->current_frame->data[0],
+ s->current_frame->linesize[0] / 4,
+ (uint32_t *)s->last_frame->data[0],
+ s->last_frame->linesize[0] / 4);
+ else
+ ret = decompress_p3(avctx, (uint32_t *)s->current_frame->data[0],
+ s->current_frame->linesize[0] / 4,
+ (uint32_t *)s->last_frame->data[0],
+ s->last_frame->linesize[0] / 4);
+ if (ret == 1)
+ return avpkt->size;
} else {
return AVERROR_PATCHWELCOME;
}
if (ret < 0)
return ret;
+ if (bytestream2_get_bytes_left(gb) > 5)
+ return AVERROR_INVALIDDATA;
+
if (avctx->bits_per_coded_sample != 16) {
ret = av_frame_ref(data, s->current_frame);
if (ret < 0)
return 0;
}
-AVCodec ff_scpr_decoder = {
+const AVCodec ff_scpr_decoder = {
.name = "scpr",
.long_name = NULL_IF_CONFIG_SMALL("ScreenPressor"),
.type = AVMEDIA_TYPE_VIDEO,