yading@10: /*
yading@10:  * Copyright (c) 2012-2013 Paul B Mahol
yading@10:  *
yading@10:  * This file is part of FFmpeg.
yading@10:  *
yading@10:  * FFmpeg is free software; you can redistribute it and/or
yading@10:  * modify it under the terms of the GNU Lesser General Public
yading@10:  * License as published by the Free Software Foundation; either
yading@10:  * version 2.1 of the License, or (at your option) any later version.
yading@10:  *
yading@10:  * FFmpeg is distributed in the hope that it will be useful,
yading@10:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
yading@10:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
yading@10:  * Lesser General Public License for more details.
yading@10:  *
yading@10:  * You should have received a copy of the GNU Lesser General Public
yading@10:  * License along with FFmpeg; if not, write to the Free Software
yading@10:  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
yading@10:  */
yading@10: 
yading@10: #include "libavutil/avassert.h"
yading@10: #include "libavutil/opt.h"
yading@10: #include "libavutil/parseutils.h"
yading@10: #include "libavutil/pixdesc.h"
yading@10: #include "avfilter.h"
yading@10: #include "formats.h"
yading@10: #include "internal.h"
yading@10: #include "video.h"
yading@10: 
yading@10: enum HistogramMode {
yading@10:     MODE_LEVELS,
yading@10:     MODE_WAVEFORM,
yading@10:     MODE_COLOR,
yading@10:     MODE_COLOR2,
yading@10:     MODE_NB
yading@10: };
yading@10: 
yading@10: typedef struct HistogramContext {
yading@10:     const AVClass *class;               ///< AVClass context for log and options purpose
yading@10:     enum HistogramMode mode;
yading@10:     unsigned       histogram[256];
yading@10:     unsigned       max_hval;
yading@10:     int            ncomp;
yading@10:     const uint8_t  *bg_color;
yading@10:     const uint8_t  *fg_color;
yading@10:     int            level_height;
yading@10:     int            scale_height;
yading@10:     int            step;
yading@10:     int            waveform_mode;
yading@10:     int            display_mode;
yading@10: } HistogramContext;
yading@10: 
yading@10: #define OFFSET(x) offsetof(HistogramContext, x)
yading@10: #define FLAGS AV_OPT_FLAG_FILTERING_PARAM|AV_OPT_FLAG_VIDEO_PARAM
yading@10: 
yading@10: static const AVOption histogram_options[] = {
yading@10:     { "mode", "set histogram mode", OFFSET(mode), AV_OPT_TYPE_INT, {.i64=MODE_LEVELS}, 0, MODE_NB-1, FLAGS, "mode"},
yading@10:     { "levels", "standard histogram", 0, AV_OPT_TYPE_CONST, {.i64=MODE_LEVELS}, 0, 0, FLAGS, "mode" },
yading@10:     { "waveform", "per row/column luminance graph", 0, AV_OPT_TYPE_CONST, {.i64=MODE_WAVEFORM}, 0, 0, FLAGS, "mode" },
yading@10:     { "color", "chroma values in vectorscope", 0, AV_OPT_TYPE_CONST, {.i64=MODE_COLOR}, 0, 0, FLAGS, "mode" },
yading@10:     { "color2", "chroma values in vectorscope", 0, AV_OPT_TYPE_CONST, {.i64=MODE_COLOR2}, 0, 0, FLAGS, "mode" },
yading@10:     { "level_height", "set level height", OFFSET(level_height), AV_OPT_TYPE_INT, {.i64=200}, 50, 2048, FLAGS},
yading@10:     { "scale_height", "set scale height", OFFSET(scale_height), AV_OPT_TYPE_INT, {.i64=12}, 0, 40, FLAGS},
yading@10:     { "step", "set waveform step value", OFFSET(step), AV_OPT_TYPE_INT, {.i64=10}, 1, 255, FLAGS},
yading@10:     { "waveform_mode", "set waveform mode", OFFSET(waveform_mode), AV_OPT_TYPE_INT, {.i64=0}, 0, 1, FLAGS, "waveform_mode"},
yading@10:     { "row",   NULL, 0, AV_OPT_TYPE_CONST, {.i64=0}, 0, 0, FLAGS, "waveform_mode" },
yading@10:     { "column", NULL, 0, AV_OPT_TYPE_CONST, {.i64=1}, 0, 0, FLAGS, "waveform_mode" },
yading@10:     { "display_mode", "set display mode", OFFSET(display_mode), AV_OPT_TYPE_INT, {.i64=1}, 0, 1, FLAGS, "display_mode"},
yading@10:     { "parade",  NULL, 0, AV_OPT_TYPE_CONST, {.i64=1}, 0, 0, FLAGS, "display_mode" },
yading@10:     { "overlay", NULL, 0, AV_OPT_TYPE_CONST, {.i64=0}, 0, 0, FLAGS, "display_mode" },
yading@10:     { NULL },
yading@10: };
yading@10: 
yading@10: AVFILTER_DEFINE_CLASS(histogram);
yading@10: 
yading@10: static const enum AVPixelFormat color_pix_fmts[] = {
yading@10:     AV_PIX_FMT_YUV444P, AV_PIX_FMT_YUVA444P, AV_PIX_FMT_YUVJ444P,
yading@10:     AV_PIX_FMT_NONE
yading@10: };
yading@10: 
yading@10: static const enum AVPixelFormat levels_pix_fmts[] = {
yading@10:     AV_PIX_FMT_YUV444P, AV_PIX_FMT_YUVA444P, AV_PIX_FMT_YUVJ444P,
yading@10:     AV_PIX_FMT_GRAY8, AV_PIX_FMT_GBRP, AV_PIX_FMT_NONE
yading@10: };
yading@10: 
yading@10: static int query_formats(AVFilterContext *ctx)
yading@10: {
yading@10:     HistogramContext *h = ctx->priv;
yading@10:     const enum AVPixelFormat *pix_fmts;
yading@10: 
yading@10:     switch (h->mode) {
yading@10:     case MODE_WAVEFORM:
yading@10:     case MODE_LEVELS:
yading@10:         pix_fmts = levels_pix_fmts;
yading@10:         break;
yading@10:     case MODE_COLOR:
yading@10:     case MODE_COLOR2:
yading@10:         pix_fmts = color_pix_fmts;
yading@10:         break;
yading@10:     default:
yading@10:         av_assert0(0);
yading@10:     }
yading@10: 
yading@10:     ff_set_common_formats(ctx, ff_make_format_list(pix_fmts));
yading@10: 
yading@10:     return 0;
yading@10: }
yading@10: 
yading@10: static const uint8_t black_yuva_color[4] = { 0, 127, 127, 255 };
yading@10: static const uint8_t black_gbrp_color[4] = { 0, 0, 0, 255 };
yading@10: static const uint8_t white_yuva_color[4] = { 255, 127, 127, 255 };
yading@10: static const uint8_t white_gbrp_color[4] = { 255, 255, 255, 255 };
yading@10: 
yading@10: static int config_input(AVFilterLink *inlink)
yading@10: {
yading@10:     HistogramContext *h = inlink->dst->priv;
yading@10:     const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(inlink->format);
yading@10: 
yading@10:     h->ncomp = desc->nb_components;
yading@10: 
yading@10:     switch (inlink->format) {
yading@10:     case AV_PIX_FMT_GBRP:
yading@10:         h->bg_color = black_gbrp_color;
yading@10:         h->fg_color = white_gbrp_color;
yading@10:         break;
yading@10:     default:
yading@10:         h->bg_color = black_yuva_color;
yading@10:         h->fg_color = white_yuva_color;
yading@10:     }
yading@10: 
yading@10:     return 0;
yading@10: }
yading@10: 
yading@10: static int config_output(AVFilterLink *outlink)
yading@10: {
yading@10:     AVFilterContext *ctx = outlink->src;
yading@10:     HistogramContext *h = ctx->priv;
yading@10: 
yading@10:     switch (h->mode) {
yading@10:     case MODE_LEVELS:
yading@10:         outlink->w = 256;
yading@10:         outlink->h = (h->level_height + h->scale_height) * FFMAX(h->ncomp * h->display_mode, 1);
yading@10:         break;
yading@10:     case MODE_WAVEFORM:
yading@10:         if (h->waveform_mode)
yading@10:             outlink->h = 256 * FFMAX(h->ncomp * h->display_mode, 1);
yading@10:         else
yading@10:             outlink->w = 256 * FFMAX(h->ncomp * h->display_mode, 1);
yading@10:         break;
yading@10:     case MODE_COLOR:
yading@10:     case MODE_COLOR2:
yading@10:         outlink->h = outlink->w = 256;
yading@10:         break;
yading@10:     default:
yading@10:         av_assert0(0);
yading@10:     }
yading@10: 
yading@10:     outlink->sample_aspect_ratio = (AVRational){1,1};
yading@10: 
yading@10:     return 0;
yading@10: }
yading@10: 
yading@10: static int filter_frame(AVFilterLink *inlink, AVFrame *in)
yading@10: {
yading@10:     HistogramContext *h   = inlink->dst->priv;
yading@10:     AVFilterContext *ctx  = inlink->dst;
yading@10:     AVFilterLink *outlink = ctx->outputs[0];
yading@10:     AVFrame *out;
yading@10:     const uint8_t *src;
yading@10:     uint8_t *dst;
yading@10:     int i, j, k, l;
yading@10: 
yading@10:     out = ff_get_video_buffer(outlink, outlink->w, outlink->h);
yading@10:     if (!out) {
yading@10:         av_frame_free(&in);
yading@10:         return AVERROR(ENOMEM);
yading@10:     }
yading@10: 
yading@10:     out->pts = in->pts;
yading@10: 
yading@10:     for (k = 0; k < h->ncomp; k++)
yading@10:         for (i = 0; i < outlink->h; i++)
yading@10:             memset(out->data[k] + i * out->linesize[k], h->bg_color[k], outlink->w);
yading@10: 
yading@10:     switch (h->mode) {
yading@10:     case MODE_LEVELS:
yading@10:         for (k = 0; k < h->ncomp; k++) {
yading@10:             int start = k * (h->level_height + h->scale_height) * h->display_mode;
yading@10: 
yading@10:             for (i = 0; i < in->height; i++) {
yading@10:                 src = in->data[k] + i * in->linesize[k];
yading@10:                 for (j = 0; j < in->width; j++)
yading@10:                     h->histogram[src[j]]++;
yading@10:             }
yading@10: 
yading@10:             for (i = 0; i < 256; i++)
yading@10:                 h->max_hval = FFMAX(h->max_hval, h->histogram[i]);
yading@10: 
yading@10:             for (i = 0; i < outlink->w; i++) {
yading@10:                 int col_height = h->level_height - (h->histogram[i] * (int64_t)h->level_height + h->max_hval - 1) / h->max_hval;
yading@10: 
yading@10:                 for (j = h->level_height - 1; j >= col_height; j--) {
yading@10:                     if (h->display_mode) {
yading@10:                         for (l = 0; l < h->ncomp; l++)
yading@10:                             out->data[l][(j + start) * out->linesize[l] + i] = h->fg_color[l];
yading@10:                     } else {
yading@10:                         out->data[k][(j + start) * out->linesize[k] + i] = 255;
yading@10:                     }
yading@10:                 }
yading@10:                 for (j = h->level_height + h->scale_height - 1; j >= h->level_height; j--)
yading@10:                     out->data[k][(j + start) * out->linesize[k] + i] = i;
yading@10:             }
yading@10: 
yading@10:             memset(h->histogram, 0, 256 * sizeof(unsigned));
yading@10:             h->max_hval = 0;
yading@10:         }
yading@10:         break;
yading@10:     case MODE_WAVEFORM:
yading@10:         if (h->waveform_mode) {
yading@10:             for (k = 0; k < h->ncomp; k++) {
yading@10:                 int offset = k * 256 * h->display_mode;
yading@10:                 for (i = 0; i < inlink->w; i++) {
yading@10:                     for (j = 0; j < inlink->h; j++) {
yading@10:                         int pos = (offset +
yading@10:                                    in->data[k][j * in->linesize[k] + i]) *
yading@10:                                   out->linesize[k] + i;
yading@10:                         unsigned value = out->data[k][pos];
yading@10:                         value = FFMIN(value + h->step, 255);
yading@10:                         out->data[k][pos] = value;
yading@10:                     }
yading@10:                 }
yading@10:             }
yading@10:         } else {
yading@10:             for (k = 0; k < h->ncomp; k++) {
yading@10:                 int offset = k * 256 * h->display_mode;
yading@10:                 for (i = 0; i < inlink->h; i++) {
yading@10:                     src = in ->data[k] + i * in ->linesize[k];
yading@10:                     dst = out->data[k] + i * out->linesize[k];
yading@10:                     for (j = 0; j < inlink->w; j++) {
yading@10:                         int pos = src[j] + offset;
yading@10:                         unsigned value = dst[pos];
yading@10:                         value = FFMIN(value + h->step, 255);
yading@10:                         dst[pos] = value;
yading@10:                     }
yading@10:                 }
yading@10:             }
yading@10:         }
yading@10:         break;
yading@10:     case MODE_COLOR:
yading@10:         for (i = 0; i < inlink->h; i++) {
yading@10:             int iw1 = i * in->linesize[1];
yading@10:             int iw2 = i * in->linesize[2];
yading@10:             for (j = 0; j < inlink->w; j++) {
yading@10:                 int pos = in->data[1][iw1 + j] * out->linesize[0] + in->data[2][iw2 + j];
yading@10:                 if (out->data[0][pos] < 255)
yading@10:                     out->data[0][pos]++;
yading@10:             }
yading@10:         }
yading@10:         for (i = 0; i < 256; i++) {
yading@10:             dst = out->data[0] + i * out->linesize[0];
yading@10:             for (j = 0; j < 256; j++) {
yading@10:                 if (!dst[j]) {
yading@10:                     out->data[1][i * out->linesize[0] + j] = i;
yading@10:                     out->data[2][i * out->linesize[0] + j] = j;
yading@10:                 }
yading@10:             }
yading@10:         }
yading@10:         break;
yading@10:     case MODE_COLOR2:
yading@10:         for (i = 0; i < inlink->h; i++) {
yading@10:             int iw1 = i * in->linesize[1];
yading@10:             int iw2 = i * in->linesize[2];
yading@10:             for (j = 0; j < inlink->w; j++) {
yading@10:                 int u = in->data[1][iw1 + j];
yading@10:                 int v = in->data[2][iw2 + j];
yading@10:                 int pos = u * out->linesize[0] + v;
yading@10:                 if (!out->data[0][pos])
yading@10:                     out->data[0][pos] = FFABS(128 - u) + FFABS(128 - v);
yading@10:                 out->data[1][pos] = u;
yading@10:                 out->data[2][pos] = v;
yading@10:             }
yading@10:         }
yading@10:         break;
yading@10:     default:
yading@10:         av_assert0(0);
yading@10:     }
yading@10: 
yading@10:     av_frame_free(&in);
yading@10:     return ff_filter_frame(outlink, out);
yading@10: }
yading@10: 
yading@10: static const AVFilterPad inputs[] = {
yading@10:     {
yading@10:         .name         = "default",
yading@10:         .type         = AVMEDIA_TYPE_VIDEO,
yading@10:         .filter_frame = filter_frame,
yading@10:         .config_props = config_input,
yading@10:     },
yading@10:     { NULL }
yading@10: };
yading@10: 
yading@10: static const AVFilterPad outputs[] = {
yading@10:     {
yading@10:         .name         = "default",
yading@10:         .type         = AVMEDIA_TYPE_VIDEO,
yading@10:         .config_props = config_output,
yading@10:     },
yading@10:     { NULL }
yading@10: };
yading@10: 
yading@10: AVFilter avfilter_vf_histogram = {
yading@10:     .name          = "histogram",
yading@10:     .description   = NULL_IF_CONFIG_SMALL("Compute and draw a histogram."),
yading@10:     .priv_size     = sizeof(HistogramContext),
yading@10:     .query_formats = query_formats,
yading@10:     .inputs        = inputs,
yading@10:     .outputs       = outputs,
yading@10:     .priv_class    = &histogram_class,
yading@10: };