stuff
This commit is contained in:
John Cupitt
parent
dafd0030f0
commit
4e159c8f54
@ -3,6 +3,7 @@ noinst_LTLIBRARIES = libformat.la
|
|||||||
libformat_la_SOURCES = \
|
libformat_la_SOURCES = \
|
||||||
dbh.h \
|
dbh.h \
|
||||||
format_dispatch.c \
|
format_dispatch.c \
|
||||||
|
is_a.c \
|
||||||
im_analyze2vips.c \
|
im_analyze2vips.c \
|
||||||
im_csv2vips.c \
|
im_csv2vips.c \
|
||||||
im_exr2vips.c \
|
im_exr2vips.c \
|
||||||
|
|||||||
@ -59,20 +59,9 @@
|
|||||||
#endif /*HAVE_CONFIG_H*/
|
#endif /*HAVE_CONFIG_H*/
|
||||||
#include <vips/intl.h>
|
#include <vips/intl.h>
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <ctype.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
#include <sys/types.h>
|
#include <sys/types.h>
|
||||||
#include <sys/stat.h>
|
#include <sys/stat.h>
|
||||||
#include <fcntl.h>
|
#include <fcntl.h>
|
||||||
#ifdef HAVE_UNISTD_H
|
|
||||||
#include <unistd.h>
|
|
||||||
#endif /*HAVE_UNISTD_H*/
|
|
||||||
#ifdef HAVE_IO_H
|
|
||||||
#include <io.h>
|
|
||||||
#endif /*HAVE_IO_H*/
|
|
||||||
#include <string.h>
|
|
||||||
#include <limits.h>
|
|
||||||
|
|
||||||
#include <vips/vips.h>
|
#include <vips/vips.h>
|
||||||
|
|
||||||
@ -88,161 +77,6 @@
|
|||||||
#include <dmalloc.h>
|
#include <dmalloc.h>
|
||||||
#endif /*WITH_DMALLOC*/
|
#endif /*WITH_DMALLOC*/
|
||||||
|
|
||||||
/* Test BandFmt.
|
|
||||||
*/
|
|
||||||
int
|
|
||||||
im_isint( IMAGE *im )
|
|
||||||
{
|
|
||||||
switch( im->BandFmt ) {
|
|
||||||
case IM_BANDFMT_UCHAR:
|
|
||||||
case IM_BANDFMT_CHAR:
|
|
||||||
case IM_BANDFMT_USHORT:
|
|
||||||
case IM_BANDFMT_SHORT:
|
|
||||||
case IM_BANDFMT_UINT:
|
|
||||||
case IM_BANDFMT_INT:
|
|
||||||
return( 1 );
|
|
||||||
|
|
||||||
case IM_BANDFMT_FLOAT:
|
|
||||||
case IM_BANDFMT_DOUBLE:
|
|
||||||
case IM_BANDFMT_COMPLEX:
|
|
||||||
case IM_BANDFMT_DPCOMPLEX:
|
|
||||||
return( 0 );
|
|
||||||
|
|
||||||
default:
|
|
||||||
error_exit( "im_isint: unknown image BandFmt" );
|
|
||||||
/*NOTREACHED*/
|
|
||||||
return( -1 );
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Test endianness of an image. SPARC is MSB first
|
|
||||||
*/
|
|
||||||
int
|
|
||||||
im_isMSBfirst( IMAGE *im )
|
|
||||||
{
|
|
||||||
if( im->magic == IM_MAGIC_SPARC )
|
|
||||||
return( 1 );
|
|
||||||
else
|
|
||||||
return( 0 );
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Test this processor for endianness. True for SPARC order.
|
|
||||||
*/
|
|
||||||
int
|
|
||||||
im_amiMSBfirst( void )
|
|
||||||
{
|
|
||||||
int test;
|
|
||||||
unsigned char *p = (unsigned char *) &test;
|
|
||||||
|
|
||||||
test = 0;
|
|
||||||
p[0] = 255;
|
|
||||||
|
|
||||||
if( test == 255 )
|
|
||||||
return( 0 );
|
|
||||||
else
|
|
||||||
return( 1 );
|
|
||||||
}
|
|
||||||
|
|
||||||
int
|
|
||||||
im_isuint( IMAGE *im )
|
|
||||||
{
|
|
||||||
switch( im->BandFmt ) {
|
|
||||||
case IM_BANDFMT_UCHAR:
|
|
||||||
case IM_BANDFMT_USHORT:
|
|
||||||
case IM_BANDFMT_UINT:
|
|
||||||
return( 1 );
|
|
||||||
|
|
||||||
case IM_BANDFMT_INT:
|
|
||||||
case IM_BANDFMT_SHORT:
|
|
||||||
case IM_BANDFMT_CHAR:
|
|
||||||
case IM_BANDFMT_FLOAT:
|
|
||||||
case IM_BANDFMT_DOUBLE:
|
|
||||||
case IM_BANDFMT_COMPLEX:
|
|
||||||
case IM_BANDFMT_DPCOMPLEX:
|
|
||||||
return( 0 );
|
|
||||||
|
|
||||||
default:
|
|
||||||
error_exit( "im_isuint: unknown image BandFmt" );
|
|
||||||
/*NOTREACHED*/
|
|
||||||
return( -1 );
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
int
|
|
||||||
im_isfloat( IMAGE *im )
|
|
||||||
{
|
|
||||||
switch( im->BandFmt ) {
|
|
||||||
case IM_BANDFMT_FLOAT:
|
|
||||||
case IM_BANDFMT_DOUBLE:
|
|
||||||
return( 1 );
|
|
||||||
|
|
||||||
case IM_BANDFMT_UCHAR:
|
|
||||||
case IM_BANDFMT_CHAR:
|
|
||||||
case IM_BANDFMT_USHORT:
|
|
||||||
case IM_BANDFMT_SHORT:
|
|
||||||
case IM_BANDFMT_UINT:
|
|
||||||
case IM_BANDFMT_INT:
|
|
||||||
case IM_BANDFMT_COMPLEX:
|
|
||||||
case IM_BANDFMT_DPCOMPLEX:
|
|
||||||
return( 0 );
|
|
||||||
|
|
||||||
default:
|
|
||||||
error_exit( "im_isfloat: unknown image BandFmt" );
|
|
||||||
/*NOTREACHED*/
|
|
||||||
return( -1 );
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
int
|
|
||||||
im_isscalar( IMAGE *im )
|
|
||||||
{
|
|
||||||
switch( im->BandFmt ) {
|
|
||||||
case IM_BANDFMT_UCHAR:
|
|
||||||
case IM_BANDFMT_CHAR:
|
|
||||||
case IM_BANDFMT_USHORT:
|
|
||||||
case IM_BANDFMT_SHORT:
|
|
||||||
case IM_BANDFMT_UINT:
|
|
||||||
case IM_BANDFMT_INT:
|
|
||||||
case IM_BANDFMT_FLOAT:
|
|
||||||
case IM_BANDFMT_DOUBLE:
|
|
||||||
return( 1 );
|
|
||||||
|
|
||||||
case IM_BANDFMT_COMPLEX:
|
|
||||||
case IM_BANDFMT_DPCOMPLEX:
|
|
||||||
return( 0 );
|
|
||||||
|
|
||||||
default:
|
|
||||||
error_exit( "im_isscalar: unknown image BandFmt" );
|
|
||||||
/*NOTREACHED*/
|
|
||||||
return( -1 );
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
int
|
|
||||||
im_iscomplex( IMAGE *im )
|
|
||||||
{
|
|
||||||
switch( im->BandFmt ) {
|
|
||||||
case IM_BANDFMT_COMPLEX:
|
|
||||||
case IM_BANDFMT_DPCOMPLEX:
|
|
||||||
return( 1 );
|
|
||||||
|
|
||||||
case IM_BANDFMT_UCHAR:
|
|
||||||
case IM_BANDFMT_CHAR:
|
|
||||||
case IM_BANDFMT_USHORT:
|
|
||||||
case IM_BANDFMT_SHORT:
|
|
||||||
case IM_BANDFMT_UINT:
|
|
||||||
case IM_BANDFMT_INT:
|
|
||||||
case IM_BANDFMT_FLOAT:
|
|
||||||
case IM_BANDFMT_DOUBLE:
|
|
||||||
return( 0 );
|
|
||||||
|
|
||||||
default:
|
|
||||||
error_exit( "im_iscomplex: unknown image BandFmt" );
|
|
||||||
/*NOTREACHED*/
|
|
||||||
return( -1 );
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Read a few bytes from the start of a file. For sniffing file types.
|
/* Read a few bytes from the start of a file. For sniffing file types.
|
||||||
*/
|
*/
|
||||||
static int
|
static int
|
||||||
@ -343,7 +177,7 @@ vhandle( char *module, char *fmt, ... )
|
|||||||
{
|
{
|
||||||
va_list ap;
|
va_list ap;
|
||||||
|
|
||||||
im_errormsg( "TIFF error in \"%s\": ", module );
|
im_error( "im_istifftiled", _( "TIFF error in \"%s\": " ), module );
|
||||||
|
|
||||||
va_start( ap, fmt );
|
va_start( ap, fmt );
|
||||||
im_verrormsg( fmt, ap );
|
im_verrormsg( fmt, ap );
|
||||||
@ -432,99 +266,3 @@ im_isexr( const char *filename )
|
|||||||
return( 0 );
|
return( 0 );
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Test for file exists.
|
|
||||||
*/
|
|
||||||
int
|
|
||||||
im_existsf( const char *name, ... )
|
|
||||||
{
|
|
||||||
va_list ap;
|
|
||||||
char buf1[PATH_MAX];
|
|
||||||
|
|
||||||
va_start( ap, name );
|
|
||||||
(void) im_vsnprintf( buf1, PATH_MAX - 1, name, ap );
|
|
||||||
va_end( ap );
|
|
||||||
|
|
||||||
/* Try that.
|
|
||||||
*/
|
|
||||||
if( !access( buf1, R_OK ) )
|
|
||||||
return( 1 );
|
|
||||||
|
|
||||||
return( 0 );
|
|
||||||
}
|
|
||||||
|
|
||||||
/* True if this IMAGE is a disc file of some sort.
|
|
||||||
*/
|
|
||||||
int
|
|
||||||
im_isfile( IMAGE *im )
|
|
||||||
{
|
|
||||||
switch( im->dtype ) {
|
|
||||||
case IM_MMAPIN:
|
|
||||||
case IM_MMAPINRW:
|
|
||||||
case IM_OPENOUT:
|
|
||||||
case IM_OPENIN:
|
|
||||||
return( 1 );
|
|
||||||
|
|
||||||
case IM_PARTIAL:
|
|
||||||
case IM_SETBUF:
|
|
||||||
case IM_SETBUF_FOREIGN:
|
|
||||||
case IM_NONE:
|
|
||||||
return( 0 );
|
|
||||||
|
|
||||||
default:
|
|
||||||
error_exit( "im_isfile: corrupt IMAGE descriptor" );
|
|
||||||
/*NOTREACHED*/
|
|
||||||
return( -1 );
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/* True if this IMAGE is a partial of some sort.
|
|
||||||
*/
|
|
||||||
int
|
|
||||||
im_ispartial( IMAGE *im )
|
|
||||||
{
|
|
||||||
switch( im->dtype ) {
|
|
||||||
case IM_PARTIAL:
|
|
||||||
return( 1 );
|
|
||||||
|
|
||||||
case IM_SETBUF:
|
|
||||||
case IM_SETBUF_FOREIGN:
|
|
||||||
case IM_MMAPIN:
|
|
||||||
case IM_MMAPINRW:
|
|
||||||
case IM_OPENIN:
|
|
||||||
case IM_OPENOUT:
|
|
||||||
case IM_NONE:
|
|
||||||
return( 0 );
|
|
||||||
|
|
||||||
default:
|
|
||||||
error_exit( "im_ispartial: corrupt IMAGE descriptor" );
|
|
||||||
/*NOTREACHED*/
|
|
||||||
return( -1 );
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/* True if an int is a power of two ... 1, 2, 4, 8, 16, 32, etc. Do with just
|
|
||||||
* integer arithmetic for portability. A previous Nicos version using doubles
|
|
||||||
* and log/log failed on x86 with rounding problems. Return 0 for not
|
|
||||||
* power of two, otherwise return the position of the set bit (numbering with
|
|
||||||
* bit 1 as the lsb).
|
|
||||||
*/
|
|
||||||
int
|
|
||||||
im_ispoweroftwo( int p )
|
|
||||||
{
|
|
||||||
int i, n;
|
|
||||||
|
|
||||||
/* Count set bits. Could use a LUT, I guess.
|
|
||||||
*/
|
|
||||||
for( i = 0, n = 0; p; i++, p >>= 1 )
|
|
||||||
if( (p & 1) == 1 )
|
|
||||||
n++;
|
|
||||||
|
|
||||||
/* Should be just one set bit.
|
|
||||||
*/
|
|
||||||
if( n == 1 )
|
|
||||||
/* Return position of bit.
|
|
||||||
*/
|
|
||||||
return( i );
|
|
||||||
else
|
|
||||||
return( 0 );
|
|
||||||
}
|
|
||||||
@ -24,6 +24,8 @@
|
|||||||
* - added exr
|
* - added exr
|
||||||
* 3/8/07
|
* 3/8/07
|
||||||
* - cleanups
|
* - cleanups
|
||||||
|
* 22/5/08
|
||||||
|
* - image format stuff broken out
|
||||||
*/
|
*/
|
||||||
|
|
||||||
/*
|
/*
|
||||||
@ -74,14 +76,6 @@
|
|||||||
|
|
||||||
#include <vips/vips.h>
|
#include <vips/vips.h>
|
||||||
|
|
||||||
#ifdef HAVE_TIFF
|
|
||||||
#include <tiffio.h>
|
|
||||||
#endif /*HAVE_TIFF*/
|
|
||||||
|
|
||||||
#ifdef HAVE_PNG
|
|
||||||
#include <png.h>
|
|
||||||
#endif /*HAVE_PNG*/
|
|
||||||
|
|
||||||
#ifdef WITH_DMALLOC
|
#ifdef WITH_DMALLOC
|
||||||
#include <dmalloc.h>
|
#include <dmalloc.h>
|
||||||
#endif /*WITH_DMALLOC*/
|
#endif /*WITH_DMALLOC*/
|
||||||
@ -241,195 +235,6 @@ im_iscomplex( IMAGE *im )
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Read a few bytes from the start of a file. For sniffing file types.
|
|
||||||
*/
|
|
||||||
static int
|
|
||||||
get_bytes( const char *filename, unsigned char buf[], int len )
|
|
||||||
{
|
|
||||||
int fd;
|
|
||||||
|
|
||||||
/* File may not even exist (for tmp images for example!)
|
|
||||||
* so no hasty messages. And the file might be truncated, so no error
|
|
||||||
* on read either.
|
|
||||||
*/
|
|
||||||
#ifdef BINARY_OPEN
|
|
||||||
if( (fd = open( filename, O_RDONLY | O_BINARY )) == -1 )
|
|
||||||
#else /*BINARY_OPEN*/
|
|
||||||
if( (fd = open( filename, O_RDONLY )) == -1 )
|
|
||||||
#endif /*BINARY_OPEN*/
|
|
||||||
return( 0 );
|
|
||||||
if( read( fd, buf, len ) != len ) {
|
|
||||||
close( fd );
|
|
||||||
return( 0 );
|
|
||||||
}
|
|
||||||
close( fd );
|
|
||||||
|
|
||||||
return( 1 );
|
|
||||||
}
|
|
||||||
|
|
||||||
int
|
|
||||||
im_istiff( const char *filename )
|
|
||||||
{
|
|
||||||
unsigned char buf[2];
|
|
||||||
|
|
||||||
if( get_bytes( filename, buf, 2 ) )
|
|
||||||
if( (buf[0] == 'M' && buf[1] == 'M') ||
|
|
||||||
(buf[0] == 'I' && buf[1] == 'I') )
|
|
||||||
return( 1 );
|
|
||||||
|
|
||||||
return( 0 );
|
|
||||||
}
|
|
||||||
|
|
||||||
#ifdef HAVE_PNG
|
|
||||||
int
|
|
||||||
im_ispng( const char *filename )
|
|
||||||
{
|
|
||||||
unsigned char buf[8];
|
|
||||||
|
|
||||||
return( get_bytes( filename, buf, 8 ) &&
|
|
||||||
!png_sig_cmp( buf, 0, 8 ) );
|
|
||||||
}
|
|
||||||
#else /*HAVE_PNG*/
|
|
||||||
int
|
|
||||||
im_ispng( const char *filename )
|
|
||||||
{
|
|
||||||
return( 0 );
|
|
||||||
}
|
|
||||||
#endif /*HAVE_PNG*/
|
|
||||||
|
|
||||||
#ifdef HAVE_MAGICK
|
|
||||||
int
|
|
||||||
im_ismagick( const char *filename )
|
|
||||||
{
|
|
||||||
IMAGE *im;
|
|
||||||
int result;
|
|
||||||
|
|
||||||
if( !(im = im_open( "dummy", "p" )) )
|
|
||||||
return( -1 );
|
|
||||||
result = im_magick2vips_header( filename, im );
|
|
||||||
im_clear_error_string();
|
|
||||||
im_close( im );
|
|
||||||
|
|
||||||
return( result == 0 );
|
|
||||||
}
|
|
||||||
#else /*HAVE_MAGICK*/
|
|
||||||
int
|
|
||||||
im_ismagick( const char *filename )
|
|
||||||
{
|
|
||||||
return( 0 );
|
|
||||||
}
|
|
||||||
#endif /*HAVE_MAGICK*/
|
|
||||||
|
|
||||||
int
|
|
||||||
im_isppm( const char *filename )
|
|
||||||
{
|
|
||||||
unsigned char buf[2];
|
|
||||||
|
|
||||||
if( get_bytes( filename, buf, 2 ) )
|
|
||||||
if( buf[0] == 'P' && (buf[1] >= '1' || buf[1] <= '6') )
|
|
||||||
return( 1 );
|
|
||||||
|
|
||||||
return( 0 );
|
|
||||||
}
|
|
||||||
|
|
||||||
#ifdef HAVE_TIFF
|
|
||||||
|
|
||||||
/* Handle TIFF errors here.
|
|
||||||
*/
|
|
||||||
static void
|
|
||||||
vhandle( char *module, char *fmt, ... )
|
|
||||||
{
|
|
||||||
va_list ap;
|
|
||||||
|
|
||||||
im_errormsg( "TIFF error in \"%s\": ", module );
|
|
||||||
|
|
||||||
va_start( ap, fmt );
|
|
||||||
im_verrormsg( fmt, ap );
|
|
||||||
va_end( ap );
|
|
||||||
}
|
|
||||||
|
|
||||||
int
|
|
||||||
im_istifftiled( const char *filename )
|
|
||||||
{
|
|
||||||
TIFF *tif;
|
|
||||||
int tiled;
|
|
||||||
|
|
||||||
/* Override the default TIFF error handler.
|
|
||||||
*/
|
|
||||||
TIFFSetErrorHandler( (TIFFErrorHandler) vhandle );
|
|
||||||
|
|
||||||
#ifdef BINARY_OPEN
|
|
||||||
if( !(tif = TIFFOpen( filename, "rb" )) ) {
|
|
||||||
#else /*BINARY_OPEN*/
|
|
||||||
if( !(tif = TIFFOpen( filename, "r" )) ) {
|
|
||||||
#endif /*BINARY_OPEN*/
|
|
||||||
/* Not a TIFF file ... return False.
|
|
||||||
*/
|
|
||||||
im_clear_error_string();
|
|
||||||
return( 0 );
|
|
||||||
}
|
|
||||||
tiled = TIFFIsTiled( tif );
|
|
||||||
TIFFClose( tif );
|
|
||||||
|
|
||||||
return( tiled );
|
|
||||||
}
|
|
||||||
|
|
||||||
#else /*HAVE_TIFF*/
|
|
||||||
|
|
||||||
int
|
|
||||||
im_istifftiled( const char *filename )
|
|
||||||
{
|
|
||||||
return( 0 );
|
|
||||||
}
|
|
||||||
|
|
||||||
#endif /*HAVE_TIFF*/
|
|
||||||
|
|
||||||
int
|
|
||||||
im_isjpeg( const char *filename )
|
|
||||||
{
|
|
||||||
unsigned char buf[2];
|
|
||||||
|
|
||||||
if( get_bytes( filename, buf, 2 ) )
|
|
||||||
if( (int) buf[0] == 0xff && (int) buf[1] == 0xd8 )
|
|
||||||
return( 1 );
|
|
||||||
|
|
||||||
return( 0 );
|
|
||||||
}
|
|
||||||
|
|
||||||
int
|
|
||||||
im_isvips( const char *filename )
|
|
||||||
{
|
|
||||||
unsigned char buf[4];
|
|
||||||
|
|
||||||
if( get_bytes( filename, buf, 4 ) ) {
|
|
||||||
if( buf[0] == 0x08 && buf[1] == 0xf2 &&
|
|
||||||
buf[2] == 0xa6 && buf[3] == 0xb6 )
|
|
||||||
/* SPARC-order VIPS image.
|
|
||||||
*/
|
|
||||||
return( 1 );
|
|
||||||
else if( buf[3] == 0x08 && buf[2] == 0xf2 &&
|
|
||||||
buf[1] == 0xa6 && buf[0] == 0xb6 )
|
|
||||||
/* INTEL-order VIPS image.
|
|
||||||
*/
|
|
||||||
return( 1 );
|
|
||||||
}
|
|
||||||
|
|
||||||
return( 0 );
|
|
||||||
}
|
|
||||||
|
|
||||||
int
|
|
||||||
im_isexr( const char *filename )
|
|
||||||
{
|
|
||||||
unsigned char buf[4];
|
|
||||||
|
|
||||||
if( get_bytes( filename, buf, 4 ) )
|
|
||||||
if( buf[0] == 0x76 && buf[1] == 0x2f &&
|
|
||||||
buf[2] == 0x31 && buf[3] == 0x01 )
|
|
||||||
return( 1 );
|
|
||||||
|
|
||||||
return( 0 );
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Test for file exists.
|
/* Test for file exists.
|
||||||
*/
|
*/
|
||||||
int
|
int
|
||||||
@ -514,7 +319,7 @@ im_ispoweroftwo( int p )
|
|||||||
/* Count set bits. Could use a LUT, I guess.
|
/* Count set bits. Could use a LUT, I guess.
|
||||||
*/
|
*/
|
||||||
for( i = 0, n = 0; p; i++, p >>= 1 )
|
for( i = 0, n = 0; p; i++, p >>= 1 )
|
||||||
if( (p & 1) == 1 )
|
if( p & 1 )
|
||||||
n++;
|
n++;
|
||||||
|
|
||||||
/* Should be just one set bit.
|
/* Should be just one set bit.
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user