1 | /* |
1 | /* |
2 | psiconv.c - Part of psiconv, a PSION 5 file formats converter |
2 | psiconv.c - Part of psiconv, a PSION 5 file formats converter |
3 | Copyright (c) 1999 Frodo Looijaard <frodol@dds.nl> |
3 | Copyright (c) 1999-2005 Frodo Looijaard <frodo@frodo.looijaard.name> |
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. |
… | |
… | |
18 | */ |
18 | */ |
19 | |
19 | |
20 | /* Driver program */ |
20 | /* Driver program */ |
21 | |
21 | |
22 | #include "config.h" |
22 | #include "config.h" |
|
|
23 | #include "compat.h" |
23 | #include <getopt.h> |
24 | #include <getopt.h> |
24 | #include <stdio.h> |
25 | #include <stdio.h> |
25 | #include <sys/stat.h> |
26 | #include <sys/stat.h> |
26 | #include <stdlib.h> |
27 | #include <stdlib.h> |
|
|
28 | #include <string.h> |
|
|
29 | #include <strings.h> |
|
|
30 | #include <ctype.h> |
27 | |
31 | |
28 | #ifdef HAVE_UNISTD_H |
32 | #ifdef HAVE_UNISTD_H |
29 | #include <unistd.h> |
33 | #include <unistd.h> |
30 | #endif |
34 | #endif |
31 | |
35 | |
32 | #include <string.h> |
36 | #ifdef IMAGEMAGICK |
33 | #include <ctype.h> |
|
|
34 | #include "data.h" |
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> |
35 | #include "parse.h" |
44 | #include "psiconv.h" |
36 | #include "gen.h" |
45 | #include "gen.h" |
37 | |
46 | |
38 | static void print_help(void); |
47 | static void print_help(void); |
39 | static void print_version(void); |
48 | static void print_version(void); |
40 | static void strtoupper(char *str); |
49 | static void strtoupper(char *str); |
41 | |
50 | |
42 | int psiconv_verbosity = PSICONV_VERB_WARN; |
|
|
43 | |
|
|
44 | void print_help(void) |
51 | void print_help(void) |
45 | { |
52 | { |
|
|
53 | fileformat ff; |
|
|
54 | int i,j; |
|
|
55 | |
46 | puts("Syntax: psiconv [OPTIONS..] [FILE]"); |
56 | puts("Syntax: psiconv [OPTIONS..] [FILE]"); |
47 | puts("Convert the psion Word file FILE to a HTML file"); |
57 | puts("Convert the psion file FILE to other formats"); |
48 | puts("If FILE is not specified, use stdin"); |
58 | puts("If FILE is not specified, use stdin"); |
49 | puts(" -d, --debug Show debug information on stderr"); |
59 | puts(" -c, --configfile=FILE Read extra configuration file after normal ones"); |
50 | puts(" -e, --exact Quit on any parse errors or warnings"); |
60 | puts(" -e, --encoding=ENC Output encoding (default: UTF8)"); |
51 | puts(" -h, --help Display this help and exit"); |
61 | puts(" -h, --help Display this help and exit"); |
|
|
62 | puts(" -n, --noise=LEVEL Select what to print on stderr (overrides psiconv.conf)"); |
52 | puts(" -o, --outputfile Output to file instead of stdout"); |
63 | puts(" -o, --outputfile Output to file instead of stdout"); |
53 | puts(" -s, --silent Do not even show warnings on stderr"); |
|
|
54 | puts(" -T, --type=FILETYPE Output type"); |
64 | puts(" -T, --type=FILETYPE Output type (default: XHTML or TIFF"); |
55 | puts(" -V, --version Display the program version and exit"); |
65 | puts(" -V, --version Display the program version and exit"); |
56 | puts(" -v, --verbose Show progress indicators on stderr"); |
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"); |
57 | puts(""); |
88 | puts(""); |
58 | puts("The following output types are known:"); |
89 | puts("The following output types are known:"); |
59 | puts(" HTML (default)"); |
90 | for (i = 0; i < psiconv_list_length(fileformat_list); i ++) { |
60 | puts(" HTML4"); |
91 | ff = psiconv_list_get(fileformat_list,i); |
61 | puts(" ASCII"); |
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 | } |
62 | puts(" RTF"); |
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"); |
63 | } |
108 | } |
64 | |
109 | |
65 | void print_version(void) |
110 | void print_version(void) |
66 | { |
111 | { |
67 | printf("Version %s\n",VERSION); |
112 | printf("Version %s\n",VERSION); |
… | |
… | |
78 | { |
123 | { |
79 | struct option long_options[] = |
124 | struct option long_options[] = |
80 | { |
125 | { |
81 | {"help",no_argument,NULL,'h'}, |
126 | {"help",no_argument,NULL,'h'}, |
82 | {"version",no_argument,NULL,'V'}, |
127 | {"version",no_argument,NULL,'V'}, |
|
|
128 | {"configfile",required_argument,NULL,'c'}, |
83 | {"verbose",no_argument,NULL,'v'}, |
129 | {"noise",required_argument,NULL,'n'}, |
84 | {"debug",no_argument,NULL,'d'}, |
|
|
85 | {"silent",no_argument,NULL,'s'}, |
|
|
86 | {"outputfile",required_argument,NULL,'o'}, |
130 | {"outputfile",required_argument,NULL,'o'}, |
87 | {"type",required_argument,NULL,'T'}, |
131 | {"type",required_argument,NULL,'T'}, |
88 | {"exact",no_argument,NULL,'e'}, |
132 | {"encoding",no_argument,NULL,'e'}, |
89 | {0,0,0,0} |
133 | {0,0,0,0} |
90 | }; |
134 | }; |
91 | const char* short_options = "hVvsdo:eT:"; |
135 | const char* short_options = "hVn:o:e:T:c:"; |
92 | int option_index; |
136 | int option_index; |
93 | FILE * f; |
137 | FILE * f; |
94 | struct stat fbuf; |
138 | struct stat fbuf; |
95 | |
139 | |
96 | const char *inputfilename = ""; |
140 | const char *inputfilename = ""; |
97 | const char *outputfilename = ""; |
141 | const char *outputfilename = ""; |
98 | char *type = strdup("HTML"); |
142 | const char *extra_configfile = NULL; |
99 | int exact=0; |
143 | char *type = NULL; |
|
|
144 | encoding encoding_type=ENCODING_UTF8; |
|
|
145 | psiconv_list outputlist; |
|
|
146 | int verbosity = 0; |
|
|
147 | psiconv_config config; |
100 | |
148 | |
101 | int c; |
149 | int c,i,res; |
102 | psiconv_buffer buf; |
150 | psiconv_buffer buf; |
103 | psiconv_file file; |
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(); |
104 | |
163 | |
105 | while(1) { |
164 | while(1) { |
106 | c = getopt_long(argc,argv,short_options, long_options, &option_index); |
165 | c = getopt_long(argc,argv,short_options, long_options, &option_index); |
107 | if (c == -1) |
166 | if (c == -1) |
108 | break; |
167 | break; |
109 | switch(c) { |
168 | switch(c) { |
110 | case 'h': print_help(); exit(0); |
169 | case 'h': print_help(); exit(0); |
111 | case 'V': print_version(); exit(0); |
170 | case 'V': print_version(); exit(0); |
112 | case 'v': if (psiconv_verbosity < PSICONV_VERB_PROGRESS) |
171 | case 'n': switch(optarg[0]) { |
113 | psiconv_verbosity = PSICONV_VERB_PROGRESS; |
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 | } |
114 | break; |
191 | break; |
115 | case 'd': psiconv_verbosity = PSICONV_VERB_DEBUG; break; |
|
|
116 | case 's': psiconv_verbosity = PSICONV_VERB_SILENT; break; |
|
|
117 | case 'e': exact = 1; break; |
|
|
118 | case 'o': outputfilename = strdup(optarg); break; |
192 | case 'o': outputfilename = strdup(optarg); break; |
119 | case 'T': type = 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; |
120 | case '?': case ':': fputs("Try `-h' for more information",stderr); |
209 | case '?': case ':': fputs("Try `-h' for more information\n",stderr); |
121 | exit(1); |
210 | exit(1); |
122 | default: fprintf(stderr,"Internal error: getopt_long returned character " |
211 | default: fprintf(stderr,"Internal error: getopt_long returned character " |
123 | "code 0%o ?? (contact the author)\n", c); |
212 | "code 0%o ?? (contact the author)\n", c); |
124 | exit(1); break; |
213 | exit(1); break; |
125 | } |
214 | } |
… | |
… | |
127 | if (optind < argc-1) { |
216 | if (optind < argc-1) { |
128 | fputs("I can only convert one file!\n" |
217 | fputs("I can only convert one file!\n" |
129 | "Try `-h' for more information\n",stderr); |
218 | "Try `-h' for more information\n",stderr); |
130 | exit(1); |
219 | exit(1); |
131 | } else if (optind == argc-1) |
220 | } else if (optind == argc-1) |
132 | inputfilename = strdup(argv[optind]); |
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; |
133 | |
230 | |
134 | /* Open inputfile for reading */ |
231 | /* Open inputfile for reading */ |
135 | |
232 | |
136 | if (strlen(inputfilename) != 0) { |
233 | if (strlen(inputfilename) != 0) { |
137 | if(stat(inputfilename,&fbuf) < 0) { |
234 | if(stat(inputfilename,&fbuf) < 0) { |
… | |
… | |
144 | exit(1); |
241 | exit(1); |
145 | } |
242 | } |
146 | } else |
243 | } else |
147 | f = stdin; |
244 | f = stdin; |
148 | |
245 | |
149 | buf = psiconv_list_new(sizeof(psiconv_u8)); |
246 | if (!(buf = psiconv_buffer_new())) { |
150 | while (! feof(f)) |
247 | fputs("Out of memory error",stderr); |
151 | psiconv_list_fread(buf,1024,f); |
248 | exit(1); |
|
|
249 | } |
|
|
250 | if (psiconv_buffer_fread_all(buf,f)) { |
|
|
251 | fprintf(stderr,"Failure reading file"); |
|
|
252 | exit(1); |
|
|
253 | } |
152 | |
254 | |
153 | if (strlen(inputfilename) != 0) |
255 | if (strlen(inputfilename) != 0) |
154 | if (fclose(f)) { |
256 | if (fclose(f)) { |
155 | perror(inputfilename); |
257 | perror(inputfilename); |
156 | exit(1); |
258 | exit(1); |
157 | } |
259 | } |
158 | |
260 | |
159 | if (psiconv_parse(buf,&file)) |
261 | if (psiconv_parse(config,buf,&file) || (file->type == psiconv_unknown_file)) |
160 | if(exact) |
262 | { |
|
|
263 | fprintf(stderr,"Parse error\n"); |
161 | exit(1); |
264 | exit(1); |
|
|
265 | } |
162 | |
266 | |
163 | /* Open outputfile for writing */ |
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 | |
164 | if (strlen(outputfilename) != 0) { |
307 | if (strlen(outputfilename) != 0) { |
165 | f = fopen(outputfilename,"w"); |
308 | f = fopen(outputfilename,"w"); |
166 | if (! f) { |
309 | if (! f) { |
167 | perror(outputfilename); |
310 | perror(inputfilename); |
168 | exit(1); |
311 | exit(1); |
169 | } |
312 | } |
170 | } else |
313 | } else |
171 | f = stdout; |
314 | f = stdout; |
172 | |
315 | |
173 | strtoupper(type); |
316 | psiconv_list_fwrite_all(outputlist,f); |
174 | if (! strcmp(type,"HTML")) |
|
|
175 | psiconv_gen_html(f,file); |
|
|
176 | else if (! strcmp(type,"HTML4")) |
|
|
177 | psiconv_gen_html4(f,file); |
|
|
178 | else if (! strcmp(type,"ASCII")) |
|
|
179 | psiconv_gen_txt(f,file); |
|
|
180 | else if (! strcmp(type,"RTF")) |
|
|
181 | psiconv_gen_rtf(f,file); |
|
|
182 | else if (! strcmp(type,"IMAGE")) |
|
|
183 | psiconv_gen_image(f,file); |
|
|
184 | else { |
|
|
185 | fprintf(stderr,"Unknown output type: `%s'\n",type); |
|
|
186 | exit(1); |
|
|
187 | } |
|
|
188 | |
317 | |
189 | if (strlen(outputfilename) != 0) |
|
|
190 | if (fclose(f)) { |
318 | if (fclose(f)) { |
191 | perror(outputfilename); |
319 | perror(inputfilename); |
192 | exit(1); |
320 | exit(1); |
193 | } |
321 | } |
194 | |
322 | |
195 | psiconv_free_file(file); |
323 | psiconv_list_free(outputlist); |
196 | |
324 | |
197 | exit(0); |
325 | exit(0); |
198 | } |
326 | } |