+++ /dev/null
-#define net_init init_interface
-#define handle_network_read handle_read
-#define send_network_ack send_ack
-#define send_network_string send_string
-#define send_network_hex send_hex
-
-#include "sv_addr_ag.h"
-#include "e100boot.h"
-
-static void start_network_trans(void);
-
-void
-net_init(void)
-{
- *R_NETWORK_GA_1 = *R_NETWORK_GA_0 = 0;
-
- SET_ETHER_ADDR(0x01,0x40,0x8c,0x00,0x01,0x00,
- 0x01,0x40,0x8c,0x00,0x01,0x00);
-
- *R_NETWORK_REC_CONFIG =
- IO_STATE (R_NETWORK_REC_CONFIG, duplex, half) |
- IO_STATE (R_NETWORK_REC_CONFIG, bad_crc, discard) |
- IO_STATE (R_NETWORK_REC_CONFIG, oversize, discard) |
- IO_STATE (R_NETWORK_REC_CONFIG, undersize, discard) |
- IO_STATE (R_NETWORK_REC_CONFIG, all_roots, discard) |
- IO_STATE (R_NETWORK_REC_CONFIG, broadcast, discard) |
- IO_STATE (R_NETWORK_REC_CONFIG, individual, discard) |
- IO_STATE (R_NETWORK_REC_CONFIG, ma1, disable) |
- IO_STATE (R_NETWORK_REC_CONFIG, ma0, enable);
-
- *R_NETWORK_MGM_CTRL =
- IO_FIELD(R_NETWORK_MGM_CTRL, txd_pins, 0) |
- IO_FIELD(R_NETWORK_MGM_CTRL, txer_pin, 0) |
- IO_FIELD(R_NETWORK_MGM_CTRL, mdck, 0) |
- IO_STATE(R_NETWORK_MGM_CTRL, mdoe, disable) |
- IO_FIELD(R_NETWORK_MGM_CTRL, mdio, 0);
-
- *R_NETWORK_TR_CTRL =
- (IO_STATE (R_NETWORK_TR_CTRL, clr_error, clr) |
- IO_STATE (R_NETWORK_TR_CTRL, delay, none) |
- IO_STATE (R_NETWORK_TR_CTRL, cancel, dont) |
- IO_STATE (R_NETWORK_TR_CTRL, cd, enable) |
- IO_STATE (R_NETWORK_TR_CTRL, pad, enable) |
- IO_STATE (R_NETWORK_TR_CTRL, crc, enable) |
- IO_STATE (R_NETWORK_TR_CTRL, retry, enable));
-
- *R_NETWORK_GEN_CONFIG =
- IO_STATE (R_NETWORK_GEN_CONFIG, loopback, off) |
- IO_STATE (R_NETWORK_GEN_CONFIG, frame, ether) |
- IO_STATE (R_NETWORK_GEN_CONFIG, vg, off) |
- IO_STATE (R_NETWORK_GEN_CONFIG, phy, mii_clk) |
- IO_STATE (R_NETWORK_GEN_CONFIG, enable, on);
-
- *R_DMA_CH0_CMD = IO_STATE(R_DMA_CH0_CMD, cmd, reset);
- *R_DMA_CH1_CMD = IO_STATE(R_DMA_CH1_CMD, cmd, reset);
-
- rx_descr.sw_len = NETWORK_HEADER_LENGTH;
- rx_descr.ctrl = TX_CTRL;
- rx_descr.next = (udword)&rx_descr2;
- rx_descr.buf = (udword)&rx_header;
-
- rx_descr2.sw_len = 1500;
- rx_descr2.ctrl = TX_CTRL_EOP;
- rx_descr2.buf = target_address;
-
- /* Endian dependent, but saves a few bytes... */
- *(udword*)&tx_header.src[0] = htonl(0x02408c00);
- *(uword*)&tx_header.src[4] = htons(0x0100);
- tx_header.length = htons(64);
- tx_header.snap1 = htonl(0xaaaa0300);
- tx_header.snap2 = htonl(0x408c8856);
- tx_header.tag = htonl(0xfffffffe);
- tx_header.seq = 0;
- tx_header.type = 0;
-
- tx_descr.sw_len = NETWORK_HEADER_LENGTH;
- tx_descr.ctrl = TX_CTRL_EOP;
- tx_descr.buf = (udword)&tx_header;
-
- set_dest = FALSE;
- seq = 0;
-
- *R_DMA_CH1_FIRST = (udword)&rx_descr;
- *R_DMA_CH1_CMD = IO_STATE(R_DMA_CH1_CMD, cmd, start);
-}
-
-int
-handle_network_read(void)
-{
- if (!(rx_descr2.status & d_eop)) {
- return FALSE;
- }
-
- /* Even if wasn't to us, we must do this... */
- rx_descr2.status = 0;
- *R_DMA_CH1_FIRST = (udword)&rx_descr;
-
- /* Was it to me? */
- if (ntohl(rx_header.seq) == (seq+1)) {
- interface = NETWORK;
- last_timeout = *R_TIMER_DATA >> IO_BITNR(R_TIMER_DATA, timer0);
- nbr_read += rx_descr2.hw_len - CRC_LEN;
- rx_descr2.buf += rx_descr2.hw_len - CRC_LEN;
- rx_descr2.sw_len = bytes_to_read - nbr_read - CRC_LEN < 1500 ?
- bytes_to_read - nbr_read + CRC_LEN: 1500; /* FIX!!!!! */
- rx_descr2.sw_len = rx_descr2.sw_len + NETWORK_HEADER_LENGTH < 64
- ? 64 - NETWORK_HEADER_LENGTH : rx_descr2.sw_len; /* Less than minimum eth packet? */
-
- seq++;
- send_network_ack();
- }
-
- return TRUE;
-}
-
-void
-send_network_ack(void)
-{
-/* send_serial_string(">send_network_ack.\r\n"); */
-
- if (!set_dest) { /* Copy destination address from first received packet */
- set_dest = TRUE;
- /* If we have done a bootrom network boot, source address is in a different
- place... */
- if (((*R_BUS_STATUS & IO_MASK(R_BUS_STATUS, boot))
- >> IO_BITNR(R_BUS_STATUS, boot)) - 1 == NETWORK) {
- *(udword*)&tx_header.dest[0] = *(udword*)0x380000dc;
- *(uword*)&tx_header.dest[4] = *(uword*)0x380000e0;
- }
- else {
- *(udword*)&tx_header.dest[0] = *(udword*)&rx_header.src[0];
- *(uword*)&tx_header.dest[4] = *(uword*)&rx_header.src[4];
- }
- }
-
-#if 1
- tx_header.seq = htonl(seq);
- tx_header.type = htonl(ACK);
-#else
- tx_header.seq = htonl(seq);
- tx_header.type = htonl(bytes_to_read);
- tx_header.id = htonl(target_address);
- /* tx_header.id already set in start(). */
-#endif
-
- tx_descr.ctrl = TX_CTRL_EOP;
- tx_descr.sw_len = NETWORK_HEADER_LENGTH;
-
- start_network_trans();
-}
-
-void
-start_network_trans(void)
-{
-/* send_serial_string(">start_network_trans\r\n"); */
-
- /* Clear possible underrun or excessive retry errors */
-/* *R_NETWORK_TR_CTRL = */
-/* (IO_STATE (R_NETWORK_TR_CTRL, clr_error, clr) | */
-/* IO_STATE (R_NETWORK_TR_CTRL, delay, none) | */
-/* IO_STATE (R_NETWORK_TR_CTRL, cancel, dont) | */
-/* IO_STATE (R_NETWORK_TR_CTRL, cd, enable) | */
-/* IO_STATE (R_NETWORK_TR_CTRL, pad, enable) | */
-/* IO_STATE (R_NETWORK_TR_CTRL, crc, enable) | */
-/* IO_STATE (R_NETWORK_TR_CTRL, retry, enable)); */
-
- *R_DMA_CH0_FIRST = (udword)&tx_descr;
- *R_DMA_CH0_CMD = IO_STATE(R_DMA_CH0_CMD, cmd, start);
- while(*R_DMA_CH0_FIRST)
- ;
-}
-
-void
-send_network_string(char *str)
-{
- int i;
-
- tx_descr.next = (udword)&tx_descr2;
- tx_descr.ctrl = TX_CTRL;
- for (i = 0; str[i]; i++) /* strlen */
- ;
-
- tx_header.type = STRING;
-
- tx_descr2.ctrl = TX_CTRL_EOP;
- tx_descr2.buf = (udword)str;
- tx_descr2.sw_len = i+1;
-
- start_network_trans();
-}
-
-void
-send_network_hex(udword v, byte nl)
-{
- tx_descr.next = (udword)&tx_descr2;
- tx_descr.ctrl = TX_CTRL;
-
- tx_header.type = nl ? htonl(NET_INT_NL) : htonl(NET_INT);
-
- /* Pause so we don't saturate network. */
- /* Hehe, the asm will fool gcc to not remove the loop even though it
- probably should. If we volatile i the code will be a few bytes
- longer than this version. Well I really did it like this just
- because it is possible... */
- {
- udword i;
-
- for(i = 0; i != 16384; i++)
- __asm__ ("");
- }
-
- v = htonl(v);
- tx_descr2.ctrl = TX_CTRL_EOP;
- tx_descr2.buf = (udword)&v;
- tx_descr2.sw_len = (uword)sizeof(udword);
-
- start_network_trans();
-}