src/drivers/bus/eisa.c

   1 #include "string.h"
   2 #include "io.h"
   3 #include "timer.h"
   4 #include "console.h"
   5 #include "dev.h"
   6 #include "eisa.h"
   7
   8 /*
   9  * Increment a bus_loc structure to the next possible EISA location.
  10  * Leave the structure zeroed and return 0 if there are no more valid
  11  * locations.
  12  *
  13  */
  14 static int eisa_next_location ( struct bus_loc *bus_loc ) {
  15         struct eisa_loc *eisa_loc = ( struct eisa_loc * ) bus_loc;
  16
  17         /*
  18          * Ensure that there is sufficient space in the shared bus
  19          * structures for a struct isa_loc and a struct
  20          * isa_dev, as mandated by bus.h.
  21          *
  22          */
  23         BUS_LOC_CHECK ( struct eisa_loc );
  24         BUS_DEV_CHECK ( struct eisa_device );
  25
  26         return ( eisa_loc->slot = ( ++eisa_loc->slot & EISA_MAX_SLOT ) );
  27 }
  28
  29 /*
  30  * Fill in parameters for an EISA device based on slot number
  31  *
  32  * Return 1 if device present, 0 otherwise
  33  *
  34  */
  35 static int eisa_fill_device  ( struct bus_dev *bus_dev,
  36                                struct bus_loc *bus_loc ) {
  37         struct eisa_loc *eisa_loc = ( struct eisa_loc * ) bus_loc;
  38         struct eisa_device *eisa = ( struct eisa_device * ) bus_dev;
  39         uint8_t present;
  40
  41         /* Copy slot number to struct eisa, set default values */
  42         eisa->slot = eisa_loc->slot;
  43         eisa->name = "?";
  44
  45         /* Slot 0 is never valid */
  46         if ( ! eisa->slot )
  47                 return 0;
  48
  49         /* Set ioaddr */
  50         eisa->ioaddr = EISA_SLOT_BASE ( eisa->slot );
  51
  52         /* Test for board present */
  53         outb ( 0xff, eisa->ioaddr + EISA_MFG_ID_HI );
  54         present = inb ( eisa->ioaddr + EISA_MFG_ID_HI );
  55         if ( present & 0x80 ) {
  56                 /* No board present */
  57                 return 0;
  58         }
  59
  60         /* Read mfg and product IDs.  Yes, the resulting uint16_ts
  61          * will be upside-down.  This appears to be by design.
  62          */
  63         eisa->mfg_id = ( inb ( eisa->ioaddr + EISA_MFG_ID_LO ) << 8 )
  64                 + present;
  65         eisa->prod_id = ( inb ( eisa->ioaddr + EISA_PROD_ID_LO ) << 8 )
  66                 + inb ( eisa->ioaddr + EISA_PROD_ID_HI );
  67
  68         DBG ( "EISA found slot %hhx (base %#hx) ID %hx:%hx (\"%s\")\n",
  69               eisa->slot, eisa->ioaddr, eisa->mfg_id, eisa->prod_id,
  70               isa_id_string ( eisa->mfg_id, eisa->prod_id ) );
  71
  72         return 1;
  73 }
  74
  75 /*
  76  * Test whether or not a driver is capable of driving the device.
  77  *
  78  */
  79 static int eisa_check_driver ( struct bus_dev *bus_dev,
  80                                  struct device_driver *device_driver ) {
  81         struct eisa_device *eisa = ( struct eisa_device * ) bus_dev;
  82         struct eisa_driver *driver
  83                 = ( struct eisa_driver * ) device_driver->bus_driver_info;
  84         unsigned int i;
  85
  86         /* Compare against driver's ID list */
  87         for ( i = 0 ; i < driver->id_count ; i++ ) {
  88                 struct eisa_id *id = &driver->ids[i];
  89
  90                 if ( ( eisa->mfg_id == id->mfg_id ) &&
  91                      ( ISA_PROD_ID ( eisa->prod_id ) ==
  92                        ISA_PROD_ID ( id->prod_id ) ) ) {
  93                         DBG ( "EISA found ID %hx:%hx (\"%s\") "
  94                               "(device %s) matching driver %s\n",
  95                               eisa->mfg_id, eisa->prod_id,
  96                               isa_id_string ( eisa->mfg_id,
  97                                               eisa->prod_id ),
  98                               id->name, driver->name );
  99                         eisa->name = id->name;
 100                         return 1;
 101                 }
 102         }
 103
 104         /* No device found */
 105         return 0;
 106 }
 107
 108 /*
 109  * Describe an EISA device
 110  *
 111  */
 112 static char * eisa_describe_device ( struct bus_dev *bus_dev ) {
 113         struct eisa_device *eisa = ( struct eisa_device * ) bus_dev;
 114         static char eisa_description[] = "EISA 00";
 115
 116         sprintf ( eisa_description + 5, "%hhx", eisa->slot );
 117         return eisa_description;
 118 }
 119
 120 /*
 121  * Name an EISA device
 122  *
 123  */
 124 static const char * eisa_name_device ( struct bus_dev *bus_dev ) {
 125         struct eisa_device *eisa = ( struct eisa_device * ) bus_dev;
 126
 127         return eisa->name;
 128 }
 129
 130 /*
 131  * EISA bus operations table
 132  *
 133  */
 134 struct bus_driver eisa_driver __bus_driver = {
 135         .name                   = "EISA",
 136         .next_location          = eisa_next_location,
 137         .fill_device            = eisa_fill_device,
 138         .check_driver           = eisa_check_driver,
 139         .describe_device        = eisa_describe_device,
 140         .name_device            = eisa_name_device,
 141 };
 142
 143 /*
 144  * Fill in a nic structure
 145  *
 146  */
 147 void eisa_fill_nic ( struct nic *nic, struct eisa_device *eisa ) {
 148
 149         /* Fill in ioaddr and irqno */
 150         nic->ioaddr = eisa->ioaddr;
 151         nic->irqno = 0;
 152
 153         /* Fill in DHCP device ID structure */
 154         nic->dhcp_dev_id.bus_type = ISA_BUS_TYPE;
 155         nic->dhcp_dev_id.vendor_id = htons ( eisa->mfg_id );
 156         nic->dhcp_dev_id.device_id = htons ( eisa->prod_id );
 157 }
 158
 159 /*
 160  * Reset and enable/disable an EISA device
 161  *
 162  */
 163 void eisa_device_enabled ( struct eisa_device *eisa, int enabled ) {
 164         /* Set reset line high for 1000 µs.  Spec says 500 µs, but
 165          * this doesn't work for all cards, so we are conservative.
 166          */
 167         outb ( EISA_CMD_RESET, eisa->ioaddr + EISA_GLOBAL_CONFIG );
 168         udelay ( 1000 ); /* Must wait 800 */
 169
 170         /* Set reset low and write a 1 to ENABLE.  Delay again, in
 171          * case the card takes a while to wake up.
 172          */
 173         outb ( enabled ? EISA_CMD_ENABLE : 0,
 174                eisa->ioaddr + EISA_GLOBAL_CONFIG );
 175         udelay ( 1000 ); /* Must wait 800 */
 176
 177         DBG ( "EISA %s device %hhx\n", ( enabled ? "enabled" : "disabled" ),
 178               eisa->slot );
 179 }