Add FITS Encoder
[ffmpeg.git] / libavcodec / fitsenc.c
1 /*
2  * FITS image encoder
3  * Copyright (c) 2017 Paras Chadha
4  *
5  * This file is part of FFmpeg.
6  *
7  * FFmpeg is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * FFmpeg is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with FFmpeg; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21
22 /**
23  * @file
24  * FITS image encoder
25  *
26  * Specification: https://fits.gsfc.nasa.gov/fits_standard.html Version 3.0
27  *
28  * RGBA images are encoded as planes in RGBA order. So, NAXIS3 is 3 or 4 for them.
29  * Also CTYPE3 = 'RGB ' is added to the header to distinguish them from 3d images.
30  */
31
32 #include "libavutil/intreadwrite.h"
33 #include "avcodec.h"
34 #include "bytestream.h"
35 #include "internal.h"
36
37 static int fits_encode_frame(AVCodecContext *avctx, AVPacket *pkt,
38                             const AVFrame *pict, int *got_packet)
39 {
40     AVFrame * const p = (AVFrame *)pict;
41     uint8_t *bytestream, *bytestream_start, *ptr;
42     const uint16_t flip = (1 << 15);
43     uint64_t data_size = 0, padded_data_size = 0;
44     int ret, bitpix, naxis3 = 1, i, j, k, bytes_left;
45     int map[] = {2, 0, 1, 3}; // mapping from GBRA -> RGBA as RGBA is to be stored in FITS file..
46
47     switch (avctx->pix_fmt) {
48     case AV_PIX_FMT_GRAY8:
49     case AV_PIX_FMT_GRAY16BE:
50         map[0] = 0; // grayscale images should be directly mapped
51         if (avctx->pix_fmt == AV_PIX_FMT_GRAY8) {
52             bitpix = 8;
53         } else {
54             bitpix = 16;
55         }
56         break;
57     case AV_PIX_FMT_GBRP:
58     case AV_PIX_FMT_GBRAP:
59         bitpix = 8;
60         if (avctx->pix_fmt == AV_PIX_FMT_GBRP) {
61             naxis3 = 3;
62         } else {
63             naxis3 = 4;
64         }
65         break;
66     case AV_PIX_FMT_GBRP16BE:
67     case AV_PIX_FMT_GBRAP16BE:
68         bitpix = 16;
69         if (avctx->pix_fmt == AV_PIX_FMT_GBRP16BE) {
70             naxis3 = 3;
71         } else {
72             naxis3 = 4;
73         }
74         break;
75     default:
76         av_log(avctx, AV_LOG_ERROR, "unsupported pixel format\n");
77         return AVERROR(EINVAL);
78     }
79
80     data_size = (bitpix >> 3) * avctx->height * avctx->width * naxis3;
81     padded_data_size = ((data_size + 2879) / 2880 ) * 2880;
82
83     if ((ret = ff_alloc_packet2(avctx, pkt, padded_data_size, 0)) < 0)
84         return ret;
85
86     bytestream_start =
87     bytestream       = pkt->data;
88
89     for (k = 0; k < naxis3; k++) {
90         for (i = 0; i < avctx->height; i++) {
91             ptr = p->data[map[k]] + (avctx->height - i - 1) * p->linesize[map[k]];
92             if (bitpix == 16) {
93                 for (j = 0; j < avctx->width; j++) {
94                     // subtracting bzero is equivalent to first bit flip
95                     bytestream_put_be16(&bytestream, AV_RB16(ptr) ^ flip);
96                     ptr += 2;
97                 }
98             } else {
99                 memcpy(bytestream, ptr, avctx->width);
100                 bytestream += avctx->width;
101             }
102         }
103     }
104
105     bytes_left = padded_data_size - data_size;
106     memset(bytestream, 0, bytes_left);
107     bytestream += bytes_left;
108
109     pkt->size   = bytestream - bytestream_start;
110     pkt->flags |= AV_PKT_FLAG_KEY;
111     *got_packet = 1;
112
113     return 0;
114 }
115
116 AVCodec ff_fits_encoder = {
117     .name           = "fits",
118     .long_name      = NULL_IF_CONFIG_SMALL("Flexible Image Transport System"),
119     .type           = AVMEDIA_TYPE_VIDEO,
120     .id             = AV_CODEC_ID_FITS,
121     .encode2        = fits_encode_frame,
122     .pix_fmts       = (const enum AVPixelFormat[]) { AV_PIX_FMT_GBRAP16BE,
123                                                      AV_PIX_FMT_GBRP16BE,
124                                                      AV_PIX_FMT_GBRP,
125                                                      AV_PIX_FMT_GBRAP,
126                                                      AV_PIX_FMT_GRAY16BE,
127                                                      AV_PIX_FMT_GRAY8,
128                                                      AV_PIX_FMT_NONE },
129 };