/*      $NetBSD: if_ae_nubus.c,v 1.44 2023/12/20 00:40:43 thorpej Exp $ */

/*
* Copyright (C) 1997 Scott Reynolds
* 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. The name of the author 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.
*/
/*
* Some parts are derived from code adapted for MacBSD by Brad Parker
* <[email protected]>.
*
* Currently supports:
*      Apple NB Ethernet Card
*      Apple NB Ethernet Card II
*      Interlan A310 NuBus Ethernet card
*      Cayman Systems GatorCard
*      Asante MacCon II/E
*      Kinetics EtherPort SE/30
*/

#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: if_ae_nubus.c,v 1.44 2023/12/20 00:40:43 thorpej Exp $");

#include <sys/param.h>
#include <sys/device.h>
#include <sys/errno.h>
#include <sys/ioctl.h>
#include <sys/socket.h>
#include <sys/syslog.h>
#include <sys/systm.h>

#include <net/if.h>
#include <net/if_media.h>
#include <net/if_ether.h>

#include <machine/bus.h>
#include <machine/viareg.h>

#include <dev/ic/dp8390reg.h>
#include <dev/ic/dp8390var.h>
#include <mac68k/nubus/nubus.h>
#include <mac68k/dev/if_aevar.h>
#include <mac68k/dev/if_aereg.h>

static int      ae_nubus_match(device_t, cfdata_t, void *);
static void     ae_nubus_attach(device_t, device_t, void *);
static int      ae_nb_card_vendor(bus_space_tag_t, bus_space_handle_t,
                   struct nubus_attach_args *);
static int      ae_nb_get_enaddr(bus_space_tag_t, bus_space_handle_t,
                   struct nubus_attach_args *, u_int8_t *);
#ifdef DEBUG
static void     ae_nb_watchdog(struct ifnet *);
#endif

void            ae_nubus_intr(void *);

CFATTACH_DECL_NEW(ae_nubus, sizeof(struct dp8390_softc),
   ae_nubus_match, ae_nubus_attach, NULL, NULL);

static int
ae_nubus_match(device_t parent, cfdata_t cf, void *aux)
{
       struct nubus_attach_args *na = aux;
       bus_space_handle_t bsh;
       int rv;

       if (bus_space_map(na->na_tag, NUBUS_SLOT2PA(na->slot), NBMEMSIZE,
           0, &bsh))
               return (0);

       rv = 0;

       if (na->category == NUBUS_CATEGORY_NETWORK &&
           na->type == NUBUS_TYPE_ETHERNET) {
               switch (ae_nb_card_vendor(na->na_tag, bsh, na)) {
               case DP8390_VENDOR_APPLE:
               case DP8390_VENDOR_ASANTE:
               case DP8390_VENDOR_FARALLON:
               case DP8390_VENDOR_INTERLAN:
               case DP8390_VENDOR_KINETICS:
               case DP8390_VENDOR_CABLETRON:
                       rv = 1;
                       break;
               case DP8390_VENDOR_DAYNA:
                       rv = UNSUPP;
                       break;
               default:
                       break;
               }
       }

       bus_space_unmap(na->na_tag, bsh, NBMEMSIZE);

       return rv;
}

/*
* Install interface into kernel networking data structures
*/
static void
ae_nubus_attach(device_t parent, device_t self, void *aux)
{
       struct dp8390_softc *sc = device_private(self);
       struct nubus_attach_args *na = aux;
#ifdef DEBUG
       struct ifnet *ifp = &sc->sc_ec.ec_if;
#endif
       bus_space_tag_t bst;
       bus_space_handle_t bsh;
       int i, success;
       const char *cardtype;

       sc->sc_dev = self;
       bst = na->na_tag;
       if (bus_space_map(bst, NUBUS_SLOT2PA(na->slot), NBMEMSIZE,
           0, &bsh)) {
               aprint_error(": can't map memory space\n");
               return;
       }

       sc->sc_regt = sc->sc_buft = bst;
       sc->sc_flags = device_cfdata(self)->cf_flags;

       cardtype = nubus_get_card_name(bst, bsh, na->fmt);

       sc->is790 = 0;

       sc->mem_start = 0;
       sc->mem_size = 0;

       success = 0;

       switch (ae_nb_card_vendor(bst, bsh, na)) {
       case DP8390_VENDOR_APPLE:       /* Apple-compatible cards */
       case DP8390_VENDOR_ASANTE:
               /* Map register offsets */
               for (i = 0; i < 16; i++) /* reverse order, longword aligned */
                       sc->sc_reg_map[i] = (15 - i) << 2;

               sc->dcr_reg = (ED_DCR_FT1 | ED_DCR_WTS | ED_DCR_LS);
               if (bus_space_subregion(bst, bsh,
                   AE_REG_OFFSET, AE_REG_SIZE, &sc->sc_regh)) {
                       aprint_error(": failed to map register space\n");
                       break;
               }
               if ((sc->mem_size = ae_size_card_memory(bst, bsh,
                   AE_DATA_OFFSET)) == 0) {
                       aprint_error(": failed to determine size of RAM.\n");
                       break;
               }
               if (bus_space_subregion(bst, bsh,
                   AE_DATA_OFFSET, sc->mem_size, &sc->sc_bufh)) {
                       aprint_error(": failed to map register space\n");
                       break;
               }
#ifdef AE_OLD_GET_ENADDR
               /* Get station address from on-board ROM */
               for (i = 0; i < ETHER_ADDR_LEN; ++i)
                       sc->sc_enaddr[i] =
                           bus_space_read_1(bst, bsh, (AE_ROM_OFFSET + i * 2));
#else
               if (ae_nb_get_enaddr(bst, bsh, na, sc->sc_enaddr)) {
                       aprint_error(": can't find MAC address\n");
                       break;
               }
#endif

               success = 1;
               break;

       case DP8390_VENDOR_DAYNA:
               /* Map register offsets */
               for (i = 0; i < 16; i++) /* normal order, longword aligned */
                       sc->sc_reg_map[i] = i << 2;

               sc->dcr_reg = (ED_DCR_FT1 | ED_DCR_WTS | ED_DCR_LS);
               if (bus_space_subregion(bst, bsh,
                   DP_REG_OFFSET, AE_REG_SIZE, &sc->sc_regh)) {
                       aprint_error(": failed to map register space\n");
                       break;
               }
               sc->mem_size = 8192;
               if (bus_space_subregion(bst, bsh,
                   DP_DATA_OFFSET, sc->mem_size, &sc->sc_bufh)) {
                       aprint_error(": failed to map register space\n");
                       break;
               }
#ifdef AE_OLD_GET_ENADDR
               /* Get station address from on-board ROM */
               for (i = 0; i < ETHER_ADDR_LEN; ++i)
                       sc->sc_enaddr[i] =
                           bus_space_read_1(bst, bsh, (DP_ROM_OFFSET + i * 2));
#else
               if (ae_nb_get_enaddr(bst, bsh, na, sc->sc_enaddr)) {
                       aprint_error(": can't find MAC address\n");
                       break;
               }
#endif

               aprint_error(": unsupported Dayna hardware\n");
               break;

       case DP8390_VENDOR_FARALLON:
               /* Map register offsets */
               for (i = 0; i < 16; i++) /* reverse order, longword aligned */
                       sc->sc_reg_map[i] = (15 - i) << 2;

               sc->dcr_reg = (ED_DCR_FT1 | ED_DCR_WTS | ED_DCR_LS);
               if (bus_space_subregion(bst, bsh,
                   AE_REG_OFFSET, AE_REG_SIZE, &sc->sc_regh)) {
                       aprint_error(": failed to map register space\n");
                       break;
               }
               if ((sc->mem_size = ae_size_card_memory(bst, bsh,
                   AE_DATA_OFFSET)) == 0) {
                       aprint_error(": failed to determine size of RAM.\n");
                       break;
               }
               if (bus_space_subregion(bst, bsh,
                   AE_DATA_OFFSET, sc->mem_size, &sc->sc_bufh)) {
                       aprint_error(": failed to map register space\n");
                       break;
               }
#ifdef AE_OLD_GET_ENADDR
               /* Get station address from on-board ROM */
               for (i = 0; i < ETHER_ADDR_LEN; ++i)
                       sc->sc_enaddr[i] =
                           bus_space_read_1(bst, bsh, (FE_ROM_OFFSET + i));
#else
               if (ae_nb_get_enaddr(bst, bsh, na, sc->sc_enaddr)) {
                       aprint_error(": can't find MAC address\n");
                       break;
               }
#endif

               success = 1;
               break;

       case DP8390_VENDOR_INTERLAN:
               /* Map register offsets */
               for (i = 0; i < 16; i++) /* normal order, longword aligned */
                       sc->sc_reg_map[i] = i << 2;

               sc->dcr_reg = (ED_DCR_FT1 | ED_DCR_WTS | ED_DCR_LS);
               if (bus_space_subregion(bst, bsh,
                   GC_REG_OFFSET, AE_REG_SIZE, &sc->sc_regh)) {
                       aprint_error(": failed to map register space\n");
                       break;
               }
               if ((sc->mem_size = ae_size_card_memory(bst, bsh,
                   GC_DATA_OFFSET)) == 0) {
                       aprint_error(": failed to determine size of RAM.\n");
                       break;
               }
               if (bus_space_subregion(bst, bsh,
                   GC_DATA_OFFSET, sc->mem_size, &sc->sc_bufh)) {
                       aprint_error(": failed to map register space\n");
                       break;
               }

               /* reset the NIC chip */
               bus_space_write_1(bst, bsh, GC_RESET_OFFSET, 0);

               if (ae_nb_get_enaddr(bst, bsh, na, sc->sc_enaddr)) {
                       /* Fall back to snarf directly from ROM.  Ick. */
                       for (i = 0; i < ETHER_ADDR_LEN; ++i)
                               sc->sc_enaddr[i] =
                                   bus_space_read_1(bst, bsh,
                                   (GC_ROM_OFFSET + i * 4));
               }

               success = 1;
               break;

       case DP8390_VENDOR_KINETICS:
               /* Map register offsets */
               for (i = 0; i < 16; i++) /* normal order, longword aligned */
                       sc->sc_reg_map[i] = i << 2;

               if (bus_space_subregion(bst, bsh,
                   KE_REG_OFFSET, AE_REG_SIZE, &sc->sc_regh)) {
                       aprint_error(": failed to map register space\n");
                       break;
               }
               if ((sc->mem_size = ae_size_card_memory(bst, bsh,
                   KE_DATA_OFFSET)) == 0) {
                       aprint_error(": failed to determine size of RAM.\n");
                       break;
               }
               if (bus_space_subregion(bst, bsh,
                   KE_DATA_OFFSET, sc->mem_size, &sc->sc_bufh)) {
                       aprint_error(": failed to map register space\n");
                       break;
               }
               if (ae_nb_get_enaddr(bst, bsh, na, sc->sc_enaddr)) {
                       aprint_error(": can't find MAC address\n");
                       break;
               }

               success = 1;
               break;

       case DP8390_VENDOR_CABLETRON:
               /* Map register offsets */
               for (i = 0; i < 16; i++)
                       sc->sc_reg_map[i] =  i << 1 ;  /* normal order, word aligned */
               sc->dcr_reg = (ED_DCR_FT1 | ED_DCR_WTS | ED_DCR_LS);
               if (bus_space_subregion(bst, bsh,
                   CT_REG_OFFSET, AE_REG_SIZE, &sc->sc_regh)) {
                       aprint_error(": failed to map register space\n");
                       break;
               }
               if ((sc->mem_size = ae_size_card_memory(bst, bsh,
                   CT_DATA_OFFSET)) == 0) {
                       aprint_error(": failed to determine size of RAM.\n");
                       break;
               }
               if (bus_space_subregion(bst, bsh,
                   CT_DATA_OFFSET, sc->mem_size, &sc->sc_bufh)) {
                       aprint_error(": failed to map register space\n");
                       break;
               }
               if (ae_nb_get_enaddr(bst, bsh, na, sc->sc_enaddr)) {
                       aprint_error(": can't find MAC address\n");
                       break;
               }
               success = 1;
               break;
       default:
               break;
       }

       if (!success) {
               bus_space_unmap(bst, bsh, NBMEMSIZE);
               return;
       }

       /*
        * Override test_mem and write_mbuf functions; other defaults
        * already work properly.
        */
       sc->test_mem = ae_test_mem;
       sc->write_mbuf = ae_write_mbuf;
#ifdef DEBUG
       ifp->if_watchdog = ae_nb_watchdog;      /* Override watchdog */
#endif
       sc->sc_media_init = dp8390_media_init;

       /* Interface is always enabled. */
       sc->sc_enabled = 1;

       aprint_normal(": %s, %dKB memory\n", cardtype, sc->mem_size / 1024);

       if (dp8390_config(sc)) {
               bus_space_unmap(bst, bsh, NBMEMSIZE);
               return;
       }

       /* make sure interrupts are vectored to us */
       add_nubus_intr(na->slot, ae_nubus_intr, sc);
}

void
ae_nubus_intr(void *arg)
{
       struct dp8390_softc *sc = arg;

       (void)dp8390_intr(sc);
}

static int
ae_nb_card_vendor(bus_space_tag_t bst, bus_space_handle_t bsh,
   struct nubus_attach_args *na)
{
       int vendor;

       switch (na->drsw) {
       case NUBUS_DRSW_3COM:
               switch (na->drhw) {
               case NUBUS_DRHW_APPLE_SN:
               case NUBUS_DRHW_APPLE_SNT:
                       vendor = DP8390_VENDOR_UNKNOWN;
                       break;
               default:
                       vendor = DP8390_VENDOR_APPLE;
                       break;
               }
               break;
       case NUBUS_DRSW_APPLE:
               if (na->drhw == NUBUS_DRHW_ASANTE_LC) {
                       vendor = DP8390_VENDOR_UNKNOWN;
                       break;
               }
               /* FALLTHROUGH */
       case NUBUS_DRSW_DAYNA2:
       case NUBUS_DRSW_TECHWORKS:
       case NUBUS_DRSW_TFLLAN:
               if (na->drhw == NUBUS_DRHW_CABLETRON) {
                       vendor = DP8390_VENDOR_CABLETRON;
               } else {
                       vendor = DP8390_VENDOR_APPLE;
               }
               break;
       case NUBUS_DRSW_ASANTE:
               vendor = DP8390_VENDOR_ASANTE;
               break;
       case NUBUS_DRSW_FARALLON:
               vendor = DP8390_VENDOR_FARALLON;
               break;
       case NUBUS_DRSW_GATOR:
               switch (na->drhw) {
               default:
               case NUBUS_DRHW_INTERLAN:
                       vendor = DP8390_VENDOR_INTERLAN;
                       break;
               case NUBUS_DRHW_KINETICS:
                       if (strncmp(nubus_get_card_name(bst, bsh, na->fmt),
                           "EtherPort", 9) == 0)
                               vendor = DP8390_VENDOR_KINETICS;
                       else
                               vendor = DP8390_VENDOR_DAYNA;
                       break;
               }
               break;
       default:
               vendor = DP8390_VENDOR_UNKNOWN;
       }
       return vendor;
}

static int
ae_nb_get_enaddr(bus_space_tag_t bst, bus_space_handle_t bsh,
   struct nubus_attach_args *na, u_int8_t *ep)
{
       nubus_dir dir;
       nubus_dirent dirent;
       int rv;

       /*
        * XXX - note hardwired resource IDs here; these are assumed to
        * be used by all cards, but should be fixed when we find out
        * more about Ethernet card resources.
        */
       nubus_get_main_dir(na->fmt, &dir);
       switch (ae_nb_card_vendor(bst, bsh, na)) {
       case DP8390_VENDOR_APPLE:
               if (na->drsw == NUBUS_DRSW_TFLLAN) {    /* TFL LAN E410/E420 */
                       rv = nubus_find_rsrc(bst, bsh, na->fmt,
                           &dir, 0x08, &dirent);
                       break;
               }
               /*FALLTHROUGH*/
       default:
               rv = nubus_find_rsrc(bst, bsh, na->fmt, &dir, 0x80, &dirent);
               break;
       }
       if (rv <= 0)
               return 1;
       nubus_get_dir_from_rsrc(na->fmt, &dirent, &dir);
       if (nubus_find_rsrc(bst, bsh, na->fmt, &dir, 0x80, &dirent) <= 0)
               return 1;
       if (nubus_get_ind_data(bst, bsh,
           na->fmt, &dirent, ep, ETHER_ADDR_LEN) <= 0)
               return 1;

       return 0;
}

#ifdef DEBUG
static void
ae_nb_watchdog(struct ifnet *ifp)
{
       struct dp8390_softc *sc = ifp->if_softc;

/*
* This is a kludge!  The via code seems to miss slot interrupts
* sometimes.  This kludges around that by calling the handler
* by hand if the watchdog is activated. -- XXX (akb)
*/
       (*via2itab[1])((void *)1);

       log(LOG_ERR, "%s: device timeout\n", device_xname(sc->sc_dev));
       if_statinc(ifp, if_oerrors);

       dp8390_reset(sc);
}
#endif

You are viewing proxied material from ftp.icm.edu.pl. The copyright of proxied material belongs to its original authors. Any comments or complaints in relation to proxied material should be directed to the original authors of the content concerned. Please see the disclaimer for more details.