git.sesse.net Git - ffmpeg/blob - libavcodec/jacosubdec.c

   1 /*
   2  * Copyright (c) 2012 Clément Bœsch
   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  * JACOsub subtitle decoder
  24  * @see http://unicorn.us.com/jacosub/jscripts.html
  25  */
  26
  27 #include <time.h>
  28 #include "ass.h"
  29 #include "jacosub.h"
  30 #include "libavutil/avstring.h"
  31 #include "libavutil/bprint.h"
  32
  33 #undef time
  34
  35 static int insert_text(AVBPrint *dst, const char *in, const char *arg)
  36 {
  37     av_bprintf(dst, "%s", arg);
  38     return 0;
  39 }
  40
  41 static int insert_datetime(AVBPrint *dst, const char *in, const char *arg)
  42 {
  43     char buf[16] = {0};
  44     time_t now = time(0);
  45     struct tm ltime;
  46
  47 #if HAVE_LOCALTIME_R
  48     localtime_r(&now, &ltime);
  49 #else
  50     ltime = *localtime(&now);
  51 #endif
  52     strftime(buf, sizeof(buf), arg, &ltime);
  53     av_bprintf(dst, "%s", buf);
  54     return 0;
  55 }
  56
  57 static int insert_color(AVBPrint *dst, const char *in, const char *arg)
  58 {
  59     return 1; // skip id
  60 }
  61
  62 static int insert_font(AVBPrint *dst, const char *in, const char *arg)
  63 {
  64     return 1; // skip id
  65 }
  66
  67 static const struct {
  68     const char *from;
  69     const char *arg;
  70     int (*func)(AVBPrint *dst, const char *in, const char *arg);
  71 } ass_codes_map[] = {
  72     {"\\~", "~",        insert_text},       // tilde doesn't need escaping
  73     {"~",   "{\\h}",    insert_text},       // hard space
  74     {"\\n", "\\N",      insert_text},       // newline
  75     {"\\D", "%d %b %Y", insert_datetime},   // current date
  76     {"\\T", "%H:%M",    insert_datetime},   // current time
  77     {"\\N", "{\\r}",    insert_text},       // reset to default style
  78     {"\\I", "{\\i1}",   insert_text},       // italic on
  79     {"\\i", "{\\i0}",   insert_text},       // italic off
  80     {"\\B", "{\\b1}",   insert_text},       // bold on
  81     {"\\b", "{\\b0}",   insert_text},       // bold off
  82     {"\\U", "{\\u1}",   insert_text},       // underline on
  83     {"\\u", "{\\u0}",   insert_text},       // underline off
  84     {"\\C", "",         insert_color},      // TODO: color
  85     {"\\F", "",         insert_font},       // TODO: font
  86 };
  87
  88 enum {
  89     ALIGN_VB = 1<<0, // vertical bottom, default
  90     ALIGN_VM = 1<<1, // vertical middle
  91     ALIGN_VT = 1<<2, // vertical top
  92     ALIGN_JC = 1<<3, // justify center, default
  93     ALIGN_JL = 1<<4, // justify left
  94     ALIGN_JR = 1<<5, // justify right
  95 };
  96
  97 static void jacosub_to_ass(AVCodecContext *avctx, AVBPrint *dst, const char *src)
  98 {
  99     int i, valign = 0, halign = 0;
 100     char c = av_toupper(*src);
 101     char directives[128] = {0};
 102
 103     /* extract the optional directives */
 104     if ((c >= 'A' && c <= 'Z') || c == '[') {
 105         char *p    = directives;
 106         char *pend = directives + sizeof(directives) - 1;
 107
 108         do *p++ = av_toupper(*src++);
 109         while (*src && !jss_whitespace(*src) && p < pend);
 110         *p = 0;
 111         src = jss_skip_whitespace(src);
 112     }
 113
 114     /* handle directives (TODO: handle more of them, and more reliably) */
 115     if      (strstr(directives, "VB")) valign = ALIGN_VB;
 116     else if (strstr(directives, "VM")) valign = ALIGN_VM;
 117     else if (strstr(directives, "VT")) valign = ALIGN_VT;
 118     if      (strstr(directives, "JC")) halign = ALIGN_JC;
 119     else if (strstr(directives, "JL")) halign = ALIGN_JL;
 120     else if (strstr(directives, "JR")) halign = ALIGN_JR;
 121     if (valign || halign) {
 122         if (!valign) valign = ALIGN_VB;
 123         if (!halign) halign = ALIGN_JC;
 124         switch (valign | halign) {
 125         case ALIGN_VB | ALIGN_JL: av_bprintf(dst, "{\\an1}"); break; // bottom left
 126         case ALIGN_VB | ALIGN_JC: av_bprintf(dst, "{\\an2}"); break; // bottom center
 127         case ALIGN_VB | ALIGN_JR: av_bprintf(dst, "{\\an3}"); break; // bottom right
 128         case ALIGN_VM | ALIGN_JL: av_bprintf(dst, "{\\an4}"); break; // middle left
 129         case ALIGN_VM | ALIGN_JC: av_bprintf(dst, "{\\an5}"); break; // middle center
 130         case ALIGN_VM | ALIGN_JR: av_bprintf(dst, "{\\an6}"); break; // middle right
 131         case ALIGN_VT | ALIGN_JL: av_bprintf(dst, "{\\an7}"); break; // top left
 132         case ALIGN_VT | ALIGN_JC: av_bprintf(dst, "{\\an8}"); break; // top center
 133         case ALIGN_VT | ALIGN_JR: av_bprintf(dst, "{\\an9}"); break; // top right
 134         }
 135     }
 136
 137     /* process timed line */
 138     while (*src && *src != '\n') {
 139
 140         /* text continue on the next line */
 141         if (src[0] == '\\' && src[1] == '\n') {
 142             src += 2;
 143             while (jss_whitespace(*src))
 144                 src++;
 145             continue;
 146         }
 147
 148         /* special character codes */
 149         for (i = 0; i < FF_ARRAY_ELEMS(ass_codes_map); i++) {
 150             const char *from = ass_codes_map[i].from;
 151             const char *arg  = ass_codes_map[i].arg;
 152             size_t codemap_len = strlen(from);
 153
 154             if (!strncmp(src, from, codemap_len)) {
 155                 src += codemap_len;
 156                 src += ass_codes_map[i].func(dst, src, arg);
 157                 break;
 158             }
 159         }
 160
 161         /* simple char copy */
 162         if (i == FF_ARRAY_ELEMS(ass_codes_map))
 163             av_bprintf(dst, "%c", *src++);
 164     }
 165     av_bprintf(dst, "\r\n");
 166 }
 167
 168 static int jacosub_decode_frame(AVCodecContext *avctx,
 169                                 void *data, int *got_sub_ptr, AVPacket *avpkt)
 170 {
 171     AVSubtitle *sub = data;
 172     const char *ptr = avpkt->data;
 173
 174     if (avpkt->size <= 0)
 175         goto end;
 176
 177     if (*ptr) {
 178         AVBPrint buffer;
 179         char *dec_sub;
 180
 181         // skip timers
 182         ptr = jss_skip_whitespace(ptr);
 183         ptr = strchr(ptr, ' '); if (!ptr) goto end; ptr++;
 184         ptr = strchr(ptr, ' '); if (!ptr) goto end; ptr++;
 185
 186         av_bprint_init(&buffer, JSS_MAX_LINESIZE, JSS_MAX_LINESIZE);
 187         jacosub_to_ass(avctx, &buffer, ptr);
 188         av_bprint_finalize(&buffer, &dec_sub);
 189         ff_ass_add_rect(sub, dec_sub, avpkt->pts, avpkt->duration, 0);
 190         av_free(dec_sub);
 191     }
 192
 193 end:
 194     *got_sub_ptr = sub->num_rects > 0;
 195     return avpkt->size;
 196 }
 197
 198 AVCodec ff_jacosub_decoder = {
 199     .name           = "jacosub",
 200     .long_name      = NULL_IF_CONFIG_SMALL("JACOsub subtitle"),
 201     .type           = AVMEDIA_TYPE_SUBTITLE,
 202     .id             = AV_CODEC_ID_JACOSUB,
 203     .init           = ff_ass_subtitle_header_default,
 204     .decode         = jacosub_decode_frame,
 205 };