Re: Is there a way, in DCL, to find if I logged-in using ssh

From: amk (sumdavar_at_yahoo.com)
Date: 12/30/04 

Date: 30 Dec 2004 05:01:30 -0800

Thank you all. With your help I've written the following DCL script,
which, for the time being, will be good enough for what I want:
(By the way: When working with DECterm from eXcursion/DECwindows, the
terminal name also starts with "FT", as does
a terminal name in a session with SSH)

$ is_ssh = "False"
$ station =
f$edit(f$extract(1,2,f$getdvi("tt","tt_phydevnam")),"upcase")
$ if (f$getdvi("tt","tt_accpornam") .eqs. "") .and. -
f$getdvi(tt","tt_secure") .and. -
(station .eqs. "FT") then is_ssh = "True"
$ ! Enable either Console, "Set host" or SSH:
$ if (station .eqs. "OP") .or. (station .eqs. "RT") .or. (is_ssh)
$ then
$ continue
$ else
$ logout
$ endif

Relevant Pages