Interlisp.medley/library/ETHERRECORDS.TEDIT

1

Lisp Library Modules, Medley Release 1.0, ETHERRECORDS
1

Lisp Library Modules, Medley Release 1.0, ETHERRECORDS
ETHERRECORDS
1

ETHERRECORDS
1


ETHERRECORDS
6

EtherRecords(ETHERRECORDS NIL EtherRecords NIL NIL 69) contains a collection of record definitions needed for low-level Ethernet programming in Lisp.  
Installation
1

Load ETHERRECORDS  from the library.  
General Purpose Records(GENERAL% PURPOSE% RECORDS NIL General% Purpose% Records NIL NIL 69)
1

ETHERPACKET	[Data type]	
A data type describing a level-zero Ethernet packet.  Use a BLOCKRECORD overlaying this record to define various level-one packets (see PUP and XIP below for examples).
SYSQUEUE	[Data type]
A data type implementing a low-level queue for Ethernet use.
QABLEITEM(QABLEITEM (record) NIL NIL NIL 69)	[Record]
A record that overlays any data type whose first field is a pointer used for linking items on a SYSQUEUE.
NS Records(NS% RECORDS NIL NS% Records NIL NIL 69)
1

XIP(XIP (record) NIL NIL NIL 69)	[Record]	
A record overlaying ETHERPACKET describing the layout of a standard Xerox Internet Packet.
ERRORXIP(ERRORXIP (record) NIL NIL NIL 69)	[Record]	
A record overlaying ETHERPACKET describing the layout of a standard XNS error packet.  The value of the ERRORXIPCODE field of this record is the most interesting one for programmatic handling of XIP errors.  The variable XIPERRORCODES contains constants defining most of the standard error codes.
\XIPOVLEN 	[Constant]	
A constant representing the number of bytes in a XIP exclusive of the data portion; i.e., the LENGTH field of a XIP is the byte length of its data portion plus \XIPOVLEN.
\MAX.XIPDATALENGTH	[Constant]
A constant, the maximum number of bytes permitted in a standard XIP (546).
NSHOSTNUMBER(NSHOSTNUMBER (record) NIL NIL NIL 69)	[Record]
A record describing a 48-bit XNS host number.
NSADDRESS	[Data type]
A data type describing a complete XNS address: 32-bit network, 48-bit host, 16-bit socket.
NSNAME	[Data type]
A data type describing a standard three-part Clearinghouse name.
PUP Records(PUP% RECORDS NIL PUP% Records NIL NIL 70)
1

PUP(PUP (record) NIL NIL NIL 70)	[Record]	
A record overlaying ETHERPACKET describing the layout of a standard PUP (PARC Universal Packet).
ERRORPUP(ERRORPUP (record) NIL NIL NIL 70)	[Record]	
A record overlaying ETHERPACKET describing the layout of a standard PUP error packet.  The value of the ERRORPUPCODE field of this record is the most interesting one for programmatic handling of PUP errors.  The variable PUPERRORCODES contains constants defining most of the standard error codes.
PUPADDRESS(PUPADDRESS (record) NIL NIL NIL 70)	[Record]	
A record describing how to take a 16-bit PUP address apart into 8-bit network and host numbers.
\PUPOVLEN	[Constant] 	
A constant representing the number of bytes in a PUP exclusive of the data portion; i.e., the LENGTH field of a PUP is the byte length of its data portion plus \PUPOVLEN.
\MAX.PUPDATALENGTH	[Constant] 	
A constant, the maximum number of bytes permitted in a standard PUP (532).
\LOCALPUPADDRESS	[Macro]
\LOCALPUPHOSTNUMBER	[Macro]
\LOCALPUPNETNUMBER	[Macro]
These three macros return components of the PUP address of the machine on which the code is running.  \LOCALPUPHOSTNUMBER and \LOCALPUPNETNUMBER return the machine's 8-bit host and 8-bit net numbers, respectively; \LOCALPUPADDRESS returns both as a 16-bit number, suitable as a value of the PUPSOURCE field of the PUP record.	
[This page intentionally left blank]

(LIST ((PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC "" "") STARTINGPAGE# 69) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD RIGHT) CHARLOOKS (SUPERSCRIPT 0 INVISIBLE OFF SELECTPOINT OFF PROTECTED OFF SIZE 10 FAMILY HELVETICA OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF EXPANSION REGULAR SLOPE REGULAR WEIGHT MEDIUM INVERTED OFF USERINFO NIL STYLE NIL) FORMATINFO (ARABIC "" "")) (270 15 288 36) NIL) (HEADING NIL (HEADINGTYPE FOOTINGR) (54 27 558 36) NIL) (TEXT NIL NIL (54 54 504 702) NIL))) (PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC "" "")) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD LEFT) CHARLOOKS (SUPERSCRIPT 0 INVISIBLE OFF SELECTPOINT OFF PROTECTED OFF SIZE 10 FAMILY HELVETICA OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF EXPANSION REGULAR SLOPE REGULAR WEIGHT MEDIUM INVERTED OFF USERINFO NIL STYLE NIL) FORMATINFO (ARABIC "" "")) (54 15 288 36) NIL) (HEADING NIL (HEADINGTYPE FOOTINGV) (54 27 558 36) NIL) (HEADING NIL (HEADINGTYPE VERSOHEAD) (54 762 558 36) NIL) (TEXT NIL NIL (54 54 504 684) NIL))) (PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC "" "")) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD RIGHT) CHARLOOKS (SUPERSCRIPT 0 INVISIBLE OFF SELECTPOINT OFF PROTECTED OFF SIZE 10 FAMILY HELVETICA OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF EXPANSION REGULAR SLOPE REGULAR WEIGHT MEDIUM INVERTED OFF USERINFO NIL STYLE NIL) FORMATINFO (ARABIC "" "")) (270 15 288 36) NIL) (HEADING NIL (HEADINGTYPE FOOTINGR) (54 27 558 36) NIL) (HEADING NIL (HEADINGTYPE RECTOHEAD) (54 762 558 36) NIL) (TEXT NIL NIL (54 54 504 684) NIL)))))3HH
<01>



<01>

T,HH
<01>
6
<01>

,
<01>

T2ll
<01>


<01>
2HH
<01>


<01>
2HH
<01>



<01>
,HH
<01>

3
<01>


<01>

T-
<01>

T-
<01>
<00>
<01>
TF
<01>


<01>
PAGEHEADING	VERSOHEADF
<01>

<01>
PAGEHEADING	RECTOHEADE
<01>



<01>
PAGEHEADINGFOOTINGVE
<01>




<01>
PAGEHEADINGFOOTINGR
	HELVETICA
CLASSICTITAN
CLASSIC
	HELVETICA	HELVETICAMODERN
MODERNMODERNMODERN

HRULE.GETFN
MODERN

7


HRULE.GETFN
MODERN


7



HRULE.GETFN
MODERN




HRULE.GETFN
MODERN
	
	
HRULE.GETFN
MODERN
	*
IM.INDEX.GETFNa

	
HRULE.GETFN
MODERN

D
IM.INDEX.GETFN
	
HRULE.GETFN
MODERN

<b
=	#
IM.INDEX.GETFN
MODERN

`


(
IM.INDEX.GETFN
	
HRULE.GETFN
MODERN

IM.INDEX.GETFN
MODERN


<"
IM.INDEX.GETFN
MODERN
Ii
?




^=


K&
IM.INDEX.GETFN
MODERN

.
	
[
@
*
IM.INDEX.GETFN

HRULE.GETFN
MODERN

IM.INDEX.GETFN
MODERN


B"
IM.INDEX.GETFN
MODERN
Ii
?
$
IM.INDEX.GETFN
MODERN
`




^=





K





	



gG=	
%




<EFBFBD><00>z<EFBFBD>