Add frei0r filter.

See thread:
Subject: [FFmpeg-devel] [POC] frei0r wrapper
Date: Tue, 24 Aug 2010 21:37:32 +0200

Originally committed as revision 25165 to svn://svn.ffmpeg.org/ffmpeg/trunk

7 files changed, 426 insertions, 1 deletions

diff --git a/Changelog b/Changelog
index 682d3990eb..2a8dcaa056 100644
--- a/Changelog
+++ b/Changelog
@@ -36,6 +36,7 @@ version <next>:
 - G.722 ADPCM audio encoder/decoder
 - R10k video decoder
 - ocv_smooth filter
+- frei0r wrapper filter
 
 
 version 0.6:
diff --git a/configure b/configure
index eca3390d53..781b09dd95 100755
--- a/configure
+++ b/configure
@@ -162,6 +162,7 @@ Configuration options:
 External library support:
   --enable-avisynth        enable reading of AVISynth script files [no]
   --enable-bzlib           enable bzlib [autodetect]
+  --enable-frei0r          enable frei0r video filtering
   --enable-libopencore-amrnb enable AMR-NB de/encoding via libopencore-amrnb [no]
   --enable-libopencore-amrwb enable AMR-WB decoding via libopencore-amrwb [no]
   --enable-libopencv       enable video filtering via libopencv [no]
@@ -873,6 +874,7 @@ CONFIG_LIST="
     ffprobe
     ffserver
     fft
+    frei0r
     golomb
     gpl
     gray
@@ -1050,6 +1052,7 @@ HAVE_LIST="
     poll_h
     setrlimit
     strerror_r
+    strtok_r
     struct_addrinfo
     struct_ipv6_mreq
     struct_sockaddr_in6
@@ -1383,6 +1386,9 @@ vfwcap_indev_extralibs="-lavicap32"
 x11_grab_device_indev_deps="x11grab XShmCreateImage"
 x11_grab_device_indev_extralibs="-lX11 -lXext -lXfixes"
 
+# filters
+frei0r_filter_deps="frei0r dlopen strtok_r"
+
 # protocols
 gopher_protocol_deps="network"
 http_protocol_deps="network"
@@ -2647,6 +2653,7 @@ check_func  mkstemp
 check_func  ${malloc_prefix}posix_memalign      && enable posix_memalign
 check_func  setrlimit
 check_func  strerror_r
+check_func  strtok_r
 check_func_headers io.h setmode
 check_func_headers lzo/lzo1x.h lzo1x_999_compress
 check_lib2 "windows.h psapi.h" GetProcessMemoryInfo -lpsapi
@@ -2720,6 +2727,7 @@ check_mathfunc truncf
 
 # these are off by default, so fail if requested and not available
 enabled avisynth   && require2 vfw32 "windows.h vfw.h" AVIFileInit -lavifil32
+enabled frei0r     && { check_header frei0r.h || die "ERROR: frei0r.h header not found"; }
 enabled libdirac   && add_cflags $(pkg-config --cflags dirac) &&
                       require  libdirac libdirac_decoder/dirac_parser.h dirac_decoder_init $(pkg-config --libs dirac) &&
                       require  libdirac libdirac_encoder/dirac_encoder.h dirac_encoder_init $(pkg-config --libs dirac)
@@ -3012,6 +3020,7 @@ echo "threading support         ${thread_type-no}"
 echo "SDL support               ${sdl-no}"
 echo "Sun medialib support      ${mlib-no}"
 echo "AVISynth enabled          ${avisynth-no}"
+echo "frei0r enabled            ${frei0r-no}"
 echo "libdc1394 support         ${libdc1394-no}"
 echo "libdirac enabled          ${libdirac-no}"
 echo "libfaac enabled           ${libfaac-no}"
diff --git a/doc/filters.texi b/doc/filters.texi
index 262116c070..2309c56ac6 100644
--- a/doc/filters.texi
+++ b/doc/filters.texi
@@ -81,6 +81,56 @@ The following command:
 
 will convert the input video to the format "yuv420p".
 
+@section frei0r
+
+Apply a frei0r effect to the input video.
+
+To enable compilation of this filter you need to install the frei0r
+header and configure FFmpeg with --enable-frei0r.
+
+The filter supports the syntax:
+@example
+@var{filter_name}:@var{param1}:@var{param2}:...:@var{paramN}
+@end example
+
+@var{filter_name} is the name to the frei0r effect to load. If the
+environment variable @env{FREI0R_PATH} is defined, the frei0r effect
+is searched in each one of the directories specified by the colon
+separated list in @env{FREIOR_PATH}, otherwise in the standard frei0r
+paths, which are in this order: @file{HOME/.frei0r-1/lib/},
+@file{/usr/local/lib/frei0r-1/}, @file{/usr/lib/frei0r-1/}.
+
+@var{param1}, @var{param2}, ... , @var{paramN} specify the parameters
+for the frei0r effect.
+
+A frei0r effect parameter can be a boolean (whose values are specified
+with "y" and "n"), a double, a color (specified by the syntax
+@var{R}/@var{G}/@var{B}, @var{R}, @var{G}, and @var{B} being float
+numbers from 0.0 to 1.0) or by an @code{av_parse_color()} color
+description), a position (specified by the syntax @var{X}/@var{Y},
+@var{X} and @var{Y} being float numbers) and a string.
+
+The number and kind of parameters depend on the loaded effect. If an
+effect parameter is not specified the default value is set.
+
+Some examples follow:
+@example
+# apply the distort0r effect, set the first two double parameters
+frei0r=distort0r:0.5:0.01
+
+# apply the colordistance effect, takes a color as first parameter
+frei0r=colordistance:0.2/0.3/0.4
+frei0r=colordistance:violet
+frei0r=colordistance:0x112233
+
+# apply the perspective effect, specify the top left and top right
+# image positions
+frei0r=perspective:0.2/0.2:0.8/0.2
+@end example
+
+For more information see:
+@url{http://piksel.org/frei0r}
+
 @section hflip
 
 Flip the input video horizontally.
diff --git a/libavfilter/Makefile b/libavfilter/Makefile
index a15c3f102c..3fe15daac1 100644
--- a/libavfilter/Makefile
+++ b/libavfilter/Makefile
@@ -20,6 +20,7 @@ OBJS-$(CONFIG_ASPECT_FILTER)                 += vf_aspect.o
 OBJS-$(CONFIG_CROP_FILTER)                   += vf_crop.o
 OBJS-$(CONFIG_FIFO_FILTER)                   += vf_fifo.o
 OBJS-$(CONFIG_FORMAT_FILTER)                 += vf_format.o
+OBJS-$(CONFIG_FREI0R_FILTER)                 += vf_frei0r.o
 OBJS-$(CONFIG_HFLIP_FILTER)                  += vf_hflip.o
 OBJS-$(CONFIG_NOFORMAT_FILTER)               += vf_format.o
 OBJS-$(CONFIG_NULL_FILTER)                   += vf_null.o
diff --git a/libavfilter/allfilters.c b/libavfilter/allfilters.c
index fb84968232..c879f11e32 100644
--- a/libavfilter/allfilters.c
+++ b/libavfilter/allfilters.c
@@ -40,6 +40,7 @@ void avfilter_register_all(void)
     REGISTER_FILTER (CROP,        crop,        vf);
     REGISTER_FILTER (FIFO,        fifo,        vf);
     REGISTER_FILTER (FORMAT,      format,      vf);
+    REGISTER_FILTER (FREI0R,      frei0r,      vf);
     REGISTER_FILTER (HFLIP,       hflip,       vf);
     REGISTER_FILTER (NOFORMAT,    noformat,    vf);
     REGISTER_FILTER (NULL,        null,        vf);
diff --git a/libavfilter/avfilter.h b/libavfilter/avfilter.h
index 3d9f83fb6c..32f75bdc57 100644
--- a/libavfilter/avfilter.h
+++ b/libavfilter/avfilter.h
@@ -25,7 +25,7 @@
 #include "libavutil/avutil.h"
 
 #define LIBAVFILTER_VERSION_MAJOR  1
-#define LIBAVFILTER_VERSION_MINOR 39
+#define LIBAVFILTER_VERSION_MINOR 40
 #define LIBAVFILTER_VERSION_MICRO  0
 
 #define LIBAVFILTER_VERSION_INT AV_VERSION_INT(LIBAVFILTER_VERSION_MAJOR, \
diff --git a/libavfilter/vf_frei0r.c b/libavfilter/vf_frei0r.c
new file mode 100644
index 0000000000..eb09ee98a8
--- /dev/null
+++ b/libavfilter/vf_frei0r.c
@@ -0,0 +1,363 @@
+/*
+ * copyright (c) 2010 Stefano Sabatini
+ * This file is part of FFmpeg.
+ *
+ * FFmpeg is free software; you can redistribute it and/or
+ * 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.
+ *
+ * FFmpeg is distributed in the hope that it will be useful,
+ * 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
+ * License along with FFmpeg; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+/**
+ * @file
+ * frei0r wrapper
+ */
+
+/* #define DEBUG */
+
+#include <dlfcn.h>
+#include <frei0r.h>
+#include "avfilter.h"
+#include "parseutils.h"
+
+typedef f0r_instance_t (*f0r_construct_f)(unsigned int width, unsigned int height);
+typedef void (*f0r_destruct_f)(f0r_instance_t instance);
+typedef void (*f0r_deinit_f)(void);
+typedef int (*f0r_init_f)(void);
+typedef void (*f0r_get_plugin_info_f)(f0r_plugin_info_t *info);
+typedef void (*f0r_get_param_info_f)(f0r_param_info_t *info, int param_index);
+typedef void (*f0r_update_f)(f0r_instance_t instance, double time, const uint32_t *inframe, uint32_t *outframe);
+typedef void (*f0r_update2_f)(f0r_instance_t instance, double time, const uint32_t *inframe1, const uint32_t *inframe2, const uint32_t *inframe3, uint32_t *outframe);
+typedef void (*f0r_set_param_value_f)(f0r_instance_t instance, f0r_param_t param, int param_index);
+typedef void (*f0r_get_param_value_f)(f0r_instance_t instance, f0r_param_t param, int param_index);
+
+typedef struct Frei0rContext {
+    f0r_update_f update;
+    void *dl_handle;            /* dynamic library handle   */
+    f0r_instance_t instance;
+    f0r_plugin_info_t plugin_info;
+
+    f0r_get_param_info_f  get_param_info;
+    f0r_get_param_value_f get_param_value;
+    f0r_set_param_value_f set_param_value;
+    f0r_construct_f       construct;
+    f0r_destruct_f        destruct;
+    f0r_deinit_f          deinit;
+    char params[256];
+} Frei0rContext;
+
+static void *load_sym(AVFilterContext *ctx, const char *sym_name)
+{
+    Frei0rContext *frei0r = ctx->priv;
+    void *sym = dlsym(frei0r->dl_handle, sym_name);
+    if (!sym)
+        av_log(ctx, AV_LOG_ERROR, "Could not find symbol '%s' in loaded module\n", sym_name);
+    return sym;
+}
+
+static int set_param(AVFilterContext *ctx, f0r_param_info_t info, int index, char *param)
+{
+    Frei0rContext *frei0r = ctx->priv;
+    union {
+        double d;
+        f0r_param_color_t col;
+        f0r_param_position_t pos;
+    } val;
+    char *tail;
+    uint8_t rgba[4];
+
+    switch (info.type) {
+    case F0R_PARAM_BOOL:
+        if      (!strcmp(param, "y")) val.d = 1.0;
+        else if (!strcmp(param, "n")) val.d = 0.0;
+        else goto fail;
+        break;
+
+    case F0R_PARAM_DOUBLE:
+        val.d = strtod(param, &tail);
+        if (*tail || val.d == HUGE_VAL)
+            goto fail;
+        break;
+
+    case F0R_PARAM_COLOR:
+        if (sscanf(param, "%f/%f/%f", &val.col.r, &val.col.g, &val.col.b) != 3) {
+            if (av_parse_color(rgba, param, ctx) < 0)
+                goto fail;
+            val.col.r = rgba[0] / 255.0;
+            val.col.g = rgba[1] / 255.0;
+            val.col.b = rgba[2] / 255.0;
+        }
+        break;
+
+    case F0R_PARAM_POSITION:
+        if (sscanf(param, "%lf/%lf", &val.pos.x, &val.pos.y) != 2)
+            goto fail;
+        break;
+    }
+
+    frei0r->set_param_value(frei0r->instance, &val, index);
+    return 0;
+
+fail:
+    av_log(ctx, AV_LOG_ERROR, "Invalid value '%s' for parameter '%s'\n",
+           param, info.name);
+    return AVERROR(EINVAL);
+}
+
+static int set_params(AVFilterContext *ctx, const char *params)
+{
+    Frei0rContext *frei0r = ctx->priv;
+    int i;
+
+    for (i = 0; i < frei0r->plugin_info.num_params; i++) {
+        f0r_param_info_t info;
+        char *param;
+        int ret;
+
+        frei0r->get_param_info(&info, i);
+
+        if (*params) {
+            if (!(param = av_get_token(&params, ":")))
+                return AVERROR(ENOMEM);
+            params++;               /* skip ':' */
+            ret = set_param(ctx, info, i, param);
+            av_free(param);
+            if (ret < 0)
+                return ret;
+        }
+
+        av_log(ctx, AV_LOG_INFO,
+               "idx:%d name:'%s' type:%s explanation:'%s' ",
+               i, info.name,
+               info.type == F0R_PARAM_BOOL     ? "bool"     :
+               info.type == F0R_PARAM_DOUBLE   ? "double"   :
+               info.type == F0R_PARAM_COLOR    ? "color"    :
+               info.type == F0R_PARAM_POSITION ? "position" :
+               info.type == F0R_PARAM_STRING   ? "string"   : "unknown",
+               info.explanation);
+
+#ifdef DEBUG
+        av_log(ctx, AV_LOG_INFO, "value:");
+        switch (info.type) {
+            void *v;
+            double d;
+            char s[128];
+            f0r_param_color_t col;
+            f0r_param_position_t pos;
+
+        case F0R_PARAM_BOOL:
+            v = &d;
+            frei0r->get_param_value(frei0r->instance, v, i);
+            av_log(ctx, AV_LOG_INFO, "%s", d >= 0.5 && d <= 1.0 ? "y" : "n");
+            break;
+        case F0R_PARAM_DOUBLE:
+            v = &d;
+            frei0r->get_param_value(frei0r->instance, v, i);
+            av_log(ctx, AV_LOG_INFO, "%f", d);
+            break;
+        case F0R_PARAM_COLOR:
+            v = &col;
+            frei0r->get_param_value(frei0r->instance, v, i);
+            av_log(ctx, AV_LOG_INFO, "%f/%f/%f", col.r, col.g, col.b);
+            break;
+        case F0R_PARAM_POSITION:
+            v = &pos;
+            frei0r->get_param_value(frei0r->instance, v, i);
+            av_log(ctx, AV_LOG_INFO, "%lf/%lf", pos.x, pos.y);
+            break;
+        default: /* F0R_PARAM_STRING */
+            v = s;
+            frei0r->get_param_value(frei0r->instance, v, i);
+            av_log(ctx, AV_LOG_INFO, "'%s'\n", s);
+            break;
+        }
+#endif
+        av_log(ctx, AV_LOG_INFO, "\n");
+    }
+
+    return 0;
+}
+
+static void *load_path(AVFilterContext *ctx, const char *prefix, const char *name)
+{
+    char path[1024];
+
+    snprintf(path, sizeof(path), "%s%s.so", prefix, name);
+    av_log(ctx, AV_LOG_DEBUG, "Looking for frei0r effect in '%s'\n", path);
+    return dlopen(path, RTLD_NOW|RTLD_LOCAL);
+}
+
+static av_cold int init(AVFilterContext *ctx, const char *args, void *opaque)
+{
+    Frei0rContext *frei0r = ctx->priv;
+    f0r_init_f            f0r_init;
+    f0r_get_plugin_info_f f0r_get_plugin_info;
+    f0r_plugin_info_t *pi;
+    char dl_name[1024], *path;
+
+    *frei0r->params = 0;
+
+    if (args)
+        sscanf(args, "%1023[^:]:%255c", dl_name, frei0r->params);
+
+    /* see: http://piksel.org/frei0r/1.2/spec/1.2/spec/group__pluglocations.html */
+    if ((path = av_strdup(getenv("FREI0R_PATH")))) {
+        char *p, *ptr = NULL;
+        for (p = path; p = strtok_r(p, ":", &ptr); p = NULL)
+            if (frei0r->dl_handle = load_path(ctx, p, dl_name))
+                break;
+        av_free(path);
+    }
+    if (!frei0r->dl_handle && (path = av_strdup(getenv("HOME")))) {
+        char prefix[1024];
+        snprintf(prefix, sizeof(prefix), "%s/.frei0r-1/lib/", path);
+        frei0r->dl_handle = load_path(ctx, prefix, dl_name);
+        av_free(path);
+    }
+    if (!frei0r->dl_handle)
+        frei0r->dl_handle = load_path(ctx, "/usr/local/lib/frei0r-1/", dl_name);
+    if (!frei0r->dl_handle)
+        frei0r->dl_handle = load_path(ctx, "/usr/lib/frei0r-1/", dl_name);
+    if (!frei0r->dl_handle) {
+        av_log(ctx, AV_LOG_ERROR, "Could not find module '%s'\n", dl_name);
+        return AVERROR(EINVAL);
+    }
+
+    if (!(f0r_init                = load_sym(ctx, "f0r_init"           )) ||
+        !(f0r_get_plugin_info     = load_sym(ctx, "f0r_get_plugin_info")) ||
+        !(frei0r->get_param_info  = load_sym(ctx, "f0r_get_param_info" )) ||
+        !(frei0r->get_param_value = load_sym(ctx, "f0r_get_param_value")) ||
+        !(frei0r->set_param_value = load_sym(ctx, "f0r_set_param_value")) ||
+        !(frei0r->update          = load_sym(ctx, "f0r_update"         )) ||
+        !(frei0r->construct       = load_sym(ctx, "f0r_construct"      )) ||
+        !(frei0r->destruct        = load_sym(ctx, "f0r_destruct"       )) ||
+        !(frei0r->deinit          = load_sym(ctx, "f0r_deinit"         )))
+        return AVERROR(EINVAL);
+
+    if (f0r_init() < 0) {
+        av_log(ctx, AV_LOG_ERROR, "Could not init the frei0r module");
+        return AVERROR(EINVAL);
+    }
+
+    f0r_get_plugin_info(&frei0r->plugin_info);
+    pi = &frei0r->plugin_info;
+    if (pi->plugin_type != F0R_PLUGIN_TYPE_FILTER) {
+        av_log(ctx, AV_LOG_ERROR,
+               "Invalid type '%s' for the plugin, a filter plugin was expected\n",
+               pi->plugin_type == F0R_PLUGIN_TYPE_SOURCE ? "source" :
+               pi->plugin_type == F0R_PLUGIN_TYPE_MIXER2 ? "mixer2" :
+               pi->plugin_type == F0R_PLUGIN_TYPE_MIXER3 ? "mixer3" : "unknown");
+        return AVERROR(EINVAL);
+    }
+
+    av_log(ctx, AV_LOG_INFO,
+           "name:%s author:'%s' explanation:'%s' color_model:%s "
+           "frei0r_version:%d version:%d.%d num_params:%d\n",
+           pi->name, pi->author, pi->explanation,
+           pi->color_model == F0R_COLOR_MODEL_BGRA8888 ? "bgra8888" :
+           pi->color_model == F0R_COLOR_MODEL_RGBA8888 ? "rgba8888" :
+           pi->color_model == F0R_COLOR_MODEL_PACKED32 ? "packed32" : "unknown",
+           pi->frei0r_version, pi->major_version, pi->minor_version, pi->num_params);
+
+    return 0;
+}
+
+static av_cold void uninit(AVFilterContext *ctx)
+{
+    Frei0rContext *frei0r = ctx->priv;
+
+    if (frei0r->destruct)
+        frei0r->destruct(frei0r->instance);
+    if (frei0r->deinit)
+        frei0r->deinit();
+    if (frei0r->dl_handle)
+        dlclose(frei0r->dl_handle);
+
+    memset(frei0r, 0, sizeof(*frei0r));
+}
+
+static int config_input_props(AVFilterLink *inlink)
+{
+    AVFilterContext *ctx = inlink->dst;
+    Frei0rContext *frei0r = ctx->priv;
+
+    if (!(frei0r->instance = frei0r->construct(inlink->w, inlink->h))) {
+        av_log(ctx, AV_LOG_ERROR, "Impossible to load frei0r instance");
+        return AVERROR(EINVAL);
+    }
+
+    return set_params(ctx, frei0r->params);
+}
+
+static int query_formats(AVFilterContext *ctx)
+{
+    Frei0rContext *frei0r = ctx->priv;
+    AVFilterFormats *formats = NULL;
+
+    if        (frei0r->plugin_info.color_model == F0R_COLOR_MODEL_BGRA8888) {
+        avfilter_add_format(&formats, PIX_FMT_BGRA);
+    } else if (frei0r->plugin_info.color_model == F0R_COLOR_MODEL_RGBA8888) {
+        avfilter_add_format(&formats, PIX_FMT_RGBA);
+    } else {                                   /* F0R_COLOR_MODEL_PACKED32 */
+        static const enum PixelFormat pix_fmts[] = {
+            PIX_FMT_BGRA, PIX_FMT_ARGB, PIX_FMT_ABGR, PIX_FMT_ARGB, PIX_FMT_NONE
+        };
+        formats = avfilter_make_format_list(pix_fmts);
+    }
+
+    if (!formats)
+        return AVERROR(ENOMEM);
+
+    avfilter_set_common_formats(ctx, formats);
+    return 0;
+}
+
+static void null_draw_slice(AVFilterLink *inlink, int y, int h, int slice_dir) { }
+
+static void end_frame(AVFilterLink *inlink)
+{
+    Frei0rContext *frei0r = inlink->dst->priv;
+    AVFilterLink *outlink = inlink->dst->outputs[0];
+    AVFilterBufferRef  *inpicref =  inlink->cur_buf;
+    AVFilterBufferRef *outpicref = outlink->out_buf;
+
+    frei0r->update(frei0r->instance, (double)inpicref->pts / AV_TIME_BASE,
+                   (const uint32_t *)inpicref->data[0],
+                   (uint32_t *)outpicref->data[0]);
+    avfilter_unref_buffer(inpicref);
+    avfilter_draw_slice(outlink, 0, outlink->h, 1);
+    avfilter_end_frame(outlink);
+    avfilter_unref_buffer(outpicref);
+}
+
+AVFilter avfilter_vf_frei0r = {
+    .name      = "frei0r",
+    .description = NULL_IF_CONFIG_SMALL("Apply a frei0r effect."),
+
+    .query_formats = query_formats,
+    .init = init,
+    .uninit = uninit,
+
+    .priv_size = sizeof(Frei0rContext),
+
+    .inputs    = (AVFilterPad[]) {{ .name             = "default",
+                                    .type             = AVMEDIA_TYPE_VIDEO,
+                                    .draw_slice       = null_draw_slice,
+                                    .config_props     = config_input_props,
+                                    .end_frame        = end_frame,
+                                    .min_perms        = AV_PERM_READ },
+                                  { .name = NULL}},
+
+    .outputs   = (AVFilterPad[]) {{ .name             = "default",
+                                    .type             = AVMEDIA_TYPE_VIDEO, },
+                                  { .name = NULL}},
+};