On Thu, 13 Dec 2012 10:20:35 -0600 Donald Likens <[email protected]>
wrote:
:>I did not understand why the documentation in the "Extended Addressabilty
Guide" stated "The IARV64 macro provides all the virtual storage services for
your programs." and then I find IARST64 documented in the "Assembler Services
Reference". So I did some testing:
:>
:>Code Executed:
:>
:> SYSSTATE AMODE64=YES
:> N R12,=X'7FFFFFFF'
Should probably be LLGTR R12,R12
:> MODESET MODE=SUP,KEY=ZERO /* MUST BE KEY 0 WHEN ISSUE ESTAE*/
:> SAM64
:> IARST64 REQUEST=GET, * * X
:> AREAADDR=THEAREAADDR, * * X
:> SIZE=THEAREASIZE,TYPE=PAGEABLE, * * X
:> COMMON=YES,OWNER=SYSTEM, * * X
:> FPROT=YES, * * X
:> CALLERKEY=YES, * * X
:> FAILMODE=RC, * * X
:> REGS=SAVE, * * X
:> RETCODE=LRETCODE,RSNCODE=LRSNCODE *
:> LG R2,THEAREAADDR
:> LA R3,15
:> LA R4,=C'MEAS 64 STORAGE'
:> LGR R5,R3
:> MVCL R2,R4
Why MVCL for 15 bytes?
:> SAM31
:> WAIT ECB=WAITE
:>
:>What I learned:
:>1) I need to learn a whole lot about 64 bit programming.
:>2) The storage obtained was still available after the job was cancelled
(COMMON=YES,OWNER=SYSTEM) as I hoped.
:>3) The storage obtained was visable from other address spaces (I looked in a
dump of a TSO user) as I hoped.
:>4) The storage obtained was only 64 bytes (as documented by the IARST64
documentation.
:>5) I did not have to obtain the storage using IARV64. I did not have to use
IARV64 to SHAREMEMOBJ.
:>
:>It works exactly as I hoped. I will keep you informed if I learn more on this
issue.
:>
:>----------------------------------------------------------------------
:>For IBM-MAIN subscribe / signoff / archive access instructions,
:>send email to [email protected] with the message: INFO IBM-MAIN
--
Binyamin Dissen <[email protected]>
http://www.dissensoftware.com
Director, Dissen Software, Bar & Grill - Israel
Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.
I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
