/*
       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     [email protected]

       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) == 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);
}