Changing OpenVMS file protection in FORTRAN

[Richard kelly_2]

Hello,
I am not very familiar with calling systems services but I would like to be able to check and change a files protection and/or acl settings from FORTRAN.
Any pointers that will help to get this done will be greatly appreciated
Thanks
Richard

[Jan van den Ende]

Richard,

my quick & dirty suggestion would be to SPAWN a little DCL procedure to do it, but if that is possible/feasable/desirable in your specific situation?

Just too little info....

Proost.

Have one on me.

jpe

[Richard kelly_2]

Sorry about not providing enough info. I am actually helping out a colleague (blind leading the blind).

He is hoping to not do a spawn because he wants to be able to check the outcome and status of the commands after each one.

He is trying to read some information from a database and based on various settings he needs to apply or remove protections from particular VMS files.

I asked if he could use a DCL script to call a fortran program to check the database but he was not happy with that either. I was not sure if there was a system service or library routine for this. I did not see one.

I hope this is enough.

[Jess Goodman]

The RMS Reference Manual is where you will find the documentation on the VMS APIs to do what you want.

http://h71000.www7.hp.com/doc/731FINAL/4523/4523PRO.HTML

RMS routines are callable from any language.

[Hoff · Accepted solution]

Depending on the particular OpenVMS version, the sys$set_security system service is probably the call you want.

Some related examples in C:
http://vmsone.com/~decuslib/vmssig/vmslt02a/vu/create-ace-from-prog-src.txt

And an example from the support database in Fortran:
http://h18000.www1.hp.com/support/asktima/appl_tools/CHAMP_SRC941118003877.html

This call transparently connects into the RMS and other underlying calls as described by Hein, depending on the particular object target.

Stephen Hoffman
HoffmanLabs

[Hoff]

sub /Hein/Jess/
my bad.

[Steven Schweda]

There's C code which deals with this stuff
in the Info-ZIP UnZip code ("[.vms]vms.c" in
practically any version). Sorting out the
parts you need may be harder than writing
everything yourself, but you might get some
useful hints from it.

http://www.info-zip.org/
http://www.info-zip.org/UnZip.html

[Richard kelly_2]

Thanks very much for all the suggestions.

I was not able to access the FORTRAN link that was provided.

I'll be going over these with my colleague today.

[Hoff]

Ok; here's the path to get to the web page. Go to the http://www.itrc.hp.com page and find the right support search engine tool -- for this, you want the one known as Search Assistant. When you pull up an Americas Asia Pacific search tool -- "James" is in the URL -- you will see the line "Enter your Compaq product query here" at the top of the search box, enter the "all words" query:

sys$set_security fortran

You should get two hits.

Here's the full text of the first hit:

Example-FORTRAN How To Add An ACE Using SYS$SET_SECURITY
... Example-FORTRAN How To Add An ACE Using SYS$SET_SECURITY buy online or call 1.800.AT.COMPAQ ...
http://search.hp.com/redirect.html?url=http%3A//h18000.www1.hp.com/support/asktima/appl_tools/CHAMP_SRC941118003877.html&qt=%2Bsys%24+%2Bset_security+%2Bfortran+&hit=1

[Richard kelly_2]

Thanks very much for everything I think that we have some really good points here and we should be able to get a solution out of these suggestions.