mirror of
https://github.com/pineappleEA/pineapple-src.git
synced 2024-12-05 00:28:25 -05:00
403 lines
13 KiB
C
Executable File
403 lines
13 KiB
C
Executable File
/*
|
|
* NuppelVideo demuxer.
|
|
* Copyright (c) 2006 Reimar Doeffinger
|
|
*
|
|
* 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
|
|
*/
|
|
|
|
#include "libavutil/channel_layout.h"
|
|
#include "libavutil/imgutils.h"
|
|
#include "libavutil/intreadwrite.h"
|
|
#include "libavutil/intfloat.h"
|
|
#include "avformat.h"
|
|
#include "internal.h"
|
|
#include "riff.h"
|
|
|
|
static const AVCodecTag nuv_audio_tags[] = {
|
|
{ AV_CODEC_ID_PCM_S16LE, MKTAG('R', 'A', 'W', 'A') },
|
|
{ AV_CODEC_ID_MP3, MKTAG('L', 'A', 'M', 'E') },
|
|
{ AV_CODEC_ID_NONE, 0 },
|
|
};
|
|
|
|
typedef struct NUVContext {
|
|
int v_id;
|
|
int a_id;
|
|
int rtjpg_video;
|
|
} NUVContext;
|
|
|
|
typedef enum {
|
|
NUV_VIDEO = 'V',
|
|
NUV_EXTRADATA = 'D',
|
|
NUV_AUDIO = 'A',
|
|
NUV_SEEKP = 'R',
|
|
NUV_MYTHEXT = 'X'
|
|
} nuv_frametype;
|
|
|
|
static int nuv_probe(const AVProbeData *p)
|
|
{
|
|
if (!memcmp(p->buf, "NuppelVideo", 12))
|
|
return AVPROBE_SCORE_MAX;
|
|
if (!memcmp(p->buf, "MythTVVideo", 12))
|
|
return AVPROBE_SCORE_MAX;
|
|
return 0;
|
|
}
|
|
|
|
/// little macro to sanitize packet size
|
|
#define PKTSIZE(s) (s & 0xffffff)
|
|
|
|
/**
|
|
* @brief read until we found all data needed for decoding
|
|
* @param vst video stream of which to change parameters
|
|
* @param ast video stream of which to change parameters
|
|
* @param myth set if this is a MythTVVideo format file
|
|
* @return 0 or AVERROR code
|
|
*/
|
|
static int get_codec_data(AVFormatContext *s, AVIOContext *pb, AVStream *vst,
|
|
AVStream *ast, int myth)
|
|
{
|
|
nuv_frametype frametype;
|
|
|
|
if (!vst && !myth)
|
|
return 1; // no codec data needed
|
|
while (!avio_feof(pb)) {
|
|
int size, subtype, ret;
|
|
|
|
frametype = avio_r8(pb);
|
|
switch (frametype) {
|
|
case NUV_EXTRADATA:
|
|
subtype = avio_r8(pb);
|
|
avio_skip(pb, 6);
|
|
size = PKTSIZE(avio_rl32(pb));
|
|
if (vst && subtype == 'R') {
|
|
if ((ret = ff_get_extradata(NULL, vst->codecpar, pb, size)) < 0)
|
|
return ret;
|
|
size = 0;
|
|
if (!myth)
|
|
return 0;
|
|
}
|
|
break;
|
|
case NUV_MYTHEXT:
|
|
avio_skip(pb, 7);
|
|
size = PKTSIZE(avio_rl32(pb));
|
|
if (size != 128 * 4)
|
|
break;
|
|
avio_rl32(pb); // version
|
|
if (vst) {
|
|
vst->codecpar->codec_tag = avio_rl32(pb);
|
|
vst->codecpar->codec_id =
|
|
ff_codec_get_id(ff_codec_bmp_tags, vst->codecpar->codec_tag);
|
|
if (vst->codecpar->codec_tag == MKTAG('R', 'J', 'P', 'G'))
|
|
vst->codecpar->codec_id = AV_CODEC_ID_NUV;
|
|
} else
|
|
avio_skip(pb, 4);
|
|
|
|
if (ast) {
|
|
int id;
|
|
|
|
ast->codecpar->codec_tag = avio_rl32(pb);
|
|
ast->codecpar->sample_rate = avio_rl32(pb);
|
|
if (ast->codecpar->sample_rate <= 0) {
|
|
av_log(s, AV_LOG_ERROR, "Invalid sample rate %d\n", ast->codecpar->sample_rate);
|
|
return AVERROR_INVALIDDATA;
|
|
}
|
|
ast->codecpar->bits_per_coded_sample = avio_rl32(pb);
|
|
ast->codecpar->channels = avio_rl32(pb);
|
|
ast->codecpar->channel_layout = 0;
|
|
|
|
id = ff_wav_codec_get_id(ast->codecpar->codec_tag,
|
|
ast->codecpar->bits_per_coded_sample);
|
|
if (id == AV_CODEC_ID_NONE) {
|
|
id = ff_codec_get_id(nuv_audio_tags, ast->codecpar->codec_tag);
|
|
if (id == AV_CODEC_ID_PCM_S16LE)
|
|
id = ff_get_pcm_codec_id(ast->codecpar->bits_per_coded_sample,
|
|
0, 0, ~1);
|
|
}
|
|
ast->codecpar->codec_id = id;
|
|
|
|
ast->need_parsing = AVSTREAM_PARSE_FULL;
|
|
} else
|
|
avio_skip(pb, 4 * 4);
|
|
|
|
size -= 6 * 4;
|
|
avio_skip(pb, size);
|
|
return 0;
|
|
case NUV_SEEKP:
|
|
size = 11;
|
|
break;
|
|
default:
|
|
avio_skip(pb, 7);
|
|
size = PKTSIZE(avio_rl32(pb));
|
|
break;
|
|
}
|
|
avio_skip(pb, size);
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int nuv_header(AVFormatContext *s)
|
|
{
|
|
NUVContext *ctx = s->priv_data;
|
|
AVIOContext *pb = s->pb;
|
|
char id_string[12];
|
|
double aspect, fps;
|
|
int is_mythtv, width, height, v_packs, a_packs, ret;
|
|
AVStream *vst = NULL, *ast = NULL;
|
|
|
|
avio_read(pb, id_string, 12);
|
|
is_mythtv = !memcmp(id_string, "MythTVVideo", 12);
|
|
avio_skip(pb, 5); // version string
|
|
avio_skip(pb, 3); // padding
|
|
width = avio_rl32(pb);
|
|
height = avio_rl32(pb);
|
|
avio_rl32(pb); // unused, "desiredwidth"
|
|
avio_rl32(pb); // unused, "desiredheight"
|
|
avio_r8(pb); // 'P' == progressive, 'I' == interlaced
|
|
avio_skip(pb, 3); // padding
|
|
aspect = av_int2double(avio_rl64(pb));
|
|
if (aspect > 0.9999 && aspect < 1.0001)
|
|
aspect = 4.0 / 3.0;
|
|
fps = av_int2double(avio_rl64(pb));
|
|
if (fps < 0.0f) {
|
|
if (s->error_recognition & AV_EF_EXPLODE) {
|
|
av_log(s, AV_LOG_ERROR, "Invalid frame rate %f\n", fps);
|
|
return AVERROR_INVALIDDATA;
|
|
} else {
|
|
av_log(s, AV_LOG_WARNING, "Invalid frame rate %f, setting to 0.\n", fps);
|
|
fps = 0.0f;
|
|
}
|
|
}
|
|
|
|
// number of packets per stream type, -1 means unknown, e.g. streaming
|
|
v_packs = avio_rl32(pb);
|
|
a_packs = avio_rl32(pb);
|
|
avio_rl32(pb); // text
|
|
|
|
avio_rl32(pb); // keyframe distance (?)
|
|
|
|
if (v_packs) {
|
|
vst = avformat_new_stream(s, NULL);
|
|
if (!vst)
|
|
return AVERROR(ENOMEM);
|
|
ctx->v_id = vst->index;
|
|
|
|
ret = av_image_check_size(width, height, 0, s);
|
|
if (ret < 0)
|
|
return ret;
|
|
|
|
vst->codecpar->codec_type = AVMEDIA_TYPE_VIDEO;
|
|
vst->codecpar->codec_id = AV_CODEC_ID_NUV;
|
|
vst->codecpar->width = width;
|
|
vst->codecpar->height = height;
|
|
vst->codecpar->bits_per_coded_sample = 10;
|
|
vst->sample_aspect_ratio = av_d2q(aspect * height / width,
|
|
10000);
|
|
#if FF_API_R_FRAME_RATE
|
|
vst->r_frame_rate =
|
|
#endif
|
|
vst->avg_frame_rate = av_d2q(fps, 60000);
|
|
avpriv_set_pts_info(vst, 32, 1, 1000);
|
|
} else
|
|
ctx->v_id = -1;
|
|
|
|
if (a_packs) {
|
|
ast = avformat_new_stream(s, NULL);
|
|
if (!ast)
|
|
return AVERROR(ENOMEM);
|
|
ctx->a_id = ast->index;
|
|
|
|
ast->codecpar->codec_type = AVMEDIA_TYPE_AUDIO;
|
|
ast->codecpar->codec_id = AV_CODEC_ID_PCM_S16LE;
|
|
ast->codecpar->channels = 2;
|
|
ast->codecpar->channel_layout = AV_CH_LAYOUT_STEREO;
|
|
ast->codecpar->sample_rate = 44100;
|
|
ast->codecpar->bit_rate = 2 * 2 * 44100 * 8;
|
|
ast->codecpar->block_align = 2 * 2;
|
|
ast->codecpar->bits_per_coded_sample = 16;
|
|
avpriv_set_pts_info(ast, 32, 1, 1000);
|
|
} else
|
|
ctx->a_id = -1;
|
|
|
|
if ((ret = get_codec_data(s, pb, vst, ast, is_mythtv)) < 0)
|
|
return ret;
|
|
|
|
ctx->rtjpg_video = vst && vst->codecpar->codec_id == AV_CODEC_ID_NUV;
|
|
|
|
return 0;
|
|
}
|
|
|
|
#define HDRSIZE 12
|
|
|
|
static int nuv_packet(AVFormatContext *s, AVPacket *pkt)
|
|
{
|
|
NUVContext *ctx = s->priv_data;
|
|
AVIOContext *pb = s->pb;
|
|
uint8_t hdr[HDRSIZE];
|
|
nuv_frametype frametype;
|
|
int ret, size;
|
|
|
|
while (!avio_feof(pb)) {
|
|
int copyhdrsize = ctx->rtjpg_video ? HDRSIZE : 0;
|
|
uint64_t pos = avio_tell(pb);
|
|
|
|
ret = avio_read(pb, hdr, HDRSIZE);
|
|
if (ret < HDRSIZE)
|
|
return ret < 0 ? ret : AVERROR(EIO);
|
|
|
|
frametype = hdr[0];
|
|
size = PKTSIZE(AV_RL32(&hdr[8]));
|
|
|
|
switch (frametype) {
|
|
case NUV_EXTRADATA:
|
|
if (!ctx->rtjpg_video) {
|
|
avio_skip(pb, size);
|
|
break;
|
|
}
|
|
case NUV_VIDEO:
|
|
if (ctx->v_id < 0) {
|
|
av_log(s, AV_LOG_ERROR, "Video packet in file without video stream!\n");
|
|
avio_skip(pb, size);
|
|
break;
|
|
}
|
|
ret = av_new_packet(pkt, copyhdrsize + size);
|
|
if (ret < 0)
|
|
return ret;
|
|
|
|
pkt->pos = pos;
|
|
pkt->flags |= hdr[2] == 0 ? AV_PKT_FLAG_KEY : 0;
|
|
pkt->pts = AV_RL32(&hdr[4]);
|
|
pkt->stream_index = ctx->v_id;
|
|
memcpy(pkt->data, hdr, copyhdrsize);
|
|
ret = avio_read(pb, pkt->data + copyhdrsize, size);
|
|
if (ret < 0) {
|
|
return ret;
|
|
}
|
|
if (ret < size)
|
|
av_shrink_packet(pkt, copyhdrsize + ret);
|
|
return 0;
|
|
case NUV_AUDIO:
|
|
if (ctx->a_id < 0) {
|
|
av_log(s, AV_LOG_ERROR, "Audio packet in file without audio stream!\n");
|
|
avio_skip(pb, size);
|
|
break;
|
|
}
|
|
ret = av_get_packet(pb, pkt, size);
|
|
pkt->flags |= AV_PKT_FLAG_KEY;
|
|
pkt->pos = pos;
|
|
pkt->pts = AV_RL32(&hdr[4]);
|
|
pkt->stream_index = ctx->a_id;
|
|
if (ret < 0)
|
|
return ret;
|
|
return 0;
|
|
case NUV_SEEKP:
|
|
// contains no data, size value is invalid
|
|
break;
|
|
default:
|
|
avio_skip(pb, size);
|
|
break;
|
|
}
|
|
}
|
|
|
|
return AVERROR(EIO);
|
|
}
|
|
|
|
/**
|
|
* \brief looks for the string RTjjjjjjjjjj in the stream too resync reading
|
|
* \return 1 if the syncword is found 0 otherwise.
|
|
*/
|
|
static int nuv_resync(AVFormatContext *s, int64_t pos_limit) {
|
|
AVIOContext *pb = s->pb;
|
|
uint32_t tag = 0;
|
|
while(!avio_feof(pb) && avio_tell(pb) < pos_limit) {
|
|
tag = (tag << 8) | avio_r8(pb);
|
|
if (tag == MKBETAG('R','T','j','j') &&
|
|
(tag = avio_rb32(pb)) == MKBETAG('j','j','j','j') &&
|
|
(tag = avio_rb32(pb)) == MKBETAG('j','j','j','j'))
|
|
return 1;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* \brief attempts to read a timestamp from stream at the given stream position
|
|
* \return timestamp if successful and AV_NOPTS_VALUE if failure
|
|
*/
|
|
static int64_t nuv_read_dts(AVFormatContext *s, int stream_index,
|
|
int64_t *ppos, int64_t pos_limit)
|
|
{
|
|
NUVContext *ctx = s->priv_data;
|
|
AVIOContext *pb = s->pb;
|
|
uint8_t hdr[HDRSIZE];
|
|
nuv_frametype frametype;
|
|
int size, key, idx;
|
|
int64_t pos, dts;
|
|
|
|
if (avio_seek(pb, *ppos, SEEK_SET) < 0)
|
|
return AV_NOPTS_VALUE;
|
|
|
|
if (!nuv_resync(s, pos_limit))
|
|
return AV_NOPTS_VALUE;
|
|
|
|
while (!avio_feof(pb) && avio_tell(pb) < pos_limit) {
|
|
if (avio_read(pb, hdr, HDRSIZE) < HDRSIZE)
|
|
return AV_NOPTS_VALUE;
|
|
frametype = hdr[0];
|
|
size = PKTSIZE(AV_RL32(&hdr[8]));
|
|
switch (frametype) {
|
|
case NUV_SEEKP:
|
|
break;
|
|
case NUV_AUDIO:
|
|
case NUV_VIDEO:
|
|
if (frametype == NUV_VIDEO) {
|
|
idx = ctx->v_id;
|
|
key = hdr[2] == 0;
|
|
} else {
|
|
idx = ctx->a_id;
|
|
key = 1;
|
|
}
|
|
if (stream_index == idx) {
|
|
|
|
pos = avio_tell(s->pb) - HDRSIZE;
|
|
dts = AV_RL32(&hdr[4]);
|
|
|
|
// TODO - add general support in av_gen_search, so it adds positions after reading timestamps
|
|
av_add_index_entry(s->streams[stream_index], pos, dts, size + HDRSIZE, 0,
|
|
key ? AVINDEX_KEYFRAME : 0);
|
|
|
|
*ppos = pos;
|
|
return dts;
|
|
}
|
|
default:
|
|
avio_skip(pb, size);
|
|
break;
|
|
}
|
|
}
|
|
return AV_NOPTS_VALUE;
|
|
}
|
|
|
|
|
|
AVInputFormat ff_nuv_demuxer = {
|
|
.name = "nuv",
|
|
.long_name = NULL_IF_CONFIG_SMALL("NuppelVideo"),
|
|
.priv_data_size = sizeof(NUVContext),
|
|
.read_probe = nuv_probe,
|
|
.read_header = nuv_header,
|
|
.read_packet = nuv_packet,
|
|
.read_timestamp = nuv_read_dts,
|
|
.flags = AVFMT_GENERIC_INDEX,
|
|
};
|