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-2014 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. |
… | |
… | |
13 | GNU General Public License for more details. |
13 | GNU General Public License for more details. |
14 | |
14 | |
15 | You should have received a copy of the GNU General Public License |
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 |
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 | */ |
|
|
19 | |
|
|
20 | /* |
|
|
21 | 2002/Apr. Keita KAWABE |
|
|
22 | * Support for narrow build Asian Psions added. |
|
|
23 | |
|
|
24 | Now psiconv understands -u or --UTF8 option. |
|
|
25 | This option is passed to output_function as the fourth parameter |
|
|
26 | (thus the typedef of output_function was changed). |
|
|
27 | |
|
|
28 | If a called generator (gen_*.c) can handle UTF8, then it handles |
|
|
29 | the character conversion etc. accordingly. |
|
|
30 | |
|
|
31 | * psiconv seemed to want to take the argument of the options |
|
|
32 | case-insensitively (i.e. LaTeX -> LATEX), but that was not working |
|
|
33 | under my environment. Fixed it. |
|
|
34 | */ |
18 | */ |
35 | |
19 | |
36 | /* Driver program */ |
20 | /* Driver program */ |
37 | |
21 | |
38 | #include "config.h" |
22 | #include "config.h" |
… | |
… | |
40 | #include <getopt.h> |
24 | #include <getopt.h> |
41 | #include <stdio.h> |
25 | #include <stdio.h> |
42 | #include <sys/stat.h> |
26 | #include <sys/stat.h> |
43 | #include <stdlib.h> |
27 | #include <stdlib.h> |
44 | #include <string.h> |
28 | #include <string.h> |
|
|
29 | #include <strings.h> |
45 | #include <ctype.h> |
30 | #include <ctype.h> |
46 | |
31 | |
47 | #ifdef HAVE_UNISTD_H |
32 | #ifdef HAVE_UNISTD_H |
48 | #include <unistd.h> |
33 | #include <unistd.h> |
49 | #endif |
34 | #endif |
… | |
… | |
69 | int i,j; |
54 | int i,j; |
70 | |
55 | |
71 | puts("Syntax: psiconv [OPTIONS..] [FILE]"); |
56 | puts("Syntax: psiconv [OPTIONS..] [FILE]"); |
72 | puts("Convert the psion file FILE to other formats"); |
57 | puts("Convert the psion file FILE to other formats"); |
73 | puts("If FILE is not specified, use stdin"); |
58 | puts("If FILE is not specified, use stdin"); |
74 | puts(" -d, --debug Show debug information on stderr"); |
59 | puts(" -c, --configfile=FILE Read extra configuration file after normal ones"); |
75 | puts(" -e, --encoding Output encoding (default: UTF8)"); |
60 | puts(" -e, --encoding=ENC Output encoding (default: UTF8)"); |
76 | 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)"); |
77 | puts(" -o, --outputfile Output to file instead of stdout"); |
63 | puts(" -o, --outputfile Output to file instead of stdout"); |
78 | puts(" -s, --silent Do not even show warnings on stderr"); |
|
|
79 | puts(" -T, --type=FILETYPE Output type"); |
64 | puts(" -T, --type=FILETYPE Output type (default: XHTML or TIFF"); |
80 | puts(" -V, --version Display the program version and exit"); |
65 | puts(" -V, --version Display the program version and exit"); |
81 | puts(" -v, --verbose Show progress indicators on stderr"); |
|
|
82 | puts(""); |
66 | puts(""); |
83 | puts("The following encodings are currently supported:"); |
67 | puts("The following encodings are currently supported:"); |
84 | puts(" UTF8 Variable length Unicode encoding"); |
68 | puts(" UTF8 Variable length Unicode encoding"); |
85 | puts(" UCS2 Fixed 16-bit length Unicode encoding"); |
69 | puts(" UCS2 Fixed 16-bit length Unicode encoding"); |
86 | puts(" Psion The encoding your Psion uses (as in psiconv.conf)"); |
70 | puts(" Psion The encoding your Psion uses (as in psiconv.conf)"); |
87 | puts(" ASCII 7-bit ASCII (other symbols are substituted by '?')"); |
71 | puts(" ASCII 7-bit ASCII (other symbols are substituted by '?')"); |
88 | puts(""); |
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:"); |
89 | puts("The following output types are known:"); |
90 | for (i = 0; i < psiconv_list_length(fileformat_list); i ++) { |
90 | for (i = 0; i < psiconv_list_length(fileformat_list); i ++) { |
91 | ff = psiconv_list_get(fileformat_list,i); |
91 | ff = psiconv_list_get(fileformat_list,i); |
92 | printf(" %s",ff->name); |
92 | printf(" %s",ff->name); |
93 | for (j = strlen(ff->name); j < 15; j++) |
93 | for (j = strlen(ff->name); j < 10; j++) |
94 | putchar(' '); |
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':' '); |
95 | puts(ff->description); |
103 | puts(ff->description); |
96 | } |
104 | } |
97 | puts(""); |
105 | puts(""); |
98 | puts("When using UTF8 with LaTeX type, the resulting LaTeX source should be converted"); |
106 | puts("When using UTF8 with LaTeX type, the resulting LaTeX source should be converted"); |
99 | puts(" to a suitable encoding for your LaTeX installation before being typeset"); |
107 | puts(" to a suitable encoding for your LaTeX installation before being typeset"); |
… | |
… | |
115 | { |
123 | { |
116 | struct option long_options[] = |
124 | struct option long_options[] = |
117 | { |
125 | { |
118 | {"help",no_argument,NULL,'h'}, |
126 | {"help",no_argument,NULL,'h'}, |
119 | {"version",no_argument,NULL,'V'}, |
127 | {"version",no_argument,NULL,'V'}, |
|
|
128 | {"configfile",required_argument,NULL,'c'}, |
120 | {"verbose",no_argument,NULL,'v'}, |
129 | {"noise",required_argument,NULL,'n'}, |
121 | {"debug",no_argument,NULL,'d'}, |
|
|
122 | {"silent",no_argument,NULL,'s'}, |
|
|
123 | {"outputfile",required_argument,NULL,'o'}, |
130 | {"outputfile",required_argument,NULL,'o'}, |
124 | {"type",required_argument,NULL,'T'}, |
131 | {"type",required_argument,NULL,'T'}, |
125 | {"encoding",no_argument,NULL,'e'}, |
132 | {"encoding",no_argument,NULL,'e'}, |
126 | {0,0,0,0} |
133 | {0,0,0,0} |
127 | }; |
134 | }; |
128 | const char* short_options = "hVvsdo:e:T:"; |
135 | const char* short_options = "hVn:o:e:T:c:"; |
129 | int option_index; |
136 | int option_index; |
130 | FILE * f; |
137 | FILE * f; |
131 | struct stat fbuf; |
138 | struct stat fbuf; |
132 | |
139 | |
133 | const char *inputfilename = ""; |
140 | const char *inputfilename = ""; |
134 | const char *outputfilename = ""; |
141 | const char *outputfilename = ""; |
135 | char *type = strdup("HTML4"); |
142 | const char *extra_configfile = NULL; |
|
|
143 | char *type = NULL; |
136 | encoding encoding_type=ENCODING_UTF8; |
144 | encoding encoding_type=ENCODING_UTF8; |
137 | psiconv_list outputlist; |
145 | psiconv_list outputlist; |
|
|
146 | int verbosity = 0; |
|
|
147 | psiconv_config config; |
138 | |
148 | |
139 | int c,i,res; |
149 | int c,i,res; |
140 | psiconv_buffer buf; |
150 | psiconv_buffer buf; |
141 | psiconv_file file; |
151 | psiconv_file file; |
142 | fileformat ff = NULL; |
152 | fileformat ff = NULL; |
143 | |
153 | |
144 | psiconv_config config = psiconv_config_default(); |
|
|
145 | psiconv_config_read(NULL,&config); |
|
|
146 | |
|
|
147 | if (!(fileformat_list = psiconv_list_new(sizeof(struct fileformat_s)))) { |
154 | if (!(fileformat_list = psiconv_list_new(sizeof(struct fileformat_s)))) { |
148 | fputs("Out of memory error",stderr); |
155 | fputs("Out of memory error",stderr); |
149 | exit(1); |
156 | exit(1); |
150 | } |
157 | } |
151 | |
158 | |
152 | init_txt(); |
159 | init_txt(); |
|
|
160 | init_xhtml(); |
|
|
161 | init_html4(); |
153 | init_image(); |
162 | init_image(); |
154 | init_html(); |
|
|
155 | #if 0 |
|
|
156 | init_html4(); |
|
|
157 | init_latex(); |
|
|
158 | init_rtf(); |
|
|
159 | #endif |
|
|
160 | |
163 | |
161 | while(1) { |
164 | while(1) { |
162 | c = getopt_long(argc,argv,short_options, long_options, &option_index); |
165 | c = getopt_long(argc,argv,short_options, long_options, &option_index); |
163 | if (c == -1) |
166 | if (c == -1) |
164 | break; |
167 | break; |
165 | switch(c) { |
168 | switch(c) { |
166 | case 'h': print_help(); exit(0); |
169 | case 'h': print_help(); exit(0); |
167 | case 'V': print_version(); exit(0); |
170 | case 'V': print_version(); exit(0); |
168 | case 'v': if (config->verbosity < PSICONV_VERB_PROGRESS) |
171 | case 'n': switch(optarg[0]) { |
169 | config->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 | } |
170 | break; |
191 | break; |
171 | case 'd': config->verbosity = PSICONV_VERB_DEBUG; break; |
|
|
172 | case 's': config->verbosity = PSICONV_VERB_ERROR; break; |
|
|
173 | case 'o': outputfilename = strdup(optarg); break; |
192 | case 'o': outputfilename = strdup(optarg); break; |
174 | case 'T': type = strdup(optarg); break; |
193 | case 'T': type = strdup(optarg); break; |
175 | case 'e': if(!strcmp(optarg,"UTF8")) |
194 | case 'e': if(!strcmp(optarg,"UTF8")) |
176 | encoding_type = ENCODING_UTF8; |
195 | encoding_type = ENCODING_UTF8; |
177 | else if (!strcmp(optarg,"UCS2")) |
196 | else if (!strcmp(optarg,"UCS2")) |
… | |
… | |
184 | fputs("Unknown encoding type " |
203 | fputs("Unknown encoding type " |
185 | "(try '-h' for more information\n",stderr); |
204 | "(try '-h' for more information\n",stderr); |
186 | exit(1); |
205 | exit(1); |
187 | } |
206 | } |
188 | break; |
207 | break; |
|
|
208 | case 'c': extra_configfile = strdup(optarg); break; |
189 | case '?': case ':': fputs("Try `-h' for more information\n",stderr); |
209 | case '?': case ':': fputs("Try `-h' for more information\n",stderr); |
190 | exit(1); |
210 | exit(1); |
191 | default: fprintf(stderr,"Internal error: getopt_long returned character " |
211 | default: fprintf(stderr,"Internal error: getopt_long returned character " |
192 | "code 0%o ?? (contact the author)\n", c); |
212 | "code 0%o ?? (contact the author)\n", c); |
193 | exit(1); break; |
213 | exit(1); break; |
… | |
… | |
201 | if (!(inputfilename = strdup(argv[optind]))) { |
221 | if (!(inputfilename = strdup(argv[optind]))) { |
202 | fputs("Out of memory error",stderr); |
222 | fputs("Out of memory error",stderr); |
203 | exit(1); |
223 | exit(1); |
204 | } |
224 | } |
205 | |
225 | |
|
|
226 | config = psiconv_config_default(); |
|
|
227 | psiconv_config_read(extra_configfile,&config); |
|
|
228 | if (verbosity) |
|
|
229 | config->verbosity = verbosity; |
206 | |
230 | |
207 | /* Open inputfile for reading */ |
231 | /* Open inputfile for reading */ |
208 | |
232 | |
209 | if (strlen(inputfilename) != 0) { |
233 | if (strlen(inputfilename) != 0) { |
210 | if(stat(inputfilename,&fbuf) < 0) { |
234 | if(stat(inputfilename,&fbuf) < 0) { |
… | |
… | |
238 | { |
262 | { |
239 | fprintf(stderr,"Parse error\n"); |
263 | fprintf(stderr,"Parse error\n"); |
240 | exit(1); |
264 | exit(1); |
241 | } |
265 | } |
242 | |
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 |
243 | strtoupper(type); |
279 | strtoupper(type); |
|
|
280 | |
244 | for (i = 0; i < psiconv_list_length(fileformat_list); i ++) { |
281 | for (i = 0; i < psiconv_list_length(fileformat_list); i ++) { |
245 | ff = psiconv_list_get(fileformat_list,i); |
282 | ff = psiconv_list_get(fileformat_list,i); |
246 | if (! strcasecmp(type,ff->name)) { |
283 | if (! strcasecmp(type,ff->name)) { |
247 | break; |
284 | break; |
248 | } |
285 | } |