[deb_ffmpeg.git] / ffmpeg / libavfilter / vf_telecine.c

/*
 * Copyright (c) 2012 Rudolf Polzer
 * Copyright (c) 2013 Paul B Mahol
 *
 * 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 telecine filter, heavily based from mpv-player:TOOLS/vf_dlopen/telecine.c by
 * Rudolf Polzer.
 */

#include "libavutil/avstring.h"
#include "libavutil/imgutils.h"
#include "libavutil/opt.h"
#include "libavutil/pixdesc.h"
#include "avfilter.h"
#include "formats.h"
#include "internal.h"
#include "video.h"

typedef struct {
    const AVClass *class;
    int first_field;
    char *pattern;
    unsigned int pattern_pos;

    AVRational pts;
    double ts_unit;
    int out_cnt;
    int occupied;

    int nb_planes;
    int planeheight[4];
    int stride[4];

    AVFrame *frame[5];
    AVFrame *temp;
} TelecineContext;

#define OFFSET(x) offsetof(TelecineContext, x)
#define FLAGS AV_OPT_FLAG_FILTERING_PARAM|AV_OPT_FLAG_VIDEO_PARAM

static const AVOption telecine_options[] = {
    {"first_field", "select first field", OFFSET(first_field), AV_OPT_TYPE_INT,   {.i64=0}, 0, 1, FLAGS, "field"},
        {"top",    "select top field first",                0, AV_OPT_TYPE_CONST, {.i64=0}, 0, 0, FLAGS, "field"},
        {"t",      "select top field first",                0, AV_OPT_TYPE_CONST, {.i64=0}, 0, 0, FLAGS, "field"},
        {"bottom", "select bottom field first",             0, AV_OPT_TYPE_CONST, {.i64=1}, 0, 0, FLAGS, "field"},
        {"b",      "select bottom field first",             0, AV_OPT_TYPE_CONST, {.i64=1}, 0, 0, FLAGS, "field"},
    {"pattern", "pattern that describe for how many fields a frame is to be displayed", OFFSET(pattern), AV_OPT_TYPE_STRING, {.str="23"}, 0, 0, FLAGS},
    {NULL}
};

AVFILTER_DEFINE_CLASS(telecine);

static av_cold int init(AVFilterContext *ctx)
{
    TelecineContext *tc = ctx->priv;
    const char *p;
    int max = 0;

    if (!strlen(tc->pattern)) {
        av_log(ctx, AV_LOG_ERROR, "No pattern provided.\n");
        return AVERROR_INVALIDDATA;
    }

    for (p = tc->pattern; *p; p++) {
        if (!av_isdigit(*p)) {
            av_log(ctx, AV_LOG_ERROR, "Provided pattern includes non-numeric characters.\n");
            return AVERROR_INVALIDDATA;
        }

        max = FFMAX(*p - '0', max);
        tc->pts.num += 2;
        tc->pts.den += *p - '0';
    }

    tc->out_cnt = (max + 1) / 2;
    av_log(ctx, AV_LOG_INFO, "Telecine pattern %s yields up to %d frames per frame, pts advance factor: %d/%d\n",
           tc->pattern, tc->out_cnt, tc->pts.num, tc->pts.den);

    return 0;
}

static int query_formats(AVFilterContext *ctx)
{
    AVFilterFormats *pix_fmts = NULL;
    int fmt;

    for (fmt = 0; av_pix_fmt_desc_get(fmt); fmt++) {
        const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(fmt);
        if (!(desc->flags & AV_PIX_FMT_FLAG_HWACCEL ||
              desc->flags & AV_PIX_FMT_FLAG_PAL     ||
              desc->flags & AV_PIX_FMT_FLAG_BITSTREAM))
            ff_add_format(&pix_fmts, fmt);
    }

    ff_set_common_formats(ctx, pix_fmts);
    return 0;
}

static int config_input(AVFilterLink *inlink)
{
    TelecineContext *tc = inlink->dst->priv;
    const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(inlink->format);
    int i, ret;

    tc->temp = ff_get_video_buffer(inlink, inlink->w, inlink->h);
    if (!tc->temp)
        return AVERROR(ENOMEM);
    for (i = 0; i < tc->out_cnt; i++) {
        tc->frame[i] = ff_get_video_buffer(inlink, inlink->w, inlink->h);
        if (!tc->frame[i])
            return AVERROR(ENOMEM);
    }

    if ((ret = av_image_fill_linesizes(tc->stride, inlink->format, inlink->w)) < 0)
        return ret;

    tc->planeheight[1] = tc->planeheight[2] = FF_CEIL_RSHIFT(inlink->h, desc->log2_chroma_h);
    tc->planeheight[0] = tc->planeheight[3] = inlink->h;

    tc->nb_planes = av_pix_fmt_count_planes(inlink->format);

    return 0;
}

static int config_output(AVFilterLink *outlink)
{
    AVFilterContext *ctx = outlink->src;
    TelecineContext *tc = ctx->priv;
    const AVFilterLink *inlink = ctx->inputs[0];
    AVRational fps = inlink->frame_rate;

    if (!fps.num || !fps.den) {
        av_log(ctx, AV_LOG_ERROR, "The input needs a constant frame rate; "
               "current rate of %d/%d is invalid\n", fps.num, fps.den);
        return AVERROR(EINVAL);
    }
    fps = av_mul_q(fps, av_inv_q(tc->pts));
    av_log(ctx, AV_LOG_VERBOSE, "FPS: %d/%d -> %d/%d\n",
           inlink->frame_rate.num, inlink->frame_rate.den, fps.num, fps.den);

    outlink->flags |= FF_LINK_FLAG_REQUEST_LOOP;
    outlink->frame_rate = fps;
    outlink->time_base = av_mul_q(inlink->time_base, tc->pts);
    av_log(ctx, AV_LOG_VERBOSE, "TB: %d/%d -> %d/%d\n",
           inlink->time_base.num, inlink->time_base.den, outlink->time_base.num, outlink->time_base.den);

    tc->ts_unit = av_q2d(av_inv_q(av_mul_q(fps, outlink->time_base)));

    return 0;
}

static int filter_frame(AVFilterLink *inlink, AVFrame *inpicref)
{
    AVFilterContext *ctx = inlink->dst;
    AVFilterLink *outlink = ctx->outputs[0];
    TelecineContext *tc = ctx->priv;
    int i, len, ret = 0, nout = 0;

    len = tc->pattern[tc->pattern_pos] - '0';

    tc->pattern_pos++;
    if (!tc->pattern[tc->pattern_pos])
        tc->pattern_pos = 0;

    if (!len) { // do not output any field from this frame
        av_frame_free(&inpicref);
        return 0;
    }

    if (tc->occupied) {
        for (i = 0; i < tc->nb_planes; i++) {
            // fill in the EARLIER field from the buffered pic
            av_image_copy_plane(tc->frame[nout]->data[i] + tc->frame[nout]->linesize[i] * tc->first_field,
                                tc->frame[nout]->linesize[i] * 2,
                                tc->temp->data[i] + tc->temp->linesize[i] * tc->first_field,
                                tc->temp->linesize[i] * 2,
                                tc->stride[i],
                                (tc->planeheight[i] - tc->first_field + 1) / 2);
            // fill in the LATER field from the new pic
            av_image_copy_plane(tc->frame[nout]->data[i] + tc->frame[nout]->linesize[i] * !tc->first_field,
                                tc->frame[nout]->linesize[i] * 2,
                                inpicref->data[i] + inpicref->linesize[i] * !tc->first_field,
                                inpicref->linesize[i] * 2,
                                tc->stride[i],
                                (tc->planeheight[i] - !tc->first_field + 1) / 2);
        }
        nout++;
        len--;
        tc->occupied = 0;
    }

    while (len >= 2) {
        // output THIS image as-is
        for (i = 0; i < tc->nb_planes; i++)
            av_image_copy_plane(tc->frame[nout]->data[i], tc->frame[nout]->linesize[i],
                                inpicref->data[i], inpicref->linesize[i],
                                tc->stride[i],
                                tc->planeheight[i]);
        nout++;
        len -= 2;
    }

    if (len >= 1) {
        // copy THIS image to the buffer, we need it later
        for (i = 0; i < tc->nb_planes; i++)
            av_image_copy_plane(tc->temp->data[i], tc->temp->linesize[i],
                                inpicref->data[i], inpicref->linesize[i],
                                tc->stride[i],
                                tc->planeheight[i]);
        tc->occupied = 1;
    }

    for (i = 0; i < nout; i++) {
        AVFrame *frame = av_frame_clone(tc->frame[i]);

        if (!frame) {
            av_frame_free(&inpicref);
            return AVERROR(ENOMEM);
        }

        frame->pts = outlink->frame_count * tc->ts_unit;
        ret = ff_filter_frame(outlink, frame);
    }
    av_frame_free(&inpicref);

    return ret;
}

static av_cold void uninit(AVFilterContext *ctx)
{
    TelecineContext *tc = ctx->priv;
    int i;

    av_frame_free(&tc->temp);
    for (i = 0; i < tc->out_cnt; i++)
        av_frame_free(&tc->frame[i]);
}

static const AVFilterPad telecine_inputs[] = {
    {
        .name          = "default",
        .type          = AVMEDIA_TYPE_VIDEO,
        .filter_frame  = filter_frame,
        .config_props  = config_input,
    },
    { NULL }
};

static const AVFilterPad telecine_outputs[] = {
    {
        .name          = "default",
        .type          = AVMEDIA_TYPE_VIDEO,
        .config_props  = config_output,
    },
    { NULL }
};

AVFilter ff_vf_telecine = {
    .name          = "telecine",
    .description   = NULL_IF_CONFIG_SMALL("Apply a telecine pattern."),
    .priv_size     = sizeof(TelecineContext),
    .priv_class    = &telecine_class,
    .init          = init,
    .uninit        = uninit,
    .query_formats = query_formats,
    .inputs        = telecine_inputs,
    .outputs       = telecine_outputs,
};
Commit	Line	Data
2ba45a60 DM	1	/*
	2	* Copyright (c) 2012 Rudolf Polzer
	3	* Copyright (c) 2013 Paul B Mahol
	4	*
	5	* This file is part of FFmpeg.
	6	*
	7	* FFmpeg is free software; you can redistribute it and/or
	8	* modify it under the terms of the GNU Lesser General Public
	9	* License as published by the Free Software Foundation; either
	10	* version 2.1 of the License, or (at your option) any later version.
	11	*
	12	* FFmpeg is distributed in the hope that it will be useful,
	13	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	14	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
	15	* Lesser General Public License for more details.
	16	*
	17	* You should have received a copy of the GNU Lesser General Public
	18	* License along with FFmpeg; if not, write to the Free Software
	19	* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
	20	*/
	21
	22	/**
	23	* @file telecine filter, heavily based from mpv-player:TOOLS/vf_dlopen/telecine.c by
	24	* Rudolf Polzer.
	25	*/
	26
	27	#include "libavutil/avstring.h"
	28	#include "libavutil/imgutils.h"
	29	#include "libavutil/opt.h"
	30	#include "libavutil/pixdesc.h"
	31	#include "avfilter.h"
	32	#include "formats.h"
	33	#include "internal.h"
	34	#include "video.h"
	35
	36	typedef struct {
	37	const AVClass *class;
	38	int first_field;
	39	char *pattern;
	40	unsigned int pattern_pos;
	41
	42	AVRational pts;
	43	double ts_unit;
	44	int out_cnt;
	45	int occupied;
	46
	47	int nb_planes;
	48	int planeheight[4];
	49	int stride[4];
	50
	51	AVFrame *frame[5];
	52	AVFrame *temp;
	53	} TelecineContext;
	54
	55	#define OFFSET(x) offsetof(TelecineContext, x)
	56	#define FLAGS AV_OPT_FLAG_FILTERING_PARAM\|AV_OPT_FLAG_VIDEO_PARAM
	57
	58	static const AVOption telecine_options[] = {
	59	{"first_field", "select first field", OFFSET(first_field), AV_OPT_TYPE_INT, {.i64=0}, 0, 1, FLAGS, "field"},
	60	{"top", "select top field first", 0, AV_OPT_TYPE_CONST, {.i64=0}, 0, 0, FLAGS, "field"},
	61	{"t", "select top field first", 0, AV_OPT_TYPE_CONST, {.i64=0}, 0, 0, FLAGS, "field"},
	62	{"bottom", "select bottom field first", 0, AV_OPT_TYPE_CONST, {.i64=1}, 0, 0, FLAGS, "field"},
	63	{"b", "select bottom field first", 0, AV_OPT_TYPE_CONST, {.i64=1}, 0, 0, FLAGS, "field"},
	64	{"pattern", "pattern that describe for how many fields a frame is to be displayed", OFFSET(pattern), AV_OPT_TYPE_STRING, {.str="23"}, 0, 0, FLAGS},
65	{NULL}
66	};
67
68	AVFILTER_DEFINE_CLASS(telecine);
69
70	static av_cold int init(AVFilterContext *ctx)
71	{
72	TelecineContext *tc = ctx->priv;
73	const char *p;
74	int max = 0;
75
76	if (!strlen(tc->pattern)) {
77	av_log(ctx, AV_LOG_ERROR, "No pattern provided.\n");
78	return AVERROR_INVALIDDATA;
79	}
80
81	for (p = tc->pattern; *p; p++) {
82	if (!av_isdigit(*p)) {
83	av_log(ctx, AV_LOG_ERROR, "Provided pattern includes non-numeric characters.\n");
84	return AVERROR_INVALIDDATA;
85	}
86
87	max = FFMAX(*p - '0', max);
88	tc->pts.num += 2;
89	tc->pts.den += *p - '0';
90	}
91
92	tc->out_cnt = (max + 1) / 2;
93	av_log(ctx, AV_LOG_INFO, "Telecine pattern %s yields up to %d frames per frame, pts advance factor: %d/%d\n",
94	tc->pattern, tc->out_cnt, tc->pts.num, tc->pts.den);
95
96	return 0;
97	}
98
99	static int query_formats(AVFilterContext *ctx)
100	{
101	AVFilterFormats *pix_fmts = NULL;
102	int fmt;
103
104	for (fmt = 0; av_pix_fmt_desc_get(fmt); fmt++) {
105	const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(fmt);
106	if (!(desc->flags & AV_PIX_FMT_FLAG_HWACCEL \|\|
107	desc->flags & AV_PIX_FMT_FLAG_PAL \|\|
108	desc->flags & AV_PIX_FMT_FLAG_BITSTREAM))
109	ff_add_format(&pix_fmts, fmt);
110	}
111
112	ff_set_common_formats(ctx, pix_fmts);
113	return 0;
114	}
115
116	static int config_input(AVFilterLink *inlink)
117	{
118	TelecineContext *tc = inlink->dst->priv;
119	const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(inlink->format);
120	int i, ret;
121
122	tc->temp = ff_get_video_buffer(inlink, inlink->w, inlink->h);
123	if (!tc->temp)
124	return AVERROR(ENOMEM);
125	for (i = 0; i < tc->out_cnt; i++) {
126	tc->frame[i] = ff_get_video_buffer(inlink, inlink->w, inlink->h);
127	if (!tc->frame[i])
128	return AVERROR(ENOMEM);
129	}
130
131	if ((ret = av_image_fill_linesizes(tc->stride, inlink->format, inlink->w)) < 0)
132	return ret;
133
134	tc->planeheight[1] = tc->planeheight[2] = FF_CEIL_RSHIFT(inlink->h, desc->log2_chroma_h);
135	tc->planeheight[0] = tc->planeheight[3] = inlink->h;
136
137	tc->nb_planes = av_pix_fmt_count_planes(inlink->format);
138
139	return 0;
140	}
141
142	static int config_output(AVFilterLink *outlink)
143	{
144	AVFilterContext *ctx = outlink->src;
145	TelecineContext *tc = ctx->priv;
146	const AVFilterLink *inlink = ctx->inputs[0];
147	AVRational fps = inlink->frame_rate;
148
149	if (!fps.num \|\| !fps.den) {
150	av_log(ctx, AV_LOG_ERROR, "The input needs a constant frame rate; "
151	"current rate of %d/%d is invalid\n", fps.num, fps.den);
152	return AVERROR(EINVAL);
153	}
154	fps = av_mul_q(fps, av_inv_q(tc->pts));
155	av_log(ctx, AV_LOG_VERBOSE, "FPS: %d/%d -> %d/%d\n",
156	inlink->frame_rate.num, inlink->frame_rate.den, fps.num, fps.den);
157
158	outlink->flags \|= FF_LINK_FLAG_REQUEST_LOOP;
159	outlink->frame_rate = fps;
160	outlink->time_base = av_mul_q(inlink->time_base, tc->pts);
161	av_log(ctx, AV_LOG_VERBOSE, "TB: %d/%d -> %d/%d\n",
162	inlink->time_base.num, inlink->time_base.den, outlink->time_base.num, outlink->time_base.den);
163
164	tc->ts_unit = av_q2d(av_inv_q(av_mul_q(fps, outlink->time_base)));
165
166	return 0;
167	}
168
169	static int filter_frame(AVFilterLink inlink, AVFrame inpicref)
170	{
171	AVFilterContext *ctx = inlink->dst;
172	AVFilterLink *outlink = ctx->outputs[0];
173	TelecineContext *tc = ctx->priv;
174	int i, len, ret = 0, nout = 0;
175
176	len = tc->pattern[tc->pattern_pos] - '0';
177
178	tc->pattern_pos++;
179	if (!tc->pattern[tc->pattern_pos])
180	tc->pattern_pos = 0;
181
182	if (!len) { // do not output any field from this frame
183	av_frame_free(&inpicref);
184	return 0;
185	}
186
187	if (tc->occupied) {
188	for (i = 0; i < tc->nb_planes; i++) {
189	// fill in the EARLIER field from the buffered pic
190	av_image_copy_plane(tc->frame[nout]->data[i] + tc->frame[nout]->linesize[i] * tc->first_field,
191	tc->frame[nout]->linesize[i] * 2,
192	tc->temp->data[i] + tc->temp->linesize[i] * tc->first_field,
193	tc->temp->linesize[i] * 2,
194	tc->stride[i],
195	(tc->planeheight[i] - tc->first_field + 1) / 2);
196	// fill in the LATER field from the new pic
197	av_image_copy_plane(tc->frame[nout]->data[i] + tc->frame[nout]->linesize[i] * !tc->first_field,
198	tc->frame[nout]->linesize[i] * 2,
199	inpicref->data[i] + inpicref->linesize[i] * !tc->first_field,
200	inpicref->linesize[i] * 2,
201	tc->stride[i],
202	(tc->planeheight[i] - !tc->first_field + 1) / 2);
203	}
204	nout++;
205	len--;
206	tc->occupied = 0;
207	}
208
209	while (len >= 2) {
210	// output THIS image as-is
211	for (i = 0; i < tc->nb_planes; i++)
212	av_image_copy_plane(tc->frame[nout]->data[i], tc->frame[nout]->linesize[i],
213	inpicref->data[i], inpicref->linesize[i],
214	tc->stride[i],
215	tc->planeheight[i]);
216	nout++;
217	len -= 2;
218	}
219
220	if (len >= 1) {
221	// copy THIS image to the buffer, we need it later
222	for (i = 0; i < tc->nb_planes; i++)
223	av_image_copy_plane(tc->temp->data[i], tc->temp->linesize[i],
224	inpicref->data[i], inpicref->linesize[i],
225	tc->stride[i],
226	tc->planeheight[i]);
227	tc->occupied = 1;
228	}
229
230	for (i = 0; i < nout; i++) {
231	AVFrame *frame = av_frame_clone(tc->frame[i]);
232
233	if (!frame) {
234	av_frame_free(&inpicref);
235	return AVERROR(ENOMEM);
236	}
237
238	frame->pts = outlink->frame_count * tc->ts_unit;
239	ret = ff_filter_frame(outlink, frame);
240	}
241	av_frame_free(&inpicref);
242
243	return ret;
244	}
245
246	static av_cold void uninit(AVFilterContext *ctx)
247	{
248	TelecineContext *tc = ctx->priv;
249	int i;
250
251	av_frame_free(&tc->temp);
252	for (i = 0; i < tc->out_cnt; i++)
253	av_frame_free(&tc->frame[i]);
254	}
255
256	static const AVFilterPad telecine_inputs[] = {
257	{
258	.name = "default",
259	.type = AVMEDIA_TYPE_VIDEO,
260	.filter_frame = filter_frame,
261	.config_props = config_input,
262	},
263	{ NULL }
264	};
265
266	static const AVFilterPad telecine_outputs[] = {
267	{
268	.name = "default",
269	.type = AVMEDIA_TYPE_VIDEO,
270	.config_props = config_output,
271	},
272	{ NULL }
273	};
274
275	AVFilter ff_vf_telecine = {
276	.name = "telecine",
277	.description = NULL_IF_CONFIG_SMALL("Apply a telecine pattern."),
278	.priv_size = sizeof(TelecineContext),
279	.priv_class = &telecine_class,
280	.init = init,
281	.uninit = uninit,
282	.query_formats = query_formats,
283	.inputs = telecine_inputs,
284	.outputs = telecine_outputs,
285	};