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

Diff for /mandoc/Attic/strings.c between version 1.4 and 1.30

version 1.4, 2008/12/29 18:08:44 version 1.30, 2009/03/20 19:56:25
Line 16 
Line 16 
  * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR   * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
  * PERFORMANCE OF THIS SOFTWARE.   * PERFORMANCE OF THIS SOFTWARE.
  */   */
   #include <sys/types.h>
   
 #include <assert.h>  #include <assert.h>
 #include <ctype.h>  #include <ctype.h>
 #include <stdlib.h>  #include <stdlib.h>
 #include <stdio.h>  #include <stdio.h>
 #include <string.h>  #include <string.h>
 #ifdef __linux__  
 #include <time.h>  
 #endif  
   
 #include "private.h"  #include "private.h"
   
   /*
    * Various string-literal operations:  converting scalars to and from
    * strings, etc.
    */
   
   struct mdoc_secname {
           const char      *name;
           int              flag;
   #define MSECNAME_META   (1 << 0)
   };
   
   /* Section names corresponding to mdoc_sec. */
   
   static  const struct mdoc_secname secnames[] = {
           { "PROLOGUE", MSECNAME_META },
           { "BODY", MSECNAME_META },
           { "NAME", 0 },
           { "LIBRARY", 0 },
           { "SYNOPSIS", 0 },
           { "DESCRIPTION", 0 },
           { "IMPLEMENTATION NOTES", 0 },
           { "RETURN VALUES", 0 },
           { "ENVIRONMENT", 0 },
           { "FILES", 0 },
           { "EXAMPLES", 0 },
           { "DIAGNOSTICS", 0 },
           { "COMPATIBILITY", 0 },
           { "ERRORS", 0 },
           { "SEE ALSO", 0 },
           { "STANDARDS", 0 },
           { "HISTORY", 0 },
           { "AUTHORS", 0 },
           { "CAVEATS", 0 },
           { "BUGS", 0 },
           { NULL, 0 }
   };
   
 #ifdef __linux__  #ifdef __linux__
 extern  char            *strptime(const char *, const char *, struct tm *);  extern  char            *strptime(const char *, const char *, struct tm *);
 #endif  #endif
   
   
   size_t
   mdoc_isescape(const char *p)
   {
           size_t           c;
   
           if ('\\' != *p++)
                   return(0);
   
           switch (*p) {
           case ('\\'):
                   /* FALLTHROUGH */
           case ('\''):
                   /* FALLTHROUGH */
           case ('`'):
                   /* FALLTHROUGH */
           case ('q'):
                   /* FALLTHROUGH */
           case ('-'):
                   /* FALLTHROUGH */
           case (' '):
                   /* FALLTHROUGH */
           case ('|'):
                   /* FALLTHROUGH */
           case ('&'):
                   /* FALLTHROUGH */
           case ('.'):
                   /* FALLTHROUGH */
           case (':'):
                   /* FALLTHROUGH */
           case ('e'):
                   return(2);
           case ('*'):
                   if (0 == *++p || ! isgraph((u_char)*p))
                           return(0);
                   switch (*p) {
                   case ('('):
                           if (0 == *++p || ! isgraph((u_char)*p))
                                   return(0);
                           return(4);
                   case ('['):
                           for (c = 3, p++; *p && ']' != *p; p++, c++)
                                   if ( ! isgraph((u_char)*p))
                                           break;
                           return(*p == ']' ? c : 0);
                   default:
                           break;
                   }
                   return(3);
           case ('('):
                   if (0 == *++p || ! isgraph((u_char)*p))
                           return(0);
                   if (0 == *++p || ! isgraph((u_char)*p))
                           return(0);
                   return(4);
           case ('['):
                   break;
           default:
                   return(0);
           }
   
           for (c = 3, p++; *p && ']' != *p; p++, c++)
                   if ( ! isgraph((u_char)*p))
                           break;
   
           return(*p == ']' ? c : 0);
   }
   
   
 int  int
 mdoc_iscdelim(char p)  mdoc_iscdelim(char p)
 {  {
   
         switch (p) {          switch (p) {
         case('{'):  
                 /* FALLTHROUGH */  
         case('.'):          case('.'):
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         case(','):          case(','):
Line 58  mdoc_iscdelim(char p)
Line 161  mdoc_iscdelim(char p)
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         case(']'):          case(']'):
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
           case('{'):
                   /* FALLTHROUGH */
         case('}'):          case('}'):
                 return(1);                  return(1);
         default:          default:
Line 81  mdoc_isdelim(const char *p)
Line 186  mdoc_isdelim(const char *p)
   
   
 enum mdoc_sec  enum mdoc_sec
 mdoc_atosec(size_t sz, const char **p)  mdoc_atosec(const char *p)
 {  {
           const struct mdoc_secname *n;
           int                        i;
   
         assert(sz > 0);          for (i = 0, n = secnames; n->name; n++, i++)
         if (sz > 2)                  if ( ! (n->flag & MSECNAME_META))
                 return(SEC_CUSTOM);                          if (xstrcmp(p, n->name))
         if (sz == 2) {                                  return((enum mdoc_sec)i);
                 if (0 == strcmp(*p, "RETURN") &&  
                                 0 == strcmp(*(p + 1), "VALUES"))  
                         return(SEC_RETURN_VALUES);  
                 if (0 == strcmp(*p, "SEE") &&  
                                 0 == strcmp(*(p + 1), "ALSO"))  
                         return(SEC_SEE_ALSO);  
                 return(SEC_CUSTOM);  
         }  
   
         if (0 == strcmp(*p, "NAME"))  
                 return(SEC_NAME);  
         else if (0 == strcmp(*p, "SYNOPSIS"))  
                 return(SEC_SYNOPSIS);  
         else if (0 == strcmp(*p, "DESCRIPTION"))  
                 return(SEC_DESCRIPTION);  
         else if (0 == strcmp(*p, "ENVIRONMENT"))  
                 return(SEC_ENVIRONMENT);  
         else if (0 == strcmp(*p, "FILES"))  
                 return(SEC_FILES);  
         else if (0 == strcmp(*p, "EXAMPLES"))  
                 return(SEC_EXAMPLES);  
         else if (0 == strcmp(*p, "DIAGNOSTICS"))  
                 return(SEC_DIAGNOSTICS);  
         else if (0 == strcmp(*p, "ERRORS"))  
                 return(SEC_ERRORS);  
         else if (0 == strcmp(*p, "STANDARDS"))  
                 return(SEC_STANDARDS);  
         else if (0 == strcmp(*p, "HISTORY"))  
                 return(SEC_HISTORY);  
         else if (0 == strcmp(*p, "AUTHORS"))  
                 return(SEC_AUTHORS);  
         else if (0 == strcmp(*p, "CAVEATS"))  
                 return(SEC_CAVEATS);  
         else if (0 == strcmp(*p, "BUGS"))  
                 return(SEC_BUGS);  
   
         return(SEC_CUSTOM);          return(SEC_CUSTOM);
 }  }
   
Line 132  time_t
Line 204  time_t
 mdoc_atotime(const char *p)  mdoc_atotime(const char *p)
 {  {
         struct tm        tm;          struct tm        tm;
           char            *pp;
   
         if (strptime(p, "%b %d %Y", &tm))          (void)memset(&tm, 0, sizeof(struct tm));
   
           if (xstrcmp(p, "$Mdocdate$"))
                   return(time(NULL));
           if ((pp = strptime(p, "$Mdocdate$", &tm)) && 0 == *pp)
                 return(mktime(&tm));                  return(mktime(&tm));
         if (strptime(p, "%b %d, %Y", &tm))          /* XXX - this matches "June 1999", which is wrong. */
           if ((pp = strptime(p, "%b %d %Y", &tm)) && 0 == *pp)
                 return(mktime(&tm));                  return(mktime(&tm));
           if ((pp = strptime(p, "%b %d, %Y", &tm)) && 0 == *pp)
                   return(mktime(&tm));
   
         return(0);          return(0);
 }  }
   
   
 enum mdoc_msec  size_t
 mdoc_atomsec(const char *p)  mdoc_macro2len(int macro)
 {  {
   
         if (0 == strcmp(p, "1"))          switch (macro) {
                 return(MSEC_1);          case(MDOC_Ad):
         else if (0 == strcmp(p, "2"))                  return(12);
                 return(MSEC_2);          case(MDOC_Ao):
         else if (0 == strcmp(p, "3"))                  return(12);
                 return(MSEC_3);          case(MDOC_An):
         else if (0 == strcmp(p, "3f"))                  return(12);
                 return(MSEC_3f);          case(MDOC_Aq):
         else if (0 == strcmp(p, "3p"))                  return(12);
                 return(MSEC_3p);          case(MDOC_Ar):
         else if (0 == strcmp(p, "4"))                  return(12);
                 return(MSEC_4);          case(MDOC_Bo):
         else if (0 == strcmp(p, "5"))                  return(12);
                 return(MSEC_5);          case(MDOC_Bq):
         else if (0 == strcmp(p, "6"))                  return(12);
                 return(MSEC_6);          case(MDOC_Cd):
         else if (0 == strcmp(p, "7"))                  return(12);
                 return(MSEC_7);          case(MDOC_Cm):
         else if (0 == strcmp(p, "8"))                  return(10);
                 return(MSEC_8);          case(MDOC_Do):
         else if (0 == strcmp(p, "9"))                  return(10);
                 return(MSEC_9);          case(MDOC_Dq):
         else if (0 == strcmp(p, "X11"))                  return(12);
                 return(MSEC_X11);          case(MDOC_Dv):
         else if (0 == strcmp(p, "X11R6"))                  return(12);
                 return(MSEC_X11R6);          case(MDOC_Eo):
         else if (0 == strcmp(p, "local"))                  return(12);
                 return(MSEC_local);          case(MDOC_Em):
         else if (0 == strcmp(p, "n"))                  return(10);
                 return(MSEC_n);          case(MDOC_Er):
         else if (0 == strcmp(p, "unass"))                  return(12);
                 return(MSEC_unass);          case(MDOC_Ev):
         else if (0 == strcmp(p, "draft"))                  return(15);
                 return(MSEC_draft);          case(MDOC_Fa):
         else if (0 == strcmp(p, "paper"))                  return(12);
                 return(MSEC_paper);          case(MDOC_Fl):
                   return(10);
         return(MSEC_DEFAULT);          case(MDOC_Fo):
 }                  return(16);
           case(MDOC_Fn):
                   return(16);
 enum mdoc_vol          case(MDOC_Ic):
 mdoc_atovol(const char *p)                  return(10);
 {          case(MDOC_Li):
                   return(16);
         if (0 == strcmp(p, "AMD"))          case(MDOC_Ms):
                 return(VOL_AMD);                  return(6);
         else if (0 == strcmp(p, "IND"))          case(MDOC_Nm):
                 return(VOL_IND);                  return(10);
         else if (0 == strcmp(p, "KM"))          case(MDOC_No):
                 return(VOL_KM);                  return(12);
         else if (0 == strcmp(p, "LOCAL"))          case(MDOC_Oo):
                 return(VOL_LOCAL);                  return(10);
         else if (0 == strcmp(p, "PRM"))          case(MDOC_Op):
                 return(VOL_PRM);                  return(14);
         else if (0 == strcmp(p, "PS1"))          case(MDOC_Pa):
                 return(VOL_PS1);                  return(32);
         else if (0 == strcmp(p, "SMM"))          case(MDOC_Pf):
                 return(VOL_SMM);                  return(12);
         else if (0 == strcmp(p, "URM"))          case(MDOC_Po):
                 return(VOL_URM);                  return(12);
         else if (0 == strcmp(p, "USD"))          case(MDOC_Pq):
                 return(VOL_USD);                  return(12);
           case(MDOC_Ql):
         return(VOL_DEFAULT);                  return(16);
 }          case(MDOC_Qo):
                   return(12);
           case(MDOC_So):
 enum mdoc_arch                  return(12);
 mdoc_atoarch(const char *p)          case(MDOC_Sq):
 {                  return(12);
           case(MDOC_Sy):
         if (0 == strcmp(p, "alpha"))                  return(6);
                 return(ARCH_alpha);          case(MDOC_Sx):
         else if (0 == strcmp(p, "amd64"))                  return(16);
                 return(ARCH_amd64);          case(MDOC_Tn):
         else if (0 == strcmp(p, "amiga"))                  return(10);
                 return(ARCH_amiga);          case(MDOC_Va):
         else if (0 == strcmp(p, "arc"))                  return(12);
                 return(ARCH_arc);          case(MDOC_Vt):
         else if (0 == strcmp(p, "armish"))                  return(12);
                 return(ARCH_armish);          case(MDOC_Xr):
         else if (0 == strcmp(p, "aviion"))                  return(10);
                 return(ARCH_aviion);          default:
         else if (0 == strcmp(p, "hp300"))                  break;
                 return(ARCH_hp300);          };
         else if (0 == strcmp(p, "hppa"))          return(0);
                 return(ARCH_hppa);  
         else if (0 == strcmp(p, "hppa64"))  
                 return(ARCH_hppa64);  
         else if (0 == strcmp(p, "i386"))  
                 return(ARCH_i386);  
         else if (0 == strcmp(p, "landisk"))  
                 return(ARCH_landisk);  
         else if (0 == strcmp(p, "luna88k"))  
                 return(ARCH_luna88k);  
         else if (0 == strcmp(p, "mac68k"))  
                 return(ARCH_mac68k);  
         else if (0 == strcmp(p, "macppc"))  
                 return(ARCH_macppc);  
         else if (0 == strcmp(p, "mvme68k"))  
                 return(ARCH_mvme68k);  
         else if (0 == strcmp(p, "mvme88k"))  
                 return(ARCH_mvme88k);  
         else if (0 == strcmp(p, "mvmeppc"))  
                 return(ARCH_mvmeppc);  
         else if (0 == strcmp(p, "pmax"))  
                 return(ARCH_pmax);  
         else if (0 == strcmp(p, "sgi"))  
                 return(ARCH_sgi);  
         else if (0 == strcmp(p, "socppc"))  
                 return(ARCH_socppc);  
         else if (0 == strcmp(p, "sparc"))  
                 return(ARCH_sparc);  
         else if (0 == strcmp(p, "sparc64"))  
                 return(ARCH_sparc64);  
         else if (0 == strcmp(p, "sun3"))  
                 return(ARCH_sun3);  
         else if (0 == strcmp(p, "vax"))  
                 return(ARCH_vax);  
         else if (0 == strcmp(p, "zaurus"))  
                 return(ARCH_zaurus);  
   
         return(ARCH_DEFAULT);  
 }  
   
   
 enum mdoc_att  
 mdoc_atoatt(const char *p)  
 {  
   
         assert(p);  
         if (0 == strcmp(p, "v1"))  
                 return(ATT_v1);  
         else if (0 == strcmp(p, "v2"))  
                 return(ATT_v2);  
         else if (0 == strcmp(p, "v3"))  
                 return(ATT_v3);  
         else if (0 == strcmp(p, "v4"))  
                 return(ATT_v4);  
         else if (0 == strcmp(p, "v5"))  
                 return(ATT_v5);  
         else if (0 == strcmp(p, "v6"))  
                 return(ATT_v6);  
         else if (0 == strcmp(p, "v7"))  
                 return(ATT_v7);  
         else if (0 == strcmp(p, "32v"))  
                 return(ATT_32v);  
         else if (0 == strcmp(p, "V.1"))  
                 return(ATT_V1);  
         else if (0 == strcmp(p, "V.2"))  
                 return(ATT_V2);  
         else if (0 == strcmp(p, "V.3"))  
                 return(ATT_V3);  
         else if (0 == strcmp(p, "V.4"))  
                 return(ATT_V4);  
   
         return(ATT_DEFAULT);  
 }  }
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.30
CVSweb