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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 66 - (hide annotations)
Fri Dec 15 17:17:45 2000 UTC (23 years, 3 months ago) by frodo
File MIME type: text/plain
File size: 6014 byte(s)
(Frodo) All formats tested, with a little luck most problems are now caught

1 frodo 32 /*
2     * gen_image.c - Part of psiconv, a PSION 5 file formats converter
3     * Copyright (c) 1999 Frodo Looijaard <frodol@dds.nl>
4     *
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
7     * the Free Software Foundation; either version 2 of the License, or
8     * (at your option) any later version.
9     *
10     * This program is distributed in the hope that it will be useful,
11     * but WITHOUT ANY WARRANTY; without even the implied warranty of
12     * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13     * GNU General Public License for more details.
14     *
15     * You should have received a copy of the GNU General Public License
16     * along with this program; if not, write to the Free Software
17     * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
18     */
19    
20     #include "config.h"
21 frodo 58 #include "psiconv/data.h"
22 frodo 32 #include "gen.h"
23     #include <string.h>
24 frodo 34 #include "psiconv.h"
25 frodo 32
26     #if IMAGEMAGICK
27 frodo 52 #include "magick-aux.h"
28 frodo 32 #include <magick/magick.h>
29    
30 frodo 53 static void set_filename(char *dest,const char *type, const char *name)
31     {
32     int len;
33     strcpy(dest,type);
34     len = strlen(dest);
35     dest[len] = ':';
36     strcpy(dest + len + 1,name);
37     }
38    
39 frodo 32 /* This is ridiculously simple using ImageMagick. Without it, it would
40 frodo 49 be quite somewhat harder - it will be left for later on.
41     Note that we ignore any errors. Dangerous... */
42 frodo 32
43 frodo 39 static Image *get_paint_data_section(psiconv_paint_data_section sec)
44 frodo 32 {
45     Image *image;
46 frodo 49 float *pixel, *p, *red, *green, *blue;
47     int x,y;
48 frodo 53 ExceptionInfo exc;
49 frodo 49
50 frodo 53 GetExceptionInfo(&exc);
51 frodo 49 red = sec->red;
52     green = sec->green;
53     blue = sec->blue;
54     p = pixel = malloc(sec->xsize * sec->ysize * 3 * sizeof(float));
55     for (y = 0; y < sec->ysize; y++) {
56     for (x = 0; x < sec->xsize; x++) {
57     *p++ = *red++;
58     *p++ = *green++;
59     *p++ = *blue++;
60     }
61     }
62 frodo 66
63 frodo 53 image = ConstituteImage(sec->xsize,sec->ysize,"RGB",FloatPixel,pixel,&exc);
64     if (! image) {
65     MagickError(exc.severity,exc.message,exc.qualifier);
66     }
67 frodo 49 free(pixel);
68    
69 frodo 39 return image;
70 frodo 32 }
71    
72 frodo 48 #endif
73 frodo 39
74 frodo 53 static int psiconv_gen_image_clipart(const char *filename, psiconv_clipart_f f,
75 frodo 44 const char *dest)
76     {
77     #if IMAGEMAGICK
78     psiconv_clipart_section section;
79     MagickInfo *mi = GetMagickInfo(dest);
80 frodo 53 ImageInfo *image_info;
81 frodo 44 Image *image = NULL;
82     Image *last_image = NULL;
83 frodo 53 Image *this_image, *images;
84     ExceptionInfo exc;
85 frodo 44 int i;
86 frodo 53 unsigned int status;
87 frodo 44
88     if ((psiconv_list_length(f->sections) < 1) ||
89     ((psiconv_list_length(f->sections)) > 1 && ! (mi->adjoin)))
90     #endif
91     return -1;
92     #if IMAGEMAGICK
93     for (i = 0; i < psiconv_list_length(f->sections); i++) {
94     section = psiconv_list_get(f->sections,i);
95     this_image = get_paint_data_section(section->picture);
96     if (! image) {
97     image = this_image;
98     } else {
99     last_image->next=this_image;
100     this_image->previous=last_image;
101     }
102 frodo 53 last_image = this_image;
103 frodo 44 }
104    
105 frodo 53 GetExceptionInfo(&exc);
106     image_info = CloneImageInfo(NULL);
107     set_filename(image->filename,dest,filename);
108 frodo 66 if (image->next)
109     images = CoalesceImages(image,&exc);
110     else
111     images = image;
112 frodo 53 if (! images)
113     CatchImageException(image);
114    
115     status = WriteImage(image_info,images);
116     if (!status)
117     CatchImageException(images);
118     DestroyImageInfo(image_info);
119 frodo 66 if (image != images)
120     DestroyImages(image);
121 frodo 53 DestroyImages(images);
122 frodo 44 return 0;
123     #endif
124     }
125    
126 frodo 53 static int psiconv_gen_image_mbm(const char *filename, psiconv_mbm_f f,
127     const char *dest)
128 frodo 32 {
129 frodo 66
130 frodo 39 #if IMAGEMAGICK
131 frodo 32 psiconv_paint_data_section section;
132 frodo 38 MagickInfo *mi = GetMagickInfo(dest);
133 frodo 53 ImageInfo *image_info;
134 frodo 39 Image *image = NULL;
135     Image *last_image = NULL;
136 frodo 53 Image *this_image, *images;
137     ExceptionInfo exc;
138 frodo 39 int i;
139 frodo 53 unsigned int status;
140 frodo 66
141 frodo 39 if ((psiconv_list_length(f->sections) < 1) ||
142     ((psiconv_list_length(f->sections)) > 1 && ! (mi->adjoin)))
143 frodo 38 #endif
144 frodo 39 return -1;
145     #if IMAGEMAGICK
146 frodo 66
147 frodo 39 for (i = 0; i < psiconv_list_length(f->sections); i++) {
148 frodo 40 section = psiconv_list_get(f->sections,i);
149 frodo 39 this_image = get_paint_data_section(section);
150     if (! image) {
151 frodo 40 image = this_image;
152 frodo 39 } else {
153     last_image->next=this_image;
154     this_image->previous=last_image;
155     }
156 frodo 53 last_image = this_image;
157 frodo 39 }
158 frodo 40
159 frodo 53 GetExceptionInfo(&exc);
160     image_info = CloneImageInfo(NULL);
161     set_filename(image->filename,dest,filename);
162 frodo 66 if (image->next)
163     images = CoalesceImages(image,&exc);
164     else
165     images = image;
166 frodo 53 if (! images)
167     CatchImageException(image);
168    
169     status = WriteImage(image_info,images);
170     if (!status)
171     CatchImageException(images);
172     DestroyImageInfo(image_info);
173 frodo 66 if (image != images)
174     DestroyImages(image);
175 frodo 53 DestroyImages(images);
176 frodo 39 return 0;
177 frodo 38 #endif
178 frodo 32 }
179    
180 frodo 53 static void psiconv_gen_image_sketch(const char *filename, psiconv_sketch_f f,
181 frodo 39 const char *dest)
182 frodo 32 {
183 frodo 39 #if IMAGEMAGICK
184 frodo 53 ImageInfo *image_info;
185 frodo 39 Image *image;
186    
187     image = get_paint_data_section(f->sketch_sec->picture);
188 frodo 53 image_info = CloneImageInfo(NULL);
189     set_filename(image->filename,dest,filename);
190     WriteImage(image_info,image);
191     DestroyImageInfo(image_info);
192     DestroyImage(image);
193 frodo 39 #endif
194 frodo 32 }
195    
196 frodo 53 static int psiconv_gen_image(const char * filename, const psiconv_file file,
197 frodo 34 const char *dest)
198 frodo 32 {
199 frodo 38 if (file->type == psiconv_mbm_file)
200 frodo 53 psiconv_gen_image_mbm(filename,(psiconv_mbm_f) file->file,dest);
201 frodo 66 else if (file->type == psiconv_clipart_file)
202 frodo 53 psiconv_gen_image_clipart(filename,(psiconv_clipart_f) file->file,dest);
203 frodo 38 else if (file->type == psiconv_sketch_file) {
204 frodo 53 psiconv_gen_image_sketch(filename,(psiconv_sketch_f) file->file,dest);
205 frodo 34 } else
206     return -1;
207 frodo 53 return 0;
208 frodo 32 }
209    
210 frodo 34 void init_image(void)
211     {
212 frodo 56 struct psiconv_fileformat_s ff;
213 frodo 34 #if IMAGEMAGICK
214     MagickInfo *mi;
215     ff.output = psiconv_gen_image;
216 frodo 52 for (mi = GetMagickFileList(); mi ; mi = mi->next) {
217 frodo 34 if (mi->encoder) {
218     ff.name = strdup(mi->tag);
219     ff.description = strdup(mi->description);
220     psiconv_list_add(fileformat_list,&ff);
221     }
222     }
223     #endif
224     }
225    

frodo@frodo.looijaard.name
ViewVC Help
Powered by ViewVC 1.1.26