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

Diff for /mandoc/term.c between version 1.191 and 1.199

version 1.191, 2011/05/15 22:29:50 version 1.199, 2011/09/18 21:18:19
Line 1 
Line 1 
 /*      $Id$ */  /*      $Id$ */
 /*  /*
  * Copyright (c) 2008, 2009, 2010 Kristaps Dzonsons <kristaps@bsd.lv>   * Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv>
  * Copyright (c) 2010, 2011 Ingo Schwarze <schwarze@openbsd.org>   * Copyright (c) 2010, 2011 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
Line 36 
Line 36 
 static  void             adjbuf(struct termp *p, int);  static  void             adjbuf(struct termp *p, int);
 static  void             bufferc(struct termp *, char);  static  void             bufferc(struct termp *, char);
 static  void             encode(struct termp *, const char *, size_t);  static  void             encode(struct termp *, const char *, size_t);
   static  void             encode1(struct termp *, int);
   
 void  void
 term_free(struct termp *p)  term_free(struct termp *p)
Line 69  term_end(struct termp *p)
Line 70  term_end(struct termp *p)
         (*p->end)(p);          (*p->end)(p);
 }  }
   
   
 struct termp *  
 term_alloc(enum termenc enc)  
 {  
         struct termp    *p;  
   
         p = mandoc_calloc(1, sizeof(struct termp));  
         p->enc = enc;  
         return(p);  
 }  
   
   
 /*  /*
  * Flush a line of text.  A "line" is loosely defined as being something   * Flush a line of text.  A "line" is loosely defined as being something
  * that should be followed by a newline, regardless of whether it's   * that should be followed by a newline, regardless of whether it's
Line 415  term_word(struct termp *p, const char *word)
Line 404  term_word(struct termp *p, const char *word)
 {  {
         const char      *seq, *cp;          const char      *seq, *cp;
         char             c;          char             c;
         int              sz;          int              sz, uc;
         size_t           ssz;          size_t           ssz;
         enum mandoc_esc  esc;          enum mandoc_esc  esc;
   
Line 450  term_word(struct termp *p, const char *word)
Line 439  term_word(struct termp *p, const char *word)
                 if (ESCAPE_ERROR == esc)                  if (ESCAPE_ERROR == esc)
                         break;                          break;
   
                   if (TERMENC_ASCII != p->enc)
                           switch (esc) {
                           case (ESCAPE_UNICODE):
                                   uc = mchars_num2uc(seq + 1, sz - 1);
                                   if ('\0' == uc)
                                           break;
                                   encode1(p, uc);
                                   continue;
                           case (ESCAPE_SPECIAL):
                                   uc = mchars_spec2cp(p->symtab, seq, sz);
                                   if (uc <= 0)
                                           break;
                                   encode1(p, uc);
                                   continue;
                           default:
                                   break;
                           }
   
                 switch (esc) {                  switch (esc) {
                   case (ESCAPE_UNICODE):
                           encode1(p, '?');
                           break;
                 case (ESCAPE_NUMBERED):                  case (ESCAPE_NUMBERED):
                         if ('\0' != (c = mchars_num2char(seq, sz)))                          c = mchars_num2char(seq, sz);
                           if ('\0' != c)
                                 encode(p, &c, 1);                                  encode(p, &c, 1);
                         break;                          break;
                 case (ESCAPE_PREDEF):  
                         cp = mchars_res2str(p->symtab, seq, sz, &ssz);  
                         if (NULL != cp)  
                                 encode(p, cp, ssz);  
                         break;  
                 case (ESCAPE_SPECIAL):                  case (ESCAPE_SPECIAL):
                         cp = mchars_spec2str(p->symtab, seq, sz, &ssz);                          cp = mchars_spec2str(p->symtab, seq, sz, &ssz);
                         if (NULL != cp)                          if (NULL != cp)
Line 473  term_word(struct termp *p, const char *word)
Line 479  term_word(struct termp *p, const char *word)
                 case (ESCAPE_FONTITALIC):                  case (ESCAPE_FONTITALIC):
                         term_fontrepl(p, TERMFONT_UNDER);                          term_fontrepl(p, TERMFONT_UNDER);
                         break;                          break;
                   case (ESCAPE_FONT):
                           /* FALLTHROUGH */
                 case (ESCAPE_FONTROMAN):                  case (ESCAPE_FONTROMAN):
                         term_fontrepl(p, TERMFONT_NONE);                          term_fontrepl(p, TERMFONT_NONE);
                         break;                          break;
Line 512  bufferc(struct termp *p, char c)
Line 520  bufferc(struct termp *p, char c)
         p->buf[p->col++] = c;          p->buf[p->col++] = c;
 }  }
   
   /*
    * See encode().
    * Do this for a single (probably unicode) value.
    * Does not check for non-decorated glyphs.
    */
 static void  static void
   encode1(struct termp *p, int c)
   {
           enum termfont     f;
   
           if (p->col + 4 >= p->maxcols)
                   adjbuf(p, p->col + 4);
   
           f = term_fonttop(p);
   
           if (TERMFONT_NONE == f) {
                   p->buf[p->col++] = c;
                   return;
           } else if (TERMFONT_UNDER == f) {
                   p->buf[p->col++] = '_';
           } else
                   p->buf[p->col++] = c;
   
           p->buf[p->col++] = 8;
           p->buf[p->col++] = c;
   }
   
   static void
 encode(struct termp *p, const char *word, size_t sz)  encode(struct termp *p, const char *word, size_t sz)
 {  {
         enum termfont     f;          enum termfont     f;
Line 541  encode(struct termp *p, const char *word, size_t sz)
Line 576  encode(struct termp *p, const char *word, size_t sz)
                 adjbuf(p, p->col + 1 + (len * 3));                  adjbuf(p, p->col + 1 + (len * 3));
   
         for (i = 0; i < len; i++) {          for (i = 0; i < len; i++) {
                 if ( ! isgraph((unsigned char)word[i])) {                  if (ASCII_HYPH != word[i] &&
                       ! isgraph((unsigned char)word[i])) {
                         p->buf[p->col++] = word[i];                          p->buf[p->col++] = word[i];
                         continue;                          continue;
                 }                  }
   
                 if (TERMFONT_UNDER == f)                  if (TERMFONT_UNDER == f)
                         p->buf[p->col++] = '_';                          p->buf[p->col++] = '_';
                   else if (ASCII_HYPH == word[i])
                           p->buf[p->col++] = '-';
                 else                  else
                         p->buf[p->col++] = word[i];                          p->buf[p->col++] = word[i];
   
Line 570  term_strlen(const struct termp *p, const char *cp)
Line 608  term_strlen(const struct termp *p, const char *cp)
         size_t           sz, rsz, i;          size_t           sz, rsz, i;
         int              ssz, c;          int              ssz, c;
         const char      *seq, *rhs;          const char      *seq, *rhs;
           enum mandoc_esc  esc;
         static const char rej[] = { '\\', ASCII_HYPH, ASCII_NBRSP, '\0' };          static const char rej[] = { '\\', ASCII_HYPH, ASCII_NBRSP, '\0' };
   
         /*          /*
Line 584  term_strlen(const struct termp *p, const char *cp)
Line 623  term_strlen(const struct termp *p, const char *cp)
                 for (i = 0; i < rsz; i++)                  for (i = 0; i < rsz; i++)
                         sz += (*p->width)(p, *cp++);                          sz += (*p->width)(p, *cp++);
   
                   c = 0;
                 switch (*cp) {                  switch (*cp) {
                 case ('\\'):                  case ('\\'):
                         cp++;                          cp++;
                         rhs = NULL;                          esc = mandoc_escape(&cp, &seq, &ssz);
                         switch (mandoc_escape(&cp, &seq, &ssz)) {                          if (ESCAPE_ERROR == esc)
                         case (ESCAPE_ERROR):  
                                 return(sz);                                  return(sz);
   
                           if (TERMENC_ASCII != p->enc)
                                   switch (esc) {
                                   case (ESCAPE_UNICODE):
                                           c = mchars_num2uc
                                                   (seq + 1, ssz - 1);
                                           if ('\0' == c)
                                                   break;
                                           sz += (*p->width)(p, c);
                                           continue;
                                   case (ESCAPE_SPECIAL):
                                           c = mchars_spec2cp
                                                   (p->symtab, seq, ssz);
                                           if (c <= 0)
                                                   break;
                                           sz += (*p->width)(p, c);
                                           continue;
                                   default:
                                           break;
                                   }
   
                           rhs = NULL;
   
                           switch (esc) {
                           case (ESCAPE_UNICODE):
                                   sz += (*p->width)(p, '?');
                                   break;
                         case (ESCAPE_NUMBERED):                          case (ESCAPE_NUMBERED):
                                 c = mchars_num2char(seq, ssz);                                  c = mchars_num2char(seq, ssz);
                                 if ('\0' != c)                                  if ('\0' != c)
                                         sz += (*p->width)(p, c);                                          sz += (*p->width)(p, c);
                                 break;  
                         case (ESCAPE_PREDEF):  
                                 rhs = mchars_res2str  
                                         (p->symtab, seq, ssz, &rsz);  
                                 break;                                  break;
                         case (ESCAPE_SPECIAL):                          case (ESCAPE_SPECIAL):
                                 rhs = mchars_spec2str                                  rhs = mchars_spec2str
Legend:
Removed from v.1.191  
changed lines
  Added in v.1.199
CVSweb