On Fri, 12 Aug 2022 09:42:13 -0500, Paul Gilmartin <paulgboul...@aol.com> wrote:
>On Thu, 11 Aug 2022 16:44:50 -0500, Mark Zelden wrote: >> ... >> /* rexx */ >> /*=================================*/ >> fromdir = '/etc/' >> todir = '/service/' >> /*=================================*/ >> call syscalls 'ON' >> address syscall 'geteuid' >> uidval = retval >> say 'Current UID = 'uidval >> if uidval <> 0 then do >> say 'Attempting to set to UID=0' >> address syscall 'setreuid 0 0' >> >What would happen if Rexx were to EXIT to TSO at this point? Would TSO >continue to execute with the RACF User ID but with euid 0? Might there be >unexpected results, particularly with the O* commands? Remember the OP >wants to do OPUT with euid 0. > >> uidval2 = retval >> if uidval2 <> 0 then do >> say 'Unable to set to UID=0' >> exit 12 >> end >> Else say 'New UID = 'uidval2 >> >When I've done this sort of thing, I've first attempted to report via ZEDLMSG, >then if that failed use SAY. > >-- First, I didn't run it interactively - as I mentioned, it was part of a batch job with steps that allocate the zFS, fomat it, mount it then run the copy. The step running the exec is IKJEFT1B. Second, it isn't running under ISPF so there is no ZEDLMSG. Best Regards, Mark -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS ITIL v3 Foundation Certified mailto:m...@mzelden.com Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html Systems Programming expert at http://search390.techtarget.com/ateExperts/ ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
