I'd like to clarify one part of my previous "explanation" of the rooted
directory.
I was not proposing a swap of vms$common for syscommon, but rather a test in
configure or subconfigure, warning that the system disk was misconfigured. I
don't think it would be wise to try to work around a problem like this; the
user should get her sysadmin to fix this up.
Likewise, if a user choses, as Peter has done, to use a logical name in the
mount command
$ Mount/system $1$dka1: user user
which then conflicts with a logical name which he defines at some later time
$ define/system/exec user $1$dka1:[u.] /trans=(terminal,concealed)
[this generates a warning message unless you add a /nolog qualifier or have
messages turned off vbg]
there really is nothing perl can, or should do, to "fix" this; a warning
should be issued (if we can figure this out --- not sure we can); but it
really is not something we can work around. From my own testing, it is clear
that the problem is that the exec mode logical name which is created when
the device is mounted in this manner (with the third argument specifying a
logical name) is what is returned by dvi_logvolnam; and when you replace it
by defining (with system privs)
an identical logical name in the same mode:
$ define/system/exec user $1$dka1:[u.] /trans=conc
then -- I was going to say, it would return the new value, but no:
ooops, I've been going along checking this on a 7.2-1 Alpha, and once I do
this define, f$getdvi ("DKA1:","LOGVOLNAM") returns ""... so now I am
totally confused.
At any rate, it appears that's Dan's advice should appear some where in
perlvms.pod in the Don't Do That category... this is getting too far-fetched
for me.
[EMAIL PROTECTED]
$ mount/system dka100 castor_data user
%MOUNT-I-MOUNTED, CASTOR_DATA mounted on _CASTOR$DKA100:
$ show log/full user
"USER" [exec] = "CASTOR$DKA100:" [concealed,terminal] (LNM$SYSTEM_TABLE)
$ set proc/priv=cmkrnl
$ set proc/priv=sysnam
$ define/system/exec user $1$dka100:[u.] /trans=(conc,term)
%DCL-I-SUPERSEDE, previous value of USER has been superseded
$ show log/full user
"USER" [exec] = "$1$DKA100:[U.]" [concealed,terminal] (LNM$SYSTEM_TABLE)
$
-----Original Message-----
From: Dan Sugalski [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, March 21, 2000 5:00 PM
To: Craig A. Berry
Cc: [EMAIL PROTECTED]
Subject: RE: Perl_cando(), rooted logicals, and volume labels
At 03:55 PM 3/21/00 -0600, Craig A. Berry wrote:
>At 02:23 PM 3/21/00 -0500, Dan Sugalski wrote:
> >At 01:15 PM 3/21/00 -0600, Craig A. Berry wrote:
