Re: Read-only dir & files within?

[Rob Berendt <robertowenberendt@xxxxxxxxx>]

Mark,
Sometimes these attributes are comparable to those Windows prompts "Are you
sure you want to...?"
Comparable to the SQL DDL option which will stop even someone with *ALLOBJ
from deleting a table (PF).  "ADD RESTRICT ON DROP".  Granted the
workaround is simply to run "DROP RESTRICT ON DROP" but it will, by golly,
make sure someone is really sure this is what they want to do.
Especially those shops where the data has *PUBLIC *ALL on the files.
https://www.ibm.com/docs/en/i/7.5?topic=statements-alter-table

On Wed, Apr 3, 2024 at 8:42 PM Mark Waterbury <
mark.s.waterbury@xxxxxxxxxxxxx> wrote:

> Hi, Vern,
>
> Thanks for the "heads up" about this.  I have never heard of a *READONLY
> attribute before.  It is something completely separate from the usual
> object authorities and data authorities.
>
> I just ran a test at V7R3, creating a directory:
>
>     MKDIR '/home/MSW/test'
>
> Then changed it to add that *READONLY attribute:
>
>      CHGATR OBJ('/home/MSW/test') ATR(*READONLY) VALUE(*yes)
>
> Then I signed off and signed-on with a profile that has *ALLOBJ and I
> tried this:
>     RMVDIR '/home/MSW/test'
>
> And, I get this message:
>
>                          Additional Message Information
>
>
>
>  Message ID . . . . . . :   CPFA1C5       Severity . . . . . . . :   40
>
>  Message type . . . . . :   Diagnostic
>
>  Date sent  . . . . . . :   04/03/24      Time sent  . . . . . . :
>  20:28:42
>
>
>  Message . . . . :   Object is a read only object.  Object is
> /home/msw/test.
>  Cause . . . . . :   An operation was requested on read only object
>
>    /home/msw/test that is not allowed on a read only object.
>
>  Recovery  . . . :   Attempt to change the object's read only attribute,
> using
>    the Change Attributes (CHGATR) command or Set Attributes (Qp0lSetAttr)
> API,
>    and then try the request again.  If the object name is *N, it could not
> be
>    determined which object was read only. Refer to any previously issued
>
>    messages.
>
>
>  Bottom
>  Press Enter to continue.
>
>
>
>  F3=Exit   F6=Print   F9=Display message details
>
>  F10=Display messages in job log   F12=Cancel
>
>
>
>
> But, they told me what to do, right there in the message seen above.  :-/
>
> So, since I have *ALLOBJ, I just issued this:
>
>      CHGATR OBJ('/home/MSW/test') ATR(*READONLY) VALUE(*no)
>
>  and it says:
>
>     Attributes changed for 1 objects.  0 objects not changed.
>
> And so now, I issue:
>
>    RMDIR '/home/MSW/test'
>
> and it says:
>
>     Directory removed.
>
> "A.N..D.... IT'S GONE!"
>
> So, I think I stand by my advice regarding *ALLOBJ.   :-)
>
> All the best,
>
> Mark S. Waterbury