Unit Loopback

`MAX_LOOPBACK_BUFFERS = 256;`	Used for Recv Queues (Increased to Handle Higher Data Rate)
`MIN_LOOPBACK_BUFFERS = 4;`	Used for Send Queues

`Size:Word;`	Size of Data
`Data:array[0..MAX_PHYSICAL_PACKET - 3] of Byte;`	MAX_PHYSICAL_PACKET - Word

`constructor Create(AManager:TAdapterManager; ADevice:PNetworkDevice; const AName:String);`
private
`FHardwareAddress:THardwareAddress;`
public
`function AddTransport(APacketType,AFrameType:Word; const APacketName:String; APacketHandler:TAdapterPacketHandler):THandle; override;`
`function RemoveTransport(AHandle:THandle; APacketType:Word):Boolean; override;`

`function GetMTU(AHandle:THandle):Word; override;`

`function SendPacket(AHandle:THandle; ADest:Pointer; APacket:PPacketFragment; ASize:Integer):Boolean; override;`

`function GetHardwareAddress(AHandle:THandle):THardwareAddress; override;`

`function StartAdapter:Boolean; override;`
`function StopAdapter:Boolean; override;`
`function ProcessAdapter:Boolean; override;`

`constructor Create;`
`destructor Destroy; override;`
public
`Buffer:TAdapterBuffer;`

Contents