1*8778Sroot /* dmf.c 4.13 82/10/21 */ 26940Ssam 36940Ssam #include "dmf.h" 46940Ssam #if NDMF > 0 56940Ssam /* 66940Ssam * DMF32 driver 76940Ssam * 86940Ssam * TODO: 96940Ssam * test with modem 106940Ssam * load as much as possible into silo 116940Ssam * get correct numbers for receive silo parameter timeout 126940Ssam * use auto XON/XOFF 136940Ssam * test reset code 146940Ssam * test with more than one unit 156940Ssam * optimize for efficient DMA and dynamically 166940Ssam * decide between silo and DMA mode 176940Ssam */ 186940Ssam #include "bk.h" 196940Ssam #include "../h/param.h" 206940Ssam #include "../h/conf.h" 216940Ssam #include "../h/dir.h" 226940Ssam #include "../h/user.h" 236940Ssam #include "../h/tty.h" 246940Ssam #include "../h/map.h" 256940Ssam #include "../h/pte.h" 266940Ssam #include "../h/buf.h" 276940Ssam #include "../h/vm.h" 286940Ssam #include "../h/bk.h" 296940Ssam #include "../h/clist.h" 306940Ssam #include "../h/file.h" 317726Sroot #include "../h/uio.h" 326940Ssam 338473Sroot #include "../vaxuba/ubareg.h" 348473Sroot #include "../vaxuba/ubavar.h" 358473Sroot 366940Ssam /* 376940Ssam * Definition of the driver for the auto-configuration program. 386940Ssam */ 396940Ssam int dmfprobe(), dmfattach(), dmfrint(), dmfxint(); 406940Ssam struct uba_device *dmfinfo[NDMF]; 416940Ssam u_short dmfstd[] = { 0 }; 426940Ssam struct uba_driver dmfdriver = 436940Ssam { dmfprobe, 0, dmfattach, 0, dmfstd, "dmf", dmfinfo }; 446940Ssam 456940Ssam /* 466940Ssam * In this driver, "dmf" (unqualified) refers to the async portion 476940Ssam * of the dmf32, "dmfc" to the combo portion, "dmfs" to the sync 486940Ssam * portion, "dmfl" to the lp portion, and "dmfd" to the dr portion. 496940Ssam */ 506940Ssam struct dmfdevice 516940Ssam { 526940Ssam short dmfccsr0; /* combo csr 0 */ 536940Ssam short dmfccsr1; /* combo csr 1 */ 546940Ssam short dmfs[4]; 556940Ssam short dmfcsr; /* control-status register */ 566940Ssam short dmflpr; /* line parameter register */ 576940Ssam short dmfrbuf; /* receiver buffer (ro) */ 586940Ssam union { 596940Ssam u_short dmfirw; /* indirect register word */ 606940Ssam u_char dmfirc[2]; /* " " bytes */ 616940Ssam } dmfun; 626940Ssam short dmfl[2]; 636940Ssam short dmfd[4]; 646940Ssam }; 656940Ssam 666940Ssam #define dmfrsp dmfrbuf /* receive silo parameter register (wo) */ 676940Ssam #define dmftbuf dmfun.dmfirc[0] /* transmit buffer */ 686940Ssam #define dmftsc dmfun.dmfirc[0] /* transmit silo count */ 696940Ssam #define dmfrms dmfun.dmfirc[1] /* receive modem status */ 706940Ssam #define dmflcr dmfun.dmfirc[0] /* line control register */ 716940Ssam #define dmftms dmfun.dmfirc[1] /* transmit modem status */ 726940Ssam #define dmftba dmfun.dmfirw /* transmit buffer address */ 736940Ssam #define dmftcc dmfun.dmfirw /* transmit character count */ 746940Ssam 756940Ssam /* bits in dmfcsr */ 766940Ssam #define DMF_TI 0100000 /* transmit interrupt */ 776940Ssam #define DMF_TIE 0040000 /* transmit interrupt enable */ 786940Ssam #define DMF_NXM 0020000 /* non-existant memory */ 796940Ssam #define DMF_LIN 0003400 /* transmit line number */ 806940Ssam #define DMF_RI 0000200 /* receiver interrupt */ 816940Ssam #define DMF_RIE 0000100 /* receiver interrupt enable */ 826940Ssam #define DMF_CLR 0000040 /* master reset */ 836940Ssam #define DMF_IAD 0000037 /* indirect address register */ 846940Ssam 856940Ssam #define DMFIR_TBUF 000 /* select tbuf indirect register */ 866940Ssam #define DMFIR_LCR 010 /* select lcr indirect register */ 876940Ssam #define DMFIR_TBA 020 /* select tba indirect register */ 886940Ssam #define DMFIR_TCC 030 /* select tcc indirect register */ 896940Ssam 906940Ssam /* bits in dmflpr */ 916940Ssam #define BITS6 (01<<3) 926940Ssam #define BITS7 (02<<3) 936940Ssam #define BITS8 (03<<3) 946940Ssam #define TWOSB 0200 956940Ssam #define PENABLE 040 966940Ssam /* DEC manuals incorrectly say this bit causes generation of even parity. */ 976940Ssam #define OPAR 0100 986940Ssam 996940Ssam #define DMF_IE (DMF_TIE|DMF_RIE) 1006940Ssam 1016940Ssam #define DMF_SILOCNT 32 /* size of DMF output silo (per line) */ 1026940Ssam 1036940Ssam /* bits in dmfrbuf */ 1046940Ssam #define DMF_DSC 0004000 /* data set change */ 1056940Ssam #define DMF_PE 0010000 /* parity error */ 1066940Ssam #define DMF_FE 0020000 /* framing error */ 1076940Ssam #define DMF_DO 0040000 /* data overrun */ 1086940Ssam 1096940Ssam /* bits in dmfrms */ 1106940Ssam #define DMF_USRR 0004 /* user modem signal (pin 25) */ 1116940Ssam #define DMF_SR 0010 /* secondary receive */ 1126940Ssam #define DMF_CTS 0020 /* clear to send */ 1136940Ssam #define DMF_CAR 0040 /* carrier detect */ 1146940Ssam #define DMF_RNG 0100 /* ring */ 1156940Ssam #define DMF_DSR 0200 /* data set ready */ 1166940Ssam 1176940Ssam /* bits in dmftms */ 1186940Ssam #define DMF_USRW 0001 /* user modem signal (pin 18) */ 1196940Ssam #define DMF_DTR 0002 /* data terminal ready */ 1206940Ssam #define DMF_RATE 0004 /* data signal rate select */ 1216940Ssam #define DMF_ST 0010 /* secondary transmit */ 1226940Ssam #define DMF_RTS 0020 /* request to send */ 1236940Ssam #define DMF_BRK 0040 /* pseudo break bit */ 1246940Ssam #define DMF_PREEMPT 0200 /* preempt output */ 1256940Ssam 1266940Ssam /* flags for modem control */ 1276940Ssam #define DMF_ON (DMF_DTR|DMF_RTS) 1286940Ssam #define DMF_OFF 0 1296940Ssam 1306940Ssam /* bits in dmflcr */ 1316940Ssam #define DMF_MIE 0040 /* modem interrupt enable */ 1326940Ssam #define DMF_FLUSH 0020 /* flush transmit silo */ 1336940Ssam #define DMF_RBRK 0010 /* real break bit */ 1346940Ssam #define DMF_RE 0004 /* receive enable */ 1356940Ssam #define DMF_AUTOX 0002 /* auto XON/XOFF */ 1366940Ssam #define DMF_TE 0001 /* transmit enable */ 1376940Ssam 1386940Ssam #define DMFLCR_ENA (DMF_MIE|DMF_RE|DMF_TE) 1396940Ssam 1406940Ssam /* bits in dm lsr, copied from dh.c */ 1416940Ssam #define DML_USR 0001000 /* usr modem sig, not a real DM bit */ 1426940Ssam #define DML_DSR 0000400 /* data set ready, not a real DM bit */ 1436940Ssam #define DML_RNG 0000200 /* ring */ 1446940Ssam #define DML_CAR 0000100 /* carrier detect */ 1456940Ssam #define DML_CTS 0000040 /* clear to send */ 1466940Ssam #define DML_SR 0000020 /* secondary receive */ 1476940Ssam #define DML_ST 0000010 /* secondary transmit */ 1486940Ssam #define DML_RTS 0000004 /* request to send */ 1496940Ssam #define DML_DTR 0000002 /* data terminal ready */ 1506940Ssam #define DML_LE 0000001 /* line enable */ 1516940Ssam 1526940Ssam /* 1536940Ssam * Local variables for the driver 1546940Ssam */ 1556940Ssam char dmf_speeds[] = 1566940Ssam { 0, 0, 1, 2, 3, 4, 0, 5, 6, 7, 010, 012, 014, 016, 017, 0 }; 1576940Ssam 1586940Ssam struct tty dmf_tty[NDMF*8]; 1596940Ssam char dmfsoftCAR[NDMF]; 160*8778Sroot #ifndef lint 161*8778Sroot int ndmf = NDMF*8; /* used by iostat */ 162*8778Sroot #endif 1636940Ssam int dmfact; /* mask of active dmf's */ 1646940Ssam int dmfstart(), ttrstrt(); 1656940Ssam 1666940Ssam #ifdef DMFDMA 1676940Ssam /* 1686940Ssam * The clist space is mapped by the driver onto each UNIBUS. 1696940Ssam * The UBACVT macro converts a clist space address for unibus uban 1706940Ssam * into an i/o space address for the DMA routine. 1716940Ssam */ 1726940Ssam int dmf_ubinfo[MAXNUBA]; /* info about allocated unibus map */ 1736940Ssam static int cbase[MAXNUBA]; /* base address in unibus map */ 1746940Ssam #define UBACVT(x, uban) (cbase[uban] + ((x)-(char *)cfree)) 1756940Ssam #endif 1766940Ssam 1776940Ssam /* 1786940Ssam * Routine for configuration to set dmf interrupt. 1796940Ssam */ 1806940Ssam /*ARGSUSED*/ 1816940Ssam dmfprobe(reg, ctlr) 1826940Ssam caddr_t reg; 1836940Ssam int ctlr; 1846940Ssam { 1856940Ssam register int br, cvec; /* these are ``value-result'' */ 1866940Ssam register struct dmfdevice *dmfaddr = (struct dmfdevice *)reg; 1876940Ssam 1886940Ssam #ifdef lint 1896940Ssam br = 0; cvec = br; br = cvec; 1906940Ssam #endif 1916940Ssam br = 0x15; 1926940Ssam cvec = (uba_hd[numuba].uh_lastiv -= 4*8); 1936940Ssam dmfaddr->dmfccsr0 = cvec >> 2; 1946940Ssam /* NEED TO SAVE IT SOMEWHERE FOR OTHER DEVICES */ 1957412Skre return (sizeof (struct dmfdevice)); 1966940Ssam } 1976940Ssam 1986940Ssam /* 1996940Ssam * Routine called to attach a dmf. 2006940Ssam */ 2016940Ssam dmfattach(ui) 2026940Ssam struct uba_device *ui; 2036940Ssam { 2046940Ssam 2056940Ssam dmfsoftCAR[ui->ui_unit] = ui->ui_flags; 2066940Ssam } 2076940Ssam 2086940Ssam 2096940Ssam /* 2106940Ssam * Open a DMF32 line, mapping the clist onto the uba if this 2116940Ssam * is the first dmf on this uba. Turn on this dmf if this is 2126940Ssam * the first use of it. 2136940Ssam */ 2146940Ssam /*ARGSUSED*/ 2156940Ssam dmfopen(dev, flag) 2166940Ssam dev_t dev; 2176940Ssam { 2186940Ssam register struct tty *tp; 2196940Ssam register int unit, dmf; 2206940Ssam register struct dmfdevice *addr; 2216940Ssam register struct uba_device *ui; 2226940Ssam int s; 2236940Ssam 2246940Ssam unit = minor(dev); 2256940Ssam dmf = unit >> 3; 2268567Sroot if (unit >= NDMF*8 || (ui = dmfinfo[dmf])== 0 || ui->ui_alive == 0) 2278567Sroot return (ENXIO); 2286940Ssam tp = &dmf_tty[unit]; 2298567Sroot if (tp->t_state&TS_XCLUDE && u.u_uid!=0) 2308567Sroot return (EBUSY); 2316940Ssam addr = (struct dmfdevice *)ui->ui_addr; 2326940Ssam tp->t_addr = (caddr_t)addr; 2336940Ssam tp->t_oproc = dmfstart; 2346971Ssam tp->t_state |= TS_WOPEN; 2356940Ssam /* 2366940Ssam * While setting up state for this uba and this dmf, 2376940Ssam * block uba resets which can clear the state. 2386940Ssam */ 2396940Ssam s = spl5(); 2406940Ssam #ifdef DMFDMA 2416940Ssam if (dmf_ubinfo[ui->ui_ubanum] == 0) { 2426940Ssam dmf_ubinfo[ui->ui_ubanum] = 2436940Ssam uballoc(ui->ui_ubanum, (caddr_t)cfree, 2446940Ssam nclist*sizeof(struct cblock), 0); 2456940Ssam cbase[ui->ui_ubanum] = dmf_ubinfo[ui->ui_ubanum]&0x3ffff; 2466940Ssam } 2476940Ssam #endif 2486940Ssam if ((dmfact&(1<<dmf)) == 0) { 2496940Ssam addr->dmfcsr |= DMF_IE; 2506940Ssam dmfact |= (1<<dmf); 2516940Ssam addr->dmfrsp = 1; /* DON'T KNOW WHAT TO SET IT TO YET */ 2526940Ssam } 2536940Ssam splx(s); 2546940Ssam /* 2556940Ssam * If this is first open, initialze tty state to default. 2566940Ssam */ 2576971Ssam if ((tp->t_state&TS_ISOPEN) == 0) { 2586940Ssam ttychars(tp); 2596940Ssam if (tp->t_ispeed == 0) { 2606940Ssam tp->t_ispeed = B300; 2616940Ssam tp->t_ospeed = B300; 2626940Ssam tp->t_flags = ODDP|EVENP|ECHO; 2636940Ssam } 2646940Ssam dmfparam(unit); 2656940Ssam } 2666940Ssam /* 2676940Ssam * Wait for carrier, then process line discipline specific open. 2686940Ssam */ 2696940Ssam if ((dmfmctl(dev, DMF_ON, DMSET) & (DMF_CAR<<8)) || 2706940Ssam (dmfsoftCAR[dmf] & (1<<(unit&07)))) 2716971Ssam tp->t_state |= TS_CARR_ON; 2726940Ssam s = spl5(); 2736971Ssam while ((tp->t_state & TS_CARR_ON) == 0) { 2746971Ssam tp->t_state |= TS_WOPEN; 2756940Ssam sleep((caddr_t)&tp->t_rawq, TTIPRI); 2766940Ssam } 2776940Ssam splx(s); 2788567Sroot return ((*linesw[tp->t_line].l_open)(dev, tp)); 2796940Ssam } 2806940Ssam 2816940Ssam /* 2826940Ssam * Close a DMF32 line. 2836940Ssam */ 2846940Ssam /*ARGSUSED*/ 2856940Ssam dmfclose(dev, flag) 2866940Ssam dev_t dev; 2876940Ssam int flag; 2886940Ssam { 2896940Ssam register struct tty *tp; 2906940Ssam register unit; 2916940Ssam 2926940Ssam unit = minor(dev); 2936940Ssam tp = &dmf_tty[unit]; 2946940Ssam (*linesw[tp->t_line].l_close)(tp); 2958702Sroot (void) dmfmctl(unit, DMF_BRK, DMBIC); 2966971Ssam if (tp->t_state&TS_HUPCLS || (tp->t_state&TS_ISOPEN)==0) 2978702Sroot (void) dmfmctl(unit, DMF_OFF, DMSET); 2986940Ssam ttyclose(tp); 2996940Ssam } 3006940Ssam 3017726Sroot dmfread(dev, uio) 3026940Ssam dev_t dev; 3037726Sroot struct uio *uio; 3046940Ssam { 3056940Ssam register struct tty *tp; 3066940Ssam 3076940Ssam tp = &dmf_tty[minor(dev)]; 3087726Sroot return ((*linesw[tp->t_line].l_read)(tp, uio)); 3096940Ssam } 3106940Ssam 3117832Sroot dmfwrite(dev, uio) 3126940Ssam dev_t dev; 3137832Sroot struct uio *uio; 3146940Ssam { 3156940Ssam register struct tty *tp; 3166940Ssam 3176940Ssam tp = &dmf_tty[minor(dev)]; 3188530Sroot return ((*linesw[tp->t_line].l_write)(tp, uio)); 3196940Ssam } 3206940Ssam 3216940Ssam /* 3226940Ssam * DMF32 receiver interrupt. 3236940Ssam */ 3246940Ssam dmfrint(dmf) 3256940Ssam int dmf; 3266940Ssam { 3276940Ssam register struct tty *tp; 3286940Ssam register c; 3296940Ssam register struct dmfdevice *addr; 3306940Ssam register struct tty *tp0; 3316940Ssam register struct uba_device *ui; 3326940Ssam int overrun = 0; 3336940Ssam 3346940Ssam ui = dmfinfo[dmf]; 3356940Ssam if (ui == 0 || ui->ui_alive == 0) 3366940Ssam return; 3376940Ssam addr = (struct dmfdevice *)ui->ui_addr; 3386940Ssam tp0 = &dmf_tty[dmf<<3]; 3396940Ssam /* 3406940Ssam * Loop fetching characters from the silo for this 3416940Ssam * dmf until there are no more in the silo. 3426940Ssam */ 3436940Ssam while ((c = addr->dmfrbuf) < 0) { 3446940Ssam tp = tp0 + ((c>>8)&07); 3456940Ssam if (c & DMF_DSC) { 3466940Ssam addr->dmfcsr = DMF_IE | DMFIR_TBUF | ((c>>8)&07); 3476940Ssam if (addr->dmfrms & DMF_CAR) { 3486971Ssam if ((tp->t_state & TS_CARR_ON) == 0) { 3496940Ssam wakeup((caddr_t)&tp->t_rawq); 3506971Ssam tp->t_state |= TS_CARR_ON; 3516940Ssam } 3526940Ssam } else { 3536971Ssam if (tp->t_state & TS_CARR_ON) { 3546940Ssam gsignal(tp->t_pgrp, SIGHUP); 3556940Ssam gsignal(tp->t_pgrp, SIGCONT); 3566940Ssam addr->dmfcsr = DMF_IE | DMFIR_LCR | 3576940Ssam ((c>>8)&07); 3586940Ssam addr->dmftms = 0; 3596940Ssam flushtty(tp, FREAD|FWRITE); 3606940Ssam } 3616971Ssam tp->t_state &= ~TS_CARR_ON; 3626940Ssam } 3636940Ssam continue; 3646940Ssam } 3656971Ssam if ((tp->t_state&TS_ISOPEN)==0) { 3666940Ssam wakeup((caddr_t)tp); 3676940Ssam continue; 3686940Ssam } 3696940Ssam if (c & DMF_PE) 3706940Ssam if ((tp->t_flags&(EVENP|ODDP))==EVENP 3716940Ssam || (tp->t_flags&(EVENP|ODDP))==ODDP ) 3726940Ssam continue; 3736940Ssam if ((c & DMF_DO) && overrun == 0) { 3746940Ssam printf("dmf%d: silo overflow\n", dmf); 3756940Ssam overrun = 1; 3766940Ssam } 3776940Ssam if (c & DMF_FE) 3786940Ssam /* 3796940Ssam * At framing error (break) generate 3806940Ssam * a null (in raw mode, for getty), or a 3816940Ssam * interrupt (in cooked/cbreak mode). 3826940Ssam */ 3836940Ssam if (tp->t_flags&RAW) 3846940Ssam c = 0; 3856940Ssam else 3866940Ssam c = tun.t_intrc; 3876940Ssam #if NBK > 0 3886940Ssam if (tp->t_line == NETLDISC) { 3896940Ssam c &= 0177; 3906940Ssam BKINPUT(c, tp); 3916940Ssam } else 3926940Ssam #endif 3936940Ssam (*linesw[tp->t_line].l_rint)(c, tp); 3946940Ssam } 3956940Ssam } 3966940Ssam 3976940Ssam /* 3986940Ssam * Ioctl for DMF32. 3996940Ssam */ 4006940Ssam /*ARGSUSED*/ 4017630Ssam dmfioctl(dev, cmd, data, flag) 4026940Ssam dev_t dev; 4037630Ssam caddr_t data; 4046940Ssam { 4056940Ssam register struct tty *tp; 4066940Ssam register int unit = minor(dev); 4078567Sroot int error; 4086940Ssam 4096940Ssam tp = &dmf_tty[unit]; 4108567Sroot error = (*linesw[tp->t_line].l_ioctl)(tp, cmd, data, flag); 4118567Sroot if (error >= 0) 4128567Sroot return (error); 4138567Sroot error = ttioctl(tp, cmd, data, flag); 4148567Sroot if (error >= 0) { 4157630Ssam if (cmd == TIOCSETP || cmd == TIOCSETN) 4166940Ssam dmfparam(unit); 4178567Sroot return (error); 4188567Sroot } 4198567Sroot switch (cmd) { 4206940Ssam 4216940Ssam case TIOCSBRK: 4228702Sroot (void) dmfmctl(dev, DMF_BRK, DMBIS); 4236940Ssam break; 4247630Ssam 4256940Ssam case TIOCCBRK: 4268702Sroot (void) dmfmctl(dev, DMF_BRK, DMBIC); 4276940Ssam break; 4287630Ssam 4296940Ssam case TIOCSDTR: 4308702Sroot (void) dmfmctl(dev, DMF_DTR|DMF_RTS, DMBIS); 4316940Ssam break; 4327630Ssam 4336940Ssam case TIOCCDTR: 4348702Sroot (void) dmfmctl(dev, DMF_DTR|DMF_RTS, DMBIC); 4356940Ssam break; 4367630Ssam 4376940Ssam case TIOCMSET: 4388702Sroot (void) dmfmctl(dev, dmtodmf(*(int *)data), DMSET); 4396940Ssam break; 4407630Ssam 4416940Ssam case TIOCMBIS: 4428702Sroot (void) dmfmctl(dev, dmtodmf(*(int *)data), DMBIS); 4436940Ssam break; 4447630Ssam 4456940Ssam case TIOCMBIC: 4468702Sroot (void) dmfmctl(dev, dmtodmf(*(int *)data), DMBIC); 4476940Ssam break; 4487630Ssam 4496940Ssam case TIOCMGET: 4507630Ssam *(int *)data = dmftodm(dmfmctl(dev, 0, DMGET)); 4516940Ssam break; 4527630Ssam 4536940Ssam default: 4548567Sroot return (ENOTTY); 4556940Ssam } 4568567Sroot return (0); 4576940Ssam } 4586940Ssam 4596940Ssam dmtodmf(bits) 4606940Ssam register int bits; 4616940Ssam { 4626940Ssam register int b; 4636940Ssam 4646940Ssam b = bits & 012; 4656940Ssam if (bits & DML_ST) b |= DMF_RATE; 4666940Ssam if (bits & DML_RTS) b |= DMF_RTS; 4676940Ssam if (bits & DML_USR) b |= DMF_USRW; 4686940Ssam return(b); 4696940Ssam } 4706940Ssam 4716940Ssam dmftodm(bits) 4726940Ssam register int bits; 4736940Ssam { 4746940Ssam register int b; 4756940Ssam 4766940Ssam b = (bits & 012) | ((bits >> 7) & 0760) | DML_LE; 4776940Ssam if (bits & DMF_USRR) b |= DML_USR; 4786940Ssam if (bits & DMF_RTS) b |= DML_RTS; 4796940Ssam return(b); 4806940Ssam } 4816940Ssam 4826940Ssam 4836940Ssam /* 4846940Ssam * Set parameters from open or stty into the DMF hardware 4856940Ssam * registers. 4866940Ssam */ 4876940Ssam dmfparam(unit) 4886940Ssam register int unit; 4896940Ssam { 4906940Ssam register struct tty *tp; 4916940Ssam register struct dmfdevice *addr; 4926940Ssam register int lpar, lcr; 4936940Ssam int s; 4946940Ssam 4956940Ssam tp = &dmf_tty[unit]; 4966940Ssam addr = (struct dmfdevice *)tp->t_addr; 4976940Ssam /* 4986940Ssam * Block interrupts so parameters will be set 4996940Ssam * before the line interrupts. 5006940Ssam */ 5016940Ssam s = spl5(); 5026940Ssam addr->dmfcsr = (unit&07) | DMFIR_LCR | DMF_IE; 5036940Ssam if ((tp->t_ispeed)==0) { 5046971Ssam tp->t_state |= TS_HUPCLS; 5058702Sroot (void) dmfmctl(unit, DMF_OFF, DMSET); 5066940Ssam return; 5076940Ssam } 5086940Ssam lpar = (dmf_speeds[tp->t_ospeed]<<12) | (dmf_speeds[tp->t_ispeed]<<8); 5096940Ssam lcr = DMFLCR_ENA; 5106940Ssam if ((tp->t_ispeed) == B134) 5116940Ssam lpar |= BITS6|PENABLE; 5126940Ssam else if ((tp->t_flags&RAW) || (tp->t_local&LLITOUT)) 5136940Ssam lpar |= BITS8; 5146940Ssam else { 5156940Ssam lpar |= BITS7|PENABLE; 5166940Ssam /* CHECK FOR XON/XOFF AND SET lcr |= DMF_AUTOX; */ 5176940Ssam } 5186940Ssam if ((tp->t_flags&EVENP) == 0) 5196940Ssam lpar |= OPAR; 5206940Ssam if ((tp->t_ospeed) == B110) 5216940Ssam lpar |= TWOSB; 5226940Ssam lpar |= (unit&07); 5236940Ssam addr->dmflpr = lpar; 5246940Ssam addr->dmflcr = lcr; 5256940Ssam splx(s); 5266940Ssam } 5276940Ssam 5286940Ssam /* 5296940Ssam * DMF32 transmitter interrupt. 5306940Ssam * Restart the idle line. 5316940Ssam */ 5326940Ssam dmfxint(dmf) 5336940Ssam int dmf; 5346940Ssam { 5356940Ssam register struct tty *tp; 5366940Ssam register struct dmfdevice *addr; 5376940Ssam register struct uba_device *ui; 5386940Ssam register int unit, t; 5396940Ssam #ifdef DMFDMA 5406940Ssam short cntr; 5416940Ssam #endif 5426940Ssam 5436940Ssam ui = dmfinfo[dmf]; 5446940Ssam addr = (struct dmfdevice *)ui->ui_addr; 5456940Ssam while ((t = addr->dmfcsr) & DMF_TI) { 5466940Ssam unit = dmf*8 + ((t>>8)&07); 5476940Ssam tp = &dmf_tty[unit]; 5486971Ssam tp->t_state &= ~TS_BUSY; 5496940Ssam if (t & DMF_NXM) { 5506940Ssam printf("dmf%d: NXM line %d\n", dmf, unit&7); 5516940Ssam /* SHOULD RESTART OR SOMETHING... */ 5526940Ssam } 5536971Ssam if (tp->t_state&TS_FLUSH) 5546971Ssam tp->t_state &= ~TS_FLUSH; 5556940Ssam #ifdef DMFDMA 5566940Ssam else { 5576940Ssam addr->dmfcsr = DMFIR_TBUF | DMF_IE | (unit&07); 5586940Ssam if (addr->dmftsc == 0) { 5596940Ssam /* 5606940Ssam * Do arithmetic in a short to make up 5616940Ssam * for lost 16&17 bits. 5626940Ssam */ 5636940Ssam addr->dmfcsr = DMFIR_TBA | DMF_IE | (unit&07); 5646940Ssam cntr = addr->dmftba - 5656940Ssam UBACVT(tp->t_outq.c_cf, ui->ui_ubanum); 5666940Ssam ndflush(&tp->t_outq, (int)cntr); 5676940Ssam } 5686940Ssam } 5696940Ssam #endif 5706940Ssam if (tp->t_line) 5716940Ssam (*linesw[tp->t_line].l_start)(tp); 5726940Ssam else 5736940Ssam dmfstart(tp); 5746940Ssam } 5756940Ssam } 5766940Ssam 5776940Ssam /* 5786940Ssam * Start (restart) transmission on the given DMF32 line. 5796940Ssam */ 5806940Ssam dmfstart(tp) 5816940Ssam register struct tty *tp; 5826940Ssam { 5836940Ssam register struct dmfdevice *addr; 5848607Sroot register int unit, nch; 5856940Ssam int s; 5866940Ssam 5876940Ssam unit = minor(tp->t_dev); 5886940Ssam unit &= 07; 5896940Ssam addr = (struct dmfdevice *)tp->t_addr; 5906940Ssam 5916940Ssam /* 5926940Ssam * Must hold interrupts in following code to prevent 5936940Ssam * state of the tp from changing. 5946940Ssam */ 5956940Ssam s = spl5(); 5966940Ssam /* 5976940Ssam * If it's currently active, or delaying, no need to do anything. 5986940Ssam */ 5996971Ssam if (tp->t_state&(TS_TIMEOUT|TS_BUSY|TS_TTSTOP)) 6006940Ssam goto out; 6016940Ssam /* 6026940Ssam * If there are still characters in the silo, 6036940Ssam * just reenable the transmitter. 6046940Ssam */ 6056940Ssam addr->dmfcsr = DMF_IE | DMFIR_TBUF | unit; 6066940Ssam if (addr->dmftsc) { 6076940Ssam addr->dmfcsr = DMF_IE | DMFIR_LCR | unit; 6086940Ssam addr->dmflcr |= DMF_TE; 6096971Ssam tp->t_state |= TS_BUSY; 6106940Ssam goto out; 6116940Ssam } 6126940Ssam /* 6136940Ssam * If there are sleepers, and output has drained below low 6146940Ssam * water mark, wake up the sleepers. 6156940Ssam */ 6166971Ssam if ((tp->t_state&TS_ASLEEP) && tp->t_outq.c_cc<=TTLOWAT(tp)) { 6176971Ssam tp->t_state &= ~TS_ASLEEP; 6186963Ssam wakeup((caddr_t)&tp->t_outq); 6196940Ssam } 6206940Ssam /* 6216940Ssam * Now restart transmission unless the output queue is 6226940Ssam * empty. 6236940Ssam */ 6246940Ssam if (tp->t_outq.c_cc == 0) 6256940Ssam goto out; 6266940Ssam if (tp->t_flags&RAW || tp->t_local&LLITOUT) 6276940Ssam nch = ndqb(&tp->t_outq, 0); 6286940Ssam else { 6296940Ssam nch = ndqb(&tp->t_outq, 0200); 6306940Ssam /* 6316940Ssam * If first thing on queue is a delay process it. 6326940Ssam */ 6336940Ssam if (nch == 0) { 6346940Ssam nch = getc(&tp->t_outq); 6356940Ssam timeout(ttrstrt, (caddr_t)tp, (nch&0x7f)+6); 6366971Ssam tp->t_state |= TS_TIMEOUT; 6376940Ssam goto out; 6386940Ssam } 6396940Ssam } 6406940Ssam /* 6416940Ssam * If characters to transmit, restart transmission. 6426940Ssam */ 6436940Ssam if (nch) { 6446940Ssam #ifdef DMFDMA 6456940Ssam addr->dmfcsr = DMF_IE | DMFIR_LCR | unit; 6466940Ssam addr->dmflcr |= DMF_TE; 6476940Ssam car = UBACVT(tp->t_outq.c_cf, dmfinfo[dmf]->ui_ubanum); 6486940Ssam addr->dmfcsr = DMF_IE | DMFIR_TBA | unit; 6496940Ssam addr->dmftba = car; 6506940Ssam addr->dmftcc = ((car>>2)&0xc000) | nch; 6516940Ssam #else 6526940Ssam register char *cp = tp->t_outq.c_cf; 6536940Ssam register int i; 6546940Ssam 6556940Ssam nch = MIN(nch, DMF_SILOCNT); 6566940Ssam addr->dmfcsr = DMF_IE | DMFIR_LCR | unit; 6576940Ssam addr->dmflcr |= DMF_TE; 6586940Ssam addr->dmfcsr = DMF_IE | DMFIR_TBUF | unit; 6596940Ssam for (i = 0; i < nch; i++) 6606940Ssam addr->dmftbuf = *cp++; 6616940Ssam ndflush(&tp->t_outq, nch); 6626940Ssam #endif 6636971Ssam tp->t_state |= TS_BUSY; 6646940Ssam } 6656940Ssam out: 6666940Ssam splx(s); 6676940Ssam } 6686940Ssam 6696940Ssam /* 6706940Ssam * Stop output on a line, e.g. for ^S/^Q or output flush. 6716940Ssam */ 6726940Ssam /*ARGSUSED*/ 6736940Ssam dmfstop(tp, flag) 6746940Ssam register struct tty *tp; 6756940Ssam { 6766940Ssam register struct dmfdevice *addr; 6776940Ssam register int unit, s; 6786940Ssam 6796940Ssam addr = (struct dmfdevice *)tp->t_addr; 6806940Ssam /* 6816940Ssam * Block input/output interrupts while messing with state. 6826940Ssam */ 6836940Ssam s = spl5(); 6846971Ssam if (tp->t_state & TS_BUSY) { 6856940Ssam /* 6866940Ssam * Device is transmitting; stop output 6876940Ssam * by selecting the line and disabling 6886940Ssam * the transmitter. If this is a flush 6896940Ssam * request then flush the output silo, 6906940Ssam * otherwise we will pick up where we 6916940Ssam * left off by enabling the transmitter. 6926940Ssam */ 6936940Ssam unit = minor(tp->t_dev); 6946940Ssam addr->dmfcsr = DMFIR_LCR | (unit&07) | DMF_IE; 6956940Ssam addr->dmflcr &= ~DMF_TE; 6966971Ssam if ((tp->t_state&TS_TTSTOP)==0) { 6976971Ssam tp->t_state |= TS_FLUSH; 6986940Ssam addr->dmflcr |= DMF_FLUSH; 6996940Ssam } else 7006971Ssam tp->t_state &= ~TS_BUSY; 7016940Ssam } 7026940Ssam splx(s); 7036940Ssam } 7046940Ssam 7056940Ssam /* 7066940Ssam * DMF32 modem control 7076940Ssam */ 7086940Ssam dmfmctl(dev, bits, how) 7096940Ssam dev_t dev; 7106940Ssam int bits, how; 7116940Ssam { 7126940Ssam register struct dmfdevice *dmfaddr; 7136940Ssam register int unit, mbits, lcr; 7146940Ssam int s; 7156940Ssam 7166940Ssam unit = minor(dev); 7176940Ssam dmfaddr = (struct dmfdevice *)(dmf_tty[unit].t_addr); 7186940Ssam unit &= 07; 7196940Ssam s = spl5(); 7206940Ssam dmfaddr->dmfcsr = DMF_IE | DMFIR_TBUF | unit; 7216940Ssam mbits = dmfaddr->dmfrms << 8; 7226940Ssam dmfaddr->dmfcsr = DMF_IE | DMFIR_LCR | unit; 7236940Ssam mbits |= dmfaddr->dmftms; 7246940Ssam lcr = dmfaddr->dmflcr; 7256940Ssam switch (how) { 7266940Ssam case DMSET: 7276940Ssam mbits = bits; 7286940Ssam break; 7296940Ssam 7306940Ssam case DMBIS: 7316940Ssam mbits |= bits; 7326940Ssam break; 7336940Ssam 7346940Ssam case DMBIC: 7356940Ssam mbits &= ~bits; 7366940Ssam break; 7376940Ssam 7386940Ssam case DMGET: 7396940Ssam (void) splx(s); 7406940Ssam return(mbits); 7416940Ssam } 7426940Ssam dmfaddr->dmftms = mbits&037; 7436940Ssam if (mbits & DMF_BRK) 7446940Ssam lcr |= DMF_RBRK; 7456940Ssam else 7466940Ssam lcr &= ~DMF_RBRK; 7476940Ssam dmfaddr->dmflcr = lcr; 7486940Ssam (void) splx(s); 7496940Ssam return(mbits); 7506940Ssam } 7516940Ssam 7526940Ssam /* 7536940Ssam * Reset state of driver if UBA reset was necessary. 7546940Ssam * Reset the csr, lpr, and lcr registers on open lines, and 7556940Ssam * restart transmitters. 7566940Ssam */ 7576940Ssam dmfreset(uban) 7586940Ssam int uban; 7596940Ssam { 7606940Ssam register int dmf, unit; 7616940Ssam register struct tty *tp; 7626940Ssam register struct uba_device *ui; 7636940Ssam register struct dmfdevice *addr; 7646940Ssam int i; 7656940Ssam 7666940Ssam #ifdef DMFDMA 7676940Ssam if (dmf_ubinfo[uban] == 0) 7686940Ssam return; 7696940Ssam dmf_ubinfo[uban] = uballoc(uban, (caddr_t)cfree, 7706940Ssam nclist*sizeof (struct cblock), 0); 7716940Ssam cbase[uban] = dmf_ubinfo[uban]&0x3ffff; 7726940Ssam #endif 7736940Ssam for (dmf = 0; dmf < NDMF; dmf++) { 7746940Ssam ui = dmfinfo[dmf]; 7756940Ssam if (ui == 0 || ui->ui_alive == 0 || ui->ui_ubanum != uban) 7766940Ssam continue; 7776940Ssam printf(" dmf%d", dmf); 7786940Ssam addr = (struct dmfdevice *)ui->ui_addr; 7796940Ssam addr->dmfcsr = DMF_IE; 7806940Ssam addr->dmfrsp = 1; 7816940Ssam unit = dmf * 8; 7826940Ssam for (i = 0; i < 8; i++) { 7836940Ssam tp = &dmf_tty[unit]; 7846971Ssam if (tp->t_state & (TS_ISOPEN|TS_WOPEN)) { 7856940Ssam dmfparam(unit); 7868702Sroot (void) dmfmctl(unit, DMF_ON, DMSET); 7876971Ssam tp->t_state &= ~TS_BUSY; 7886940Ssam dmfstart(tp); 7896940Ssam } 7906940Ssam unit++; 7916940Ssam } 7926940Ssam } 7936940Ssam } 7946940Ssam 7956940Ssam /* stubs for interrupt routines for devices not yet supported */ 7966940Ssam 7976940Ssam dmfsrint() { printf("dmfsrint\n"); } 7986940Ssam 7996940Ssam dmfsxint() { printf("dmfsxint\n"); } 8006940Ssam 8016940Ssam dmfdaint() { printf("dmfdaint\n"); } 8026940Ssam 8036940Ssam dmfdbint() { printf("dmfdbint\n"); } 8046940Ssam 8056940Ssam dmflint() { printf("dmflint\n"); } 8066940Ssam #endif 807