/[public]/psiconv/trunk/program/psiconv/gen_image.c
ViewVC logotype

Diff of /psiconv/trunk/program/psiconv/gen_image.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 44 Revision 252
1/* 1/*
2 * gen_image.c - Part of psiconv, a PSION 5 file formats converter 2 * gen_image.c - Part of psiconv, a PSION 5 file formats converter
3 * Copyright (c) 1999 Frodo Looijaard <frodol@dds.nl> 3 * Copyright (c) 1999-2004 Frodo Looijaard <frodol@dds.nl>
4 * 4 *
5 * This program is free software; you can redistribute it and/or modify 5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by 6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or 7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version. 8 * (at your option) any later version.
… …
16 * along with this program; if not, write to the Free Software 16 * along with this program; if not, write to the Free Software
17 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 17 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
18 */ 18 */
19 19
20#include "config.h" 20#include "config.h"
21#include "data.h" 21#include "psiconv/data.h"
22#include "gen.h" 22#include "gen.h"
23#include "psiconv.h"
23#include <string.h> 24#include <string.h>
24#include "psiconv.h" 25#include <stdlib.h>
25 26
26#if IMAGEMAGICK 27#ifdef IMAGEMAGICK
27#include <magick/magick.h> 28#include "magick-aux.h"
28#endif 29#endif
30
31#ifdef DMALLOC
32#include "dmalloc.h"
33#endif
34
35#ifdef IMAGEMAGICK
36static Image *get_paint_data_section(psiconv_paint_data_section sec);
37static void image_to_list(psiconv_list list,Image *image,const char *dest);
38static void gen_image_list(const psiconv_config config,psiconv_list list,
39 const psiconv_list sections, const char *dest);
40static void gen_clipart(const psiconv_config config,psiconv_list list,
41 const psiconv_clipart_f f, const char *dest);
42static void gen_mbm(const psiconv_config config,psiconv_list list,
43 const psiconv_mbm_f f, const char *dest);
44static void gen_sketch(const psiconv_config config,psiconv_list list,
45 const psiconv_sketch_f f, const char *dest);
46static int gen_image(psiconv_config config, psiconv_list list,
47 const psiconv_file file, const char *dest,
48 const encoding encoding_type);
29 49
30/* This is ridiculously simple using ImageMagick. Without it, it would 50/* This is ridiculously simple using ImageMagick. Without it, it would
31 be quite somewhat harder - it will be left for later on */ 51 be quite somewhat harder - it will be left for later on.
52 Note that we ignore any errors. Dangerous... */
32 53
33static Image *get_paint_data_section(psiconv_paint_data_section sec) 54Image *get_paint_data_section(psiconv_paint_data_section sec)
34{ 55{
35 Image *image; 56 Image *image;
36 image = CreateImage(sec->xsize,sec->ysize,sec->red,sec->green, 57 float *pixel, *p, *red, *green, *blue;
37 sec->blue,NULL); 58 int x,y;
59 ExceptionInfo exc;
60
61 GetExceptionInfo(&exc);
62 red = sec->red;
63 green = sec->green;
64 blue = sec->blue;
65 p = pixel = malloc(sec->xsize * sec->ysize * 3 * sizeof(float));
66 for (y = 0; y < sec->ysize; y++) {
67 for (x = 0; x < sec->xsize; x++) {
68 *p++ = *red++;
69 *p++ = *green++;
70 *p++ = *blue++;
71 }
72 }
73
74 image = ConstituteImage(sec->xsize,sec->ysize,"RGB",FloatPixel,pixel,&exc);
75 if (! image || (exc.severity != UndefinedException)) {
76 MagickError(exc.severity,exc.reason,exc.description);
77 exit(1);
78 }
79 free(pixel);
80
81 DestroyExceptionInfo(&exc);
82
38 return image; 83 return image;
39} 84}
40 85
41 86
42static int psiconv_gen_image_clipart(FILE *of, psiconv_clipart_f f, 87void image_to_list(psiconv_list list,Image *image,const char *dest)
43 const char *dest)
44{ 88{
45#if IMAGEMAGICK
46 psiconv_clipart_section section;
47 MagickInfo *mi = GetMagickInfo(dest);
48 ImageInfo image_info; 89 ImageInfo *image_info;
90 ExceptionInfo exc;
91 size_t length;
92 char *data;
93 int i;
94
95 strcpy(image->magick,dest);
96 image_info = CloneImageInfo(NULL);
97 GetExceptionInfo(&exc);
98 data = ImageToBlob(image_info,image,&length,&exc);
99 if (!data || (exc.severity != UndefinedException)) {
100 MagickError(exc.severity,exc.reason,exc.description);
101 exit(1);
102 }
103 for (i = 0; i < length; i++) {
104 if (psiconv_list_add(list,data+i)) {
105 fprintf(stderr,"Out of memory error");
106 exit(1);
107 }
108 }
109 DestroyExceptionInfo(&exc);
110 DestroyImageInfo(image_info);
111}
112
113void gen_image_list(const psiconv_config config,psiconv_list list,
114 const psiconv_list sections, const char *dest)
115{
116 psiconv_paint_data_section section;
117 const MagickInfo *mi;
118 ImageInfo *image_info;
49 Image *image = NULL; 119 Image *image = NULL;
50 Image *last_image = NULL; 120 Image *last_image = NULL;
51 Image *this_image; 121 Image *this_image, *images;
122 ExceptionInfo exc;
52 int i; 123 int i;
124
125 GetExceptionInfo(&exc);
126 mi = GetMagickInfo(dest,&exc);
127 if (!mi || (exc.severity != UndefinedException)) {
128 MagickError(exc.severity,exc.reason,exc.description);
129 exit(1);
53 130 }
131
54 if ((psiconv_list_length(f->sections) < 1) || 132 if ((psiconv_list_length(sections) < 1) ||
55 ((psiconv_list_length(f->sections)) > 1 && ! (mi->adjoin))) 133 ((psiconv_list_length(sections)) > 1 && ! (mi->adjoin))) {
56#endif 134 fprintf(stderr,"This image type supports only one image\n");
57 return -1; 135 exit(1);
58#if IMAGEMAGICK 136 }
137
59 for (i = 0; i < psiconv_list_length(f->sections); i++) { 138 for (i = 0; i < psiconv_list_length(sections); i++) {
60 section = psiconv_list_get(f->sections,i); 139 if (!(section = psiconv_list_get(sections,i))) {
140 fprintf(stderr,"Internal data structures corrupted\n");
141 exit(1);
142 }
61 this_image = get_paint_data_section(section->picture); 143 this_image = get_paint_data_section(section);
62 if (! image) { 144 if (! image) {
63 image = this_image; 145 image = this_image;
64 last_image = image;
65 } else { 146 } else {
66 last_image->next=this_image; 147 last_image->next=this_image;
67 this_image->previous=last_image; 148 this_image->previous=last_image;
68 this_image->scene=i; 149 }
69 last_image=this_image; 150 last_image = this_image;
70 } 151 }
152
153 image_info = CloneImageInfo(NULL);
154 if (image->next) {
155 images = CoalesceImages(image,&exc);
156 if (!images || (exc.severity != UndefinedException)) {
157 MagickError(exc.severity,exc.reason,exc.description);
158 exit(1);
71 } 159 }
160 } else
161 images = image;
72 162
163 image_to_list(list,image,dest);
164
165 DestroyExceptionInfo(&exc);
73 GetImageInfo(&image_info); 166 DestroyImageInfo(image_info);
74 image_info.file = of; 167 if (image != images)
75 strcpy(image->magick, dest); 168 DestroyImages(image);
76 image_info.adjoin=1; 169 DestroyImages(images);
77 WriteImage(&image_info,image);
78 return 0;
79#endif
80} 170}
81 171
82static int psiconv_gen_image_mbm(FILE *of, psiconv_mbm_f f, const char *dest) 172void gen_clipart(const psiconv_config config,psiconv_list list,
173 const psiconv_clipart_f f, const char *dest)
83{ 174{
84#if IMAGEMAGICK
85 psiconv_paint_data_section section;
86 MagickInfo *mi = GetMagickInfo(dest);
87 ImageInfo image_info;
88 Image *image = NULL;
89 Image *last_image = NULL;
90 Image *this_image;
91 int i; 175 int i;
176 psiconv_list sections;
177 psiconv_clipart_section section;
178
179 if (!(sections = psiconv_list_new(sizeof(*section->picture)))) {
180 fprintf(stderr,"Out of memory error\n");
181 exit(1);
92 182 }
93 if ((psiconv_list_length(f->sections) < 1) ||
94 ((psiconv_list_length(f->sections)) > 1 && ! (mi->adjoin)))
95#endif
96 return -1;
97#if IMAGEMAGICK
98 for (i = 0; i < psiconv_list_length(f->sections); i++) { 183 for (i = 0; i < psiconv_list_length(f->sections); i ++) {
99 section = psiconv_list_get(f->sections,i); 184 if (!(section = psiconv_list_get(f->sections,i))) {
100 this_image = get_paint_data_section(section); 185 fprintf(stderr,"Internal data structures corrupted\n");
101 if (! image) { 186 exit(1);
102 image = this_image;
103 last_image = image;
104 } else {
105 last_image->next=this_image;
106 this_image->previous=last_image;
107 this_image->scene=i;
108 last_image=this_image;
109 }
110 } 187 }
111 188 if ((psiconv_list_add(sections,section->picture))) {
112 GetImageInfo(&image_info); 189 fprintf(stderr,"Out of memory error\n");
113 image_info.file = of; 190 exit(1);
114 strcpy(image->magick, dest); 191 }
115 image_info.adjoin=1; 192 }
116 WriteImage(&image_info,image); 193 gen_image_list(config,list,sections,dest);
117 return 0; 194 psiconv_list_free(sections);
118#endif
119} 195}
120 196
121static void psiconv_gen_image_sketch(FILE *of, psiconv_sketch_f f, 197void gen_mbm(const psiconv_config config,psiconv_list list,
122 const char *dest) 198 const psiconv_mbm_f f, const char *dest)
123{ 199{
124#if IMAGEMAGICK 200 gen_image_list(config,list,f->sections,dest);
125 ImageInfo image_info; 201}
202
203
204void gen_sketch(const psiconv_config config,psiconv_list list,
205 const psiconv_sketch_f f, const char *dest)
206{
126 Image *image; 207 Image *image;
127 208
128 image = get_paint_data_section(f->sketch_sec->picture); 209 image = get_paint_data_section(f->sketch_sec->picture);
129 GetImageInfo(&image_info); 210 image_to_list(list,image,dest);
130 image_info.file = of; 211 DestroyImage(image);
131 strcpy(image->magick, dest);
132 WriteImage(&image_info,image);
133#endif
134} 212}
135 213
136static int psiconv_gen_image(FILE * of, const psiconv_file file, 214
137 const char *dest) 215int gen_image(psiconv_config config, psiconv_list list,
216 const psiconv_file file, const char *dest,
217 const encoding encoding_type)
138{ 218{
139 if (file->type == psiconv_mbm_file) 219 if (file->type == psiconv_mbm_file)
140 return psiconv_gen_image_mbm(of,(psiconv_mbm_f) file->file,dest); 220 gen_mbm(config,list,(psiconv_mbm_f) file->file,dest);
141 if (file->type == psiconv_clipart_file) 221 else if (file->type == psiconv_clipart_file)
142 return psiconv_gen_image_clipart(of,(psiconv_clipart_f) file->file,dest); 222 gen_clipart(config,list,
223 (psiconv_clipart_f) file->file,dest);
224 else
143 else if (file->type == psiconv_sketch_file) { 225 if (file->type == psiconv_sketch_file) {
144 psiconv_gen_image_sketch(of,(psiconv_sketch_f) file->file,dest); 226 gen_sketch(config, list,(psiconv_sketch_f) file->file,dest);
145 return 0;
146 } else 227 } else
147 return -1; 228 return -1;
229 return 0;
148} 230}
231
232#endif
149 233
150void init_image(void) 234void init_image(void)
151{ 235{
152 struct psiconv_fileformat ff; 236 struct fileformat_s ff;
153#if IMAGEMAGICK 237#if IMAGEMAGICK
154 MagickInfo *mi; 238 const MagickInfo *mi;
155 ff.output = psiconv_gen_image; 239 ff.output = gen_image;
156 for (mi = GetMagickInfo(NULL); mi ; mi = mi->next) { 240 for (mi = GetMagickFileList(); mi ; mi = mi->next) {
157 if (mi->encoder) { 241 if (mi->encoder) {
158 ff.name = strdup(mi->tag); 242 ff.name = strdup(mi->name);
159 ff.description = strdup(mi->description); 243 ff.description = strdup(mi->description);
244 ff.supported_format = FORMAT_CLIPART_SINGLE | FORMAT_MBM_SINGLE |
245 FORMAT_SKETCH;
246 if (mi->adjoin)
247 ff.supported_format |= FORMAT_MBM_MULTIPLE | FORMAT_CLIPART_MULTIPLE;
160 psiconv_list_add(fileformat_list,&ff); 248 psiconv_list_add(fileformat_list,&ff);
161 } 249 }
162 } 250 }
163#endif 251#endif
164} 252}
Legend:
Removed from v.44  
changed lines
  Added in v.252
frodo@frodo.looijaard.name
 ViewVC Help
Powered by ViewVC 1.1.26