[BACK]Return to mlg.c CVS log [TXT][DIR] Up to [cvsweb.bsd.lv] / mandoc

Diff for /mandoc/Attic/mlg.c between version 1.12 and 1.16

version 1.12, 2008/12/05 22:34:30 version 1.16, 2008/12/06 21:10:31
Line 19 
Line 19 
 #include <assert.h>  #include <assert.h>
 #include <ctype.h>  #include <ctype.h>
 #include <err.h>  #include <err.h>
   #include <stdarg.h>
 #include <stdlib.h>  #include <stdlib.h>
 #include <stdio.h>  #include <stdio.h>
 #include <string.h>  #include <string.h>
Line 59  struct md_mlg {
Line 60  struct md_mlg {
 };  };
   
   
   static  char            *mlg_literal(int);
   static  char            *mlg_At_literal(const char *);
   static  char            *mlg_St_literal(int);
 static  void             mlg_roffmsg(void *arg, enum roffmsg,  static  void             mlg_roffmsg(void *arg, enum roffmsg,
                                 const char *, const char *, char *);                                  const char *, const char *, char *);
 static  int              mlg_roffhead(void *, const struct tm *,  static  int              mlg_roffhead(void *, const struct tm *,
Line 72  static int   mlg_roffout(void *, int);
Line 76  static int   mlg_roffout(void *, int);
 static  int              mlg_roffblkin(void *, int, int *, char **);  static  int              mlg_roffblkin(void *, int, int *, char **);
 static  int              mlg_roffblkout(void *, int);  static  int              mlg_roffblkout(void *, int);
 static  int              mlg_roffspecial(void *, int,  static  int              mlg_roffspecial(void *, int,
                                 const char *, char **);                                  const char *, const int *,
                                   const char **, char **);
 static  int              mlg_roffblkheadin(void *, int,  static  int              mlg_roffblkheadin(void *, int,
                                 int *, char **);                                  int *, char **);
 static  int              mlg_roffblkheadout(void *, int);  static  int              mlg_roffblkheadout(void *, int);
Line 89  static void   mlg_mode(struct md_mlg *, enum md_tok);
Line 94  static void   mlg_mode(struct md_mlg *, enum md_tok);
 static  int              mlg_data(struct md_mlg *, int,  static  int              mlg_data(struct md_mlg *, int,
                                 const char *, char *);                                  const char *, char *);
 static  void             mlg_err(struct md_mlg *, const char *,  static  void             mlg_err(struct md_mlg *, const char *,
                                 const char *, char *);                                  const char *, const char *, ...);
 static  void             mlg_warn(struct md_mlg *, const char *,  static  void             mlg_warn(struct md_mlg *, const char *,
                                 const char *, char *);                                  const char *, const char *, ...);
 static  void             mlg_msg(struct md_mlg *, enum roffmsg,  static  void             mlg_msg(struct md_mlg *, enum roffmsg,
                                 const char *, const char *, char *);                                  const char *, const char *, char *);
   static  void             mlg_vmsg(struct md_mlg *, enum roffmsg,
                                   const char *, const char *,
                                   const char *, va_list);
   
 #ifdef __linux__  #ifdef __linux__
 extern  size_t           strlcat(char *, const char *, size_t);  extern  size_t           strlcat(char *, const char *, size_t);
Line 101  extern size_t   strlcpy(char *, const char *, size_t);
Line 109  extern size_t   strlcpy(char *, const char *, size_t);
 #endif  #endif
   
   
   static char *
   mlg_St_literal(int argc)
   {
   
           switch (argc) {
           case(ROFF_p1003_1_88):
                   return("IEEE Std 1003.1-1988 (&#8220;POSIX&#8221;)");
           case(ROFF_p1003_1_90):
                   return("IEEE Std 1003.1-1990 (&#8220;POSIX&#8221;)");
           case(ROFF_p1003_1_96):
                   return("ISO/IEC 9945-1:1996 (&#8220;POSIX&#8221;)");
           case(ROFF_p1003_1_2001):
                   return("IEEE Std 1003.1-2001 (&#8220;POSIX&#8221;)");
           case(ROFF_p1003_1_2004):
                   return("IEEE Std 1003.1-2004 (&#8220;POSIX&#8221;)");
           case(ROFF_p1003_1):
                   return("IEEE Std 1003.1 (&#8220;POSIX&#8221;)");
           case(ROFF_p1003_1b):
                   return("IEEE Std 1003.1b (&#8220;POSIX&#8221;)");
           case(ROFF_p1003_1b_93):
                   return("IEEE Std 1003.1b-1993 (&#8220;POSIX&#8221;)");
           case(ROFF_p1003_1c_95):
                   return("IEEE Std 1003.1c-1995 (&#8220;POSIX&#8221;)");
           case(ROFF_p1003_1g_2000):
                   return("IEEE Std 1003.1g-2000 (&#8220;POSIX&#8221;)");
           case(ROFF_p1003_2_92):
                   return("IEEE Std 1003.2-1992 (&#8220;POSIX.2&#8221;)");
           case(ROFF_p1387_2_95):
                   return("IEEE Std 1387.2-1995 (&#8220;POSIX.7.2&#8221;)");
           case(ROFF_p1003_2):
                   return("IEEE Std 1003.2 (&#8220;POSIX.2&#8221;)");
           case(ROFF_p1387_2):
                   return("IEEE Std 1387.2 (&#8220;POSIX.7.2&#8221;)");
           case(ROFF_isoC_90):
                   return("ISO/IEC 9899:1990 (&#8220;ISO C90&#8221;)");
           case(ROFF_isoC_amd1):
                   return("ISO/IEC 9899/AMD1:1995 (&#8220;ISO C90&#8221;)");
           case(ROFF_isoC_tcor1):
                   return("ISO/IEC 9899/TCOR1:1994 (&#8220;ISO C90&#8221;)");
           case(ROFF_isoC_tcor2):
                   return("ISO/IEC 9899/TCOR2:1995 (&#8220;ISO C90&#8221;)");
           case(ROFF_isoC_99):
                   return("ISO/IEC 9899:1999 (&#8220;ISO C99&#8221;)");
           case(ROFF_ansiC):
                   return("ANSI X3.159-1989 (&#8220;ANSI C&#8221;)");
           case(ROFF_ansiC_89):
                   return("ANSI X3.159-1989 (&#8220;ANSI C&#8221;)");
           case(ROFF_ansiC_99):
                   return("ANSI/ISO/IEC 9899-1999 (&#8220;ANSI C99&#8221;)");
           case(ROFF_ieee754):
                   return("IEEE Std 754-1985");
           case(ROFF_iso8802_3):
                   return("ISO 8802-3: 1989");
           case(ROFF_xpg3):
                   return("X/Open Portability Guide Issue 3 (&#8220;XPG3&#8221;)");
           case(ROFF_xpg4):
                   return("X/Open Portability Guide Issue 4 (&#8220;XPG4&#8221;)");
           case(ROFF_xpg4_2):
                   return("X/Open Portability Guide Issue 4.2 (&#8220;XPG4.2&#8221;)");
           case(ROFF_xpg4_3):
                   return("X/Open Portability Guide Issue 4.3 (&#8220;XPG4.3&#8221;)");
           case(ROFF_xbd5):
                   return("X/Open System Interface Definitions Issue 5 (&#8220;XBD5&#8221;)");
           case(ROFF_xcu5):
                   return("X/Open Commands and Utilities Issue 5 (&#8220;XCU5&#8221;)");
           case(ROFF_xsh5):
                   return("X/Open System Interfaces and Headers Issue 5 (&#8220;XSH5&#8221;)");
           case(ROFF_xns5):
                   return("X/Open Networking Services Issue 5 (&#8220;XNS5&#8221;)");
           case(ROFF_xns5_2d2_0):
                   return("X/Open Networking Services Issue 5.2 Draft 2.0 (&#8220;XNS5.2D2.0&#8221;)");
           case(ROFF_xcurses4_2):
                   return("X/Open Curses Issue 4 Version 2 (&#8220;XCURSES4.2&#8221;)");
           case(ROFF_susv2):
                   return("Version 2 of the Single UNIX Specification");
           case(ROFF_susv3):
                   return("Version 3 of the Single UNIX Specification");
           case(ROFF_svid4):
                   return("System V Interface Definition, Fourth Edition (&#8220;SVID4&#8221;)");
           default:
                   break;
           }
   
           abort();
           /* NOTREACHED */
   }
   
   
   static char *
   mlg_At_literal(const char *p)
   {
           if (NULL == p)
                   return("AT&amp;T UNIX");
           if (0 == strcmp(p, "v6"))
                   return("Version 6 AT&amp;T UNIX");
           else if (0 == strcmp(p, "v7"))
                   return("Version 7 AT&amp;T UNIX");
           else if (0 == strcmp(p, "32v"))
                   return("Version 32v AT&amp;T UNIX");
           else if (0 == strcmp(p, "V.1"))
                   return("AT&amp;T System V.1 UNIX");
           else if (0 == strcmp(p, "V.4"))
                   return("AT&amp;T System V.4 UNIX");
   
           abort();
           /* NOTREACHED */
   }
   
   
   static char *
   mlg_literal(int tok)
   {
           switch (tok) {
           case (ROFF_Bt):
                   return("is currently in beta test.");
           case (ROFF_Ud):
                   return("currently under development.");
           case (ROFF_Fx):
                   return("FreeBSD");
           case (ROFF_Nx):
                   return("NetBSD");
           case (ROFF_Ox):
                   return("OpenBSD");
           case (ROFF_Ux):
                   return("UNIX");
           case (ROFF_Bx):
                   return("BSD");
           case (ROFF_Bsx):
                   return("BSDI BSD/OS");
           default:
                   break;
           }
           abort();
           /* NOTREACHED */
   }
   
   
 static int  static int
 mlg_begintag(struct md_mlg *p, enum md_ns ns, int tok,  mlg_begintag(struct md_mlg *p, enum md_ns ns, int tok,
                 int *argc, char **argv)                  int *argc, char **argv)
Line 413  mlg_rofftail(void *arg)
Line 558  mlg_rofftail(void *arg)
 }  }
   
   
   /* ARGSUSED */
 static int  static int
 mlg_roffspecial(void *arg, int tok, const char *start, char **more)  mlg_roffspecial(void *arg, int tok, const char *start,
                   const int *argc, const char **argv, char **more)
 {  {
         struct md_mlg   *p;          struct md_mlg   *p;
   
         assert(arg);          assert(arg);
         p = (struct md_mlg *)arg;          p = (struct md_mlg *)arg;
   
           /*
            * First handle macros without content.
            */
   
         switch (tok) {          switch (tok) {
           case (ROFF_Ns):
                   p->flags |= ML_OVERRIDE_ONE;
                   return(1);
           case (ROFF_Sm):
                   assert(*more);
                   if (0 == strcmp(*more, "on"))
                           p->flags |= ML_OVERRIDE_ALL;
                   else
                           p->flags &= ~ML_OVERRIDE_ALL;
                   return(1);
           default:
                   break;
           }
   
           if ( ! mlg_begintag(p, MD_NS_INLINE, tok, NULL, more))
                   return(0);
   
           switch (tok) {
           case (ROFF_St):
                   assert(NULL == *argv);
                   assert(ROFF_ARGMAX != *argc);
                   if ( ! ml_puts(p->mbuf, mlg_St_literal(*argc),
                                           &p->pos))
                           return(0);
                   while (*more) {
                           if ( ! ml_nputs(p->mbuf, " ", 1, &p->pos))
                                   return(0);
                           if ( ! ml_putstring(p->mbuf, *more++, &p->pos))
                                   return(0);
                   }
                   break;
   
         case (ROFF_Xr):          case (ROFF_Xr):
                 if ( ! *more) {                  if ( ! *more) {
                         mlg_err(p, start, start, "missing argument");                          mlg_err(p, start, start, "missing argument");
                         return(0);                          return(0);
                 }                  }
                 if ( ! mlg_begintag(p, MD_NS_INLINE, tok, NULL, NULL))  
                         return(0);  
                 if ( ! ml_puts(p->mbuf, *more++, &p->pos))                  if ( ! ml_puts(p->mbuf, *more++, &p->pos))
                         return(0);                          return(0);
                 if (*more) {                  if (*more) {
Line 443  mlg_roffspecial(void *arg, int tok, const char *start,
Line 624  mlg_roffspecial(void *arg, int tok, const char *start,
                         mlg_err(p, start, start, "too many arguments");                          mlg_err(p, start, start, "too many arguments");
                         return(0);                          return(0);
                 }                  }
                 if ( ! mlg_endtag(p, MD_NS_INLINE, tok))  
                         return(0);  
                 break;                  break;
         case (ROFF_Fn):          case (ROFF_Sx):
                 abort(); /* TODO */                  /* FALLTHROUGH */
                 break;  
         case (ROFF_Nm):          case (ROFF_Nm):
                 assert(*more);                  assert(*more);
                 if ( ! mlg_begintag(p, MD_NS_INLINE, tok, NULL, NULL))                  if ( ! ml_puts(p->mbuf, *more++, &p->pos))
                         return(0);                          return(0);
                   assert(NULL == *more);
                   break;
           case (ROFF_Ex):
                   assert(*more);
                   if ( ! ml_puts(p->mbuf, "The ", &p->pos))
                           return(0);
                   if ( ! mlg_begintag(p, MD_NS_INLINE, ROFF_Xr, NULL, NULL))
                           return(0);
                 if ( ! ml_puts(p->mbuf, *more++, &p->pos))                  if ( ! ml_puts(p->mbuf, *more++, &p->pos))
                         return(0);                          return(0);
                   if ( ! mlg_endtag(p, MD_NS_INLINE, ROFF_Xr))
                           return(0);
                   if ( ! ml_puts(p->mbuf, " utility exits 0 on success, "
                                           "and &gt;0 if an error "
                                           "occurs.", &p->pos))
                           return(0);
                 assert(NULL == *more);                  assert(NULL == *more);
                 if ( ! mlg_endtag(p, MD_NS_INLINE, tok))                  break;
           case (ROFF_At):
                   if ( ! ml_puts(p->mbuf, mlg_At_literal(*more), &p->pos))
                         return(0);                          return(0);
                 break;                  break;
         case (ROFF_Ns):          case (ROFF_Bx):
                 p->flags |= ML_OVERRIDE_ONE;                  /* FALLTHROUGH */
           case (ROFF_Bsx):
                   /* FALLTHROUGH */
           case (ROFF_Fx):
                   /* FALLTHROUGH */
           case (ROFF_Nx):
                   /* FALLTHROUGH */
           case (ROFF_Ox):
                   if ( ! ml_puts(p->mbuf, mlg_literal(tok), &p->pos))
                           return(0);
                   while (*more) {
                           if ( ! ml_nputs(p->mbuf, " ", 1, &p->pos))
                                   return(0);
                           if ( ! ml_putstring(p->mbuf, *more++, &p->pos))
                                   return(0);
                   }
                 break;                  break;
         case (ROFF_Sm):          case (ROFF_Bt):
                 assert(*more);                  /* FALLTHROUGH */
                 if (0 == strcmp(*more, "on"))          case (ROFF_Ud):
                         p->flags |= ML_OVERRIDE_ALL;                  /* FALLTHROUGH */
                 else          case (ROFF_Ux):
                         p->flags &= ~ML_OVERRIDE_ALL;                  assert(NULL == *more);
                   if ( ! ml_puts(p->mbuf, mlg_literal(tok), &p->pos))
                           return(0);
                 break;                  break;
         default:          default:
                 break;                  mlg_err(p, start, start, "`%s' not yet supported",
                                   toknames[tok]);
                   return(0);
         }          }
   
         return(1);          return(mlg_endtag(p, MD_NS_INLINE, tok));
 }  }
   
   
Line 572  mlg_roffdata(void *arg, int space, const char *start, 
Line 785  mlg_roffdata(void *arg, int space, const char *start, 
   
   
 static void  static void
 mlg_err(struct md_mlg *p, const char *buf, const char *pos, char *msg)  mlg_vmsg(struct md_mlg *p, enum roffmsg lvl, const char *start,
                   const char *pos, const char *fmt, va_list ap)
 {  {
           char             buf[128];
   
         mlg_msg(p, ROFF_ERROR, buf, pos, msg);          (void)vsnprintf(buf, sizeof(buf), fmt, ap);
           mlg_msg(p, lvl, start, pos, buf);
 }  }
   
   
 static void  static void
 mlg_warn(struct md_mlg *p, const char *buf, const char *pos, char *msg)  mlg_warn(struct md_mlg *p, const char *start,
                   const char *pos, const char *fmt, ...)
 {  {
           va_list          ap;
   
         mlg_msg(p, ROFF_WARN, buf, pos, msg);          va_start(ap, fmt);
           mlg_vmsg(p, ROFF_WARN, start, pos, fmt, ap);
           va_end(ap);
 }  }
   
   
 static void  static void
   mlg_err(struct md_mlg *p, const char *start,
                   const char *pos, const char *fmt, ...)
   {
           va_list          ap;
   
           va_start(ap, fmt);
           mlg_vmsg(p, ROFF_ERROR, start, pos, fmt, ap);
           va_end(ap);
   }
   
   
   static void
 mlg_msg(struct md_mlg *p, enum roffmsg lvl,  mlg_msg(struct md_mlg *p, enum roffmsg lvl,
                 const char *buf, const char *pos, char *msg)                  const char *buf, const char *pos, char *msg)
 {  {
Line 613  mlg_msg(struct md_mlg *p, enum roffmsg lvl, 
Line 845  mlg_msg(struct md_mlg *p, enum roffmsg lvl, 
         else          else
                 (void)fprintf(stderr, "%s: %s: %s\n",                  (void)fprintf(stderr, "%s: %s: %s\n",
                                 p->rbuf->name, level, msg);                                  p->rbuf->name, level, msg);
   
 }  }
Legend:
Removed from v.1.12  
changed lines
  Added in v.1.16
CVSweb