URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [tags/] [nog_patch_50/] [or1ksim/] [testbench/] [eth.c] - Blame information for rev 702

Go to most recent revision | Details | Compare with Previous | View Log


/* Ethernet test */
 
#include "spr_defs.h"
#include "support.h"
 
typedef long off_t;
 
#include "../peripheral/fields.h"
#include "../peripheral/ethernet.h"
 
#define ETH_BASE 0x88000000LU
#define ETH_INT_LINE 0x15
 
typedef volatile unsigned long *REGISTER;
 
REGISTER
    eth_moder = (unsigned long *)(ETH_BASE + ETH_MODER),
        eth_int_source = (unsigned long *)(ETH_BASE + ETH_INT_SOURCE),
        eth_int_mask = (unsigned long *)(ETH_BASE + ETH_INT_MASK),
        eth_ipgt = (unsigned long *)(ETH_BASE + ETH_IPGT),
        eth_ipgr1 = (unsigned long *)(ETH_BASE + ETH_IPGR1),
        eth_ipgr2 = (unsigned long *)(ETH_BASE + ETH_IPGR2),
        eth_packetlen = (unsigned long *)(ETH_BASE + ETH_PACKETLEN),
        eth_collconf = (unsigned long *)(ETH_BASE + ETH_COLLCONF),
        eth_tx_bd_num = (unsigned long *)(ETH_BASE + ETH_TX_BD_NUM),
        eth_controlmoder = (unsigned long *)(ETH_BASE + ETH_CTRLMODER),
        eth_miimoder = (unsigned long *)(ETH_BASE + ETH_MIIMODER),
        eth_miicommand = (unsigned long *)(ETH_BASE + ETH_MIICOMMAND),
        eth_miiaddress = (unsigned long *)(ETH_BASE + ETH_MIIADDRESS),
        eth_miitx_data = (unsigned long *)(ETH_BASE + ETH_MIITX_DATA),
        eth_miirx_data = (unsigned long *)(ETH_BASE + ETH_MIIRX_DATA),
        eth_miistatus = (unsigned long *)(ETH_BASE + ETH_MIISTATUS),
        eth_mac_addr0 = (unsigned long *)(ETH_BASE + ETH_MAC_ADDR0),
        eth_mac_addr1 = (unsigned long *)(ETH_BASE + ETH_MAC_ADDR1),
        eth_bd_base = (unsigned long *)(ETH_BASE + ETH_BD_BASE);
 
unsigned int_happend;
unsigned char r_packet[0x1000];
unsigned char s_packet[1003];
 
 
void interrupt_handler()
{
    unsigned x;
    printf ("Int\n");
    switch (*eth_int_source & 0xf) {
    case 0x1: printf ("Transmit Error.\n"); break;
    case 0x2: printf ("Receive Buffer\n");break;
    case 0x4: printf ("Receive Frame\n");break;
    case 0x8: printf ("Busy\n"); break;
    case 0x0: printf ("Modem Status.\n"); break;
    default:
      printf ("Invalid iir @ %i\n", __LINE__);
      exit (1);
    }
    mtspr(SPR_PICSR, 0);
    int_happend = 1;
}
 
static void set_mac( void )
{
        *eth_mac_addr0 = 0x04030201LU;
        *eth_mac_addr1 = 0x00000605LU;
}
 
static void transmit_one_packet( void )
{
        unsigned i;
 
        /* Initialize packet */
        for ( i = 0; i < sizeof(s_packet); ++ i )
                s_packet[i] = (unsigned char)i;
 
        /* Set Ethernet BD */
        SET_FIELD(eth_bd_base[0], ETH_TX_BD, LENGTH, sizeof(s_packet));
        eth_bd_base[1] = (unsigned long)s_packet;
 
        /* Start Ethernet */
        SET_FLAG(eth_bd_base[0], ETH_TX_BD, READY);
        SET_FLAG(*eth_moder, ETH_MODER, TXEN);
 
        /* Now wait till sent */
        while ( TEST_FLAG( eth_bd_base[0], ETH_TX_BD, READY ) );
        CLEAR_FLAG(*eth_moder, ETH_MODER, TXEN);
}
 
static void transmit_one_packet_int( void )
{
        unsigned i;
 
        /* Initialize packet */
        for ( i = 0; i < sizeof(s_packet); ++ i )
                s_packet[i] = (unsigned char)i;
 
        /* Set Ethernet BD */
        SET_FIELD(eth_bd_base[2], ETH_TX_BD, LENGTH, sizeof(s_packet));
        eth_bd_base[3] = (unsigned long)s_packet;
 
        /* Start Ethernet */
        SET_FLAG(eth_bd_base[2], ETH_TX_BD, READY);
        SET_FLAG(*eth_moder, ETH_MODER, TXEN);
}
 
 
static void receive_one_packet(void)
{
  unsigned int i;
  unsigned int len;
 
  eth_bd_base[*eth_tx_bd_num + 1] = (unsigned long)r_packet;
 
  SET_FLAG(eth_bd_base[*eth_tx_bd_num], ETH_RX_BD, READY);
  SET_FLAG(*eth_moder, ETH_MODER, RXEN);
 
  while ( TEST_FLAG( eth_bd_base[*eth_tx_bd_num], ETH_RX_BD, READY ) );
  CLEAR_FLAG(*eth_moder, ETH_MODER, RXEN);
 
  len = GET_FIELD(eth_bd_base[*eth_tx_bd_num], ETH_RX_BD, LENGTH);
  for (i=0; i<len; i++)
      if (r_packet[i] != (unsigned char)i)
      {
          printf("Failed at byte %d. expect %d, received %d\n", i, i, r_packet[i]);
          exit(1);
      }
}
 
static void receive_one_packet_int(void)
{
  unsigned int i;
  unsigned int len;
 
  eth_bd_base[*eth_tx_bd_num + 3] = (unsigned long)r_packet;
 
  SET_FLAG(eth_bd_base[*eth_tx_bd_num + 2], ETH_RX_BD, READY);
  SET_FLAG(*eth_moder, ETH_MODER, RXEN);
 
  while ( TEST_FLAG( eth_bd_base[*eth_tx_bd_num + 2], ETH_RX_BD, READY ) );
  CLEAR_FLAG(*eth_moder, ETH_MODER, RXEN);
 
  len = GET_FIELD(eth_bd_base[*eth_tx_bd_num + 2], ETH_RX_BD, LENGTH);
  for (i=0; i<len; i++)
      if (r_packet[i] != (unsigned char)i)
      {
          printf("Failed at byte %d. expect %d, received %d\n", i, i, r_packet[i]);
          exit(1);
      }
}
 
int main()
{
        printf( "Starting Ethernet test\n" );
 
        set_mac();
        /* non iterrupt test */
        transmit_one_packet();
        receive_one_packet();
 
        /* interrupt test */
    excpt_int = (unsigned long)interrupt_handler;
    /* Enable interrupts */
    mtspr (SPR_SR, mfspr(SPR_SR) | SPR_SR_IEE);
    mtspr (SPR_PICMR, mfspr(SPR_PICMR) | (0x00000001L << ETH_INT_LINE));
 
 
 
        transmit_one_packet_int();
        /*
        while (!int_happend);
        receive_one_packet_int();
        while (!int_happend);
        */
 
        printf( "Ending Ethernet test\n" );
 
        report (0xdeaddead);
        return 0;
}
 
 

Line No.	Rev	Author	Line
1	258	erez	`/* Ethernet test */`
2
3	702	ivang	`#include "spr_defs.h"`
4	258	erez	`#include "support.h"`
5
6	325	erez	`typedef long off_t;`
7	258	erez
8			`#include "../peripheral/fields.h"`
9			`#include "../peripheral/ethernet.h"`
10
11			`#define ETH_BASE 0x88000000LU`
12	702	ivang	`#define ETH_INT_LINE 0x15`
13	258	erez
14			`typedef volatile unsigned long *REGISTER;`
15
16	325	erez	`REGISTER`
17	702	ivang	`eth_moder = (unsigned long *)(ETH_BASE + ETH_MODER),`
18	258	erez	`eth_int_source = (unsigned long *)(ETH_BASE + ETH_INT_SOURCE),`
19			`eth_int_mask = (unsigned long *)(ETH_BASE + ETH_INT_MASK),`
20			`eth_ipgt = (unsigned long *)(ETH_BASE + ETH_IPGT),`
21			`eth_ipgr1 = (unsigned long *)(ETH_BASE + ETH_IPGR1),`
22			`eth_ipgr2 = (unsigned long *)(ETH_BASE + ETH_IPGR2),`
23			`eth_packetlen = (unsigned long *)(ETH_BASE + ETH_PACKETLEN),`
24			`eth_collconf = (unsigned long *)(ETH_BASE + ETH_COLLCONF),`
25	418	erez	`eth_tx_bd_num = (unsigned long *)(ETH_BASE + ETH_TX_BD_NUM),`
26	258	erez	`eth_controlmoder = (unsigned long *)(ETH_BASE + ETH_CTRLMODER),`
27			`eth_miimoder = (unsigned long *)(ETH_BASE + ETH_MIIMODER),`
28			`eth_miicommand = (unsigned long *)(ETH_BASE + ETH_MIICOMMAND),`
29			`eth_miiaddress = (unsigned long *)(ETH_BASE + ETH_MIIADDRESS),`
30			`eth_miitx_data = (unsigned long *)(ETH_BASE + ETH_MIITX_DATA),`
31			`eth_miirx_data = (unsigned long *)(ETH_BASE + ETH_MIIRX_DATA),`
32			`eth_miistatus = (unsigned long *)(ETH_BASE + ETH_MIISTATUS),`
33			`eth_mac_addr0 = (unsigned long *)(ETH_BASE + ETH_MAC_ADDR0),`
34			`eth_mac_addr1 = (unsigned long *)(ETH_BASE + ETH_MAC_ADDR1),`
35	702	ivang	`eth_bd_base = (unsigned long *)(ETH_BASE + ETH_BD_BASE);`
36	258	erez
37	702	ivang	`unsigned int_happend;`
38			`unsigned char r_packet[0x1000];`
39			`unsigned char s_packet[1003];`
40
41
42			`void interrupt_handler()`
43	258	erez	`{`
44	702	ivang	`unsigned x;`
45			`printf ("Int\n");`
46			`switch (*eth_int_source & 0xf) {`
47			`case 0x1: printf ("Transmit Error.\n"); break;`
48			`case 0x2: printf ("Receive Buffer\n");break;`
49			`case 0x4: printf ("Receive Frame\n");break;`
50			`case 0x8: printf ("Busy\n"); break;`
51			`case 0x0: printf ("Modem Status.\n"); break;`
52			`default:`
53			`printf ("Invalid iir @ %i\n", __LINE__);`
54			`exit (1);`
55			`}`
56			`mtspr(SPR_PICSR, 0);`
57			`int_happend = 1;`
58			`}`
59	258	erez
60	418	erez	`static void set_mac( void )`
61	258	erez	`{`
62	418	erez	`*eth_mac_addr0 = 0x04030201LU;`
63			`*eth_mac_addr1 = 0x00000605LU;`
64			`}`
65
66			`static void transmit_one_packet( void )`
67			`{`
68	258	erez	`unsigned i;`
69	702	ivang
70	258	erez	`/* Initialize packet */`
71	702	ivang	`for ( i = 0; i < sizeof(s_packet); ++ i )`
72			`s_packet[i] = (unsigned char)i;`
73	258	erez
74	702	ivang	`/* Set Ethernet BD */`
75			`SET_FIELD(eth_bd_base[0], ETH_TX_BD, LENGTH, sizeof(s_packet));`
76			`eth_bd_base[1] = (unsigned long)s_packet;`
77	258	erez
78	702	ivang	`/* Start Ethernet */`
79			`SET_FLAG(eth_bd_base[0], ETH_TX_BD, READY);`
80			`SET_FLAG(*eth_moder, ETH_MODER, TXEN);`
81
82			`/* Now wait till sent */`
83			`while ( TEST_FLAG( eth_bd_base[0], ETH_TX_BD, READY ) );`
84			`CLEAR_FLAG(*eth_moder, ETH_MODER, TXEN);`
85			`}`
86	258	erez
87	702	ivang	`static void transmit_one_packet_int( void )`
88			`{`
89			`unsigned i;`
90
91			`/* Initialize packet */`
92			`for ( i = 0; i < sizeof(s_packet); ++ i )`
93			`s_packet[i] = (unsigned char)i;`
94	258	erez
95	702	ivang	`/* Set Ethernet BD */`
96			`SET_FIELD(eth_bd_base[2], ETH_TX_BD, LENGTH, sizeof(s_packet));`
97			`eth_bd_base[3] = (unsigned long)s_packet;`
98
99	258	erez	`/* Start Ethernet */`
100	702	ivang	`SET_FLAG(eth_bd_base[2], ETH_TX_BD, READY);`
101			`SET_FLAG(*eth_moder, ETH_MODER, TXEN);`
102			`}`
103	258	erez
104	702	ivang
105			`static void receive_one_packet(void)`
106			`{`
107			`unsigned int i;`
108			`unsigned int len;`
109
110			`eth_bd_base[*eth_tx_bd_num + 1] = (unsigned long)r_packet;`
111
112			`SET_FLAG(eth_bd_base[*eth_tx_bd_num], ETH_RX_BD, READY);`
113			`SET_FLAG(*eth_moder, ETH_MODER, RXEN);`
114
115			`while ( TEST_FLAG( eth_bd_base[*eth_tx_bd_num], ETH_RX_BD, READY ) );`
116			`CLEAR_FLAG(*eth_moder, ETH_MODER, RXEN);`
117
118			`len = GET_FIELD(eth_bd_base[*eth_tx_bd_num], ETH_RX_BD, LENGTH);`
119			`for (i=0; i<len; i++)`
120			`if (r_packet[i] != (unsigned char)i)`
121			`{`
122			`printf("Failed at byte %d. expect %d, received %d\n", i, i, r_packet[i]);`
123			`exit(1);`
124			`}`
125	258	erez	`}`
126
127	702	ivang	`static void receive_one_packet_int(void)`
128			`{`
129			`unsigned int i;`
130			`unsigned int len;`
131
132			`eth_bd_base[*eth_tx_bd_num + 3] = (unsigned long)r_packet;`
133
134			`SET_FLAG(eth_bd_base[*eth_tx_bd_num + 2], ETH_RX_BD, READY);`
135			`SET_FLAG(*eth_moder, ETH_MODER, RXEN);`
136	258	erez
137	702	ivang	`while ( TEST_FLAG( eth_bd_base[*eth_tx_bd_num + 2], ETH_RX_BD, READY ) );`
138			`CLEAR_FLAG(*eth_moder, ETH_MODER, RXEN);`
139
140			`len = GET_FIELD(eth_bd_base[*eth_tx_bd_num + 2], ETH_RX_BD, LENGTH);`
141			`for (i=0; i<len; i++)`
142			`if (r_packet[i] != (unsigned char)i)`
143			`{`
144			`printf("Failed at byte %d. expect %d, received %d\n", i, i, r_packet[i]);`
145			`exit(1);`
146			`}`
147			`}`
148
149	258	erez	`int main()`
150			`{`
151			`printf( "Starting Ethernet test\n" );`
152
153	418	erez	`set_mac();`
154	702	ivang	`/* non iterrupt test */`
155			`transmit_one_packet();`
156			`receive_one_packet();`
157
158			`/* interrupt test */`
159			`excpt_int = (unsigned long)interrupt_handler;`
160			`/* Enable interrupts */`
161			`mtspr (SPR_SR, mfspr(SPR_SR) \| SPR_SR_IEE);`
162			`mtspr (SPR_PICMR, mfspr(SPR_PICMR) \| (0x00000001L << ETH_INT_LINE));`
163
164
165
166			`transmit_one_packet_int();`
167			`/*`
168			`while (!int_happend);`
169			`receive_one_packet_int();`
170			`while (!int_happend);`
171			`*/`
172
173	258	erez	`printf( "Ending Ethernet test\n" );`
174
175	702	ivang	`report (0xdeaddead);`
176	310	markom	`return 0;`
177	258	erez	`}`
178
179

Browse

Tools

Subversion Repositories or1k

[/] [or1k/] [tags/] [nog_patch_50/] [or1ksim/] [testbench/] [eth.c] - Blame information for rev 702