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, 442 deletions

diff --git a/gpxe/src/arch/i386/image/nbi.c b/gpxe/src/arch/i386/image/nbi.c
deleted file mode 100644
index a4ee4420..00000000
--- a/gpxe/src/arch/i386/image/nbi.c
+++ /dev/null
@@ -1,442 +0,0 @@
-#include <errno.h>
-#include <assert.h>
-#include <realmode.h>
-#include <gateA20.h>
-#include <memsizes.h>
-#include <basemem_packet.h>
-#include <gpxe/uaccess.h>
-#include <gpxe/segment.h>
-#include <gpxe/init.h>
-#include <gpxe/netdevice.h>
-#include <gpxe/fakedhcp.h>
-#include <gpxe/image.h>
-#include <gpxe/features.h>
-
-/** @file
- *
- * NBI image format.
- *
- * The Net Boot Image format is defined by the "Draft Net Boot Image
- * Proposal 0.3" by Jamie Honan, Gero Kuhlmann and Ken Yap.  It is now
- * considered to be a legacy format, but it still included because a
- * large amount of software (e.g. nymph, LTSP) makes use of NBI files.
- *
- * Etherboot does not implement the INT 78 callback interface
- * described by the NBI specification.  For a callback interface on
- * x86 architecture, use PXE.
- *
- */
-
-FEATURE ( FEATURE_IMAGE, "NBI", DHCP_EB_FEATURE_NBI, 1 );
-
-struct image_type nbi_image_type __image_type ( PROBE_NORMAL );
-
-/**
- * An NBI image header
- *
- * Note that the length field uses a peculiar encoding; use the
- * NBI_LENGTH() macro to decode the actual header length.
- *
- */
-struct imgheader {
-	unsigned long magic;		/**< Magic number (NBI_MAGIC) */
-	union {
-		unsigned char length;	/**< Nibble-coded header length */
-		unsigned long flags;	/**< Image flags */
-	};
-	segoff_t location;		/**< 16-bit seg:off header location */
-	union {
-		segoff_t segoff;	/**< 16-bit seg:off entry point */
-		unsigned long linear;	/**< 32-bit entry point */
-	} execaddr;
-} __attribute__ (( packed ));
-
-/** NBI magic number */
-#define NBI_MAGIC 0x1B031336UL
-
-/* Interpretation of the "length" fields */
-#define NBI_NONVENDOR_LENGTH(len)	( ( (len) & 0x0f ) << 2 )
-#define NBI_VENDOR_LENGTH(len)		( ( (len) & 0xf0 ) >> 2 )
-#define NBI_LENGTH(len) ( NBI_NONVENDOR_LENGTH(len) + NBI_VENDOR_LENGTH(len) )
-
-/* Interpretation of the "flags" fields */
-#define	NBI_PROGRAM_RETURNS(flags)	( (flags) & ( 1 << 8 ) )
-#define	NBI_LINEAR_EXEC_ADDR(flags)	( (flags) & ( 1 << 31 ) )
-
-/** NBI header length */
-#define NBI_HEADER_LENGTH	512
-
-/**
- * An NBI segment header
- *
- * Note that the length field uses a peculiar encoding; use the
- * NBI_LENGTH() macro to decode the actual header length.
- *
- */
-struct segheader {
-	unsigned char length;		/**< Nibble-coded header length */
-	unsigned char vendortag;	/**< Vendor-defined private tag */
-	unsigned char reserved;
-	unsigned char flags;		/**< Segment flags */
-	unsigned long loadaddr;		/**< Load address */
-	unsigned long imglength;	/**< Segment length in NBI file */
-	unsigned long memlength;	/**< Segment length in memory */
-};
-
-/* Interpretation of the "flags" fields */
-#define NBI_LOADADDR_FLAGS(flags)	( (flags) & 0x03 )
-#define NBI_LOADADDR_ABS		0x00
-#define NBI_LOADADDR_AFTER		0x01
-#define NBI_LOADADDR_END		0x02
-#define NBI_LOADADDR_BEFORE		0x03
-#define NBI_LAST_SEGHEADER(flags)	( (flags) & ( 1 << 2 ) )
-
-/* Define a type for passing info to a loaded program */
-struct ebinfo {
-	uint8_t  major, minor;  /* Version */
-	uint16_t flags;         /* Bit flags */
-};
-
-/** Info passed to NBI image */
-static struct ebinfo loaderinfo = {
-	VERSION_MAJOR, VERSION_MINOR,
-	0
-};
-
-/**
- * Prepare a segment for an NBI image
- *
- * @v image		NBI image
- * @v offset		Offset within NBI image
- * @v filesz		Length of initialised-data portion of the segment
- * @v memsz		Total length of the segment
- * @v src		Source for initialised data
- * @ret rc		Return status code
- */
-static int nbi_prepare_segment ( struct image *image, size_t offset __unused,
-				 userptr_t dest, size_t filesz, size_t memsz ){
-	int rc;
-
-	if ( ( rc = prep_segment ( dest, filesz, memsz ) ) != 0 ) {
-		DBGC ( image, "NBI %p could not prepare segment: %s\n",
-		       image, strerror ( rc ) );
-		return rc;
-	}
-
-	return 0;
-}
-
-/**
- * Load a segment for an NBI image
- *
- * @v image		NBI image
- * @v offset		Offset within NBI image
- * @v filesz		Length of initialised-data portion of the segment
- * @v memsz		Total length of the segment
- * @v src		Source for initialised data
- * @ret rc		Return status code
- */
-static int nbi_load_segment ( struct image *image, size_t offset,
-			      userptr_t dest, size_t filesz,
-			      size_t memsz __unused ) {
-	memcpy_user ( dest, 0, image->data, offset, filesz );
-	return 0;
-}
-
-/**
- * Process segments of an NBI image
- *
- * @v image		NBI image
- * @v imgheader		Image header information
- * @v process		Function to call for each segment
- * @ret rc		Return status code
- */
-static int nbi_process_segments ( struct image *image,
-				  struct imgheader *imgheader,
-				  int ( * process ) ( struct image *image,
-						      size_t offset,
-						      userptr_t dest,
-						      size_t filesz,
-						      size_t memsz ) ) {
-	struct segheader sh;
-	size_t offset = 0;
-	size_t sh_off;
-	userptr_t dest;
-	size_t filesz;
-	size_t memsz;
-	int rc;
-	
-	/* Copy image header to target location */
-	dest = real_to_user ( imgheader->location.segment,
-			      imgheader->location.offset );
-	filesz = memsz = NBI_HEADER_LENGTH;
-	if ( ( rc = process ( image, offset, dest, filesz, memsz ) ) != 0 )
-		return rc;
-	offset += filesz;
-
-	/* Process segments in turn */
-	sh_off = NBI_LENGTH ( imgheader->length );
-	do {
-		/* Read segment header */
-		copy_from_user ( &sh, image->data, sh_off, sizeof ( sh ) );
-		if ( sh.length == 0 ) {
-			/* Avoid infinite loop? */
-			DBGC ( image, "NBI %p invalid segheader length 0\n",
-			       image );
-			return -ENOEXEC;
-		}
-		
-		/* Calculate segment load address */
-		switch ( NBI_LOADADDR_FLAGS ( sh.flags ) ) {
-		case NBI_LOADADDR_ABS:
-			dest = phys_to_user ( sh.loadaddr );
-			break;
-		case NBI_LOADADDR_AFTER:
-			dest = userptr_add ( dest, memsz + sh.loadaddr );
-			break;
-		case NBI_LOADADDR_BEFORE:
-			dest = userptr_add ( dest, -sh.loadaddr );
-			break;
-		case NBI_LOADADDR_END:
-			/* Not correct according to the spec, but
-			 * maintains backwards compatibility with
-			 * previous versions of Etherboot.
-			 */
-			dest = phys_to_user ( ( extmemsize() + 1024 ) * 1024
-					      - sh.loadaddr );
-			break;
-		default:
-			/* Cannot be reached */
-			assert ( 0 );
-		}
-
-		/* Process this segment */
-		filesz = sh.imglength;
-		memsz = sh.memlength;
-		if ( ( offset + filesz ) > image->len ) {
-			DBGC ( image, "NBI %p segment outside file\n", image );
-			return -ENOEXEC;
-		}
-		if ( ( rc = process ( image, offset, dest,
-				      filesz, memsz ) ) != 0 ) {
-			return rc;
-		}
-		offset += filesz;
-
-		/* Next segheader */
-		sh_off += NBI_LENGTH ( sh.length );
-		if ( sh_off >= NBI_HEADER_LENGTH ) {
-			DBGC ( image, "NBI %p header overflow\n", image );
-			return -ENOEXEC;
-		}
-
-	} while ( ! NBI_LAST_SEGHEADER ( sh.flags ) );
-
-	if ( offset != image->len ) {
-		DBGC ( image, "NBI %p length wrong (file %zd, metadata %zd)\n",
-		       image, image->len, offset );
-		return -ENOEXEC;
-	}
-
-	return 0;
-}
-
-/**
- * Load an NBI image into memory
- *
- * @v image		NBI image
- * @ret rc		Return status code
- */
-static int nbi_load ( struct image *image ) {
-	struct imgheader imgheader;
-	int rc;
-
-	/* If we don't have enough data give up */
-	if ( image->len < NBI_HEADER_LENGTH ) {
-		DBGC ( image, "NBI %p too short for an NBI image\n", image );
-		return -ENOEXEC;
-	}
-
-	/* Check image header */
-	copy_from_user ( &imgheader, image->data, 0, sizeof ( imgheader ) );
-	if ( imgheader.magic != NBI_MAGIC ) {
-		DBGC ( image, "NBI %p has no NBI signature\n", image );
-		return -ENOEXEC;
-	}
-
-	/* This is an NBI image, valid or otherwise */
-	if ( ! image->type )
-		image->type = &nbi_image_type;
-
-	DBGC ( image, "NBI %p placing header at %hx:%hx\n", image,
-	       imgheader.location.segment, imgheader.location.offset );
-
-	/* NBI files can have overlaps between segments; the bss of
-	 * one segment may overlap the initialised data of another.  I
-	 * assume this is a design flaw, but there are images out
-	 * there that we need to work with.  We therefore do two
-	 * passes: first to initialise the segments, then to copy the
-	 * data.  This avoids zeroing out already-copied data.
-	 */
-	if ( ( rc = nbi_process_segments ( image, &imgheader,
-					   nbi_prepare_segment ) ) != 0 )
-		return rc;
-	if ( ( rc = nbi_process_segments ( image, &imgheader,
-					   nbi_load_segment ) ) != 0 )
-		return rc;
-
-	/* Record header address in image private data field */
-	image->priv.user = real_to_user ( imgheader.location.segment,
-					  imgheader.location.offset );
-
-	return 0;
-}
-
-/**
- * Boot a 16-bit NBI image
- *
- * @v imgheader		Image header information
- * @ret rc		Return status code, if image returns
- */
-static int nbi_boot16 ( struct image *image, struct imgheader *imgheader ) {
-	int discard_D, discard_S, discard_b;
-	int rc;
-
-	DBGC ( image, "NBI %p executing 16-bit image at %04x:%04x\n", image,
-	       imgheader->execaddr.segoff.segment,
-	       imgheader->execaddr.segoff.offset );
-
-	gateA20_unset();
-
-	__asm__ __volatile__ (
-		REAL_CODE ( "pushw %%ds\n\t"	/* far pointer to bootp data */
-			    "pushw %%bx\n\t"
-			    "pushl %%esi\n\t"	/* location */
-			    "pushw %%cs\n\t"	/* lcall execaddr */
-			    "call 1f\n\t"
-			    "jmp 2f\n\t"
-			    "\n1:\n\t"
-			    "pushl %%edi\n\t"
-			    "lret\n\t"
-			    "\n2:\n\t"
-			    "addw $8,%%sp\n\t"	/* clean up stack */ )
-		: "=a" ( rc ), "=D" ( discard_D ), "=S" ( discard_S ),
-		  "=b" ( discard_b )
-		: "D" ( imgheader->execaddr.segoff ),
-		  "S" ( imgheader->location ),
-		  "b" ( __from_data16 ( basemem_packet ) )
-		: "ecx", "edx", "ebp" );
-
-	gateA20_set();
-
-	return rc;
-}
-
-/**
- * Boot a 32-bit NBI image
- *
- * @v imgheader		Image header information
- * @ret rc		Return status code, if image returns
- */
-static int nbi_boot32 ( struct image *image, struct imgheader *imgheader ) {
-	int discard_D, discard_S, discard_b;
-	int rc;
-
-	DBGC ( image, "NBI %p executing 32-bit image at %lx\n",
-	       image, imgheader->execaddr.linear );
-
-	/* no gateA20_unset for PM call */
-
-	/* Jump to OS with flat physical addressing */
-	__asm__ __volatile__ (
-		PHYS_CODE ( "pushl %%ebx\n\t" /* bootp data */
-			    "pushl %%esi\n\t" /* imgheader */
-			    "pushl %%eax\n\t" /* loaderinfo */
-			    "call *%%edi\n\t"
-			    "addl $12, %%esp\n\t" /* clean up stack */ )
-		: "=a" ( rc ), "=D" ( discard_D ), "=S" ( discard_S ),
-		  "=b" ( discard_b )
-		: "D" ( imgheader->execaddr.linear ),
-		  "S" ( ( imgheader->location.segment << 4 ) +
-			imgheader->location.offset ),
-		  "b" ( virt_to_phys ( basemem_packet ) ),
-		  "a" ( virt_to_phys ( &loaderinfo ) )
-		: "ecx", "edx", "ebp", "memory" );
-
-	return rc;
-}
-
-/**
- * Prepare DHCP parameter block for NBI image
- *
- * @v image		NBI image
- * @ret rc		Return status code
- */
-static int nbi_prepare_dhcp ( struct image *image ) {
-	struct net_device *boot_netdev;
-	int rc;
-
-	boot_netdev = last_opened_netdev();
-	if ( ! boot_netdev ) {
-		DBGC ( image, "NBI %p could not identify a network device\n",
-		       image );
-		return -ENODEV;
-	}
-
-	if ( ( rc = create_fakedhcpack ( boot_netdev, basemem_packet,
-					 sizeof ( basemem_packet ) ) ) != 0 ) {
-		DBGC ( image, "NBI %p failed to build DHCP packet\n", image );
-		return rc;
-	}
-
-	return 0;
-}
-
-/**
- * Execute a loaded NBI image
- *
- * @v image		NBI image
- * @ret rc		Return status code
- */
-static int nbi_exec ( struct image *image ) {
-	struct imgheader imgheader;
-	int may_return;
-	int rc;
-
-	copy_from_user ( &imgheader, image->priv.user, 0,
-			 sizeof ( imgheader ) );
-
-	/* Prepare DHCP option block */
-	if ( ( rc = nbi_prepare_dhcp ( image ) ) != 0 )
-		return rc;
-
-	/* Shut down now if NBI image will not return */
-	may_return = NBI_PROGRAM_RETURNS ( imgheader.flags );
-	if ( ! may_return )
-		shutdown ( SHUTDOWN_BOOT );
-
-	/* Execute NBI image */
-	if ( NBI_LINEAR_EXEC_ADDR ( imgheader.flags ) ) {
-		rc = nbi_boot32 ( image, &imgheader );
-	} else {
-	        rc = nbi_boot16 ( image, &imgheader );
-	}
-
-	if ( ! may_return ) {
-		/* Cannot continue after shutdown() called */
-		DBGC ( image, "NBI %p returned %d from non-returnable image\n",
-		       image, rc  );
-		while ( 1 ) {}
-	}
-
-	DBGC ( image, "NBI %p returned %d\n", image, rc );
-
-	return rc;
-}
-
-/** NBI image type */
-struct image_type nbi_image_type __image_type ( PROBE_NORMAL ) = {
-	.name = "NBI",
-	.load = nbi_load,
-	.exec = nbi_exec,
-};