1 /*
2 * xmlcatalog.c : a small utility program to handle XML catalogs
3 *
4 * See Copyright for the status of this software.
5 *
6 * daniel@veillard.com
7 */
8
9 #include "libxml.h"
10
11 #include <string.h>
12 #include <stdio.h>
13 #include <stdarg.h>
14
15 #ifdef HAVE_STDLIB_H
16 #include <stdlib.h>
17 #endif
18
19 #ifdef HAVE_LIBREADLINE
20 #include <readline/readline.h>
21 #ifdef HAVE_LIBHISTORY
22 #include <readline/history.h>
23 #endif
24 #endif
25
26 #include <libxml/xmlmemory.h>
27 #include <libxml/uri.h>
28 #include <libxml/catalog.h>
29 #include <libxml/parser.h>
30 #include <libxml/globals.h>
31
32 #if defined(LIBXML_CATALOG_ENABLED) && defined(LIBXML_OUTPUT_ENABLED)
33 static int shell = 0;
34 static int sgml = 0;
35 static int noout = 0;
36 static int create = 0;
37 static int add = 0;
38 static int del = 0;
39 static int convert = 0;
40 static int no_super_update = 0;
41 static int verbose = 0;
42 static char *filename = NULL;
43
44
45 #ifndef XML_SGML_DEFAULT_CATALOG
46 #define XML_SGML_DEFAULT_CATALOG "/etc/sgml/catalog"
47 #endif
48
49 /************************************************************************
50 * *
51 * Shell Interface *
52 * *
53 ************************************************************************/
54 /**
55 * xmlShellReadline:
56 * @prompt: the prompt value
57 *
58 * Read a string
59 *
60 * Returns a pointer to it or NULL on EOF the caller is expected to
61 * free the returned string.
62 */
63 static char *
xmlShellReadline(const char * prompt)64 xmlShellReadline(const char *prompt) {
65 #ifdef HAVE_LIBREADLINE
66 char *line_read;
67
68 /* Get a line from the user. */
69 line_read = readline (prompt);
70
71 /* If the line has any text in it, save it on the history. */
72 if (line_read && *line_read)
73 add_history (line_read);
74
75 return (line_read);
76 #else
77 char line_read[501];
78 char *ret;
79 int len;
80
81 if (prompt != NULL)
82 fprintf(stdout, "%s", prompt);
83 fflush(stdout);
84 if (!fgets(line_read, 500, stdin))
85 return(NULL);
86 line_read[500] = 0;
87 len = strlen(line_read);
88 ret = (char *) malloc(len + 1);
89 if (ret != NULL) {
90 memcpy (ret, line_read, len + 1);
91 }
92 return(ret);
93 #endif
94 }
95
usershell(void)96 static void usershell(void) {
97 char *cmdline = NULL, *cur;
98 int nbargs;
99 char command[100];
100 char arg[400];
101 char *argv[20];
102 int i, ret;
103 xmlChar *ans;
104
105 while (1) {
106 cmdline = xmlShellReadline("> ");
107 if (cmdline == NULL)
108 return;
109
110 /*
111 * Parse the command itself
112 */
113 cur = cmdline;
114 nbargs = 0;
115 while ((*cur == ' ') || (*cur == '\t')) cur++;
116 i = 0;
117 while ((*cur != ' ') && (*cur != '\t') &&
118 (*cur != '\n') && (*cur != '\r')) {
119 if (*cur == 0)
120 break;
121 command[i++] = *cur++;
122 }
123 command[i] = 0;
124 if (i == 0) {
125 free(cmdline);
126 continue;
127 }
128
129 /*
130 * Parse the argument string
131 */
132 memset(arg, 0, sizeof(arg));
133 while ((*cur == ' ') || (*cur == '\t')) cur++;
134 i = 0;
135 while ((*cur != '\n') && (*cur != '\r') && (*cur != 0)) {
136 if (*cur == 0)
137 break;
138 arg[i++] = *cur++;
139 }
140 arg[i] = 0;
141
142 /*
143 * Parse the arguments
144 */
145 i = 0;
146 nbargs = 0;
147 cur = arg;
148 memset(argv, 0, sizeof(argv));
149 while (*cur != 0) {
150 while ((*cur == ' ') || (*cur == '\t')) cur++;
151 if (*cur == '\'') {
152 cur++;
153 argv[i] = cur;
154 while ((*cur != 0) && (*cur != '\'')) cur++;
155 if (*cur == '\'') {
156 *cur = 0;
157 nbargs++;
158 i++;
159 cur++;
160 }
161 } else if (*cur == '"') {
162 cur++;
163 argv[i] = cur;
164 while ((*cur != 0) && (*cur != '"')) cur++;
165 if (*cur == '"') {
166 *cur = 0;
167 nbargs++;
168 i++;
169 cur++;
170 }
171 } else {
172 argv[i] = cur;
173 while ((*cur != 0) && (*cur != ' ') && (*cur != '\t'))
174 cur++;
175 *cur = 0;
176 nbargs++;
177 i++;
178 cur++;
179 }
180 }
181
182 /*
183 * start interpreting the command
184 */
185 if (!strcmp(command, "exit") ||
186 !strcmp(command, "quit") ||
187 !strcmp(command, "bye")) {
188 free(cmdline);
189 break;
190 }
191
192 if (!strcmp(command, "public")) {
193 if (nbargs != 1) {
194 printf("public requires 1 arguments\n");
195 } else {
196 ans = xmlCatalogResolvePublic((const xmlChar *) argv[0]);
197 if (ans == NULL) {
198 printf("No entry for PUBLIC %s\n", argv[0]);
199 } else {
200 printf("%s\n", (char *) ans);
201 xmlFree(ans);
202 }
203 }
204 } else if (!strcmp(command, "system")) {
205 if (nbargs != 1) {
206 printf("system requires 1 arguments\n");
207 } else {
208 ans = xmlCatalogResolveSystem((const xmlChar *) argv[0]);
209 if (ans == NULL) {
210 printf("No entry for SYSTEM %s\n", argv[0]);
211 } else {
212 printf("%s\n", (char *) ans);
213 xmlFree(ans);
214 }
215 }
216 } else if (!strcmp(command, "add")) {
217 if (sgml) {
218 if ((nbargs != 3) && (nbargs != 2)) {
219 printf("add requires 2 or 3 arguments\n");
220 } else {
221 if (argv[2] == NULL)
222 ret = xmlCatalogAdd(BAD_CAST argv[0], NULL,
223 BAD_CAST argv[1]);
224 else
225 ret = xmlCatalogAdd(BAD_CAST argv[0], BAD_CAST argv[1],
226 BAD_CAST argv[2]);
227 if (ret != 0)
228 printf("add command failed\n");
229 }
230 } else {
231 if ((nbargs != 3) && (nbargs != 2)) {
232 printf("add requires 2 or 3 arguments\n");
233 } else {
234 if (argv[2] == NULL)
235 ret = xmlCatalogAdd(BAD_CAST argv[0], NULL,
236 BAD_CAST argv[1]);
237 else
238 ret = xmlCatalogAdd(BAD_CAST argv[0], BAD_CAST argv[1],
239 BAD_CAST argv[2]);
240 if (ret != 0)
241 printf("add command failed\n");
242 }
243 }
244 } else if (!strcmp(command, "del")) {
245 if (nbargs != 1) {
246 printf("del requires 1\n");
247 } else {
248 ret = xmlCatalogRemove(BAD_CAST argv[0]);
249 if (ret <= 0)
250 printf("del command failed\n");
251
252 }
253 } else if (!strcmp(command, "resolve")) {
254 if (nbargs != 2) {
255 printf("resolve requires 2 arguments\n");
256 } else {
257 ans = xmlCatalogResolve(BAD_CAST argv[0],
258 BAD_CAST argv[1]);
259 if (ans == NULL) {
260 printf("Resolver failed to find an answer\n");
261 } else {
262 printf("%s\n", (char *) ans);
263 xmlFree(ans);
264 }
265 }
266 } else if (!strcmp(command, "dump")) {
267 if (nbargs != 0) {
268 printf("dump has no arguments\n");
269 } else {
270 xmlCatalogDump(stdout);
271 }
272 } else if (!strcmp(command, "debug")) {
273 if (nbargs != 0) {
274 printf("debug has no arguments\n");
275 } else {
276 verbose++;
277 xmlCatalogSetDebug(verbose);
278 }
279 } else if (!strcmp(command, "quiet")) {
280 if (nbargs != 0) {
281 printf("quiet has no arguments\n");
282 } else {
283 if (verbose > 0)
284 verbose--;
285 xmlCatalogSetDebug(verbose);
286 }
287 } else {
288 if (strcmp(command, "help")) {
289 printf("Unrecognized command %s\n", command);
290 }
291 printf("Commands available:\n");
292 printf("\tpublic PublicID: make a PUBLIC identifier lookup\n");
293 printf("\tsystem SystemID: make a SYSTEM identifier lookup\n");
294 printf("\tresolve PublicID SystemID: do a full resolver lookup\n");
295 printf("\tadd 'type' 'orig' 'replace' : add an entry\n");
296 printf("\tdel 'values' : remove values\n");
297 printf("\tdump: print the current catalog state\n");
298 printf("\tdebug: increase the verbosity level\n");
299 printf("\tquiet: decrease the verbosity level\n");
300 printf("\texit: quit the shell\n");
301 }
302 free(cmdline); /* not xmlFree here ! */
303 }
304 }
305
306 /************************************************************************
307 * *
308 * Main *
309 * *
310 ************************************************************************/
usage(const char * name)311 static void usage(const char *name) {
312 /* split into 2 printf's to avoid overly long string (gcc warning) */
313 printf("\
314 Usage : %s [options] catalogfile entities...\n\
315 \tParse the catalog file (void specification possibly expressed as \"\"\n\
316 \tappoints the default system one) and query it for the entities\n\
317 \t--sgml : handle SGML Super catalogs for --add and --del\n\
318 \t--shell : run a shell allowing interactive queries\n\
319 \t--create : create a new catalog\n\
320 \t--add 'type' 'orig' 'replace' : add an XML entry\n\
321 \t--add 'entry' : add an SGML entry\n", name);
322 printf("\
323 \t--del 'values' : remove values\n\
324 \t--noout: avoid dumping the result on stdout\n\
325 \t used with --add or --del, it saves the catalog changes\n\
326 \t and with --sgml it automatically updates the super catalog\n\
327 \t--no-super-update: do not update the SGML super catalog\n\
328 \t-v --verbose : provide debug informations\n");
329 }
main(int argc,char ** argv)330 int main(int argc, char **argv) {
331 int i;
332 int ret;
333 int exit_value = 0;
334
335
336 if (argc <= 1) {
337 usage(argv[0]);
338 return(1);
339 }
340
341 LIBXML_TEST_VERSION
342 for (i = 1; i < argc ; i++) {
343 if (!strcmp(argv[i], "-"))
344 break;
345
346 if (argv[i][0] != '-')
347 break;
348 if ((!strcmp(argv[i], "-verbose")) ||
349 (!strcmp(argv[i], "-v")) ||
350 (!strcmp(argv[i], "--verbose"))) {
351 verbose++;
352 xmlCatalogSetDebug(verbose);
353 } else if ((!strcmp(argv[i], "-noout")) ||
354 (!strcmp(argv[i], "--noout"))) {
355 noout = 1;
356 } else if ((!strcmp(argv[i], "-shell")) ||
357 (!strcmp(argv[i], "--shell"))) {
358 shell++;
359 noout = 1;
360 } else if ((!strcmp(argv[i], "-sgml")) ||
361 (!strcmp(argv[i], "--sgml"))) {
362 sgml++;
363 } else if ((!strcmp(argv[i], "-create")) ||
364 (!strcmp(argv[i], "--create"))) {
365 create++;
366 } else if ((!strcmp(argv[i], "-convert")) ||
367 (!strcmp(argv[i], "--convert"))) {
368 convert++;
369 } else if ((!strcmp(argv[i], "-no-super-update")) ||
370 (!strcmp(argv[i], "--no-super-update"))) {
371 no_super_update++;
372 } else if ((!strcmp(argv[i], "-add")) ||
373 (!strcmp(argv[i], "--add"))) {
374 if (sgml)
375 i += 2;
376 else
377 i += 3;
378 add++;
379 } else if ((!strcmp(argv[i], "-del")) ||
380 (!strcmp(argv[i], "--del"))) {
381 i += 1;
382 del++;
383 } else {
384 fprintf(stderr, "Unknown option %s\n", argv[i]);
385 usage(argv[0]);
386 return(1);
387 }
388 }
389
390 for (i = 1; i < argc; i++) {
391 if ((!strcmp(argv[i], "-add")) ||
392 (!strcmp(argv[i], "--add"))) {
393 if (sgml)
394 i += 2;
395 else
396 i += 3;
397 continue;
398 } else if ((!strcmp(argv[i], "-del")) ||
399 (!strcmp(argv[i], "--del"))) {
400 i += 1;
401
402 /* No catalog entry specified */
403 if (i == argc || (sgml && i + 1 == argc)) {
404 fprintf(stderr, "No catalog entry specified to remove from\n");
405 usage (argv[0]);
406 return(1);
407 }
408
409 continue;
410 } else if (argv[i][0] == '-')
411 continue;
412
413 if (filename == NULL && argv[i][0] == '\0') {
414 /* Interpret empty-string catalog specification as
415 a shortcut for a default system catalog. */
416 xmlInitializeCatalog();
417 } else {
418 filename = argv[i];
419 ret = xmlLoadCatalog(argv[i]);
420 if ((ret < 0) && (create)) {
421 xmlCatalogAdd(BAD_CAST "catalog", BAD_CAST argv[i], NULL);
422 }
423 }
424 break;
425 }
426
427 if (convert)
428 ret = xmlCatalogConvert();
429
430 if ((add) || (del)) {
431 for (i = 1; i < argc ; i++) {
432 if (!strcmp(argv[i], "-"))
433 break;
434
435 if (argv[i][0] != '-')
436 continue;
437 if (strcmp(argv[i], "-add") && strcmp(argv[i], "--add") &&
438 strcmp(argv[i], "-del") && strcmp(argv[i], "--del"))
439 continue;
440
441 if (sgml) {
442 /*
443 * Maintenance of SGML catalogs.
444 */
445 xmlCatalogPtr catal = NULL;
446 xmlCatalogPtr super = NULL;
447
448 catal = xmlLoadSGMLSuperCatalog(argv[i + 1]);
449
450 if ((!strcmp(argv[i], "-add")) ||
451 (!strcmp(argv[i], "--add"))) {
452 if (catal == NULL)
453 catal = xmlNewCatalog(1);
454 xmlACatalogAdd(catal, BAD_CAST "CATALOG",
455 BAD_CAST argv[i + 2], NULL);
456
457 if (!no_super_update) {
458 super = xmlLoadSGMLSuperCatalog(XML_SGML_DEFAULT_CATALOG);
459 if (super == NULL)
460 super = xmlNewCatalog(1);
461
462 xmlACatalogAdd(super, BAD_CAST "CATALOG",
463 BAD_CAST argv[i + 1], NULL);
464 }
465 } else {
466 if (catal != NULL)
467 ret = xmlACatalogRemove(catal, BAD_CAST argv[i + 2]);
468 else
469 ret = -1;
470 if (ret < 0) {
471 fprintf(stderr, "Failed to remove entry from %s\n",
472 argv[i + 1]);
473 exit_value = 1;
474 }
475 if ((!no_super_update) && (noout) && (catal != NULL) &&
476 (xmlCatalogIsEmpty(catal))) {
477 super = xmlLoadSGMLSuperCatalog(
478 XML_SGML_DEFAULT_CATALOG);
479 if (super != NULL) {
480 ret = xmlACatalogRemove(super,
481 BAD_CAST argv[i + 1]);
482 if (ret < 0) {
483 fprintf(stderr,
484 "Failed to remove entry from %s\n",
485 XML_SGML_DEFAULT_CATALOG);
486 exit_value = 1;
487 }
488 }
489 }
490 }
491 if (noout) {
492 FILE *out;
493
494 if (xmlCatalogIsEmpty(catal)) {
495 remove(argv[i + 1]);
496 } else {
497 out = fopen(argv[i + 1], "w");
498 if (out == NULL) {
499 fprintf(stderr, "could not open %s for saving\n",
500 argv[i + 1]);
501 exit_value = 2;
502 noout = 0;
503 } else {
504 xmlACatalogDump(catal, out);
505 fclose(out);
506 }
507 }
508 if (!no_super_update && super != NULL) {
509 if (xmlCatalogIsEmpty(super)) {
510 remove(XML_SGML_DEFAULT_CATALOG);
511 } else {
512 out = fopen(XML_SGML_DEFAULT_CATALOG, "w");
513 if (out == NULL) {
514 fprintf(stderr,
515 "could not open %s for saving\n",
516 XML_SGML_DEFAULT_CATALOG);
517 exit_value = 2;
518 noout = 0;
519 } else {
520
521 xmlACatalogDump(super, out);
522 fclose(out);
523 }
524 }
525 }
526 } else {
527 xmlACatalogDump(catal, stdout);
528 }
529 i += 2;
530 } else {
531 if ((!strcmp(argv[i], "-add")) ||
532 (!strcmp(argv[i], "--add"))) {
533 if ((argv[i + 3] == NULL) || (argv[i + 3][0] == 0))
534 ret = xmlCatalogAdd(BAD_CAST argv[i + 1], NULL,
535 BAD_CAST argv[i + 2]);
536 else
537 ret = xmlCatalogAdd(BAD_CAST argv[i + 1],
538 BAD_CAST argv[i + 2],
539 BAD_CAST argv[i + 3]);
540 if (ret != 0) {
541 printf("add command failed\n");
542 exit_value = 3;
543 }
544 i += 3;
545 } else if ((!strcmp(argv[i], "-del")) ||
546 (!strcmp(argv[i], "--del"))) {
547 ret = xmlCatalogRemove(BAD_CAST argv[i + 1]);
548 if (ret < 0) {
549 fprintf(stderr, "Failed to remove entry %s\n",
550 argv[i + 1]);
551 exit_value = 1;
552 }
553 i += 1;
554 }
555 }
556 }
557
558 } else if (shell) {
559 usershell();
560 } else {
561 for (i++; i < argc; i++) {
562 xmlURIPtr uri;
563 xmlChar *ans;
564
565 uri = xmlParseURI(argv[i]);
566 if (uri == NULL) {
567 ans = xmlCatalogResolvePublic((const xmlChar *) argv[i]);
568 if (ans == NULL) {
569 printf("No entry for PUBLIC %s\n", argv[i]);
570 exit_value = 4;
571 } else {
572 printf("%s\n", (char *) ans);
573 xmlFree(ans);
574 }
575 } else {
576 xmlFreeURI(uri);
577 ans = xmlCatalogResolveSystem((const xmlChar *) argv[i]);
578 if (ans == NULL) {
579 printf("No entry for SYSTEM %s\n", argv[i]);
580 ans = xmlCatalogResolveURI ((const xmlChar *) argv[i]);
581 if (ans == NULL) {
582 printf ("No entry for URI %s\n", argv[i]);
583 exit_value = 4;
584 } else {
585 printf("%s\n", (char *) ans);
586 xmlFree (ans);
587 }
588 } else {
589 printf("%s\n", (char *) ans);
590 xmlFree(ans);
591 }
592 }
593 }
594 }
595 if ((!sgml) && ((add) || (del) || (create) || (convert))) {
596 if (noout && filename && *filename) {
597 FILE *out;
598
599 out = fopen(filename, "w");
600 if (out == NULL) {
601 fprintf(stderr, "could not open %s for saving\n", filename);
602 exit_value = 2;
603 noout = 0;
604 } else {
605 xmlCatalogDump(out);
606 }
607 } else {
608 xmlCatalogDump(stdout);
609 }
610 }
611
612 /*
613 * Cleanup and check for memory leaks
614 */
615 xmlCleanupParser();
616 xmlMemoryDump();
617 return(exit_value);
618 }
619 #else
main(int argc ATTRIBUTE_UNUSED,char ** argv ATTRIBUTE_UNUSED)620 int main(int argc ATTRIBUTE_UNUSED, char **argv ATTRIBUTE_UNUSED) {
621 fprintf(stderr, "libxml was not compiled with catalog and output support\n");
622 return(1);
623 }
624 #endif
625