[Info-vax] Removing /identifier from rights list

[Hein RMS van den Heuvel]

On Thursday, September 25, 2014 6:53:10 PM UTC-4, Craig A. Berry wrote:
> On 9/25/14, 5:03 PM, Hein RMS van den Heuvel wrote:
> 
> 
> 
> > Craig> Only the first record in a series contains the name, so if that record got moved to the middle or end of a section, the preceding records would be unlikely to display the correct name.
> 
> > Again, I don't think that's correct.

My bad, I took too simple an example.
Forgot all about there being the 'leader' having ID + 0 + NAME
and the followers have ID + HOLDER only.

Hmm, indeed if you did not sort by whole record, one wonders.

Yes... I can reproduce this issue.

$ MCR AUTHORIZE SHOW HEIN ...
Identifier                         Value           Attributes
  X                                %X80010003
$ define /sys rightslist SYS$SYSDEVICE:[HEIN]RIGHTSLIST.TMP/exec
$ conv/share  SYS$SYSTEM:RIGHTSLIST.DAT RIGHTSLIST
$ open/read/write/shar=write r rightslist
$ x="abcd"
$ x[0,32]=%X80010003
$ read /key=&x r rec
$ show sym rec
  REC = "................X                               "
$ read /key=&x/del r rec
$ writ/sym r rec

$ MCR AUTHORIZE SHOW HEIN ...
Identifier                         Value           Attributes
  ..ý.............$.......PÀ...... %X80010003
$ deas/exec/system rightslist
$ MCR AUTHORIZE SHOW HEIN ...
Identifier                         Value           Attributes
  X                                %X80010003

So what happens here, is that I delete the first record with key %X80010003.
Then I re-insert which per RMS tradition adds it to the end of the duplicate chain.
Now authorize (actually, the system service) reads the first record which has no name.. and reports garbage, instead of giving a proper error.

To fix it:

$ sort/key=(pos:1,siz:4,bin,unsign)/key=(pos:8,siz:8) RIGHTSLIST RIGHTSLIST.SEQ/SEQ
$ anal/rms/fdl RIGHTSLIST
$ conv/fdl=RIGHTSLIST.FDL RIGHTSLIST.SEQ RIGHTSLIST
$ mcr authorize show hein
:
Identifier                         Value           Attributes
  X                                %X80010003

Cheers,
Hein