enetlib.c-fjj-bak

Ibmstb02500 miniboot 源码

/* openbios/enetLib/enetLib.c */
/*-----------------------------------------------------------------------------+
|
|       This source code has been made available to you by IBM on an AS-IS
|       basis.  Anyone receiving this source is licensed under IBM
|       copyrights to use it in any way he or she deems fit, including
|       copying it, modifying it, compiling it, and redistributing it either
|       with or without modifications.  No license under IBM patents or
|       patent applications is to be implied by the copyright license.
|
|       Any user of this software should understand that IBM cannot provide
|       technical support for this software and will not be responsible for
|       any consequences resulting from the use of this software.
|
|       Any person who transfers this source code or any derivative work
|       must include the IBM copyright notice, this paragraph, and the
|       preceding two paragraphs in the transferred software.
|
|       COPYRIGHT   I B M   CORPORATION 1995
|       LICENSED MATERIAL  -  PROGRAM PROPERTY OF I B M
+-----------------------------------------------------------------------------*/
/*-----------------------------------------------------------------------------+
|
|  File Name:  enetLib.c
|
|  Function:   This module contains the base module for the OpenBios
|              SMSC LAN91C111 Ethernet driver.
|
|  Author:     Alan Booker, Maciej P. Tyrlik, Jim Haller
|
|  Change Activity-
|
|  Date        Description of Change                                       BY
|  ---------   ---------------------                                       ---
|  13-Aug-93   Created                                                     AJB
|  27-May-94   Port to Oak                                                 MPT
|  07-Nov-94   Added error conditions, remove PASS.... defines             MPT
|  11-Jan-95   Added timeout to enet_send_macframe                         KDW
|  23-Jan-97   Ported to DDI board                                         KDW
|  20-Jan-99   Updated for Redwood III changes                             KDW
|  25-May-99   Added delays prior to each chip access                      pag
|  04-Jun-99   Updated enetRecv() to return correct byte count (issue 72)  pag
|  04-Jun-99   Fix for issue #73 - enetInt() - check own IP when pinged    pag
|  02-Feb-00   Inverted Extern Interrupt Polarity for Redwood IV/Vesta     jfh
|  13-Aug-01   ********* SMSC LAN91C111 ******************************     jfh
|  13-Aug-01   Complete rewrite for SMSC 91111 for Redwood V/Pallas        jfh
|  06-Dec-01   Fixing many bugs to let it work finally.                 YYD/GY
|  06-Mar-02   Fixed Autospeed negotiation problems.                    YYD/GY
|  24-Jun-02   Fixed ip address dynamic updating issues                    YYD
|
+-----------------------------------------------------------------------------*/

#include <types.h>
#include <sys/types.h>
#include <stdlib.h>
#include <limits.h>
#include <ppcLib.h>
#include <machine/endian.h>
#include <netinet/in_systm.h>
#include <netinet/in.h>
#include <netinet/ip.h>
#include <enetLib.h>
#include <openbios.h>
#include <string.h>
#include <eval.h>

#include "enetloc.h"
#define  u8 unsigned char
#define  u16 unsigned short
#define  u32 unsigned int 
#define  GPO_TEST  0x40060000

#define SMC_TLVL     0x00        // 0x08 is default

// 0000             1.16
//   ...
// 1000             1.00
//   ...
// 1111             0.86

/*-----------------------------------------------------------------------------+
| Private defines.
+-----------------------------------------------------------------------------*/

#undef  DEBUG_MSG_ISTHERE
#undef  DEBUG_MSG_TEST
#undef  DEBUG_MSG_INIT
#undef  DEBUG_MSG_PHYWRITE
#undef DEBUG_MSG_PHYREAD
#undef  DEBUG_MSG_PHYINT
#undef  DEBUG_MSG_SETSPEED
#undef  DEBUG_MSG_SETDUPLEX
#undef  DEBUG_MSG_PHYRESET
#undef  DEBUG_MSG_ENETRESET
#undef DEBUG_MSG_MACFRAME
#undef DEBUG_MSG_ENETSEND
#undef DEBUG_MSG_RCVPACKET



#define NUMRECV_BUFF                    2
#define LAN91C111_MEMORY_MULTIPLIER     (1024*2)

#define ALLOC_TIMEOUT   10      // 10 ms

typedef struct _RX_DESC
{
	unsigned char rxbyte;
	unsigned char status;
	unsigned short length;
}RX_DESC;

typedef union{
	u8 buf[4];
	RX_DESC desc;
} rx_t;

/*-----------------------------------------------------------------------------+
| Global variables.  Flih_bufnum and read_bufnum are used to point to correct
| receive buffer.
+-----------------------------------------------------------------------------*/
static char             hwd_addr[ENET_ADDR_LENGTH]=
                        {0x00, 0x60, 0x6E, 0x42, 0xB9, 0xff};
static char             brd_addr[ENET_ADDR_LENGTH]=
                        {0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF};
//unsigned char           next_packet_ptr;
static unsigned long    *ip_addr;
static unsigned char tx_num=0;
static char             outframe[ENET_MAX_MTU];
static volatile unsigned long    outframe_len=0;
static volatile int              flih_bufnum=0;
static volatile int              read_bufnum=0;


static struct {
   int                  inframe_len;
   char                 data[ENET_MAX_MTU+ 2];
}                       inframe[NUMRECV_BUFF];

static struct {
   void                 (*recv_function)(char *frame, unsigned long frame_len);
   unsigned long        ip_addr;
}                       osopen_enet;

extern long Ticks_per_sec;
extern int _callxlc(int,...);
extern struct board_cfg_data board_cfg;
static int      enet_rcv_packet(char *inframe, int max);

static struct enet_device dev;
static const char version[] = "v1.02 12/20/01\n";
static const char name[]    = "dm9000a";
unsigned char ip_packet=0;

/*******************************************************************************
* nsdelay - task delay to insure minimum clock values for the MAC-PHY
*
*
*/
static void nsdelay(unsigned long ns)
{
  unsigned long t1;
  unsigned long delay;

  while(ns)
  {
    t1 = powerpcMftbl();
    if(ns > 1000000000)
      delay = 1000000000;
    else
      delay = ns;
    ns -= delay;
    delay = 1 + (delay * (BOARD_CLOCK/1000000)+999)/1000;   //YYD, fixed potential mul overflow issue
    while(delay > powerpcMftbl() - t1);
  }
  return;
}



/*-----------------------------------------------------------------------------+
| EnetRecv.
+-----------------------------------------------------------------------------*/
int enetRecv(char *p, int len, int *parmp)
{

   int                  rc;
   tb_t                 tb_start;
   tb_t                 tb_end;
   unsigned long        msr;
//  s1printf("\n Enter Received Packet\n");
   (void)ppcMftb(&tb_start);
   while (1) {
   	
      msr=ppcAndMsr(~ppcMsrEE);
      /*-----------------------------------------------------------------------+
      | Frame length is reduced by 14 (6 for dest addr, 6 for source addr, and
      | 2 for frame type fields) since we only want to copy the data portion
      | of the packet.
      +-----------------------------------------------------------------------*/
      if (inframe[read_bufnum].inframe_len<len) {
         rc=inframe[read_bufnum].inframe_len - 14;
      } else {
         rc=len - 14;
      }
      /*-----------------------------------------------------------------------+
      | Frame data starts at byte 16 (2 for aligment 12 for addresses 2 for
      | frame type).
      +-----------------------------------------------------------------------*/
      if (rc>0) {
         (void)memcpy(p, &inframe[read_bufnum].data[14], rc);
         inframe[read_bufnum].inframe_len=0;
        read_bufnum=(read_bufnum+ 1)% NUMRECV_BUFF;
   /*    read_bufnum=read_bufnum+1;
       if(read_bufnum==100) read_bufnum=0;*/
         (void)ppcMtmsr(msr);

#ifdef DEBUG_MSG_RCVPACKET
           s1printf("Received Packet\n");
           dump( p, rc );
#endif
         return(rc);
      }
      (void)ppcMtmsr(msr);
      (void)ppcMftb(&tb_end);
      if (tbmilisec_dif(&tb_end, &tb_start)>9000) {  // timeout if it is larget than 9seconds
         return(-1);
      }
   }
}


u8 check_rx_ready(u8 rxbyte)
{
	if (!(rxbyte & 0x01))
		return 0;
	return ((rxbyte >> 4) | 0x01);
}

/*-----------------------------------------------------------------------------+
| Enet_rcv_packet.
*-------------------------------------------------------------------------------
 .
 . receive a packet from the card
 .
 . There is ( at least ) a packet waiting to be read from
 . chip-memory.
 .
 . o Read the status
 . o If an error, record it
 . o otherwise, read in the packet
 --------------------------------------------------------------*/
static int enet_rcv_packet(char *inframe,
           int max)
{

   int           packet_number;
   unsigned int  status;
   unsigned int  packet_length;

//   s1printf("%s:enet_rcv_packet&&&&&&&&&&&&&\n", dev.name);

   /* assume bank 2 */

	
	unsigned char rxbyte, val;
	unsigned short i, GoodPacket, tmplen = 0;
	u32 tmpdata;
        unsigned char MDRAH, MDRAL;
	rx_t rx;

	u16 * ptr = (u16*)&rx;
	u8* rdptr;
        do
          {
		/*store the value of Memory Data Read address register*/
		MDRAH=ior(DM9KS_MDRAH);
		MDRAL=ior(DM9KS_MDRAL);
		
		ior(DM9KS_MRCMDX);		/* Dummy read */
		rxbyte = in16(ENET_IO_ADDR+4)&0xff;	/* Got most updated data */

		/* packet ready to receive check */
		if(!(val = check_rx_ready(rxbyte))) break;

		/* A packet ready now  & Get status/length */
		GoodPacket = TRUE;
		iow(DM9KS_MRCMD);

		/* Read packet status & length */
                 *ptr = in16(ENET_IO_ADDR+4);
		packet_length= in16(ENET_IO_ADDR+4);
	//	s1printf("packet_length is %x\n",packet_length);		 
		

              /* rx.desc.length=(((rx.desc.length>>8) & 0xff) | ((rx.desc.length<<8) & 0xff00)); */

                     
			
			/* Read received packet from RX SARM */
		
			tmplen = (packet_length + 1) / 2;
			for (i = 0; i < tmplen; i++)
					((u16 *)inframe)[i] = in16(ENET_IO_ADDR+4);
					
		/*if((packet_length==0x40)&&inframe[0]==0xffff)
		  dump(inframe,packet_length);
			/* Pass to upper layer */
		/*	skb->protocol = eth_type_trans(skb,dev);*/
     }while((rxbyte & 0x01) == DM9KS_PKT_RDY);
		
	   return(packet_length-4);
}

/*-----------------------------------------------------------------------------+
| Enet_register.
+-----------------------------------------------------------------------------*/
int enet_register(void (*recv_function)(char *frame, unsigned long frame_len),
    unsigned long ip_addr)
{

   osopen_enet.recv_function=recv_function;
   osopen_enet.ip_addr=ip_addr;
   return(0);
}



/*-----------------------------------------------------------------------------+
| EnetisThere.
+-----------------------------------------------------------------------------*/


int enetisThere(unsigned long *ip_src,
    unsigned long *ip_dst, int *parmp)
{
   unsigned int    bank, i,id_val ;
   unsigned short  revision_register;
   unsigned int    base_address_register;
   extern struct board_cfg_data board_cfg;
   
#ifdef DEBUG_MSG_ISTHERE
   s1printf("enetisthere Entered...\n");
#endif

   nsdelay(1000000);
   (void)memcpy(hwd_addr, board_cfg.mac_address, sizeof(hwd_addr));
   (void)memcpy(parmp, hwd_addr, sizeof(hwd_addr));
   out16( ENET_IO_ADDR,DM9KS_VID_L);
   nsdelay(50);
   id_val = in16(ENET_IO_ADDR + 4)&0x00ff;
   nsdelay(50);
   out16(ENET_IO_ADDR,DM9KS_VID_H);