Digital Research
This commit is contained in:
2020-11-06 18:50:37 +01:00
parent 621ed8ccaf
commit 31738079c4
8481 changed files with 1888323 additions and 0 deletions

View File

@@ -0,0 +1,26 @@
/*
Copyright 1983
Alcyon Corporation
8716 Production Ave.
San Diego, CA 92121
@(#) ar68.h - Jul 26, 1983 REGULUS 4.1
*/
#define LIBMAGIC 0177545
#define LIBHDSIZE 26
#define LIBNSIZE 14
struct libhdr {
char lfname[LIBNSIZE];
long lmodti;
char luserid;
char lgid;
#ifndef VAX11
int lfimode;
#else
unsigned short lfimode;
#endif
long lfsize;
};

View File

@@ -0,0 +1,109 @@
/*
Copyright 1983
Alcyon Corporation
8716 Production Ave.
San Diego, CA 92121
@(#) sys/cout.h - Jul 26, 1983 REGULUS 4.1
*/
struct hdr {
#ifndef VAX11
int ch_magic; /* c.out magic number 060016 = $600E */
#else
unsigned short ch_magic;
#endif
long ch_tsize; /* text size */
long ch_dsize; /* data size */
long ch_bsize; /* bss size */
long ch_ssize; /* symbol table size */
long ch_stksize; /* stack size */
long ch_entry; /* location of entry point */
short ch_rlbflg; /* relocation bits present flag, must be signed */
};
struct hdr_cout {
#ifndef VAX11
int ftype; /* c.out magic number 060016 = $600E */
#else
unsigned short ftype;
#endif
long ftext; /* text size */
long fdata; /* data size */
long fbss; /* bss size */
long fsym; /* symbol table size */
long fssize; /* stack size */
long fentry; /* location of entry point */
short fflag; /* relocation bits present flag, must be signed */
};
struct hdr2 {
#ifndef VAX11
int ch_magic; /* c.out magic number = 601B hex */
#else
unsigned short ch_magic;
#endif
long ch_tsize; /* # bytes in program text segment */
long ch_dsize; /* # bytes in program data segment */
long ch_bsize; /* # bytes in program bss segment */
long ch_ssize; /* # bytes in symbol table */
long ch_stksize; /* initial stack size */
long ch_entry; /* entry point--address of text segment */
short ch_rlbflg; /* relocation bits suppressed flag, must be signed */
long ch_dstart; /* address of data segment */
long ch_bstart; /* address of bss segment */
};
/* structure of the symbol table */
struct nlist {
char n_name[8];
#ifdef VAX11
short n_type;
#else
int n_type;
#endif
long n_value;
};
/* HDSIZE should be 28 bytes, HDSIZ2 should be 36 bytes */
#ifndef VAX11
# define HDSIZE (sizeof (struct hdr))
# define HDSIZ2 (sizeof (struct hdr2))
#else
# define HDSIZE 28
# define HDSIZ2 36
#endif
#ifdef VAX11
# define MAGIC (unsigned short) 0x601a /* bra .+26 instruction */
# define MAGIC1 (unsigned short) 0x601b /* data & bss base defined */
# define MAGICST2 (unsigned short) 0x601c /* shared text 2K boundary */
# define MAGICID (unsigned short) 0x601d /* I & D split */
# define MAGICST (unsigned short) 0x601e /* shared test 4k boundary (-n default) */
# define EX_MAGIC (unsigned short) 0x601a
# define EX_ABMAGIC (unsigned short) 0x601b
# define EX_2KSTXT (unsigned short) 0x601c
# define EX_IDMAGIC (unsigned short) 0x601d
# define EX_4KSTXT (unsigned short) 0x601e
#else
# define MAGIC 0x601a /* bra .+26 instruction */
# define MAGIC1 0x601b /* data & bss base defined */
# define MAGICST2 0x601c /* shared text 2K boundary */
# define MAGICID 0x601d /* I & D split */
# define MAGICST 0x601e /* shared test 4k boundary (-n default) */
# define EX_MAGIC 0x601a
# define EX_ABMAGIC 0x601b
# define EX_2KSTXT 0x601c
# define EX_IDMAGIC 0x601d
# define EX_4KSTXT 0x601e
#endif
#define SHT2KBOUND 2048
#define SHT2KFIX(x) (((x+SHT2KBOUND-1)/SHT2KBOUND)*SHT2KBOUND)
#define SHT4KBOUND 4096
#define SHT4KFIX(x) (((x+SHT4KBOUND-1)/SHT4KBOUND)*SHT4KBOUND)

View File

@@ -0,0 +1,38 @@
/*
Copyright 1983
Alcyon Corporation
8716 Production Ave.
San Diego, CA 92121
@(#) ctype.h - Jul 26, 1983 REGULUS 4.1
*/
#define _UPPER 01
#define _LOWER 02
#define _DIGIT 04
#define _WHTSP 010
#define _PUNCT 020
#define _CNTRL 040
#define _BSPACE 0100
#define _SPACE 0100 /* shared !!!! */
#define _HEXDEC 0200
#define _NASCII 0
extern char _ctype[];
/* Standard routines... */
#define isspace(c) (_ctype[c] & _WHTSP)
#define isupper(c) (_ctype[c] & _UPPER)
#define islower(c) (_ctype[c] & _LOWER)
#define isalpha(c) (_ctype[c] & (_UPPER | _LOWER))
#define isdigit(c) (_ctype[c] & _DIGIT)
#define ishex(c) (_ctype[c] & _HEXDEC)
#define isascii(c) (_ctype[c] != _NASCII)
#define isalnum(c) (_ctype[c] & (_UPPER|_LOWER|_DIGIT))
#define iscntrl(c) (_ctype[c] & _CNTRL)
#define isprint(c) (_ctype[c] & (_UPPER|_LOWER|_DIGIT|_PUNCT|_BSPACE|_SPACE))
#define ispunct(c) (_ctype[c] & _PUNCT)
#define toupper(c) ((c) & ~040)
#define tolower(c) ((c) | 040)
#define toascii(c) ((c) & 0177)

View File

@@ -0,0 +1,19 @@
/*
Copyright 1983
Alcyon Corporation
8716 Production Ave.
San Diego, CA 92121
@(#) iobuf.h - Jul 26, 1983 REGULUS 4.1
*/
#define BLEN 512
struct iobuf{
int fildes;
int nunused;
char *xfree;
char buff[BLEN];
};
#define FILE struct iobuf

View File

@@ -0,0 +1,24 @@
# define MAXFILES 15
struct fileps
{
char *buff; /* beginning of buffer */
char *bptr; /* current position */
int nchars; /* number of characters internal */
int bsize; /* size of buffer */
char eoferr; /* end of file flag */
char wrflag; /* mode flag */
char *pbuff; /* bottom of peek buffer */
};
struct fileps __filehdr[MAXFILES];
struct param
{
int bufsize; /* initial buffer size */
int peeksize; /* initial peek size */
};
extern struct param __param;
int __statbuf[MAXFILES];

View File

@@ -0,0 +1,30 @@
$ num
AR68.h
AR68.lst
$ num
COUT.h
COUT.lst
$ num
CTYPE.h
CTYPE.lst
$ num
IOBUF.h
IOBUF.lst
$ num
IODEC.h
IODEC.lst
$ num
MATH.h
MATH.lst
$ num
ORDER.h
ORDER.lst
$ num
SENDC68.h
SENDC68.lst
$ num
SIGNAL.h
SIGNAL.lst
$ num
STAT.h
STAT.lst

View File

@@ -0,0 +1,15 @@
Directory DRB0:[STEVE.CPM68K.V102A.INCLUDE]
AR68.H;2
COUT.H;2
CTYPE.H;2
IOBUF.H;2
IODEC.H;2
MATH.H;2
ORDER.H;2
SENDC68.H;2
SIGNAL.H;2
STAT.H;2
Total of 10 files.

View File

@@ -0,0 +1,31 @@
/*
Copyright 1983
Alcyon Corporation
8716 Production Ave.
San Diego, CA 92121
@(#)math.h 1.3 11/3/83 REGULUS 4.1
*/
/* Declarations of Math Routines */
long atol();
char *ltoa();
double atof();
char *ftoa(); /* float to %f format */
char *etoa(); /* float to scientific notation format */
double sin();
double cos();
double tan();
double atan();
double fabs();
double floor();
double ceil();
double fmod();
double log();
double pow();
double sqrt();
double exp();

View File

@@ -0,0 +1,73 @@
/*
Copyright 1983
Alcyon Corporation
8716 Production Ave.
San Diego, CA 92121
@(#) order.h - Jul 26, 1983 REGULUS 4.1
*/
#ifdef MC68000
struct { char b1; char b2; char b3; char b4; };
struct { char wb1; char wb2; };
union WORDPTR {
long longwd;
struct {
int hiword;
int loword;
} WORDSTR;
};
union BYTEPTR {
short shortwd;
struct {
char hibyte;
char lobyte;
} BYTESTR;
};
#endif
#ifdef VAX11
struct { char b4; char b3; char b2; char b1; };
struct { char wb2; char wb1; };
union WORDPTR {
long longwd;
struct {
short loword;
short hiword;
} WORDSTR;
};
union BYTEPTR {
short shortwd;
struct {
char lobyte;
char hibyte;
} BYTESTR;
};
#endif
#ifdef PDP11
struct { char b2; char b1; char b4; char b3; };
struct { char wb2; char wb1; };
union WORDPTR {
long longwd;
struct {
int hiword;
int loword;
} WORDSTR;
};
union BYTEPTR {
int shortwd;
struct {
char lobyte;
char hibyte;
} BYTESTR;
};
#endif
#define ERROR -1
#define SUCCESS 0

View File

@@ -0,0 +1,72 @@
/*
Copyright 1983
Alcyon Corporation
8716 Production Ave.
San Diego, CA 92121
@(#) sendc68.h - Jul 26, 1983 REGULUS 4.1
*/
/* format of a symbol entry in the main table */
#define SEEKREL 1 /*relative seek flag */
#define OSTSIZE 14 /*symbol table entry length on object file */
/* without table link */
# define STESIZE 16 /*byte length of symbol table entry */
struct symtab {
char name[8]; /*symbol name */
#ifndef VAX11
int flags; /*bit flags */
#else
short flags; /*bit flags*/
#endif
long vl1; /*symbol value */
char *tlnk; /*table link */
};
struct symtab *symptr;
/* flags for symbols */
# define SYDF 0100000 /*defined */
# define SYEQ 0040000 /*equated */
# define SYGL 0020000 /*global - entry or external */
# define SYER 0010000 /*equated register */
# define SYXR 0004000 /*external reference */
# define SYDA 0002000 /*DATA based relocatable */
# define SYTX 0001000 /*TEXT based relocatable */
# define SYBS 0000400 /*BSS based relocatable */
struct irts {
char *irle; /*ptr to last entry in chain */
char *irfe; /*ptr to first entry in chain */
};
#ifndef VAX11
struct { int hiword; int loword; };
struct { char lobyte; char hibyte; };
#else
struct { short loword; short hiword; };
struct { char hibyte; char lobyte; };
#endif
/* relocation bit definitions: */
#define RBMASK 07 /*tells type of relocation */
#define INSABS 7 /*first word of instr -- absolute */
#define DABS 0 /*data word absolute */
#define TRELOC 2 /* TEXT relocatable */
#define DRELOC 1 /* DATA relocatable */
#define BRELOC 3 /* BSS relocatable */
#define EXTVAR 4 /* ref to external variable */
#define LUPPER 5 /* upper word of long */
struct buf{
int fildes;
int nunused;
char *xfree;
char buff[512];
};
struct buf ibuf;
char *ifilname;

View File

@@ -0,0 +1,71 @@
/*
Copyright 1983
Alcyon Corporation
8716 Production Ave.
San Diego, CA 92121
@(#) signal.h - Jul 26, 1983 REGULUS 4.1
*/
/*
* The following define the REGULUS signals
* Those signals with *'s in the comment field cause core dumps if
* not caught or ignored.
*/
#define SIG_HUP 1 /* Hangup */
#define SIGHUP 1
#define SIG_INT 2 /* Interupt */
#define SIGINT 2
#define SIG_QUIT 3 /* * Quit */
#define SIGQUIT 3
#define SIG_ILL 4 /* * Illegal Instruction */
#define SIGILL 4
#define SIG_TRACE 5 /* * Trace Trap */
#define SIGTRAP 5
#define SIG_ABRT 6 /* * IOT on PDP-11, abort trap */
#define SIGIOT 6
#define SIGEMT 7
#define SIG_FLT 8 /* * Floating Point Exception */
#define SIGFPE 8
#define SIG_KILL 9 /* Killed */
#define SIGKILL 9
#define SIG_BUS 10 /* * Bus Error */
#define SIGBUS 10
#define SIG_SEG 11 /* * Segmentation Violation */
#define SIGSEGV 11
#define SIG_SYS 12 /* * Bad Argument to System Call */
#define SIGSYS 12
#define SIG_PIPE 13 /* Write on pipe Trap */
#define SIGPIPE 13
#define SIG_ALRM 14 /* Alarm clock */
#define SIGALRM 14
#define SIG_TERM 15 /* Catchable kill */
#define SIGTERM 15
#define SIGUSR1 16 /* Unix User 1 */
#define SIGUSR2 17 /* Unix User 2 */
#define SIGCLD 18 /* Unix Death of child */
#define SIGCHLD 18 /* BSD 4.1 Death of child */
#define SIGPWR 19 /* Unix Power Failure */
#define SIG_ADD 20 /* Address error */
#define SIG_DIV 21 /* Zero divide */
#define SIG_CHK 22 /* Chk instruction */
#define SIG_DVR 23 /* Trapv instruction */
#define SIG_PRIV 24 /* Priviledge violation */
#define SIG_U1T 25 /* 1010 instruction trap */
#define SIG_U2T 26 /* 1111 instruction trap */
#define SIG_INV 27 /* Invalid trap */
#define SIG_BRK 28 /* Breakpoint trap */
#define SIG_MEM 29 /* Out of memory (CIE systems, no MMU) */
#define SIG_REL 30 /* Bad relocation bits (CIE systems, no MMU) */
#define SIG_UNDER 31 /* User stack underflow (CIE systems, no MMU) */
#define NUMSIG 32 /* Number of system signals */
#define NSIGS 64 /* Total number of signals */
#define NSIG 32 /* For 4.1 BSD */
/* These are the default signal action and the ignore signal action */
#define SIG_DFL ((int (*)())0) /* address of zero */
#define SIG_IGN ((int (*)())1) /* address of long 1 */
int (*(signal()))();
#define COREDUMPED 0200

View File

@@ -0,0 +1,84 @@
/*
Copyright 1983
Alcyon Corporation
8716 Production Ave.
San Diego, CA 92121
@(#) sys/stat.h - Jul 26, 1983 REGULUS 4.1
*/
long stat();
long fstat();
#define STATSIZE 32 /* REGULUS stat returns 32 bytes */
/* index record flags -- same as on the disk */
/* 0777 - owner, group, and public access bits */
#define FIDIR 0100000 /* directory */
#define FICHR 0040000 /* char special file */
#define FIBLK 0020000 /* block special file */
#define FINPIPE 0010000 /* named pipe (fifo) file */
#define FISUID 0004000 /* set user id upon execution */
#define FISGID 0002000 /* set group id upon execution */
#define FISTICKY 0001000 /* sticky file */
#define USRFBITS 0000777 /* access bits */
#define AREAD 4 /* file access read bit */
#define AWRITE 2 /* file access write bit */
#define AEXEC 1 /* file access execute bit */
#define ROOTIDB 2L /* root index record number */
/* this is the structure of a file indirect block */
/* 32 bytes are returned by stat and fstat. */
struct indblk {
int i_magic; /* magic number to id indirect blocks */
long i_size; /* file size */
int i_ownerid; /* file owner id */
char i_groupid; /* group id of file */
char i_nlinks; /* file reference count */
long i_moddate; /* file modification date and time */
long i_accdate; /* file access date and time */
int i_flags; /* file type and access mode */
long i_blkptr[2]; /* block # of data blocks */
/* first blk ptr contains major/minor device # */
/* for special files */
int i_notused;
int i_dev; /* device number where file resides */
};
/*
the majority of Unix programs that use stat or fstat should be
happy with the following defines, if not, they should use the
version 6 or version 7 interface libraries....
*/
struct stat {
int i_magic; /* magic number to id indirect blocks */
long st_size; /* file size */
int st_uid; /* file owner id */
char st_gid; /* group id of file */
char st_nlink; /* file reference count */
long st_mtime; /* file modification date and time */
long st_atime; /* file access date and time */
int st_mode; /* file type and access mode */
int i_nu1; /* pad for word */
int st_rdev; /* device for character and block devs */
long i_nu2; /* pad for block */
int i_nu3; /* pad for word */
int st_dev; /* device number where file resides */
};
#define S_IFMT (FIBLK|FICHR|FIDIR|FINPIPE)
#define S_IFDIR FIDIR
#define S_IFCHR FICHR
#define S_IFBLK FIBLK
#define S_IFREG 0
#define S_IFIFO FINPIPE
#define S_ISUID FISUID
#define S_ISGID FISGID
#define S_ISVTX FISTICKY
#define S_IREAD 0400
#define S_IWRITE 0200
#define S_IEXEC 0100

View File

@@ -0,0 +1,24 @@
/*
Copyright 1983
Alcyon Corporation
8716 Production Ave.
San Diego, CA 92121
@(#) sys/types.h - Jul 26, 1983 REGULUS 4.1
*/
/*
Unix compatable type definitions
*/
typedef struct { int r[1];} *physadr;
typedef long daddr_t;
typedef char *caddr_t;
typedef unsigned short ushort;
typedef ushort ino_t;
typedef char cnt_t;
typedef long time_t;
typedef int label_t[6];
typedef short dev_t;
typedef long off_t;
typedef long paddr_t;