blob: 5e035eb7315064e46a611a1842911b269776a73e [file] [log] [blame]
/*
* Copyright 2019 Google Inc.
*
* Use of this source code is governed by a BSD-style license that can be
* found in the LICENSE file.
*/
#include "experimental/ffmpeg/SkVideoDecoder.h"
#include "include/core/SkColorSpace.h"
#include "include/core/SkImage.h"
#include "include/core/SkYUVAIndex.h"
static SkYUVColorSpace get_yuvspace(AVColorSpace space) {
// this is pretty incomplete -- TODO: look to convert more AVColorSpaces
switch (space) {
case AVCOL_SPC_RGB: return kIdentity_SkYUVColorSpace;
case AVCOL_SPC_BT709: return kRec709_SkYUVColorSpace;
case AVCOL_SPC_SMPTE170M:
case AVCOL_SPC_SMPTE240M:
case AVCOL_SPC_BT470BG: return kRec601_SkYUVColorSpace;
default: break;
}
return kRec709_SkYUVColorSpace;
}
struct av_transfer_characteristics {
// if x < beta delta * x
// else alpha * (x^gama)
float alpha, beta, gamma, delta;
};
// Tables extracted from vf_colorspace.c
const av_transfer_characteristics gTransfer[AVCOL_TRC_NB] = {
[AVCOL_TRC_BT709] = { 1.099, 0.018, 0.45, 4.5 },
[AVCOL_TRC_GAMMA22] = { 1.0, 0.0, 1.0 / 2.2, 0.0 },
[AVCOL_TRC_GAMMA28] = { 1.0, 0.0, 1.0 / 2.8, 0.0 },
[AVCOL_TRC_SMPTE170M] = { 1.099, 0.018, 0.45, 4.5 },
[AVCOL_TRC_SMPTE240M] = { 1.1115, 0.0228, 0.45, 4.0 },
[AVCOL_TRC_IEC61966_2_1] = { 1.055, 0.0031308, 1.0 / 2.4, 12.92 },
[AVCOL_TRC_IEC61966_2_4] = { 1.099, 0.018, 0.45, 4.5 },
[AVCOL_TRC_BT2020_10] = { 1.099, 0.018, 0.45, 4.5 },
[AVCOL_TRC_BT2020_12] = { 1.0993, 0.0181, 0.45, 4.5 },
};
static skcms_TransferFunction compute_transfer(AVColorTransferCharacteristic t) {
const av_transfer_characteristics* av = &gTransfer[AVCOL_TRC_BT709];
if ((unsigned)t < AVCOL_TRC_NB) {
av = &gTransfer[t];
}
if (av->alpha == 0) {
av = &gTransfer[AVCOL_TRC_BT709];
}
skcms_TransferFunction linear_to_encoded = {
av->gamma, sk_float_pow(av->alpha, 1/av->gamma), 0, av->delta, av->beta, 1 - av->alpha, 0,
};
skcms_TransferFunction encoded_to_linear;
bool success = skcms_TransferFunction_invert(&linear_to_encoded, &encoded_to_linear);
SkASSERT(success);
return encoded_to_linear;
}
enum Whitepoint {
WP_D65,
WP_C,
WP_DCI,
WP_E,
WP_NB,
};
const SkPoint gWP[WP_NB] = {
[WP_D65] = { 0.3127f, 0.3290f },
[WP_C] = { 0.3100f, 0.3160f },
[WP_DCI] = { 0.3140f, 0.3510f },
[WP_E] = { 1/3.0f, 1/3.0f },
};
#define ExpandWP(index) gWP[index].fX, gWP[index].fY
const SkColorSpacePrimaries gPrimaries[AVCOL_PRI_NB] = {
[AVCOL_PRI_BT709] = { 0.640f, 0.330f, 0.300f, 0.600f, 0.150f, 0.060f, ExpandWP(WP_D65) },
[AVCOL_PRI_BT470M] = { 0.670f, 0.330f, 0.210f, 0.710f, 0.140f, 0.080f, ExpandWP(WP_C) },
[AVCOL_PRI_BT470BG] = { 0.640f, 0.330f, 0.290f, 0.600f, 0.150f, 0.060f, ExpandWP(WP_D65) },
[AVCOL_PRI_SMPTE170M] = { 0.630f, 0.340f, 0.310f, 0.595f, 0.155f, 0.070f, ExpandWP(WP_D65) },
[AVCOL_PRI_SMPTE240M] = { 0.630f, 0.340f, 0.310f, 0.595f, 0.155f, 0.070f, ExpandWP(WP_D65) },
[AVCOL_PRI_SMPTE428] = { 0.735f, 0.265f, 0.274f, 0.718f, 0.167f, 0.009f, ExpandWP(WP_E) },
[AVCOL_PRI_SMPTE431] = { 0.680f, 0.320f, 0.265f, 0.690f, 0.150f, 0.060f, ExpandWP(WP_DCI) },
[AVCOL_PRI_SMPTE432] = { 0.680f, 0.320f, 0.265f, 0.690f, 0.150f, 0.060f, ExpandWP(WP_D65) },
[AVCOL_PRI_FILM] = { 0.681f, 0.319f, 0.243f, 0.692f, 0.145f, 0.049f, ExpandWP(WP_C) },
[AVCOL_PRI_BT2020] = { 0.708f, 0.292f, 0.170f, 0.797f, 0.131f, 0.046f, ExpandWP(WP_D65) },
[AVCOL_PRI_JEDEC_P22] = { 0.630f, 0.340f, 0.295f, 0.605f, 0.155f, 0.077f, ExpandWP(WP_D65) },
};
sk_sp<SkColorSpace> make_colorspace(AVColorPrimaries primaries,
AVColorTransferCharacteristic transfer) {
if (primaries == AVCOL_PRI_BT709 && transfer == AVCOL_TRC_BT709) {
return SkColorSpace::MakeSRGB();
}
const SkColorSpacePrimaries* p = &gPrimaries[0];
if ((unsigned)primaries < (unsigned)AVCOL_PRI_NB) {
p = &gPrimaries[primaries];
}
skcms_Matrix3x3 matrix;
p->toXYZD50(&matrix);
return SkColorSpace::MakeRGB(compute_transfer(transfer), matrix);
}
// returns true on error (and may dump the particular error message)
static bool check_err(int err, const int silentList[] = nullptr) {
if (err >= 0) {
return false;
}
if (silentList) {
for (; *silentList; ++silentList) {
if (*silentList == err) {
return true; // we still report the error, but we don't printf
}
}
}
char errbuf[128];
const char *errbuf_ptr = errbuf;
if (av_strerror(err, errbuf, sizeof(errbuf)) < 0) {
errbuf_ptr = strerror(AVUNERROR(err));
}
SkDebugf("%s\n", errbuf_ptr);
return true;
}
static int skstream_read_packet(void* ctx, uint8_t* dstBuffer, int dstSize) {
SkStream* stream = (SkStream*)ctx;
int result = (int)stream->read(dstBuffer, dstSize);
if (result == 0) {
result = AVERROR_EOF;
}
return result;
}
static int64_t skstream_seek_packet(void* ctx, int64_t pos, int whence) {
SkStream* stream = (SkStream*)ctx;
switch (whence) {
case SEEK_SET:
break;
case SEEK_CUR:
pos = (int64_t)stream->getPosition() + pos;
break;
case SEEK_END:
pos = (int64_t)stream->getLength() + pos;
break;
default:
return -1;
}
return stream->seek(SkToSizeT(pos)) ? pos : -1;
}
static sk_sp<SkImage> make_yuv_420(GrContext* gr, int w, int h,
uint8_t* const data[], int const strides[],
SkYUVColorSpace yuv_space,
sk_sp<SkColorSpace> cs) {
SkImageInfo info[3];
info[0] = SkImageInfo::Make(w, h, kGray_8_SkColorType, kOpaque_SkAlphaType);
info[1] = SkImageInfo::Make(w/2, h/2, kGray_8_SkColorType, kOpaque_SkAlphaType);
info[2] = SkImageInfo::Make(w/2, h/2, kGray_8_SkColorType, kOpaque_SkAlphaType);
SkPixmap pm[4];
for (int i = 0; i < 3; ++i) {
pm[i] = SkPixmap(info[i], data[i], strides[i]);
}
pm[3].reset(); // no alpha
SkYUVAIndex indices[4];
indices[SkYUVAIndex::kY_Index] = {0, SkColorChannel::kR};
indices[SkYUVAIndex::kU_Index] = {1, SkColorChannel::kR};
indices[SkYUVAIndex::kV_Index] = {2, SkColorChannel::kR};
indices[SkYUVAIndex::kA_Index] = {-1, SkColorChannel::kR};
return SkImage::MakeFromYUVAPixmaps(gr, yuv_space, pm, indices, {w, h},
kTopLeft_GrSurfaceOrigin, false, false, cs);
}
// Init with illegal values, so our first compare will fail, forcing us to compute
// the skcolorspace.
SkVideoDecoder::ConvertedColorSpace::ConvertedColorSpace()
: fPrimaries(AVCOL_PRI_NB), fTransfer(AVCOL_TRC_NB)
{}
void SkVideoDecoder::ConvertedColorSpace::update(AVColorPrimaries primaries,
AVColorTransferCharacteristic transfer) {
if (fPrimaries != primaries || fTransfer != transfer) {
fPrimaries = primaries;
fTransfer = transfer;
fCS = make_colorspace(primaries, transfer);
}
}
double SkVideoDecoder::computeTimeStamp(const AVFrame* frame) const {
AVRational base = fFormatCtx->streams[fStreamIndex]->time_base;
return 1.0 * frame->pts * base.num / base.den;
}
sk_sp<SkImage> SkVideoDecoder::convertFrame(const AVFrame* frame) {
auto yuv_space = get_yuvspace(frame->colorspace);
// we have a 1-entry cache for converting colorspaces
fCSCache.update(frame->color_primaries, frame->color_trc);
// Are these always true? If so, we don't need to check our "cache" on each frame...
SkASSERT(fDecoderCtx->colorspace == frame->colorspace);
SkASSERT(fDecoderCtx->color_primaries == frame->color_primaries);
SkASSERT(fDecoderCtx->color_trc == frame->color_trc);
// Is this always true? If so, we might take advantage of it, knowing up-front if we support
// the format for the whole stream, in which case we might have to ask ffmpeg to convert it
// to something more reasonable (for us)...
SkASSERT(fDecoderCtx->pix_fmt == frame->format);
switch (frame->format) {
case AV_PIX_FMT_YUV420P:
return make_yuv_420(fGr, frame->width, frame->height, frame->data, frame->linesize,
yuv_space, fCSCache.fCS);
break;
default:
SkDebugf("unsupported format (for now)\n");
}
return nullptr;
}
sk_sp<SkImage> SkVideoDecoder::nextImage(double* timeStamp) {
double dummyTimeStampStorage = 0;
if (!timeStamp) {
timeStamp = &dummyTimeStampStorage;
}
if (fFormatCtx == nullptr) {
return nullptr;
}
if (fMode == kProcessing_Mode) {
// We sit in a loop, waiting for the codec to have received enough data (packets)
// to have at least one frame available.
// Treat non-zero return as EOF (or error, which we will decide is also EOF)
while (!av_read_frame(fFormatCtx, &fPacket)) {
if (fPacket.stream_index != fStreamIndex) {
// got a packet for a stream other than our (video) stream, so continue
continue;
}
int ret = avcodec_send_packet(fDecoderCtx, &fPacket);
if (ret == AVERROR(EAGAIN)) {
// may signal that we have plenty already, encouraging us to call receive_frame
// so we don't treat this as an error.
ret = 0;
}
(void)check_err(ret); // we try to continue if there was an error
int silentList[] = {
-35, // Resource temporarily unavailable (need more packets)
0,
};
if (check_err(avcodec_receive_frame(fDecoderCtx, fFrame), silentList)) {
// this may be just "needs more input", so we try to continue
} else {
*timeStamp = this->computeTimeStamp(fFrame);
return this->convertFrame(fFrame);
}
}
fMode = kDraining_Mode;
(void)avcodec_send_packet(fDecoderCtx, nullptr); // signal to start draining
}
if (fMode == kDraining_Mode) {
if (avcodec_receive_frame(fDecoderCtx, fFrame) >= 0) {
*timeStamp = this->computeTimeStamp(fFrame);
return this->convertFrame(fFrame);
}
// else we decide we're done
fMode = kDone_Mode;
}
return nullptr;
}
SkVideoDecoder::SkVideoDecoder(GrContext* gr) : fGr(gr) {}
SkVideoDecoder::~SkVideoDecoder() {
this->reset();
}
void SkVideoDecoder::reset() {
if (fFrame) {
av_frame_free(&fFrame);
fFrame = nullptr;
}
if (fDecoderCtx) {
avcodec_free_context(&fDecoderCtx);
fDecoderCtx = nullptr;
}
if (fFormatCtx) {
avformat_close_input(&fFormatCtx);
fFormatCtx = nullptr;
}
if (fStreamCtx) {
av_freep(&fStreamCtx->buffer);
avio_context_free(&fStreamCtx);
fStreamCtx = nullptr;
}
fStream.reset(nullptr);
fStreamIndex = -1;
fMode = kDone_Mode;
}
bool SkVideoDecoder::loadStream(std::unique_ptr<SkStream> stream) {
this->reset();
if (!stream) {
return false;
}
int bufferSize = 4 * 1024;
uint8_t* buffer = (uint8_t*)av_malloc(bufferSize);
if (!buffer) {
return false;
}
fStream = std::move(stream);
fStreamCtx = avio_alloc_context(buffer, bufferSize, 0, fStream.get(),
skstream_read_packet, nullptr, skstream_seek_packet);
if (!fStreamCtx) {
av_freep(buffer);
this->reset();
return false;
}
fFormatCtx = avformat_alloc_context();
if (!fFormatCtx) {
this->reset();
return false;
}
fFormatCtx->pb = fStreamCtx;
int err = avformat_open_input(&fFormatCtx, nullptr, nullptr, nullptr);
if (err < 0) {
SkDebugf("avformat_open_input failed %d\n", err);
return false;
}
AVCodec* codec;
fStreamIndex = av_find_best_stream(fFormatCtx, AVMEDIA_TYPE_VIDEO, -1, -1, &codec, 0);
if (fStreamIndex < 0) {
SkDebugf("av_find_best_stream failed %d\n", fStreamIndex);
this->reset();
return false;
}
SkASSERT(codec);
fDecoderCtx = avcodec_alloc_context3(codec);
AVStream* strm = fFormatCtx->streams[fStreamIndex];
if ((err = avcodec_parameters_to_context(fDecoderCtx, strm->codecpar)) < 0) {
SkDebugf("avcodec_parameters_to_context failed %d\n", err);
this->reset();
return false;
}
if ((err = avcodec_open2(fDecoderCtx, codec, nullptr)) < 0) {
SkDebugf("avcodec_open2 failed %d\n", err);
this->reset();
return false;
}
fFrame = av_frame_alloc();
SkASSERT(fFrame);
av_init_packet(&fPacket); // is there a "free" call?
fMode = kProcessing_Mode;
return true;
}
SkISize SkVideoDecoder::dimensions() const {
if (!fFormatCtx) {
return {0, 0};
}
AVStream* strm = fFormatCtx->streams[fStreamIndex];
return {strm->codecpar->width, strm->codecpar->height};
}
double SkVideoDecoder::duration() const {
if (!fFormatCtx) {
return 0;
}
AVStream* strm = fFormatCtx->streams[fStreamIndex];
AVRational base = strm->time_base;
return 1.0 * strm->duration * base.num / base.den;
}
bool SkVideoDecoder::rewind() {
auto stream = std::move(fStream);
this->reset();
if (stream) {
stream->rewind();
}
return this->loadStream(std::move(stream));
}