477 lines
12 KiB
C
477 lines
12 KiB
C
/*
|
|
* PNM image format
|
|
* Copyright (c) 2002, 2003 Fabrice Bellard.
|
|
*
|
|
* This library 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 of the License, or (at your option) any later version.
|
|
*
|
|
* This library 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 this library; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
|
*/
|
|
#include "avformat.h"
|
|
|
|
static inline int pnm_space(int c)
|
|
{
|
|
return (c == ' ' || c == '\n' || c == '\r' || c == '\t');
|
|
}
|
|
|
|
static void pnm_get(ByteIOContext *f, char *str, int buf_size)
|
|
{
|
|
char *s;
|
|
int c;
|
|
|
|
/* skip spaces and comments */
|
|
for(;;) {
|
|
c = url_fgetc(f);
|
|
if (c == '#') {
|
|
do {
|
|
c = url_fgetc(f);
|
|
} while (c != '\n' && c != URL_EOF);
|
|
} else if (!pnm_space(c)) {
|
|
break;
|
|
}
|
|
}
|
|
|
|
s = str;
|
|
while (c != URL_EOF && !pnm_space(c)) {
|
|
if ((s - str) < buf_size - 1)
|
|
*s++ = c;
|
|
c = url_fgetc(f);
|
|
}
|
|
*s = '\0';
|
|
}
|
|
|
|
static int pnm_read1(ByteIOContext *f,
|
|
int (*alloc_cb)(void *opaque, AVImageInfo *info), void *opaque,
|
|
int allow_yuv)
|
|
{
|
|
int i, n, linesize, h;
|
|
char buf1[32];
|
|
unsigned char *ptr;
|
|
AVImageInfo info1, *info = &info1;
|
|
int ret;
|
|
|
|
pnm_get(f, buf1, sizeof(buf1));
|
|
if (!strcmp(buf1, "P4")) {
|
|
info->pix_fmt = PIX_FMT_MONOWHITE;
|
|
} else if (!strcmp(buf1, "P5")) {
|
|
if (allow_yuv)
|
|
info->pix_fmt = PIX_FMT_YUV420P;
|
|
else
|
|
info->pix_fmt = PIX_FMT_GRAY8;
|
|
} else if (!strcmp(buf1, "P6")) {
|
|
info->pix_fmt = PIX_FMT_RGB24;
|
|
} else {
|
|
return AVERROR_INVALIDDATA;
|
|
}
|
|
pnm_get(f, buf1, sizeof(buf1));
|
|
info->width = atoi(buf1);
|
|
if (info->width <= 0)
|
|
return AVERROR_INVALIDDATA;
|
|
pnm_get(f, buf1, sizeof(buf1));
|
|
info->height = atoi(buf1);
|
|
if (info->height <= 0)
|
|
return AVERROR_INVALIDDATA;
|
|
if (info->pix_fmt != PIX_FMT_MONOWHITE) {
|
|
pnm_get(f, buf1, sizeof(buf1));
|
|
}
|
|
|
|
/* more check if YUV420 */
|
|
if (info->pix_fmt == PIX_FMT_YUV420P) {
|
|
if ((info->width & 1) != 0)
|
|
return AVERROR_INVALIDDATA;
|
|
h = (info->height * 2);
|
|
if ((h % 3) != 0)
|
|
return AVERROR_INVALIDDATA;
|
|
h /= 3;
|
|
info->height = h;
|
|
}
|
|
|
|
ret = alloc_cb(opaque, info);
|
|
if (ret)
|
|
return ret;
|
|
|
|
switch(info->pix_fmt) {
|
|
default:
|
|
return AVERROR_INVALIDDATA;
|
|
case PIX_FMT_RGB24:
|
|
n = info->width * 3;
|
|
goto do_read;
|
|
case PIX_FMT_GRAY8:
|
|
n = info->width;
|
|
goto do_read;
|
|
case PIX_FMT_MONOWHITE:
|
|
n = (info->width + 7) >> 3;
|
|
do_read:
|
|
ptr = info->pict.data[0];
|
|
linesize = info->pict.linesize[0];
|
|
for(i = 0; i < info->height; i++) {
|
|
get_buffer(f, ptr, n);
|
|
ptr += linesize;
|
|
}
|
|
break;
|
|
case PIX_FMT_YUV420P:
|
|
{
|
|
unsigned char *ptr1, *ptr2;
|
|
|
|
n = info->width;
|
|
ptr = info->pict.data[0];
|
|
linesize = info->pict.linesize[0];
|
|
for(i = 0; i < info->height; i++) {
|
|
get_buffer(f, ptr, n);
|
|
ptr += linesize;
|
|
}
|
|
ptr1 = info->pict.data[1];
|
|
ptr2 = info->pict.data[2];
|
|
n >>= 1;
|
|
h = info->height >> 1;
|
|
for(i = 0; i < h; i++) {
|
|
get_buffer(f, ptr1, n);
|
|
get_buffer(f, ptr2, n);
|
|
ptr1 += info->pict.linesize[1];
|
|
ptr2 += info->pict.linesize[2];
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static int pnm_read(ByteIOContext *f,
|
|
int (*alloc_cb)(void *opaque, AVImageInfo *info), void *opaque)
|
|
{
|
|
return pnm_read1(f, alloc_cb, opaque, 0);
|
|
}
|
|
|
|
static int pgmyuv_read(ByteIOContext *f,
|
|
int (*alloc_cb)(void *opaque, AVImageInfo *info), void *opaque)
|
|
{
|
|
return pnm_read1(f, alloc_cb, opaque, 1);
|
|
}
|
|
|
|
static int pnm_write(ByteIOContext *pb, AVImageInfo *info)
|
|
{
|
|
int i, h, h1, c, n, linesize;
|
|
char buf[100];
|
|
uint8_t *ptr, *ptr1, *ptr2;
|
|
|
|
h = info->height;
|
|
h1 = h;
|
|
switch(info->pix_fmt) {
|
|
case PIX_FMT_MONOWHITE:
|
|
c = '4';
|
|
n = (info->width + 7) >> 3;
|
|
break;
|
|
case PIX_FMT_GRAY8:
|
|
c = '5';
|
|
n = info->width;
|
|
break;
|
|
case PIX_FMT_RGB24:
|
|
c = '6';
|
|
n = info->width * 3;
|
|
break;
|
|
case PIX_FMT_YUV420P:
|
|
c = '5';
|
|
n = info->width;
|
|
h1 = (h * 3) / 2;
|
|
break;
|
|
default:
|
|
return AVERROR_INVALIDDATA;
|
|
}
|
|
snprintf(buf, sizeof(buf),
|
|
"P%c\n%d %d\n",
|
|
c, info->width, h1);
|
|
put_buffer(pb, buf, strlen(buf));
|
|
if (info->pix_fmt != PIX_FMT_MONOWHITE) {
|
|
snprintf(buf, sizeof(buf),
|
|
"%d\n", 255);
|
|
put_buffer(pb, buf, strlen(buf));
|
|
}
|
|
|
|
ptr = info->pict.data[0];
|
|
linesize = info->pict.linesize[0];
|
|
for(i=0;i<h;i++) {
|
|
put_buffer(pb, ptr, n);
|
|
ptr += linesize;
|
|
}
|
|
|
|
if (info->pix_fmt == PIX_FMT_YUV420P) {
|
|
h >>= 1;
|
|
n >>= 1;
|
|
ptr1 = info->pict.data[1];
|
|
ptr2 = info->pict.data[2];
|
|
for(i=0;i<h;i++) {
|
|
put_buffer(pb, ptr1, n);
|
|
put_buffer(pb, ptr2, n);
|
|
ptr1 += info->pict.linesize[1];
|
|
ptr2 += info->pict.linesize[2];
|
|
}
|
|
}
|
|
put_flush_packet(pb);
|
|
return 0;
|
|
}
|
|
|
|
static int pam_read(ByteIOContext *f,
|
|
int (*alloc_cb)(void *opaque, AVImageInfo *info), void *opaque)
|
|
{
|
|
int i, n, linesize, h, w, depth, maxval;
|
|
char buf1[32], tuple_type[32];
|
|
unsigned char *ptr;
|
|
AVImageInfo info1, *info = &info1;
|
|
int ret;
|
|
|
|
pnm_get(f, buf1, sizeof(buf1));
|
|
if (strcmp(buf1, "P7") != 0)
|
|
return AVERROR_INVALIDDATA;
|
|
w = -1;
|
|
h = -1;
|
|
maxval = -1;
|
|
depth = -1;
|
|
tuple_type[0] = '\0';
|
|
for(;;) {
|
|
pnm_get(f, buf1, sizeof(buf1));
|
|
if (!strcmp(buf1, "WIDTH")) {
|
|
pnm_get(f, buf1, sizeof(buf1));
|
|
w = strtol(buf1, NULL, 10);
|
|
} else if (!strcmp(buf1, "HEIGHT")) {
|
|
pnm_get(f, buf1, sizeof(buf1));
|
|
h = strtol(buf1, NULL, 10);
|
|
} else if (!strcmp(buf1, "DEPTH")) {
|
|
pnm_get(f, buf1, sizeof(buf1));
|
|
depth = strtol(buf1, NULL, 10);
|
|
} else if (!strcmp(buf1, "MAXVAL")) {
|
|
pnm_get(f, buf1, sizeof(buf1));
|
|
maxval = strtol(buf1, NULL, 10);
|
|
} else if (!strcmp(buf1, "TUPLETYPE")) {
|
|
pnm_get(f, buf1, sizeof(buf1));
|
|
pstrcpy(tuple_type, sizeof(tuple_type), buf1);
|
|
} else if (!strcmp(buf1, "ENDHDR")) {
|
|
break;
|
|
} else {
|
|
return AVERROR_INVALIDDATA;
|
|
}
|
|
}
|
|
/* check that all tags are present */
|
|
if (w <= 0 || h <= 0 || maxval <= 0 || depth <= 0 || tuple_type[0] == '\0')
|
|
return AVERROR_INVALIDDATA;
|
|
info->width = w;
|
|
info->height = h;
|
|
if (depth == 1) {
|
|
if (maxval == 1)
|
|
info->pix_fmt = PIX_FMT_MONOWHITE;
|
|
else
|
|
info->pix_fmt = PIX_FMT_GRAY8;
|
|
} else if (depth == 3) {
|
|
info->pix_fmt = PIX_FMT_RGB24;
|
|
} else if (depth == 4) {
|
|
info->pix_fmt = PIX_FMT_RGBA32;
|
|
} else {
|
|
return AVERROR_INVALIDDATA;
|
|
}
|
|
ret = alloc_cb(opaque, info);
|
|
if (ret)
|
|
return ret;
|
|
|
|
switch(info->pix_fmt) {
|
|
default:
|
|
return AVERROR_INVALIDDATA;
|
|
case PIX_FMT_RGB24:
|
|
n = info->width * 3;
|
|
goto do_read;
|
|
case PIX_FMT_GRAY8:
|
|
n = info->width;
|
|
goto do_read;
|
|
case PIX_FMT_MONOWHITE:
|
|
n = (info->width + 7) >> 3;
|
|
do_read:
|
|
ptr = info->pict.data[0];
|
|
linesize = info->pict.linesize[0];
|
|
for(i = 0; i < info->height; i++) {
|
|
get_buffer(f, ptr, n);
|
|
ptr += linesize;
|
|
}
|
|
break;
|
|
case PIX_FMT_RGBA32:
|
|
ptr = info->pict.data[0];
|
|
linesize = info->pict.linesize[0];
|
|
for(i = 0; i < info->height; i++) {
|
|
int j, r, g, b, a;
|
|
|
|
for(j = 0;j < w; j++) {
|
|
r = get_byte(f);
|
|
g = get_byte(f);
|
|
b = get_byte(f);
|
|
a = get_byte(f);
|
|
((uint32_t *)ptr)[j] = (a << 24) | (r << 16) | (g << 8) | b;
|
|
}
|
|
ptr += linesize;
|
|
}
|
|
break;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static int pam_write(ByteIOContext *pb, AVImageInfo *info)
|
|
{
|
|
int i, h, w, n, linesize, depth, maxval;
|
|
const char *tuple_type;
|
|
char buf[100];
|
|
uint8_t *ptr;
|
|
|
|
h = info->height;
|
|
w = info->width;
|
|
switch(info->pix_fmt) {
|
|
case PIX_FMT_MONOWHITE:
|
|
n = (info->width + 7) >> 3;
|
|
depth = 1;
|
|
maxval = 1;
|
|
tuple_type = "BLACKANDWHITE";
|
|
break;
|
|
case PIX_FMT_GRAY8:
|
|
n = info->width;
|
|
depth = 1;
|
|
maxval = 255;
|
|
tuple_type = "GRAYSCALE";
|
|
break;
|
|
case PIX_FMT_RGB24:
|
|
n = info->width * 3;
|
|
depth = 3;
|
|
maxval = 255;
|
|
tuple_type = "RGB";
|
|
break;
|
|
case PIX_FMT_RGBA32:
|
|
n = info->width * 4;
|
|
depth = 4;
|
|
maxval = 255;
|
|
tuple_type = "RGB_ALPHA";
|
|
break;
|
|
default:
|
|
return AVERROR_INVALIDDATA;
|
|
}
|
|
snprintf(buf, sizeof(buf),
|
|
"P7\nWIDTH %d\nHEIGHT %d\nDEPTH %d\nMAXVAL %d\nTUPLETYPE %s\nENDHDR\n",
|
|
w, h, depth, maxval, tuple_type);
|
|
put_buffer(pb, buf, strlen(buf));
|
|
|
|
ptr = info->pict.data[0];
|
|
linesize = info->pict.linesize[0];
|
|
|
|
if (info->pix_fmt == PIX_FMT_RGBA32) {
|
|
int j;
|
|
unsigned int v;
|
|
|
|
for(i=0;i<h;i++) {
|
|
for(j=0;j<w;j++) {
|
|
v = ((uint32_t *)ptr)[j];
|
|
put_byte(pb, (v >> 16) & 0xff);
|
|
put_byte(pb, (v >> 8) & 0xff);
|
|
put_byte(pb, (v) & 0xff);
|
|
put_byte(pb, (v >> 24) & 0xff);
|
|
}
|
|
ptr += linesize;
|
|
}
|
|
} else {
|
|
for(i=0;i<h;i++) {
|
|
put_buffer(pb, ptr, n);
|
|
ptr += linesize;
|
|
}
|
|
}
|
|
put_flush_packet(pb);
|
|
return 0;
|
|
}
|
|
|
|
static int pnm_probe(AVProbeData *pd)
|
|
{
|
|
const char *p = pd->buf;
|
|
if (pd->buf_size >= 8 &&
|
|
p[0] == 'P' &&
|
|
p[1] >= '4' && p[1] <= '6' &&
|
|
pnm_space(p[2]) )
|
|
return AVPROBE_SCORE_MAX - 1; /* to permit pgmyuv probe */
|
|
else
|
|
return 0;
|
|
}
|
|
|
|
static int pgmyuv_probe(AVProbeData *pd)
|
|
{
|
|
if (match_ext(pd->filename, "pgmyuv"))
|
|
return AVPROBE_SCORE_MAX;
|
|
else
|
|
return 0;
|
|
}
|
|
|
|
static int pam_probe(AVProbeData *pd)
|
|
{
|
|
const char *p = pd->buf;
|
|
if (pd->buf_size >= 8 &&
|
|
p[0] == 'P' &&
|
|
p[1] == '7' &&
|
|
p[2] == '\n')
|
|
return AVPROBE_SCORE_MAX;
|
|
else
|
|
return 0;
|
|
}
|
|
|
|
AVImageFormat pnm_image_format = {
|
|
"pnm",
|
|
NULL,
|
|
pnm_probe,
|
|
pnm_read,
|
|
0,
|
|
NULL,
|
|
};
|
|
|
|
AVImageFormat pbm_image_format = {
|
|
"pbm",
|
|
"pbm",
|
|
NULL,
|
|
NULL,
|
|
(1 << PIX_FMT_MONOWHITE),
|
|
pnm_write,
|
|
};
|
|
|
|
AVImageFormat pgm_image_format = {
|
|
"pgm",
|
|
"pgm",
|
|
NULL,
|
|
NULL,
|
|
(1 << PIX_FMT_GRAY8),
|
|
pnm_write,
|
|
};
|
|
|
|
AVImageFormat ppm_image_format = {
|
|
"ppm",
|
|
"ppm",
|
|
NULL,
|
|
NULL,
|
|
(1 << PIX_FMT_RGB24),
|
|
pnm_write,
|
|
};
|
|
|
|
AVImageFormat pam_image_format = {
|
|
"pam",
|
|
"pam",
|
|
pam_probe,
|
|
pam_read,
|
|
(1 << PIX_FMT_MONOWHITE) | (1 << PIX_FMT_GRAY8) | (1 << PIX_FMT_RGB24) |
|
|
(1 << PIX_FMT_RGBA32),
|
|
pam_write,
|
|
};
|
|
|
|
AVImageFormat pgmyuv_image_format = {
|
|
"pgmyuv",
|
|
"pgmyuv",
|
|
pgmyuv_probe,
|
|
pgmyuv_read,
|
|
(1 << PIX_FMT_YUV420P),
|
|
pnm_write,
|
|
};
|