diff --git a/em.c b/em.c index 81254f0..bd017cc 100644 --- a/em.c +++ b/em.c @@ -46,6 +46,8 @@ #include #include +#include "syscom/keys.ins.cc" +#include "syscom/errd.ins.cc" /* Prime CPU registers are mapped to memory locations 0-'37, but only 0-7 are accessible in SR user mode. In VI user mode, locations @@ -1303,7 +1305,7 @@ svc() { a2 = mem[argl++]; a3 = mem[argl++]; a4 = mem[argl++]; - if (mem[a1] == 1) { /* arg 1 = k$read? */ + if (mem[a1] == k$read) { mem[a2] = 0210; mem[a3] = 0377; } diff --git a/makefile b/makefile index f1dcb7a..e3e4b83 100644 --- a/makefile +++ b/makefile @@ -1,4 +1,4 @@ -em: em.o +em: cc -O -o em em.c debug: diff --git a/syscom/errd.ins.cc b/syscom/errd.ins.cc new file mode 100644 index 0000000..8888ce9 --- /dev/null +++ b/syscom/errd.ins.cc @@ -0,0 +1,540 @@ +/* ERRD.INS.CC, SYSCOM, PRIMOS GROUP, 01/15/92 + Mnemonic error codes for Primos file system (CC) + Copyright (c) 1991, Prime Computer, Inc., Natick, MA 01760 */ +/* All Rights Reserved */ + +/* Description: + + Abnormal conditions: + + Implementation: + Adding a code requires changes to: ERRD.INS.@@, ERRD.DEF.MOD, KS>ERRCOM.PMA. + ERRD.INS.CC and ERRD.INS.PASCAL are built from this file, so all + definitions must by contained on ONE line and all symbols should + be lower case (CC is case sensitive). + + WARNING: error code definitions MUST start in column 1 not span more + than one line. Reason: syscom.build.cpl depends on these + two things. + + Modifications: + Date Programmer Description of modification + 01/15/92 A. Griffith Added error codes E$PNIR, E$FDER, and E$FDIR for + On_Line Fix_Disk Gates. + 11/18/91 Sager Added E$METL for message 512 support + 06/21/91 Gorton Added E$PWRU and E$CPLE for CHG$PW. + 06/13/91 RLove Added E$ACDD for ASNDE$. + 06/12/91 RLove Added E$ACPG for ASSIGN_DISK. + 06/11/91 Peterson Added e$bfmt. + 02/20/91 A. Griffith Added E$DNTA for RAS$RA_TO_PATH. + 12/07/90 Snay Added E$NDSM for disk tracking project. + 10/02/90 Tung Added error codes E$NOWR, E$ICUT and E$IANL + for UT$COPY. + 09/04/90 A. Conte Added E$UNLI, E$MULI, E$CWAT, E$UBW + 08/30/90 Hunt Added E$APSM for Acl Protected Memory. + 08/21/90 Nakano Realigned e$xxx definitions to start in column 1 + 06/20/90 Slutz Added e$ernf. + 05/24/90 Slutz Added e$nd1s, e$umle. + 04/17/89 Huber Added error codes for the Name Service: E$RXMH, + E$NNET, E$MTPT, E$RPMH, E$MNSH, E$IPTR, E$PTHU, + E$IGMT, E$IROO, E$NEWF, E$BPOR, E$PRVT. + 10/21/88 Fisher Added e$nadm. + 06/15/88 Cook Converted to SPL. + 12/21/87 Roper Added e$zero. + 11/03/87 Van Seters Added e$ista. + 10/06/87 Ng Added comment on ERRD.DEF.MOD. + 09/15/87 Slutz Added e$bmpc. + 09/03/87 Y.K.Yang Added e$dnts and e$snts. + 07/22/87 Tsang Added e$ok. + 07/08/87 Dossett Added E$GPON and E$NGPW. + 06/02/87 Hornbaker Added e$bchk and e$expd. + 05/06/87 A. Conte Added e$itlb, e$ips, e$dpar, and e$pns. + 04/02/87 Tsang Added e$rmln. + 02/02/87 Tsang Added e$lna, e$ldes and e$lny. + 01/20/87 Magnan Add E$LNP Line Not Present + 11/10/86 Rosenstock Removed e$nasu. + [11/03/86] + 11/10/86 Rosenstock Removed e$no_nts. + [10/23/86] + 11/10/86 A. Conte Added e$nba, e$lnow. + [09/16/86] + 07/21/86 Simon Added E$NPDA. + 07/21/86 Phillips (UK) Added E$NINT. + 07/14/86 M. Sadigh Added a new error code E$REIU for EPF$UNREG. + 07/09/86 Leblang Rev 21 integrations comprised of: + James R. Ward Added e$ variants of Iguana error codes. + James R. Ward Added e$ntsh. + Kiefer Added declaration for e$nxcb, e$doqf, e$lnoc,e$rqf, + e$crej, e$ctmo, e$lhdn, e$ltdn + James R. Ward (Pacer Software, Inc.) added NSS and NTS codes: + e$nsni, e$nsnc, e$nsac, n$nthn, e$ntns, + e$ntst, e$ntcf, e$ntlc, e$ntdl, e$ntin, + e$plaa, e$llaa, e$naso, e$nasu, e$ncfg + 07/08/86 Becker/Conte Add messages for AS$Get/AS$Set/AS$Lin: e$blin, + e$bbuf, e$bpro, e$lnus, e$bfus, e$irbf, e$iabf, + e$nnts, e$iasd, e$iasp, e$ilod. + 07/07/86 Milne Added e$ismr. + 04/06/86 Fichter Added e$nown, e$blok, e$area. + 03/11/86 JBall Added e$ndrb and e$cqpt for Q_UPDT use. + 12/30/85 Sadigh/Ng Added for EPF II: e$ireg, e$inai, e$illn, e$buid, + e$inre, e$npsg, e$uinf, e$ivpt, e$snal, e$natf, + e$nd3s, e$bsmt, e$ialn, e$bptr, e$idbt, e$bdtr, + e$lunr, e$enrg. + 12/27/85 Pinkoski Added codes for Primix: e$ilus, e$nchd, e$int, e$xshdn, + e$nopx, e$nous, e$incom + 12/17/85 Wright Added e$nres. + 11/27/85 Moore Added e$imem and e$ifcb for CAM file support. + 11/01/85 Dossett/Yang Added for Search Rules: e$list, e$rule, e$ntop, + e$nest, e$admn, e$eol, e$adrl. + 02/22/85 Cook Made all definitions occur in lower case on one + line so we can generate ERRD.INS.CC and + ERRD.INS.PASCAL from this file. Added e$aele. + 02/13/85 Hornbaker Added e$aele. + 02/05/85 Bloom Added e$nrfc. + 01/31/85 Abelli Added e$cpovfl, e$ioovfl, e$bhovfl. + 01/29/85 Chan Added E$NOPD. + 01/29/85 Bogardus Added E$RSHD. + 11/15/84 Pinkoski Added E$ATNS for dtc/dta support. + 07/06/84 JBall Added codes for reomte ipc, E$NSLV & E$RSIN. + 04/16/84 Rees Added E$EXMF, E$BKIO, E$AWER, E$RAMC, E$RIER for + contiguous file, block mode, roam support. + 11/30/83 WD Smith Added e$insufficient_dam_levels & e$past_EOF. + Slutz Added e$fidc and e$uafu. + 10/20/83 Kazin Added E$ALSZ, E$FRER, E$HPER, E$EPFT, E$EPFS, E$ILTD, + E$ILTE, E$ECEB, E$EPFL, E$NTA, E$SWPS, E$SWPR, and + E$ADCM for EPF support. + 09/25/83 HANTMAN Added E$BLEF and E$BLET. + 04/29/83 Abelli-Raizen Added E$UDMA and E$UDMC. + 04/18/83 JBall Added E$NACC (Not accessable) for IPC support [osi 1566] + 01/21/83 HANTMAN added the error code E$NSB for decttion of a NSB + labelled tape by MAGNET,MAGLIB and LABEL. + 11/20/82 HChen Added E$IDNF(Slave ID not found). + 11/16/82 Goggin Added NAMELIST error codes for library error processing. + 10/29/82 HChen Added E$MNPX (Illegal multiple hops in NPX). + 09/10/82 Kroczak Added E$RESF (Improper access to a restricted file). + 04/22/82 HChen Added E$WSLV, E$VCGC and E$MSLV. + 04/04/82 HChen Added E$APND (for R$BGIN) and E$BVCC. + 03/24/82 Weinberg Added E$NFAS (not found in attach scan). + 12/14/81 Huber changed T$GPPI error codes to match rev 18. To do + this changed E$RSNU from 137 to 140 and filled in + the previously held codes with E$CTPR, E$DFPR, E$DLPR. + 11/06/81 Weinberg changed codes for ACL rewrite. + 10/26/81 Hornbaker added F$IO error codes. + 10/22/81 HChen used the spare one, 137, for E$RSNU. + 05/22/81 Detroy add T$GPPI error codes. + 04/07/81 Cecchin merged new errors for Acls (for Ben Crocker). + 03/25/81 Cecchin added NPX error codes from 18 to fix mismatch + between 18 and 19. Also added spare 18 error codes + as a temporary solution. + ********************************************************************/ + + + +/* */ +/* CODE DEFINITIONS */ +/* */ + +#define e$ok 0 /* NORMAL RETURN */ +#define e$eof 1 /* END OF FILE PE */ +#define e$bof 2 /* BEGINNING OF FILE PG */ +#define e$unop 3 /* UNIT NOT OPEN PD,SD */ +#define e$uius 4 /* UNIT IN USE SI */ +#define e$fius 5 /* FILE IN USE SI */ +#define e$bpar 6 /* BAD PARAMETER SA */ +#define e$natt 7 /* NO UFD ATTACHED SL,AL */ +#define e$fdfl 8 /* UFD FULL SK */ +#define e$dkfl 9 /* DISK FULL DJ */ +#define e$disk_full 9 /* alias to E$DKFL */ +#define e$nrit 10 /* NO RIGHT SX */ +#define e$fdel 11 /* FILE OPEN ON DELETE SD */ +#define e$ntud 12 /* NOT A UFD AR */ +#define e$ntsd 13 /* NOT A SEGDIR -- */ +#define e$dire 14 /* IS A DIRECTORY -- */ +#define e$fntf 15 /* (FILE) NOT FOUND SH,AH */ +#define e$fnts 16 /* (FILE) NOT FOUND IN SEGDIR SQ */ +#define e$bnam 17 /* ILLEGAL NAME CA */ +#define e$exst 18 /* ALREADY EXISTS CZ */ +#define e$dnte 19 /* DIRECTORY NOT EMPTY -- */ +#define e$shut 20 /* BAD SHUTDN (FAM ONLY) BS */ +#define e$disk 21 /* DISK I/O ERROR WB */ +#define e$bdam 22 /* BAD DAM FILE (FAM ONLY) SS */ +#define e$ptrm 23 /* PTR MISMATCH (FAM ONLY) PC,DC,AC */ +#define e$rec_hdr_ptr_mismatch 23 /* alias to E$PTRM */ +#define e$bpas 24 /* BAD PASSWORD (FAM ONLY) AN */ +#define e$bcod 25 /* BAD CODE IN ERRVEC -- */ +#define e$btrn 26 /* BAD TRUNCATE OF SEGDIR -- */ +#define e$oldp 27 /* OLD PARTITION -- */ +#define e$bkey 28 /* BAD KEY -- */ +#define e$bunt 29 /* BAD UNIT NUMBER -- */ +#define e$bsun 30 /* BAD SEGDIR UNIT SA */ +#define e$suno 31 /* SEGDIR UNIT NOT OPEN -- */ +#define e$nmlg 32 /* NAME TOO LONG -- */ +#define e$sder 33 /* SEGDIR ERROR SQ */ +#define e$bufd 34 /* BAD UFD -- */ +#define e$bfts 35 /* BUFFER TOO SMALL -- */ +#define e$fitb 36 /* FILE TOO BIG -- */ +#define e$null 37 /* (NULL MESSAGE) -- */ +#define e$irem 38 /* ILL REMOTE REF -- */ +#define e$dviu 39 /* DEVICE IN USE -- */ +#define e$rldn 40 /* REMOTE LINE DOWN -- */ +#define e$fuiu 41 /* ALL REMOTE UNITS IN USE -- */ +#define e$dns 42 /* DEVICE NOT STARTED -- */ +#define e$tmul 43 /* TOO MANY UFD LEVELS -- */ +#define e$fbst 44 /* FAM - BAD STARTUP -- */ +#define e$bsgn 45 /* BAD SEGMENT NUMBER -- */ +#define e$fifc 46 /* INVALID FAM FUNCTION CODE -- */ +#define e$tmru 47 /* MAX REMOTE USERS EXCEEDED -- */ +#define e$nass 48 /* DEVICE NOT ASSIGNED -- */ +#define e$bfsv 49 /* BAD FAM SVC -- */ +#define e$semo 50 /* SEM OVERFLOW -- */ +#define e$ntim 51 /* NO TIMER -- */ +#define e$fabt 52 /* FAM ABORT -- */ +#define e$fonc 53 /* FAM OP NOT COMPLETE -- */ +#define e$npha 54 /* NO PHANTOMS AVAILABLE - */ +#define e$room 55 /* NO ROOM -- */ +#define e$wtpr 56 /* DISK WRITE-PROTECTED JF */ +#define e$itre 57 /* ILLEGAL TREENAME FE */ +#define e$famu 58 /* FAM IN USE -- */ +#define e$tmus 59 /* MAX USERS EXCEEDED -- */ +#define e$ncom 60 /* NULL_COMLINE -- */ +#define e$nflt 61 /* NO_FAULT_FR -- */ +#define e$stkf 62 /* BAD STACK FORMAT -- */ +#define e$stks 63 /* BAD STACK ON SIGNAL -- */ +#define e$noon 64 /* NO ON UNIT FOR CONDITION -- */ +#define e$crwl 65 /* BAD CRAWLOUT -- */ +#define e$crov 66 /* STACK OVFLO DURING CRAWLOUT -- */ +#define e$crun 67 /* CRAWLOUT UNWIND FAIL -- */ +#define e$cmnd 68 /* BAD COMMAND FORMAT -- */ +#define e$rchr 69 /* RESERVED CHARACTER -- */ +#define e$nexp 70 /* CANNOT EXIT TO COMMAND PROC -- */ +#define e$barg 71 /* BAD COMMAND ARG -- */ +#define e$csov 72 /* CONC STACK OVERFLOW -- */ +#define e$nosg 73 /* SEGMENT DOES NOT EXIST -- */ +#define e$trcl 74 /* TRUNCATED COMMAND LINE -- */ +#define e$ndmc 75 /* NO SMLC DMC CHANNELS -- */ +#define e$dnav 76 /* DEVICE NOT AVAILABLE DPTX */ +#define e$datt 77 /* DEVICE NOT ATTACHED -- */ +#define e$bdat 78 /* BAD DATA -- */ +#define e$blen 79 /* BAD LENGTH -- */ +#define e$bdev 80 /* BAD DEVICE NUMBER -- */ +#define e$qlex 81 /* QUEUE LENGTH EXCEEDED -- */ +#define e$nbuf 82 /* NO BUFFER SPACE -- */ +#define e$inwt 83 /* INPUT WAITING -- */ +#define e$ninp 84 /* NO INPUT AVAILABLE -- */ +#define e$dfd 85 /* DEVICE FORCIBLY DETACHED -- */ +#define e$dnc 86 /* DPTX NOT CONFIGURED -- */ +#define e$sicm 87 /* ILLEGAL 3270 COMMAND -- */ +#define e$sbcf 88 /* BAD 'FROM' DEVICE -- */ +#define e$vkbl 89 /* KBD LOCKED -- */ +#define e$via 90 /* INVALID AID BYTE -- */ +#define e$vica 91 /* INVALID CURSOR ADDRESS -- */ +#define e$vif 92 /* INVALID FIELD -- */ +#define e$vfr 93 /* FIELD REQUIRED -- */ +#define e$vfp 94 /* FIELD PROHIBITED -- */ +#define e$vpfc 95 /* PROTECTED FIELD CHECK -- */ +#define e$vnfc 96 /* NUMERIC FIELD CHECK -- */ +#define e$vpef 97 /* PAST END OF FIELD -- */ +#define e$virc 98 /* INVALID READ MOD CHAR -- */ +#define e$ivcm 99 /* INVALID COMMAND -- */ +#define e$dnct 100 /* DEVICE NOT CONNECTED -- */ +#define e$bnwd 101 /* BAD NO. OF WORDS -- */ +#define e$sgiu 102 /* SEGMENT IN USE -- */ +#define e$nesg 103 /* NOT ENOUGH SEGMENTS (VINIT$) -- */ +#define e$sdup 104 /* DUPLICATE SEGMENTS (VINIT$) -- */ +#define e$ivwn 105 /* INVALID WINDOW NUMBER -- */ +#define e$wain 106 /* WINDOW ALREADY INITIATED -- */ +#define e$nmvs 107 /* NO MORE VMFA SEGMENTS -- */ +#define e$nmts 108 /* NO MORE TEMP SEGMENTS -- */ +#define e$ndam 109 /* NOT A DAM FILE -- */ +#define e$nova 110 /* NOT OPEN FOR VMFA -- */ +#define e$necs 111 /* NOT ENOUGH CONTIGUOUS SEGMENTS */ +#define e$nrcv 112 /* REQUIRES RECEIVE ENABLED -- */ +#define e$unrv 113 /* USER NOT RECEIVING NOW -- */ +#define e$ubsy 114 /* USER BUSY, PLEASE WAIT -- */ +#define e$udef 115 /* USER UNABLE TO RECEIVE MESSAGES */ +#define e$uadr 116 /* UNKNOWN ADDRESSEE -- */ +#define e$prtl 117 /* OPERATION PARTIALLY BLOCKED -- */ +#define e$nsuc 118 /* OPERATION UNSUCCESSFUL -- */ +#define e$nrob 119 /* NO ROOM IN OUTPUT BUFFER -- */ +#define e$nete 120 /* NETWORK ERROR ENCOUNTERED -- */ +#define e$shdn 121 /* DISK HAS BEEN SHUT DOWN FS */ +#define e$unod 122 /* UNKNOWN NODE NAME (PRIMENET) */ +#define e$ndat 123 /* NO DATA FOUND -- */ +#define e$enqd 124 /* ENQUED ONLY -- */ +#define e$phna 125 /* PROTOCOL HANDLER NOT AVAIL DPTX */ +#define e$iwst 126 /* E$INWT ENABLED CONFIG DPTX */ +#define e$bkfp 127 /* BAD KEY FOR THIS PROTOCOL DPTX */ +#define e$bprh 128 /* BAD PROTOCOL HANDLER (TAT) DPTX */ +#define e$abti 129 /* I/O ABORT IN PROGRESS DPTX */ +#define e$ilff 130 /* ILLEGAL DPTX FILE FORMAT DPTX */ +#define e$tmed 131 /* TOO MANY EMULATE DEVICES DPTX */ +#define e$danc 132 /* DPTX ALREADY CONFIGURED DPTX */ +#define e$nenb 133 /* REMOTE MODE NOT ENABLED NPX */ +#define e$nsla 134 /* NO NPX SLAVE AVAILABLE --- */ +#define e$pntf 135 /* PROCEDURE NOT FOUND R$CALL */ +#define e$sval 136 /* SLAVE VALIDATION ERROR R$CALL */ +#define e$iedi 137 /* I/O error or device interrupt (GPPI) */ +#define e$wmst 138 /* Warm start happened (GPPI) */ +#define e$dnsk 139 /* A pio instruction did not skip (GPPI) */ +#define e$rsnu 140 /* REMOTE SYSTEM NOT UP R$CALL */ +#define e$s18e 141 + +/* */ +/* New error codes for REV 19 begin here: */ +/* */ + +#define e$nfqb 142 /* NO FREE QUOTA BLOCKS -- */ +#define e$mxqb 143 /* MAXIMUM QUOTA EXCEEDED -- */ +#define e$max_quota_exceeded 143 /* alias to E$MXQB */ +#define e$noqd 144 /* NOT A QUOTA DISK (RUN VFIXRAT) */ +#define e$qexc 145 /* SETTING QUOTA BELOW EXISTING USAGE */ +#define e$imfd 146 /* Operation illegal on MFD */ +#define e$nacl 147 /* Not an ACL directory */ +#define e$pnac 148 /* Parent not an ACL directory */ +#define e$ntfd 149 /* Not a file or directory */ +#define e$iacl 150 /* Entry is an ACL */ +#define e$ncat 151 /* Not an access category */ +#define e$lrna 152 /* Like reference not available */ +#define e$cpmf 153 /* Category protects MFD */ +#define e$acbg 154 /* ACL too big */ +#define e$acnf 155 /* Access category not found */ +#define e$lrnf 156 /* Like reference not found */ +#define e$bacl 157 /* BAD ACL */ +#define e$bver 158 /* BAD VERSION */ +#define e$ninf 159 /* NO INFORMATION */ +#define e$catf 160 /* Access category found (Ac$rvt) */ +#define e$adrf 161 /* ACL directory found (Ac$rvt) */ +#define e$nval 162 /* Validation error (nlogin) */ +#define e$logo 163 /* Logout (code for fatal$) */ +#define e$nutp 164 /* No unit table available. (PHANT$) */ +#define e$utar 165 /* Unit table already returned. (UTDALC) */ +#define e$uniu 166 /* Unit table not in use. (RTUTBL) */ +#define e$nfut 167 /* No free unit table. (GTUTBL) */ +#define e$uahu 168 /* User already has unit table. (UTALOC) */ +#define e$panf 169 /* Priority ACL not found. */ +#define e$misa 170 /* Missing argument to command. */ +#define e$sccm 171 /* System console command only. */ +#define e$brpa 172 /* Bad remote password R$CALL */ +#define e$dtns 173 /* Date and time not set yet. */ +#define e$spnd 174 /* REMOTE PROCEDURE CALL STILL PENDING */ +#define e$bcfg 175 /* NETWORK CONFIGURATION MISMATCH */ +#define e$bmod 176 /* Illegal access mode (AC$SET) */ +#define e$bid 177 /* Illegal identifier (AC$SET) */ +#define e$st19 178 /* Operation illegal on pre-19 disk */ +#define e$ctpr 179 /* Object is category-protected (Ac$chg) */ +#define e$dfpr 180 /* Object is default-protected (Ac$chg) */ +#define e$dlpr 181 /* File is delete-protected (Fil$dl) */ +#define e$blue 182 /* Bad LUBTL entry (F$IO) */ +#define e$ndfd 183 /* No driver for device (F$IO) */ +#define e$wft 184 /* Wrong file type (F$IO) */ +#define e$fdmm 185 /* Format/data mismatch (F$IO) */ +#define e$fer 186 /* Bad format (F$IO) */ +#define e$bdv 187 /* Bad dope vector (F$IO) */ +#define e$bfov 188 /* F$IOBF overflow (F$IO) */ +#define e$nfas 189 /* Top-level dir not found or inaccessible*/ +#define e$apnd 190 /* Asynchronous procedure still pending */ +#define e$bvcc 191 /* Bad virtual circuit clearing */ +#define e$resf 192 /* Improper access to a restricted file */ +#define e$mnpx 193 /* Illegal multiple hops in NPX. */ +#define e$synt 194 /* SYNTanx error */ +#define e$ustr 195 /* Unterminated STRing */ +#define e$wns 196 /* Wrong Number of Subscripts */ +#define e$ireq 197 /* Integer REQuired */ +#define e$vng 198 /* Variable Not in namelist Group */ +#define e$sor 199 /* Subscript Out of Range */ +#define e$tmvv 200 /* Too Many Values for Variable */ +#define e$esv 201 /* Expected String Value */ +#define e$vabs 202 /* Variable Array Bounds or Size */ +#define e$bclc 203 /* Bad Compiler Library Call */ +#define e$nsb 204 /* NSB tape was detected */ +#define e$wslv 205 /* Slave's ID mismatch */ +#define e$vcgc 206 /* The virtual circuit got cleared. */ +#define e$mslv 207 /* Exceeds max number of slaves per user */ +#define e$idnf 208 /* Slave's ID not found */ +#define e$nacc 209 /* Not accessible */ +#define e$udma 210 /* Not Enough DMA channels */ +#define e$udmc 211 /* Not Enough DMC channels */ +#define e$blef 212 /* Bad tape record length and EOF */ +#define e$blet 213 /* Bad tape record length and EOT */ +#define e$alsz 214 /* Allocate request too small */ +#define e$frer 215 /* Free request with invalid pointer */ +#define e$hper 216 /* User storage heap is corrupted */ +#define e$epft 217 /* Invalid EPF type */ +#define e$epfs 218 /* Invalid EPF search type */ +#define e$iltd 219 /* Invalid EPF LTD linkage descriptor */ +#define e$ilte 220 /* Invlaid EPF LTE linkage discriptor */ +#define e$eceb 221 /* Exceeding command environment breadth */ +#define e$epfl 222 /* EPF file exceeds file size limit */ +#define e$nta 223 /* EPF file not active for this user */ +#define e$swps 224 /* EPF file suspended within program session */ +#define e$swpr 225 /* EPF file suspended within this process */ +#define e$adcm 226 /* System administrator command ONLY */ +#define e$uafu 227 /* Unable to allocate file unit */ +#define e$unable_to_allocate_file_unit 227 /* alias to E$UAFU */ +#define e$fidc 228 /* File inconsistent data count */ +#define e$file_inconsistent_data_count 228 /* alias to e$fidc */ +#define e$indl 229 /* alias to e$insufficient_dam_level */ +#define e$insufficient_dam_levels 229 /* Not enough dam index levels as needed */ +#define e$peof 230 /* alias to e$past_EOF */ +#define e$past_eof 230 /* Past End Of File */ +#define e$exmf 231 /* Extent map full */ +#define e$bkio 232 /* Unit open for block mode i/o */ +#define e$awer 233 /* Asynchronous write error */ +#define e$ramc 234 /* R0AM access mode conflict */ +#define e$rier 235 /* R0AM internal error */ +#define e$nslv 236 /* Process not a slave */ +#define e$rsin 237 /* Remote system has initialized. */ +#define e$atns 238 /* Attribute not supported */ +#define e$rshd 239 /* Remote disk has been shut down. */ +#define e$nopd 240 /* No paging device defined. */ +#define e$nrfc 241 /* Specified reverse flow control on AMLC */ +#define e$cpovfl 242 /* PX$SVTIM overflow of CPU seconds */ +#define e$ioovfl 243 /* PX$SVTIM overflow of I/O seconds */ +#define e$bhovfl 244 /* PX$SVTIM overflow both CPU & I/O sec.s */ +#define e$aele 245 /* Attempt to execute non-executable library */ +#define e$list 246 /* Search list not found or invalid. */ +#define e$rule 247 /* Search rule not found or invalid. */ +#define e$ntop 248 /* Search rule was not an optional rule. */ +#define e$nest 249 /* Template files were nested too deeply--probably circular reference. */ +#define e$admn 250 /* Illegal attempt to change administrator rule. */ +#define e$eol 251 /* End of list reached. */ +#define e$adrl 252 /* Error in administrator rules. */ +#define e$ifcb 253 /* Insufficient free contiguous blocks. */ +#define e$imem 254 /* Insufficient memory for extent map. */ +#define e$nres 255 /* No resources available for request. */ +#define e$ilus 256 /* Illegal use of Primix gate */ +#define e$nchd 257 /* No child found for this process. */ +#define e$int 258 /* Wait terminated by interrupt */ +#define e$xshdn 259 /* Can NOT initialize Primix when running */ +#define e$nopx 260 /* Can NOT shutdown Primix when NOT running */ +#define e$nous 261 /* Primix process table has no users when it should have users. */ +#define e$incom 262 /* Primix process table returned is incomplete */ +#define e$ireg 263 /* Illegal EPF Registration */ +#define e$inai 264 /* Invalid number of args. in initialization routine */ +#define e$illn 265 /* Illegal link at registration */ +#define e$buid 266 /* Bad user id */ +#define e$inre 267 /* Invalid request */ +#define e$npsg 268 /* Not enough per-user DATR1 segments */ +#define e$uinf 269 /* User Id not found */ +#define e$ivpt 270 /* An invalid block pointer was given */ +#define e$snal 271 /* Segment not allocated */ +#define e$natf 272 /* Not able to free storage */ +#define e$nd3s 273 /* No Dtar 3 Segments available */ +#define e$bsmt 274 /* Null smt_ptr or bad field within SMT */ +#define e$ialn 275 /* Illegal alias name */ +#define e$bptr 276 /* Bad pointer (within SMT?) */ +#define e$idbt 277 /* Illegal database */ +#define e$bdtr 278 /* Bad DTAR */ +#define e$lunr 279 /* Library unregistered */ +#define e$enrg 280 /* EPF has not been registered */ +#define e$ndrb 281 /* No directory block for unit. */ +#define e$cqpt 282 /* Circular Quota parent thread. */ +#define e$area 283 /* Corrupted area encountered. */ +#define e$nown 284 /* Not owner of resource. */ +#define e$blok 285 /* Bad block encountered. */ +#define e$ismr 286 /* Invalid static mode resume. */ +#define e$blin 287 /* Bad line number. */ +#define e$bbuf 288 /* Bad buffer number */ +#define e$bprotocol 289 /* Bad protocol */ +#define e$line_in_use 290 /* Line in use */ +#define e$buf_in_use 291 /* Buffer in use */ +#define e$invalid_rem_buf_use 292 /* Invalid use of remote buffer */ +#define e$invalid_asline_buf_use 293 /* Invalid use of assign line buffer */ +#define e$invalid_asd_use 294 /* Invalid ASD use */ +#define e$invalid_asd_sample_speed 295 /* Invalid sample speed for ASD */ +#define e$invalid_dislog_use 296 /* Invalid use of DISLOG */ +#define e$nsni 297 /* nss database not initialized */ +#define e$nsnc 298 /* nss database naming conflict */ +#define e$nsac 299 /* nss database address conflict */ +#define e$nthn 300 /* nts host not configured */ +#define e$ntns 301 /* nts not started */ +#define e$ntst 302 /* nts already started */ +#define e$ntcf 303 /* not an nts configuration file */ +#define e$ntlc 304 /* LHC is unconfigured */ +#define e$ntin 305 /* nts database is uninitialized */ +#define e$ntdl 306 /* LHC is not down-line loaded */ +#define e$plaa 307 /* primos line already assoc */ +#define e$llaa 308 /* lts line already assoc */ +#define e$naso 309 /* not associated */ +#define e$ncfg 310 /* not configured */ +#define e$nxcb 311 /* XCB unavailable for request */ +#define e$doqf 312 /* Device output queue full */ +#define e$lnoc 313 /* Line not connected */ +#define e$rqf 314 /* Request queue full */ +#define e$crej 315 /* Connection rejected */ +#define e$ctmo 316 /* Connection request timed out */ +#define e$lhdn 317 /* LHC down */ +#define e$ltdn 318 /* LTS down */ +#define e$ntsh 319 /* NTS shutdown */ +#define e$qful 320 /* Queue is full */ +#define e$qemp 321 /* Queue is empty */ +#define e$noq 322 /* No queue for queue operation */ +#define e$val 323 /* Validation error */ +#define e$comm 324 /* Command illegal for this operation */ +#define e$awir 325 /* Page is already wired */ +#define e$iwir 326 /* Page is not wired */ +#define e$npda 327 /* No password directories allowed */ +#define e$nint 328 /* System not initialized */ +#define e$reiu 329 /* Registered EPF is in-use. */ +#define e$nba 330 /* No Buffers Available */ +#define e$lnow 331 /* Line Not Owned By You */ +#define e$lnp 332 /* Line Not Present on System */ +#define e$lna 333 /* Lock not allocated */ +#define e$ldes 334 /* Lock has been destroyed */ +#define e$lny 335 /* Lock is not yours */ +#define e$rmln 336 /* Illegal operation on remote line. */ +#define e$itlb 337 /* Invalid use of terminal line buffer. */ +#define e$ips 338 /* Invalid parameter setting. */ +#define e$dpar 339 /* Duplicate parameter. */ +#define e$pns 340 /* Parameter not settable. */ +#define e$bchk 341 /* Bad checksum */ +#define e$expd 342 /* Software has expired */ +#define e$dnts 343 /* Density not selected. */ +#define e$snts 344 /* Speed not selected. */ +#define e$bmpc 345 /* Magtape controller hung. */ +#define e$gpon 346 /* Generated Passwords ON. */ +#define e$ngpw 347 /* No Generated PassWords (they're not on).*/ +#define e$ista 348 /* Invalid state */ +#define e$zero 349 /* Uninitialized block on robust part */ +#define e$nadm 350 /* System Not Admitting Users */ +#define e$rxmh 351 /* Multiple NPX hop on ext dir entry(root)*/ +#define e$nnet 352 /* The Network isn't running */ +#define e$mtpt 353 /* Operation illegal on Mount-Point */ +#define e$rpmh 354 /* Multiple NPX hop on portals */ +#define e$mnsh 355 /* Multiple name space hop */ +#define e$iptr 356 /* Null pointer given. */ +#define e$pthu 357 /* Pathname unavailable. */ +#define e$igmt 358 /* Inconsistent GMTs on different machines*/ +#define e$iroo 359 /* Operation illegal on root directory. */ +#define e$newf 360 /* Primos rev on remote machine too old. */ +#define e$bpor 361 /* Target node of portal is not remote. */ +#define e$prvt 362 /* Remote reference to a private disk. */ +#define e$nd1s 363 /* No Dtar 1 Segments available */ +#define e$umle 364 /* Unexpected GetMutexLock error */ +#define e$ernf 365 /* EPF registration level not found */ +#define e$apsm 366 /* Acat currently protecting shared memory*/ +#define e$unli 367 /* Specified user not logged in. */ +#define e$muli 368 /* Multiple users logged in */ +#define e$cwat 369 /* Can not watch. */ +#define e$ubw 370 /* User being watched another user. */ +#define e$icut 371 /* Incompatible unit table entry type. */ +#define e$ianl 372 /* Initial attach point is not local. */ +#define e$nowr 373 /* Not open for write. */ +#define e$ndsm 374 /* No dsm msg required, see proposal 62 */ +#define e$dnta 375 /* Invalid physical disk number (off_line)*/ +#define e$bfmt 376 /* Format not supported on this drive */ +#define e$acpg 377 /* Cannot assign active paging disk */ +#define e$acdd 378 /* Cannot assign active crash dump disk */ +#define e$pwru 379 /* Password recently used. */ +#define e$cple 380 /* Change Password Limit Exceeded. */ +#define e$metl 381 /* Messages on remote system limited .. */ +#define e$pnir 382 /* OnLine Disk Part. NOT being Fix_Disked */ +#define e$fder 383 /* Fatal error del file info, OnLine Fix_D*/ +#define e$fdir 384 /* OnLine Fix_Disk Internal error */ +#define e$last 384 /* THIS ***MUST*** BE LAST -- */ + +/* */ +/* The value of E$LAST must equal the last error code. */ +/* */ + +/* End of ERRD.INS.CC */ diff --git a/syscom/keys.ins.cc b/syscom/keys.ins.cc new file mode 100644 index 0000000..4810b40 --- /dev/null +++ b/syscom/keys.ins.cc @@ -0,0 +1,618 @@ +/* KEYS.INS.PL1, SYSCOM, PRIMOS GROUP, 11/18/91 + Mnemonic keys for Primos file system (CC) + Copyright (c) 1982, Prime Computer, Inc., Natick, MA 01760 */ + +/* */ +/**** ****/ +/**** IMPORTANT: Values in this file MUST be in decimal. ****/ +/**** Bit strings, octal, or hex are no good! ****/ +/**** ****/ +/**** All comments should have a ****/ +/**** for each line of the comment. ****/ +/**** Multi-line comments break the conversion ****/ +/**** utilities in syscomsrc. ****/ +/**** The length of the keyname+length of value****/ +/**** should not be more than 19 characters. ****/ +/* MODIFICATIONS: + Date Programmer Description of modification + 11/18/91 Sager Added K$ENCR, K$DSCR, K$MLEN, K$CRLF, K$ENSH, + and K$ENLG for Message 512 support. + 04/11/91 Gorton Added K$CHPR, K$ENCP, K$ENPW, K$DSCP, K$DSPW for + for CHANGE_PROJECT. + 12/07/90 Snay Added k$cra_mismatch, + k$set_dta_dtm, and k$rtnrec_error for disk + error tracking. + 12/04/90 RRM added K$elng for long entry(point)names k$elng + 09/04/90 A. Conte Added k$getf, k$getn, k$gmyw, k$setw, k$strt, and + k$stop. + 08/30/90 Hunt Added K$INT0 and K$DATA for APM. + 08/10/90 J.Pascucci Fixed comments that broke the .IBAS conversion. + and added warning. + 04/10/90 Morin Added K$NTLK for PRWF$$ key option mode. + 03/12/90 Slutz Chagned k$nmnt from 32 to 128. + 10/19/89 Tung Added K$PEOF for prwf$$ and K$FACR for sgdr$$. + 05/03/89 RRM Added new key K$NULF for OPSRS$/SRSFX$ null first + search. [4039718] -Rich Malloy + 04/17/89 Huber Added K$NMNT key for srch$$. + 12/26/88 Slutz Readded K$RW & K$RWX for VINIT$ + K$VMRW for SRCH$$ & VINIT$. + 11/02/88 Snay Added registered_epf support: + Added k$force and k$relax. + Added k$some and k$spublic0. + k$public3_one and k$public0_one. + Added k$public_all, k$public_one, k$public3_one + and k$public0_one. + Added keys k$comm and k$prcd. + Added key k$initreg. + Added K$PUBLIC keys for EPFs. + 09/23/88 A. Conte Added K$GTAL for As$Lst gate. + 08/16/88 Vergin Added new keys for BKP$OP and BKP$SATR. + 06/15/88 Cook Converted to SPL. + 05/16/88 Phyfe Added K$URI key for CHBK$$ (for DMD DCM + project - the Bayer Cache). + 02/23/88 Allen Added k$qual to indicate qualified pathnames only + for tnchk$(). + 12/18/87 Poh Added k$brief and k$long to indicate brief or long + prompt. It is used in CL$MSG. + 07/17/87 Roper Remove k$rrsv from search rule keys (unused) + 03/18/87 M. Sadigh Changed k$reinit_all_reg to K$reinit_ref_libs. + 01/12/87 A. Conte Added K$SLS and K$PLST for As$Set gate. + 07/14/86 M. Sadigh Added a new key K$FRC_UNREG EPF$UNREG. + 07/05/86 Jones Rev 21.0 integration of: + Tate [developed: 05/01/86] + Added comment, (new) SNCHK$'s uses xxCHK$ keys. + 06/16/86 Kazin Deleted dynamic storage manager keys. [SPAR 3019441] + 05/22/86 M. Sadigh Added k$reinit_all_reg which used when calling + EPF$INIT to re-intialize all referneced libraries. + 02/05/86 Silveira Added K$WIRE for wired class dynamic storage. + 02/04/86 Dossett Changed keys K$UNKN, K$RRSV, K$ACAT, K$FILE, + K$SDIR, K$DIR + from hexadecimal values to decimal to make the + build program for SYSCOM>KEYS.INS.@ happy. + 02/03/86 Moore Revert the values of K$INB and K$OUTB. Fix in TTY$RS. + 12/19/85 M. Sadigh Added k$reinit_reg for EPF$INIT. Also added K$unreg + .................. to unregister a registered epf. + 11/27/85 Moore Changed K$NCNT to K$NCAM. + 11/25/85 Moore [3015705] Added RRS fix to keys k$inb, k$outb. + 11/01/85 Dossett/Yang Added K$(TEXT HMDR ORDR RFDR KEYW ANYTYPE UNKN + RRSV ACAT FILE SDIR DIR) for Search Rules primitives + (SR$NEXTR, SR$EXSTR, OPSR$ and OPSRS$). + 01/03/85 JBall Added K$CMWR, K$CMRD for IPC$CM. + 11/16/84 Pinkoski Added K$BKUP for SRCH$$, K$DTA & K$DTC for SATR$$. + 10/15/84 JSheehan Added K$LINE, K$LINC, K$LINS, and K$LINU for + DS$ASY; and added K$NEXT for DS$UNI. + 08/06/84 RMorris Added k$inb and k$outb for TTY$RS. + 07/06/84 Sadigh Added K$COMO to gpath$ + 04/16/84 Rees Added K$NCNT, K$BKIO to SRCH$$ keys. + Added K$WAIT,K$SAVE CHBK$$ keys. + 01/16/84 JBall Added K$MINE for IPC$GU, also added low water key + (K$IPCB) for IPC$ST. + 01/12/84 JBall K$MMSG no longer defined for IPC. + 08/10/83 Kazin Added k$segn key for GPATH$, added K$NO_FRC_DEL and + K$FRC_DEL for DELEPF$, added mods to EPF keys, + added K$SPRC for subsystem process class dynamic + storage and removed K$VMRW. + 07/14/83 Kroczak Changed k$dtls (date/time last saved) to + dtb (date/time backed-up). + 04/18/83 JBall Added keys for IPC support. [osi 1566] + 01/27/83 Kazin Added K$SPEC to VINIT$ keys. [OSINFO 1362] + 01/24/83 Kazin Added keys for dynamic storage manager. [OSI 1329] + 11/15/82 Kroczak Added k$trun key to satr$$ + 10/11/82 Kroczak Added k$dtls key to satr$$. + 09/10/82 Kroczak Added k$ltyp key to satr$$ and k$resv key to srch$$ + 07/28/82 Kazin Deleted K$RW, K$RWX, and K$GATE from VINIT$ keys. + 07/03/82 Weinberg Added keys for DIR$CR. + 06/17/82 Kazin Added K$DUPL for vinit$. + 05/21/82 Goggin Added k$st$s, k$st$n, k$nlop, and k$lonp for + ........ event logging module LGINI$.PLP. + 04/29/82 Kazin Added keys for SW$INT. + 12/02/81 Kazin Got rid of VINIT$ keys k$pref, k$spec, and k$dtar. + 11/18/81 Curreri Added keys for log_init to turn logging + ........ or net logging on or off. + 11/12/81 Weinberg Added k$grp key for Idchk$. + 11/09/81 Weinberg Removed non-standard ERROR code definitions from + ........ MGSET$ section; added keys for R/W locks in SATR$$. + 10/06/81 Weinberg Removed initial attach point keys for ATCH$$, + ........ ACL keys for RDEN$$; added keys for DIR$RD. + 07/24/81 Kazin Added allocate consecutive segment keys for GETSN$. + 07/16/81 Weinberg Added keys for LDISK$. + 06/17/81 Weinberg Added keys for FNCHK$ and friends. + 04/24/81 Weinberg Added K$INIA to GPATH$ keys. + 03/11/81 Cecchin added EPF keys. + */ + +/* key definitions */ + +/* *********************** prwf$$ *********************** */ + +/* ******** rwkey ******** */ + +#define k$read 1 /* read */ +#define k$writ 2 /* write */ +#define k$posn 3 /* position only */ +#define k$trnc 4 /* truncate */ +#define k$rpos 5 /* read current position */ + +/* ******** poskey ******** */ + +#define k$prer 0 /* pre-position relative */ +#define k$prea 8 /* pre-position absolute */ +#define k$posr 16 /* post-position relative */ +#define k$posa 24 /* post-position absolute */ +#define k$peof 128 /* pre-position to eof */ + +/* ******** mode ******** */ + +#define k$conv 256 /* convenient number of words */ +#define k$frcw 16384 /* forced write to disk */ +#define k$ntlk 8192 /* Avoid taking tran lock for writing */ + +/* *********************** srch$$ *********************** */ + +/* ******** action ******** */ + +/* k$read 1#define open for read (k$read) */ + +/* k$writ 2#define open for write (k$writ) */ + +#define k$rdwr 3 /* open for read & write */ +#define k$clos 4 /* close file */ +#define k$dele 5 /* delete file */ +#define k$exst 6 /* check file's existence */ +#define k$bkup 7 /* open for read BY BACKUP utility */ +#define k$vmr 16 /* open for vmfa read */ +#define k$vmrw 48 /* open for vmfa read/write */ +#define k$bkio 8192 /* open for block mode */ +#define k$getu 16384 /* system returns unit number */ +#define k$resv -32768 /* reserved bit */ + +/* ******** ref ******** */ + +#define k$iufd 0 /* file entry is in ufd */ +#define k$iseg 64 /* file entry is in segment directory */ +#define k$nmnt 128 /* don't cross mount points */ +#define k$cacc 512 /* change access */ + +/* ******** newfil ******** */ + +#define k$nsam 0 /* new sam file */ +#define k$ndam 1024 /* new dam file */ +#define k$nsgs 2048 /* new sam segment directory */ +#define k$nsgd 3072 /* new dam segment directory */ +#define k$ncam 4096 /* new contiguous file */ +#define k$curr -1 /* currently attached ufd */ + +/* *********************** vinit$ *********************** */ + +#define k$any 0 /* any segment(s) acceptable */ +#define k$spec 1 /* use specified segments */ +#define k$dupl 16 /* duplicate segs requested */ +#define k$cnsc 8 /* consecutive segments required */ +#define k$r 2 /* Read access on segment (^= k$read!) */ +#define k$rx 6 /* Read/execute access */ +#define k$rw 3 /* Read/write access on segment */ +#define k$rwx 7 /* Read/write/execute access */ + +/* *********************** getsn$, find_seg ************* */ + +#define k$down 0 /* Allocate decreasing segment #'s */ +#define k$up 1 /* Allocate increasing segment #'s */ +#define k$upc 2 /* Allocate increas. consec. segs. */ +#define k$dwnc 4 /* Allocate decreas. consec. segs. */ + +/* *********************** atch$$ *********************** */ + +/* ******** key ******** */ + +#define k$imfd 0 /* ufd is in mfd */ +#define k$icur 2 /* ufd is in current ufd */ + +/* ******** keymod ******** */ + +#define k$setc 0 /* set current ufd (do not set home) */ +#define k$seth 1 /* set home ufd (as well as current) */ + +/* ******** name ******** */ + +#define k$home 0 /* return to home ufd (key=k$imfd) */ + +/* ******** ldisk ******** */ + +#define k$alld -32768 /* search all disks */ + +/* k$curr -1#define search mfd of current disk (k$curr) */ + +/* *********************** ac$set *********************** */ + +/* k$any 0#define Do it regardless */ + +#define k$crea 1 /* Create new ACL (error if already exists) */ +#define k$rep 2 /* Replace existing ACL (error if does not exist)*/ + +/* *********************** sgdr$$ *********************** */ + +/* ******** key ******** */ + +#define k$spos 1 /* position to entry number in segdir */ +#define k$gond 2 /* position to end of segdir */ +#define k$gpos 3 /* return current entry number */ +#define k$msiz 4 /* make segdir given nr of entries */ +#define k$mvnt 5 /* move file entry to different position */ +#define k$full 6 /* position to next non-empty position */ +#define k$free 7 /* position to next free entry */ +#define k$facr 11 /* find next free entry and create file */ + +/* *********************** rden$$ *********************** */ + +/* ******** key ******** */ + +/* k$read 1#define read next entry (k$read) */ + +#define k$rsub 2 /* read next sub-entry */ + +/* k$gpos 3#define return current pos in ufd (k$gpos) */ + +#define k$upos 4 /* position in ufd */ +#define k$name 5 /* read entry specified BY name */ + +/* ******************************* dir$rd */ + +/* k$read 1#define Read next entry */ + +#define k$init 2 /* Initialize directory (read header */ + +/* *********************** satr$$ *********************** */ + +/* ******** key ******** */ + +#define k$prot 1 /* set protection */ +#define k$dtim 2 /* set datetime modified */ +#define k$dmpb 3 /* set dumped bit */ +#define k$rwlk 4 /* set per file read/write lock */ +#define k$sown 5 /* set OWNER field */ +#define k$sdl 6 /* set ACL/DELETE switch */ +#define k$ltyp 7 /* set logical type */ +#define k$dtb 8 /* set date/time backed-up */ +#define k$trun 9 /* set truncated BY FIX_DISK bit */ +#define k$dta 10 /* set date/time last accessed */ +#define k$dtc 11 /* set date/time created */ + +/* ****** rwlock ****** */ + +#define k$dflt 0 /* Use system default value */ +#define k$excl 1 /* N readers OR one writer */ +#define k$updt 2 /* N readers AND one writer */ +#define k$none 3 /* N readers AND N writers */ + +/* *********************** errpr$ *********************** */ + +/* ******** key ******** */ + +#define k$nrtn 0 /* never return to user */ +#define k$srtn 1 /* return after start command */ +#define k$irtn 2 /* immediate return to user */ + +/* *********************** limit$ ************************ */ + +/* ******** key ******** */ + +/* k$read 1#define returns information */ + +/* k$writ 2#define sets information */ + +/* ******** subkey ******** */ + +#define k$cplm 256 /* CPU time in seconds */ +#define k$lglm 512 /* login time in minutes */ + +/* *********************** gpath$ ************************ */ + +/* ******** key ******** */ + +#define k$unit 1 /* pathname of unit returned */ +#define k$cura 2 /* pathname of current attach point */ +#define k$homa 3 /* pathname of home attach point */ +#define k$inia 4 /* pathname of initial attach point */ +#define k$segn 5 /* pathname of segment returned */ +#define k$como 6 /* pathname of comoutput file + + ************************** ds$uni *************************** */ +/* ds$uni uses keys declared for gpath$ plus: */ + +#define k$next -1 /* pathname of next open unit */ + +/* *********************** mgset$/msg$st ***************** */ + +/* ******** key ******** */ + +#define k$acpt 0 /* m -accept */ +#define k$defr 1 /* m -defer */ +#define k$rjct 2 /* m -reject */ +#define k$encr 3 /* Enable CRLF */ +#define k$dscr 4 /* Disable CRLF messages */ +#define k$ensh 5 /* Enable 80 character messages*/ +#define k$enlg 6 /* Enable MAX character messages*/ +#define k$crlf 7 /* query crlf state */ +#define k$mlen 8 /* Query maax message length*/ + +/* ******************************* fnsid$ ***************************** */ + +#define k$list 1 /* List enabled nodes */ +#define k$add 2 /* Add to existing list */ +#define k$srch 3 /* Search for specific node */ + +/* ********************************************************************** */ + +/* ******************* keys for resume functionality for epfs *********** */ + +/* ************************ str$al, str$fr ****************************** */ + +#define k$proc 1 /* storage types: per process storage */ +#define k$level 2 /* per level */ +#define k$prog 3 /* per program */ +#define k$syst 4 /* per system */ +#define k$frblk 5 /* free a blk of storage */ +#define k$anywhere -1 /* base the storage block anywhere */ +#define k$zero 0 /* base the block at word zero */ + +/* ********************* epf$map, epf$init, epf$allc ************************* + ********************* epf$run, epf$invk, epf$del ************************* + ********************* delepf$ ******************************************* */ + +#define k$copy 1 /* copy epf file into temp segs */ +#define k$dbg 2 /* map dbg info into memory from epf */ +#define k$initall 1 /* init all of the linkage areas */ +#define k$reinit 2 /* only reinit linkage areas */ +#define k$invk 0 /* invoke and do not delete epf from memory */ +#define k$invk_del 2 /* invoke and delete EPF */ +#define k$restore_only 1 /* restore but do not invoke EPF */ +#define k$reinit_all_reg 3 /* re-initialize per-user linkage + of registered EPF and all + its referenced libraries */ +#define k$reinit_reg 4 /* re-initalize only the registerd + library */ +#define k$initreg 5 /* initialize registered EPF */ +#define k$frc_del 1 /* force terminate EPF */ +#define k$duct 4 /* decrement user count on registered epf */ +#define k$unreg 5 /* unregister the EPF. */ +#define k$frc_unreg 6 /* force unregister the EPF. */ +#define k$no_frc_del 0 /* do not force terminate EPF */ +#define k$nonregister 0 /* do not register this EPF*/ +#define k$public 1 /* register as ring 3 non-system class EPF */ +#define k$spublic0 2 /* register as ring 0 system class EPF */ +#define k$comm 1 /* dynamic linking to common */ +#define k$prcd 2 /* dynamic linking to proc */ +#define k$some 1 /* report only matches */ +#define k$force 1 /* force register an epf */ +#define k$relax 2 /* do not force register an epf */ + +/* **************** fnchk$, tnchk$, idchk$, pwchk$, snchk$ **************** */ + +#define k$uprc 1 /* Mask to uppercase */ +#define k$wldc 2 /* Allow wildcards (not pwchk$, snchk$) */ +#define k$null 4 /* Allow null names */ +#define k$num 8 /* Allow numeric names (fnchk$ only) */ +#define k$grp 8 /* Check group name (idchk$) */ +#define k$qual 16 /* Allow qualified names only (tnchk$ only) */ +#define k$elng 32 /* Allow long entry(point)names (fnchk$ only) */ + +/* ******************************** q$set ********************************* */ + +#define k$smax 1 /* Set max quota */ + +/* ******************************* LGINI$ *****************************/ + +#define k$lof 0 /* logging off */ +#define k$nlof 1 /* net logging off */ +#define k$lon 2 /* logging on, use today's date */ +#define k$nlon 3 /* net logging on, use today's dt */ +#define k$lonp 4 /* turn sys logging on, use */ + +/* saved logging file date */ + +#define k$nlop 5 /* turn net logging on, use */ + +/* saved logging file date */ + +#define k$st$s 6 /* return status of sys logging */ +#define k$st$n 7 /* return status of net logging */ + +/* ******************************* ldisk$ ********************************* */ + +#define k$all 0 /* Return all disks */ +#define k$locl 1 /* Local disks only */ +#define k$rem 2 /* Remote disks only */ +#define k$sys 3 /* Disks from specified system only */ + +/* ******************************* sw$int ********************************* */ + +/* k$read 1#define Read present status */ + +#define k$on 2 /* Turn on interrupt(s) */ +#define k$off 3 /* Turn off interrupt(s) */ +#define k$rdon 4 /* Read present status and + turn on interrupt(s) */ +#define k$rdof 5 /* Read present status and + turn off interrupt(s) */ +#define k$rdal 6 /* Read present status of all + interrupts */ +#define k$alon 7 /* Turn on all interrupts */ +#define k$alof 8 /* Turn off all interrupts */ +#define k$raon 9 /* Read present status and + turn on all interrupts */ +#define k$raof 10 /* Read present status and + turn off all interrupts */ + +/* ******************************* dir$cr ********************************* */ + +#define k$same 0 /* Create directory of parent's type */ +#define k$pwd 1 /* Create password directory */ + +/* ********************************** ipc ********************************** */ + +/* ******************************** ipc_ckac ******************************** */ + +/* k$any 0#define Check mailbox user ID for any access */ + +/* k$read 1#define Check mailbox user ID for read access */ + +/* k$writ 2#define Check mailbox user ID for write access */ + +#define k$semt 3 /* Check for semaphore type open */ +#define k$intt 4 /* Check for interrupt type open */ + +/* ******************************** ipc$cm ********************************** */ + +#define k$cmwr 1 /* change mode to write only */ +#define k$cmrd 2 /* change mode to read only */ + +/* ******************************** ipc$gu ********************************** */ + +/* k$read 1#define Get user IDs for reading */ + +/* k$writ 2#define Get user IDs for writing */ + +/* k$rdwr 3#define Get user IDs for reading and writing */ + +#define k$mine 4 /* Get my mailbox user ID */ + +/* ******************************** ipc$o *********************************** */ + +/* ********** mode key **********/ + +/* k$read 1#define Open mailbox for reading */ + +/* k$writ 2#define Open mailbox for writing */ + +/* k$rdwr 3#define Open mailbox for reading and writing */ + +/* ********** notify key ********/ + +#define k$nfin 1 /* Notify with interrupts for msg waiting */ +#define k$nfsm 2 /* Notify semaphore for message waiting */ + +/* ************************** ipc$r, ipc$ra ********************************* */ + +/* k$read 1#define Read without waiting */ + +#define k$rdwt 2 /* Read and wait if no data */ + +/* ******************************** ipc$st ********************************** */ + +#define k$ipcb 2 /* First key for IPC$ST */ + +/* k$mmsg 1#define Get maximum msgs per mailbox (obsolete) */ + +#define k$nmsg 2 /* Get number of msgs waiting for this user */ +#define k$mrom 3 /* Get maximum space allowed for mailbox msgs*/ +#define k$room 4 /* Get remaining space available in mailbox */ +#define k$nusr 5 /* Get number of users attached to mailbox */ +#define k$nfys 6 /* Notify IPC$SEM database lock (for debug) */ +#define k$ipce 6 /* Make this last for debug */ + + +/* ******************************* chbk$$ ********************************** */ + +#define k$awwt 2 /* wait for completion */ +#define k$save 4 /* retain error info */ +#define k$uri 8 /* check uri for any user */ + +/***************************** tty$rs **** ********************************* */ + +#define k$outb -32768 /* Clear output buffer */ +#define k$inb 16384 /* Clear input buffer */ + +/******************************** ds$asy *********************************** */ + +#define k$lins 1 /* return summary of all async lines */ +#define k$line 2 /* return info for a specified async line */ +#define k$linu 3 /* return info for all async lines in use */ +#define k$linc 4 /* return info for all configured async lines */ + +/************************** sr$nextr & sr$exstr ******************************/ + +#define k$bgn 268369920 /* binary value of null pointer */ +#define k$end 268369920 /* binary value of null pointer */ +#define k$text 1 /* the search rule is text. */ +#define k$hmdr 2 /* the rule is [HOME_DIR] */ +#define k$ordr 3 /* the rule is [ORIGIN_DIR] */ +#define k$rfdr 4 /* the rule is [REFERENCING_DIR] */ +#define k$keyw 8 /* the rule is a keyword. */ +#define k$anyt -1 /* find a rule regardless of its type. */ +#define k$anytype -1 /* find a rule regardless of its type. */ +#define k$public_all 9 /* the rule is -PUBLIC */ +#define k$public_one 10 /* the rule is -PUBLIC */ +#define k$public3_one 11 /* the rule is for ring 3 */ +#define k$public0_one 12 /* the rule is for ring 0 */ + +/************************** opsr$ & opsrs$ ***********************************/ + +#define k$unkn 0 /* unknown type */ +#define k$acat 4096 /* access category */ +#define k$file 8192 /* file */ +#define k$sdir 16384 /* segment directory */ +#define k$dir -32768 /* directory */ +#define k$nulf 256 /* for opsrs$, and srsfx$, to search for the */ + /* null suffix first */ + +/***************************** As$Set/As$Lst **********************************/ + +#define k$sls 0 /* system login settings */ +#define k$plst 1 /* parameter list */ +#define k$gtal 2 /* get all parameters */ + +/***************************** Show$/Watch$ ***********************************/ + +#define k$getf 0 /* get first user I am watching */ +#define k$getn 1 /* get next user I am watching */ +#define k$gmyw 2 /* get user watching me */ +#define k$setw 3 /* set watch access */ +#define k$strt 4 /* start watch session */ +#define k$stop 5 /* stop watch session */ + +/******************************** cl$msg **************************************/ + +#define k$long 0 /* long prompt indicator */ +#define k$brief -32768 /* brief prompt indicator */ + +/***************************** bkp$op *********************************/ + +/* k$bkup 7#define do not update dta when close */ +#define k$obj 8 /* access and possibly open named object*/ +#define k$incr 16 /* incremental backup */ +#define k$bufr 32 /* open for prwf$$ I/O (buffered I/O) */ + /* the following keys are used during */ + /* incr backups to indicate how to */ + /* determine if an object should be */ + /* opened (i.e. saved): */ +#define k$dbit 128 /* check the dumped bit */ +#define k$fdtb 256 /* compare the dtb and dtm */ +#define k$udtb 512 /* cmp the dtm and a user supplied date */ + +/*********************** bkp$satr *********************************************/ + +/* k$dmpb 3#define set the dumped bit */ +/* k$dtb 8#define set the dtb */ +#define k$unam 2048 /* set attributes on the named object */ +#define k$uunt 4096 /* set attributes on the open object */ + +/*******************************mm$share_apm *********************************/ + +#define k$int0 0 /* segment initialized to zero */ +#define k$data 1 /* reserved for future */ + +/************************* disk tracking *************************************/ + +#define k$cra_mismatch 1 /* cra mismatch detected on icop read */ +#define k$set_dta_dtm 2 /* bad set dta/dtm request */ +#define k$rtn_rec_error 3 /* error on rtn_rec attempt */ + +/************************* chprj$ and change_project *************************/ + +#define k$chpr 0 /* Change project */ +#define k$encp 1 /* Enable CHPRJ$ and CHANGE_PROJECT */ +#define k$dscp 2 /* Disable CHPRJ$ and CHANGE_PROJECT */ +#define k$enpw 3 /* Enable passwords during CP */ +#define k$dspw 4 /* Disable passwords during CP */ + +/* End of insert file KEYS.INS.CC */