Repatch (from linux) of OSX IRAF

1 files changed, 27 insertions, 0 deletions

diff --git a/unix/gdev/iism70/m70.h b/unix/gdev/iism70/m70.h
new file mode 100644
index 00000000..6a1a7d28
--- /dev/null
+++ b/unix/gdev/iism70/m70.h
@@ -0,0 +1,27 @@
+# Definitions for the VMS/IIS device driver.
+
+define	IIS_READ	1		# read function code
+define	IIS_WRITE	0		# write function code
+define	IIS_INACTIVE	-1		# no i/o in progress
+
+define	EFN		EFN2		# EFN to use for i/o
+define	EFN1W		0		# efn #1, wait for completion
+define	EFN2		1		# efn #2, no wait for completion
+define	EFN3		2		# efn #3, no wait for completion
+
+# Function control block structure for IIS.  The first part of the structure
+# is filled in by VMS at open time; all we need to know is the offset of the
+# device name.  We use the latter part of the buffer
+
+define	LEN_FCB		30
+define	FCB_U_NAME	(P2S($1)+16+($2)-1)
+define	FCB_STATUS	Memi[$1+20]	# channel status (r, w, err)
+define	FCB_NBYTES	Memi[$1+21]	# nbytes last transfer
+define	FCB_EFN		Memi[$1+22]	# event flag used for transfer
+
+# IIS device status words.
+
+define	IIS_FILSIZE		(512 * 512 * SZB_CHAR)
+define	IIS_BLKSIZE		1024
+define	IIS_OPTBUFSIZE		(512 * SZB_CHAR)
+define	IIS_MAXBUFSIZE		32768