1 /*
2 * Copyright (c) 2021 Paul B Mahol
3 *
4 * This file is part of FFmpeg.
5 *
6 * FFmpeg is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
10 *
11 * FFmpeg is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
15 *
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with FFmpeg; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
19 */
20
21 #include "libavutil/avstring.h"
22 #include "libavutil/opt.h"
23 #include "libavutil/intreadwrite.h"
24 #include "libavutil/parseutils.h"
25 #include "libavutil/pixdesc.h"
26
27 #include "avfilter.h"
28 #include "drawutils.h"
29 #include "internal.h"
30 #include "video.h"
31
32 #include <float.h>
33
34 typedef struct ShearContext {
35 const AVClass *class;
36
37 float shx, shy;
38 int interp;
39
40 uint8_t fillcolor[4]; ///< color expressed either in YUVA or RGBA colorspace for the padding area
41 char *fillcolor_str;
42 int fillcolor_enable;
43 int nb_planes;
44 int depth;
45 FFDrawContext draw;
46 FFDrawColor color;
47
48 int hsub, vsub;
49 int planewidth[4];
50 int planeheight[4];
51
52 int (*filter_slice[2])(AVFilterContext *ctx, void *arg, int jobnr, int nb_jobs);
53 } ShearContext;
54
55 typedef struct ThreadData {
56 AVFrame *in, *out;
57 } ThreadData;
58
59 #define OFFSET(x) offsetof(ShearContext, x)
60 #define FLAGS AV_OPT_FLAG_FILTERING_PARAM|AV_OPT_FLAG_VIDEO_PARAM|AV_OPT_FLAG_RUNTIME_PARAM
61
62 static const AVOption shear_options[] = {
63 { "shx", "set x shear factor", OFFSET(shx), AV_OPT_TYPE_FLOAT, {.dbl=0.}, -2, 2, .flags=FLAGS },
64 { "shy", "set y shear factor", OFFSET(shy), AV_OPT_TYPE_FLOAT, {.dbl=0.}, -2, 2, .flags=FLAGS },
65 { "fillcolor", "set background fill color", OFFSET(fillcolor_str), AV_OPT_TYPE_STRING, {.str="black"}, 0, 0, .flags=FLAGS },
66 { "c", "set background fill color", OFFSET(fillcolor_str), AV_OPT_TYPE_STRING, {.str="black"}, 0, 0, .flags=FLAGS },
67 { "interp", "set interpolation", OFFSET(interp), AV_OPT_TYPE_INT, {.i64=1}, 0, 1, .flags=FLAGS, "interp" },
68 { "nearest", "nearest neighbour", 0, AV_OPT_TYPE_CONST, {.i64=0}, 0, 0, .flags=FLAGS, "interp" },
69 { "bilinear", "bilinear", 0, AV_OPT_TYPE_CONST, {.i64=1}, 0, 0, .flags=FLAGS, "interp" },
70 { NULL }
71 };
72
73 AVFILTER_DEFINE_CLASS(shear);
74
init(AVFilterContext * ctx)75 static av_cold int init(AVFilterContext *ctx)
76 {
77 ShearContext *s = ctx->priv;
78
79 if (!strcmp(s->fillcolor_str, "none"))
80 s->fillcolor_enable = 0;
81 else if (av_parse_color(s->fillcolor, s->fillcolor_str, -1, ctx) >= 0)
82 s->fillcolor_enable = 1;
83 else
84 return AVERROR(EINVAL);
85 return 0;
86 }
87
query_formats(AVFilterContext * ctx)88 static int query_formats(AVFilterContext *ctx)
89 {
90 static const enum AVPixelFormat pix_fmts[] = {
91 AV_PIX_FMT_GRAY8, AV_PIX_FMT_GRAY9,
92 AV_PIX_FMT_GRAY10, AV_PIX_FMT_GRAY12, AV_PIX_FMT_GRAY14,
93 AV_PIX_FMT_GRAY16,
94 AV_PIX_FMT_YUV410P, AV_PIX_FMT_YUV411P,
95 AV_PIX_FMT_YUV420P, AV_PIX_FMT_YUV422P,
96 AV_PIX_FMT_YUV440P, AV_PIX_FMT_YUV444P,
97 AV_PIX_FMT_YUVJ420P, AV_PIX_FMT_YUVJ422P,
98 AV_PIX_FMT_YUVJ440P, AV_PIX_FMT_YUVJ444P,
99 AV_PIX_FMT_YUVJ411P,
100 AV_PIX_FMT_YUV420P9, AV_PIX_FMT_YUV422P9, AV_PIX_FMT_YUV444P9,
101 AV_PIX_FMT_YUV420P10, AV_PIX_FMT_YUV422P10, AV_PIX_FMT_YUV444P10,
102 AV_PIX_FMT_YUV440P10,
103 AV_PIX_FMT_YUV444P12, AV_PIX_FMT_YUV422P12, AV_PIX_FMT_YUV420P12,
104 AV_PIX_FMT_YUV440P12,
105 AV_PIX_FMT_YUV444P14, AV_PIX_FMT_YUV422P14, AV_PIX_FMT_YUV420P14,
106 AV_PIX_FMT_YUV420P16, AV_PIX_FMT_YUV422P16, AV_PIX_FMT_YUV444P16,
107 AV_PIX_FMT_GBRP, AV_PIX_FMT_GBRP9, AV_PIX_FMT_GBRP10,
108 AV_PIX_FMT_GBRP12, AV_PIX_FMT_GBRP14, AV_PIX_FMT_GBRP16,
109 AV_PIX_FMT_YUVA420P, AV_PIX_FMT_YUVA422P, AV_PIX_FMT_YUVA444P,
110 AV_PIX_FMT_YUVA444P9, AV_PIX_FMT_YUVA444P10, AV_PIX_FMT_YUVA444P12, AV_PIX_FMT_YUVA444P16,
111 AV_PIX_FMT_YUVA422P9, AV_PIX_FMT_YUVA422P10, AV_PIX_FMT_YUVA422P12, AV_PIX_FMT_YUVA422P16,
112 AV_PIX_FMT_YUVA420P9, AV_PIX_FMT_YUVA420P10, AV_PIX_FMT_YUVA420P16,
113 AV_PIX_FMT_GBRAP, AV_PIX_FMT_GBRAP10, AV_PIX_FMT_GBRAP12, AV_PIX_FMT_GBRAP16,
114 AV_PIX_FMT_NONE
115 };
116
117 AVFilterFormats *fmts_list = ff_make_format_list(pix_fmts);
118 if (!fmts_list)
119 return AVERROR(ENOMEM);
120 return ff_set_common_formats(ctx, fmts_list);
121 }
122
123 #define NN(type, name) \
124 static int filter_slice_nn##name(AVFilterContext *ctx, void *arg, int jobnr, \
125 int nb_jobs) \
126 { \
127 ThreadData *td = arg; \
128 AVFrame *in = td->in; \
129 AVFrame *out = td->out; \
130 ShearContext *s = ctx->priv; \
131 const float shx = s->shx; \
132 const float shy = s->shy; \
133 \
134 for (int p = 0; p < s->nb_planes; p++) { \
135 const int hsub = (p == 1 || p == 2) ? s->hsub: 1; \
136 const int vsub = (p == 1 || p == 2) ? s->vsub: 1; \
137 const int width = s->planewidth[p]; \
138 const int height = s->planeheight[p]; \
139 const int wx = vsub * shx * height * 0.5f / hsub; \
140 const int wy = hsub * shy * width * 0.5f / vsub; \
141 const int slice_start = (height * jobnr) / nb_jobs; \
142 const int slice_end = (height * (jobnr+1)) / nb_jobs; \
143 const int src_linesize = in->linesize[p] / sizeof(type); \
144 const int dst_linesize = out->linesize[p] / sizeof(type); \
145 const type *src = (const type *)in->data[p]; \
146 type *dst = (type *)out->data[p] + slice_start * dst_linesize; \
147 \
148 for (int y = slice_start; y < slice_end; y++) { \
149 for (int x = 0; x < width; x++) { \
150 int sx = x + vsub * shx * y / hsub - wx; \
151 int sy = y + hsub * shy * x / vsub - wy; \
152 \
153 if (sx >= 0 && sx < width - 1 && \
154 sy >= 0 && sy < height - 1) { \
155 dst[x] = src[sy * src_linesize + sx]; \
156 } \
157 } \
158 \
159 dst += dst_linesize; \
160 } \
161 } \
162 \
163 return 0; \
164 }
165
166 NN(uint8_t, 8)
167 NN(uint16_t, 16)
168
169 #define BL(type, name) \
170 static int filter_slice_bl##name(AVFilterContext *ctx, void *arg, int jobnr, \
171 int nb_jobs) \
172 { \
173 ThreadData *td = arg; \
174 AVFrame *in = td->in; \
175 AVFrame *out = td->out; \
176 ShearContext *s = ctx->priv; \
177 const int depth = s->depth; \
178 const float shx = s->shx; \
179 const float shy = s->shy; \
180 \
181 for (int p = 0; p < s->nb_planes; p++) { \
182 const int hsub = (p == 1 || p == 2) ? s->hsub: 1; \
183 const int vsub = (p == 1 || p == 2) ? s->vsub: 1; \
184 const int width = s->planewidth[p]; \
185 const int height = s->planeheight[p]; \
186 const float wx = vsub * shx * height * 0.5f / hsub; \
187 const float wy = hsub * shy * width * 0.5f / vsub; \
188 const int slice_start = (height * jobnr) / nb_jobs; \
189 const int slice_end = (height * (jobnr+1)) / nb_jobs; \
190 const int src_linesize = in->linesize[p] / sizeof(type); \
191 const int dst_linesize = out->linesize[p] / sizeof(type); \
192 const type *src = (const type *)in->data[p]; \
193 type *dst = (type *)out->data[p] + slice_start * dst_linesize; \
194 \
195 for (int y = slice_start; y < slice_end; y++) { \
196 for (int x = 0; x < width; x++) { \
197 const float sx = x + vsub * shx * y / hsub - wx; \
198 const float sy = y + hsub * shy * x / vsub - wy; \
199 \
200 if (sx >= 0 && sx < width - 1 && \
201 sy >= 0 && sy < height - 1) { \
202 float sum = 0.f; \
203 int ax = floorf(sx); \
204 int ay = floorf(sy); \
205 float du = sx - ax; \
206 float dv = sy - ay; \
207 int bx = FFMIN(ax + 1, width - 1); \
208 int by = FFMIN(ay + 1, height - 1); \
209 \
210 sum += (1.f - du) * (1.f - dv) * src[ay * src_linesize + ax];\
211 sum += ( du) * (1.f - dv) * src[ay * src_linesize + bx];\
212 sum += (1.f - du) * ( dv) * src[by * src_linesize + ax];\
213 sum += ( du) * ( dv) * src[by * src_linesize + bx];\
214 dst[x] = av_clip_uintp2_c(lrintf(sum), depth); \
215 } \
216 } \
217 \
218 dst += dst_linesize; \
219 } \
220 } \
221 \
222 return 0; \
223 }
224
225 BL(uint8_t, 8)
226 BL(uint16_t, 16)
227
filter_frame(AVFilterLink * inlink,AVFrame * in)228 static int filter_frame(AVFilterLink *inlink, AVFrame *in)
229 {
230 AVFilterContext *ctx = inlink->dst;
231 ShearContext *s = ctx->priv;
232 AVFilterLink *outlink = ctx->outputs[0];
233 ThreadData td;
234 AVFrame *out;
235
236 out = ff_get_video_buffer(outlink, outlink->w, outlink->h);
237 if (!out) {
238 av_frame_free(&in);
239 return AVERROR(ENOMEM);
240 }
241 av_frame_copy_props(out, in);
242
243 /* fill background */
244 if (s->fillcolor_enable)
245 ff_fill_rectangle(&s->draw, &s->color, out->data, out->linesize,
246 0, 0, outlink->w, outlink->h);
247
248 td.in = in, td.out = out;
249 ctx->internal->execute(ctx, s->filter_slice[s->interp], &td, NULL, FFMIN(s->planeheight[1], ff_filter_get_nb_threads(ctx)));
250
251 av_frame_free(&in);
252 return ff_filter_frame(outlink, out);
253 }
254
config_output(AVFilterLink * outlink)255 static int config_output(AVFilterLink *outlink)
256 {
257 AVFilterContext *ctx = outlink->src;
258 ShearContext *s = ctx->priv;
259 const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(outlink->format);
260
261 s->nb_planes = av_pix_fmt_count_planes(outlink->format);
262 s->depth = desc->comp[0].depth;
263 s->hsub = 1 << desc->log2_chroma_w;
264 s->vsub = 1 << desc->log2_chroma_h;
265 s->planewidth[1] = s->planewidth[2] = AV_CEIL_RSHIFT(ctx->inputs[0]->w, desc->log2_chroma_w);
266 s->planewidth[0] = s->planewidth[3] = ctx->inputs[0]->w;
267 s->planeheight[1] = s->planeheight[2] = AV_CEIL_RSHIFT(ctx->inputs[0]->h, desc->log2_chroma_h);
268 s->planeheight[0] = s->planeheight[3] = ctx->inputs[0]->h;
269
270 ff_draw_init(&s->draw, outlink->format, 0);
271 ff_draw_color(&s->draw, &s->color, s->fillcolor);
272
273 s->filter_slice[0] = s->depth <= 8 ? filter_slice_nn8 : filter_slice_nn16;
274 s->filter_slice[1] = s->depth <= 8 ? filter_slice_bl8 : filter_slice_bl16;
275
276 return 0;
277 }
278
process_command(AVFilterContext * ctx,const char * cmd,const char * arg,char * res,int res_len,int flags)279 static int process_command(AVFilterContext *ctx,
280 const char *cmd,
281 const char *arg,
282 char *res,
283 int res_len,
284 int flags)
285 {
286 ShearContext *s = ctx->priv;
287 int ret;
288
289 ret = ff_filter_process_command(ctx, cmd, arg, res, res_len, flags);
290 if (ret < 0)
291 return ret;
292
293 ret = init(ctx);
294 if (ret < 0)
295 return ret;
296 ff_draw_color(&s->draw, &s->color, s->fillcolor);
297
298 return 0;
299 }
300
301 static const AVFilterPad inputs[] = {
302 {
303 .name = "default",
304 .type = AVMEDIA_TYPE_VIDEO,
305 .filter_frame = filter_frame,
306 },
307 { NULL }
308 };
309
310 static const AVFilterPad outputs[] = {
311 {
312 .name = "default",
313 .type = AVMEDIA_TYPE_VIDEO,
314 .config_props = config_output,
315 },
316 { NULL }
317 };
318
319 AVFilter ff_vf_shear = {
320 .name = "shear",
321 .description = NULL_IF_CONFIG_SMALL("Shear transform the input image."),
322 .priv_size = sizeof(ShearContext),
323 .init = init,
324 .query_formats = query_formats,
325 .inputs = inputs,
326 .outputs = outputs,
327 .priv_class = &shear_class,
328 .flags = AVFILTER_FLAG_SUPPORT_TIMELINE_GENERIC | AVFILTER_FLAG_SLICE_THREADS,
329 .process_command = process_command,
330 };
331