lavfi: unref AVFilterLink.cur_buf in ff_end_frame().
[ffmpeg.git] / libavfilter / vf_fieldorder.c
1 /*
2  * Copyright (c) 2011 Mark Himsley
3  *
4  * This file is part of Libav.
5  *
6  * Libav 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  * Libav 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 Libav; 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  * video field order filter, heavily influenced by vf_pad.c
24  */
25
26 /* #define DEBUG */
27
28 #include "libavutil/imgutils.h"
29 #include "libavutil/pixdesc.h"
30 #include "avfilter.h"
31 #include "formats.h"
32 #include "internal.h"
33 #include "video.h"
34
35 typedef struct
36 {
37     unsigned int dst_tff;      ///< output bff/tff
38     int          line_size[4]; ///< bytes of pixel data per line for each plane
39 } FieldOrderContext;
40
41 static av_cold int init(AVFilterContext *ctx, const char *args)
42 {
43     FieldOrderContext *fieldorder = ctx->priv;
44
45     const char *tff = "tff";
46     const char *bff = "bff";
47
48     if (!args) {
49         fieldorder->dst_tff = 1;
50     } else if (sscanf(args, "%u", &fieldorder->dst_tff) == 1) {
51         fieldorder->dst_tff = !!fieldorder->dst_tff;
52     } else if (!strcmp(tff, args)) {
53         fieldorder->dst_tff = 1;
54     } else if (!strcmp(bff, args)) {
55         fieldorder->dst_tff = 0;
56     } else {
57         av_log(ctx, AV_LOG_ERROR, "Invalid argument '%s'.\n", args);
58         return AVERROR(EINVAL);
59     }
60
61     av_log(ctx, AV_LOG_VERBOSE, "output field order: %s\n",
62             fieldorder->dst_tff ? tff : bff);
63
64     return 0;
65 }
66
67 static int query_formats(AVFilterContext *ctx)
68 {
69     AVFilterFormats  *formats;
70     enum PixelFormat pix_fmt;
71     int              ret;
72
73     /** accept any input pixel format that is not hardware accelerated, not
74      *  a bitstream format, and does not have vertically sub-sampled chroma */
75     if (ctx->inputs[0]) {
76         formats = NULL;
77         for (pix_fmt = 0; pix_fmt < PIX_FMT_NB; pix_fmt++)
78             if (!(  av_pix_fmt_descriptors[pix_fmt].flags & PIX_FMT_HWACCEL
79                  || av_pix_fmt_descriptors[pix_fmt].flags & PIX_FMT_BITSTREAM)
80                 && av_pix_fmt_descriptors[pix_fmt].nb_components
81                 && !av_pix_fmt_descriptors[pix_fmt].log2_chroma_h
82                 && (ret = ff_add_format(&formats, pix_fmt)) < 0) {
83                 ff_formats_unref(&formats);
84                 return ret;
85             }
86         ff_formats_ref(formats, &ctx->inputs[0]->out_formats);
87         ff_formats_ref(formats, &ctx->outputs[0]->in_formats);
88     }
89
90     return 0;
91 }
92
93 static int config_input(AVFilterLink *inlink)
94 {
95     AVFilterContext   *ctx        = inlink->dst;
96     FieldOrderContext *fieldorder = ctx->priv;
97     int               plane;
98
99     /** full an array with the number of bytes that the video
100      *  data occupies per line for each plane of the input video */
101     for (plane = 0; plane < 4; plane++) {
102         fieldorder->line_size[plane] = av_image_get_linesize(
103                 inlink->format,
104                 inlink->w,
105                 plane);
106     }
107
108     return 0;
109 }
110
111 static AVFilterBufferRef *get_video_buffer(AVFilterLink *inlink, int perms, int w, int h)
112 {
113     AVFilterContext   *ctx        = inlink->dst;
114     AVFilterLink      *outlink    = ctx->outputs[0];
115
116     return ff_get_video_buffer(outlink, perms, w, h);
117 }
118
119 static void start_frame(AVFilterLink *inlink, AVFilterBufferRef *inpicref)
120 {
121     AVFilterContext   *ctx        = inlink->dst;
122     AVFilterLink      *outlink    = ctx->outputs[0];
123
124     AVFilterBufferRef *outpicref, *for_next_filter;
125
126     outpicref = avfilter_ref_buffer(inpicref, ~0);
127     outlink->out_buf = outpicref;
128
129     for_next_filter = avfilter_ref_buffer(outpicref, ~0);
130     ff_start_frame(outlink, for_next_filter);
131 }
132
133 static void draw_slice(AVFilterLink *inlink, int y, int h, int slice_dir)
134 {
135     AVFilterContext   *ctx        = inlink->dst;
136     FieldOrderContext *fieldorder = ctx->priv;
137     AVFilterLink      *outlink    = ctx->outputs[0];
138
139     AVFilterBufferRef *inpicref   = inlink->cur_buf;
140
141     /** can only currently do slices if this filter is doing nothing
142      *  because this filter is moving picture content, the output
143      *  slice will contain different video lines than the input slice
144      *  and that complexity will be added later */
145     if (  !inpicref->video->interlaced
146         || inpicref->video->top_field_first == fieldorder->dst_tff) {
147         ff_draw_slice(outlink, y, h, slice_dir);
148     }
149 }
150
151 static void end_frame(AVFilterLink *inlink)
152 {
153     AVFilterContext   *ctx        = inlink->dst;
154     FieldOrderContext *fieldorder = ctx->priv;
155     AVFilterLink      *outlink    = ctx->outputs[0];
156
157     AVFilterBufferRef *inpicref   = inlink->cur_buf;
158     AVFilterBufferRef *outpicref  = outlink->out_buf;
159
160     int               h, plane, line_step, line_size, line;
161     uint8_t           *cpy_src, *cpy_dst;
162
163     if (    inpicref->video->interlaced
164          && inpicref->video->top_field_first != fieldorder->dst_tff) {
165         av_dlog(ctx,
166                 "picture will move %s one line\n",
167                 fieldorder->dst_tff ? "up" : "down");
168         h = inpicref->video->h;
169         for (plane = 0; plane < 4 && inpicref->data[plane]; plane++) {
170             line_step = inpicref->linesize[plane];
171             line_size = fieldorder->line_size[plane];
172             cpy_src = inpicref->data[plane];
173             cpy_dst = outpicref->data[plane];
174             if (fieldorder->dst_tff) {
175                 /** Move every line up one line, working from
176                  *  the top to the bottom of the frame.
177                  *  The original top line is lost.
178                  *  The new last line is created as a copy of the
179                  *  penultimate line from that field. */
180                 for (line = 0; line < h; line++) {
181                     if (1 + line < outpicref->video->h) {
182                         memcpy(cpy_dst, cpy_src + line_step, line_size);
183                     } else {
184                         memcpy(cpy_dst, cpy_src - line_step - line_step, line_size);
185                     }
186                     cpy_src += line_step;
187                     cpy_dst += line_step;
188                 }
189             } else {
190                 /** Move every line down one line, working from
191                  *  the bottom to the top of the frame.
192                  *  The original bottom line is lost.
193                  *  The new first line is created as a copy of the
194                  *  second line from that field. */
195                 cpy_src += (h - 1) * line_step;
196                 cpy_dst += (h - 1) * line_step;
197                 for (line = h - 1; line >= 0 ; line--) {
198                     if (line > 0) {
199                         memcpy(cpy_dst, cpy_src - line_step, line_size);
200                     } else {
201                         memcpy(cpy_dst, cpy_src + line_step + line_step, line_size);
202                     }
203                     cpy_src -= line_step;
204                     cpy_dst -= line_step;
205                 }
206             }
207         }
208         outpicref->video->top_field_first = fieldorder->dst_tff;
209         ff_draw_slice(outlink, 0, h, 1);
210     } else {
211         av_dlog(ctx,
212                 "not interlaced or field order already correct\n");
213     }
214
215     ff_end_frame(outlink);
216     avfilter_unref_bufferp(&outlink->out_buf);
217 }
218
219 AVFilter avfilter_vf_fieldorder = {
220     .name          = "fieldorder",
221     .description   = NULL_IF_CONFIG_SMALL("Set the field order."),
222     .init          = init,
223     .priv_size     = sizeof(FieldOrderContext),
224     .query_formats = query_formats,
225     .inputs        = (AVFilterPad[]) {{ .name             = "default",
226                                         .type             = AVMEDIA_TYPE_VIDEO,
227                                         .config_props     = config_input,
228                                         .start_frame      = start_frame,
229                                         .get_video_buffer = get_video_buffer,
230                                         .draw_slice       = draw_slice,
231                                         .end_frame        = end_frame,
232                                         .min_perms        = AV_PERM_READ,
233                                         .rej_perms        = AV_PERM_REUSE2|AV_PERM_PRESERVE,},
234                                       { .name = NULL}},
235     .outputs       = (AVFilterPad[]) {{ .name             = "default",
236                                         .type             = AVMEDIA_TYPE_VIDEO, },
237                                       { .name = NULL}},
238 };