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

Contents of /psiconv/trunk/program/psiconv/psiconv.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 245 - (show annotations)
Tue Apr 6 14:27:47 2004 UTC (19 years, 11 months ago) by frodo
File MIME type: text/plain
File size: 9219 byte(s)
(Frodo) Fixed bug that made compiling with gcc 2.95.x impossible

1 /*
2 psiconv.c - Part of psiconv, a PSION 5 file formats converter
3 Copyright (c) 1999-2004 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 /* Driver program */
21
22 #include "config.h"
23 #include "compat.h"
24 #include <getopt.h>
25 #include <stdio.h>
26 #include <sys/stat.h>
27 #include <stdlib.h>
28 #include <string.h>
29 #include <strings.h>
30 #include <ctype.h>
31
32 #ifdef HAVE_UNISTD_H
33 #include <unistd.h>
34 #endif
35
36 #ifdef IMAGEMAGICK
37 #include "magick-aux.h"
38 #endif
39
40 #include <psiconv/data.h>
41 #include <psiconv/list.h>
42 #include <psiconv/parse.h>
43 #include <psiconv/configuration.h>
44 #include "psiconv.h"
45 #include "gen.h"
46
47 static void print_help(void);
48 static void print_version(void);
49 static void strtoupper(char *str);
50
51 void print_help(void)
52 {
53 fileformat ff;
54 int i,j;
55
56 puts("Syntax: psiconv [OPTIONS..] [FILE]");
57 puts("Convert the psion file FILE to other formats");
58 puts("If FILE is not specified, use stdin");
59 puts(" -c, --configfile=FILE Read extra configuration file after normal ones");
60 puts(" -e, --encoding=ENC Output encoding (default: UTF8)");
61 puts(" -h, --help Display this help and exit");
62 puts(" -n, --noise=LEVEL Select what to print on stderr (overrides psiconv.conf)");
63 puts(" -o, --outputfile Output to file instead of stdout");
64 puts(" -T, --type=FILETYPE Output type (default: XHTML or TIFF");
65 puts(" -V, --version Display the program version and exit");
66 puts("");
67 puts("The following encodings are currently supported:");
68 puts(" UTF8 Variable length Unicode encoding");
69 puts(" UCS2 Fixed 16-bit length Unicode encoding");
70 puts(" Psion The encoding your Psion uses (as in psiconv.conf)");
71 puts(" ASCII 7-bit ASCII (other symbols are substituted by '?')");
72 puts("");
73 puts("The following noise levels are currently supported:");
74 puts(" 1 or F: Fatal errors only");
75 puts(" 2 or E: Errors");
76 puts(" 3 or W: Warnings");
77 puts(" 4 or P: Progress indicators");
78 puts(" 5 or D: Debug data");
79 puts("");
80 puts("The following abbreviations are used in the output types list:");
81 puts(" C - processes ClipArt files");
82 puts(" c - processes ClipArt files containing only one image");
83 puts(" M - processes MBM files");
84 puts(" m - processes MBM files containing only one image");
85 puts(" S - processes Sketch files");
86 puts(" T - processes TextEd files");
87 puts(" W - processes Word files");
88 puts("");
89 puts("The following output types are known:");
90 for (i = 0; i < psiconv_list_length(fileformat_list); i ++) {
91 ff = psiconv_list_get(fileformat_list,i);
92 printf(" %s",ff->name);
93 for (j = strlen(ff->name); j < 10; j++)
94 putchar(' ');
95 printf("[%c%c%c%c%c] ",
96 ff->supported_format & FORMAT_CLIPART_MULTIPLE?'C':
97 ff->supported_format & FORMAT_CLIPART_SINGLE?'c':' ',
98 ff->supported_format & FORMAT_MBM_MULTIPLE?'M':
99 ff->supported_format & FORMAT_MBM_SINGLE?'m':' ',
100 ff->supported_format & FORMAT_SKETCH?'S':' ',
101 ff->supported_format & FORMAT_TEXTED?'T':' ',
102 ff->supported_format & FORMAT_WORD?'W':' ');
103 puts(ff->description);
104 }
105 puts("");
106 puts("When using UTF8 with LaTeX type, the resulting LaTeX source should be converted");
107 puts(" to a suitable encoding for your LaTeX installation before being typeset");
108 }
109
110 void print_version(void)
111 {
112 printf("Version %s\n",VERSION);
113 }
114
115 void strtoupper(char *str)
116 {
117 int i;
118 for (i = 0; i < strlen(str); i ++)
119 str[i] = toupper(str[i]);
120 }
121
122 int main(int argc, char *argv[])
123 {
124 struct option long_options[] =
125 {
126 {"help",no_argument,NULL,'h'},
127 {"version",no_argument,NULL,'V'},
128 {"configfile",required_argument,NULL,'c'},
129 {"noise",required_argument,NULL,'n'},
130 {"outputfile",required_argument,NULL,'o'},
131 {"type",required_argument,NULL,'T'},
132 {"encoding",no_argument,NULL,'e'},
133 {0,0,0,0}
134 };
135 const char* short_options = "hVn:o:e:T:c:";
136 int option_index;
137 FILE * f;
138 struct stat fbuf;
139
140 const char *inputfilename = "";
141 const char *outputfilename = "";
142 const char *extra_configfile = NULL;
143 char *type = NULL;
144 encoding encoding_type=ENCODING_UTF8;
145 psiconv_list outputlist;
146 int verbosity = 0;
147 psiconv_config config;
148
149 int c,i,res;
150 psiconv_buffer buf;
151 psiconv_file file;
152 fileformat ff = NULL;
153
154 if (!(fileformat_list = psiconv_list_new(sizeof(struct fileformat_s)))) {
155 fputs("Out of memory error",stderr);
156 exit(1);
157 }
158
159 init_txt();
160 init_xhtml();
161 init_html4();
162 init_image();
163
164 while(1) {
165 c = getopt_long(argc,argv,short_options, long_options, &option_index);
166 if (c == -1)
167 break;
168 switch(c) {
169 case 'h': print_help(); exit(0);
170 case 'V': print_version(); exit(0);
171 case 'n': switch(optarg[0]) {
172 case '1': case 'F':case 'f':
173 verbosity=PSICONV_VERB_FATAL;
174 break;
175 case '2': case 'E':case 'e':
176 verbosity=PSICONV_VERB_ERROR;
177 break;
178 case '3': case 'W':case 'w':
179 verbosity=PSICONV_VERB_WARN;
180 break;
181 case '4': case 'P':case 'p':
182 verbosity=PSICONV_VERB_PROGRESS;
183 break;
184 case '5': case 'D':case 'd':
185 verbosity=PSICONV_VERB_DEBUG;
186 break;
187 default:
188 fputs("Unknown noise level\n",stderr);
189 exit(1);
190 }
191 break;
192 case 'o': outputfilename = strdup(optarg); break;
193 case 'T': type = strdup(optarg); break;
194 case 'e': if(!strcmp(optarg,"UTF8"))
195 encoding_type = ENCODING_UTF8;
196 else if (!strcmp(optarg,"UCS2"))
197 encoding_type = ENCODING_UCS2;
198 else if (!strcmp(optarg,"ASCII"))
199 encoding_type = ENCODING_ASCII;
200 else if (!strcmp(optarg,"Psion"))
201 encoding_type = ENCODING_PSION;
202 else {
203 fputs("Unknown encoding type "
204 "(try '-h' for more information\n",stderr);
205 exit(1);
206 }
207 break;
208 case 'c': extra_configfile = strdup(optarg); break;
209 case '?': case ':': fputs("Try `-h' for more information\n",stderr);
210 exit(1);
211 default: fprintf(stderr,"Internal error: getopt_long returned character "
212 "code 0%o ?? (contact the author)\n", c);
213 exit(1); break;
214 }
215 }
216 if (optind < argc-1) {
217 fputs("I can only convert one file!\n"
218 "Try `-h' for more information\n",stderr);
219 exit(1);
220 } else if (optind == argc-1)
221 if (!(inputfilename = strdup(argv[optind]))) {
222 fputs("Out of memory error",stderr);
223 exit(1);
224 }
225
226 config = psiconv_config_default();
227 psiconv_config_read(extra_configfile,&config);
228 if (verbosity)
229 config->verbosity = verbosity;
230
231 /* Open inputfile for reading */
232
233 if (strlen(inputfilename) != 0) {
234 if(stat(inputfilename,&fbuf) < 0) {
235 perror(inputfilename);
236 exit(1);
237 }
238 f = fopen(inputfilename,"r");
239 if (! f) {
240 perror(inputfilename);
241 exit(1);
242 }
243 } else
244 f = stdin;
245
246 if (!(buf = psiconv_buffer_new())) {
247 fputs("Out of memory error",stderr);
248 exit(1);
249 }
250 if (psiconv_buffer_fread_all(buf,f)) {
251 fprintf(stderr,"Failure reading file");
252 exit(1);
253 }
254
255 if (strlen(inputfilename) != 0)
256 if (fclose(f)) {
257 perror(inputfilename);
258 exit(1);
259 }
260
261 if (psiconv_parse(config,buf,&file) || (file->type == psiconv_unknown_file))
262 {
263 fprintf(stderr,"Parse error\n");
264 exit(1);
265 }
266
267 if (!type) {
268 switch(file->type) {
269 case psiconv_word_file:
270 case psiconv_texted_file:
271 default:
272 type = "XHTML"; break;
273 case psiconv_mbm_file:
274 case psiconv_clipart_file:
275 case psiconv_sketch_file:
276 type = "TIFF"; break;
277 }
278 } else
279 strtoupper(type);
280
281 for (i = 0; i < psiconv_list_length(fileformat_list); i ++) {
282 ff = psiconv_list_get(fileformat_list,i);
283 if (! strcasecmp(type,ff->name)) {
284 break;
285 }
286 }
287
288 if (i == psiconv_list_length(fileformat_list)) {
289 fprintf(stderr,"Unknown output type: `%s'\n",type);
290 exit(1);
291 }
292
293 if (!(outputlist = psiconv_list_new(sizeof(psiconv_u8)))) {
294 fputs("Out of memory error\n",stderr);
295 exit(1);
296 }
297
298 res = ff->output(config,outputlist,file,type,encoding_type);
299 if (res) {
300 fprintf(stderr,
301 "Output format `%s' not permitted for this file type\n",type);
302 exit(1);
303 }
304
305 psiconv_free_file(file);
306
307 if (strlen(outputfilename) != 0) {
308 f = fopen(outputfilename,"w");
309 if (! f) {
310 perror(inputfilename);
311 exit(1);
312 }
313 } else
314 f = stdout;
315
316 psiconv_list_fwrite_all(outputlist,f);
317
318 if (fclose(f)) {
319 perror(inputfilename);
320 exit(1);
321 }
322
323 psiconv_list_free(outputlist);
324
325 exit(0);
326 }

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