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