From fe4bf0ce4614cf5425181079a4c55239cf59d2a9 Mon Sep 17 00:00:00 2001 From: rik Date: Tue, 27 Sep 2005 16:12:49 +0000 Subject: Backout if_cp 1.26, if_ct 1.27, if_cx 1.47 by obrien: ---------------------------- revision 1.26 date: 2005/09/07 09:53:35; author: obrien; state: Exp; lines: +1452 -1453 Reorder code to not depend on an ISO-C illegal forward extern declaration. ---------------------------- Reason: do not move large functions location without serious reason. The same could be done by forward function declaration. Please do not enlarge diff without a reason any more. Backout if_cp 1.27 ---------------------------- revision 1.27 date: 2005/09/19 03:10:16; author: imp; state: Exp; lines: +3 -2 Make sure that we call if_free(ifp) after bus_teardown_intr. Since we could get an interrupt after we free the ifp, and the interrupt handler depended on the ifp being still alive, this could, in theory, cause a crash. Eliminate this possibility by moving the if_free to after the bus_teardown_intr() call. Reason: bad previous commit. Would be restored by next commit. --- sys/dev/cp/if_cp.c | 2905 ++++++++++++++++++++++++++-------------------------- 1 file changed, 1453 insertions(+), 1452 deletions(-) (limited to 'sys/dev/cp') diff --git a/sys/dev/cp/if_cp.c b/sys/dev/cp/if_cp.c index f6ecd74..2adcfd6 100644 --- a/sys/dev/cp/if_cp.c +++ b/sys/dev/cp/if_cp.c @@ -184,1639 +184,1640 @@ static struct callout timeout_handle; static int cp_destroy = 0; +static int cp_open (struct cdev *dev, int oflags, int devtype, struct thread *td); +static int cp_close (struct cdev *dev, int fflag, int devtype, struct thread *td); +static int cp_ioctl (struct cdev *dev, u_long cmd, caddr_t data, int flag, struct thread *td); +static struct cdevsw cp_cdevsw = { + .d_version = D_VERSION, + .d_open = cp_open, + .d_close = cp_close, + .d_ioctl = cp_ioctl, + .d_name = "cp", + .d_flags = D_NEEDGIANT, +}; + /* - * You also need read, write, open, close routines. - * This should get you started + * Print the mbuf chain, for debug purposes only. */ -static int cp_open (struct cdev *dev, int oflags, int devtype, struct thread *td) +static void printmbuf (struct mbuf *m) { - int unit = minor (dev); - drv_t *d; - - if (unit >= NBRD*NCHAN || ! (d = channel[unit])) - return ENXIO; - CP_DEBUG2 (d, ("cp_open\n")); - return 0; + printf ("mbuf:"); + for (; m; m=m->m_next) { + if (m->m_flags & M_PKTHDR) + printf (" HDR %d:", m->m_pkthdr.len); + if (m->m_flags & M_EXT) + printf (" EXT:"); + printf (" %d", m->m_len); + } + printf ("\n"); } /* - * Only called on the LAST close. + * Make an mbuf from data. */ -static int cp_close (struct cdev *dev, int fflag, int devtype, struct thread *td) +static struct mbuf *makembuf (void *buf, unsigned len) { - drv_t *d = channel [minor (dev)]; + struct mbuf *m; - CP_DEBUG2 (d, ("cp_close\n")); - return 0; + MGETHDR (m, M_DONTWAIT, MT_DATA); + if (! m) + return 0; + MCLGET (m, M_DONTWAIT); + if (! (m->m_flags & M_EXT)) { + m_freem (m); + return 0; + } + m->m_pkthdr.len = m->m_len = len; + bcopy (buf, mtod (m, caddr_t), len); + return m; } -static int cp_modem_status (cp_chan_t *c) +static int cp_probe (device_t dev) { - drv_t *d = c->sys; - bdrv_t *bd = d->board->sys; - int status, s; + if ((pci_get_vendor (dev) == cp_vendor_id) && + (pci_get_device (dev) == cp_device_id)) { + device_set_desc (dev, "Cronyx-Tau-PCI serial adapter"); + return BUS_PROBE_DEFAULT; + } + return ENXIO; +} - status = d->running ? TIOCM_LE : 0; +static void cp_timeout (void *arg) +{ + drv_t *d; + int s, i, k; + + for (i = 0; i < NBRD; ++i) { + if (adapter[i] == NULL) + continue; + for (k = 0; k < NCHAN; ++k) { + s = splimp (); + if (cp_destroy) { + splx (s); + return; + } + d = channel[i * NCHAN + k]; + if (!d) { + splx (s); + continue; + } + CP_LOCK ((bdrv_t *)d->board->sys); + switch (d->chan->type) { + case T_G703: + cp_g703_timer (d->chan); + break; + case T_E1: + cp_e1_timer (d->chan); + break; + case T_E3: + case T_T3: + case T_STS1: + cp_e3_timer (d->chan); + break; + default: + break; + } + CP_UNLOCK ((bdrv_t *)d->board->sys); + splx (s); + } + } + s = splimp (); + if (!cp_destroy) + callout_reset (&timeout_handle, hz, cp_timeout, 0); + splx (s); +} + +static void cp_led_off (void *arg) +{ + cp_board_t *b = arg; + bdrv_t *bd = (bdrv_t *) b->sys; + int s; s = splimp (); + if (cp_destroy) { + splx (s); + return; + } CP_LOCK (bd); - if (cp_get_cd (c)) status |= TIOCM_CD; - if (cp_get_cts (c)) status |= TIOCM_CTS; - if (cp_get_dsr (c)) status |= TIOCM_DSR; - if (c->dtr) status |= TIOCM_DTR; - if (c->rts) status |= TIOCM_RTS; + cp_led (b, 0); CP_UNLOCK (bd); splx (s); - return status; } - -static int cp_ioctl (struct cdev *dev, u_long cmd, caddr_t data, int flag, struct thread *td) +static void cp_intr (void *arg) { - drv_t *d = channel [minor (dev)]; - bdrv_t *bd = d->board->sys; - cp_chan_t *c = d->chan; - struct serial_statistics *st; - struct e1_statistics *opte1; - struct e3_statistics *opte3; - int error, s; - char mask[16]; + bdrv_t *bd = arg; + cp_board_t *b = bd->board; +#ifndef NETGRAPH + int i; +#endif + int s = splimp (); + if (cp_destroy) { + splx (s); + return; + } + CP_LOCK (bd); + /* Check if we are ready */ + if (b->sys == NULL) { + /* Not we are not, just cleanup. */ + cp_interrupt_poll (b, 1); + CP_UNLOCK (bd); + return; + } + /* Turn LED on. */ + cp_led (b, 1); - switch (cmd) { - case SERIAL_GETREGISTERED: - CP_DEBUG2 (d, ("ioctl: getregistered\n")); - bzero (mask, sizeof(mask)); - for (s=0; snum], hz/20, cp_led_off, b); + CP_UNLOCK (bd); + splx (s); #ifndef NETGRAPH - case SERIAL_GETPROTO: - CP_DEBUG2 (d, ("ioctl: getproto\n")); - strcpy ((char*)data, (IFP2SP(d->ifp)->pp_flags & PP_FR) ? "fr" : - (d->ifp->if_flags & PP_CISCO) ? "cisco" : "ppp"); - return 0; + /* Pass packets in a lock-free state */ + for (i = 0; i < NCHAN && b->chan[i].type; i++) { + drv_t *d = b->chan[i].sys; + struct mbuf *m; + if (!d || !d->running) + continue; + while (_IF_QLEN(&d->queue)) { + IF_DEQUEUE (&d->queue,m); + if (!m) + continue; + sppp_input (d->ifp, m); + } + } +#endif +} - case SERIAL_SETPROTO: - CP_DEBUG2 (d, ("ioctl: setproto\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - if (d->ifp->if_drv_flags & IFF_DRV_RUNNING) - return EBUSY; - if (! strcmp ("cisco", (char*)data)) { - IFP2SP(d->ifp)->pp_flags &= ~(PP_FR); - IFP2SP(d->ifp)->pp_flags |= PP_KEEPALIVE; - d->ifp->if_flags |= PP_CISCO; - } else if (! strcmp ("fr", (char*)data) && PP_FR) { - d->ifp->if_flags &= ~(PP_CISCO); - IFP2SP(d->ifp)->pp_flags |= PP_FR | PP_KEEPALIVE; - } else if (! strcmp ("ppp", (char*)data)) { - IFP2SP(d->ifp)->pp_flags &= ~PP_FR; - IFP2SP(d->ifp)->pp_flags &= ~PP_KEEPALIVE; - d->ifp->if_flags &= ~(PP_CISCO); - } else - return EINVAL; - return 0; +static void +cp_bus_dmamap_addr (void *arg, bus_dma_segment_t *segs, int nseg, int error) +{ + unsigned long *addr; - case SERIAL_GETKEEPALIVE: - CP_DEBUG2 (d, ("ioctl: getkeepalive\n")); - if ((IFP2SP(d->ifp)->pp_flags & PP_FR) || - (d->ifp->if_flags & PP_CISCO)) - return EINVAL; - *(int*)data = (IFP2SP(d->ifp)->pp_flags & PP_KEEPALIVE) ? 1 : 0; - return 0; + if (error) + return; - case SERIAL_SETKEEPALIVE: - CP_DEBUG2 (d, ("ioctl: setkeepalive\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - if ((IFP2SP(d->ifp)->pp_flags & PP_FR) || - (d->ifp->if_flags & PP_CISCO)) - return EINVAL; - s = splimp (); - CP_LOCK (bd); - if (*(int*)data) - IFP2SP(d->ifp)->pp_flags |= PP_KEEPALIVE; - else - IFP2SP(d->ifp)->pp_flags &= ~PP_KEEPALIVE; - CP_UNLOCK (bd); - splx (s); - return 0; -#endif /*NETGRAPH*/ + KASSERT(nseg == 1, ("too many DMA segments, %d should be 1", nseg)); + addr = arg; + *addr = segs->ds_addr; +} - case SERIAL_GETMODE: - CP_DEBUG2 (d, ("ioctl: getmode\n")); - *(int*)data = SERIAL_HDLC; - return 0; +static int +cp_bus_dma_mem_alloc (int bnum, int cnum, cp_dma_mem_t *dmem) +{ + int error; - case SERIAL_SETMODE: - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - if (*(int*)data != SERIAL_HDLC) - return EINVAL; - return 0; - - case SERIAL_GETCFG: - CP_DEBUG2 (d, ("ioctl: getcfg\n")); - if (c->type != T_E1 || c->unfram) - return EINVAL; - *(char*)data = c->board->mux ? 'c' : 'a'; - return 0; - - case SERIAL_SETCFG: - CP_DEBUG2 (d, ("ioctl: setcfg\n")); - error = suser (td); - if (error) - return error; - if (c->type != T_E1) - return EINVAL; - s = splimp (); - CP_LOCK (bd); - cp_set_mux (c->board, *((char*)data) == 'c'); - CP_UNLOCK (bd); - splx (s); - return 0; - - case SERIAL_GETSTAT: - CP_DEBUG2 (d, ("ioctl: getstat\n")); - st = (struct serial_statistics*) data; - st->rintr = c->rintr; - st->tintr = c->tintr; - st->mintr = 0; - st->ibytes = c->ibytes; - st->ipkts = c->ipkts; - st->obytes = c->obytes; - st->opkts = c->opkts; - st->ierrs = c->overrun + c->frame + c->crc; - st->oerrs = c->underrun; - return 0; - - case SERIAL_GETESTAT: - CP_DEBUG2 (d, ("ioctl: getestat\n")); - if (c->type != T_E1 && c->type != T_G703) - return EINVAL; - opte1 = (struct e1_statistics*) data; - opte1->status = c->status; - opte1->cursec = c->cursec; - opte1->totsec = c->totsec + c->cursec; - - opte1->currnt.bpv = c->currnt.bpv; - opte1->currnt.fse = c->currnt.fse; - opte1->currnt.crce = c->currnt.crce; - opte1->currnt.rcrce = c->currnt.rcrce; - opte1->currnt.uas = c->currnt.uas; - opte1->currnt.les = c->currnt.les; - opte1->currnt.es = c->currnt.es; - opte1->currnt.bes = c->currnt.bes; - opte1->currnt.ses = c->currnt.ses; - opte1->currnt.oofs = c->currnt.oofs; - opte1->currnt.css = c->currnt.css; - opte1->currnt.dm = c->currnt.dm; - - opte1->total.bpv = c->total.bpv + c->currnt.bpv; - opte1->total.fse = c->total.fse + c->currnt.fse; - opte1->total.crce = c->total.crce + c->currnt.crce; - opte1->total.rcrce = c->total.rcrce + c->currnt.rcrce; - opte1->total.uas = c->total.uas + c->currnt.uas; - opte1->total.les = c->total.les + c->currnt.les; - opte1->total.es = c->total.es + c->currnt.es; - opte1->total.bes = c->total.bes + c->currnt.bes; - opte1->total.ses = c->total.ses + c->currnt.ses; - opte1->total.oofs = c->total.oofs + c->currnt.oofs; - opte1->total.css = c->total.css + c->currnt.css; - opte1->total.dm = c->total.dm + c->currnt.dm; - for (s=0; s<48; ++s) { - opte1->interval[s].bpv = c->interval[s].bpv; - opte1->interval[s].fse = c->interval[s].fse; - opte1->interval[s].crce = c->interval[s].crce; - opte1->interval[s].rcrce = c->interval[s].rcrce; - opte1->interval[s].uas = c->interval[s].uas; - opte1->interval[s].les = c->interval[s].les; - opte1->interval[s].es = c->interval[s].es; - opte1->interval[s].bes = c->interval[s].bes; - opte1->interval[s].ses = c->interval[s].ses; - opte1->interval[s].oofs = c->interval[s].oofs; - opte1->interval[s].css = c->interval[s].css; - opte1->interval[s].dm = c->interval[s].dm; - } - return 0; - - case SERIAL_GETE3STAT: - CP_DEBUG2 (d, ("ioctl: gete3stat\n")); - if (c->type != T_E3 && c->type != T_T3 && c->type != T_STS1) - return EINVAL; - opte3 = (struct e3_statistics*) data; - - opte3->status = c->e3status; - opte3->cursec = (c->e3csec_5 * 2 + 1) / 10; - opte3->totsec = c->e3tsec + opte3->cursec; - - opte3->ccv = c->e3ccv; - opte3->tcv = c->e3tcv + opte3->ccv; - - for (s = 0; s < 48; ++s) { - opte3->icv[s] = c->e3icv[s]; - } - return 0; - - case SERIAL_CLRSTAT: - CP_DEBUG2 (d, ("ioctl: clrstat\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - c->rintr = 0; - c->tintr = 0; - c->ibytes = 0; - c->obytes = 0; - c->ipkts = 0; - c->opkts = 0; - c->overrun = 0; - c->frame = 0; - c->crc = 0; - c->underrun = 0; - bzero (&c->currnt, sizeof (c->currnt)); - bzero (&c->total, sizeof (c->total)); - bzero (c->interval, sizeof (c->interval)); - c->e3ccv = 0; - c->e3tcv = 0; - bzero (c->e3icv, sizeof (c->e3icv)); - return 0; - - case SERIAL_GETBAUD: - CP_DEBUG2 (d, ("ioctl: getbaud\n")); - *(long*)data = c->baud; - return 0; - - case SERIAL_SETBAUD: - CP_DEBUG2 (d, ("ioctl: setbaud\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - s = splimp (); - CP_LOCK (bd); - cp_set_baud (c, *(long*)data); - CP_UNLOCK (bd); - splx (s); - return 0; - - case SERIAL_GETLOOP: - CP_DEBUG2 (d, ("ioctl: getloop\n")); - *(int*)data = c->lloop; - return 0; - - case SERIAL_SETLOOP: - CP_DEBUG2 (d, ("ioctl: setloop\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - s = splimp (); - CP_LOCK (bd); - cp_set_lloop (c, *(int*)data); - CP_UNLOCK (bd); - splx (s); - return 0; - - case SERIAL_GETDPLL: - CP_DEBUG2 (d, ("ioctl: getdpll\n")); - if (c->type != T_SERIAL) - return EINVAL; - *(int*)data = c->dpll; - return 0; - - case SERIAL_SETDPLL: - CP_DEBUG2 (d, ("ioctl: setdpll\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - if (c->type != T_SERIAL) - return EINVAL; - s = splimp (); - CP_LOCK (bd); - cp_set_dpll (c, *(int*)data); - CP_UNLOCK (bd); - splx (s); - return 0; - - case SERIAL_GETNRZI: - CP_DEBUG2 (d, ("ioctl: getnrzi\n")); - if (c->type != T_SERIAL) - return EINVAL; - *(int*)data = c->nrzi; - return 0; - - case SERIAL_SETNRZI: - CP_DEBUG2 (d, ("ioctl: setnrzi\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - if (c->type != T_SERIAL) - return EINVAL; - s = splimp (); - CP_LOCK (bd); - cp_set_nrzi (c, *(int*)data); - CP_UNLOCK (bd); - splx (s); - return 0; - - case SERIAL_GETDEBUG: - CP_DEBUG2 (d, ("ioctl: getdebug\n")); - *(int*)data = d->chan->debug; - return 0; - - case SERIAL_SETDEBUG: - CP_DEBUG2 (d, ("ioctl: setdebug\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - d->chan->debug = *(int*)data; -#ifndef NETGRAPH - if (d->chan->debug) - d->ifp->if_flags |= IFF_DEBUG; - else - d->ifp->if_flags &= ~IFF_DEBUG; -#endif - return 0; - - case SERIAL_GETHIGAIN: - CP_DEBUG2 (d, ("ioctl: gethigain\n")); - if (c->type != T_E1) - return EINVAL; - *(int*)data = c->higain; - return 0; - - case SERIAL_SETHIGAIN: - CP_DEBUG2 (d, ("ioctl: sethigain\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - if (c->type != T_E1) - return EINVAL; - s = splimp (); - CP_LOCK (bd); - cp_set_higain (c, *(int*)data); - CP_UNLOCK (bd); - splx (s); - return 0; - - case SERIAL_GETPHONY: - CP_DEBUG2 (d, ("ioctl: getphony\n")); - if (c->type != T_E1) - return EINVAL; - *(int*)data = c->phony; - return 0; - - case SERIAL_SETPHONY: - CP_DEBUG2 (d, ("ioctl: setphony\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - if (c->type != T_E1) - return EINVAL; - s = splimp (); - CP_LOCK (bd); - cp_set_phony (c, *(int*)data); - CP_UNLOCK (bd); - splx (s); - return 0; - - case SERIAL_GETUNFRAM: - CP_DEBUG2 (d, ("ioctl: getunfram\n")); - if (c->type != T_E1) - return EINVAL; - *(int*)data = c->unfram; - return 0; - - case SERIAL_SETUNFRAM: - CP_DEBUG2 (d, ("ioctl: setunfram\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - if (c->type != T_E1) - return EINVAL; - s = splimp (); - CP_LOCK (bd); - cp_set_unfram (c, *(int*)data); - CP_UNLOCK (bd); - splx (s); - return 0; - - case SERIAL_GETSCRAMBLER: - CP_DEBUG2 (d, ("ioctl: getscrambler\n")); - if (c->type != T_G703 && !c->unfram) - return EINVAL; - *(int*)data = c->scrambler; - return 0; - - case SERIAL_SETSCRAMBLER: - CP_DEBUG2 (d, ("ioctl: setscrambler\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - if (c->type != T_G703 && !c->unfram) - return EINVAL; - s = splimp (); - CP_LOCK (bd); - cp_set_scrambler (c, *(int*)data); - CP_UNLOCK (bd); - splx (s); - return 0; + error = bus_dma_tag_create (NULL, 16, 0, BUS_SPACE_MAXADDR_32BIT, + BUS_SPACE_MAXADDR, NULL, NULL, dmem->size, 1, + dmem->size, 0, NULL, NULL, &dmem->dmat); + if (error) { + if (cnum >= 0) printf ("cp%d-%d: ", bnum, cnum); + else printf ("cp%d: ", bnum); + printf ("couldn't allocate tag for dma memory\n"); + return 0; + } + error = bus_dmamem_alloc (dmem->dmat, (void **)&dmem->virt, + BUS_DMA_NOWAIT | BUS_DMA_ZERO, &dmem->mapp); + if (error) { + if (cnum >= 0) printf ("cp%d-%d: ", bnum, cnum); + else printf ("cp%d: ", bnum); + printf ("couldn't allocate mem for dma memory\n"); + bus_dma_tag_destroy (dmem->dmat); + return 0; + } + error = bus_dmamap_load (dmem->dmat, dmem->mapp, dmem->virt, + dmem->size, cp_bus_dmamap_addr, &dmem->phys, 0); + if (error) { + if (cnum >= 0) printf ("cp%d-%d: ", bnum, cnum); + else printf ("cp%d: ", bnum); + printf ("couldn't load mem map for dma memory\n"); + bus_dmamem_free (dmem->dmat, dmem->virt, dmem->mapp); + bus_dma_tag_destroy (dmem->dmat); + return 0; + } + return 1; +} - case SERIAL_GETMONITOR: - CP_DEBUG2 (d, ("ioctl: getmonitor\n")); - if (c->type != T_E1 && - c->type != T_E3 && - c->type != T_T3 && - c->type != T_STS1) - return EINVAL; - *(int*)data = c->monitor; - return 0; +static void +cp_bus_dma_mem_free (cp_dma_mem_t *dmem) +{ + bus_dmamap_unload (dmem->dmat, dmem->mapp); + bus_dmamem_free (dmem->dmat, dmem->virt, dmem->mapp); + bus_dma_tag_destroy (dmem->dmat); +} - case SERIAL_SETMONITOR: - CP_DEBUG2 (d, ("ioctl: setmonitor\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - if (c->type != T_E1) - return EINVAL; - s = splimp (); - CP_LOCK (bd); - cp_set_monitor (c, *(int*)data); - CP_UNLOCK (bd); +/* + * Called if the probe succeeded. + */ +static int cp_attach (device_t dev) +{ + bdrv_t *bd = device_get_softc (dev); + int unit = device_get_unit (dev); + char *cp_ln = CP_LOCK_NAME; + unsigned short res; + vm_offset_t vbase; + int rid, error; + cp_board_t *b; + cp_chan_t *c; + drv_t *d; + int s = splimp (); + + b = malloc (sizeof(cp_board_t), M_DEVBUF, M_WAITOK); + if (!b) { + printf ("cp%d: couldn't allocate memory\n", unit); splx (s); - return 0; + return (ENXIO); + } + bzero (b, sizeof(cp_board_t)); - case SERIAL_GETUSE16: - CP_DEBUG2 (d, ("ioctl: getuse16\n")); - if (c->type != T_E1 || c->unfram) - return EINVAL; - *(int*)data = c->use16; - return 0; + bd->board = b; + rid = PCIR_BAR(0); + bd->cp_res = bus_alloc_resource (dev, SYS_RES_MEMORY, &rid, + 0, ~0, 1, RF_ACTIVE); + if (! bd->cp_res) { + printf ("cp%d: cannot map memory\n", unit); + free (b, M_DEVBUF); + splx (s); + return (ENXIO); + } + vbase = (vm_offset_t) rman_get_virtual (bd->cp_res); - case SERIAL_SETUSE16: - CP_DEBUG2 (d, ("ioctl: setuse16\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - if (c->type != T_E1) - return EINVAL; - s = splimp (); - CP_LOCK (bd); - cp_set_use16 (c, *(int*)data); - CP_UNLOCK (bd); + cp_ln[2] = '0' + unit; + mtx_init (&bd->cp_mtx, cp_ln, MTX_NETWORK_LOCK, MTX_DEF|MTX_RECURSE); + res = cp_init (b, unit, (u_char*) vbase); + if (res) { + printf ("cp%d: can't init, error code:%x\n", unit, res); + bus_release_resource (dev, SYS_RES_MEMORY, PCIR_BAR(0), bd->cp_res); + free (b, M_DEVBUF); splx (s); - return 0; + return (ENXIO); + } - case SERIAL_GETCRC4: - CP_DEBUG2 (d, ("ioctl: getcrc4\n")); - if (c->type != T_E1 || c->unfram) - return EINVAL; - *(int*)data = c->crc4; - return 0; + bd->dmamem.size = sizeof(cp_qbuf_t); + if (! cp_bus_dma_mem_alloc (unit, -1, &bd->dmamem)) { + free (b, M_DEVBUF); + splx (s); + return (ENXIO); + } + CP_LOCK (bd); + cp_reset (b, bd->dmamem.virt, bd->dmamem.phys); + CP_UNLOCK (bd); - case SERIAL_SETCRC4: - CP_DEBUG2 (d, ("ioctl: setcrc4\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - if (c->type != T_E1) - return EINVAL; - s = splimp (); - CP_LOCK (bd); - cp_set_crc4 (c, *(int*)data); - CP_UNLOCK (bd); + rid = 0; + bd->cp_irq = bus_alloc_resource (dev, SYS_RES_IRQ, &rid, 0, ~0, 1, + RF_SHAREABLE | RF_ACTIVE); + if (! bd->cp_irq) { + cp_destroy = 1; + printf ("cp%d: cannot map interrupt\n", unit); + bus_release_resource (dev, SYS_RES_MEMORY, + PCIR_BAR(0), bd->cp_res); + mtx_destroy (&bd->cp_mtx); + free (b, M_DEVBUF); splx (s); - return 0; + return (ENXIO); + } + callout_init (&led_timo[unit], cp_mpsafenet ? CALLOUT_MPSAFE : 0); + error = bus_setup_intr (dev, bd->cp_irq, + INTR_TYPE_NET|(cp_mpsafenet?INTR_MPSAFE:0), + cp_intr, bd, &bd->cp_intrhand); + if (error) { + cp_destroy = 1; + printf ("cp%d: cannot set up irq\n", unit); + bus_release_resource (dev, SYS_RES_IRQ, 0, bd->cp_irq); + bus_release_resource (dev, SYS_RES_MEMORY, + PCIR_BAR(0), bd->cp_res); + mtx_destroy (&bd->cp_mtx); + free (b, M_DEVBUF); + splx (s); + return (ENXIO); + } + printf ("cp%d: %s, clock %ld MHz\n", unit, b->name, b->osc / 1000000); - case SERIAL_GETCLK: - CP_DEBUG2 (d, ("ioctl: getclk\n")); - if (c->type != T_E1 && - c->type != T_G703 && - c->type != T_E3 && - c->type != T_T3 && - c->type != T_STS1) - return EINVAL; - switch (c->gsyn) { - default: *(int*)data = E1CLK_INTERNAL; break; - case GSYN_RCV: *(int*)data = E1CLK_RECEIVE; break; - case GSYN_RCV0: *(int*)data = E1CLK_RECEIVE_CHAN0; break; - case GSYN_RCV1: *(int*)data = E1CLK_RECEIVE_CHAN1; break; - case GSYN_RCV2: *(int*)data = E1CLK_RECEIVE_CHAN2; break; - case GSYN_RCV3: *(int*)data = E1CLK_RECEIVE_CHAN3; break; + for (c = b->chan; c < b->chan + NCHAN; ++c) { + if (! c->type) + continue; + d = &bd->channel[c->num]; + d->dmamem.size = sizeof(cp_buf_t); + if (! cp_bus_dma_mem_alloc (unit, c->num, &d->dmamem)) + continue; + channel [b->num*NCHAN + c->num] = d; + sprintf (d->name, "cp%d.%d", b->num, c->num); + d->board = b; + d->chan = c; + c->sys = d; +#ifdef NETGRAPH + if (ng_make_node_common (&typestruct, &d->node) != 0) { + printf ("%s: cannot make common node\n", d->name); + d->node = NULL; + continue; } - return 0; + NG_NODE_SET_PRIVATE (d->node, d); + sprintf (d->nodename, "%s%d", NG_CP_NODE_TYPE, + c->board->num*NCHAN + c->num); + if (ng_name_node (d->node, d->nodename)) { + printf ("%s: cannot name node\n", d->nodename); + NG_NODE_UNREF (d->node); + continue; + } + d->queue.ifq_maxlen = IFQ_MAXLEN; + d->hi_queue.ifq_maxlen = IFQ_MAXLEN; + mtx_init (&d->queue.ifq_mtx, "cp_queue", NULL, MTX_DEF); + mtx_init (&d->hi_queue.ifq_mtx, "cp_queue_hi", NULL, MTX_DEF); + callout_init (&d->timeout_handle, + cp_mpsafenet ? CALLOUT_MPSAFE : 0); +#else /*NETGRAPH*/ + d->ifp = if_alloc(IFT_PPP); + if (d->ifp == NULL) { + printf ("%s: cannot if_alloc() interface\n", d->name); + continue; + } + d->ifp->if_softc = d; + if_initname (d->ifp, "cp", b->num * NCHAN + c->num); + d->ifp->if_mtu = PP_MTU; + d->ifp->if_flags = IFF_POINTOPOINT | IFF_MULTICAST; + if (!cp_mpsafenet) + d->ifp->if_flags |= IFF_NEEDSGIANT; + d->ifp->if_ioctl = cp_sioctl; + d->ifp->if_start = cp_ifstart; + d->ifp->if_watchdog = cp_ifwatchdog; + d->ifp->if_init = cp_initialize; + d->queue.ifq_maxlen = NRBUF; + mtx_init (&d->queue.ifq_mtx, "cp_queue", NULL, MTX_DEF); + sppp_attach (d->ifp); + if_attach (d->ifp); + IFP2SP(d->ifp)->pp_tlf = cp_tlf; + IFP2SP(d->ifp)->pp_tls = cp_tls; + /* If BPF is in the kernel, call the attach for it. + * The header size of PPP or Cisco/HDLC is 4 bytes. */ + bpfattach (d->ifp, DLT_PPP, 4); +#endif /*NETGRAPH*/ + cp_start_e1 (c); + cp_start_chan (c, 1, 1, d->dmamem.virt, d->dmamem.phys); + + /* Register callback functions. */ + cp_register_transmit (c, &cp_transmit); + cp_register_receive (c, &cp_receive); + cp_register_error (c, &cp_error); + d->devt = make_dev (&cp_cdevsw, b->num*NCHAN+c->num, UID_ROOT, + GID_WHEEL, 0600, "cp%d", b->num*NCHAN+c->num); + } + CP_LOCK (bd); + b->sys = bd; + adapter[unit] = b; + CP_UNLOCK (bd); + splx (s); + return 0; +} + +static int cp_detach (device_t dev) +{ + bdrv_t *bd = device_get_softc (dev); + cp_board_t *b = bd->board; + cp_chan_t *c; + int s; + + KASSERT (mtx_initialized (&bd->cp_mtx), ("cp mutex not initialized")); + s = splimp (); + CP_LOCK (bd); + /* Check if the device is busy (open). */ + for (c = b->chan; c < b->chan + NCHAN; ++c) { + drv_t *d = (drv_t*) c->sys; - case SERIAL_SETCLK: - CP_DEBUG2 (d, ("ioctl: setclk\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - if (c->type != T_E1 && - c->type != T_G703 && - c->type != T_E3 && - c->type != T_T3 && - c->type != T_STS1) - return EINVAL; - s = splimp (); - CP_LOCK (bd); - switch (*(int*)data) { - default: cp_set_gsyn (c, GSYN_INT); break; - case E1CLK_RECEIVE: cp_set_gsyn (c, GSYN_RCV); break; - case E1CLK_RECEIVE_CHAN0: cp_set_gsyn (c, GSYN_RCV0); break; - case E1CLK_RECEIVE_CHAN1: cp_set_gsyn (c, GSYN_RCV1); break; - case E1CLK_RECEIVE_CHAN2: cp_set_gsyn (c, GSYN_RCV2); break; - case E1CLK_RECEIVE_CHAN3: cp_set_gsyn (c, GSYN_RCV3); break; + if (! d || ! d->chan->type) + continue; + if (d->running) { + CP_UNLOCK (bd); + splx (s); + return EBUSY; } - CP_UNLOCK (bd); - splx (s); - return 0; + } - case SERIAL_GETTIMESLOTS: - CP_DEBUG2 (d, ("ioctl: gettimeslots\n")); - if ((c->type != T_E1 || c->unfram) && c->type != T_DATA) - return EINVAL; - *(u_long*)data = c->ts; - return 0; + /* Ok, we can unload driver */ + /* At first we should stop all channels */ + for (c = b->chan; c < b->chan + NCHAN; ++c) { + drv_t *d = (drv_t*) c->sys; - case SERIAL_SETTIMESLOTS: - CP_DEBUG2 (d, ("ioctl: settimeslots\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - if ((c->type != T_E1 || c->unfram) && c->type != T_DATA) - return EINVAL; - s = splimp (); - CP_LOCK (bd); - cp_set_ts (c, *(u_long*)data); - CP_UNLOCK (bd); - splx (s); - return 0; + if (! d || ! d->chan->type) + continue; - case SERIAL_GETINVCLK: - CP_DEBUG2 (d, ("ioctl: getinvclk\n")); -#if 1 - return EINVAL; -#else - if (c->type != T_SERIAL) - return EINVAL; - *(int*)data = c->invtxc; - return 0; -#endif + cp_stop_chan (c); + cp_stop_e1 (c); + cp_set_dtr (d->chan, 0); + cp_set_rts (d->chan, 0); + } - case SERIAL_SETINVCLK: - CP_DEBUG2 (d, ("ioctl: setinvclk\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - if (c->type != T_SERIAL) - return EINVAL; - s = splimp (); - CP_LOCK (bd); - cp_set_invtxc (c, *(int*)data); - cp_set_invrxc (c, *(int*)data); - CP_UNLOCK (bd); - splx (s); - return 0; + /* Reset the adapter. */ + cp_destroy = 1; + cp_interrupt_poll (b, 1); + cp_led_off (b); + cp_reset (b, 0 ,0); + callout_stop (&led_timo[b->num]); - case SERIAL_GETINVTCLK: - CP_DEBUG2 (d, ("ioctl: getinvtclk\n")); - if (c->type != T_SERIAL) - return EINVAL; - *(int*)data = c->invtxc; - return 0; + for (c=b->chan; cchan+NCHAN; ++c) { + drv_t *d = (drv_t*) c->sys; - case SERIAL_SETINVTCLK: - CP_DEBUG2 (d, ("ioctl: setinvtclk\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - if (c->type != T_SERIAL) - return EINVAL; - s = splimp (); - CP_LOCK (bd); - cp_set_invtxc (c, *(int*)data); - CP_UNLOCK (bd); - splx (s); - return 0; + if (! d || ! d->chan->type) + continue; +#ifndef NETGRAPH + /* Detach from the packet filter list of interfaces. */ + bpfdetach (d->ifp); - case SERIAL_GETINVRCLK: - CP_DEBUG2 (d, ("ioctl: getinvrclk\n")); - if (c->type != T_SERIAL) - return EINVAL; - *(int*)data = c->invrxc; - return 0; + /* Detach from the sync PPP list. */ + sppp_detach (d->ifp); - case SERIAL_SETINVRCLK: - CP_DEBUG2 (d, ("ioctl: setinvrclk\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - if (c->type != T_SERIAL) - return EINVAL; - s = splimp (); - CP_LOCK (bd); - cp_set_invrxc (c, *(int*)data); - CP_UNLOCK (bd); - splx (s); - return 0; + /* Detach from the system list of interfaces. */ + if_detach (d->ifp); + if_free (d->ifp); + IF_DRAIN (&d->queue); + mtx_destroy (&d->queue.ifq_mtx); +#else + if (d->node) { + ng_rmnode_self (d->node); + NG_NODE_UNREF (d->node); + d->node = NULL; + } + mtx_destroy (&d->queue.ifq_mtx); + mtx_destroy (&d->hi_queue.ifq_mtx); +#endif + destroy_dev (d->devt); + } - case SERIAL_GETLEVEL: - CP_DEBUG2 (d, ("ioctl: getlevel\n")); - if (c->type != T_G703) - return EINVAL; - s = splimp (); - CP_LOCK (bd); - *(int*)data = cp_get_lq (c); - CP_UNLOCK (bd); - splx (s); - return 0; + b->sys = NULL; + CP_UNLOCK (bd); -#if 0 - case SERIAL_RESET: - CP_DEBUG2 (d, ("ioctl: reset\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - s = splimp (); - CP_LOCK (bd); - cp_reset (c->board, 0, 0); - CP_UNLOCK (bd); - splx (s); - return 0; + /* Disable the interrupt request. */ + bus_teardown_intr (dev, bd->cp_irq, bd->cp_intrhand); + bus_deactivate_resource (dev, SYS_RES_IRQ, 0, bd->cp_irq); + bus_release_resource (dev, SYS_RES_IRQ, 0, bd->cp_irq); + bus_release_resource (dev, SYS_RES_MEMORY, PCIR_BAR(0), bd->cp_res); - case SERIAL_HARDRESET: - CP_DEBUG2 (d, ("ioctl: hardreset\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - s = splimp (); - CP_LOCK (bd); - /* hard_reset (c->board); */ - CP_UNLOCK (bd); - splx (s); - return 0; -#endif + CP_LOCK (bd); + cp_led_off (b); + CP_UNLOCK (bd); + callout_drain (&led_timo[b->num]); + splx (s); - case SERIAL_GETCABLE: - CP_DEBUG2 (d, ("ioctl: getcable\n")); - if (c->type != T_SERIAL) - return EINVAL; - s = splimp (); - CP_LOCK (bd); - *(int*)data = cp_get_cable (c); - CP_UNLOCK (bd); - splx (s); - return 0; + s = splimp (); + for (c = b->chan; c < b->chan + NCHAN; ++c) { + drv_t *d = (drv_t*) c->sys; - case SERIAL_GETDIR: - CP_DEBUG2 (d, ("ioctl: getdir\n")); - if (c->type != T_E1 && c->type != T_DATA) - return EINVAL; - *(int*)data = c->dir; - return 0; + if (! d || ! d->chan->type) + continue; + channel [b->num*NCHAN + c->num] = 0; + /* Deallocate buffers. */ + cp_bus_dma_mem_free (&d->dmamem); + } + adapter [b->num] = 0; + cp_bus_dma_mem_free (&bd->dmamem); + free (b, M_DEVBUF); + splx (s); + mtx_destroy (&bd->cp_mtx); + return 0; +} + +#ifndef NETGRAPH +static void cp_ifstart (struct ifnet *ifp) +{ + drv_t *d = ifp->if_softc; + bdrv_t *bd = d->board->sys; + + CP_LOCK (bd); + cp_start (d); + CP_UNLOCK (bd); +} + +static void cp_ifwatchdog (struct ifnet *ifp) +{ + drv_t *d = ifp->if_softc; - case SERIAL_SETDIR: - CP_DEBUG2 (d, ("ioctl: setdir\n")); - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - s = splimp (); - CP_LOCK (bd); - cp_set_dir (c, *(int*)data); - CP_UNLOCK (bd); - splx (s); - return 0; + cp_watchdog (d); +} - case SERIAL_GETRLOOP: - CP_DEBUG2 (d, ("ioctl: getrloop\n")); - if (c->type != T_G703 && - c->type != T_E3 && - c->type != T_T3 && - c->type != T_STS1) - return EINVAL; - *(int*)data = cp_get_rloop (c); - return 0; +static void cp_tlf (struct sppp *sp) +{ + drv_t *d = SP2IFP(sp)->if_softc; - case SERIAL_SETRLOOP: - CP_DEBUG2 (d, ("ioctl: setloop\n")); - if (c->type != T_E3 && c->type != T_T3 && c->type != T_STS1) - return EINVAL; - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - s = splimp (); - CP_LOCK (bd); - cp_set_rloop (c, *(int*)data); - CP_UNLOCK (bd); - splx (s); - return 0; + CP_DEBUG2 (d, ("cp_tlf\n")); + /* XXXRIK: Don't forget to protect them by LOCK, or kill them. */ +/* cp_set_dtr (d->chan, 0);*/ +/* cp_set_rts (d->chan, 0);*/ + if (!(sp->pp_flags & PP_FR) && !(d->ifp->if_flags & PP_CISCO)) + sp->pp_down (sp); +} - case SERIAL_GETCABLEN: - CP_DEBUG2 (d, ("ioctl: getcablen\n")); - if (c->type != T_T3 && c->type != T_STS1) - return EINVAL; - *(int*)data = c->cablen; - return 0; +static void cp_tls (struct sppp *sp) +{ + drv_t *d = SP2IFP(sp)->if_softc; - case SERIAL_SETCABLEN: - CP_DEBUG2 (d, ("ioctl: setloop\n")); - if (c->type != T_T3 && c->type != T_STS1) - return EINVAL; - /* Only for superuser! */ - error = suser (td); - if (error) - return error; - s = splimp (); - CP_LOCK (bd); - cp_set_cablen (c, *(int*)data); - CP_UNLOCK (bd); - splx (s); - return 0; + CP_DEBUG2 (d, ("cp_tls\n")); + if (!(sp->pp_flags & PP_FR) && !(d->ifp->if_flags & PP_CISCO)) + sp->pp_up (sp); +} - case TIOCSDTR: /* Set DTR */ - s = splimp (); - CP_LOCK (bd); - cp_set_dtr (c, 1); - CP_UNLOCK (bd); - splx (s); - return 0; +/* + * Process an ioctl request. + */ +static int cp_sioctl (struct ifnet *ifp, u_long cmd, caddr_t data) +{ + drv_t *d = ifp->if_softc; + bdrv_t *bd = d->board->sys; + int error, s, was_up, should_be_up; - case TIOCCDTR: /* Clear DTR */ - s = splimp (); - CP_LOCK (bd); - cp_set_dtr (c, 0); - CP_UNLOCK (bd); - splx (s); - return 0; + was_up = (ifp->if_drv_flags & IFF_DRV_RUNNING) != 0; + error = sppp_ioctl (ifp, cmd, data); - case TIOCMSET: /* Set DTR/RTS */ - s = splimp (); - CP_LOCK (bd); - cp_set_dtr (c, (*(int*)data & TIOCM_DTR) ? 1 : 0); - cp_set_rts (c, (*(int*)data & TIOCM_RTS) ? 1 : 0); - CP_UNLOCK (bd); - splx (s); - return 0; + if (error) + return error; - case TIOCMBIS: /* Add DTR/RTS */ - s = splimp (); - CP_LOCK (bd); - if (*(int*)data & TIOCM_DTR) cp_set_dtr (c, 1); - if (*(int*)data & TIOCM_RTS) cp_set_rts (c, 1); - CP_UNLOCK (bd); - splx (s); - return 0; + if (! (ifp->if_flags & IFF_DEBUG)) + d->chan->debug = 0; + else if (! d->chan->debug) + d->chan->debug = 1; - case TIOCMBIC: /* Clear DTR/RTS */ - s = splimp (); - CP_LOCK (bd); - if (*(int*)data & TIOCM_DTR) cp_set_dtr (c, 0); - if (*(int*)data & TIOCM_RTS) cp_set_rts (c, 0); - CP_UNLOCK (bd); - splx (s); - return 0; + switch (cmd) { + default: CP_DEBUG2 (d, ("ioctl 0x%lx\n", cmd)); return 0; + case SIOCADDMULTI: CP_DEBUG2 (d, ("ioctl SIOCADDMULTI\n")); return 0; + case SIOCDELMULTI: CP_DEBUG2 (d, ("ioctl SIOCDELMULTI\n")); return 0; + case SIOCSIFFLAGS: CP_DEBUG2 (d, ("ioctl SIOCSIFFLAGS\n")); break; + case SIOCSIFADDR: CP_DEBUG2 (d, ("ioctl SIOCSIFADDR\n")); break; + } - case TIOCMGET: /* Get modem status */ - *(int*)data = cp_modem_status (c); - return 0; + /* We get here only in case of SIFFLAGS or SIFADDR. */ + s = splimp (); + CP_LOCK (bd); + should_be_up = (ifp->if_drv_flags & IFF_DRV_RUNNING) != 0; + if (! was_up && should_be_up) { + /* Interface goes up -- start it. */ + cp_up (d); + cp_start (d); + } else if (was_up && ! should_be_up) { + /* Interface is going down -- stop it. */ +/* if ((IFP2SP(ifp)->pp_flags & PP_FR) || (ifp->if_flags & PP_CISCO))*/ + cp_down (d); } - return ENOTTY; + CP_DEBUG (d, ("ioctl 0x%lx p4\n", cmd)); + CP_UNLOCK (bd); + splx (s); + return 0; } -static struct cdevsw cp_cdevsw = { - .d_version = D_VERSION, - .d_open = cp_open, - .d_close = cp_close, - .d_ioctl = cp_ioctl, - .d_name = "cp", - .d_flags = D_NEEDGIANT, -}; +/* + * Initialization of interface. + * It seems to be never called by upper level? + */ +static void cp_initialize (void *softc) +{ + drv_t *d = softc; + + CP_DEBUG (d, ("cp_initialize\n")); +} +#endif /*NETGRAPH*/ /* - * Print the mbuf chain, for debug purposes only. + * Stop the interface. Called on splimp(). */ -static void printmbuf (struct mbuf *m) +static void cp_down (drv_t *d) { - printf ("mbuf:"); - for (; m; m=m->m_next) { - if (m->m_flags & M_PKTHDR) - printf (" HDR %d:", m->m_pkthdr.len); - if (m->m_flags & M_EXT) - printf (" EXT:"); - printf (" %d", m->m_len); - } - printf ("\n"); + CP_DEBUG (d, ("cp_down\n")); + /* Interface is going down -- stop it. */ + cp_set_dtr (d->chan, 0); + cp_set_rts (d->chan, 0); + + d->running = 0; } /* - * Make an mbuf from data. + * Start the interface. Called on splimp(). */ -static struct mbuf *makembuf (void *buf, unsigned len) +static void cp_up (drv_t *d) +{ + CP_DEBUG (d, ("cp_up\n")); + cp_set_dtr (d->chan, 1); + cp_set_rts (d->chan, 1); + d->running = 1; +} + +/* + * Start output on the interface. Get another datagram to send + * off of the interface queue, and copy it to the interface + * before starting the output. + */ +static void cp_send (drv_t *d) { struct mbuf *m; + u_short len; - MGETHDR (m, M_DONTWAIT, MT_DATA); - if (! m) - return 0; - MCLGET (m, M_DONTWAIT); - if (! (m->m_flags & M_EXT)) { + CP_DEBUG2 (d, ("cp_send, tn=%d te=%d\n", d->chan->tn, d->chan->te)); + + /* No output if the interface is down. */ + if (! d->running) + return; + + /* No output if the modem is off. */ + if (! (d->chan->lloop || d->chan->type != T_SERIAL || + cp_get_dsr (d->chan))) + return; + + while (cp_transmit_space (d->chan)) { + /* Get the packet to send. */ +#ifdef NETGRAPH + IF_DEQUEUE (&d->hi_queue, m); + if (! m) + IF_DEQUEUE (&d->queue, m); +#else + m = sppp_dequeue (d->ifp); +#endif + if (! m) + return; +#ifndef NETGRAPH + if (d->ifp->if_bpf) + BPF_MTAP (d->ifp, m); +#endif + len = m_length (m, NULL); + if (len >= BUFSZ) + printf ("%s: too long packet: %d bytes: ", + d->name, len); + else if (! m->m_next) + cp_send_packet (d->chan, (u_char*) mtod (m, caddr_t), len, 0); + else { + u_char *buf = d->chan->tbuf[d->chan->te]; + m_copydata (m, 0, len, buf); + cp_send_packet (d->chan, buf, len, 0); + } m_freem (m); - return 0; + /* Set up transmit timeout, if the transmit ring is not empty.*/ +#ifdef NETGRAPH + d->timeout = 10; +#else + d->ifp->if_timer = 10; +#endif } - m->m_pkthdr.len = m->m_len = len; - bcopy (buf, mtod (m, caddr_t), len); - return m; +#ifndef NETGRAPH + d->ifp->if_drv_flags |= IFF_DRV_OACTIVE; +#endif } -static int cp_probe (device_t dev) +/* + * Start output on the interface. + * Always called on splimp(). + */ +static void cp_start (drv_t *d) { - if ((pci_get_vendor (dev) == cp_vendor_id) && - (pci_get_device (dev) == cp_device_id)) { - device_set_desc (dev, "Cronyx-Tau-PCI serial adapter"); - return BUS_PROBE_DEFAULT; + if (d->running) { + if (! d->chan->dtr) + cp_set_dtr (d->chan, 1); + if (! d->chan->rts) + cp_set_rts (d->chan, 1); + cp_send (d); } - return ENXIO; } -static void cp_timeout (void *arg) +/* + * Handle transmit timeouts. + * Recover after lost transmit interrupts. + * Always called on splimp(). + */ +static void cp_watchdog (drv_t *d) { - drv_t *d; - int s, i, k; - - for (i = 0; i < NBRD; ++i) { - if (adapter[i] == NULL) - continue; - for (k = 0; k < NCHAN; ++k) { - s = splimp (); - if (cp_destroy) { - splx (s); - return; - } - d = channel[i * NCHAN + k]; - if (!d) { - splx (s); - continue; - } - CP_LOCK ((bdrv_t *)d->board->sys); - switch (d->chan->type) { - case T_G703: - cp_g703_timer (d->chan); - break; - case T_E1: - cp_e1_timer (d->chan); - break; - case T_E3: - case T_T3: - case T_STS1: - cp_e3_timer (d->chan); - break; - default: - break; - } - CP_UNLOCK ((bdrv_t *)d->board->sys); - splx (s); - } - } - s = splimp (); - if (!cp_destroy) - callout_reset (&timeout_handle, hz, cp_timeout, 0); - splx (s); -} + bdrv_t *bd = d->board->sys; + CP_DEBUG (d, ("device timeout\n")); + if (d->running) { + int s = splimp (); -static void cp_led_off (void *arg) -{ - cp_board_t *b = arg; - bdrv_t *bd = (bdrv_t *) b->sys; - int s; - s = splimp (); - if (cp_destroy) { + CP_LOCK (bd); + cp_stop_chan (d->chan); + cp_stop_e1 (d->chan); + cp_start_e1 (d->chan); + cp_start_chan (d->chan, 1, 1, 0, 0); + cp_set_dtr (d->chan, 1); + cp_set_rts (d->chan, 1); + cp_start (d); + CP_UNLOCK (bd); splx (s); - return; } - CP_LOCK (bd); - cp_led (b, 0); - CP_UNLOCK (bd); - splx (s); } -static void cp_intr (void *arg) +static void cp_transmit (cp_chan_t *c, void *attachment, int len) { - bdrv_t *bd = arg; - cp_board_t *b = bd->board; -#ifndef NETGRAPH - int i; -#endif - int s = splimp (); - if (cp_destroy) { - splx (s); - return; - } - CP_LOCK (bd); - /* Check if we are ready */ - if (b->sys == NULL) { - /* Not we are not, just cleanup. */ - cp_interrupt_poll (b, 1); - CP_UNLOCK (bd); - return; - } - /* Turn LED on. */ - cp_led (b, 1); - - cp_interrupt (b); - - /* Turn LED off 50 msec later. */ - callout_reset (&led_timo[b->num], hz/20, cp_led_off, b); - CP_UNLOCK (bd); - splx (s); + drv_t *d = c->sys; -#ifndef NETGRAPH - /* Pass packets in a lock-free state */ - for (i = 0; i < NCHAN && b->chan[i].type; i++) { - drv_t *d = b->chan[i].sys; - struct mbuf *m; - if (!d || !d->running) - continue; - while (_IF_QLEN(&d->queue)) { - IF_DEQUEUE (&d->queue,m); - if (!m) - continue; - sppp_input (d->ifp, m); - } - } +#ifdef NETGRAPH + d->timeout = 0; +#else + ++d->ifp->if_opackets; + d->ifp->if_drv_flags &= ~IFF_DRV_OACTIVE; + d->ifp->if_timer = 0; #endif + cp_start (d); } -static void -cp_bus_dmamap_addr (void *arg, bus_dma_segment_t *segs, int nseg, int error) +static void cp_receive (cp_chan_t *c, unsigned char *data, int len) { - unsigned long *addr; + drv_t *d = c->sys; + struct mbuf *m; +#ifdef NETGRAPH + int error; +#endif - if (error) + if (! d->running) return; - KASSERT(nseg == 1, ("too many DMA segments, %d should be 1", nseg)); - addr = arg; - *addr = segs->ds_addr; + m = makembuf (data, len); + if (! m) { + CP_DEBUG (d, ("no memory for packet\n")); +#ifndef NETGRAPH + ++d->ifp->if_iqdrops; +#endif + return; + } + if (c->debug > 1) + printmbuf (m); +#ifdef NETGRAPH + m->m_pkthdr.rcvif = 0; + NG_SEND_DATA_ONLY (error, d->hook, m); +#else + ++d->ifp->if_ipackets; + m->m_pkthdr.rcvif = d->ifp; + /* Check if there's a BPF listener on this interface. + * If so, hand off the raw packet to bpf. */ + if (d->ifp->if_bpf) + BPF_TAP (d->ifp, data, len); + IF_ENQUEUE (&d->queue, m); +#endif } -static int -cp_bus_dma_mem_alloc (int bnum, int cnum, cp_dma_mem_t *dmem) +static void cp_error (cp_chan_t *c, int data) { - int error; + drv_t *d = c->sys; - error = bus_dma_tag_create (NULL, 16, 0, BUS_SPACE_MAXADDR_32BIT, - BUS_SPACE_MAXADDR, NULL, NULL, dmem->size, 1, - dmem->size, 0, NULL, NULL, &dmem->dmat); - if (error) { - if (cnum >= 0) printf ("cp%d-%d: ", bnum, cnum); - else printf ("cp%d: ", bnum); - printf ("couldn't allocate tag for dma memory\n"); - return 0; - } - error = bus_dmamem_alloc (dmem->dmat, (void **)&dmem->virt, - BUS_DMA_NOWAIT | BUS_DMA_ZERO, &dmem->mapp); - if (error) { - if (cnum >= 0) printf ("cp%d-%d: ", bnum, cnum); - else printf ("cp%d: ", bnum); - printf ("couldn't allocate mem for dma memory\n"); - bus_dma_tag_destroy (dmem->dmat); - return 0; - } - error = bus_dmamap_load (dmem->dmat, dmem->mapp, dmem->virt, - dmem->size, cp_bus_dmamap_addr, &dmem->phys, 0); - if (error) { - if (cnum >= 0) printf ("cp%d-%d: ", bnum, cnum); - else printf ("cp%d: ", bnum); - printf ("couldn't load mem map for dma memory\n"); - bus_dmamem_free (dmem->dmat, dmem->virt, dmem->mapp); - bus_dma_tag_destroy (dmem->dmat); - return 0; + switch (data) { + case CP_FRAME: + CP_DEBUG (d, ("frame error\n")); +#ifndef NETGRAPH + ++d->ifp->if_ierrors; +#endif + break; + case CP_CRC: + CP_DEBUG (d, ("crc error\n")); +#ifndef NETGRAPH + ++d->ifp->if_ierrors; +#endif + break; + case CP_OVERRUN: + CP_DEBUG (d, ("overrun error\n")); +#ifndef NETGRAPH + ++d->ifp->if_collisions; + ++d->ifp->if_ierrors; +#endif + break; + case CP_OVERFLOW: + CP_DEBUG (d, ("overflow error\n")); +#ifndef NETGRAPH + ++d->ifp->if_ierrors; +#endif + break; + case CP_UNDERRUN: + CP_DEBUG (d, ("underrun error\n")); +#ifdef NETGRAPH + d->timeout = 0; +#else + ++d->ifp->if_oerrors; + d->ifp->if_drv_flags &= ~IFF_DRV_OACTIVE; + d->ifp->if_timer = 0; +#endif + cp_start (d); + break; + default: + CP_DEBUG (d, ("error #%d\n", data)); + break; } - return 1; } -static void -cp_bus_dma_mem_free (cp_dma_mem_t *dmem) +/* + * You also need read, write, open, close routines. + * This should get you started + */ +static int cp_open (struct cdev *dev, int oflags, int devtype, struct thread *td) { - bus_dmamap_unload (dmem->dmat, dmem->mapp); - bus_dmamem_free (dmem->dmat, dmem->virt, dmem->mapp); - bus_dma_tag_destroy (dmem->dmat); + int unit = minor (dev); + drv_t *d; + + if (unit >= NBRD*NCHAN || ! (d = channel[unit])) + return ENXIO; + CP_DEBUG2 (d, ("cp_open\n")); + return 0; } /* - * Called if the probe succeeded. + * Only called on the LAST close. */ -static int cp_attach (device_t dev) +static int cp_close (struct cdev *dev, int fflag, int devtype, struct thread *td) { - bdrv_t *bd = device_get_softc (dev); - int unit = device_get_unit (dev); - char *cp_ln = CP_LOCK_NAME; - unsigned short res; - vm_offset_t vbase; - int rid, error; - cp_board_t *b; - cp_chan_t *c; - drv_t *d; - int s = splimp (); - - b = malloc (sizeof(cp_board_t), M_DEVBUF, M_WAITOK); - if (!b) { - printf ("cp%d: couldn't allocate memory\n", unit); - splx (s); - return (ENXIO); - } - bzero (b, sizeof(cp_board_t)); + drv_t *d = channel [minor (dev)]; - bd->board = b; - rid = PCIR_BAR(0); - bd->cp_res = bus_alloc_resource (dev, SYS_RES_MEMORY, &rid, - 0, ~0, 1, RF_ACTIVE); - if (! bd->cp_res) { - printf ("cp%d: cannot map memory\n", unit); - free (b, M_DEVBUF); - splx (s); - return (ENXIO); - } - vbase = (vm_offset_t) rman_get_virtual (bd->cp_res); + CP_DEBUG2 (d, ("cp_close\n")); + return 0; +} - cp_ln[2] = '0' + unit; - mtx_init (&bd->cp_mtx, cp_ln, MTX_NETWORK_LOCK, MTX_DEF|MTX_RECURSE); - res = cp_init (b, unit, (u_char*) vbase); - if (res) { - printf ("cp%d: can't init, error code:%x\n", unit, res); - bus_release_resource (dev, SYS_RES_MEMORY, PCIR_BAR(0), bd->cp_res); - free (b, M_DEVBUF); - splx (s); - return (ENXIO); - } +static int cp_modem_status (cp_chan_t *c) +{ + drv_t *d = c->sys; + bdrv_t *bd = d->board->sys; + int status, s; - bd->dmamem.size = sizeof(cp_qbuf_t); - if (! cp_bus_dma_mem_alloc (unit, -1, &bd->dmamem)) { - free (b, M_DEVBUF); - splx (s); - return (ENXIO); - } + status = d->running ? TIOCM_LE : 0; + s = splimp (); CP_LOCK (bd); - cp_reset (b, bd->dmamem.virt, bd->dmamem.phys); + if (cp_get_cd (c)) status |= TIOCM_CD; + if (cp_get_cts (c)) status |= TIOCM_CTS; + if (cp_get_dsr (c)) status |= TIOCM_DSR; + if (c->dtr) status |= TIOCM_DTR; + if (c->rts) status |= TIOCM_RTS; CP_UNLOCK (bd); + splx (s); + return status; +} - rid = 0; - bd->cp_irq = bus_alloc_resource (dev, SYS_RES_IRQ, &rid, 0, ~0, 1, - RF_SHAREABLE | RF_ACTIVE); - if (! bd->cp_irq) { - cp_destroy = 1; - printf ("cp%d: cannot map interrupt\n", unit); - bus_release_resource (dev, SYS_RES_MEMORY, - PCIR_BAR(0), bd->cp_res); - mtx_destroy (&bd->cp_mtx); - free (b, M_DEVBUF); - splx (s); - return (ENXIO); - } - callout_init (&led_timo[unit], cp_mpsafenet ? CALLOUT_MPSAFE : 0); - error = bus_setup_intr (dev, bd->cp_irq, - INTR_TYPE_NET|(cp_mpsafenet?INTR_MPSAFE:0), - cp_intr, bd, &bd->cp_intrhand); - if (error) { - cp_destroy = 1; - printf ("cp%d: cannot set up irq\n", unit); - bus_release_resource (dev, SYS_RES_IRQ, 0, bd->cp_irq); - bus_release_resource (dev, SYS_RES_MEMORY, - PCIR_BAR(0), bd->cp_res); - mtx_destroy (&bd->cp_mtx); - free (b, M_DEVBUF); - splx (s); - return (ENXIO); - } - printf ("cp%d: %s, clock %ld MHz\n", unit, b->name, b->osc / 1000000); +static int cp_ioctl (struct cdev *dev, u_long cmd, caddr_t data, int flag, struct thread *td) +{ + drv_t *d = channel [minor (dev)]; + bdrv_t *bd = d->board->sys; + cp_chan_t *c = d->chan; + struct serial_statistics *st; + struct e1_statistics *opte1; + struct e3_statistics *opte3; + int error, s; + char mask[16]; - for (c = b->chan; c < b->chan + NCHAN; ++c) { - if (! c->type) - continue; - d = &bd->channel[c->num]; - d->dmamem.size = sizeof(cp_buf_t); - if (! cp_bus_dma_mem_alloc (unit, c->num, &d->dmamem)) - continue; - channel [b->num*NCHAN + c->num] = d; - sprintf (d->name, "cp%d.%d", b->num, c->num); - d->board = b; - d->chan = c; - c->sys = d; -#ifdef NETGRAPH - if (ng_make_node_common (&typestruct, &d->node) != 0) { - printf ("%s: cannot make common node\n", d->name); - d->node = NULL; - continue; - } - NG_NODE_SET_PRIVATE (d->node, d); - sprintf (d->nodename, "%s%d", NG_CP_NODE_TYPE, - c->board->num*NCHAN + c->num); - if (ng_name_node (d->node, d->nodename)) { - printf ("%s: cannot name node\n", d->nodename); - NG_NODE_UNREF (d->node); - continue; - } - d->queue.ifq_maxlen = IFQ_MAXLEN; - d->hi_queue.ifq_maxlen = IFQ_MAXLEN; - mtx_init (&d->queue.ifq_mtx, "cp_queue", NULL, MTX_DEF); - mtx_init (&d->hi_queue.ifq_mtx, "cp_queue_hi", NULL, MTX_DEF); - callout_init (&d->timeout_handle, - cp_mpsafenet ? CALLOUT_MPSAFE : 0); -#else /*NETGRAPH*/ - d->ifp = if_alloc(IFT_PPP); - if (d->ifp == NULL) { - printf ("%s: cannot if_alloc() interface\n", d->name); - continue; - } - d->ifp->if_softc = d; - if_initname (d->ifp, "cp", b->num * NCHAN + c->num); - d->ifp->if_mtu = PP_MTU; - d->ifp->if_flags = IFF_POINTOPOINT | IFF_MULTICAST; - if (!cp_mpsafenet) - d->ifp->if_flags |= IFF_NEEDSGIANT; - d->ifp->if_ioctl = cp_sioctl; - d->ifp->if_start = cp_ifstart; - d->ifp->if_watchdog = cp_ifwatchdog; - d->ifp->if_init = cp_initialize; - d->queue.ifq_maxlen = NRBUF; - mtx_init (&d->queue.ifq_mtx, "cp_queue", NULL, MTX_DEF); - sppp_attach (d->ifp); - if_attach (d->ifp); - IFP2SP(d->ifp)->pp_tlf = cp_tlf; - IFP2SP(d->ifp)->pp_tls = cp_tls; - /* If BPF is in the kernel, call the attach for it. - * The header size of PPP or Cisco/HDLC is 4 bytes. */ - bpfattach (d->ifp, DLT_PPP, 4); + switch (cmd) { + case SERIAL_GETREGISTERED: + CP_DEBUG2 (d, ("ioctl: getregistered\n")); + bzero (mask, sizeof(mask)); + for (s=0; sifp)->pp_flags & PP_FR) ? "fr" : + (d->ifp->if_flags & PP_CISCO) ? "cisco" : "ppp"); + return 0; + + case SERIAL_SETPROTO: + CP_DEBUG2 (d, ("ioctl: setproto\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + if (d->ifp->if_drv_flags & IFF_DRV_RUNNING) + return EBUSY; + if (! strcmp ("cisco", (char*)data)) { + IFP2SP(d->ifp)->pp_flags &= ~(PP_FR); + IFP2SP(d->ifp)->pp_flags |= PP_KEEPALIVE; + d->ifp->if_flags |= PP_CISCO; + } else if (! strcmp ("fr", (char*)data) && PP_FR) { + d->ifp->if_flags &= ~(PP_CISCO); + IFP2SP(d->ifp)->pp_flags |= PP_FR | PP_KEEPALIVE; + } else if (! strcmp ("ppp", (char*)data)) { + IFP2SP(d->ifp)->pp_flags &= ~PP_FR; + IFP2SP(d->ifp)->pp_flags &= ~PP_KEEPALIVE; + d->ifp->if_flags &= ~(PP_CISCO); + } else + return EINVAL; + return 0; + + case SERIAL_GETKEEPALIVE: + CP_DEBUG2 (d, ("ioctl: getkeepalive\n")); + if ((IFP2SP(d->ifp)->pp_flags & PP_FR) || + (d->ifp->if_flags & PP_CISCO)) + return EINVAL; + *(int*)data = (IFP2SP(d->ifp)->pp_flags & PP_KEEPALIVE) ? 1 : 0; + return 0; + + case SERIAL_SETKEEPALIVE: + CP_DEBUG2 (d, ("ioctl: setkeepalive\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + if ((IFP2SP(d->ifp)->pp_flags & PP_FR) || + (d->ifp->if_flags & PP_CISCO)) + return EINVAL; + s = splimp (); + CP_LOCK (bd); + if (*(int*)data) + IFP2SP(d->ifp)->pp_flags |= PP_KEEPALIVE; + else + IFP2SP(d->ifp)->pp_flags &= ~PP_KEEPALIVE; + CP_UNLOCK (bd); + splx (s); + return 0; #endif /*NETGRAPH*/ - cp_start_e1 (c); - cp_start_chan (c, 1, 1, d->dmamem.virt, d->dmamem.phys); - /* Register callback functions. */ - cp_register_transmit (c, &cp_transmit); - cp_register_receive (c, &cp_receive); - cp_register_error (c, &cp_error); - d->devt = make_dev (&cp_cdevsw, b->num*NCHAN+c->num, UID_ROOT, - GID_WHEEL, 0600, "cp%d", b->num*NCHAN+c->num); - } - CP_LOCK (bd); - b->sys = bd; - adapter[unit] = b; - CP_UNLOCK (bd); - splx (s); - return 0; -} + case SERIAL_GETMODE: + CP_DEBUG2 (d, ("ioctl: getmode\n")); + *(int*)data = SERIAL_HDLC; + return 0; -static int cp_detach (device_t dev) -{ - bdrv_t *bd = device_get_softc (dev); - cp_board_t *b = bd->board; - cp_chan_t *c; - int s; + case SERIAL_SETMODE: + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + if (*(int*)data != SERIAL_HDLC) + return EINVAL; + return 0; - KASSERT (mtx_initialized (&bd->cp_mtx), ("cp mutex not initialized")); - s = splimp (); - CP_LOCK (bd); - /* Check if the device is busy (open). */ - for (c = b->chan; c < b->chan + NCHAN; ++c) { - drv_t *d = (drv_t*) c->sys; + case SERIAL_GETCFG: + CP_DEBUG2 (d, ("ioctl: getcfg\n")); + if (c->type != T_E1 || c->unfram) + return EINVAL; + *(char*)data = c->board->mux ? 'c' : 'a'; + return 0; - if (! d || ! d->chan->type) - continue; - if (d->running) { - CP_UNLOCK (bd); - splx (s); - return EBUSY; + case SERIAL_SETCFG: + CP_DEBUG2 (d, ("ioctl: setcfg\n")); + error = suser (td); + if (error) + return error; + if (c->type != T_E1) + return EINVAL; + s = splimp (); + CP_LOCK (bd); + cp_set_mux (c->board, *((char*)data) == 'c'); + CP_UNLOCK (bd); + splx (s); + return 0; + + case SERIAL_GETSTAT: + CP_DEBUG2 (d, ("ioctl: getstat\n")); + st = (struct serial_statistics*) data; + st->rintr = c->rintr; + st->tintr = c->tintr; + st->mintr = 0; + st->ibytes = c->ibytes; + st->ipkts = c->ipkts; + st->obytes = c->obytes; + st->opkts = c->opkts; + st->ierrs = c->overrun + c->frame + c->crc; + st->oerrs = c->underrun; + return 0; + + case SERIAL_GETESTAT: + CP_DEBUG2 (d, ("ioctl: getestat\n")); + if (c->type != T_E1 && c->type != T_G703) + return EINVAL; + opte1 = (struct e1_statistics*) data; + opte1->status = c->status; + opte1->cursec = c->cursec; + opte1->totsec = c->totsec + c->cursec; + + opte1->currnt.bpv = c->currnt.bpv; + opte1->currnt.fse = c->currnt.fse; + opte1->currnt.crce = c->currnt.crce; + opte1->currnt.rcrce = c->currnt.rcrce; + opte1->currnt.uas = c->currnt.uas; + opte1->currnt.les = c->currnt.les; + opte1->currnt.es = c->currnt.es; + opte1->currnt.bes = c->currnt.bes; + opte1->currnt.ses = c->currnt.ses; + opte1->currnt.oofs = c->currnt.oofs; + opte1->currnt.css = c->currnt.css; + opte1->currnt.dm = c->currnt.dm; + + opte1->total.bpv = c->total.bpv + c->currnt.bpv; + opte1->total.fse = c->total.fse + c->currnt.fse; + opte1->total.crce = c->total.crce + c->currnt.crce; + opte1->total.rcrce = c->total.rcrce + c->currnt.rcrce; + opte1->total.uas = c->total.uas + c->currnt.uas; + opte1->total.les = c->total.les + c->currnt.les; + opte1->total.es = c->total.es + c->currnt.es; + opte1->total.bes = c->total.bes + c->currnt.bes; + opte1->total.ses = c->total.ses + c->currnt.ses; + opte1->total.oofs = c->total.oofs + c->currnt.oofs; + opte1->total.css = c->total.css + c->currnt.css; + opte1->total.dm = c->total.dm + c->currnt.dm; + for (s=0; s<48; ++s) { + opte1->interval[s].bpv = c->interval[s].bpv; + opte1->interval[s].fse = c->interval[s].fse; + opte1->interval[s].crce = c->interval[s].crce; + opte1->interval[s].rcrce = c->interval[s].rcrce; + opte1->interval[s].uas = c->interval[s].uas; + opte1->interval[s].les = c->interval[s].les; + opte1->interval[s].es = c->interval[s].es; + opte1->interval[s].bes = c->interval[s].bes; + opte1->interval[s].ses = c->interval[s].ses; + opte1->interval[s].oofs = c->interval[s].oofs; + opte1->interval[s].css = c->interval[s].css; + opte1->interval[s].dm = c->interval[s].dm; } - } + return 0; - /* Ok, we can unload driver */ - /* At first we should stop all channels */ - for (c = b->chan; c < b->chan + NCHAN; ++c) { - drv_t *d = (drv_t*) c->sys; + case SERIAL_GETE3STAT: + CP_DEBUG2 (d, ("ioctl: gete3stat\n")); + if (c->type != T_E3 && c->type != T_T3 && c->type != T_STS1) + return EINVAL; + opte3 = (struct e3_statistics*) data; - if (! d || ! d->chan->type) - continue; + opte3->status = c->e3status; + opte3->cursec = (c->e3csec_5 * 2 + 1) / 10; + opte3->totsec = c->e3tsec + opte3->cursec; - cp_stop_chan (c); - cp_stop_e1 (c); - cp_set_dtr (d->chan, 0); - cp_set_rts (d->chan, 0); - } + opte3->ccv = c->e3ccv; + opte3->tcv = c->e3tcv + opte3->ccv; - /* Reset the adapter. */ - cp_destroy = 1; - cp_interrupt_poll (b, 1); - cp_led_off (b); - cp_reset (b, 0 ,0); - callout_stop (&led_timo[b->num]); + for (s = 0; s < 48; ++s) { + opte3->icv[s] = c->e3icv[s]; + } + return 0; + + case SERIAL_CLRSTAT: + CP_DEBUG2 (d, ("ioctl: clrstat\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + c->rintr = 0; + c->tintr = 0; + c->ibytes = 0; + c->obytes = 0; + c->ipkts = 0; + c->opkts = 0; + c->overrun = 0; + c->frame = 0; + c->crc = 0; + c->underrun = 0; + bzero (&c->currnt, sizeof (c->currnt)); + bzero (&c->total, sizeof (c->total)); + bzero (c->interval, sizeof (c->interval)); + c->e3ccv = 0; + c->e3tcv = 0; + bzero (c->e3icv, sizeof (c->e3icv)); + return 0; - /* Disable the interrupt request. */ - bus_teardown_intr (dev, bd->cp_irq, bd->cp_intrhand); + case SERIAL_GETBAUD: + CP_DEBUG2 (d, ("ioctl: getbaud\n")); + *(long*)data = c->baud; + return 0; - for (c=b->chan; cchan+NCHAN; ++c) { - drv_t *d = (drv_t*) c->sys; + case SERIAL_SETBAUD: + CP_DEBUG2 (d, ("ioctl: setbaud\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + s = splimp (); + CP_LOCK (bd); + cp_set_baud (c, *(long*)data); + CP_UNLOCK (bd); + splx (s); + return 0; - if (! d || ! d->chan->type) - continue; -#ifndef NETGRAPH - /* Detach from the packet filter list of interfaces. */ - bpfdetach (d->ifp); + case SERIAL_GETLOOP: + CP_DEBUG2 (d, ("ioctl: getloop\n")); + *(int*)data = c->lloop; + return 0; - /* Detach from the sync PPP list. */ - sppp_detach (d->ifp); + case SERIAL_SETLOOP: + CP_DEBUG2 (d, ("ioctl: setloop\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + s = splimp (); + CP_LOCK (bd); + cp_set_lloop (c, *(int*)data); + CP_UNLOCK (bd); + splx (s); + return 0; - /* Detach from the system list of interfaces. */ - if_detach (d->ifp); - if_free (d->ifp); - IF_DRAIN (&d->queue); - mtx_destroy (&d->queue.ifq_mtx); -#else - if (d->node) { - ng_rmnode_self (d->node); - NG_NODE_UNREF (d->node); - d->node = NULL; - } - mtx_destroy (&d->queue.ifq_mtx); - mtx_destroy (&d->hi_queue.ifq_mtx); -#endif - destroy_dev (d->devt); - } + case SERIAL_GETDPLL: + CP_DEBUG2 (d, ("ioctl: getdpll\n")); + if (c->type != T_SERIAL) + return EINVAL; + *(int*)data = c->dpll; + return 0; + + case SERIAL_SETDPLL: + CP_DEBUG2 (d, ("ioctl: setdpll\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + if (c->type != T_SERIAL) + return EINVAL; + s = splimp (); + CP_LOCK (bd); + cp_set_dpll (c, *(int*)data); + CP_UNLOCK (bd); + splx (s); + return 0; - b->sys = NULL; - CP_UNLOCK (bd); + case SERIAL_GETNRZI: + CP_DEBUG2 (d, ("ioctl: getnrzi\n")); + if (c->type != T_SERIAL) + return EINVAL; + *(int*)data = c->nrzi; + return 0; - bus_deactivate_resource (dev, SYS_RES_IRQ, 0, bd->cp_irq); - bus_release_resource (dev, SYS_RES_IRQ, 0, bd->cp_irq); - bus_release_resource (dev, SYS_RES_MEMORY, PCIR_BAR(0), bd->cp_res); + case SERIAL_SETNRZI: + CP_DEBUG2 (d, ("ioctl: setnrzi\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + if (c->type != T_SERIAL) + return EINVAL; + s = splimp (); + CP_LOCK (bd); + cp_set_nrzi (c, *(int*)data); + CP_UNLOCK (bd); + splx (s); + return 0; - CP_LOCK (bd); - cp_led_off (b); - CP_UNLOCK (bd); - callout_drain (&led_timo[b->num]); - splx (s); + case SERIAL_GETDEBUG: + CP_DEBUG2 (d, ("ioctl: getdebug\n")); + *(int*)data = d->chan->debug; + return 0; - s = splimp (); - for (c = b->chan; c < b->chan + NCHAN; ++c) { - drv_t *d = (drv_t*) c->sys; + case SERIAL_SETDEBUG: + CP_DEBUG2 (d, ("ioctl: setdebug\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + d->chan->debug = *(int*)data; +#ifndef NETGRAPH + if (d->chan->debug) + d->ifp->if_flags |= IFF_DEBUG; + else + d->ifp->if_flags &= ~IFF_DEBUG; +#endif + return 0; - if (! d || ! d->chan->type) - continue; - channel [b->num*NCHAN + c->num] = 0; - /* Deallocate buffers. */ - cp_bus_dma_mem_free (&d->dmamem); - } - adapter [b->num] = 0; - cp_bus_dma_mem_free (&bd->dmamem); - free (b, M_DEVBUF); - splx (s); - mtx_destroy (&bd->cp_mtx); - return 0; -} + case SERIAL_GETHIGAIN: + CP_DEBUG2 (d, ("ioctl: gethigain\n")); + if (c->type != T_E1) + return EINVAL; + *(int*)data = c->higain; + return 0; -#ifndef NETGRAPH -static void cp_ifstart (struct ifnet *ifp) -{ - drv_t *d = ifp->if_softc; - bdrv_t *bd = d->board->sys; + case SERIAL_SETHIGAIN: + CP_DEBUG2 (d, ("ioctl: sethigain\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + if (c->type != T_E1) + return EINVAL; + s = splimp (); + CP_LOCK (bd); + cp_set_higain (c, *(int*)data); + CP_UNLOCK (bd); + splx (s); + return 0; - CP_LOCK (bd); - cp_start (d); - CP_UNLOCK (bd); -} + case SERIAL_GETPHONY: + CP_DEBUG2 (d, ("ioctl: getphony\n")); + if (c->type != T_E1) + return EINVAL; + *(int*)data = c->phony; + return 0; -static void cp_ifwatchdog (struct ifnet *ifp) -{ - drv_t *d = ifp->if_softc; + case SERIAL_SETPHONY: + CP_DEBUG2 (d, ("ioctl: setphony\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + if (c->type != T_E1) + return EINVAL; + s = splimp (); + CP_LOCK (bd); + cp_set_phony (c, *(int*)data); + CP_UNLOCK (bd); + splx (s); + return 0; - cp_watchdog (d); -} + case SERIAL_GETUNFRAM: + CP_DEBUG2 (d, ("ioctl: getunfram\n")); + if (c->type != T_E1) + return EINVAL; + *(int*)data = c->unfram; + return 0; -static void cp_tlf (struct sppp *sp) -{ - drv_t *d = SP2IFP(sp)->if_softc; + case SERIAL_SETUNFRAM: + CP_DEBUG2 (d, ("ioctl: setunfram\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + if (c->type != T_E1) + return EINVAL; + s = splimp (); + CP_LOCK (bd); + cp_set_unfram (c, *(int*)data); + CP_UNLOCK (bd); + splx (s); + return 0; - CP_DEBUG2 (d, ("cp_tlf\n")); - /* XXXRIK: Don't forget to protect them by LOCK, or kill them. */ -/* cp_set_dtr (d->chan, 0);*/ -/* cp_set_rts (d->chan, 0);*/ - if (!(sp->pp_flags & PP_FR) && !(d->ifp->if_flags & PP_CISCO)) - sp->pp_down (sp); -} + case SERIAL_GETSCRAMBLER: + CP_DEBUG2 (d, ("ioctl: getscrambler\n")); + if (c->type != T_G703 && !c->unfram) + return EINVAL; + *(int*)data = c->scrambler; + return 0; -static void cp_tls (struct sppp *sp) -{ - drv_t *d = SP2IFP(sp)->if_softc; + case SERIAL_SETSCRAMBLER: + CP_DEBUG2 (d, ("ioctl: setscrambler\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + if (c->type != T_G703 && !c->unfram) + return EINVAL; + s = splimp (); + CP_LOCK (bd); + cp_set_scrambler (c, *(int*)data); + CP_UNLOCK (bd); + splx (s); + return 0; - CP_DEBUG2 (d, ("cp_tls\n")); - if (!(sp->pp_flags & PP_FR) && !(d->ifp->if_flags & PP_CISCO)) - sp->pp_up (sp); -} + case SERIAL_GETMONITOR: + CP_DEBUG2 (d, ("ioctl: getmonitor\n")); + if (c->type != T_E1 && + c->type != T_E3 && + c->type != T_T3 && + c->type != T_STS1) + return EINVAL; + *(int*)data = c->monitor; + return 0; -/* - * Process an ioctl request. - */ -static int cp_sioctl (struct ifnet *ifp, u_long cmd, caddr_t data) -{ - drv_t *d = ifp->if_softc; - bdrv_t *bd = d->board->sys; - int error, s, was_up, should_be_up; + case SERIAL_SETMONITOR: + CP_DEBUG2 (d, ("ioctl: setmonitor\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + if (c->type != T_E1) + return EINVAL; + s = splimp (); + CP_LOCK (bd); + cp_set_monitor (c, *(int*)data); + CP_UNLOCK (bd); + splx (s); + return 0; - was_up = (ifp->if_drv_flags & IFF_DRV_RUNNING) != 0; - error = sppp_ioctl (ifp, cmd, data); + case SERIAL_GETUSE16: + CP_DEBUG2 (d, ("ioctl: getuse16\n")); + if (c->type != T_E1 || c->unfram) + return EINVAL; + *(int*)data = c->use16; + return 0; - if (error) - return error; + case SERIAL_SETUSE16: + CP_DEBUG2 (d, ("ioctl: setuse16\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + if (c->type != T_E1) + return EINVAL; + s = splimp (); + CP_LOCK (bd); + cp_set_use16 (c, *(int*)data); + CP_UNLOCK (bd); + splx (s); + return 0; - if (! (ifp->if_flags & IFF_DEBUG)) - d->chan->debug = 0; - else if (! d->chan->debug) - d->chan->debug = 1; + case SERIAL_GETCRC4: + CP_DEBUG2 (d, ("ioctl: getcrc4\n")); + if (c->type != T_E1 || c->unfram) + return EINVAL; + *(int*)data = c->crc4; + return 0; + + case SERIAL_SETCRC4: + CP_DEBUG2 (d, ("ioctl: setcrc4\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + if (c->type != T_E1) + return EINVAL; + s = splimp (); + CP_LOCK (bd); + cp_set_crc4 (c, *(int*)data); + CP_UNLOCK (bd); + splx (s); + return 0; - switch (cmd) { - default: CP_DEBUG2 (d, ("ioctl 0x%lx\n", cmd)); return 0; - case SIOCADDMULTI: CP_DEBUG2 (d, ("ioctl SIOCADDMULTI\n")); return 0; - case SIOCDELMULTI: CP_DEBUG2 (d, ("ioctl SIOCDELMULTI\n")); return 0; - case SIOCSIFFLAGS: CP_DEBUG2 (d, ("ioctl SIOCSIFFLAGS\n")); break; - case SIOCSIFADDR: CP_DEBUG2 (d, ("ioctl SIOCSIFADDR\n")); break; - } + case SERIAL_GETCLK: + CP_DEBUG2 (d, ("ioctl: getclk\n")); + if (c->type != T_E1 && + c->type != T_G703 && + c->type != T_E3 && + c->type != T_T3 && + c->type != T_STS1) + return EINVAL; + switch (c->gsyn) { + default: *(int*)data = E1CLK_INTERNAL; break; + case GSYN_RCV: *(int*)data = E1CLK_RECEIVE; break; + case GSYN_RCV0: *(int*)data = E1CLK_RECEIVE_CHAN0; break; + case GSYN_RCV1: *(int*)data = E1CLK_RECEIVE_CHAN1; break; + case GSYN_RCV2: *(int*)data = E1CLK_RECEIVE_CHAN2; break; + case GSYN_RCV3: *(int*)data = E1CLK_RECEIVE_CHAN3; break; + } + return 0; - /* We get here only in case of SIFFLAGS or SIFADDR. */ - s = splimp (); - CP_LOCK (bd); - should_be_up = (ifp->if_drv_flags & IFF_DRV_RUNNING) != 0; - if (! was_up && should_be_up) { - /* Interface goes up -- start it. */ - cp_up (d); - cp_start (d); - } else if (was_up && ! should_be_up) { - /* Interface is going down -- stop it. */ -/* if ((IFP2SP(ifp)->pp_flags & PP_FR) || (ifp->if_flags & PP_CISCO))*/ - cp_down (d); - } - CP_DEBUG (d, ("ioctl 0x%lx p4\n", cmd)); - CP_UNLOCK (bd); - splx (s); - return 0; -} + case SERIAL_SETCLK: + CP_DEBUG2 (d, ("ioctl: setclk\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + if (c->type != T_E1 && + c->type != T_G703 && + c->type != T_E3 && + c->type != T_T3 && + c->type != T_STS1) + return EINVAL; + s = splimp (); + CP_LOCK (bd); + switch (*(int*)data) { + default: cp_set_gsyn (c, GSYN_INT); break; + case E1CLK_RECEIVE: cp_set_gsyn (c, GSYN_RCV); break; + case E1CLK_RECEIVE_CHAN0: cp_set_gsyn (c, GSYN_RCV0); break; + case E1CLK_RECEIVE_CHAN1: cp_set_gsyn (c, GSYN_RCV1); break; + case E1CLK_RECEIVE_CHAN2: cp_set_gsyn (c, GSYN_RCV2); break; + case E1CLK_RECEIVE_CHAN3: cp_set_gsyn (c, GSYN_RCV3); break; + } + CP_UNLOCK (bd); + splx (s); + return 0; -/* - * Initialization of interface. - * It seems to be never called by upper level? - */ -static void cp_initialize (void *softc) -{ - drv_t *d = softc; + case SERIAL_GETTIMESLOTS: + CP_DEBUG2 (d, ("ioctl: gettimeslots\n")); + if ((c->type != T_E1 || c->unfram) && c->type != T_DATA) + return EINVAL; + *(u_long*)data = c->ts; + return 0; - CP_DEBUG (d, ("cp_initialize\n")); -} -#endif /*NETGRAPH*/ + case SERIAL_SETTIMESLOTS: + CP_DEBUG2 (d, ("ioctl: settimeslots\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + if ((c->type != T_E1 || c->unfram) && c->type != T_DATA) + return EINVAL; + s = splimp (); + CP_LOCK (bd); + cp_set_ts (c, *(u_long*)data); + CP_UNLOCK (bd); + splx (s); + return 0; -/* - * Stop the interface. Called on splimp(). - */ -static void cp_down (drv_t *d) -{ - CP_DEBUG (d, ("cp_down\n")); - /* Interface is going down -- stop it. */ - cp_set_dtr (d->chan, 0); - cp_set_rts (d->chan, 0); + case SERIAL_GETINVCLK: + CP_DEBUG2 (d, ("ioctl: getinvclk\n")); +#if 1 + return EINVAL; +#else + if (c->type != T_SERIAL) + return EINVAL; + *(int*)data = c->invtxc; + return 0; +#endif - d->running = 0; -} + case SERIAL_SETINVCLK: + CP_DEBUG2 (d, ("ioctl: setinvclk\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + if (c->type != T_SERIAL) + return EINVAL; + s = splimp (); + CP_LOCK (bd); + cp_set_invtxc (c, *(int*)data); + cp_set_invrxc (c, *(int*)data); + CP_UNLOCK (bd); + splx (s); + return 0; -/* - * Start the interface. Called on splimp(). - */ -static void cp_up (drv_t *d) -{ - CP_DEBUG (d, ("cp_up\n")); - cp_set_dtr (d->chan, 1); - cp_set_rts (d->chan, 1); - d->running = 1; -} + case SERIAL_GETINVTCLK: + CP_DEBUG2 (d, ("ioctl: getinvtclk\n")); + if (c->type != T_SERIAL) + return EINVAL; + *(int*)data = c->invtxc; + return 0; -/* - * Start output on the interface. Get another datagram to send - * off of the interface queue, and copy it to the interface - * before starting the output. - */ -static void cp_send (drv_t *d) -{ - struct mbuf *m; - u_short len; + case SERIAL_SETINVTCLK: + CP_DEBUG2 (d, ("ioctl: setinvtclk\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + if (c->type != T_SERIAL) + return EINVAL; + s = splimp (); + CP_LOCK (bd); + cp_set_invtxc (c, *(int*)data); + CP_UNLOCK (bd); + splx (s); + return 0; - CP_DEBUG2 (d, ("cp_send, tn=%d te=%d\n", d->chan->tn, d->chan->te)); + case SERIAL_GETINVRCLK: + CP_DEBUG2 (d, ("ioctl: getinvrclk\n")); + if (c->type != T_SERIAL) + return EINVAL; + *(int*)data = c->invrxc; + return 0; - /* No output if the interface is down. */ - if (! d->running) - return; + case SERIAL_SETINVRCLK: + CP_DEBUG2 (d, ("ioctl: setinvrclk\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + if (c->type != T_SERIAL) + return EINVAL; + s = splimp (); + CP_LOCK (bd); + cp_set_invrxc (c, *(int*)data); + CP_UNLOCK (bd); + splx (s); + return 0; - /* No output if the modem is off. */ - if (! (d->chan->lloop || d->chan->type != T_SERIAL || - cp_get_dsr (d->chan))) - return; + case SERIAL_GETLEVEL: + CP_DEBUG2 (d, ("ioctl: getlevel\n")); + if (c->type != T_G703) + return EINVAL; + s = splimp (); + CP_LOCK (bd); + *(int*)data = cp_get_lq (c); + CP_UNLOCK (bd); + splx (s); + return 0; - while (cp_transmit_space (d->chan)) { - /* Get the packet to send. */ -#ifdef NETGRAPH - IF_DEQUEUE (&d->hi_queue, m); - if (! m) - IF_DEQUEUE (&d->queue, m); -#else - m = sppp_dequeue (d->ifp); -#endif - if (! m) - return; -#ifndef NETGRAPH - if (d->ifp->if_bpf) - BPF_MTAP (d->ifp, m); -#endif - len = m_length (m, NULL); - if (len >= BUFSZ) - printf ("%s: too long packet: %d bytes: ", - d->name, len); - else if (! m->m_next) - cp_send_packet (d->chan, (u_char*) mtod (m, caddr_t), len, 0); - else { - u_char *buf = d->chan->tbuf[d->chan->te]; - m_copydata (m, 0, len, buf); - cp_send_packet (d->chan, buf, len, 0); - } - m_freem (m); - /* Set up transmit timeout, if the transmit ring is not empty.*/ -#ifdef NETGRAPH - d->timeout = 10; -#else - d->ifp->if_timer = 10; -#endif - } -#ifndef NETGRAPH - d->ifp->if_drv_flags |= IFF_DRV_OACTIVE; +#if 0 + case SERIAL_RESET: + CP_DEBUG2 (d, ("ioctl: reset\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + s = splimp (); + CP_LOCK (bd); + cp_reset (c->board, 0, 0); + CP_UNLOCK (bd); + splx (s); + return 0; + + case SERIAL_HARDRESET: + CP_DEBUG2 (d, ("ioctl: hardreset\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + s = splimp (); + CP_LOCK (bd); + /* hard_reset (c->board); */ + CP_UNLOCK (bd); + splx (s); + return 0; #endif -} -/* - * Start output on the interface. - * Always called on splimp(). - */ -static void cp_start (drv_t *d) -{ - if (d->running) { - if (! d->chan->dtr) - cp_set_dtr (d->chan, 1); - if (! d->chan->rts) - cp_set_rts (d->chan, 1); - cp_send (d); - } -} + case SERIAL_GETCABLE: + CP_DEBUG2 (d, ("ioctl: getcable\n")); + if (c->type != T_SERIAL) + return EINVAL; + s = splimp (); + CP_LOCK (bd); + *(int*)data = cp_get_cable (c); + CP_UNLOCK (bd); + splx (s); + return 0; -/* - * Handle transmit timeouts. - * Recover after lost transmit interrupts. - * Always called on splimp(). - */ -static void cp_watchdog (drv_t *d) -{ - bdrv_t *bd = d->board->sys; - CP_DEBUG (d, ("device timeout\n")); - if (d->running) { - int s = splimp (); + case SERIAL_GETDIR: + CP_DEBUG2 (d, ("ioctl: getdir\n")); + if (c->type != T_E1 && c->type != T_DATA) + return EINVAL; + *(int*)data = c->dir; + return 0; + case SERIAL_SETDIR: + CP_DEBUG2 (d, ("ioctl: setdir\n")); + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + s = splimp (); CP_LOCK (bd); - cp_stop_chan (d->chan); - cp_stop_e1 (d->chan); - cp_start_e1 (d->chan); - cp_start_chan (d->chan, 1, 1, 0, 0); - cp_set_dtr (d->chan, 1); - cp_set_rts (d->chan, 1); - cp_start (d); + cp_set_dir (c, *(int*)data); CP_UNLOCK (bd); splx (s); - } -} + return 0; -static void cp_transmit (cp_chan_t *c, void *attachment, int len) -{ - drv_t *d = c->sys; + case SERIAL_GETRLOOP: + CP_DEBUG2 (d, ("ioctl: getrloop\n")); + if (c->type != T_G703 && + c->type != T_E3 && + c->type != T_T3 && + c->type != T_STS1) + return EINVAL; + *(int*)data = cp_get_rloop (c); + return 0; -#ifdef NETGRAPH - d->timeout = 0; -#else - ++d->ifp->if_opackets; - d->ifp->if_drv_flags &= ~IFF_DRV_OACTIVE; - d->ifp->if_timer = 0; -#endif - cp_start (d); -} + case SERIAL_SETRLOOP: + CP_DEBUG2 (d, ("ioctl: setloop\n")); + if (c->type != T_E3 && c->type != T_T3 && c->type != T_STS1) + return EINVAL; + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + s = splimp (); + CP_LOCK (bd); + cp_set_rloop (c, *(int*)data); + CP_UNLOCK (bd); + splx (s); + return 0; -static void cp_receive (cp_chan_t *c, unsigned char *data, int len) -{ - drv_t *d = c->sys; - struct mbuf *m; -#ifdef NETGRAPH - int error; -#endif + case SERIAL_GETCABLEN: + CP_DEBUG2 (d, ("ioctl: getcablen\n")); + if (c->type != T_T3 && c->type != T_STS1) + return EINVAL; + *(int*)data = c->cablen; + return 0; - if (! d->running) - return; + case SERIAL_SETCABLEN: + CP_DEBUG2 (d, ("ioctl: setloop\n")); + if (c->type != T_T3 && c->type != T_STS1) + return EINVAL; + /* Only for superuser! */ + error = suser (td); + if (error) + return error; + s = splimp (); + CP_LOCK (bd); + cp_set_cablen (c, *(int*)data); + CP_UNLOCK (bd); + splx (s); + return 0; - m = makembuf (data, len); - if (! m) { - CP_DEBUG (d, ("no memory for packet\n")); -#ifndef NETGRAPH - ++d->ifp->if_iqdrops; -#endif - return; - } - if (c->debug > 1) - printmbuf (m); -#ifdef NETGRAPH - m->m_pkthdr.rcvif = 0; - NG_SEND_DATA_ONLY (error, d->hook, m); -#else - ++d->ifp->if_ipackets; - m->m_pkthdr.rcvif = d->ifp; - /* Check if there's a BPF listener on this interface. - * If so, hand off the raw packet to bpf. */ - if (d->ifp->if_bpf) - BPF_TAP (d->ifp, data, len); - IF_ENQUEUE (&d->queue, m); -#endif -} + case TIOCSDTR: /* Set DTR */ + s = splimp (); + CP_LOCK (bd); + cp_set_dtr (c, 1); + CP_UNLOCK (bd); + splx (s); + return 0; -static void cp_error (cp_chan_t *c, int data) -{ - drv_t *d = c->sys; + case TIOCCDTR: /* Clear DTR */ + s = splimp (); + CP_LOCK (bd); + cp_set_dtr (c, 0); + CP_UNLOCK (bd); + splx (s); + return 0; - switch (data) { - case CP_FRAME: - CP_DEBUG (d, ("frame error\n")); -#ifndef NETGRAPH - ++d->ifp->if_ierrors; -#endif - break; - case CP_CRC: - CP_DEBUG (d, ("crc error\n")); -#ifndef NETGRAPH - ++d->ifp->if_ierrors; -#endif - break; - case CP_OVERRUN: - CP_DEBUG (d, ("overrun error\n")); -#ifndef NETGRAPH - ++d->ifp->if_collisions; - ++d->ifp->if_ierrors; -#endif - break; - case CP_OVERFLOW: - CP_DEBUG (d, ("overflow error\n")); -#ifndef NETGRAPH - ++d->ifp->if_ierrors; -#endif - break; - case CP_UNDERRUN: - CP_DEBUG (d, ("underrun error\n")); -#ifdef NETGRAPH - d->timeout = 0; -#else - ++d->ifp->if_oerrors; - d->ifp->if_drv_flags &= ~IFF_DRV_OACTIVE; - d->ifp->if_timer = 0; -#endif - cp_start (d); - break; - default: - CP_DEBUG (d, ("error #%d\n", data)); - break; + case TIOCMSET: /* Set DTR/RTS */ + s = splimp (); + CP_LOCK (bd); + cp_set_dtr (c, (*(int*)data & TIOCM_DTR) ? 1 : 0); + cp_set_rts (c, (*(int*)data & TIOCM_RTS) ? 1 : 0); + CP_UNLOCK (bd); + splx (s); + return 0; + + case TIOCMBIS: /* Add DTR/RTS */ + s = splimp (); + CP_LOCK (bd); + if (*(int*)data & TIOCM_DTR) cp_set_dtr (c, 1); + if (*(int*)data & TIOCM_RTS) cp_set_rts (c, 1); + CP_UNLOCK (bd); + splx (s); + return 0; + + case TIOCMBIC: /* Clear DTR/RTS */ + s = splimp (); + CP_LOCK (bd); + if (*(int*)data & TIOCM_DTR) cp_set_dtr (c, 0); + if (*(int*)data & TIOCM_RTS) cp_set_rts (c, 0); + CP_UNLOCK (bd); + splx (s); + return 0; + + case TIOCMGET: /* Get modem status */ + *(int*)data = cp_modem_status (c); + return 0; } + return ENOTTY; } #ifdef NETGRAPH -- cgit v1.1