version 1.89, 2017/10/29 19:25:31 |
version 1.91, 2017/11/10 23:42:52 |
|
|
/* |
/* |
* Copyright (c) 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2014, 2015, 2016, 2017 Ingo Schwarze <schwarze@openbsd.org> |
* Copyright (c) 2014, 2015, 2016, 2017 Ingo Schwarze <schwarze@openbsd.org> |
|
* Copyright (c) 2017 Marc Espie <espie@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 66 struct termp_ps { |
|
Line 67 struct termp_ps { |
|
size_t pscol; /* visible column (AFM units) */ |
size_t pscol; /* visible column (AFM units) */ |
size_t pscolnext; /* used for overstrike */ |
size_t pscolnext; /* used for overstrike */ |
size_t psrow; /* visible row (AFM units) */ |
size_t psrow; /* visible row (AFM units) */ |
|
size_t lastrow; /* psrow of the previous word */ |
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 */ |
Line 109 static void ps_printf(struct termp *, const char *, |
|
Line 111 static void ps_printf(struct termp *, const char *, |
|
static void ps_putchar(struct termp *, char); |
static void ps_putchar(struct termp *, char); |
static void ps_setfont(struct termp *, enum termfont); |
static void ps_setfont(struct termp *, enum termfont); |
static void ps_setwidth(struct termp *, int, int); |
static void ps_setwidth(struct termp *, int, int); |
static struct termp *pspdf_alloc(const struct manoutput *); |
static struct termp *pspdf_alloc(const struct manoutput *, enum termtype); |
static void pdf_obj(struct termp *, size_t); |
static void pdf_obj(struct termp *, size_t); |
|
|
/* |
/* |
Line 512 static const struct font fonts[TERMFONT__MAX] = { |
|
Line 514 static const struct font fonts[TERMFONT__MAX] = { |
|
void * |
void * |
pdf_alloc(const struct manoutput *outopts) |
pdf_alloc(const struct manoutput *outopts) |
{ |
{ |
struct termp *p; |
return pspdf_alloc(outopts, TERMTYPE_PDF); |
|
|
if (NULL != (p = pspdf_alloc(outopts))) |
|
p->type = TERMTYPE_PDF; |
|
|
|
return p; |
|
} |
} |
|
|
void * |
void * |
ps_alloc(const struct manoutput *outopts) |
ps_alloc(const struct manoutput *outopts) |
{ |
{ |
struct termp *p; |
return pspdf_alloc(outopts, TERMTYPE_PS); |
|
|
if (NULL != (p = pspdf_alloc(outopts))) |
|
p->type = TERMTYPE_PS; |
|
|
|
return p; |
|
} |
} |
|
|
static struct termp * |
static struct termp * |
pspdf_alloc(const struct manoutput *outopts) |
pspdf_alloc(const struct manoutput *outopts, enum termtype type) |
{ |
{ |
struct termp *p; |
struct termp *p; |
unsigned int pagex, pagey; |
unsigned int pagex, pagey; |
Line 542 pspdf_alloc(const struct manoutput *outopts) |
|
Line 534 pspdf_alloc(const struct manoutput *outopts) |
|
p = mandoc_calloc(1, sizeof(*p)); |
p = mandoc_calloc(1, sizeof(*p)); |
p->tcol = p->tcols = mandoc_calloc(1, sizeof(*p->tcol)); |
p->tcol = p->tcols = mandoc_calloc(1, sizeof(*p->tcol)); |
p->maxtcol = 1; |
p->maxtcol = 1; |
|
p->type = type; |
|
|
p->enc = TERMENC_ASCII; |
p->enc = TERMENC_ASCII; |
p->fontq = mandoc_reallocarray(NULL, |
p->fontq = mandoc_reallocarray(NULL, |
Line 741 ps_closepage(struct termp *p) |
|
Line 734 ps_closepage(struct termp *p) |
|
|
|
/* |
/* |
* Close out a page that we've already flushed to output. In |
* Close out a page that we've already flushed to output. In |
* PostScript, we simply note that the page must be showed. In |
* PostScript, we simply note that the page must be shown. In |
* PDF, we must now create the Length, Resource, and Page node |
* PDF, we must now create the Length, Resource, and Page node |
* for the page contents. |
* for the page contents. |
*/ |
*/ |
Line 872 ps_begin(struct termp *p) |
|
Line 865 ps_begin(struct termp *p) |
|
p->ps->flags = PS_MARGINS; |
p->ps->flags = PS_MARGINS; |
p->ps->pscol = p->ps->left; |
p->ps->pscol = p->ps->left; |
p->ps->psrow = p->ps->header; |
p->ps->psrow = p->ps->header; |
|
p->ps->lastrow = 0; /* impossible row */ |
|
|
ps_setfont(p, TERMFONT_NONE); |
ps_setfont(p, TERMFONT_NONE); |
|
|
Line 911 ps_begin(struct termp *p) |
|
Line 905 ps_begin(struct termp *p) |
|
for (i = 0; i < (int)TERMFONT__MAX; i++) |
for (i = 0; i < (int)TERMFONT__MAX; i++) |
ps_printf(p, " %s", fonts[i].name); |
ps_printf(p, " %s", fonts[i].name); |
|
|
ps_printf(p, "\n%%%%EndComments\n"); |
ps_printf(p, "\n%%%%DocumentSuppliedResources: " |
|
"procset MandocProcs 1.0 0\n"); |
|
ps_printf(p, "%%%%EndComments\n"); |
|
ps_printf(p, "%%%%BeginProlog\n"); |
|
ps_printf(p, "%%%%BeginResource: procset MandocProcs " |
|
"10170 10170\n"); |
|
/* The font size is effectively hard-coded for now. */ |
|
ps_printf(p, "/fs %zu def\n", p->ps->scale); |
|
for (i = 0; i < (int)TERMFONT__MAX; i++) |
|
ps_printf(p, "/f%d { /%s fs selectfont } def\n", |
|
i, fonts[i].name); |
|
ps_printf(p, "/s { 3 1 roll moveto show } bind def\n"); |
|
ps_printf(p, "/c { exch currentpoint exch pop " |
|
"moveto show } bind def\n"); |
|
ps_printf(p, "%%%%EndResource\n"); |
|
ps_printf(p, "%%%%EndProlog\n"); |
ps_printf(p, "%%%%BeginSetup\n"); |
ps_printf(p, "%%%%BeginSetup\n"); |
ps_printf(p, "%%%%BeginFeature: *PageSize %s\n", |
ps_printf(p, "%%%%BeginFeature: *PageSize %s\n", |
p->ps->medianame); |
p->ps->medianame); |
Line 958 ps_pletter(struct termp *p, int c) |
|
Line 967 ps_pletter(struct termp *p, int c) |
|
if (TERMTYPE_PS == p->type) { |
if (TERMTYPE_PS == p->type) { |
ps_printf(p, "%%%%Page: %zu %zu\n", |
ps_printf(p, "%%%%Page: %zu %zu\n", |
p->ps->pages + 1, p->ps->pages + 1); |
p->ps->pages + 1, p->ps->pages + 1); |
ps_printf(p, "/%s %zu selectfont\n", |
ps_printf(p, "f%d\n", (int)p->ps->lastf); |
fonts[(int)p->ps->lastf].name, |
|
p->ps->scale); |
|
} else { |
} else { |
pdf_obj(p, p->ps->pdfbody + |
pdf_obj(p, p->ps->pdfbody + |
p->ps->pages * 4); |
p->ps->pages * 4); |
Line 985 ps_pletter(struct termp *p, int c) |
|
Line 992 ps_pletter(struct termp *p, int c) |
|
ps_printf(p, "%.3f %.3f Td\n(", |
ps_printf(p, "%.3f %.3f Td\n(", |
AFM2PNT(p, p->ps->pscol), |
AFM2PNT(p, p->ps->pscol), |
AFM2PNT(p, p->ps->psrow)); |
AFM2PNT(p, p->ps->psrow)); |
} else |
} else { |
ps_printf(p, "%.3f %.3f moveto\n(", |
ps_printf(p, "%.3f", AFM2PNT(p, p->ps->pscol)); |
AFM2PNT(p, p->ps->pscol), |
if (p->ps->psrow != p->ps->lastrow) |
AFM2PNT(p, p->ps->psrow)); |
ps_printf(p, " %.3f", |
|
AFM2PNT(p, p->ps->psrow)); |
|
ps_printf(p, "("); |
|
} |
p->ps->flags |= PS_INLINE; |
p->ps->flags |= PS_INLINE; |
} |
} |
|
|
Line 1036 ps_pclose(struct termp *p) |
|
Line 1046 ps_pclose(struct termp *p) |
|
if ( ! (PS_INLINE & p->ps->flags)) |
if ( ! (PS_INLINE & p->ps->flags)) |
return; |
return; |
|
|
if (TERMTYPE_PS != p->type) { |
if (TERMTYPE_PS != p->type) |
ps_printf(p, ") Tj\nET\n"); |
ps_printf(p, ") Tj\nET\n"); |
} else |
else if (p->ps->psrow == p->ps->lastrow) |
ps_printf(p, ") show\n"); |
ps_printf(p, ")c\n"); |
|
else { |
|
ps_printf(p, ")s\n"); |
|
p->ps->lastrow = p->ps->psrow; |
|
} |
|
|
p->ps->flags &= ~PS_INLINE; |
p->ps->flags &= ~PS_INLINE; |
} |
} |
Line 1258 ps_setfont(struct termp *p, enum termfont f) |
|
Line 1272 ps_setfont(struct termp *p, enum termfont f) |
|
return; |
return; |
|
|
if (TERMTYPE_PS == p->type) |
if (TERMTYPE_PS == p->type) |
ps_printf(p, "/%s %zu selectfont\n", |
ps_printf(p, "f%d\n", (int)f); |
fonts[(int)f].name, p->ps->scale); |
|
else |
else |
ps_printf(p, "/F%d %zu Tf\n", |
ps_printf(p, "/F%d %zu Tf\n", |
(int)f, p->ps->scale); |
(int)f, p->ps->scale); |