/*	plt/pterm.c		Paul Albrecht		Sept 1984

	Last Edit:	May 5, 1989

	Copyright (C) Paul Albrecht 1988.  All rights reserved.

	All xfull and yfull dimensions should be in the thousands
	in order to avoid roundoff errors in small motions.
*/


#include	"plt.h"


struct	pdev	pdevs[] = {
	"go140", 0,
		4096, 4096, 3120, 0.16, 0.97, 0.15, 0.90, 88, 56, 0, 0,
	"xw", 0,
		4096, 4096, 3120, 0.16, 0.97, 0.15, 0.90, 88, 56, 0, 0,
	"sun",   0,
		4604, 4604, 3596, 0.20, 0.95, 0.20, 0.85, 72, 44, 14, 11,
	/* lw is special - initialization determines xfull, yfull */
	"lw",	SEP_GRAPH | SPECIAL_FNT | ROT_LABEL,
		0, 0, 0, 0.20, 0.95, 0.20, 0.85, 0, 0, 7.2, 6,
	"ega", 	SEP_GRAPH,
		3200, 2250, 1750, 0.17, 0.95, 0.15, 0.90, 50, 40, 8.5, 6,
	"pga", 	SEP_GRAPH,
		2556, 2556, 1916, 0.17, 0.95, 0.20, 0.85, 60, 32, 0, 0,
	"go235", 0,
		4096, 4096, 3168, 0.16, 0.97, 0.15, 0.90, 88, 56, 9, 7,
	"seltek", 0,
		4096, 4096, 3120, 0.17, 0.95, 0.15, 0.90, 88, 60, 0, 0,
	"4014",	0,
		4096, 4096, 3120, 0.20, 0.95, 0.20, 0.85, 80, 48, 0, 0,
	"mcd",	SEP_GRAPH,
		1664, 1664, 1200, 0.15, 0.95, 0.15, 0.85, 32, 18, 12.75, 9,
	"laser", SEP_GRAPH,
		1023, 780, 780, 0.20, 0.95, 0.20, 0.85, 24, 14, 0, 0,
	"7470",	SEP_GRAPH,
		3328, 3328, 2400, 0.15, 0.95, 0.15, 0.85, 68, 46, 0, 0,
	"4662", SEP_GRAPH,
		4095, 2732, 2732, 0.20, 0.95, 0.20, 0.85, 88, 56, 0, 0,
	"vt52",	0,
		800, 640, 240, 0.10, 0.95, 0.15, 0.99, 10, 10, 0, 0,
	"dumb",	0,
		630, 630, 230, 0.15, 0.95, 0.15, 0.90, 10, 10, 0, 0,
	};



PTERMLookup( ptermName, hardwired )
char	*ptermName, *hardwired;
{
	if( hardwired ) {
		for( p=pdevs;  p < ENDP(pdevs);  p++ ) {
			if( strcmp(hardwired,p->pterm) == 0 )
				break;
		}
		if( p == ENDP(pdevs) )
			err( NO, "Driver error, no PTERM `%s'" );
		if( strcmp(ptermName,hardwired) != 0 )
			err( NO, "Program hardwired for PTERM `%s'", hardwired );
	}
	else {	for( p=pdevs;  p < ENDP(pdevs);  p++ ) {
			if( strcmp(ptermName,p->pterm) == 0 )
				break;
		}
		if( p == ENDP(pdevs) )
			err( NO, "Unrecognized PTERM `%s'", ptermName );
	}
	if( p == ENDP(pdevs) )
		p = pdevs;

	if( (p->mode&SEP_GRAPH) == 0 && !isatty(fileno(stdout)) )
		p->mode |= SEP_GRAPH;

	if( fixed_font == DEFAULT )
		fixed_font = !(p->mode & SPECIAL_FNT);

	chht = p->ch;
	chwd = p->cw;

	if( p->xinches == 0 )
		p->xinches = 8;
	if( p->yinches == 0 )
		p->yinches = 6;

	xinch = p->xfull/p->xinches;
	yinch = p->yfull/p->yinches;
}