The Design and Implementation of the FreeBSD Operating System, Second Edition
Now available: The Design and Implementation of the FreeBSD Operating System (Second Edition)


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]

FreeBSD/Linux Kernel Cross Reference
sys/drivers/dp8390/wdeth.c

Version: -  FREEBSD  -  FREEBSD-13-STABLE  -  FREEBSD-13-0  -  FREEBSD-12-STABLE  -  FREEBSD-12-0  -  FREEBSD-11-STABLE  -  FREEBSD-11-0  -  FREEBSD-10-STABLE  -  FREEBSD-10-0  -  FREEBSD-9-STABLE  -  FREEBSD-9-0  -  FREEBSD-8-STABLE  -  FREEBSD-8-0  -  FREEBSD-7-STABLE  -  FREEBSD-7-0  -  FREEBSD-6-STABLE  -  FREEBSD-6-0  -  FREEBSD-5-STABLE  -  FREEBSD-5-0  -  FREEBSD-4-STABLE  -  FREEBSD-3-STABLE  -  FREEBSD22  -  l41  -  OPENBSD  -  linux-2.6  -  MK84  -  PLAN9  -  xnu-8792 
SearchContext: -  none  -  3  -  10 

    1 /*
    2 wdeth.c
    3 
    4 Created:        March 14, 1994 by Philip Homburg
    5 */
    6 
    7 #include "../drivers.h"
    8 
    9 #include <net/gen/ether.h>
   10 #include <net/gen/eth_io.h>
   11 #include "assert.h"
   12 
   13 #include "local.h"
   14 #include "dp8390.h"
   15 #include "wdeth.h"
   16 
   17 #if ENABLE_WDETH
   18 
   19 #define WET_ETHERNET    0x01            /* Ethernet transceiver */
   20 #define WET_STARLAN     0x02            /* Starlan transceiver */
   21 #define WET_INTERF_CHIP 0x04            /* has a WD83C583 interface chip */
   22 #define WET_BRD_16BIT   0x08            /* 16 bit board */
   23 #define WET_SLT_16BIT   0x10            /* 16 bit slot */
   24 #define WET_790         0x20            /* '790 chip */
   25 
   26 static int we_int_table[8]= { 9, 3, 5, 7, 10, 11, 15, 4 };
   27 static int we_790int_table[8]= { 0, 9, 3, 5, 7, 10, 11, 15 };
   28 
   29 _PROTOTYPE( static void we_init, (dpeth_t *dep)                         );
   30 _PROTOTYPE( static void we_stop, (dpeth_t *dep)                         );
   31 _PROTOTYPE( static int we_aliasing, (dpeth_t *dep)                      );
   32 _PROTOTYPE( static int we_interface_chip, (dpeth_t *dep)                );
   33 _PROTOTYPE( static int we_16bitboard, (dpeth_t *dep)                    );
   34 _PROTOTYPE( static int we_16bitslot, (dpeth_t *dep)                     );
   35 _PROTOTYPE( static int we_ultra, (dpeth_t *dep)                         );
   36 
   37 /*===========================================================================*
   38  *                              wdeth_probe                                  *
   39  *===========================================================================*/
   40 int wdeth_probe(dep)
   41 dpeth_t *dep;
   42 {
   43         int sum;
   44 
   45         if (dep->de_linmem == 0)
   46                 return 0;       /* No shared memory, so no WD board */
   47 
   48         sum = inb_we(dep, EPL_EA0) + inb_we(dep, EPL_EA1) +
   49                 inb_we(dep, EPL_EA2) + inb_we(dep, EPL_EA3) +
   50                 inb_we(dep, EPL_EA4) + inb_we(dep, EPL_EA5) +
   51                 inb_we(dep, EPL_TLB) + inb_we(dep, EPL_CHKSUM);
   52         if ((sum & 0xFF) != 0xFF)
   53                 return 0;       /* No ethernet board at this address */
   54 
   55         dep->de_initf= we_init;
   56         dep->de_stopf= we_stop;
   57         dep->de_prog_IO= 0;
   58         return 1;
   59 }
   60 
   61 /*===========================================================================*
   62  *                              we_init                                      *
   63  *===========================================================================*/
   64 static void we_init(dep)
   65 dpeth_t *dep;
   66 {
   67         int i, int_indx, int_nr;
   68         int tlb, rambit, revision;
   69         int icr, irr, hwr, b, gcr;
   70         int we_type;
   71         int sendq_nr;
   72 
   73         assert(dep->de_mode == DEM_ENABLED);
   74         assert(!(dep->de_flags & DEF_ENABLED));
   75 
   76         dep->de_address.ea_addr[0] = inb_we(dep, EPL_EA0);
   77         dep->de_address.ea_addr[1] = inb_we(dep, EPL_EA1);
   78         dep->de_address.ea_addr[2] = inb_we(dep, EPL_EA2);
   79         dep->de_address.ea_addr[3] = inb_we(dep, EPL_EA3);
   80         dep->de_address.ea_addr[4] = inb_we(dep, EPL_EA4);
   81         dep->de_address.ea_addr[5] = inb_we(dep, EPL_EA5);
   82 
   83         dep->de_dp8390_port= dep->de_base_port + EPL_DP8390;
   84 
   85         dep->de_16bit= 0;
   86 
   87         we_type= 0;
   88         we_type |= WET_ETHERNET;        /* assume ethernet */
   89         if (we_ultra(dep))
   90                 we_type |= WET_790;
   91         if (!we_aliasing(dep))
   92         {
   93                 if (we_interface_chip(dep))
   94                         we_type |= WET_INTERF_CHIP;
   95                 if (we_16bitboard(dep))
   96                 {
   97                         we_type |= WET_BRD_16BIT;
   98                         if (we_16bitslot(dep))
   99                                 we_type |= WET_SLT_16BIT;
  100                 }
  101         }
  102         if (we_type & WET_SLT_16BIT)
  103                 dep->de_16bit= 1;
  104 
  105         /* look at the on board ram size. */
  106         tlb= inb_we(dep, EPL_TLB);
  107         revision= tlb & E_TLB_REV;
  108         rambit= tlb & E_TLB_RAM;
  109 
  110         if (dep->de_ramsize != 0)
  111         {
  112                 /* size set from boot environment. */
  113         }
  114         else if (revision < 2)
  115         {
  116                 dep->de_ramsize= 0x2000;                        /* 8K */
  117                 if (we_type & WET_BRD_16BIT)
  118                         dep->de_ramsize= 0x4000;                /* 16K */
  119                 else if ((we_type & WET_INTERF_CHIP) &&
  120                         inb_we(dep, EPL_ICR) & E_ICR_MEMBIT)
  121                 {
  122                         dep->de_ramsize= 0x8000;                /* 32K */
  123                 }
  124         }
  125         else
  126         {
  127                 if (we_type & WET_BRD_16BIT)
  128                 {
  129                         /* 32K or 16K */
  130                         dep->de_ramsize= rambit ? 0x8000 : 0x4000;
  131                 }
  132                 else
  133                 {
  134                         /* 32K or 8K */
  135                         dep->de_ramsize= rambit ? 0x8000 : 0x2000;
  136                 }
  137         }
  138 
  139         if (we_type & WET_790)
  140         {
  141                 outb_we(dep, EPL_MSR, E_MSR_RESET);
  142                 if ((we_type & (WET_BRD_16BIT|WET_SLT_16BIT)) ==
  143                         (WET_BRD_16BIT|WET_SLT_16BIT))
  144                 {
  145                         outb_we(dep, EPL_LAAR, E_LAAR_LAN16E | E_LAAR_MEM16E);
  146                 }
  147         }
  148         else if (we_type & WET_BRD_16BIT)
  149         {
  150                 if (we_type & WET_SLT_16BIT)
  151                 {
  152                         outb_we(dep, EPL_LAAR, E_LAAR_A19 | E_LAAR_SOFTINT |
  153                                 E_LAAR_LAN16E | E_LAAR_MEM16E);
  154                 }
  155                 else
  156                 {
  157                         outb_we(dep, EPL_LAAR, E_LAAR_A19 | E_LAAR_SOFTINT |
  158                                 E_LAAR_LAN16E);
  159                 }
  160         }
  161 
  162         if (we_type & WET_790)
  163         {
  164                 outb_we(dep, EPL_MSR, E_MSR_MENABLE);
  165                 hwr= inb_we(dep, EPL_790_HWR);
  166                 outb_we(dep, EPL_790_HWR, hwr | E_790_HWR_SWH);
  167                 b= inb_we(dep, EPL_790_B);
  168                 outb_we(dep, EPL_790_B, ((dep->de_linmem >> 13) & 0x0f) |
  169                         ((dep->de_linmem >> 11) & 0x40) | (b & 0xb0));
  170                 outb_we(dep, EPL_790_HWR, hwr & ~E_790_HWR_SWH);
  171         }
  172         else
  173         {
  174                 outb_we(dep, EPL_MSR, E_MSR_RESET);
  175                 outb_we(dep, EPL_MSR, E_MSR_MENABLE |
  176                         ((dep->de_linmem >> 13) & E_MSR_MEMADDR));
  177         }
  178 
  179         if ((we_type & WET_INTERF_CHIP) && !(we_type & WET_790))
  180         {
  181                 icr= inb_we(dep, EPL_ICR);
  182                 irr= inb_we(dep, EPL_IRR);
  183                 int_indx= (icr & E_ICR_IR2) |
  184                         ((irr & (E_IRR_IR0|E_IRR_IR1)) >> 5);
  185                 int_nr= we_int_table[int_indx];
  186 #if DEBUG
  187  { printf("%s: encoded irq= %d\n", dep->de_name, int_nr); }
  188 #endif
  189                 if (dep->de_irq & DEI_DEFAULT) dep->de_irq= int_nr;
  190 
  191                 outb_we(dep, EPL_IRR, irr | E_IRR_IEN);
  192         }
  193         if (we_type & WET_790)
  194         {
  195                 hwr= inb_we(dep, EPL_790_HWR);
  196                 outb_we(dep, EPL_790_HWR, hwr | E_790_HWR_SWH);
  197 
  198                 gcr= inb_we(dep, EPL_790_GCR);
  199 
  200                 outb_we(dep, EPL_790_HWR, hwr & ~E_790_HWR_SWH);
  201 
  202                 int_indx= ((gcr & E_790_GCR_IR2) >> 4) |
  203                         ((gcr & (E_790_GCR_IR1|E_790_GCR_IR0)) >> 2);
  204                 int_nr= we_790int_table[int_indx];
  205 #if DEBUG
  206  { printf("%s: encoded irq= %d\n", dep->de_name, int_nr); }
  207 #endif
  208                 if (dep->de_irq & DEI_DEFAULT) dep->de_irq= int_nr;
  209 
  210                 icr= inb_we(dep, EPL_790_ICR);
  211                 outb_we(dep, EPL_790_ICR, icr | E_790_ICR_EIL);
  212         }
  213 
  214         /* Strip the "default flag." */
  215         dep->de_irq &= ~DEI_DEFAULT;
  216 
  217         if (!debug)
  218         {
  219                 printf("%s: WD80%d3 at %X:%d:%lX\n",
  220                         dep->de_name, we_type & WET_BRD_16BIT ? 1 : 0,
  221                         dep->de_base_port, dep->de_irq, dep->de_linmem);
  222         }
  223         else
  224         {
  225                 printf("%s: Western Digital %s%s card %s%s at I/O "
  226                         "address 0x%X, memory address 0x%lX, "
  227                         "memory size 0x%X, irq %d\n",
  228                         dep->de_name,
  229                         we_type & WET_BRD_16BIT ? "16-bit " : "", 
  230                         we_type & WET_ETHERNET ? "Ethernet" : 
  231                         we_type & WET_STARLAN ? "Starlan" : "Network",
  232                         we_type & WET_INTERF_CHIP ? "with an interface chip " : "",
  233                         we_type & WET_SLT_16BIT ? "in a 16-bit slot " : "",
  234                         dep->de_base_port, dep->de_linmem, dep->de_ramsize,
  235                         dep->de_irq);
  236         }
  237 
  238         dep->de_offset_page= 0;         /* Shared memory starts at 0 */
  239 
  240         /* Allocate one send buffer (1.5KB) per 8KB of on board memory. */
  241         sendq_nr= dep->de_ramsize / 0x2000;
  242         if (sendq_nr < 1)
  243                 sendq_nr= 1;
  244         else if (sendq_nr > SENDQ_NR)
  245                 sendq_nr= SENDQ_NR;
  246         dep->de_sendq_nr= sendq_nr;
  247         for (i= 0; i<sendq_nr; i++)
  248                 dep->de_sendq[i].sq_sendpage= i*SENDQ_PAGES;    
  249 
  250         dep->de_startpage= i*SENDQ_PAGES;
  251         dep->de_stoppage= dep->de_ramsize / DP_PAGESIZE;
  252 }
  253 
  254 /*===========================================================================*
  255  *                              we_stop                                      *
  256  *===========================================================================*/
  257 static void we_stop(dep)
  258 dpeth_t *dep;
  259 {
  260         if (dep->de_16bit)
  261                 outb_we(dep, EPL_LAAR, E_LAAR_A19 | E_LAAR_LAN16E);
  262         outb_we(dep, EPL_MSR, E_MSR_RESET);
  263         outb_we(dep, EPL_MSR, 0);
  264 }
  265 
  266 /*===========================================================================*
  267  *                              we_aliasing                                  *
  268  *===========================================================================*/
  269 static int we_aliasing(dep)
  270 dpeth_t *dep;
  271 {
  272 /* Determine whether wd8003 hardware performs register aliasing. This implies 
  273  * an old WD8003E board. */
  274 
  275         if (inb_we(dep, EPL_REG1) != inb_we(dep, EPL_EA1))
  276                 return 0;
  277         if (inb_we(dep, EPL_REG2) != inb_we(dep, EPL_EA2))
  278                 return 0;
  279         if (inb_we(dep, EPL_REG3) != inb_we(dep, EPL_EA3))
  280                 return 0;
  281         if (inb_we(dep, EPL_REG4) != inb_we(dep, EPL_EA4))
  282                 return 0;
  283         if (inb_we(dep, EPL_REG7) != inb_we(dep, EPL_CHKSUM))
  284                 return 0;
  285         return 1;
  286 }
  287 
  288 /*===========================================================================*
  289  *                              we_interface_chip                            *
  290  *===========================================================================*/
  291 static int we_interface_chip(dep)
  292 dpeth_t *dep;
  293 {
  294 /* Determine if the board has an interface chip. */
  295 
  296         outb_we(dep, EPL_GP2, 0x35);
  297         if (inb_we(dep, EPL_GP2) != 0x35)
  298                 return 0;
  299         outb_we(dep, EPL_GP2, 0x3A);
  300         if (inb_we(dep, EPL_GP2) != 0x3A)
  301                 return 0;
  302         return 1;
  303 }
  304 
  305 /*===========================================================================*
  306  *                              we_16bitboard                                *
  307  *===========================================================================*/
  308 static int we_16bitboard(dep)
  309 dpeth_t *dep;
  310 {
  311 /* Determine whether the board is capable of doing 16 bit memory moves.
  312  * If the 16 bit enable bit is unchangable by software we'll assume an 
  313  * 8 bit board.
  314  */
  315         int icr;
  316         u8_t tlb;
  317 
  318         icr= inb_we(dep, EPL_ICR);
  319 
  320         outb_we(dep, EPL_ICR, icr ^ E_ICR_16BIT);
  321         if (inb_we(dep, EPL_ICR) == icr)
  322         {
  323                 tlb= inb_we(dep, EPL_TLB);
  324 #if DEBUG
  325                 printf("%s: tlb= 0x%x\n", dep->de_name, tlb);
  326 #endif
  327                 return tlb == E_TLB_EB || tlb == E_TLB_E ||
  328                         tlb == E_TLB_SMCE || tlb == E_TLB_SMC8216T ||
  329                         tlb == E_TLB_SMC8216C;
  330         }
  331         outb_we(dep, EPL_ICR, icr);
  332         return (icr & E_ICR_16BIT);
  333 }
  334 
  335 /*===========================================================================*
  336  *                              we_16bitslot                                 *
  337  *===========================================================================*/
  338 static int we_16bitslot(dep)
  339 dpeth_t *dep;
  340 {
  341 /* Determine if the 16 bit board in plugged into a 16 bit slot.  */
  342         return !!(inb_we(dep, EPL_ICR) & E_ICR_16BIT);
  343 }
  344 
  345 /*===========================================================================*
  346  *                              we_ultra                                     *
  347  *===========================================================================*/
  348 static int we_ultra(dep)
  349 dpeth_t *dep;
  350 {
  351 /* Determine if we has an '790 chip.  */
  352         u8_t tlb;
  353 
  354         tlb= inb_we(dep, EPL_TLB);
  355         return tlb == E_TLB_SMC8216T || tlb == E_TLB_SMC8216C;
  356 }
  357 
  358 #endif /* ENABLE_WDETH */
  359 
  360 /*
  361  * $PchId: wdeth.c,v 1.10 2003/09/10 19:31:50 philip Exp $
  362  */

Cache object: 6419ae98026476d5c11a689fb8011b76


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]


This page is part of the FreeBSD/Linux Linux Kernel Cross-Reference, and was automatically generated using a modified version of the LXR engine.