PALX - PDP-11 cross assembler.

src/sys/itsdfs.8

@@ -0,0 +1,264 @@
+
+.AUXIL
+
+;.ITSDF defines the ITS uuos, .CALL series, .OPER series,
+; and .SUSET symbols.
+
+DEFINE .ITSSET XXX/
+.INIT"XXX
+TERMIN
+
+;DEFINE ALL THE ITS SYMBOLS IN THE .INIT BLOCK.
+
+DEFINE .ITSDF DEF=[.ITSSET]
+.ITSOP DEF
+.ITSCL DEF
+.ITSUU DEF
+.ITSUS DEF
+TERMIN
+
+
+DEFINE .ITSUS DEF
+DEF .RUPC==:0
+DEF .RVAL==:1
+DEF .RTTY==:2
+DEF .RFLS==:3
+DEF .RUNAME==:4
+DEF .RJNAME==:5
+DEF .RMASK==:6
+DEF .RUSTP==:7
+DEF .RPIRQC==:10
+DEF .RINTB==:11
+DEF .RMEMT==:12
+DEF .RSV40==:13
+DEF .RIPIRQ==:14
+DEF .RAPIRQ==:15
+DEF .RSNAM==:16
+DEF .RPICLR==:17
+DEF .RMARA==:20
+DEF .RMARPC==:21
+DEF .RUUOH==:22
+DEF .RUIND==:23
+DEF .RRUNT==:24
+DEF .RMSK2==:25
+DEF .RIFPIR==:26
+DEF .RAPRC==:27
+DEF .RCNSL==:30
+DEF .RUTRP==:31
+DEF .RIIFPI==:32
+DEF .RAIFPI==:33
+DEF .RIMASK==:34
+DEF .RAMASK==:35
+DEF .RIMSK2==:36
+DEF .RAMSK2==:37
+DEF .RJPC==:40
+DEF .ROPC==:41
+DEF .RRTMR==:42
+DEF .RHSNAM==:43
+DEF .RBCHN==:44
+DEF .RMPVA==:45
+DEF .RIDF1==:46
+DEF .RADF1==:47
+DEF .RIDF2==:50
+DEF .RADF2==:51
+DEF .RDF1==:52
+DEF .RDF2==:53
+DEF .ROPTION==:54
+DEF .R40ADDR==:55
+DEF .RTVCRE==:56
+DEF .RTTST==:57
+DEF .RTTS1==:60
+DEF .RTTS2==:61
+DEF .RWHO1==:62
+DEF .RWHO2==:63
+DEF .RWHO3==:64
+DEF .RSUPPRO==:65
+DEF .RTR1IN==:66
+DEF .RTR2IN==:67
+DEF .RMBOX==:70
+DEF .RMBO1==:71
+DEF .REBOX==:72
+DEF .REBO1==:73
+DEF .RXUNAME==:74
+DEF .RXJNAME==:75
+DEF .RFTL1==:76
+DEF .RFTL2==:77
+DEF .RIOC==:100
+DEF .RIOS==:120
+DEF .RIOP==:140
+DEF .RPMAP==:200
+DEF .RPAGR==:600
+DEF .RPAGA==:601
+DEF .RSERVER==:602
+DEF .SUPC==:400000
+DEF .SVAL==:400001
+DEF .STTY==:400002
+DEF .SFLS==:400003
+DEF .SUNAME==:400004
+DEF .SJNAME==:400005
+DEF .SMASK==:400006
+DEF .SUSTP==:400007
+DEF .SPIRQC==:400010
+DEF .SINTB==:400011
+DEF .SMEMT==:400012
+DEF .SSV40==:400013
+DEF .SIPIRQ==:400014
+DEF .SAPIRQ==:400015
+DEF .SSNAM==:400016
+DEF .SPICLR==:400017
+DEF .SMARA==:400020
+DEF .SMARPC==:400021
+DEF .SUUOH==:400022
+DEF .SUIND==:400023
+DEF .SRUNT==:400024
+DEF .SMSK2==:400025
+DEF .SIFPIR==:400026
+DEF .SAPRC==:400027
+DEF .SCNSL==:400030
+DEF .SUTRP==:400031
+DEF .SIIFPI==:400032
+DEF .SAIFPI==:400033
+DEF .SIMASK==:400034
+DEF .SAMASK==:400035
+DEF .SIMSK2==:400036
+DEF .SAMSK2==:400037
+DEF .SJPC==:400040
+DEF .SOPC==:400041
+DEF .SRTMR==:400042
+DEF .SHSNAM==:400043
+DEF .SBCHN==:400044
+DEF .SMPVA==:400045
+DEF .SIDF1==:400046
+DEF .SADF1==:400047
+DEF .SIDF2==:400050
+DEF .SADF2==:400051
+DEF .SDF1==:400052
+DEF .SDF2==:400053
+DEF .SOPTION==:400054
+DEF .S40ADDR==:400055
+DEF .STVCRE==:400056
+DEF .STTST==:400057
+DEF .STTS1==:400060
+DEF .STTS2==:400061
+DEF .SWHO1==:400062
+DEF .SWHO2==:400063
+DEF .SWHO3==:400064
+DEF .SSUPPRO==:400065
+DEF .STR1IN==:400066
+DEF .STR2IN==:400067
+DEF .SMBOX==:400070
+DEF .SMBO1==:400071
+DEF .SEBOX==:400072
+DEF .SEBO1==:400073
+DEF .SXUNAME==:400074
+DEF .SXJNAME==:400075
+DEF .SFTL1==:400076
+DEF .SFTL2==:400077
+DEF .SPAGRAN==:400600
+DEF .SPAGAHD==:400601
+DEF .SSERVER==:400602
+TERMIN
+
+DEFINE .ITSOP DEF
+DEF .ITYI=:42^9 1
+DEF .LISTEN=:42^9 2
+DEF .SLEEP=:42^9 3
+DEF .SETMSK=:42^9 4
+DEF .SETM2=:42^9 5
+DEF .DEMON=:42^9 6
+DEF .CLOSE=:42^9 7
+DEF .UCLOSE=:42^9 10
+DEF .ATTY=:42^9 11
+DEF .DTTY=:42^9 12
+DEF .IOPUSH=:42^9 13
+DEF .IOPOP=:42^9 14
+DEF .DCLOSE=:42^9 15
+DEF .DSTOP=:42^9 16
+DEF .RDTIME=:42^9 17
+DEF .RDSW=:42^9 20
+DEF .GUN=:42^9 21
+DEF .UDISMT=:42^9 22
+DEF .GETSYS=:42^9 23
+DEF .IPDP=:42^9 24
+DEF .GETLOC=:42^9 25
+DEF .SETLOC=:42^9 26
+DEF .DISOWN=:42^9 27
+DEF .DWORD=:42^9 30
+DEF .DSTEP=:42^9 31
+DEF .GENSYM=:42^9 32
+DEF .LOGOUT=:42^9 33
+DEF .REALT=:42^9 34
+DEF .WSNAME=:42^9 35
+DEF .UPISET=:42^9 36
+DEF .RESET=:42^9 37
+DEF .ARMOVE=:42^9 40
+DEF .DCONT=:42^9 41
+DEF .CBLK=:42^9 42
+DEF .ASSIGN=:42^9 43
+DEF .DESIGN=:42^9 44
+DEF .RTIME=:42^9 45
+DEF .RDATE=:42^9 46
+DEF .HANG=:42^9 47
+DEF .EOFC=:42^9 50
+DEF .IOTLSR=:42^9 51
+DEF .RSYSI=:42^9 52
+DEF .SUPSET=:42^9 53
+DEF .PDTIME=:42^9 54
+DEF .ARMRS=:42^9 55
+DEF .UBLAT=:42^9 56
+DEF .IOPDL=:42^9 57
+DEF .ITYIC=:42^9 60
+DEF .MASTER=:42^9 61
+DEF .VSTST=:42^9 62
+DEF .NETAC=:42^9 63
+DEF .NETS=:42^9 64
+DEF .REVIVE=:42^9 65
+DEF .DIETIM=:42^9 66
+DEF .SHUTDN=:42^9 67
+DEF .ARMOFF=:42^9 70
+DEF .NDIS=:42^9 71
+DEF .FEED=:42^9 72
+DEF .EVAL=:42^9 73
+DEF .REDEF=:42^9 74
+DEF .IFSET=:42^9 75
+DEF .UTNAM=:42^9 76
+DEF .UINIT=:42^9 77
+DEF .RYEAR=:42^9 100
+DEF .RLPDTM=:42^9 101
+DEF .RDATIM=:42^9 102
+DEF .RCHST=:42^9 103
+DEF .RBTC=:42^9 104
+DEF .DMPCH=:42^9 105
+DEF .SWAP=:42^9 106
+DEF .MTAPE=:42^9 107
+DEF .GENNUM=:42^9 110
+DEF .NETINT=:42^9 111
+TERMIN
+
+DEFINE .ITSCL DEF
+DEF .DISMIS=:43^9 1.,
+DEF .LOSE=:43^9 2.,
+DEF .TRANAD=:43^9 3.,
+DEF .VALUE=:43^9 4.,
+DEF .UTRAN=:43^9 5.,
+DEF .CORE=:43^9 6.,
+DEF .TRAND=:43^9 7.,
+DEF .DSTART=:43^9 8.,
+DEF .FDELE=:43^9 9.,
+DEF .DSTRTL=:43^9 10.,
+DEF .SUSET=:43^9 11.,
+DEF .LTPEN=:43^9 12.,
+DEF .VSCAN=:43^9 13.,
+DEF .POTSET=:43^9 14.,
+TERMIN
+
+DEFINE .ITSUU DEF
+DEF .IOT=:40^9
+DEF .OPEN=:41^9
+DEF .OPER=:42^9
+DEF .CALL=:43^9
+DEF .USET=:44^9
+DEF .BREAK=:45^9
+DEF .STATUS=:46^9
+DEF .ACCESS=:47^9
+TERMIN

src/sys/saidfs.15

@@ -0,0 +1,357 @@
+;.DECDF DEFINES SAIL UUOS AND JOBDAT VARIABLES.
+
+.AUXIL
+
+DEFINE .DECSET XXX/
+ .INIT"XXX
+TERMIN
+
+DEFINE .DECS1 XXX/
+XXX
+TERMIN
+
+DEFINE .DECHK XXX/
+ XXX
+ IRPS XXY,,XXX
+  XXY==:XXY
+  .ISTOP
+ TERMIN
+TERMIN
+
+;.DECDF DEFINES ALL THE SAIL SYMBOLS.
+;THE "JOBH.." SERIES IS HALF-KILLED.
+
+DEFINE .DECDF DEF
+IFSE [DEF],[
+.DECUU .DECS1
+.DECTT .DECS1
+.DECCL .DECS1
+.DECMS .DECS1
+.DEC.J .DECS1
+.DECJH .DECHK
+.HKILL CALLI, TTYUUO, PPIOT, MAIL, PTYUUO, PGIOT, INTUUO
+]
+IFSN [DEF],[
+.DECUU DEF
+.DECTT DEF
+.DECCL DEF
+.DECMS DEF
+.DEC.J DEF
+.DECJH DEF
+]
+TERMIN
+
+;THIS MACRO REPEATS OVER THE NAMES OF THE SAIL UUOS.
+;THE LARGE NUMBERS MAY LOOK UGLY, BUT SINCE THEY ARE ONE SYLLABLE
+;THE MACRO "DEF" CAN EXTRACT THEM WITH AN IRPS.
+
+DEFINE .DECUU DEF
+DEF INIT=:41000000000
+DEF SPCWAR=:43000000000
+DEF CALLI=:47000000000
+DEF OPEN=:50000000000
+DEF TTYUUO=:51000000000
+DEF RENAME=:55000000000
+DEF IN=:56000000000
+DEF OUT=:57000000000
+DEF SETSTS=:60000000000
+DEF STATO=:61000000000
+DEF GETSTS=:62000000000
+DEF STATZ=:63000000000
+DEF INBUF=:64000000000
+DEF OUTBUF=:65000000000
+DEF INPUT=:66000000000
+DEF OUTPUT=:67000000000
+DEF CLOSE=:70000000000
+DEF RELEAS=:71000000000
+DEF MTAPE=:72000000000
+DEF UGETF=:73000000000
+DEF USETI=:74000000000
+DEF USETO=:75000000000
+DEF LOOKUP=:76000000000
+DEF ENTER=:77000000000
+DEF DPYCLR=:701000000000
+DEF PPIOT=:702000000000
+DEF UPGIOT=:703000000000
+DEF UINBF=:704000000000
+DEF UOUTBF=:705000000000
+DEF FBREAD=:706000000000
+DEF FBWRT=:707000000000
+DEF MAIL=:710000000000
+DEF PTYUUO=:711000000000
+DEF POINTS=:712000000000
+DEF UPGMVE=:713000000000
+DEF UPGMVM=:714000000000
+DEF PGIOT=:715000000000
+DEF CHNSTS=:716000000000
+DEF CLKINT=:717000000000
+DEF INTMSK=:720000000000
+DEF IMSKST=:721000000000
+DEF IMSKCL=:722000000000
+DEF INTUUO=:723000000000
+DEF IOPUSH=:724000000000
+DEF IOPOP=:725000000000
+DEF IOPDL=:726000000000
+TERMIN
+
+;THIS MACRO DEFINES THE SAIL TTYUUOS.
+DEFINE .DECTT DEF
+DEF INCHRW=:51000000000
+DEF OUTCHR=:51040000000
+DEF INCHRS=:51100000000
+DEF OUTSTR=:51140000000
+DEF INCHWL=:51200000000
+DEF INCHSL=:51240000000
+DEF GETLIN=:51300000000
+DEF SETLIN=:51340000000
+DEF RESCAN=:51400000000
+DEF CLRBFI=:51440000000
+DEF CLRBFO=:51500000000
+DEF INSKIP=:51540000000
+DEF INWAIT=:51600000000
+DEF SETACT=:51640000000
+DEF TTREAD=:51700000000
+DEF OUTFIV=:51740000000
+TERMIN
+
+;THIS MACRO REPEATS OVER THE HIGH SEGMENT JOB DATA AREA SYMBOLS.
+DEFINE .DECJH DEF
+DEF JOBHGH==:400000
+DEF JOBHSA==:0
+DEF JOBH41==:1
+DEF JOBHCR==:2
+DEF JOBHRN==:3
+DEF JOBHVR==:4
+DEF JOBHNM==:5
+DEF JOBHSM==:6
+DEF JOBHGA==:7
+DEF JOBHDA==:10
+TERMIN
+
+;THIS MACRO REPEATS OVER THE LOW SEGMENT JOB DATA AREA SYMBOLS.
+;IT MENTIONS BOTH THE .JB... AND THE JOB... SYMBOLS FOR USER'S CONVENIENCE.
+DEFINE .DEC.J DEF
+DEF JOBUUO=:40
+DEF JOB41=:41
+DEF JOBERR=:42
+DEF JOBENB=:43
+DEF JOBREL=:44
+DEF JOBINT=:71
+DEF JOBHCU=:72
+DEF JOBPC=:73
+DEF JOBDDT=:74
+DEF JOBSAV=:JOBDDT-1	;LAST LOC NOT SAVED BY SAVE COMMAND
+DEF JOBJDA=:75
+DEF JOBPFI=:114
+DEF JOBHRL=:115
+DEF JOBSYM=:116
+DEF JOBUSY=:117
+DEF JOBSA=:120
+DEF JOBFF=:121
+DEF JOBS41=:122
+DEF JOBREN=:124
+DEF JOBAPR=:125
+DEF JOBCNI=:126
+DEF JOBTPC=:127
+DEF JOBOPC=:130
+DEF JOBCHN=:131
+DEF JOBCOR=:133
+DEF JOBVER=:137
+DEF JOBDA=:140
+DEF .JBUUO=:40
+DEF .JB41=:41
+DEF .JBERR=:42
+DEF .JBENB=:43
+DEF .JBREL=:44
+DEF .JBINT=:71
+DEF .JBHCU=:72
+DEF .JBPC=:73
+DEF .JBDDT=:74
+DEF .JBSAV=:.JBDDT-1
+DEF .JBJDA=:75
+DEF .JBPFI=:114
+DEF .JBHRL=:115
+DEF .JBSYM=:116
+DEF .JBUSY=:117
+DEF .JBSA=:120
+DEF .JBFF=:121
+DEF .JBS41=:122
+DEF .JBREN=:124
+DEF .JBAPR=:125
+DEF .JBCNI=:126
+DEF .JBTPC=:127
+DEF .JBOPC=:130
+DEF .JBCHN=:131
+DEF .JBCOR=:133
+DEF .JBVER=:137
+DEF .JBDA=:140
+TERMIN
+
+DEFINE .DECCL DEF
+DEF RESET=:47000000000
+DEF DDTIN=:47000000001
+DEF SETDDT=:47000000002
+DEF DDTOUT=:47000000003
+DEF DEVCHR=:47000000004
+DEF DDTGT=:47000000005
+DEF GETCHR=:47000000006
+DEF DDTRL=:47000000007
+DEF WAIT=:47000000010
+DEF CORE=:47000000011
+DEF EXIT=:47000000012
+DEF MONRT.=:exit 1,
+DEF UTPCLR=:47000000013
+DEF DATE=:47000000014
+DEF LOGIN=:47000000015
+DEF APRENB=:47000000016
+DEF LOGOUT=:47000000017
+DEF SWITCH=:47000000020
+DEF REASSI=:47000000021
+DEF TIMER=:47000000022
+DEF MSTIME=:47000000023
+DEF GETPPN=:47000000024
+DEF RUNTIM=:47000000027
+DEF PJOB=:47000000030
+DEF SLEEP=:47000000031
+DEF SETPOV=:47000000032
+DEF PEEK=:47000000033
+DEF GETLN=:47000000034
+DEF RUN=:47000000035
+DEF SETUWP=:47000000036
+DEF REMAP=:47000000037
+DEF GETSEG=:47000000040
+DEF GETTAB=:47000000041
+DEF SETNAM=:47000000043
+DEF TMPCOR=:47000000044
+DEF SPWBUT=:47000400000
+DEF CTLV=:47000400001
+DEF SPCWGO=:47000400003
+DEF SWAP=:47000400004
+DEF EIOTM=:47000400005
+DEF LIOTM=:47000400006
+DEF PNAME=:47000400007
+DEF .SYML=:47000400010
+DEF SHOWIT=:47000400011
+DEF FREEZE=:47000400012
+DEF JBTSTS=:47000400013
+DEF TTYIOS=:47000400014
+DEF CORE2=:47000400015
+DEF ATTSEG=:47000400016
+DEF DETSEG=:47000400017
+DEF SETPRO=:47000400020
+DEF SEGNUM=:47000400021
+DEF SEGSIZ=:47000400022
+DEF LINKUP=:47000400023
+DEF DISMIS=:47000400024
+DEF INTENB=:47000400025
+DEF INTORM=:47000400026
+DEF INTACM=:47000400027
+DEF INTENS=:47000400030
+DEF INTIIP=:47000400031
+DEF INTIRQ=:47000400032
+DEF INTGEN=:47000400033
+DEF UWAIT=:47000400034
+DEF DEBREA=:47000400035
+DEF SETNM2=:47000400036
+DEF SEGNAM=:47000400037
+DEF IWAIT=:47000400040
+DEF USKIP=:47000400041
+DEF BUFLEN=:47000400042
+DEF NAMEIN=:47000400043
+DEF SLEVEL=:47000400044
+DEF IENBW=:47000400045
+DEF RUNMSK=:47000400046
+DEF TTYMES=:47000400047
+DEF JOBRD=:47000400050
+DEF DEVUSE=:47000400051
+DEF SETPR2=:47000400052
+DEF GETPR2=:47000400053
+DEF RLEVEL=:47000400054
+DEF STDTIM=:47000400055
+DEF KILL=:47000400056
+DEF WHOAMI=:47000400057
+DEF WAKEME=:47000400061
+DEF GETNAM=:47000400062
+DEF SNEAKW=:47000400063
+DEF SNEAKS=:47000400064
+DEF GDPTIM=:47000400065
+DEF SETPRV=:47000400066
+DEF DDCHAN=:47000400067
+DEF VDSMAP=:47000400070
+DEF DSKPPN=:47000400071
+DEF GETHI=:47000400072
+DEF SETCRD=:47000400073
+DEF CALLIT=:47000400074
+DEF XGPUUO=:47000400075
+DEF LOCK=:47000400076
+DEF UNLOCK=:47000400077
+DEF DAYCNT=:47000400100
+DEF ACCTIM=:47000400101
+DEF UNPURE=:47000400102
+DEF TMPCRD=:47000400103
+DEF DEVNUM=:47000400104
+DEF ACTCHR=:47000400105
+DEF UUOSIM=:47000400106
+DEF PPSPY=:47000400107
+DEF ADSMAP=:47000400110
+DEF BEEP=:47000400111
+DEF WHO=:47000400112
+DEF TTYJOB=:47000400113
+DEF NULMES=:47000400114
+DEF GETPRV=:47000400115
+DEF TTYSKP=:47000400116
+DEF DIAL=:47000400117
+DEF LTHUUO=:47000400120
+DEF TTYSET=:47000400121
+DEF MTRUUO=:47000400122
+DEF RDLINE=:47000400123
+TERMIN
+
+;THIS DEFINES THE MISCELLANEOUS SAIL UUO'S (PPIOT, MAIL, PTYUUO, PGIOT, INTUUO)
+
+DEFINE .DECMS DEF
+DEF PPSEL=:702000000000
+DEF PPACT=:702040000000
+DEF DPYPOS=:702100000000
+DEF DPYSIZ=:702140000000
+DEF PPREL=:702200000000
+DEF PPINFO=:702240000000
+DEF LEYPOS=:702300000000
+DEF PPHLD=:702340000000
+DEF CURSOR=:702400000000
+DEF SEND=:710000000000
+DEF WRCV=:710040000000
+DEF SRCV=:710100000000
+DEF SKPME=:710140000000
+DEF SKPHIM=:710200000000
+DEF SKPSEN=:710240000000
+DEF PTYGET=:711000000000
+DEF PTYREL=:711040000000
+DEF PTIFRE=:711100000000
+DEF PTOCNT=:711140000000
+DEF PTRD1S=:711200000000
+DEF PTRD1W=:711240000000
+DEF PTWR1S=:711300000000
+DEF PTWR1W=:711340000000
+DEF PTRDS=:711400000000
+DEF PTWRS7=:711440000000
+DEF PTWRS9=:711500000000
+DEF PTGETL=:711540000000
+DEF PTSETL=:711600000000
+DEF PTLOAD=:711640000000
+DEF PTJOBX=:711700000000
+DEF PTL7W9=:711740000000
+DEF PGSEL=:715000000000
+DEF PGACT=:715040000000
+DEF PGCLR=:715100000000
+DEF DDUPG=:715140000000
+DEF PGINGO=:715200000000
+DEF INTDEJ=:723000000000
+DEF IMSTW=:723040000000
+DEF IWKMSK=:723100000000
+DEF INTDMP=:723140000000
+DEF INTIPI=:723200000000
+DEF IMSKCR=:723240000000
+TERMIN
+
+EQUALS .DECMT,.DECMS	;SO YOU CAN WIN WITH EITHER DECDFS OR SAIDFS, NOT KNOWING WHICH.