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

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

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

Revision 180 Revision 270
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.
… …
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
50 35
51#ifdef IMAGEMAGICK 36#ifdef IMAGEMAGICK
52#include "magick-aux.h" 37#include "magick-aux.h"
53#endif 38#endif
54 39
55#include "psiconv/data.h" 40#include <psiconv/data.h>
41#include <psiconv/list.h>
56#include "psiconv/parse.h" 42#include <psiconv/parse.h>
57#include "psiconv/configuration.h" 43#include <psiconv/configuration.h>
44#include "psiconv.h"
58#include "gen.h" 45#include "gen.h"
59#include "psiconv.h"
60 46
61static void print_help(void); 47static void print_help(void);
62static void print_version(void); 48static void print_version(void);
63static void strtoupper(char *str); 49static void strtoupper(char *str);
64 50
65void print_help(void) 51void print_help(void)
66{ 52{
67 psiconv_fileformat ff; 53 fileformat ff;
68 int i,j; 54 int i,j;
69 55
70 puts("Syntax: psiconv [OPTIONS..] [FILE]"); 56 puts("Syntax: psiconv [OPTIONS..] [FILE]");
71 puts("Convert the psion Word file FILE to other formats"); 57 puts("Convert the psion file FILE to other formats");
72 puts("If FILE is not specified, use stdin"); 58 puts("If FILE is not specified, use stdin");
73 puts(" -d, --debug Show debug information on stderr"); 59 puts(" -c, --configfile=FILE Read extra configuration file after normal ones");
60 puts(" -e, --encoding=ENC Output encoding (default: UTF8)");
74 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)");
75 puts(" -o, --outputfile Output to file instead of stdout"); 63 puts(" -o, --outputfile Output to file instead of stdout");
76 puts(" -s, --silent Do not even show warnings on stderr");
77 puts(" -T, --type=FILETYPE Output type"); 64 puts(" -T, --type=FILETYPE Output type (default: XHTML or TIFF");
78 puts(" -V, --version Display the program version and exit"); 65 puts(" -V, --version Display the program version and exit");
79 puts(" -v, --verbose Show progress indicators on stderr"); 66 puts("");
80 puts(" -u, --UTF8 Input file is encoded in UTF8"); 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");
81 puts(""); 88 puts("");
82 puts("The following output types are known:"); 89 puts("The following output types are known:");
83 for (i = 0; i < psiconv_list_length(fileformat_list); i ++) { 90 for (i = 0; i < psiconv_list_length(fileformat_list); i ++) {
84 ff = psiconv_list_get(fileformat_list,i); 91 ff = psiconv_list_get(fileformat_list,i);
85 printf(" %s",ff->name); 92 printf(" %s",ff->name);
86 for (j = strlen(ff->name); j < 15; j++) 93 for (j = strlen(ff->name); j < 10; j++)
87 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':' ');
88 puts(ff->description); 103 puts(ff->description);
89 } 104 }
90 puts(""); 105 puts("");
91 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");
92 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");
… …
108{ 123{
109 struct option long_options[] = 124 struct option long_options[] =
110 { 125 {
111 {"help",no_argument,NULL,'h'}, 126 {"help",no_argument,NULL,'h'},
112 {"version",no_argument,NULL,'V'}, 127 {"version",no_argument,NULL,'V'},
128 {"configfile",required_argument,NULL,'c'},
113 {"verbose",no_argument,NULL,'v'}, 129 {"noise",required_argument,NULL,'n'},
114 {"debug",no_argument,NULL,'d'},
115 {"silent",no_argument,NULL,'s'},
116 {"outputfile",required_argument,NULL,'o'}, 130 {"outputfile",required_argument,NULL,'o'},
117 {"type",required_argument,NULL,'T'}, 131 {"type",required_argument,NULL,'T'},
118 {"UTF8",no_argument,NULL,'u'}, 132 {"encoding",no_argument,NULL,'e'},
119 {0,0,0,0} 133 {0,0,0,0}
120 }; 134 };
121 const char* short_options = "hVvsdo:uT:"; 135 const char* short_options = "hVn:o:e:T:c:";
122 int option_index; 136 int option_index;
123 FILE * f; 137 FILE * f;
124 struct stat fbuf; 138 struct stat fbuf;
125 139
126 const char *inputfilename = ""; 140 const char *inputfilename = "";
127 const char *outputfilename = ""; 141 const char *outputfilename = "";
128 char *type = strdup("HTML3"); 142 const char *extra_configfile = NULL;
129 psiconv_encoding encoding_type=PSICONV_ENCODING_CP1252; 143 char *type = NULL;
144 encoding encoding_type=ENCODING_UTF8;
145 psiconv_list outputlist;
146 int verbosity = 0;
147 psiconv_config config;
130 148
131 int c,i,res; 149 int c,i,res;
132 psiconv_buffer buf; 150 psiconv_buffer buf;
133 psiconv_file file; 151 psiconv_file file;
134 psiconv_fileformat ff; 152 fileformat ff = NULL;
135 153
136 psiconv_config config = psiconv_config_default();
137 psiconv_config_read(NULL,&config);
138
139 fileformat_list = psiconv_list_new(sizeof(struct psiconv_fileformat_s)); 154 if (!(fileformat_list = psiconv_list_new(sizeof(struct fileformat_s)))) {
155 fputs("Out of memory error",stderr);
156 exit(1);
157 }
158
140 init_txt(); 159 init_txt();
141 init_html(); 160 init_xhtml();
142 init_html4(); 161 init_html4();
143 init_latex();
144 init_rtf();
145 init_image(); 162 init_image();
146 163
147 while(1) { 164 while(1) {
148 c = getopt_long(argc,argv,short_options, long_options, &option_index); 165 c = getopt_long(argc,argv,short_options, long_options, &option_index);
149 if (c == -1) 166 if (c == -1)
150 break; 167 break;
151 switch(c) { 168 switch(c) {
152 case 'h': print_help(); exit(0); 169 case 'h': print_help(); exit(0);
153 case 'V': print_version(); exit(0); 170 case 'V': print_version(); exit(0);
154 case 'v': if (config->verbosity < PSICONV_VERB_PROGRESS) 171 case 'n': switch(optarg[0]) {
155 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 }
156 break; 191 break;
157 case 'd': config->verbosity = PSICONV_VERB_DEBUG; break;
158 case 's': config->verbosity = PSICONV_VERB_FATAL; break;
159 case 'o': outputfilename = strdup(optarg); break; 192 case 'o': outputfilename = strdup(optarg); break;
160 case 'T': type = strdup(optarg); break; 193 case 'T': type = strdup(optarg); break;
161 case 'u': encoding_type = PSICONV_ENCODING_UTF8; 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;
162 case '?': case ':': fputs("Try `-h' for more information\n",stderr); 209 case '?': case ':': fputs("Try `-h' for more information\n",stderr);
163 exit(1); 210 exit(1);
164 default: fprintf(stderr,"Internal error: getopt_long returned character " 211 default: fprintf(stderr,"Internal error: getopt_long returned character "
165 "code 0%o ?? (contact the author)\n", c); 212 "code 0%o ?? (contact the author)\n", c);
166 exit(1); break; 213 exit(1); break;
… …
169 if (optind < argc-1) { 216 if (optind < argc-1) {
170 fputs("I can only convert one file!\n" 217 fputs("I can only convert one file!\n"
171 "Try `-h' for more information\n",stderr); 218 "Try `-h' for more information\n",stderr);
172 exit(1); 219 exit(1);
173 } else if (optind == argc-1) 220 } else if (optind == argc-1)
174 inputfilename = strdup(argv[optind]); 221 if (!(inputfilename = strdup(argv[optind]))) {
222 fputs("Out of memory error",stderr);
223 exit(1);
224 }
175 225
226 config = psiconv_config_default();
227 psiconv_config_read(extra_configfile,&config);
228 if (verbosity)
229 config->verbosity = verbosity;
176 230
177 /* Open inputfile for reading */ 231 /* Open inputfile for reading */
178 232
179 if (strlen(inputfilename) != 0) { 233 if (strlen(inputfilename) != 0) {
180 if(stat(inputfilename,&fbuf) < 0) { 234 if(stat(inputfilename,&fbuf) < 0) {
… …
187 exit(1); 241 exit(1);
188 } 242 }
189 } else 243 } else
190 f = stdin; 244 f = stdin;
191 245
192 buf = psiconv_buffer_new(); 246 if (!(buf = psiconv_buffer_new())) {
247 fputs("Out of memory error",stderr);
248 exit(1);
249 }
193 psiconv_buffer_fread_all(buf,f); 250 if (psiconv_buffer_fread_all(buf,f)) {
251 fprintf(stderr,"Failure reading file");
252 exit(1);
253 }
194 254
195 if (strlen(inputfilename) != 0) 255 if (strlen(inputfilename) != 0)
196 if (fclose(f)) { 256 if (fclose(f)) {
197 perror(inputfilename); 257 perror(inputfilename);
198 exit(1); 258 exit(1);
… …
202 { 262 {
203 fprintf(stderr,"Parse error\n"); 263 fprintf(stderr,"Parse error\n");
204 exit(1); 264 exit(1);
205 } 265 }
206 266
207 /* Set correct output file */ 267 if (!type) {
208 if (strlen(outputfilename) == 0) 268 switch(file->type) {
209 outputfilename = "/dev/stdout"; 269 case psiconv_word_file:
210 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
211 strtoupper(type); 279 strtoupper(type);
280
212 for (i = 0; i < psiconv_list_length(fileformat_list); i ++) { 281 for (i = 0; i < psiconv_list_length(fileformat_list); i ++) {
213 ff = psiconv_list_get(fileformat_list,i); 282 ff = psiconv_list_get(fileformat_list,i);
214 if (! strcasecmp(type,ff->name)) { 283 if (! strcasecmp(type,ff->name)) {
215 res = ff->output(outputfilename,file,type, encoding_type);
216 if (res) {
217 fprintf(stderr,
218 "Output format `%s' not permitted for this file type\n",type);
219 exit(1);
220 }
221 break; 284 break;
222 } 285 }
223 } 286 }
224 287
225 if (i == psiconv_list_length(fileformat_list)) { 288 if (i == psiconv_list_length(fileformat_list)) {
226 fprintf(stderr,"Unknown output type: `%s'\n",type); 289 fprintf(stderr,"Unknown output type: `%s'\n",type);
227 exit(1); 290 exit(1);
228 } 291 }
229 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
230 psiconv_free_file(file); 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);
231 324
232 exit(0); 325 exit(0);
233} 326}
Legend:
Removed from v.180  
changed lines
  Added in v.270
frodo@frodo.looijaard.name
 ViewVC Help
Powered by ViewVC 1.1.26