gpxe: delete long since obsolete snapshot of gPXE

gPXE has been deprecated in favor of iPXE for many, many years now.
It is much better than users get it directly from the iPXE project,
since we should no longer need any special modifications for Syslinux
use.

Signed-off-by: H. Peter Anvin <hpa@zytor.com>

1 files changed, 0 insertions, 406 deletions

diff --git a/gpxe/src/net/infiniband/ib_mi.c b/gpxe/src/net/infiniband/ib_mi.c
deleted file mode 100644
index 7511fd87..00000000
--- a/gpxe/src/net/infiniband/ib_mi.c
+++ /dev/null
@@ -1,406 +0,0 @@
-/*
- * Copyright (C) 2009 Michael Brown <mbrown@fensystems.co.uk>.
- *
- * 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 any later version.
- *
- * This program is distributed in the hope that it will be useful, but
- * WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
- */
-
-FILE_LICENCE ( GPL2_OR_LATER );
-
-#include <stdint.h>
-#include <stdlib.h>
-#include <string.h>
-#include <errno.h>
-#include <stdio.h>
-#include <unistd.h>
-#include <byteswap.h>
-#include <gpxe/infiniband.h>
-#include <gpxe/iobuf.h>
-#include <gpxe/ib_mi.h>
-
-/**
- * @file
- *
- * Infiniband management interfaces
- *
- */
-
-/** Management interface number of send WQEs
- *
- * This is a policy decision.
- */
-#define IB_MI_NUM_SEND_WQES 4
-
-/** Management interface number of receive WQEs
- *
- * This is a policy decision.
- */
-#define IB_MI_NUM_RECV_WQES 2
-
-/** Management interface number of completion queue entries
- *
- * This is a policy decision
- */
-#define IB_MI_NUM_CQES 8
-
-/** TID magic signature */
-#define IB_MI_TID_MAGIC ( ( 'g' << 24 ) | ( 'P' << 16 ) | ( 'X' << 8 ) | 'E' )
-
-/** TID to use for next MAD */
-static unsigned int next_tid;
-
-/**
- * Handle received MAD
- *
- * @v ibdev		Infiniband device
- * @v mi		Management interface
- * @v mad		Received MAD
- * @v av		Source address vector
- * @ret rc		Return status code
- */
-static int ib_mi_handle ( struct ib_device *ibdev,
-			  struct ib_mad_interface *mi,
-			  union ib_mad *mad,
-			  struct ib_address_vector *av ) {
-	struct ib_mad_hdr *hdr = &mad->hdr;
-	struct ib_mad_transaction *madx;
-	struct ib_mad_agent *agent;
-
-	/* Look for a matching transaction by TID */
-	list_for_each_entry ( madx, &mi->madx, list ) {
-		if ( memcmp ( &hdr->tid, &madx->mad.hdr.tid,
-			      sizeof ( hdr->tid ) ) != 0 )
-			continue;
-		/* Found a matching transaction */
-		madx->op->complete ( ibdev, mi, madx, 0, mad, av );
-		return 0;
-	}
-
-	/* If there is no matching transaction, look for a listening agent */
-	for_each_table_entry ( agent, IB_MAD_AGENTS ) {
-		if ( ( ( agent->mgmt_class & IB_MGMT_CLASS_MASK ) !=
-		       ( hdr->mgmt_class & IB_MGMT_CLASS_MASK ) ) ||
-		     ( agent->class_version != hdr->class_version ) ||
-		     ( agent->attr_id != hdr->attr_id ) )
-			continue;
-		/* Found a matching agent */
-		agent->handle ( ibdev, mi, mad, av );
-		return 0;
-	}
-
-	/* Otherwise, ignore it */
-	DBGC ( mi, "MI %p RX TID %08x%08x ignored\n",
-	       mi, ntohl ( hdr->tid[0] ), ntohl ( hdr->tid[1] ) );
-	return -ENOTSUP;
-}
-
-/**
- * Complete receive via management interface
- *
- *
- * @v ibdev		Infiniband device
- * @v qp		Queue pair
- * @v av		Address vector
- * @v iobuf		I/O buffer
- * @v rc		Completion status code
- */
-static void ib_mi_complete_recv ( struct ib_device *ibdev,
-				  struct ib_queue_pair *qp,
-				  struct ib_address_vector *av,
-				  struct io_buffer *iobuf, int rc ) {
-	struct ib_mad_interface *mi = ib_qp_get_ownerdata ( qp );
-	union ib_mad *mad;
-	struct ib_mad_hdr *hdr;
-
-	/* Ignore errors */
-	if ( rc != 0 ) {
-		DBGC ( mi, "MI %p RX error: %s\n", mi, strerror ( rc ) );
-		goto out;
-	}
-
-	/* Sanity checks */
-	if ( iob_len ( iobuf ) != sizeof ( *mad ) ) {
-		DBGC ( mi, "MI %p RX bad size (%zd bytes)\n",
-		       mi, iob_len ( iobuf ) );
-		DBGC_HDA ( mi, 0, iobuf->data, iob_len ( iobuf ) );
-		goto out;
-	}
-	mad = iobuf->data;
-	hdr = &mad->hdr;
-	if ( hdr->base_version != IB_MGMT_BASE_VERSION ) {
-		DBGC ( mi, "MI %p RX unsupported base version %x\n",
-		       mi, hdr->base_version );
-		DBGC_HDA ( mi, 0, mad, sizeof ( *mad ) );
-		goto out;
-	}
-	DBGC ( mi, "MI %p RX TID %08x%08x (%02x,%02x,%02x,%04x) status "
-	       "%04x\n", mi, ntohl ( hdr->tid[0] ), ntohl ( hdr->tid[1] ),
-	       hdr->mgmt_class, hdr->class_version, hdr->method,
-	       ntohs ( hdr->attr_id ), ntohs ( hdr->status ) );
-	DBGC2_HDA ( mi, 0, mad, sizeof ( *mad ) );
-
-	/* Handle MAD */
-	if ( ( rc = ib_mi_handle ( ibdev, mi, mad, av ) ) != 0 )
-		goto out;
-
- out:
-	free_iob ( iobuf );
-}
-
-/** Management interface completion operations */
-static struct ib_completion_queue_operations ib_mi_completion_ops = {
-	.complete_recv = ib_mi_complete_recv,
-};
-
-/**
- * Transmit MAD
- *
- * @v ibdev		Infiniband device
- * @v mi		Management interface
- * @v mad		MAD
- * @v av		Destination address vector
- * @ret rc		Return status code
- */
-int ib_mi_send ( struct ib_device *ibdev, struct ib_mad_interface *mi,
-		 union ib_mad *mad, struct ib_address_vector *av ) {
-	struct ib_mad_hdr *hdr = &mad->hdr;
-	struct io_buffer *iobuf;
-	int rc;
-
-	/* Set common fields */
-	hdr->base_version = IB_MGMT_BASE_VERSION;
-	if ( ( hdr->tid[0] == 0 ) && ( hdr->tid[1] == 0 ) ) {
-		hdr->tid[0] = htonl ( IB_MI_TID_MAGIC );
-		hdr->tid[1] = htonl ( ++next_tid );
-	}
-	DBGC ( mi, "MI %p TX TID %08x%08x (%02x,%02x,%02x,%04x) status "
-	       "%04x\n", mi, ntohl ( hdr->tid[0] ), ntohl ( hdr->tid[1] ),
-	       hdr->mgmt_class, hdr->class_version, hdr->method,
-	       ntohs ( hdr->attr_id ), ntohs ( hdr->status ) );
-	DBGC2_HDA ( mi, 0, mad, sizeof ( *mad ) );
-
-	/* Construct directed route portion of response, if necessary */
-	if ( hdr->mgmt_class == IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE ) {
-		struct ib_mad_smp *smp = &mad->smp;
-		unsigned int hop_pointer;
-		unsigned int hop_count;
-
-		smp->mad_hdr.status |= htons ( IB_SMP_STATUS_D_INBOUND );
-		hop_pointer = smp->mad_hdr.class_specific.smp.hop_pointer;
-		hop_count = smp->mad_hdr.class_specific.smp.hop_count;
-		assert ( hop_count == hop_pointer );
-		if ( hop_pointer < ( sizeof ( smp->return_path.hops ) /
-				     sizeof ( smp->return_path.hops[0] ) ) ) {
-			smp->return_path.hops[hop_pointer] = ibdev->port;
-		} else {
-			DBGC ( mi, "MI %p TX TID %08x%08x invalid hop pointer "
-			       "%d\n", mi, ntohl ( hdr->tid[0] ),
-			       ntohl ( hdr->tid[1] ), hop_pointer );
-			return -EINVAL;
-		}
-	}
-
-	/* Construct I/O buffer */
-	iobuf = alloc_iob ( sizeof ( *mad ) );
-	if ( ! iobuf ) {
-		DBGC ( mi, "MI %p could not allocate buffer for TID "
-		       "%08x%08x\n",
-		       mi, ntohl ( hdr->tid[0] ), ntohl ( hdr->tid[1] ) );
-		return -ENOMEM;
-	}
-	memcpy ( iob_put ( iobuf, sizeof ( *mad ) ), mad, sizeof ( *mad ) );
-
-	/* Send I/O buffer */
-	if ( ( rc = ib_post_send ( ibdev, mi->qp, av, iobuf ) ) != 0 ) {
-		DBGC ( mi, "MI %p TX TID %08x%08x failed: %s\n",
-		       mi,  ntohl ( hdr->tid[0] ), ntohl ( hdr->tid[1] ),
-		       strerror ( rc ) );
-		free_iob ( iobuf );
-		return rc;
-	}
-
-	return 0;
-}
-
-/**
- * Handle management transaction timer expiry
- *
- * @v timer		Retry timer
- * @v expired		Failure indicator
- */
-static void ib_mi_timer_expired ( struct retry_timer *timer, int expired ) {
-	struct ib_mad_transaction *madx =
-		container_of ( timer, struct ib_mad_transaction, timer );
-	struct ib_mad_interface *mi = madx->mi;
-	struct ib_device *ibdev = mi->ibdev;
-	struct ib_mad_hdr *hdr = &madx->mad.hdr;
-
-	/* Abandon transaction if we have tried too many times */
-	if ( expired ) {
-		DBGC ( mi, "MI %p abandoning TID %08x%08x\n",
-		       mi, ntohl ( hdr->tid[0] ), ntohl ( hdr->tid[1] ) );
-		madx->op->complete ( ibdev, mi, madx, -ETIMEDOUT, NULL, NULL );
-		return;
-	}
-
-	/* Restart retransmission timer */
-	start_timer ( timer );
-
-	/* Resend MAD */
-	ib_mi_send ( ibdev, mi, &madx->mad, &madx->av );
-}
-
-/**
- * Create management transaction
- *
- * @v ibdev		Infiniband device
- * @v mi		Management interface
- * @v mad		MAD to send
- * @v av		Destination address, or NULL to use SM's GSI
- * @v op		Management transaction operations
- * @ret madx		Management transaction, or NULL
- */
-struct ib_mad_transaction *
-ib_create_madx ( struct ib_device *ibdev, struct ib_mad_interface *mi,
-		 union ib_mad *mad, struct ib_address_vector *av,
-		 struct ib_mad_transaction_operations *op ) {
-	struct ib_mad_transaction *madx;
-
-	/* Allocate and initialise structure */
-	madx = zalloc ( sizeof ( *madx ) );
-	if ( ! madx )
-		return NULL;
-	madx->mi = mi;
-	madx->timer.expired = ib_mi_timer_expired;
-	madx->op = op;
-
-	/* Determine address vector */
-	if ( av ) {
-		memcpy ( &madx->av, av, sizeof ( madx->av ) );
-	} else {
-		madx->av.lid = ibdev->sm_lid;
-		madx->av.sl = ibdev->sm_sl;
-		madx->av.qpn = IB_QPN_GSI;
-		madx->av.qkey = IB_QKEY_GSI;
-	}
-
-	/* Copy MAD */
-	memcpy ( &madx->mad, mad, sizeof ( madx->mad ) );
-
-	/* Add to list and start timer to send initial MAD */
-	list_add ( &madx->list, &mi->madx );
-	start_timer_nodelay ( &madx->timer );
-
-	return madx;
-}
-
-/**
- * Destroy management transaction
- *
- * @v ibdev		Infiniband device
- * @v mi		Management interface
- * @v madx		Management transaction
- */
-void ib_destroy_madx ( struct ib_device *ibdev __unused,
-		       struct ib_mad_interface *mi __unused,
-		       struct ib_mad_transaction *madx ) {
-
-	/* Stop timer and remove from list */
-	stop_timer ( &madx->timer );
-	list_del ( &madx->list );
-
-	/* Free transaction */
-	free ( madx );
-}
-
-/**
- * Create management interface
- *
- * @v ibdev		Infiniband device
- * @v type		Queue pair type
- * @ret mi		Management agent, or NULL
- */
-struct ib_mad_interface * ib_create_mi ( struct ib_device *ibdev,
-					 enum ib_queue_pair_type type ) {
-	struct ib_mad_interface *mi;
-	int rc;
-
-	/* Allocate and initialise fields */
-	mi = zalloc ( sizeof ( *mi ) );
-	if ( ! mi )
-		goto err_alloc;
-	mi->ibdev = ibdev;
-	INIT_LIST_HEAD ( &mi->madx );
-
-	/* Create completion queue */
-	mi->cq = ib_create_cq ( ibdev, IB_MI_NUM_CQES, &ib_mi_completion_ops );
-	if ( ! mi->cq ) {
-		DBGC ( mi, "MI %p could not allocate completion queue\n", mi );
-		goto err_create_cq;
-	}
-
-	/* Create queue pair */
-	mi->qp = ib_create_qp ( ibdev, type, IB_MI_NUM_SEND_WQES, mi->cq,
-				IB_MI_NUM_RECV_WQES, mi->cq );
-	if ( ! mi->qp ) {
-		DBGC ( mi, "MI %p could not allocate queue pair\n", mi );
-		goto err_create_qp;
-	}
-	ib_qp_set_ownerdata ( mi->qp, mi );
-	DBGC ( mi, "MI %p (%s) running on QPN %#lx\n",
-	       mi, ( ( type == IB_QPT_SMI ) ? "SMI" : "GSI" ), mi->qp->qpn );
-
-	/* Set queue key */
-	mi->qp->qkey = ( ( type == IB_QPT_SMI ) ? IB_QKEY_SMI : IB_QKEY_GSI );
-	if ( ( rc = ib_modify_qp ( ibdev, mi->qp ) ) != 0 ) {
-		DBGC ( mi, "MI %p could not set queue key: %s\n",
-		       mi, strerror ( rc ) );
-		goto err_modify_qp;
-	}
-
-	/* Fill receive ring */
-	ib_refill_recv ( ibdev, mi->qp );
-	return mi;
-
- err_modify_qp:
-	ib_destroy_qp ( ibdev, mi->qp );
- err_create_qp:
-	ib_destroy_cq ( ibdev, mi->cq );
- err_create_cq:
-	free ( mi );
- err_alloc:
-	return NULL;
-}
-
-/**
- * Destroy management interface
- *
- * @v mi		Management interface
- */
-void ib_destroy_mi ( struct ib_device *ibdev, struct ib_mad_interface *mi ) {
-	struct ib_mad_transaction *madx;
-	struct ib_mad_transaction *tmp;
-
-	/* Flush any outstanding requests */
-	list_for_each_entry_safe ( madx, tmp, &mi->madx, list ) {
-		DBGC ( mi, "MI %p destroyed while TID %08x%08x in progress\n",
-		       mi, ntohl ( madx->mad.hdr.tid[0] ),
-		       ntohl ( madx->mad.hdr.tid[1] ) );
-		madx->op->complete ( ibdev, mi, madx, -ECANCELED, NULL, NULL );
-	}
-
-	ib_destroy_qp ( ibdev, mi->qp );
-	ib_destroy_cq ( ibdev, mi->cq );
-	free ( mi );
-}