IP addresses

74 views
Skip to first unread message

Richard Newberry

unread,
Mar 6, 2006, 4:09:36 AM3/6/06
to intersystems...@info2.kinich.com
I'm trying to identify the IP address of a user that is logged into HP-UX
running cache.

I've tried:

s Job=##CLASS(%SYSTEM.Process).%OpenId($j)
w Job.ClientIPAddress

and this is null.

Any ideas?

Denver

unread,
Mar 6, 2006, 7:58:16 AM3/6/06
to intersystems...@info2.kinich.com
Richard Newberry wrote:
> I'm trying to identify the IP address of a user that is logged into HP-UX running Cache'.
>
> Any ideas?

Are folks connecting via telnet?
Is there a .login script that connects them to Cache'?

Jmparente

unread,
Mar 6, 2006, 6:01:41 PM3/6/06
to intersystems.public.cache
I had a similar issue when implementing a TCP server for logging
incoming socket connections. I contacted Intersystems and they informed
me that Cache 5.1 (and later) has additional features in this area.
Since I am running off Cache 5.0.18 this wasn't of much use. They gave
me a bit of code to try out, and it worked perfectly for what I needed.
Below is my code. It waits for a TCP socket connection and upon
receiving one identifies the IP address. The key function in this is
$zu (It then has to be formatted). I know this isn't exactly what you
are looking for, but perhaps it will help. This also works with Cache
5.1 and later, but the additional functionality is supposed to be more
robust and easier to use. I would contact Intersystems regarding that
functionality.

use tcp s aip=$zu(111,0)
s vClientIP=$a(aip,1)_"."_$a(aip,2)_"."_$a(aip,3)_"."_$a(aip,4)
use 0 w "["_$ZDT($h)_"] Connection Established From: "_$g(vClientIP),!

Richard Newberry

unread,
Mar 20, 2006, 4:29:43 AM3/20/06
to intersystems...@info2.kinich.com
Yes, I think it is Telnet....so will use $ZIO and store this on login.

Thanks.

"Denver" <ØDBraughlerØ_ØbwccØ·com> wrote in message
news:440c3...@info2.kinich.com...

t2.v...@gmail.com

unread,
Jan 10, 2018, 10:29:36 AM1/10/18
to IRIS, Caché, Ensemble
use below code, it will help you

S PROC=##CLASS(%SYS.ProcessQuery).Open($J)

w PROC.ClientIPAddress

t2.v...@gmail.com

unread,
Jan 10, 2018, 10:29:36 AM1/10/18
to IRIS, Caché, Ensemble
Only one changes is required in your syntax. you can use below code & it will work also.

       S PROC=##CLASS(%SYS.ProcessQuery).Open($J)
      w PROC.ClientIPAddress


On Monday, 6 March 2006 14:39:36 UTC+5:30, Richard Newberry wrote:
Reply all
Reply to author
Forward
0 new messages