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

Diff for /mandoc/Attic/mlg.c between version 1.3 and 1.8

version 1.3, 2008/12/03 21:27:56 version 1.8, 2008/12/04 23:10:51
Line 63  struct md_mlg {
Line 63  struct md_mlg {
   
 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 *);  static  int              mlg_roffhead(void *, const struct tm *,
                                   const char *, const char *,
                                   const char *, const char *);
 static  int              mlg_rofftail(void *);  static  int              mlg_rofftail(void *);
 static  int              mlg_roffin(void *, int, int *, char **);  static  int              mlg_roffin(void *, int, int *, char **);
 static  int              mlg_roffdata(void *, int, char *);  static  int              mlg_roffdata(void *, int,
                                   const char *, char *);
 static  int              mlg_roffout(void *, int);  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, int *,  static  int              mlg_roffspecial(void *, int,
                                 char **, char **);                                  const char *, char **);
 static  int              mlg_roffblkheadin(void *, int, int *, char **);  static  int              mlg_roffblkheadin(void *, int,
                                   int *, char **);
 static  int              mlg_roffblkheadout(void *, int);  static  int              mlg_roffblkheadout(void *, int);
 static  int              mlg_roffblkbodyin(void *, int, int *, char **);  static  int              mlg_roffblkbodyin(void *, int,
                                   int *, char **);
 static  int              mlg_roffblkbodyout(void *, int);  static  int              mlg_roffblkbodyout(void *, int);
   
 static  int              mlg_beginblk(struct md_mlg *, enum md_ns, int,  
                                 int *, char **);  
 static  int              mlg_endblk(struct md_mlg *, enum md_ns, int);  static  int              mlg_endblk(struct md_mlg *, enum md_ns, int);
 static  int              mlg_begintag(struct md_mlg *, enum md_ns,  static  int              mlg_begintag(struct md_mlg *, enum md_ns,
                                 int, int *, char **);                                  int, int *, char **);
Line 86  static int   mlg_endtag(struct md_mlg *, enum md_ns, i
Line 89  static int   mlg_endtag(struct md_mlg *, enum md_ns, i
 static  int              mlg_indent(struct md_mlg *);  static  int              mlg_indent(struct md_mlg *);
 static  int              mlg_newline(struct md_mlg *);  static  int              mlg_newline(struct md_mlg *);
 static  void             mlg_mode(struct md_mlg *, enum md_tok);  static  void             mlg_mode(struct md_mlg *, enum md_tok);
 static  int              mlg_data(struct md_mlg *, int, char *);  static  int              mlg_data(struct md_mlg *, int,
                                   const char *, char *);
   static  void             mlg_err(struct md_mlg *, const char *,
                                   const char *, char *);
   static  void             mlg_warn(struct md_mlg *, const char *,
                                   const char *, char *);
   static  void             mlg_msg(struct md_mlg *, enum roffmsg,
                                   const char *, const char *, char *);
   
 #ifdef __linux__  #ifdef __linux__
 extern  size_t           strlcat(char *, const char *, size_t);  extern  size_t           strlcat(char *, const char *, size_t);
Line 95  extern size_t   strlcpy(char *, const char *, size_t);
Line 105  extern size_t   strlcpy(char *, const char *, size_t);
   
   
 static int  static int
 mlg_beginblk(struct md_mlg *p, enum md_ns ns, int tok,  
                 int *argc, char **argv)  
 {  
         if (0 != p->pos) {  
                 if ( ! mlg_newline(p))  
                         return(0);  
                 if ( ! mlg_indent(p))  
                         return(0);  
         } else if ( ! mlg_indent(p))  
                 return(0);  
   
         p->indent++;  
         mlg_mode(p, MD_BLK_IN);  
   
         if ( ! mlg_begintag(p, ns, tok, argc, argv))  
                 return(0);  
         return(mlg_newline(p));  
 }  
   
   
 static int  
 mlg_endblk(struct md_mlg *p, enum md_ns ns, int tok)  mlg_endblk(struct md_mlg *p, enum md_ns ns, int tok)
 {  {
   
Line 142  mlg_begintag(struct md_mlg *p, enum md_ns ns, int tok,
Line 131  mlg_begintag(struct md_mlg *p, enum md_ns ns, int tok,
 {  {
         ssize_t          res;          ssize_t          res;
   
         /* TODO: extra rules for block/inline. */          assert(MD_NS_DEFAULT != ns);
   
           switch (ns) {
           case (MD_NS_INLINE):
                   if ( ! (ML_OVERRIDE_ONE & p->flags) &&
                                   ! (ML_OVERRIDE_ALL & p->flags) &&
                                   p->pos + 11 > COLUMNS)
                           if ( ! mlg_newline(p))
                                   return(0);
                   if (0 != p->pos && (MD_TEXT == p->last ||
                                           MD_INLINE_OUT == p->last)
                                   && ! (ML_OVERRIDE_ONE & p->flags)
                                   && ! (ML_OVERRIDE_ALL & p->flags))
                           if ( ! ml_nputs(p->mbuf, " ", 1, &p->pos))
                                   return(0);
                   if (0 == p->pos && ! mlg_indent(p))
                           return(0);
                   mlg_mode(p, MD_INLINE_IN);
                   break;
           default:
                   if (0 != p->pos) {
                           if ( ! mlg_newline(p))
                                   return(0);
                           if ( ! mlg_indent(p))
                                   return(0);
                   } else if ( ! mlg_indent(p))
                           return(0);
                   p->indent++;
                   mlg_mode(p, MD_BLK_IN);
                   break;
           }
   
         if ( ! ml_nputs(p->mbuf, "<", 1, &p->pos))          if ( ! ml_nputs(p->mbuf, "<", 1, &p->pos))
                 return(0);                  return(0);
   
Line 155  mlg_begintag(struct md_mlg *p, enum md_ns ns, int tok,
Line 174  mlg_begintag(struct md_mlg *p, enum md_ns ns, int tok,
         assert(res >= 0);          assert(res >= 0);
         p->pos += (size_t)res;          p->pos += (size_t)res;
   
         /* TODO: extra rules for block/inline. */          if ( ! ml_nputs(p->mbuf, ">", 1, &p->pos))
                   return(0);
   
         return(ml_nputs(p->mbuf, ">", 1, &p->pos));          switch (ns) {
           case (MD_NS_INLINE):
                   break;
           default:
                   if ( ! mlg_newline(p))
                           return(0);
                   break;
           }
   
           return(1);
 }  }
   
   
Line 219  mlg_mode(struct md_mlg *p, enum md_tok ns)
Line 248  mlg_mode(struct md_mlg *p, enum md_tok ns)
   
   
 static int  static int
 mlg_data(struct md_mlg *p, int space, char *buf)  mlg_data(struct md_mlg *p, int space, const char *start, char *buf)
 {  {
         size_t           sz;          size_t           sz;
         char            *bufp;          int              c;
   
         assert(p->mbuf);          assert(p->mbuf);
         assert(0 != p->indent);          assert(0 != p->indent);
Line 231  mlg_data(struct md_mlg *p, int space, char *buf)
Line 260  mlg_data(struct md_mlg *p, int space, char *buf)
                         ML_OVERRIDE_ALL & p->flags)                          ML_OVERRIDE_ALL & p->flags)
                 space = 0;                  space = 0;
   
         while (*buf) {          sz = strlen(buf);
                 while (*buf && isspace(*buf))  
                         buf++;  
   
                 if (0 == *buf)          if (0 == p->pos) {
                         break;                  if ( ! mlg_indent(p))
                           return(0);
   
                 bufp = buf;                  c = ml_nputstring(p->mbuf, buf, sz, &p->pos);
                 while (*buf && ! isspace(*buf))  
                         buf++;  
   
                 if (0 != *buf)                  if (0 == c) {
                         *buf++ = 0;                          mlg_err(p, start, buf, "bad char sequence");
                           return(0);
                   } else if (c > 1) {
                           mlg_warn(p, start, buf, "bogus char sequence");
                           return(0);
                   } else if (-1 == c)
                           return(0);
   
                 sz = strlen(bufp);                  if (p->indent * INDENT + sz >= COLUMNS)
   
                 if (0 == p->pos) {  
                         if ( ! mlg_indent(p))  
                                 return(0);  
                         if ( ! ml_nputstring(p->mbuf, bufp,  
                                                 sz, &p->pos))  
                                 return(0);  
                         if (p->indent * INDENT + sz >= COLUMNS)  
                                 if ( ! mlg_newline(p))  
                                         return(0);  
                         if ( ! (ML_OVERRIDE_ALL & p->flags))  
                                 space = 1;  
                         continue;  
                 }  
   
                 if (space && sz + p->pos >= COLUMNS) {  
                         if ( ! mlg_newline(p))                          if ( ! mlg_newline(p))
                                 return(0);                                  return(0);
                         if ( ! mlg_indent(p))  
                                 return(0);  
                 } else if (space) {  
                         if ( ! ml_nputs(p->mbuf, " ", 1, &p->pos))  
                                 return(0);  
                 }  
   
                 if ( ! ml_nputstring(p->mbuf, bufp, sz, &p->pos))                  return(1);
                         return(0);          }
   
                 if ( ! (ML_OVERRIDE_ALL & p->flags))          if (space && sz + p->pos >= COLUMNS) {
                         space = 1;                  if ( ! mlg_newline(p))
                           return(0);
                   if ( ! mlg_indent(p))
                           return(0);
           } else if (space) {
                   if ( ! ml_nputs(p->mbuf, " ", 1, &p->pos))
                           return(0);
         }          }
   
           c = ml_nputstring(p->mbuf, buf, sz, &p->pos);
   
           if (0 == c) {
                   mlg_err(p, start, buf, "bad char sequence");
                   return(0);
           } else if (c > 1) {
                   mlg_warn(p, start, buf, "bogus char sequence");
                   return(0);
           } else if (-1 == c)
                   return(0);
   
         return(1);          return(1);
 }  }
   
Line 346  mlg_alloc(const struct md_args *args, 
Line 373  mlg_alloc(const struct md_args *args, 
   
   
 static int  static int
 mlg_roffhead(void *arg)  mlg_roffhead(void *arg, const struct tm *tm, const char *os,
                   const char *title, const char *sec, const char *vol)
 {  {
         struct md_mlg   *p;          struct md_mlg   *p;
   
Line 354  mlg_roffhead(void *arg)
Line 382  mlg_roffhead(void *arg)
         p = (struct md_mlg *)arg;          p = (struct md_mlg *)arg;
   
         mlg_mode(p, MD_BLK_IN);          mlg_mode(p, MD_BLK_IN);
         if ( ! (*p->begin)(p->mbuf, p->args))          if ( ! (*p->begin)(p->mbuf, p->args, tm, os, title, sec, vol))
                 return(0);                  return(0);
   
         p->indent++;          p->indent++;
Line 383  mlg_rofftail(void *arg)
Line 411  mlg_rofftail(void *arg)
   
 /* ARGSUSED */  /* ARGSUSED */
 static int  static int
 mlg_roffspecial(void *arg, int tok, int *argc, char **argv, char **more)  mlg_roffspecial(void *arg, int tok, const char *start, char **more)
 {  {
         struct md_mlg   *p;          struct md_mlg   *p;
   
Line 391  mlg_roffspecial(void *arg, int tok, int *argc, char **
Line 419  mlg_roffspecial(void *arg, int tok, int *argc, char **
         p = (struct md_mlg *)arg;          p = (struct md_mlg *)arg;
   
         switch (tok) {          switch (tok) {
           case (ROFF_Xr):
                   if ( ! *more) {
                           mlg_err(p, start, start,
                                           "missing required argument");
                           return(0);
                   }
                   if ( ! mlg_begintag(p, MD_NS_INLINE, tok, NULL, NULL))
                           return(0);
                   if ( ! ml_puts(p->mbuf, *more++, &p->pos))
                           return(0);
                   if (*more) {
                           if ( ! ml_nputs(p->mbuf, "(", 1, &p->pos))
                                   return(0);
                           if ( ! mlg_data(p, 0, start, *more++))
                                   return(0);
                           if ( ! ml_nputs(p->mbuf, ")", 1, &p->pos))
                                   return(0);
                   }
                   if (*more) {
                           mlg_err(p, start, start, "too many arguments");
                           return(0);
                   }
                   if ( ! mlg_endtag(p, MD_NS_INLINE, tok))
                           return(0);
                   mlg_mode(p, MD_INLINE_OUT);
                   break;
           case (ROFF_Fn):
                   break;
         case (ROFF_Ns):          case (ROFF_Ns):
                 p->flags |= ML_OVERRIDE_ONE;                  p->flags |= ML_OVERRIDE_ONE;
                 break;                  break;
Line 413  static int
Line 469  static int
 mlg_roffblkin(void *arg, int tok, int *argc, char **argv)  mlg_roffblkin(void *arg, int tok, int *argc, char **argv)
 {  {
   
         return(mlg_beginblk((struct md_mlg *)arg,          return(mlg_begintag((struct md_mlg *)arg,
                                 MD_NS_BLOCK, tok, argc, argv));                                  MD_NS_BLOCK, tok, argc, argv));
 }  }
   
Line 430  static int
Line 486  static int
 mlg_roffblkbodyin(void *arg, int tok, int *argc, char **argv)  mlg_roffblkbodyin(void *arg, int tok, int *argc, char **argv)
 {  {
   
         return(mlg_beginblk((struct md_mlg *)arg,          return(mlg_begintag((struct md_mlg *)arg,
                                 MD_NS_BODY, tok, argc, argv));                                  MD_NS_BODY, tok, argc, argv));
 }  }
   
Line 447  static int
Line 503  static int
 mlg_roffblkheadin(void *arg, int tok, int *argc, char **argv)  mlg_roffblkheadin(void *arg, int tok, int *argc, char **argv)
 {  {
   
         return(mlg_beginblk((struct md_mlg *)arg,          return(mlg_begintag((struct md_mlg *)arg,
                                 MD_NS_HEAD, tok, argc, argv));                                  MD_NS_HEAD, tok, argc, argv));
 }  }
   
Line 463  mlg_roffblkheadout(void *arg, int tok)
Line 519  mlg_roffblkheadout(void *arg, int tok)
 static int  static int
 mlg_roffin(void *arg, int tok, int *argc, char **argv)  mlg_roffin(void *arg, int tok, int *argc, char **argv)
 {  {
         struct md_mlg   *p;  
   
         assert(arg);          return(mlg_begintag((struct md_mlg *)arg,
         p = (struct md_mlg *)arg;                                  MD_NS_INLINE, tok, argc, argv));
   
         /* FIXME: this part. */  
   
         if ( ! (ML_OVERRIDE_ONE & p->flags) &&  
                         ! (ML_OVERRIDE_ALL & p->flags) &&  
                         p->pos + 11 > COLUMNS)  
                 if ( ! mlg_newline(p))  
                         return(0);  
   
         if (0 != p->pos && (MD_TEXT == p->last ||  
                                 MD_INLINE_OUT == p->last)  
                         && ! (ML_OVERRIDE_ONE & p->flags)  
                         && ! (ML_OVERRIDE_ALL & p->flags))  
                 if ( ! ml_nputs(p->mbuf, " ", 1, &p->pos))  
                         return(0);  
   
         if (0 == p->pos && ! mlg_indent(p))  
                 return(0);  
   
         mlg_mode(p, MD_INLINE_IN);  
         return(mlg_begintag(p, MD_NS_INLINE, tok, argc, argv));  
 }  }
   
   
Line 511  static void
Line 545  static void
 mlg_roffmsg(void *arg, enum roffmsg lvl,  mlg_roffmsg(void *arg, enum roffmsg lvl,
                 const char *buf, const char *pos, char *msg)                  const char *buf, const char *pos, char *msg)
 {  {
         char            *level;  
           mlg_msg((struct md_mlg *)arg, lvl, buf, pos, msg);
   }
   
   
   static int
   mlg_roffdata(void *arg, int space, const char *start, char *buf)
   {
         struct md_mlg   *p;          struct md_mlg   *p;
   
         assert(arg);          assert(arg);
         p = (struct md_mlg *)arg;          p = (struct md_mlg *)arg;
   
           if ( ! mlg_data(p, space, start, buf))
                   return(0);
   
           mlg_mode(p, MD_TEXT);
           return(1);
   }
   
   
   static void
   mlg_err(struct md_mlg *p, const char *buf, const char *pos, char *msg)
   {
   
           mlg_msg(p, ROFF_ERROR, buf, pos, msg);
   }
   
   
   static void
   mlg_warn(struct md_mlg *p, const char *buf, const char *pos, char *msg)
   {
   
           mlg_msg(p, ROFF_WARN, buf, pos, msg);
   }
   
   
   static void
   mlg_msg(struct md_mlg *p, enum roffmsg lvl,
                   const char *buf, const char *pos, char *msg)
   {
           char            *level;
   
         switch (lvl) {          switch (lvl) {
         case (ROFF_WARN):          case (ROFF_WARN):
                 if ( ! (MD_WARN_ALL & p->args->warnings))                  if ( ! (MD_WARN_ALL & p->args->warnings))
Line 539  mlg_roffmsg(void *arg, enum roffmsg lvl, 
Line 610  mlg_roffmsg(void *arg, enum roffmsg lvl, 
                                 p->rbuf->name, level, msg);                                  p->rbuf->name, level, msg);
   
 }  }
   
   
 static int  
 mlg_roffdata(void *arg, int space, char *buf)  
 {  
         struct md_mlg   *p;  
   
         assert(arg);  
         p = (struct md_mlg *)arg;  
   
         if ( ! mlg_data(p, space, buf))  
                 return(0);  
   
         mlg_mode(p, MD_TEXT);  
         return(1);  
 }  
   
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.8
CVSweb