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

Diff for /mandoc/term_ps.c between version 1.64 and 1.67

version 1.64, 2014/08/13 20:34:29 version 1.67, 2014/10/27 20:41:58
Line 25 
Line 25 
 #include <stdio.h>  #include <stdio.h>
 #include <stdlib.h>  #include <stdlib.h>
 #include <string.h>  #include <string.h>
 #include <time.h>  
 #include <unistd.h>  #include <unistd.h>
   
 #include "mandoc.h"  #include "mandoc.h"
Line 60  struct termp_ps {
Line 59  struct termp_ps {
 #define PS_INLINE        (1 << 0)       /* we're in a word */  #define PS_INLINE        (1 << 0)       /* we're in a word */
 #define PS_MARGINS       (1 << 1)       /* we're in the margins */  #define PS_MARGINS       (1 << 1)       /* we're in the margins */
 #define PS_NEWPAGE       (1 << 2)       /* new page, no words yet */  #define PS_NEWPAGE       (1 << 2)       /* new page, no words yet */
   #define PS_BACKSP        (1 << 3)       /* last character was backspace */
         size_t            pscol;        /* visible column (AFM units) */          size_t            pscol;        /* visible column (AFM units) */
         size_t            psrow;        /* visible row (AFM units) */          size_t            psrow;        /* visible row (AFM units) */
         char             *psmarg;       /* margin buf */          char             *psmarg;       /* margin buf */
         size_t            psmargsz;     /* margin buf size */          size_t            psmargsz;     /* margin buf size */
         size_t            psmargcur;    /* cur index in margin buf */          size_t            psmargcur;    /* cur index in margin buf */
         char              last;         /* character buffer */          char              last;         /* last non-backspace seen */
         enum termfont     lastf;        /* last set font */          enum termfont     lastf;        /* last set font */
           enum termfont     nextf;        /* building next font here */
         size_t            scale;        /* font scaling factor */          size_t            scale;        /* font scaling factor */
         size_t            pages;        /* number of pages shown */          size_t            pages;        /* number of pages shown */
         size_t            lineheight;   /* line height (AFM units) */          size_t            lineheight;   /* line height (AFM units) */
Line 406  static const struct font fonts[TERMFONT__MAX] = {
Line 407  static const struct font fonts[TERMFONT__MAX] = {
                 {  400 },                  {  400 },
                 {  541 },                  {  541 },
         } },          } },
           { "Times-BoldItalic", {
                   {  250 },
                   {  389 },
                   {  555 },
                   {  500 },
                   {  500 },
                   {  833 },
                   {  778 },
                   {  333 },
                   {  333 },
                   {  333 },
                   {  500 },
                   {  570 },
                   {  250 },
                   {  333 },
                   {  250 },
                   {  278 },
                   {  500 },
                   {  500 },
                   {  500 },
                   {  500 },
                   {  500 },
                   {  500 },
                   {  500 },
                   {  500 },
                   {  500 },
                   {  500 },
                   {  333 },
                   {  333 },
                   {  570 },
                   {  570 },
                   {  570 },
                   {  500 },
                   {  832 },
                   {  667 },
                   {  667 },
                   {  667 },
                   {  722 },
                   {  667 },
                   {  667 },
                   {  722 },
                   {  778 },
                   {  389 },
                   {  500 },
                   {  667 },
                   {  611 },
                   {  889 },
                   {  722 },
                   {  722 },
                   {  611 },
                   {  722 },
                   {  667 },
                   {  556 },
                   {  611 },
                   {  722 },
                   {  667 },
                   {  889 },
                   {  667 },
                   {  611 },
                   {  611 },
                   {  333 },
                   {  278 },
                   {  333 },
                   {  570 },
                   {  500 },
                   {  333 },
                   {  500 },
                   {  500 },
                   {  444 },
                   {  500 },
                   {  444 },
                   {  333 },
                   {  500 },
                   {  556 },
                   {  278 },
                   {  278 },
                   {  500 },
                   {  278 },
                   {  778 },
                   {  556 },
                   {  500 },
                   {  500 },
                   {  500 },
                   {  389 },
                   {  389 },
                   {  278 },
                   {  556 },
                   {  444 },
                   {  667 },
                   {  500 },
                   {  444 },
                   {  389 },
                   {  348 },
                   {  220 },
                   {  348 },
                   {  570 },
           } },
 };  };
   
 void *  void *
Line 754  ps_end(struct termp *p)
Line 852  ps_end(struct termp *p)
 static void  static void
 ps_begin(struct termp *p)  ps_begin(struct termp *p)
 {  {
         time_t           t;  
         int              i;          int              i;
   
         /*          /*
Line 795  ps_begin(struct termp *p)
Line 892  ps_begin(struct termp *p)
          * stuff gets printed to the screen, so make sure we're sane.           * stuff gets printed to the screen, so make sure we're sane.
          */           */
   
         t = time(NULL);  
   
         if (TERMTYPE_PS == p->type) {          if (TERMTYPE_PS == p->type) {
                 ps_printf(p, "%%!PS-Adobe-3.0\n");                  ps_printf(p, "%%!PS-Adobe-3.0\n");
                 ps_printf(p, "%%%%CreationDate: %s", ctime(&t));  
                 ps_printf(p, "%%%%DocumentData: Clean7Bit\n");                  ps_printf(p, "%%%%DocumentData: Clean7Bit\n");
                 ps_printf(p, "%%%%Orientation: Portrait\n");                  ps_printf(p, "%%%%Orientation: Portrait\n");
                 ps_printf(p, "%%%%Pages: (atend)\n");                  ps_printf(p, "%%%%Pages: (atend)\n");
Line 953  ps_fclose(struct termp *p)
Line 1047  ps_fclose(struct termp *p)
          * Following this, close out any scope that's open.           * Following this, close out any scope that's open.
          */           */
   
         if ('\0' != p->ps->last) {          if (p->ps->last != '\0') {
                 if (p->ps->lastf != TERMFONT_NONE) {                  assert( ! (p->ps->flags & PS_BACKSP));
                   if (p->ps->nextf != p->ps->lastf) {
                         ps_pclose(p);                          ps_pclose(p);
                         ps_setfont(p, TERMFONT_NONE);                          ps_setfont(p, p->ps->nextf);
                 }                  }
                   p->ps->nextf = TERMFONT_NONE;
                 ps_pletter(p, p->ps->last);                  ps_pletter(p, p->ps->last);
                 p->ps->last = '\0';                  p->ps->last = '\0';
         }          }
Line 971  ps_fclose(struct termp *p)
Line 1067  ps_fclose(struct termp *p)
 static void  static void
 ps_letter(struct termp *p, int arg)  ps_letter(struct termp *p, int arg)
 {  {
         char            cc, c;          size_t          savecol;
           char            c;
   
         c = arg >= 128 || arg <= 0 ? '?' : arg;          c = arg >= 128 || arg <= 0 ? '?' : arg;
   
         /*          /*
          * State machine dictates whether to buffer the last character           * When receiving a backspace, merely flag it.
          * or not.  Basically, encoded words are detected by checking if           * We don't know yet whether it is
          * we're an "8" and switching on the buffer.  Then we put "8" in           * a font instruction or an overstrike.
          * our buffer, and on the next charater, flush both character  
          * and buffer.  Thus, "regular" words are detected by having a  
          * regular character and a regular buffer character.  
          */           */
   
         if ('\0' == p->ps->last) {          if (c == '\b') {
                 assert(8 != c);                  assert(p->ps->last != '\0');
                 p->ps->last = c;                  assert( ! (p->ps->flags & PS_BACKSP));
                   p->ps->flags |= PS_BACKSP;
                 return;                  return;
         } else if (8 == p->ps->last) {          }
                 assert(8 != c);  
                 p->ps->last = '\0';          /*
         } else if (8 == c) {           * Decode font instructions.
                 assert(8 != p->ps->last);           */
                 if ('_' == p->ps->last) {  
                         if (p->ps->lastf != TERMFONT_UNDER) {          if (p->ps->flags & PS_BACKSP) {
                                 ps_pclose(p);                  if (p->ps->last == '_') {
                                 ps_setfont(p, TERMFONT_UNDER);                          switch (p->ps->nextf) {
                           case TERMFONT_BI:
                                   break;
                           case TERMFONT_BOLD:
                                   p->ps->nextf = TERMFONT_BI;
                                   break;
                           default:
                                   p->ps->nextf = TERMFONT_UNDER;
                         }                          }
                 } else if (p->ps->lastf != TERMFONT_BOLD) {                          p->ps->last = c;
                         ps_pclose(p);                          p->ps->flags &= ~PS_BACKSP;
                         ps_setfont(p, TERMFONT_BOLD);                          return;
                 }                  }
                 p->ps->last = c;                  if (p->ps->last == c) {
                 return;                          switch (p->ps->nextf) {
         } else {                          case TERMFONT_BI:
                 if (p->ps->lastf != TERMFONT_NONE) {                                  break;
                           case TERMFONT_UNDER:
                                   p->ps->nextf = TERMFONT_BI;
                                   break;
                           default:
                                   p->ps->nextf = TERMFONT_BOLD;
                           }
                           p->ps->flags &= ~PS_BACKSP;
                           return;
                   }
   
                   /*
                    * This is not a font instruction, but rather
                    * the next character.  Prepare for overstrike.
                    */
   
                   savecol = p->ps->pscol;
           } else
                   savecol = SIZE_MAX;
   
           /*
            * We found the next character, so the font instructions
            * for the previous one are complete.
            * Use them and print it.
            */
   
           if (p->ps->last != '\0') {
                   if (p->ps->nextf != p->ps->lastf) {
                         ps_pclose(p);                          ps_pclose(p);
                         ps_setfont(p, TERMFONT_NONE);                          ps_setfont(p, p->ps->nextf);
                 }                  }
                 cc = p->ps->last;                  p->ps->nextf = TERMFONT_NONE;
                 p->ps->last = c;                  ps_pletter(p, p->ps->last);
                 c = cc;  
         }          }
   
         ps_pletter(p, c);          /*
            * Do not print the current character yet because font
            * instructions might follow; only remember it.
            * For the first character, nothing else is done.
            * The final character will get printed from ps_fclose().
            */
   
           p->ps->last = c;
   
           /*
            * For an overstrike, back up to the previous position.
            */
   
           if (savecol != SIZE_MAX) {
                   ps_pclose(p);
                   p->ps->pscol = savecol;
                   p->ps->flags &= ~PS_BACKSP;
           }
 }  }
   
 static void  static void
Legend:
Removed from v.1.64  
changed lines
  Added in v.1.67
CVSweb