1737 lines
45 KiB
C
1737 lines
45 KiB
C
/**
|
|
* Transcoding
|
|
* Copyright (C) 2013 John Törnblom
|
|
*
|
|
* This program is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation, either version 3 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program 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 General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
#include <unistd.h>
|
|
#include <libavformat/avformat.h>
|
|
#include <libavcodec/avcodec.h>
|
|
#include <libswscale/swscale.h>
|
|
#include <libavresample/avresample.h>
|
|
#include <libavutil/opt.h>
|
|
#include <libavutil/audio_fifo.h>
|
|
#include <libavutil/dict.h>
|
|
#include <libavutil/audioconvert.h>
|
|
|
|
#if LIBAVUTIL_VERSION_MICRO >= 100 /* FFMPEG */
|
|
#define USING_FFMPEG 1
|
|
#endif
|
|
|
|
#include "tvheadend.h"
|
|
#include "settings.h"
|
|
#include "streaming.h"
|
|
#include "service.h"
|
|
#include "packet.h"
|
|
#include "transcoding.h"
|
|
#include "libav.h"
|
|
|
|
LIST_HEAD(transcoder_stream_list, transcoder_stream);
|
|
|
|
typedef struct transcoder_stream {
|
|
int ts_index;
|
|
streaming_component_type_t ts_type;
|
|
streaming_target_t *ts_target;
|
|
LIST_ENTRY(transcoder_stream) ts_link;
|
|
|
|
void (*ts_handle_pkt) (struct transcoder_stream *, th_pkt_t *);
|
|
void (*ts_destroy) (struct transcoder_stream *);
|
|
} transcoder_stream_t;
|
|
|
|
|
|
typedef struct audio_stream {
|
|
transcoder_stream_t;
|
|
|
|
AVCodecContext *aud_ictx;
|
|
AVCodec *aud_icodec;
|
|
|
|
AVCodecContext *aud_octx;
|
|
AVCodec *aud_ocodec;
|
|
|
|
uint8_t *aud_dec_sample;
|
|
uint32_t aud_dec_size;
|
|
uint32_t aud_dec_offset;
|
|
|
|
uint8_t *aud_enc_sample;
|
|
uint32_t aud_enc_size;
|
|
|
|
uint64_t aud_dec_pts;
|
|
uint64_t aud_enc_pts;
|
|
|
|
int8_t aud_channels;
|
|
int32_t aud_bitrate;
|
|
|
|
AVAudioResampleContext *resample_context;
|
|
AVAudioFifo *fifo;
|
|
int resample;
|
|
int resample_is_open;
|
|
|
|
} audio_stream_t;
|
|
|
|
|
|
typedef struct video_stream {
|
|
transcoder_stream_t;
|
|
|
|
AVCodecContext *vid_ictx;
|
|
AVCodec *vid_icodec;
|
|
|
|
AVCodecContext *vid_octx;
|
|
AVCodec *vid_ocodec;
|
|
|
|
AVFrame *vid_dec_frame;
|
|
struct SwsContext *vid_scaler;
|
|
AVFrame *vid_enc_frame;
|
|
|
|
int16_t vid_width;
|
|
int16_t vid_height;
|
|
} video_stream_t;
|
|
|
|
|
|
typedef struct subtitle_stream {
|
|
transcoder_stream_t;
|
|
|
|
AVCodecContext *sub_ictx;
|
|
AVCodec *sub_icodec;
|
|
|
|
AVCodecContext *sub_octx;
|
|
AVCodec *sub_ocodec;
|
|
} subtitle_stream_t;
|
|
|
|
|
|
|
|
typedef struct transcoder {
|
|
streaming_target_t t_input; // must be first
|
|
streaming_target_t *t_output;
|
|
|
|
transcoder_props_t t_props;
|
|
struct transcoder_stream_list t_stream_list;
|
|
} transcoder_t;
|
|
|
|
|
|
|
|
#define WORKING_ENCODER(x) (x == AV_CODEC_ID_H264 || x == AV_CODEC_ID_MPEG2VIDEO || \
|
|
x == AV_CODEC_ID_VP8 || x == AV_CODEC_ID_AAC || \
|
|
x == AV_CODEC_ID_MP2 || x == AV_CODEC_ID_VORBIS)
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static AVCodecContext *
|
|
avcodec_alloc_context3_tvh(const AVCodec *codec)
|
|
{
|
|
AVCodecContext *ctx = avcodec_alloc_context3(codec);
|
|
if (ctx) {
|
|
ctx->codec_id = AV_CODEC_ID_NONE;
|
|
ctx->strict_std_compliance = FF_COMPLIANCE_EXPERIMENTAL;
|
|
|
|
}
|
|
return ctx;
|
|
}
|
|
|
|
static char *const
|
|
get_error_text(const int error)
|
|
{
|
|
static char __thread error_buffer[255];
|
|
av_strerror(error, error_buffer, sizeof(error_buffer));
|
|
return error_buffer;
|
|
}
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static AVCodec *
|
|
transcoder_get_decoder(streaming_component_type_t ty)
|
|
{
|
|
enum AVCodecID codec_id;
|
|
AVCodec *codec;
|
|
|
|
codec_id = streaming_component_type2codec_id(ty);
|
|
if (codec_id == AV_CODEC_ID_NONE) {
|
|
tvhlog(LOG_ERR, "transcode", "Unsupported input codec %s",
|
|
streaming_component_type2txt(ty));
|
|
return NULL;
|
|
}
|
|
|
|
codec = avcodec_find_decoder(codec_id);
|
|
if (!codec) {
|
|
tvhlog(LOG_ERR, "transcode", "Unable to find %s decoder",
|
|
streaming_component_type2txt(ty));
|
|
return NULL;
|
|
}
|
|
|
|
tvhlog(LOG_DEBUG, "transcode", "Using decoder %s", codec->name);
|
|
|
|
return codec;
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static AVCodec *
|
|
transcoder_get_encoder(const char *codec_name)
|
|
{
|
|
AVCodec *codec;
|
|
|
|
codec = avcodec_find_encoder_by_name(codec_name);
|
|
if (!codec) {
|
|
tvhlog(LOG_ERR, "transcode", "Unable to find %s encoder", codec_name);
|
|
return NULL;
|
|
}
|
|
tvhlog(LOG_DEBUG, "transcode", "Using encoder %s", codec->name);
|
|
|
|
return codec;
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static void
|
|
transcoder_stream_packet(transcoder_stream_t *ts, th_pkt_t *pkt)
|
|
{
|
|
streaming_message_t *sm;
|
|
|
|
tvhtrace("transcode", "deliver copy (pts = %" PRIu64 ")", pkt->pkt_pts);
|
|
sm = streaming_msg_create_pkt(pkt);
|
|
streaming_target_deliver2(ts->ts_target, sm);
|
|
pkt_ref_dec(pkt);
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static void
|
|
transcoder_stream_subtitle(transcoder_stream_t *ts, th_pkt_t *pkt)
|
|
{
|
|
//streaming_message_t *sm;
|
|
AVCodec *icodec;
|
|
AVCodecContext *ictx;
|
|
AVPacket packet;
|
|
AVSubtitle sub;
|
|
int length, got_subtitle;
|
|
|
|
subtitle_stream_t *ss = (subtitle_stream_t*)ts;
|
|
|
|
ictx = ss->sub_ictx;
|
|
//octx = ss->sub_octx;
|
|
|
|
icodec = ss->sub_icodec;
|
|
//ocodec = ss->sub_ocodec;
|
|
|
|
if (ictx->codec_id == AV_CODEC_ID_NONE) {
|
|
ictx->codec_id = icodec->id;
|
|
|
|
if (avcodec_open2(ictx, icodec, NULL) < 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Unable to open %s decoder", icodec->name);
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
}
|
|
|
|
av_init_packet(&packet);
|
|
packet.data = pktbuf_ptr(pkt->pkt_payload);
|
|
packet.size = pktbuf_len(pkt->pkt_payload);
|
|
packet.pts = pkt->pkt_pts;
|
|
packet.dts = pkt->pkt_dts;
|
|
packet.duration = pkt->pkt_duration;
|
|
|
|
length = avcodec_decode_subtitle2(ictx, &sub, &got_subtitle, &packet);
|
|
if (length <= 0) {
|
|
if (length == AVERROR_INVALIDDATA) goto cleanup;
|
|
tvhlog(LOG_ERR, "transcode", "Unable to decode subtitle (%d, %s)", length, get_error_text(length));
|
|
goto cleanup;
|
|
}
|
|
|
|
if (!got_subtitle)
|
|
goto cleanup;
|
|
|
|
//TODO: encoding
|
|
|
|
cleanup:
|
|
av_free_packet(&packet);
|
|
pkt_ref_dec(pkt);
|
|
avsubtitle_free(&sub);
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static void
|
|
transcoder_stream_audio(transcoder_stream_t *ts, th_pkt_t *pkt)
|
|
{
|
|
AVCodec *icodec, *ocodec;
|
|
AVCodecContext *ictx, *octx;
|
|
AVPacket packet;
|
|
int length, len;
|
|
streaming_message_t *sm;
|
|
th_pkt_t *n;
|
|
audio_stream_t *as = (audio_stream_t*)ts;
|
|
int got_frame, got_packet_ptr;
|
|
AVFrame *frame = av_frame_alloc();
|
|
uint8_t **output = NULL;
|
|
|
|
ictx = as->aud_ictx;
|
|
octx = as->aud_octx;
|
|
|
|
icodec = as->aud_icodec;
|
|
ocodec = as->aud_ocodec;
|
|
|
|
if (ictx->codec_id == AV_CODEC_ID_NONE) {
|
|
ictx->codec_id = icodec->id;
|
|
|
|
if (avcodec_open2(ictx, icodec, NULL) < 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Unable to open %s decoder", icodec->name);
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
|
|
as->aud_dec_pts = pkt->pkt_pts;
|
|
}
|
|
|
|
if (pkt->pkt_pts > as->aud_dec_pts) {
|
|
tvhlog(LOG_WARNING, "transcode", "Detected framedrop in audio");
|
|
as->aud_enc_pts += (pkt->pkt_pts - as->aud_dec_pts);
|
|
as->aud_dec_pts += (pkt->pkt_pts - as->aud_dec_pts);
|
|
}
|
|
|
|
pkt = pkt_merge_header(pkt);
|
|
|
|
av_init_packet(&packet);
|
|
packet.data = pktbuf_ptr(pkt->pkt_payload);
|
|
packet.size = pktbuf_len(pkt->pkt_payload);
|
|
packet.pts = pkt->pkt_pts;
|
|
packet.dts = pkt->pkt_dts;
|
|
packet.duration = pkt->pkt_duration;
|
|
|
|
if ((len = as->aud_dec_size - as->aud_dec_offset) <= 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Decoder buffer overflow");
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
|
|
length = avcodec_decode_audio4(ictx, frame, &got_frame, &packet);
|
|
av_free_packet(&packet);
|
|
|
|
tvhtrace("transcode", "audio decode: consumed=%d size=%zu, got=%d", length, pktbuf_len(pkt->pkt_payload), got_frame);
|
|
|
|
if (!got_frame) {
|
|
tvhtrace("transcode", "Did not have a full frame in the packet");
|
|
goto cleanup;
|
|
}
|
|
|
|
if (length < 0) {
|
|
if (length == AVERROR_INVALIDDATA) goto cleanup;
|
|
tvhlog(LOG_ERR, "transcode", "Unable to decode audio (%d, %s)", length, get_error_text(length));
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
|
|
if (length != pktbuf_len(pkt->pkt_payload))
|
|
tvhtrace("transcode", "Not all data from packet was decoded. length=%d from packet.size=%zu", length, pktbuf_len(pkt->pkt_payload));
|
|
|
|
if (length == 0 || !got_frame) {
|
|
tvhtrace("transcode", "Not yet enough data for decoding");
|
|
goto cleanup;
|
|
}
|
|
|
|
if (octx->codec_id == AV_CODEC_ID_NONE) {
|
|
as->aud_enc_pts = pkt->pkt_pts;
|
|
octx->sample_rate = ictx->sample_rate;
|
|
octx->sample_fmt = ictx->sample_fmt;
|
|
if (ocodec->sample_fmts) {
|
|
// Find if we have a matching sample_fmt;
|
|
int acount = 0;
|
|
octx->sample_fmt = -1;
|
|
while ((octx->sample_fmt == -1) && (ocodec->sample_fmts[acount] > -1)) {
|
|
if (ocodec->sample_fmts[acount] == ictx->sample_fmt) {
|
|
octx->sample_fmt = ictx->sample_fmt;
|
|
break;
|
|
}
|
|
acount++;
|
|
}
|
|
if (octx->sample_fmt == -1) {
|
|
if (acount > 0) {
|
|
tvhtrace("transcode", "Did not find matching sample_fmt for encoder. Will use first supported: %d", ocodec->sample_fmts[acount-1]);
|
|
octx->sample_fmt = ocodec->sample_fmts[acount-1];
|
|
}
|
|
else {
|
|
tvhlog(LOG_ERR, "transcode", "Encoder does not support a sample_fmt!!??");
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
}
|
|
else {
|
|
tvhtrace("transcode", "Encoder supports same sample_fmt as decoder");
|
|
}
|
|
}
|
|
|
|
octx->time_base.den = 90000;
|
|
octx->time_base.num = 1;
|
|
|
|
octx->channels = as->aud_channels ? as->aud_channels : ictx->channels;
|
|
octx->bit_rate = as->aud_bitrate ? as->aud_bitrate : ictx->bit_rate;
|
|
|
|
octx->channels = MIN(octx->channels, ictx->channels);
|
|
octx->bit_rate = MIN(octx->bit_rate, ictx->bit_rate);
|
|
|
|
switch (octx->channels) {
|
|
case 1:
|
|
octx->channel_layout = AV_CH_LAYOUT_MONO;
|
|
break;
|
|
|
|
case 2:
|
|
octx->channel_layout = AV_CH_LAYOUT_STEREO;
|
|
break;
|
|
|
|
case 3:
|
|
octx->channel_layout = AV_CH_LAYOUT_SURROUND;
|
|
break;
|
|
|
|
case 4:
|
|
octx->channel_layout = AV_CH_LAYOUT_QUAD;
|
|
break;
|
|
|
|
case 5:
|
|
octx->channel_layout = AV_CH_LAYOUT_5POINT0;
|
|
break;
|
|
|
|
case 6:
|
|
octx->channel_layout = AV_CH_LAYOUT_5POINT1;
|
|
break;
|
|
|
|
case 7:
|
|
octx->channel_layout = AV_CH_LAYOUT_6POINT1;
|
|
break;
|
|
|
|
case 8:
|
|
octx->channel_layout = AV_CH_LAYOUT_7POINT1;
|
|
break;
|
|
|
|
default:
|
|
break;
|
|
}
|
|
|
|
if (ocodec->channel_layouts) {
|
|
// Find if we have a matching channel_layout;
|
|
int acount = 0, maxchannels = 0, maxacount = 0;
|
|
octx->channel_layout = 0;
|
|
while ((octx->channel_layout == 0) && (ocodec->channel_layouts[acount] > 0)) {
|
|
if ((av_get_channel_layout_nb_channels(ocodec->channel_layouts[acount]) >= maxchannels) && (av_get_channel_layout_nb_channels(ocodec->channel_layouts[acount]) <= octx->channels)) {
|
|
maxchannels = av_get_channel_layout_nb_channels(ocodec->channel_layouts[acount]);
|
|
maxacount = acount;
|
|
}
|
|
if (ocodec->channel_layouts[acount] == ictx->channel_layout)
|
|
octx->channel_layout = ictx->channel_layout;
|
|
acount++;
|
|
}
|
|
|
|
if (octx->channel_layout == 0) {
|
|
if (acount > 0) {
|
|
// find next which has same or less channels than decoder.
|
|
tvhlog(LOG_DEBUG, "transcode", "Did not find matching channel_layout for encoder. Will use last supported: %i with %d channels", (int)ocodec->channel_layouts[maxacount], maxchannels);
|
|
octx->channel_layout = ocodec->channel_layouts[maxacount];
|
|
octx->channels = maxchannels;
|
|
}
|
|
else {
|
|
tvhlog(LOG_ERR, "transcode", "Encoder does not support a channel_layout!!??");
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
}
|
|
else {
|
|
tvhlog(LOG_DEBUG, "transcode", "Encoder supports same channel_layout as decoder");
|
|
}
|
|
}
|
|
else {
|
|
tvhlog(LOG_DEBUG, "transcode", "Encoder does not show which channel_layouts it supports");
|
|
}
|
|
|
|
|
|
switch (ts->ts_type) {
|
|
case SCT_MPEG2AUDIO:
|
|
octx->bit_rate = 128000;
|
|
break;
|
|
|
|
case SCT_AAC:
|
|
octx->global_quality = 4*FF_QP2LAMBDA;
|
|
octx->flags |= CODEC_FLAG_QSCALE;
|
|
break;
|
|
|
|
case SCT_VORBIS:
|
|
octx->flags |= CODEC_FLAG_QSCALE;
|
|
octx->flags |= CODEC_FLAG_GLOBAL_HEADER;
|
|
octx->global_quality = 4*FF_QP2LAMBDA;
|
|
break;
|
|
|
|
default:
|
|
break;
|
|
}
|
|
|
|
as->resample = ((ictx->channels != octx->channels) ||
|
|
(ictx->channel_layout != octx->channel_layout) ||
|
|
(ictx->sample_fmt != octx->sample_fmt) ||
|
|
(ictx->sample_rate != octx->sample_rate));
|
|
|
|
octx->codec_id = ocodec->id;
|
|
|
|
if (avcodec_open2(octx, ocodec, NULL) < 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Unable to open %s encoder", ocodec->name);
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
|
|
as->resample_context = NULL;
|
|
if (as->resample) {
|
|
if (!(as->resample_context = avresample_alloc_context())) {
|
|
tvhlog(LOG_ERR, "transcode", "Could not allocate resample context");
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
|
|
// Convert audio
|
|
tvhtrace("transcode", "converting audio");
|
|
|
|
tvhtrace("transcode", "ictx->channels:%d", ictx->channels);
|
|
tvhtrace("transcode", "ictx->channel_layout:%" PRIi64, ictx->channel_layout);
|
|
tvhtrace("transcode", "ictx->sample_rate:%d", ictx->sample_rate);
|
|
tvhtrace("transcode", "ictx->sample_fmt:%d", ictx->sample_fmt);
|
|
tvhtrace("transcode", "ictx->bit_rate:%d", ictx->bit_rate);
|
|
|
|
tvhtrace("transcode", "octx->channels:%d", octx->channels);
|
|
tvhtrace("transcode", "octx->channel_layout:%" PRIi64, octx->channel_layout);
|
|
tvhtrace("transcode", "octx->sample_rate:%d", octx->sample_rate);
|
|
tvhtrace("transcode", "octx->sample_fmt:%d", octx->sample_fmt);
|
|
tvhtrace("transcode", "octx->bit_rate:%d", octx->bit_rate);
|
|
|
|
int opt_error;
|
|
if ((opt_error = av_opt_set_int(as->resample_context, "in_channel_layout", ictx->channel_layout, 0)) != 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Could not set option in_channel_layout (error '%s')",get_error_text(opt_error));
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
if ((opt_error = av_opt_set_int(as->resample_context, "out_channel_layout", octx->channel_layout, 0)) != 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Could not set option out_channel_layout (error '%s')",get_error_text(opt_error));
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
if ((opt_error = av_opt_set_int(as->resample_context, "in_sample_rate", ictx->sample_rate, 0)) != 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Could not set option in_sample_rate (error '%s')",get_error_text(opt_error));
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
if ((opt_error = av_opt_set_int(as->resample_context, "out_sample_rate", octx->sample_rate, 0)) != 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Could not set option out_sample_rate (error '%s')",get_error_text(opt_error));
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
if ((opt_error = av_opt_set_int(as->resample_context, "in_sample_fmt", ictx->sample_fmt, 0)) != 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Could not set option in_sample_fmt (error '%s')",get_error_text(opt_error));
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
if ((opt_error = av_opt_set_int(as->resample_context, "out_sample_fmt", octx->sample_fmt, 0)) != 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Could not set option out_sample_fmt (error '%s')",get_error_text(opt_error));
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
|
|
if (avresample_open(as->resample_context) < 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Error avresample_open.\n");
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
as->resample_is_open = 1;
|
|
|
|
}
|
|
|
|
as->fifo = av_audio_fifo_alloc(octx->sample_fmt, octx->channels, 1);
|
|
if (!as->fifo) {
|
|
tvhlog(LOG_ERR, "transcode", "Could not allocate fifo");
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
|
|
}
|
|
|
|
if (as->resample) {
|
|
|
|
if (!(output = calloc(octx->channels, sizeof(output)))) {
|
|
tvhlog(LOG_ERR, "transcode", "Could not allocate converted input sample pointers");
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
|
|
if (av_samples_alloc(output, NULL, octx->channels, frame->nb_samples, octx->sample_fmt, 0) < 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Could not allocate converted input sample");
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
|
|
if (!output) {
|
|
tvhlog(LOG_ERR, "transcode", "Could not allocate memory for converted input sample pointers");
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
|
|
length = avresample_convert(as->resample_context, NULL, 0, frame->nb_samples,
|
|
frame->extended_data, 0, frame->nb_samples);
|
|
tvhtrace("transcode", "avresample_convert: out=%d", length);
|
|
while (avresample_available(as->resample_context) > 0) {
|
|
length = avresample_read(as->resample_context, output, frame->nb_samples);
|
|
|
|
if (length > 0) {
|
|
if (av_audio_fifo_realloc(as->fifo, av_audio_fifo_size(as->fifo) + length) < 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Could not reallocate FIFO.");
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
|
|
if (av_audio_fifo_write(as->fifo, (void **)output, length) < length) {
|
|
tvhlog(LOG_ERR, "transcode", "Could not write to FIFO.");
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
/* Need to find out where we are going to do this. Normally at the end.
|
|
int delay_samples = avresample_get_delay(as->resample_context);
|
|
if (delay_samples) {
|
|
tvhlog(LOG_DEBUG, "transcode", "%d samples in resamples delay buffer.", delay_samples);
|
|
av_freep(output);
|
|
goto cleanup;
|
|
}
|
|
*/
|
|
|
|
} else {
|
|
|
|
tvhlog(LOG_DEBUG, "transcode", "No conversion needed");
|
|
if (av_audio_fifo_realloc(as->fifo, av_audio_fifo_size(as->fifo) + frame->nb_samples) < 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Could not reallocate FIFO.");
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
|
|
if (av_audio_fifo_write(as->fifo, (void **)frame->extended_data, frame->nb_samples) < frame->nb_samples) {
|
|
tvhlog(LOG_ERR, "transcode", "Could not write to FIFO.");
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
|
|
}
|
|
|
|
as->aud_dec_pts += pkt->pkt_duration;
|
|
|
|
while (av_audio_fifo_size(as->fifo) >= octx->frame_size) {
|
|
tvhtrace("transcode", "audio loop: fifo=%d, frame=%d", av_audio_fifo_size(as->fifo), octx->frame_size);
|
|
|
|
av_frame_free(&frame);
|
|
frame = av_frame_alloc();
|
|
frame->nb_samples = octx->frame_size;
|
|
frame->format = octx->sample_fmt;
|
|
#if USING_FFMPEG
|
|
frame->channels = octx->channels;
|
|
#endif
|
|
frame->channel_layout = octx->channel_layout;
|
|
frame->sample_rate = octx->sample_rate;
|
|
if (av_frame_get_buffer(frame, 0) < 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Could not allocate output frame samples.");
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
|
|
if ((length = av_audio_fifo_read(as->fifo, (void **)frame->data, octx->frame_size)) < 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Could not read data from FIFO.");
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
|
|
tvhtrace("transcode", "before encoding: linesize=%d, samples=%d", frame->linesize[0], length);
|
|
|
|
frame->pts = as->aud_enc_pts;
|
|
as->aud_enc_pts += (octx->frame_size * 90000) / octx->sample_rate;
|
|
|
|
av_init_packet(&packet);
|
|
packet.data = NULL;
|
|
packet.size = 0;
|
|
length = avcodec_encode_audio2(octx, &packet, frame, &got_packet_ptr);
|
|
tvhlog(LOG_DEBUG, "transcode", "encoded: packet=%d, ret=%d, got=%d, pts=%" PRIi64, packet.size, length, got_packet_ptr, packet.pts);
|
|
|
|
if ((length < 0) || (got_packet_ptr < -1)) {
|
|
|
|
tvhlog(LOG_ERR, "transcode", "Unable to encode audio (%d:%d)", length, got_packet_ptr);
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
|
|
} else if (got_packet_ptr) {
|
|
|
|
n = pkt_alloc(packet.data, packet.size, packet.pts, packet.pts);
|
|
n->pkt_componentindex = ts->ts_index;
|
|
n->pkt_frametype = pkt->pkt_frametype;
|
|
n->pkt_channels = octx->channels;
|
|
n->pkt_sri = pkt->pkt_sri;
|
|
|
|
n->pkt_duration = packet.duration;
|
|
|
|
if (octx->extradata_size)
|
|
n->pkt_header = pktbuf_alloc(octx->extradata, octx->extradata_size);
|
|
|
|
tvhtrace("transcode", "deliver audio (pts = %" PRIi64 ", delay = %i)", n->pkt_pts, octx->delay);
|
|
sm = streaming_msg_create_pkt(n);
|
|
streaming_target_deliver2(ts->ts_target, sm);
|
|
pkt_ref_dec(n);
|
|
|
|
}
|
|
|
|
av_free_packet(&packet);
|
|
}
|
|
|
|
cleanup:
|
|
|
|
if ((output) && (output[0]))
|
|
av_freep(&(output)[0]);
|
|
|
|
if (output)
|
|
av_freep(output);
|
|
av_frame_free(&frame);
|
|
av_free_packet(&packet);
|
|
pkt_ref_dec(pkt);
|
|
}
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static void send_video_packet(transcoder_stream_t *ts, th_pkt_t *pkt, AVPacket *epkt, AVCodecContext *octx)
|
|
{
|
|
streaming_message_t *sm;
|
|
th_pkt_t *n;
|
|
|
|
if (epkt->size <= 0) {
|
|
if (epkt->size) {
|
|
tvhlog(LOG_ERR, "transcode", "Unable to encode video (%d)", epkt->size);
|
|
ts->ts_index = 0;
|
|
}
|
|
|
|
return;
|
|
}
|
|
|
|
if (!octx->coded_frame)
|
|
return;
|
|
|
|
n = pkt_alloc(epkt->data, epkt->size, epkt->pts, epkt->dts);
|
|
|
|
switch (octx->coded_frame->pict_type) {
|
|
case AV_PICTURE_TYPE_I:
|
|
n->pkt_frametype = PKT_I_FRAME;
|
|
break;
|
|
|
|
case AV_PICTURE_TYPE_P:
|
|
n->pkt_frametype = PKT_P_FRAME;
|
|
break;
|
|
|
|
case AV_PICTURE_TYPE_B:
|
|
n->pkt_frametype = PKT_B_FRAME;
|
|
break;
|
|
|
|
default:
|
|
break;
|
|
}
|
|
|
|
n->pkt_duration = pkt->pkt_duration;
|
|
n->pkt_commercial = pkt->pkt_commercial;
|
|
n->pkt_componentindex = pkt->pkt_componentindex;
|
|
n->pkt_field = pkt->pkt_field;
|
|
n->pkt_aspect_num = pkt->pkt_aspect_num;
|
|
n->pkt_aspect_den = pkt->pkt_aspect_den;
|
|
|
|
if(octx->coded_frame && octx->coded_frame->pts != AV_NOPTS_VALUE) {
|
|
if(n->pkt_dts != PTS_UNSET)
|
|
n->pkt_dts -= n->pkt_pts;
|
|
|
|
n->pkt_pts = octx->coded_frame->pts;
|
|
|
|
if(n->pkt_dts != PTS_UNSET)
|
|
n->pkt_dts += n->pkt_pts;
|
|
}
|
|
|
|
if (octx->extradata_size)
|
|
n->pkt_header = pktbuf_alloc(octx->extradata, octx->extradata_size);
|
|
else {
|
|
if (octx->codec_id == AV_CODEC_ID_MPEG2VIDEO) {
|
|
uint8_t *out = epkt->data;
|
|
uint32_t *mpeg2_header = (uint32_t *)out;
|
|
if (*mpeg2_header == 0xb3010000) { // SEQ_START_CODE
|
|
// Need to determine lentgh of header.
|
|
/*
|
|
From: http://en.wikipedia.org/wiki/Elementary_stream
|
|
Field Name # of bits Description
|
|
start code 32 0x000001B3
|
|
Horizontal Size 12
|
|
Vertical Size 12
|
|
Aspect ratio 4
|
|
Frame rate code 4
|
|
Bit rate 18 Actual bit rate = bit rate * 400, rounded upwards. Use 0x3FFFF for variable bit rate.
|
|
Marker bit 1 Always 1.
|
|
VBV buf size 10 Size of video buffer verifier = 16*1024*vbv buf size
|
|
constrained parameters flag 1
|
|
load intra quantizer matrix 1 If bit set then intra quantizer matrix follows, otherwise use default values.
|
|
intra quantizer matrix 0 or 64*8
|
|
load non intra quantizer matrix 1 If bit set then non intra quantizer matrix follows.
|
|
non intra quantizer matrix 0 or 64*8
|
|
|
|
Minimal of 12 bytes.
|
|
*/
|
|
|
|
int header_size = 12;
|
|
|
|
// load intra quantizer matrix
|
|
uint8_t matrix_enabled = (((uint8_t)*(out+(header_size-1)) & 0x02) == 0x02);
|
|
if (matrix_enabled)
|
|
header_size += 64;
|
|
|
|
//load non intra quantizer matrix
|
|
matrix_enabled = (((uint8_t)*(out+(header_size-1)) & 0x01) == 0x01);
|
|
if (matrix_enabled)
|
|
header_size += 64;
|
|
|
|
// See if we have the first EXT_START_CODE. Normally 10 bytes
|
|
// https://git.libav.org/?p=libav.git;a=blob;f=libavcodec/mpeg12enc.c;h=3376f1075f4b7582a8e4556e98deddab3e049dab;hb=HEAD#l272
|
|
mpeg2_header = (uint32_t *)(out+(header_size));
|
|
if (*mpeg2_header == 0xb5010000) { // EXT_START_CODE
|
|
header_size += 10;
|
|
|
|
// See if we have the second EXT_START_CODE. Normally 12 bytes
|
|
// https://git.libav.org/?p=libav.git;a=blob;f=libavcodec/mpeg12enc.c;h=3376f1075f4b7582a8e4556e98deddab3e049dab;hb=HEAD#l291
|
|
mpeg2_header = (uint32_t *)(out+(header_size));
|
|
if (*mpeg2_header == 0xb5010000) { // EXT_START_CODE
|
|
header_size += 12;
|
|
|
|
// See if we have the second GOP_START_CODE. Normally 31 bits == 4 bytes
|
|
// https://git.libav.org/?p=libav.git;a=blob;f=libavcodec/mpeg12enc.c;h=3376f1075f4b7582a8e4556e98deddab3e049dab;hb=HEAD#l304
|
|
mpeg2_header = (uint32_t *)(out+(header_size));
|
|
if (*mpeg2_header == 0xb8010000) // GOP_START_CODE
|
|
header_size += 4;
|
|
}
|
|
}
|
|
|
|
n->pkt_header = pktbuf_alloc(out, header_size);
|
|
}
|
|
}
|
|
}
|
|
|
|
tvhtrace("transcode", "deliver video (pts = %" PRIu64 ")", n->pkt_pts);
|
|
sm = streaming_msg_create_pkt(n);
|
|
streaming_target_deliver2(ts->ts_target, sm);
|
|
pkt_ref_dec(n);
|
|
|
|
}
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static void
|
|
transcoder_stream_video(transcoder_stream_t *ts, th_pkt_t *pkt)
|
|
{
|
|
AVCodec *icodec, *ocodec;
|
|
AVCodecContext *ictx, *octx;
|
|
AVDictionary *opts;
|
|
AVPacket packet;
|
|
AVPicture deint_pic;
|
|
uint8_t *buf, *out, *deint;
|
|
int length, len, got_picture;
|
|
video_stream_t *vs = (video_stream_t*)ts;
|
|
|
|
ictx = vs->vid_ictx;
|
|
octx = vs->vid_octx;
|
|
|
|
icodec = vs->vid_icodec;
|
|
ocodec = vs->vid_ocodec;
|
|
|
|
buf = out = deint = NULL;
|
|
opts = NULL;
|
|
|
|
if (ictx->codec_id == AV_CODEC_ID_NONE) {
|
|
ictx->codec_id = icodec->id;
|
|
|
|
if (avcodec_open2(ictx, icodec, NULL) < 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Unable to open %s decoder", icodec->name);
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
}
|
|
|
|
pkt = pkt_merge_header(pkt);
|
|
|
|
av_init_packet(&packet);
|
|
packet.data = pktbuf_ptr(pkt->pkt_payload);
|
|
packet.size = pktbuf_len(pkt->pkt_payload);
|
|
packet.pts = pkt->pkt_pts;
|
|
packet.dts = pkt->pkt_dts;
|
|
packet.duration = pkt->pkt_duration;
|
|
|
|
vs->vid_enc_frame->pts = packet.pts;
|
|
vs->vid_enc_frame->pkt_dts = packet.dts;
|
|
vs->vid_enc_frame->pkt_pts = packet.pts;
|
|
|
|
vs->vid_dec_frame->pts = packet.pts;
|
|
vs->vid_dec_frame->pkt_dts = packet.dts;
|
|
vs->vid_dec_frame->pkt_pts = packet.pts;
|
|
|
|
ictx->reordered_opaque = packet.pts;
|
|
|
|
length = avcodec_decode_video2(ictx, vs->vid_dec_frame, &got_picture, &packet);
|
|
if (length <= 0) {
|
|
if (length == AVERROR_INVALIDDATA) goto cleanup;
|
|
tvhlog(LOG_ERR, "transcode", "Unable to decode video (%d, %s)", length, get_error_text(length));
|
|
goto cleanup;
|
|
}
|
|
|
|
if (!got_picture)
|
|
goto cleanup;
|
|
|
|
octx->sample_aspect_ratio.num = ictx->sample_aspect_ratio.num;
|
|
octx->sample_aspect_ratio.den = ictx->sample_aspect_ratio.den;
|
|
|
|
vs->vid_enc_frame->sample_aspect_ratio.num = vs->vid_dec_frame->sample_aspect_ratio.num;
|
|
vs->vid_enc_frame->sample_aspect_ratio.den = vs->vid_dec_frame->sample_aspect_ratio.den;
|
|
|
|
if(octx->codec_id == AV_CODEC_ID_NONE) {
|
|
// Common settings
|
|
octx->width = vs->vid_width ? vs->vid_width : ictx->width;
|
|
octx->height = vs->vid_height ? vs->vid_height : ictx->height;
|
|
octx->gop_size = 25;
|
|
octx->time_base.den = 25;
|
|
octx->time_base.num = 1;
|
|
octx->has_b_frames = ictx->has_b_frames;
|
|
|
|
switch (ts->ts_type) {
|
|
case SCT_MPEG2VIDEO:
|
|
octx->codec_id = AV_CODEC_ID_MPEG2VIDEO;
|
|
octx->pix_fmt = PIX_FMT_YUV420P;
|
|
octx->flags |= CODEC_FLAG_GLOBAL_HEADER;
|
|
|
|
octx->qmin = 1;
|
|
octx->qmax = FF_LAMBDA_MAX;
|
|
|
|
octx->bit_rate = 2 * octx->width * octx->height;
|
|
octx->rc_max_rate = 4 * octx->bit_rate;
|
|
octx->rc_buffer_size = 2 * octx->rc_max_rate;
|
|
break;
|
|
|
|
case SCT_VP8:
|
|
octx->codec_id = AV_CODEC_ID_VP8;
|
|
octx->pix_fmt = PIX_FMT_YUV420P;
|
|
|
|
octx->qmin = 10;
|
|
octx->qmax = 20;
|
|
|
|
av_dict_set(&opts, "quality", "realtime", 0);
|
|
|
|
octx->bit_rate = 3 * octx->width * octx->height;
|
|
octx->rc_buffer_size = 8 * 1024 * 224;
|
|
octx->rc_max_rate = 2 * octx->bit_rate;
|
|
break;
|
|
|
|
case SCT_H264:
|
|
octx->codec_id = AV_CODEC_ID_H264;
|
|
octx->pix_fmt = PIX_FMT_YUV420P;
|
|
octx->flags |= CODEC_FLAG_GLOBAL_HEADER;
|
|
|
|
// Qscale difference between I-frames and P-frames.
|
|
// Note: -i_qfactor is handled a little differently than --ipratio.
|
|
// Recommended: -i_qfactor 0.71
|
|
octx->i_quant_factor = 0.71;
|
|
|
|
// QP curve compression: 0.0 => CBR, 1.0 => CQP.
|
|
// Recommended default: -qcomp 0.60
|
|
octx->qcompress = 0.6;
|
|
|
|
// Minimum quantizer. Doesn't need to be changed.
|
|
// Recommended default: -qmin 10
|
|
octx->qmin = 10;
|
|
|
|
// Maximum quantizer. Doesn't need to be changed.
|
|
// Recommended default: -qmax 51
|
|
octx->qmax = 30;
|
|
|
|
av_dict_set(&opts, "preset", "medium", 0);
|
|
av_dict_set(&opts, "profile", "baseline", 0);
|
|
|
|
octx->bit_rate = 2 * octx->width * octx->height;
|
|
octx->rc_buffer_size = 8 * 1024 * 224;
|
|
octx->rc_max_rate = 2 * octx->rc_buffer_size;
|
|
break;
|
|
|
|
default:
|
|
break;
|
|
}
|
|
|
|
octx->codec_id = ocodec->id;
|
|
|
|
if (avcodec_open2(octx, ocodec, &opts) < 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Unable to open %s encoder", ocodec->name);
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
}
|
|
|
|
len = avpicture_get_size(ictx->pix_fmt, ictx->width, ictx->height);
|
|
deint = av_malloc(len);
|
|
|
|
avpicture_fill(&deint_pic,
|
|
deint,
|
|
ictx->pix_fmt,
|
|
ictx->width,
|
|
ictx->height);
|
|
|
|
if (avpicture_deinterlace(&deint_pic,
|
|
(AVPicture *)vs->vid_dec_frame,
|
|
ictx->pix_fmt,
|
|
ictx->width,
|
|
ictx->height) < 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Cannot deinterlace frame");
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
|
|
len = avpicture_get_size(octx->pix_fmt, octx->width, octx->height);
|
|
buf = av_malloc(len + FF_INPUT_BUFFER_PADDING_SIZE);
|
|
memset(buf, 0, len);
|
|
|
|
avpicture_fill((AVPicture *)vs->vid_enc_frame,
|
|
buf,
|
|
octx->pix_fmt,
|
|
octx->width,
|
|
octx->height);
|
|
|
|
vs->vid_scaler = sws_getCachedContext(vs->vid_scaler,
|
|
ictx->width,
|
|
ictx->height,
|
|
ictx->pix_fmt,
|
|
octx->width,
|
|
octx->height,
|
|
octx->pix_fmt,
|
|
1,
|
|
NULL,
|
|
NULL,
|
|
NULL);
|
|
|
|
if (sws_scale(vs->vid_scaler,
|
|
(const uint8_t * const*)deint_pic.data,
|
|
deint_pic.linesize,
|
|
0,
|
|
ictx->height,
|
|
vs->vid_enc_frame->data,
|
|
vs->vid_enc_frame->linesize) < 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Cannot scale frame");
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
|
|
|
|
vs->vid_enc_frame->pkt_pts = vs->vid_dec_frame->pkt_pts;
|
|
vs->vid_enc_frame->pkt_dts = vs->vid_dec_frame->pkt_dts;
|
|
|
|
if (vs->vid_dec_frame->reordered_opaque != AV_NOPTS_VALUE)
|
|
vs->vid_enc_frame->pts = vs->vid_dec_frame->reordered_opaque;
|
|
|
|
else if (ictx->coded_frame && ictx->coded_frame->pts != AV_NOPTS_VALUE)
|
|
vs->vid_enc_frame->pts = vs->vid_dec_frame->pts;
|
|
|
|
AVPacket packet2;
|
|
int ret, got_output;
|
|
|
|
av_init_packet(&packet2);
|
|
packet2.data = NULL; // packet data will be allocated by the encoder
|
|
packet2.size = 0;
|
|
|
|
ret = avcodec_encode_video2(octx, &packet2, vs->vid_enc_frame, &got_output);
|
|
if (ret < 0) {
|
|
tvhlog(LOG_ERR, "transcode", "Error encoding frame. avcodec_encode_video2()");
|
|
av_free_packet(&packet2);
|
|
ts->ts_index = 0;
|
|
goto cleanup;
|
|
}
|
|
|
|
if (got_output)
|
|
send_video_packet(ts, pkt, &packet2, octx);
|
|
|
|
av_free_packet(&packet2);
|
|
|
|
cleanup:
|
|
av_free_packet(&packet);
|
|
pkt_ref_dec(pkt);
|
|
|
|
if(buf)
|
|
av_free(buf);
|
|
|
|
if(out)
|
|
av_free(out);
|
|
|
|
if(deint)
|
|
av_free(deint);
|
|
|
|
if(opts)
|
|
av_dict_free(&opts);
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static void
|
|
transcoder_packet(transcoder_t *t, th_pkt_t *pkt)
|
|
{
|
|
transcoder_stream_t *ts;
|
|
|
|
LIST_FOREACH(ts, &t->t_stream_list, ts_link) {
|
|
if (pkt->pkt_componentindex != ts->ts_index)
|
|
continue;
|
|
|
|
ts->ts_handle_pkt(ts, pkt);
|
|
return;
|
|
}
|
|
|
|
pkt_ref_dec(pkt);
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static void
|
|
transcoder_destroy_stream(transcoder_stream_t *ts)
|
|
{
|
|
free(ts);
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static int
|
|
transcoder_init_stream(transcoder_t *t, streaming_start_component_t *ssc)
|
|
{
|
|
transcoder_stream_t *ts = calloc(1, sizeof(transcoder_stream_t));
|
|
|
|
ts->ts_index = ssc->ssc_index;
|
|
ts->ts_type = ssc->ssc_type;
|
|
ts->ts_target = t->t_output;
|
|
ts->ts_handle_pkt = transcoder_stream_packet;
|
|
ts->ts_destroy = transcoder_destroy_stream;
|
|
|
|
LIST_INSERT_HEAD(&t->t_stream_list, ts, ts_link);
|
|
|
|
if(ssc->ssc_gh)
|
|
pktbuf_ref_inc(ssc->ssc_gh);
|
|
|
|
tvhlog(LOG_INFO, "transcode", "%d:%s ==> Passthrough",
|
|
ssc->ssc_index,
|
|
streaming_component_type2txt(ssc->ssc_type));
|
|
|
|
return 1;
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static void
|
|
transcoder_destroy_subtitle(transcoder_stream_t *ts)
|
|
{
|
|
subtitle_stream_t *ss = (subtitle_stream_t*)ts;
|
|
|
|
if(ss->sub_ictx) {
|
|
avcodec_close(ss->sub_ictx);
|
|
av_free(ss->sub_ictx);
|
|
}
|
|
|
|
if(ss->sub_octx) {
|
|
avcodec_close(ss->sub_octx);
|
|
av_free(ss->sub_octx);
|
|
}
|
|
|
|
free(ts);
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static int
|
|
transcoder_init_subtitle(transcoder_t *t, streaming_start_component_t *ssc)
|
|
{
|
|
subtitle_stream_t *ss;
|
|
AVCodec *icodec, *ocodec;
|
|
transcoder_props_t *tp = &t->t_props;
|
|
int sct;
|
|
|
|
if (tp->tp_scodec[0] == '\0')
|
|
return 0;
|
|
|
|
else if (!strcmp(tp->tp_scodec, "copy"))
|
|
return transcoder_init_stream(t, ssc);
|
|
|
|
else if (!(icodec = transcoder_get_decoder(ssc->ssc_type)))
|
|
return transcoder_init_stream(t, ssc);
|
|
|
|
else if (!(ocodec = transcoder_get_encoder(tp->tp_scodec)))
|
|
return transcoder_init_stream(t, ssc);
|
|
|
|
sct = codec_id2streaming_component_type(ocodec->id);
|
|
|
|
if (sct == ssc->ssc_type)
|
|
return transcoder_init_stream(t, ssc);
|
|
|
|
ss = calloc(1, sizeof(subtitle_stream_t));
|
|
|
|
ss->ts_index = ssc->ssc_index;
|
|
ss->ts_type = sct;
|
|
ss->ts_target = t->t_output;
|
|
ss->ts_handle_pkt = transcoder_stream_subtitle;
|
|
ss->ts_destroy = transcoder_destroy_subtitle;
|
|
|
|
ss->sub_icodec = icodec;
|
|
ss->sub_ocodec = ocodec;
|
|
|
|
ss->sub_ictx = avcodec_alloc_context3_tvh(icodec);
|
|
ss->sub_octx = avcodec_alloc_context3_tvh(ocodec);
|
|
|
|
LIST_INSERT_HEAD(&t->t_stream_list, (transcoder_stream_t*)ss, ts_link);
|
|
|
|
tvhlog(LOG_INFO, "transcode", "%d:%s ==> %s",
|
|
ssc->ssc_index,
|
|
streaming_component_type2txt(ssc->ssc_type),
|
|
streaming_component_type2txt(ss->ts_type));
|
|
|
|
ssc->ssc_type = sct;
|
|
ssc->ssc_gh = NULL;
|
|
|
|
return 1;
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static void
|
|
transcoder_destroy_audio(transcoder_stream_t *ts)
|
|
{
|
|
audio_stream_t *as = (audio_stream_t*)ts;
|
|
|
|
if(as->aud_ictx) {
|
|
avcodec_close(as->aud_ictx);
|
|
av_free(as->aud_ictx);
|
|
}
|
|
|
|
if(as->aud_octx) {
|
|
avcodec_close(as->aud_octx);
|
|
av_free(as->aud_octx);
|
|
}
|
|
|
|
if(as->aud_dec_sample)
|
|
av_free(as->aud_dec_sample);
|
|
|
|
if(as->aud_enc_sample)
|
|
av_free(as->aud_enc_sample);
|
|
|
|
if ((as->resample_context) && as->resample_is_open )
|
|
avresample_close(as->resample_context);
|
|
avresample_free(&as->resample_context);
|
|
|
|
av_audio_fifo_free(as->fifo);
|
|
|
|
free(ts);
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static int
|
|
transcoder_init_audio(transcoder_t *t, streaming_start_component_t *ssc)
|
|
{
|
|
audio_stream_t *as;
|
|
transcoder_stream_t *ts;
|
|
AVCodec *icodec, *ocodec;
|
|
transcoder_props_t *tp = &t->t_props;
|
|
int sct;
|
|
|
|
if (tp->tp_acodec[0] == '\0')
|
|
return 0;
|
|
|
|
else if (!strcmp(tp->tp_acodec, "copy"))
|
|
return transcoder_init_stream(t, ssc);
|
|
|
|
else if (!(icodec = transcoder_get_decoder(ssc->ssc_type)))
|
|
return transcoder_init_stream(t, ssc);
|
|
|
|
else if (!(ocodec = transcoder_get_encoder(tp->tp_acodec)))
|
|
return transcoder_init_stream(t, ssc);
|
|
|
|
LIST_FOREACH(ts, &t->t_stream_list, ts_link)
|
|
if (SCT_ISAUDIO(ts->ts_type))
|
|
return 0;
|
|
|
|
sct = codec_id2streaming_component_type(ocodec->id);
|
|
|
|
if (sct == ssc->ssc_type)
|
|
return transcoder_init_stream(t, ssc);
|
|
|
|
as = calloc(1, sizeof(audio_stream_t));
|
|
|
|
as->ts_index = ssc->ssc_index;
|
|
as->ts_type = sct;
|
|
as->ts_target = t->t_output;
|
|
as->ts_handle_pkt = transcoder_stream_audio;
|
|
as->ts_destroy = transcoder_destroy_audio;
|
|
|
|
as->aud_icodec = icodec;
|
|
as->aud_ocodec = ocodec;
|
|
|
|
as->aud_ictx = avcodec_alloc_context3_tvh(icodec);
|
|
as->aud_octx = avcodec_alloc_context3_tvh(ocodec);
|
|
|
|
as->aud_ictx->thread_count = sysconf(_SC_NPROCESSORS_ONLN);
|
|
as->aud_octx->thread_count = sysconf(_SC_NPROCESSORS_ONLN);
|
|
|
|
as->aud_dec_size = 192000*2;
|
|
as->aud_enc_size = 192000*2;
|
|
|
|
as->aud_dec_sample = av_malloc(as->aud_dec_size + FF_INPUT_BUFFER_PADDING_SIZE);
|
|
as->aud_enc_sample = av_malloc(as->aud_enc_size + FF_INPUT_BUFFER_PADDING_SIZE);
|
|
|
|
memset(as->aud_dec_sample, 0, as->aud_dec_size + FF_INPUT_BUFFER_PADDING_SIZE);
|
|
memset(as->aud_enc_sample, 0, as->aud_enc_size + FF_INPUT_BUFFER_PADDING_SIZE);
|
|
|
|
LIST_INSERT_HEAD(&t->t_stream_list, (transcoder_stream_t*)as, ts_link);
|
|
|
|
tvhlog(LOG_INFO, "transcode", "%d:%s ==> %s",
|
|
ssc->ssc_index,
|
|
streaming_component_type2txt(ssc->ssc_type),
|
|
streaming_component_type2txt(as->ts_type));
|
|
|
|
ssc->ssc_type = sct;
|
|
ssc->ssc_gh = NULL;
|
|
|
|
// resampling not implemented yet
|
|
if(tp->tp_channels > 0)
|
|
as->aud_channels = tp->tp_channels;
|
|
else
|
|
as->aud_channels = 0;
|
|
|
|
as->aud_bitrate = as->aud_channels * 64000;
|
|
|
|
as->resample_context = NULL;
|
|
as->fifo = NULL;
|
|
as->resample = 0;
|
|
|
|
return 1;
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static void
|
|
transcoder_destroy_video(transcoder_stream_t *ts)
|
|
{
|
|
video_stream_t *vs = (video_stream_t*)ts;
|
|
|
|
if(vs->vid_ictx) {
|
|
avcodec_close(vs->vid_ictx);
|
|
av_free(vs->vid_ictx);
|
|
}
|
|
|
|
if(vs->vid_octx) {
|
|
avcodec_close(vs->vid_octx);
|
|
av_free(vs->vid_octx);
|
|
}
|
|
|
|
if(vs->vid_dec_frame)
|
|
av_free(vs->vid_dec_frame);
|
|
|
|
if(vs->vid_scaler)
|
|
sws_freeContext(vs->vid_scaler);
|
|
|
|
if(vs->vid_enc_frame)
|
|
av_free(vs->vid_enc_frame);
|
|
|
|
free(ts);
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static int
|
|
transcoder_init_video(transcoder_t *t, streaming_start_component_t *ssc)
|
|
{
|
|
video_stream_t *vs;
|
|
AVCodec *icodec, *ocodec;
|
|
double aspect;
|
|
transcoder_props_t *tp = &t->t_props;
|
|
int sct;
|
|
|
|
if (tp->tp_vcodec[0] == '\0')
|
|
return 0;
|
|
|
|
else if (!strcmp(tp->tp_vcodec, "copy"))
|
|
return transcoder_init_stream(t, ssc);
|
|
|
|
else if (!(icodec = transcoder_get_decoder(ssc->ssc_type)))
|
|
return transcoder_init_stream(t, ssc);
|
|
|
|
else if (!(ocodec = transcoder_get_encoder(tp->tp_vcodec)))
|
|
return transcoder_init_stream(t, ssc);
|
|
|
|
sct = codec_id2streaming_component_type(ocodec->id);
|
|
|
|
vs = calloc(1, sizeof(video_stream_t));
|
|
|
|
vs->ts_index = ssc->ssc_index;
|
|
vs->ts_type = sct;
|
|
vs->ts_target = t->t_output;
|
|
vs->ts_handle_pkt = transcoder_stream_video;
|
|
vs->ts_destroy = transcoder_destroy_video;
|
|
|
|
vs->vid_icodec = icodec;
|
|
vs->vid_ocodec = ocodec;
|
|
|
|
vs->vid_ictx = avcodec_alloc_context3_tvh(icodec);
|
|
vs->vid_octx = avcodec_alloc_context3_tvh(ocodec);
|
|
|
|
vs->vid_ictx->thread_count = sysconf(_SC_NPROCESSORS_ONLN);
|
|
vs->vid_octx->thread_count = sysconf(_SC_NPROCESSORS_ONLN);
|
|
|
|
vs->vid_dec_frame = avcodec_alloc_frame();
|
|
vs->vid_enc_frame = avcodec_alloc_frame();
|
|
|
|
avcodec_get_frame_defaults(vs->vid_dec_frame);
|
|
avcodec_get_frame_defaults(vs->vid_enc_frame);
|
|
|
|
LIST_INSERT_HEAD(&t->t_stream_list, (transcoder_stream_t*)vs, ts_link);
|
|
|
|
aspect = (double)ssc->ssc_width / ssc->ssc_height;
|
|
|
|
if(tp->tp_resolution > 0) {
|
|
vs->vid_height = MIN(tp->tp_resolution, ssc->ssc_height);
|
|
if (vs->vid_height&1) // Must be even
|
|
vs->vid_height++;
|
|
|
|
vs->vid_width = vs->vid_height * aspect;
|
|
if (vs->vid_width&1) // Must be even
|
|
vs->vid_width++;
|
|
} else {
|
|
vs->vid_height = ssc->ssc_height;
|
|
vs->vid_width = ssc->ssc_width;
|
|
}
|
|
|
|
tvhlog(LOG_INFO, "transcode", "%d:%s %dx%d ==> %s %dx%d",
|
|
ssc->ssc_index,
|
|
streaming_component_type2txt(ssc->ssc_type),
|
|
ssc->ssc_width,
|
|
ssc->ssc_height,
|
|
streaming_component_type2txt(vs->ts_type),
|
|
vs->vid_width,
|
|
vs->vid_height);
|
|
|
|
ssc->ssc_type = sct;
|
|
ssc->ssc_width = vs->vid_width;
|
|
ssc->ssc_height = vs->vid_height;
|
|
ssc->ssc_gh = NULL;
|
|
|
|
return 1;
|
|
}
|
|
|
|
|
|
/**
|
|
* Figure out how many streams we will use.
|
|
*/
|
|
static int
|
|
transcoder_calc_stream_count(transcoder_t *t, streaming_start_t *ss) {
|
|
int i = 0;
|
|
int video = 0;
|
|
int audio = 0;
|
|
int subtitle = 0;
|
|
streaming_start_component_t *ssc = NULL;
|
|
|
|
tvhlog(LOG_DEBUG, "transcoder", "transcoder_calc_stream_count: ss->ss_num_components=%d", ss->ss_num_components);
|
|
|
|
for (i = 0; i < ss->ss_num_components; i++) {
|
|
ssc = &ss->ss_components[i];
|
|
|
|
if (ssc->ssc_disabled)
|
|
continue;
|
|
|
|
if (SCT_ISVIDEO(ssc->ssc_type)) {
|
|
if (t->t_props.tp_vcodec[0] == '\0')
|
|
video = 0;
|
|
else if (t->t_props.tp_vcodec == SCT_UNKNOWN)
|
|
video++;
|
|
else
|
|
video = 1;
|
|
|
|
} else if (SCT_ISAUDIO(ssc->ssc_type)) {
|
|
if (t->t_props.tp_acodec[0] == '\0')
|
|
audio = 0;
|
|
else if (t->t_props.tp_acodec == SCT_UNKNOWN)
|
|
audio++;
|
|
else
|
|
audio = 1;
|
|
|
|
} else if (SCT_ISSUBTITLE(ssc->ssc_type)) {
|
|
if (t->t_props.tp_scodec[0] == '\0')
|
|
subtitle = 0;
|
|
else if (t->t_props.tp_scodec == SCT_UNKNOWN)
|
|
subtitle++;
|
|
else
|
|
subtitle = 1;
|
|
}
|
|
}
|
|
|
|
tvhlog(LOG_DEBUG, "transcoder", "transcoder_calc_stream_count=%d", (video + audio + subtitle));
|
|
|
|
|
|
return (video + audio + subtitle);
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static streaming_start_t *
|
|
transcoder_start(transcoder_t *t, streaming_start_t *src)
|
|
{
|
|
int i, j, n, rc;
|
|
streaming_start_t *ss;
|
|
|
|
|
|
n = transcoder_calc_stream_count(t, src);
|
|
ss = calloc(1, (sizeof(streaming_start_t) +
|
|
sizeof(streaming_start_component_t) * n));
|
|
|
|
ss->ss_refcount = 1;
|
|
ss->ss_num_components = n;
|
|
ss->ss_pcr_pid = src->ss_pcr_pid;
|
|
ss->ss_pmt_pid = src->ss_pmt_pid;
|
|
service_source_info_copy(&ss->ss_si, &src->ss_si);
|
|
|
|
|
|
for (i = j = 0; i < src->ss_num_components && j < n; i++) {
|
|
streaming_start_component_t *ssc_src = &src->ss_components[i];
|
|
streaming_start_component_t *ssc = &ss->ss_components[j];
|
|
|
|
if (ssc_src->ssc_disabled)
|
|
continue;
|
|
|
|
ssc->ssc_index = ssc_src->ssc_index;
|
|
ssc->ssc_type = ssc_src->ssc_type;
|
|
ssc->ssc_composition_id = ssc_src->ssc_composition_id;
|
|
ssc->ssc_ancillary_id = ssc_src->ssc_ancillary_id;
|
|
ssc->ssc_pid = ssc_src->ssc_pid;
|
|
ssc->ssc_width = ssc_src->ssc_width;
|
|
ssc->ssc_height = ssc_src->ssc_height;
|
|
ssc->ssc_aspect_num = ssc_src->ssc_aspect_num;
|
|
ssc->ssc_aspect_den = ssc_src->ssc_aspect_den;
|
|
ssc->ssc_sri = ssc_src->ssc_sri;
|
|
ssc->ssc_channels = ssc_src->ssc_channels;
|
|
ssc->ssc_disabled = ssc_src->ssc_disabled;
|
|
ssc->ssc_frameduration = ssc_src->ssc_frameduration;
|
|
ssc->ssc_gh = ssc_src->ssc_gh;
|
|
|
|
memcpy(ssc->ssc_lang, ssc_src->ssc_lang, 4);
|
|
|
|
if (SCT_ISVIDEO(ssc->ssc_type))
|
|
rc = transcoder_init_video(t, ssc);
|
|
|
|
else if (SCT_ISAUDIO(ssc->ssc_type))
|
|
rc = transcoder_init_audio(t, ssc);
|
|
|
|
else if (SCT_ISSUBTITLE(ssc->ssc_type))
|
|
rc = transcoder_init_subtitle(t, ssc);
|
|
else
|
|
rc = 0;
|
|
|
|
if(!rc)
|
|
tvhlog(LOG_INFO, "transcode", "%d:%s ==> Filtered",
|
|
ssc->ssc_index,
|
|
streaming_component_type2txt(ssc->ssc_type));
|
|
else
|
|
j++;
|
|
}
|
|
|
|
return ss;
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static void
|
|
transcoder_stop(transcoder_t *t)
|
|
{
|
|
transcoder_stream_t *ts;
|
|
|
|
while ((ts = LIST_FIRST(&t->t_stream_list))) {
|
|
LIST_REMOVE(ts, ts_link);
|
|
|
|
if (ts->ts_destroy)
|
|
ts->ts_destroy(ts);
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
static void
|
|
transcoder_input(void *opaque, streaming_message_t *sm)
|
|
{
|
|
transcoder_t *t;
|
|
streaming_start_t *ss;
|
|
|
|
t = opaque;
|
|
|
|
switch (sm->sm_type) {
|
|
case SMT_PACKET:
|
|
transcoder_packet(t, sm->sm_data);
|
|
break;
|
|
|
|
case SMT_START:
|
|
ss = transcoder_start(t, sm->sm_data);
|
|
streaming_start_unref(sm->sm_data);
|
|
sm->sm_data = ss;
|
|
|
|
streaming_target_deliver2(t->t_output, sm);
|
|
break;
|
|
|
|
case SMT_STOP:
|
|
transcoder_stop(t);
|
|
// Fallthrough
|
|
|
|
case SMT_GRACE:
|
|
case SMT_SPEED:
|
|
case SMT_SKIP:
|
|
case SMT_TIMESHIFT_STATUS:
|
|
case SMT_EXIT:
|
|
case SMT_SERVICE_STATUS:
|
|
case SMT_SIGNAL_STATUS:
|
|
case SMT_NOSTART:
|
|
case SMT_MPEGTS:
|
|
streaming_target_deliver2(t->t_output, sm);
|
|
break;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
streaming_target_t *
|
|
transcoder_create(streaming_target_t *output)
|
|
{
|
|
transcoder_t *t = calloc(1, sizeof(transcoder_t));
|
|
|
|
t->t_output = output;
|
|
|
|
streaming_target_init(&t->t_input, transcoder_input, t, 0);
|
|
|
|
return &t->t_input;
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
void
|
|
transcoder_set_properties(streaming_target_t *st,
|
|
transcoder_props_t *props)
|
|
{
|
|
transcoder_t *t = (transcoder_t *)st;
|
|
transcoder_props_t *tp = &t->t_props;
|
|
|
|
strncpy(tp->tp_vcodec, props->tp_vcodec, sizeof(tp->tp_vcodec)-1);
|
|
strncpy(tp->tp_acodec, props->tp_acodec, sizeof(tp->tp_acodec)-1);
|
|
strncpy(tp->tp_scodec, props->tp_scodec, sizeof(tp->tp_scodec)-1);
|
|
tp->tp_channels = props->tp_channels;
|
|
tp->tp_bandwidth = props->tp_bandwidth;
|
|
tp->tp_resolution = props->tp_resolution;
|
|
|
|
memcpy(tp->tp_language, props->tp_language, 4);
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
void
|
|
transcoder_destroy(streaming_target_t *st)
|
|
{
|
|
transcoder_t *t = (transcoder_t *)st;
|
|
|
|
transcoder_stop(t);
|
|
free(t);
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
*/
|
|
htsmsg_t *
|
|
transcoder_get_capabilities(int experimental)
|
|
{
|
|
AVCodec *p = NULL;
|
|
streaming_component_type_t sct;
|
|
htsmsg_t *array = htsmsg_create_list(), *m;
|
|
|
|
while ((p = av_codec_next(p))) {
|
|
|
|
if (!libav_is_encoder(p))
|
|
continue;
|
|
|
|
if (!WORKING_ENCODER(p->id))
|
|
continue;
|
|
|
|
if ((p->capabilities & CODEC_CAP_EXPERIMENTAL) && !experimental)
|
|
continue;
|
|
|
|
sct = codec_id2streaming_component_type(p->id);
|
|
if (sct == SCT_NONE)
|
|
continue;
|
|
|
|
m = htsmsg_create_map();
|
|
htsmsg_add_s32(m, "type", sct);
|
|
htsmsg_add_u32(m, "id", p->id);
|
|
htsmsg_add_str(m, "name", p->name);
|
|
if (p->long_name)
|
|
htsmsg_add_str(m, "long_name", p->long_name);
|
|
htsmsg_add_msg(array, NULL, m);
|
|
}
|
|
return array;
|
|
}
|
|
|
|
|
|
/*
|
|
*
|
|
*/
|
|
void transcoding_init(void)
|
|
{
|
|
}
|