39b547ce4d
- Split out the prototypes, externs and struct decls from if_epreg.h into if_epvar.h. - Add support for MCA based Etherlink III (3c529) devices. None of this code is used right now; the old if_ep driver is still in place and used. I will eventually get around to converting if_ep_isa.c to newbus once I've had a talk with Peter and DFR about the DEVICE_IDENTIFY() method. I have tested this code on my PS/2. It works. I would like EISA and ISA testers since my example hardware hasn't arrived yet. Add: dev/ep/if_ep.c optional ep dev/ep/if_ep_isa.c optional ep isa dev/ep/if_ep_eisa.c optional ep eisa dev/ep/if_ep_mca.c optional ep mca dev/ep/if_ep_pccard.c optional ep card to sys/conf/files Remove: i386/eisa/3c5x9.c optional ep i386/isa/if_ep.c optional ep from sys/i386/conf/files.i386 PCCARD testers wanted! I will switch off and cvs rm the old driver in favor of this copy once I've had positive feedback or have the hardware to verify that it works.
345 lines
9.3 KiB
C
345 lines
9.3 KiB
C
/*
|
|
* Copyright (c) 1994 Herb Peyerl <hpeyerl@novatel.ca>
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
* 3. All advertising materials mentioning features or use of this software
|
|
* must display the following acknowledgement:
|
|
* This product includes software developed by Herb Peyerl.
|
|
* 4. The name of Herb Peyerl may not be used to endorse or promote products
|
|
* derived from this software without specific prior written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
|
|
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
|
|
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
|
|
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
|
|
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
|
|
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
|
|
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
|
|
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
|
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
|
|
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*
|
|
* $FreeBSD$
|
|
*/
|
|
|
|
#include <sys/param.h>
|
|
#include <sys/kernel.h>
|
|
#include <sys/systm.h>
|
|
#include <sys/malloc.h>
|
|
#include <sys/mbuf.h>
|
|
#include <sys/socket.h>
|
|
#include <sys/sockio.h>
|
|
|
|
#include <net/ethernet.h>
|
|
#include <net/if.h>
|
|
#include <netinet/in.h>
|
|
#include <netinet/if_ether.h>
|
|
|
|
#include <machine/clock.h>
|
|
|
|
#include <i386/isa/isa_device.h>
|
|
|
|
#include <dev/ep/if_epreg.h>
|
|
#include <dev/ep/if_epvar.h>
|
|
#include <i386/isa/elink.h>
|
|
|
|
static int ep_isa_probe (struct isa_device *);
|
|
static int ep_isa_attach (struct isa_device *);
|
|
static struct ep_board *ep_look_for_board_at (struct isa_device *is);
|
|
static int get_eeprom_data (int, int);
|
|
static void epintr (int);
|
|
|
|
#if 0
|
|
static int send_ID_sequence (int);
|
|
#endif
|
|
|
|
static int ep_current_tag = EP_LAST_TAG + 1;
|
|
|
|
struct isa_driver epdriver = {
|
|
ep_isa_probe,
|
|
ep_isa_attach,
|
|
"ep",
|
|
0
|
|
};
|
|
|
|
int
|
|
ep_isa_probe(is)
|
|
struct isa_device *is;
|
|
{
|
|
struct ep_softc *sc;
|
|
struct ep_board *epb;
|
|
u_short k;
|
|
|
|
if ((epb = ep_look_for_board_at(is)) == 0)
|
|
return (0);
|
|
|
|
/*
|
|
* Allocate a storage area for us
|
|
*/
|
|
sc = ep_alloc(ep_unit, epb);
|
|
if (!sc)
|
|
return (0);
|
|
|
|
is->id_unit = ep_unit++;
|
|
|
|
/*
|
|
* The iobase was found and MFG_ID was 0x6d50. PROD_ID should be
|
|
* 0x9[0-f]50 (IBM-PC)
|
|
* 0x9[0-f]5[0-f] (PC-98)
|
|
*/
|
|
GO_WINDOW(0);
|
|
k = sc->epb->prod_id;
|
|
#ifdef PC98
|
|
if ((k & 0xf0f0) != (PROD_ID & 0xf0f0)) {
|
|
#else
|
|
if ((k & 0xf0ff) != (PROD_ID & 0xf0ff)) {
|
|
#endif
|
|
printf("ep_isa_probe: ignoring model %04x\n", k);
|
|
ep_free(sc);
|
|
return (0);
|
|
}
|
|
|
|
k = sc->epb->res_cfg;
|
|
|
|
k >>= 12;
|
|
|
|
/* Now we have two cases again:
|
|
*
|
|
* 1. Device was configured with 'irq?'
|
|
* In this case we use irq read from the board
|
|
*
|
|
* 2. Device was configured with 'irq xxx'
|
|
* In this case we set up the board to use specified interrupt
|
|
*
|
|
*/
|
|
|
|
if (is->id_irq == 0) { /* irq? */
|
|
is->id_irq = 1 << ((k == 2) ? 9 : k);
|
|
}
|
|
|
|
sc->stat = 0; /* 16 bit access */
|
|
|
|
/* By now, the adapter is already activated */
|
|
|
|
return (EP_IOSIZE); /* 16 bytes of I/O space used. */
|
|
}
|
|
|
|
static int
|
|
ep_isa_attach(is)
|
|
struct isa_device *is;
|
|
{
|
|
struct ep_softc *sc = ep_softc[is->id_unit];
|
|
u_short config;
|
|
int irq;
|
|
|
|
is->id_ointr = epintr;
|
|
sc->ep_connectors = 0;
|
|
config = inw(IS_BASE + EP_W0_CONFIG_CTRL);
|
|
if (config & IS_AUI) {
|
|
sc->ep_connectors |= AUI;
|
|
}
|
|
if (config & IS_BNC) {
|
|
sc->ep_connectors |= BNC;
|
|
}
|
|
if (config & IS_UTP) {
|
|
sc->ep_connectors |= UTP;
|
|
}
|
|
if (!(sc->ep_connectors & 7))
|
|
printf("no connectors!");
|
|
sc->ep_connector = inw(BASE + EP_W0_ADDRESS_CFG) >> ACF_CONNECTOR_BITS;
|
|
/*
|
|
* Write IRQ value to board
|
|
*/
|
|
|
|
irq = ffs(is->id_irq) - 1;
|
|
if (irq == -1) {
|
|
printf(" invalid irq... cannot attach\n");
|
|
return 0;
|
|
}
|
|
|
|
GO_WINDOW(0);
|
|
SET_IRQ(BASE, irq);
|
|
|
|
ep_attach(sc);
|
|
return 1;
|
|
}
|
|
|
|
static struct ep_board *
|
|
ep_look_for_board_at(is)
|
|
struct isa_device *is;
|
|
{
|
|
int data, i, j, id_port = ELINK_ID_PORT;
|
|
int count = 0;
|
|
|
|
if (ep_current_tag == (EP_LAST_TAG + 1)) {
|
|
/* Come here just one time */
|
|
|
|
ep_current_tag--;
|
|
|
|
/* Look for the ISA boards. Init and leave them actived */
|
|
outb(id_port, 0);
|
|
outb(id_port, 0);
|
|
|
|
elink_idseq(0xCF);
|
|
|
|
elink_reset();
|
|
DELAY(DELAY_MULTIPLE * 10000);
|
|
for (i = 0; i < EP_MAX_BOARDS; i++) {
|
|
outb(id_port, 0);
|
|
outb(id_port, 0);
|
|
elink_idseq(0xCF);
|
|
|
|
data = get_eeprom_data(id_port, EEPROM_MFG_ID);
|
|
if (data != MFG_ID)
|
|
break;
|
|
|
|
/* resolve contention using the Ethernet address */
|
|
|
|
for (j = 0; j < 3; j++)
|
|
get_eeprom_data(id_port, j);
|
|
|
|
/* and save this address for later use */
|
|
|
|
for (j = 0; j < 3; j++)
|
|
ep_board[ep_boards].eth_addr[j] = get_eeprom_data(id_port, j);
|
|
|
|
ep_board[ep_boards].res_cfg =
|
|
get_eeprom_data(id_port, EEPROM_RESOURCE_CFG);
|
|
|
|
ep_board[ep_boards].prod_id =
|
|
get_eeprom_data(id_port, EEPROM_PROD_ID);
|
|
|
|
ep_board[ep_boards].epb_used = 0;
|
|
#ifdef PC98
|
|
ep_board[ep_boards].epb_addr =
|
|
(get_eeprom_data(id_port, EEPROM_ADDR_CFG) & 0x1f) *
|
|
0x100 + 0x40d0;
|
|
#else
|
|
ep_board[ep_boards].epb_addr =
|
|
(get_eeprom_data(id_port, EEPROM_ADDR_CFG) & 0x1f) *
|
|
0x10 + 0x200;
|
|
|
|
if (ep_board[ep_boards].epb_addr > 0x3E0)
|
|
/* Board in EISA configuration mode */
|
|
continue;
|
|
#endif /* PC98 */
|
|
|
|
outb(id_port, ep_current_tag); /* tags board */
|
|
outb(id_port, ACTIVATE_ADAPTER_TO_CONFIG);
|
|
ep_boards++;
|
|
count++;
|
|
ep_current_tag--;
|
|
}
|
|
|
|
ep_board[ep_boards].epb_addr = 0;
|
|
if (count) {
|
|
printf("%d 3C5x9 board(s) on ISA found at", count);
|
|
for (j = 0; ep_board[j].epb_addr; j++)
|
|
if (ep_board[j].epb_addr <= 0x3E0)
|
|
printf(" 0x%x", ep_board[j].epb_addr);
|
|
printf("\n");
|
|
}
|
|
}
|
|
|
|
/* we have two cases:
|
|
*
|
|
* 1. Device was configured with 'port ?'
|
|
* In this case we search for the first unused card in list
|
|
*
|
|
* 2. Device was configured with 'port xxx'
|
|
* In this case we search for the unused card with that address
|
|
*
|
|
*/
|
|
|
|
if (IS_BASE == -1) { /* port? */
|
|
for (i = 0; ep_board[i].epb_addr && ep_board[i].epb_used; i++)
|
|
;
|
|
if (ep_board[i].epb_addr == 0)
|
|
return 0;
|
|
|
|
IS_BASE = ep_board[i].epb_addr;
|
|
ep_board[i].epb_used = 1;
|
|
|
|
return &ep_board[i];
|
|
} else {
|
|
for (i = 0;
|
|
ep_board[i].epb_addr && ep_board[i].epb_addr != IS_BASE;
|
|
i++)
|
|
;
|
|
|
|
if (ep_board[i].epb_used || ep_board[i].epb_addr != IS_BASE)
|
|
return 0;
|
|
|
|
if (inw(IS_BASE + EP_W0_EEPROM_COMMAND) & EEPROM_TST_MODE) {
|
|
printf("ep%d: 3c5x9 at 0x%x in PnP mode. Disable PnP mode!\n",
|
|
is->id_unit, IS_BASE);
|
|
}
|
|
ep_board[i].epb_used = 1;
|
|
|
|
return &ep_board[i];
|
|
}
|
|
}
|
|
|
|
/*
|
|
* We get eeprom data from the id_port given an offset into the eeprom.
|
|
* Basically; after the ID_sequence is sent to all of the cards; they enter
|
|
* the ID_CMD state where they will accept command requests. 0x80-0xbf loads
|
|
* the eeprom data. We then read the port 16 times and with every read; the
|
|
* cards check for contention (ie: if one card writes a 0 bit and another
|
|
* writes a 1 bit then the host sees a 0. At the end of the cycle; each card
|
|
* compares the data on the bus; if there is a difference then that card goes
|
|
* into ID_WAIT state again). In the meantime; one bit of data is returned in
|
|
* the AX register which is conveniently returned to us by inb(). Hence; we
|
|
* read 16 times getting one bit of data with each read.
|
|
*/
|
|
|
|
static int
|
|
get_eeprom_data(id_port, offset)
|
|
int id_port;
|
|
int offset;
|
|
{
|
|
int i, data = 0;
|
|
outb(id_port, 0x80 + offset);
|
|
for (i = 0; i < 16; i++) {
|
|
DELAY(BIT_DELAY_MULTIPLE * 1000);
|
|
data = (data << 1) | (inw(id_port) & 1);
|
|
}
|
|
return (data);
|
|
}
|
|
|
|
void
|
|
epintr(unit)
|
|
int unit;
|
|
{
|
|
register struct ep_softc *sc = ep_softc[unit];
|
|
|
|
ep_intr(sc);
|
|
|
|
return;
|
|
}
|
|
|
|
#if 0
|
|
static int
|
|
send_ID_sequence(port)
|
|
int port;
|
|
{
|
|
int cx, al;
|
|
|
|
for (al = 0xff, cx = 0; cx < 255; cx++) {
|
|
outb(port, al);
|
|
al <<= 1;
|
|
if (al & 0x100)
|
|
al ^= 0xcf;
|
|
}
|
|
return (1);
|
|
}
|
|
#endif
|