static IMAGE *
remosaic( JoinNode *node, RemosaicData *rd )
{
SymbolTable *st = node->st;
IMAGE *im = node->im;
IMAGE *out;
char filename[FILENAME_MAX];
char *p;
if( !im ) {
im_error( "im_remosaic", _( "file \"%s\" not found" ),
node->name );
return( NULL );
}
/* Remove substring rd->old_str from in->filename, replace with
* rd->new_str.
*/
im_strncpy( filename, im->filename, FILENAME_MAX );
if( (p = im_strrstr( filename, rd->old_str )) ) {
int offset = p - &filename[0];
im_strncpy( p, rd->new_str, FILENAME_MAX - offset );
im_strncpy( p + rd->new_len,
im->filename + offset + rd->old_len,
FILENAME_MAX - offset - rd->new_len );
}
#ifdef DEBUG
printf( "im_remosaic: filename \"%s\" -> \"%s\"\n",
im->filename, filename );
#endif /*DEBUG*/
if( !(out = im__global_open_image( st, filename )) )
return( NULL );
if( out->Xsize != im->Xsize || out->Ysize != im->Ysize ) {
im_error( "im_remosaic",
_( "substitute image \"%s\" is not "
"the same size as \"%s\"" ),
filename, im->filename );
return( NULL );
}
return( out );
}
static gboolean
iimage_graphic_save( Classmodel *classmodel,
GtkWidget *parent, const char *filename )
{
iImage *iimage = IIMAGE( classmodel );
ImageValue *value = &iimage->value;
char buf[FILENAME_MAX];
/* Can't happen nested-ly, so a static is OK.
*/
static GTimer *timer = NULL;
/* We don't want $VAR etc. in the filename we pass down to the file
* ops.
*/
im_strncpy( buf, filename, FILENAME_MAX );
path_expand( buf );
/* Append the mode string. This needs an expanded filename.
*/
filesel_add_mode( buf );
if( !timer )
timer = g_timer_new();
g_timer_reset( timer );
if( value->ii )
if( !imageinfo_write( value->ii, buf ) )
return( FALSE );
mainw_recent_add( &mainw_recent_image, filename );
if( main_option_time_save ) {
double elapsed;
elapsed = g_timer_elapsed( timer, NULL );
error_top( _( "Save timer." ) );
error_sub( _( "Image save took %g seconds." ), elapsed );
return( FALSE );
}
return( TRUE );
}
static Read *
read_new( const char *filename, IMAGE *im )
{
Read *read;
static int inited = 0;
if( !inited ) {
#ifdef HAVE_MAGICKCOREGENESIS
MagickCoreGenesis( im_get_argv0(), MagickFalse );
#else /*!HAVE_MAGICKCOREGENESIS*/
InitializeMagick( "" );
#endif /*HAVE_MAGICKCOREGENESIS*/
inited = 1;
}
if( !(read = IM_NEW( NULL, Read )) )
return( NULL );
read->filename = im_strdup( NULL, filename );
read->im = im;
read->image = NULL;
read->image_info = CloneImageInfo( NULL );
GetExceptionInfo( &read->exception );
read->n_frames = 0;
read->frames = NULL;
read->frame_height = 0;
read->lock = g_mutex_new();
if( im_add_close_callback( im,
(im_callback_fn) read_destroy, read, NULL ) ) {
read_destroy( read );
return( NULL );
}
if( !read->filename || !read->image_info )
return( NULL );
im_strncpy( read->image_info->filename, filename, MaxTextExtent );
#ifdef DEBUG
printf( "im_magick2vips: read_new: %s\n", read->filename );
#endif /*DEBUG*/
return( read );
}
/* Process a single .desc line.
*/
static int
process_line( SymbolTable *st, const char *text )
{
char line[1024];
#ifdef DEBUG
printf( "read: %s\n", text );
#endif /*DEBUG*/
/* We destroy line during the parse.
*/
im_strncpy( line, text, 1024 );
if( im_isprefix( "#LRJOIN ", line ) ||
im_isprefix( "#TBJOIN ", line ) ) {
/* Yes: magic join command. Break into tokens. Format is eg.
#LRJOIN <left> <right> <out> <x> <y> [<mwidth>]
*/
char *item[MAX_ITEMS];
int nitems;
JoinType type;
JoinNode *arg1, *arg2, *join;
int dx, dy, mwidth;
if( (nitems = break_items( line, item )) < 0 )
return( -1 );
if( nitems != 5 && nitems != 6 ) {
im_error( "global_balance",
_( "bad number of args in join line" ) );
return( -1 );
}
if( !(arg1 = add_node( st, item[0] )) ||
!(arg2 = add_node( st, item[1] )) ||
!(join = add_node( st, item[2] )) )
return( -1 );
dx = atoi( item[3] );
dy = atoi( item[4] );
if( nitems == 6 )
mwidth = atoi( item[5] );
else
mwidth = -1;
if( im_isprefix( "#LRJOIN ", line ) )
type = JOIN_LR;
else
type = JOIN_TB;
if( make_join( st, type, arg1, arg2,
join, 1.0, 0.0, dx, dy, mwidth ) )
return( -1 );
}
else if( im_isprefix( "#LRROTSCALE ", line ) ||
im_isprefix( "#TBROTSCALE ", line ) ) {
/* Rot + scale. Format is eg.
#LRROTSCALE <left> <right> <out> \
<a> <b> <x> <y> [<mwidth>]
*/
char *item[MAX_ITEMS];
int nitems;
JoinType type;
JoinNode *arg1, *arg2, *join;
double a, b, dx, dy;
int mwidth;
if( (nitems = break_items( line, item )) < 0 )
return( -1 );
if( nitems != 7 && nitems != 8 ) {
im_error( "global_balance",
_( "bad number of args in join1 line" ) );
return( -1 );
}
if( !(arg1 = add_node( st, item[0] )) ||
!(arg2 = add_node( st, item[1] )) ||
!(join = add_node( st, item[2] )) )
return( -1 );
a = g_ascii_strtod( item[3], NULL );
b = g_ascii_strtod( item[4], NULL );
dx = g_ascii_strtod( item[5], NULL );
dy = g_ascii_strtod( item[6], NULL );
if( nitems == 8 )
mwidth = atoi( item[7] );
else
mwidth = -1;
if( im_isprefix( "#LRROTSCALE ", line ) )
type = JOIN_LRROTSCALE;
else
type = JOIN_TBROTSCALE;
if( make_join( st, type, arg1, arg2,
join, a, b, dx, dy, mwidth ) )
return( -1 );
}
else if( im_isprefix( "copy ", line ) ) {
/* im_copy() call ... make a JOIN_CP node.
*/
char *item[MAX_ITEMS];
int nitems;
JoinNode *before, *after;
if( (nitems = break_items( line, item )) < 0 )
return( -1 );
if( nitems != 2 ) {
im_error( "global_balance",
_( "bad number of args in copy line" ) );
return( -1 );
}
if( !(before = add_node( st, item[0] )) ||
!(after = add_node( st, item[1] )) ||
make_copy( st, before, after ) )
return( -1 );
}
return( 0 );
}
int
im_vips2dz( IMAGE *in, const char *filename )
{
char *p, *q;
char name[FILENAME_MAX];
char mode[FILENAME_MAX];
char buf[FILENAME_MAX];
int i;
VipsForeignDzLayout layout = VIPS_FOREIGN_DZ_LAYOUT_DZ;
char *suffix = ".jpeg";
int overlap = 0;
int tile_size = 256;
VipsForeignDzDepth depth = VIPS_FOREIGN_DZ_DEPTH_1PIXEL;
gboolean centre = FALSE;
VipsAngle angle = VIPS_ANGLE_0;
/* We can't use im_filename_split() --- it assumes that we have a
* filename with an extension before the ':', and filename here is
* actually a dirname.
*
* Just split on the first ':'.
*/
im_strncpy( name, filename, FILENAME_MAX );
if( (p = strchr( name, ':' )) ) {
*p = '\0';
im_strncpy( mode, p + 1, FILENAME_MAX );
}
strcpy( buf, mode );
p = &buf[0];
if( (q = im_getnextoption( &p )) ) {
if( (i = vips_enum_from_nick( "im_vips2dz",
VIPS_TYPE_FOREIGN_DZ_LAYOUT, q )) < 0 )
return( -1 );
layout = i;
}
if( (q = im_getnextoption( &p )) )
suffix = g_strdup( q );
if( (q = im_getnextoption( &p )) )
overlap = atoi( q );
if( (q = im_getnextoption( &p )) )
tile_size = atoi( q );
if( (q = im_getnextoption( &p )) ) {
if( (i = vips_enum_from_nick( "im_vips2dz",
VIPS_TYPE_FOREIGN_DZ_DEPTH, q )) < 0 )
return( -1 );
depth = i;
}
if( (q = im_getnextoption( &p )) ) {
if( im_isprefix( "cen", q ) )
centre = TRUE;
}
if( (q = im_getnextoption( &p )) ) {
if( (i = vips_enum_from_nick( "im_vips2dz",
VIPS_TYPE_ANGLE, q )) < 0 )
return( -1 );
angle = i;
}
if( vips_dzsave( in, name,
"layout", layout,
"suffix", suffix,
"overlap", overlap,
"tile_size", tile_size,
"depth", depth,
"centre", centre,
"angle", angle,
NULL ) )
return( -1 );
return( 0 );
}
