nxge_send.c revision 952a24641f0f0718ca2f69da6f0d8b144fe37b1e
/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License (the "License").
* You may not use this file except in compliance with the License.
*
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
* See the License for the specific language governing permissions
* and limitations under the License.
*
* When distributing Covered Code, include this CDDL HEADER in each
* file and include the License file at usr/src/OPENSOLARIS.LICENSE.
* If applicable, add the following below this CDDL HEADER, with the
* fields enclosed by brackets "[]" replaced with your own identifying
* information: Portions Copyright [yyyy] [name of copyright owner]
*
* CDDL HEADER END
*/
/*
* Copyright 2009 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
#include <sys/mac_provider.h>
#include <npi_tx_wr64.h>
/* Software LSO required header files */
static void nxge_hcksum_retrieve(mblk_t *,
extern uint32_t nxge_reclaim_pending;
extern uint32_t nxge_bcopy_thresh;
extern uint32_t nxge_dvma_thresh;
extern uint32_t nxge_dma_stream_thresh;
extern uint32_t nxge_tx_minfree;
extern uint32_t nxge_tx_intr_thres;
extern uint32_t nxge_tx_max_gathers;
extern uint32_t nxge_tx_tiny_pack;
extern uint32_t nxge_tx_use_bcopy;
extern nxge_tx_mode_t nxge_tx_scheme;
void
nxge_tx_ring_task(void *arg)
{
#if defined(sun4v)
else {
/* Call back vnet. */
}
}
#endif
}
static void
{
/*
* Kick the ring task to reclaim some buffers.
*/
}
mblk_t *
{
#ifdef DEBUG
if (isLDOMservice(nxgep)) {
}
#endif
if (status) {
return (mp);
}
}
#if defined(sun4v)
/*
* Hashing policy for load balancing over the set of TX rings
* available to the driver.
*/
/*
* nxge_m_tx() is needed for Hybrid I/O operation of the vnet in
* the guest domain. See CR 6778758 for long term solution.
*
* The guest domain driver will for now hash the packet
* to pick a DMA channel from the only group it has group 0.
*/
mblk_t *
{
int status;
/*
* Hash to pick a ring from Group 0, the only TX group
* for a guest domain driver.
*/
/*
* Get the ring handle.
*/
if (status != 0) {
return (mp);
}
}
}
#endif
int
{
int status = 0;
int last_bidx;
int len;
t_uscalar_t start_offset = 0;
t_uscalar_t stuff_offset = 0;
t_uscalar_t end_offset = 0;
t_uscalar_t value = 0;
t_uscalar_t cksum_flags = 0;
uint64_t tot_xfer_len = 0;
#ifdef NXGE_DEBUG
int dump_len;
int sad_len;
int xfer_len;
#endif
int cur_index_lso;
"==> nxge_start: Starting tdc %d desc pending %d",
if (!isLDOMguest(nxgep)) {
default:
"==> nxge_start: "
"link not up"));
goto nxge_start_fail1;
}
}
break;
case PORT_10G_FIBER:
/*
* For the following modes, check the link status
* before sending the packet out:
* nxge_lb_normal,
* nxge_lb_ext10g,
* nxge_lb_ext1000,
* nxge_lb_ext100,
* nxge_lb_ext10.
*/
"==> nxge_start: "
"link not up"));
goto nxge_start_fail1;
}
}
break;
}
}
"==> nxge_start: hardware not initialized or stopped"));
goto nxge_start_fail1;
}
if (nxgep->soft_lso_enable) {
"==> nxge_start(0): LSO mp $%p mp_chain $%p",
"==> nxge_send(0): NULL mp_chain $%p != mp $%p",
goto nxge_start_fail1;
}
"==> nxge_send(1): IS LSO mp_chain $%p != mp $%p",
}
}
start_offset += sizeof (ether_header_t);
stuff_offset += sizeof (ether_header_t);
} else {
start_offset += sizeof (struct ether_vlan_header);
stuff_offset += sizeof (struct ether_vlan_header);
}
if (cksum_flags & HCK_PARTIALCKSUM) {
"==> nxge_start: mp $%p len %d "
"cksum_flags 0x%x (partial checksum) ",
}
0, 0, pkthdrp,
lso_ngathers = 0;
if (isLDOMservice(nxgep)) {
if (tx_ring_p->tx_ring_offline) {
return (status);
}
}
ngathers = 0;
#ifdef NXGE_DEBUG
if (tx_ring_p->descs_pending) {
}
"==> nxge_start: tdc %d: dumping ...: b_rptr $%p "
"(Before header reserve: ORIGINAL LEN %d)",
dump_len));
#endif
(int)nxge_tx_minfree));
"TX Descriptor ring is channel %d mark mode %d",
(nxge_tx_minfree + lso_ngathers))) {
"TX Descriptor ring is full: channel %d",
"TX Descriptor ring is full: channel %d",
if (is_lso) {
/*
* free the current mp and mp_chain if not FULL.
*/
tdc_stats->tx_no_desc++;
"LSO packet: TX Descriptor ring is full: "
"channel %d",
goto nxge_start_fail_lso;
} else {
0, 1);
tdc_stats->tx_no_desc++;
if (isLDOMservice(nxgep)) {
if (tx_ring_p->tx_ring_offline) {
(void) atomic_swap_32(
}
}
status = 1;
goto nxge_start_fail1;
}
}
}
nmblks = 0;
ngathers = 0;
pkt_len = 0;
pack_len = 0;
clen = 0;
last_bidx = -1;
sop_index, i));
#ifdef NXGE_DEBUG
"==> nxge_start(1): wr_index %d i %d msgdsize %d",
#endif
/*
* The first 16 bytes of the premapped buffer are reserved
* for header. No padding will be used.
*/
} else {
}
while (nmp) {
if (len <= 0) {
continue;
}
nmblks++;
"len %d pkt_len %d pack_len %d",
/*
* Hardware limits the transfer length to 4K for NIU and
* 4076 (TX_MAX_TRANSFER_LENGTH) for Neptune. But we just
* use TX_MAX_TRANSFER_LENGTH as the limit for both.
* If len is longer than the limit, then we break nmp into
* two chunks: Make the first chunk equal to the limit and
* the second chunk for the remaining data. If the second
* chunk is still larger than the limit, then it will be
* broken into two in the next pass.
*/
} else {
if (is_lso) {
"LSO packet: dupb failed: "
"channel %d",
goto nxge_start_fail_lso;
} else {
goto nxge_start_fail2;
}
}
}
tx_desc_p = &tx_desc_ring_vp[i];
#ifdef NXGE_DEBUG
tx_desc_pp = &tx_desc_ring_pp[i];
#endif
tx_msg_p = &tx_msg_ring[i];
#if defined(__i386)
#else
#endif
if (!header_set &&
(len >= bcopy_thresh))) {
header_set = B_TRUE;
boff = 0;
pack_len = 0;
(void) ddi_dma_sync(dma_handle,
}
"desc entry %d "
"DESC IOADDR $%p "
"desc_vp $%p tx_desc_p $%p "
"desc_pp $%p tx_desc_pp $%p "
"len %d pkt_len %d pack_len %d",
i,
if (len < bcopy_thresh) {
"USE BCOPY: "));
if (nxge_tx_tiny_pack) {
TXDMA_DESC_NEXT_INDEX(i, -1,
"==> nxge_start(5): pack"));
if ((pack_len <= bcopy_thresh) &&
"==> nxge_start: pack(6) "
"(pkt_len %d pack_len %d)",
i = blst;
tx_desc_p = &tx_desc_ring_vp[i];
#ifdef NXGE_DEBUG
tx_desc_pp = &tx_desc_ring_pp[i];
#endif
tx_msg_p = &tx_msg_ring[i];
ngathers--;
} else if (pack_len > bcopy_thresh &&
header_set) {
boff = 0;
"==> nxge_start(7): > max NEW "
"bcopy thresh %d "
"pkt_len %d pack_len %d(next)",
}
last_bidx = i;
}
header_set = B_TRUE;
"==> nxge_start(7_x2): "
"pkt_len %d pack_len %d (new hdrp $%p)",
}
"USE BCOPY: before bcopy "
"DESC IOADDR $%p entry %d "
"bcopy packets %d "
"bcopy kaddr $%p "
"bcopy ioaddr (SAD) $%p "
"bcopy clen %d "
"bcopy boff %d",
clen,
boff));
"1USE BCOPY: "));
"2USE BCOPY: "));
"last USE BCOPY: copy from b_rptr $%p "
"to KADDR $%p (len %d offset %d",
#ifdef NXGE_DEBUG
"==> nxge_start: dump packets "
"(After BCOPY len %d)"
dump_len)));
#endif
(void) ddi_dma_sync(dma_handle,
tdc_stats->tx_hdr_pkts++;
"USE BCOPY: "
"DESC IOADDR $%p entry %d "
"bcopy packets %d "
"bcopy kaddr $%p "
"bcopy ioaddr (SAD) $%p "
"bcopy clen %d "
"bcopy boff %d",
i,
clen,
boff));
} else {
"USE DVMA: len %d", len));
if (len < nxge_dma_stream_thresh) {
} else {
}
&dma_cookie, &ncookies);
if (status == DDI_DMA_MAPPED) {
"==> nxge_start(12_1): "
"USE DVMA: len %d clen %d "
"ngathers %d",
ngathers));
#if defined(__i386)
#else
#endif
while (ncookies > 1) {
ngathers++;
/*
* this is the fix for multiple
* cookies, which are basically
* a descriptor entry, we don't set
* SOP bit as well as related fields
*/
(void) npi_txdma_desc_gather_set(
&tx_desc,
(ngathers -1),
clen);
"==> nxge_start: DMA "
"ncookie %d "
"ngathers %d "
"dma_ioaddr $%p len %d"
"desc $%p descp $%p (%d)",
&dma_cookie);
"==> nxge_start(12_2): "
"USE DVMA: len %d clen %d ",
i = TXDMA_DESC_NEXT_INDEX(i, 1,
tx_desc_p = &tx_desc_ring_vp[i];
#if defined(__i386)
#else
#endif
tx_msg_p = &tx_msg_ring[i];
ncookies--;
}
tdc_stats->tx_ddi_pkts++;
"DMA: ddi packets %d",
tdc_stats->tx_ddi_pkts));
} else {
"dma mapping failed for %d "
"bytes addr $%p flags %x (%d)",
if (is_lso) {
goto nxge_start_fail_lso;
} else {
goto nxge_start_fail2;
}
}
} /* ddi dvma */
if (is_lso) {
nmp_lso_save = nmp;
}
#if defined(__i386)
#else
#endif
ngathers++;
if (ngathers == 1) {
#ifdef NXGE_DEBUG
#endif
sop_tx_desc_p->value = 0;
} else {
#ifdef NXGE_DEBUG
save_desc_p = &tx_desc;
#endif
tmp_desc_p = &tx_desc;
tmp_desc_p->value = 0;
}
"Desc_entry %d ngathers %d "
"desc_vp $%p tx_desc_p $%p "
"len %d clen %d pkt_len %d pack_len %d nmblks %d "
"dma_ioaddr (SAD) $%p mark %d",
i, ngathers,
dma_ioaddr, mark_mode));
#ifdef NXGE_DEBUG
"\t\tsad $%p\ttr_len %d len %d\tnptrs %d\t"
"mark %d sop %d\n",
sad,
#endif
if (ngathers > nxge_tx_max_gathers) {
&cksum_flags);
"==> nxge_start(14): pull msg - "
"len %d pkt_len %d ngathers %d",
/* Pull all message blocks from b_cont */
if (is_lso) {
mp = nmp_lso_save;
goto nxge_start_fail_lso;
}
goto nxge_start_fail2;
}
goto nxge_start_fail2;
}
} /* while (nmp) */
#if defined(__i386)
#else
#endif
if (pkt_len > NXGE_MTU_DEFAULT_MAX) {
}
/* Assume we use bcopy to premapped buffers */
"==> nxge_start(14-1): < (msg_min + 16)"
"len %d pkt_len %d min_len %d bzero %d ngathers %d",
"==> nxge_start(14-2): < msg_min - "
"len %d pkt_len %d min_len %d ngathers %d",
}
cksum_flags));
{
/* pkt_len already includes 16 + paddings!! */
/* Update the control header length */
"==> nxge_start(15_x1): setting SOP "
"tot_xfer_len 0x%llx (%d) pkt_len %d tmp_len "
"0x%llx hdrp->value 0x%llx",
#if defined(_BIG_ENDIAN)
#else
#endif
TX_CTL, "==> nxge_start(15_x2): setting SOP "
"after SWAP: tot_xfer_len 0x%llx pkt_len %d "
"tmp_len 0x%llx hdrp->value 0x%llx",
}
"wr_index %d "
"tot_xfer_len (%d) pkt_len %d npads %d",
npads));
#ifdef NXGE_DEBUG
"\t\tsad $%p\ttr_len %d len %d\tnptrs %d\tmark %d sop %d\n",
sad,
"==> nxge_start: dump packets(17) (after sop set, len "
" (len/dump_len/pkt_len/tot_xfer_len) %d/%d/%d/%d):\n"
(char *)hdrp,
"==> nxge_start(18): TX desc sync: sop_index %d",
sop_index));
#endif
(void) ddi_dma_sync(tx_desc_dma_handle,
"cs_off = 0x%02X cs_s_off = 0x%02X "
"pkt_len %d ngathers %d sop_index %d\n",
} else { /* more than one descriptor and wrap around */
(void) ddi_dma_sync(tx_desc_dma_handle,
"cs_off = 0x%02X cs_s_off = 0x%02X "
"pkt_len %d ngathers %d sop_index %d\n",
(void) ddi_dma_sync(tx_desc_dma_handle,
0,
"cs_off = 0x%02X cs_s_off = 0x%02X "
"pkt_len %d ngathers %d sop_index %d\n",
}
}
"channel %d wr_index %d wrap %d ngathers %d desc_pend %d",
if (is_lso) {
lso_ngathers += ngathers;
if (nxge_lso_kick_cnt == lso_ngathers) {
{
/* Kick the Transmit kick register */
"==> nxge_start: more LSO: "
"LSO_CNT %d",
lso_ngathers));
}
lso_ngathers = 0;
ngathers = 0;
}
"==> nxge_start: lso again: "
"lso_gathers %d ngathers %d cur_index_lso %d "
"wr_index %d sop_index %d",
"==> nxge_start: next : count %d",
lso_ngathers));
goto start_again;
}
}
{
/* Kick start the Transmit kick register */
}
if (isLDOMservice(nxgep)) {
if (tx_ring_p->tx_ring_offline) {
}
}
return (status);
status = 0;
}
}
if (isLDOMservice(nxgep)) {
if (tx_ring_p->tx_ring_offline) {
(void) atomic_swap_32(
}
}
"==> nxge_start: lso exit (nothing changed)"));
goto nxge_start_fail1;
}
"==> nxge_start (channel %d): before lso "
"lso_gathers %d ngathers %d cur_index_lso %d "
"wr_index %d sop_index %d lso_again %d",
if (lso_again) {
lso_ngathers += ngathers;
}
"==> nxge_start (channel %d): after lso "
"lso_gathers %d ngathers %d cur_index_lso %d "
"wr_index %d sop_index %d lso_again %d",
if (good_packet == B_FALSE) {
for (i = 0; i < ngathers; i++) {
#if defined(__i386)
#else
#endif
"tx_desc_p = %X index = %d",
0, -1);
if (tx_ring_p->dvma_wr_index ==
tx_ring_p->dvma_wr_index = 0;
else
tx_msg_p->dma_handle)) {
"ddi_dma_unbind_handle failed");
}
}
}
}
if (isLDOMservice(nxgep)) {
if (tx_ring_p->tx_ring_offline) {
}
}
/* Add FMA to check the access handle nxge_hregh */
return (status);
}
/* Software LSO starts here */
static void
{
if ((*flags & (HCK_PARTIALCKSUM |
HCK_FULLCKSUM)) != 0) {
if ((*flags & HCK_PARTIALCKSUM) != 0) {
*start =
*stuff =
*end =
}
}
}
}
}
static void
{
*mss = 0;
}
"==> nxge_lso_info_get(flag !=NULL): mss %d *flags 0x%x",
}
"<== nxge_lso_info_get: mss %d", *mss));
}
/*
* Do Soft LSO on the oversized packet.
*
* 1. Create a chain of message for headers.
* 2. Fill up header messages with proper information.
* 3. Copy Eithernet, IP, and TCP headers from the original message to
* each new message with necessary adjustments.
* * Unchange the ethernet header for DIX frames. (by default)
* * IP Total Length field is updated to MSS or less(only for the last one).
* * IP Identification value is incremented by one for each packet.
* * TCP sequence Number is recalculated according to the payload length.
* * TCP partial Checksum
* 4. Update LSO information in the first message header.
* 5. Release the original message header.
*/
static mblk_t *
{
int pktlen;
int hdrlen;
int segnum;
int i;
struct ether_vlan_header *evh;
#ifdef __sparc
#endif
t_uscalar_t start_offset = 0;
t_uscalar_t stuff_offset = 0;
t_uscalar_t value = 0;
"==> nxge_do_softlso"));
/*
* check the length of LSO packet payload and calculate the number of
* segments to be generated.
*/
/* VLAN? */
ehlen = sizeof (struct ether_vlan_header);
else
ehlen = sizeof (struct ether_header);
"==> nxge_do_softlso: mss %d oiph $%p "
"original ip_sum oiph->ip_sum 0x%x "
"original tcp_sum otcph->th_sum 0x%x "
"oiph->ip_len %d pktlen %d ehlen %d "
"l4_len %d (0x%x) ip_len - iphlen %d ",
mss,
oiph,
/* IPv4 + TCP */
"<== nxge_do_softlso: not IPV4 "
"oiph->ip_len %d pktlen %d ehlen %d tcphlen %d",
tcphlen));
return (NULL);
}
"<== nxge_do_softlso: not TCP "
"oiph->ip_len %d pktlen %d ehlen %d tcphlen %d",
tcphlen));
return (NULL);
}
"<== nxge_do_softlso: len not matched "
"oiph->ip_len %d pktlen %d ehlen %d tcphlen %d",
tcphlen));
return (NULL);
}
/* TCP flags can not include URG, RST, or SYN */
} else { /* = */
}
"nxge_do_softlso: otcph $%p pktlen: %d, "
"hdrlen %d ehlen %d iphlen %d tcphlen %d "
"mblkl(mp): %d, mblkl(datamp): %d",
hckflags = 0;
"==> nxge_do_softlso: dst 0x%x src 0x%x sum 0x%x ~new 0x%x "
"hckflags 0x%x start_offset %d stuff_offset %d "
"value (original) 0x%x th_sum 0x%x "
"pktlen %d l4_len %d (0x%x) "
"MBLKL(mp): %d, MBLKL(datamp): %d dump header %s",
/*
* Start to process.
*/
"==> nxge_do_softlso: pktlen %d "
"MBLKL(mp): %d, MBLKL(datamp): %d "
"available %d mss %d segnum %d",
mss,
segnum));
/*
* Try to pre-allocate all header messages
*/
for (i = 0; i < segnum; i++) {
/* Clean up the mp_chain */
}
"<== nxge_do_softlso: "
"Could not allocate enough messages for headers!"));
return (NULL);
}
"==> nxge_do_softlso: "
"mp $%p nmp $%p mp_chain $%p mp_chain->b_next $%p",
}
"==> nxge_do_softlso: mp $%p nmp $%p mp_chain $%p",
/*
* Associate payload with new packets
*/
do_cleanup = B_TRUE;
"==>nxge_do_softlso: "
"Can not dupb(datamp), have to do clean up"));
goto cleanup_allocated_msgs;
}
"==> nxge_do_softlso: (loop) before mp $%p cmp $%p "
"dupb nmp $%p len %d left %d msd %d ",
"==> nxge_do_softlso: (loop) after mp $%p cmp $%p "
"dupb nmp $%p len %d left %d mss %d ",
"nxge_do_softlso: before available: %d, "
"left: %d, len: %d, segnum: %d MBLK(nmp): %d",
"nxge_do_softlso: after available: %d, "
"left: %d, len: %d, segnum: %d MBLK(nmp): %d",
while (len > 0) {
"nxge_do_softlso: (4) len > 0 available: %d, "
"left: %d, len: %d, segnum: %d MBLK(nmp): %d",
do_cleanup = B_TRUE;
"==> nxge_do_softlso: "
"Can not dupb(datamp) (1), :"
"have to do clean up"));
"==> nxge_do_softlso: "
"available: %d, left: %d, "
"len: %d, MBLKL(nmp): %d",
goto cleanup_allocated_msgs;
}
} else {
"==> nxge_do_softlso: "
"(1)available: %d, left: %d, "
"len: %d, MBLKL(nmp): %d",
"==> nxge_do_softlso: "
"Pointers must have been corrupted!\n"
"datamp: $%p, nmp: $%p, rptr: $%p",
(void *)datamp,
(void *)nmp,
(void *)rptr);
}
}
if (len < 0) {
"(5) len < 0 (less than 0)"
"available: %d, left: %d, len: %d, MBLKL(nmp): %d",
} else if (len == 0) {
"(5) len == 0"
"available: %d, left: %d, len: %d, "
"MBLKL(nmp): %d",
} else {
"(6)available b_cont == NULL : %d, "
"left: %d, len: %d, MBLKL(nmp): %d",
break; /* Done! */
}
}
"(7) do_softlso: "
"next mp in mp_chain available len != 0 : %d, "
"left: %d, len: %d, MBLKL(nmp): %d",
}
/*
* From now, start to fill up all headers for the first message
* Hardware checksum flags need to be updated separately for FULLCKSUM
* and PARTIALCKSUM cases. For full checksum, copy the original flags
* into every new packet is enough. But for HCK_PARTIALCKSUM, all
* required fields need to be updated properly.
*/
#ifdef __sparc
#else
#endif
/* calculate IP checksum and TCP pseudo header checksum */
"==> nxge_do_softlso: first mp $%p (mp_chain $%p) "
"mss %d pktlen %d l4_len %d (0x%x) "
"MBLKL(mp): %d, MBLKL(datamp): %d "
"ip_sum 0x%x "
"th_sum 0x%x sum 0x%x ) "
"dump first ip->tcp %s",
mss,
sum,
"==>nxge_do_softlso: middle l4_len %d ", l4_len));
#ifdef __sparc
#else
#endif
/* calculate IP checksum and TCP pseudo header checksum */
"==> nxge_do_softlso: middle ip_sum 0x%x "
"th_sum 0x%x "
" mp $%p (mp_chain $%p) pktlen %d "
"MBLKL(mp): %d, MBLKL(datamp): %d ",
}
/* Last segment */
/*
* The ip_len could be different from prior packets.
*/
#ifdef __sparc
#else
#endif
/* calculate IP checksum and TCP pseudo header checksum */
"==> nxge_do_softlso: last next "
"niph->ip_sum 0x%x "
"ntcph->th_sum 0x%x sum 0x%x "
"dump last ip->tcp %s "
"cmp $%p mp $%p (mp_chain $%p) pktlen %d (0x%x) "
"l4_len %d (0x%x) "
"MBLKL(mp): %d, MBLKL(datamp): %d ",
if (do_cleanup) {
"==> nxge_do_softlso: "
"Failed allocating messages, "
"have to clean up and fail!"));
}
}
/*
* We're done here, so just free the original message and return the
* new message chain, that could be NULL if failed, back to the caller.
*/
"<== nxge_do_softlso:mp_chain $%p", mp_chain));
return (mp_chain);
}
/*
* Will be called before NIC driver do further operation on the message.
* The input message may include LSO information, if so, go to softlso logic
* to eliminate the oversized LSO packet for the incapable underlying h/w.
* The return could be the same non-LSO message or a message chain for LSO case.
*
* The driver needs to call this function per packet and process the whole chain
* if applied.
*/
static mblk_t *
{
"==>nxge_lso_eliminate:"));
"==>nxge_lso_eliminate:"
"HW_LSO:mss %d mp $%p",
"<== nxge_lso_eliminate: "
"LSO: nmp not NULL nmp $%p mss %d mp $%p",
return (nmp);
} else {
"<== nxge_lso_eliminate_ "
"LSO: failed nmp NULL nmp $%p mss %d mp $%p",
return (NULL);
}
}
"<== nxge_lso_eliminate"));
return (mp);
}
static uint32_t
{
int i, odd;
uint32_t c = 0;
for (i = 0; i < (len / 2); i++) {
}
if (odd) {
}
sum &= 0xffff;
sum += c;
}
return (~sum & 0xffff);
}