mirror of
https://github.com/prirun/p50em.git
synced 2026-01-13 23:26:13 +00:00
removed syscom/ directory, clock auto-sets via VCP interface +
SVC always fault - no more emulation of Primos II added support for 102.4 and 3.2us clock ticks
This commit is contained in:
Jim
parent
d907a5a68a
commit
bc8742fb5c
77
em.c
77
em.c
@ -89,8 +89,6 @@ OK:
|
||||
#include <errno.h>
|
||||
#include <setjmp.h>
|
||||
#include <sys/time.h>
|
||||
#include "syscom/keys.ins.cc"
|
||||
#include "syscom/errd.ins.cc"
|
||||
|
||||
/* In SR modes, Prime CPU registers are mapped to memory locations
|
||||
0-'37, but only 0-7 are user accessible. In the post-P300
|
||||
@ -141,6 +139,9 @@ typedef unsigned int pa_t; /* physical address */
|
||||
else if (*(int *)(crs+FLTH) == 0) \
|
||||
crs[KEYS] |= 0100;
|
||||
|
||||
/* this is probably incorrect - needs to test 16 more bits for denomalized
|
||||
doubles */
|
||||
|
||||
#define SETCC_D SETCC_F
|
||||
|
||||
/* XEXPC is a dummy to indicate that the C-bit may not be set correctly */
|
||||
@ -177,13 +178,13 @@ typedef unsigned int pa_t; /* physical address */
|
||||
|
||||
/* these macros are for the VI-mode branch insructions */
|
||||
|
||||
#define BCLT if (crs[KEYS] & 0200) RPL = iget16(RP); else RPL++
|
||||
#define BCLE if (crs[KEYS] & 0300) RPL = iget16(RP); else RPL++
|
||||
#define BCEQ if (crs[KEYS] & 0100) RPL = iget16(RP); else RPL++
|
||||
#define BCLT if (crs[KEYS] & 0200) RPL = iget16(RP); else RPL++
|
||||
#define BCLE if (crs[KEYS] & 0300) RPL = iget16(RP); else RPL++
|
||||
#define BCEQ if (crs[KEYS] & 0100) RPL = iget16(RP); else RPL++
|
||||
#define BCNE if (!(crs[KEYS] & 0100)) RPL = iget16(RP); else RPL++
|
||||
#define BCGE if (!(crs[KEYS] & 0200)) RPL = iget16(RP); else RPL++
|
||||
#define BCGT if (!(crs[KEYS] & 0300)) RPL = iget16(RP); else RPL++
|
||||
#define BLS if (crs[KEYS] & 020000) RPL = iget16(RP); else RPL++
|
||||
#define BLS if (crs[KEYS] & 020000) RPL = iget16(RP); else RPL++
|
||||
#define BXNE if (crs[X] != 0) RPL = iget16(RP); else RPL++
|
||||
#define BYNE if (crs[Y] != 0) RPL = iget16(RP); else RPL++
|
||||
|
||||
@ -310,7 +311,7 @@ char gen0nam[][5] = {
|
||||
*/
|
||||
|
||||
int traceflags=0; /* each bit is a trace flag */
|
||||
int savetraceflags=0; /* see ITLB */
|
||||
int savetraceflags=0;
|
||||
int traceuser=0; /* OWNERL to trace */
|
||||
int numtraceprocs=0;
|
||||
#define MAXTRACEPROCS 2
|
||||
@ -335,7 +336,7 @@ unsigned short sswitch = 014114; /* sense switches, set with -ss & -boot*/
|
||||
|
||||
unsigned short cpuid = 27; /* STPM CPU model, set with -cpuid */
|
||||
|
||||
unsigned long instcount=0; /* global instruction count */
|
||||
unsigned long instcount=0; /* global instruction count */
|
||||
|
||||
unsigned short inhcount = 0; /* number of instructions to stay inhibited */
|
||||
|
||||
@ -344,7 +345,7 @@ unsigned int instpermsec = 2000; /* initial assumption for inst/msec */
|
||||
jmp_buf jmpbuf; /* for longjumps to the fetch loop */
|
||||
|
||||
/* The standard Prime physical memory limit on early machines is 8MB.
|
||||
Later machines have higher memory capacities, up to 1GB, using
|
||||
Later machines have higher memory capacities, up to 512M, using
|
||||
32-bit page tables.
|
||||
NOTE: rev 20 is limited to 32MB on all machines. */
|
||||
|
||||
@ -2129,6 +2130,11 @@ pxregsave(unsigned short wait) {
|
||||
if (crs[OWNERL] == 0 || (crs[KEYS] & 1))
|
||||
return;
|
||||
|
||||
/* NB: I think hardware might save the base registers in a predictable
|
||||
location in the PCB register save area, rather than compressed in a
|
||||
random order, because IIRC, Primos sometimes looks at a waiting
|
||||
process' PB to see where it is waiting */
|
||||
|
||||
pcbp = *(unsigned int *)(crs+OWNER);
|
||||
regp = pcbp+PCBREGS;
|
||||
mask = 0;
|
||||
@ -4085,7 +4091,8 @@ irtn:
|
||||
|
||||
case 000505: /* SVC */
|
||||
TRACE(T_FLOW, " SVC\n");
|
||||
svc();
|
||||
fault(SVCFAULT, 0, 0);
|
||||
fatal("Returned from SVC fault");
|
||||
continue;
|
||||
|
||||
case 000111: /* CEA */
|
||||
@ -4438,8 +4445,8 @@ irtn:
|
||||
long delayusec, actualmsec;
|
||||
|
||||
/* for BDX *-1 loop (backstop process mainly), we want to change
|
||||
this to a 10ms sleep so that the emulation host doesn't peg the
|
||||
CPU.
|
||||
this to a 10ms sleep so that the emulation host's CPU isn't
|
||||
pegged the whole time the emulator is running.
|
||||
|
||||
So first, check to see if any device times expire sooner than
|
||||
this, and if so, limit the sleep time to the lowest expiration
|
||||
@ -6018,7 +6025,7 @@ keys = 14200, modals=100177
|
||||
|
||||
case 01002:
|
||||
if (crs[KEYS] & 010000) { /* V/I mode */
|
||||
//traceflags = ~TB_MAP;
|
||||
TRACE(T_FLOW|T_PCL, " PCL %s\n", searchloadmap(ea, 'e'));
|
||||
//TRACE(T_FLOW|T_PCL, "#%d %o/%o: PCL %o/%o\n", instcount, RPH, RPL-2, ea>>16, ea&0xFFFF);
|
||||
if (numtraceprocs > 0 && TRACEUSER)
|
||||
for (i=0; i<numtraceprocs; i++)
|
||||
@ -6029,7 +6036,6 @@ keys = 14200, modals=100177
|
||||
printf("Enabled trace for %s at sb '%o/%o\n", traceprocs[i].name, crs[SBH], crs[SBL]);
|
||||
break;
|
||||
}
|
||||
TRACE(T_FLOW|T_PCL, " PCL %s\n", searchloadmap(ea, 'e'));
|
||||
pcl(ea);
|
||||
} else {
|
||||
TRACE(T_FLOW, " CREP\n");
|
||||
@ -6491,7 +6497,27 @@ keys = 14200, modals=100177
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
/* here for PIO instructions: OCP, SKS, INA, OTA. The instruction
|
||||
word is passed in as an argument to handle EIO (Execute I/O) in
|
||||
V-mode.
|
||||
*/
|
||||
|
||||
pio(unsigned int inst) {
|
||||
int class;
|
||||
int func;
|
||||
int device;
|
||||
|
||||
RESTRICT();
|
||||
class = inst >> 14;
|
||||
func = (inst >> 6) & 017;
|
||||
device = inst & 077;
|
||||
TRACE(T_INST, " pio, class=%d, func='%o, device='%o\n", class, func, device);
|
||||
devmap[device](class, func, device);
|
||||
}
|
||||
|
||||
|
||||
#if 0
|
||||
/* Handle SVC instruction. For real hardware emulation on an R-mode
|
||||
such as the P300, SVC would interrupt (JST*) through location '75
|
||||
(in vectored mode) or would fault on the P400.
|
||||
@ -7115,23 +7141,4 @@ badsvc:
|
||||
printf(" halting on bad svc, class=%o, func=%o\n", class, func);
|
||||
fatal(NULL);
|
||||
}
|
||||
|
||||
|
||||
|
||||
/* here for PIO instructions: OCP, SKS, INA, OTA. The instruction
|
||||
word is passed in as an argument to handle EIO (Execute I/O) in
|
||||
V-mode.
|
||||
*/
|
||||
|
||||
pio(unsigned int inst) {
|
||||
int class;
|
||||
int func;
|
||||
int device;
|
||||
|
||||
RESTRICT();
|
||||
class = inst >> 14;
|
||||
func = (inst >> 6) & 017;
|
||||
device = inst & 077;
|
||||
TRACE(T_INST, " pio, class=%d, func='%o, device='%o\n", class, func, device);
|
||||
devmap[device](class, func, device);
|
||||
}
|
||||
#endif
|
||||
|
||||
74
emdev.h
74
emdev.h
@ -260,12 +260,17 @@ int devasr (int class, int func, int device) {
|
||||
static int needflush; /* true if data has been written but not flushed */
|
||||
static struct termios terminfo;
|
||||
static fd_set fds;
|
||||
static short vcptime[8] = {7*0, 1};
|
||||
static short vcptimeix;
|
||||
|
||||
struct timeval timeout;
|
||||
unsigned char ch;
|
||||
int newflags;
|
||||
int n;
|
||||
int doblock;
|
||||
|
||||
time_t unixtime;
|
||||
struct tm *tms;
|
||||
|
||||
doblock = BLOCKIO;
|
||||
|
||||
switch (class) {
|
||||
@ -364,9 +369,9 @@ int devasr (int class, int func, int device) {
|
||||
|
||||
case 2:
|
||||
TRACE(T_INST, " INA '%02o%02o\n", func, device);
|
||||
TRACE(T_INST, "INA, RPH=%o, RPL=%o, [RP]=%o, [RP+1]=%o, BLOCKIO=%d\n", RPH, RPL, iget16(RP), iget16(RP+1),BLOCKIO);
|
||||
//TRACE(T_INST, "INA, RPH=%o, RPL=%o, [RP]=%o, [RP+1]=%o, BLOCKIO=%d\n", RPH, RPL, iget16(RP), iget16(RP+1),BLOCKIO);
|
||||
if (func == 0 || func == 010) { /* read a character */
|
||||
if (BLOCKIO)
|
||||
if (doblock)
|
||||
newflags = ttyflags & ~O_NONBLOCK;
|
||||
else
|
||||
newflags = ttyflags | O_NONBLOCK;
|
||||
@ -375,7 +380,7 @@ int devasr (int class, int func, int device) {
|
||||
fatal(NULL);
|
||||
}
|
||||
ttyflags = newflags;
|
||||
if (needflush) {
|
||||
if (doblock && needflush) {
|
||||
if (fflush(stdout) == 0) {
|
||||
needflush = 0;
|
||||
devpoll[device] = 0;
|
||||
@ -430,8 +435,10 @@ readasr:
|
||||
} else if (func == 012) { /* read control word */
|
||||
crs[A] = 04110;
|
||||
IOSKIP;
|
||||
} else if (func == 017) { /* read xmit interrupt vector */
|
||||
crs[A] = 0;
|
||||
} else if (func == 017) { /* read xmit interrupt vector -OR- clock */
|
||||
crs[A] = vcptime[vcptimeix++];
|
||||
if (vcptimeix > 7)
|
||||
vcptimeix = 0;
|
||||
IOSKIP;
|
||||
} else {
|
||||
printf("Unimplemented INA '04 function '%02o\n", func);
|
||||
@ -481,8 +488,27 @@ readasr:
|
||||
} else if (func == 013) {
|
||||
/* NOTE: does this in rev 20 on settime command (set clock on VCP?) */
|
||||
IOSKIP;
|
||||
|
||||
} else if (func == 017) {
|
||||
/* NOTE: 9950 does this in rev 20, others don't */
|
||||
if (crs[A] == 0) {
|
||||
|
||||
/* setup to read VCP battery backup clock (only on certain models);
|
||||
all words are 2 BCD digits */
|
||||
|
||||
#define BCD2(i) ((((i)/10)<<4) | ((i)%10))
|
||||
|
||||
unixtime = time(NULL);
|
||||
tms = localtime(&unixtime);
|
||||
vcptime[0] = BCD2(tms->tm_year);
|
||||
vcptime[1] = BCD2(tms->tm_mon+1);
|
||||
vcptime[2] = BCD2(tms->tm_mday);
|
||||
vcptime[3] = BCD2(tms->tm_wday);
|
||||
vcptime[4] = BCD2(tms->tm_hour);
|
||||
vcptime[5] = BCD2(tms->tm_min);
|
||||
vcptime[6] = BCD2(tms->tm_sec);
|
||||
vcptime[7] = 0;
|
||||
vcptimeix = 0;
|
||||
}
|
||||
IOSKIP;
|
||||
} else {
|
||||
printf("Unimplemented OTA device '%02o function '%02o, A='%o\n", device, func, crs[A]);
|
||||
@ -494,7 +520,8 @@ readasr:
|
||||
|
||||
/* tty output is blocking, even under Primos, which means that
|
||||
writes and fflush can hang the entire system, eg, if XOFF
|
||||
happens while writing to the console) */
|
||||
happens while writing to the console). Console output should
|
||||
be changed to non-blocking one of these days... */
|
||||
|
||||
if (needflush) {
|
||||
if (fflush(stdout) == 0)
|
||||
@ -1121,7 +1148,7 @@ int devmt (int class, int func, int device) {
|
||||
TRACE(T_TIO, " CPU interrupt to vector '%o\n", mtvec);
|
||||
intvec = mtvec;
|
||||
}
|
||||
/* HACK: keep interrupting because of Primos race bug */
|
||||
/* HACK: keep interrupting because of Primos/controller race bug */
|
||||
devpoll[device] = 100;
|
||||
}
|
||||
}
|
||||
@ -1173,7 +1200,7 @@ int devmt (int class, int func, int device) {
|
||||
|
||||
/* initclock sets Primos' real-time clock variable */
|
||||
|
||||
initclock(datnowea) {
|
||||
initclock(ea_t datnowea) {
|
||||
int datnow, i;
|
||||
time_t unixtime;
|
||||
struct tm *tms;
|
||||
@ -1187,8 +1214,9 @@ initclock(datnowea) {
|
||||
|
||||
int devcp (int class, int func, int device) {
|
||||
static short enabled = 0;
|
||||
static unsigned short clkvec;
|
||||
static short clkpic = 0;
|
||||
static unsigned short clkvec = 0;
|
||||
static short clkpic = 947;
|
||||
static float clkrate = 3.2;
|
||||
static unsigned long ticks = -1;
|
||||
static unsigned long absticks = -1;
|
||||
static struct timeval start_tv;
|
||||
@ -1200,7 +1228,7 @@ int devcp (int class, int func, int device) {
|
||||
unsigned long elapsedms,targetticks;
|
||||
int i;
|
||||
|
||||
#define SETCLKPOLL devpoll[device] = instpermsec*(-clkpic*3.2)/1000;
|
||||
#define SETCLKPOLL devpoll[device] = instpermsec*(-clkpic*clkrate)/1000;
|
||||
|
||||
switch (class) {
|
||||
|
||||
@ -1259,7 +1287,6 @@ int devcp (int class, int func, int device) {
|
||||
TRACE(T_INST, " INA '%02o%02o\n", func, device);
|
||||
if (func == 011) { /* input ID */
|
||||
crs[A] = 020; /* this is the Option-A board */
|
||||
crs[A] = 0220; /* VCP board? */
|
||||
crs[A] = 0120; /* this is the SOC board */
|
||||
//traceflags = ~TB_MAP;
|
||||
} else if (func == 016) {
|
||||
@ -1280,6 +1307,11 @@ int devcp (int class, int func, int device) {
|
||||
TRACE(T_INST, "Clock PIC interval set to %d\n", clkpic);
|
||||
} else if (func == 07) {
|
||||
TRACE(T_INST, "Clock control register set to '%o\n", crs[A]);
|
||||
if (crs[A] & 020)
|
||||
clkrate = 100.0; /* 102.4 on real SOC, but not good for RT clock */
|
||||
else
|
||||
clkrate = 3.2;
|
||||
SETCLKPOLL;
|
||||
} else if (func == 013) {
|
||||
clkvec = crs[A];
|
||||
TRACE(T_INST, "Clock interrupt vector address = '%o\n", clkvec);
|
||||
@ -1318,7 +1350,7 @@ int devcp (int class, int func, int device) {
|
||||
initclock(datnowea);
|
||||
}
|
||||
elapsedms = (tv.tv_sec-start_tv.tv_sec-1)*1000 + (tv.tv_usec+1000000-start_tv.tv_usec)/1000;
|
||||
targetticks = elapsedms/(-clkpic*3.2/1000);
|
||||
targetticks = elapsedms/(-clkpic*clkrate/1000);
|
||||
#if 0
|
||||
absticks++;
|
||||
if (absticks%1000 == 0)
|
||||
@ -2905,6 +2937,9 @@ int devpnc (int class, int func, int device) {
|
||||
|
||||
/* PNC transmit:
|
||||
|
||||
NOTE: most of this stuff needs to be moved to poll, because
|
||||
it may not be possible to start/complete a transmit here!
|
||||
|
||||
get a physical pointer to the xmit buffer, which can't cross
|
||||
a page boundary, then xmit the buffer. Since PNC packets
|
||||
have a specific size of either 512, 1024, or 2048 bytes, and
|
||||
@ -2924,7 +2959,8 @@ int devpnc (int class, int func, int device) {
|
||||
TRACE(T_INST|T_RIO, " xmit: dmaword = '%o/%d [%03o %03o]\n", dmaword, *(short *)&dmaword, dmaword>>8, dmaword&0xff);
|
||||
|
||||
/* broadcast packets are "I am up" msgs and are simply "eaten"
|
||||
here, as this is handled later in the devpnc poll code */
|
||||
here, as this is handled later in the devpnc poll code.
|
||||
XXX: should check that this really is the "I am up" msg */
|
||||
|
||||
if (xmit.toid == 255) {
|
||||
regs.sym.regdmx[xmit.dmareg+1] += xmit.dmanw; /* bump xmit address */
|
||||
@ -3003,10 +3039,8 @@ xmitdone:
|
||||
myid = crs[A] & 0xFF;
|
||||
pncstat = (pncstat & 0xFF00) | myid;
|
||||
TRACE(T_INST|T_RIO, " my node id is %d\n", myid);
|
||||
if (ni[myid].fd != -1) {
|
||||
printf("PNC: my node id of %d is in ring.cfg\n", myid);
|
||||
fatal(NULL);
|
||||
}
|
||||
if (ni[myid].cfg)
|
||||
fprintf(stderr, "Warning: my node id of %d is in ring.cfg\n", myid);
|
||||
strcpy(ni[myid].ip, "127.0.0.1");
|
||||
ni[myid].port = nport;
|
||||
ni[myid].myremid = myid;
|
||||
|
||||
4
os.c
4
os.c
@ -11,8 +11,6 @@
|
||||
#include <sys/times.h>
|
||||
|
||||
#include "os.h"
|
||||
#include "syscom/keys.ins.cc"
|
||||
#include "syscom/errd.ins.cc"
|
||||
|
||||
|
||||
os_init() {
|
||||
@ -76,7 +74,7 @@ os_exit() {
|
||||
|
||||
|
||||
os_erkl$$(short *key, short *erasech, short *killch, short *code) {
|
||||
if (*key == k$read) {
|
||||
if (*key == 1) { /* k$read */
|
||||
*erasech = 0210;
|
||||
*killch = 0377;
|
||||
*code = 0;
|
||||
|
||||
@ -1,540 +0,0 @@
|
||||
/* 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 */
|
||||
@ -1,618 +0,0 @@
|
||||
/* 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 <libname> */
|
||||
#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 */
|
||||
Loading…
x
Reference in New Issue
Block a user