dvbsub.c
上传用户:wstnjxml
上传日期:2014-04-03
资源大小:7248k
文件大小:13k
源码类别:

Windows CE

开发平台:

C/C++

  1. /*
  2.  * DVB subtitle encoding for ffmpeg
  3.  * Copyright (c) 2005 Fabrice Bellard.
  4.  *
  5.  * This library is free software; you can redistribute it and/or
  6.  * modify it under the terms of the GNU Lesser General Public
  7.  * License as published by the Free Software Foundation; either
  8.  * version 2 of the License, or (at your option) any later version.
  9.  *
  10.  * This library is distributed in the hope that it will be useful,
  11.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13.  * Lesser General Public License for more details.
  14.  *
  15.  * You should have received a copy of the GNU Lesser General Public
  16.  * License along with this library; if not, write to the Free Software
  17.  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  18.  */
  19. #include "avcodec.h"
  20. typedef struct DVBSubtitleContext {
  21.     int hide_state;
  22.     int object_version;
  23. } DVBSubtitleContext;
  24. #define PUTBITS2(val)
  25. {
  26.     bitbuf |= (val) << bitcnt;
  27.     bitcnt -= 2;
  28.     if (bitcnt < 0) {
  29.         bitcnt = 6;
  30.         *q++ = bitbuf;
  31.         bitbuf = 0;
  32.     }
  33. }
  34. static void dvb_encode_rle2(uint8_t **pq,
  35.                             const uint8_t *bitmap, int linesize,
  36.                             int w, int h)
  37. {
  38.     uint8_t *q;
  39.     unsigned int bitbuf;
  40.     int bitcnt;
  41.     int x, y, len, x1, v, color;
  42.     q = *pq;
  43.     
  44.     for(y = 0; y < h; y++) {
  45.         *q++ = 0x10;
  46.         bitbuf = 0;
  47.         bitcnt = 6;
  48.         
  49.         x = 0;
  50.         while (x < w) {
  51.             x1 = x;
  52.             color = bitmap[x1++];
  53.             while (x1 < w && bitmap[x1] == color)
  54.                 x1++;
  55.             len = x1 - x;
  56.             if (color == 0 && len == 2) {
  57.                 PUTBITS2(0);
  58.                 PUTBITS2(0);
  59.                 PUTBITS2(1);
  60.             } else if (len >= 3 && len <= 10) {
  61.                 v = len - 3;
  62.                 PUTBITS2(0);
  63.                 PUTBITS2((v >> 2) | 2);
  64.                 PUTBITS2(v & 3);
  65.                 PUTBITS2(color);
  66.             } else if (len >= 12 && len <= 27) {
  67.                 v = len - 12;
  68.                 PUTBITS2(0);
  69.                 PUTBITS2(0);
  70.                 PUTBITS2(2);
  71.                 PUTBITS2(v >> 2);
  72.                 PUTBITS2(v & 3);
  73.                 PUTBITS2(color);
  74.             } else if (len >= 29) {
  75.                 /* length = 29 ... 284 */
  76.                 if (len > 284)
  77.                     len = 284;
  78.                 v = len - 29;
  79.                 PUTBITS2(0);
  80.                 PUTBITS2(0);
  81.                 PUTBITS2(3);
  82.                 PUTBITS2((v >> 6));
  83.                 PUTBITS2((v >> 4) & 3);
  84.                 PUTBITS2((v >> 2) & 3);
  85.                 PUTBITS2(v & 3);
  86.                 PUTBITS2(color);
  87.             } else {
  88.                 PUTBITS2(color);
  89.                 if (color == 0) {
  90.                     PUTBITS2(1);
  91.                 }
  92.                 len = 1;
  93.             }
  94.             x += len;
  95.         }
  96.         /* end of line */
  97.         PUTBITS2(0);
  98.         PUTBITS2(0);
  99.         PUTBITS2(0);
  100.         if (bitcnt != 6) {
  101.             *q++ = bitbuf;
  102.         }
  103.         *q++ = 0xf0;
  104.         bitmap += linesize;
  105.     }
  106.     *pq = q;
  107. }
  108. #define PUTBITS4(val)
  109. {
  110.     bitbuf |= (val) << bitcnt;
  111.     bitcnt -= 4;
  112.     if (bitcnt < 0) {
  113.         bitcnt = 4;
  114.         *q++ = bitbuf;
  115.         bitbuf = 0;
  116.     }
  117. }
  118. /* some DVB decoders only implement 4 bits/pixel */
  119. static void dvb_encode_rle4(uint8_t **pq,
  120.                             const uint8_t *bitmap, int linesize,
  121.                             int w, int h)
  122. {
  123.     uint8_t *q;
  124.     unsigned int bitbuf;
  125.     int bitcnt;
  126.     int x, y, len, x1, v, color;
  127.     q = *pq;
  128.     
  129.     for(y = 0; y < h; y++) {
  130.         *q++ = 0x11;
  131.         bitbuf = 0;
  132.         bitcnt = 4;
  133.         
  134.         x = 0;
  135.         while (x < w) {
  136.             x1 = x;
  137.             color = bitmap[x1++];
  138.             while (x1 < w && bitmap[x1] == color)
  139.                 x1++;
  140.             len = x1 - x;
  141.             if (color == 0 && len == 2) {
  142.                 PUTBITS4(0);
  143.                 PUTBITS4(0xd);
  144.             } else if (color == 0 && (len >= 3 && len <= 9)) {
  145.                 PUTBITS4(0);
  146.                 PUTBITS4(len - 2);
  147.             } else if (len >= 4 && len <= 7) {
  148.                 PUTBITS4(0);
  149.                 PUTBITS4(8 + len - 4);
  150.                 PUTBITS4(color);
  151.             } else if (len >= 9 && len <= 24) {
  152.                 PUTBITS4(0);
  153.                 PUTBITS4(0xe);
  154.                 PUTBITS4(len - 9);
  155.                 PUTBITS4(color);
  156.             } else if (len >= 25) {
  157.                 if (len > 280)
  158.                     len = 280;
  159.                 v = len - 25;
  160.                 PUTBITS4(0);
  161.                 PUTBITS4(0xf);
  162.                 PUTBITS4(v >> 4);
  163.                 PUTBITS4(v & 0xf);
  164.                 PUTBITS4(color);
  165.             } else {
  166.                 PUTBITS4(color);
  167.                 if (color == 0) {
  168.                     PUTBITS4(0xc);
  169.                 }
  170.                 len = 1;
  171.             }
  172.             x += len;
  173.         }
  174.         /* end of line */
  175.         PUTBITS4(0);
  176.         PUTBITS4(0);
  177.         if (bitcnt != 4) {
  178.             *q++ = bitbuf;
  179.         }
  180.         *q++ = 0xf0;
  181.         bitmap += linesize;
  182.     }
  183.     *pq = q;
  184. }
  185. #define SCALEBITS 10
  186. #define ONE_HALF  (1 << (SCALEBITS - 1))
  187. #define FIX(x)   ((int) ((x) * (1<<SCALEBITS) + 0.5))
  188. #define RGB_TO_Y_CCIR(r, g, b) 
  189. ((FIX(0.29900*219.0/255.0) * (r) + FIX(0.58700*219.0/255.0) * (g) + 
  190.   FIX(0.11400*219.0/255.0) * (b) + (ONE_HALF + (16 << SCALEBITS))) >> SCALEBITS)
  191. #define RGB_TO_U_CCIR(r1, g1, b1, shift)
  192. (((- FIX(0.16874*224.0/255.0) * r1 - FIX(0.33126*224.0/255.0) * g1 +         
  193.      FIX(0.50000*224.0/255.0) * b1 + (ONE_HALF << shift) - 1) >> (SCALEBITS + shift)) + 128)
  194. #define RGB_TO_V_CCIR(r1, g1, b1, shift)
  195. (((FIX(0.50000*224.0/255.0) * r1 - FIX(0.41869*224.0/255.0) * g1 -           
  196.    FIX(0.08131*224.0/255.0) * b1 + (ONE_HALF << shift) - 1) >> (SCALEBITS + shift)) + 128)
  197. static inline void putbe16(uint8_t **pq, uint16_t v)
  198. {
  199.     uint8_t *q;
  200.     q = *pq;
  201.     *q++ = v >> 8;
  202.     *q++ = v;
  203.     *pq = q;
  204. }
  205. static int encode_dvb_subtitles(DVBSubtitleContext *s, 
  206.                                 uint8_t *outbuf, AVSubtitle *h)
  207. {
  208.     uint8_t *q, *pseg_len;
  209.     int page_id, region_id, clut_id, object_id, i, bpp_index, page_state;
  210.     q = outbuf;
  211.     page_id = 1;
  212.     if (h->num_rects == 0 || h->rects == NULL)
  213.         return -1;
  214.     *q++ = 0x00; /* subtitle_stream_id */
  215.     /* page composition segment */
  216.     *q++ = 0x0f; /* sync_byte */
  217.     *q++ = 0x10; /* segment_type */
  218.     putbe16(&q, page_id);
  219.     pseg_len = q;
  220.     q += 2; /* segment length */
  221.     *q++ = 30; /* page_timeout (seconds) */
  222.     if (s->hide_state)
  223.         page_state = 0; /* normal case */
  224.     else
  225.         page_state = 2; /* mode change */
  226.     /* page_version = 0 + page_state */
  227.     *q++ = s->object_version | (page_state << 2) | 3; 
  228.     for (region_id = 0; region_id < h->num_rects; region_id++) {
  229.         *q++ = region_id;
  230.         *q++ = 0xff; /* reserved */
  231.         putbe16(&q, h->rects[region_id].x); /* left pos */
  232.         putbe16(&q, h->rects[region_id].y); /* top pos */
  233.     }
  234.     putbe16(&pseg_len, q - pseg_len - 2);
  235.     if (!s->hide_state) {
  236.         for (clut_id = 0; clut_id < h->num_rects; clut_id++) {
  237.             /* CLUT segment */
  238.             if (h->rects[clut_id].nb_colors <= 4) {
  239.                 /* 2 bpp, some decoders do not support it correctly */
  240.                 bpp_index = 0;
  241.             } else if (h->rects[clut_id].nb_colors <= 16) {
  242.                 /* 4 bpp, standard encoding */
  243.                 bpp_index = 1;
  244.             } else {
  245.                 return -1;
  246.             }
  247.             *q++ = 0x0f; /* sync byte */
  248.             *q++ = 0x12; /* CLUT definition segment */
  249.             putbe16(&q, page_id);
  250.             pseg_len = q;
  251.             q += 2; /* segment length */
  252.             *q++ = clut_id;
  253.             *q++ = (0 << 4) | 0xf; /* version = 0 */
  254.             for(i = 0; i < h->rects[clut_id].nb_colors; i++) {
  255.                 *q++ = i; /* clut_entry_id */
  256.                 *q++ = (1 << (7 - bpp_index)) | (0xf << 1) | 1; /* 2 bits/pixel full range */
  257.                 {
  258.                     int a, r, g, b;
  259.                     a = (h->rects[clut_id].rgba_palette[i] >> 24) & 0xff;
  260.                     r = (h->rects[clut_id].rgba_palette[i] >> 16) & 0xff;
  261.                     g = (h->rects[clut_id].rgba_palette[i] >> 8) & 0xff;
  262.                     b = (h->rects[clut_id].rgba_palette[i] >> 0) & 0xff;
  263.                     *q++ = RGB_TO_Y_CCIR(r, g, b);
  264.                     *q++ = RGB_TO_V_CCIR(r, g, b, 0);
  265.                     *q++ = RGB_TO_U_CCIR(r, g, b, 0);
  266.                     *q++ = 255 - a;
  267.                 }
  268.             }
  269.             putbe16(&pseg_len, q - pseg_len - 2);
  270.         }
  271.     }
  272.     for (region_id = 0; region_id < h->num_rects; region_id++) {
  273.         /* region composition segment */
  274.         
  275.         if (h->rects[region_id].nb_colors <= 4) {
  276.             /* 2 bpp, some decoders do not support it correctly */
  277.             bpp_index = 0;
  278.         } else if (h->rects[region_id].nb_colors <= 16) {
  279.             /* 4 bpp, standard encoding */
  280.             bpp_index = 1;
  281.         } else {
  282.             return -1;
  283.         }
  284.         *q++ = 0x0f; /* sync_byte */
  285.         *q++ = 0x11; /* segment_type */
  286.         putbe16(&q, page_id);
  287.         pseg_len = q;
  288.         q += 2; /* segment length */
  289.         *q++ = region_id;
  290.         *q++ = (s->object_version << 4) | (0 << 3) | 0x07; /* version , no fill */
  291.         putbe16(&q, h->rects[region_id].w); /* region width */
  292.         putbe16(&q, h->rects[region_id].h); /* region height */
  293.         *q++ = ((1 + bpp_index) << 5) | ((1 + bpp_index) << 2) | 0x03;
  294.         *q++ = region_id; /* clut_id == region_id */
  295.         *q++ = 0; /* 8 bit fill colors */
  296.         *q++ = 0x03; /* 4 bit and 2 bit fill colors */
  297.         if (!s->hide_state) {
  298.             putbe16(&q, region_id); /* object_id == region_id */
  299.             *q++ = (0 << 6) | (0 << 4);
  300.             *q++ = 0;
  301.             *q++ = 0xf0;
  302.             *q++ = 0;
  303.         }
  304.         putbe16(&pseg_len, q - pseg_len - 2);
  305.     }
  306.     if (!s->hide_state) {
  307.         
  308.         for (object_id = 0; object_id < h->num_rects; object_id++) {
  309.             /* Object Data segment */
  310.             if (h->rects[region_id].nb_colors <= 4) {
  311.                 /* 2 bpp, some decoders do not support it correctly */
  312.                 bpp_index = 0;
  313.             } else if (h->rects[region_id].nb_colors <= 16) {
  314.                 /* 4 bpp, standard encoding */
  315.                 bpp_index = 1;
  316.             } else {
  317.                 return -1;
  318.             }
  319.             *q++ = 0x0f; /* sync byte */
  320.             *q++ = 0x13;
  321.             putbe16(&q, page_id);
  322.             pseg_len = q;
  323.             q += 2; /* segment length */
  324.             putbe16(&q, object_id);
  325.             *q++ = (s->object_version << 4) | (0 << 2) | (0 << 1) | 1; /* version = 0,
  326.                                                                        onject_coding_method,
  327.                                                                        non_modifying_color_flag */
  328.             {
  329.                 uint8_t *ptop_field_len, *pbottom_field_len, *top_ptr, *bottom_ptr;
  330.                 void (*dvb_encode_rle)(uint8_t **pq,
  331.                                         const uint8_t *bitmap, int linesize,
  332.                                         int w, int h);
  333.                 ptop_field_len = q;
  334.                 q += 2;
  335.                 pbottom_field_len = q;
  336.                 q += 2;
  337.                 if (bpp_index == 0)
  338.                     dvb_encode_rle = dvb_encode_rle2;
  339.                 else
  340.                     dvb_encode_rle = dvb_encode_rle4;
  341.                 top_ptr = q;
  342.                 dvb_encode_rle(&q, h->rects[object_id].bitmap, h->rects[object_id].w * 2,
  343.                                     h->rects[object_id].w, h->rects[object_id].h >> 1);
  344.                 bottom_ptr = q;
  345.                 dvb_encode_rle(&q, h->rects[object_id].bitmap + h->rects[object_id].w,
  346.                                     h->rects[object_id].w * 2, h->rects[object_id].w,
  347.                                     h->rects[object_id].h >> 1);
  348.                 putbe16(&ptop_field_len, bottom_ptr - top_ptr);
  349.                 putbe16(&pbottom_field_len, q - bottom_ptr);
  350.             }
  351.             putbe16(&pseg_len, q - pseg_len - 2);
  352.         }
  353.     }
  354.     /* end of display set segment */
  355.     *q++ = 0x0f; /* sync_byte */
  356.     *q++ = 0x80; /* segment_type */
  357.     putbe16(&q, page_id);
  358.     pseg_len = q;
  359.     q += 2; /* segment length */
  360.     putbe16(&pseg_len, q - pseg_len - 2);
  361.     *q++ = 0xff; /* end of PES data */
  362.     s->object_version = (s->object_version + 1) & 0xf;
  363.     s->hide_state = !s->hide_state;
  364.     return q - outbuf;
  365. }
  366. static int dvbsub_init_decoder(AVCodecContext *avctx)
  367. {
  368.     return 0;
  369. }
  370. static int dvbsub_close_decoder(AVCodecContext *avctx)
  371. {
  372.     return 0;
  373. }
  374. static int dvbsub_encode(AVCodecContext *avctx,
  375.                        unsigned char *buf, int buf_size, void *data)
  376. {
  377.     DVBSubtitleContext *s = avctx->priv_data;
  378.     AVSubtitle *sub = data;
  379.     int ret;
  380.     ret = encode_dvb_subtitles(s, buf, sub);
  381.     return ret;
  382. }
  383. AVCodec dvbsub_encoder = {
  384.     "dvbsub",
  385.     CODEC_TYPE_SUBTITLE,
  386.     CODEC_ID_DVB_SUBTITLE,
  387.     sizeof(DVBSubtitleContext),
  388.     dvbsub_init_decoder,
  389.     dvbsub_encode,
  390.     dvbsub_close_decoder,
  391. };