[FFmpeg-devel] [PATCH] Add FITS Decoder
Paras Chadha
paraschadha18 at gmail.com
Sat Aug 19 23:42:21 EEST 2017
Signed-off-by: Paras Chadha <paraschadha18 at gmail.com>
---
Add FATE coverage
Changelog | 1 +
doc/general.texi | 2 +
libavcodec/Makefile | 2 +
libavcodec/allcodecs.c | 1 +
libavcodec/avcodec.h | 1 +
libavcodec/codec_desc.c | 7 +
libavcodec/fits.c | 203 ++++++++++++++++++++++++++
libavcodec/fits.h | 79 ++++++++++
libavcodec/fitsdec.c | 318 +++++++++++++++++++++++++++++++++++++++++
libavcodec/version.h | 2 +-
tests/Makefile | 1 +
tests/fate/fits.mak | 14 ++
tests/ref/fate/fitsdec-gbrap16 | 6 +
tests/ref/fate/fitsdec-gbrp | 6 +
tests/ref/fate/fitsdec-gbrp16 | 6 +
tests/ref/fate/fitsdec-gray | 6 +
tests/ref/fate/fitsdec-gray16 | 6 +
tests/ref/fate/fitsdec-multi | 10 ++
18 files changed, 670 insertions(+), 1 deletion(-)
create mode 100644 libavcodec/fits.c
create mode 100644 libavcodec/fits.h
create mode 100644 libavcodec/fitsdec.c
create mode 100644 tests/fate/fits.mak
create mode 100644 tests/ref/fate/fitsdec-gbrap16
create mode 100644 tests/ref/fate/fitsdec-gbrp
create mode 100644 tests/ref/fate/fitsdec-gbrp16
create mode 100644 tests/ref/fate/fitsdec-gray
create mode 100644 tests/ref/fate/fitsdec-gray16
create mode 100644 tests/ref/fate/fitsdec-multi
diff --git a/Changelog b/Changelog
index 7a6987a..9c7a533 100644
--- a/Changelog
+++ b/Changelog
@@ -33,6 +33,7 @@ version <next>:
- tlut2 video filter
- floodfill video filter
- pseudocolor video filter
+- FITS demuxer and decoder
version 3.3:
- CrystalHD decoder moved to new decode API
diff --git a/doc/general.texi b/doc/general.texi
index 036c8c2..01402cb 100644
--- a/doc/general.texi
+++ b/doc/general.texi
@@ -592,6 +592,8 @@ following image formats are supported:
@tab Digital Picture Exchange
@item EXR @tab @tab X
@tab OpenEXR
+ at item FITS @tab @tab X
+ @tab Flexible Image Transport System
@item JPEG @tab X @tab X
@tab Progressive JPEG is not supported.
@item JPEG 2000 @tab X @tab X
diff --git a/libavcodec/Makefile b/libavcodec/Makefile
index b0c39ac..42eec07 100644
--- a/libavcodec/Makefile
+++ b/libavcodec/Makefile
@@ -291,6 +291,7 @@ OBJS-$(CONFIG_FFV1_DECODER) += ffv1dec.o ffv1.o
OBJS-$(CONFIG_FFV1_ENCODER) += ffv1enc.o ffv1.o
OBJS-$(CONFIG_FFWAVESYNTH_DECODER) += ffwavesynth.o
OBJS-$(CONFIG_FIC_DECODER) += fic.o
+OBJS-$(CONFIG_FITS_DECODER) += fitsdec.o fits.o
OBJS-$(CONFIG_FLAC_DECODER) += flacdec.o flacdata.o flac.o
OBJS-$(CONFIG_FLAC_ENCODER) += flacenc.o flacdata.o flac.o vorbis_data.o
OBJS-$(CONFIG_FLASHSV_DECODER) += flashsv.o
@@ -846,6 +847,7 @@ OBJS-$(CONFIG_ISO_MEDIA) += mpeg4audio.o mpegaudiodata.o
OBJS-$(CONFIG_ADTS_MUXER) += mpeg4audio.o
OBJS-$(CONFIG_CAF_DEMUXER) += ac3tab.o
OBJS-$(CONFIG_DNXHD_DEMUXER) += dnxhddata.o
+OBJS-$(CONFIG_FITS_DEMUXER) += fits.o
OBJS-$(CONFIG_FLV_DEMUXER) += mpeg4audio.o
OBJS-$(CONFIG_LATM_MUXER) += mpeg4audio.o
OBJS-$(CONFIG_MATROSKA_AUDIO_MUXER) += mpeg4audio.o
diff --git a/libavcodec/allcodecs.c b/libavcodec/allcodecs.c
index 4712592..8678ac2 100644
--- a/libavcodec/allcodecs.c
+++ b/libavcodec/allcodecs.c
@@ -192,6 +192,7 @@ static void register_all(void)
REGISTER_ENCDEC (FFV1, ffv1);
REGISTER_ENCDEC (FFVHUFF, ffvhuff);
REGISTER_DECODER(FIC, fic);
+ REGISTER_DECODER(FITS, fits);
REGISTER_ENCDEC (FLASHSV, flashsv);
REGISTER_ENCDEC (FLASHSV2, flashsv2);
REGISTER_DECODER(FLIC, flic);
diff --git a/libavcodec/avcodec.h b/libavcodec/avcodec.h
index c594993..b28002f 100644
--- a/libavcodec/avcodec.h
+++ b/libavcodec/avcodec.h
@@ -447,6 +447,7 @@ enum AVCodecID {
AV_CODEC_ID_SRGC,
AV_CODEC_ID_SVG,
AV_CODEC_ID_GDV,
+ AV_CODEC_ID_FITS,
/* various PCM "codecs" */
AV_CODEC_ID_FIRST_AUDIO = 0x10000, ///< A dummy id pointing at the start of audio codecs
diff --git a/libavcodec/codec_desc.c b/libavcodec/codec_desc.c
index 6f43b68..2fea680 100644
--- a/libavcodec/codec_desc.c
+++ b/libavcodec/codec_desc.c
@@ -1464,6 +1464,13 @@ static const AVCodecDescriptor codec_descriptors[] = {
AV_CODEC_PROP_LOSSLESS,
},
{
+ .id = AV_CODEC_ID_FITS,
+ .type = AVMEDIA_TYPE_VIDEO,
+ .name = "fits",
+ .long_name = NULL_IF_CONFIG_SMALL("FITS image"),
+ .props = AV_CODEC_PROP_INTRA_ONLY | AV_CODEC_PROP_LOSSLESS,
+ },
+ {
.id = AV_CODEC_ID_GIF,
.type = AVMEDIA_TYPE_VIDEO,
.name = "gif",
diff --git a/libavcodec/fits.c b/libavcodec/fits.c
new file mode 100644
index 0000000..fc6fd03
--- /dev/null
+++ b/libavcodec/fits.c
@@ -0,0 +1,203 @@
+/*
+ * FITS implementation of common functions
+ * Copyright (c) 2017 Paras Chadha
+ *
+ * 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 "avcodec.h"
+#include "libavutil/dict.h"
+#include "fits.h"
+
+int avpriv_fits_header_init(FITSHeader *header, FITSHeaderState state)
+{
+ header->state = state;
+ header->naxis_index = 0;
+ header->blank_found = 0;
+ header->pcount = 0;
+ header->gcount = 1;
+ header->groups = 0;
+ header->rgb = 0;
+ header->image_extension = 0;
+ header->bscale = 1.0;
+ header->bzero = 0;
+ header->data_min_found = 0;
+ header->data_max_found = 0;
+ return 0;
+}
+
+static int dict_set_if_not_null(AVDictionary ***metadata, char *keyword, char *value)
+{
+ if (metadata)
+ av_dict_set(*metadata, keyword, value, 0);
+ return 0;
+}
+
+/**
+ * Extract keyword and value from a header line (80 bytes) and store them in keyword and value strings respectively
+ * @param ptr8 pointer to the data
+ * @param keyword pointer to the char array in which keyword is to be stored
+ * @param value pointer to the char array in which value is to be stored
+ * @return 0 if calculated successfully otherwise AVERROR_INVALIDDATA
+ */
+static int read_keyword_value(const uint8_t *ptr8, char *keyword, char *value)
+{
+ int i;
+
+ for (i = 0; i < 8 && ptr8[i] != ' '; i++) {
+ keyword[i] = ptr8[i];
+ }
+ keyword[i] = '\0';
+
+ if (ptr8[8] == '=') {
+ i = 10;
+ while (i < 80 && ptr8[i] == ' ') {
+ i++;
+ }
+
+ if (i < 80) {
+ *value++ = ptr8[i];
+ i++;
+ if (ptr8[i-1] == '\'') {
+ for (; i < 80 && ptr8[i] != '\''; i++) {
+ *value++ = ptr8[i];
+ }
+ *value++ = '\'';
+ } else if (ptr8[i-1] == '(') {
+ for (; i < 80 && ptr8[i] != ')'; i++) {
+ *value++ = ptr8[i];
+ }
+ *value++ = ')';
+ } else {
+ for (; i < 80 && ptr8[i] != ' ' && ptr8[i] != '/'; i++) {
+ *value++ = ptr8[i];
+ }
+ }
+ }
+ }
+ *value = '\0';
+ return 0;
+}
+
+#define CHECK_KEYWORD(key) \
+ if (strcmp(keyword, key)) { \
+ av_log(avcl, AV_LOG_ERROR, "expected %s keyword, found %s = %s\n", key, keyword, value); \
+ return AVERROR_INVALIDDATA; \
+ }
+
+#define CHECK_VALUE(key, val) \
+ if (sscanf(value, "%d", &header->val) != 1) { \
+ av_log(avcl, AV_LOG_ERROR, "invalid value of %s keyword, %s = %s\n", key, keyword, value); \
+ return AVERROR_INVALIDDATA; \
+ }
+
+int avpriv_fits_header_parse_line(void *avcl, FITSHeader *header, const uint8_t line[80], AVDictionary ***metadata)
+{
+ int dim_no, ret;
+ int64_t t;
+ double d;
+ char keyword[10], value[72], c;
+
+ read_keyword_value(line, keyword, value);
+ switch (header->state) {
+ case STATE_SIMPLE:
+ CHECK_KEYWORD("SIMPLE");
+
+ if (value[0] == 'F') {
+ av_log(avcl, AV_LOG_WARNING, "not a standard FITS file\n");
+ } else if (value[0] != 'T') {
+ av_log(avcl, AV_LOG_ERROR, "invalid value of SIMPLE keyword, SIMPLE = %c\n", value[0]);
+ return AVERROR_INVALIDDATA;
+ }
+
+ header->state = STATE_BITPIX;
+ break;
+ case STATE_XTENSION:
+ CHECK_KEYWORD("XTENSION");
+
+ if (!strcmp(value, "'IMAGE '")) {
+ header->image_extension = 1;
+ }
+
+ header->state = STATE_BITPIX;
+ break;
+ case STATE_BITPIX:
+ CHECK_KEYWORD("BITPIX");
+ CHECK_VALUE("BITPIX", bitpix);
+ dict_set_if_not_null(metadata, keyword, value);
+
+ header->state = STATE_NAXIS;
+ break;
+ case STATE_NAXIS:
+ CHECK_KEYWORD("NAXIS");
+ CHECK_VALUE("NAXIS", naxis);
+ dict_set_if_not_null(metadata, keyword, value);
+
+ if (header->naxis) {
+ header->state = STATE_NAXIS_N;
+ } else {
+ header->state = STATE_REST;
+ }
+ break;
+ case STATE_NAXIS_N:
+ ret = sscanf(keyword, "NAXIS%d", &dim_no);
+ if (ret != 1 || dim_no != header->naxis_index + 1) {
+ av_log(avcl, AV_LOG_ERROR, "expected NAXIS%d keyword, found %s = %s\n", header->naxis_index + 1, keyword, value);
+ return AVERROR_INVALIDDATA;
+ }
+
+ if (sscanf(value, "%d", &header->naxisn[header->naxis_index]) != 1) {
+ av_log(avcl, AV_LOG_ERROR, "invalid value of NAXIS%d keyword, %s = %s\n", header->naxis_index + 1, keyword, value);
+ return AVERROR_INVALIDDATA;
+ }
+
+ dict_set_if_not_null(metadata, keyword, value);
+ header->naxis_index++;
+ if (header->naxis_index == header->naxis) {
+ header->state = STATE_REST;
+ }
+ break;
+ case STATE_REST:
+ if (!strcmp(keyword, "BLANK") && sscanf(value, "%"SCNd64"", &t) == 1) {
+ header->blank = t;
+ header->blank_found = 1;
+ } else if (!strcmp(keyword, "BSCALE") && sscanf(value, "%lf", &d) == 1) {
+ header->bscale = d;
+ } else if (!strcmp(keyword, "BZERO") && sscanf(value, "%lf", &d) == 1) {
+ header->bzero = d;
+ } else if (!strcmp(keyword, "CTYPE3") && !strncmp(value, "'RGB", 4)) {
+ header->rgb = 1;
+ } else if (!strcmp(keyword, "DATAMAX") && sscanf(value, "%lf", &d) == 1) {
+ header->data_max_found = 1;
+ header->data_max = d;
+ } else if (!strcmp(keyword, "DATAMIN") && sscanf(value, "%lf", &d) == 1) {
+ header->data_min_found = 1;
+ header->data_min = d;
+ } else if (!strcmp(keyword, "END")) {
+ return 1;
+ } else if (!strcmp(keyword, "GROUPS") && sscanf(value, "%c", &c) == 1) {
+ header->groups = (c == 'T');
+ } else if (!strcmp(keyword, "GCOUNT") && sscanf(value, "%"SCNd64"", &t) == 1) {
+ header->gcount = t;
+ } else if (!strcmp(keyword, "PCOUNT") && sscanf(value, "%"SCNd64"", &t) == 1) {
+ header->pcount = t;
+ }
+ dict_set_if_not_null(metadata, keyword, value);
+ break;
+ }
+ return 0;
+}
diff --git a/libavcodec/fits.h b/libavcodec/fits.h
new file mode 100644
index 0000000..2cf9e7c
--- /dev/null
+++ b/libavcodec/fits.h
@@ -0,0 +1,79 @@
+/*
+ * FITS image format common prototypes and structures
+ * Copyright (c) 2017 Paras Chadha
+ *
+ * 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
+ */
+
+#ifndef AVCODEC_FITS_H
+#define AVCODEC_FITS_H
+
+typedef enum FITSHeaderState {
+ STATE_SIMPLE,
+ STATE_XTENSION,
+ STATE_BITPIX,
+ STATE_NAXIS,
+ STATE_NAXIS_N,
+ STATE_PCOUNT,
+ STATE_GCOUNT,
+ STATE_REST,
+} FITSHeaderState;
+
+/**
+ * Structure to store the header keywords in FITS file
+ */
+typedef struct FITSHeader {
+ FITSHeaderState state;
+ unsigned naxis_index;
+ int bitpix;
+ int64_t blank;
+ int blank_found;
+ int naxis;
+ int naxisn[999];
+ int pcount;
+ int gcount;
+ int groups;
+ int rgb; /**< 1 if file contains RGB image, 0 otherwise */
+ int image_extension;
+ double bscale;
+ double bzero;
+ int data_min_found;
+ double data_min;
+ int data_max_found;
+ double data_max;
+} FITSHeader;
+
+
+/**
+ * Initialize a single header line
+ * @param header pointer to the header
+ * @param state current state of parsing the header
+ * @return 0 if successful otherwise AVERROR_INVALIDDATA
+ */
+int avpriv_fits_header_init(FITSHeader *header, FITSHeaderState state);
+
+/**
+ * Parse a single header line
+ * @param avcl used in av_log
+ * @param header pointer to the header
+ * @param line one header line
+ * @param metadata used to store metadata while decoding
+ * @return 0 if successful otherwise AVERROR_INVALIDDATA
+ */
+int avpriv_fits_header_parse_line(void *avcl, FITSHeader *header, const uint8_t line[80], AVDictionary ***metadata);
+
+#endif /* AVCODEC_FITS_H */
diff --git a/libavcodec/fitsdec.c b/libavcodec/fitsdec.c
new file mode 100644
index 0000000..616a837
--- /dev/null
+++ b/libavcodec/fitsdec.c
@@ -0,0 +1,318 @@
+/*
+ * FITS image decoder
+ * Copyright (c) 2017 Paras Chadha
+ *
+ * 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
+ * FITS image decoder
+ *
+ * Specification: https://fits.gsfc.nasa.gov/fits_standard.html Version 3.0
+ *
+ * Support all 2d images alongwith, bzero, bscale and blank keywords.
+ * RGBA images are supported as NAXIS3 = 3 or 4 i.e. Planes in RGBA order. Also CTYPE = 'RGB ' should be present.
+ * Also to interpret data, values are linearly scaled using min-max scaling but not RGB images.
+ */
+
+#include "avcodec.h"
+#include "internal.h"
+#include <float.h>
+#include "libavutil/intreadwrite.h"
+#include "libavutil/intfloat.h"
+#include "libavutil/dict.h"
+#include "libavutil/opt.h"
+#include "fits.h"
+
+typedef struct FITSContext {
+ const AVClass *class;
+ int blank_val;
+} FITSContext;
+
+/**
+ * Calculate the data_min and data_max values from the data.
+ * This is called if the values are not present in the header.
+ * @param ptr8 pointer to the data
+ * @param header pointer to the header
+ * @param end pointer to end of packet
+ * @return 0 if calculated successfully otherwise AVERROR_INVALIDDATA
+ */
+static int fill_data_min_max(const uint8_t *ptr8, FITSHeader *header, const uint8_t *end)
+{
+ uint8_t t8;
+ int16_t t16;
+ int32_t t32;
+ int64_t t64;
+ float tflt;
+ double tdbl;
+ int i, j;
+
+ header->data_min = DBL_MAX;
+ header->data_max = DBL_MIN;
+ switch (header->bitpix) {
+#define CASE_N(a, t, rd) \
+ case a: \
+ for (i = 0; i < header->naxisn[1]; i++) { \
+ for (j = 0; j < header->naxisn[0]; j++) { \
+ t = rd; \
+ if (!header->blank_found || t != header->blank) { \
+ if (t > header->data_max) \
+ header->data_max = t; \
+ if (t < header->data_min) \
+ header->data_min = t; \
+ } \
+ ptr8 += abs(a) >> 3; \
+ } \
+ } \
+ break
+
+ CASE_N(-64, tdbl, av_int2double(AV_RB64(ptr8)));
+ CASE_N(-32, tflt, av_int2float(AV_RB32(ptr8)));
+ CASE_N(8, t8, ptr8[0]);
+ CASE_N(16, t16, AV_RB16(ptr8));
+ CASE_N(32, t32, AV_RB32(ptr8));
+ CASE_N(64, t64, AV_RB64(ptr8));
+ default:
+ return AVERROR_INVALIDDATA;
+ }
+ return 0;
+}
+
+/**
+ * Read the fits header and store the values in FITSHeader pointed by header
+ * @param avctx AVCodec context
+ * @param ptr pointer to pointer to the data
+ * @param header pointer to the FITSHeader
+ * @param end pointer to end of packet
+ * @param metadata pointer to pointer to AVDictionary to store metadata
+ * @return 0 if calculated successfully otherwise AVERROR_INVALIDDATA
+ */
+static int fits_read_header(AVCodecContext *avctx, const uint8_t **ptr, FITSHeader *header,
+ const uint8_t *end, AVDictionary **metadata)
+{
+ const uint8_t *ptr8 = *ptr;
+ int lines_read, bytes_left, i, ret;
+ size_t size;
+
+ lines_read = 1; // to account for first header line, SIMPLE or XTENSION which is not included in packet...
+ avpriv_fits_header_init(header, STATE_BITPIX);
+ do {
+ if (end - ptr8 < 80)
+ return AVERROR_INVALIDDATA;
+ ret = avpriv_fits_header_parse_line(avctx, header, ptr8, &metadata);
+ ptr8 += 80;
+ lines_read++;
+ } while (!ret);
+ if (ret < 0)
+ return ret;
+
+ bytes_left = (((lines_read + 35) / 36) * 36 - lines_read) * 80;
+ if (end - ptr8 < bytes_left)
+ return AVERROR_INVALIDDATA;
+ ptr8 += bytes_left;
+
+ if (header->rgb && (header->naxis != 3 || (header->naxisn[2] != 3 && header->naxisn[2] != 4))) {
+ av_log(avctx, AV_LOG_ERROR, "File contains RGB image but NAXIS = %d and NAXIS3 = %d\n", header->naxis, header->naxisn[2]);
+ return AVERROR_INVALIDDATA;
+ }
+
+ if (!header->rgb && header->naxis != 2) {
+ av_log(avctx, AV_LOG_ERROR, "unsupported number of dimensions, NAXIS = %d\n", header->naxis);
+ return AVERROR_INVALIDDATA;
+ }
+
+ if (header->blank_found && (header->bitpix == -32 || header->bitpix == -64)) {
+ av_log(avctx, AV_LOG_WARNING, "BLANK keyword found but BITPIX = %d\n. Ignoring BLANK", header->bitpix);
+ header->blank_found = 0;
+ }
+
+ size = abs(header->bitpix) >> 3;
+ for (i = 0; i < header->naxis; i++) {
+ if (header->naxisn[i] > SIZE_MAX / size) {
+ av_log(avctx, AV_LOG_ERROR, "unsupported size of FITS image");
+ return AVERROR_INVALIDDATA;
+ }
+ size *= header->naxisn[i];
+ }
+
+ if (end - ptr8 < size)
+ return AVERROR_INVALIDDATA;
+ *ptr = ptr8;
+
+ if (!header->rgb && (!header->data_min_found || !header->data_max_found)) {
+ ret = fill_data_min_max(ptr8, header, end);
+ if (ret < 0) {
+ av_log(avctx, AV_LOG_ERROR, "invalid BITPIX, %d\n", header->bitpix);
+ return ret;
+ }
+ } else {
+ /*
+ * instead of applying bscale and bzero to every element,
+ * we can do inverse transformation on data_min and data_max
+ */
+ header->data_min = (header->data_min - header->bzero) / header->bscale;
+ header->data_max = (header->data_max - header->bzero) / header->bscale;
+ }
+
+ return 0;
+}
+
+static int fits_decode_frame(AVCodecContext *avctx, void *data, int *got_frame, AVPacket *avpkt)
+{
+ AVFrame *p=data;
+ const uint8_t *ptr8 = avpkt->data, *end;
+ uint8_t t8;
+ int16_t t16;
+ int32_t t32;
+ int64_t t64;
+ float tflt;
+ double tdbl;
+ int ret, i, j, k;
+ int map[] = {2, 0, 1, 3}; // mapping from GBRA -> RGBA as RGBA is to be stored in FITS file..
+ uint8_t *dst8;
+ uint16_t *dst16;
+ uint64_t t;
+ FITSHeader header;
+ FITSContext * fitsctx = avctx->priv_data;
+
+ end = ptr8 + avpkt->size;
+ p->metadata = NULL;
+ ret = fits_read_header(avctx, &ptr8, &header, end, &p->metadata);
+ if (ret < 0)
+ return ret;
+
+ if (header.rgb) {
+ if (header.bitpix == 8) {
+ if (header.naxisn[2] == 3) {
+ avctx->pix_fmt = AV_PIX_FMT_GBRP;
+ } else {
+ avctx->pix_fmt = AV_PIX_FMT_GBRAP;
+ }
+ } else if (header.bitpix == 16) {
+ if (header.naxisn[2] == 3) {
+ avctx->pix_fmt = AV_PIX_FMT_GBRP16;
+ } else {
+ avctx->pix_fmt = AV_PIX_FMT_GBRAP16;
+ }
+ } else {
+ av_log(avctx, AV_LOG_ERROR, "unsupported BITPIX = %d\n", header.bitpix);
+ return AVERROR_INVALIDDATA;
+ }
+ } else {
+ if (header.bitpix == 8) {
+ avctx->pix_fmt = AV_PIX_FMT_GRAY8;
+ } else {
+ avctx->pix_fmt = AV_PIX_FMT_GRAY16;
+ }
+ }
+
+ if ((ret = ff_set_dimensions(avctx, header.naxisn[0], header.naxisn[1])) < 0)
+ return ret;
+
+ if ((ret = ff_get_buffer(avctx, p, 0)) < 0)
+ return ret;
+
+ /*
+ * FITS stores images with bottom row first. Therefore we have
+ * to fill the image from bottom to top.
+ */
+ if (header.rgb) {
+ switch(header.bitpix) {
+#define CASE_RGB(cas, dst, type, dref) \
+ case cas: \
+ for (k = 0; k < header.naxisn[2]; k++) { \
+ for (i = 0; i < avctx->height; i++) { \
+ dst = (type *) (p->data[map[k]] + (avctx->height - i - 1) * p->linesize[map[k]]); \
+ for (j = 0; j < avctx->width; j++) { \
+ t32 = dref(ptr8); \
+ if (!header.blank_found || t32 != header.blank) { \
+ t = t32 * header.bscale + header.bzero; \
+ } else { \
+ t = fitsctx->blank_val; \
+ } \
+ *dst++ = (type) t; \
+ ptr8 += cas >> 3; \
+ } \
+ } \
+ } \
+ break
+
+ CASE_RGB(8, dst8, uint8_t, *);
+ CASE_RGB(16, dst16, uint16_t, AV_RB16);
+ }
+ } else {
+ switch (header.bitpix) {
+#define CASE_GRAY(cas, dst, type, t, rd) \
+ case cas: \
+ for (i = 0; i < avctx->height; i++) { \
+ dst = (type *) (p->data[0] + (avctx->height-i-1)* p->linesize[0]); \
+ for (j = 0; j < avctx->width; j++) { \
+ t = rd; \
+ if (!header.blank_found || t != header.blank) { \
+ t = ((t - header.data_min) * ((1 << (sizeof(type) * 8)) - 1)) / (header.data_max - header.data_min); \
+ } else { \
+ t = fitsctx->blank_val; \
+ } \
+ *dst++ = (type) t; \
+ ptr8 += abs(cas) >> 3; \
+ } \
+ } \
+ break
+
+ CASE_GRAY(-64, dst16, uint16_t, tdbl, av_int2double(AV_RB64(ptr8)));
+ CASE_GRAY(-32, dst16, uint16_t, tflt, av_int2float(AV_RB32(ptr8)));
+ CASE_GRAY(8, dst8, uint8_t, t8, ptr8[0]);
+ CASE_GRAY(16, dst16, uint16_t, t16, AV_RB16(ptr8));
+ CASE_GRAY(32, dst16, uint16_t, t32, AV_RB32(ptr8));
+ CASE_GRAY(64, dst16, uint16_t, t64, AV_RB64(ptr8));
+ default:
+ av_log(avctx, AV_LOG_ERROR, "invalid BITPIX, %d\n", header.bitpix);
+ return AVERROR_INVALIDDATA;
+ }
+ }
+
+ p->key_frame = 1;
+ p->pict_type = AV_PICTURE_TYPE_I;
+
+ *got_frame = 1;
+
+ return avpkt->size;
+}
+
+static const AVOption fits_options[] = {
+ { "blank_value", "value that is used to replace BLANK pixels in data array", offsetof(FITSContext, blank_val), AV_OPT_TYPE_INT, { .i64 = 0 }, 0, 65535, AV_OPT_FLAG_DECODING_PARAM | AV_OPT_FLAG_VIDEO_PARAM},
+ { NULL },
+};
+
+static const AVClass fits_decoder_class = {
+ .class_name = "FITS decoder",
+ .item_name = av_default_item_name,
+ .option = fits_options,
+ .version = LIBAVUTIL_VERSION_INT,
+};
+
+AVCodec ff_fits_decoder = {
+ .name = "fits",
+ .type = AVMEDIA_TYPE_VIDEO,
+ .id = AV_CODEC_ID_FITS,
+ .priv_data_size = sizeof(FITSContext),
+ .decode = fits_decode_frame,
+ .capabilities = AV_CODEC_CAP_DR1,
+ .long_name = NULL_IF_CONFIG_SMALL("Flexible Image Transport System"),
+ .priv_class = &fits_decoder_class
+};
diff --git a/libavcodec/version.h b/libavcodec/version.h
index 02c4f41..7473000 100644
--- a/libavcodec/version.h
+++ b/libavcodec/version.h
@@ -28,7 +28,7 @@
#include "libavutil/version.h"
#define LIBAVCODEC_VERSION_MAJOR 57
-#define LIBAVCODEC_VERSION_MINOR 102
+#define LIBAVCODEC_VERSION_MINOR 103
#define LIBAVCODEC_VERSION_MICRO 100
#define LIBAVCODEC_VERSION_INT AV_VERSION_INT(LIBAVCODEC_VERSION_MAJOR, \
diff --git a/tests/Makefile b/tests/Makefile
index 30f05be..18fe9c5 100644
--- a/tests/Makefile
+++ b/tests/Makefile
@@ -131,6 +131,7 @@ include $(SRC_PATH)/tests/fate/fft.mak
include $(SRC_PATH)/tests/fate/fifo-muxer.mak
include $(SRC_PATH)/tests/fate/filter-audio.mak
include $(SRC_PATH)/tests/fate/filter-video.mak
+include $(SRC_PATH)/tests/fate/fits.mak
include $(SRC_PATH)/tests/fate/flac.mak
include $(SRC_PATH)/tests/fate/flvenc.mak
include $(SRC_PATH)/tests/fate/gapless.mak
diff --git a/tests/fate/fits.mak b/tests/fate/fits.mak
new file mode 100644
index 0000000..bd90c15
--- /dev/null
+++ b/tests/fate/fits.mak
@@ -0,0 +1,14 @@
+FATE_FITS += fate-fitsdec-multi
+fate-fitsdec-multi: CMD = framecrc -i $(TARGET_SAMPLES)/fits/fits-multi.fits -pix_fmt gbrap
+
+fate-fitsdec%: PIXFMT = $(word 3, $(subst -, ,$(@)))
+fate-fitsdec%: SRC = $(TARGET_SAMPLES)/fits/lena-$(PIXFMT).fits
+fate-fitsdec%: CMD = framecrc -i $(SRC) -pix_fmt $(PIXFMT)
+
+FATE_FITS_DEC_PIXFMT = gray gray16 gbrp gbrp16 gbrap16
+FATE_FITS += $(FATE_FITS_DEC_PIXFMT:%=fate-fitsdec-%)
+
+FATE_FITS-$(call DEMDEC, FITS, FITS) += $(FATE_FITS)
+
+FATE_SAMPLES_FFMPEG += $(FATE_FITS-yes)
+fate-fits: $(FATE_FITS-yes)
diff --git a/tests/ref/fate/fitsdec-gbrap16 b/tests/ref/fate/fitsdec-gbrap16
new file mode 100644
index 0000000..78abb5c
--- /dev/null
+++ b/tests/ref/fate/fitsdec-gbrap16
@@ -0,0 +1,6 @@
+#tb 0: 1/1
+#media_type 0: video
+#codec_id 0: rawvideo
+#dimensions 0: 128x128
+#sar 0: 0/1
+0, 0, 0, 1, 131072, 0x487894b2
diff --git a/tests/ref/fate/fitsdec-gbrp b/tests/ref/fate/fitsdec-gbrp
new file mode 100644
index 0000000..8767b67
--- /dev/null
+++ b/tests/ref/fate/fitsdec-gbrp
@@ -0,0 +1,6 @@
+#tb 0: 1/1
+#media_type 0: video
+#codec_id 0: rawvideo
+#dimensions 0: 128x128
+#sar 0: 0/1
+0, 0, 0, 1, 49152, 0x565c3dee
diff --git a/tests/ref/fate/fitsdec-gbrp16 b/tests/ref/fate/fitsdec-gbrp16
new file mode 100644
index 0000000..f6368f2
--- /dev/null
+++ b/tests/ref/fate/fitsdec-gbrp16
@@ -0,0 +1,6 @@
+#tb 0: 1/1
+#media_type 0: video
+#codec_id 0: rawvideo
+#dimensions 0: 128x128
+#sar 0: 0/1
+0, 0, 0, 1, 98304, 0x1b917bdc
diff --git a/tests/ref/fate/fitsdec-gray b/tests/ref/fate/fitsdec-gray
new file mode 100644
index 0000000..425b31f
--- /dev/null
+++ b/tests/ref/fate/fitsdec-gray
@@ -0,0 +1,6 @@
+#tb 0: 1/1
+#media_type 0: video
+#codec_id 0: rawvideo
+#dimensions 0: 128x128
+#sar 0: 0/1
+0, 0, 0, 1, 16384, 0xd788a2d2
diff --git a/tests/ref/fate/fitsdec-gray16 b/tests/ref/fate/fitsdec-gray16
new file mode 100644
index 0000000..9b028ac
--- /dev/null
+++ b/tests/ref/fate/fitsdec-gray16
@@ -0,0 +1,6 @@
+#tb 0: 1/1
+#media_type 0: video
+#codec_id 0: rawvideo
+#dimensions 0: 128x128
+#sar 0: 0/1
+0, 0, 0, 1, 32768, 0xc0c662c8
diff --git a/tests/ref/fate/fitsdec-multi b/tests/ref/fate/fitsdec-multi
new file mode 100644
index 0000000..f24f0ad
--- /dev/null
+++ b/tests/ref/fate/fitsdec-multi
@@ -0,0 +1,10 @@
+#tb 0: 1/1
+#media_type 0: video
+#codec_id 0: rawvideo
+#dimensions 0: 72x36
+#sar 0: 0/1
+0, 0, 0, 1, 10368, 0xb4490cc8
+0, 1, 1, 1, 10368, 0x37198e4f
+0, 2, 2, 1, 10368, 0x1e89afe7
+0, 3, 3, 1, 10368, 0x80127365
+0, 4, 4, 1, 10368, 0xfd2d07d1
--
2.4.11
More information about the ffmpeg-devel
mailing list