git.sesse.net Git - ffmpeg/blob - libavfilter/vf_edgedetect.c

   1 /*
   2  * Copyright (c) 2012-2014 Clément Bœsch <u pkh me>
   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 /**
  22  * @file
  23  * Edge detection filter
  24  *
  25  * @see https://en.wikipedia.org/wiki/Canny_edge_detector
  26  */
  27
  28 #include "libavutil/avassert.h"
  29 #include "libavutil/imgutils.h"
  30 #include "libavutil/opt.h"
  31 #include "avfilter.h"
  32 #include "formats.h"
  33 #include "internal.h"
  34 #include "video.h"
  35
  36 #define PLANE_R 0x4
  37 #define PLANE_G 0x1
  38 #define PLANE_B 0x2
  39 #define PLANE_Y 0x1
  40 #define PLANE_U 0x2
  41 #define PLANE_V 0x4
  42 #define PLANE_A 0x8
  43
  44 enum FilterMode {
  45     MODE_WIRES,
  46     MODE_COLORMIX,
  47     MODE_CANNY,
  48     NB_MODE
  49 };
  50
  51 struct plane_info {
  52     uint8_t  *tmpbuf;
  53     uint16_t *gradients;
  54     char     *directions;
  55     int      width, height;
  56 };
  57
  58 typedef struct EdgeDetectContext {
  59     const AVClass *class;
  60     struct plane_info planes[3];
  61     int filter_planes;
  62     int nb_planes;
  63     double   low, high;
  64     uint8_t  low_u8, high_u8;
  65     int mode;
  66 } EdgeDetectContext;
  67
  68 #define OFFSET(x) offsetof(EdgeDetectContext, x)
  69 #define FLAGS AV_OPT_FLAG_FILTERING_PARAM|AV_OPT_FLAG_VIDEO_PARAM
  70 static const AVOption edgedetect_options[] = {
  71     { "high", "set high threshold", OFFSET(high), AV_OPT_TYPE_DOUBLE, {.dbl=50/255.}, 0, 1, FLAGS },
  72     { "low",  "set low threshold",  OFFSET(low),  AV_OPT_TYPE_DOUBLE, {.dbl=20/255.}, 0, 1, FLAGS },
  73     { "mode", "set mode", OFFSET(mode), AV_OPT_TYPE_INT, {.i64=MODE_WIRES}, 0, NB_MODE-1, FLAGS, "mode" },
  74         { "wires",    "white/gray wires on black",  0, AV_OPT_TYPE_CONST, {.i64=MODE_WIRES},    INT_MIN, INT_MAX, FLAGS, "mode" },
  75         { "colormix", "mix colors",                 0, AV_OPT_TYPE_CONST, {.i64=MODE_COLORMIX}, INT_MIN, INT_MAX, FLAGS, "mode" },
  76         { "canny",    "detect edges on planes",     0, AV_OPT_TYPE_CONST, {.i64=MODE_CANNY},    INT_MIN, INT_MAX, FLAGS, "mode" },
  77     { "planes", "set planes to filter",  OFFSET(filter_planes), AV_OPT_TYPE_FLAGS, {.i64=7}, 1, 0x7, FLAGS, "flags" },
  78         { "y", "filter luma plane",  0, AV_OPT_TYPE_CONST, {.i64=PLANE_Y}, 0, 0, FLAGS, "flags" },
  79         { "u", "filter u plane",     0, AV_OPT_TYPE_CONST, {.i64=PLANE_U}, 0, 0, FLAGS, "flags" },
  80         { "v", "filter v plane",     0, AV_OPT_TYPE_CONST, {.i64=PLANE_V}, 0, 0, FLAGS, "flags" },
  81         { "r", "filter red plane",   0, AV_OPT_TYPE_CONST, {.i64=PLANE_R}, 0, 0, FLAGS, "flags" },
  82         { "g", "filter green plane", 0, AV_OPT_TYPE_CONST, {.i64=PLANE_G}, 0, 0, FLAGS, "flags" },
  83         { "b", "filter blue plane",  0, AV_OPT_TYPE_CONST, {.i64=PLANE_B}, 0, 0, FLAGS, "flags" },
  84     { NULL }
  85 };
  86
  87 AVFILTER_DEFINE_CLASS(edgedetect);
  88
  89 static av_cold int init(AVFilterContext *ctx)
  90 {
  91     EdgeDetectContext *edgedetect = ctx->priv;
  92
  93     edgedetect->low_u8  = edgedetect->low  * 255. + .5;
  94     edgedetect->high_u8 = edgedetect->high * 255. + .5;
  95     return 0;
  96 }
  97
  98 static int query_formats(AVFilterContext *ctx)
  99 {
 100     const EdgeDetectContext *edgedetect = ctx->priv;
 101     static const enum AVPixelFormat wires_pix_fmts[] = {AV_PIX_FMT_GRAY8, AV_PIX_FMT_NONE};
 102     static const enum AVPixelFormat canny_pix_fmts[] = {AV_PIX_FMT_YUV420P, AV_PIX_FMT_YUV422P, AV_PIX_FMT_YUV444P, AV_PIX_FMT_GBRP, AV_PIX_FMT_GRAY8, AV_PIX_FMT_NONE};
 103     static const enum AVPixelFormat colormix_pix_fmts[] = {AV_PIX_FMT_GBRP, AV_PIX_FMT_GRAY8, AV_PIX_FMT_NONE};
 104     AVFilterFormats *fmts_list;
 105     const enum AVPixelFormat *pix_fmts = NULL;
 106
 107     if (edgedetect->mode == MODE_WIRES) {
 108         pix_fmts = wires_pix_fmts;
 109     } else if (edgedetect->mode == MODE_COLORMIX) {
 110         pix_fmts = colormix_pix_fmts;
 111     } else if (edgedetect->mode == MODE_CANNY) {
 112         pix_fmts = canny_pix_fmts;
 113     } else {
 114         av_assert0(0);
 115     }
 116     fmts_list = ff_make_format_list(pix_fmts);
 117     if (!fmts_list)
 118         return AVERROR(ENOMEM);
 119     return ff_set_common_formats(ctx, fmts_list);
 120 }
 121
 122 static int config_props(AVFilterLink *inlink)
 123 {
 124     int p;
 125     AVFilterContext *ctx = inlink->dst;
 126     EdgeDetectContext *edgedetect = ctx->priv;
 127     const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(inlink->format);
 128
 129     edgedetect->nb_planes = inlink->format == AV_PIX_FMT_GRAY8 ? 1 : 3;
 130     for (p = 0; p < edgedetect->nb_planes; p++) {
 131         struct plane_info *plane = &edgedetect->planes[p];
 132         int vsub = p ? desc->log2_chroma_h : 0;
 133         int hsub = p ? desc->log2_chroma_w : 0;
 134
 135         plane->width      = AV_CEIL_RSHIFT(inlink->w, hsub);
 136         plane->height     = AV_CEIL_RSHIFT(inlink->h, vsub);
 137         plane->tmpbuf     = av_malloc(plane->width * plane->height);
 138         plane->gradients  = av_calloc(plane->width * plane->height, sizeof(*plane->gradients));
 139         plane->directions = av_malloc(plane->width * plane->height);
 140         if (!plane->tmpbuf || !plane->gradients || !plane->directions)
 141             return AVERROR(ENOMEM);
 142     }
 143     return 0;
 144 }
 145
 146 static void gaussian_blur(AVFilterContext *ctx, int w, int h,
 147                                 uint8_t *dst, int dst_linesize,
 148                           const uint8_t *src, int src_linesize)
 149 {
 150     int i, j;
 151
 152     memcpy(dst, src, w); dst += dst_linesize; src += src_linesize;
 153     if (h > 1)
 154         memcpy(dst, src, w); dst += dst_linesize; src += src_linesize;
 155     for (j = 2; j < h - 2; j++) {
 156         dst[0] = src[0];
 157         dst[1] = src[1];
 158         for (i = 2; i < w - 2; i++) {
 159             /* Gaussian mask of size 5x5 with sigma = 1.4 */
 160             dst[i] = ((src[-2*src_linesize + i-2] + src[2*src_linesize + i-2]) * 2
 161                     + (src[-2*src_linesize + i-1] + src[2*src_linesize + i-1]) * 4
 162                     + (src[-2*src_linesize + i  ] + src[2*src_linesize + i  ]) * 5
 163                     + (src[-2*src_linesize + i+1] + src[2*src_linesize + i+1]) * 4
 164                     + (src[-2*src_linesize + i+2] + src[2*src_linesize + i+2]) * 2
 165
 166                     + (src[  -src_linesize + i-2] + src[  src_linesize + i-2]) *  4
 167                     + (src[  -src_linesize + i-1] + src[  src_linesize + i-1]) *  9
 168                     + (src[  -src_linesize + i  ] + src[  src_linesize + i  ]) * 12
 169                     + (src[  -src_linesize + i+1] + src[  src_linesize + i+1]) *  9
 170                     + (src[  -src_linesize + i+2] + src[  src_linesize + i+2]) *  4
 171
 172                     + src[i-2] *  5
 173                     + src[i-1] * 12
 174                     + src[i  ] * 15
 175                     + src[i+1] * 12
 176                     + src[i+2] *  5) / 159;
 177         }
 178         dst[i    ] = src[i    ];
 179         dst[i + 1] = src[i + 1];
 180
 181         dst += dst_linesize;
 182         src += src_linesize;
 183     }
 184     if (h > 2)
 185         memcpy(dst, src, w); dst += dst_linesize; src += src_linesize;
 186     if (h > 3)
 187         memcpy(dst, src, w);
 188 }
 189
 190 enum {
 191     DIRECTION_45UP,
 192     DIRECTION_45DOWN,
 193     DIRECTION_HORIZONTAL,
 194     DIRECTION_VERTICAL,
 195 };
 196
 197 static int get_rounded_direction(int gx, int gy)
 198 {
 199     /* reference angles:
 200      *   tan( pi/8) = sqrt(2)-1
 201      *   tan(3pi/8) = sqrt(2)+1
 202      * Gy/Gx is the tangent of the angle (theta), so Gy/Gx is compared against
 203      * <ref-angle>, or more simply Gy against <ref-angle>*Gx
 204      *
 205      * Gx and Gy bounds = [-1020;1020], using 16-bit arithmetic:
 206      *   round((sqrt(2)-1) * (1<<16)) =  27146
 207      *   round((sqrt(2)+1) * (1<<16)) = 158218
 208      */
 209     if (gx) {
 210         int tanpi8gx, tan3pi8gx;
 211
 212         if (gx < 0)
 213             gx = -gx, gy = -gy;
 214         gy <<= 16;
 215         tanpi8gx  =  27146 * gx;
 216         tan3pi8gx = 158218 * gx;
 217         if (gy > -tan3pi8gx && gy < -tanpi8gx)  return DIRECTION_45UP;
 218         if (gy > -tanpi8gx  && gy <  tanpi8gx)  return DIRECTION_HORIZONTAL;
 219         if (gy >  tanpi8gx  && gy <  tan3pi8gx) return DIRECTION_45DOWN;
 220     }
 221     return DIRECTION_VERTICAL;
 222 }
 223
 224 static void sobel(int w, int h,
 225                        uint16_t *dst, int dst_linesize,
 226                          int8_t *dir, int dir_linesize,
 227                   const uint8_t *src, int src_linesize)
 228 {
 229     int i, j;
 230
 231     for (j = 1; j < h - 1; j++) {
 232         dst += dst_linesize;
 233         dir += dir_linesize;
 234         src += src_linesize;
 235         for (i = 1; i < w - 1; i++) {
 236             const int gx =
 237                 -1*src[-src_linesize + i-1] + 1*src[-src_linesize + i+1]
 238                 -2*src[                i-1] + 2*src[                i+1]
 239                 -1*src[ src_linesize + i-1] + 1*src[ src_linesize + i+1];
 240             const int gy =
 241                 -1*src[-src_linesize + i-1] + 1*src[ src_linesize + i-1]
 242                 -2*src[-src_linesize + i  ] + 2*src[ src_linesize + i  ]
 243                 -1*src[-src_linesize + i+1] + 1*src[ src_linesize + i+1];
 244
 245             dst[i] = FFABS(gx) + FFABS(gy);
 246             dir[i] = get_rounded_direction(gx, gy);
 247         }
 248     }
 249 }
 250
 251 static void non_maximum_suppression(int w, int h,
 252                                           uint8_t  *dst, int dst_linesize,
 253                                     const  int8_t  *dir, int dir_linesize,
 254                                     const uint16_t *src, int src_linesize)
 255 {
 256     int i, j;
 257
 258 #define COPY_MAXIMA(ay, ax, by, bx) do {                \
 259     if (src[i] > src[(ay)*src_linesize + i+(ax)] &&     \
 260         src[i] > src[(by)*src_linesize + i+(bx)])       \
 261         dst[i] = av_clip_uint8(src[i]);                 \
 262 } while (0)
 263
 264     for (j = 1; j < h - 1; j++) {
 265         dst += dst_linesize;
 266         dir += dir_linesize;
 267         src += src_linesize;
 268         for (i = 1; i < w - 1; i++) {
 269             switch (dir[i]) {
 270             case DIRECTION_45UP:        COPY_MAXIMA( 1, -1, -1,  1); break;
 271             case DIRECTION_45DOWN:      COPY_MAXIMA(-1, -1,  1,  1); break;
 272             case DIRECTION_HORIZONTAL:  COPY_MAXIMA( 0, -1,  0,  1); break;
 273             case DIRECTION_VERTICAL:    COPY_MAXIMA(-1,  0,  1,  0); break;
 274             }
 275         }
 276     }
 277 }
 278
 279 static void double_threshold(int low, int high, int w, int h,
 280                                    uint8_t *dst, int dst_linesize,
 281                              const uint8_t *src, int src_linesize)
 282 {
 283     int i, j;
 284
 285     for (j = 0; j < h; j++) {
 286         for (i = 0; i < w; i++) {
 287             if (src[i] > high) {
 288                 dst[i] = src[i];
 289                 continue;
 290             }
 291
 292             if ((!i || i == w - 1 || !j || j == h - 1) &&
 293                 src[i] > low &&
 294                 (src[-src_linesize + i-1] > high ||
 295                  src[-src_linesize + i  ] > high ||
 296                  src[-src_linesize + i+1] > high ||
 297                  src[                i-1] > high ||
 298                  src[                i+1] > high ||
 299                  src[ src_linesize + i-1] > high ||
 300                  src[ src_linesize + i  ] > high ||
 301                  src[ src_linesize + i+1] > high))
 302                 dst[i] = src[i];
 303             else
 304                 dst[i] = 0;
 305         }
 306         dst += dst_linesize;
 307         src += src_linesize;
 308     }
 309 }
 310
 311 static void color_mix(int w, int h,
 312                             uint8_t *dst, int dst_linesize,
 313                       const uint8_t *src, int src_linesize)
 314 {
 315     int i, j;
 316
 317     for (j = 0; j < h; j++) {
 318         for (i = 0; i < w; i++)
 319             dst[i] = (dst[i] + src[i]) >> 1;
 320         dst += dst_linesize;
 321         src += src_linesize;
 322     }
 323 }
 324
 325 static int filter_frame(AVFilterLink *inlink, AVFrame *in)
 326 {
 327     AVFilterContext *ctx = inlink->dst;
 328     EdgeDetectContext *edgedetect = ctx->priv;
 329     AVFilterLink *outlink = ctx->outputs[0];
 330     int p, direct = 0;
 331     AVFrame *out;
 332
 333     if (edgedetect->mode != MODE_COLORMIX && av_frame_is_writable(in)) {
 334         direct = 1;
 335         out = in;
 336     } else {
 337         out = ff_get_video_buffer(outlink, outlink->w, outlink->h);
 338         if (!out) {
 339             av_frame_free(&in);
 340             return AVERROR(ENOMEM);
 341         }
 342         av_frame_copy_props(out, in);
 343     }
 344
 345     for (p = 0; p < edgedetect->nb_planes; p++) {
 346         struct plane_info *plane = &edgedetect->planes[p];
 347         uint8_t  *tmpbuf     = plane->tmpbuf;
 348         uint16_t *gradients  = plane->gradients;
 349         int8_t   *directions = plane->directions;
 350         const int width      = plane->width;
 351         const int height     = plane->height;
 352
 353         if (!((1 << p) & edgedetect->filter_planes)) {
 354             if (!direct)
 355                 av_image_copy_plane(out->data[p], out->linesize[p],
 356                                     in->data[p], in->linesize[p],
 357                                     width, height);
 358             continue;
 359         }
 360
 361         /* gaussian filter to reduce noise  */
 362         gaussian_blur(ctx, width, height,
 363                       tmpbuf,      width,
 364                       in->data[p], in->linesize[p]);
 365
 366         /* compute the 16-bits gradients and directions for the next step */
 367         sobel(width, height,
 368               gradients, width,
 369               directions,width,
 370               tmpbuf,    width);
 371
 372         /* non_maximum_suppression() will actually keep & clip what's necessary and
 373          * ignore the rest, so we need a clean output buffer */
 374         memset(tmpbuf, 0, width * height);
 375         non_maximum_suppression(width, height,
 376                                 tmpbuf,    width,
 377                                 directions,width,
 378                                 gradients, width);
 379
 380         /* keep high values, or low values surrounded by high values */
 381         double_threshold(edgedetect->low_u8, edgedetect->high_u8,
 382                          width, height,
 383                          out->data[p], out->linesize[p],
 384                          tmpbuf,       width);
 385
 386         if (edgedetect->mode == MODE_COLORMIX) {
 387             color_mix(width, height,
 388                       out->data[p], out->linesize[p],
 389                       in->data[p], in->linesize[p]);
 390         }
 391     }
 392
 393     if (!direct)
 394         av_frame_free(&in);
 395     return ff_filter_frame(outlink, out);
 396 }
 397
 398 static av_cold void uninit(AVFilterContext *ctx)
 399 {
 400     int p;
 401     EdgeDetectContext *edgedetect = ctx->priv;
 402
 403     for (p = 0; p < edgedetect->nb_planes; p++) {
 404         struct plane_info *plane = &edgedetect->planes[p];
 405         av_freep(&plane->tmpbuf);
 406         av_freep(&plane->gradients);
 407         av_freep(&plane->directions);
 408     }
 409 }
 410
 411 static const AVFilterPad edgedetect_inputs[] = {
 412     {
 413         .name         = "default",
 414         .type         = AVMEDIA_TYPE_VIDEO,
 415         .config_props = config_props,
 416         .filter_frame = filter_frame,
 417     },
 418     { NULL }
 419 };
 420
 421 static const AVFilterPad edgedetect_outputs[] = {
 422     {
 423         .name = "default",
 424         .type = AVMEDIA_TYPE_VIDEO,
 425     },
 426     { NULL }
 427 };
 428
 429 AVFilter ff_vf_edgedetect = {
 430     .name          = "edgedetect",
 431     .description   = NULL_IF_CONFIG_SMALL("Detect and draw edge."),
 432     .priv_size     = sizeof(EdgeDetectContext),
 433     .init          = init,
 434     .uninit        = uninit,
 435     .query_formats = query_formats,
 436     .inputs        = edgedetect_inputs,
 437     .outputs       = edgedetect_outputs,
 438     .priv_class    = &edgedetect_class,
 439     .flags         = AVFILTER_FLAG_SUPPORT_TIMELINE_GENERIC,
 440 };