ass: fix aspect ratio computation.
[ffmpeg.git] / libavfilter / vf_ass.c
1 /*
2  * Copyright (c) 2011 Baptiste Coudurier
3  * Copyright (c) 2011 Stefano Sabatini
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
24  * Libass subtitles burning filter.
25  *
26  * @see{http://www.matroska.org/technical/specs/subtitles/ssa.html}
27  */
28
29 #include <ass/ass.h>
30
31 #include "libavutil/avstring.h"
32 #include "libavutil/imgutils.h"
33 #include "libavutil/opt.h"
34 #include "libavutil/parseutils.h"
35 #include "libavutil/pixdesc.h"
36 #include "drawutils.h"
37 #include "avfilter.h"
38
39 typedef struct {
40     const AVClass *class;
41     ASS_Library  *library;
42     ASS_Renderer *renderer;
43     ASS_Track    *track;
44     int hsub, vsub;
45     char *filename;
46     uint8_t rgba_map[4];
47     int     pix_step[4];       ///< steps per pixel for each plane of the main output
48     char *original_size_str;
49     int original_w, original_h;
50 } AssContext;
51
52 #define OFFSET(x) offsetof(AssContext, x)
53
54 static const AVOption ass_options[] = {
55     {"original_size",  "set the size of the original video (used to scale fonts)", OFFSET(original_size_str), AV_OPT_TYPE_STRING, {.str = NULL},  CHAR_MIN, CHAR_MAX },
56     {NULL},
57 };
58
59 static const char *ass_get_name(void *ctx)
60 {
61     return "ass";
62 }
63
64 static const AVClass ass_class = {
65     "AssContext",
66     ass_get_name,
67     ass_options
68 };
69
70 /* libass supports a log level ranging from 0 to 7 */
71 int ass_libav_log_level_map[] = {
72     AV_LOG_QUIET,               /* 0 */
73     AV_LOG_PANIC,               /* 1 */
74     AV_LOG_FATAL,               /* 2 */
75     AV_LOG_ERROR,               /* 3 */
76     AV_LOG_WARNING,             /* 4 */
77     AV_LOG_INFO,                /* 5 */
78     AV_LOG_VERBOSE,             /* 6 */
79     AV_LOG_DEBUG,               /* 7 */
80 };
81
82 static void ass_log(int ass_level, const char *fmt, va_list args, void *ctx)
83 {
84     int level = ass_libav_log_level_map[ass_level];
85
86     av_vlog(ctx, level, fmt, args);
87     av_log(ctx, level, "\n");
88 }
89
90 static av_cold int init(AVFilterContext *ctx, const char *args, void *opaque)
91 {
92     AssContext *ass = ctx->priv;
93     int ret;
94
95     ass->class = &ass_class;
96     av_opt_set_defaults(ass);
97
98     if (args)
99         ass->filename = av_get_token(&args, ":");
100     if (!ass->filename || !*ass->filename) {
101         av_log(ctx, AV_LOG_ERROR, "No filename provided!\n");
102         return AVERROR(EINVAL);
103     }
104
105     if (*args++ == ':' && (ret = av_set_options_string(ass, args, "=", ":")) < 0) {
106         av_log(ctx, AV_LOG_ERROR, "Error parsing options string: '%s'\n", args);
107         return ret;
108     }
109
110     if (ass->original_size_str &&
111         av_parse_video_size(&ass->original_w, &ass->original_h,
112                             ass->original_size_str) < 0) {
113         av_log(ctx, AV_LOG_ERROR,
114                "Invalid original size '%s'.\n", ass->original_size_str);
115         return AVERROR(EINVAL);
116     }
117
118     ass->library = ass_library_init();
119     if (!ass->library) {
120         av_log(ctx, AV_LOG_ERROR, "Could not initialize libass.\n");
121         return AVERROR(EINVAL);
122     }
123     ass_set_message_cb(ass->library, ass_log, ctx);
124
125     ass->renderer = ass_renderer_init(ass->library);
126     if (!ass->renderer) {
127         av_log(ctx, AV_LOG_ERROR, "Could not initialize libass renderer.\n");
128         return AVERROR(EINVAL);
129     }
130
131     ass->track = ass_read_file(ass->library, ass->filename, NULL);
132     if (!ass->track) {
133         av_log(ctx, AV_LOG_ERROR,
134                "Could not create a libass track when reading file '%s'\n",
135                ass->filename);
136         return AVERROR(EINVAL);
137     }
138
139     ass_set_fonts(ass->renderer, NULL, NULL, 1, NULL, 1);
140     return 0;
141 }
142
143 static av_cold void uninit(AVFilterContext *ctx)
144 {
145     AssContext *ass = ctx->priv;
146
147     av_freep(&ass->filename);
148     av_freep(&ass->original_size_str);
149     if (ass->track)
150         ass_free_track(ass->track);
151     if (ass->renderer)
152         ass_renderer_done(ass->renderer);
153     if (ass->library)
154         ass_library_done(ass->library);
155 }
156
157 static int query_formats(AVFilterContext *ctx)
158 {
159     static const enum PixelFormat pix_fmts[] = {
160         PIX_FMT_ARGB,  PIX_FMT_RGBA,
161         PIX_FMT_ABGR,  PIX_FMT_BGRA,
162         PIX_FMT_RGB24, PIX_FMT_BGR24,
163         PIX_FMT_NONE
164     };
165
166     avfilter_set_common_pixel_formats(ctx, avfilter_make_format_list(pix_fmts));
167
168     return 0;
169 }
170
171 static int config_input(AVFilterLink *inlink)
172 {
173     AssContext *ass = inlink->dst->priv;
174     const AVPixFmtDescriptor *pix_desc = &av_pix_fmt_descriptors[inlink->format];
175
176     av_image_fill_max_pixsteps(ass->pix_step, NULL, pix_desc);
177     ff_fill_rgba_map(ass->rgba_map, inlink->format);
178
179     ass->hsub = pix_desc->log2_chroma_w;
180     ass->vsub = pix_desc->log2_chroma_h;
181
182     ass_set_frame_size  (ass->renderer, inlink->w, inlink->h);
183     if (ass->original_w && ass->original_h)
184         ass_set_aspect_ratio(ass->renderer, (double)inlink->w / inlink->h,
185                              (double)ass->original_w / ass->original_h);
186
187     return 0;
188 }
189
190 static void null_draw_slice(AVFilterLink *link, int y, int h, int slice_dir) { }
191
192 #define R 0
193 #define G 1
194 #define B 2
195 #define A 3
196
197 #define SET_PIXEL_RGB(picref, rgba_color, val, x, y, pixel_step, r_off, g_off, b_off) { \
198     p   = picref->data[0] + (x) * pixel_step + ((y) * picref->linesize[0]);             \
199     alpha = rgba_color[A] * (val) * 129;                                                \
200     *(p+r_off) = (alpha * rgba_color[R] + (255*255*129 - alpha) * *(p+r_off)) >> 23;    \
201     *(p+g_off) = (alpha * rgba_color[G] + (255*255*129 - alpha) * *(p+g_off)) >> 23;    \
202     *(p+b_off) = (alpha * rgba_color[B] + (255*255*129 - alpha) * *(p+b_off)) >> 23;    \
203 }
204
205 /* libass stores an RGBA color in the format RRGGBBTT, where TT is the transparency level */
206 #define AR(c)  ( (c)>>24)
207 #define AG(c)  (((c)>>16)&0xFF)
208 #define AB(c)  (((c)>>8) &0xFF)
209 #define AA(c)  ((0xFF-c) &0xFF)
210
211 static void overlay_ass_image(AVFilterBufferRef *picref, const uint8_t *rgba_map, const int pix_step,
212                               const ASS_Image *image)
213 {
214     int i, j;
215     int alpha;
216     uint8_t *p;
217     const int ro = rgba_map[R];
218     const int go = rgba_map[G];
219     const int bo = rgba_map[B];
220
221     for (; image; image = image->next) {
222         uint8_t rgba_color[] = {AR(image->color), AG(image->color), AB(image->color), AA(image->color)};
223         unsigned char *row = image->bitmap;
224
225         for (i = 0; i < image->h; i++) {
226             for (j = 0; j < image->w; j++) {
227                 if (row[j]) {
228                     SET_PIXEL_RGB(picref, rgba_color, row[j], image->dst_x + j, image->dst_y + i, pix_step, ro, go, bo);
229                 }
230             }
231             row += image->stride;
232         }
233     }
234 }
235
236 static void end_frame(AVFilterLink *inlink)
237 {
238     AVFilterContext *ctx = inlink->dst;
239     AVFilterLink *outlink = ctx->outputs[0];
240     AssContext *ass = ctx->priv;
241     AVFilterBufferRef *picref = inlink->cur_buf;
242     int detect_change = 0;
243     double time_ms = picref->pts * av_q2d(inlink->time_base) * 1000;
244     ASS_Image *image = ass_render_frame(ass->renderer, ass->track,
245                                         time_ms, &detect_change);
246
247     if (detect_change)
248         av_log(ctx, AV_LOG_DEBUG, "Change happened at time ms:%f\n", time_ms);
249
250     overlay_ass_image(picref, ass->rgba_map, ass->pix_step[0], image);
251
252     avfilter_draw_slice(outlink, 0, picref->video->h, 1);
253     avfilter_end_frame(outlink);
254 }
255
256 AVFilter avfilter_vf_ass = {
257     .name          = "ass",
258     .description   = NULL_IF_CONFIG_SMALL("Render subtitles onto input video using the libass library."),
259     .priv_size     = sizeof(AssContext),
260     .init          = init,
261     .uninit        = uninit,
262     .query_formats = query_formats,
263
264     .inputs = (const AVFilterPad[]) {
265         { .name             = "default",
266           .type             = AVMEDIA_TYPE_VIDEO,
267           .get_video_buffer = avfilter_null_get_video_buffer,
268           .start_frame      = avfilter_null_start_frame,
269           .draw_slice       = null_draw_slice,
270           .end_frame        = end_frame,
271           .config_props     = config_input,
272           .min_perms        = AV_PERM_WRITE | AV_PERM_READ,
273           .rej_perms        = AV_PERM_PRESERVE },
274         { .name = NULL}
275     },
276     .outputs = (const AVFilterPad[]) {
277         { .name             = "default",
278           .type             = AVMEDIA_TYPE_VIDEO, },
279         { .name = NULL}
280     },
281 };