DataMuseum.dk

top - metrics - download

    Length: 2717 (0xa9d)
    Types: TextFile
    Names: »pktoch.c«

└─⟦060c9c824⟧ Bits:30007080 DKUUG TeX 2/12/89
    └─⟦this⟧ »./DVIware/laser-setters/quicspool/src/pktoch.c« 
└─⟦52210d11f⟧ Bits:30007239 EUUGD2: TeX 3 1992-12
    └─⟦af5ba6c8e⟧ »unix3.0/DVIWARE.tar.Z« 
        └─⟦ca79c7339⟧ 
            └─⟦this⟧ »DVIware/laser-setters/quicspool/src/pktoch.c« 

TextFile

#ifndef lint
static char	*rcs = "$Header: pktoch.c,v 1.1 88/01/15 13:04:58 simpson Rel $";
#endif
/*
$Log:	pktoch.c,v $
 * Revision 1.1  88/01/15  13:04:58  simpson
 * initial release
 * 
 * Revision 0.1  87/12/11  18:31:11  simpson
 * beta test
 * 
*/
#include <stdio.h>
#include <local/standard.h>
#include "fontinfo.h"

char	*Usage = "Usage: %s <pk-file> <chr-file>\n";
char	*WhoAmI;
float	Version = 1.0;

main(argc, argv)
int	argc;
char	*argv[];
{
    int		c;
    extern int	optind;
    void	printrasters(), seteoffunction(), eofencountered();
    FILE	*output;
    struct FontInfo	*getfontinfo(), *fi;

    WhoAmI = argv[0];
    while ((c = getopt(argc, argv, "")) != EOF)
    	switch (c) {
	case '?':
err:	    fprintf(stderr, Usage, WhoAmI);
  	    exit(FAIL);
	}
    if (optind != argc - 2)
    	goto err;
    printf("This is PKtoCH, Version %.1f\n", Version);
    seteoffunction(eofencountered);
    if (!(fi = getfontinfo(argv[optind], 'X'))) {
	fprintf(stderr, "%s: %s is not readable or is not a pk file\n",
	WhoAmI, argv[optind]);
	exit(FAIL);
    }
    if (!(output = fopen(argv[++optind], "w"))) {
	fprintf(stderr, "%s: could not open %s\n", WhoAmI, argv[optind]);
	exit(FAIL);
    }
    fputs("Font file info :", output);
    fputs(fi->comment, output);
    (void)putc('\n', output);
    fprintf(output, "Design Size    :%ld\n", fi->ds);
    fprintf(output, "Checksum       :%ld\n", fi->cs);
    fprintf(output, "hppp           :%ld\n", fi->hppp);
    fprintf(output, "vppp           :%ld\n", fi->vppp);
    printrasters(argv[optind - 1], output);
    (void)fclose(output);
    printf("All done.\n");
    exit(SUCCEED);
}

void printrasters(infile, output)
char	*infile;
FILE	*output;
{
    struct CharInfo	*ci;
    void		printbitmap(), resetpkfile();

    resetpkfile();
    while (getnextcharinfo(infile, 'X', &ci) != 1) {
	(void)putc('\f', output);
	fprintf(output, "chrcode        :");
	if (' ' <= ci->cc && ci->cc <= '~')
	    fprintf(output, "'%c'\n", (int)ci->cc);
	else
	    fprintf(output, "%ld\n", ci->cc);
	fprintf(output, "tfm width      :%ld\n", ci->tfm);
	if (ci->preambletype == plong) {
	    fprintf(output, "dx             :%ld\n", ci->dxordm);
	    fprintf(output, "dy             :%ld\n", ci->dy);
	} else
	    fprintf(output, "dm             :%ld\n", ci->dxordm);
	fprintf(output, "width          :%ld\n", ci->w);
	fprintf(output, "height         :%ld\n", ci->h);
	fprintf(output, "h offset       :%ld\n", ci->hoff);
	fprintf(output, "v offset       :%ld\n", ci->voff);
	fprintf(output, "+\n");
	printbitmap(output, ci->bitmap, (int)ci->w, (int)ci->h);
    }
}

void eofencountered()
{
    fprintf(stderr, "%s: premature eof encountered in PK file\n", WhoAmI);
    exit(FAIL);
}