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

Diff for /mandoc/Attic/libmdocml.c between version 1.4 and 1.15

version 1.4, 2008/11/23 11:05:25 version 1.15, 2008/11/30 20:53:34
Line 17 
Line 17 
  * PERFORMANCE OF THIS SOFTWARE.   * PERFORMANCE OF THIS SOFTWARE.
  */   */
 #include <assert.h>  #include <assert.h>
   #include <ctype.h>
 #include <fcntl.h>  #include <fcntl.h>
 #include <err.h>  #include <err.h>
 #include <stdio.h>  #include <stdio.h>
Line 25 
Line 26 
 #include <unistd.h>  #include <unistd.h>
   
 #include "libmdocml.h"  #include "libmdocml.h"
   #include "private.h"
   
 #define BUFFER_LINE      BUFSIZ  #define BUFFER_LINE      BUFSIZ /* Default line-buffer size. */
   
 struct  md_rbuf {  static  int      md_run_enter(const struct md_args *,
         int              fd;                          struct md_mbuf *, struct md_rbuf *, void *);
         char            *name;  static  int      md_run_leave(const struct md_args *, struct md_mbuf *,
         char            *buf;                          struct md_rbuf *, int, void *);
         size_t           bufsz;  
         size_t           line;  
 };  
   
 struct  md_mbuf {  static  ssize_t  md_buf_fill(struct md_rbuf *);
         int              fd;  static  int      md_buf_flush(struct md_mbuf *);
         char            *name;  
         char            *buf;  
         size_t           bufsz;  
         size_t           pos;  
 };  
   
 typedef int (*md_line)  (const struct md_args *, struct md_mbuf *,  
                                 const struct md_rbuf *,  
                                 const char *, size_t);  
 typedef int (*md_init)  (const struct md_args *, struct md_mbuf *);  
 typedef int (*md_exit)  (const struct md_args *, struct md_mbuf *);  
   
 static int               md_line_dummy(const struct md_args *,  
                                 struct md_mbuf *,  
                                 const struct md_rbuf *,  
                                 const char *, size_t);  
   
 static int               md_line_html4_strict(const struct md_args *,  
                                 struct md_mbuf *,  
                                 const struct md_rbuf *,  
                                 const char *, size_t);  
 static int               md_init_html4_strict(const struct md_args *,  
                                 struct md_mbuf *);  
 static int               md_exit_html4_strict(const struct md_args *,  
                                 struct md_mbuf *);  
   
 static int               md_run_enter(const struct md_args *,  
                                 struct md_mbuf *, struct md_rbuf *);  
 static int               md_run_leave(const struct md_args *,  
                                 struct md_mbuf *,  
                                 struct md_rbuf *, int);  
   
 static ssize_t           md_buf_fill(struct md_rbuf *);  
 static int               md_buf_flush(struct md_mbuf *);  
 static int               md_buf_putchar(struct md_mbuf *, char);  
 static int               md_buf_putstring(struct md_mbuf *,  
                                 const char *);  
 static int               md_buf_puts(struct md_mbuf *,  
                                 const char *, size_t);  
   
   
 static ssize_t  static ssize_t
 md_buf_fill(struct md_rbuf *in)  md_buf_fill(struct md_rbuf *in)
 {  {
Line 96  md_buf_fill(struct md_rbuf *in)
Line 56  md_buf_fill(struct md_rbuf *in)
 }  }
   
   
 static int  static int md_buf_flush(struct md_mbuf *buf)
 md_buf_flush(struct md_mbuf *buf)  
 {  {
         ssize_t          sz;          ssize_t          sz;
   
Line 123  md_buf_flush(struct md_mbuf *buf)
Line 82  md_buf_flush(struct md_mbuf *buf)
 }  }
   
   
 static int  int
 md_buf_putchar(struct md_mbuf *buf, char c)  md_buf_putchar(struct md_mbuf *buf, char c)
 {  {
   
           assert(buf);
         return(md_buf_puts(buf, &c, 1));          return(md_buf_puts(buf, &c, 1));
 }  }
   
   
 static int  int
 md_buf_putstring(struct md_mbuf *buf, const char *p)  md_buf_putstring(struct md_mbuf *buf, const char *p)
 {  {
   
           assert(buf);
         return(md_buf_puts(buf, p, strlen(p)));          return(md_buf_puts(buf, p, strlen(p)));
 }  }
   
   
 static int  int
 md_buf_puts(struct md_mbuf *buf, const char *p, size_t sz)  md_buf_puts(struct md_mbuf *buf, const char *p, size_t sz)
 {  {
         size_t           ssz;          size_t           ssz;
Line 167  md_buf_puts(struct md_mbuf *buf, const char *p, size_t
Line 130  md_buf_puts(struct md_mbuf *buf, const char *p, size_t
   
   
 static int  static int
 md_run_leave(const struct md_args *args,  md_run_leave(const struct md_args *args, struct md_mbuf *mbuf,
                 struct md_mbuf *mbuf, struct md_rbuf *rbuf, int c)                  struct md_rbuf *rbuf, int c, void *data)
 {  {
         assert(args);          assert(args);
         assert(mbuf);          assert(mbuf);
Line 177  md_run_leave(const struct md_args *args, 
Line 140  md_run_leave(const struct md_args *args, 
         /* Run exiters. */          /* Run exiters. */
         switch (args->type) {          switch (args->type) {
         case (MD_HTML4_STRICT):          case (MD_HTML4_STRICT):
                 if ( ! md_exit_html4_strict(args, mbuf))                  if ( ! md_exit_html4_strict(data, -1 == c ? 0 : 1))
                         return(-1);                          c = -1;
                 break;                  break;
         case (MD_DUMMY):  
                 break;  
         default:          default:
                 abort();                  if ( ! md_exit_valid(data, -1 == c ? 0 : 1))
                           c = -1;
                   break;
         }          }
   
         /* Make final flush of buffer. */          /* Make final flush of buffer. */
Line 195  md_run_leave(const struct md_args *args, 
Line 158  md_run_leave(const struct md_args *args, 
   
   
 static int  static int
 md_run_enter(const struct md_args *args,  md_run_enter(const struct md_args *args, struct md_mbuf *mbuf,
                 struct md_mbuf *mbuf, struct md_rbuf *rbuf)                  struct md_rbuf *rbuf, void *p)
 {  {
         ssize_t          sz, i;          ssize_t          sz, i;
         char             line[BUFFER_LINE];          char             line[BUFFER_LINE];
Line 212  md_run_enter(const struct md_args *args, 
Line 175  md_run_enter(const struct md_args *args, 
         case (MD_HTML4_STRICT):          case (MD_HTML4_STRICT):
                 fp = md_line_html4_strict;                  fp = md_line_html4_strict;
                 break;                  break;
         case (MD_DUMMY):  
                 fp = md_line_dummy;  
                 break;  
         default:          default:
                 abort();                  fp = md_line_valid;
                   break;
         }          }
   
         /* LINTED */          pos = 0;
         for (pos = 0; ; ) {  
                 if (-1 == (sz = md_buf_fill(rbuf)))  
                         return(-1);  
                 else if (0 == sz)  
                         break;  
   
                 for (i = 0; i < sz; i++) {  again:
                         if ('\n' == rbuf->buf[i]) {          if (-1 == (sz = md_buf_fill(rbuf))) {
                                 if ( ! (*fp)(args, mbuf, rbuf, line, pos))                  return(md_run_leave(args, mbuf, rbuf, -1, p));
                                         return(-1);          } else if (0 == sz && 0 != pos) {
                                 rbuf->line++;                  warnx("%s: no newline at end of file", rbuf->name);
                                 pos = 0;                  return(md_run_leave(args, mbuf, rbuf, -1, p));
                                 continue;          } else if (0 == sz)
                         }                  return(md_run_leave(args, mbuf, rbuf, 0, p));
   
           for (i = 0; i < sz; i++) {
                   /*
                   if ( ! isascii(rbuf->buf[i])) {
                           warnx("%s: non-ascii char (line %zu, col %zu)",
                                           rbuf->name, rbuf->line, pos);
                           return(md_run_leave(args, mbuf, rbuf, -1, p));
                   }
                   */
                   if ('\n' != rbuf->buf[i]) {
                         if (pos < BUFFER_LINE) {                          if (pos < BUFFER_LINE) {
                                 /* LINTED */                                  /* LINTED */
                                 line[pos++] = rbuf->buf[i];                                  line[pos++] = rbuf->buf[i];
                                 continue;                                  continue;
                         }                          }
   
                         warnx("%s: line %zu too long",                          warnx("%s: line %zu too long",
                                         rbuf->name, rbuf->line);                                          rbuf->name, rbuf->line);
                         return(-1);                          return(md_run_leave(args, mbuf, rbuf, -1, p));
                 }                  }
   
                   line[(int)pos] = 0;
                   if ( ! (*fp)(p, line))
                           return(md_run_leave(args, mbuf, rbuf, -1, p));
                   rbuf->line++;
                   pos = 0;
         }          }
   
         if (0 != pos && ! (*fp)(args, mbuf, rbuf, line, pos))          goto again;
                 return(-1);          /* NOTREACHED */
   
         return(md_run_leave(args, mbuf, rbuf, 0));  
 }  }
   
   
Line 260  md_run(const struct md_args *args,
Line 228  md_run(const struct md_args *args,
 {  {
         struct md_mbuf   mbuf;          struct md_mbuf   mbuf;
         struct md_rbuf   rbuf;          struct md_rbuf   rbuf;
           void            *data;
   
         assert(args);          assert(args);
         assert(in);          assert(in);
Line 274  md_run(const struct md_args *args,
Line 243  md_run(const struct md_args *args,
         /* Run initialisers. */          /* Run initialisers. */
         switch (args->type) {          switch (args->type) {
         case (MD_HTML4_STRICT):          case (MD_HTML4_STRICT):
                 if ( ! md_init_html4_strict(args, &mbuf))                  data = md_init_html4_strict
                         return(-1);                          (args, &mbuf, &rbuf);
                 break;                  break;
         case (MD_DUMMY):  
                 break;  
         default:          default:
                 abort();                  data = md_init_valid
                           (args, &mbuf, &rbuf);
                   break;
         }          }
   
         /* Go into mainline. */          /* Go into mainline. */
         return(md_run_enter(args, &mbuf, &rbuf));          return(md_run_enter(args, &mbuf, &rbuf, data));
 }  
   
   
 static int  
 md_line_dummy(const struct md_args *args, struct md_mbuf *out,  
                 const struct md_rbuf *in, const char *buf, size_t sz)  
 {  
   
         assert(buf);  
         assert(out);  
         assert(in);  
         assert(args);  
   
         if ( ! md_buf_puts(out, buf, sz))  
                 return(0);  
         if ( ! md_buf_putchar(out, '\n'))  
                 return(0);  
   
         return(1);  
 }  
   
   
 static int  
 md_exit_html4_strict(const struct md_args *args, struct md_mbuf *out)  
 {  
         char            *tail;  
   
         assert(out);  
         assert(args);  
   
         tail =  "               </pre>\n"  
                 "       </body>\n"  
                 "</html>\n";  
   
         if ( ! md_buf_putstring(out, tail))  
                 return(0);  
   
         return(1);  
 }  
   
   
 static int  
 md_init_html4_strict(const struct md_args *args, struct md_mbuf *out)  
 {  
         char            *head;  
   
         assert(out);  
         assert(args);  
   
         head =  "<html>\n"  
                 "       <head>\n"  
                 "               <title>Manual Page</title>\n"  
                 "       </head>\n"  
                 "       <body>\n"  
                 "               <pre>\n";  
   
         if ( ! md_buf_putstring(out, head))  
                 return(0);  
   
         return(1);  
 }  
   
   
 struct md_roff_macro {  
         char             name[2];  
         int              flags;  
 #define MD_PARSED       (1 << 0)  
 #define MD_CALLABLE     (1 << 1)  
 #define MD_TITLE        (1 << 2)  
 };  
   
 struct md_roff_macro[] = {  
         { "Dd",         MD_TITLE        },  
         { "Dt",         MD_TITLE        },  
         { "Os",         MD_TITLE        },  
         { "Sh",         MD_PARSED       },  
 };  
   
   
 static int  
 md_roff(struct md_mbuf *out, const struct md_rbuf *in,  
                 const char *buf, size_t sz)  
 {  
   
         assert(out);  
         assert(in);  
         assert(buf);  
         assert(sz >= 1);  
 }  
   
   
 static int  
 md_line_html4_strict(const struct md_args *args, struct md_mbuf *out,  
                 const struct md_rbuf *in, const char *buf, size_t sz)  
 {  
   
         assert(args);  
         assert(in);  
   
         if (0 == sz) {  
                 warnx("%s: blank line (line %zu)", in->name, in->line);  
                 return(0);  
         }  
   
         if ('.' == *buf) {  
                 return(1);  
         }  
   
         return(md_buf_puts(out, buf, sz));  
 }  }
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.15
CVSweb