alpha updates. [jmk] --rw-rw-r-- M 436305 glenda sys 1513 Jan 13 13:58 sys/src/boot/alphapc/l.s /n/sourcesdump/2006/0113/plan9/sys/src/boot/alphapc/l.s:1,4 - /n/sourcesdump/2006/0114/plan9/sys/src/boot/alphapc/l.s:1,5 #include "mem.h" + #include "vmspal.h" #define SP R30 /n/sourcesdump/2006/0113/plan9/sys/src/boot/alphapc/l.s:17,23 - /n/sourcesdump/2006/0114/plan9/sys/src/boot/alphapc/l.s:18,24 TEXT firmware(SB), $-8 CALL_PAL $PALhalt MOVQ $_divq(SB), R31 /* touch _divq etc.; doesn't need to execute */ - MOVQ $_divl(SB), R31 /* touch _divl etc.; doesn't need to execute */ + MOVQ $_divl(SB), R31 /* touch _divl etc.; doesn't need to execute */ RET TEXT mb(SB), $-8 /n/sourcesdump/2006/0113/plan9/sys/src/boot/alphapc/l.s:39,45 - /n/sourcesdump/2006/0114/plan9/sys/src/boot/alphapc/l.s:40,46 MOVQ 32(FP), R19 MOVQ 40(FP), R20 MOVQ R26, R1 - JSR (R0) + JSR (R0) MOVQ R1, R26 RET /* 7a bug: should be RET (R1) */ /n/sourcesdump/2006/0113/plan9/sys/src/boot/alphapc/l.s:53,93 - /n/sourcesdump/2006/0114/plan9/sys/src/boot/alphapc/l.s:54,94 RET TEXT ipl(SB), $-8 - CALL_PAL $PALmfpr_ipl + CALL_PAL $PALmfpr_ipl RET TEXT mces(SB), $-8 - CALL_PAL $PALmfpr_mces + CALL_PAL $PALmfpr_mces RET TEXT setipl(SB), $-8 MOVQ R0, R16 - CALL_PAL $PALmtpr_ipl + CALL_PAL $PALmtpr_ipl RET TEXT setmces(SB), $-8 MOVQ R0, R16 - CALL_PAL $PALmtpr_mces + CALL_PAL $PALmtpr_mces RET TEXT ldqp(SB), $-8 MOVQ R0, R16 - CALL_PAL $PALldqp + CALL_PAL $PALldqp RET TEXT stqp(SB), $-8 MOVQ R0, R16 MOVQ 8(FP), R17 - CALL_PAL $PALstqp + CALL_PAL $PALstqp RET TEXT getptbr(SB), $-8 - CALL_PAL $PALmfpr_ptbr + CALL_PAL $PALmfpr_ptbr RET TEXT swppal(SB), $-8 MOVQ R0, R16 /* which PALcode */ - MOVQ 8(FP), R17 /* new PC */ + MOVQ 8(FP), R17 /* new PC */ MOVQ 16(FP), R18 /* PCBB (physical) */ MOVQ 24(FP), R19 /* VPTB */ MOVQ 32(FP), R20 /* new KSP */ [jmk] --rw-rw-r-- M 436305 glenda sys 363 Jan 13 13:58 sys/src/boot/alphapc/mem.h /n/sourcesdump/2006/0113/plan9/sys/src/boot/alphapc/mem.h:5,36 - /n/sourcesdump/2006/0114/plan9/sys/src/boot/alphapc/mem.h:5,15 #define BI2BY 8 /* bits per byte */ #define BI2WD 32 /* bits per word */ #define BY2WD 4 /* bytes per word */ - #define BY2V 8 /* bytes per vlong */ + #define BY2V 8 /* bytes per vlong */ #define KZERO 0x80000000 - #define PTEVALID 0xff01 + #define PTEVALID 0xff01 #define PTEKVALID 0x1101 #define PTEASM 0x0010 - #define PTEGH(s) ((s)<<5) - - /* - * VMS Palcode instructions (incomplete and possibly incorrect) - */ - #define PALimb 0x86 - #define PALhalt 0x00 - #define PALdraina 0x02 - #define PALcserve 0x09 - - #define PALmfpr_pcbb 0x12 - #define PALmfpr_ptbr 0x15 - #define PALmfpr_vptb 0x29 - #define PALldqp 0x03 - #define PALstqp 0x04 - #define PALswppal 0x0a - - #define PALmtpr_tbia 0x1b - #define PALmtpr_mces 0x17 - #define PALmfpr_mces 0x16 - #define PALmtpr_ipl 0x15 - #define PALmfpr_ipl 0x14 + #define PTEGH(s) ((s)<<5) [jmk] --rw-rw-r-- M 436305 jmk sys 2580 Jan 13 13:58 sys/src/boot/alphapc/vmspal.h