if_cx.c revision 257176
1/*- 2 * Cronyx-Sigma adapter driver for FreeBSD. 3 * Supports PPP/HDLC and Cisco/HDLC protocol in synchronous mode, 4 * and asynchronous channels with full modem control. 5 * Keepalive protocol implemented in both Cisco and PPP modes. 6 * 7 * Copyright (C) 1994-2002 Cronyx Engineering. 8 * Author: Serge Vakulenko, <vak@cronyx.ru> 9 * 10 * Copyright (C) 1999-2004 Cronyx Engineering. 11 * Rewritten on DDK, ported to NETGRAPH, rewritten for FreeBSD 3.x-5.x by 12 * Kurakin Roman, <rik@cronyx.ru> 13 * 14 * This software is distributed with NO WARRANTIES, not even the implied 15 * warranties for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. 16 * 17 * Authors grant any other persons or organisations a permission to use, 18 * modify and redistribute this software in source and binary forms, 19 * as long as this message is kept with the software, all derivative 20 * works or modified versions. 21 * 22 * Cronyx Id: if_cx.c,v 1.1.2.34 2004/06/23 17:09:13 rik Exp $ 23 */ 24 25#include <sys/cdefs.h> 26__FBSDID("$FreeBSD: head/sys/dev/cx/if_cx.c 257176 2013-10-26 17:58:36Z glebius $"); 27 28#include <sys/param.h> 29 30#include <sys/systm.h> 31#include <sys/kernel.h> 32#include <sys/module.h> 33#include <sys/priv.h> 34#include <sys/proc.h> 35#include <sys/mbuf.h> 36#include <sys/sockio.h> 37#include <sys/malloc.h> 38#include <sys/socket.h> 39#include <sys/sysctl.h> 40#include <sys/conf.h> 41#include <sys/errno.h> 42#include <sys/serial.h> 43#include <sys/tty.h> 44#include <sys/bus.h> 45#include <machine/bus.h> 46#include <sys/rman.h> 47#include <isa/isavar.h> 48#include <sys/fcntl.h> 49#include <sys/interrupt.h> 50#include <vm/vm.h> 51#include <vm/pmap.h> 52#include <net/if.h> 53#include <net/if_var.h> 54#include <machine/cpufunc.h> 55#include <machine/cserial.h> 56#include <machine/resource.h> 57#include <dev/cx/machdep.h> 58#include <dev/cx/cxddk.h> 59#include <dev/cx/cronyxfw.h> 60#include "opt_ng_cronyx.h" 61#ifdef NETGRAPH_CRONYX 62# include "opt_netgraph.h" 63# include <netgraph/ng_message.h> 64# include <netgraph/netgraph.h> 65# include <dev/cx/ng_cx.h> 66#else 67# include <net/if_types.h> 68# include <net/if_sppp.h> 69# define PP_CISCO IFF_LINK2 70# include <net/bpf.h> 71#endif 72 73#define NCX 1 74 75/* If we don't have Cronyx's sppp version, we don't have fr support via sppp */ 76#ifndef PP_FR 77#define PP_FR 0 78#endif 79 80#define CX_DEBUG(d,s) ({if (d->chan->debug) {\ 81 printf ("%s: ", d->name); printf s;}}) 82#define CX_DEBUG2(d,s) ({if (d->chan->debug>1) {\ 83 printf ("%s: ", d->name); printf s;}}) 84 85#define CX_LOCK_NAME "cxX" 86 87#define CX_LOCK(_bd) mtx_lock (&(_bd)->cx_mtx) 88#define CX_UNLOCK(_bd) mtx_unlock (&(_bd)->cx_mtx) 89#define CX_LOCK_ASSERT(_bd) mtx_assert (&(_bd)->cx_mtx, MA_OWNED) 90 91typedef struct _async_q { 92 int beg; 93 int end; 94 #define BF_SZ 14400 95 int buf[BF_SZ+1]; 96} async_q; 97 98#define AQ_GSZ(q) ((BF_SZ + (q)->end - (q)->beg)%BF_SZ) 99#define AQ_PUSH(q,c) {*((q)->buf + (q)->end) = c;\ 100 (q)->end = ((q)->end + 1)%BF_SZ;} 101#define AQ_POP(q,c) {c = *((q)->buf + (q)->beg);\ 102 (q)->beg = ((q)->beg + 1)%BF_SZ;} 103 104static void cx_identify __P((driver_t *, device_t)); 105static int cx_probe __P((device_t)); 106static int cx_attach __P((device_t)); 107static int cx_detach __P((device_t)); 108static t_open_t cx_topen; 109static t_modem_t cx_tmodem; 110static t_close_t cx_tclose; 111 112static device_method_t cx_isa_methods [] = { 113 DEVMETHOD(device_identify, cx_identify), 114 DEVMETHOD(device_probe, cx_probe), 115 DEVMETHOD(device_attach, cx_attach), 116 DEVMETHOD(device_detach, cx_detach), 117 118 DEVMETHOD_END 119}; 120 121typedef struct _cx_dma_mem_t { 122 unsigned long phys; 123 void *virt; 124 size_t size; 125 bus_dma_tag_t dmat; 126 bus_dmamap_t mapp; 127} cx_dma_mem_t; 128 129typedef struct _drv_t { 130 char name [8]; 131 cx_chan_t *chan; 132 cx_board_t *board; 133 cx_dma_mem_t dmamem; 134 struct tty *tty; 135 struct callout dcd_timeout_handle; 136 unsigned callout; 137 unsigned lock; 138 int open_dev; 139 int cd; 140 int running; 141#ifdef NETGRAPH 142 char nodename [NG_NODESIZ]; 143 hook_p hook; 144 hook_p debug_hook; 145 node_p node; 146 struct ifqueue lo_queue; 147 struct ifqueue hi_queue; 148#else 149 struct ifqueue queue; 150 struct ifnet *ifp; 151#endif 152 short timeout; 153 struct callout timeout_handle; 154 struct cdev *devt; 155 async_q aqueue; 156#define CX_READ 1 157#define CX_WRITE 2 158 int intr_action; 159 short atimeout; 160} drv_t; 161 162typedef struct _bdrv_t { 163 cx_board_t *board; 164 struct resource *base_res; 165 struct resource *drq_res; 166 struct resource *irq_res; 167 int base_rid; 168 int drq_rid; 169 int irq_rid; 170 void *intrhand; 171 drv_t channel [NCHAN]; 172 struct mtx cx_mtx; 173} bdrv_t; 174 175static driver_t cx_isa_driver = { 176 "cx", 177 cx_isa_methods, 178 sizeof (bdrv_t), 179}; 180 181static devclass_t cx_devclass; 182 183extern long csigma_fw_len; 184extern const char *csigma_fw_version; 185extern const char *csigma_fw_date; 186extern const char *csigma_fw_copyright; 187extern const cr_dat_tst_t csigma_fw_tvec[]; 188extern const u_char csigma_fw_data[]; 189static void cx_oproc (struct tty *tp); 190static int cx_param (struct tty *tp, struct termios *t); 191static void cx_stop (struct tty *tp, int flag); 192static void cx_receive (cx_chan_t *c, char *data, int len); 193static void cx_transmit (cx_chan_t *c, void *attachment, int len); 194static void cx_error (cx_chan_t *c, int data); 195static void cx_modem (cx_chan_t *c); 196static void cx_up (drv_t *d); 197static void cx_start (drv_t *d); 198static void cx_softintr (void *); 199static void *cx_fast_ih; 200static void cx_down (drv_t *d); 201static void cx_watchdog (drv_t *d); 202static void cx_watchdog_timer (void *arg); 203static void cx_carrier (void *arg); 204 205#ifdef NETGRAPH 206extern struct ng_type typestruct; 207#else 208static void cx_ifstart (struct ifnet *ifp); 209static void cx_tlf (struct sppp *sp); 210static void cx_tls (struct sppp *sp); 211static int cx_sioctl (struct ifnet *ifp, u_long cmd, caddr_t data); 212static void cx_initialize (void *softc); 213#endif 214 215static cx_board_t *adapter [NCX]; 216static drv_t *channel [NCX*NCHAN]; 217static struct callout led_timo [NCX]; 218static struct callout timeout_handle; 219 220static int cx_open (struct cdev *dev, int flag, int mode, struct thread *td); 221static int cx_close (struct cdev *dev, int flag, int mode, struct thread *td); 222static int cx_ioctl (struct cdev *dev, u_long cmd, caddr_t data, int flag, struct thread *td); 223static struct cdevsw cx_cdevsw = { 224 .d_version = D_VERSION, 225 .d_open = cx_open, 226 .d_close = cx_close, 227 .d_ioctl = cx_ioctl, 228 .d_name = "cx", 229 .d_flags = D_TTY, 230}; 231 232static int MY_SOFT_INTR; 233 234/* 235 * Print the mbuf chain, for debug purposes only. 236 */ 237static void printmbuf (struct mbuf *m) 238{ 239 printf ("mbuf:"); 240 for (; m; m=m->m_next) { 241 if (m->m_flags & M_PKTHDR) 242 printf (" HDR %d:", m->m_pkthdr.len); 243 if (m->m_flags & M_EXT) 244 printf (" EXT:"); 245 printf (" %d", m->m_len); 246 } 247 printf ("\n"); 248} 249 250/* 251 * Make an mbuf from data. 252 */ 253static struct mbuf *makembuf (void *buf, u_int len) 254{ 255 struct mbuf *m, *o, *p; 256 257 MGETHDR (m, M_NOWAIT, MT_DATA); 258 259 if (! m) 260 return 0; 261 262 if (len >= MINCLSIZE) 263 MCLGET (m, M_NOWAIT); 264 265 m->m_pkthdr.len = len; 266 m->m_len = 0; 267 268 p = m; 269 while (len) { 270 u_int n = M_TRAILINGSPACE (p); 271 if (n > len) 272 n = len; 273 if (! n) { 274 /* Allocate new mbuf. */ 275 o = p; 276 MGET (p, M_NOWAIT, MT_DATA); 277 if (! p) { 278 m_freem (m); 279 return 0; 280 } 281 if (len >= MINCLSIZE) 282 MCLGET (p, M_NOWAIT); 283 p->m_len = 0; 284 o->m_next = p; 285 286 n = M_TRAILINGSPACE (p); 287 if (n > len) 288 n = len; 289 } 290 bcopy (buf, mtod (p, caddr_t) + p->m_len, n); 291 292 p->m_len += n; 293 buf = n + (char*) buf; 294 len -= n; 295 } 296 return m; 297} 298 299/* 300 * Recover after lost transmit interrupts. 301 */ 302static void cx_timeout (void *arg) 303{ 304 drv_t *d; 305 int s, i, k; 306 307 for (i = 0; i < NCX; i++) { 308 if (adapter[i] == NULL) 309 continue; 310 for (k = 0; k < NCHAN; ++k) { 311 d = channel[i * NCHAN + k]; 312 if (! d) 313 continue; 314 s = splhigh (); 315 CX_LOCK ((bdrv_t *)d->board->sys); 316 if (d->atimeout == 1 && d->tty && d->tty->t_state & TS_BUSY) { 317 d->tty->t_state &= ~TS_BUSY; 318 if (d->tty->t_dev) { 319 d->intr_action |= CX_WRITE; 320 MY_SOFT_INTR = 1; 321 swi_sched (cx_fast_ih, 0); 322 } 323 CX_DEBUG (d, ("cx_timeout\n")); 324 } 325 if (d->atimeout) 326 d->atimeout--; 327 CX_UNLOCK ((bdrv_t *)d->board->sys); 328 splx (s); 329 } 330 } 331 callout_reset (&timeout_handle, hz*5, cx_timeout, 0); 332} 333 334static void cx_led_off (void *arg) 335{ 336 cx_board_t *b = arg; 337 bdrv_t *bd = b->sys; 338 int s; 339 340 s = splhigh (); 341 CX_LOCK (bd); 342 cx_led (b, 0); 343 CX_UNLOCK (bd); 344 splx (s); 345} 346 347/* 348 * Activate interrupt handler from DDK. 349 */ 350static void cx_intr (void *arg) 351{ 352 bdrv_t *bd = arg; 353 cx_board_t *b = bd->board; 354#ifndef NETGRAPH 355 int i; 356#endif 357 int s = splhigh (); 358 359 CX_LOCK (bd); 360 /* Turn LED on. */ 361 cx_led (b, 1); 362 363 cx_int_handler (b); 364 365 /* Turn LED off 50 msec later. */ 366 callout_reset (&led_timo[b->num], hz/20, cx_led_off, b); 367 CX_UNLOCK (bd); 368 splx (s); 369 370#ifndef NETGRAPH 371 /* Pass packets in a lock-free state */ 372 for (i = 0; i < NCHAN && b->chan[i].type; i++) { 373 drv_t *d = b->chan[i].sys; 374 struct mbuf *m; 375 if (!d || !d->running) 376 continue; 377 while (_IF_QLEN(&d->queue)) { 378 IF_DEQUEUE (&d->queue,m); 379 if (!m) 380 continue; 381 sppp_input (d->ifp, m); 382 } 383 } 384#endif 385} 386 387static int probe_irq (cx_board_t *b, int irq) 388{ 389 int mask, busy, cnt; 390 391 /* Clear pending irq, if any. */ 392 cx_probe_irq (b, -irq); 393 DELAY (100); 394 for (cnt=0; cnt<5; ++cnt) { 395 /* Get the mask of pending irqs, assuming they are busy. 396 * Activate the adapter on given irq. */ 397 busy = cx_probe_irq (b, irq); 398 DELAY (100); 399 400 /* Get the mask of active irqs. 401 * Deactivate our irq. */ 402 mask = cx_probe_irq (b, -irq); 403 DELAY (100); 404 if ((mask & ~busy) == 1 << irq) { 405 cx_probe_irq (b, 0); 406 /* printf ("cx%d: irq %d ok, mask=0x%04x, busy=0x%04x\n", 407 b->num, irq, mask, busy); */ 408 return 1; 409 } 410 } 411 /* printf ("cx%d: irq %d not functional, mask=0x%04x, busy=0x%04x\n", 412 b->num, irq, mask, busy); */ 413 cx_probe_irq (b, 0); 414 return 0; 415} 416 417static short porttab [] = { 418 0x200, 0x220, 0x240, 0x260, 0x280, 0x2a0, 0x2c0, 0x2e0, 419 0x300, 0x320, 0x340, 0x360, 0x380, 0x3a0, 0x3c0, 0x3e0, 0 420}; 421static char dmatab [] = { 7, 6, 5, 0 }; 422static char irqtab [] = { 5, 10, 11, 7, 3, 15, 12, 0 }; 423 424static int cx_is_free_res (device_t dev, int rid, int type, u_long start, 425 u_long end, u_long count) 426{ 427 struct resource *res; 428 429 if (!(res = bus_alloc_resource (dev, type, &rid, start, end, count, 430 RF_ALLOCATED))) 431 return 0; 432 433 bus_release_resource (dev, type, rid, res); 434 435 return 1; 436} 437 438static void cx_identify (driver_t *driver, device_t dev) 439{ 440 u_long iobase, rescount; 441 int devcount; 442 device_t *devices; 443 device_t child; 444 devclass_t my_devclass; 445 int i, k; 446 447 if ((my_devclass = devclass_find ("cx")) == NULL) 448 return; 449 450 devclass_get_devices (my_devclass, &devices, &devcount); 451 452 if (devcount == 0) { 453 /* We should find all devices by our self. We could alter other 454 * devices, but we don't have a choise 455 */ 456 for (i = 0; (iobase = porttab [i]) != 0; i++) { 457 if (!cx_is_free_res (dev, 0, SYS_RES_IOPORT, 458 iobase, iobase + NPORT, NPORT)) 459 continue; 460 if (cx_probe_board (iobase, -1, -1) == 0) 461 continue; 462 463 devcount++; 464 465 child = BUS_ADD_CHILD (dev, ISA_ORDER_SPECULATIVE, "cx", 466 -1); 467 468 if (child == NULL) 469 return; 470 471 device_set_desc_copy (child, "Cronyx Sigma"); 472 device_set_driver (child, driver); 473 bus_set_resource (child, SYS_RES_IOPORT, 0, 474 iobase, NPORT); 475 476 if (devcount >= NCX) 477 break; 478 } 479 } else { 480 static short porttab [] = { 481 0x200, 0x220, 0x240, 0x260, 0x280, 0x2a0, 0x2c0, 0x2e0, 482 0x300, 0x320, 0x340, 0x360, 0x380, 0x3a0, 0x3c0, 0x3e0, 0 483 }; 484 /* Lets check user choise. 485 */ 486 for (k = 0; k < devcount; k++) { 487 if (bus_get_resource (devices[k], SYS_RES_IOPORT, 0, 488 &iobase, &rescount) != 0) 489 continue; 490 491 for (i = 0; porttab [i] != 0; i++) { 492 if (porttab [i] != iobase) 493 continue; 494 if (!cx_is_free_res (devices[k], 0, SYS_RES_IOPORT, 495 iobase, iobase + NPORT, NPORT)) 496 continue; 497 if (cx_probe_board (iobase, -1, -1) == 0) 498 continue; 499 porttab [i] = -1; 500 device_set_desc_copy (devices[k], "Cronyx Sigma"); 501 break; 502 } 503 504 if (porttab [i] == 0) { 505 device_delete_child ( 506 device_get_parent (devices[k]), 507 devices [k]); 508 devices[k] = 0; 509 continue; 510 } 511 } 512 for (k = 0; k < devcount; k++) { 513 if (devices[k] == 0) 514 continue; 515 if (bus_get_resource (devices[k], SYS_RES_IOPORT, 0, 516 &iobase, &rescount) == 0) 517 continue; 518 for (i = 0; (iobase = porttab [i]) != 0; i++) { 519 if (porttab [i] == -1) { 520 continue; 521 } 522 if (!cx_is_free_res (devices[k], 0, SYS_RES_IOPORT, 523 iobase, iobase + NPORT, NPORT)) 524 continue; 525 if (cx_probe_board (iobase, -1, -1) == 0) 526 continue; 527 528 bus_set_resource (devices[k], SYS_RES_IOPORT, 0, 529 iobase, NPORT); 530 porttab [i] = -1; 531 device_set_desc_copy (devices[k], "Cronyx Sigma"); 532 break; 533 } 534 if (porttab [i] == 0) { 535 device_delete_child ( 536 device_get_parent (devices[k]), 537 devices [k]); 538 } 539 } 540 free (devices, M_TEMP); 541 } 542 543 return; 544} 545 546static int cx_probe (device_t dev) 547{ 548 int unit = device_get_unit (dev); 549 int i; 550 u_long iobase, rescount; 551 552 if (!device_get_desc (dev) || 553 strcmp (device_get_desc (dev), "Cronyx Sigma")) 554 return ENXIO; 555 556 if (bus_get_resource (dev, SYS_RES_IOPORT, 0, &iobase, &rescount) != 0) { 557 printf ("cx%d: Couldn't get IOPORT\n", unit); 558 return ENXIO; 559 } 560 561 if (!cx_is_free_res (dev, 0, SYS_RES_IOPORT, 562 iobase, iobase + NPORT, NPORT)) { 563 printf ("cx%d: Resource IOPORT isn't free %lx\n", unit, iobase); 564 return ENXIO; 565 } 566 567 for (i = 0; porttab [i] != 0; i++) { 568 if (porttab [i] == iobase) { 569 porttab [i] = -1; 570 break; 571 } 572 } 573 574 if (porttab [i] == 0) { 575 return ENXIO; 576 } 577 578 if (!cx_probe_board (iobase, -1, -1)) { 579 printf ("cx%d: probing for Sigma at %lx faild\n", unit, iobase); 580 return ENXIO; 581 } 582 583 return 0; 584} 585 586static void 587cx_bus_dmamap_addr (void *arg, bus_dma_segment_t *segs, int nseg, int error) 588{ 589 unsigned long *addr; 590 591 if (error) 592 return; 593 594 KASSERT(nseg == 1, ("too many DMA segments, %d should be 1", nseg)); 595 addr = arg; 596 *addr = segs->ds_addr; 597} 598 599static int 600cx_bus_dma_mem_alloc (int bnum, int cnum, cx_dma_mem_t *dmem) 601{ 602 int error; 603 604 error = bus_dma_tag_create (NULL, 16, 0, BUS_SPACE_MAXADDR_24BIT, 605 BUS_SPACE_MAXADDR, NULL, NULL, dmem->size, 1, 606 dmem->size, 0, NULL, NULL, &dmem->dmat); 607 if (error) { 608 if (cnum >= 0) printf ("cx%d-%d: ", bnum, cnum); 609 else printf ("cx%d: ", bnum); 610 printf ("couldn't allocate tag for dma memory\n"); 611 return 0; 612 } 613 error = bus_dmamem_alloc (dmem->dmat, (void **)&dmem->virt, 614 BUS_DMA_NOWAIT | BUS_DMA_ZERO, &dmem->mapp); 615 if (error) { 616 if (cnum >= 0) printf ("cx%d-%d: ", bnum, cnum); 617 else printf ("cx%d: ", bnum); 618 printf ("couldn't allocate mem for dma memory\n"); 619 bus_dma_tag_destroy (dmem->dmat); 620 return 0; 621 } 622 error = bus_dmamap_load (dmem->dmat, dmem->mapp, dmem->virt, 623 dmem->size, cx_bus_dmamap_addr, &dmem->phys, 0); 624 if (error) { 625 if (cnum >= 0) printf ("cx%d-%d: ", bnum, cnum); 626 else printf ("cx%d: ", bnum); 627 printf ("couldn't load mem map for dma memory\n"); 628 bus_dmamem_free (dmem->dmat, dmem->virt, dmem->mapp); 629 bus_dma_tag_destroy (dmem->dmat); 630 return 0; 631 } 632 return 1; 633} 634 635static void 636cx_bus_dma_mem_free (cx_dma_mem_t *dmem) 637{ 638 bus_dmamap_unload (dmem->dmat, dmem->mapp); 639 bus_dmamem_free (dmem->dmat, dmem->virt, dmem->mapp); 640 bus_dma_tag_destroy (dmem->dmat); 641} 642 643/* 644 * The adapter is present, initialize the driver structures. 645 */ 646static int cx_attach (device_t dev) 647{ 648 bdrv_t *bd = device_get_softc (dev); 649 u_long iobase, drq, irq, rescount; 650 int unit = device_get_unit (dev); 651 char *cx_ln = CX_LOCK_NAME; 652 cx_board_t *b; 653 cx_chan_t *c; 654 drv_t *d; 655 int i; 656 int s; 657 658 KASSERT ((bd != NULL), ("cx%d: NULL device softc\n", unit)); 659 660 bus_get_resource (dev, SYS_RES_IOPORT, 0, &iobase, &rescount); 661 bd->base_rid = 0; 662 bd->base_res = bus_alloc_resource (dev, SYS_RES_IOPORT, &bd->base_rid, 663 iobase, iobase + NPORT, NPORT, RF_ACTIVE); 664 if (! bd->base_res) { 665 printf ("cx%d: cannot allocate base address\n", unit); 666 return ENXIO; 667 } 668 669 if (bus_get_resource (dev, SYS_RES_DRQ, 0, &drq, &rescount) != 0) { 670 for (i = 0; (drq = dmatab [i]) != 0; i++) { 671 if (!cx_is_free_res (dev, 0, SYS_RES_DRQ, 672 drq, drq + 1, 1)) 673 continue; 674 bus_set_resource (dev, SYS_RES_DRQ, 0, drq, 1); 675 break; 676 } 677 678 if (dmatab[i] == 0) { 679 bus_release_resource (dev, SYS_RES_IOPORT, bd->base_rid, 680 bd->base_res); 681 printf ("cx%d: Couldn't get DRQ\n", unit); 682 return ENXIO; 683 } 684 } 685 686 bd->drq_rid = 0; 687 bd->drq_res = bus_alloc_resource (dev, SYS_RES_DRQ, &bd->drq_rid, 688 drq, drq + 1, 1, RF_ACTIVE); 689 if (! bd->drq_res) { 690 printf ("cx%d: cannot allocate drq\n", unit); 691 bus_release_resource (dev, SYS_RES_IOPORT, bd->base_rid, 692 bd->base_res); 693 return ENXIO; 694 } 695 696 if (bus_get_resource (dev, SYS_RES_IRQ, 0, &irq, &rescount) != 0) { 697 for (i = 0; (irq = irqtab [i]) != 0; i++) { 698 if (!cx_is_free_res (dev, 0, SYS_RES_IRQ, 699 irq, irq + 1, 1)) 700 continue; 701 bus_set_resource (dev, SYS_RES_IRQ, 0, irq, 1); 702 break; 703 } 704 705 if (irqtab[i] == 0) { 706 bus_release_resource (dev, SYS_RES_DRQ, bd->drq_rid, 707 bd->drq_res); 708 bus_release_resource (dev, SYS_RES_IOPORT, bd->base_rid, 709 bd->base_res); 710 printf ("cx%d: Couldn't get IRQ\n", unit); 711 return ENXIO; 712 } 713 } 714 715 bd->irq_rid = 0; 716 bd->irq_res = bus_alloc_resource (dev, SYS_RES_IRQ, &bd->irq_rid, 717 irq, irq + 1, 1, RF_ACTIVE); 718 if (! bd->irq_res) { 719 printf ("cx%d: Couldn't allocate irq\n", unit); 720 bus_release_resource (dev, SYS_RES_DRQ, bd->drq_rid, 721 bd->drq_res); 722 bus_release_resource (dev, SYS_RES_IOPORT, bd->base_rid, 723 bd->base_res); 724 return ENXIO; 725 } 726 727 b = malloc (sizeof (cx_board_t), M_DEVBUF, M_WAITOK); 728 if (!b) { 729 printf ("cx:%d: Couldn't allocate memory\n", unit); 730 return (ENXIO); 731 } 732 adapter[unit] = b; 733 bzero (b, sizeof(cx_board_t)); 734 735 if (! cx_open_board (b, unit, iobase, irq, drq)) { 736 printf ("cx%d: error loading firmware\n", unit); 737 free (b, M_DEVBUF); 738 bus_release_resource (dev, SYS_RES_IRQ, bd->irq_rid, 739 bd->irq_res); 740 bus_release_resource (dev, SYS_RES_DRQ, bd->drq_rid, 741 bd->drq_res); 742 bus_release_resource (dev, SYS_RES_IOPORT, bd->base_rid, 743 bd->base_res); 744 return ENXIO; 745 } 746 747 bd->board = b; 748 749 cx_ln[2] = '0' + unit; 750 mtx_init (&bd->cx_mtx, cx_ln, MTX_NETWORK_LOCK, MTX_DEF|MTX_RECURSE); 751 if (! probe_irq (b, irq)) { 752 printf ("cx%d: irq %ld not functional\n", unit, irq); 753 bd->board = 0; 754 adapter [unit] = 0; 755 mtx_destroy (&bd->cx_mtx); 756 free (b, M_DEVBUF); 757 bus_release_resource (dev, SYS_RES_IRQ, bd->irq_rid, 758 bd->irq_res); 759 bus_release_resource (dev, SYS_RES_DRQ, bd->drq_rid, 760 bd->drq_res); 761 bus_release_resource (dev, SYS_RES_IOPORT, bd->base_rid, 762 bd->base_res); 763 return ENXIO; 764 } 765 b->sys = bd; 766 callout_init (&led_timo[b->num], CALLOUT_MPSAFE); 767 s = splhigh (); 768 if (bus_setup_intr (dev, bd->irq_res, 769 INTR_TYPE_NET|INTR_MPSAFE, 770 NULL, cx_intr, bd, &bd->intrhand)) { 771 printf ("cx%d: Can't setup irq %ld\n", unit, irq); 772 bd->board = 0; 773 b->sys = 0; 774 adapter [unit] = 0; 775 mtx_destroy (&bd->cx_mtx); 776 free (b, M_DEVBUF); 777 bus_release_resource (dev, SYS_RES_IRQ, bd->irq_rid, 778 bd->irq_res); 779 bus_release_resource (dev, SYS_RES_DRQ, bd->drq_rid, 780 bd->drq_res); 781 bus_release_resource (dev, SYS_RES_IOPORT, bd->base_rid, 782 bd->base_res); 783 splx (s); 784 return ENXIO; 785 } 786 787 CX_LOCK (bd); 788 cx_init (b, b->num, b->port, irq, drq); 789 cx_setup_board (b, 0, 0, 0); 790 CX_UNLOCK (bd); 791 792 printf ("cx%d: <Cronyx-Sigma-%s>\n", b->num, b->name); 793 794 for (c=b->chan; c<b->chan+NCHAN; ++c) { 795 if (c->type == T_NONE) 796 continue; 797 d = &bd->channel[c->num]; 798 d->dmamem.size = sizeof(cx_buf_t); 799 if (! cx_bus_dma_mem_alloc (unit, c->num, &d->dmamem)) 800 continue; 801 d->board = b; 802 d->chan = c; 803 d->open_dev = 0; 804 c->sys = d; 805 channel [b->num*NCHAN + c->num] = d; 806 sprintf (d->name, "cx%d.%d", b->num, c->num); 807 808 switch (c->type) { 809 case T_SYNC_RS232: 810 case T_SYNC_V35: 811 case T_SYNC_RS449: 812 case T_UNIV: 813 case T_UNIV_RS232: 814 case T_UNIV_RS449: 815 case T_UNIV_V35: 816 callout_init (&d->timeout_handle, CALLOUT_MPSAFE); 817#ifdef NETGRAPH 818 if (ng_make_node_common (&typestruct, &d->node) != 0) { 819 printf ("%s: cannot make common node\n", d->name); 820 channel [b->num*NCHAN + c->num] = 0; 821 c->sys = 0; 822 cx_bus_dma_mem_free (&d->dmamem); 823 continue; 824 } 825 NG_NODE_SET_PRIVATE (d->node, d); 826 sprintf (d->nodename, "%s%d", NG_CX_NODE_TYPE, 827 c->board->num*NCHAN + c->num); 828 if (ng_name_node (d->node, d->nodename)) { 829 printf ("%s: cannot name node\n", d->nodename); 830 NG_NODE_UNREF (d->node); 831 channel [b->num*NCHAN + c->num] = 0; 832 c->sys = 0; 833 cx_bus_dma_mem_free (&d->dmamem); 834 continue; 835 } 836 d->lo_queue.ifq_maxlen = ifqmaxlen; 837 d->hi_queue.ifq_maxlen = ifqmaxlen; 838 mtx_init (&d->lo_queue.ifq_mtx, "cx_queue_lo", NULL, MTX_DEF); 839 mtx_init (&d->hi_queue.ifq_mtx, "cx_queue_hi", NULL, MTX_DEF); 840#else /*NETGRAPH*/ 841 d->ifp = if_alloc(IFT_PPP); 842 if (d->ifp == NULL) { 843 printf ("%s: cannot if_alloc() common interface\n", 844 d->name); 845 channel [b->num*NCHAN + c->num] = 0; 846 c->sys = 0; 847 cx_bus_dma_mem_free (&d->dmamem); 848 continue; 849 } 850 d->ifp->if_softc = d; 851 if_initname (d->ifp, "cx", b->num * NCHAN + c->num); 852 d->ifp->if_mtu = PP_MTU; 853 d->ifp->if_flags = IFF_POINTOPOINT | IFF_MULTICAST; 854 d->ifp->if_ioctl = cx_sioctl; 855 d->ifp->if_start = cx_ifstart; 856 d->ifp->if_init = cx_initialize; 857 d->queue.ifq_maxlen = 2; 858 mtx_init (&d->queue.ifq_mtx, "cx_queue", NULL, MTX_DEF); 859 sppp_attach (d->ifp); 860 if_attach (d->ifp); 861 IFP2SP(d->ifp)->pp_tlf = cx_tlf; 862 IFP2SP(d->ifp)->pp_tls = cx_tls; 863 /* If BPF is in the kernel, call the attach for it. 864 * Size of PPP header is 4 bytes. */ 865 bpfattach (d->ifp, DLT_PPP, 4); 866#endif /*NETGRAPH*/ 867 } 868 d->tty = ttyalloc (); 869 d->tty->t_open = cx_topen; 870 d->tty->t_close = cx_tclose; 871 d->tty->t_param = cx_param; 872 d->tty->t_stop = cx_stop; 873 d->tty->t_modem = cx_tmodem; 874 d->tty->t_oproc = cx_oproc; 875 d->tty->t_sc = d; 876 CX_LOCK (bd); 877 cx_start_chan (c, d->dmamem.virt, d->dmamem.phys); 878 cx_register_receive (c, &cx_receive); 879 cx_register_transmit (c, &cx_transmit); 880 cx_register_error (c, &cx_error); 881 cx_register_modem (c, &cx_modem); 882 CX_UNLOCK (bd); 883 884 ttycreate(d->tty, TS_CALLOUT, "x%r%r", b->num, c->num); 885 d->devt = make_dev (&cx_cdevsw, b->num*NCHAN + c->num + 64, UID_ROOT, GID_WHEEL, 0600, "cx%d", b->num*NCHAN + c->num); 886 d->devt->si_drv1 = d; 887 callout_init (&d->dcd_timeout_handle, CALLOUT_MPSAFE); 888 } 889 splx (s); 890 891 return 0; 892} 893 894static int cx_detach (device_t dev) 895{ 896 bdrv_t *bd = device_get_softc (dev); 897 cx_board_t *b = bd->board; 898 cx_chan_t *c; 899 int s; 900 901 KASSERT (mtx_initialized (&bd->cx_mtx), ("cx mutex not initialized")); 902 903 s = splhigh (); 904 CX_LOCK (bd); 905 /* Check if the device is busy (open). */ 906 for (c = b->chan; c < b->chan + NCHAN; ++c) { 907 drv_t *d = (drv_t*) c->sys; 908 909 if (!d || d->chan->type == T_NONE) 910 continue; 911 if (d->lock) { 912 CX_UNLOCK (bd); 913 splx (s); 914 return EBUSY; 915 } 916 if (c->mode == M_ASYNC && d->tty && (d->tty->t_state & TS_ISOPEN) && 917 (d->open_dev|0x2)) { 918 CX_UNLOCK (bd); 919 splx (s); 920 return EBUSY; 921 } 922 if (d->running) { 923 CX_UNLOCK (bd); 924 splx (s); 925 return EBUSY; 926 } 927 } 928 929 /* Deactivate the timeout routine. And soft interrupt*/ 930 callout_stop (&led_timo[b->num]); 931 932 for (c = b->chan; c < b->chan + NCHAN; ++c) { 933 drv_t *d = c->sys; 934 935 if (!d || d->chan->type == T_NONE) 936 continue; 937 938 callout_stop (&d->dcd_timeout_handle); 939 } 940 CX_UNLOCK (bd); 941 bus_teardown_intr (dev, bd->irq_res, bd->intrhand); 942 bus_release_resource (dev, SYS_RES_IRQ, bd->irq_rid, bd->irq_res); 943 944 bus_release_resource (dev, SYS_RES_DRQ, bd->drq_rid, bd->drq_res); 945 946 bus_release_resource (dev, SYS_RES_IOPORT, bd->base_rid, bd->base_res); 947 948 CX_LOCK (bd); 949 cx_close_board (b); 950 951 /* Detach the interfaces, free buffer memory. */ 952 for (c = b->chan; c < b->chan + NCHAN; ++c) { 953 drv_t *d = (drv_t*) c->sys; 954 955 if (!d || d->chan->type == T_NONE) 956 continue; 957 958 if (d->tty) { 959 ttyfree (d->tty); 960 d->tty = NULL; 961 } 962 963 callout_stop (&d->timeout_handle); 964#ifdef NETGRAPH 965 if (d->node) { 966 ng_rmnode_self (d->node); 967 NG_NODE_UNREF (d->node); 968 d->node = NULL; 969 } 970 mtx_destroy (&d->lo_queue.ifq_mtx); 971 mtx_destroy (&d->hi_queue.ifq_mtx); 972#else 973 /* Detach from the packet filter list of interfaces. */ 974 bpfdetach (d->ifp); 975 /* Detach from the sync PPP list. */ 976 sppp_detach (d->ifp); 977 978 if_detach (d->ifp); 979 if_free(d->ifp); 980 /* XXXRIK: check interconnection with irq handler */ 981 IF_DRAIN (&d->queue); 982 mtx_destroy (&d->queue.ifq_mtx); 983#endif 984 destroy_dev (d->devt); 985 } 986 987 cx_led_off (b); 988 CX_UNLOCK (bd); 989 callout_drain (&led_timo[b->num]); 990 for (c = b->chan; c < b->chan + NCHAN; ++c) { 991 drv_t *d = c->sys; 992 993 if (!d || d->chan->type == T_NONE) 994 continue; 995 996 callout_drain (&d->dcd_timeout_handle); 997 callout_drain (&d->timeout_handle); 998 } 999 splx (s); 1000 1001 s = splhigh (); 1002 for (c = b->chan; c < b->chan + NCHAN; ++c) { 1003 drv_t *d = (drv_t*) c->sys; 1004 1005 if (!d || d->chan->type == T_NONE) 1006 continue; 1007 1008 /* Deallocate buffers. */ 1009 cx_bus_dma_mem_free (&d->dmamem); 1010 } 1011 bd->board = 0; 1012 adapter [b->num] = 0; 1013 free (b, M_DEVBUF); 1014 splx (s); 1015 1016 mtx_destroy (&bd->cx_mtx); 1017 1018 return 0; 1019} 1020 1021#ifndef NETGRAPH 1022static void cx_ifstart (struct ifnet *ifp) 1023{ 1024 drv_t *d = ifp->if_softc; 1025 bdrv_t *bd = d->board->sys; 1026 1027 CX_LOCK (bd); 1028 cx_start (d); 1029 CX_UNLOCK (bd); 1030} 1031 1032static void cx_tlf (struct sppp *sp) 1033{ 1034 drv_t *d = SP2IFP(sp)->if_softc; 1035 1036 CX_DEBUG (d, ("cx_tlf\n")); 1037/* cx_set_dtr (d->chan, 0);*/ 1038/* cx_set_rts (d->chan, 0);*/ 1039 if (!(IFP2SP(d->ifp)->pp_flags & PP_FR) && !(d->ifp->if_flags & PP_CISCO)) 1040 sp->pp_down (sp); 1041} 1042 1043static void cx_tls (struct sppp *sp) 1044{ 1045 drv_t *d = SP2IFP(sp)->if_softc; 1046 1047 CX_DEBUG (d, ("cx_tls\n")); 1048 if (!(IFP2SP(d->ifp)->pp_flags & PP_FR) && !(d->ifp->if_flags & PP_CISCO)) 1049 sp->pp_up (sp); 1050} 1051 1052/* 1053 * Initialization of interface. 1054 * It seems to be never called by upper level. 1055 */ 1056static void cx_initialize (void *softc) 1057{ 1058 drv_t *d = softc; 1059 1060 CX_DEBUG (d, ("cx_initialize\n")); 1061} 1062 1063/* 1064 * Process an ioctl request. 1065 */ 1066static int cx_sioctl (struct ifnet *ifp, u_long cmd, caddr_t data) 1067{ 1068 drv_t *d = ifp->if_softc; 1069 bdrv_t *bd = d->board->sys; 1070 int error, s, was_up, should_be_up; 1071 1072 /* No socket ioctls while the channel is in async mode. */ 1073 if (d->chan->type == T_NONE || d->chan->mode == M_ASYNC) 1074 return EBUSY; 1075 1076 /* Socket ioctls on slave subchannels are not allowed. */ 1077 was_up = (ifp->if_drv_flags & IFF_DRV_RUNNING) != 0; 1078 error = sppp_ioctl (ifp, cmd, data); 1079 if (error) 1080 return error; 1081 1082 s = splhigh (); 1083 CX_LOCK (bd); 1084 if (! (ifp->if_flags & IFF_DEBUG)) 1085 d->chan->debug = 0; 1086 else 1087 d->chan->debug = d->chan->debug_shadow; 1088 CX_UNLOCK (bd); 1089 splx (s); 1090 1091 switch (cmd) { 1092 default: CX_DEBUG2 (d, ("ioctl 0x%lx\n", cmd)); return 0; 1093 case SIOCADDMULTI: CX_DEBUG2 (d, ("SIOCADDMULTI\n")); return 0; 1094 case SIOCDELMULTI: CX_DEBUG2 (d, ("SIOCDELMULTI\n")); return 0; 1095 case SIOCSIFFLAGS: CX_DEBUG2 (d, ("SIOCSIFFLAGS\n")); break; 1096 case SIOCSIFADDR: CX_DEBUG2 (d, ("SIOCSIFADDR\n")); break; 1097 } 1098 1099 /* We get here only in case of SIFFLAGS or SIFADDR. */ 1100 s = splhigh (); 1101 CX_LOCK (bd); 1102 should_be_up = (ifp->if_drv_flags & IFF_DRV_RUNNING) != 0; 1103 if (!was_up && should_be_up) { 1104 /* Interface goes up -- start it. */ 1105 cx_up (d); 1106 cx_start (d); 1107 } else if (was_up && !should_be_up) { 1108 /* Interface is going down -- stop it. */ 1109 /* if ((IFP2SP(d->ifp)->pp_flags & PP_FR) || (ifp->if_flags & PP_CISCO))*/ 1110 cx_down (d); 1111 } 1112 CX_UNLOCK (bd); 1113 splx (s); 1114 return 0; 1115} 1116#endif /*NETGRAPH*/ 1117 1118/* 1119 * Stop the interface. Called on splimp(). 1120 */ 1121static void cx_down (drv_t *d) 1122{ 1123 int s = splhigh (); 1124 CX_DEBUG (d, ("cx_down\n")); 1125 cx_set_dtr (d->chan, 0); 1126 cx_set_rts (d->chan, 0); 1127 d->running = 0; 1128 callout_stop (&d->timeout_handle); 1129 splx (s); 1130} 1131 1132/* 1133 * Start the interface. Called on splimp(). 1134 */ 1135static void cx_up (drv_t *d) 1136{ 1137 int s = splhigh (); 1138 CX_DEBUG (d, ("cx_up\n")); 1139 cx_set_dtr (d->chan, 1); 1140 cx_set_rts (d->chan, 1); 1141 d->running = 1; 1142 splx (s); 1143} 1144 1145/* 1146 * Start output on the (slave) interface. Get another datagram to send 1147 * off of the interface queue, and copy it to the interface 1148 * before starting the output. 1149 */ 1150static void cx_send (drv_t *d) 1151{ 1152 struct mbuf *m; 1153 u_short len; 1154 1155 CX_DEBUG2 (d, ("cx_send\n")); 1156 1157 /* No output if the interface is down. */ 1158 if (! d->running) 1159 return; 1160 1161 /* No output if the modem is off. */ 1162 if (! cx_get_dsr (d->chan) && ! cx_get_loop(d->chan)) 1163 return; 1164 1165 if (cx_buf_free (d->chan)) { 1166 /* Get the packet to send. */ 1167#ifdef NETGRAPH 1168 IF_DEQUEUE (&d->hi_queue, m); 1169 if (! m) 1170 IF_DEQUEUE (&d->lo_queue, m); 1171#else 1172 m = sppp_dequeue (d->ifp); 1173#endif 1174 if (! m) 1175 return; 1176#ifndef NETGRAPH 1177 BPF_MTAP (d->ifp, m); 1178#endif 1179 len = m_length (m, NULL); 1180 if (! m->m_next) 1181 cx_send_packet (d->chan, (u_char*)mtod (m, caddr_t), 1182 len, 0); 1183 else { 1184 u_char buf [DMABUFSZ]; 1185 m_copydata (m, 0, len, buf); 1186 cx_send_packet (d->chan, buf, len, 0); 1187 } 1188 m_freem (m); 1189 1190 /* Set up transmit timeout, 10 seconds. */ 1191 d->timeout = 10; 1192 } 1193#ifndef NETGRAPH 1194 d->ifp->if_drv_flags |= IFF_DRV_OACTIVE; 1195#endif 1196} 1197 1198/* 1199 * Start output on the interface. 1200 * Always called on splimp(). 1201 */ 1202static void cx_start (drv_t *d) 1203{ 1204 int s = splhigh (); 1205 if (d->running) { 1206 if (! d->chan->dtr) 1207 cx_set_dtr (d->chan, 1); 1208 if (! d->chan->rts) 1209 cx_set_rts (d->chan, 1); 1210 cx_send (d); 1211 callout_reset (&d->timeout_handle, hz, cx_watchdog_timer, d); 1212 } 1213 splx (s); 1214} 1215 1216/* 1217 * Handle transmit timeouts. 1218 * Recover after lost transmit interrupts. 1219 * Always called on splimp(). 1220 */ 1221static void cx_watchdog (drv_t *d) 1222{ 1223 1224 CX_DEBUG (d, ("device timeout\n")); 1225 if (d->running) { 1226 cx_setup_chan (d->chan); 1227 cx_start_chan (d->chan, 0, 0); 1228 cx_set_dtr (d->chan, 1); 1229 cx_set_rts (d->chan, 1); 1230 cx_start (d); 1231 } 1232} 1233 1234static void cx_watchdog_timer (void *arg) 1235{ 1236 drv_t *d = arg; 1237 bdrv_t *bd = d->board->sys; 1238 1239 CX_LOCK (bd); 1240 if (d->timeout == 1) 1241 cx_watchdog (d); 1242 if (d->timeout) 1243 d->timeout--; 1244 callout_reset (&d->timeout_handle, hz, cx_watchdog_timer, d); 1245 CX_UNLOCK (bd); 1246} 1247 1248/* 1249 * Transmit callback function. 1250 */ 1251static void cx_transmit (cx_chan_t *c, void *attachment, int len) 1252{ 1253 drv_t *d = c->sys; 1254 1255 if (!d) 1256 return; 1257 1258 if (c->mode == M_ASYNC && d->tty) { 1259 d->tty->t_state &= ~(TS_BUSY | TS_FLUSH); 1260 d->atimeout = 0; 1261 if (d->tty->t_dev) { 1262 d->intr_action |= CX_WRITE; 1263 MY_SOFT_INTR = 1; 1264 swi_sched (cx_fast_ih, 0); 1265 } 1266 return; 1267 } 1268 d->timeout = 0; 1269#ifndef NETGRAPH 1270 ++d->ifp->if_opackets; 1271 d->ifp->if_drv_flags &= ~IFF_DRV_OACTIVE; 1272#endif 1273 cx_start (d); 1274} 1275 1276/* 1277 * Process the received packet. 1278 */ 1279static void cx_receive (cx_chan_t *c, char *data, int len) 1280{ 1281 drv_t *d = c->sys; 1282 struct mbuf *m; 1283 char *cc = data; 1284#ifdef NETGRAPH 1285 int error; 1286#endif 1287 1288 if (!d) 1289 return; 1290 1291 if (c->mode == M_ASYNC && d->tty) { 1292 if (d->tty->t_state & TS_ISOPEN) { 1293 async_q *q = &d->aqueue; 1294 int size = BF_SZ - 1 - AQ_GSZ (q); 1295 1296 if (len <= 0 && !size) 1297 return; 1298 1299 if (len > size) { 1300 c->ierrs++; 1301 cx_error (c, CX_OVERRUN); 1302 len = size - 1; 1303 } 1304 1305 while (len--) { 1306 AQ_PUSH (q, *(unsigned char *)cc); 1307 cc++; 1308 } 1309 1310 d->intr_action |= CX_READ; 1311 MY_SOFT_INTR = 1; 1312 swi_sched (cx_fast_ih, 0); 1313 } 1314 return; 1315 } 1316 if (! d->running) 1317 return; 1318 1319 m = makembuf (data, len); 1320 if (! m) { 1321 CX_DEBUG (d, ("no memory for packet\n")); 1322#ifndef NETGRAPH 1323 ++d->ifp->if_iqdrops; 1324#endif 1325 return; 1326 } 1327 if (c->debug > 1) 1328 printmbuf (m); 1329#ifdef NETGRAPH 1330 m->m_pkthdr.rcvif = 0; 1331 NG_SEND_DATA_ONLY (error, d->hook, m); 1332#else 1333 ++d->ifp->if_ipackets; 1334 m->m_pkthdr.rcvif = d->ifp; 1335 /* Check if there's a BPF listener on this interface. 1336 * If so, hand off the raw packet to bpf. */ 1337 BPF_TAP (d->ifp, data, len); 1338 IF_ENQUEUE (&d->queue, m); 1339#endif 1340} 1341 1342#define CONDITION(t,tp) (!(t->c_iflag & (ICRNL | IGNCR | IMAXBEL | INLCR | ISTRIP | IXON))\ 1343 && (!(tp->t_iflag & BRKINT) || (tp->t_iflag & IGNBRK))\ 1344 && (!(tp->t_iflag & PARMRK)\ 1345 || (tp->t_iflag & (IGNPAR | IGNBRK)) == (IGNPAR | IGNBRK))\ 1346 && !(t->c_lflag & (ECHO | ICANON | IEXTEN | ISIG | PENDIN))\ 1347 && linesw[tp->t_line]->l_rint == ttyinput) 1348 1349/* 1350 * Error callback function. 1351 */ 1352static void cx_error (cx_chan_t *c, int data) 1353{ 1354 drv_t *d = c->sys; 1355 async_q *q; 1356 1357 if (!d) 1358 return; 1359 1360 q = &(d->aqueue); 1361 1362 switch (data) { 1363 case CX_FRAME: 1364 CX_DEBUG (d, ("frame error\n")); 1365 if (c->mode == M_ASYNC && d->tty && (d->tty->t_state & TS_ISOPEN) 1366 && (AQ_GSZ (q) < BF_SZ - 1) 1367 && (!CONDITION((&d->tty->t_termios), (d->tty)) 1368 || !(d->tty->t_iflag & (IGNPAR | PARMRK)))) { 1369 AQ_PUSH (q, TTY_FE); 1370 d->intr_action |= CX_READ; 1371 MY_SOFT_INTR = 1; 1372 swi_sched (cx_fast_ih, 0); 1373 } 1374#ifndef NETGRAPH 1375 else 1376 ++d->ifp->if_ierrors; 1377#endif 1378 break; 1379 case CX_CRC: 1380 CX_DEBUG (d, ("crc error\n")); 1381 if (c->mode == M_ASYNC && d->tty && (d->tty->t_state & TS_ISOPEN) 1382 && (AQ_GSZ (q) < BF_SZ - 1) 1383 && (!CONDITION((&d->tty->t_termios), (d->tty)) 1384 || !(d->tty->t_iflag & INPCK) 1385 || !(d->tty->t_iflag & (IGNPAR | PARMRK)))) { 1386 AQ_PUSH (q, TTY_PE); 1387 d->intr_action |= CX_READ; 1388 MY_SOFT_INTR = 1; 1389 swi_sched (cx_fast_ih, 0); 1390 } 1391#ifndef NETGRAPH 1392 else 1393 ++d->ifp->if_ierrors; 1394#endif 1395 break; 1396 case CX_OVERRUN: 1397 CX_DEBUG (d, ("overrun error\n")); 1398#ifdef TTY_OE 1399 if (c->mode == M_ASYNC && d->tty && (d->tty->t_state & TS_ISOPEN) 1400 && (AQ_GSZ (q) < BF_SZ - 1) 1401 && (!CONDITION((&d->tty->t_termios), (d->tty)))) { 1402 AQ_PUSH (q, TTY_OE); 1403 d->intr_action |= CX_READ; 1404 MY_SOFT_INTR = 1; 1405 swi_sched (cx_fast_ih, 0); 1406 } 1407#endif 1408#ifndef NETGRAPH 1409 else { 1410 ++d->ifp->if_collisions; 1411 ++d->ifp->if_ierrors; 1412 } 1413#endif 1414 break; 1415 case CX_OVERFLOW: 1416 CX_DEBUG (d, ("overflow error\n")); 1417#ifndef NETGRAPH 1418 if (c->mode != M_ASYNC) 1419 ++d->ifp->if_ierrors; 1420#endif 1421 break; 1422 case CX_UNDERRUN: 1423 CX_DEBUG (d, ("underrun error\n")); 1424 if (c->mode != M_ASYNC) { 1425 d->timeout = 0; 1426#ifndef NETGRAPH 1427 ++d->ifp->if_oerrors; 1428 d->ifp->if_drv_flags &= ~IFF_DRV_OACTIVE; 1429#endif 1430 cx_start (d); 1431 } 1432 break; 1433 case CX_BREAK: 1434 CX_DEBUG (d, ("break error\n")); 1435 if (c->mode == M_ASYNC && d->tty && (d->tty->t_state & TS_ISOPEN) 1436 && (AQ_GSZ (q) < BF_SZ - 1) 1437 && (!CONDITION((&d->tty->t_termios), (d->tty)) 1438 || !(d->tty->t_iflag & (IGNBRK | BRKINT | PARMRK)))) { 1439 AQ_PUSH (q, TTY_BI); 1440 d->intr_action |= CX_READ; 1441 MY_SOFT_INTR = 1; 1442 swi_sched (cx_fast_ih, 0); 1443 } 1444#ifndef NETGRAPH 1445 else 1446 ++d->ifp->if_ierrors; 1447#endif 1448 break; 1449 default: 1450 CX_DEBUG (d, ("error #%d\n", data)); 1451 } 1452} 1453 1454static int cx_topen (struct tty *tp, struct cdev *dev) 1455{ 1456 bdrv_t *bd; 1457 drv_t *d; 1458 1459 d = tp->t_sc; 1460 CX_DEBUG2 (d, ("cx_open (serial)\n")); 1461 1462 bd = d->board->sys; 1463 1464 if (d->chan->mode != M_ASYNC) 1465 return (EBUSY); 1466 1467 d->open_dev |= 0x2; 1468 CX_LOCK (bd); 1469 cx_start_chan (d->chan, 0, 0); 1470 cx_set_dtr (d->chan, 1); 1471 cx_set_rts (d->chan, 1); 1472 d->cd = cx_get_cd (d->chan); 1473 CX_UNLOCK (bd); 1474 1475 CX_DEBUG2 (d, ("cx_open done\n")); 1476 1477 return 0; 1478} 1479 1480static void cx_tclose (struct tty *tp) 1481{ 1482 drv_t *d; 1483 bdrv_t *bd; 1484 1485 d = tp->t_sc; 1486 CX_DEBUG2 (d, ("cx_close\n")); 1487 bd = d->board->sys; 1488 CX_LOCK (bd); 1489 /* Disable receiver. 1490 * Transmitter continues sending the queued data. */ 1491 cx_enable_receive (d->chan, 0); 1492 CX_UNLOCK (bd); 1493 d->open_dev &= ~0x2; 1494} 1495 1496static int cx_tmodem (struct tty *tp, int sigon, int sigoff) 1497{ 1498 drv_t *d; 1499 bdrv_t *bd; 1500 1501 d = tp->t_sc; 1502 bd = d->board->sys; 1503 1504 CX_LOCK (bd); 1505 if (!sigon && !sigoff) { 1506 if (cx_get_dsr (d->chan)) sigon |= SER_DSR; 1507 if (cx_get_cd (d->chan)) sigon |= SER_DCD; 1508 if (cx_get_cts (d->chan)) sigon |= SER_CTS; 1509 if (d->chan->dtr) sigon |= SER_DTR; 1510 if (d->chan->rts) sigon |= SER_RTS; 1511 CX_UNLOCK (bd); 1512 return sigon; 1513 } 1514 1515 if (sigon & SER_DTR) 1516 cx_set_dtr (d->chan, 1); 1517 if (sigoff & SER_DTR) 1518 cx_set_dtr (d->chan, 0); 1519 if (sigon & SER_RTS) 1520 cx_set_rts (d->chan, 1); 1521 if (sigoff & SER_RTS) 1522 cx_set_rts (d->chan, 0); 1523 CX_UNLOCK (bd); 1524 1525 return (0); 1526} 1527 1528static int cx_open (struct cdev *dev, int flag, int mode, struct thread *td) 1529{ 1530 int unit; 1531 drv_t *d; 1532 1533 d = dev->si_drv1; 1534 unit = d->chan->num; 1535 1536 CX_DEBUG2 (d, ("cx_open unit=%d, flag=0x%x, mode=0x%x\n", 1537 unit, flag, mode)); 1538 1539 d->open_dev |= 0x1; 1540 1541 CX_DEBUG2 (d, ("cx_open done\n")); 1542 1543 return 0; 1544} 1545 1546static int cx_close (struct cdev *dev, int flag, int mode, struct thread *td) 1547{ 1548 drv_t *d; 1549 1550 d = dev->si_drv1; 1551 CX_DEBUG2 (d, ("cx_close\n")); 1552 d->open_dev &= ~0x1; 1553 return 0; 1554} 1555 1556static int cx_modem_status (drv_t *d) 1557{ 1558 bdrv_t *bd = d->board->sys; 1559 int status = 0, s = splhigh (); 1560 CX_LOCK (bd); 1561 /* Already opened by someone or network interface is up? */ 1562 if ((d->chan->mode == M_ASYNC && d->tty && (d->tty->t_state & TS_ISOPEN) && 1563 (d->open_dev|0x2)) || (d->chan->mode != M_ASYNC && d->running)) 1564 status = TIOCM_LE; /* always enabled while open */ 1565 1566 if (cx_get_dsr (d->chan)) status |= TIOCM_DSR; 1567 if (cx_get_cd (d->chan)) status |= TIOCM_CD; 1568 if (cx_get_cts (d->chan)) status |= TIOCM_CTS; 1569 if (d->chan->dtr) status |= TIOCM_DTR; 1570 if (d->chan->rts) status |= TIOCM_RTS; 1571 CX_UNLOCK (bd); 1572 splx (s); 1573 return status; 1574} 1575 1576static int cx_ioctl (struct cdev *dev, u_long cmd, caddr_t data, int flag, struct thread *td) 1577{ 1578 drv_t *d; 1579 bdrv_t *bd; 1580 cx_chan_t *c; 1581 struct serial_statistics *st; 1582 int error, s; 1583 char mask[16]; 1584 1585 d = dev->si_drv1; 1586 c = d->chan; 1587 1588 bd = d->board->sys; 1589 1590 switch (cmd) { 1591 case SERIAL_GETREGISTERED: 1592 CX_DEBUG2 (d, ("ioctl: getregistered\n")); 1593 bzero (mask, sizeof(mask)); 1594 for (s=0; s<NCX*NCHAN; ++s) 1595 if (channel [s]) 1596 mask [s/8] |= 1 << (s & 7); 1597 bcopy (mask, data, sizeof (mask)); 1598 return 0; 1599 1600 case SERIAL_GETPORT: 1601 CX_DEBUG2 (d, ("ioctl: getport\n")); 1602 s = splhigh (); 1603 CX_LOCK (bd); 1604 *(int *)data = cx_get_port (c); 1605 CX_UNLOCK (bd); 1606 splx (s); 1607 if (*(int *)data<0) 1608 return (EINVAL); 1609 else 1610 return 0; 1611 1612 case SERIAL_SETPORT: 1613 CX_DEBUG2 (d, ("ioctl: setproto\n")); 1614 /* Only for superuser! */ 1615 error = priv_check (td, PRIV_DRIVER); 1616 if (error) 1617 return error; 1618 1619 s = splhigh (); 1620 CX_LOCK (bd); 1621 cx_set_port (c, *(int *)data); 1622 CX_UNLOCK (bd); 1623 splx (s); 1624 return 0; 1625 1626#ifndef NETGRAPH 1627 case SERIAL_GETPROTO: 1628 CX_DEBUG2 (d, ("ioctl: getproto\n")); 1629 s = splhigh (); 1630 CX_LOCK (bd); 1631 strcpy ((char*)data, (c->mode == M_ASYNC) ? "async" : 1632 (IFP2SP(d->ifp)->pp_flags & PP_FR) ? "fr" : 1633 (d->ifp->if_flags & PP_CISCO) ? "cisco" : "ppp"); 1634 CX_UNLOCK (bd); 1635 splx (s); 1636 return 0; 1637 1638 case SERIAL_SETPROTO: 1639 CX_DEBUG2 (d, ("ioctl: setproto\n")); 1640 /* Only for superuser! */ 1641 error = priv_check (td, PRIV_DRIVER); 1642 if (error) 1643 return error; 1644 if (c->mode == M_ASYNC) 1645 return EBUSY; 1646 if (d->ifp->if_drv_flags & IFF_DRV_RUNNING) 1647 return EBUSY; 1648 if (! strcmp ("cisco", (char*)data)) { 1649 IFP2SP(d->ifp)->pp_flags &= ~(PP_FR); 1650 IFP2SP(d->ifp)->pp_flags |= PP_KEEPALIVE; 1651 d->ifp->if_flags |= PP_CISCO; 1652 } else if (! strcmp ("fr", (char*)data)) { 1653 d->ifp->if_flags &= ~(PP_CISCO); 1654 IFP2SP(d->ifp)->pp_flags |= PP_FR | PP_KEEPALIVE; 1655 } else if (! strcmp ("ppp", (char*)data)) { 1656 IFP2SP(d->ifp)->pp_flags &= ~(PP_FR | PP_KEEPALIVE); 1657 d->ifp->if_flags &= ~(PP_CISCO); 1658 } else 1659 return EINVAL; 1660 return 0; 1661 1662 case SERIAL_GETKEEPALIVE: 1663 CX_DEBUG2 (d, ("ioctl: getkeepalive\n")); 1664 if ((IFP2SP(d->ifp)->pp_flags & PP_FR) || 1665 (d->ifp->if_flags & PP_CISCO) || 1666 (c->mode == M_ASYNC)) 1667 return EINVAL; 1668 s = splhigh (); 1669 CX_LOCK (bd); 1670 *(int*)data = (IFP2SP(d->ifp)->pp_flags & PP_KEEPALIVE) ? 1 : 0; 1671 CX_UNLOCK (bd); 1672 splx (s); 1673 return 0; 1674 1675 case SERIAL_SETKEEPALIVE: 1676 CX_DEBUG2 (d, ("ioctl: setkeepalive\n")); 1677 /* Only for superuser! */ 1678 error = priv_check (td, PRIV_DRIVER); 1679 if (error) 1680 return error; 1681 if ((IFP2SP(d->ifp)->pp_flags & PP_FR) || 1682 (d->ifp->if_flags & PP_CISCO)) 1683 return EINVAL; 1684 s = splhigh (); 1685 CX_LOCK (bd); 1686 if (*(int*)data) 1687 IFP2SP(d->ifp)->pp_flags |= PP_KEEPALIVE; 1688 else 1689 IFP2SP(d->ifp)->pp_flags &= ~PP_KEEPALIVE; 1690 CX_UNLOCK (bd); 1691 splx (s); 1692 return 0; 1693#endif /*NETGRAPH*/ 1694 1695 case SERIAL_GETMODE: 1696 CX_DEBUG2 (d, ("ioctl: getmode\n")); 1697 s = splhigh (); 1698 CX_LOCK (bd); 1699 *(int*)data = (c->mode == M_ASYNC) ? 1700 SERIAL_ASYNC : SERIAL_HDLC; 1701 CX_UNLOCK (bd); 1702 splx (s); 1703 return 0; 1704 1705 case SERIAL_SETMODE: 1706 CX_DEBUG2 (d, ("ioctl: setmode\n")); 1707 /* Only for superuser! */ 1708 error = priv_check (td, PRIV_DRIVER); 1709 if (error) 1710 return error; 1711 1712 /* Somebody is waiting for carrier? */ 1713 if (d->lock) 1714 return EBUSY; 1715 /* /dev/ttyXX is already opened by someone? */ 1716 if (c->mode == M_ASYNC && d->tty && (d->tty->t_state & TS_ISOPEN) && 1717 (d->open_dev|0x2)) 1718 return EBUSY; 1719 /* Network interface is up? 1720 * Cannot change to async mode. */ 1721 if (c->mode != M_ASYNC && d->running && 1722 (*(int*)data == SERIAL_ASYNC)) 1723 return EBUSY; 1724 1725 s = splhigh (); 1726 CX_LOCK (bd); 1727 if (c->mode == M_HDLC && *(int*)data == SERIAL_ASYNC) { 1728 cx_set_mode (c, M_ASYNC); 1729 cx_enable_receive (c, 0); 1730 cx_enable_transmit (c, 0); 1731 } else if (c->mode == M_ASYNC && *(int*)data == SERIAL_HDLC) { 1732 if (d->ifp->if_flags & IFF_DEBUG) 1733 c->debug = c->debug_shadow; 1734 cx_set_mode (c, M_HDLC); 1735 cx_enable_receive (c, 1); 1736 cx_enable_transmit (c, 1); 1737 } 1738 CX_UNLOCK (bd); 1739 splx (s); 1740 return 0; 1741 1742 case SERIAL_GETSTAT: 1743 CX_DEBUG2 (d, ("ioctl: getestat\n")); 1744 st = (struct serial_statistics*) data; 1745 s = splhigh (); 1746 CX_LOCK (bd); 1747 st->rintr = c->rintr; 1748 st->tintr = c->tintr; 1749 st->mintr = c->mintr; 1750 st->ibytes = c->ibytes; 1751 st->ipkts = c->ipkts; 1752 st->ierrs = c->ierrs; 1753 st->obytes = c->obytes; 1754 st->opkts = c->opkts; 1755 st->oerrs = c->oerrs; 1756 CX_UNLOCK (bd); 1757 splx (s); 1758 return 0; 1759 1760 case SERIAL_CLRSTAT: 1761 CX_DEBUG2 (d, ("ioctl: clrstat\n")); 1762 /* Only for superuser! */ 1763 error = priv_check (td, PRIV_DRIVER); 1764 if (error) 1765 return error; 1766 s = splhigh (); 1767 CX_LOCK (bd); 1768 c->rintr = 0; 1769 c->tintr = 0; 1770 c->mintr = 0; 1771 c->ibytes = 0; 1772 c->ipkts = 0; 1773 c->ierrs = 0; 1774 c->obytes = 0; 1775 c->opkts = 0; 1776 c->oerrs = 0; 1777 CX_UNLOCK (bd); 1778 splx (s); 1779 return 0; 1780 1781 case SERIAL_GETBAUD: 1782 CX_DEBUG2 (d, ("ioctl: getbaud\n")); 1783 if (c->mode == M_ASYNC) 1784 return EINVAL; 1785 s = splhigh (); 1786 CX_LOCK (bd); 1787 *(long*)data = cx_get_baud(c); 1788 CX_UNLOCK (bd); 1789 splx (s); 1790 return 0; 1791 1792 case SERIAL_SETBAUD: 1793 CX_DEBUG2 (d, ("ioctl: setbaud\n")); 1794 /* Only for superuser! */ 1795 error = priv_check (td, PRIV_DRIVER); 1796 if (error) 1797 return error; 1798 if (c->mode == M_ASYNC) 1799 return EINVAL; 1800 s = splhigh (); 1801 CX_LOCK (bd); 1802 cx_set_baud (c, *(long*)data); 1803 CX_UNLOCK (bd); 1804 splx (s); 1805 return 0; 1806 1807 case SERIAL_GETLOOP: 1808 CX_DEBUG2 (d, ("ioctl: getloop\n")); 1809 if (c->mode == M_ASYNC) 1810 return EINVAL; 1811 s = splhigh (); 1812 CX_LOCK (bd); 1813 *(int*)data = cx_get_loop (c); 1814 CX_UNLOCK (bd); 1815 splx (s); 1816 return 0; 1817 1818 case SERIAL_SETLOOP: 1819 CX_DEBUG2 (d, ("ioctl: setloop\n")); 1820 /* Only for superuser! */ 1821 error = priv_check (td, PRIV_DRIVER); 1822 if (error) 1823 return error; 1824 if (c->mode == M_ASYNC) 1825 return EINVAL; 1826 s = splhigh (); 1827 CX_LOCK (bd); 1828 cx_set_loop (c, *(int*)data); 1829 CX_UNLOCK (bd); 1830 splx (s); 1831 return 0; 1832 1833 case SERIAL_GETDPLL: 1834 CX_DEBUG2 (d, ("ioctl: getdpll\n")); 1835 if (c->mode == M_ASYNC) 1836 return EINVAL; 1837 s = splhigh (); 1838 CX_LOCK (bd); 1839 *(int*)data = cx_get_dpll (c); 1840 CX_UNLOCK (bd); 1841 splx (s); 1842 return 0; 1843 1844 case SERIAL_SETDPLL: 1845 CX_DEBUG2 (d, ("ioctl: setdpll\n")); 1846 /* Only for superuser! */ 1847 error = priv_check (td, PRIV_DRIVER); 1848 if (error) 1849 return error; 1850 if (c->mode == M_ASYNC) 1851 return EINVAL; 1852 s = splhigh (); 1853 CX_LOCK (bd); 1854 cx_set_dpll (c, *(int*)data); 1855 CX_UNLOCK (bd); 1856 splx (s); 1857 return 0; 1858 1859 case SERIAL_GETNRZI: 1860 CX_DEBUG2 (d, ("ioctl: getnrzi\n")); 1861 if (c->mode == M_ASYNC) 1862 return EINVAL; 1863 s = splhigh (); 1864 CX_LOCK (bd); 1865 *(int*)data = cx_get_nrzi (c); 1866 CX_UNLOCK (bd); 1867 splx (s); 1868 return 0; 1869 1870 case SERIAL_SETNRZI: 1871 CX_DEBUG2 (d, ("ioctl: setnrzi\n")); 1872 /* Only for superuser! */ 1873 error = priv_check (td, PRIV_DRIVER); 1874 if (error) 1875 return error; 1876 if (c->mode == M_ASYNC) 1877 return EINVAL; 1878 s = splhigh (); 1879 CX_LOCK (bd); 1880 cx_set_nrzi (c, *(int*)data); 1881 CX_UNLOCK (bd); 1882 splx (s); 1883 return 0; 1884 1885 case SERIAL_GETDEBUG: 1886 CX_DEBUG2 (d, ("ioctl: getdebug\n")); 1887 s = splhigh (); 1888 CX_LOCK (bd); 1889 *(int*)data = c->debug; 1890 CX_UNLOCK (bd); 1891 splx (s); 1892 return 0; 1893 1894 case SERIAL_SETDEBUG: 1895 CX_DEBUG2 (d, ("ioctl: setdebug\n")); 1896 /* Only for superuser! */ 1897 error = priv_check (td, PRIV_DRIVER); 1898 if (error) 1899 return error; 1900 s = splhigh (); 1901 CX_LOCK (bd); 1902#ifndef NETGRAPH 1903 if (c->mode == M_ASYNC) { 1904 c->debug = *(int*)data; 1905 } else { 1906 /* 1907 * The debug_shadow is always greater than zero for 1908 * logic simplicity. For switching debug off the 1909 * IFF_DEBUG is responsible (for !M_ASYNC mode). 1910 */ 1911 c->debug_shadow = (*(int*)data) ? (*(int*)data) : 1; 1912 if (d->ifp->if_flags & IFF_DEBUG) 1913 c->debug = c->debug_shadow; 1914 } 1915#else 1916 c->debug = *(int*)data; 1917#endif 1918 CX_UNLOCK (bd); 1919 splx (s); 1920 return 0; 1921 } 1922 1923 switch (cmd) { 1924 case TIOCSDTR: /* Set DTR */ 1925 CX_DEBUG2 (d, ("ioctl: tiocsdtr\n")); 1926 s = splhigh (); 1927 CX_LOCK (bd); 1928 cx_set_dtr (c, 1); 1929 CX_UNLOCK (bd); 1930 splx (s); 1931 return 0; 1932 1933 case TIOCCDTR: /* Clear DTR */ 1934 CX_DEBUG2 (d, ("ioctl: tioccdtr\n")); 1935 s = splhigh (); 1936 CX_LOCK (bd); 1937 cx_set_dtr (c, 0); 1938 CX_UNLOCK (bd); 1939 splx (s); 1940 return 0; 1941 1942 case TIOCMSET: /* Set DTR/RTS */ 1943 CX_DEBUG2 (d, ("ioctl: tiocmset\n")); 1944 s = splhigh (); 1945 CX_LOCK (bd); 1946 cx_set_dtr (c, (*(int*)data & TIOCM_DTR) ? 1 : 0); 1947 cx_set_rts (c, (*(int*)data & TIOCM_RTS) ? 1 : 0); 1948 CX_UNLOCK (bd); 1949 splx (s); 1950 return 0; 1951 1952 case TIOCMBIS: /* Add DTR/RTS */ 1953 CX_DEBUG2 (d, ("ioctl: tiocmbis\n")); 1954 s = splhigh (); 1955 CX_LOCK (bd); 1956 if (*(int*)data & TIOCM_DTR) cx_set_dtr (c, 1); 1957 if (*(int*)data & TIOCM_RTS) cx_set_rts (c, 1); 1958 CX_UNLOCK (bd); 1959 splx (s); 1960 return 0; 1961 1962 case TIOCMBIC: /* Clear DTR/RTS */ 1963 CX_DEBUG2 (d, ("ioctl: tiocmbic\n")); 1964 s = splhigh (); 1965 CX_LOCK (bd); 1966 if (*(int*)data & TIOCM_DTR) cx_set_dtr (c, 0); 1967 if (*(int*)data & TIOCM_RTS) cx_set_rts (c, 0); 1968 CX_UNLOCK (bd); 1969 splx (s); 1970 return 0; 1971 1972 case TIOCMGET: /* Get modem status */ 1973 CX_DEBUG2 (d, ("ioctl: tiocmget\n")); 1974 *(int*)data = cx_modem_status (d); 1975 return 0; 1976 1977 } 1978 1979 CX_DEBUG2 (d, ("ioctl: 0x%lx\n", cmd)); 1980 return ENOTTY; 1981} 1982 1983void cx_softintr (void *unused) 1984{ 1985 drv_t *d; 1986 bdrv_t *bd; 1987 async_q *q; 1988 int i, s, ic, k; 1989 while (MY_SOFT_INTR) { 1990 MY_SOFT_INTR = 0; 1991 for (i=0; i<NCX*NCHAN; ++i) { 1992 d = channel [i]; 1993 if (!d || !d->chan || d->chan->type == T_NONE 1994 || d->chan->mode != M_ASYNC || !d->tty 1995 || !d->tty->t_dev) 1996 continue; 1997 bd = d->board->sys; 1998 s = splhigh (); 1999 CX_LOCK (bd); 2000 if (d->intr_action & CX_READ) { 2001 q = &(d->aqueue); 2002 if (d->tty->t_state & TS_CAN_BYPASS_L_RINT) { 2003 k = AQ_GSZ(q); 2004 if (d->tty->t_rawq.c_cc + k > 2005 d->tty->t_ihiwat 2006 && (d->tty->t_cflag & CRTS_IFLOW 2007 || d->tty->t_iflag & IXOFF) 2008 && !(d->tty->t_state & TS_TBLOCK)) 2009 ttyblock(d->tty); 2010 d->tty->t_rawcc += k; 2011 while (k>0) { 2012 k--; 2013 AQ_POP (q, ic); 2014 CX_UNLOCK (bd); 2015 splx (s); 2016 putc (ic, &d->tty->t_rawq); 2017 s = splhigh (); 2018 CX_LOCK (bd); 2019 } 2020 ttwakeup(d->tty); 2021 if (d->tty->t_state & TS_TTSTOP 2022 && (d->tty->t_iflag & IXANY 2023 || d->tty->t_cc[VSTART] == 2024 d->tty->t_cc[VSTOP])) { 2025 d->tty->t_state &= ~TS_TTSTOP; 2026 d->tty->t_lflag &= ~FLUSHO; 2027 d->intr_action |= CX_WRITE; 2028 } 2029 } else { 2030 while (q->end != q->beg) { 2031 AQ_POP (q, ic); 2032 CX_UNLOCK (bd); 2033 splx (s); 2034 ttyld_rint (d->tty, ic); 2035 s = splhigh (); 2036 CX_LOCK (bd); 2037 } 2038 } 2039 d->intr_action &= ~CX_READ; 2040 } 2041 splx (s); 2042 CX_UNLOCK (bd); 2043 2044 s = splhigh (); 2045 CX_LOCK (bd); 2046 if (d->intr_action & CX_WRITE) { 2047 if (d->tty->t_line) 2048 ttyld_start (d->tty); 2049 else 2050 cx_oproc (d->tty); 2051 d->intr_action &= ~CX_WRITE; 2052 } 2053 CX_UNLOCK (bd); 2054 splx (s); 2055 2056 } 2057 } 2058} 2059 2060/* 2061 * Fill transmitter buffer with data. 2062 */ 2063static void cx_oproc (struct tty *tp) 2064{ 2065 int s, k; 2066 drv_t *d; 2067 bdrv_t *bd; 2068 static u_char buf[DMABUFSZ]; 2069 u_char *p; 2070 u_short len = 0, sublen = 0; 2071 2072 d = tp->t_sc; 2073 bd = d->board->sys; 2074 2075 CX_DEBUG2 (d, ("cx_oproc\n")); 2076 2077 s = splhigh (); 2078 CX_LOCK (bd); 2079 2080 if (tp->t_cflag & CRTSCTS && (tp->t_state & TS_TBLOCK) && d->chan->rts) 2081 cx_set_rts (d->chan, 0); 2082 else if (tp->t_cflag & CRTSCTS && ! (tp->t_state & TS_TBLOCK) && ! d->chan->rts) 2083 cx_set_rts (d->chan, 1); 2084 2085 if (! (tp->t_state & (TS_TIMEOUT | TS_TTSTOP))) { 2086 /* Start transmitter. */ 2087 cx_enable_transmit (d->chan, 1); 2088 2089 /* Is it busy? */ 2090 if (! cx_buf_free (d->chan)) { 2091 tp->t_state |= TS_BUSY; 2092 CX_UNLOCK (bd); 2093 splx (s); 2094 return; 2095 } 2096 if (tp->t_iflag & IXOFF) { 2097 p = (buf + (DMABUFSZ/2)); 2098 sublen = q_to_b (&tp->t_outq, p, (DMABUFSZ/2)); 2099 k = sublen; 2100 while (k--) { 2101 /* Send XON/XOFF out of band. */ 2102 if (*p == tp->t_cc[VSTOP]) { 2103 cx_xflow_ctl (d->chan, 0); 2104 p++; 2105 continue; 2106 } 2107 if (*p == tp->t_cc[VSTART]) { 2108 cx_xflow_ctl (d->chan, 1); 2109 p++; 2110 continue; 2111 } 2112 buf[len] = *p; 2113 len++; 2114 p++; 2115 } 2116 } else { 2117 p = buf; 2118 len = q_to_b (&tp->t_outq, p, (DMABUFSZ/2)); 2119 } 2120 if (len) { 2121 cx_send_packet (d->chan, buf, len, 0); 2122 tp->t_state |= TS_BUSY; 2123 d->atimeout = 10; 2124 CX_DEBUG2 (d, ("out %d bytes\n", len)); 2125 } 2126 } 2127 ttwwakeup (tp); 2128 CX_UNLOCK (bd); 2129 splx (s); 2130} 2131 2132static int cx_param (struct tty *tp, struct termios *t) 2133{ 2134 drv_t *d; 2135 bdrv_t *bd; 2136 int s, bits, parity; 2137 2138 d = tp->t_sc; 2139 bd = d->board->sys; 2140 2141 s = splhigh (); 2142 CX_LOCK (bd); 2143 if (t->c_ospeed == 0) { 2144 /* Clear DTR and RTS. */ 2145 cx_set_dtr (d->chan, 0); 2146 CX_UNLOCK (bd); 2147 splx (s); 2148 CX_DEBUG2 (d, ("cx_param (hangup)\n")); 2149 return 0; 2150 } 2151 CX_DEBUG2 (d, ("cx_param\n")); 2152 2153 /* Check requested parameters. */ 2154 if (t->c_ospeed < 300 || t->c_ospeed > 256*1024) { 2155 CX_UNLOCK (bd); 2156 splx (s); 2157 return EINVAL; 2158 } 2159 if (t->c_ispeed && (t->c_ispeed < 300 || t->c_ispeed > 256*1024)) { 2160 CX_UNLOCK (bd); 2161 splx (s); 2162 return EINVAL; 2163 } 2164 2165 /* And copy them to tty and channel structures. */ 2166 tp->t_ispeed = t->c_ispeed = tp->t_ospeed = t->c_ospeed; 2167 tp->t_cflag = t->c_cflag; 2168 2169 /* Set character length and parity mode. */ 2170 switch (t->c_cflag & CSIZE) { 2171 default: 2172 case CS8: bits = 8; break; 2173 case CS7: bits = 7; break; 2174 case CS6: bits = 6; break; 2175 case CS5: bits = 5; break; 2176 } 2177 2178 parity = ((t->c_cflag & PARENB) ? 1 : 0) * 2179 (1 + ((t->c_cflag & PARODD) ? 0 : 1)); 2180 2181 /* Set current channel number. */ 2182 if (! d->chan->dtr) 2183 cx_set_dtr (d->chan, 1); 2184 2185 ttyldoptim (tp); 2186 cx_set_async_param (d->chan, t->c_ospeed, bits, parity, (t->c_cflag & CSTOPB), 2187 !(t->c_cflag & PARENB), (t->c_cflag & CRTSCTS), 2188 (t->c_iflag & IXON), (t->c_iflag & IXANY), 2189 t->c_cc[VSTART], t->c_cc[VSTOP]); 2190 CX_UNLOCK (bd); 2191 splx (s); 2192 return 0; 2193} 2194 2195/* 2196 * Stop output on a line 2197 */ 2198static void cx_stop (struct tty *tp, int flag) 2199{ 2200 drv_t *d; 2201 bdrv_t *bd; 2202 int s; 2203 2204 d = tp->t_sc; 2205 bd = d->board->sys; 2206 2207 s = splhigh (); 2208 CX_LOCK (bd); 2209 if (tp->t_state & TS_BUSY) { 2210 /* Stop transmitter */ 2211 CX_DEBUG2 (d, ("cx_stop\n")); 2212 cx_transmitter_ctl (d->chan, 0); 2213 } 2214 CX_UNLOCK (bd); 2215 splx (s); 2216} 2217 2218/* 2219 * Process the (delayed) carrier signal setup. 2220 */ 2221static void cx_carrier (void *arg) 2222{ 2223 drv_t *d = arg; 2224 bdrv_t *bd = d->board->sys; 2225 cx_chan_t *c = d->chan; 2226 int s, cd; 2227 2228 s = splhigh (); 2229 CX_LOCK (bd); 2230 cd = cx_get_cd (c); 2231 if (d->cd != cd) { 2232 if (cd) { 2233 CX_DEBUG (d, ("carrier on\n")); 2234 d->cd = 1; 2235 CX_UNLOCK (bd); 2236 splx (s); 2237 if (d->tty) 2238 ttyld_modem(d->tty, 1); 2239 } else { 2240 CX_DEBUG (d, ("carrier loss\n")); 2241 d->cd = 0; 2242 CX_UNLOCK (bd); 2243 splx (s); 2244 if (d->tty) 2245 ttyld_modem(d->tty, 0); 2246 } 2247 } else { 2248 CX_UNLOCK (bd); 2249 splx (s); 2250 } 2251} 2252 2253/* 2254 * Modem signal callback function. 2255 */ 2256static void cx_modem (cx_chan_t *c) 2257{ 2258 drv_t *d = c->sys; 2259 2260 if (!d || c->mode != M_ASYNC) 2261 return; 2262 /* Handle carrier detect/loss. */ 2263 /* Carrier changed - delay processing DCD for a while 2264 * to give both sides some time to initialize. */ 2265 callout_reset (&d->dcd_timeout_handle, hz/2, cx_carrier, d); 2266} 2267 2268#ifdef NETGRAPH 2269static int ng_cx_constructor (node_p node) 2270{ 2271 drv_t *d = NG_NODE_PRIVATE (node); 2272 CX_DEBUG (d, ("Constructor\n")); 2273 return EINVAL; 2274} 2275 2276static int ng_cx_newhook (node_p node, hook_p hook, const char *name) 2277{ 2278 int s; 2279 drv_t *d = NG_NODE_PRIVATE (node); 2280 bdrv_t *bd = d->board->sys; 2281 2282 if (d->chan->mode == M_ASYNC) 2283 return EINVAL; 2284 2285 /* Attach debug hook */ 2286 if (strcmp (name, NG_CX_HOOK_DEBUG) == 0) { 2287 NG_HOOK_SET_PRIVATE (hook, NULL); 2288 d->debug_hook = hook; 2289 return 0; 2290 } 2291 2292 /* Check for raw hook */ 2293 if (strcmp (name, NG_CX_HOOK_RAW) != 0) 2294 return EINVAL; 2295 2296 NG_HOOK_SET_PRIVATE (hook, d); 2297 d->hook = hook; 2298 s = splhigh (); 2299 CX_LOCK (bd); 2300 cx_up (d); 2301 CX_UNLOCK (bd); 2302 splx (s); 2303 return 0; 2304} 2305 2306static int print_modems (char *s, cx_chan_t *c, int need_header) 2307{ 2308 int status = cx_modem_status (c->sys); 2309 int length = 0; 2310 2311 if (need_header) 2312 length += sprintf (s + length, " LE DTR DSR RTS CTS CD\n"); 2313 length += sprintf (s + length, "%4s %4s %4s %4s %4s %4s\n", 2314 status & TIOCM_LE ? "On" : "-", 2315 status & TIOCM_DTR ? "On" : "-", 2316 status & TIOCM_DSR ? "On" : "-", 2317 status & TIOCM_RTS ? "On" : "-", 2318 status & TIOCM_CTS ? "On" : "-", 2319 status & TIOCM_CD ? "On" : "-"); 2320 return length; 2321} 2322 2323static int print_stats (char *s, cx_chan_t *c, int need_header) 2324{ 2325 int length = 0; 2326 2327 if (need_header) 2328 length += sprintf (s + length, " Rintr Tintr Mintr Ibytes Ipkts Ierrs Obytes Opkts Oerrs\n"); 2329 length += sprintf (s + length, "%7ld %7ld %7ld %8ld %7ld %7ld %8ld %7ld %7ld\n", 2330 c->rintr, c->tintr, c->mintr, c->ibytes, c->ipkts, 2331 c->ierrs, c->obytes, c->opkts, c->oerrs); 2332 return length; 2333} 2334 2335static int print_chan (char *s, cx_chan_t *c) 2336{ 2337 drv_t *d = c->sys; 2338 int length = 0; 2339 2340 length += sprintf (s + length, "cx%d", c->board->num * NCHAN + c->num); 2341 if (d->chan->debug) 2342 length += sprintf (s + length, " debug=%d", d->chan->debug); 2343 2344 if (cx_get_baud (c)) 2345 length += sprintf (s + length, " %ld", cx_get_baud (c)); 2346 else 2347 length += sprintf (s + length, " extclock"); 2348 2349 if (c->mode == M_HDLC) { 2350 length += sprintf (s + length, " dpll=%s", cx_get_dpll (c) ? "on" : "off"); 2351 length += sprintf (s + length, " nrzi=%s", cx_get_nrzi (c) ? "on" : "off"); 2352 } 2353 2354 length += sprintf (s + length, " loop=%s", cx_get_loop (c) ? "on\n" : "off\n"); 2355 return length; 2356} 2357 2358static int ng_cx_rcvmsg (node_p node, item_p item, hook_p lasthook) 2359{ 2360 drv_t *d = NG_NODE_PRIVATE (node); 2361 struct ng_mesg *msg; 2362 struct ng_mesg *resp = NULL; 2363 int error = 0; 2364 2365 if (!d) 2366 return EINVAL; 2367 2368 CX_DEBUG (d, ("Rcvmsg\n")); 2369 NGI_GET_MSG (item, msg); 2370 switch (msg->header.typecookie) { 2371 default: 2372 error = EINVAL; 2373 break; 2374 2375 case NGM_CX_COOKIE: 2376 printf ("Don't forget to implement\n"); 2377 error = EINVAL; 2378 break; 2379 2380 case NGM_GENERIC_COOKIE: 2381 switch (msg->header.cmd) { 2382 default: 2383 error = EINVAL; 2384 break; 2385 2386 case NGM_TEXT_STATUS: { 2387 char *s; 2388 int l = 0; 2389 int dl = sizeof (struct ng_mesg) + 730; 2390 2391 NG_MKRESPONSE (resp, msg, dl, M_NOWAIT); 2392 if (! resp) { 2393 error = ENOMEM; 2394 break; 2395 } 2396 bzero (resp, dl); 2397 s = (resp)->data; 2398 l += print_chan (s + l, d->chan); 2399 l += print_stats (s + l, d->chan, 1); 2400 l += print_modems (s + l, d->chan, 1); 2401 strncpy ((resp)->header.cmdstr, "status", NG_CMDSTRSIZ); 2402 } 2403 break; 2404 } 2405 break; 2406 } 2407 NG_RESPOND_MSG (error, node, item, resp); 2408 NG_FREE_MSG (msg); 2409 return error; 2410} 2411 2412static int ng_cx_rcvdata (hook_p hook, item_p item) 2413{ 2414 drv_t *d = NG_NODE_PRIVATE (NG_HOOK_NODE(hook)); 2415 struct mbuf *m; 2416 struct ng_tag_prio *ptag; 2417 bdrv_t *bd; 2418 struct ifqueue *q; 2419 int s; 2420 2421 NGI_GET_M (item, m); 2422 NG_FREE_ITEM (item); 2423 if (! NG_HOOK_PRIVATE (hook) || ! d) { 2424 NG_FREE_M (m); 2425 return ENETDOWN; 2426 } 2427 2428 bd = d->board->sys; 2429 /* Check for high priority data */ 2430 if ((ptag = (struct ng_tag_prio *)m_tag_locate(m, NGM_GENERIC_COOKIE, 2431 NG_TAG_PRIO, NULL)) != NULL && (ptag->priority > NG_PRIO_CUTOFF) ) 2432 q = &d->hi_queue; 2433 else 2434 q = &d->lo_queue; 2435 2436 s = splhigh (); 2437 CX_LOCK (bd); 2438 IF_LOCK (q); 2439 if (_IF_QFULL (q)) { 2440 _IF_DROP (q); 2441 IF_UNLOCK (q); 2442 CX_UNLOCK (bd); 2443 splx (s); 2444 NG_FREE_M (m); 2445 return ENOBUFS; 2446 } 2447 _IF_ENQUEUE (q, m); 2448 IF_UNLOCK (q); 2449 cx_start (d); 2450 CX_UNLOCK (bd); 2451 splx (s); 2452 return 0; 2453} 2454 2455static int ng_cx_rmnode (node_p node) 2456{ 2457 drv_t *d = NG_NODE_PRIVATE (node); 2458 bdrv_t *bd; 2459 2460 CX_DEBUG (d, ("Rmnode\n")); 2461 if (d && d->running) { 2462 int s = splhigh (); 2463 bd = d->board->sys; 2464 CX_LOCK (bd); 2465 cx_down (d); 2466 CX_UNLOCK (bd); 2467 splx (s); 2468 } 2469#ifdef KLD_MODULE 2470 if (node->nd_flags & NGF_REALLY_DIE) { 2471 NG_NODE_SET_PRIVATE (node, NULL); 2472 NG_NODE_UNREF (node); 2473 } 2474 NG_NODE_REVIVE(node); /* Persistant node */ 2475#endif 2476 return 0; 2477} 2478 2479static int ng_cx_connect (hook_p hook) 2480{ 2481 drv_t *d = NG_NODE_PRIVATE (NG_HOOK_NODE (hook)); 2482 2483 callout_reset (&d->timeout_handle, hz, cx_watchdog_timer, d); 2484 return 0; 2485} 2486 2487static int ng_cx_disconnect (hook_p hook) 2488{ 2489 drv_t *d = NG_NODE_PRIVATE (NG_HOOK_NODE (hook)); 2490 bdrv_t *bd = d->board->sys; 2491 int s; 2492 2493 s = splhigh (); 2494 CX_LOCK (bd); 2495 if (NG_HOOK_PRIVATE (hook)) 2496 cx_down (d); 2497 CX_UNLOCK (bd); 2498 splx (s); 2499 /* If we were wait it than it reasserted now, just stop it. */ 2500 if (!callout_drain (&d->timeout_handle)) 2501 callout_stop (&d->timeout_handle); 2502 return 0; 2503} 2504#endif /*NETGRAPH*/ 2505 2506static int cx_modevent (module_t mod, int type, void *unused) 2507{ 2508 static int load_count = 0; 2509 2510 switch (type) { 2511 case MOD_LOAD: 2512#ifdef NETGRAPH 2513 if (ng_newtype (&typestruct)) 2514 printf ("Failed to register ng_cx\n"); 2515#endif 2516 ++load_count; 2517 2518 callout_init (&timeout_handle, CALLOUT_MPSAFE); 2519 callout_reset (&timeout_handle, hz*5, cx_timeout, 0); 2520 /* Software interrupt. */ 2521 swi_add(&tty_intr_event, "cx", cx_softintr, NULL, SWI_TTY, 2522 INTR_MPSAFE, &cx_fast_ih); 2523 break; 2524 case MOD_UNLOAD: 2525 if (load_count == 1) { 2526 printf ("Removing device entry for Sigma\n"); 2527#ifdef NETGRAPH 2528 ng_rmtype (&typestruct); 2529#endif 2530 } 2531 /* If we were wait it than it reasserted now, just stop it. */ 2532 if (!callout_drain (&timeout_handle)) 2533 callout_stop (&timeout_handle); 2534 swi_remove (cx_fast_ih); 2535 --load_count; 2536 break; 2537 case MOD_SHUTDOWN: 2538 break; 2539 } 2540 return 0; 2541} 2542 2543#ifdef NETGRAPH 2544static struct ng_type typestruct = { 2545 .version = NG_ABI_VERSION, 2546 .name = NG_CX_NODE_TYPE, 2547 .constructor = ng_cx_constructor, 2548 .rcvmsg = ng_cx_rcvmsg, 2549 .shutdown = ng_cx_rmnode, 2550 .newhook = ng_cx_newhook, 2551 .connect = ng_cx_connect, 2552 .rcvdata = ng_cx_rcvdata, 2553 .disconnect = ng_cx_disconnect, 2554}; 2555#endif /*NETGRAPH*/ 2556 2557#ifdef NETGRAPH 2558MODULE_DEPEND (ng_cx, netgraph, NG_ABI_VERSION, NG_ABI_VERSION, NG_ABI_VERSION); 2559#else 2560MODULE_DEPEND (isa_cx, sppp, 1, 1, 1); 2561#endif 2562DRIVER_MODULE (cx, isa, cx_isa_driver, cx_devclass, cx_modevent, NULL); 2563MODULE_VERSION (cx, 1); 2564