summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Changelog1
-rw-r--r--doc/filters.texi39
-rw-r--r--libavfilter/Makefile1
-rw-r--r--libavfilter/allfilters.c1
-rw-r--r--libavfilter/version.h2
-rw-r--r--libavfilter/vf_morpho.c939
6 files changed, 982 insertions, 1 deletions
diff --git a/Changelog b/Changelog
index d0b1a9724e..78662416a4 100644
--- a/Changelog
+++ b/Changelog
@@ -20,6 +20,7 @@ version <next>:
- MSN Siren decoder
- scharr video filter
- apsyclip audio filter
+- morpho video filter
version 4.4:
diff --git a/doc/filters.texi b/doc/filters.texi
index 0b7e21f7f8..568c2995bc 100644
--- a/doc/filters.texi
+++ b/doc/filters.texi
@@ -10257,6 +10257,7 @@ A number representing position of the first frame with respect to the telecine
pattern. This is to be used if the stream is cut. The default value is @code{0}.
@end table
+@anchor{dilation}
@section dilation
Apply dilation effect to the video.
@@ -11577,6 +11578,7 @@ value.
@end table
+@anchor{erosion}
@section erosion
Apply erosion effect to the video.
@@ -15352,6 +15354,43 @@ Default value is 0.
This filter supports the all above options as @ref{commands}.
+@section morpho
+
+This filter allows to apply main morphological grayscale transforms,
+erode and dilate with arbitrary structures set in second input stream.
+
+Unlike naive implementation and much slower performance in @ref{erosion}
+and @ref{dilation} filters, when speed is critical @code{morpho} filter
+should be used instead.
+
+A description of accepted options follows,
+
+@table @option
+@item mode
+Set morphological transform to apply, can be:
+
+@table @samp
+@item erode
+@item dilate
+@item open
+@item close
+@end table
+Default is @code{erode}.
+
+@item planes
+Set planes to filter, by default all planes except alpha are filtered.
+
+@item structure
+Set which structure video frames will be processed from second input stream,
+can be @var{first} or @var{all}. Default is @var{all}.
+@end table
+
+The @code{morpho} filter also supports the @ref{framesync} options.
+
+@subsection Commands
+
+This filter supports same @ref{commands} as options.
+
@section mpdecimate
Drop frames that do not differ greatly from the previous frame in
diff --git a/libavfilter/Makefile b/libavfilter/Makefile
index f059f3fef8..fa2d18e45f 100644
--- a/libavfilter/Makefile
+++ b/libavfilter/Makefile
@@ -344,6 +344,7 @@ OBJS-$(CONFIG_MIDEQUALIZER_FILTER) += vf_midequalizer.o framesync.o
OBJS-$(CONFIG_MINTERPOLATE_FILTER) += vf_minterpolate.o motion_estimation.o
OBJS-$(CONFIG_MIX_FILTER) += vf_mix.o framesync.o
OBJS-$(CONFIG_MONOCHROME_FILTER) += vf_monochrome.o
+OBJS-$(CONFIG_MORPHO_FILTER) += vf_morpho.o
OBJS-$(CONFIG_MPDECIMATE_FILTER) += vf_mpdecimate.o
OBJS-$(CONFIG_NEGATE_FILTER) += vf_lut.o
OBJS-$(CONFIG_NLMEANS_FILTER) += vf_nlmeans.o
diff --git a/libavfilter/allfilters.c b/libavfilter/allfilters.c
index ddd6404228..338561a446 100644
--- a/libavfilter/allfilters.c
+++ b/libavfilter/allfilters.c
@@ -329,6 +329,7 @@ extern const AVFilter ff_vf_midequalizer;
extern const AVFilter ff_vf_minterpolate;
extern const AVFilter ff_vf_mix;
extern const AVFilter ff_vf_monochrome;
+extern const AVFilter ff_vf_morpho;
extern const AVFilter ff_vf_mpdecimate;
extern const AVFilter ff_vf_msad;
extern const AVFilter ff_vf_negate;
diff --git a/libavfilter/version.h b/libavfilter/version.h
index 24b59acde6..ab5eb14634 100644
--- a/libavfilter/version.h
+++ b/libavfilter/version.h
@@ -30,7 +30,7 @@
#include "libavutil/version.h"
#define LIBAVFILTER_VERSION_MAJOR 8
-#define LIBAVFILTER_VERSION_MINOR 9
+#define LIBAVFILTER_VERSION_MINOR 10
#define LIBAVFILTER_VERSION_MICRO 100
diff --git a/libavfilter/vf_morpho.c b/libavfilter/vf_morpho.c
new file mode 100644
index 0000000000..fd181ddaa5
--- /dev/null
+++ b/libavfilter/vf_morpho.c
@@ -0,0 +1,939 @@
+/*
+ * Copyright (c) 2016 ReneBrals
+ * Copyright (c) 2021 Paul B Mahol
+ *
+ * This file is part of FFmpeg.
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a copy
+ * of this software and associated documentation files (the "Software"), to deal
+ * in the Software without restriction, including without limitation the rights
+ * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+ * copies of the Software, and to permit persons to whom the Software is
+ * furnished to do so, subject to the following conditions:
+ *
+ * The above copyright notice and this permission notice shall be included in all
+ * copies or substantial portions of the Software.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+ * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+ * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+ * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
+ * SOFTWARE.
+ */
+
+#include "libavutil/avassert.h"
+#include "libavutil/imgutils.h"
+#include "libavutil/intreadwrite.h"
+#include "libavutil/opt.h"
+#include "libavutil/pixdesc.h"
+#include "avfilter.h"
+#include "formats.h"
+#include "framesync.h"
+#include "internal.h"
+#include "video.h"
+
+enum MorphModes {
+ ERODE,
+ DILATE,
+ OPEN,
+ CLOSE,
+ NB_MODES
+};
+
+typedef struct IPlane {
+ uint8_t **img;
+ int w, h;
+ int range;
+ int depth;
+ int type_size;
+
+ void (*max)(uint8_t *c, const uint8_t *a, const uint8_t *b, int x);
+ void (*min)(uint8_t *c, const uint8_t *a, const uint8_t *b, int x);
+ void (*max_in_place)(uint8_t *a, const uint8_t *b, int x);
+ void (*min_in_place)(uint8_t *a, const uint8_t *b, int x);
+} IPlane;
+
+typedef struct LUT {
+ uint8_t ***arr;
+ int min_r;
+ int max_r;
+ int I;
+ int X;
+ int pre_pad_x;
+ int type_size;
+} LUT;
+
+typedef struct chord {
+ int x;
+ int y;
+ int l;
+ int i;
+} chord;
+
+typedef struct chord_set {
+ chord *C;
+ int size;
+ int cap;
+
+ int *R;
+ int Lnum;
+
+ int minX;
+ int maxX;
+ int minY;
+ int maxY;
+ unsigned nb_elements;
+} chord_set;
+
+typedef struct MorphoContext {
+ const AVClass *class;
+ FFFrameSync fs;
+
+ chord_set SE[4];
+ IPlane SEimg[4];
+ IPlane g[4], f[4], h[4];
+ LUT Ty[2][4];
+
+ int mode;
+ int planes;
+ int structures;
+
+ int planewidth[4];
+ int planeheight[4];
+ int splanewidth[4];
+ int splaneheight[4];
+ int depth;
+ int type_size;
+ int nb_planes;
+
+ int got_structure[4];
+
+ AVFrame *temp;
+
+ int64_t *plane_f, *plane_g;
+} MorphoContext;
+
+#define OFFSET(x) offsetof(MorphoContext, x)
+#define FLAGS AV_OPT_FLAG_VIDEO_PARAM | AV_OPT_FLAG_FILTERING_PARAM | AV_OPT_FLAG_RUNTIME_PARAM
+
+static const AVOption morpho_options[] = {
+ { "mode", "set morphological transform", OFFSET(mode), AV_OPT_TYPE_INT, {.i64=0}, 0, NB_MODES-1, FLAGS, "mode" },
+ { "erode", NULL, 0, AV_OPT_TYPE_CONST, {.i64=ERODE}, 0, 0, FLAGS, "mode" },
+ { "dilate", NULL, 0, AV_OPT_TYPE_CONST, {.i64=DILATE}, 0, 0, FLAGS, "mode" },
+ { "open", NULL, 0, AV_OPT_TYPE_CONST, {.i64=OPEN}, 0, 0, FLAGS, "mode" },
+ { "close", NULL, 0, AV_OPT_TYPE_CONST, {.i64=CLOSE}, 0, 0, FLAGS, "mode" },
+ { "planes", "set planes to filter", OFFSET(planes), AV_OPT_TYPE_INT, {.i64=7}, 0, 15, FLAGS },
+ { "structure", "when to process structures", OFFSET(structures), AV_OPT_TYPE_INT, {.i64=1}, 0, 1, FLAGS, "str" },
+ { "first", "process only first structure, ignore rest", 0, AV_OPT_TYPE_CONST, {.i64=0}, 0, 0, FLAGS, "str" },
+ { "all", "process all structure", 0, AV_OPT_TYPE_CONST, {.i64=1}, 0, 0, FLAGS, "str" },
+ { NULL }
+};
+
+FRAMESYNC_DEFINE_CLASS(morpho, MorphoContext, fs);
+
+static int query_formats(AVFilterContext *ctx)
+{
+ static const enum AVPixelFormat pix_fmts[] = {
+ AV_PIX_FMT_YUVA444P, AV_PIX_FMT_YUV444P, AV_PIX_FMT_YUV440P,
+ AV_PIX_FMT_YUVJ444P, AV_PIX_FMT_YUVJ440P,
+ AV_PIX_FMT_YUVA422P, AV_PIX_FMT_YUV422P, AV_PIX_FMT_YUVA420P, AV_PIX_FMT_YUV420P,
+ AV_PIX_FMT_YUVJ422P, AV_PIX_FMT_YUVJ420P,
+ AV_PIX_FMT_YUVJ411P, AV_PIX_FMT_YUV411P, AV_PIX_FMT_YUV410P,
+ AV_PIX_FMT_GBRP, AV_PIX_FMT_GBRAP, AV_PIX_FMT_GRAY8, AV_PIX_FMT_GRAY9,
+ AV_PIX_FMT_YUV420P9, AV_PIX_FMT_YUV422P9, AV_PIX_FMT_YUV444P9, AV_PIX_FMT_GBRP9,
+ AV_PIX_FMT_YUVA420P9, AV_PIX_FMT_YUVA422P9, AV_PIX_FMT_YUVA444P9,
+ AV_PIX_FMT_YUV420P10, AV_PIX_FMT_YUV422P10, AV_PIX_FMT_YUV444P10,
+ AV_PIX_FMT_YUV420P12, AV_PIX_FMT_YUV422P12, AV_PIX_FMT_YUV444P12, AV_PIX_FMT_YUV440P12,
+ AV_PIX_FMT_YUV420P14, AV_PIX_FMT_YUV422P14, AV_PIX_FMT_YUV444P14,
+ AV_PIX_FMT_YUV420P16, AV_PIX_FMT_YUV422P16, AV_PIX_FMT_YUV444P16,
+ AV_PIX_FMT_YUVA420P10, AV_PIX_FMT_YUVA422P10, AV_PIX_FMT_YUVA444P10,
+ AV_PIX_FMT_YUVA422P12, AV_PIX_FMT_YUVA444P12,
+ AV_PIX_FMT_YUVA420P16, AV_PIX_FMT_YUVA422P16, AV_PIX_FMT_YUVA444P16,
+ AV_PIX_FMT_GBRP10, AV_PIX_FMT_GBRP12, AV_PIX_FMT_GBRP14, AV_PIX_FMT_GBRP16,
+ AV_PIX_FMT_GBRAP10, AV_PIX_FMT_GBRAP12, AV_PIX_FMT_GBRAP16,
+ AV_PIX_FMT_GRAY10, AV_PIX_FMT_GRAY12, AV_PIX_FMT_GRAY14, AV_PIX_FMT_GRAY16,
+ AV_PIX_FMT_NONE
+ };
+
+ return ff_set_common_formats_from_list(ctx, pix_fmts);
+}
+
+static void min_fun(uint8_t *c, const uint8_t *a, const uint8_t *b, int x)
+{
+ for (int i = 0; i < x; i++)
+ c[i] = FFMIN(b[i], a[i]);
+}
+
+static void mininplace_fun(uint8_t *a, const uint8_t *b, int x)
+{
+ for (int i = 0; i < x; i++)
+ a[i] = FFMIN(a[i], b[i]);
+}
+
+static void max_fun(uint8_t *c, const uint8_t *a, const uint8_t *b, int x)
+{
+ for (int i = 0; i < x; i++)
+ c[i] = FFMAX(a[i], b[i]);
+}
+
+static void maxinplace_fun(uint8_t *a, const uint8_t *b, int x)
+{
+ for (int i = 0; i < x; i++)
+ a[i] = FFMAX(a[i], b[i]);
+}
+
+static void min16_fun(uint8_t *cc, const uint8_t *aa, const uint8_t *bb, int x)
+{
+ const uint16_t *a = (const uint16_t *)aa;
+ const uint16_t *b = (const uint16_t *)bb;
+ uint16_t *c = (uint16_t *)cc;
+
+ for (int i = 0; i < x; i++)
+ c[i] = FFMIN(b[i], a[i]);
+}
+
+static void mininplace16_fun(uint8_t *aa, const uint8_t *bb, int x)
+{
+ uint16_t *a = (uint16_t *)aa;
+ const uint16_t *b = (const uint16_t *)bb;
+
+ for (int i = 0; i < x; i++)
+ a[i] = FFMIN(a[i], b[i]);
+}
+
+static void max16_fun(uint8_t *cc, const uint8_t *aa, const uint8_t *bb, int x)
+{
+ const uint16_t *a = (const uint16_t *)aa;
+ const uint16_t *b = (const uint16_t *)bb;
+ uint16_t *c = (uint16_t *)cc;
+
+ for (int i = 0; i < x; i++)
+ c[i] = FFMAX(a[i], b[i]);
+}
+
+static void maxinplace16_fun(uint8_t *aa, const uint8_t *bb, int x)
+{
+ uint16_t *a = (uint16_t *)aa;
+ const uint16_t *b = (const uint16_t *)bb;
+
+ for (int i = 0; i < x; i++)
+ a[i] = FFMAX(a[i], b[i]);
+}
+
+static int alloc_lut(LUT *Ty, chord_set *SE, int type_size, int mode)
+{
+ const int size = Ty->max_r + 1 - Ty->min_r;
+ int pre_pad_x = 0;
+
+ if (SE->minX < 0)
+ pre_pad_x = 0 - SE->minX;
+ Ty->pre_pad_x = pre_pad_x;
+ Ty->type_size = type_size;
+
+ Ty->arr = av_calloc(size, sizeof(*Ty->arr));
+ if (!Ty->arr)
+ return AVERROR(ENOMEM);
+ for (int r = 0; r < Ty->max_r - Ty->min_r + 1; r++) {
+ Ty->arr[r] = av_calloc(Ty->I, sizeof(uint8_t *));
+ if (!Ty->arr[r])
+ return AVERROR(ENOMEM);
+ for (int i = 0; i < Ty->I; i++) {
+ Ty->arr[r][i] = av_calloc(Ty->X + pre_pad_x, type_size);
+ if (!Ty->arr[r][i])
+ return AVERROR(ENOMEM);
+ if (mode == ERODE)
+ memset(Ty->arr[r][i], UINT8_MAX, pre_pad_x * type_size);
+ /* Shifting the X index such that negative indices correspond to
+ * the pre-padding.
+ */
+ Ty->arr[r][i] = &(Ty->arr[r][i][pre_pad_x * type_size]);
+ }
+ }
+
+ Ty->arr = &(Ty->arr[0 - Ty->min_r]);
+
+ return 0;
+}
+
+static void free_lut(LUT *table)
+{
+ uint8_t ***rp;
+
+ if (!table->arr)
+ return;
+
+ // The R index was shifted, create a pointer to the original array
+ rp = &(table->arr[table->min_r]);
+
+ for (int r = table->min_r; r <= table->max_r; r++) {
+ for (int i = 0; i < table->I; i++) {
+ // The X index was also shifted, for padding purposes.
+ av_free(table->arr[r][i] - table->pre_pad_x * table->type_size);
+ }
+ av_freep(&table->arr[r]);
+ }
+ av_freep(&rp);
+}
+
+static void circular_swap(LUT *Ty)
+{
+ /*
+ * Swap the pointers to r-indices in a circle. This is useful because
+ * Ty(r,i,x) = Ty-1(r+1,i,x) for r < ymax.
+ */
+ if (Ty->max_r - Ty->min_r > 0) {
+ uint8_t **Ty0 = Ty->arr[Ty->min_r];
+
+ for (int r = Ty->min_r; r < Ty->max_r; r++)
+ Ty->arr[r] = Ty->arr[r + 1];
+
+ Ty->arr[Ty->max_r] = Ty0;
+ }
+}
+
+static void compute_min_row(IPlane *f, LUT *Ty, chord_set *SE, int r, int y)
+{
+ if (y + r >= 0 && y + r < f->h) {
+ memcpy(Ty->arr[r][0], f->img[y + r], Ty->X * Ty->type_size);
+ } else {
+ memset(Ty->arr[r][0], UINT8_MAX, Ty->X * Ty->type_size);
+ }
+
+ for (int i = 1; i < SE->Lnum; i++) {
+ int d = SE->R[i] - SE->R[i - 1];
+
+ f->min(Ty->arr[r][i] - Ty->pre_pad_x * f->type_size,
+ Ty->arr[r][i - 1] - Ty->pre_pad_x * f->type_size,
+ Ty->arr[r][i - 1] + (d - Ty->pre_pad_x) * f->type_size,
+ Ty->X + Ty->pre_pad_x - d);
+ memcpy(Ty->arr[r][i] + (Ty->X - d) * f->type_size,
+ Ty->arr[r][i - 1] + (Ty->X - d) * f->type_size,
+ d * f->type_size);
+ }
+}
+
+static void update_min_lut(IPlane *f, LUT *Ty, chord_set *SE, int y, int tid, int num)
+{
+ for (int i = 0; i < num; i++)
+ circular_swap(Ty);
+
+ compute_min_row(f, Ty, SE, Ty->max_r - tid, y);
+}
+
+static int compute_min_lut(LUT *Ty, IPlane *f, chord_set *SE, int y, int num)
+{
+ if (Ty->I != SE->Lnum ||
+ Ty->X != f->w ||
+ Ty->min_r != SE->minY ||
+ Ty->max_r != SE->maxY + num - 1) {
+ int ret;
+
+ free_lut(Ty);
+
+ Ty->I = SE->Lnum;
+ Ty->X = f->w;
+ Ty->min_r = SE->minY;
+ Ty->max_r = SE->maxY + num - 1;
+ ret = alloc_lut(Ty, SE, f->type_size, ERODE);
+ if (ret < 0)
+ return ret;
+ }
+
+ for (int r = Ty->min_r; r <= Ty->max_r; r++)
+ compute_min_row(f, Ty, SE, r, y);
+
+ return 0;
+}
+
+static void compute_max_row(IPlane *f, LUT *Ty, chord_set *SE, int r, int y)
+{
+ if (y + r >= 0 && y + r < f->h) {
+ memcpy(Ty->arr[r][0], f->img[y + r], Ty->X * Ty->type_size);
+ } else {
+ memset(Ty->arr[r][0], 0, Ty->X * Ty->type_size);
+ }
+
+ for (int i = 1; i < SE->Lnum; i++) {
+ int d = SE->R[i] - SE->R[i - 1];
+
+ f->max(Ty->arr[r][i] - Ty->pre_pad_x * f->type_size,
+ Ty->arr[r][i - 1] - Ty->pre_pad_x * f->type_size,
+ Ty->arr[r][i - 1] + (d - Ty->pre_pad_x) * f->type_size,
+ Ty->X + Ty->pre_pad_x - d);
+ memcpy(Ty->arr[r][i] + (Ty->X - d) * f->type_size,
+ Ty->arr[r][i - 1] + (Ty->X - d) * f->type_size,
+ d * f->type_size);
+ }
+}
+
+static void update_max_lut(IPlane *f, LUT *Ty, chord_set *SE, int y, int tid, int num)
+{
+ for (int i = 0; i < num; i++)
+ circular_swap(Ty);
+
+ compute_max_row(f, Ty, SE, Ty->max_r - tid, y);
+}
+
+static int compute_max_lut(LUT *Ty, IPlane *f, chord_set *SE, int y, int num)
+{
+ if (Ty->I != SE->Lnum ||
+ Ty->X != f->w ||
+ Ty->min_r != SE->minY ||
+ Ty->max_r != SE->maxY + num - 1) {
+ int ret;
+
+ free_lut(Ty);
+
+ Ty->I = SE->Lnum;
+ Ty->X = f->w;
+ Ty->min_r = SE->minY;
+ Ty->max_r = SE->maxY + num - 1;
+ ret = alloc_lut(Ty, SE, f->type_size, DILATE);
+ if (ret < 0)
+ return ret;
+ }
+
+ for (int r = Ty->min_r; r <= Ty->max_r; r++)
+ compute_max_row(f, Ty, SE, r, y);
+
+ return 0;
+}
+
+static void line_dilate(IPlane *g, LUT *Ty, chord_set *SE, int y, int tid)
+{
+ memset(g->img[y], 0, g->w * g->type_size);
+
+ for (int c = 0; c < SE->size; c++) {
+ g->max_in_place(g->img[y],
+ Ty->arr[SE->C[c].y + tid][SE->C[c].i] + SE->C[c].x * Ty->type_size,
+ av_clip(g->w - SE->C[c].x, 0, g->w));
+ }
+}
+
+static void line_erode(IPlane *g, LUT *Ty, chord_set *SE, int y, int tid)
+{
+ memset(g->img[y], UINT8_MAX, g->w * g->type_size);
+
+ for (int c = 0; c < SE->size; c++) {
+ g->min_in_place(g->img[y],
+ Ty->arr[SE->C[c].y + tid][SE->C[c].i] + SE->C[c].x * Ty->type_size,
+ av_clip(g->w - SE->C[c].x, 0, g->w));
+ }
+}
+
+static int dilate(IPlane *g, IPlane *f, chord_set *SE, LUT *Ty)
+{
+ int ret = compute_max_lut(Ty, f, SE, 0, 1);
+ if (ret < 0)
+ return ret;
+
+ line_dilate(g, Ty, SE, 0, 0);
+ for (int y = 1; y < f->h; y++) {
+ update_max_lut(f, Ty, SE, y, 0, 1);
+ line_dilate(g, Ty, SE, y, 0);
+ }
+
+ return 0;
+}
+
+static int erode(IPlane *g, IPlane *f, chord_set *SE, LUT *Ty)
+{
+ int ret = compute_min_lut(Ty, f, SE, 0, 1);
+ if (ret < 0)
+ return ret;
+
+ line_erode(g, Ty, SE, 0, 0);
+ for (int y = 1; y < f->h; y++) {
+ update_min_lut(f, Ty, SE, y, 0, 1);
+ line_erode(g, Ty, SE, y, 0);
+ }
+
+ return 0;
+}
+
+static int insert_chord_set(chord_set *chords, chord c)
+{
+ // Checking if chord fits in dynamic array, resize if not.
+ if (chords->size == chords->cap) {
+ chords->C = av_realloc_f(chords->C, chords->cap * 2, sizeof(chord));
+ if (!chords->C)
+ return AVERROR(ENOMEM);
+ chords->cap *= 2;
+ }
+
+ // Add the chord to the dynamic array.
+ chords->C[chords->size].x = c.x;
+ chords->C[chords->size].y = c.y;
+ chords->C[chords->size++].l = c.l;
+
+ // Update minimum/maximum x/y offsets of the chord set.
+ chords->minX = FFMIN(chords->minX, c.x);
+ chords->maxX = FFMAX(chords->maxX, c.x);
+
+ chords->minY = FFMIN(chords->minY, c.y);
+ chords->maxY = FFMAX(chords->maxY, c.y);
+
+ return 0;
+}
+
+static void free_chord_set(chord_set *SE)
+{
+ av_freep(&SE->C);
+ SE->size = 0;
+ SE->cap = 0;
+
+ av_freep(&SE->R);
+ SE->Lnum = 0;
+}
+
+static int init_chordset(chord_set *chords)
+{
+ chords->nb_elements = 0;
+ chords->size = 0;
+ chords->C = av_calloc(1, sizeof(chord));
+ if (!chords->C)
+ return AVERROR(ENOMEM);
+
+ chords->cap = 1;
+ chords->minX = INT16_MAX;
+ chords->maxX = INT16_MIN;
+ chords->minY = INT16_MAX;
+ chords->maxY = INT16_MIN;
+
+ return 0;
+}
+
+static int comp_chord_length(const void *p, const void *q)
+{
+ chord a, b;
+ a = *((chord *)p);
+ b = *((chord *)q);
+
+ return (a.l > b.l) - (a.l < b.l);
+}
+
+static int comp_chord(const void *p, const void *q)
+{
+ chord a, b;
+ a = *((chord *)p);
+ b = *((chord *)q);
+
+ return (a.y > b.y) - (a.y < b.y);
+}
+
+static int build_chord_set(IPlane *SE, chord_set *chords)
+{
+ const int mid = 1 << (SE->depth - 1);
+ int chord_length_index;
+ int chord_start, val, ret;
+ int centerX, centerY;
+ int r_cap = 1;
+ chord c;
+
+ ret = init_chordset(chords);
+ if (ret < 0)
+ return ret;
+ /*
+ * In erosion/dilation, the center of the IPlane has S.E. offset (0,0).
+ * Otherwise, the resulting IPlane would be shifted to the top-left.
+ */
+ centerX = (SE->w - 1) / 2;
+ centerY = (SE->h - 1) / 2;
+
+ /*
+ * Computing the set of chords C.
+ */
+ for (int y = 0; y < SE->h; y++) {
+ int x;
+
+ chord_start = -1;
+ for (x = 0; x < SE->w; x++) {
+ if (SE->type_size == 1) {
+ chords->nb_elements += (SE->img[y][x] >= mid);
+ //A chord is a run of non-zero pixels.
+ if (SE->img[y][x] >= mid && chord_start == -1) {
+ // Chord starts.
+ chord_start = x;
+ } else if (SE->img[y][x] < mid && chord_start != -1) {
+ // Chord ends before end of line.
+ c.x = chord_start - centerX;
+ c.y = y - centerY;
+ c.l = x - chord_start;
+ ret = insert_chord_set(chords, c);
+ if (ret < 0)
+ return AVERROR(ENOMEM);
+ chord_start = -1;
+ }
+ } else {
+ chords->nb_elements += (AV_RN16(&SE->img[y][x * 2]) >= mid);
+ //A chord is a run of non-zero pixels.
+ if (AV_RN16(&SE->img[y][x * 2]) >= mid && chord_start == -1) {
+ // Chord starts.
+ chord_start = x;
+ } else if (AV_RN16(&SE->img[y][x * 2]) < mid && chord_start != -1) {
+ // Chord ends before end of line.
+ c.x = chord_start - centerX;
+ c.y = y - centerY;
+ c.l = x - chord_start;
+ ret = insert_chord_set(chords, c);
+ if (ret < 0)
+ return AVERROR(ENOMEM);
+ chord_start = -1;
+ }
+ }
+ }
+ if (chord_start != -1) {
+ // Chord ends at end of line.
+ c.x = chord_start - centerX;
+ c.y = y - centerY;
+ c.l = x - chord_start;
+ ret = insert_chord_set(chords, c);
+ if (ret < 0)
+ return AVERROR(ENOMEM);
+ }
+ }
+
+ /*
+ * Computing the array of chord lengths R(i).
+ * This is needed because the lookup table will contain a row for each
+ * length index i.
+ */
+ qsort(chords->C, chords->size, sizeof(chord), comp_chord_length);
+ chords->R = av_calloc(1, sizeof(*chords->R));
+ if (!chords->R)
+ return AVERROR(ENOMEM);
+ chords->Lnum = 0;
+ val = 0;
+ r_cap = 1;
+
+ if (chords->size > 0) {
+ val = 1;
+ if (chords->Lnum >= r_cap) {
+ chords->R = av_realloc_f(chords->R, r_cap * 2, sizeof(*chords->R));
+ if (!chords->R)
+ return AVERROR(ENOMEM);
+ r_cap *= 2;
+ }
+ chords->R[chords->Lnum++] = 1;
+ val = 1;
+ }
+
+ for (int i = 0; i < chords->size; i++) {
+ if (val != chords->C[i].l) {
+ while (2 * val < chords->C[i].l && val != 0) {
+ if (chords->Lnum >= r_cap) {
+ chords->R = av_realloc_f(chords->R, r_cap * 2, sizeof(*chords->R));
+ if (!chords->R)
+ return AVERROR(ENOMEM);
+ r_cap *= 2;
+ }
+
+ chords->R[chords->Lnum++] = 2 * val;
+ val *= 2;
+ }
+ val = chords->C[i].l;
+
+ if (chords->Lnum >= r_cap) {
+ chords->R = av_realloc_f(chords->R, r_cap * 2, sizeof(*chords->R));
+ if (!chords->R)
+ return AVERROR(ENOMEM);
+ r_cap *= 2;
+ }
+ chords->R[chords->Lnum++] = val;
+ }
+ }
+
+ /*
+ * Setting the length indices of chords.
+ * These are needed so that the algorithm can, for each chord,
+ * access the lookup table at the correct length in constant time.
+ */
+ chord_length_index = 0;
+ for (int i = 0; i < chords->size; i++) {
+ while (chords->R[chord_length_index] < chords->C[i].l)
+ chord_length_index++;
+ chords->C[i].i = chord_length_index;
+ }
+
+ /*
+ * Chords are sorted on Y. This way, when a row of the lookup table or IPlane
+ * is cached, the next chord offset has a better chance of being on the
+ * same cache line.
+ */
+ qsort(chords->C, chords->size, sizeof(chord), comp_chord);
+
+ return 0;
+}
+
+static void free_iplane(IPlane *imp)
+{
+ av_freep(&imp->img);
+}
+
+static int read_iplane(IPlane *imp, const uint8_t *dst, int dst_linesize,
+ int w, int h, int R, int type_size, int depth)
+{
+ if (!imp->img)
+ imp->img = av_calloc(h, sizeof(*imp->img));
+ if (!imp->img)
+ return AVERROR(ENOMEM);
+
+ imp->w = w;
+ imp->h = h;
+ imp->range = R;
+ imp->depth = depth;
+ imp->type_size = type_size;
+ imp->max = type_size == 1 ? max_fun : max16_fun;
+ imp->min = type_size == 1 ? min_fun : min16_fun;
+ imp->max_in_place = type_size == 1 ? maxinplace_fun : maxinplace16_fun;
+ imp->min_in_place = type_size == 1 ? mininplace_fun : mininplace16_fun;
+
+ for (int y = 0; y < h; y++)
+ imp->img[y] = (uint8_t *)dst + y * dst_linesize;
+
+ return 0;
+}
+
+static int config_input(AVFilterLink *inlink)
+{
+ const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(inlink->format);
+ MorphoContext *s = inlink->dst->priv;
+
+ s->depth = desc->comp[0].depth;
+ s->type_size = (s->depth + 7) / 8;
+ s->nb_planes = desc->nb_components;
+ s->planewidth[1] = s->planewidth[2] = AV_CEIL_RSHIFT(inlink->w, desc->log2_chroma_w);
+ s->planewidth[0] = s->planewidth[3] = inlink->w;
+ s->planeheight[1] = s->planeheight[2] = AV_CEIL_RSHIFT(inlink->h, desc->log2_chroma_h);
+ s->planeheight[0] = s->planeheight[3] = inlink->h;
+
+ return 0;
+}
+
+static int config_input_structure(AVFilterLink *inlink)
+{
+ const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(inlink->format);
+ AVFilterContext *ctx = inlink->dst;
+ MorphoContext *s = inlink->dst->priv;
+
+ av_assert0(ctx->inputs[0]->format == ctx->inputs[1]->format);
+
+ s->splanewidth[1] = s->splanewidth[2] = AV_CEIL_RSHIFT(inlink->w, desc->log2_chroma_w);
+ s->splanewidth[0] = s->splanewidth[3] = inlink->w;
+ s->splaneheight[1] = s->splaneheight[2] = AV_CEIL_RSHIFT(inlink->h, desc->log2_chroma_h);
+ s->splaneheight[0] = s->splaneheight[3] = inlink->h;
+
+ return 0;
+}
+
+static int activate(AVFilterContext *ctx)
+{
+ MorphoContext *s = ctx->priv;
+ return ff_framesync_activate(&s->fs);
+}
+
+static int do_morpho(FFFrameSync *fs)
+{
+ AVFilterContext *ctx = fs->parent;
+ AVFilterLink *outlink = ctx->outputs[0];
+ MorphoContext *s = ctx->priv;
+ AVFrame *in = NULL, *structurepic = NULL;
+ AVFrame *out;
+ int ret;
+
+ ret = ff_framesync_dualinput_get(fs, &in, &structurepic);
+ if (ret < 0)
+ return ret;
+ if (!structurepic)
+ return ff_filter_frame(outlink, in);
+
+ out = ff_get_video_buffer(outlink, outlink->w, outlink->h);
+ if (!out) {
+ av_frame_free(&in);
+ return AVERROR(ENOMEM);
+ }
+ av_frame_copy_props(out, in);
+
+ for (int p = 0; p < s->nb_planes; p++) {
+ const uint8_t *src = in->data[p];
+ int src_linesize = in->linesize[p];
+ const uint8_t *ssrc = structurepic->data[p];
+ const int ssrc_linesize = structurepic->linesize[p];
+ uint8_t *dst = out->data[p];
+ int dst_linesize = out->linesize[p];
+ const int swidth = s->splanewidth[p];
+ const int sheight = s->splaneheight[p];
+ const int width = s->planewidth[p];
+ const int height = s->planeheight[p];
+ const int depth = s->depth;
+ int type_size = s->type_size;
+
+ if (!(s->planes & (1 << p))) {
+copy:
+ av_image_copy_plane(out->data[p] + 0 * out->linesize[p],
+ out->linesize[p],
+ in->data[p] + 0 * in->linesize[p],
+ in->linesize[p],
+ width * ((s->depth + 7) / 8),
+ height);
+ continue;
+ }
+
+ if (!s->got_structure[p] || s->structures) {
+ free_chord_set(&s->SE[p]);
+
+ ret = read_iplane(&s->SEimg[p], ssrc, ssrc_linesize, swidth, sheight, 1, type_size, depth);
+ if (ret < 0)
+ goto fail;
+ ret = build_chord_set(&s->SEimg[p], &s->SE[p]);
+ if (ret < 0)
+ goto fail;
+ s->got_structure[p] = 1;
+ }
+
+ if (s->SE[p].minX == INT16_MAX ||
+ s->SE[p].minY == INT16_MAX ||
+ s->SE[p].maxX == INT16_MIN ||
+ s->SE[p].maxY == INT16_MIN)
+ goto copy;
+
+ ret = read_iplane(&s->f[p], src, src_linesize, width, height, 1, type_size, depth);
+ if (ret < 0)
+ goto fail;
+
+ ret = read_iplane(&s->g[p], dst, dst_linesize, s->f[p].w, s->f[p].h, s->f[p].range, type_size, depth);
+ if (ret < 0)
+ goto fail;
+
+ switch (s->mode) {
+ case ERODE:
+ ret = erode(&s->g[p], &s->f[p], &s->SE[p], &s->Ty[0][p]);
+ break;
+ case DILATE:
+ ret = dilate(&s->g[p], &s->f[p], &s->SE[p], &s->Ty[0][p]);
+ break;
+ case OPEN:
+ ret = read_iplane(&s->h[p], s->temp->data[p], s->temp->linesize[p], width, height, 1, type_size, depth);
+ if (ret < 0)
+ break;
+ ret = erode(&s->h[p], &s->f[p], &s->SE[p], &s->Ty[0][p]);
+ if (ret < 0)
+ break;
+ ret = dilate(&s->g[p], &s->h[p], &s->SE[p], &s->Ty[1][p]);
+ break;
+ case CLOSE:
+ ret = read_iplane(&s->h[p], s->temp->data[p], s->temp->linesize[p], width, height, 1, type_size, depth);
+ if (ret < 0)
+ break;
+ ret = dilate(&s->h[p], &s->f[p], &s->SE[p], &s->Ty[0][p]);
+ if (ret < 0)
+ break;
+ ret = erode(&s->g[p], &s->h[p], &s->SE[p], &s->Ty[1][p]);
+ break;
+ default:
+ av_assert0(0);
+ }
+
+ if (ret < 0)
+ goto fail;
+ }
+
+ av_frame_free(&in);
+ out->pts = av_rescale_q(s->fs.pts, s->fs.time_base, outlink->time_base);
+ return ff_filter_frame(outlink, out);
+fail:
+ av_frame_free(&in);
+ return ret;
+}
+
+static int config_output(AVFilterLink *outlink)
+{
+ AVFilterContext *ctx = outlink->src;
+ MorphoContext *s = ctx->priv;
+ AVFilterLink *mainlink = ctx->inputs[0];
+ int ret;
+
+ s->fs.on_event = do_morpho;
+ ret = ff_framesync_init_dualinput(&s->fs, ctx);
+ if (ret < 0)
+ return ret;
+ outlink->w = mainlink->w;
+ outlink->h = mainlink->h;
+ outlink->time_base = mainlink->time_base;
+ outlink->sample_aspect_ratio = mainlink->sample_aspect_ratio;
+ outlink->frame_rate = mainlink->frame_rate;
+
+ if ((ret = ff_framesync_configure(&s->fs)) < 0)
+ return ret;
+ outlink->time_base = s->fs.time_base;
+
+ s->temp = ff_get_video_buffer(outlink, outlink->w, outlink->h);
+ if (!s->temp)
+ return AVERROR(ENOMEM);
+
+ s->plane_f = av_calloc(outlink->w * outlink->h, sizeof(*s->plane_f));
+ s->plane_g = av_calloc(outlink->w * outlink->h, sizeof(*s->plane_g));
+ if (!s->plane_f || !s->plane_g)
+ return AVERROR(ENOMEM);
+
+ return 0;
+}
+
+static av_cold void uninit(AVFilterContext *ctx)
+{
+ MorphoContext *s = ctx->priv;
+
+ for (int p = 0; p < 4; p++) {
+ free_iplane(&s->SEimg[p]);
+ free_iplane(&s->f[p]);
+ free_iplane(&s->g[p]);
+ free_iplane(&s->h[p]);
+ free_chord_set(&s->SE[p]);
+ free_lut(&s->Ty[0][p]);
+ free_lut(&s->Ty[1][p]);
+ }
+
+ ff_framesync_uninit(&s->fs);
+
+ av_frame_free(&s->temp);
+ av_freep(&s->plane_f);
+ av_freep(&s->plane_g);
+}
+
+static const AVFilterPad morpho_inputs[] = {
+ {
+ .name = "default",
+ .type = AVMEDIA_TYPE_VIDEO,
+ .config_props = config_input,
+ },
+ {
+ .name = "structure",
+ .type = AVMEDIA_TYPE_VIDEO,
+ .config_props = config_input_structure,
+ },
+};
+
+static const AVFilterPad morpho_outputs[] = {
+ {
+ .name = "default",
+ .type = AVMEDIA_TYPE_VIDEO,
+ .config_props = config_output,
+ },
+};
+
+const AVFilter ff_vf_morpho = {
+ .name = "morpho",
+ .description = NULL_IF_CONFIG_SMALL("Apply Morphological filter."),
+ .preinit = morpho_framesync_preinit,
+ .priv_size = sizeof(MorphoContext),
+ .priv_class = &morpho_class,
+ .activate = activate,
+ .uninit = uninit,
+ .query_formats = query_formats,
+ FILTER_INPUTS(morpho_inputs),
+ FILTER_OUTPUTS(morpho_outputs),
+ .flags = AVFILTER_FLAG_SUPPORT_TIMELINE_GENERIC,
+ .process_command = ff_filter_process_command,
+};