/[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 190 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
… …
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 }
Legend:
Removed from v.190  
changed lines
  Added in v.270
frodo@frodo.looijaard.name
 ViewVC Help
Powered by ViewVC 1.1.26