Repatch (from linux) of OSX IRAF

1 files changed, 77 insertions, 0 deletions

diff --git a/sys/gio/imdkern/imd.h b/sys/gio/imdkern/imd.h
new file mode 100644
index 00000000..a0e5d2d5
--- /dev/null
+++ b/sys/gio/imdkern/imd.h
@@ -0,0 +1,77 @@
+# IMD global definitions.
+
+define	MAX_CHARSIZES	10			# max discreet device char sizes
+define	SZ_SBUF		1024			# initial string buffer size
+define	SZ_GDEVICE	31			# maxsize forced device name
+define	DEF_MAXFRAMES	16			# maximum frames/metafile
+
+# The IMD state/device descriptor.
+
+define	LEN_IMD		81
+
+define	IMD_SBUF	Memi[$1]		# string buffer
+define	IMD_SZSBUF	Memi[$1+1]		# size of string buffer
+define	IMD_NEXTCH	Memi[$1+2]		# next char pos in string buf
+define	IMD_NCHARSIZES	Memi[$1+3]		# number of character sizes
+define	IMD_POLYLINE	Memi[$1+4]		# device supports polyline
+define	IMD_POLYMARKER	Memi[$1+5]		# device supports polymarker
+define	IMD_FILLAREA	Memi[$1+6]		# device supports fillarea
+define	IMD_CELLARRAY	Memi[$1+7]		# device supports cell array
+define	IMD_XRES	Memi[$1+8]		# device resolution in X
+define	IMD_YRES	Memi[$1+9]		# device resolution in Y
+define	IMD_ZRES	Memi[$1+10]		# device resolution in Z
+define	IMD_FILLSTYLE	Memi[$1+11]		# number of fill styles
+define	IMD_ROAM	Memi[$1+12]		# device supports roam
+define	IMD_ZOOM	Memi[$1+13]		# device supports zoom
+define	IMD_SELERASE	Memi[$1+14]		# device has selective erase
+define	IMD_PIXREP	Memi[$1+15]		# device supports pixel replic.
+define	IMD_STARTFRAME	Memi[$1+16]		# frame advance at metafile BOF
+define	IMD_ENDFRAME	Memi[$1+17]		# frame advance at metafile EOF
+	# extra space
+define	IMD_CURSOR	Memi[$1+20]		# last cursor accessed
+define	IMD_COLOR	Memi[$1+21]		# last color set
+define	IMD_TXSIZE	Memi[$1+22]		# last text size set
+define	IMD_TXFONT	Memi[$1+23]		# last text font set
+define	IMD_TYPE	Memi[$1+24]		# last line type set
+define	IMD_WIDTH	Memi[$1+25]		# last line width set
+define	IMD_DEVNAME	Memi[$1+26]		# name of open device
+define	IMD_FRAME	Memi[$1+27]		# frame buffer number
+	# extra space
+define	IMD_CHARHEIGHT	Memi[$1+30+$2-1]	# character height
+define	IMD_CHARWIDTH 	Memi[$1+40+$2-1]	# character width
+define	IMD_CHARSIZE	Memr[P2R($1+50+$2-1)]	# text sizes permitted
+define	IMD_PLAP	($1+60)			# polyline attributes
+define	IMD_PMAP	($1+64)			# polymarker attributes
+define	IMD_FAAP	($1+68)			# fill area attributes
+define	IMD_TXAP	($1+71)			# default text attributes
+
+# Substructure definitions.
+
+define	LEN_PL		4
+define	PL_STATE	Memi[$1]		# polyline attributes
+define	PL_LTYPE	Memi[$1+1]
+define	PL_WIDTH	Memi[$1+2]
+define	PL_COLOR	Memi[$1+3]
+
+define	LEN_PM		4
+define	PM_STATE	Memi[$1]		# polymarker attributes
+define	PM_LTYPE	Memi[$1+1]
+define	PM_WIDTH	Memi[$1+2]
+define	PM_COLOR	Memi[$1+3]
+
+define	LEN_FA		3			# fill area attributes
+define	FA_STATE	Memi[$1]
+define	FA_STYLE	Memi[$1+1]
+define	FA_COLOR	Memi[$1+2]
+
+define	LEN_TX		10			# text attributes
+define	TX_STATE	Memi[$1]
+define	TX_UP		Memi[$1+1]
+define	TX_SIZE		Memi[$1+2]
+define	TX_PATH		Memi[$1+3]
+define	TX_SPACING	Memr[P2R($1+4)]
+define	TX_HJUSTIFY	Memi[$1+5]
+define	TX_VJUSTIFY	Memi[$1+6]
+define	TX_FONT		Memi[$1+7]
+define	TX_QUALITY	Memi[$1+8]
+define	TX_COLOR	Memi[$1+9]