home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1993 July / Internet Tools.iso / RockRidge / mail / pp / pp-6.0 / Format / rfc1148 / f-P2toRFC.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-12-18  |  1.4 KB  |  88 lines
  1. /* f-P2toRFC.c: P2 -> 822  filter */
  2.  
  3. # ifndef lint
  4. static char Rcsid[] = "@(#)$Header: /xtel/pp/pp-beta/Format/rfc1148/RCS/f-P2toRFC.c,v 6.0 1991/12/18 20:20:34 jpo Rel $";
  5. # endif
  6.  
  7. /*
  8.  * $Header: /xtel/pp/pp-beta/Format/rfc1148/RCS/f-P2toRFC.c,v 6.0 1991/12/18 20:20:34 jpo Rel $
  9.  *
  10.  * $Log: f-P2toRFC.c,v $
  11.  * Revision 6.0  1991/12/18  20:20:34  jpo
  12.  * Release 6.0
  13.  *
  14.  */
  15.  
  16.  
  17.  
  18. #include "head.h"
  19. #include "q.h"
  20.  
  21. extern void    sys_init(), or_myinit();
  22.  
  23.  
  24.  
  25. /* ARGSUSED */
  26. main(argc, argv)
  27. char    **argv;
  28. int     argc;
  29. {
  30.     sys_init(argv[0]);
  31.     or_myinit ();
  32.  
  33.     if (P2toRFC (NULLCP, NULLCP, (Q_struct *) 0, NULLCP, NULLCP, 0) != OK)
  34.     {
  35.         fprintf (stderr, "P2 to RFC mapping failed\n");
  36.         exit (-1);
  37.     }
  38.  
  39. }
  40.  
  41.  
  42.  
  43. void    advise (what, fmt, a, b, c, d, e, f, g, h, i, j)
  44. char   *what,
  45.        *fmt,
  46.        *a,
  47.        *b,
  48.        *c,
  49.        *d,
  50.        *e,
  51.        *f,
  52.        *g,
  53.        *h,
  54.        *i,
  55.        *j;
  56. {
  57.     (void) fflush (stdout);
  58.  
  59.     fprintf (stderr, "RFCtoP2 test");
  60.     fprintf (stderr, fmt, a, b, c, d, e, f, g, h, i, j);
  61.     if (what)
  62.     (void) fputc (' ', stderr), perror (what);
  63.     else
  64.     (void) fputc ('\n', stderr);
  65.  
  66.     (void) fflush (stderr);
  67. }
  68.  
  69.  
  70. /* VARARGS 2 */
  71. void    adios (what, fmt, a, b, c, d, e, f, g, h, i, j)
  72. char   *what,
  73.        *fmt,
  74.        *a,
  75.        *b,
  76.        *c,
  77.        *d,
  78.        *e,
  79.        *f,
  80.        *g,
  81.        *h,
  82.        *i,
  83.        *j;
  84. {
  85.     advise (what, fmt, a, b, c, d, e, f, g, h, i, j);
  86.     _exit (1);
  87. }
  88.