"I meant what I said and I said what I meant,
A sysprog is faithful, 100%"
>From "Horton Hears an IPL" by Dr. Seus.

You're losing track of your indirect addresses:

R1 -> Paramaeter list
          +0 -> H'length',C'characters'
          +4      Doesn't exist for jobstep.

The end-of-list flag is X'80' at offset 0 in the parameter list.

PARM='(' results in R1 -> Parameter list
                                          +0 -> H'1,C'('
with an X'0" flag at offset 0 in the list, not in the parameter list address in 
R1.

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


________________________________________
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on behalf of 
Paul Gilmartin <0000000433f07816-dmarc-requ...@listserv.ua.edu>
Sent: Monday, November 18, 2019 3:36 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: AUTHPGM in IKJTSOxx

On Mon, 18 Nov 2019 19:35:31 +0000, Seymour J Metz wrote:

>A program designed to run as a jobstep expects a parameter list whose first 
>word points to a halfword length field followed by a character string of that 
>length. The Initiator will always flag the first word with an end-of-list bit. 
>So if the program follows normal rules, you can't pass it an address that way.
>
No.  That end-of-list bit is set in the address of the PARM, not in the PARM.
So, PARM='(' (x-4d') results in '(', not 'D' (x'CD').  And that bit has little
effect except for branch-and-set-mode.

How is PARM passed to an AMODE 64 program?

>Of course, another, unauthorized,  program can call it with a longer parameter 
>list, but then it won't be running authorized and there is no exposure.
>
Yes.

-- gil

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to