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

Contents of /psiconv/trunk/program/psiconv/psiconv.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 190 - (show annotations)
Mon Jan 26 21:56:49 2004 UTC (16 years, 8 months ago) by frodo
File MIME type: text/plain
File size: 8016 byte(s)
(Frodo) XHTML work

1 /*
2 psiconv.c - Part of psiconv, a PSION 5 file formats converter
3 Copyright (c) 1999 Frodo Looijaard <frodol@dds.nl>
4
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
7 the Free Software Foundation; either version 2 of the License, or
8 (at your option) any later version.
9
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
14
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
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 */
35
36 /* Driver program */
37
38 #include "config.h"
39 #include "compat.h"
40 #include <getopt.h>
41 #include <stdio.h>
42 #include <sys/stat.h>
43 #include <stdlib.h>
44 #include <string.h>
45 #include <ctype.h>
46
47 #ifdef HAVE_UNISTD_H
48 #include <unistd.h>
49 #endif
50
51 #ifdef IMAGEMAGICK
52 #include "magick-aux.h"
53 #endif
54
55 #include <psiconv/data.h>
56 #include <psiconv/list.h>
57 #include <psiconv/parse.h>
58 #include <psiconv/configuration.h>
59 #include "psiconv.h"
60 #include "gen.h"
61
62 static void print_help(void);
63 static void print_version(void);
64 static void strtoupper(char *str);
65
66 void print_help(void)
67 {
68 fileformat ff;
69 int i,j;
70
71 puts("Syntax: psiconv [OPTIONS..] [FILE]");
72 puts("Convert the psion file FILE to other formats");
73 puts("If FILE is not specified, use stdin");
74 puts(" -d, --debug Show debug information on stderr");
75 puts(" -e, --encoding Output encoding (default: UTF8)");
76 puts(" -h, --help Display this help and exit");
77 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");
80 puts(" -V, --version Display the program version and exit");
81 puts(" -v, --verbose Show progress indicators on stderr");
82 puts("");
83 puts("The following encodings are currently supported:");
84 puts(" UTF8 Variable length Unicode encoding");
85 puts(" UCS2 Fixed 16-bit length Unicode encoding");
86 puts(" Psion The encoding your Psion uses (as in psiconv.conf)");
87 puts(" ASCII 7-bit ASCII (other symbols are substituted by '?')");
88 puts("");
89 puts("The following output types are known:");
90 for (i = 0; i < psiconv_list_length(fileformat_list); i ++) {
91 ff = psiconv_list_get(fileformat_list,i);
92 printf(" %s",ff->name);
93 for (j = strlen(ff->name); j < 15; j++)
94 putchar(' ');
95 puts(ff->description);
96 }
97 puts("");
98 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");
100 }
101
102 void print_version(void)
103 {
104 printf("Version %s\n",VERSION);
105 }
106
107 void strtoupper(char *str)
108 {
109 int i;
110 for (i = 0; i < strlen(str); i ++)
111 str[i] = toupper(str[i]);
112 }
113
114 int main(int argc, char *argv[])
115 {
116 struct option long_options[] =
117 {
118 {"help",no_argument,NULL,'h'},
119 {"version",no_argument,NULL,'V'},
120 {"verbose",no_argument,NULL,'v'},
121 {"debug",no_argument,NULL,'d'},
122 {"silent",no_argument,NULL,'s'},
123 {"outputfile",required_argument,NULL,'o'},
124 {"type",required_argument,NULL,'T'},
125 {"encoding",no_argument,NULL,'e'},
126 {0,0,0,0}
127 };
128 const char* short_options = "hVvsdo:e:T:";
129 int option_index;
130 FILE * f;
131 struct stat fbuf;
132
133 const char *inputfilename = "";
134 const char *outputfilename = "";
135 char *type = strdup("HTML4");
136 encoding encoding_type=ENCODING_UTF8;
137 psiconv_list outputlist;
138
139 int c,i,res;
140 psiconv_buffer buf;
141 psiconv_file file;
142 fileformat ff = NULL;
143
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)))) {
148 fputs("Out of memory error",stderr);
149 exit(1);
150 }
151
152 init_txt();
153 init_image();
154 init_html();
155 #if 0
156 init_html4();
157 init_latex();
158 init_rtf();
159 #endif
160
161 while(1) {
162 c = getopt_long(argc,argv,short_options, long_options, &option_index);
163 if (c == -1)
164 break;
165 switch(c) {
166 case 'h': print_help(); exit(0);
167 case 'V': print_version(); exit(0);
168 case 'v': if (config->verbosity < PSICONV_VERB_PROGRESS)
169 config->verbosity = PSICONV_VERB_PROGRESS;
170 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;
174 case 'T': type = strdup(optarg); break;
175 case 'e': if(!strcmp(optarg,"UTF8"))
176 encoding_type = ENCODING_UTF8;
177 else if (!strcmp(optarg,"UCS2"))
178 encoding_type = ENCODING_UCS2;
179 else if (!strcmp(optarg,"ASCII"))
180 encoding_type = ENCODING_ASCII;
181 else if (!strcmp(optarg,"Psion"))
182 encoding_type = ENCODING_PSION;
183 else {
184 fputs("Unknown encoding type "
185 "(try '-h' for more information\n",stderr);
186 exit(1);
187 }
188 break;
189 case '?': case ':': fputs("Try `-h' for more information\n",stderr);
190 exit(1);
191 default: fprintf(stderr,"Internal error: getopt_long returned character "
192 "code 0%o ?? (contact the author)\n", c);
193 exit(1); break;
194 }
195 }
196 if (optind < argc-1) {
197 fputs("I can only convert one file!\n"
198 "Try `-h' for more information\n",stderr);
199 exit(1);
200 } else if (optind == argc-1)
201 if (!(inputfilename = strdup(argv[optind]))) {
202 fputs("Out of memory error",stderr);
203 exit(1);
204 }
205
206
207 /* Open inputfile for reading */
208
209 if (strlen(inputfilename) != 0) {
210 if(stat(inputfilename,&fbuf) < 0) {
211 perror(inputfilename);
212 exit(1);
213 }
214 f = fopen(inputfilename,"r");
215 if (! f) {
216 perror(inputfilename);
217 exit(1);
218 }
219 } else
220 f = stdin;
221
222 if (!(buf = psiconv_buffer_new())) {
223 fputs("Out of memory error",stderr);
224 exit(1);
225 }
226 if (psiconv_buffer_fread_all(buf,f)) {
227 fprintf(stderr,"Failure reading file");
228 exit(1);
229 }
230
231 if (strlen(inputfilename) != 0)
232 if (fclose(f)) {
233 perror(inputfilename);
234 exit(1);
235 }
236
237 if (psiconv_parse(config,buf,&file) || (file->type == psiconv_unknown_file))
238 {
239 fprintf(stderr,"Parse error\n");
240 exit(1);
241 }
242
243 strtoupper(type);
244 for (i = 0; i < psiconv_list_length(fileformat_list); i ++) {
245 ff = psiconv_list_get(fileformat_list,i);
246 if (! strcasecmp(type,ff->name)) {
247 break;
248 }
249 }
250
251 if (i == psiconv_list_length(fileformat_list)) {
252 fprintf(stderr,"Unknown output type: `%s'\n",type);
253 exit(1);
254 }
255
256 if (!(outputlist = psiconv_list_new(sizeof(psiconv_u8)))) {
257 fputs("Out of memory error\n",stderr);
258 exit(1);
259 }
260
261 res = ff->output(config,outputlist,file,type,encoding_type);
262 if (res) {
263 fprintf(stderr,
264 "Output format `%s' not permitted for this file type\n",type);
265 exit(1);
266 }
267
268 psiconv_free_file(file);
269
270 if (strlen(outputfilename) != 0) {
271 f = fopen(outputfilename,"w");
272 if (! f) {
273 perror(inputfilename);
274 exit(1);
275 }
276 } else
277 f = stdout;
278
279 psiconv_list_fwrite_all(outputlist,f);
280
281 if (fclose(f)) {
282 perror(inputfilename);
283 exit(1);
284 }
285
286 psiconv_list_free(outputlist);
287
288 exit(0);
289 }

frodo@frodo.looijaard.name
ViewVC Help
Powered by ViewVC 1.1.26