Add original unix v6
This commit is contained in:
memnoth
+231
@@ -0,0 +1,231 @@
|
||||
#
|
||||
/*
|
||||
*/
|
||||
|
||||
/*
|
||||
* DC-11 driver
|
||||
*/
|
||||
#include "../param.h"
|
||||
#include "../conf.h"
|
||||
#include "../user.h"
|
||||
#include "../tty.h"
|
||||
#include "../proc.h"
|
||||
|
||||
/*
|
||||
* Base address of DC-11's. Minor device i is at
|
||||
* DCADDR + 10*i.
|
||||
*/
|
||||
#define DCADDR 0174000
|
||||
|
||||
/*
|
||||
* Number of DC's for which table space is allocated.
|
||||
*/
|
||||
#define NDC11 14
|
||||
|
||||
/*
|
||||
* Control bits in device registers
|
||||
*/
|
||||
#define CDLEAD 01
|
||||
#define CARRIER 04
|
||||
#define SPEED1 010
|
||||
#define STOP1 0400
|
||||
#define RQSEND 01
|
||||
#define PARITY 040
|
||||
#define ERROR 0100000
|
||||
#define CTRANS 040000
|
||||
#define RINGIND 020000
|
||||
|
||||
|
||||
struct tty dc11[NDC11];
|
||||
|
||||
struct dcregs {
|
||||
int dcrcsr;
|
||||
int dcrbuf;
|
||||
int dctcsr;
|
||||
int dctbuf;
|
||||
};
|
||||
|
||||
/*
|
||||
* Input-side speed and control bit table.
|
||||
* Each DC11 has 4 speeds which correspond to the 4 non-zero entries.
|
||||
* The table index is the same as the speed-selector
|
||||
* number for the DH11.
|
||||
* Attempts to set the speed to a zero entry are ignored.
|
||||
*/
|
||||
int dcrstab[] {
|
||||
0, /* 0 baud */
|
||||
0, /* 50 baud */
|
||||
0, /* 75 baud */
|
||||
0, /* 110 baud */
|
||||
01101, /* 134.5 baud: 7b/ch, speed 0 */
|
||||
0111, /* 150 baud: 8b/ch, speed 1 */
|
||||
0, /* 200 baud */
|
||||
0121, /* 300 baud: 8b/ch, speed 2 */
|
||||
0, /* 600 baud */
|
||||
0131, /* 1200 baud */
|
||||
0, /* 1800 baud */
|
||||
0, /* 2400 baud */
|
||||
0, /* 4800 baud */
|
||||
0, /* 9600 baud */
|
||||
0, /* X0 */
|
||||
0, /* X1 */
|
||||
};
|
||||
|
||||
/*
|
||||
* Transmitter speed table
|
||||
*/
|
||||
int dctstab[] {
|
||||
0, /* 0 baud */
|
||||
0, /* 50 baud */
|
||||
0, /* 75 baud */
|
||||
0, /* 110 baud */
|
||||
0501, /* 134.5 baud: stop 1 */
|
||||
0511, /* 150 baud */
|
||||
0, /* 200 baud */
|
||||
0521, /* 300 baud */
|
||||
0, /* 600 baud */
|
||||
0531, /* 1200 baud */
|
||||
0, /* 1800 baud */
|
||||
0, /* 2400 baud */
|
||||
0, /* 4800 baud */
|
||||
0, /* 9600 baud */
|
||||
0, /* X0 */
|
||||
0, /* X1 */
|
||||
};
|
||||
|
||||
/*
|
||||
* Open a DC11, waiting until carrier is established.
|
||||
* Default initial conditions are set up on the first open.
|
||||
* t_state's CARR_ON bit is a pure copy of the hardware
|
||||
* CARRIER bit, and is only used to regularize
|
||||
* carrier tests in general tty routines.
|
||||
*/
|
||||
dcopen(dev, flag)
|
||||
{
|
||||
register struct tty *rtp;
|
||||
register *addr;
|
||||
|
||||
if (dev.d_minor >= NDC11) {
|
||||
u.u_error = ENXIO;
|
||||
return;
|
||||
}
|
||||
rtp = &dc11[dev.d_minor];
|
||||
rtp->t_addr = addr = DCADDR + dev.d_minor*8;
|
||||
rtp->t_state =| WOPEN;
|
||||
addr->dcrcsr =| IENABLE|CDLEAD;
|
||||
if ((rtp->t_state&ISOPEN) == 0) {
|
||||
rtp->t_erase = CERASE;
|
||||
rtp->t_kill = CKILL;
|
||||
addr->dcrcsr = IENABLE|CDLEAD|SPEED1;
|
||||
addr->dctcsr = IENABLE|SPEED1|STOP1|RQSEND;
|
||||
rtp->t_state = ISOPEN | WOPEN;
|
||||
rtp->t_flags = ODDP|EVENP|ECHO;
|
||||
}
|
||||
if (addr->dcrcsr & CARRIER)
|
||||
rtp->t_state =| CARR_ON;
|
||||
while ((rtp->t_state & CARR_ON) == 0)
|
||||
sleep(&rtp->t_rawq, TTIPRI);
|
||||
rtp->t_state =& ~WOPEN;
|
||||
if (u.u_procp->p_ttyp == 0) {
|
||||
u.u_procp->p_ttyp = rtp;
|
||||
rtp->t_dev = dev;
|
||||
}
|
||||
}
|
||||
|
||||
/*
|
||||
* Close a dc11
|
||||
*/
|
||||
dcclose(dev)
|
||||
{
|
||||
register struct tty *tp;
|
||||
|
||||
(tp = &dc11[dev.d_minor])->t_state = 0;
|
||||
if (tp->t_flags&HUPCL)
|
||||
tp->t_addr->dcrcsr =& ~CDLEAD;
|
||||
wflushtty(tp);
|
||||
}
|
||||
|
||||
/*
|
||||
* Read a DC11
|
||||
*/
|
||||
dcread(dev)
|
||||
{
|
||||
ttread(&dc11[dev.d_minor]);
|
||||
}
|
||||
|
||||
/*
|
||||
* Write a DC11
|
||||
*/
|
||||
dcwrite(dev)
|
||||
{
|
||||
ttwrite(&dc11[dev.d_minor]);
|
||||
}
|
||||
|
||||
/*
|
||||
* DC11 transmitter interrupt.
|
||||
*/
|
||||
dcxint(dev)
|
||||
{
|
||||
register struct tty *tp;
|
||||
|
||||
ttstart(tp = &dc11[dev.d_minor]);
|
||||
if (tp->t_outq.c_cc == 0 || tp->t_outq.c_cc == TTLOWAT)
|
||||
wakeup(&tp->t_outq);
|
||||
}
|
||||
|
||||
/*
|
||||
* DC11 receiver interrupt.
|
||||
*/
|
||||
dcrint(dev)
|
||||
{
|
||||
register struct tty *tp;
|
||||
register int c, csr;
|
||||
|
||||
tp = &dc11[dev.d_minor];
|
||||
c = tp->t_addr->dcrbuf;
|
||||
/*
|
||||
* If carrier is off, and an open is not in progress,
|
||||
* knock down the CD lead to hang up the local dataset
|
||||
* and signal a hangup.
|
||||
*/
|
||||
if (((csr = tp->t_addr->dcrcsr) & CARRIER) == 0) {
|
||||
if ((tp->t_state&WOPEN) == 0) {
|
||||
tp->t_addr->dcrcsr =& ~CDLEAD;
|
||||
if (tp->t_state & CARR_ON)
|
||||
signal(tp, SIGHUP);
|
||||
flushtty(tp);
|
||||
}
|
||||
tp->t_state =& ~CARR_ON;
|
||||
return;
|
||||
}
|
||||
if (csr&ERROR || (tp->t_state&ISOPEN)==0) {
|
||||
if (tp->t_state&WOPEN && csr&CARRIER)
|
||||
tp->t_state =| CARR_ON;
|
||||
wakeup(tp);
|
||||
return;
|
||||
}
|
||||
csr =& PARITY;
|
||||
if (csr&&(tp->t_flags&ODDP) || !csr&&(tp->t_flags&EVENP))
|
||||
ttyinput(c, tp);
|
||||
}
|
||||
|
||||
/*
|
||||
* DC11 stty/gtty.
|
||||
* Perform general functions and set speeds.
|
||||
*/
|
||||
dcsgtty(dev, av)
|
||||
int *av;
|
||||
{
|
||||
register struct tty *tp;
|
||||
register r;
|
||||
|
||||
tp = &dc11[dev.d_minor];
|
||||
if (ttystty(tp, av))
|
||||
return;
|
||||
if (r = dcrstab[tp->t_speeds.lobyte&017])
|
||||
tp->t_addr->dcrcsr = r;
|
||||
else
|
||||
tp->t_addr->dcrcsr =& ~CDLEAD;
|
||||
if (r = dctstab[tp->t_speeds.hibyte&017])
|
||||
tp->t_addr->dctcsr = r;
|
||||
}
|
||||
Reference in New Issue
Block a user