BSD 4 development

[unix-history] / usr / src / sys / newdev / dhdm.c

/*      dhdm.c  3.1     9/14/80 */

/*
*      DM-BB driver
*/
#include "../h/param.h"
#include "../h/tty.h"
#include "../h/conf.h"
#include "../h/map.h"
#include "../h/pte.h"
#include "../h/uba.h"

#define DMADDR  ((struct device *)(UBA0_DEV+0170500))

struct  tty dh11[];
int     ndh11;          /* Set by dh.c to number of lines */

#define DONE    0200
#define SCENABL 040
#define CLSCAN  01000
#define TURNON  03      /* CD lead, line enable */
#define RQS     04      /* request to send */
#define TURNOFF 1       /* line enable only */
#define CARRIER 0100

struct device
{
       short   dmcsr;
       short   dmlstat;
       short   junk[2];
};

/*
* Turn on the line associated with the (DH) device dev.
*/
dmopen(dev)
{
       register struct tty *tp;
       register struct device *addr;
       register d;

       d = minor(dev);
       tp = &dh11[d];
       addr = DMADDR;
       addr += d>>4;
       spl5();
       addr->dmcsr &= ~SCENABL;
       while (addr->dmcsr & SCBUSY)
               ;
       addr->dmcsr = d&017;
       addr->dmlstat = TURNON;
       if (addr->dmlstat&CARRIER)
               tp->t_state |= CARR_ON;
       addr->dmcsr = IENABLE|SCENABL;
       while ((tp->t_state&CARR_ON)==0)
               sleep((caddr_t)&tp->t_rawq, TTIPRI);
       spl0();
}

/*
* Dump control bits into the DM registers.
*/
dmctl(dev, bits, how)
{
       register struct device *addr;
       register d, s;

       d = minor(dev);
       if (d >= ndh11)
               return;
       addr = DMADDR;
       addr += d>>4;
       s = spl5();
       addr->dmcsr &= ~SCENABL;
       while (addr->dmcsr & SCBUSY)
               ;
       addr->dmcsr = d&017;
       switch(how) {
       case DMSET:
               addr->dmlstat = bits;
               break;
       case DMBIS:
               addr->dmlstat |= bits;
               break;
       case DMBIC:
               addr->dmlstat &= ~bits;
               break;
       }
       addr->dmcsr = IENABLE|SCENABL;
       splx(s);
}

/*
* DM11 interrupt.
* Mainly, deal with carrier transitions.
*/
dmint(dev)
{
       register struct tty *tp;
       register struct device *addr;
       register d;

       d = minor(dev);
       addr = DMADDR;
       addr += d;
       if (addr->dmcsr&DONE && addr->dmcsr&CARRTRANS) {
               tp = &dh11[(d<<4)+(addr->dmcsr&017)];
               if (tp < &dh11[ndh11]) {
                       wakeup((caddr_t)&tp->t_rawq);
                       if ((tp->t_state&WOPEN)==0 &&
                           (tp->t_local&LMDMBUF)) {
                               if (addr->dmlstat & CARRIER) {
                                       tp->t_state &= ~TTSTOP;
                                       ttstart(tp);
                               } else if ((tp->t_state&TTSTOP) == 0) {
                                       tp->t_state |= TTSTOP;
                                       dhstop(tp, 0);
                               }
                       else if ((addr->dmlstat&CARRIER)==0) {
                               if ((tp->t_state&WOPEN)==0 &&
                                   (tp->t_local&LNOHANG)==0) {
                                       gsignal(tp->t_pgrp, SIGHUP);
                                       gsignal(tp->t_pgrp, SIGCONT);
                                       addr->dmlstat = 0;
                                       flushtty(tp, FREAD|FWRITE);
                               }
                               tp->t_state &= ~CARR_ON;
                       } else
                               tp->t_state |= CARR_ON;
               }
               addr->dmcsr = IENABLE|SCENABL;
       }
}