🚀 go-pugleaf

Greetings,

I need to write a little routine to change UIC for an arbitrary, captive
user.  Fortunately, INFO-VAX has been following this for the last few days,
and has produced the following CMKRNL routines:

(1)     .ENTRY  KERNEL, ^M<R2,R3,R4>            ;Save our registers
        JSB     SMP$GET_CURPCB                  ;Get ther current PCB
        MOVL    NEWUIC,PCB$L_UIC(R4)            ;Tweak its little UIC
        MOVZWL  #SS$_NORMAL,R0                  ;Return happy
        RET                                     ; as a little bird

(2)     .ENTRY  CMKRTN, ^M<>                    ;Registers, what registers
        MOVL    G^CTL$GL_PCB,R0                 ;GET THE PCB ADDRESS
        MOVL    UIC, PCB$L_UIC(R0)              ;GET THE NEW UIC
        MOVL    #SS$_NORMAL,R0                  ;SET OK RETURN CODE
        RET                                     ;BACK

Personally, I like (2) best, since I cannot see what the hell happens
when I JSB to SMP$GET_CURPCB (what with no listings or fiche).

I throw this out to the MACRO32 list for ideas and comments.

Thanks in advance,


 Louis B. Moore                      Internet: lbmoore@tchden.org
 Systems Programmer                  Phone:    +1 303 837 2513
 The Children's Hospital of Denver   Denver, Colorado USA 80218