146f3ff79SMike Smith /*- 246f3ff79SMike Smith * Copyright (c) 1997 Poul-Henning Kamp 346f3ff79SMike Smith * All rights reserved. 446f3ff79SMike Smith * 546f3ff79SMike Smith * Redistribution and use in source and binary forms, with or without 646f3ff79SMike Smith * modification, are permitted provided that the following conditions 746f3ff79SMike Smith * are met: 846f3ff79SMike Smith * 1. Redistributions of source code must retain the above copyright 946f3ff79SMike Smith * notice, this list of conditions and the following disclaimer. 1046f3ff79SMike Smith * 2. Redistributions in binary form must reproduce the above copyright 1146f3ff79SMike Smith * notice, this list of conditions and the following disclaimer in the 1246f3ff79SMike Smith * documentation and/or other materials provided with the distribution. 1346f3ff79SMike Smith * 1446f3ff79SMike Smith * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 1546f3ff79SMike Smith * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 1646f3ff79SMike Smith * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 1746f3ff79SMike Smith * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 1846f3ff79SMike Smith * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 1946f3ff79SMike Smith * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 2046f3ff79SMike Smith * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 2146f3ff79SMike Smith * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 2246f3ff79SMike Smith * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 2346f3ff79SMike Smith * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 2446f3ff79SMike Smith * SUCH DAMAGE. 2546f3ff79SMike Smith * 2646f3ff79SMike Smith * From Id: lpt.c,v 1.55.2.1 1996/11/12 09:08:38 phk Exp 2746f3ff79SMike Smith */ 2846f3ff79SMike Smith 29aad970f1SDavid E. O'Brien #include <sys/cdefs.h> 30aad970f1SDavid E. O'Brien __FBSDID("$FreeBSD$"); 31aad970f1SDavid E. O'Brien 3246f3ff79SMike Smith /* 3346f3ff79SMike Smith * Parallel port TCP/IP interfaces added. I looked at the driver from 3446f3ff79SMike Smith * MACH but this is a complete rewrite, and btw. incompatible, and it 3546f3ff79SMike Smith * should perform better too. I have never run the MACH driver though. 3646f3ff79SMike Smith * 3746f3ff79SMike Smith * This driver sends two bytes (0x08, 0x00) in front of each packet, 3846f3ff79SMike Smith * to allow us to distinguish another format later. 3946f3ff79SMike Smith * 40d64ada50SJens Schweikhardt * Now added a Linux/Crynwr compatibility mode which is enabled using 4146f3ff79SMike Smith * IF_LINK0 - Tim Wilkinson. 4246f3ff79SMike Smith * 4346f3ff79SMike Smith * TODO: 4446f3ff79SMike Smith * Make HDLC/PPP mode, use IF_LLC1 to enable. 4546f3ff79SMike Smith * 4646f3ff79SMike Smith * Connect the two computers using a Laplink parallel cable to use this 4746f3ff79SMike Smith * feature: 4846f3ff79SMike Smith * 4946f3ff79SMike Smith * +----------------------------------------+ 5046f3ff79SMike Smith * |A-name A-End B-End Descr. Port/Bit | 5146f3ff79SMike Smith * +----------------------------------------+ 5246f3ff79SMike Smith * |DATA0 2 15 Data 0/0x01 | 5346f3ff79SMike Smith * |-ERROR 15 2 1/0x08 | 5446f3ff79SMike Smith * +----------------------------------------+ 5546f3ff79SMike Smith * |DATA1 3 13 Data 0/0x02 | 5646f3ff79SMike Smith * |+SLCT 13 3 1/0x10 | 5746f3ff79SMike Smith * +----------------------------------------+ 5846f3ff79SMike Smith * |DATA2 4 12 Data 0/0x04 | 5946f3ff79SMike Smith * |+PE 12 4 1/0x20 | 6046f3ff79SMike Smith * +----------------------------------------+ 6146f3ff79SMike Smith * |DATA3 5 10 Strobe 0/0x08 | 6246f3ff79SMike Smith * |-ACK 10 5 1/0x40 | 6346f3ff79SMike Smith * +----------------------------------------+ 6446f3ff79SMike Smith * |DATA4 6 11 Data 0/0x10 | 6546f3ff79SMike Smith * |BUSY 11 6 1/~0x80 | 6646f3ff79SMike Smith * +----------------------------------------+ 6746f3ff79SMike Smith * |GND 18-25 18-25 GND - | 6846f3ff79SMike Smith * +----------------------------------------+ 6946f3ff79SMike Smith * 7046f3ff79SMike Smith * Expect transfer-rates up to 75 kbyte/sec. 7146f3ff79SMike Smith * 7246f3ff79SMike Smith * If GCC could correctly grok 7346f3ff79SMike Smith * register int port asm("edx") 7446f3ff79SMike Smith * the code would be cleaner 7546f3ff79SMike Smith * 7646f3ff79SMike Smith * Poul-Henning Kamp <phk@freebsd.org> 7746f3ff79SMike Smith */ 7846f3ff79SMike Smith 7946f3ff79SMike Smith /* 8046f3ff79SMike Smith * Update for ppbus, PLIP support only - Nicolas Souchu 8146f3ff79SMike Smith */ 820f210c92SNicolas Souchu 830f210c92SNicolas Souchu #include "opt_plip.h" 8446f3ff79SMike Smith 8546f3ff79SMike Smith #include <sys/param.h> 8646f3ff79SMike Smith #include <sys/systm.h> 870f210c92SNicolas Souchu #include <sys/module.h> 880f210c92SNicolas Souchu #include <sys/bus.h> 8946f3ff79SMike Smith #include <sys/mbuf.h> 9046f3ff79SMike Smith #include <sys/socket.h> 9146f3ff79SMike Smith #include <sys/sockio.h> 9246f3ff79SMike Smith #include <sys/kernel.h> 9346f3ff79SMike Smith #include <sys/malloc.h> 9446f3ff79SMike Smith 950f210c92SNicolas Souchu #include <machine/bus.h> 960f210c92SNicolas Souchu #include <machine/resource.h> 970f210c92SNicolas Souchu #include <sys/rman.h> 980f210c92SNicolas Souchu 9946f3ff79SMike Smith #include <net/if.h> 10046f3ff79SMike Smith #include <net/if_types.h> 10146f3ff79SMike Smith #include <net/netisr.h> 10246f3ff79SMike Smith 10346f3ff79SMike Smith #include <netinet/in.h> 10446f3ff79SMike Smith #include <netinet/in_var.h> 10546f3ff79SMike Smith 10646f3ff79SMike Smith #include <net/bpf.h> 10746f3ff79SMike Smith 10846f3ff79SMike Smith #include <dev/ppbus/ppbconf.h> 1090f210c92SNicolas Souchu #include "ppbus_if.h" 1100f210c92SNicolas Souchu #include <dev/ppbus/ppbio.h> 1117b7bf77eSNicolas Souchu 11246f3ff79SMike Smith #ifndef LPMTU /* MTU for the lp# interfaces */ 11346f3ff79SMike Smith #define LPMTU 1500 11446f3ff79SMike Smith #endif 11546f3ff79SMike Smith 11646f3ff79SMike Smith #ifndef LPMAXSPIN1 /* DELAY factor for the lp# interfaces */ 11746f3ff79SMike Smith #define LPMAXSPIN1 8000 /* Spinning for remote intr to happen */ 11846f3ff79SMike Smith #endif 11946f3ff79SMike Smith 12046f3ff79SMike Smith #ifndef LPMAXSPIN2 /* DELAY factor for the lp# interfaces */ 12146f3ff79SMike Smith #define LPMAXSPIN2 500 /* Spinning for remote handshake to happen */ 12246f3ff79SMike Smith #endif 12346f3ff79SMike Smith 12446f3ff79SMike Smith #ifndef LPMAXERRS /* Max errors before !RUNNING */ 12546f3ff79SMike Smith #define LPMAXERRS 100 12646f3ff79SMike Smith #endif 12746f3ff79SMike Smith 12846f3ff79SMike Smith #define CLPIPHDRLEN 14 /* We send dummy ethernet addresses (two) + packet type in front of packet */ 12946f3ff79SMike Smith #define CLPIP_SHAKE 0x80 /* This bit toggles between nibble reception */ 13046f3ff79SMike Smith #define MLPIPHDRLEN CLPIPHDRLEN 13146f3ff79SMike Smith 13246f3ff79SMike Smith #define LPIPHDRLEN 2 /* We send 0x08, 0x00 in front of packet */ 13346f3ff79SMike Smith #define LPIP_SHAKE 0x40 /* This bit toggles between nibble reception */ 13446f3ff79SMike Smith #if !defined(MLPIPHDRLEN) || LPIPHDRLEN > MLPIPHDRLEN 13546f3ff79SMike Smith #define MLPIPHDRLEN LPIPHDRLEN 13646f3ff79SMike Smith #endif 13746f3ff79SMike Smith 13846f3ff79SMike Smith #define LPIPTBLSIZE 256 /* Size of octet translation table */ 13946f3ff79SMike Smith 14046f3ff79SMike Smith #define lprintf if (lptflag) printf 14120240fa3SNicolas Souchu 14220240fa3SNicolas Souchu #ifdef PLIP_DEBUG 14346f3ff79SMike Smith static int volatile lptflag = 1; 14420240fa3SNicolas Souchu #else 14520240fa3SNicolas Souchu static int volatile lptflag = 0; 14646f3ff79SMike Smith #endif 14746f3ff79SMike Smith 1480f210c92SNicolas Souchu struct lp_data { 14946f3ff79SMike Smith struct ifnet sc_if; 15046f3ff79SMike Smith u_char *sc_ifbuf; 15146f3ff79SMike Smith int sc_iferrs; 1520f210c92SNicolas Souchu 1530f210c92SNicolas Souchu struct resource *res_irq; 15446f3ff79SMike Smith }; 15546f3ff79SMike Smith 15646f3ff79SMike Smith /* Tables for the lp# interface */ 15746f3ff79SMike Smith static u_char *txmith; 15846f3ff79SMike Smith #define txmitl (txmith+(1*LPIPTBLSIZE)) 15946f3ff79SMike Smith #define trecvh (txmith+(2*LPIPTBLSIZE)) 16046f3ff79SMike Smith #define trecvl (txmith+(3*LPIPTBLSIZE)) 16146f3ff79SMike Smith 16246f3ff79SMike Smith static u_char *ctxmith; 16346f3ff79SMike Smith #define ctxmitl (ctxmith+(1*LPIPTBLSIZE)) 16446f3ff79SMike Smith #define ctrecvh (ctxmith+(2*LPIPTBLSIZE)) 16546f3ff79SMike Smith #define ctrecvl (ctxmith+(3*LPIPTBLSIZE)) 16646f3ff79SMike Smith 16746f3ff79SMike Smith /* Functions for the lp# interface */ 16846f3ff79SMike Smith static int lpinittables(void); 16946f3ff79SMike Smith static int lpioctl(struct ifnet *, u_long, caddr_t); 17046f3ff79SMike Smith static int lpoutput(struct ifnet *, struct mbuf *, struct sockaddr *, 17146f3ff79SMike Smith struct rtentry *); 1720f210c92SNicolas Souchu static void lp_intr(void *); 17346f3ff79SMike Smith 1740f210c92SNicolas Souchu #define DEVTOSOFTC(dev) \ 1750f210c92SNicolas Souchu ((struct lp_data *)device_get_softc(dev)) 1760f210c92SNicolas Souchu #define UNITOSOFTC(unit) \ 1770f210c92SNicolas Souchu ((struct lp_data *)devclass_get_softc(lp_devclass, (unit))) 1780f210c92SNicolas Souchu #define UNITODEVICE(unit) \ 1790f210c92SNicolas Souchu (devclass_get_device(lp_devclass, (unit))) 18046f3ff79SMike Smith 1810f210c92SNicolas Souchu static devclass_t lp_devclass; 1820f210c92SNicolas Souchu 1830f063508SPeter Wemm static void 1840f063508SPeter Wemm lp_identify(driver_t *driver, device_t parent) 1850f063508SPeter Wemm { 1860f210c92SNicolas Souchu 187338cad62SBernd Walter BUS_ADD_CHILD(parent, 0, "plip", -1); 1880f063508SPeter Wemm } 18946f3ff79SMike Smith /* 19046f3ff79SMike Smith * lpprobe() 19146f3ff79SMike Smith */ 1920f210c92SNicolas Souchu static int 1930f210c92SNicolas Souchu lp_probe(device_t dev) 19446f3ff79SMike Smith { 1950f210c92SNicolas Souchu device_t ppbus = device_get_parent(dev); 1960f210c92SNicolas Souchu struct lp_data *lp; 197150630c4SDoug Rabson int zero = 0; 19884a5b015SPeter Wemm uintptr_t irq; 1990f210c92SNicolas Souchu 2000f210c92SNicolas Souchu lp = DEVTOSOFTC(dev); 2010f210c92SNicolas Souchu bzero(lp, sizeof(struct lp_data)); 2020f210c92SNicolas Souchu 2030f210c92SNicolas Souchu /* retrieve the ppbus irq */ 2040f210c92SNicolas Souchu BUS_READ_IVAR(ppbus, dev, PPBUS_IVAR_IRQ, &irq); 20546f3ff79SMike Smith 20646f3ff79SMike Smith /* if we haven't interrupts, the probe fails */ 2070f210c92SNicolas Souchu if (irq == -1) { 2080f210c92SNicolas Souchu device_printf(dev, "not an interrupt driven port, failed.\n"); 2090f210c92SNicolas Souchu return (ENXIO); 210fdf94d1aSNicolas Souchu } 21146f3ff79SMike Smith 2120f210c92SNicolas Souchu /* reserve the interrupt resource, expecting irq is available to continue */ 2130f210c92SNicolas Souchu lp->res_irq = bus_alloc_resource(dev, SYS_RES_IRQ, &zero, irq, irq, 1, 2140f210c92SNicolas Souchu RF_SHAREABLE); 2150f210c92SNicolas Souchu if (lp->res_irq == 0) { 2160f210c92SNicolas Souchu device_printf(dev, "cannot reserve interrupt, failed.\n"); 2170f210c92SNicolas Souchu return (ENXIO); 21846f3ff79SMike Smith } 21946f3ff79SMike Smith 22046f3ff79SMike Smith /* 22146f3ff79SMike Smith * lp dependent initialisation. 22246f3ff79SMike Smith */ 22346f3ff79SMike Smith 2240f210c92SNicolas Souchu device_set_desc(dev, "PLIP network interface"); 22546f3ff79SMike Smith 2260f210c92SNicolas Souchu return (0); 22746f3ff79SMike Smith } 22846f3ff79SMike Smith 22946f3ff79SMike Smith static int 2300f210c92SNicolas Souchu lp_attach (device_t dev) 23146f3ff79SMike Smith { 2320f210c92SNicolas Souchu struct lp_data *lp = DEVTOSOFTC(dev); 2330f210c92SNicolas Souchu struct ifnet *ifp = &lp->sc_if; 23446f3ff79SMike Smith 2350f210c92SNicolas Souchu ifp->if_softc = lp; 2369bf40edeSBrooks Davis if_initname(ifp, device_get_name(dev), device_get_unit(dev)); 23746f3ff79SMike Smith ifp->if_mtu = LPMTU; 23846f3ff79SMike Smith ifp->if_flags = IFF_SIMPLEX | IFF_POINTOPOINT | IFF_MULTICAST; 23946f3ff79SMike Smith ifp->if_ioctl = lpioctl; 24046f3ff79SMike Smith ifp->if_output = lpoutput; 24146f3ff79SMike Smith ifp->if_type = IFT_PARA; 24246f3ff79SMike Smith ifp->if_hdrlen = 0; 24346f3ff79SMike Smith ifp->if_addrlen = 0; 24446f3ff79SMike Smith ifp->if_snd.ifq_maxlen = IFQ_MAXLEN; 24546f3ff79SMike Smith if_attach(ifp); 24646f3ff79SMike Smith 2478f84257eSDag-Erling Smørgrav bpfattach(ifp, DLT_NULL, sizeof(u_int32_t)); 24846f3ff79SMike Smith 2490f210c92SNicolas Souchu return (0); 25046f3ff79SMike Smith } 25146f3ff79SMike Smith /* 25246f3ff79SMike Smith * Build the translation tables for the LPIP (BSD unix) protocol. 25346f3ff79SMike Smith * We don't want to calculate these nasties in our tight loop, so we 25446f3ff79SMike Smith * precalculate them when we initialize. 25546f3ff79SMike Smith */ 25646f3ff79SMike Smith static int 25746f3ff79SMike Smith lpinittables (void) 25846f3ff79SMike Smith { 25946f3ff79SMike Smith int i; 26046f3ff79SMike Smith 26146f3ff79SMike Smith if (!txmith) 26246f3ff79SMike Smith txmith = malloc(4*LPIPTBLSIZE, M_DEVBUF, M_NOWAIT); 26346f3ff79SMike Smith 26446f3ff79SMike Smith if (!txmith) 26546f3ff79SMike Smith return 1; 26646f3ff79SMike Smith 26746f3ff79SMike Smith if (!ctxmith) 26846f3ff79SMike Smith ctxmith = malloc(4*LPIPTBLSIZE, M_DEVBUF, M_NOWAIT); 26946f3ff79SMike Smith 27046f3ff79SMike Smith if (!ctxmith) 27146f3ff79SMike Smith return 1; 27246f3ff79SMike Smith 27346f3ff79SMike Smith for (i=0; i < LPIPTBLSIZE; i++) { 27446f3ff79SMike Smith ctxmith[i] = (i & 0xF0) >> 4; 27546f3ff79SMike Smith ctxmitl[i] = 0x10 | (i & 0x0F); 27646f3ff79SMike Smith ctrecvh[i] = (i & 0x78) << 1; 27746f3ff79SMike Smith ctrecvl[i] = (i & 0x78) >> 3; 27846f3ff79SMike Smith } 27946f3ff79SMike Smith 28046f3ff79SMike Smith for (i=0; i < LPIPTBLSIZE; i++) { 28146f3ff79SMike Smith txmith[i] = ((i & 0x80) >> 3) | ((i & 0x70) >> 4) | 0x08; 28246f3ff79SMike Smith txmitl[i] = ((i & 0x08) << 1) | (i & 0x07); 28346f3ff79SMike Smith trecvh[i] = ((~i) & 0x80) | ((i & 0x38) << 1); 28446f3ff79SMike Smith trecvl[i] = (((~i) & 0x80) >> 4) | ((i & 0x38) >> 3); 28546f3ff79SMike Smith } 28646f3ff79SMike Smith 28746f3ff79SMike Smith return 0; 28846f3ff79SMike Smith } 28946f3ff79SMike Smith 29046f3ff79SMike Smith /* 29146f3ff79SMike Smith * Process an ioctl request. 29246f3ff79SMike Smith */ 29346f3ff79SMike Smith 29446f3ff79SMike Smith static int 29546f3ff79SMike Smith lpioctl (struct ifnet *ifp, u_long cmd, caddr_t data) 29646f3ff79SMike Smith { 2979bf40edeSBrooks Davis device_t dev = UNITODEVICE(ifp->if_dunit); 2980f210c92SNicolas Souchu device_t ppbus = device_get_parent(dev); 2990f210c92SNicolas Souchu struct lp_data *sc = DEVTOSOFTC(dev); 30046f3ff79SMike Smith struct ifaddr *ifa = (struct ifaddr *)data; 30146f3ff79SMike Smith struct ifreq *ifr = (struct ifreq *)data; 30246f3ff79SMike Smith u_char *ptr; 3030f210c92SNicolas Souchu void *ih; 30446f3ff79SMike Smith int error; 30546f3ff79SMike Smith 30646f3ff79SMike Smith switch (cmd) { 30746f3ff79SMike Smith 30846f3ff79SMike Smith case SIOCSIFDSTADDR: 30946f3ff79SMike Smith case SIOCAIFADDR: 31046f3ff79SMike Smith case SIOCSIFADDR: 31146f3ff79SMike Smith if (ifa->ifa_addr->sa_family != AF_INET) 31246f3ff79SMike Smith return EAFNOSUPPORT; 31346f3ff79SMike Smith 31446f3ff79SMike Smith ifp->if_flags |= IFF_UP; 31546f3ff79SMike Smith /* FALLTHROUGH */ 31646f3ff79SMike Smith case SIOCSIFFLAGS: 31746f3ff79SMike Smith if ((!(ifp->if_flags & IFF_UP)) && (ifp->if_flags & IFF_RUNNING)) { 31846f3ff79SMike Smith 3190f210c92SNicolas Souchu ppb_wctr(ppbus, 0x00); 32046f3ff79SMike Smith ifp->if_flags &= ~IFF_RUNNING; 32146f3ff79SMike Smith 32246f3ff79SMike Smith /* IFF_UP is not set, try to release the bus anyway */ 3230f210c92SNicolas Souchu ppb_release_bus(ppbus, dev); 32446f3ff79SMike Smith break; 32546f3ff79SMike Smith } 32646f3ff79SMike Smith if (((ifp->if_flags & IFF_UP)) && (!(ifp->if_flags & IFF_RUNNING))) { 32746f3ff79SMike Smith 32824063475SNicolas Souchu /* XXX 32946f3ff79SMike Smith * Should the request be interruptible? 33046f3ff79SMike Smith */ 3310f210c92SNicolas Souchu if ((error = ppb_request_bus(ppbus, dev, PPB_WAIT|PPB_INTR))) 33246f3ff79SMike Smith return (error); 33346f3ff79SMike Smith 33424063475SNicolas Souchu /* Now IFF_UP means that we own the bus */ 33524063475SNicolas Souchu 3360f210c92SNicolas Souchu ppb_set_mode(ppbus, PPB_COMPATIBLE); 33724063475SNicolas Souchu 33846f3ff79SMike Smith if (lpinittables()) { 3390f210c92SNicolas Souchu ppb_release_bus(ppbus, dev); 34046f3ff79SMike Smith return ENOBUFS; 34146f3ff79SMike Smith } 34246f3ff79SMike Smith 34346f3ff79SMike Smith sc->sc_ifbuf = malloc(sc->sc_if.if_mtu + MLPIPHDRLEN, 344a163d034SWarner Losh M_DEVBUF, M_WAITOK); 34546f3ff79SMike Smith if (!sc->sc_ifbuf) { 3460f210c92SNicolas Souchu ppb_release_bus(ppbus, dev); 34746f3ff79SMike Smith return ENOBUFS; 34846f3ff79SMike Smith } 34946f3ff79SMike Smith 3500f210c92SNicolas Souchu /* attach our interrupt handler, later detached when the bus is released */ 3510f210c92SNicolas Souchu if ((error = BUS_SETUP_INTR(ppbus, dev, sc->res_irq, 3520f210c92SNicolas Souchu INTR_TYPE_NET, lp_intr, dev, &ih))) { 3530f210c92SNicolas Souchu ppb_release_bus(ppbus, dev); 3540f210c92SNicolas Souchu return (error); 3550f210c92SNicolas Souchu } 3560f210c92SNicolas Souchu 3570f210c92SNicolas Souchu ppb_wctr(ppbus, IRQENABLE); 35846f3ff79SMike Smith ifp->if_flags |= IFF_RUNNING; 35946f3ff79SMike Smith } 36046f3ff79SMike Smith break; 36146f3ff79SMike Smith 36246f3ff79SMike Smith case SIOCSIFMTU: 36346f3ff79SMike Smith ptr = sc->sc_ifbuf; 36446f3ff79SMike Smith sc->sc_ifbuf = malloc(ifr->ifr_mtu+MLPIPHDRLEN, M_DEVBUF, M_NOWAIT); 36546f3ff79SMike Smith if (!sc->sc_ifbuf) { 36646f3ff79SMike Smith sc->sc_ifbuf = ptr; 36746f3ff79SMike Smith return ENOBUFS; 36846f3ff79SMike Smith } 36946f3ff79SMike Smith if (ptr) 37046f3ff79SMike Smith free(ptr,M_DEVBUF); 37146f3ff79SMike Smith sc->sc_if.if_mtu = ifr->ifr_mtu; 37246f3ff79SMike Smith break; 37346f3ff79SMike Smith 37446f3ff79SMike Smith case SIOCGIFMTU: 37546f3ff79SMike Smith ifr->ifr_mtu = sc->sc_if.if_mtu; 37646f3ff79SMike Smith break; 37746f3ff79SMike Smith 37846f3ff79SMike Smith case SIOCADDMULTI: 37946f3ff79SMike Smith case SIOCDELMULTI: 38046f3ff79SMike Smith if (ifr == 0) { 38146f3ff79SMike Smith return EAFNOSUPPORT; /* XXX */ 38246f3ff79SMike Smith } 38346f3ff79SMike Smith switch (ifr->ifr_addr.sa_family) { 38446f3ff79SMike Smith 38546f3ff79SMike Smith case AF_INET: 38646f3ff79SMike Smith break; 38746f3ff79SMike Smith 38846f3ff79SMike Smith default: 38946f3ff79SMike Smith return EAFNOSUPPORT; 39046f3ff79SMike Smith } 39146f3ff79SMike Smith break; 39246f3ff79SMike Smith 39380015f13SMike Smith case SIOCGIFMEDIA: 39480015f13SMike Smith /* 39580015f13SMike Smith * No ifmedia support at this stage; maybe use it 39680015f13SMike Smith * in future for eg. protocol selection. 39780015f13SMike Smith */ 39880015f13SMike Smith return EINVAL; 39980015f13SMike Smith 40046f3ff79SMike Smith default: 401162886e2SBruce Evans lprintf("LP:ioctl(0x%lx)\n", cmd); 40246f3ff79SMike Smith return EINVAL; 40346f3ff79SMike Smith } 40446f3ff79SMike Smith return 0; 40546f3ff79SMike Smith } 40646f3ff79SMike Smith 40746f3ff79SMike Smith static __inline int 4080f210c92SNicolas Souchu clpoutbyte (u_char byte, int spin, device_t ppbus) 40946f3ff79SMike Smith { 4100f210c92SNicolas Souchu ppb_wdtr(ppbus, ctxmitl[byte]); 4110f210c92SNicolas Souchu while (ppb_rstr(ppbus) & CLPIP_SHAKE) 41246f3ff79SMike Smith if (--spin == 0) { 41346f3ff79SMike Smith return 1; 41446f3ff79SMike Smith } 4150f210c92SNicolas Souchu ppb_wdtr(ppbus, ctxmith[byte]); 4160f210c92SNicolas Souchu while (!(ppb_rstr(ppbus) & CLPIP_SHAKE)) 41746f3ff79SMike Smith if (--spin == 0) { 41846f3ff79SMike Smith return 1; 41946f3ff79SMike Smith } 42046f3ff79SMike Smith return 0; 42146f3ff79SMike Smith } 42246f3ff79SMike Smith 42346f3ff79SMike Smith static __inline int 4240f210c92SNicolas Souchu clpinbyte (int spin, device_t ppbus) 42546f3ff79SMike Smith { 42624063475SNicolas Souchu u_char c, cl; 42746f3ff79SMike Smith 4280f210c92SNicolas Souchu while((ppb_rstr(ppbus) & CLPIP_SHAKE)) 42946f3ff79SMike Smith if(!--spin) { 43046f3ff79SMike Smith return -1; 43146f3ff79SMike Smith } 4320f210c92SNicolas Souchu cl = ppb_rstr(ppbus); 4330f210c92SNicolas Souchu ppb_wdtr(ppbus, 0x10); 43446f3ff79SMike Smith 4350f210c92SNicolas Souchu while(!(ppb_rstr(ppbus) & CLPIP_SHAKE)) 43646f3ff79SMike Smith if(!--spin) { 43746f3ff79SMike Smith return -1; 43846f3ff79SMike Smith } 4390f210c92SNicolas Souchu c = ppb_rstr(ppbus); 4400f210c92SNicolas Souchu ppb_wdtr(ppbus, 0x00); 44146f3ff79SMike Smith 44246f3ff79SMike Smith return (ctrecvl[cl] | ctrecvh[c]); 44346f3ff79SMike Smith } 44446f3ff79SMike Smith 4458f84257eSDag-Erling Smørgrav static void 4468f84257eSDag-Erling Smørgrav lptap(struct ifnet *ifp, struct mbuf *m) 4478f84257eSDag-Erling Smørgrav { 4488f84257eSDag-Erling Smørgrav /* 4498f84257eSDag-Erling Smørgrav * Send a packet through bpf. We need to prepend the address family 4508f84257eSDag-Erling Smørgrav * as a four byte field. Cons up a dummy header to pacify bpf. This 4518f84257eSDag-Erling Smørgrav * is safe because bpf will only read from the mbuf (i.e., it won't 4528f84257eSDag-Erling Smørgrav * try to free it or keep a pointer to it). 4538f84257eSDag-Erling Smørgrav */ 4548f84257eSDag-Erling Smørgrav u_int32_t af = AF_INET; 4558f84257eSDag-Erling Smørgrav struct mbuf m0; 4568f84257eSDag-Erling Smørgrav 4578f84257eSDag-Erling Smørgrav m0.m_next = m; 4588f84257eSDag-Erling Smørgrav m0.m_len = sizeof(u_int32_t); 4598f84257eSDag-Erling Smørgrav m0.m_data = (char *)⁡ 460673d9191SSam Leffler BPF_MTAP(ifp, &m0); 4618f84257eSDag-Erling Smørgrav } 4628f84257eSDag-Erling Smørgrav 46346f3ff79SMike Smith static void 4640f210c92SNicolas Souchu lp_intr (void *arg) 46546f3ff79SMike Smith { 4660f210c92SNicolas Souchu device_t dev = (device_t)arg; 4670f210c92SNicolas Souchu device_t ppbus = device_get_parent(dev); 4680f210c92SNicolas Souchu struct lp_data *sc = DEVTOSOFTC(dev); 46946f3ff79SMike Smith int len, s, j; 47046f3ff79SMike Smith u_char *bp; 47146f3ff79SMike Smith u_char c, cl; 47246f3ff79SMike Smith struct mbuf *top; 47346f3ff79SMike Smith 47446f3ff79SMike Smith s = splhigh(); 47546f3ff79SMike Smith 47646f3ff79SMike Smith if (sc->sc_if.if_flags & IFF_LINK0) { 47746f3ff79SMike Smith 47846f3ff79SMike Smith /* Ack. the request */ 4790f210c92SNicolas Souchu ppb_wdtr(ppbus, 0x01); 48046f3ff79SMike Smith 48146f3ff79SMike Smith /* Get the packet length */ 4820f210c92SNicolas Souchu j = clpinbyte(LPMAXSPIN2, ppbus); 48346f3ff79SMike Smith if (j == -1) 48446f3ff79SMike Smith goto err; 48546f3ff79SMike Smith len = j; 4860f210c92SNicolas Souchu j = clpinbyte(LPMAXSPIN2, ppbus); 48746f3ff79SMike Smith if (j == -1) 48846f3ff79SMike Smith goto err; 48946f3ff79SMike Smith len = len + (j << 8); 49046f3ff79SMike Smith if (len > sc->sc_if.if_mtu + MLPIPHDRLEN) 49146f3ff79SMike Smith goto err; 49246f3ff79SMike Smith 49346f3ff79SMike Smith bp = sc->sc_ifbuf; 49446f3ff79SMike Smith 49546f3ff79SMike Smith while (len--) { 4960f210c92SNicolas Souchu j = clpinbyte(LPMAXSPIN2, ppbus); 49746f3ff79SMike Smith if (j == -1) { 49846f3ff79SMike Smith goto err; 49946f3ff79SMike Smith } 50046f3ff79SMike Smith *bp++ = j; 50146f3ff79SMike Smith } 50246f3ff79SMike Smith /* Get and ignore checksum */ 5030f210c92SNicolas Souchu j = clpinbyte(LPMAXSPIN2, ppbus); 50446f3ff79SMike Smith if (j == -1) { 50546f3ff79SMike Smith goto err; 50646f3ff79SMike Smith } 50746f3ff79SMike Smith 50846f3ff79SMike Smith len = bp - sc->sc_ifbuf; 50946f3ff79SMike Smith if (len <= CLPIPHDRLEN) 51046f3ff79SMike Smith goto err; 51146f3ff79SMike Smith 51246f3ff79SMike Smith sc->sc_iferrs = 0; 51346f3ff79SMike Smith 51446f3ff79SMike Smith len -= CLPIPHDRLEN; 51546f3ff79SMike Smith sc->sc_if.if_ipackets++; 51646f3ff79SMike Smith sc->sc_if.if_ibytes += len; 51746f3ff79SMike Smith top = m_devget(sc->sc_ifbuf + CLPIPHDRLEN, len, 0, &sc->sc_if, 0); 51846f3ff79SMike Smith if (top) { 5198f84257eSDag-Erling Smørgrav if (sc->sc_if.if_bpf) 5208f84257eSDag-Erling Smørgrav lptap(&sc->sc_if, top); 5211cafed39SJonathan Lemon netisr_queue(NETISR_IP, top); 522df5e1987SJonathan Lemon } 52346f3ff79SMike Smith goto done; 52446f3ff79SMike Smith } 5250f210c92SNicolas Souchu while ((ppb_rstr(ppbus) & LPIP_SHAKE)) { 52646f3ff79SMike Smith len = sc->sc_if.if_mtu + LPIPHDRLEN; 52746f3ff79SMike Smith bp = sc->sc_ifbuf; 52846f3ff79SMike Smith while (len--) { 52946f3ff79SMike Smith 5300f210c92SNicolas Souchu cl = ppb_rstr(ppbus); 5310f210c92SNicolas Souchu ppb_wdtr(ppbus, 8); 53246f3ff79SMike Smith 53346f3ff79SMike Smith j = LPMAXSPIN2; 5340f210c92SNicolas Souchu while((ppb_rstr(ppbus) & LPIP_SHAKE)) 53546f3ff79SMike Smith if(!--j) goto err; 53646f3ff79SMike Smith 5370f210c92SNicolas Souchu c = ppb_rstr(ppbus); 5380f210c92SNicolas Souchu ppb_wdtr(ppbus, 0); 53946f3ff79SMike Smith 54046f3ff79SMike Smith *bp++= trecvh[cl] | trecvl[c]; 54146f3ff79SMike Smith 54246f3ff79SMike Smith j = LPMAXSPIN2; 5430f210c92SNicolas Souchu while (!((cl=ppb_rstr(ppbus)) & LPIP_SHAKE)) { 54446f3ff79SMike Smith if (cl != c && 5450f210c92SNicolas Souchu (((cl = ppb_rstr(ppbus)) ^ 0xb8) & 0xf8) == 54646f3ff79SMike Smith (c & 0xf8)) 54746f3ff79SMike Smith goto end; 54846f3ff79SMike Smith if (!--j) goto err; 54946f3ff79SMike Smith } 55046f3ff79SMike Smith } 55146f3ff79SMike Smith 55246f3ff79SMike Smith end: 55346f3ff79SMike Smith len = bp - sc->sc_ifbuf; 55446f3ff79SMike Smith if (len <= LPIPHDRLEN) 55546f3ff79SMike Smith goto err; 55646f3ff79SMike Smith 55746f3ff79SMike Smith sc->sc_iferrs = 0; 55846f3ff79SMike Smith 55946f3ff79SMike Smith len -= LPIPHDRLEN; 56046f3ff79SMike Smith sc->sc_if.if_ipackets++; 56146f3ff79SMike Smith sc->sc_if.if_ibytes += len; 56246f3ff79SMike Smith top = m_devget(sc->sc_ifbuf + LPIPHDRLEN, len, 0, &sc->sc_if, 0); 56346f3ff79SMike Smith if (top) { 5648f84257eSDag-Erling Smørgrav if (sc->sc_if.if_bpf) 5658f84257eSDag-Erling Smørgrav lptap(&sc->sc_if, top); 5661cafed39SJonathan Lemon netisr_queue(NETISR_IP, top); 56746f3ff79SMike Smith } 568df5e1987SJonathan Lemon } 56946f3ff79SMike Smith goto done; 57046f3ff79SMike Smith 57146f3ff79SMike Smith err: 5720f210c92SNicolas Souchu ppb_wdtr(ppbus, 0); 57346f3ff79SMike Smith lprintf("R"); 57446f3ff79SMike Smith sc->sc_if.if_ierrors++; 57546f3ff79SMike Smith sc->sc_iferrs++; 57646f3ff79SMike Smith 57746f3ff79SMike Smith /* 57846f3ff79SMike Smith * We are not able to send receive anything for now, 57946f3ff79SMike Smith * so stop wasting our time 58046f3ff79SMike Smith */ 58146f3ff79SMike Smith if (sc->sc_iferrs > LPMAXERRS) { 5820f210c92SNicolas Souchu printf("lp%d: Too many errors, Going off-line.\n", device_get_unit(dev)); 5830f210c92SNicolas Souchu ppb_wctr(ppbus, 0x00); 58446f3ff79SMike Smith sc->sc_if.if_flags &= ~IFF_RUNNING; 58546f3ff79SMike Smith sc->sc_iferrs=0; 58646f3ff79SMike Smith } 58746f3ff79SMike Smith 58846f3ff79SMike Smith done: 58946f3ff79SMike Smith splx(s); 59046f3ff79SMike Smith return; 59146f3ff79SMike Smith } 59246f3ff79SMike Smith 59346f3ff79SMike Smith static __inline int 5940f210c92SNicolas Souchu lpoutbyte (u_char byte, int spin, device_t ppbus) 59546f3ff79SMike Smith { 5960f210c92SNicolas Souchu ppb_wdtr(ppbus, txmith[byte]); 5970f210c92SNicolas Souchu while (!(ppb_rstr(ppbus) & LPIP_SHAKE)) 59846f3ff79SMike Smith if (--spin == 0) 59946f3ff79SMike Smith return 1; 6000f210c92SNicolas Souchu ppb_wdtr(ppbus, txmitl[byte]); 6010f210c92SNicolas Souchu while (ppb_rstr(ppbus) & LPIP_SHAKE) 60246f3ff79SMike Smith if (--spin == 0) 60346f3ff79SMike Smith return 1; 60446f3ff79SMike Smith return 0; 60546f3ff79SMike Smith } 60646f3ff79SMike Smith 60746f3ff79SMike Smith static int 60846f3ff79SMike Smith lpoutput (struct ifnet *ifp, struct mbuf *m, 60946f3ff79SMike Smith struct sockaddr *dst, struct rtentry *rt) 61046f3ff79SMike Smith { 6119bf40edeSBrooks Davis device_t dev = UNITODEVICE(ifp->if_dunit); 6120f210c92SNicolas Souchu device_t ppbus = device_get_parent(dev); 61346f3ff79SMike Smith int s, err; 61446f3ff79SMike Smith struct mbuf *mm; 61546f3ff79SMike Smith u_char *cp = "\0\0"; 61646f3ff79SMike Smith u_char chksum = 0; 61746f3ff79SMike Smith int count = 0; 6188f84257eSDag-Erling Smørgrav int i, len, spin; 61946f3ff79SMike Smith 62046f3ff79SMike Smith /* We need a sensible value if we abort */ 62146f3ff79SMike Smith cp++; 62246f3ff79SMike Smith ifp->if_flags |= IFF_RUNNING; 62346f3ff79SMike Smith 62446f3ff79SMike Smith err = 1; /* assume we're aborting because of an error */ 62546f3ff79SMike Smith 62646f3ff79SMike Smith s = splhigh(); 62746f3ff79SMike Smith 62846f3ff79SMike Smith /* Suspend (on laptops) or receive-errors might have taken us offline */ 6290f210c92SNicolas Souchu ppb_wctr(ppbus, IRQENABLE); 63046f3ff79SMike Smith 63146f3ff79SMike Smith if (ifp->if_flags & IFF_LINK0) { 63246f3ff79SMike Smith 6330f210c92SNicolas Souchu if (!(ppb_rstr(ppbus) & CLPIP_SHAKE)) { 63446f3ff79SMike Smith lprintf("&"); 6350f210c92SNicolas Souchu lp_intr(dev); 63646f3ff79SMike Smith } 63746f3ff79SMike Smith 63846f3ff79SMike Smith /* Alert other end to pending packet */ 63946f3ff79SMike Smith spin = LPMAXSPIN1; 6400f210c92SNicolas Souchu ppb_wdtr(ppbus, 0x08); 6410f210c92SNicolas Souchu while ((ppb_rstr(ppbus) & 0x08) == 0) 64246f3ff79SMike Smith if (--spin == 0) { 64346f3ff79SMike Smith goto nend; 64446f3ff79SMike Smith } 64546f3ff79SMike Smith 64646f3ff79SMike Smith /* Calculate length of packet, then send that */ 64746f3ff79SMike Smith 64846f3ff79SMike Smith count += 14; /* Ethernet header len */ 64946f3ff79SMike Smith 65046f3ff79SMike Smith mm = m; 65146f3ff79SMike Smith for (mm = m; mm; mm = mm->m_next) { 65246f3ff79SMike Smith count += mm->m_len; 65346f3ff79SMike Smith } 6540f210c92SNicolas Souchu if (clpoutbyte(count & 0xFF, LPMAXSPIN1, ppbus)) 65546f3ff79SMike Smith goto nend; 6560f210c92SNicolas Souchu if (clpoutbyte((count >> 8) & 0xFF, LPMAXSPIN1, ppbus)) 65746f3ff79SMike Smith goto nend; 65846f3ff79SMike Smith 65946f3ff79SMike Smith /* Send dummy ethernet header */ 66046f3ff79SMike Smith for (i = 0; i < 12; i++) { 6610f210c92SNicolas Souchu if (clpoutbyte(i, LPMAXSPIN1, ppbus)) 66246f3ff79SMike Smith goto nend; 66346f3ff79SMike Smith chksum += i; 66446f3ff79SMike Smith } 66546f3ff79SMike Smith 6660f210c92SNicolas Souchu if (clpoutbyte(0x08, LPMAXSPIN1, ppbus)) 66746f3ff79SMike Smith goto nend; 6680f210c92SNicolas Souchu if (clpoutbyte(0x00, LPMAXSPIN1, ppbus)) 66946f3ff79SMike Smith goto nend; 67046f3ff79SMike Smith chksum += 0x08 + 0x00; /* Add into checksum */ 67146f3ff79SMike Smith 67246f3ff79SMike Smith mm = m; 67346f3ff79SMike Smith do { 67446f3ff79SMike Smith cp = mtod(mm, u_char *); 6758f84257eSDag-Erling Smørgrav len = mm->m_len; 6768f84257eSDag-Erling Smørgrav while (len--) { 67746f3ff79SMike Smith chksum += *cp; 6780f210c92SNicolas Souchu if (clpoutbyte(*cp++, LPMAXSPIN2, ppbus)) 67946f3ff79SMike Smith goto nend; 68046f3ff79SMike Smith } 68146f3ff79SMike Smith } while ((mm = mm->m_next)); 68246f3ff79SMike Smith 68346f3ff79SMike Smith /* Send checksum */ 6840f210c92SNicolas Souchu if (clpoutbyte(chksum, LPMAXSPIN2, ppbus)) 68546f3ff79SMike Smith goto nend; 68646f3ff79SMike Smith 68746f3ff79SMike Smith /* Go quiescent */ 6880f210c92SNicolas Souchu ppb_wdtr(ppbus, 0); 68946f3ff79SMike Smith 69046f3ff79SMike Smith err = 0; /* No errors */ 69146f3ff79SMike Smith 69246f3ff79SMike Smith nend: 69346f3ff79SMike Smith if (err) { /* if we didn't timeout... */ 69446f3ff79SMike Smith ifp->if_oerrors++; 69546f3ff79SMike Smith lprintf("X"); 69646f3ff79SMike Smith } else { 69746f3ff79SMike Smith ifp->if_opackets++; 69846f3ff79SMike Smith ifp->if_obytes += m->m_pkthdr.len; 6998f84257eSDag-Erling Smørgrav if (ifp->if_bpf) 7008f84257eSDag-Erling Smørgrav lptap(ifp, m); 70146f3ff79SMike Smith } 70246f3ff79SMike Smith 70346f3ff79SMike Smith m_freem(m); 70446f3ff79SMike Smith 7050f210c92SNicolas Souchu if (!(ppb_rstr(ppbus) & CLPIP_SHAKE)) { 70646f3ff79SMike Smith lprintf("^"); 7070f210c92SNicolas Souchu lp_intr(dev); 70846f3ff79SMike Smith } 70946f3ff79SMike Smith (void) splx(s); 71046f3ff79SMike Smith return 0; 71146f3ff79SMike Smith } 71246f3ff79SMike Smith 7130f210c92SNicolas Souchu if (ppb_rstr(ppbus) & LPIP_SHAKE) { 71446f3ff79SMike Smith lprintf("&"); 7150f210c92SNicolas Souchu lp_intr(dev); 71646f3ff79SMike Smith } 71746f3ff79SMike Smith 7180f210c92SNicolas Souchu if (lpoutbyte(0x08, LPMAXSPIN1, ppbus)) 71946f3ff79SMike Smith goto end; 7200f210c92SNicolas Souchu if (lpoutbyte(0x00, LPMAXSPIN2, ppbus)) 72146f3ff79SMike Smith goto end; 72246f3ff79SMike Smith 72346f3ff79SMike Smith mm = m; 72446f3ff79SMike Smith do { 72546f3ff79SMike Smith cp = mtod(mm,u_char *); 7268f84257eSDag-Erling Smørgrav len = mm->m_len; 7278f84257eSDag-Erling Smørgrav while (len--) 7280f210c92SNicolas Souchu if (lpoutbyte(*cp++, LPMAXSPIN2, ppbus)) 72946f3ff79SMike Smith goto end; 73046f3ff79SMike Smith } while ((mm = mm->m_next)); 73146f3ff79SMike Smith 73246f3ff79SMike Smith err = 0; /* no errors were encountered */ 73346f3ff79SMike Smith 73446f3ff79SMike Smith end: 73546f3ff79SMike Smith --cp; 7360f210c92SNicolas Souchu ppb_wdtr(ppbus, txmitl[*cp] ^ 0x17); 73746f3ff79SMike Smith 73846f3ff79SMike Smith if (err) { /* if we didn't timeout... */ 73946f3ff79SMike Smith ifp->if_oerrors++; 74046f3ff79SMike Smith lprintf("X"); 74146f3ff79SMike Smith } else { 74246f3ff79SMike Smith ifp->if_opackets++; 74346f3ff79SMike Smith ifp->if_obytes += m->m_pkthdr.len; 7448f84257eSDag-Erling Smørgrav if (ifp->if_bpf) 7458f84257eSDag-Erling Smørgrav lptap(ifp, m); 74646f3ff79SMike Smith } 74746f3ff79SMike Smith 74846f3ff79SMike Smith m_freem(m); 74946f3ff79SMike Smith 7500f210c92SNicolas Souchu if (ppb_rstr(ppbus) & LPIP_SHAKE) { 75146f3ff79SMike Smith lprintf("^"); 7520f210c92SNicolas Souchu lp_intr(dev); 75346f3ff79SMike Smith } 75446f3ff79SMike Smith 75546f3ff79SMike Smith (void) splx(s); 75646f3ff79SMike Smith return 0; 75746f3ff79SMike Smith } 7580f210c92SNicolas Souchu 7590f063508SPeter Wemm static device_method_t lp_methods[] = { 7600f063508SPeter Wemm /* device interface */ 7610f063508SPeter Wemm DEVMETHOD(device_identify, lp_identify), 7620f063508SPeter Wemm DEVMETHOD(device_probe, lp_probe), 7630f063508SPeter Wemm DEVMETHOD(device_attach, lp_attach), 7640f210c92SNicolas Souchu 7650f063508SPeter Wemm { 0, 0 } 7660f063508SPeter Wemm }; 7670f063508SPeter Wemm 7680f063508SPeter Wemm static driver_t lp_driver = { 7690f063508SPeter Wemm "plip", 7700f063508SPeter Wemm lp_methods, 7710f063508SPeter Wemm sizeof(struct lp_data), 7720f063508SPeter Wemm }; 7730f063508SPeter Wemm 7740f063508SPeter Wemm DRIVER_MODULE(plip, ppbus, lp_driver, lp_devclass, 0, 0); 775