2013-04-22 09:41:01 +00:00
|
|
|
/*
|
|
|
|
* Discrete wavelet transform
|
|
|
|
* Copyright (c) 2007 Kamil Nowosad
|
|
|
|
* Copyright (c) 2013 Nicolas Bertrand <nicoinattendu@gmail.com>
|
|
|
|
*
|
2013-04-22 17:41:31 +00:00
|
|
|
* This file is part of FFmpeg.
|
2013-04-22 09:41:01 +00:00
|
|
|
*
|
2013-04-22 17:41:31 +00:00
|
|
|
* FFmpeg is free software; you can redistribute it and/or
|
2013-04-22 09:41:01 +00:00
|
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
|
|
* License as published by the Free Software Foundation; either
|
|
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
|
|
*
|
2013-04-22 17:41:31 +00:00
|
|
|
* FFmpeg is distributed in the hope that it will be useful,
|
2013-04-22 09:41:01 +00:00
|
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
|
|
* Lesser General Public License for more details.
|
|
|
|
*
|
|
|
|
* You should have received a copy of the GNU Lesser General Public
|
2013-04-22 17:41:31 +00:00
|
|
|
* License along with FFmpeg; if not, write to the Free Software
|
2013-04-22 09:41:01 +00:00
|
|
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
|
|
|
*/
|
|
|
|
|
|
|
|
/**
|
|
|
|
* @file
|
|
|
|
* Discrete wavelet transform
|
|
|
|
*/
|
|
|
|
|
2015-06-16 19:22:40 +00:00
|
|
|
#include "libavutil/avassert.h"
|
2013-04-22 09:41:01 +00:00
|
|
|
#include "libavutil/common.h"
|
|
|
|
#include "libavutil/mem.h"
|
|
|
|
#include "jpeg2000dwt.h"
|
|
|
|
#include "internal.h"
|
|
|
|
|
|
|
|
/* Defines for 9/7 DWT lifting parameters.
|
|
|
|
* Parameters are in float. */
|
|
|
|
#define F_LFTG_ALPHA 1.586134342059924f
|
|
|
|
#define F_LFTG_BETA 0.052980118572961f
|
|
|
|
#define F_LFTG_GAMMA 0.882911075530934f
|
|
|
|
#define F_LFTG_DELTA 0.443506852043971f
|
|
|
|
|
|
|
|
/* Lifting parameters in integer format.
|
|
|
|
* Computed as param = (float param) * (1 << 16) */
|
2015-06-22 00:22:36 +00:00
|
|
|
#define I_LFTG_ALPHA 103949ll
|
|
|
|
#define I_LFTG_BETA 3472ll
|
|
|
|
#define I_LFTG_GAMMA 57862ll
|
|
|
|
#define I_LFTG_DELTA 29066ll
|
|
|
|
#define I_LFTG_K 80621ll
|
|
|
|
#define I_LFTG_X 53274ll
|
|
|
|
#define I_PRESHIFT 8
|
2013-04-22 09:41:01 +00:00
|
|
|
|
|
|
|
static inline void extend53(int *p, int i0, int i1)
|
|
|
|
{
|
|
|
|
p[i0 - 1] = p[i0 + 1];
|
|
|
|
p[i1] = p[i1 - 2];
|
|
|
|
p[i0 - 2] = p[i0 + 2];
|
|
|
|
p[i1 + 1] = p[i1 - 3];
|
|
|
|
}
|
|
|
|
|
|
|
|
static inline void extend97_float(float *p, int i0, int i1)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
|
|
|
|
for (i = 1; i <= 4; i++) {
|
|
|
|
p[i0 - i] = p[i0 + i];
|
|
|
|
p[i1 + i - 1] = p[i1 - i - 1];
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
static inline void extend97_int(int32_t *p, int i0, int i1)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
|
|
|
|
for (i = 1; i <= 4; i++) {
|
|
|
|
p[i0 - i] = p[i0 + i];
|
|
|
|
p[i1 + i - 1] = p[i1 - i - 1];
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2013-05-27 19:47:32 +00:00
|
|
|
static void sd_1d53(int *p, int i0, int i1)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
|
2015-06-19 23:40:17 +00:00
|
|
|
if (i1 <= i0 + 1) {
|
|
|
|
if (i0 == 1)
|
|
|
|
p[1] <<= 1;
|
2013-05-27 19:47:32 +00:00
|
|
|
return;
|
2015-06-19 23:40:17 +00:00
|
|
|
}
|
2013-05-27 19:47:32 +00:00
|
|
|
|
|
|
|
extend53(p, i0, i1);
|
|
|
|
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = ((i0+1)>>1) - 1; i < (i1+1)>>1; i++)
|
2013-05-27 19:47:32 +00:00
|
|
|
p[2*i+1] -= (p[2*i] + p[2*i+2]) >> 1;
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = ((i0+1)>>1); i < (i1+1)>>1; i++)
|
2013-05-27 19:47:32 +00:00
|
|
|
p[2*i] += (p[2*i-1] + p[2*i+1] + 2) >> 2;
|
|
|
|
}
|
|
|
|
|
|
|
|
static void dwt_encode53(DWTContext *s, int *t)
|
|
|
|
{
|
|
|
|
int lev,
|
|
|
|
w = s->linelen[s->ndeclevels-1][0];
|
|
|
|
int *line = s->i_linebuf;
|
|
|
|
line += 3;
|
|
|
|
|
|
|
|
for (lev = s->ndeclevels-1; lev >= 0; lev--){
|
|
|
|
int lh = s->linelen[lev][0],
|
|
|
|
lv = s->linelen[lev][1],
|
|
|
|
mh = s->mod[lev][0],
|
|
|
|
mv = s->mod[lev][1],
|
|
|
|
lp;
|
|
|
|
int *l;
|
|
|
|
|
|
|
|
// VER_SD
|
|
|
|
l = line + mv;
|
|
|
|
for (lp = 0; lp < lh; lp++) {
|
|
|
|
int i, j = 0;
|
|
|
|
|
|
|
|
for (i = 0; i < lv; i++)
|
|
|
|
l[i] = t[w*i + lp];
|
|
|
|
|
|
|
|
sd_1d53(line, mv, mv + lv);
|
|
|
|
|
|
|
|
// copy back and deinterleave
|
|
|
|
for (i = mv; i < lv; i+=2, j++)
|
|
|
|
t[w*j + lp] = l[i];
|
|
|
|
for (i = 1-mv; i < lv; i+=2, j++)
|
|
|
|
t[w*j + lp] = l[i];
|
|
|
|
}
|
2015-06-19 22:41:12 +00:00
|
|
|
|
|
|
|
// HOR_SD
|
|
|
|
l = line + mh;
|
|
|
|
for (lp = 0; lp < lv; lp++){
|
|
|
|
int i, j = 0;
|
|
|
|
|
|
|
|
for (i = 0; i < lh; i++)
|
|
|
|
l[i] = t[w*lp + i];
|
|
|
|
|
|
|
|
sd_1d53(line, mh, mh + lh);
|
|
|
|
|
|
|
|
// copy back and deinterleave
|
|
|
|
for (i = mh; i < lh; i+=2, j++)
|
|
|
|
t[w*lp + j] = l[i];
|
|
|
|
for (i = 1-mh; i < lh; i+=2, j++)
|
|
|
|
t[w*lp + j] = l[i];
|
|
|
|
}
|
2013-05-27 19:47:32 +00:00
|
|
|
}
|
|
|
|
}
|
2013-05-28 07:35:56 +00:00
|
|
|
static void sd_1d97_float(float *p, int i0, int i1)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
|
2015-06-17 13:24:14 +00:00
|
|
|
if (i1 <= i0 + 1) {
|
|
|
|
if (i0 == 1)
|
2015-06-21 23:30:33 +00:00
|
|
|
p[1] *= F_LFTG_X * 2;
|
2015-06-17 13:24:14 +00:00
|
|
|
else
|
|
|
|
p[0] *= F_LFTG_K;
|
2013-05-28 07:35:56 +00:00
|
|
|
return;
|
2015-06-17 13:24:14 +00:00
|
|
|
}
|
2013-05-28 07:35:56 +00:00
|
|
|
|
|
|
|
extend97_float(p, i0, i1);
|
|
|
|
i0++; i1++;
|
|
|
|
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = (i0>>1) - 2; i < (i1>>1) + 1; i++)
|
2013-05-28 07:35:56 +00:00
|
|
|
p[2*i+1] -= 1.586134 * (p[2*i] + p[2*i+2]);
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = (i0>>1) - 1; i < (i1>>1) + 1; i++)
|
2013-05-28 07:35:56 +00:00
|
|
|
p[2*i] -= 0.052980 * (p[2*i-1] + p[2*i+1]);
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = (i0>>1) - 1; i < (i1>>1); i++)
|
2013-05-28 07:35:56 +00:00
|
|
|
p[2*i+1] += 0.882911 * (p[2*i] + p[2*i+2]);
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = (i0>>1); i < (i1>>1); i++)
|
2013-05-28 07:35:56 +00:00
|
|
|
p[2*i] += 0.443506 * (p[2*i-1] + p[2*i+1]);
|
|
|
|
}
|
|
|
|
|
|
|
|
static void dwt_encode97_float(DWTContext *s, float *t)
|
|
|
|
{
|
|
|
|
int lev,
|
|
|
|
w = s->linelen[s->ndeclevels-1][0];
|
|
|
|
float *line = s->f_linebuf;
|
|
|
|
line += 5;
|
|
|
|
|
|
|
|
for (lev = s->ndeclevels-1; lev >= 0; lev--){
|
|
|
|
int lh = s->linelen[lev][0],
|
|
|
|
lv = s->linelen[lev][1],
|
|
|
|
mh = s->mod[lev][0],
|
|
|
|
mv = s->mod[lev][1],
|
|
|
|
lp;
|
|
|
|
float *l;
|
|
|
|
|
|
|
|
// HOR_SD
|
|
|
|
l = line + mh;
|
|
|
|
for (lp = 0; lp < lv; lp++){
|
|
|
|
int i, j = 0;
|
|
|
|
|
|
|
|
for (i = 0; i < lh; i++)
|
|
|
|
l[i] = t[w*lp + i];
|
|
|
|
|
|
|
|
sd_1d97_float(line, mh, mh + lh);
|
|
|
|
|
|
|
|
// copy back and deinterleave
|
|
|
|
for (i = mh; i < lh; i+=2, j++)
|
2015-06-22 00:46:35 +00:00
|
|
|
t[w*lp + j] = l[i];
|
2013-05-28 07:35:56 +00:00
|
|
|
for (i = 1-mh; i < lh; i+=2, j++)
|
2015-06-21 23:56:06 +00:00
|
|
|
t[w*lp + j] = l[i];
|
2013-05-28 07:35:56 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
// VER_SD
|
|
|
|
l = line + mv;
|
|
|
|
for (lp = 0; lp < lh; lp++) {
|
|
|
|
int i, j = 0;
|
|
|
|
|
|
|
|
for (i = 0; i < lv; i++)
|
|
|
|
l[i] = t[w*i + lp];
|
|
|
|
|
|
|
|
sd_1d97_float(line, mv, mv + lv);
|
|
|
|
|
|
|
|
// copy back and deinterleave
|
|
|
|
for (i = mv; i < lv; i+=2, j++)
|
2015-06-22 00:46:35 +00:00
|
|
|
t[w*j + lp] = l[i];
|
2013-05-28 07:35:56 +00:00
|
|
|
for (i = 1-mv; i < lv; i+=2, j++)
|
2015-06-21 23:56:06 +00:00
|
|
|
t[w*j + lp] = l[i];
|
2013-05-28 07:35:56 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
2013-05-27 19:47:32 +00:00
|
|
|
|
2013-05-28 07:30:28 +00:00
|
|
|
static void sd_1d97_int(int *p, int i0, int i1)
|
2013-05-27 19:47:32 +00:00
|
|
|
{
|
|
|
|
int i;
|
|
|
|
|
2015-06-17 13:24:14 +00:00
|
|
|
if (i1 <= i0 + 1) {
|
|
|
|
if (i0 == 1)
|
2015-06-21 23:30:33 +00:00
|
|
|
p[1] = (p[1] * I_LFTG_X + (1<<14)) >> 15;
|
2015-06-17 13:24:14 +00:00
|
|
|
else
|
|
|
|
p[0] = (p[0] * I_LFTG_K + (1<<15)) >> 16;
|
2013-05-27 19:47:32 +00:00
|
|
|
return;
|
2015-06-17 13:24:14 +00:00
|
|
|
}
|
2013-05-27 19:47:32 +00:00
|
|
|
|
2013-05-28 07:30:28 +00:00
|
|
|
extend97_int(p, i0, i1);
|
2013-05-27 19:47:32 +00:00
|
|
|
i0++; i1++;
|
|
|
|
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = (i0>>1) - 2; i < (i1>>1) + 1; i++)
|
2013-05-28 07:30:28 +00:00
|
|
|
p[2 * i + 1] -= (I_LFTG_ALPHA * (p[2 * i] + p[2 * i + 2]) + (1 << 15)) >> 16;
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = (i0>>1) - 1; i < (i1>>1) + 1; i++)
|
2013-05-28 07:30:28 +00:00
|
|
|
p[2 * i] -= (I_LFTG_BETA * (p[2 * i - 1] + p[2 * i + 1]) + (1 << 15)) >> 16;
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = (i0>>1) - 1; i < (i1>>1); i++)
|
2013-05-28 07:30:28 +00:00
|
|
|
p[2 * i + 1] += (I_LFTG_GAMMA * (p[2 * i] + p[2 * i + 2]) + (1 << 15)) >> 16;
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = (i0>>1); i < (i1>>1); i++)
|
2013-05-28 07:30:28 +00:00
|
|
|
p[2 * i] += (I_LFTG_DELTA * (p[2 * i - 1] + p[2 * i + 1]) + (1 << 15)) >> 16;
|
2013-05-27 19:47:32 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
static void dwt_encode97_int(DWTContext *s, int *t)
|
|
|
|
{
|
2015-06-22 00:22:36 +00:00
|
|
|
int lev;
|
|
|
|
int w = s->linelen[s->ndeclevels-1][0];
|
|
|
|
int h = s->linelen[s->ndeclevels-1][1];
|
|
|
|
int i;
|
2013-05-28 07:30:28 +00:00
|
|
|
int *line = s->i_linebuf;
|
2013-05-27 19:47:32 +00:00
|
|
|
line += 5;
|
|
|
|
|
2015-06-22 00:22:36 +00:00
|
|
|
for (i = 0; i < w * h; i++)
|
|
|
|
t[i] <<= I_PRESHIFT;
|
|
|
|
|
2013-05-27 19:47:32 +00:00
|
|
|
for (lev = s->ndeclevels-1; lev >= 0; lev--){
|
|
|
|
int lh = s->linelen[lev][0],
|
|
|
|
lv = s->linelen[lev][1],
|
|
|
|
mh = s->mod[lev][0],
|
|
|
|
mv = s->mod[lev][1],
|
|
|
|
lp;
|
2013-05-28 07:30:28 +00:00
|
|
|
int *l;
|
2013-05-27 19:47:32 +00:00
|
|
|
|
2015-06-19 22:41:12 +00:00
|
|
|
// VER_SD
|
|
|
|
l = line + mv;
|
|
|
|
for (lp = 0; lp < lh; lp++) {
|
|
|
|
int i, j = 0;
|
|
|
|
|
|
|
|
for (i = 0; i < lv; i++)
|
|
|
|
l[i] = t[w*i + lp];
|
|
|
|
|
|
|
|
sd_1d97_int(line, mv, mv + lv);
|
|
|
|
|
|
|
|
// copy back and deinterleave
|
|
|
|
for (i = mv; i < lv; i+=2, j++)
|
2015-06-21 23:30:33 +00:00
|
|
|
t[w*j + lp] = ((l[i] * I_LFTG_X) + (1 << 15)) >> 16;
|
2015-06-19 22:41:12 +00:00
|
|
|
for (i = 1-mv; i < lv; i+=2, j++)
|
2015-06-21 23:56:06 +00:00
|
|
|
t[w*j + lp] = l[i];
|
2015-06-19 22:41:12 +00:00
|
|
|
}
|
|
|
|
|
2013-05-27 19:47:32 +00:00
|
|
|
// HOR_SD
|
|
|
|
l = line + mh;
|
|
|
|
for (lp = 0; lp < lv; lp++){
|
|
|
|
int i, j = 0;
|
|
|
|
|
|
|
|
for (i = 0; i < lh; i++)
|
|
|
|
l[i] = t[w*lp + i];
|
|
|
|
|
2013-05-28 07:30:28 +00:00
|
|
|
sd_1d97_int(line, mh, mh + lh);
|
2013-05-27 19:47:32 +00:00
|
|
|
|
|
|
|
// copy back and deinterleave
|
|
|
|
for (i = mh; i < lh; i+=2, j++)
|
2015-06-21 23:30:33 +00:00
|
|
|
t[w*lp + j] = ((l[i] * I_LFTG_X) + (1 << 15)) >> 16;
|
2013-05-27 19:47:32 +00:00
|
|
|
for (i = 1-mh; i < lh; i+=2, j++)
|
2015-06-21 23:56:06 +00:00
|
|
|
t[w*lp + j] = l[i];
|
2013-05-27 19:47:32 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
}
|
2015-06-22 00:22:36 +00:00
|
|
|
|
|
|
|
for (i = 0; i < w * h; i++)
|
|
|
|
t[i] = (t[i] + ((1<<I_PRESHIFT)>>1)) >> I_PRESHIFT;
|
2013-05-27 19:47:32 +00:00
|
|
|
}
|
|
|
|
|
2018-02-17 23:11:33 +00:00
|
|
|
static void sr_1d53(unsigned *p, int i0, int i1)
|
2013-04-22 09:41:01 +00:00
|
|
|
{
|
|
|
|
int i;
|
|
|
|
|
2015-06-16 18:00:39 +00:00
|
|
|
if (i1 <= i0 + 1) {
|
|
|
|
if (i0 == 1)
|
2018-02-17 23:11:33 +00:00
|
|
|
p[1] = (int)p[1] >> 1;
|
2013-04-22 09:41:01 +00:00
|
|
|
return;
|
2015-06-16 18:00:39 +00:00
|
|
|
}
|
2013-04-22 09:41:01 +00:00
|
|
|
|
|
|
|
extend53(p, i0, i1);
|
|
|
|
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = (i0 >> 1); i < (i1 >> 1) + 1; i++)
|
2018-02-17 23:11:33 +00:00
|
|
|
p[2 * i] -= (int)(p[2 * i - 1] + p[2 * i + 1] + 2) >> 2;
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = (i0 >> 1); i < (i1 >> 1); i++)
|
2018-02-17 23:11:33 +00:00
|
|
|
p[2 * i + 1] += (int)(p[2 * i] + p[2 * i + 2]) >> 1;
|
2013-04-22 09:41:01 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
static void dwt_decode53(DWTContext *s, int *t)
|
|
|
|
{
|
|
|
|
int lev;
|
|
|
|
int w = s->linelen[s->ndeclevels - 1][0];
|
|
|
|
int32_t *line = s->i_linebuf;
|
|
|
|
line += 3;
|
|
|
|
|
|
|
|
for (lev = 0; lev < s->ndeclevels; lev++) {
|
|
|
|
int lh = s->linelen[lev][0],
|
|
|
|
lv = s->linelen[lev][1],
|
|
|
|
mh = s->mod[lev][0],
|
|
|
|
mv = s->mod[lev][1],
|
|
|
|
lp;
|
|
|
|
int *l;
|
|
|
|
|
|
|
|
// HOR_SD
|
|
|
|
l = line + mh;
|
|
|
|
for (lp = 0; lp < lv; lp++) {
|
|
|
|
int i, j = 0;
|
|
|
|
// copy with interleaving
|
|
|
|
for (i = mh; i < lh; i += 2, j++)
|
|
|
|
l[i] = t[w * lp + j];
|
|
|
|
for (i = 1 - mh; i < lh; i += 2, j++)
|
|
|
|
l[i] = t[w * lp + j];
|
|
|
|
|
|
|
|
sr_1d53(line, mh, mh + lh);
|
|
|
|
|
|
|
|
for (i = 0; i < lh; i++)
|
|
|
|
t[w * lp + i] = l[i];
|
|
|
|
}
|
|
|
|
|
|
|
|
// VER_SD
|
|
|
|
l = line + mv;
|
|
|
|
for (lp = 0; lp < lh; lp++) {
|
|
|
|
int i, j = 0;
|
|
|
|
// copy with interleaving
|
|
|
|
for (i = mv; i < lv; i += 2, j++)
|
|
|
|
l[i] = t[w * j + lp];
|
|
|
|
for (i = 1 - mv; i < lv; i += 2, j++)
|
|
|
|
l[i] = t[w * j + lp];
|
|
|
|
|
|
|
|
sr_1d53(line, mv, mv + lv);
|
|
|
|
|
|
|
|
for (i = 0; i < lv; i++)
|
|
|
|
t[w * i + lp] = l[i];
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
static void sr_1d97_float(float *p, int i0, int i1)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
|
2015-06-16 18:33:54 +00:00
|
|
|
if (i1 <= i0 + 1) {
|
|
|
|
if (i0 == 1)
|
|
|
|
p[1] *= F_LFTG_K/2;
|
2015-06-17 12:45:15 +00:00
|
|
|
else
|
2015-06-21 23:30:33 +00:00
|
|
|
p[0] *= F_LFTG_X;
|
2013-04-22 09:41:01 +00:00
|
|
|
return;
|
2015-06-16 18:33:54 +00:00
|
|
|
}
|
2013-04-22 09:41:01 +00:00
|
|
|
|
|
|
|
extend97_float(p, i0, i1);
|
|
|
|
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = (i0 >> 1) - 1; i < (i1 >> 1) + 2; i++)
|
2013-04-22 09:41:01 +00:00
|
|
|
p[2 * i] -= F_LFTG_DELTA * (p[2 * i - 1] + p[2 * i + 1]);
|
|
|
|
/* step 4 */
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = (i0 >> 1) - 1; i < (i1 >> 1) + 1; i++)
|
2013-04-22 09:41:01 +00:00
|
|
|
p[2 * i + 1] -= F_LFTG_GAMMA * (p[2 * i] + p[2 * i + 2]);
|
|
|
|
/*step 5*/
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = (i0 >> 1); i < (i1 >> 1) + 1; i++)
|
2013-04-22 09:41:01 +00:00
|
|
|
p[2 * i] += F_LFTG_BETA * (p[2 * i - 1] + p[2 * i + 1]);
|
|
|
|
/* step 6 */
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = (i0 >> 1); i < (i1 >> 1); i++)
|
2013-04-22 09:41:01 +00:00
|
|
|
p[2 * i + 1] += F_LFTG_ALPHA * (p[2 * i] + p[2 * i + 2]);
|
|
|
|
}
|
|
|
|
|
|
|
|
static void dwt_decode97_float(DWTContext *s, float *t)
|
|
|
|
{
|
|
|
|
int lev;
|
|
|
|
int w = s->linelen[s->ndeclevels - 1][0];
|
|
|
|
float *line = s->f_linebuf;
|
|
|
|
float *data = t;
|
|
|
|
/* position at index O of line range [0-5,w+5] cf. extend function */
|
|
|
|
line += 5;
|
|
|
|
|
|
|
|
for (lev = 0; lev < s->ndeclevels; lev++) {
|
|
|
|
int lh = s->linelen[lev][0],
|
|
|
|
lv = s->linelen[lev][1],
|
|
|
|
mh = s->mod[lev][0],
|
|
|
|
mv = s->mod[lev][1],
|
|
|
|
lp;
|
|
|
|
float *l;
|
|
|
|
// HOR_SD
|
|
|
|
l = line + mh;
|
|
|
|
for (lp = 0; lp < lv; lp++) {
|
|
|
|
int i, j = 0;
|
|
|
|
// copy with interleaving
|
|
|
|
for (i = mh; i < lh; i += 2, j++)
|
2015-06-22 00:46:35 +00:00
|
|
|
l[i] = data[w * lp + j];
|
2013-04-22 09:41:01 +00:00
|
|
|
for (i = 1 - mh; i < lh; i += 2, j++)
|
2015-06-21 23:56:06 +00:00
|
|
|
l[i] = data[w * lp + j];
|
2013-04-22 09:41:01 +00:00
|
|
|
|
|
|
|
sr_1d97_float(line, mh, mh + lh);
|
|
|
|
|
|
|
|
for (i = 0; i < lh; i++)
|
|
|
|
data[w * lp + i] = l[i];
|
|
|
|
}
|
|
|
|
|
|
|
|
// VER_SD
|
|
|
|
l = line + mv;
|
|
|
|
for (lp = 0; lp < lh; lp++) {
|
|
|
|
int i, j = 0;
|
|
|
|
// copy with interleaving
|
|
|
|
for (i = mv; i < lv; i += 2, j++)
|
2015-06-22 00:46:35 +00:00
|
|
|
l[i] = data[w * j + lp];
|
2013-04-22 09:41:01 +00:00
|
|
|
for (i = 1 - mv; i < lv; i += 2, j++)
|
2015-06-21 23:56:06 +00:00
|
|
|
l[i] = data[w * j + lp];
|
2013-04-22 09:41:01 +00:00
|
|
|
|
|
|
|
sr_1d97_float(line, mv, mv + lv);
|
|
|
|
|
|
|
|
for (i = 0; i < lv; i++)
|
|
|
|
data[w * i + lp] = l[i];
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
static void sr_1d97_int(int32_t *p, int i0, int i1)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
|
2015-06-16 18:33:54 +00:00
|
|
|
if (i1 <= i0 + 1) {
|
|
|
|
if (i0 == 1)
|
|
|
|
p[1] = (p[1] * I_LFTG_K + (1<<16)) >> 17;
|
2015-06-17 12:45:15 +00:00
|
|
|
else
|
2015-06-21 23:30:33 +00:00
|
|
|
p[0] = (p[0] * I_LFTG_X + (1<<15)) >> 16;
|
2013-04-22 09:41:01 +00:00
|
|
|
return;
|
2015-06-16 18:33:54 +00:00
|
|
|
}
|
2013-04-22 09:41:01 +00:00
|
|
|
|
|
|
|
extend97_int(p, i0, i1);
|
|
|
|
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = (i0 >> 1) - 1; i < (i1 >> 1) + 2; i++)
|
2017-06-26 13:00:52 +00:00
|
|
|
p[2 * i] -= (I_LFTG_DELTA * (p[2 * i - 1] + (int64_t)p[2 * i + 1]) + (1 << 15)) >> 16;
|
2013-04-22 09:41:01 +00:00
|
|
|
/* step 4 */
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = (i0 >> 1) - 1; i < (i1 >> 1) + 1; i++)
|
2017-06-26 13:00:52 +00:00
|
|
|
p[2 * i + 1] -= (I_LFTG_GAMMA * (p[2 * i] + (int64_t)p[2 * i + 2]) + (1 << 15)) >> 16;
|
2013-04-22 09:41:01 +00:00
|
|
|
/*step 5*/
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = (i0 >> 1); i < (i1 >> 1) + 1; i++)
|
2017-06-26 13:00:52 +00:00
|
|
|
p[2 * i] += (I_LFTG_BETA * (p[2 * i - 1] + (int64_t)p[2 * i + 1]) + (1 << 15)) >> 16;
|
2013-04-22 09:41:01 +00:00
|
|
|
/* step 6 */
|
2015-06-23 16:47:18 +00:00
|
|
|
for (i = (i0 >> 1); i < (i1 >> 1); i++)
|
2017-06-26 13:00:52 +00:00
|
|
|
p[2 * i + 1] += (I_LFTG_ALPHA * (p[2 * i] + (int64_t)p[2 * i + 2]) + (1 << 15)) >> 16;
|
2013-04-22 09:41:01 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
static void dwt_decode97_int(DWTContext *s, int32_t *t)
|
|
|
|
{
|
|
|
|
int lev;
|
|
|
|
int w = s->linelen[s->ndeclevels - 1][0];
|
2015-06-22 00:22:36 +00:00
|
|
|
int h = s->linelen[s->ndeclevels - 1][1];
|
|
|
|
int i;
|
2013-04-22 09:41:01 +00:00
|
|
|
int32_t *line = s->i_linebuf;
|
|
|
|
int32_t *data = t;
|
|
|
|
/* position at index O of line range [0-5,w+5] cf. extend function */
|
|
|
|
line += 5;
|
|
|
|
|
2015-06-22 00:22:36 +00:00
|
|
|
for (i = 0; i < w * h; i++)
|
2017-06-26 13:05:08 +00:00
|
|
|
data[i] *= 1LL << I_PRESHIFT;
|
2015-06-22 00:22:36 +00:00
|
|
|
|
2013-04-22 09:41:01 +00:00
|
|
|
for (lev = 0; lev < s->ndeclevels; lev++) {
|
|
|
|
int lh = s->linelen[lev][0],
|
|
|
|
lv = s->linelen[lev][1],
|
|
|
|
mh = s->mod[lev][0],
|
|
|
|
mv = s->mod[lev][1],
|
|
|
|
lp;
|
|
|
|
int32_t *l;
|
|
|
|
// HOR_SD
|
|
|
|
l = line + mh;
|
|
|
|
for (lp = 0; lp < lv; lp++) {
|
|
|
|
int i, j = 0;
|
2013-06-02 20:21:14 +00:00
|
|
|
// rescale with interleaving
|
2013-04-22 09:41:01 +00:00
|
|
|
for (i = mh; i < lh; i += 2, j++)
|
2013-06-02 20:21:14 +00:00
|
|
|
l[i] = ((data[w * lp + j] * I_LFTG_K) + (1 << 15)) >> 16;
|
2013-04-22 09:41:01 +00:00
|
|
|
for (i = 1 - mh; i < lh; i += 2, j++)
|
2015-06-21 23:56:06 +00:00
|
|
|
l[i] = data[w * lp + j];
|
2013-04-22 09:41:01 +00:00
|
|
|
|
|
|
|
sr_1d97_int(line, mh, mh + lh);
|
|
|
|
|
|
|
|
for (i = 0; i < lh; i++)
|
|
|
|
data[w * lp + i] = l[i];
|
|
|
|
}
|
|
|
|
|
|
|
|
// VER_SD
|
|
|
|
l = line + mv;
|
|
|
|
for (lp = 0; lp < lh; lp++) {
|
|
|
|
int i, j = 0;
|
2013-06-02 20:21:14 +00:00
|
|
|
// rescale with interleaving
|
2013-04-22 09:41:01 +00:00
|
|
|
for (i = mv; i < lv; i += 2, j++)
|
2013-06-02 20:21:14 +00:00
|
|
|
l[i] = ((data[w * j + lp] * I_LFTG_K) + (1 << 15)) >> 16;
|
2013-04-22 09:41:01 +00:00
|
|
|
for (i = 1 - mv; i < lv; i += 2, j++)
|
2015-06-21 23:56:06 +00:00
|
|
|
l[i] = data[w * j + lp];
|
2013-04-22 09:41:01 +00:00
|
|
|
|
|
|
|
sr_1d97_int(line, mv, mv + lv);
|
|
|
|
|
|
|
|
for (i = 0; i < lv; i++)
|
|
|
|
data[w * i + lp] = l[i];
|
|
|
|
}
|
|
|
|
}
|
2015-06-22 00:22:36 +00:00
|
|
|
|
|
|
|
for (i = 0; i < w * h; i++)
|
|
|
|
data[i] = (data[i] + ((1<<I_PRESHIFT)>>1)) >> I_PRESHIFT;
|
2013-04-22 09:41:01 +00:00
|
|
|
}
|
|
|
|
|
2015-11-15 21:05:04 +00:00
|
|
|
int ff_jpeg2000_dwt_init(DWTContext *s, int border[2][2],
|
2013-04-22 09:41:01 +00:00
|
|
|
int decomp_levels, int type)
|
|
|
|
{
|
|
|
|
int i, j, lev = decomp_levels, maxlen,
|
|
|
|
b[2][2];
|
|
|
|
|
|
|
|
s->ndeclevels = decomp_levels;
|
|
|
|
s->type = type;
|
|
|
|
|
|
|
|
for (i = 0; i < 2; i++)
|
|
|
|
for (j = 0; j < 2; j++)
|
|
|
|
b[i][j] = border[i][j];
|
|
|
|
|
|
|
|
maxlen = FFMAX(b[0][1] - b[0][0],
|
|
|
|
b[1][1] - b[1][0]);
|
|
|
|
while (--lev >= 0)
|
|
|
|
for (i = 0; i < 2; i++) {
|
|
|
|
s->linelen[lev][i] = b[i][1] - b[i][0];
|
|
|
|
s->mod[lev][i] = b[i][0] & 1;
|
|
|
|
for (j = 0; j < 2; j++)
|
|
|
|
b[i][j] = (b[i][j] + 1) >> 1;
|
|
|
|
}
|
|
|
|
switch (type) {
|
|
|
|
case FF_DWT97:
|
2014-04-23 13:52:45 +00:00
|
|
|
s->f_linebuf = av_malloc_array((maxlen + 12), sizeof(*s->f_linebuf));
|
2013-04-22 09:41:01 +00:00
|
|
|
if (!s->f_linebuf)
|
|
|
|
return AVERROR(ENOMEM);
|
|
|
|
break;
|
|
|
|
case FF_DWT97_INT:
|
2014-04-23 13:52:45 +00:00
|
|
|
s->i_linebuf = av_malloc_array((maxlen + 12), sizeof(*s->i_linebuf));
|
2013-04-22 09:41:01 +00:00
|
|
|
if (!s->i_linebuf)
|
|
|
|
return AVERROR(ENOMEM);
|
|
|
|
break;
|
|
|
|
case FF_DWT53:
|
2014-04-23 13:52:45 +00:00
|
|
|
s->i_linebuf = av_malloc_array((maxlen + 6), sizeof(*s->i_linebuf));
|
2013-04-22 09:41:01 +00:00
|
|
|
if (!s->i_linebuf)
|
|
|
|
return AVERROR(ENOMEM);
|
|
|
|
break;
|
|
|
|
default:
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2013-05-28 07:35:56 +00:00
|
|
|
int ff_dwt_encode(DWTContext *s, void *t)
|
2013-05-27 19:47:32 +00:00
|
|
|
{
|
2015-11-27 20:02:13 +00:00
|
|
|
if (s->ndeclevels == 0)
|
|
|
|
return 0;
|
|
|
|
|
2013-05-27 19:47:32 +00:00
|
|
|
switch(s->type){
|
2013-05-28 07:35:56 +00:00
|
|
|
case FF_DWT97:
|
|
|
|
dwt_encode97_float(s, t); break;
|
2013-05-27 19:47:32 +00:00
|
|
|
case FF_DWT97_INT:
|
|
|
|
dwt_encode97_int(s, t); break;
|
|
|
|
case FF_DWT53:
|
|
|
|
dwt_encode53(s, t); break;
|
|
|
|
default:
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2013-04-22 09:41:01 +00:00
|
|
|
int ff_dwt_decode(DWTContext *s, void *t)
|
|
|
|
{
|
2015-11-27 19:52:39 +00:00
|
|
|
if (s->ndeclevels == 0)
|
|
|
|
return 0;
|
|
|
|
|
2013-04-22 09:41:01 +00:00
|
|
|
switch (s->type) {
|
|
|
|
case FF_DWT97:
|
|
|
|
dwt_decode97_float(s, t);
|
|
|
|
break;
|
|
|
|
case FF_DWT97_INT:
|
|
|
|
dwt_decode97_int(s, t);
|
|
|
|
break;
|
|
|
|
case FF_DWT53:
|
|
|
|
dwt_decode53(s, t);
|
|
|
|
break;
|
|
|
|
default:
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
void ff_dwt_destroy(DWTContext *s)
|
|
|
|
{
|
|
|
|
av_freep(&s->f_linebuf);
|
|
|
|
av_freep(&s->i_linebuf);
|
|
|
|
}
|