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

Diff for /texi2mdoc/main.c between version 1.13 and 1.16

version 1.13, 2015/02/19 07:50:51 version 1.16, 2015/02/19 10:20:31
Line 37 
Line 37 
  */   */
 enum    texicmd {  enum    texicmd {
         TEXICMD_ACRONYM,          TEXICMD_ACRONYM,
           TEXICMD_ACUTE,
         TEXICMD_A4PAPER,          TEXICMD_A4PAPER,
         TEXICMD_ANCHOR,          TEXICMD_ANCHOR,
         TEXICMD_APPENDIX,          TEXICMD_APPENDIX,
Line 51  enum texicmd {
Line 52  enum texicmd {
         TEXICMD_CENTER,          TEXICMD_CENTER,
         TEXICMD_CHAPTER,          TEXICMD_CHAPTER,
         TEXICMD_CINDEX,          TEXICMD_CINDEX,
           TEXICMD_CIRCUMFLEX,
         TEXICMD_CITE,          TEXICMD_CITE,
         TEXICMD_CODE,          TEXICMD_CODE,
         TEXICMD_COLON,          TEXICMD_COLON,
Line 60  enum texicmd {
Line 62  enum texicmd {
         TEXICMD_CONTENTS,          TEXICMD_CONTENTS,
         TEXICMD_COPYING,          TEXICMD_COPYING,
         TEXICMD_COPYRIGHT,          TEXICMD_COPYRIGHT,
           TEXICMD_DEFFN,
           TEXICMD_DEFFNX,
           TEXICMD_DEFMAC,
           TEXICMD_DEFMACX,
           TEXICMD_DEFTP,
           TEXICMD_DEFTPX,
         TEXICMD_DEFTYPEFN,          TEXICMD_DEFTYPEFN,
         TEXICMD_DEFTYPEFNX,          TEXICMD_DEFTYPEFNX,
         TEXICMD_DEFTYPEFUN,          TEXICMD_DEFTYPEFUN,
         TEXICMD_DEFTYPEFUNX,          TEXICMD_DEFTYPEFUNX,
         TEXICMD_DEFTYPEVAR,          TEXICMD_DEFTYPEVAR,
           TEXICMD_DEFTYPEVARX,
         TEXICMD_DEFTYPEVR,          TEXICMD_DEFTYPEVR,
           TEXICMD_DEFTYPEVRX,
           TEXICMD_DEFUN,
           TEXICMD_DEFUNX,
           TEXICMD_DEFVAR,
           TEXICMD_DEFVARX,
           TEXICMD_DEFVR,
           TEXICMD_DEFVRX,
         TEXICMD_DETAILMENU,          TEXICMD_DETAILMENU,
         TEXICMD_DFN,          TEXICMD_DFN,
         TEXICMD_DIRCATEGORY,          TEXICMD_DIRCATEGORY,
Line 77  enum texicmd {
Line 93  enum texicmd {
         TEXICMD_END,          TEXICMD_END,
         TEXICMD_ENUMERATE,          TEXICMD_ENUMERATE,
         TEXICMD_ENV,          TEXICMD_ENV,
           TEXICMD_ERROR,
         TEXICMD_EXAMPLE,          TEXICMD_EXAMPLE,
         TEXICMD_FILE,          TEXICMD_FILE,
           TEXICMD_GRAVE,
         TEXICMD_GROUP,          TEXICMD_GROUP,
         TEXICMD_HEADING,          TEXICMD_HEADING,
         TEXICMD_HEADINGS,          TEXICMD_HEADINGS,
         TEXICMD_HYPHEN,          TEXICMD_HYPHEN,
         TEXICMD_I,          TEXICMD_I,
         TEXICMD_IFCLEAR,          TEXICMD_IFCLEAR,
           TEXICMD_IFDOCBOOK,
         TEXICMD_IFHTML,          TEXICMD_IFHTML,
         TEXICMD_IFINFO,          TEXICMD_IFINFO,
           TEXICMD_IFNOTDOCBOOK,
           TEXICMD_IFNOTHTML,
           TEXICMD_IFNOTINFO,
           TEXICMD_IFNOTPLAINTEXT,
         TEXICMD_IFNOTTEX,          TEXICMD_IFNOTTEX,
           TEXICMD_IFNOTXML,
           TEXICMD_IFPLAINTEXT,
         TEXICMD_IFTEX,          TEXICMD_IFTEX,
         TEXICMD_IFSET,          TEXICMD_IFSET,
           TEXICMD_IFXML,
         TEXICMD_IMAGE,          TEXICMD_IMAGE,
         TEXICMD_INCLUDE,          TEXICMD_INCLUDE,
         TEXICMD_INDENTBLOCK,          TEXICMD_INDENTBLOCK,
Line 100  enum texicmd {
Line 126  enum texicmd {
         TEXICMD_LATEX,          TEXICMD_LATEX,
         TEXICMD_MATH,          TEXICMD_MATH,
         TEXICMD_MENU,          TEXICMD_MENU,
           TEXICMD_NEED,
         TEXICMD_NEWLINE,          TEXICMD_NEWLINE,
         TEXICMD_NODE,          TEXICMD_NODE,
         TEXICMD_NOINDENT,          TEXICMD_NOINDENT,
           TEXICMD_OPTION,
         TEXICMD_PXREF,          TEXICMD_PXREF,
         TEXICMD_QUESTIONMARK,          TEXICMD_QUESTIONMARK,
         TEXICMD_QUOTATION,          TEXICMD_QUOTATION,
Line 111  enum texicmd {
Line 139  enum texicmd {
         TEXICMD_PRINTINDEX,          TEXICMD_PRINTINDEX,
         TEXICMD_R,          TEXICMD_R,
         TEXICMD_REF,          TEXICMD_REF,
           TEXICMD_RESULT,
         TEXICMD_SAMP,          TEXICMD_SAMP,
         TEXICMD_SANSSERIF,          TEXICMD_SANSSERIF,
         TEXICMD_SC,          TEXICMD_SC,
Line 135  enum texicmd {
Line 164  enum texicmd {
         TEXICMD_TABLE,          TEXICMD_TABLE,
         TEXICMD_TEX,          TEXICMD_TEX,
         TEXICMD_TEXSYM,          TEXICMD_TEXSYM,
           TEXICMD_TILDE,
         TEXICMD_TITLE,          TEXICMD_TITLE,
         TEXICMD_TITLEFONT,          TEXICMD_TITLEFONT,
         TEXICMD_TITLEPAGE,          TEXICMD_TITLEPAGE,
         TEXICMD_TOP,          TEXICMD_TOP,
           TEXICMD_UMLAUT,
         TEXICMD_UNNUMBERED,          TEXICMD_UNNUMBERED,
         TEXICMD_UNNUMBEREDSEC,          TEXICMD_UNNUMBEREDSEC,
         TEXICMD_UREF,          TEXICMD_UREF,
         TEXICMD_URL,          TEXICMD_URL,
         TEXICMD_VAR,          TEXICMD_VAR,
           TEXICMD_VERBATIMINCLUDE,
         TEXICMD_VSKIP,          TEXICMD_VSKIP,
         TEXICMD_W,          TEXICMD_W,
         TEXICMD_XREF,          TEXICMD_XREF,
Line 215  struct texi {
Line 247  struct texi {
 #define ismspace(_x) \  #define ismspace(_x) \
         (isws((_x)) || '\n' == (_x))          (isws((_x)) || '\n' == (_x))
   
   static  void doaccent(struct texi *, enum texicmd, const char *, size_t, size_t *);
 static  void doblock(struct texi *, enum texicmd, const char *, size_t, size_t *);  static  void doblock(struct texi *, enum texicmd, const char *, size_t, size_t *);
 static  void dobracket(struct texi *, enum texicmd, const char *, size_t, size_t *);  static  void dobracket(struct texi *, enum texicmd, const char *, size_t, size_t *);
 static  void dobye(struct texi *, enum texicmd, const char *, size_t, size_t *);  static  void dobye(struct texi *, enum texicmd, const char *, size_t, size_t *);
 static  void dodeftypefun(struct texi *, enum texicmd, const char *, size_t, size_t *);  static  void dodefn(struct texi *, enum texicmd, const char *, size_t, size_t *);
 static  void dodeftypevar(struct texi *, enum texicmd, const char *, size_t, size_t *);  
 static  void dodisplay(struct texi *, enum texicmd, const char *, size_t, size_t *);  static  void dodisplay(struct texi *, enum texicmd, const char *, size_t, size_t *);
 static  void doenumerate(struct texi *, enum texicmd, const char *, size_t, size_t *);  static  void doenumerate(struct texi *, enum texicmd, const char *, size_t, size_t *);
 static  void doexample(struct texi *, enum texicmd, const char *, size_t, size_t *);  static  void doexample(struct texi *, enum texicmd, const char *, size_t, size_t *);
Line 242  static void dosp(struct texi *, enum texicmd, const ch
Line 274  static void dosp(struct texi *, enum texicmd, const ch
 static  void dosubsection(struct texi *, enum texicmd, const char *, size_t, size_t *);  static  void dosubsection(struct texi *, enum texicmd, const char *, size_t, size_t *);
 static  void dosymbol(struct texi *, enum texicmd, const char *, size_t, size_t *);  static  void dosymbol(struct texi *, enum texicmd, const char *, size_t, size_t *);
 static  void dotitle(struct texi *, enum texicmd, const char *, size_t, size_t *);  static  void dotitle(struct texi *, enum texicmd, const char *, size_t, size_t *);
   static  void doverbinclude(struct texi *, enum texicmd, const char *, size_t, size_t *);
   
 static  const struct texitok texitoks[TEXICMD__MAX] = {  static  const struct texitok texitoks[TEXICMD__MAX] = {
         { doignargn, "acronym", 7 }, /* TEXICMD_ACRONYM */          { doignargn, "acronym", 7 }, /* TEXICMD_ACRONYM */
           { doaccent, "'", 1 }, /* TEXICMD_ACUTE */
         { doignline, "afourpaper", 10 }, /* TEXICMD_A4PAPER */          { doignline, "afourpaper", 10 }, /* TEXICMD_A4PAPER */
         { doignbracket, "anchor", 6 }, /* TEXICMD_ANCHOR */          { doignbracket, "anchor", 6 }, /* TEXICMD_ANCHOR */
         { dosection, "appendix", 8 }, /* TEXICMD_APPENDIX */          { dosection, "appendix", 8 }, /* TEXICMD_APPENDIX */
Line 259  static const struct texitok texitoks[TEXICMD__MAX] = {
Line 293  static const struct texitok texitoks[TEXICMD__MAX] = {
         { doignline, "center", 6 }, /* TEXICMD_CENTER */          { doignline, "center", 6 }, /* TEXICMD_CENTER */
         { dosection, "chapter", 7 }, /* TEXICMD_CHAPTER */          { dosection, "chapter", 7 }, /* TEXICMD_CHAPTER */
         { doignline, "cindex", 6 }, /* TEXICMD_CINDEX */          { doignline, "cindex", 6 }, /* TEXICMD_CINDEX */
           { doaccent, "^", 1 }, /* TEXICMD_CIRCUMFLEX */
         { dofont, "code", 4 }, /* TEXICMD_CODE */          { dofont, "code", 4 }, /* TEXICMD_CODE */
         { dofont, "cite", 4 }, /* TEXICMD_CITE */          { dofont, "cite", 4 }, /* TEXICMD_CITE */
         { dosymbol, ":", 1 }, /* TEXICMD_COLON */          { dosymbol, ":", 1 }, /* TEXICMD_COLON */
Line 268  static const struct texitok texitoks[TEXICMD__MAX] = {
Line 303  static const struct texitok texitoks[TEXICMD__MAX] = {
         { doignline, "contents", 8 }, /* TEXICMD_CONTENTS */          { doignline, "contents", 8 }, /* TEXICMD_CONTENTS */
         { doignblock, "copying", 7 }, /* TEXICMD_COPYING */          { doignblock, "copying", 7 }, /* TEXICMD_COPYING */
         { dosymbol, "copyright", 9 }, /* TEXICMD_COPYRIGHT */          { dosymbol, "copyright", 9 }, /* TEXICMD_COPYRIGHT */
         { dodeftypefun, "deftypefn", 9 }, /* TEXICMD_DEFTYPEFN */          { dodefn, "deffn", 5 }, /* TEXICMD_DEFFN */
         { dodeftypefun, "deftypefnx", 10 }, /* TEXICMD_DEFTYPEFNX */          { dodefn, "deffnx", 6 }, /* TEXICMD_DEFFNX */
         { dodeftypefun, "deftypefun", 10 }, /* TEXICMD_DEFTYPEFUN */          { dodefn, "defmac", 6 }, /* TEXICMD_DEFMAC */
         { dodeftypefun, "deftypefunx", 11 }, /* TEXICMD_DEFTYPEFUNX */          { dodefn, "defmacx", 7 }, /* TEXICMD_DEFMACX */
         { dodeftypevar, "deftypevar", 10 }, /* TEXICMD_DEFTYPEVAR */          { dodefn, "deftp", 5 }, /* TEXICMD_DEFTP */
         { dodeftypevar, "deftypevr", 9 }, /* TEXICMD_DEFTYPEVR */          { dodefn, "deftpx", 6 }, /* TEXICMD_DEFTPX */
           { dodefn, "deftypefn", 9 }, /* TEXICMD_DEFTYPEFN */
           { dodefn, "deftypefnx", 10 }, /* TEXICMD_DEFTYPEFNX */
           { dodefn, "deftypefun", 10 }, /* TEXICMD_DEFTYPEFUN */
           { dodefn, "deftypefunx", 11 }, /* TEXICMD_DEFTYPEFUNX */
           { dodefn, "deftypevar", 10 }, /* TEXICMD_DEFTYPEVAR */
           { dodefn, "deftypevarx", 11 }, /* TEXICMD_DEFTYPEVARX */
           { dodefn, "deftypevr", 9 }, /* TEXICMD_DEFTYPEVR */
           { dodefn, "deftypevrx", 10 }, /* TEXICMD_DEFTYPEVRX */
           { dodefn, "defun", 5 }, /* TEXICMD_DEFUN */
           { dodefn, "defunx", 6 }, /* TEXICMD_DEFUNX */
           { dodefn, "defvar", 6 }, /* TEXICMD_DEFVAR */
           { dodefn, "defvarx", 7 }, /* TEXICMD_DEFVARX */
           { dodefn, "defvr", 5 }, /* TEXICMD_DEFVR */
           { dodefn, "defvrx", 6 }, /* TEXICMD_DEFVRX */
         { doignblock, "detailmenu", 10 }, /* TEXICMD_DETAILMENU */          { doignblock, "detailmenu", 10 }, /* TEXICMD_DETAILMENU */
         { dofont, "dfn", 3 }, /* TEXICMD_DFN */          { dofont, "dfn", 3 }, /* TEXICMD_DFN */
         { doignline, "dircategory", 11 }, /* TEXICMD_DIRCATEGORY */          { doignline, "dircategory", 11 }, /* TEXICMD_DIRCATEGORY */
Line 285  static const struct texitok texitoks[TEXICMD__MAX] = {
Line 334  static const struct texitok texitoks[TEXICMD__MAX] = {
         { NULL, "end", 3 }, /* TEXICMD_END */          { NULL, "end", 3 }, /* TEXICMD_END */
         { doenumerate, "enumerate", 9 }, /* TEXICMD_ENUMERATE */          { doenumerate, "enumerate", 9 }, /* TEXICMD_ENUMERATE */
         { doinline, "env", 3 }, /* TEXICMD_ENV */          { doinline, "env", 3 }, /* TEXICMD_ENV */
           { dosymbol, "error", 5 }, /* TEXICMD_ERROR */
         { doexample, "example", 7 }, /* TEXICMD_EXAMPLE */          { doexample, "example", 7 }, /* TEXICMD_EXAMPLE */
         { doinline, "file", 4 }, /* TEXICMD_FILE */          { doinline, "file", 4 }, /* TEXICMD_FILE */
           { doaccent, "`", 1 }, /* TEXICMD_GRAVE */
         { doblock, "group", 5 }, /* TEXICMD_GROUP */          { doblock, "group", 5 }, /* TEXICMD_GROUP */
         { dosection, "heading", 7 }, /* TEXICMD_HEADING */          { dosection, "heading", 7 }, /* TEXICMD_HEADING */
         { doignline, "headings", 8 }, /* TEXICMD_HEADINGS */          { doignline, "headings", 8 }, /* TEXICMD_HEADINGS */
         { dosymbol, "-", 1 }, /* TEXICMD_HYPHEN */          { dosymbol, "-", 1 }, /* TEXICMD_HYPHEN */
         { dofont, "i", 1 }, /* TEXICMD_I */          { dofont, "i", 1 }, /* TEXICMD_I */
         { doignblock, "ifclear", 7 }, /* TEXICMD_IFCLEAR */          { doignblock, "ifclear", 7 }, /* TEXICMD_IFCLEAR */
           { doignblock, "ifdocbook", 9 }, /* TEXICMD_IFDOCBOOK */
         { doignblock, "ifhtml", 6 }, /* TEXICMD_IFHTML */          { doignblock, "ifhtml", 6 }, /* TEXICMD_IFHTML */
         { doignblock, "ifinfo", 6 }, /* TEXICMD_IFINFO */          { doignblock, "ifinfo", 6 }, /* TEXICMD_IFINFO */
           { doblock, "ifnotdocbook", 12 }, /* TEXICMD_IFNOTDOCBOOK */
           { doblock, "ifnothtml", 9 }, /* TEXICMD_IFNOTHTML */
           { doblock, "ifnotinfo", 9 }, /* TEXICMD_IFNOTINFO */
           { doignblock, "ifnotplaintext", 14 }, /* TEXICMD_IFNOTPLAINTEXT */
         { doblock, "ifnottex", 8 }, /* TEXICMD_IFNOTTEX */          { doblock, "ifnottex", 8 }, /* TEXICMD_IFNOTTEX */
           { doblock, "ifnotxml", 8 }, /* TEXICMD_IFNOTXML */
           { doblock, "ifplaintext", 11 }, /* TEXICMD_IFPLAINTEXT */
         { doignblock, "iftex", 5 }, /* TEXICMD_IFTEX */          { doignblock, "iftex", 5 }, /* TEXICMD_IFTEX */
         { doignblock, "ifset", 5 }, /* TEXICMD_IFSET */          { doignblock, "ifset", 5 }, /* TEXICMD_IFSET */
           { doignblock, "ifxml", 5 }, /* TEXICMD_IFXML */
         { doignbracket, "image", 5 }, /* TEXICMD_IMAGE */          { doignbracket, "image", 5 }, /* TEXICMD_IMAGE */
         { doinclude, "include", 7 }, /* TEXICMD_INCLUDE */          { doinclude, "include", 7 }, /* TEXICMD_INCLUDE */
         { dodisplay, "indentblock", 11 }, /* TEXICMD_INDENTBLOCK */          { dodisplay, "indentblock", 11 }, /* TEXICMD_INDENTBLOCK */
Line 308  static const struct texitok texitoks[TEXICMD__MAX] = {
Line 367  static const struct texitok texitoks[TEXICMD__MAX] = {
         { dosymbol, "LaTeX", 5 }, /* TEXICMD_LATEX */          { dosymbol, "LaTeX", 5 }, /* TEXICMD_LATEX */
         { domath, "math", 4 }, /* TEXICMD_MATH */          { domath, "math", 4 }, /* TEXICMD_MATH */
         { doignblock, "menu", 4 }, /* TEXICMD_MENU */          { doignblock, "menu", 4 }, /* TEXICMD_MENU */
           { doignline, "need", 4 }, /* TEXICMD_NEED */
         { dosymbol, "\n", 1 }, /* TEXICMD_NEWLINE */          { dosymbol, "\n", 1 }, /* TEXICMD_NEWLINE */
         { doignline, "node", 4 }, /* TEXICMD_NODE */          { doignline, "node", 4 }, /* TEXICMD_NODE */
         { doignline, "noindent", 8 }, /* TEXICMD_NOINDENT */          { doignline, "noindent", 8 }, /* TEXICMD_NOINDENT */
           { doinline, "option", 6 }, /* TEXICMD_OPTION */
         { dolink, "pxref", 5 }, /* TEXICMD_PXREF */          { dolink, "pxref", 5 }, /* TEXICMD_PXREF */
         { dosymbol, "?", 1 }, /* TEXICMD_QUESTIONMARK */          { dosymbol, "?", 1 }, /* TEXICMD_QUESTIONMARK */
         { doquotation, "quotation", 9 }, /* TEXICMD_QUOTATION */          { doquotation, "quotation", 9 }, /* TEXICMD_QUOTATION */
Line 319  static const struct texitok texitoks[TEXICMD__MAX] = {
Line 380  static const struct texitok texitoks[TEXICMD__MAX] = {
         { doignline, "printindex", 10 }, /* TEXICMD_PRINTINDEX */          { doignline, "printindex", 10 }, /* TEXICMD_PRINTINDEX */
         { dofont, "r", 1 }, /* TEXICMD_R */          { dofont, "r", 1 }, /* TEXICMD_R */
         { dobracket, "ref", 3 }, /* TEXICMD_REF */          { dobracket, "ref", 3 }, /* TEXICMD_REF */
           { dosymbol, "result", 6 }, /* TEXICMD_RESULT */
         { dofont, "samp", 4 }, /* TEXICMD_SAMP */          { dofont, "samp", 4 }, /* TEXICMD_SAMP */
         { dofont, "sansserif", 9 }, /* TEXICMD_SANSSERIF */          { dofont, "sansserif", 9 }, /* TEXICMD_SANSSERIF */
         { dobracket, "sc", 2 }, /* TEXICMD_SC */          { dobracket, "sc", 2 }, /* TEXICMD_SC */
Line 343  static const struct texitok texitoks[TEXICMD__MAX] = {
Line 405  static const struct texitok texitoks[TEXICMD__MAX] = {
         { dotable, "table", 5 }, /* TEXICMD_TABLE */          { dotable, "table", 5 }, /* TEXICMD_TABLE */
         { doignblock, "tex", 3 }, /* TEXICMD_TEX */          { doignblock, "tex", 3 }, /* TEXICMD_TEX */
         { dosymbol, "TeX", 3 }, /* TEXICMD_TEXSYM */          { dosymbol, "TeX", 3 }, /* TEXICMD_TEXSYM */
           { doaccent, "~", 1 }, /* TEXICMD_TILDE */
         { doignline, "title", 5 }, /* TEXICMD_TITLE */          { doignline, "title", 5 }, /* TEXICMD_TITLE */
         { dobracket, "titlefont", 9 }, /* TEXICMD_TITLEFONT */          { dobracket, "titlefont", 9 }, /* TEXICMD_TITLEFONT */
         { doignblock, "titlepage", 9 }, /* TEXICMD_TITLEPAGE */          { doignblock, "titlepage", 9 }, /* TEXICMD_TITLEPAGE */
         { dotop, "top", 3 }, /* TEXICMD_TOP */          { dotop, "top", 3 }, /* TEXICMD_TOP */
           { doaccent, "\"", 1 }, /* TEXICMD_UMLAUT */
         { dosection, "unnumbered", 10 }, /* TEXICMD_UNNUMBERED */          { dosection, "unnumbered", 10 }, /* TEXICMD_UNNUMBERED */
         { dosection, "unnumberedsec", 13 }, /* TEXICMD_UNNUMBEREDSEC */          { dosection, "unnumberedsec", 13 }, /* TEXICMD_UNNUMBEREDSEC */
         { dolink, "uref", 4 }, /* TEXICMD_UREF */          { dolink, "uref", 4 }, /* TEXICMD_UREF */
         { dolink, "url", 3 }, /* TEXICMD_URL */          { dolink, "url", 3 }, /* TEXICMD_URL */
         { doinline, "var", 3 }, /* TEXICMD_VAR */          { doinline, "var", 3 }, /* TEXICMD_VAR */
           { doverbinclude, "verbatiminclude", 15 }, /* TEXICMD_VERBATIMINCLUDE */
         { dosp, "vskip", 5 }, /* TEXICMD_VSKIP */          { dosp, "vskip", 5 }, /* TEXICMD_VSKIP */
         { dobracket, "w", 1 }, /* TEXICMD_W */          { dobracket, "w", 1 }, /* TEXICMD_W */
         { dolink, "xref", 4 }, /* TEXICMD_XREF */          { dolink, "xref", 4 }, /* TEXICMD_XREF */
Line 925  parsesingle(struct texi *p, const char *buf, size_t sz
Line 990  parsesingle(struct texi *p, const char *buf, size_t sz
                 (*texitoks[cmd].fp)(p, cmd, buf, sz, pos);                  (*texitoks[cmd].fp)(p, cmd, buf, sz, pos);
 }  }
   
   static int
   parselinearg(struct texi *p, const char *buf, size_t sz, size_t *pos)
   {
   
           while (*pos < sz && isws(buf[*pos])) {
                   p->seenws = 1;
                   advance(p, buf, pos);
           }
   
           if (*pos < sz && '{' == buf[*pos])
                   parsebracket(p, buf, sz, pos);
           else if ('\n' != buf[*pos])
                   parsesingle(p, buf, sz, pos);
           else
                   return(0);
   
           return(1);
   }
   
 /*  /*
  * Parse til the end of the buffer.   * Parse til the end of the buffer.
  */   */
Line 1001  parseto(struct texi *p, const char *buf, 
Line 1085  parseto(struct texi *p, const char *buf, 
  * This can be called in a nested context.   * This can be called in a nested context.
  */   */
 static void  static void
 parsefile(struct texi *p, const char *fname)  parsefile(struct texi *p, const char *fname, int parse)
 {  {
         struct texifile  *f;          struct texifile *f;
         int               fd;          int              fd;
         struct stat       st;          struct stat      st;
           size_t           i;
   
         assert(p->filepos < 64);          assert(p->filepos < 64);
         f = &p->files[p->filepos];          f = &p->files[p->filepos];
Line 1028  parsefile(struct texi *p, const char *fname)
Line 1113  parsefile(struct texi *p, const char *fname)
                 texiabort(p, fname);                  texiabort(p, fname);
   
         p->filepos++;          p->filepos++;
         parseeof(p, f->map, f->mapsz);          if ( ! parse) {
                   /*
                    * We're printing verbatim output.
                    * Make sure it doesn't get interpreted as mdoc by
                    * escaping escapes and making sure leading dots don't
                    * trigger mdoc(7) expansion.
                    */
                   for (i = 0; i < f->mapsz; i++) {
                           if (i > 0 && '.' == f->map[i])
                                   if ('\n' == f->map[i - 1])
                                           fputs("\\&", stdout);
                           putchar(f->map[i]);
                           if ('\\' == f->map[i])
                                   putchar('e');
                   }
           } else
                   parseeof(p, f->map, f->mapsz);
         texifilepop(p);          texifilepop(p);
 }  }
   
 static void  static void
 dodeftypevar(struct texi *p, enum texicmd cmd,  dodefn(struct texi *p, enum texicmd cmd,
         const char *buf, size_t sz, size_t *pos)          const char *buf, size_t sz, size_t *pos)
 {  {
         const char      *blk;          const char      *blk;
   
         blk = TEXICMD_DEFTYPEVR == cmd ?  
                 "deftypevr" : "deftypevar";  
   
         if (p->ign) {  
                 parseto(p, buf, sz, pos, blk);  
                 return;  
         }  
   
         texivspace(p);  
         if (TEXICMD_DEFTYPEVR == cmd) {  
                 parsebracket(p, buf, sz, pos);  
                 texiputchars(p, ":\n");  
         }  
         teximacroopen(p, "Vt");  
         parseeoln(p, buf, sz, pos);  
         teximacroclose(p);  
         texivspace(p);  
         parseto(p, buf, sz, pos, blk);  
 }  
   
 static void  
 dodeftypefun(struct texi *p, enum texicmd cmd,  
         const char *buf, size_t sz, size_t *pos)  
 {  
         const char      *blk;  
   
         blk = NULL;          blk = NULL;
         switch (cmd) {          switch (cmd) {
           case (TEXICMD_DEFFN):
           case (TEXICMD_DEFTP):
         case (TEXICMD_DEFTYPEFN):          case (TEXICMD_DEFTYPEFN):
         case (TEXICMD_DEFTYPEFUN):          case (TEXICMD_DEFTYPEFUN):
           case (TEXICMD_DEFTYPEVAR):
           case (TEXICMD_DEFTYPEVR):
           case (TEXICMD_DEFUN):
           case (TEXICMD_DEFVAR):
           case (TEXICMD_DEFVR):
                 blk = texitoks[cmd].tok;                  blk = texitoks[cmd].tok;
                 break;                  break;
         default:          default:
Line 1075  dodeftypefun(struct texi *p, enum texicmd cmd, 
Line 1157  dodeftypefun(struct texi *p, enum texicmd cmd, 
         }          }
   
         if (p->ign) {          if (p->ign) {
                 if (NULL != blk)                  NULL != blk ?
                         parseto(p, buf, sz, pos, blk);                          parseto(p, buf, sz, pos, blk) :
                           parseeoln(p, buf, sz, pos);
                 return;                  return;
         }          }
   
           if (NULL != blk)
                   texivspace(p);
   
         switch (cmd) {          switch (cmd) {
         case (TEXICMD_DEFTYPEFN):          case (TEXICMD_DEFMAC):
           case (TEXICMD_DEFMACX):
                   texiputchars(p, "Macro");
                   break;
           case (TEXICMD_DEFTYPEVAR):
           case (TEXICMD_DEFTYPEVARX):
           case (TEXICMD_DEFVAR):
           case (TEXICMD_DEFVARX):
                   texiputchars(p, "Variable");
                   break;
         case (TEXICMD_DEFTYPEFUN):          case (TEXICMD_DEFTYPEFUN):
                 texivspace(p);          case (TEXICMD_DEFTYPEFUNX):
           case (TEXICMD_DEFUN):
           case (TEXICMD_DEFUNX):
                   texiputchars(p, "Function");
                 break;                  break;
         default:          default:
                   parselinearg(p, buf, sz, pos);
                 break;                  break;
         }          }
         if (TEXICMD_DEFTYPEFN == cmd ||  
                         TEXICMD_DEFTYPEFNX == cmd) {          texiputchars(p, ":\n");
                 parsebracket(p, buf, sz, pos);  
                 texiputchars(p, ":\n");          switch (cmd) {
           case (TEXICMD_DEFMAC):
           case (TEXICMD_DEFMACX):
                   teximacroopen(p, "Dv");
                   while (parselinearg(p, buf, sz, pos))
                           /* Spin. */ ;
                   teximacroclose(p);
                   break;
           case (TEXICMD_DEFFN):
           case (TEXICMD_DEFFNX):
           case (TEXICMD_DEFUN):
           case (TEXICMD_DEFUNX):
                   teximacroopen(p, "Fo");
                   parselinearg(p, buf, sz, pos);
                   teximacroclose(p);
                   teximacroopen(p, "Fa");
                   while (parselinearg(p, buf, sz, pos))
                           /* Spin. */ ;
                   teximacroclose(p);
                   teximacro(p, "Fc");
                   break;
           case (TEXICMD_DEFTYPEFUN):
           case (TEXICMD_DEFTYPEFUNX):
           case (TEXICMD_DEFTYPEFN):
           case (TEXICMD_DEFTYPEFNX):
                   teximacroopen(p, "Ft");
                   parselinearg(p, buf, sz, pos);
                   teximacroclose(p);
                   teximacroopen(p, "Fo");
                   parselinearg(p, buf, sz, pos);
                   teximacroclose(p);
                   teximacroopen(p, "Fa");
                   while (parselinearg(p, buf, sz, pos))
                           /* Spin. */ ;
                   teximacroclose(p);
                   teximacro(p, "Fc");
                   break;
           case (TEXICMD_DEFTP):
           case (TEXICMD_DEFTPX):
           case (TEXICMD_DEFTYPEVAR):
           case (TEXICMD_DEFTYPEVARX):
           case (TEXICMD_DEFTYPEVR):
           case (TEXICMD_DEFTYPEVRX):
                   teximacroopen(p, "Vt");
                   while (parselinearg(p, buf, sz, pos))
                           /* Spin. */ ;
                   teximacroclose(p);
                   break;
           case (TEXICMD_DEFVAR):
           case (TEXICMD_DEFVARX):
           case (TEXICMD_DEFVR):
           case (TEXICMD_DEFVRX):
                   teximacroopen(p, "Va");
                   while (parselinearg(p, buf, sz, pos))
                           /* Spin. */ ;
                   teximacroclose(p);
                   break;
           default:
                   abort();
         }          }
         teximacroopen(p, "Ft");  
         parsesingle(p, buf, sz, pos);  
         teximacroclose(p);  
         teximacroopen(p, "Fn");  
         parsesingle(p, buf, sz, pos);  
         teximacroclose(p);  
         teximacroopen(p, "Li");  
         parseeoln(p, buf, sz, pos);  
         teximacroclose(p);  
         texivspace(p);          texivspace(p);
         if (NULL != blk)          if (NULL != blk)
                 parseto(p, buf, sz, pos, blk);                  parseto(p, buf, sz, pos, blk);
Line 1141  doinline(struct texi *p, enum texicmd cmd,
Line 1290  doinline(struct texi *p, enum texicmd cmd,
         case (TEXICMD_FILE):          case (TEXICMD_FILE):
                 macro = "Pa";                  macro = "Pa";
                 break;                  break;
           case (TEXICMD_OPTION):
                   macro = "Op";
                   break;
         case (TEXICMD_VAR):          case (TEXICMD_VAR):
                 macro = "Va";                  macro = "Va";
                 break;                  break;
Line 1161  doinline(struct texi *p, enum texicmd cmd,
Line 1313  doinline(struct texi *p, enum texicmd cmd,
 }  }
   
 static void  static void
   doverbinclude(struct texi *p, enum texicmd cmd,
           const char *buf, size_t sz, size_t *pos)
   {
           char     fname[PATH_MAX], path[PATH_MAX];
           int      rc;
           size_t   i;
   
           while (*pos < sz && ' ' == buf[*pos])
                   advance(p, buf, pos);
   
           /* Read in the filename. */
           for (i = 0; *pos < sz && '\n' != buf[*pos]; i++) {
                   if (i == sizeof(fname) - 1)
                           break;
                   fname[i] = buf[*pos];
                   advance(p, buf, pos);
           }
   
           if (i == 0)
                   texierr(p, "path too short");
           else if ('\n' != buf[*pos])
                   texierr(p, "path too long");
           else if ('/' == fname[0])
                   texierr(p, "no absolute paths");
           fname[i] = '\0';
   
           if (strstr(fname, "../") || strstr(fname, "/.."))
                   texierr(p, "insecure path");
   
           rc = snprintf(path, sizeof(path),
                   "%s/%s", p->dirs[0], fname);
           if (rc < 0)
                   texierr(p, "couldn't format path");
           else if ((size_t)rc >= sizeof(path))
                   texierr(p, "path too long");
   
           parsefile(p, path, 0);
   }
   
   static void
 doinclude(struct texi *p, enum texicmd cmd,  doinclude(struct texi *p, enum texicmd cmd,
         const char *buf, size_t sz, size_t *pos)          const char *buf, size_t sz, size_t *pos)
 {  {
Line 1200  doinclude(struct texi *p, enum texicmd cmd, 
Line 1392  doinclude(struct texi *p, enum texicmd cmd, 
                 else if (-1 == access(path, R_OK))                  else if (-1 == access(path, R_OK))
                         continue;                          continue;
   
                 parsefile(p, path);                  parsefile(p, path, 1);
                 return;                  return;
         }          }
   
Line 1304  dotitle(struct texi *p, enum texicmd cmd, 
Line 1496  dotitle(struct texi *p, enum texicmd cmd, 
 }  }
   
 static void  static void
   doaccent(struct texi *p, enum texicmd cmd,
           const char *buf, size_t sz, size_t *pos)
   {
   
           if (*pos == sz)
                   return;
           advance(p, buf, pos);
           switch (cmd) {
           case (TEXICMD_ACUTE):
                   switch (buf[*pos]) {
                   case ('a'): case ('A'):
                   case ('e'): case ('E'):
                   case ('i'): case ('I'):
                   case ('o'): case ('O'):
                   case ('u'): case ('U'):
                           texiputchars(p, "\\(\'");
                           texiputchar(p, buf[*pos]);
                           break;
                   default:
                           texiputchar(p, buf[*pos]);
                   }
                   break;
           case (TEXICMD_CIRCUMFLEX):
                   switch (buf[*pos]) {
                   case ('a'): case ('A'):
                   case ('e'): case ('E'):
                   case ('i'): case ('I'):
                   case ('o'): case ('O'):
                   case ('u'): case ('U'):
                           texiputchars(p, "\\(^");
                           texiputchar(p, buf[*pos]);
                           break;
                   default:
                           texiputchar(p, buf[*pos]);
                   }
                   break;
           case (TEXICMD_GRAVE):
                   switch (buf[*pos]) {
                   case ('a'): case ('A'):
                   case ('e'): case ('E'):
                   case ('i'): case ('I'):
                   case ('o'): case ('O'):
                   case ('u'): case ('U'):
                           texiputchars(p, "\\(`");
                           texiputchar(p, buf[*pos]);
                           break;
                   default:
                           texiputchar(p, buf[*pos]);
                   }
                   break;
           case (TEXICMD_TILDE):
                   switch (buf[*pos]) {
                   case ('a'): case ('A'):
                   case ('n'): case ('N'):
                   case ('o'): case ('O'):
                           texiputchars(p, "\\(~");
                           texiputchar(p, buf[*pos]);
                           break;
                   default:
                           texiputchar(p, buf[*pos]);
                   }
                   break;
           case (TEXICMD_UMLAUT):
                   switch (buf[*pos]) {
                   case ('a'): case ('A'):
                   case ('e'): case ('E'):
                   case ('i'): case ('I'):
                   case ('o'): case ('O'):
                   case ('u'): case ('U'):
                   case ('y'):
                           texiputchars(p, "\\(:");
                           texiputchar(p, buf[*pos]);
                           break;
                   default:
                           texiputchar(p, buf[*pos]);
                   }
                   break;
           default:
                   abort();
           }
   }
   
   static void
 dosymbol(struct texi *p, enum texicmd cmd,  dosymbol(struct texi *p, enum texicmd cmd,
         const char *buf, size_t sz, size_t *pos)          const char *buf, size_t sz, size_t *pos)
 {  {
Line 1335  dosymbol(struct texi *p, enum texicmd cmd, 
Line 1610  dosymbol(struct texi *p, enum texicmd cmd, 
         case (TEXICMD_DOTS):          case (TEXICMD_DOTS):
                 texiputchars(p, "...");                  texiputchars(p, "...");
                 break;                  break;
           case (TEXICMD_ERROR):
                   texiputchars(p, "error\\(->");
                   break;
         case (TEXICMD_LATEX):          case (TEXICMD_LATEX):
                 texiputchars(p, "LaTeX");                  texiputchars(p, "LaTeX");
                 break;                  break;
         case (TEXICMD_QUESTIONMARK):          case (TEXICMD_QUESTIONMARK):
                 texiputchar(p, '?');                  texiputchar(p, '?');
                 break;                  break;
           case (TEXICMD_RESULT):
                   texiputchars(p, "\\(rA");
                   break;
         case (TEXICMD_SQUIGGLE_LEFT):          case (TEXICMD_SQUIGGLE_LEFT):
                 texiputchars(p, "{");                  texiputchars(p, "{");
                 break;                  break;
Line 1747  main(int argc, char *argv[])
Line 2028  main(int argc, char *argv[])
   
         texi.ign = 1;          texi.ign = 1;
         texi.dirs = parsedirs(dir, Idir, &texi.dirsz);          texi.dirs = parsedirs(dir, Idir, &texi.dirsz);
         parsefile(&texi, argv[0]);          parsefile(&texi, argv[0], 1);
         /* We shouldn't get here. */          /* We shouldn't get here. */
         texiexit(&texi);          texiexit(&texi);
         return(EXIT_FAILURE);          return(EXIT_FAILURE);
Legend:
Removed from v.1.13  
changed lines
  Added in v.1.16
CVSweb