SysIII/usr/src/uts/vax/io/dn.c

/*
 * DN-11 ACU interface
 */

#include "sys/param.h"
#include "sys/dir.h"
#include "sys/user.h"

struct device {
	short	dn_reg[4];
};

struct device *dn_addr[];
int	dn_cnt;

#define	PWI	0100000
#define	ACR	040000
#define	DLO	010000
#define	DONE	0200
#define	IENABLE	0100
#define	DSS	040
#define	PND	020
#define	MENABLE	04
#define	DPR	02
#define	CRQ	01

#define	DNPRI	(PZERO+5)

dnopen(dev)
register dev;
{
	register struct device *dp;

	if (dev >= dn_cnt ||
	   (dp = dn_addr[dev>>2])->dn_reg[dev&03]&(PWI|DLO|CRQ))
		u.u_error = ENXIO;
	else {
		dp->dn_reg[0] |= MENABLE;
		dp->dn_reg[dev&03] = IENABLE|MENABLE|CRQ;
	}
}

dnclose(dev)
{
	dn_addr[dev>>2]->dn_reg[dev&03] = MENABLE;
}

dnwrite(dev)
{
	register c;
	register short *dp;

	dp = &(dn_addr[dev>>2]->dn_reg[dev&03]);
	while ((*dp & (PWI|ACR|DSS)) == 0) {
		spl4();
		if ((*dp&PND) == 0 || u.u_count == 0 || (c=cpass()) < 0)
			sleep(dp, DNPRI);
		else switch(c) {
		case '-':
			delay(4*HZ);
			break;
		case 'f':
			*dp &= ~CRQ;
			delay(1*HZ);
			*dp |= CRQ;
			break;
		case '*':
		case ':':
			c = 012;
			goto dial;
		case '#':
		case ';':
			c = 013;
			goto dial;
		case 'e':
		case '<':
			c = 014;
			goto dial;
		case 'w':
		case '=':
			c = 015;
			goto dial;
		default:
			if (c<'0' || c>'9')
				continue;
		dial:
			*dp = (c<<8)|IENABLE|MENABLE|DPR|CRQ;
			sleep(dp, DNPRI);
		}
		spl0();
	}
	if (*dp&(PWI|ACR))
		u.u_error = EIO;
}

dnintr(dev)
{
	register short *dp,*ep;

	dp = &(dn_addr[dev]->dn_reg[0]);
	*dp &= ~MENABLE;
	for (ep=dp; ep<dp+4; ep++)
		if (*ep&DONE) {
			*ep &= ~DONE;
			wakeup(ep);
		}
	*dp |= MENABLE;
}