/* input-magick.c: import files via image magick

Copyright (C) 1999, 2000, 2001 Martin Weber.

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.1 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307

USA. */

/* This code was tested with ImageMagick 5.2.1-5.5.2

it doesn't work with earlier versions */

#ifdef HAVE_CONFIG_H

#include "config.h"

#endif /* Def: HAVE_CONFIG_H */

//#include "input.h"

//#include "input-magick.h"

//#include "bitmap.h"

//#include <stdio.h>

//#include <stdlib.h>

//#include <string.h>

//#include <sys/types.h> /* Needed for correct interpretation of magick/api.h */

//#include <magick/api.h>

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#include <sys/types.h> /* Needed for correct interpretation of magick/api.h */

#include <magick/api.h>

#include "input-magick.h"

#include "bitmap.h"

static at_bitmap_type input_magick_reader (at_string filename,

at_address user_data);

static at_bitmap_type

input_magick_reader(at_string filename,

at_address user_data)

{

Image *image = NULL;

ImageInfo *image_info;

ImageType image_type;

unsigned int i,j,point,np,runcount;

at_bitmap_type bitmap;

PixelPacket p;

PixelPacket *pixel=&p;

ExceptionInfo exception;

#if (MagickLibVersion < 0x0538)

MagickIncarnate("");

#else

// InitializeMagick("");

MagickCoreGenesis("",MagickFalse);

#endif

GetExceptionInfo(&exception);

image_info=CloneImageInfo((ImageInfo *) NULL);

(void) strcpy(image_info->filename,filename);

image_info->antialias = 0;

image=ReadImage(image_info,&exception);

if (image == (Image *) NULL) {

#if (MagickLibVersion <= 0x0525)

/* MagickError(exception.severity,exception.message,exception.qualifier); */

if (msg_func)

msg_func (exception.qualifier, AT_MSG_FATAL, msg_data);

goto cleanup;

#else

/* MagickError(exception.severity,exception.reason,exception.description); */

if (msg_func)

msg_func (exception.reason, AT_MSG_FATAL, msg_data);

goto cleanup;

#endif

}

#if (MagickLibVersion < 0x0540)

image_type=GetImageType(image);

#else

image_type=GetImageType(image, &exception);

#endif

if(image_type == BilevelType || image_type == GrayscaleType)

np=1;

else

np=3;

bitmap = at_bitmap_init(NULL, image->columns, image->rows, np);

for(j=0,runcount=0,point=0;j<image->rows;j++)

for(i=0;i<image->columns;i++) {

//p=GetOnePixel(image,i,j);

GetOneAuthenticPixel(image,i,j,&p,&image->exception);

AT_BITMAP_BITS(bitmap)[point++]=pixel->red; /* if gray: red=green=blue */

if(np==3) {

AT_BITMAP_BITS(bitmap)[point++]=pixel->green;

AT_BITMAP_BITS(bitmap)[point++]=pixel->blue;

}

}

DestroyImage(image);

cleanup:

DestroyImageInfo(image_info);

return(bitmap);

}

int

install_input_magick_readers(void)

{

#if (MagickLibVersion < 0x0534)

#define AT_MAGICK_SET_INFO(X) X = GetMagickInfo(NULL)

#else /* (MagickLibVersion < 0x0534) */

#define AT_MAGICK_SET_INFO(X) \

do { \

X = GetMagickInfo(NULL, &exception); \

if (X && !X->next) \

X = GetMagickInfo("*", &exception); \

} while (0)

#endif /* (MagickLibVersion < 0x0534) */

#if (MagickLibVersion < 0x0537)

#define AT_MAGICK_SUFFIX_FIELD_NAME tag

#else /* (MagickLibVersion < 0x0537) */

#define AT_MAGICK_SUFFIX_FIELD_NAME name

#endif /* (MagickLibVersion < 0x0537) */

#if (MagickLibVersion < 0x0538)

#define AT_MAGICK_INITIALIZER() MagickIncarnate("")

#else /* (MagickLibVersion < 0x0538) */

#define AT_MAGICK_INITIALIZER() MagickCoreGenesis("",MagickFalse);

#endif /* (MagickLibVersion < 0x0538) */

#if (MagickLibVersion < 0x0540)

#define AT_MAGICK_INFO_TYPE_MODIFIER const

#else /* (MagickLibVersion < 0x0540) */

#define AT_MAGICK_INFO_TYPE_MODIFIER

#endif /* (MagickLibVersion < 0x0540)*/

{

ExceptionInfo exception;

AT_MAGICK_INFO_TYPE_MODIFIER const MagickInfo *info, *magickinfo;

AT_MAGICK_INITIALIZER() ;

GetExceptionInfo(&exception);

AT_MAGICK_SET_INFO(info);

magickinfo = info;

while (info)

{

if (info->AT_MAGICK_SUFFIX_FIELD_NAME && info->description)

at_input_add_handler_full(info->AT_MAGICK_SUFFIX_FIELD_NAME,

info->description,

input_magick_reader,

0,

info->AT_MAGICK_SUFFIX_FIELD_NAME,

NULL);

info = info->next ;

}

}

return 0;

}