Object <- AbstractTCPStream <- IRIXTCPStream |
|
|
Connect CountReadPending Disconnect Read ResolveHostname Write |
|
Socket |
| Field | Type | |
|---|---|---|
| Stream: | target: | Object |
| AbstractTCPStream: | connectState: | Unsigned |
| localPort: | Unsigned | |
| remoteIPAddress: | Unsigned | |
| remotePort: | Unsigned | |
| IRIXTCPStream: | socket: | Signed |
instance IRIXTCPStream tag; target: nilObject; connectState: 0; localPort: 0; remoteIPAddress: 0; remotePort: 0; socket: 0; end instance;
#endif Define Class IRIXTCPStream; inherits from AbstractTCPStream; field socket: Signed, getter, setter; // private, socket identifier for this stream attribute Socket: Signed; overrides Connect; // attempt to connect and set up the stream overrides Disconnect; // terminates the stream and deallocates buffers overrides Write; overrides Read; overrides CountReadPending; overrides ResolveHostname; // uses gethostbyname end class;