Deluxe Paint Animation demuxer

Originally committed as revision 21118 to svn://svn.ffmpeg.org/ffmpeg/trunk

5 files changed, 239 insertions, 0 deletions

diff --git a/Changelog b/Changelog
index 44d36e0a4d..1f8dece6b5 100644
--- a/Changelog
+++ b/Changelog
@@ -47,6 +47,7 @@ version <next>:
 - CDG demuxer and decoder
 - R210 decoder
 - Auravision Aura 1 and 2 decoders
+- Deluxe Paint Animation playback system
 
 
 
diff --git a/doc/general.texi b/doc/general.texi
index 6e7212cd36..4f710a32dc 100644
--- a/doc/general.texi
+++ b/doc/general.texi
@@ -73,6 +73,7 @@ library:
 @item CRYO APC                  @tab   @tab X
     @tab Audio format used in some games by CRYO Interactive Entertainment.
 @item D-Cinema audio            @tab X @tab X
+@item Deluxe Paint Animation    @tab   @tab X
 @item DV video                  @tab X @tab X
 @item DXA                       @tab   @tab X
     @tab This format is used in the non-Windows version of the Feeble Files
diff --git a/libavformat/Makefile b/libavformat/Makefile
index 2b3e186413..9e52bc796c 100644
--- a/libavformat/Makefile
+++ b/libavformat/Makefile
@@ -25,6 +25,7 @@ OBJS-$(CONFIG_AIFF_DEMUXER)              += aiffdec.o riff.o raw.o
 OBJS-$(CONFIG_AIFF_MUXER)                += aiffenc.o riff.o
 OBJS-$(CONFIG_AMR_DEMUXER)               += amr.o
 OBJS-$(CONFIG_AMR_MUXER)                 += amr.o
+OBJS-$(CONFIG_ANM_DEMUXER)               += anm.o
 OBJS-$(CONFIG_APC_DEMUXER)               += apc.o
 OBJS-$(CONFIG_APE_DEMUXER)               += ape.o apetag.o
 OBJS-$(CONFIG_ASF_DEMUXER)               += asfdec.o asf.o asfcrypt.o \
diff --git a/libavformat/allformats.c b/libavformat/allformats.c
index d57376dd91..ff96db6413 100644
--- a/libavformat/allformats.c
+++ b/libavformat/allformats.c
@@ -53,6 +53,7 @@ void av_register_all(void)
     REGISTER_DEMUXER  (AEA, aea);
     REGISTER_MUXDEMUX (AIFF, aiff);
     REGISTER_MUXDEMUX (AMR, amr);
+    REGISTER_DEMUXER  (ANM, anm);
     REGISTER_DEMUXER  (APC, apc);
     REGISTER_DEMUXER  (APE, ape);
     REGISTER_MUXDEMUX (ASF, asf);
diff --git a/libavformat/anm.c b/libavformat/anm.c
new file mode 100644
index 0000000000..b80e429b82
--- /dev/null
+++ b/libavformat/anm.c
@@ -0,0 +1,235 @@
+/*
+ * Deluxe Paint Animation demuxer
+ * Copyright (c) 2009 Peter Ross
+ *
+ * This file is part of FFmpeg.
+ *
+ * FFmpeg 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.1 of the License, or (at your option) any later version.
+ *
+ * FFmpeg 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 FFmpeg; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+/**
+ * @file libavformat/anm.c
+ * Deluxe Paint Animation demuxer
+ */
+
+#include "libavutil/intreadwrite.h"
+#include "avformat.h"
+
+typedef struct {
+    int base_record;
+    unsigned int nb_records;
+    int size;
+} Page;
+
+typedef struct {
+    unsigned int nb_pages;    /** total pages in file */
+    unsigned int nb_records;  /** total records in file */
+    int page_table_offset;
+#define MAX_PAGES  256        /** Deluxe Paint hardcoded value */
+    Page pt[MAX_PAGES];       /** page table */
+    int page;                 /** current page */
+    int record;               /** current record (with in page) */
+} AnmDemuxContext;
+
+#define LPF_TAG  MKTAG('L','P','F',' ')
+#define ANIM_TAG MKTAG('A','N','I','M')
+
+static int probe(AVProbeData *p)
+{
+    /* verify tags and video dimensions */
+    if (AV_RL32(&p->buf[0])  == LPF_TAG &&
+        AV_RL32(&p->buf[16]) == ANIM_TAG &&
+        AV_RL16(&p->buf[20]) && AV_RL16(&p->buf[22]))
+        return AVPROBE_SCORE_MAX;
+    return 0;
+}
+
+/**
+ * @return page containing the requested record or AVERROR_XXX
+ */
+static int find_record(const AnmDemuxContext *anm, int record)
+{
+    int i;
+
+    if (record >= anm->nb_records)
+        return AVERROR_EOF;
+
+    for (i = 0; i < MAX_PAGES; i++) {
+        const Page *p = &anm->pt[i];
+        if (p->nb_records > 0 && record >= p->base_record && record < p->base_record + p->nb_records)
+            return i;
+    }
+
+    return AVERROR_INVALIDDATA;
+}
+
+static int read_header(AVFormatContext *s,
+                       AVFormatParameters *ap)
+{
+    AnmDemuxContext *anm = s->priv_data;
+    ByteIOContext *pb = s->pb;
+    AVStream *st;
+    int i, ret;
+
+    url_fskip(pb, 4); /* magic number */
+    if (get_le16(pb) != MAX_PAGES) {
+        av_log_ask_for_sample(s, "max_pages != " AV_STRINGIFY(MAX_PAGES) "\n");
+        return AVERROR_INVALIDDATA;
+    }
+
+    anm->nb_pages   = get_le16(pb);
+    anm->nb_records = get_le32(pb);
+    url_fskip(pb, 2); /* max records per page */
+    anm->page_table_offset = get_le16(pb);
+    if (get_le32(pb) != ANIM_TAG)
+        return AVERROR_INVALIDDATA;
+
+    /* video stream */
+    st = av_new_stream(s, 0);
+    if (!st)
+        return AVERROR(ENOMEM);
+    st->codec->codec_type = CODEC_TYPE_VIDEO;
+    st->codec->codec_id   = CODEC_ID_ANM;
+    st->codec->codec_tag  = 0; /* no fourcc */
+    st->codec->width      = get_le16(pb);
+    st->codec->height     = get_le16(pb);
+    if (get_byte(pb) != 0)
+        goto invalid;
+    url_fskip(pb, 1); /* frame rate multiplier info */
+
+    /* ignore last delta record (used for looping) */
+    if (get_byte(pb))  /* has_last_delta */
+        anm->nb_records = FFMAX(anm->nb_records - 1, 0);
+
+    url_fskip(pb, 1); /* last_delta_valid */
+
+    if (get_byte(pb) != 0)
+        goto invalid;
+
+    if (get_byte(pb) != 1)
+        goto invalid;
+
+    url_fskip(pb, 1); /* other recs per frame */
+
+    if (get_byte(pb) != 1)
+        goto invalid;
+
+    url_fskip(pb, 32); /* record_types */
+    st->nb_frames = get_le32(pb);
+    av_set_pts_info(st, 64, 1, get_le16(pb));
+    url_fskip(pb, 58);
+
+    /* color cycling and palette data */
+    st->codec->extradata_size = 16*8 + 4*256;
+    st->codec->extradata      = av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);
+    if (!st->codec->extradata) {
+        ret = AVERROR(ENOMEM);
+        goto close_and_return;
+    }
+    ret = get_buffer(pb, st->codec->extradata, st->codec->extradata_size);
+    if (ret < 0)
+        goto close_and_return;
+
+    /* read page table */
+    ret = url_fseek(pb, anm->page_table_offset, SEEK_SET);
+    if (ret < 0)
+        goto close_and_return;
+
+    for (i = 0; i < MAX_PAGES; i++) {
+        Page *p = &anm->pt[i];
+        p->base_record = get_le16(pb);
+        p->nb_records  = get_le16(pb);
+        p->size        = get_le16(pb);
+    }
+
+    /* find page of first frame */
+    anm->page = find_record(anm, 0);
+    if (anm->page < 0) {
+        ret = anm->page;
+        goto close_and_return;
+    }
+
+    anm->record = -1;
+    return 0;
+
+invalid:
+    av_log_ask_for_sample(s, NULL);
+    ret = AVERROR_INVALIDDATA;
+
+close_and_return:
+    av_close_input_stream(s);
+    return ret;
+}
+
+static int read_packet(AVFormatContext *s,
+                       AVPacket *pkt)
+{
+    AnmDemuxContext *anm = s->priv_data;
+    ByteIOContext *pb = s->pb;
+    Page *p;
+    int tmp, record_size;
+
+    if (url_feof(s->pb))
+        return AVERROR(EIO);
+
+    if (anm->page < 0)
+        return 0;
+
+repeat:
+    p = &anm->pt[anm->page];
+
+    /* parse page header */
+    if (anm->record < 0) {
+        url_fseek(pb, anm->page_table_offset + MAX_PAGES*6 + (anm->page<<16), SEEK_SET);
+        url_fskip(pb, 8 + 2*p->nb_records);
+        anm->record = 0;
+    }
+
+    /* if we have fetched all records in this page, then find the
+       next page and repeat */
+    if (anm->record >= p->nb_records) {
+        anm->page = find_record(anm, p->base_record + p->nb_records);
+        if (anm->page < 0)
+            return anm->page;
+        anm->record = -1;
+        goto repeat;
+    }
+
+    /* fetch record size */
+    tmp = url_ftell(pb);
+    url_fseek(pb, anm->page_table_offset + MAX_PAGES*6 + (anm->page<<16) +
+              8 + anm->record * 2, SEEK_SET);
+    record_size = get_le16(pb);
+    url_fseek(pb, tmp, SEEK_SET);
+
+    /* fetch record */
+    pkt->size = av_get_packet(s->pb, pkt, record_size);
+    if (pkt->size < 0)
+        return pkt->size;
+    if (p->base_record + anm->record == 0)
+        pkt->flags |= PKT_FLAG_KEY;
+
+    anm->record++;
+    return 0;
+}
+
+AVInputFormat anm_demuxer = {
+    "anm",
+    NULL_IF_CONFIG_SMALL("Deluxe Paint Animation"),
+    sizeof(AnmDemuxContext),
+    probe,
+    read_header,
+    read_packet,
+};