In <[log in to unmask]> [log in to unmask] writes:
> What I need is to be able to get the IP address of the workstation from within
> n
> MPE.
If you have the appropriate patches;
:showvar hpstdin_@
HPSTDIN_ACCESS_TYPE = NS/VT
HPSTDIN_TERMINAL_TYPE = 0 (T_DATA_ENTRY(4))
HPSTDIN_TRANSPORT_TYPE = TCP/IP
HPSTDIN_NETWORK_NODE = xxx.yyy.com (the station's node name here)
HPSTDIN_NETWORK_ADDR = nnn.nnn.nnn.nnn (the station's IP address here)
HPSTDIN_LINK_ADDR = not set yet...
and...
:showvar hplocport
HPLOCPORT = 1537
^^^^ (this will be '23' for telnet sessions under inetd on 5.5)
it's available for 5.0 and later systems (we have it on both our 5.0 and
5.5 systems).
As I recall, there were some quirks with telnet access. In our logon udc
(which checks node names and IP addresses) we double-check everything...
setvar _network_node ''
if bound(hpstdin_network_node) then
setvar _network_node '!hpstdin_network_node'
endif
setvar _network_addr ''
setvar _protocol 'VT'
if bound(hpstdin_network_addr) then
setvar _network_addr '!hpstdin_network_addr'
elseif bound(hpremipaddr) then
setvar _network_addr '!hpremipaddr'
endif
if bound(hplocport) then
if !hplocport=23 then
setvar _protocol 'TELNET'
endif
endif
Good luck,
Chris Bartram