xref: /csrg-svn/sys/vax/if/if_ix.c (revision 45801)
126197Ssklower /*
226197Ssklower  * Copyright (c) 1986 Regents of the University of California.
335324Sbostic  * All rights reserved.
426197Ssklower  *
535324Sbostic  * This code is derived from software contributed to Berkeley by
635324Sbostic  * Micom-Interlan Inc.
735324Sbostic  *
844561Sbostic  * %sccs.include.redist.c%
935324Sbostic  *
10*45801Sbostic  *	@(#)if_ix.c	7.8 (Berkeley) 12/16/90
1126197Ssklower  */
1226197Ssklower 
1326197Ssklower #include "np.h"
1426197Ssklower #if NNP > 0
1526197Ssklower 
1626197Ssklower /*
1726197Ssklower  * Interlan NP100 Ethernet Communications Controller interface
1826197Ssklower  */
19*45801Sbostic #include "../include/pte.h"
2026197Ssklower 
21*45801Sbostic #include "sys/param.h"
22*45801Sbostic #include "sys/systm.h"
23*45801Sbostic #include "sys/mbuf.h"
24*45801Sbostic #include "sys/buf.h"
25*45801Sbostic #include "sys/protosw.h"
26*45801Sbostic #include "sys/socket.h"
27*45801Sbostic #include "sys/vmmac.h"
28*45801Sbostic #include "sys/ioctl.h"
29*45801Sbostic #include "sys/errno.h"
3026197Ssklower 
31*45801Sbostic #include "net/if.h"
32*45801Sbostic #include "net/netisr.h"
33*45801Sbostic #include "net/route.h"
3426197Ssklower 
3526197Ssklower #ifdef INET
36*45801Sbostic #include "netinet/in.h"
37*45801Sbostic #include "netinet/in_systm.h"
38*45801Sbostic #include "netinet/in_var.h"
39*45801Sbostic #include "netinet/ip.h"
40*45801Sbostic #include "netinet/if_ether.h"
4126197Ssklower #endif
4226197Ssklower 
4326197Ssklower #ifdef NS
44*45801Sbostic #include "netns/ns.h"
45*45801Sbostic #include "netns/ns_if.h"
4626197Ssklower #endif
4726197Ssklower 
48*45801Sbostic #include "../include/cpu.h"
49*45801Sbostic #include "../include/mtpr.h"
50*45801Sbostic #include "../if/if_uba.h"
51*45801Sbostic #include "../uba/ubareg.h"
52*45801Sbostic #include "../uba/ubavar.h"
53*45801Sbostic #include "../uba/npreg.h"
54*45801Sbostic #include "../if/if_ix.h"
5526197Ssklower 
5626197Ssklower int	ixattach(), ixrint(), ixcint();
5726197Ssklower #define	ILUNIT(x)	minor(x)
5837475Ssklower int	ixinit(), ixioctl(), ixreset(), ixwatch(), ixstart();
5926197Ssklower int (*IxAttach)() = ixattach;
6026197Ssklower int (*IxReset)() = ixreset;
6126197Ssklower 
6226197Ssklower /*
6326197Ssklower  * Ethernet software status per interface.
6426197Ssklower  *
6526197Ssklower  * Each interface is referenced by a network interface structure,
6626197Ssklower  * ix_if, which the routing code uses to locate the interface.
6726197Ssklower  * This structure contains the output queue for the interface, its address, ...
6826197Ssklower  * We also have, for each interface, a UBA interface structure, which
6926197Ssklower  * contains information about the UNIBUS resources held by the interface:
7026197Ssklower  * map registers, buffered data paths, etc.  Information is cached in this
7126197Ssklower  * structure for use by the if_uba.c routines in running the interface
7226197Ssklower  * efficiently.
7326197Ssklower  */
7426197Ssklower struct	ix_softc {
7526197Ssklower 	struct	arpcom ix_ac;		/* Ethernet common part */
7626197Ssklower #define	ix_if	ix_ac.ac_if		/* network-visible interface */
7726197Ssklower #define	ix_addr	ix_ac.ac_enaddr		/* hardware Ethernet address */
7826197Ssklower 	int	ix_flags;
7926197Ssklower #define	IXF_OACTIVE	0x1		/* output is active */
8026197Ssklower #define	IXF_RCVPENDING	0x2		/* start rcv in ilcint */
8126197Ssklower #define	IXF_GOTUBA	0x4		/* unibus resources mapped */
8226197Ssklower #define	IXF_RUNNING	0x8		/* board is running */
8326197Ssklower #define	IXF_SETADDR	0x10		/* physical address is changed */
8426197Ssklower #define	IXF_STATPENDING	0x20		/* stat cmd pending */
8526197Ssklower #define	IXF_GOTCQE	0x40		/* np resources available */
8630864Skarels #define	IXF_OWATCH	0x80		/* is output hung? */
8730864Skarels #define	IXF_RWATCH	0x100		/* is input hung? */
8826197Ssklower 	struct	ifuba ix_ifuba;		/* unibus resources */
8926197Ssklower 	u_short	ix_aid;			/* Access Id returned by open DDL */
9026197Ssklower 	u_short ix_badcqe;
9126197Ssklower 	struct	npmaster *ix_mp;	/* Board physio request header */
9226197Ssklower 	struct	npreq *ix_rrp;		/* Cached npreq for recv */
9326197Ssklower 	struct	npreq *ix_wrp;		/* Cached npreq for xmit */
9426197Ssklower 	short	ix_scaninterval;	/* interval of stat collection */
9526197Ssklower #define	IXWATCHINTERVAL	60		/* once every 60 seconds */
9626197Ssklower 	union	ix_stats ix_stats;	/* holds on-board statistics */
9726197Ssklower 	int	ix_ubaddr;		/* mapping registers of ix_stats */
9826197Ssklower } ix_softc[NNP];
9926197Ssklower extern struct uba_device *npdinfo[];
10026197Ssklower 
10126197Ssklower /*
10226197Ssklower  * Interface exists: make available by filling in network interface
10326197Ssklower  * record.  System will initialize the interface when it is ready
10426197Ssklower  * to accept packets.  We can't even get the ethernet address
10526197Ssklower  * or other interesting data until the board has been downloaded.
10626197Ssklower  * running ifconfig will attempt to start unit.
10726197Ssklower  */
10826197Ssklower ixattach(ui)
10926197Ssklower 	struct uba_device *ui;
11026197Ssklower {
11126197Ssklower 	register struct ix_softc *ix = &ix_softc[ui->ui_unit];
11226197Ssklower 	register struct ifnet *ifp = &ix->ix_if;
11326197Ssklower 	extern struct npmaster npmasters[];
11426197Ssklower 
11526197Ssklower 	ifp->if_unit = ui->ui_unit;
11626197Ssklower 	ifp->if_name = "ix";
11726197Ssklower 	ifp->if_mtu = ETHERMTU;
11826197Ssklower 	ifp->if_flags = IFF_BROADCAST;
11926197Ssklower 
12026197Ssklower 	ifp->if_init = ixinit;
12137475Ssklower 	ifp->if_output = ether_output;
12237475Ssklower 	ifp->if_start = ixstart;
12326197Ssklower 	ifp->if_ioctl = ixioctl;
12426197Ssklower 	ifp->if_reset = ixreset;
12526197Ssklower 
12626197Ssklower 	ix->ix_mp = npmasters + ui->ui_unit;
12726197Ssklower 	ix->ix_ifuba.ifu_flags = UBA_CANTWAIT;
12826197Ssklower 
12926197Ssklower 	if_attach(ifp);
13026197Ssklower }
13126197Ssklower 
13226197Ssklower struct npreq *
ix_GetReq(mp,addr,len)13326197Ssklower ix_GetReq(mp, addr, len)
13426197Ssklower 	struct npmaster *mp;
13526197Ssklower 	caddr_t addr;
13626197Ssklower {
13726197Ssklower 	int unit = mp->unit;
13826197Ssklower 	register struct npreq *rp;
13926197Ssklower 	register struct CQE *ep;
14026197Ssklower 	struct ix_softc *ix = ix_softc + unit;
14126197Ssklower 	extern struct npreq *NpGetReq();
14226197Ssklower 
14326197Ssklower 	while ((rp = NpGetReq(mp->reqtab)) == NULL) {
14426197Ssklower 		mp->reqtab->flags |= WANTREQ;
14526197Ssklower 		sleep((caddr_t)(mp->reqtab), PZERO - 1);
14626197Ssklower 	}
14726197Ssklower 	rp->flags = KERNREQ;			/* Clear flags */
14826197Ssklower 
14926197Ssklower 	ep = rp->element;			/* Associated CQE */
15026197Ssklower 	ep->cqe_famid = (unsign32)ix;		/* Process ID */
15126197Ssklower 	ep->cqe_wind = 0;			/* Amount of buffer mapped */
15226197Ssklower 	ep->cqe_nbuf = 1;			/* Must be 1, no buffer chain */
15326197Ssklower 	ep->cqe_char = 1;			/* Driver owns this CQE */
15426197Ssklower 	ep->cqe_prot = NPDLA;			/* Data Link Access  protocol */
15526197Ssklower 	ep->cqe_bcnt = len;			/* Byte count */
15626197Ssklower 	rp->bufaddr = (caddr_t) (UBADDRMASK & (int) addr);/* mapped buffer */
15726197Ssklower 	ep->cqe_dma[0] = (unsign16)LOWORD(rp->bufaddr);
15826197Ssklower 	ep->cqe_dma[1] = (unsign16)HIWORD(rp->bufaddr);
15926197Ssklower 	return (rp);
16026197Ssklower }
16126197Ssklower 
16226197Ssklower ix_DoReq(mp, rp, cmd, addr, len, rpb, routine)
16326197Ssklower 	struct npmaster *mp;
16426197Ssklower 	register struct npreq *rp;
16526197Ssklower 	u_short cmd;
16626197Ssklower 	caddr_t addr;
16726197Ssklower 	int len;
16826197Ssklower 	register u_short *rpb;
16926197Ssklower 	int (*routine)();
17026197Ssklower {
17126197Ssklower 	register struct CQE *ep = rp->element;
17226197Ssklower 	register u_short *p = &ep->rpb1;
17326197Ssklower 	u_short cnt = *rpb++;
17426197Ssklower 	extern long NpDebug;
17526197Ssklower 	int pri;
17630864Skarels 	int result = 0;
17726197Ssklower 
17826197Ssklower 	ep->cqe_ust0 = ep->cqe_ust1 = NPCLEAR;	/* Clear status */
17926197Ssklower 	ep->cqe_bcnt = len;			/* Byte count */
18030864Skarels 	rp->flags = KERNREQ | REQALOC;			/* Clear flags */
18126197Ssklower 	rp->bufaddr = (caddr_t) (UBADDRMASK & (int) addr);/* mapped buffer */
18226197Ssklower 	rp->intr = routine;
18326197Ssklower 	rp->user = (caddr_t) (ep->cqe_func = cmd);/* In case pissed on in CQE */
18426197Ssklower 	ep->cqe_dma[0] = (unsign16)LOWORD(rp->bufaddr);
18526197Ssklower 	ep->cqe_dma[1] = (unsign16)HIWORD(rp->bufaddr);
18626197Ssklower 	ep->cqe_lenrpb = cnt + cnt;
18726197Ssklower 	for (; cnt > 0; cnt--) *p++ = *rpb++;
18826197Ssklower 
18926197Ssklower 	if (NpDebug & DEBCQE)
19026197Ssklower 		printf("Function is %x ep %x reqid %x\n", ep->cqe_func, ep, ep->cqe_reqid);
19126197Ssklower 	if (NpDebug & DEBCQE)
19226197Ssklower 		printf("irp len = %x rp = %x\n", ep->cqe_lenrpb, rp);
19326197Ssklower 	if (routine == 0) {
19426197Ssklower 		NpAddReq(mp->reqtab, rp);	/* Queue onto active list */
19526197Ssklower 		while (!(rp->flags & REQDONE)) {
19630914Skarels 			pri = spl5();
19726197Ssklower 			NpAddCQE(ep, &mp->shmemp->devcq, mp);
19826197Ssklower 			sleep((caddr_t)rp, PZERO - 1);
19926197Ssklower 			splx(pri);
20026197Ssklower 		}
20126197Ssklower 		if (rp->flags & IOABORT || ep->cqe_sts != NPDONE
20226197Ssklower 		    || ep->cqe_ust0 != NPDONE
20326197Ssklower 		    || ep->cqe_ust1 != NPOK) {
20426197Ssklower 			struct ix_softc *ix = (struct ix_softc *)ep->cqe_famid;
20530864Skarels 			printf("ix%d: Req failed, cmd %x, stat %x, flags %x, ",
20630864Skarels 				ix->ix_if.if_unit, rp->user,
20730864Skarels 				ep->cqe_sts, rp->flags);
20826197Ssklower 			printf("ust error %x,%x\n", ep->cqe_ust0, ep->cqe_ust1);
20930864Skarels 			result = 1;
21026197Ssklower 		}
21126197Ssklower 		NpRemReq(rp);			/* Clear request */
21226197Ssklower 	} else {
21330914Skarels 		pri = spl5();
21426197Ssklower 		NpAddCQE(ep, &mp->shmemp->devcq, mp);
21526197Ssklower 		splx(pri);
21626197Ssklower 	}
21730864Skarels 	return(result);
21826197Ssklower }
21926197Ssklower /*
22026197Ssklower  * Reset of interface after UNIBUS reset.
22126197Ssklower  * If interface is on specified uba, reset its state.
22226197Ssklower  */
ixreset(unit,uban,softp)22326197Ssklower ixreset(unit, uban, softp)
22426197Ssklower 	int unit, uban;
22526197Ssklower 	caddr_t softp;
22626197Ssklower {
22726197Ssklower 	register struct uba_device *ui;
22826197Ssklower 	int mask = IXF_SETADDR;		/* Only remember new physaddr */
22926197Ssklower 
23026197Ssklower 	if (unit >= NNP || (ui = npdinfo[unit]) == 0 || ui->ui_alive == 0 ||
23126197Ssklower 	    ui->ui_ubanum != uban)
23226197Ssklower 		return;
23326197Ssklower 	printf(" ix%d reset", unit);
23426197Ssklower 	if (softp)
23526197Ssklower 		mask |= IXF_GOTUBA;	/* UBA mapping regs still valid; */
23626197Ssklower 	ix_softc[unit].ix_if.if_flags &= ~IFF_RUNNING;
23726197Ssklower 	ix_softc[unit].ix_flags &= mask;
23826197Ssklower }
23926197Ssklower 
24030914Skarels int ix_MacLoop = 0;
24126197Ssklower 
24226197Ssklower /*
24326197Ssklower  * Initialization of interface; clear recorded pending
24426197Ssklower  * operations, and reinitialize UNIBUS usage.
24526197Ssklower  */
ixinit(unit)24626197Ssklower ixinit(unit)
24726197Ssklower 	int unit;
24826197Ssklower {
24926197Ssklower 	register struct ix_softc *ix = &ix_softc[unit];
25026197Ssklower 	struct uba_device *ui = npdinfo[unit];
25126197Ssklower 	register struct ifnet *ifp = &ix->ix_if;
25226197Ssklower 	register struct CQE *ep;
25326197Ssklower 	struct npreq *rp;
25426197Ssklower 	struct npmaster *mp = ix->ix_mp;
25526197Ssklower 	register u_short *dpmp = & mp->shmemp->statblock.sb_dpm;
25626197Ssklower 	u_short rpb[7];
25726197Ssklower 	int s;
25826197Ssklower 
25926197Ssklower 	/* not yet, if address still unknown */
26030864Skarels 	if ((ifp->if_addrlist == (struct ifaddr *)0) ||
26130864Skarels 	    (ix->ix_flags & IXF_RUNNING))
26226197Ssklower 		return;
26326197Ssklower 	if ((mp->flags & AVAILABLE) == 0 || (*dpmp & PROTOMASK(NPDLA)) == 0) {
26426197Ssklower 		ifp->if_flags &= ~IFF_UP;
26526197Ssklower 		return;
26626197Ssklower 	}
26726197Ssklower 	if ((ix->ix_flags & IXF_GOTUBA) == 0) {
26826197Ssklower 		ix->ix_ifuba.ifu_flags = UBA_CANTWAIT;
26926197Ssklower 		if (if_ubainit(&ix->ix_ifuba, ui->ui_ubanum,
27026197Ssklower 		    sizeof (struct ether_header), (int)btoc(ETHERMTU)) == 0) {
27126197Ssklower 			printf("ix%d: can't initialize\n", unit);
27226197Ssklower 			ix->ix_if.if_flags &= ~IFF_UP;
27326197Ssklower 			return;
27426197Ssklower 		}
27526197Ssklower 		ix->ix_ubaddr = uballoc(ui->ui_ubanum, (caddr_t)&ix->ix_stats,
27626197Ssklower 			sizeof (union ix_stats), 0);
27726197Ssklower 		ix->ix_flags |= IXF_GOTUBA;
27826197Ssklower 	}
27926197Ssklower 	if ((ix->ix_flags & IXF_GOTCQE) == 0) {
28026197Ssklower 		ix->ix_rrp = ix_GetReq(mp, ix->ix_ifuba.ifu_r.ifrw_info,
28126197Ssklower 								ETHERMTU);
28226197Ssklower 		ix->ix_wrp = ix_GetReq(mp, 0, 0);
28326197Ssklower 		ix->ix_flags |= IXF_GOTCQE;
28426197Ssklower 	}
28526197Ssklower 
28626197Ssklower 	rp = ix->ix_wrp;
28726197Ssklower 	ep = rp->element;
28826197Ssklower 
28926197Ssklower 	/* Changing the ethernet address resets the dla module,
29026197Ssklower 	   so must do it before opening the channel */
29126197Ssklower 	if (ix->ix_flags & IXF_SETADDR) {
29226197Ssklower 		register char *cp = (char *) &ix->ix_stats;
29326197Ssklower 		int spincount;
29426197Ssklower 		int x;
29530864Skarels 		/* Try Issuing an open channel request before reprogramming
29630864Skarels 		   the physical address */
29730864Skarels 		rpb[0] = 6;		/* RPB length */
29830864Skarels 		rpb[2] = 0x10;		/* Share with any smart users */
29930864Skarels 		rpb[3] = 0;		/* Take (a copy of) all frames */
30030864Skarels 		rpb[5] = 8;		/* On board rcv queue length */
30130864Skarels 		rpb[6] = 0;		/* XMT packets as is */
30230864Skarels 		if (ix_DoReq(mp, rp, IXC_OPEN, 0, 0, rpb, 0))
30330864Skarels 			return;
30430864Skarels 		/* Proceed with LDPA */
30526197Ssklower 		*cp++ = 1;
30626197Ssklower 		bcopy(ix->ix_addr, (caddr_t)cp, 6);
30726197Ssklower 		rpb[0] = 1;				/* RPB length */
30830864Skarels 		if (ix_DoReq(mp, rp, IXC_LDPA, ix->ix_ubaddr, 7, rpb, 0))
30930864Skarels 			return;
31026197Ssklower #ifndef TheyFinallyFixedTheBoard
31126197Ssklower 		/* Board requires some time to reinitialize its protocols */
31226197Ssklower 		x = spl1();
31326197Ssklower 		spincount = 2000000;
31426197Ssklower 		while (((*dpmp & PROTOMASK(NPDLA))==0) && spincount > 0)
31526197Ssklower 			spincount--;
31626197Ssklower 		if (spincount==0) {
31726197Ssklower 			printf("ix%d: failed to reinitialize DLA module\n",
31826197Ssklower 					unit);
31926197Ssklower 			splx(x);
32026197Ssklower 		}
32126197Ssklower 		splx(x);
32226197Ssklower #endif
32326197Ssklower 	}
32426197Ssklower 	rpb[0] = 6;		/* RPB length */
32526197Ssklower 	rpb[2] = 0x10;		/* Share with any smart users */
32630864Skarels 	if (ix_MacLoop) rpb[2] |= 0x8;
32730864Skarels 				/* Enable software loopback on board */
32826197Ssklower 	rpb[3] = 0;		/* Take (a copy of) all frames */
32926197Ssklower 	rpb[5] = 8;		/* On board rcv queue length */
33026197Ssklower 	rpb[6] = 0;		/* XMT packets as is */
33130864Skarels 	if (ix_DoReq(mp, rp, IXC_OPEN, 0, 0, rpb, 0))
33230864Skarels 		return;
33326197Ssklower 
33426197Ssklower 	ix->ix_aid = ep->rpb1;
33526197Ssklower 
33626197Ssklower 	/* Here we request our ethernet address, if we didn't reset it*/
33726197Ssklower 	if ((ix->ix_flags & IXF_SETADDR)==0) {
33826197Ssklower 		rpb[0] = 2;
33926197Ssklower 		rpb[1] = ix->ix_aid;
34026197Ssklower 		rpb[2] = 0;		/* get all stats */
34130864Skarels 		if (ix_DoReq(mp, rp, IXC_GSTAT,	/* Get Stats */
34226197Ssklower 			 (caddr_t) ix->ix_ubaddr, sizeof(ix->ix_stats) - 8,
34330864Skarels 			 rpb, 0))
34430864Skarels 				return;
34526197Ssklower 		bcopy((caddr_t) &ix->ix_stats, (caddr_t) ix->ix_addr, 6);
34626197Ssklower 	}
34726197Ssklower 	ix->ix_if.if_flags |= IFF_RUNNING;
34826197Ssklower 	ix->ix_flags |= IXF_RUNNING;
34926197Ssklower 	ifp->if_watchdog = ixwatch;
35026197Ssklower 	ifp->if_timer = ix->ix_scaninterval = IXWATCHINTERVAL;
35126197Ssklower 	ixrint(mp, 0);
35226197Ssklower }
35326197Ssklower 
35426197Ssklower /*
35526197Ssklower  * Start output on interface.
35626197Ssklower  * Get another datagram to send off of the interface queue,
35726197Ssklower  * and map it to the interface before starting the output.
35826197Ssklower  */
35937475Ssklower ixstart(ifp)
36037475Ssklower struct ifnet *ifp;
36126197Ssklower {
36226197Ssklower         int len = 0;
36337475Ssklower 	int unit = ifp->if_unit;
36426197Ssklower 	register struct ix_softc *ix = &ix_softc[unit];
36526197Ssklower 	register struct mbuf *n;
36626197Ssklower 	struct mbuf *m;
36726197Ssklower 	int s, error = 0;
36826197Ssklower 	struct npmaster *mp = ix->ix_mp;
36926197Ssklower 	struct npreq *rp = ix->ix_wrp;
37026197Ssklower 	struct CQE *ep;
37126197Ssklower 	u_short rpb[8];
37226197Ssklower 
37326197Ssklower 	IF_DEQUEUE(&ix->ix_if.if_snd, m);
37426197Ssklower 	if (m == 0) {
37526197Ssklower 		if (ix->ix_flags & IXF_STATPENDING) {
37630914Skarels 			ix->ix_flags &= ~IXF_STATPENDING;
37737475Ssklower 			ix->ix_if.if_flags |= IFF_OACTIVE;
37826197Ssklower 			rpb[0] = 2;
37926197Ssklower 			rpb[1] = ix->ix_aid;
38026197Ssklower 			rpb[2] = 0;			/* get all stats */
38126197Ssklower 			ix_DoReq(mp, rp, IXC_GSTAT,	/* general Stats */
38226197Ssklower 				 (caddr_t) ix->ix_ubaddr, sizeof(ix->ix_stats) - 8,
38326197Ssklower 				 rpb, ixcint);
38426197Ssklower 		}
38537475Ssklower 		return (0);
38626197Ssklower 	}
38726197Ssklower 	/*
38826197Ssklower 	 * Ensure minimum packet length.
38926197Ssklower 	 * This makes the safe assumtion that there are no virtual holes
39026197Ssklower 	 * after the data.
39126197Ssklower 	 * For security, it might be wise to zero out the added bytes,
39226197Ssklower 	 * but we're mainly interested in speed at the moment.
39326197Ssklower 	 */
39426197Ssklower 	len = if_wubaput(&ix->ix_ifuba, m);
39526197Ssklower 	if (len - sizeof(struct ether_header) < ETHERMIN)
39626197Ssklower 		len = ETHERMIN + sizeof(struct ether_header);
39726197Ssklower 
39837475Ssklower 	ix->ix_if.if_flags |= IFF_OACTIVE;
39926197Ssklower 
40026197Ssklower 	/* Now setup to call np driver */
40126197Ssklower 	rpb[0] = 8;
40226197Ssklower 	rpb[1] = ix->ix_aid;
40326197Ssklower 	ix_DoReq(mp, rp, IXC_XMIT,			 /* send frame */
40426197Ssklower 		    ix->ix_ifuba.ifu_w.ifrw_info, len, rpb, ixcint);
40537475Ssklower 	return (0);
40626197Ssklower }
40726197Ssklower 
40826197Ssklower /*
40926197Ssklower  * Command done interrupt. (almost)
41026197Ssklower  */
41126197Ssklower ixcint(mp, rp)
41226197Ssklower 	struct npmaster *mp;
41326197Ssklower 	struct npreq *rp;
41426197Ssklower {
41526197Ssklower 	struct CQE *ep;
41626197Ssklower 	register struct ix_softc *ix;
41726197Ssklower 	int s = splimp();
41826197Ssklower 
41926197Ssklower 	ep = rp->element;
42026197Ssklower 	ix = (struct ix_softc *)ep->cqe_famid;
42130864Skarels 	ix->ix_flags &= ~IXF_OWATCH;
42237475Ssklower 	if ((ix->ix_if.if_flags & IFF_OACTIVE) == 0) {
42326197Ssklower 		printf("ix%d: stray xmit interrupt, npreq=%x\n",
42426197Ssklower 			ix->ix_if.if_unit, rp);
42526197Ssklower 	}
42637475Ssklower 	ix->ix_if.if_flags &= ~IFF_OACTIVE;
42730864Skarels 	if (rp->flags & IOABORT || ep->cqe_sts != NPDONE
42830864Skarels 	    || ep->cqe_ust0 != NPDONE || ep->cqe_ust1 != NPOK) {
42930864Skarels 		if (ep->cqe_ust1 == 0x48)
43030864Skarels 			ix->ix_if.if_oerrors++;
43130864Skarels 		else {
43230864Skarels 			struct ix_softc *ix = (struct ix_softc *)ep->cqe_famid;
43330864Skarels 			printf(
43430864Skarels 			   "ix%d: ixcint failed, cmd %x, stat %x, flags %x, ",
43530864Skarels 				ix->ix_if.if_unit, rp->user,
43630864Skarels 				ep->cqe_sts, rp->flags);
43730864Skarels 			printf("ust error %x,%x\n", ep->cqe_ust0, ep->cqe_ust1);
43830864Skarels 			if (++ix->ix_badcqe > 65) {
43930864Skarels 				ix->ix_badcqe = 0;
44030864Skarels 				printf("ixcint: shutting down unix dla\n");
44130864Skarels 				ix->ix_if.if_flags &= ~IFF_UP;
44230864Skarels 			}
44330864Skarels 		 }
44430864Skarels 	}
44530864Skarels 	else switch (ep->cqe_func) {
44626197Ssklower 
44726197Ssklower 	case IXC_XMIT:
44830864Skarels 		ix->ix_if.if_opackets++;
44926197Ssklower 		break;
45026197Ssklower 
45126197Ssklower 	case IXC_GSTAT:
45230864Skarels 		ix->ix_if.if_collisions += ix->ix_stats.ixg.macg_xrty;
45326197Ssklower 	}
45430864Skarels done:
45526197Ssklower 	if (ix->ix_ifuba.ifu_xtofree) {
45626197Ssklower 		m_freem(ix->ix_ifuba.ifu_xtofree);
45726197Ssklower 		ix->ix_ifuba.ifu_xtofree = 0;
45826197Ssklower 	}
45930864Skarels 	if ((ix->ix_if.if_flags & (IFF_UP|IFF_RUNNING)) == (IFF_UP|IFF_RUNNING))
46037475Ssklower 		(void) ixstart(&ix->ix_if);
46126197Ssklower 	splx(s);
46226197Ssklower }
46326197Ssklower 
46426197Ssklower /*
46526197Ssklower  * Ethernet interface receiver interrupt.
46626197Ssklower  * If input error just drop packet.
46726197Ssklower  * Otherwise purge input buffered data path and examine
46826197Ssklower  * packet to determine type.  If can't determine length
46926197Ssklower  * from type, then have to drop packet.  Othewise decapsulate
47026197Ssklower  * packet based on type and pass to type specific higher-level
47126197Ssklower  * input routine.
47226197Ssklower  */
47326197Ssklower ixrint(mp, rp)
47426197Ssklower 	struct npmaster *mp;
47526197Ssklower 	struct npreq *rp;
47626197Ssklower {
47726197Ssklower 	struct CQE *ep;
47826197Ssklower 	register struct ix_softc *ix = ix_softc + mp->unit;
47926197Ssklower 	register struct ether_header *il;
48026197Ssklower     	struct mbuf *m;
48126197Ssklower 	int len, off, resid, s;
48226197Ssklower 	register struct ifqueue *inq;
48326197Ssklower 
48426197Ssklower 	if ((ix->ix_flags & IXF_RUNNING) == 0)
48526197Ssklower 		return;
48626197Ssklower 	if (rp == 0)
48726197Ssklower 		goto setup;
48830864Skarels 	ix->ix_flags &= ~(IXF_RCVPENDING|IXF_RWATCH);
48926197Ssklower 	ep = rp->element;
49026197Ssklower 	ix->ix_if.if_ipackets++;
49126197Ssklower 	if (ix->ix_ifuba.ifu_flags & UBA_NEEDBDP)
49226197Ssklower 		UBAPURGE(ix->ix_ifuba.ifu_uba, ix->ix_ifuba.ifu_r.ifrw_bdp);
49326197Ssklower 	il = (struct ether_header *)(ix->ix_ifuba.ifu_r.ifrw_addr);
49426197Ssklower 	len = ep->cqe_bcnt - sizeof (struct ether_header);
49530864Skarels 	if (ep->cqe_sts != NPDONE || rp->flags & IOABORT
49626197Ssklower 	    || ep->cqe_ust0 != NPDONE
49726197Ssklower 	    || ep->cqe_ust1 != NPOK) {
49830864Skarels 		printf("ix%drint: cqe error, cmd %x, stat %x, flags %x, ",
49930864Skarels 			ix->ix_if.if_unit, rp->user, ep->cqe_sts, rp->flags);
50030864Skarels 		printf("ust error %x,%x\n", ep->cqe_ust0, ep->cqe_ust1);
50130864Skarels 		if (++ix->ix_badcqe > 50) {
50226197Ssklower 			ix->ix_badcqe = 0;
50326197Ssklower 			printf("ixrint: shutting down unix dla\n");
50426197Ssklower 			ix->ix_if.if_flags &= ~IFF_UP;
50526197Ssklower 			return;
50626197Ssklower 		}
50726197Ssklower 		goto setup;
50826197Ssklower 	}
50926197Ssklower 
51026197Ssklower 	if ( len < 46 || len > ETHERMTU) {
51126197Ssklower 		ix->ix_if.if_ierrors++;
51226197Ssklower #ifdef notdef
51326197Ssklower 		if (ix->ix_if.if_ierrors % 100 == 0)
51426197Ssklower 			printf("ix%d: += 100 input errors\n", unit);
51526197Ssklower #endif
51626197Ssklower 		goto setup;
51726197Ssklower 	}
51826197Ssklower 
51926197Ssklower 	/*
52026197Ssklower 	 * Deal with trailer protocol: if type is trailer type
52126197Ssklower 	 * get true type from first 16-bit word past data.
52226197Ssklower 	 * Remember that type was trailer by setting off.
52326197Ssklower 	 */
52426197Ssklower 	il->ether_type = ntohs((u_short)il->ether_type);
52526197Ssklower #define	ildataaddr(il, off, type)	((type)(((caddr_t)((il)+1)+(off))))
52626197Ssklower 	if (il->ether_type >= ETHERTYPE_TRAIL &&
52726197Ssklower 	    il->ether_type < ETHERTYPE_TRAIL+ETHERTYPE_NTRAILER) {
52826197Ssklower 		off = (il->ether_type - ETHERTYPE_TRAIL) * 512;
52926197Ssklower 		if (off >= ETHERMTU)
53026197Ssklower 			goto setup;		/* sanity */
53126197Ssklower 		il->ether_type = ntohs(*ildataaddr(il, off, u_short *));
53226197Ssklower 		resid = ntohs(*(ildataaddr(il, off+2, u_short *)));
53326197Ssklower 		if (off + resid > len)
53426197Ssklower 			goto setup;		/* sanity */
53526197Ssklower 		len = off + resid;
53626197Ssklower 	} else
53726197Ssklower 		off = 0;
53826197Ssklower 	if (len == 0)
53926197Ssklower 		goto setup;
54026197Ssklower 
54126197Ssklower 	/*
54226197Ssklower 	 * Pull packet off interface.  Off is nonzero if packet
54326197Ssklower 	 * has trailing header; ilget will then force this header
54426197Ssklower 	 * information to be at the front, but we still have to drop
54526197Ssklower 	 * the type and length which are at the front of any trailer data.
54626197Ssklower 	 */
54726197Ssklower 	m = if_rubaget(&ix->ix_ifuba, len, off, &ix->ix_if);
54837475Ssklower 	if (m)
54937475Ssklower 		ether_input(&ix->ix_if, il, m);
55026197Ssklower 
55126197Ssklower setup:
55226197Ssklower 	/*
55326197Ssklower 	 * Reset for next packet if possible.
55426197Ssklower 	 * If waiting for transmit command completion, set flag
55526197Ssklower 	 * and wait until command completes.
55626197Ssklower 	 */
55726197Ssklower 	if (rp == 0) {
55826197Ssklower 		rp = ix->ix_rrp;
55926197Ssklower 		rp->intr = ixrint;
56026197Ssklower 		ep = rp->element;
56126197Ssklower 	}
56226197Ssklower 	len = ETHERMTU + sizeof(struct ether_header);
56326197Ssklower 
56426197Ssklower 	/* Now setup to call np driver */
56526197Ssklower 	/* Initializations of request structure */
56626197Ssklower 
56726197Ssklower 	ep->cqe_func = IXC_RECV;			/* get frame */
56826197Ssklower 	ep->cqe_ust0 = ep->cqe_ust1 = NPCLEAR;		/* Clear status */
56926197Ssklower 	ep->cqe_bcnt = len;				/* Byte count */
57026197Ssklower 	ep->cqe_lenrpb = 10;				/* RPB length */
57126197Ssklower 	ep->rpb1 = ix->ix_aid;				/* which channel */
57226197Ssklower 	ep->rpb2 = 65535;				/* Timeout */
57326197Ssklower 
57426197Ssklower 	ix->ix_flags |= IXF_RCVPENDING;
57526197Ssklower 
57630914Skarels 	s = spl5();
57726197Ssklower 	NpAddCQE(ep, &mp->shmemp->devcq, mp); /* Add CQE to device's queue */
57826197Ssklower 	splx(s);
57926197Ssklower }
58026197Ssklower 
58126197Ssklower 
58230864Skarels long ixwatchcount;
58326197Ssklower /*
58426197Ssklower  * Watchdog routine, request statistics from board.
58526197Ssklower  */
ixwatch(unit)58626197Ssklower ixwatch(unit)
58726197Ssklower 	int unit;
58826197Ssklower {
58926197Ssklower 	register struct ix_softc *ix = &ix_softc[unit];
59026197Ssklower 	register struct ifnet *ifp = &ix->ix_if;
59126197Ssklower 	int s;
59226197Ssklower 
59330864Skarels 	ixwatchcount++;
59430864Skarels 	if (ix->ix_badcqe > 1) {
59530864Skarels 		ix->ix_badcqe--; /* If errors aren't happening too fast,
59630864Skarels 				give the board a reprieve */
59730864Skarels 	}
59830864Skarels 	s = splimp();
59926197Ssklower 	if (ix->ix_flags & IXF_STATPENDING) {
60026197Ssklower 		ifp->if_timer = ix->ix_scaninterval;
60130864Skarels 		ix->ix_flags |= IXF_OWATCH;
60230864Skarels 		splx(s);
60326197Ssklower 		return;
60426197Ssklower 	}
60526197Ssklower 	ix->ix_flags |= IXF_STATPENDING;
60637475Ssklower 	if ((ix->ix_if.if_flags & IFF_OACTIVE) == 0)
60737475Ssklower 		(void) ixstart(ifp);
60830864Skarels 	else
60930864Skarels 		ix->ix_flags |= IXF_OWATCH;
61030864Skarels 	if (ix->ix_flags & IXF_RCVPENDING)
61130864Skarels 		ix->ix_flags |= IXF_RWATCH;
61226197Ssklower 	splx(s);
61326197Ssklower 	ifp->if_timer = ix->ix_scaninterval;
61426197Ssklower }
61526197Ssklower /*
61626197Ssklower  * Process an ioctl request.
61726197Ssklower  */
ixioctl(ifp,cmd,data)61826197Ssklower ixioctl(ifp, cmd, data)
61926197Ssklower 	register struct ifnet *ifp;
62026197Ssklower 	int cmd;
62126197Ssklower 	caddr_t data;
62226197Ssklower {
62326197Ssklower 	register struct ifaddr *ifa = (struct ifaddr *)data;
62426197Ssklower 	register struct ix_softc *ix = &ix_softc[ifp->if_unit];
62526197Ssklower 	int s = splimp(), error = 0;
62626197Ssklower 
62726197Ssklower 	switch (cmd) {
62826197Ssklower 
62926197Ssklower 	case SIOCSIFADDR:
63026197Ssklower 		ifp->if_flags |= IFF_UP;
63126197Ssklower 		ixinit(ifp->if_unit);
63226197Ssklower 		if ((ifp->if_flags & IFF_UP) == 0)
63326197Ssklower 			return (EBUSY);
63426197Ssklower 
63537475Ssklower 		switch (ifa->ifa_addr->sa_family) {
63626197Ssklower #ifdef INET
63726197Ssklower 		case AF_INET:
63826197Ssklower 			((struct arpcom *)ifp)->ac_ipaddr =
63926197Ssklower 				IA_SIN(ifa)->sin_addr;
64026197Ssklower 			arpwhohas((struct arpcom *)ifp, &IA_SIN(ifa)->sin_addr);
64126197Ssklower 			break;
64226197Ssklower #endif
64326197Ssklower #ifdef NS
64426197Ssklower 		case AF_NS:
64526197Ssklower 		    {
64626197Ssklower 			register struct ns_addr *ina = &(IA_SNS(ifa)->sns_addr);
64726197Ssklower 
64826197Ssklower 			if (ns_nullhost(*ina)) {
64926197Ssklower 				ina->x_host = * (union ns_host *)
65026197Ssklower 				     (ix_softc[ifp->if_unit].ix_addr);
65126197Ssklower 			} else {
65226197Ssklower 			    return
65326197Ssklower 				ix_setaddr(ina->x_host.c_host, ifp->if_unit);
65426197Ssklower 			}
65526197Ssklower 			break;
65626197Ssklower 		    }
65726197Ssklower #endif
65826197Ssklower 		}
65926197Ssklower 		break;
66026197Ssklower 
66126197Ssklower 	case SIOCSIFFLAGS:
66226197Ssklower 		if ((ifp->if_flags & IFF_UP) == 0 &&
66326197Ssklower 		    ix->ix_flags & IXF_RUNNING) {
66426197Ssklower 			ix->ix_flags &= ~IXF_RUNNING;
66526197Ssklower 			NpReset(ix->ix_mp, 0);
66626197Ssklower 		} else if (ifp->if_flags & IFF_UP &&
66726197Ssklower 		    (ix->ix_flags & IXF_RUNNING) == 0)
66826197Ssklower 			ixinit(ifp->if_unit);
66926197Ssklower 		break;
67026197Ssklower 
67126197Ssklower 	default:
67226197Ssklower 		error = EINVAL;
67326197Ssklower 	}
67426197Ssklower 	splx(s);
67526197Ssklower 	return (error);
67626197Ssklower }
67726197Ssklower 
67826197Ssklower /*
67926197Ssklower  * set ethernet address for unit
68026197Ssklower  */
ix_setaddr(physaddr,unit)68126197Ssklower ix_setaddr(physaddr, unit)
68226197Ssklower u_char *physaddr;
68326197Ssklower int unit;
68426197Ssklower {
68526197Ssklower 	register struct ix_softc *ix = &ix_softc[unit];
68626197Ssklower 
68726197Ssklower 	if (! (ix->ix_flags & IXF_RUNNING))
68826197Ssklower 		return (EBUSY);
68926197Ssklower 
69026197Ssklower 	/* The following is a big cop out due to the fact that
69126197Ssklower 	   Changing the ethernet address resets the dla module,
69226197Ssklower 	   so must re-open the channel, anyway. */
69326197Ssklower 
69426197Ssklower 
69526197Ssklower 	bcopy((caddr_t)physaddr, (caddr_t)ix->ix_addr, sizeof ix->ix_addr);
69626197Ssklower 	ix->ix_flags &= ~IXF_RUNNING;
69726197Ssklower 	ix->ix_flags |= IXF_SETADDR;
69826197Ssklower 	ixinit(unit);
69926197Ssklower 	NpKill(ix->ix_mp, ix->ix_rrp);
70026197Ssklower }
showme()70130864Skarels static showme() {
70230864Skarels 	return ((int) &(ix_softc->ix_badcqe));
70330864Skarels }
70426197Ssklower #endif
705