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

Diff for /pod2mdoc/pod2mdoc.c between version 1.35 and 1.39

version 1.35, 2014/10/22 23:10:05 version 1.39, 2015/02/13 15:35:15
Line 1 
Line 1 
 /*      $Id$ */  /*      $Id$    */
 /*  /*
  * Copyright (c) 2014 Kristaps Dzonsons <kristaps@bsd.lv>   * Copyright (c) 2014 Kristaps Dzonsons <kristaps@bsd.lv>
    * Copyright (c) 2014, 2015 Ingo Schwarze <schwarze@openbsd.org>
  *   *
  * Permission to use, copy, modify, and distribute this software for any   * Permission to use, copy, modify, and distribute this software for any
  * purpose with or without fee is hereby granted, provided that the above   * purpose with or without fee is hereby granted, provided that the above
Line 26 
Line 27 
 #include <string.h>  #include <string.h>
 #include <unistd.h>  #include <unistd.h>
   
   #include "dict.h"
   
 /*  /*
  * In what section can we find Perl module manuals?   * In what section can we find Perl module manuals?
  * Sometimes (Mac OS X) it's 3pm, sometimes (OpenBSD, etc.) 3p.   * Sometimes (Mac OS X) it's 3pm, sometimes (OpenBSD, etc.) 3p.
Line 476  formatcode(struct state *st, const char *buf, size_t *
Line 479  formatcode(struct state *st, const char *buf, size_t *
 {  {
         enum fmt         fmt;          enum fmt         fmt;
         size_t           i, j, dsz;          size_t           i, j, dsz;
           unsigned char    uc;
   
         assert(*start + 1 < end);          assert(*start + 1 < end);
         assert('<' == buf[*start + 1]);          assert('<' == buf[*start + 1]);
Line 609  formatcode(struct state *st, const char *buf, size_t *
Line 613  formatcode(struct state *st, const char *buf, size_t *
                                 else                                  else
                                         printf("Ar ");                                          printf("Ar ");
                                 break;                                  break;
                         }                          }
                         if (0 == strncmp(buf + *start, "NULL", 4) &&                          i = 0;
                             ('=' == buf[*start + 4] ||                          uc = buf[*start];
                              '>' == buf[*start + 4]))                          while (isalnum(uc) || '_' == uc || ' ' == uc)
                                   uc = buf[*start + ++i];
                           if ('=' != uc && '>' != uc)
                                   i = 0;
                           if (4 == i && ! strncmp(buf + *start, "NULL", 4)) {
                                 printf("Dv ");                                  printf("Dv ");
                         else                                  break;
                           }
                           switch (i ? dict_get(buf + *start, i) : MDOC_MAX) {
                           case MDOC_Fa:
                                   printf("Fa ");
                                   break;
                           case MDOC_Vt:
                                   printf("Vt ");
                                   break;
                           default:
                                 printf("Sy ");                                  printf("Sy ");
                                   break;
                           }
                         break;                          break;
                 case (FMT_CODE):                  case (FMT_CODE):
                         printf("Qo Li ");                          printf("Qo Li ");
Line 1003  command(struct state *st, const char *buf, size_t star
Line 1022  command(struct state *st, const char *buf, size_t star
 }  }
   
 /*  /*
    * Put the type provided as an argument into the dictionary.
    */
   static void
   register_type(const char *ptype)
   {
           const char      *pname, *pend;
   
           pname = ptype;
           while (isalnum((unsigned char)*pname) || '_' == *pname)
                   pname++;
           if ((pname - ptype == 6 && ! strncmp(ptype, "struct", 6)) ||
               (pname - ptype == 4 && ! strncmp(ptype, "enum", 4))) {
                   while (' ' == *pname)
                           pname++;
                   pend = pname;
                   while (isalnum((unsigned char)*pend) || '_' == *pend)
                           pend++;
                   if (pend > pname)
                           dict_put(pname, pend - pname, MDOC_Vt);
           } else
                   pend = pname;
           if (pend > ptype)
                   dict_put(ptype, pend - ptype, MDOC_Vt);
   }
   
   /*
  * Just pump out the line in a verbatim block.   * Just pump out the line in a verbatim block.
  * From the perspective of external callers,   * From the perspective of external callers,
  * always stays in OUST_NL/wantws mode.   * always stays in OUST_NL/wantws mode.
Line 1010  command(struct state *st, const char *buf, size_t star
Line 1055  command(struct state *st, const char *buf, size_t star
 static void  static void
 verbatim(struct state *st, char *buf, size_t start, size_t end)  verbatim(struct state *st, char *buf, size_t start, size_t end)
 {  {
         size_t           i, ift, ifo, ifa, ifc;          size_t           i, ift, ifo, ifa, ifc, inl;
         char            *cp;          char            *cp, *cp2;
           int              nopen;
   
         if ( ! st->parsing || st->paused || start == end)          if ( ! st->parsing || st->paused || start == end)
                 return;                  return;
Line 1052  again:
Line 1098  again:
   
                 /* Parse function declaration. */                  /* Parse function declaration. */
                 ifo = ifa = ifc = 0;                  ifo = ifa = ifc = 0;
                 for (ift = i; i < end && buf[i] != '\n'; i++) {                  inl = end;
                         if (ifa) {                  nopen = 0;
                                 if (buf[i] == ')')                  for (ift = i; i < end; i++) {
                           if (ifc) {
                                   if (buf[i] != '\n')
                                           continue;
                                   inl = i;
                                   break;
                           }
                           switch (buf[i]) {
                           case ' ':
                                   if ( ! ifa)
                                           ifo = i;
                                   break;
                           case '(':
                                   if (ifo) {
                                           nopen++;
                                           if ( ! ifa)
                                                   ifa = i;
                                   } else
                                           i = end;
                                   break;
                           case ')':
                                   switch (nopen) {
                                   case 0:
                                           i = end;
                                           break;
                                   case 1:
                                         ifc = i;                                          ifc = i;
                         } else if (ifo && buf[i] == '(')                                          break;
                                 ifa = i;                                  default:
                         else if (buf[i] == ' ')                                          nopen--;
                                 ifo = i;                                          break;
                                   }
                                   break;
                           default:
                                   break;
                           }
                 }                  }
   
                 /* Encode function declaration. */                  /* Encode function declaration. */
                 if (ifc) {                  if (ifc) {
                           for (i = ifa; i < ifc; i++)
                                   if (buf[i] == '\n')
                                           buf[i] = ' ';
                         buf[ifo++] = '\0';                          buf[ifo++] = '\0';
                           register_type(buf + ift);
                         printf(".Ft %s", buf + ift);                          printf(".Ft %s", buf + ift);
                         if (buf[ifo] == '*') {                          if (buf[ifo] == '*') {
                                 fputs(" *", stdout);                                  fputs(" *", stdout);
Line 1073  again:
Line 1153  again:
                         putchar('\n');                          putchar('\n');
                         buf[ifa++] = '\0';                          buf[ifa++] = '\0';
                         printf(".Fo %s\n", buf + ifo);                          printf(".Fo %s\n", buf + ifo);
                           dict_put(buf + ifo, 0, MDOC_Fo);
                         buf[ifc++] = '\0';                          buf[ifc++] = '\0';
                         for (;;) {                          for (;;) {
                                 cp = strchr(buf + ifa, ',');                                  cp = strchr(buf + ifa, ',');
                                 if (cp != NULL)                                  if (cp != NULL) {
                                         *cp = '\0';                                          cp2 = cp;
                                           *cp++ = '\0';
                                   } else
                                           cp2 = strchr(buf + ifa, '\0');
                                   while (isalnum((unsigned char)cp2[-1]) ||
                                       '_' == cp2[-1])
                                           cp2--;
                                   if ('\0' != *cp2)
                                           dict_put(cp2, 0, MDOC_Fa);
                                   register_type(buf + ifa);
                                 printf(".Fa \"%s\"\n", buf + ifa);                                  printf(".Fa \"%s\"\n", buf + ifa);
                                 if (cp == NULL)                                  if (cp == NULL)
                                         break;                                          break;
                                 ifa = cp - buf + 1;                                  while (*cp == ' ')
                                           cp++;
                                   ifa = cp - buf;
                         }                          }
                         puts(".Fc");                          puts(".Fc");
                         if (buf[ifc] == ';')                          if (buf[ifc] == ';')
                                 ifc++;                                  ifc++;
                         if (ifc < i) {                          if (ifc < inl) {
                                 buf[i] = '\0';                                  buf[inl] = '\0';
                                 puts(buf + ifc);                                  puts(buf + ifc);
                         }                          }
                         start = i + 1;                          start = inl + 1;
                         if (start < end)                          if (start < end)
                                 goto again;                                  goto again;
                         return;                          return;
Line 1297  ordinary(struct state *st, const char *buf, size_t sta
Line 1389  ordinary(struct state *st, const char *buf, size_t sta
                          */                           */
   
                         last = buf[start++];                          last = buf[start++];
                         if (' ' == last) {                          if (' ' != last) {
                                 outbuf_flush(st);  
                                 putchar(' ');  
                                 st->wantws = 1;  
                         } else  
                                 outbuf_addchar(st);                                  outbuf_addchar(st);
                                   continue;
                           }
   
                           if ( ! strcmp(st->outbuf + st->outbuflen - 2, "()") &&
                               dict_get(st->outbuf, st->outbuflen - 2) ==
                               MDOC_Fo) {
                                   st->outbuflen -= 2;
                                   st->outbuf[st->outbuflen] = '\0';
                                   mdoc_newln(st);
                                   fputs(".Fn ", stdout);
                                   outbuf_flush(st);
                                   mdoc_newln(st);
                                   continue;
                           }
   
                           outbuf_flush(st);
                           putchar(' ');
                           st->wantws = 1;
                 }                  }
   
                 if (start < end - 1 && '<' == buf[start + 1] &&                  if (start < end - 1 && '<' == buf[start + 1] &&
Line 1468  dofile(const struct args *args, const char *fname, 
Line 1574  dofile(const struct args *args, const char *fname, 
   
         free(title);          free(title);
   
           dict_init();
         memset(&st, 0, sizeof(struct state));          memset(&st, 0, sizeof(struct state));
         st.oust = OUST_NL;          st.oust = OUST_NL;
         st.wantws = 1;          st.wantws = 1;
Line 1495  dofile(const struct args *args, const char *fname, 
Line 1602  dofile(const struct args *args, const char *fname, 
                 dopar(&st, buf, cur, end);                  dopar(&st, buf, cur, end);
                 cur = sup;                  cur = sup;
         }          }
           dict_destroy();
 }  }
   
 /*  /*

Legend:
Removed from v.1.35  
changed lines
  Added in v.1.39

CVSweb