273 lines
5.9 KiB
Ucode
273 lines
5.9 KiB
Ucode
|
/*
|
||
|
* TX ucode for the Intel IXP2400 in POS-PHY mode.
|
||
|
* Copyright (C) 2004, 2005 Lennert Buytenhek
|
||
|
* Dedicated to Marija Kulikova.
|
||
|
*
|
||
|
* This program is free software; you can redistribute it and/or modify
|
||
|
* it under the terms of the GNU General Public License as published by
|
||
|
* the Free Software Foundation; either version 2 of the License, or
|
||
|
* (at your option) any later version.
|
||
|
*
|
||
|
* Assumptions made in this code:
|
||
|
* - The IXP2400 MSF is configured for POS-PHY mode, in a mode where
|
||
|
* only one TBUF partition is used. This includes, for example,
|
||
|
* 1x32 SPHY and 1x32 MPHY32, but not 4x8 SPHY or 1x32 MPHY4. (This
|
||
|
* is not an exhaustive list.)
|
||
|
* - The TBUF uses 64-byte mpackets.
|
||
|
* - TX descriptors reside in SRAM, and have the following format:
|
||
|
* struct tx_desc
|
||
|
* {
|
||
|
* // to uengine
|
||
|
* u32 buf_phys_addr;
|
||
|
* u32 pkt_length;
|
||
|
* u32 channel;
|
||
|
* };
|
||
|
* - Packet data resides in DRAM.
|
||
|
* - Packet buffer addresses are 8-byte aligned.
|
||
|
* - Scratch ring 2 is tx_pending.
|
||
|
* - Scratch ring 3 is tx_done, and has status condition 'full'.
|
||
|
* - This code is run on all eight threads of the microengine it runs on.
|
||
|
*/
|
||
|
|
||
|
#define TX_SEQUENCE_0 0x0060
|
||
|
#define TBUF_CTRL 0x1800
|
||
|
|
||
|
#define PARTITION_SIZE 128
|
||
|
#define PARTITION_THRESH 96
|
||
|
|
||
|
|
||
|
.sig volatile sig1
|
||
|
.sig volatile sig2
|
||
|
.sig volatile sig3
|
||
|
|
||
|
.reg @old_tx_seq_0
|
||
|
.reg @mpkts_in_flight
|
||
|
.reg @next_tbuf_mpacket
|
||
|
|
||
|
.reg @buffer_handle
|
||
|
.reg @buffer_start
|
||
|
.reg @packet_length
|
||
|
.reg @channel
|
||
|
.reg @packet_offset
|
||
|
|
||
|
.reg zero
|
||
|
|
||
|
immed[zero, 0]
|
||
|
|
||
|
/*
|
||
|
* Skip context 0 initialisation?
|
||
|
*/
|
||
|
.begin
|
||
|
br!=ctx[0, mpacket_tx_loop#]
|
||
|
.end
|
||
|
|
||
|
/*
|
||
|
* Wait until all pending TBUF elements have been transmitted.
|
||
|
*/
|
||
|
.begin
|
||
|
.reg read $tx
|
||
|
.sig zzz
|
||
|
|
||
|
loop_empty#:
|
||
|
msf[read, $tx, zero, TX_SEQUENCE_0, 1], ctx_swap[zzz]
|
||
|
alu_shf[--, --, b, $tx, >>31]
|
||
|
beq[loop_empty#]
|
||
|
|
||
|
alu[@old_tx_seq_0, --, b, $tx]
|
||
|
.end
|
||
|
|
||
|
immed[@mpkts_in_flight, 0]
|
||
|
alu[@next_tbuf_mpacket, @old_tx_seq_0, and, (PARTITION_SIZE - 1)]
|
||
|
|
||
|
immed[@buffer_handle, 0]
|
||
|
|
||
|
/*
|
||
|
* Initialise signal pipeline.
|
||
|
*/
|
||
|
.begin
|
||
|
local_csr_wr[SAME_ME_SIGNAL, (&sig1 << 3)]
|
||
|
.set_sig sig1
|
||
|
|
||
|
local_csr_wr[SAME_ME_SIGNAL, (&sig2 << 3)]
|
||
|
.set_sig sig2
|
||
|
|
||
|
local_csr_wr[SAME_ME_SIGNAL, (&sig3 << 3)]
|
||
|
.set_sig sig3
|
||
|
.end
|
||
|
|
||
|
mpacket_tx_loop#:
|
||
|
.begin
|
||
|
.reg tbuf_element_index
|
||
|
.reg buffer_handle
|
||
|
.reg sop_eop
|
||
|
.reg packet_data
|
||
|
.reg channel
|
||
|
.reg mpacket_size
|
||
|
|
||
|
/*
|
||
|
* If there is no packet currently being transmitted,
|
||
|
* dequeue the next TX descriptor, and fetch the buffer
|
||
|
* address, packet length and destination channel number.
|
||
|
*/
|
||
|
.begin
|
||
|
.reg read $stemp $stemp2 $stemp3
|
||
|
.xfer_order $stemp $stemp2 $stemp3
|
||
|
.sig zzz
|
||
|
|
||
|
ctx_arb[sig1]
|
||
|
|
||
|
alu[--, --, b, @buffer_handle]
|
||
|
bne[already_got_packet#]
|
||
|
|
||
|
tx_nobufs#:
|
||
|
scratch[get, $stemp, zero, 8, 1], ctx_swap[zzz]
|
||
|
alu[@buffer_handle, --, b, $stemp]
|
||
|
beq[tx_nobufs#]
|
||
|
|
||
|
sram[read, $stemp, $stemp, 0, 3], ctx_swap[zzz]
|
||
|
alu[@buffer_start, --, b, $stemp]
|
||
|
alu[@packet_length, --, b, $stemp2]
|
||
|
beq[zero_byte_packet#]
|
||
|
alu[@channel, --, b, $stemp3]
|
||
|
immed[@packet_offset, 0]
|
||
|
|
||
|
already_got_packet#:
|
||
|
local_csr_wr[SAME_ME_SIGNAL, (0x80 | (&sig1 << 3))]
|
||
|
.end
|
||
|
|
||
|
/*
|
||
|
* Determine tbuf element index, SOP/EOP flags, mpacket
|
||
|
* offset and mpacket size and cache buffer_handle and
|
||
|
* channel number.
|
||
|
*/
|
||
|
.begin
|
||
|
alu[tbuf_element_index, --, b, @next_tbuf_mpacket]
|
||
|
alu[@next_tbuf_mpacket, @next_tbuf_mpacket, +, 1]
|
||
|
alu[@next_tbuf_mpacket, @next_tbuf_mpacket, and,
|
||
|
(PARTITION_SIZE - 1)]
|
||
|
|
||
|
alu[buffer_handle, --, b, @buffer_handle]
|
||
|
immed[@buffer_handle, 0]
|
||
|
|
||
|
immed[sop_eop, 1]
|
||
|
|
||
|
alu[packet_data, --, b, @packet_offset]
|
||
|
bne[no_sop#]
|
||
|
alu[sop_eop, sop_eop, or, 2]
|
||
|
no_sop#:
|
||
|
alu[packet_data, packet_data, +, @buffer_start]
|
||
|
|
||
|
alu[channel, --, b, @channel]
|
||
|
|
||
|
alu[mpacket_size, @packet_length, -, @packet_offset]
|
||
|
alu[--, 64, -, mpacket_size]
|
||
|
bhs[eop#]
|
||
|
alu[@buffer_handle, --, b, buffer_handle]
|
||
|
immed[mpacket_size, 64]
|
||
|
alu[sop_eop, sop_eop, and, 2]
|
||
|
eop#:
|
||
|
|
||
|
alu[@packet_offset, @packet_offset, +, mpacket_size]
|
||
|
.end
|
||
|
|
||
|
/*
|
||
|
* Wait until there's enough space in the TBUF.
|
||
|
*/
|
||
|
.begin
|
||
|
.reg read $tx
|
||
|
.reg temp
|
||
|
.sig zzz
|
||
|
|
||
|
ctx_arb[sig2]
|
||
|
|
||
|
br[test_space#]
|
||
|
|
||
|
loop_space#:
|
||
|
msf[read, $tx, zero, TX_SEQUENCE_0, 1], ctx_swap[zzz]
|
||
|
|
||
|
alu[temp, $tx, -, @old_tx_seq_0]
|
||
|
alu[temp, temp, and, 0xff]
|
||
|
alu[@mpkts_in_flight, @mpkts_in_flight, -, temp]
|
||
|
|
||
|
alu[@old_tx_seq_0, --, b, $tx]
|
||
|
|
||
|
test_space#:
|
||
|
alu[--, PARTITION_THRESH, -, @mpkts_in_flight]
|
||
|
blo[loop_space#]
|
||
|
|
||
|
alu[@mpkts_in_flight, @mpkts_in_flight, +, 1]
|
||
|
|
||
|
local_csr_wr[SAME_ME_SIGNAL, (0x80 | (&sig2 << 3))]
|
||
|
.end
|
||
|
|
||
|
/*
|
||
|
* Copy the packet data to the TBUF.
|
||
|
*/
|
||
|
.begin
|
||
|
.reg temp
|
||
|
.sig copy_sig
|
||
|
|
||
|
alu[temp, mpacket_size, -, 1]
|
||
|
alu_shf[temp, 0x10, or, temp, >>3]
|
||
|
alu_shf[temp, 0x10, or, temp, <<21]
|
||
|
alu_shf[temp, temp, or, tbuf_element_index, <<11]
|
||
|
alu_shf[--, temp, or, 1, <<18]
|
||
|
|
||
|
dram[tbuf_wr, --, packet_data, 0, max_8],
|
||
|
indirect_ref, sig_done[copy_sig]
|
||
|
ctx_arb[copy_sig]
|
||
|
.end
|
||
|
|
||
|
/*
|
||
|
* Mark TBUF element as ready-to-be-transmitted.
|
||
|
*/
|
||
|
.begin
|
||
|
.reg write $tsw $tsw2
|
||
|
.xfer_order $tsw $tsw2
|
||
|
.reg temp
|
||
|
.sig zzz
|
||
|
|
||
|
alu_shf[temp, channel, or, mpacket_size, <<24]
|
||
|
alu_shf[$tsw, temp, or, sop_eop, <<8]
|
||
|
immed[$tsw2, 0]
|
||
|
|
||
|
immed[temp, TBUF_CTRL]
|
||
|
alu_shf[temp, temp, or, tbuf_element_index, <<3]
|
||
|
msf[write, $tsw, temp, 0, 2], ctx_swap[zzz]
|
||
|
.end
|
||
|
|
||
|
/*
|
||
|
* Resynchronise.
|
||
|
*/
|
||
|
.begin
|
||
|
ctx_arb[sig3]
|
||
|
local_csr_wr[SAME_ME_SIGNAL, (0x80 | (&sig3 << 3))]
|
||
|
.end
|
||
|
|
||
|
/*
|
||
|
* If this was an EOP mpacket, recycle the TX buffer
|
||
|
* and signal the host.
|
||
|
*/
|
||
|
.begin
|
||
|
.reg write $stemp
|
||
|
.sig zzz
|
||
|
|
||
|
alu[--, sop_eop, and, 1]
|
||
|
beq[mpacket_tx_loop#]
|
||
|
|
||
|
tx_done_ring_full#:
|
||
|
br_inp_state[SCR_Ring3_Status, tx_done_ring_full#]
|
||
|
|
||
|
alu[$stemp, --, b, buffer_handle]
|
||
|
scratch[put, $stemp, zero, 12, 1], ctx_swap[zzz]
|
||
|
cap[fast_wr, 0, XSCALE_INT_A]
|
||
|
br[mpacket_tx_loop#]
|
||
|
.end
|
||
|
.end
|
||
|
|
||
|
|
||
|
zero_byte_packet#:
|
||
|
halt
|
||
|
|
||
|
|