diff options
author | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
commit | e0c6872cf40896c7be36b11dcc744620f10adf1d (patch) | |
tree | 60335e10d2f4354b0674ec22d7b53f0f8abee672 /dviware/dvi2pcl/makepkdir.c |
Initial commit
Diffstat (limited to 'dviware/dvi2pcl/makepkdir.c')
-rw-r--r-- | dviware/dvi2pcl/makepkdir.c | 120 |
1 files changed, 120 insertions, 0 deletions
diff --git a/dviware/dvi2pcl/makepkdir.c b/dviware/dvi2pcl/makepkdir.c new file mode 100644 index 0000000000..fd0eec0214 --- /dev/null +++ b/dviware/dvi2pcl/makepkdir.c @@ -0,0 +1,120 @@ +/* $Log: makepkdir.c,v $ + * Revision 0.8 92/11/23 19:46:50 19:46:50 bt (Bo Thide') + * Fixed resolution bug. Portable downloading. Added/changed options. PJXL color support + * + * Revision 0.7 92/11/13 02:41:34 02:41:34 bt (Bo Thide') + * More bug fixes and improvements. Support for PaintJet XL + * + * Revision 0.6 92/11/10 21:47:50 21:47:50 bt (Bo Thide') + * Bug fixes. Added -R option. Better font handling. + * + * Revision 0.5 92/11/09 16:25:38 16:25:38 bt (Bo Thide') + * Rewrite of dospecial.c. Extended \special support + * + * Revision 0.4 92/11/08 02:45:54 02:45:54 bt (Bo Thide') + * Changed to portable bit manipulations. Replaced strrstr for non-POSIX compliant C. Fixed numerous bugs. Added support for more \special's. + * + * Revision 0.3 92/08/24 12:43:20 12:43:20 bt (Bo Thide') + * Fixed 8 bit (dc font) support. + * + * Revision 0.2 92/08/23 17:28:58 17:28:58 bt (Bo Thide') + * Source cleaned up. Changed certain function calls. Removed globals. + * + * Revision 0.1 92/08/22 23:58:48 23:58:48 bt (Bo Thide') + * First Release. + * */ + +/* + * The coding scheme for the different characters in .pk files in general are + * not stored in ascending order of the ascii value of the character. Access + * to an individual character would need a lot of searching within the + * pk buffer. So it is wise, to make a directory for all of the characters + * in the .pk font which holds a pointer to the flag byte for each of the + * characters when the pkfont is loaded the first time. These pointers are + * relative to 'pkbase' and stored into '(cbase + c)->pk_char' of the + * corresponding 'font'. + */ + +#include <stdio.h> +#include "globals.h" +#include "macros.h" +#include "pk.h" + +static char rcsid[] = "$Header: makepkdir.c,v 0.8 92/11/23 19:46:50 bt Exp $"; + +makepkdir() +{ + int flag, i; + byte *p, *pc; + int format; + long ds, hppp, vppp, pkchksum; + unsigned cc, pl; + + for(i=0 ; i<256 ; i++) + (cbase + i)->pk_char = 0; + p = pkbase + *(pkbase + 2) + 3; + ds = getpuquad(p); + pkchksum = getpuquad(p); +#ifdef DEBUG2 + fprintf(stderr,"makepkdir: p-pkbase=%d, ds=%d, pkchksum=%d\n", p-pkbase, ds, pkchksum); +#endif /* DEBUG2 */ + if(font->checksum != pkchksum) + fprintf(stderr,"makepkdir: Checksum mismatch between\n%s and the .dvi file\n", pkname); + hppp = getpuquad(p); + vppp = getpuquad(p); /* points now to first pk charcter */ + + font->height = (double)ds/(double)vppp; +#ifdef DEBUG2 + fprintf(stderr,"makepkdir: ds = %d, hppp = %d, vppp = %d, font->height = %g\n", ds, hppp, vppp, font->height); +#endif /* DEBUG2 */ + + while((flag = getpubyte(p)) != PK_POST) { + if(flag < PK_CMD) { + pc = p - 1; + format = flag & FMASK; + if(format < 4) { + pl = getpubyte(p); + cc = getpubyte(p); + p += (format*256 + pl); + } + else if(format < 7) { + pl = getpupair(p); + cc = getpubyte(p); + p += ((format-4)*65536L + pl); + } + else { + pl = getpuquad(p); + cc = getpuquad(p); + p += pl; + } + if(cc < 256) (cbase + cc)->pk_char = pc - pkbase; + } + else { + switch(flag) { + case PK_XXX1: + pl = getpubyte(p); + break; + case PK_XXX2: + pl = getpupair(p); + break; + case PK_XXX3: + pl = getputrio(p); + break; + case PK_XXX4: + pl = getpuquad(p); + break; + case PK_YYY: + pl = 4; + break; + case PK_PRE: + fprintf(stderr,"PK_PRE command in the .pk font file %s\n", pkname); + exit(-1); + break; + default: + pl = 0; + break; + } + p += pl; + } + } +} |