[Ffmpeg-devel] [Patch] DVB Subtitle decoder

Ian Caulfield imc25
Fri Jul 8 23:11:41 CEST 2005


Hi,

The attached patch adds a DVB subtitle decoder. I've had to fiddle the 
AVSubtitle struct to get it to work efficiently; the patch includes tweaks 
to the existing subtitle code. I've also fiddled slightly with the mpegts 
parser to allow it to detect DVB subtitles.

Issues still outstanding:
  - The 'end_display_time' is currently inaccurate - it gives the page
    timeout rather than the time it is replaced by the next subtitle
  - The parser is a bit of a hack to reassemble PES packets. I welcome
    suggestions of better ways to implement it
  - If there are multiple subtitle streams on one PID, only one will be
    decoded. To fix this it is necessary to associate more than one
    AVStream with a pid - not sure how to do this.

Please let me know if you have any comments/suggestions.

Thanks,
Ian
-------------- next part --------------
Index: ffmpeg.c
===================================================================
RCS file: /cvsroot/ffmpeg/ffmpeg/ffmpeg.c,v
retrieving revision 1.336
diff -u -r1.336 ffmpeg.c
--- ffmpeg.c	27 Jun 2005 00:04:01 -0000	1.336
+++ ffmpeg.c	8 Jul 2005 19:54:31 -0000
@@ -1423,8 +1423,14 @@
             av_free(buffer_to_free);
             /* XXX: allocate the subtitles in the codec ? */
             if (subtitle_to_free) {
-                av_free(subtitle_to_free->bitmap);
-                av_free(subtitle_to_free->rgba_palette);
+                if (subtitle_to_free->rects != NULL) {
+                    for (i = 0; i < subtitle_to_free->num_rects; i++) {
+                        av_free(subtitle_to_free->rects[i].bitmap);
+                        av_free(subtitle_to_free->rects[i].rgba_palette);
+                    }
+                    av_freep(&subtitle_to_free->rects);
+                }
+                subtitle_to_free->num_rects = 0;
                 subtitle_to_free = NULL;
             }
         }
Index: libavcodec/Makefile
===================================================================
RCS file: /cvsroot/ffmpeg/ffmpeg/libavcodec/Makefile,v
retrieving revision 1.195
diff -u -r1.195 Makefile
--- libavcodec/Makefile	27 Jun 2005 00:55:28 -0000	1.195
+++ libavcodec/Makefile	8 Jul 2005 19:54:32 -0000
@@ -17,7 +17,7 @@
       ratecontrol.o adpcm.o eval.o error_resilience.o \
       fft.o mdct.o raw.o golomb.o cabac.o\
       dpcm.o adx.o rational.o faandct.o parser.o g726.o \
-      vp3dsp.o integer.o h264idct.o rangecoder.o pnm.o h263.o msmpeg4.o h263dec.o dvdsub.o dvbsub.o
+      vp3dsp.o integer.o h264idct.o rangecoder.o pnm.o h263.o msmpeg4.o h263dec.o dvdsub.o dvbsub.o dvbsubdec.o
 
 ifeq ($(CONFIG_AASC_DECODER),yes)
     OBJS+= aasc.o
Index: libavcodec/allcodecs.c
===================================================================
RCS file: /cvsroot/ffmpeg/ffmpeg/libavcodec/allcodecs.c,v
retrieving revision 1.107
diff -u -r1.107 allcodecs.c
--- libavcodec/allcodecs.c	3 Jun 2005 13:59:38 -0000	1.107
+++ libavcodec/allcodecs.c	8 Jul 2005 19:54:33 -0000
@@ -554,6 +554,7 @@
     /* subtitles */ 
     register_avcodec(&dvdsub_decoder);
     register_avcodec(&dvbsub_encoder);
+    register_avcodec(&dvbsub_decoder);
 
     /* parsers */ 
     av_register_codec_parser(&mpegvideo_parser);
@@ -573,5 +574,6 @@
     av_register_codec_parser(&ac3_parser);
 #endif
     av_register_codec_parser(&dvdsub_parser);
+    av_register_codec_parser(&dvbsub_parser);
 }
 
Index: libavcodec/avcodec.h
===================================================================
RCS file: /cvsroot/ffmpeg/ffmpeg/libavcodec/avcodec.h,v
retrieving revision 1.405
diff -u -r1.405 avcodec.h
--- libavcodec/avcodec.h	28 Jun 2005 22:46:36 -0000	1.405
+++ libavcodec/avcodec.h	8 Jul 2005 19:54:37 -0000
@@ -1896,18 +1896,23 @@
 
 } AVPaletteControl;
 
-typedef struct AVSubtitle {
-    uint16_t format; /* 0 = graphics */
+typedef struct AVSubtitleRect {
     uint16_t x;
     uint16_t y;
     uint16_t w;
     uint16_t h;
     uint16_t nb_colors;
-    uint32_t start_display_time; /* relative to packet pts, in ms */
-    uint32_t end_display_time; /* relative to packet pts, in ms */
     int linesize;
     uint32_t *rgba_palette;
     uint8_t *bitmap;
+} AVSubtitleRect;
+
+typedef struct AVSubtitle {
+    uint16_t format; /* 0 = graphics */
+    uint32_t start_display_time; /* relative to packet pts, in ms */
+    uint32_t end_display_time; /* relative to packet pts, in ms */
+    uint32_t num_rects;
+    AVSubtitleRect *rects;
 } AVSubtitle;
 
 extern AVCodec ac3_encoder;
@@ -2100,6 +2105,7 @@
 /* subtitles */
 extern AVCodec dvdsub_decoder;
 extern AVCodec dvbsub_encoder;
+extern AVCodec dvbsub_decoder;
 
 /* resample.c */
 
@@ -2355,6 +2361,7 @@
 extern AVCodecParser mpegaudio_parser;
 extern AVCodecParser ac3_parser;
 extern AVCodecParser dvdsub_parser;
+extern AVCodecParser dvbsub_parser;
 
 /* memory */
 void *av_malloc(unsigned int size);
Index: libavcodec/dvbsub.c
===================================================================
RCS file: /cvsroot/ffmpeg/ffmpeg/libavcodec/dvbsub.c,v
retrieving revision 1.1
diff -u -r1.1 dvbsub.c
--- libavcodec/dvbsub.c	3 Jun 2005 13:59:38 -0000	1.1
+++ libavcodec/dvbsub.c	8 Jul 2005 19:54:39 -0000
@@ -225,18 +225,9 @@
     q = outbuf;
 
     page_id = 1;
-    region_id = 0;
-    clut_id = 0;
-    object_id = 0;
-    if (h->nb_colors <= 4) {
-        /* 2 bpp, some decoders do not support it correctly */
-        bpp_index = 0;
-    } else if (h->nb_colors <= 16) {
-        /* 4 bpp, standard encoding */
-        bpp_index = 1;
-    } else {
-        return -1;
-    }
+
+    if (h->num_rects == 0 || h->rects == NULL)
+        return -1;
 
     *q++ = 0x00; /* subtitle_stream_id */
 
@@ -254,108 +245,153 @@
         page_state = 2; /* mode change */
     /* page_version = 0 + page_state */
     *q++ = s->object_version | (page_state << 2) | 3; 
-    *q++ = region_id;
-    *q++ = 0xff; /* reserved */
-    putbe16(&q, 0); /* left pos */
-    putbe16(&q, 0); /* top pos */
+    
+    for (region_id = 0; region_id < h->num_rects; region_id++) {
+        *q++ = region_id;
+        *q++ = 0xff; /* reserved */
+        putbe16(&q, h->rects[region_id].x); /* left pos */
+        putbe16(&q, h->rects[region_id].y); /* top pos */
+    }
 
     putbe16(&pseg_len, q - pseg_len - 2);
 
     if (!s->hide_state) {
-        /* CLUT segment */
-        
-        *q++ = 0x0f; /* sync byte */
-        *q++ = 0x12; /* CLUT definition segment */
-        putbe16(&q, page_id);
-        pseg_len = q;
-        q += 2; /* segment length */
-        *q++ = clut_id;
-        *q++ = (0 << 4) | 0xf; /* version = 0 */
-        
-        for(i = 0; i < h->nb_colors; i++) {
-            *q++ = i; /* clut_entry_id */
-            *q++ = (1 << (7 - bpp_index)) | (0xf << 1) | 1; /* 2 bits/pixel full range */
-            {
-                int a, r, g, b;
-                a = (h->rgba_palette[i] >> 24) & 0xff;
-                r = (h->rgba_palette[i] >> 16) & 0xff;
-                g = (h->rgba_palette[i] >> 8) & 0xff;
-                b = (h->rgba_palette[i] >> 0) & 0xff;
-                
-                *q++ = RGB_TO_Y_CCIR(r, g, b);
-                *q++ = RGB_TO_V_CCIR(r, g, b, 0);
-                *q++ = RGB_TO_U_CCIR(r, g, b, 0);
-                *q++ = 255 - a;
-            }
-        }
+        for (clut_id = 0; clut_id < h->num_rects; clut_id++) {
+        
+            /* CLUT segment */
+
+            if (h->rects[clut_id].nb_colors <= 4) {
+                /* 2 bpp, some decoders do not support it correctly */
+                bpp_index = 0;
+            } else if (h->rects[clut_id].nb_colors <= 16) {
+                /* 4 bpp, standard encoding */
+                bpp_index = 1;
+            } else {
+                return -1;
+            }
+
+            *q++ = 0x0f; /* sync byte */
+            *q++ = 0x12; /* CLUT definition segment */
+            putbe16(&q, page_id);
+            pseg_len = q;
+            q += 2; /* segment length */
+            *q++ = clut_id;
+            *q++ = (0 << 4) | 0xf; /* version = 0 */
+
+            for(i = 0; i < h->rects[clut_id].nb_colors; i++) {
+                *q++ = i; /* clut_entry_id */
+                *q++ = (1 << (7 - bpp_index)) | (0xf << 1) | 1; /* 2 bits/pixel full range */
+                {
+                    int a, r, g, b;
+                    a = (h->rects[clut_id].rgba_palette[i] >> 24) & 0xff;
+                    r = (h->rects[clut_id].rgba_palette[i] >> 16) & 0xff;
+                    g = (h->rects[clut_id].rgba_palette[i] >> 8) & 0xff;
+                    b = (h->rects[clut_id].rgba_palette[i] >> 0) & 0xff;
+
+                    *q++ = RGB_TO_Y_CCIR(r, g, b);
+                    *q++ = RGB_TO_V_CCIR(r, g, b, 0);
+                    *q++ = RGB_TO_U_CCIR(r, g, b, 0);
+                    *q++ = 255 - a;
+                }
+            }
 
-        putbe16(&pseg_len, q - pseg_len - 2);
+            putbe16(&pseg_len, q - pseg_len - 2);
+        }
     }
-    /* region composition segment */
 
-    *q++ = 0x0f; /* sync_byte */
-    *q++ = 0x11; /* segment_type */
-    putbe16(&q, page_id);
-    pseg_len = q;
-    q += 2; /* segment length */
-    *q++ = region_id;
-    *q++ = (s->object_version << 4) | (0 << 3) | 0x07; /* version , no fill */
-    putbe16(&q, 720); /* region width */
-    putbe16(&q, 576); /* region height */
-    *q++ = ((1 + bpp_index) << 5) | ((1 + bpp_index) << 2) | 0x03; 
-    *q++ = clut_id;
-    *q++ = 0; /* 8 bit fill colors */
-    *q++ = 0x03; /* 4 bit and 2 bit fill colors */
-    
-    if (!s->hide_state) {
-        putbe16(&q, object_id);
-        *q++ = (0 << 6) | (0 << 4) | ((h->x >> 8) & 0xf);  
-        *q++ = h->x;
-        *q++ = 0xf0 | ((h->y >> 8) & 0xf);
-        *q++ = h->y;
-    }
-    
-    putbe16(&pseg_len, q - pseg_len - 2);
+    for (region_id = 0; region_id < h->num_rects; region_id++) {
+
+        /* region composition segment */
+        
+        if (h->rects[region_id].nb_colors <= 4) {
+            /* 2 bpp, some decoders do not support it correctly */
+            bpp_index = 0;
+        } else if (h->rects[region_id].nb_colors <= 16) {
+            /* 4 bpp, standard encoding */
+            bpp_index = 1;
+        } else {
+            return -1;
+        }
+
+        *q++ = 0x0f; /* sync_byte */
+        *q++ = 0x11; /* segment_type */
+        putbe16(&q, page_id);
+        pseg_len = q;
+        q += 2; /* segment length */
+        *q++ = region_id;
+        *q++ = (s->object_version << 4) | (0 << 3) | 0x07; /* version , no fill */
+        putbe16(&q, h->rects[region_id].w); /* region width */
+        putbe16(&q, h->rects[region_id].h); /* region height */
+        *q++ = ((1 + bpp_index) << 5) | ((1 + bpp_index) << 2) | 0x03; 
+        *q++ = region_id; /* clut_id == region_id */
+        *q++ = 0; /* 8 bit fill colors */
+        *q++ = 0x03; /* 4 bit and 2 bit fill colors */
+
+        if (!s->hide_state) {
+            putbe16(&q, region_id); /* object_id == region_id */
+            *q++ = (0 << 6) | (0 << 4);  
+            *q++ = 0;
+            *q++ = 0xf0;
+            *q++ = 0;
+        }
+
+        putbe16(&pseg_len, q - pseg_len - 2);
+    }
 
     if (!s->hide_state) {
         
-    /* Object Data segment */
+        for (object_id = 0; object_id < h->num_rects; object_id++) {
+            /* Object Data segment */
 
-    *q++ = 0x0f; /* sync byte */
-    *q++ = 0x13;
-    putbe16(&q, page_id);
-    pseg_len = q;
-    q += 2; /* segment length */
-    
-    putbe16(&q, object_id);
-    *q++ = (s->object_version << 4) | (0 << 2) | (0 << 1) | 1; /* version = 0,
-                                                               onject_coding_method,
-                                                               non_modifying_color_flag */
-    {
-        uint8_t *ptop_field_len, *pbottom_field_len, *top_ptr, *bottom_ptr;
-        void (*dvb_encode_rle)(uint8_t **pq,
-                                const uint8_t *bitmap, int linesize,
-                                int w, int h);
-        ptop_field_len = q;
-        q += 2;
-        pbottom_field_len = q;
-        q += 2;
-
-        if (bpp_index == 0)
-            dvb_encode_rle = dvb_encode_rle2;
-        else
-            dvb_encode_rle = dvb_encode_rle4;
-            
-        top_ptr = q;
-        dvb_encode_rle(&q, h->bitmap, h->w * 2, h->w, h->h >> 1);
-        bottom_ptr = q;
-        dvb_encode_rle(&q, h->bitmap + h->w, h->w * 2, h->w, h->h >> 1);
+            if (h->rects[region_id].nb_colors <= 4) {
+                /* 2 bpp, some decoders do not support it correctly */
+                bpp_index = 0;
+            } else if (h->rects[region_id].nb_colors <= 16) {
+                /* 4 bpp, standard encoding */
+                bpp_index = 1;
+            } else {
+                return -1;
+            }
+
+            *q++ = 0x0f; /* sync byte */
+            *q++ = 0x13;
+            putbe16(&q, page_id);
+            pseg_len = q;
+            q += 2; /* segment length */
+
+            putbe16(&q, object_id);
+            *q++ = (s->object_version << 4) | (0 << 2) | (0 << 1) | 1; /* version = 0,
+                                                                       onject_coding_method,
+                                                                       non_modifying_color_flag */
+            {
+                uint8_t *ptop_field_len, *pbottom_field_len, *top_ptr, *bottom_ptr;
+                void (*dvb_encode_rle)(uint8_t **pq,
+                                        const uint8_t *bitmap, int linesize,
+                                        int w, int h);
+                ptop_field_len = q;
+                q += 2;
+                pbottom_field_len = q;
+                q += 2;
+
+                if (bpp_index == 0)
+                    dvb_encode_rle = dvb_encode_rle2;
+                else
+                    dvb_encode_rle = dvb_encode_rle4;
+
+                top_ptr = q;
+                dvb_encode_rle(&q, h->rects[object_id].bitmap, h->rects[object_id].w * 2, 
+                                    h->rects[object_id].w, h->rects[object_id].h >> 1);
+                bottom_ptr = q;
+                dvb_encode_rle(&q, h->rects[object_id].bitmap + h->rects[object_id].w, 
+                                    h->rects[object_id].w * 2, h->rects[object_id].w, 
+                                    h->rects[object_id].h >> 1);
+
+                putbe16(&ptop_field_len, bottom_ptr - top_ptr);
+                putbe16(&pbottom_field_len, q - bottom_ptr);
+            }
 
-        putbe16(&ptop_field_len, bottom_ptr - top_ptr);
-        putbe16(&pbottom_field_len, q - bottom_ptr);
-    }
-
-    putbe16(&pseg_len, q - pseg_len - 2);
+            putbe16(&pseg_len, q - pseg_len - 2);
+        }
     }
 
     /* end of display set segment */
Index: libavcodec/dvdsub.c
===================================================================
RCS file: /cvsroot/ffmpeg/ffmpeg/libavcodec/dvdsub.c,v
retrieving revision 1.1
diff -u -r1.1 dvdsub.c
--- libavcodec/dvdsub.c	3 Jun 2005 13:59:38 -0000	1.1
+++ libavcodec/dvdsub.c	8 Jul 2005 19:54:39 -0000
@@ -132,11 +132,12 @@
     int cmd_pos, pos, cmd, x1, y1, x2, y2, offset1, offset2, next_cmd_pos;
     uint8_t palette[4], alpha[4];
     int date;
+    int i;
     
     if (buf_size < 4)
         return -1;
-    sub_header->bitmap = NULL;
-    sub_header->rgba_palette = NULL;
+    sub_header->rects = NULL;
+    sub_header->num_rects = 0;
     sub_header->start_display_time = 0;
     sub_header->end_display_time = 0;
 
@@ -230,30 +231,39 @@
             if (h < 0)
                 h = 0;
             if (w > 0 && h > 0) {
-                av_freep(&sub_header->bitmap);
-                av_freep(&sub_header->rgba_palette);
+                if (sub_header->rects != NULL) {
+                    for (i = 0; i < sub_header->num_rects; i++) {
+                        av_free(sub_header->rects[i].bitmap);
+                        av_free(sub_header->rects[i].rgba_palette);
+                    }
+                    av_freep(&sub_header->rects);
+                    sub_header->num_rects = 0;
+                }
+                
                 bitmap = av_malloc(w * h);
-                sub_header->rgba_palette = av_malloc(4 * 4);
+                sub_header->rects = av_mallocz(sizeof(AVSubtitleRect));
+                sub_header->num_rects = 1;
+                sub_header->rects[0].rgba_palette = av_malloc(4 * 4);
                 decode_rle(bitmap, w * 2, w, h / 2,
                            buf, offset1 * 2, buf_size);
                 decode_rle(bitmap + w, w * 2, w, h / 2,
                            buf, offset2 * 2, buf_size);
-                guess_palette(sub_header->rgba_palette, 
+                guess_palette(sub_header->rects[0].rgba_palette, 
                               palette, alpha, 0xffff00);
-                sub_header->x = x1;
-                sub_header->y = y1;
-                sub_header->w = w;
-                sub_header->h = h;
-                sub_header->nb_colors = 4;
-                sub_header->linesize = w;
-                sub_header->bitmap = bitmap;
+                sub_header->rects[0].x = x1;
+                sub_header->rects[0].y = y1;
+                sub_header->rects[0].w = w;
+                sub_header->rects[0].h = h;
+                sub_header->rects[0].nb_colors = 4;
+                sub_header->rects[0].linesize = w;
+                sub_header->rects[0].bitmap = bitmap;
             }
         }
         if (next_cmd_pos == cmd_pos)
             break;
         cmd_pos = next_cmd_pos;
     }
-    if (sub_header->bitmap)
+    if (sub_header->num_rects > 0)
         return 0;
  fail:
     return -1;
@@ -278,34 +288,34 @@
     int y1, y2, x1, x2, y, w, h, i;
     uint8_t *bitmap;
 
-    if (s->w <= 0 || s->h <= 0)
+    if (s->num_rects == 0 || s->rects == NULL || s->rects[0].w <= 0 || s->rects[0].h <= 0)
         return 0;
 
     memset(transp_color, 0, 256);
-    for(i = 0; i < s->nb_colors; i++) {
-        if ((s->rgba_palette[i] >> 24) == 0)
+    for(i = 0; i < s->rects[0].nb_colors; i++) {
+        if ((s->rects[0].rgba_palette[i] >> 24) == 0)
             transp_color[i] = 1;
     }
     y1 = 0;
-    while (y1 < s->h && is_transp(s->bitmap + y1 * s->linesize, 1, s->w, 
-                                  transp_color))
+    while (y1 < s->rects[0].h && is_transp(s->rects[0].bitmap + y1 * s->rects[0].linesize, 
+                                  1, s->rects[0].w, transp_color))
         y1++;
-    if (y1 == s->h) {
-        av_freep(&s->bitmap);
-        s->w = s->h = 0;
+    if (y1 == s->rects[0].h) {
+        av_freep(&s->rects[0].bitmap);
+        s->rects[0].w = s->rects[0].h = 0;
         return 0;
     }
 
-    y2 = s->h - 1;
-    while (y2 > 0 && is_transp(s->bitmap + y2 * s->linesize, 1, s->w, 
-                               transp_color))
+    y2 = s->rects[0].h - 1;
+    while (y2 > 0 && is_transp(s->rects[0].bitmap + y2 * s->rects[0].linesize, 1, 
+                               s->rects[0].w, transp_color))
         y2--;
     x1 = 0;
-    while (x1 < (s->w - 1) && is_transp(s->bitmap + x1, s->linesize, s->h, 
-                                        transp_color))
+    while (x1 < (s->rects[0].w - 1) && is_transp(s->rects[0].bitmap + x1, s->rects[0].linesize, 
+                                        s->rects[0].h, transp_color))
         x1++;
-    x2 = s->w - 1;
-    while (x2 > 0 && is_transp(s->bitmap + x2, s->linesize, s->h, 
+    x2 = s->rects[0].w - 1;
+    while (x2 > 0 && is_transp(s->rects[0].bitmap + x2, s->rects[0].linesize, s->rects[0].h, 
                                   transp_color))
         x2--;
     w = x2 - x1 + 1;
@@ -314,15 +324,15 @@
     if (!bitmap)
         return 1;
     for(y = 0; y < h; y++) {
-        memcpy(bitmap + w * y, s->bitmap + x1 + (y1 + y) * s->linesize, w);
+        memcpy(bitmap + w * y, s->rects[0].bitmap + x1 + (y1 + y) * s->rects[0].linesize, w);
     }
-    av_freep(&s->bitmap);
-    s->bitmap = bitmap;
-    s->linesize = w;
-    s->w = w;
-    s->h = h;
-    s->x += x1;
-    s->y += y1;
+    av_freep(&s->rects[0].bitmap);
+    s->rects[0].bitmap = bitmap;
+    s->rects[0].linesize = w;
+    s->rects[0].w = w;
+    s->rects[0].h = h;
+    s->rects[0].x += x1;
+    s->rects[0].y += y1;
     return 1;
 }
 
@@ -379,8 +389,8 @@
     av_log(NULL, AV_LOG_INFO, "start=%d ms end =%d ms\n", 
            sub->start_display_time,
            sub->end_display_time);
-    ppm_save("/tmp/a.ppm", sub->bitmap, 
-             sub->w, sub->h, sub->rgba_palette);
+    ppm_save("/tmp/a.ppm", sub->rects[0].bitmap, 
+             sub->rects[0].w, sub->rects[0].h, sub->rects[0].rgba_palette);
 #endif
 
     *data_size = 1;
Index: libavformat/mpegts.c
===================================================================
RCS file: /cvsroot/ffmpeg/ffmpeg/libavformat/mpegts.c,v
retrieving revision 1.29
diff -u -r1.29 mpegts.c
--- libavformat/mpegts.c	26 May 2005 20:17:11 -0000	1.29
+++ libavformat/mpegts.c	8 Jul 2005 19:54:42 -0000
@@ -30,7 +30,10 @@
    synchronisation is lost */
 #define MAX_RESYNC_SIZE 4096
 
-static int add_pes_stream(MpegTSContext *ts, int pid, int stream_type);
+typedef struct PESContext PESContext;
+
+static PESContext* add_pes_stream(MpegTSContext *ts, int pid, int stream_type);
+static AVStream* new_pes_av_stream(PESContext *pes, uint32_t code);
 
 enum MpegTSFilterType {
     MPEGTS_PES,
@@ -368,8 +371,13 @@
 {
     MpegTSContext *ts = opaque;
     SectionHeader h1, *h = &h1;
-    const uint8_t *p, *p_end;
-    int program_info_length, pcr_pid, pid, stream_type, desc_length;
+    PESContext *pes;
+    AVStream *st;
+    const uint8_t *p, *p_end, *desc_list_end, *desc_end;
+    int program_info_length, pcr_pid, pid, stream_type;
+    int desc_list_len, desc_len, desc_tag;
+    int comp_page, anc_page;
+    char language[4];
     
 #ifdef DEBUG_SI
     printf("PMT:\n");
@@ -399,18 +407,57 @@
     if (p >= p_end)
         return;
     for(;;) {
+        language[0] = 0;
+        st = 0;
         stream_type = get8(&p, p_end);
         if (stream_type < 0)
             break;
         pid = get16(&p, p_end) & 0x1fff;
         if (pid < 0)
             break;
-        desc_length = get16(&p, p_end) & 0xfff;
-        if (desc_length < 0)
+        desc_list_len = get16(&p, p_end) & 0xfff;
+        if (desc_list_len < 0)
             break;
-        p += desc_length;
-        if (p > p_end)
-            return;
+        desc_list_end = p + desc_list_len;
+        if (desc_list_end > p_end)
+            break;
+        for(;;) {
+            desc_tag = get8(&p, desc_list_end);
+            if (desc_tag < 0)
+                break;
+            desc_len = get8(&p, desc_list_end);
+            desc_end = p + desc_len;
+            if (desc_end > desc_list_end)
+                break;
+#ifdef DEBUG_SI
+            printf("tag: 0x%02x len=%d\n", desc_tag, desc_len);
+#endif
+            switch(desc_tag) {
+            case DVB_SUBT_DESCID:
+                if (stream_type == STREAM_TYPE_PRIVATE_DATA)
+                    stream_type = STREAM_TYPE_SUBTITLE_DVB;
+                    
+                language[0] = get8(&p, desc_end);
+                language[1] = get8(&p, desc_end);
+                language[2] = get8(&p, desc_end);
+                language[3] = 0;
+                get8(&p, desc_end);
+                comp_page = get16(&p, desc_end);
+                anc_page = get16(&p, desc_end);
+                
+                break;
+            case 0x0a: /* ISO 639 language descriptor */
+                language[0] = get8(&p, desc_end);
+                language[1] = get8(&p, desc_end);
+                language[2] = get8(&p, desc_end);
+                language[3] = 0;
+                break;
+            default:
+                break;
+            }
+            p = desc_end;
+        }
+		p = desc_list_end;
 
 #ifdef DEBUG_SI
         printf("stream_type=%d pid=0x%x\n", stream_type, pid);
@@ -427,12 +474,28 @@
         case STREAM_TYPE_AUDIO_AAC:
         case STREAM_TYPE_AUDIO_AC3:
         case STREAM_TYPE_AUDIO_DTS:
-            add_pes_stream(ts, pid, stream_type);
+        case STREAM_TYPE_SUBTITLE_DVB:
+            pes = add_pes_stream(ts, pid, stream_type);
+            if (pes)
+                st = new_pes_av_stream(pes, 0);
             break;
         default:
             /* we ignore the other streams */
             break;
         }
+        
+        if (st) {
+            if (language[0] != 0) {
+                st->language[0] = language[0];
+                st->language[1] = language[1];
+                st->language[2] = language[2];
+                st->language[3] = language[3];
+            }
+            
+            if (stream_type == STREAM_TYPE_SUBTITLE_DVB) {
+                st->codec.sub_id = (anc_page << 16) | comp_page;
+            }
+        }
     }
     /* all parameters are there */
     ts->set_service_cb(ts->set_service_opaque, 0);
@@ -653,7 +716,7 @@
 #define PES_START_SIZE 9
 #define MAX_PES_HEADER_SIZE (9 + 255)
 
-typedef struct PESContext {
+struct PESContext {
     int pid;
     int stream_type;
     MpegTSContext *ts;
@@ -666,7 +729,7 @@
     int pes_header_size;
     int64_t pts, dts;
     uint8_t header[MAX_PES_HEADER_SIZE];
-} PESContext;
+};
 
 static int64_t get_pts(const uint8_t *p)
 {
@@ -687,9 +750,8 @@
 {
     PESContext *pes = opaque;
     MpegTSContext *ts = pes->ts;
-    AVStream *st;
     const uint8_t *p;
-    int len, code, codec_type, codec_id;
+    int len, code;
     
     if (is_start) {
         pes->state = MPEGTS_HEADER;
@@ -722,59 +784,7 @@
                         goto skip;
                     if (!pes->st) {
                         /* allocate stream */
-                        switch(pes->stream_type){
-                        case STREAM_TYPE_AUDIO_MPEG1:
-                        case STREAM_TYPE_AUDIO_MPEG2:
-                            codec_type = CODEC_TYPE_AUDIO;
-                            codec_id = CODEC_ID_MP3;
-                            break;
-                        case STREAM_TYPE_VIDEO_MPEG1:
-                        case STREAM_TYPE_VIDEO_MPEG2:
-                            codec_type = CODEC_TYPE_VIDEO;
-                            codec_id = CODEC_ID_MPEG2VIDEO;
-                            break;
-                        case STREAM_TYPE_VIDEO_MPEG4:
-                            codec_type = CODEC_TYPE_VIDEO;
-                            codec_id = CODEC_ID_MPEG4;
-                            break;
-                        case STREAM_TYPE_VIDEO_H264:
-                            codec_type = CODEC_TYPE_VIDEO;
-                            codec_id = CODEC_ID_H264;
-                            break;
-                        case STREAM_TYPE_AUDIO_AAC:
-                            codec_type = CODEC_TYPE_AUDIO;
-                            codec_id = CODEC_ID_AAC;
-                            break;
-                        case STREAM_TYPE_AUDIO_AC3:
-                            codec_type = CODEC_TYPE_AUDIO;
-                            codec_id = CODEC_ID_AC3;
-                            break;
-                        case STREAM_TYPE_AUDIO_DTS:
-                            codec_type = CODEC_TYPE_AUDIO;
-                            codec_id = CODEC_ID_DTS;
-                            break;
-                        default:
-                            if (code >= 0x1c0 && code <= 0x1df) {
-                                codec_type = CODEC_TYPE_AUDIO;
-                                codec_id = CODEC_ID_MP2;
-                            } else if (code == 0x1bd) {
-                                codec_type = CODEC_TYPE_AUDIO;
-                                codec_id = CODEC_ID_AC3;
-                            } else {
-                                codec_type = CODEC_TYPE_VIDEO;
-                                codec_id = CODEC_ID_MPEG1VIDEO;
-                            }
-                            break;
-                        }
-                        st = av_new_stream(pes->stream, pes->pid);
-                        if (st) {
-                            av_set_pts_info(st, 33, 1, 90000);
-                            st->priv_data = pes;
-                            st->codec.codec_type = codec_type;
-                            st->codec.codec_id = codec_id;
-                            st->need_parsing = 1;
-                            pes->st = st;
-                        }
+                        new_pes_av_stream(pes, code);
                     }
                     pes->state = MPEGTS_PESHEADER_FILL;
                     pes->total_size = (pes->header[4] << 8) | pes->header[5];
@@ -854,7 +864,73 @@
     }
 }
 
-static int add_pes_stream(MpegTSContext *ts, int pid, int stream_type)
+static AVStream* new_pes_av_stream(PESContext *pes, uint32_t code)
+{
+    AVStream *st;
+    int codec_type, codec_id;
+
+    switch(pes->stream_type){
+    case STREAM_TYPE_AUDIO_MPEG1:
+    case STREAM_TYPE_AUDIO_MPEG2:
+        codec_type = CODEC_TYPE_AUDIO;
+        codec_id = CODEC_ID_MP3;
+        break;
+    case STREAM_TYPE_VIDEO_MPEG1:
+    case STREAM_TYPE_VIDEO_MPEG2:
+        codec_type = CODEC_TYPE_VIDEO;
+        codec_id = CODEC_ID_MPEG2VIDEO;
+        break;
+    case STREAM_TYPE_VIDEO_MPEG4:
+        codec_type = CODEC_TYPE_VIDEO;
+        codec_id = CODEC_ID_MPEG4;
+        break;
+    case STREAM_TYPE_VIDEO_H264:
+        codec_type = CODEC_TYPE_VIDEO;
+        codec_id = CODEC_ID_H264;
+        break;
+    case STREAM_TYPE_AUDIO_AAC:
+        codec_type = CODEC_TYPE_AUDIO;
+        codec_id = CODEC_ID_AAC;
+        break;
+    case STREAM_TYPE_AUDIO_AC3:
+        codec_type = CODEC_TYPE_AUDIO;
+        codec_id = CODEC_ID_AC3;
+        break;
+    case STREAM_TYPE_AUDIO_DTS:
+        codec_type = CODEC_TYPE_AUDIO;
+        codec_id = CODEC_ID_DTS;
+        break;
+    case STREAM_TYPE_SUBTITLE_DVB:
+        codec_type = CODEC_TYPE_SUBTITLE;
+        codec_id = CODEC_ID_DVB_SUBTITLE;
+        break;
+    default:
+        if (code >= 0x1c0 && code <= 0x1df) {
+            codec_type = CODEC_TYPE_AUDIO;
+            codec_id = CODEC_ID_MP2;
+        } else if (code == 0x1bd) {
+            codec_type = CODEC_TYPE_AUDIO;
+            codec_id = CODEC_ID_AC3;
+        } else {
+            codec_type = CODEC_TYPE_VIDEO;
+            codec_id = CODEC_ID_MPEG1VIDEO;
+        }
+        break;
+    }
+    st = av_new_stream(pes->stream, pes->pid);
+    if (st) {
+        av_set_pts_info(st, 33, 1, 90000);
+        st->priv_data = pes;
+        st->codec.codec_type = codec_type;
+        st->codec.codec_id = codec_id;
+        st->need_parsing = 1;
+        pes->st = st;
+    }
+    return st;
+}
+
+
+static PESContext *add_pes_stream(MpegTSContext *ts, int pid, int stream_type)
 {
     MpegTSFilter *tss;
     PESContext *pes;
@@ -862,7 +938,7 @@
     /* if no pid found, then add a pid context */
     pes = av_mallocz(sizeof(PESContext));
     if (!pes)
-        return -1;
+        return 0;
     pes->ts = ts;
     pes->stream = ts->stream;
     pes->pid = pid;
@@ -870,9 +946,9 @@
     tss = mpegts_open_pes_filter(ts, pid, mpegts_push_data, pes);
     if (!tss) {
         av_free(pes);
-        return -1;
+        return 0;
     }
-    return 0;
+    return pes;
 }
 
 /* handle one TS packet */
Index: libavformat/mpegts.h
===================================================================
RCS file: /cvsroot/ffmpeg/ffmpeg/libavformat/mpegts.h,v
retrieving revision 1.7
diff -u -r1.7 mpegts.h
--- libavformat/mpegts.h	14 Jul 2004 01:32:14 -0000	1.7
+++ libavformat/mpegts.h	8 Jul 2005 19:54:42 -0000
@@ -31,6 +31,9 @@
 #define PMT_TID   0x02 
 #define SDT_TID   0x42
 
+/* descriptor ids */
+#define DVB_SUBT_DESCID             0x59
+
 #define STREAM_TYPE_VIDEO_MPEG1     0x01
 #define STREAM_TYPE_VIDEO_MPEG2     0x02
 #define STREAM_TYPE_AUDIO_MPEG1     0x03
@@ -44,6 +47,8 @@
 #define STREAM_TYPE_AUDIO_AC3       0x81
 #define STREAM_TYPE_AUDIO_DTS       0x8a
 
+#define STREAM_TYPE_SUBTITLE_DVB    0x100
+
 unsigned int mpegts_crc32(const uint8_t *data, int len);
 extern AVOutputFormat mpegts_mux;
 
Index: libavformat/utils.c
===================================================================
RCS file: /cvsroot/ffmpeg/ffmpeg/libavformat/utils.c,v
retrieving revision 1.155
diff -u -r1.155 utils.c
--- libavformat/utils.c	29 Jun 2005 08:48:26 -0000	1.155
+++ libavformat/utils.c	8 Jul 2005 19:54:49 -0000
@@ -2504,6 +2504,9 @@
         if (flags & AVFMT_SHOW_IDS) {
             av_log(NULL, AV_LOG_INFO, "[0x%x]", st->id);
         }
+        if (strlen(st->language) > 0) {
+            av_log(NULL, AV_LOG_INFO, "(%s)", st->language);
+        }        
         av_log(NULL, AV_LOG_INFO, ": %s\n", buf);
     }
 }
-------------- next part --------------
/*

 * DVD subtitle decoding for ffmpeg

 * Copyright (c) 2005 Ian Caulfield.

 *

 * This library 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 of the License, or (at your option) any later version.

 *

 * This library 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 this library; if not, write to the Free Software

 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

 */

#include "avcodec.h"



//#define DEBUG

//#define DEBUG_PACKET_CONTENTS

//#define DEBUG_SAVE_IMAGES



#define DVBSUB_PAGE_SEGMENT     0x10

#define DVBSUB_REGION_SEGMENT   0x11

#define DVBSUB_CLUT_SEGMENT     0x12

#define DVBSUB_OBJECT_SEGMENT   0x13

#define DVBSUB_DISPLAY_SEGMENT  0x80



static uint16_t getbe16(const uint8_t *p)

{

    return (p[0] << 8) | p[1];

}



#define MAX_NEG_CROP 1024



static unsigned char cropTbl[256 + 2 * MAX_NEG_CROP];

static unsigned char *cm;





#ifdef DEBUG_SAVE_IMAGES

#undef fprintf

#if 0

static void png_save(const char *filename, uint8_t *bitmap, int w, int h,

                     uint32_t *rgba_palette)

{

    int x, y, v;

    FILE *f;

    char fname[40], fname2[40];

    char command[1024];

    

    snprintf(fname, 40, "%s.ppm", filename);



    f = fopen(fname, "w");

    if (!f) {

        perror(fname);

        exit(1);

    }

    fprintf(f, "P6\n"

            "%d %d\n"

            "%d\n",

            w, h, 255);

    for(y = 0; y < h; y++) {

        for(x = 0; x < w; x++) {

            v = rgba_palette[bitmap[y * w + x]];

            putc((v >> 16) & 0xff, f);

            putc((v >> 8) & 0xff, f);

            putc((v >> 0) & 0xff, f);

        }

    }

    fclose(f);

    

    

    snprintf(fname2, 40, "%s-a.pgm", filename);



    f = fopen(fname2, "w");

    if (!f) {

        perror(fname2);

        exit(1);

    }

    fprintf(f, "P5\n"

            "%d %d\n"

            "%d\n",

            w, h, 255);

    for(y = 0; y < h; y++) {

        for(x = 0; x < w; x++) {

            v = rgba_palette[bitmap[y * w + x]];

            putc((v >> 24) & 0xff, f);

        }

    }

    fclose(f);

    

    snprintf(command, 1024, "pnmtopng -alpha %s %s > %s.png 2> /dev/null", fname2, fname, filename);

    system(command);

    

    snprintf(command, 1024, "rm %s %s", fname, fname2);

    system(command);

}

#endif



static void png_save2(const char *filename, uint32_t *bitmap, int w, int h)

{

    int x, y, v;

    FILE *f;

    char fname[40], fname2[40];

    char command[1024];

    

    snprintf(fname, 40, "%s.ppm", filename);



    f = fopen(fname, "w");

    if (!f) {

        perror(fname);

        exit(1);

    }

    fprintf(f, "P6\n"

            "%d %d\n"

            "%d\n",

            w, h, 255);

    for(y = 0; y < h; y++) {

        for(x = 0; x < w; x++) {

            v = bitmap[y * w + x];

            putc((v >> 16) & 0xff, f);

            putc((v >> 8) & 0xff, f);

            putc((v >> 0) & 0xff, f);

        }

    }

    fclose(f);

    

    

    snprintf(fname2, 40, "%s-a.pgm", filename);



    f = fopen(fname2, "w");

    if (!f) {

        perror(fname2);

        exit(1);

    }

    fprintf(f, "P5\n"

            "%d %d\n"

            "%d\n",

            w, h, 255);

    for(y = 0; y < h; y++) {

        for(x = 0; x < w; x++) {

            v = bitmap[y * w + x];

            putc((v >> 24) & 0xff, f);

        }

    }

    fclose(f);

    

    snprintf(command, 1024, "pnmtopng -alpha %s %s > %s.png 2> /dev/null", fname2, fname, filename);

    system(command);

    

    snprintf(command, 1024, "rm %s %s", fname, fname2);

    system(command);

}

#endif



#define RGBA(r,g,b,a) (((a) << 24) | ((r) << 16) | ((g) << 8) | (b))



typedef struct DVBSubCLUT {

    uint32_t clut4[4];

    uint32_t clut16[16];

    uint32_t clut256[256];

} DVBSubCLUT;



static DVBSubCLUT default_clut;



typedef struct DVBSubObjectDisplay {

    int object_id;

    int region_id;



    int x_pos;

    int y_pos;



    int fgcolour;

    int bgcolour;

    

    struct DVBSubObjectDisplay *region_list_next;

    struct DVBSubObjectDisplay *object_list_next;   

} DVBSubObjectDisplay;



typedef struct DVBSubObject {

    int id;



    int type;

    

    int tmp_width;

    int tmp_height;

    int tmp_clut;



    struct DVBSubObjectDisplay *display_list;   

    

    struct DVBSubObject *next;

} DVBSubObject;



typedef struct DVBSubRegionDisplay {

    int region_id;



    int x_pos;

    int y_pos;



    struct DVBSubRegionDisplay *next;

} DVBSubRegionDisplay;



typedef struct DVBSubRegion {

    int width;

    int height;

    int depth;

    

    int clut;

    int bgcolour;

    

    uint8_t *pbuf;

    int buf_size;



    struct DVBSubObjectDisplay *display_list;

} DVBSubRegion;



typedef struct DVBSubContext {

    int composition_id;

    int ancillary_id;



    int time_out;

    DVBSubRegion *region[256];

    DVBSubCLUT   *clut[256];

    DVBSubObject *object;

    

    int display_list_size;

    DVBSubRegionDisplay *display_list;

} DVBSubContext;





static DVBSubObject* get_object(DVBSubObject *first, int object_id)

{

    DVBSubObject *ptr = first;



    while (ptr != NULL) {

        ptr = ptr->next;

    }



    ptr = first;



    while (ptr != NULL && ptr->id != object_id) {

        ptr = ptr->next;

    }

    

    if (ptr != NULL && ptr->id == object_id)

        return ptr;

        

    return NULL;

}



static void delete_region_display_list(DVBSubContext *ctx, DVBSubRegion *region)

{

    DVBSubObject *object, *obj2, **obj2_ptr;

    DVBSubObjectDisplay *display, *obj_disp, **obj_disp_ptr;



    while (region->display_list != NULL) {

        display = region->display_list;

        

        object = get_object(ctx->object, display->object_id);

        

        if (object != NULL) {

            obj_disp = object->display_list;

            obj_disp_ptr = &object->display_list;

            

            while (obj_disp != NULL && obj_disp != display) {

                obj_disp_ptr = &obj_disp->object_list_next;

                obj_disp = obj_disp->object_list_next;

            }

                

            if (obj_disp) {

                *obj_disp_ptr = obj_disp->object_list_next;

                

                if (object->display_list == NULL) {

                    obj2 = ctx->object;

                    obj2_ptr = &ctx->object;



                    while (obj2 != NULL && obj2 != object) {

                        obj2_ptr = &obj2->next;

                        obj2 = obj2->next;

                    }

                    

                    if (obj2 != object)

                        abort();

                        

                    *obj2_ptr = obj2->next;

                    

                    av_free(obj2);

                }

            }

        }

        

        region->display_list = display->region_list_next;

        

        av_free(display);

    }

                

}



static int dvbsub_init_decoder(AVCodecContext *avctx)

{

    int i, r, g, b, a = 0;

    DVBSubContext *ctx = (DVBSubContext*) avctx->priv_data;



    for (i = 0; i < 256; i++)

        cropTbl[i + MAX_NEG_CROP] = i;

    for (i = 0; i < MAX_NEG_CROP; i++)

    {

        cropTbl[i] = 0;

        cropTbl[i + MAX_NEG_CROP + 256] = 255;

    }



    cm = cropTbl + MAX_NEG_CROP;



    memset(avctx->priv_data, 0, sizeof(DVBSubContext));

    

    ctx->composition_id = avctx->sub_id & 0xffff;

    ctx->ancillary_id = avctx->sub_id >> 16;



    default_clut.clut4[0] = RGBA(  0,   0,   0,   0);

    default_clut.clut4[1] = RGBA(255, 255, 255, 255);

    default_clut.clut4[2] = RGBA(  0,   0,   0, 255);

    default_clut.clut4[3] = RGBA(127, 127, 127, 255);



    default_clut.clut16[0] = RGBA(  0,   0,   0,   0);

    for (i = 1; i < 16; i++) {

        if (i < 8) {

            r = (i & 1) ? 255 : 0;

            g = (i & 2) ? 255 : 0;

            b = (i & 4) ? 255 : 0;

        } else {

            r = (i & 1) ? 127 : 0;

            g = (i & 2) ? 127 : 0;

            b = (i & 4) ? 127 : 0;

        }           

        default_clut.clut16[i] = RGBA(r, g, b, 255);

    }



    default_clut.clut256[0] = RGBA(  0,   0,   0,   0);

    for (i = 1; i < 256; i++) {

        if (i < 8) {

            r = (i & 1) ? 255 : 0;

            g = (i & 2) ? 255 : 0;

            b = (i & 4) ? 255 : 0;

            a = 63;

        } else {

            switch (i & 0x88) {

            case 0x00:

                r = ((i & 1) ? 85 : 0) + ((i & 0x10) ? 170 : 0);

                g = ((i & 2) ? 85 : 0) + ((i & 0x20) ? 170 : 0);

                b = ((i & 4) ? 85 : 0) + ((i & 0x40) ? 170 : 0);

                a = 255;

                break;

            case 0x08:

                r = ((i & 1) ? 85 : 0) + ((i & 0x10) ? 170 : 0);

                g = ((i & 2) ? 85 : 0) + ((i & 0x20) ? 170 : 0);

                b = ((i & 4) ? 85 : 0) + ((i & 0x40) ? 170 : 0);

                a = 127;

                break;

            case 0x80:

                r = 127 + ((i & 1) ? 43 : 0) + ((i & 0x10) ? 85 : 0);

                g = 127 + ((i & 2) ? 43 : 0) + ((i & 0x20) ? 85 : 0);

                b = 127 + ((i & 4) ? 43 : 0) + ((i & 0x40) ? 85 : 0);

                a = 255;

                break;

            case 0x88:

                r = ((i & 1) ? 43 : 0) + ((i & 0x10) ? 85 : 0);

                g = ((i & 2) ? 43 : 0) + ((i & 0x20) ? 85 : 0);

                b = ((i & 4) ? 43 : 0) + ((i & 0x40) ? 85 : 0);

                a = 255;

                break;

            }

        }           

        default_clut.clut256[i] = RGBA(r, g, b, a);

    }



    return 0;

}



static int dvbsub_close_decoder(AVCodecContext *avctx)

{

    return 0;

}



static int get_bits(int num, uint8_t **srcbuf, uint8_t *sbuf_end, int *bit_pos)

{

    int return_val = 0;



    if (*bit_pos > 7)

        *bit_pos &= 7;

        

    while (num > (8 - *bit_pos))

    {

        num -= (8 - *bit_pos);

        return_val |= ((**srcbuf) & ((1 << *bit_pos) - 1)) << num;

        *bit_pos = 0;

        (*srcbuf)++;

    }

        

    return_val |= ((**srcbuf) >> (8 - (*bit_pos + num))) & ((1 << num) - 1);

    *bit_pos += num;



    if (*bit_pos > 7) {

        *bit_pos &= 7;

        (*srcbuf)++;

    }

    

    return return_val;

}



static int dvbsub_read_2bit_string(uint8_t *destbuf, int dbuf_len, 

                                   uint8_t **srcbuf, uint8_t *sbuf_end, 

                                   int non_mod, uint8_t *map_table)

{

    int bit_pos = 0;

    int bits;

    int run_length;

    int pixels_read = 0;

    

    

    while (*srcbuf < sbuf_end && pixels_read < dbuf_len) {

        bits = get_bits(2, srcbuf, sbuf_end, &bit_pos);



        if (bits != 0) {

            if (non_mod != 1 || bits != 1) {

                if (map_table != NULL)

                    *destbuf++ = map_table[bits];

                else

                    *destbuf++ = bits;

            }

            pixels_read++;

        } else {

            bits = get_bits(1, srcbuf, sbuf_end, &bit_pos);

            if (bits == 1) {

                run_length = get_bits(3, srcbuf, sbuf_end, &bit_pos) + 3;

                bits = get_bits(2, srcbuf, sbuf_end, &bit_pos);

                

                if (non_mod == 1 && bits == 1)

                    pixels_read += run_length;

                else {

                    if (map_table != NULL)

                        bits = map_table[bits];

                    while (run_length-- > 0 && pixels_read < dbuf_len) {

                        *destbuf++ = bits;

                        pixels_read++;

                    }

                }

            } else {

                bits = get_bits(1, srcbuf, sbuf_end, &bit_pos);

                if (bits == 0) {

                    bits = get_bits(2, srcbuf, sbuf_end, &bit_pos);

                    if (bits == 2) {

                        run_length = get_bits(4, srcbuf, sbuf_end, &bit_pos) + 12;

                        bits = get_bits(2, srcbuf, sbuf_end, &bit_pos);



                        if (non_mod == 1 && bits == 1)

                            pixels_read += run_length;

                        else {

                            if (map_table != NULL)

                                bits = map_table[bits];

                            while (run_length-- > 0 && pixels_read < dbuf_len) {

                                *destbuf++ = bits;

                                pixels_read++;

                            }

                        }

                    } else if (bits == 3) {

                        run_length = get_bits(8, srcbuf, sbuf_end, &bit_pos) + 29;

                        bits = get_bits(2, srcbuf, sbuf_end, &bit_pos);



                        if (non_mod == 1 && bits == 1)

                            pixels_read += run_length;

                        else {

                            if (map_table != NULL)

                                bits = map_table[bits];

                            while (run_length-- > 0 && pixels_read < dbuf_len) {

                                *destbuf++ = bits;

                                pixels_read++;

                            }

                        }

                    } else if (bits == 1) {

                        pixels_read += 2;

                        if (map_table != NULL)

                            bits = map_table[0];

                        else

                            bits = 0;

                        if (pixels_read <= dbuf_len) {

                            *destbuf++ = bits;

                            *destbuf++ = bits;

                        }

                    } else {

                        if (bit_pos != 0)

                            (*srcbuf)++;

                        return pixels_read;

                    }

                } else {

                    if (map_table != NULL)

                        bits = map_table[0];

                    else

                        bits = 0;

                    *destbuf++ = bits;

                    pixels_read++;

                }

            }

        }

    }

    

    if (get_bits(6, srcbuf, sbuf_end, &bit_pos) != 0)

        av_log(0, AV_LOG_ERROR, "DVBSub error: line overflow\n");



    if (bit_pos != 0)

        (*srcbuf)++;

    return pixels_read;

}

    

static int dvbsub_read_4bit_string(uint8_t *destbuf, int dbuf_len, 

                                   uint8_t **srcbuf, uint8_t *sbuf_end, 

                                   int non_mod, uint8_t *map_table)

{

    int bit_pos = 0;

    int bits;

    int run_length;

    int pixels_read = 0;

    

    

    while (*srcbuf < sbuf_end && pixels_read < dbuf_len) {

        bits = get_bits(4, srcbuf, sbuf_end, &bit_pos);



        if (bits != 0) {

            if (non_mod != 1 || bits != 1) {

                if (map_table != NULL)

                    *destbuf++ = map_table[bits];

                else

                    *destbuf++ = bits;

            }

            pixels_read++;

        } else {

            bits = get_bits(1, srcbuf, sbuf_end, &bit_pos);

            if (bits == 0) {

                run_length = get_bits(3, srcbuf, sbuf_end, &bit_pos);

                

                if (run_length == 0) {

                    if (bit_pos != 0)

                        (*srcbuf)++;

                    return pixels_read;

                }

                    

                run_length += 2;

                

                if (map_table != NULL)

                    bits = map_table[0];

                else

                    bits = 0;

                

                while (run_length-- > 0 && pixels_read < dbuf_len) {

                    *destbuf++ = bits;

                    pixels_read++;

                }

            } else {

                bits = get_bits(1, srcbuf, sbuf_end, &bit_pos);

                if (bits == 0) {

                    run_length = get_bits(2, srcbuf, sbuf_end, &bit_pos) + 4;

                    bits = get_bits(4, srcbuf, sbuf_end, &bit_pos);



                    if (non_mod == 1 && bits == 1)

                        pixels_read += run_length;

                    else {

                        if (map_table != NULL)

                            bits = map_table[bits];

                        while (run_length-- > 0 && pixels_read < dbuf_len) {

                            *destbuf++ = bits;

                            pixels_read++;

                        }

                    }

                } else {

                    bits = get_bits(2, srcbuf, sbuf_end, &bit_pos);

                    if (bits == 2) {

                        run_length = get_bits(4, srcbuf, sbuf_end, &bit_pos) + 9;

                        bits = get_bits(4, srcbuf, sbuf_end, &bit_pos);

                        

                        if (non_mod == 1 && bits == 1)

                            pixels_read += run_length;

                        else {

                            if (map_table != NULL)

                                bits = map_table[bits];

                            while (run_length-- > 0 && pixels_read < dbuf_len) {

                                *destbuf++ = bits;

                                pixels_read++;

                            }

                        }

                    } else if (bits == 3) {

                        run_length = get_bits(8, srcbuf, sbuf_end, &bit_pos) + 25;

                        bits = get_bits(4, srcbuf, sbuf_end, &bit_pos);



                        if (non_mod == 1 && bits == 1)

                            pixels_read += run_length;

                        else {

                            if (map_table != NULL)

                                bits = map_table[bits];

                            while (run_length-- > 0 && pixels_read < dbuf_len) {

                                *destbuf++ = bits;

                                pixels_read++;

                            }

                        }

                    } else if (bits == 1) {

                        pixels_read += 2;

                        if (map_table != NULL)

                            bits = map_table[0];

                        else

                            bits = 0;

                        if (pixels_read <= dbuf_len) {

                            *destbuf++ = bits;

                            *destbuf++ = bits;

                        }

                    } else {

                        if (map_table != NULL)

                            bits = map_table[0];

                        else

                            bits = 0;

                        *destbuf++ = bits;

                        pixels_read ++;

                    }

                }

            }

        }

    }

    

    if (get_bits(8, srcbuf, sbuf_end, &bit_pos) != 0)

        av_log(0, AV_LOG_ERROR, "DVBSub error: line overflow\n");

    

    if (bit_pos != 0)

        (*srcbuf)++;

    return pixels_read;

}

    

static int dvbsub_read_8bit_string(uint8_t *destbuf, int dbuf_len, 

                                    uint8_t **srcbuf, uint8_t *sbuf_end, 

                                    int non_mod, uint8_t *map_table)

{

    int bits;

    int run_length;

    int pixels_read = 0;

    

    

    while (*srcbuf < sbuf_end && pixels_read < dbuf_len) {

        bits = *(*srcbuf)++;

    

        if (bits != 0) {

            if (non_mod != 1 || bits != 1) {

                if (map_table != NULL)

                    *destbuf++ = map_table[bits];

                else

                    *destbuf++ = bits;

            }

            pixels_read++;

        } else {

            bits = *(*srcbuf)++;

            run_length = bits & 0x7f;

            if ((bits & 0x80) == 0) {

                if (run_length == 0) {

                    return pixels_read;

                }

                                    

                if (map_table != NULL)

                    bits = map_table[0];

                else

                    bits = 0;

                while (run_length-- > 0 && pixels_read < dbuf_len) {

                    *destbuf++ = bits;

                    pixels_read++;

                }

            } else {

                bits = *(*srcbuf)++;



                if (non_mod == 1 && bits == 1)

                    pixels_read += run_length;

                if (map_table != NULL)

                    bits = map_table[bits];

                else while (run_length-- > 0 && pixels_read < dbuf_len) {

                    *destbuf++ = bits;

                    pixels_read++;

                }

            }

        }

    }

    

    if (*(*srcbuf)++ != 0)

        av_log(0, AV_LOG_ERROR, "DVBSub error: line overflow\n");

    

    return pixels_read;

}

    





static void dvbsub_parse_pixel_data_block(AVCodecContext *avctx, DVBSubObjectDisplay *display,

                                          uint8_t *buf, int buf_size, int top_bottom, int non_mod)

{

    DVBSubContext *ctx = (DVBSubContext*) avctx->priv_data;



    DVBSubRegion *region = ctx->region[display->region_id];

    uint8_t *buf_end = buf + buf_size;

    uint8_t *pbuf;

    int x_pos, y_pos;

    int i;

    

    uint8_t map2to4[] = { 0x0,  0x7,  0x8,  0xf};

    uint8_t map2to8[] = {0x00, 0x77, 0x88, 0xff};

    uint8_t map4to8[] = {0x00, 0x11, 0x22, 0x33, 0x44, 0x55, 0x66, 0x77, 

                         0x88, 0x99, 0xaa, 0xbb, 0xcc, 0xdd, 0xee, 0xff};

    uint8_t *map_table;

    

#ifdef DEBUG_PACKET_CONTENTS

    av_log(avctx, AV_LOG_INFO, "DVB pixel block size %d, %s field:\n", buf_size,

                top_bottom ? "bottom" : "top");



    for (i = 0; i < buf_size; i++)

    {

        av_log(avctx, AV_LOG_INFO, "%02x ", buf[i]);

        if (i % 16 == 15)

            av_log(avctx, AV_LOG_INFO, "\n");

    }

    

    if (i % 16 != 0)

        av_log(avctx, AV_LOG_INFO, "\n");



#endif



    if (region == 0)

        return;

    

    pbuf = region->pbuf;

    

    x_pos = display->x_pos;

    y_pos = display->y_pos;

    

    if ((y_pos & 1) != top_bottom)

        y_pos++;

        

    while (buf < buf_end) {

        if (x_pos > region->width || y_pos > region->height) {

            av_log(avctx, AV_LOG_ERROR, "Invalid object location!\n");

            return;

        }

        

        switch (*buf++) {

        case 0x10:

            if (region->depth == 8)

                map_table = map2to8;

            else if (region->depth == 4)

                map_table = map2to4;

            else

                map_table = NULL;

                

            x_pos += dvbsub_read_2bit_string(pbuf + (y_pos * region->width) + x_pos, 

                                                region->width - x_pos, &buf, buf_end, 

                                                non_mod, map_table);

            break;

        case 0x11:

            if (region->depth < 4) {

                av_log(avctx, AV_LOG_ERROR, "4-bit pixel string in %d-bit region!\n", region->depth);

                return;

            }

                

            if (region->depth == 8)

                map_table = map4to8;

            else

                map_table = NULL;

                

            x_pos += dvbsub_read_4bit_string(pbuf + (y_pos * region->width) + x_pos, 

                                                region->width - x_pos, &buf, buf_end, 

                                                non_mod, map_table);

            break;

        case 0x12:

            if (region->depth < 8) {

                av_log(avctx, AV_LOG_ERROR, "8-bit pixel string in %d-bit region!\n", region->depth);

                return;

            }

                

            x_pos += dvbsub_read_8bit_string(pbuf + (y_pos * region->width) + x_pos, 

                                                region->width - x_pos, &buf, buf_end, 

                                                non_mod, NULL);

            break;

            

        case 0x20:

            map2to4[0] = (*buf) >> 4;

            map2to4[1] = (*buf++) & 0xf;

            map2to4[2] = (*buf) >> 4;

            map2to4[3] = (*buf++) & 0xf;

            break;

        case 0x21:

            for (i = 0; i < 4; i++)

                map2to8[i] = *buf++;

            break;

        case 0x22:

            for (i = 0; i < 16; i++)

                map4to8[i] = *buf++;

            break;

            

        case 0xf0:

            x_pos = display->x_pos;

            y_pos += 2;

            break;

        default:

            av_log(avctx, AV_LOG_INFO, "Unknown/unsupported pixel block 0x%x\n", *(buf-1));

        }

    }

    

}



static void dvbsub_parse_object_segment(AVCodecContext *avctx,

                                        uint8_t *buf, int buf_size)

{

    DVBSubContext *ctx = (DVBSubContext*) avctx->priv_data;

    

    uint8_t *buf_end = buf + buf_size;

    uint8_t *block;

    int object_id;

    DVBSubObject *object;

    DVBSubObjectDisplay *display;

    int top_field_len, bottom_field_len;

    

    int coding_method, non_modifying_colour;

    

    object_id = getbe16(buf);

    buf += 2;

    

    object = get_object(ctx->object, object_id);



    if (!object) 

        return; 

    

    coding_method = ((*buf) >> 2) & 3;

    non_modifying_colour = ((*buf++) >> 1) & 1;

    

    if (coding_method == 0) {

        top_field_len = getbe16(buf);

        buf += 2;

        bottom_field_len = getbe16(buf);

        buf += 2;

        

        if (buf + top_field_len + bottom_field_len > buf_end) {

            av_log(avctx, AV_LOG_ERROR, "Field data size too large\n");

            return;

        }       

        

        for (display = object->display_list; display != 0; display = display->object_list_next) {

            block = buf;



            dvbsub_parse_pixel_data_block(avctx, display, block, top_field_len, 0,

                                            non_modifying_colour);



            if (bottom_field_len > 0)

                block = buf + top_field_len;

            else

                bottom_field_len = top_field_len;



            dvbsub_parse_pixel_data_block(avctx, display, block, bottom_field_len, 1,

                                            non_modifying_colour);

        }

        

/*  } else if (coding_method == 1) {*/

        

    } else {

        av_log(avctx, AV_LOG_ERROR, "Unknown object coding %d\n", coding_method);

    }

    

}



#define SCALEBITS 10

#define ONE_HALF  (1 << (SCALEBITS - 1))

#define FIX(x)    ((int) ((x) * (1<<SCALEBITS) + 0.5))



#define YUV_TO_RGB1_CCIR(cb1, cr1)\

{\

    cb = (cb1) - 128;\

    cr = (cr1) - 128;\

    r_add = FIX(1.40200*255.0/224.0) * cr + ONE_HALF;\

    g_add = - FIX(0.34414*255.0/224.0) * cb - FIX(0.71414*255.0/224.0) * cr + \

            ONE_HALF;\

    b_add = FIX(1.77200*255.0/224.0) * cb + ONE_HALF;\

}



#define YUV_TO_RGB2_CCIR(r, g, b, y1)\

{\

    y = ((y1) - 16) * FIX(255.0/219.0);\

    r = cm[(y + r_add) >> SCALEBITS];\

    g = cm[(y + g_add) >> SCALEBITS];\

    b = cm[(y + b_add) >> SCALEBITS];\

}





static void dvbsub_parse_clut_segment(AVCodecContext *avctx,

                                        uint8_t *buf, int buf_size)

{

    DVBSubContext *ctx = (DVBSubContext*) avctx->priv_data;

    

    uint8_t *buf_end = buf + buf_size;

    int clut_id;

    DVBSubCLUT *clut;

    int entry_id, depth , full_range;

    int y, cr, cb, alpha;

    int r, g, b, r_add, g_add, b_add;



#ifdef DEBUG_PACKET_CONTENTS

    int i;



    av_log(avctx, AV_LOG_INFO, "DVB clut packet:\n");



    for (i=0; i < buf_size; i++)

    {

        av_log(avctx, AV_LOG_INFO, "%02x ", buf[i]);

        if (i % 16 == 15)

            av_log(avctx, AV_LOG_INFO, "\n");

    }

    

    if (i % 16 != 0)

        av_log(avctx, AV_LOG_INFO, "\n");



#endif



    clut_id = *buf++;

    buf += 1;

    

    if (!ctx->clut[clut_id]) {

        ctx->clut[clut_id] = av_malloc(sizeof(DVBSubCLUT));

        

        memcpy(ctx->clut[clut_id], &default_clut, sizeof(DVBSubCLUT));

    }

        

    clut = ctx->clut[clut_id];

    

    while (buf + 4 < buf_end)

    {

        entry_id = *buf++;

        

        depth = (*buf) & 0xe0;

                    

        if (depth == 0) {

            av_log(avctx, AV_LOG_ERROR, "Invalid clut depth 0x%x!\n", *buf);

            return;

        }

        

        full_range = (*buf++) & 1;

        

        if (full_range) {

            y = *buf++;

            cr = *buf++;

            cb = *buf++;

            alpha = *buf++;

        } else {

            y = buf[0] & 0xfc;

            cr = (((buf[0] & 3) << 2) | ((buf[1] >> 6) & 3)) << 4;

            cb = (buf[1] << 2) & 0xf0;

            alpha = (buf[1] << 6) & 0xc0;

            

            buf += 2;

        }

        

        if (y == 0)

            alpha = 0xff;

        

        YUV_TO_RGB1_CCIR(cb, cr);

        YUV_TO_RGB2_CCIR(r, g, b, y);

        

#ifdef DEBUG

        av_log(avctx, AV_LOG_INFO, "clut %d := (%d,%d,%d,%d)\n", entry_id, r, g, b, alpha);

#endif

        

        if (depth & 0x80)

            clut->clut4[entry_id] = RGBA(r,g,b,255 - alpha);

        if (depth & 0x40)

            clut->clut16[entry_id] = RGBA(r,g,b,255 - alpha);

        if (depth & 0x20)

            clut->clut256[entry_id] = RGBA(r,g,b,255 - alpha);

    }

}





static void dvbsub_parse_region_segment(AVCodecContext *avctx,

                                        uint8_t *buf, int buf_size)

{

    DVBSubContext *ctx = (DVBSubContext*) avctx->priv_data;

    

    uint8_t *buf_end = buf + buf_size;

    int region_id, object_id;

    DVBSubRegion *region;

    DVBSubObject *object;

    DVBSubObjectDisplay *display;

    int fill;

    

    if (buf_size < 10)

        return;

    

    region_id = *buf++;

    

    if (!ctx->region[region_id])

        ctx->region[region_id] = av_mallocz(sizeof(DVBSubRegion));

        

    region = ctx->region[region_id];

    

    fill = ((*buf++) >> 3) & 1;

    

    region->width = getbe16(buf);

    buf += 2;

    region->height = getbe16(buf);

    buf += 2;

    

    if (region->width * region->height != region->buf_size) {

        if (region->pbuf != 0)

            av_free(region->pbuf);

    

        region->buf_size = region->width * region->height;

        

        region->pbuf = av_malloc(region->buf_size);

        

        fill = 1;

    }

    

    region->depth = 1 << (((*buf++) >> 2) & 7);

    region->clut = *buf++;

        

    if (region->depth == 8)

        region->bgcolour = *buf++;

    else {

        buf += 1;

        

        if (region->depth == 4)

            region->bgcolour = (((*buf++) >> 4) & 15);

        else

            region->bgcolour = (((*buf++) >> 2) & 3);

    }



#ifdef DEBUG

    av_log(avctx, AV_LOG_INFO, "Region %d, (%dx%d)\n", region_id, region->width, region->height);

#endif



    if (fill) {

        memset(region->pbuf, region->bgcolour, region->buf_size);

#ifdef DEBUG

        av_log(avctx, AV_LOG_INFO, "Fill region (%d)\n", region->bgcolour);

#endif

    }



    delete_region_display_list(ctx, region);



    while (buf + 5 < buf_end) {

        object_id = getbe16(buf);

        buf += 2;

                

        object = get_object(ctx->object, object_id);



        if (!object) {

            object = av_mallocz(sizeof(DVBSubObject));

            

            object->id = object_id;

            object->next = ctx->object;

            ctx->object = object;

        }

        

        object->type = (*buf) >> 6;

        

        display = av_mallocz(sizeof(DVBSubObjectDisplay));

        

        display->object_id = object_id;

        display->region_id = region_id;

        

        display->x_pos = getbe16(buf) & 0xfff;

        buf += 2;

        display->y_pos = getbe16(buf) & 0xfff;

        buf += 2;

        

        if ((object->type == 1 || object->type == 2) && buf+1 < buf_end) {

            display->fgcolour = *buf++;

            display->bgcolour = *buf++;

        }

        

        display->region_list_next = region->display_list;

        region->display_list = display;

        

        display->object_list_next = object->display_list;

        object->display_list = display;

    }

}



static void dvbsub_parse_page_segment(AVCodecContext *avctx,

                                        uint8_t *buf, int buf_size)

{

    DVBSubContext *ctx = (DVBSubContext*) avctx->priv_data;

    DVBSubRegionDisplay *display;

    DVBSubRegionDisplay *tmp_display_list, **tmp_ptr;

    

    uint8_t *buf_end = buf + buf_size;

    int region_id;

    int page_state;

    

    if (buf_size < 1)

        return;

    

    ctx->time_out = *buf++;

    page_state = ((*buf++) >> 2) & 3;

    

#ifdef DEBUG

    av_log(avctx, AV_LOG_INFO, "Page time out %ds, state %d\n", ctx->time_out, page_state);

#endif

    

    tmp_display_list = ctx->display_list;

    ctx->display_list = NULL;

    ctx->display_list_size = 0;

    

    while (buf + 5 < buf_end) {

        region_id = *buf++;

        buf += 1;

        

        display = tmp_display_list;

        tmp_ptr = &tmp_display_list;

        

        while (display != NULL && display->region_id != region_id) {

            tmp_ptr = &display->next;

            display = display->next;

        }

            

        if (display == NULL)

            display = av_mallocz(sizeof(DVBSubRegionDisplay));

        

        display->region_id = region_id;

        

        display->x_pos = getbe16(buf);

        buf += 2;

        display->y_pos = getbe16(buf);

        buf += 2;

        

        *tmp_ptr = display->next;

        

        display->next = ctx->display_list;

        ctx->display_list = display;

        ctx->display_list_size++;

        

#ifdef DEBUG

        av_log(avctx, AV_LOG_INFO, "Region %d, (%d,%d)\n", region_id, display->x_pos, display->y_pos);

#endif

    }

    

    while (tmp_display_list != 0) {

        display = tmp_display_list;

        

        tmp_display_list = display->next;

        

        av_free(display);

    }

    

}





#ifdef DEBUG_SAVE_IMAGES

static void save_display_set(DVBSubContext *ctx)

{

    int x_pos, y_pos, width, height;

    int x, y, y_off, x_off;

    uint32_t *pbuf;

    char filename[32];

    static int fileno_index = 0;



    x_pos = -1;

    y_pos = -1;

    width = 0;

    height = 0;

    

    for (display = ctx->display_list; display != 0; display = display->next) {

        region = ctx->region[display->region_id];

    

        if (x_pos == -1) {

            x_pos = display->x_pos;

            y_pos = display->y_pos;

            width = region->width;

            height = region->height;

        } else {

            if (display->x_pos < x_pos) {

                width += (x_pos - display->x_pos);

                x_pos = display->x_pos;

            }

            

            if (display->y_pos < y_pos) {

                height += (y_pos - display->y_pos);

                y_pos = display->y_pos;

            }

            

            if (display->x_pos + region->width > x_pos + width) {

                width = display->x_pos + region->width - x_pos;

            }

            

            if (display->y_pos + region->height > y_pos + height) {

                height = display->y_pos + region->height - y_pos;

            }

        }

    }

    

    if (x_pos >= 0) {

    

        pbuf = av_malloc(width * height * 4);



        for (display = ctx->display_list; display != 0; display = display->next) {

            region = ctx->region[display->region_id];



            x_off = display->x_pos - x_pos;

            y_off = display->y_pos - y_pos;



            clut = ctx->clut[region->clut];



            if (clut == 0)

                clut = &default_clut;



            switch (region->depth) {

            case 2:

                clut_table = clut->clut4;

                break;

            case 8:

                clut_table = clut->clut256;

                break;

            case 4:

            default:

                clut_table = clut->clut16;

                break;

            }

        

            for (y = 0; y < region->height; y++) {

                for (x = 0; x < region->width; x++) {

                    pbuf[((y + y_off) * width) + x_off + x] = 

                        clut_table[region->pbuf[y * region->width + x]];

                }

            }



        }   



        snprintf(filename, 32, "dvbs.%d", fileno_index);



        png_save2(filename, pbuf, width, height);



        av_free(pbuf);

    }

    

    fileno_index++;

}

#endif



static int dvbsub_display_end_segment(AVCodecContext *avctx, uint8_t *buf, 

                                        int buf_size, AVSubtitle *sub)

{

    DVBSubContext *ctx = (DVBSubContext*) avctx->priv_data;



    DVBSubRegion *region;

    DVBSubRegionDisplay *display;

    AVSubtitleRect *rect;

    DVBSubCLUT *clut;

    uint32_t *clut_table;

    int i;

    

    sub->rects = NULL;

    sub->start_display_time = 0;

    sub->end_display_time = ctx->time_out * 1000;

    sub->format = 0;



    sub->num_rects = ctx->display_list_size;

    

    if (sub->num_rects == 0)

        return 0;

    

    sub->rects = av_mallocz(sizeof(AVSubtitleRect) * sub->num_rects);



    i = 0;



    for (display = ctx->display_list; display != 0; display = display->next) {

        region = ctx->region[display->region_id];

        rect = &sub->rects[i];

        

        rect->x = display->x_pos;

        rect->y = display->y_pos;

        rect->w = region->width;

        rect->h = region->height;

        rect->nb_colors = 16;

        rect->linesize = region->width;



        clut = ctx->clut[region->clut];

        

        if (clut == 0)

            clut = &default_clut;

            

        switch (region->depth) {

        case 2:

            clut_table = clut->clut4;

            break;

        case 8:

            clut_table = clut->clut256;

            break;

        case 4:

        default:

            clut_table = clut->clut16;

            break;

        }

        

        rect->rgba_palette = av_malloc((1 << region->depth) * sizeof(uint32_t));

        memcpy(rect->rgba_palette, clut_table, (1 << region->depth) * sizeof(uint32_t));

        

        rect->bitmap = av_malloc(region->buf_size);

        memcpy(rect->bitmap, region->pbuf, region->buf_size);

        

        i++;

    }

    

#ifdef DEBUG_SAVE_IMAGES

    save_display_set(ctx);

#endif

    

    return 1;

}



static int dvbsub_decode(AVCodecContext *avctx,

                         void *data, int *data_size,

                         uint8_t *buf, int buf_size)

{

    DVBSubContext *ctx = (DVBSubContext*) avctx->priv_data;

    AVSubtitle *sub = (AVSubtitle*) data;

    uint8_t *p, *p_end;

    int segment_type;

    int page_id;

    int segment_length;

  

#ifdef DEBUG_PACKET_CONTENTS

    int i;



    av_log(avctx, AV_LOG_INFO, "DVB sub packet:\n");



    for (i=0; i < buf_size; i++)

    {

        av_log(avctx, AV_LOG_INFO, "%02x ", buf[i]);

        if (i % 16 == 15)

            av_log(avctx, AV_LOG_INFO, "\n");

    }

    

    if (i % 16 != 0)

        av_log(avctx, AV_LOG_INFO, "\n");



#endif



    if (buf_size <= 2)

        return -1;

        

    p = buf;

    p_end = buf + buf_size;

        

    if (*p++ != 0x20 || *p++ != 0x00) {

#ifdef DEBUG

        av_log(avctx, AV_LOG_INFO, "Bad packet header\n");

#endif

        return -1;

    }

        

    while (p < p_end && *p == 0x0f)

    {

        p += 1;

        segment_type = *p++;

        page_id = getbe16(p);

        p += 2;

        segment_length = getbe16(p);

        p += 2;

        

        if (page_id == ctx->composition_id || page_id == ctx->ancillary_id) {

            switch (segment_type) {

            case DVBSUB_PAGE_SEGMENT:

                dvbsub_parse_page_segment(avctx, p, segment_length);

                break;

            case DVBSUB_REGION_SEGMENT:

                dvbsub_parse_region_segment(avctx, p, segment_length);

                break;

            case DVBSUB_CLUT_SEGMENT:

                dvbsub_parse_clut_segment(avctx, p, segment_length);

                break;

            case DVBSUB_OBJECT_SEGMENT:

                dvbsub_parse_object_segment(avctx, p, segment_length);

                break;

            case DVBSUB_DISPLAY_SEGMENT:

                *data_size = dvbsub_display_end_segment(avctx, p, segment_length, sub);

                break;

            default:

#ifdef DEBUG

                av_log(avctx, AV_LOG_INFO, "Subtitling segment type 0x%x, page id %d, length %d\n", 

                        segment_type, page_id, segment_length);

#endif

                break;

            }

        }



        p += segment_length;

    }

    

    if (*p++ != 0xff || p != p_end)

    {

#ifdef DEBUG

        av_log(avctx, AV_LOG_INFO, "Bad packet footer\n");

#endif

        return -1;

    }



    return 0;

}





AVCodec dvbsub_decoder = {

    "dvbsub",

    CODEC_TYPE_SUBTITLE,

    CODEC_ID_DVB_SUBTITLE,

    sizeof(DVBSubContext),

    dvbsub_init_decoder,

    NULL,

    dvbsub_close_decoder,

    dvbsub_decode,

};



/* Parser (mostly) copied from dvdsub.c */



#define PARSE_BUF_SIZE  (65536 + 184)





/* parser definition */

typedef struct DVBSubParseContext {

    uint8_t *packet_buf;

    int packet_start;

    int packet_index;

} DVBSubParseContext;



static int dvbsub_parse_init(AVCodecParserContext *s)

{

    DVBSubParseContext *pc = s->priv_data;

    pc->packet_buf = av_malloc(PARSE_BUF_SIZE);



    return 0;

}



static int dvbsub_parse(AVCodecParserContext *s,

                        AVCodecContext *avctx,

                        uint8_t **poutbuf, int *poutbuf_size, 

                        const uint8_t *buf, int buf_size)

{

    DVBSubParseContext *pc = s->priv_data;

    

#ifdef DEBUG2

    int i;



    av_log(avctx, AV_LOG_INFO, "DVB parse packet pts=%Lx, lpts=%Lx, cpts=%Lx:\n", 

            s->pts, s->last_pts, s->cur_frame_pts[s->cur_frame_start_index]);



    for (i=0; i < buf_size; i++)

    {

        av_log(avctx, AV_LOG_INFO, "%02x ", buf[i]);

        if (i % 16 == 15)

            av_log(avctx, AV_LOG_INFO, "\n");

    }

    

    if (i % 16 != 0)

        av_log(avctx, AV_LOG_INFO, "\n");



#endif



    *poutbuf = NULL;

    *poutbuf_size = 0;

    

    s->fetch_timestamp = 1;



    if (buf_size == 0 || s->last_pts != AV_NOPTS_VALUE)

    {

        if (pc->packet_index != pc->packet_start)

        {

            *poutbuf = pc->packet_buf + pc->packet_start;

            *poutbuf_size = pc->packet_index - pc->packet_start;

        }

            

        pc->packet_start = pc->packet_index;

    } else {

        if (pc->packet_index != pc->packet_start)

        {

            memmove(pc->packet_buf, pc->packet_buf + pc->packet_start,

                    pc->packet_index - pc->packet_start);

                    

            pc->packet_index -= pc->packet_start;

            pc->packet_start = 0;

        }

    }

        

    if (buf_size + pc->packet_index > PARSE_BUF_SIZE)

        return -1;

        

    memcpy(pc->packet_buf + pc->packet_index, buf, buf_size);

    pc->packet_index += buf_size;



    return buf_size;

}



static void dvbsub_parse_close(AVCodecParserContext *s)

{

    DVBSubParseContext *pc = s->priv_data;

    av_freep(&pc->packet_buf);

}



AVCodecParser dvbsub_parser = {

    { CODEC_ID_DVB_SUBTITLE },

    sizeof(DVBSubParseContext),

    dvbsub_parse_init,

    dvbsub_parse,

    dvbsub_parse_close,

};




More information about the ffmpeg-devel mailing list