git.sesse.net Git - ffmpeg/blob - libavformat/moflex.c

   1 /*
   2  * MOFLEX demuxer
   3  * Copyright (c) 2015-2016 Florian Nouwt
   4  * Copyright (c) 2017 Adib Surani
   5  * Copyright (c) 2020 Paul B Mahol
   6  *
   7  * This file is part of FFmpeg.
   8  *
   9  * FFmpeg is free software; you can redistribute it and/or
  10  * modify it under the terms of the GNU Lesser General Public
  11  * License as published by the Free Software Foundation; either
  12  * version 2.1 of the License, or (at your option) any later version.
  13  *
  14  * FFmpeg is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  17  * Lesser General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU Lesser General Public
  20  * License along with FFmpeg; if not, write to the Free Software
  21  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  22  */
  23
  24 #include "libavcodec/bytestream.h"
  25
  26 #include "avformat.h"
  27 #include "internal.h"
  28
  29 typedef struct BitReader {
  30     unsigned last;
  31     unsigned pos;
  32 } BitReader;
  33
  34 typedef struct MOFLEXDemuxContext {
  35     unsigned size;
  36     int64_t pos;
  37     int64_t ts;
  38     int flags;
  39     int in_block;
  40
  41     BitReader br;
  42 } MOFLEXDemuxContext;
  43
  44 static int pop(BitReader *br, AVIOContext *pb)
  45 {
  46     if (avio_feof(pb))
  47         return AVERROR_EOF;
  48
  49     if ((br->pos & 7) == 0)
  50         br->last = (unsigned)avio_r8(pb) << 24U;
  51     else
  52         br->last <<= 1;
  53
  54     br->pos++;
  55     return !!(br->last & 0x80000000);
  56 }
  57
  58 static int pop_int(BitReader *br, AVIOContext *pb, int n)
  59 {
  60     int value = 0;
  61
  62     for (int i = 0; i < n; i++) {
  63         int ret = pop(br, pb);
  64
  65         if (ret < 0)
  66             return ret;
  67         if (ret > INT_MAX - value - value)
  68             return AVERROR_INVALIDDATA;
  69         value = 2 * value + ret;
  70     }
  71
  72     return value;
  73 }
  74
  75 static int pop_length(BitReader *br, AVIOContext *pb)
  76 {
  77     int ret, n = 1;
  78
  79     while ((ret = pop(br, pb)) == 0)
  80         n++;
  81
  82     if (ret < 0)
  83         return ret;
  84     return n;
  85 }
  86
  87 static int read_var_byte(AVFormatContext *s, unsigned *out)
  88 {
  89     AVIOContext *pb = s->pb;
  90     unsigned value = 0, data;
  91
  92     data = avio_r8(pb);
  93     if (!(data & 0x80)) {
  94         *out = data;
  95         return 0;
  96     }
  97
  98     value = (data & 0x7F) << 7;
  99     data = avio_r8(pb);
 100     if (!(data & 0x80)) {
 101         value |= data;
 102         *out = value;
 103         return 0;
 104     }
 105
 106     value = ((data & 0x7F) | value) << 7;
 107     data = avio_r8(pb);
 108     if (!(data & 0x80)) {
 109         value |= data;
 110         *out = value;
 111         return 0;
 112     }
 113
 114     value = (((data & 0x7F) | value) << 7) | avio_r8(pb);
 115     *out = value;
 116
 117     return 0;
 118 }
 119
 120 static int moflex_probe(const AVProbeData *p)
 121 {
 122     GetByteContext gb;
 123     int score = 0;
 124
 125     bytestream2_init(&gb, p->buf, p->buf_size);
 126
 127     if (bytestream2_get_be16(&gb) != 0x4C32)
 128         return 0;
 129     score += 10;
 130
 131     bytestream2_skip(&gb, 10);
 132     if (bytestream2_get_be16(&gb) == 0)
 133         return 0;
 134     score += 5;
 135
 136     while (bytestream2_get_bytes_left(&gb) > 0) {
 137         int type = bytestream2_get_byte(&gb);
 138         int size = bytestream2_get_byte(&gb);
 139
 140         if (type == 0) {
 141             score += 5 * (size == 0);
 142             break;
 143         }
 144         if ((type == 1 && size == 12) ||
 145             (type == 2 && size ==  6) ||
 146             (type == 3 && size == 13) ||
 147             (type == 4 && size ==  2))
 148             score += 20;
 149         bytestream2_skip(&gb, size);
 150     }
 151
 152     return FFMIN(AVPROBE_SCORE_MAX, score);
 153 }
 154
 155 static int moflex_read_sync(AVFormatContext *s)
 156 {
 157     MOFLEXDemuxContext *m = s->priv_data;
 158     AVIOContext *pb = s->pb;
 159
 160     if (avio_rb16(pb) != 0x4C32) {
 161         if (avio_feof(pb))
 162             return AVERROR_EOF;
 163         avio_seek(pb, -2, SEEK_CUR);
 164         return 1;
 165     }
 166
 167     avio_skip(pb, 2);
 168     m->ts = avio_rb64(pb);
 169     m->size = avio_rb16(pb) + 1;
 170
 171     while (!avio_feof(pb)) {
 172         unsigned type, ssize, codec_id = 0;
 173         unsigned codec_type, width = 0, height = 0, sample_rate = 0, channels = 0;
 174         int stream_index = -1;
 175         int format;
 176         AVRational fps;
 177
 178         read_var_byte(s, &type);
 179         read_var_byte(s, &ssize);
 180
 181         switch (type) {
 182         case 0:
 183             if (ssize > 0)
 184                 avio_skip(pb, ssize);
 185             return 0;
 186         case 2:
 187             codec_type = AVMEDIA_TYPE_AUDIO;
 188             stream_index = avio_r8(pb);
 189             codec_id = avio_r8(pb);
 190             switch (codec_id) {
 191             case 0: codec_id = AV_CODEC_ID_FASTAUDIO; break;
 192             case 1: codec_id = AV_CODEC_ID_ADPCM_IMA_MOFLEX; break;
 193             case 2: codec_id = AV_CODEC_ID_PCM_S16LE; break;
 194             default:
 195                 av_log(s, AV_LOG_ERROR, "Unsupported audio codec: %d\n", codec_id);
 196                 return AVERROR_PATCHWELCOME;
 197             }
 198             sample_rate = avio_rb24(pb) + 1;
 199             channels = avio_r8(pb) + 1;
 200             break;
 201         case 1:
 202         case 3:
 203             codec_type = AVMEDIA_TYPE_VIDEO;
 204             stream_index = avio_r8(pb);
 205             codec_id = avio_r8(pb);
 206             switch (codec_id) {
 207             case 0: codec_id = AV_CODEC_ID_MOBICLIP; break;
 208             default:
 209                 av_log(s, AV_LOG_ERROR, "Unsupported video codec: %d\n", codec_id);
 210                 return AVERROR_PATCHWELCOME;
 211             }
 212             fps.num = avio_rb16(pb);
 213             fps.den = avio_rb16(pb);
 214             width = avio_rb16(pb);
 215             height = avio_rb16(pb);
 216             format = AV_PIX_FMT_YUV420P;
 217             avio_skip(pb, type == 3 ? 3 : 2);
 218             break;
 219         case 4:
 220             codec_type = AVMEDIA_TYPE_DATA;
 221             stream_index = avio_r8(pb);
 222             avio_skip(pb, 1);
 223             break;
 224         }
 225
 226         if (stream_index == s->nb_streams) {
 227             AVStream *st = avformat_new_stream(s, NULL);
 228
 229             if (!st)
 230                 return AVERROR(ENOMEM);
 231
 232             st->codecpar->codec_type = codec_type;
 233             st->codecpar->codec_id   = codec_id;
 234             st->codecpar->width      = width;
 235             st->codecpar->height     = height;
 236             st->codecpar->sample_rate= sample_rate;
 237             st->codecpar->channels   = channels;
 238             st->codecpar->format     = format;
 239             st->priv_data            = av_packet_alloc();
 240             if (!st->priv_data)
 241                 return AVERROR(ENOMEM);
 242
 243             if (sample_rate)
 244                 avpriv_set_pts_info(st, 63, 1, sample_rate);
 245             else
 246                 avpriv_set_pts_info(st, 63, fps.den, fps.num);
 247         }
 248     }
 249
 250     return 0;
 251 }
 252
 253 static int moflex_read_header(AVFormatContext *s)
 254 {
 255     int ret;
 256
 257     ret = moflex_read_sync(s);
 258     if (ret < 0)
 259         return ret;
 260
 261     s->ctx_flags |= AVFMTCTX_NOHEADER;
 262     avio_seek(s->pb, 0, SEEK_SET);
 263
 264     return 0;
 265 }
 266
 267 static int moflex_read_packet(AVFormatContext *s, AVPacket *pkt)
 268 {
 269     MOFLEXDemuxContext *m = s->priv_data;
 270     AVIOContext *pb = s->pb;
 271     BitReader *br = &m->br;
 272     int ret;
 273
 274     while (!avio_feof(pb)) {
 275         if (!m->in_block) {
 276             m->pos = avio_tell(pb);
 277
 278             ret = moflex_read_sync(s);
 279             if (ret < 0)
 280                 return ret;
 281
 282             m->flags = avio_r8(pb);
 283             if (m->flags & 2)
 284                 avio_skip(pb, 2);
 285         }
 286
 287         while ((avio_tell(pb) < m->pos + m->size) && !avio_feof(pb) && avio_r8(pb)) {
 288             int stream_index, bits, pkt_size, endframe;
 289             AVPacket *packet;
 290
 291             m->in_block = 1;
 292
 293             avio_seek(pb, -1, SEEK_CUR);
 294             br->pos = br->last = 0;
 295
 296             bits = pop_length(br, pb);
 297             if (bits < 0)
 298                 return bits;
 299             stream_index = pop_int(br, pb, bits);
 300             if (stream_index < 0)
 301                 return stream_index;
 302             if (stream_index >= s->nb_streams)
 303                 return AVERROR_INVALIDDATA;
 304
 305             endframe = pop(br, pb);
 306             if (endframe < 0)
 307                 return endframe;
 308             if (endframe) {
 309                 bits = pop_length(br, pb);
 310                 if (bits < 0)
 311                     return bits;
 312                 pop_int(br, pb, bits);
 313                 pop(br, pb);
 314                 bits = pop_length(br, pb);
 315                 if (bits < 0)
 316                     return bits;
 317                 pop_int(br, pb, bits * 2 + 26);
 318             }
 319
 320             pkt_size = pop_int(br, pb, 13) + 1;
 321             if (pkt_size > m->size)
 322                 return AVERROR_INVALIDDATA;
 323             packet   = s->streams[stream_index]->priv_data;
 324             if (!packet) {
 325                 avio_skip(pb, pkt_size);
 326                 continue;
 327             }
 328
 329             ret = av_append_packet(pb, packet, pkt_size);
 330             if (ret < 0)
 331                 return ret;
 332             if (endframe && packet->size > 0) {
 333                 av_packet_move_ref(pkt, packet);
 334                 pkt->pos = m->pos;
 335                 pkt->stream_index = stream_index;
 336                 if (s->streams[stream_index]->codecpar->codec_type == AVMEDIA_TYPE_VIDEO) {
 337                     pkt->duration = 1;
 338                     if (pkt->data[0] & 0x80)
 339                         pkt->flags |= AV_PKT_FLAG_KEY;
 340                 } else {
 341                     pkt->flags |= AV_PKT_FLAG_KEY;
 342                 }
 343                 return ret;
 344             }
 345         }
 346
 347         m->in_block = 0;
 348
 349         if (m->flags % 2 == 0) {
 350             if (m->size <= 0)
 351                 return AVERROR_INVALIDDATA;
 352             avio_seek(pb, m->pos + m->size, SEEK_SET);
 353         }
 354     }
 355
 356     return AVERROR_EOF;
 357 }
 358
 359 static int moflex_read_seek(AVFormatContext *s, int stream_index,
 360                             int64_t pts, int flags)
 361 {
 362     MOFLEXDemuxContext *m = s->priv_data;
 363
 364     m->in_block = 0;
 365
 366     return -1;
 367 }
 368
 369 static int moflex_read_close(AVFormatContext *s)
 370 {
 371     for (int i = 0; i < s->nb_streams; i++) {
 372         av_packet_free((AVPacket **)&s->streams[i]->priv_data);
 373     }
 374
 375     return 0;
 376 }
 377
 378 const AVInputFormat ff_moflex_demuxer = {
 379     .name           = "moflex",
 380     .long_name      = NULL_IF_CONFIG_SMALL("MobiClip MOFLEX"),
 381     .priv_data_size = sizeof(MOFLEXDemuxContext),
 382     .read_probe     = moflex_probe,
 383     .read_header    = moflex_read_header,
 384     .read_packet    = moflex_read_packet,
 385     .read_seek      = moflex_read_seek,
 386     .read_close     = moflex_read_close,
 387     .extensions     = "moflex",
 388     .flags          = AVFMT_GENERIC_INDEX,
 389 };