You would use R2 directly in your example.

On Sun, 19 Feb 2017 16:06:28 -0500 Joseph Reichman <[email protected]>
wrote:

:>Thanks 
:>
:>One more question just related to TPROT usage can you tell me if this makes 
sense
:>  I do IPK to get a user psw storage key in R2 
:>
:>For example 
:>
:>PSW_KEY   DS 0D
:>                    DS F
:>R2_KEY.      DS F
:>
:>      XR           R2,R2
:>      IPK
:>       ST           R2,R2_KEY
:>       TPROT    STORAGE,PSW_KEY
:>
:>
:>
:>> On Feb 19, 2017, at 3:39 PM, Binyamin Dissen <[email protected]> 
wrote:
:>> 
:>> Best approach would be to have the SRB caller tell it what key to use. And 
if
:>> you get the S0C4, it means that the SRB was improperly called.
:>> 
:>> Much more logical to catch in an FRR rather than to play 'what if'.
:>> 
:>> On Sun, 19 Feb 2017 10:18:18 -0500 Joseph Reichman <[email protected]>
:>> wrote:
:>> 
:>> :>I'am  accessing storage in a different address space 
:>> :>Via an SRB and don't want to get a S0C4 I realize that in this case 
PSATOLD  will be zero and I will be running in key zero but I was using TCBPKF 
as an example 
:>> :>
:>> :>I'm not quite sure of the second operand usage 
:>> :>Seems the same as the shift instructions 
:>> :>If for instance I wanted to check out weather a TCB could access that 
storage would I move the 1 byte TCBPKF field to a double word and shift  it to 
bits 56-59 ?
:>> :>
:>> :>Thanks for your help 
:>> :>
:>> :>
:>> :>
:>> :>> On Feb 19, 2017, at 9:43 AM, Binyamin Dissen 
<[email protected]> wrote:
:>> :>> 
:>> :>> You do realize, of course, without disablement and/or locks the storage
:>> :>> attributes can change after you check them?
:>> :>> 
:>> :>> Why do you need to know?
:>> :>> 
:>> :>> On Sat, 18 Feb 2017 19:34:29 -0500 Joe Reichman <[email protected]> 
wrote:
:>> :>> 
:>> :>> :>Hi,
:>> :>> :>
:>> :>> :> 
:>> :>> :>
:>> :>> :>If I would like to access say 20 bytes of core (to see if I have both 
fetch
:>> :>> :>and store capability) I would have to loop incrementing B1 checking 
against
:>> :>> :>TCBPKF (where TCB is pointing to PSATOLD)
:>> :>> :>
:>> :>> :> 
:>> :>> :>
:>> :>> :> 
:>> :>> :>
:>> :>> :>                 LA           R0,20
:>> :>> :>
:>> :>> :>                 LA            R2,STORSCESS
:>> :>> :>
:>> :>> :>    LOOP   TPR0T      0(R2),TCBPKF
:>> :>> :>
:>> :>> :>                 BC             7,CANTACESS   
:>> :>> :>
:>> :>> :>                 LA             R2,1(,R2)
:>> :>> :>
:>> :>> :>                 BCT          R0,LOOP
:>> :>> :>
:>> :>> :> 
:>> :>> :>
:>> :>> :>Thanks 
:>> :>> :>
:>> :>> :> 
:>> :>> :>
:>> :>> :>
:>> :>> :>----------------------------------------------------------------------
:>> :>> :>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
:>> :>
:>> :>----------------------------------------------------------------------
:>> :>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
:>
:>----------------------------------------------------------------------
:>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

Reply via email to