home *** CD-ROM | disk | FTP | other *** search
- /*
- rtf2null - RTF-to-nothing translator
-
- Example only: demonstrates a minimal translator. Does nothing,
- with the single exception that unknown tokens are echoed. This
- allows rtf2null to be used as a "find unknown tokens" filter.
-
- 07 Feb 91 Paul DuBois dubois@primate.wisc.edu
-
- 07 Feb 91 V1.0. Created.
- 24 Feb 91 V1.01. Added unknown token class callback.
- */
-
- # include <stdio.h>
- # include "rtf.h"
-
- static void Unknown ();
-
-
- int main (argc, argv)
- int argc;
- char **argv;
- {
- RTFInit ();
-
- --argc;
- ++argv;
-
- /* not clever; only allows stdin or one named file to be read */
-
- if (argc > 0)
- {
- if (freopen (argv[0], "r", stdin) == (FILE *) NULL)
- {
- fprintf (stderr, "Can't open \"%s\"\n", argv[0]);
- exit (1);
- }
- }
-
- RTFSetClassCallback (rtfUnknown, Unknown);
- RTFRead ();
-
- exit (0);
- }
-
-
- /*
- Echo any unknown tokens. This helps to find out where
- reader needs to be made smarter.
- */
-
- static void Unknown ()
- {
- fprintf (stderr, "Unknown symbol %s\n", rtfTextBuf);
- }
-