GetSocketObject (Socket function)

From m204wiki
Revision as of 20:23, 30 November 2011 by JALWiccan (talk | contribs) (1 revision)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to navigation Jump to search

Get a socket object for the given socket number (Socket class)


GetSocketObject returns a Socket object for a given socket number. It returns a reference to an instance of a Socket object, which can then be used with instance method calls.

Syntax

%socket = [%(Socket):]GetSocketObject( number)

Syntax terms

%socket A declared socket object or a reference to a Socket object.
[%(Socket):] The optional class name in parentheses denotes a virtual constructor method. See "Usage notes," below, for more information about invoking a Socketconstructor.
number The number of a socket that was created with $Sock_Conn.

Usage notes

  • GetSocketObject is a virtual constructor and as such can be called with no method object, with an explicit class name, or with an object variable, even if that object is null:

    %sock = GetSocketObject(num) %sock = %(Socket):GetSocketObject(num) %sock = %sock:GetSocketObject(num)

  • GetSocketObject is designed for adding Socket object code to an existing $Sock_xxx application, that is, for instantiating a socket from a socket number returned from $Sock_Conn. If you are building an entirely object-oriented socket application, use the New constructor.
  • After GetSocketObject returns, the socket is no longer accessible by its socket number. To access the socket by its number again, use GetSocketNumber.
  • If the object returned by a GetSocketObject invocation is the method object for a subsequent GetSocketNumber invocation, the NOCLOSE setting of the original numbered socket is applied to the numbered socket returned by GetSocketNumber. For information about NOCLOSE, see Set.

Example

In the following example,a socket created with $Sock_Conn is converted to a Socket object.

JANUS DEFINE PIPE * CLSOCK 8 REMOTE * * SOCKPMAX 10 JANUS START PIPE Begin %nums Is String Len 16 %sockhrb object Socket %CONN is float %CONN = $SOCK_CONN('PIPE', 'www.whrb.org', 80) %nums = %(Socket):Num('OPEN') %sockhrb = %(Socket):GetSocketObject(%nums) Print 'The %sockhrb status is: ' %sockhrb:Info('STAT') End

The example result is:

The %sockhrb status is: CONN