sgienc.c 5.35 KB
Newer Older
1 2 3 4
/*
 * SGI image encoder
 * Todd Kirby <doubleshot@pacbell.net>
 *
5
 * This file is part of Libav.
6
 *
7
 * Libav is free software; you can redistribute it and/or
8 9 10 11
 * 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.
 *
12
 * Libav is distributed in the hope that it will be useful,
13 14 15 16 17
 * 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
18
 * License along with Libav; if not, write to the Free Software
19 20 21 22 23
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 */

#include "avcodec.h"
#include "bytestream.h"
24
#include "internal.h"
25 26 27 28 29 30 31 32 33 34
#include "sgi.h"
#include "rle.h"

#define SGI_SINGLE_CHAN 2
#define SGI_MULTI_CHAN 3

typedef struct SgiContext {
    AVFrame picture;
} SgiContext;

35 36
static av_cold int encode_init(AVCodecContext *avctx)
{
37 38 39 40 41 42 43 44
    SgiContext *s = avctx->priv_data;

    avcodec_get_frame_defaults(&s->picture);
    avctx->coded_frame = &s->picture;

    return 0;
}

45 46
static int encode_frame(AVCodecContext *avctx, AVPacket *pkt,
                        const AVFrame *frame, int *got_packet)
47
{
48 49
    SgiContext *s = avctx->priv_data;
    AVFrame * const p = &s->picture;
50 51
    uint8_t *offsettab, *lengthtab, *in_buf, *encode_buf, *buf;
    int x, y, z, length, tablesize, ret;
52
    unsigned int width, height, depth, dimension;
53
    unsigned char *end_buf;
54

55
    *p = *frame;
56
    p->pict_type = AV_PICTURE_TYPE_I;
57 58
    p->key_frame = 1;

59
    width  = avctx->width;
60 61 62
    height = avctx->height;

    switch (avctx->pix_fmt) {
63 64 65 66 67 68 69 70 71 72 73 74 75 76
    case PIX_FMT_GRAY8:
        dimension = SGI_SINGLE_CHAN;
        depth     = SGI_GRAYSCALE;
        break;
    case PIX_FMT_RGB24:
        dimension = SGI_MULTI_CHAN;
        depth     = SGI_RGB;
        break;
    case PIX_FMT_RGBA:
        dimension = SGI_MULTI_CHAN;
        depth     = SGI_RGBA;
        break;
    default:
        return AVERROR_INVALIDDATA;
77 78 79
    }

    tablesize = depth * height * 4;
80 81 82 83 84 85 86 87 88
    length = SGI_HEADER_SIZE;
    if (avctx->coder_type == FF_CODER_TYPE_RAW)
        length += depth * height * width;
    else // assume ff_rl_encode() produces at most 2x size of input
        length += tablesize * 2 + depth * height * (2 * width + 1);

    if ((ret = ff_alloc_packet(pkt, length)) < 0) {
        av_log(avctx, AV_LOG_ERROR, "Error getting output packet of size %d.\n", length);
        return ret;
89
    }
90 91
    buf     = pkt->data;
    end_buf = pkt->data + pkt->size;
92 93 94

    /* Encode header. */
    bytestream_put_be16(&buf, SGI_MAGIC);
95
    bytestream_put_byte(&buf, avctx->coder_type != FF_CODER_TYPE_RAW); /* RLE 1 - VERBATIM 0*/
96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117
    bytestream_put_byte(&buf, 1); /* bytes_per_channel */
    bytestream_put_be16(&buf, dimension);
    bytestream_put_be16(&buf, width);
    bytestream_put_be16(&buf, height);
    bytestream_put_be16(&buf, depth);

    /* The rest are constant in this implementation. */
    bytestream_put_be32(&buf, 0L); /* pixmin */
    bytestream_put_be32(&buf, 255L); /* pixmax */
    bytestream_put_be32(&buf, 0L); /* dummy */

    /* name */
    memset(buf, 0, SGI_HEADER_SIZE);
    buf += 80;

     /* colormap */
    bytestream_put_be32(&buf, 0L);

    /* The rest of the 512 byte header is unused. */
    buf += 404;
    offsettab = buf;

118
    if (avctx->coder_type  != FF_CODER_TYPE_RAW) {
119 120 121
        /* Skip RLE offset table. */
        buf += tablesize;
        lengthtab = buf;
122

123 124
        /* Skip RLE length table. */
        buf += tablesize;
125

126
        /* Make an intermediate consecutive buffer. */
127
        if (!(encode_buf = av_malloc(width)))
128
            return -1;
129

130 131
        for (z = 0; z < depth; z++) {
            in_buf = p->data[0] + p->linesize[0] * (height - 1) + z;
132

133
            for (y = 0; y < height; y++) {
134
                bytestream_put_be32(&offsettab, buf - pkt->data);
135

136 137
                for (x = 0; x < width; x++)
                    encode_buf[x] = in_buf[depth * x];
138

139 140 141 142
                if ((length = ff_rle_encode(buf, end_buf - buf - 1, encode_buf, 1, width, 0, 0, 0x80, 0)) < 1) {
                    av_free(encode_buf);
                    return -1;
                }
143

144 145 146 147 148
                buf += length;
                bytestream_put_byte(&buf, 0);
                bytestream_put_be32(&lengthtab, length + 1);
                in_buf -= p->linesize[0];
            }
149 150
        }

151
        av_free(encode_buf);
152 153 154
    } else {
        for (z = 0; z < depth; z++) {
            in_buf = p->data[0] + p->linesize[0] * (height - 1) + z;
155

156 157 158
            for (y = 0; y < height; y++) {
                for (x = 0; x < width * depth; x += depth)
                    bytestream_put_byte(&buf, in_buf[x]);
159

160
                in_buf -= p->linesize[0];
161 162
            }
        }
163
    }
164

165
    /* total length */
166 167 168 169 170
    pkt->size = buf - pkt->data;
    pkt->flags |= AV_PKT_FLAG_KEY;
    *got_packet = 1;

    return 0;
171 172
}

173
AVCodec ff_sgi_encoder = {
174 175
    .name           = "sgi",
    .type           = AVMEDIA_TYPE_VIDEO,
176
    .id             = AV_CODEC_ID_SGI,
177 178
    .priv_data_size = sizeof(SgiContext),
    .init           = encode_init,
179
    .encode2        = encode_frame,
180 181 182 183
    .pix_fmts       = (const enum PixelFormat[]){
        PIX_FMT_RGB24, PIX_FMT_RGBA, PIX_FMT_GRAY8, PIX_FMT_NONE
    },
    .long_name      = NULL_IF_CONFIG_SMALL("SGI image"),
184
};