FFmpeg/libavcodec/tiff_common.c
2017-03-29 14:49:29 +02:00

314 lines
7.9 KiB
C

/*
* TIFF Common Routines
* Copyright (c) 2013 Thilo Borgmann <thilo.borgmann _at_ mail.de>
*
* 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
* TIFF Common Routines
* @author Thilo Borgmann <thilo.borgmann _at_ mail.de>
*/
#include "tiff_common.h"
int ff_tis_ifd(unsigned tag)
{
int i;
for (i = 0; i < FF_ARRAY_ELEMS(ifd_tags); i++) {
if (ifd_tags[i] == tag) {
return i + 1;
}
}
return 0;
}
unsigned ff_tget_short(GetByteContext *gb, int le)
{
return le ? bytestream2_get_le16(gb) : bytestream2_get_be16(gb);
}
unsigned ff_tget_long(GetByteContext *gb, int le)
{
return le ? bytestream2_get_le32(gb) : bytestream2_get_be32(gb);
}
double ff_tget_double(GetByteContext *gb, int le)
{
av_alias64 i = { .u64 = le ? bytestream2_get_le64(gb) : bytestream2_get_be64(gb)};
return i.f64;
}
unsigned ff_tget(GetByteContext *gb, int type, int le)
{
switch (type) {
case TIFF_BYTE: return bytestream2_get_byte(gb);
case TIFF_SHORT: return ff_tget_short(gb, le);
case TIFF_LONG: return ff_tget_long(gb, le);
default: return UINT_MAX;
}
}
static const char *auto_sep(int count, const char *sep, int i, int columns)
{
if (sep)
return i ? sep : "";
if (i && i%columns) {
return ", ";
} else
return columns < count ? "\n" : "";
}
int ff_tadd_rational_metadata(int count, const char *name, const char *sep,
GetByteContext *gb, int le, AVDictionary **metadata)
{
AVBPrint bp;
char *ap;
int32_t nom, denom;
int i;
if (count >= INT_MAX / sizeof(int64_t) || count <= 0)
return AVERROR_INVALIDDATA;
if (bytestream2_get_bytes_left(gb) < count * sizeof(int64_t))
return AVERROR_INVALIDDATA;
av_bprint_init(&bp, 10 * count, AV_BPRINT_SIZE_UNLIMITED);
for (i = 0; i < count; i++) {
nom = ff_tget_long(gb, le);
denom = ff_tget_long(gb, le);
av_bprintf(&bp, "%s%7"PRId32":%-7"PRId32, auto_sep(count, sep, i, 4), nom, denom);
}
if ((i = av_bprint_finalize(&bp, &ap))) {
return i;
}
if (!ap) {
return AVERROR(ENOMEM);
}
av_dict_set(metadata, name, ap, AV_DICT_DONT_STRDUP_VAL);
return 0;
}
int ff_tadd_long_metadata(int count, const char *name, const char *sep,
GetByteContext *gb, int le, AVDictionary **metadata)
{
AVBPrint bp;
char *ap;
int i;
if (count >= INT_MAX / sizeof(int32_t) || count <= 0)
return AVERROR_INVALIDDATA;
if (bytestream2_get_bytes_left(gb) < count * sizeof(int32_t))
return AVERROR_INVALIDDATA;
av_bprint_init(&bp, 10 * count, AV_BPRINT_SIZE_UNLIMITED);
for (i = 0; i < count; i++) {
av_bprintf(&bp, "%s%7i", auto_sep(count, sep, i, 8), ff_tget_long(gb, le));
}
if ((i = av_bprint_finalize(&bp, &ap))) {
return i;
}
if (!ap) {
return AVERROR(ENOMEM);
}
av_dict_set(metadata, name, ap, AV_DICT_DONT_STRDUP_VAL);
return 0;
}
int ff_tadd_doubles_metadata(int count, const char *name, const char *sep,
GetByteContext *gb, int le, AVDictionary **metadata)
{
AVBPrint bp;
char *ap;
int i;
if (count >= INT_MAX / sizeof(int64_t) || count <= 0)
return AVERROR_INVALIDDATA;
if (bytestream2_get_bytes_left(gb) < count * sizeof(int64_t))
return AVERROR_INVALIDDATA;
av_bprint_init(&bp, 10 * count, 100 * count);
for (i = 0; i < count; i++) {
av_bprintf(&bp, "%s%.15g", auto_sep(count, sep, i, 4), ff_tget_double(gb, le));
}
if ((i = av_bprint_finalize(&bp, &ap))) {
return i;
}
if (!ap) {
return AVERROR(ENOMEM);
}
av_dict_set(metadata, name, ap, AV_DICT_DONT_STRDUP_VAL);
return 0;
}
int ff_tadd_shorts_metadata(int count, const char *name, const char *sep,
GetByteContext *gb, int le, int is_signed, AVDictionary **metadata)
{
AVBPrint bp;
char *ap;
int i;
if (count >= INT_MAX / sizeof(int16_t) || count <= 0)
return AVERROR_INVALIDDATA;
if (bytestream2_get_bytes_left(gb) < count * sizeof(int16_t))
return AVERROR_INVALIDDATA;
av_bprint_init(&bp, 10 * count, AV_BPRINT_SIZE_UNLIMITED);
for (i = 0; i < count; i++) {
int v = is_signed ? (int16_t)ff_tget_short(gb, le) : ff_tget_short(gb, le);
av_bprintf(&bp, "%s%5i", auto_sep(count, sep, i, 8), v);
}
if ((i = av_bprint_finalize(&bp, &ap))) {
return i;
}
if (!ap) {
return AVERROR(ENOMEM);
}
av_dict_set(metadata, name, ap, AV_DICT_DONT_STRDUP_VAL);
return 0;
}
int ff_tadd_bytes_metadata(int count, const char *name, const char *sep,
GetByteContext *gb, int le, int is_signed, AVDictionary **metadata)
{
AVBPrint bp;
char *ap;
int i;
if (count >= INT_MAX / sizeof(int8_t) || count < 0)
return AVERROR_INVALIDDATA;
if (bytestream2_get_bytes_left(gb) < count * sizeof(int8_t))
return AVERROR_INVALIDDATA;
av_bprint_init(&bp, 10 * count, AV_BPRINT_SIZE_UNLIMITED);
for (i = 0; i < count; i++) {
int v = is_signed ? (int8_t)bytestream2_get_byte(gb) : bytestream2_get_byte(gb);
av_bprintf(&bp, "%s%3i", auto_sep(count, sep, i, 16), v);
}
if ((i = av_bprint_finalize(&bp, &ap))) {
return i;
}
if (!ap) {
return AVERROR(ENOMEM);
}
av_dict_set(metadata, name, ap, AV_DICT_DONT_STRDUP_VAL);
return 0;
}
int ff_tadd_string_metadata(int count, const char *name,
GetByteContext *gb, int le, AVDictionary **metadata)
{
char *value;
if (bytestream2_get_bytes_left(gb) < count || count < 0)
return AVERROR_INVALIDDATA;
value = av_malloc(count + 1);
if (!value)
return AVERROR(ENOMEM);
bytestream2_get_bufferu(gb, value, count);
value[count] = 0;
av_dict_set(metadata, name, value, AV_DICT_DONT_STRDUP_VAL);
return 0;
}
int ff_tdecode_header(GetByteContext *gb, int *le, int *ifd_offset)
{
if (bytestream2_get_bytes_left(gb) < 8) {
return AVERROR_INVALIDDATA;
}
*le = bytestream2_get_le16u(gb);
if (*le == AV_RB16("II")) {
*le = 1;
} else if (*le == AV_RB16("MM")) {
*le = 0;
} else {
return AVERROR_INVALIDDATA;
}
if (ff_tget_short(gb, *le) != 42) {
return AVERROR_INVALIDDATA;
}
*ifd_offset = ff_tget_long(gb, *le);
return 0;
}
int ff_tread_tag(GetByteContext *gb, int le, unsigned *tag, unsigned *type,
unsigned *count, int *next)
{
int ifd_tag;
int valid_type;
*tag = ff_tget_short(gb, le);
*type = ff_tget_short(gb, le);
*count = ff_tget_long (gb, le);
ifd_tag = ff_tis_ifd(*tag);
valid_type = *type != 0 && *type < FF_ARRAY_ELEMS(type_sizes);
*next = bytestream2_tell(gb) + 4;
// check for valid type
if (!valid_type) {
return AVERROR_INVALIDDATA;
}
// seek to offset if this is an IFD-tag or
// if count values do not fit into the offset value
if (ifd_tag || (*count > 4 || !(type_sizes[*type] * (*count) <= 4 || *type == TIFF_STRING))) {
bytestream2_seek(gb, ff_tget_long (gb, le), SEEK_SET);
}
return 0;
}