1 /*
2 * Copyright (c) 2017 Ming Yang
3 * Copyright (c) 2019 Paul B Mahol
4 *
5 * Permission is hereby granted, free of charge, to any person obtaining a copy
6 * of this software and associated documentation files (the "Software"), to deal
7 * in the Software without restriction, including without limitation the rights
8 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
9 * copies of the Software, and to permit persons to whom the Software is
10 * furnished to do so, subject to the following conditions:
11 *
12 * The above copyright notice and this permission notice shall be included in all
13 * copies or substantial portions of the Software.
14 *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
18 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
20 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
21 * SOFTWARE.
22 */
23
24 #include "libavutil/imgutils.h"
25 #include "libavutil/opt.h"
26 #include "libavutil/pixdesc.h"
27 #include "avfilter.h"
28 #include "formats.h"
29 #include "internal.h"
30 #include "video.h"
31
32 typedef struct BilateralContext {
33 const AVClass *class;
34
35 float sigmaS;
36 float sigmaR;
37 int planes;
38
39 int nb_planes;
40 int depth;
41 int planewidth[4];
42 int planeheight[4];
43
44 float range_table[65536];
45
46 float *img_out_f;
47 float *img_temp;
48 float *map_factor_a;
49 float *map_factor_b;
50 float *slice_factor_a;
51 float *slice_factor_b;
52 float *line_factor_a;
53 float *line_factor_b;
54 } BilateralContext;
55
56 #define OFFSET(x) offsetof(BilateralContext, x)
57 #define FLAGS AV_OPT_FLAG_VIDEO_PARAM|AV_OPT_FLAG_FILTERING_PARAM
58
59 static const AVOption bilateral_options[] = {
60 { "sigmaS", "set spatial sigma", OFFSET(sigmaS), AV_OPT_TYPE_FLOAT, {.dbl=0.1}, 0.0, 10, FLAGS },
61 { "sigmaR", "set range sigma", OFFSET(sigmaR), AV_OPT_TYPE_FLOAT, {.dbl=0.1}, 0.0, 1, FLAGS },
62 { "planes", "set planes to filter", OFFSET(planes), AV_OPT_TYPE_INT, {.i64=1}, 0, 0xF, FLAGS },
63 { NULL }
64 };
65
66 AVFILTER_DEFINE_CLASS(bilateral);
67
query_formats(AVFilterContext * ctx)68 static int query_formats(AVFilterContext *ctx)
69 {
70 static const enum AVPixelFormat pix_fmts[] = {
71 AV_PIX_FMT_YUVA444P, AV_PIX_FMT_YUV444P, AV_PIX_FMT_YUV440P,
72 AV_PIX_FMT_YUVJ444P, AV_PIX_FMT_YUVJ440P,
73 AV_PIX_FMT_YUVA422P, AV_PIX_FMT_YUV422P, AV_PIX_FMT_YUVA420P, AV_PIX_FMT_YUV420P,
74 AV_PIX_FMT_YUVJ422P, AV_PIX_FMT_YUVJ420P,
75 AV_PIX_FMT_YUVJ411P, AV_PIX_FMT_YUV411P, AV_PIX_FMT_YUV410P,
76 AV_PIX_FMT_YUV420P9, AV_PIX_FMT_YUV422P9, AV_PIX_FMT_YUV444P9,
77 AV_PIX_FMT_YUV420P10, AV_PIX_FMT_YUV422P10, AV_PIX_FMT_YUV444P10,
78 AV_PIX_FMT_YUV420P12, AV_PIX_FMT_YUV422P12, AV_PIX_FMT_YUV444P12, AV_PIX_FMT_YUV440P12,
79 AV_PIX_FMT_YUV420P14, AV_PIX_FMT_YUV422P14, AV_PIX_FMT_YUV444P14,
80 AV_PIX_FMT_YUV420P16, AV_PIX_FMT_YUV422P16, AV_PIX_FMT_YUV444P16,
81 AV_PIX_FMT_YUVA420P9, AV_PIX_FMT_YUVA422P9, AV_PIX_FMT_YUVA444P9,
82 AV_PIX_FMT_YUVA420P10, AV_PIX_FMT_YUVA422P10, AV_PIX_FMT_YUVA444P10,
83 AV_PIX_FMT_YUVA420P16, AV_PIX_FMT_YUVA422P16, AV_PIX_FMT_YUVA444P16,
84 AV_PIX_FMT_GBRP, AV_PIX_FMT_GBRP9, AV_PIX_FMT_GBRP10,
85 AV_PIX_FMT_GBRP12, AV_PIX_FMT_GBRP14, AV_PIX_FMT_GBRP16,
86 AV_PIX_FMT_GBRAP, AV_PIX_FMT_GBRAP10, AV_PIX_FMT_GBRAP12, AV_PIX_FMT_GBRAP16,
87 AV_PIX_FMT_GRAY8, AV_PIX_FMT_GRAY9, AV_PIX_FMT_GRAY10, AV_PIX_FMT_GRAY12, AV_PIX_FMT_GRAY14, AV_PIX_FMT_GRAY16,
88 AV_PIX_FMT_NONE
89 };
90
91 return ff_set_common_formats(ctx, ff_make_format_list(pix_fmts));
92 }
93
config_input(AVFilterLink * inlink)94 static int config_input(AVFilterLink *inlink)
95 {
96 BilateralContext *s = inlink->dst->priv;
97 const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(inlink->format);
98 float inv_sigma_range;
99
100 s->depth = desc->comp[0].depth;
101 inv_sigma_range = 1.0f / (s->sigmaR * ((1 << s->depth) - 1));
102
103 //compute a lookup table
104 for (int i = 0; i < (1 << s->depth); i++)
105 s->range_table[i] = expf(-i * inv_sigma_range);
106
107 s->planewidth[1] = s->planewidth[2] = AV_CEIL_RSHIFT(inlink->w, desc->log2_chroma_w);
108 s->planewidth[0] = s->planewidth[3] = inlink->w;
109 s->planeheight[1] = s->planeheight[2] = AV_CEIL_RSHIFT(inlink->h, desc->log2_chroma_h);
110 s->planeheight[0] = s->planeheight[3] = inlink->h;
111
112 s->nb_planes = av_pix_fmt_count_planes(inlink->format);
113
114 s->img_out_f = av_calloc(inlink->w * inlink->h, sizeof(float));
115 s->img_temp = av_calloc(inlink->w * inlink->h, sizeof(float));
116 s->map_factor_a = av_calloc(inlink->w * inlink->h, sizeof(float));
117 s->map_factor_b = av_calloc(inlink->w * inlink->h, sizeof(float));
118 s->slice_factor_a = av_calloc(inlink->w, sizeof(float));
119 s->slice_factor_b = av_calloc(inlink->w, sizeof(float));
120 s->line_factor_a = av_calloc(inlink->w, sizeof(float));
121 s->line_factor_b = av_calloc(inlink->w, sizeof(float));
122
123 if (!s->img_out_f ||
124 !s->img_temp ||
125 !s->map_factor_a ||
126 !s->map_factor_b ||
127 !s->slice_factor_a ||
128 !s->slice_factor_a ||
129 !s->line_factor_a ||
130 !s->line_factor_a)
131 return AVERROR(ENOMEM);
132
133 return 0;
134 }
135
136 #define BILATERAL(type, name) \
137 static void bilateral_##name(BilateralContext *s, const uint8_t *ssrc, uint8_t *ddst, \
138 float sigma_spatial, float sigma_range, \
139 int width, int height, int src_linesize, int dst_linesize) \
140 { \
141 type *dst = (type *)ddst; \
142 const type *src = (const type *)ssrc; \
143 float *img_out_f = s->img_out_f, *img_temp = s->img_temp; \
144 float *map_factor_a = s->map_factor_a, *map_factor_b = s->map_factor_b; \
145 float *slice_factor_a = s->slice_factor_a, *slice_factor_b = s->slice_factor_b; \
146 float *line_factor_a = s->line_factor_a, *line_factor_b = s->line_factor_b; \
147 float *range_table = s->range_table; \
148 float alpha = expf(-sqrtf(2.f) / (sigma_spatial * width)); \
149 float ypr, ycr, *ycy, *ypy, *xcy, fp, fc; \
150 float inv_alpha_ = 1 - alpha; \
151 float *ycf, *ypf, *xcf, *in_factor; \
152 const type *tcy, *tpy; \
153 int h1; \
154 \
155 for (int y = 0; y < height; y++) { \
156 float *temp_factor_x, *temp_x = &img_temp[y * width]; \
157 const type *in_x = &src[y * src_linesize]; \
158 const type *texture_x = &src[y * src_linesize]; \
159 type tpr; \
160 \
161 *temp_x++ = ypr = *in_x++; \
162 tpr = *texture_x++; \
163 \
164 temp_factor_x = &map_factor_a[y * width]; \
165 *temp_factor_x++ = fp = 1; \
166 \
167 for (int x = 1; x < width; x++) { \
168 float weight, alpha_; \
169 int range_dist; \
170 type tcr = *texture_x++; \
171 type dr = abs(tcr - tpr); \
172 \
173 range_dist = dr; \
174 weight = range_table[range_dist]; \
175 alpha_ = weight*alpha; \
176 *temp_x++ = ycr = inv_alpha_*(*in_x++) + alpha_*ypr; \
177 tpr = tcr; \
178 ypr = ycr; \
179 *temp_factor_x++ = fc = inv_alpha_ + alpha_ * fp; \
180 fp = fc; \
181 } \
182 --temp_x; *temp_x = 0.5f*((*temp_x) + (*--in_x)); \
183 tpr = *--texture_x; \
184 ypr = *in_x; \
185 \
186 --temp_factor_x; *temp_factor_x = 0.5f*((*temp_factor_x) + 1); \
187 fp = 1; \
188 \
189 for (int x = width - 2; x >= 0; x--) { \
190 type tcr = *--texture_x; \
191 type dr = abs(tcr - tpr); \
192 int range_dist = dr; \
193 float weight = range_table[range_dist]; \
194 float alpha_ = weight * alpha; \
195 \
196 ycr = inv_alpha_ * (*--in_x) + alpha_ * ypr; \
197 --temp_x; *temp_x = 0.5f*((*temp_x) + ycr); \
198 tpr = tcr; \
199 ypr = ycr; \
200 \
201 fc = inv_alpha_ + alpha_*fp; \
202 --temp_factor_x; \
203 *temp_factor_x = 0.5f*((*temp_factor_x) + fc); \
204 fp = fc; \
205 } \
206 } \
207 memcpy(img_out_f, img_temp, sizeof(float) * width); \
208 \
209 alpha = expf(-sqrtf(2.f) / (sigma_spatial * height)); \
210 inv_alpha_ = 1 - alpha; \
211 in_factor = map_factor_a; \
212 memcpy(map_factor_b, in_factor, sizeof(float) * width); \
213 for (int y = 1; y < height; y++) { \
214 tpy = &src[(y - 1) * src_linesize]; \
215 tcy = &src[y * src_linesize]; \
216 xcy = &img_temp[y * width]; \
217 ypy = &img_out_f[(y - 1) * width]; \
218 ycy = &img_out_f[y * width]; \
219 \
220 xcf = &in_factor[y * width]; \
221 ypf = &map_factor_b[(y - 1) * width]; \
222 ycf = &map_factor_b[y * width]; \
223 for (int x = 0; x < width; x++) { \
224 type dr = abs((*tcy++) - (*tpy++)); \
225 int range_dist = dr; \
226 float weight = range_table[range_dist]; \
227 float alpha_ = weight*alpha; \
228 \
229 *ycy++ = inv_alpha_*(*xcy++) + alpha_*(*ypy++); \
230 *ycf++ = inv_alpha_*(*xcf++) + alpha_*(*ypf++); \
231 } \
232 } \
233 h1 = height - 1; \
234 ycf = line_factor_a; \
235 ypf = line_factor_b; \
236 memcpy(ypf, &in_factor[h1 * width], sizeof(float) * width); \
237 for (int x = 0; x < width; x++) \
238 map_factor_b[h1 * width + x] = 0.5f*(map_factor_b[h1 * width + x] + ypf[x]); \
239 \
240 ycy = slice_factor_a; \
241 ypy = slice_factor_b; \
242 memcpy(ypy, &img_temp[h1 * width], sizeof(float) * width); \
243 for (int x = 0, k = 0; x < width; x++) { \
244 int idx = h1 * width + x; \
245 img_out_f[idx] = 0.5f*(img_out_f[idx] + ypy[k++]) / map_factor_b[h1 * width + x]; \
246 } \
247 \
248 for (int y = h1 - 1; y >= 0; y--) { \
249 float *ycf_, *ypf_, *factor_; \
250 float *ycy_, *ypy_, *out_; \
251 \
252 tpy = &src[(y + 1) * src_linesize]; \
253 tcy = &src[y * src_linesize]; \
254 xcy = &img_temp[y * width]; \
255 ycy_ = ycy; \
256 ypy_ = ypy; \
257 out_ = &img_out_f[y * width]; \
258 \
259 xcf = &in_factor[y * width]; \
260 ycf_ = ycf; \
261 ypf_ = ypf; \
262 factor_ = &map_factor_b[y * width]; \
263 for (int x = 0; x < width; x++) { \
264 type dr = abs((*tcy++) - (*tpy++)); \
265 int range_dist = dr; \
266 float weight = range_table[range_dist]; \
267 float alpha_ = weight*alpha; \
268 float ycc, fcc = inv_alpha_*(*xcf++) + alpha_*(*ypf_++); \
269 \
270 *ycf_++ = fcc; \
271 *factor_ = 0.5f * (*factor_ + fcc); \
272 \
273 ycc = inv_alpha_*(*xcy++) + alpha_*(*ypy_++); \
274 *ycy_++ = ycc; \
275 *out_ = 0.5f * (*out_ + ycc) / (*factor_); \
276 out_++; \
277 factor_++; \
278 } \
279 \
280 memcpy(ypy, ycy, sizeof(float) * width); \
281 memcpy(ypf, ycf, sizeof(float) * width); \
282 } \
283 \
284 for (int i = 0; i < height; i++) \
285 for (int j = 0; j < width; j++) \
286 dst[j + i * dst_linesize] = img_out_f[i * width + j]; \
287 }
288
BILATERAL(uint8_t,byte)289 BILATERAL(uint8_t, byte)
290 BILATERAL(uint16_t, word)
291
292 static int filter_frame(AVFilterLink *inlink, AVFrame *in)
293 {
294 AVFilterContext *ctx = inlink->dst;
295 BilateralContext *s = ctx->priv;
296 AVFilterLink *outlink = ctx->outputs[0];
297 AVFrame *out;
298
299 out = ff_get_video_buffer(outlink, outlink->w, outlink->h);
300 if (!out) {
301 av_frame_free(&in);
302 return AVERROR(ENOMEM);
303 }
304 av_frame_copy_props(out, in);
305
306 for (int plane = 0; plane < s->nb_planes; plane++) {
307 if (!(s->planes & (1 << plane))) {
308 av_image_copy_plane(out->data[plane], out->linesize[plane],
309 in->data[plane], in->linesize[plane],
310 s->planewidth[plane] * ((s->depth + 7) / 8), s->planeheight[plane]);
311 continue;
312 }
313
314 if (s->depth <= 8)
315 bilateral_byte(s, in->data[plane], out->data[plane], s->sigmaS, s->sigmaR,
316 s->planewidth[plane], s->planeheight[plane],
317 in->linesize[plane], out->linesize[plane]);
318 else
319 bilateral_word(s, in->data[plane], out->data[plane], s->sigmaS, s->sigmaR,
320 s->planewidth[plane], s->planeheight[plane],
321 in->linesize[plane] / 2, out->linesize[plane] / 2);
322 }
323
324 av_frame_free(&in);
325 return ff_filter_frame(outlink, out);
326 }
327
uninit(AVFilterContext * ctx)328 static av_cold void uninit(AVFilterContext *ctx)
329 {
330 BilateralContext *s = ctx->priv;
331
332 av_freep(&s->img_out_f);
333 av_freep(&s->img_temp);
334 av_freep(&s->map_factor_a);
335 av_freep(&s->map_factor_b);
336 av_freep(&s->slice_factor_a);
337 av_freep(&s->slice_factor_b);
338 av_freep(&s->line_factor_a);
339 av_freep(&s->line_factor_b);
340 }
341
342 static const AVFilterPad bilateral_inputs[] = {
343 {
344 .name = "default",
345 .type = AVMEDIA_TYPE_VIDEO,
346 .config_props = config_input,
347 .filter_frame = filter_frame,
348 },
349 { NULL }
350 };
351
352 static const AVFilterPad bilateral_outputs[] = {
353 {
354 .name = "default",
355 .type = AVMEDIA_TYPE_VIDEO,
356 },
357 { NULL }
358 };
359
360 AVFilter ff_vf_bilateral = {
361 .name = "bilateral",
362 .description = NULL_IF_CONFIG_SMALL("Apply Bilateral filter."),
363 .priv_size = sizeof(BilateralContext),
364 .priv_class = &bilateral_class,
365 .uninit = uninit,
366 .query_formats = query_formats,
367 .inputs = bilateral_inputs,
368 .outputs = bilateral_outputs,
369 .flags = AVFILTER_FLAG_SUPPORT_TIMELINE_GENERIC,
370 };
371