home *** CD-ROM | disk | FTP | other *** search
- /*------------------------------------------------------------------------------
- * File: dfi.h
- * Purpose: HDF internal header file
- * Invokes: stdio.h, sys/file.h
- * Contents:
- * Compilation parameters
- * Machine-dependent definitions
- * Flexibility definitions: i/o buffering, dynamic memory, structure i/o
- * Size parameters
- * Remarks: To port to a new system, only dfi.h and Makefile need be modified.
- * This file is included with user programs, but users do not see it.
- *----------------------------------------------------------------------------*/
-
-
- #ifndef DF_MAGICK /* avoid re-inclusion */
-
- #define DF_MAGICK "\016\003\023\001" /* ^N^C^S^A */
-
- #ifndef FILE
- #include <stdio.h>
- #endif FILE
-
-
- /*--------------------------------------------------------------------------*/
- /* Compilation Parameters for Flexibility and Portability */
-
- /* modify this line to allow for machine dependencies */
- #define PC
-
- /* modify this line for buffered/unbuffered i/o */
- #define DF_BUFFIO
-
- /* modify this line for dynamic/static memory allocation */
- #define DF_DYNAMIC
-
- /* modify this line if structures cannot be read/written as is */
- #define DF_STRUCTOK
-
-
- /*--------------------------------------------------------------------------*/
- /* MT/NT constants */
- #define DFMT_SUN 0x1111
- #define DFMT_ALLIANT 0x1111
- #define DFMT_UNICOS 0x3331
- #define DFMT_CTSS 0x3331
- #define DFMT_VAX 0x2221
- #define DFMT_PC 0x1141 /* note byte swapping */
- #define DFMT_MAC 0x1111
-
- #define DFNT_VERSION 1 /* current version of NT info */
- /* type info codes */
- #define DFNT_UINT 1
- #define DFNT_INT 2
- #define DFNT_UCHAR 3
- #define DFNT_CHAR 4
- #define DFNT_FLOAT 5
- #define DFNT_DOUBLE 6
- /* class info codes for int */
- #define DFNTI_MBO 1 /* Motorola byte order 2's compl */
- #define DFNTI_VBO 2 /* Vax byte order 2's compl */
- #define DFNTI_IBO 4 /* Intel byte order 2's compl */
- /* class info codes for float */
- #define DFNTF_IEEE 1 /* IEEE format */
- #define DFNTF_VAX 2 /* Vax format */
- #define DFNTF_CRAY 3 /* Cray format */
- /* class info codes for char */
- #define DFNTC_BYTE 0 /* bitwise/numeric field */
- #define DFNTC_ASCII 1 /* ASCII */
- #define DFNTC_EBCDIC 5 /* EBCDIC */
-
- /*--------------------------------------------------------------------------*/
- /* Machine dependencies */
- #ifdef PC
- #ifndef O_RDONLY
- #include <fcntl.h>
- #define L_INCR 1
- #endif O_RDONLY
- #define int16 int
- #define uint16 unsigned int
- #define int32 long int
- #define DFmovmem(from, to, len) memcpy(to, from, len)
- #undef DF_STRUCTOK /* structure writing will not work on PC */
- #undef DF_BUFFIO /* unbuffered i/o is faster */
- long longswap(); /* provided elsewhere */
-
- /* in the next 3 lines, p is recast so right number of bytes passed */
- /* ### Note that all calls modify p. Need to use temporary ptr */
- #define UINT16READ(p, x) { x = intswap(*(int *)p); p+=2; }
- #define INT16READ(p, x) { x = intswap(*(int *)p); p+=2; }
- #define INT32READ(p, x) { x = longswap(*(long *)p); p+=4; }
- #define UINT16WRITE(p, x) { *(int *)p = intswap(x); p+=2; }
- #define INT16WRITE(p, x) { *(int *)p = intswap(x); p+=2; }
- #define INT32WRITE(p, x) { *(long *)p = longswap(x); p+=4; }
- #define DF_CREAT(name, prot) creat(name, prot)
- #define DF_MT DFMT_PC
- #endif PC
-
-
- #ifdef UNICOS
- #ifndef O_RDONLY
- #include <sys/fcntl.h> /* for unbuffered i/o stuff */
- #define L_INCR 1
- #endif O_RDONLY
- #define int16 int
- #define uint16 int
- #define int32 int
- #define DFmovmem(from, to, len) memcpy(to, from, len)
- #undef DF_STRUCTOK /* cannot directly read/write structures */
- #define UINT16READ(p, x) { x = ((*p++) & 255)<<8; x |= (*p++) & 255; }
- #define INT16READ(p, x) { x = (*p++)<<8; x |= (*p++) & 255; }
- #define INT32READ(p, x) { x = (*p++)<<24; x|=((*p++) & 255)<<16; \
- x|=((*p++) & 255)<<8; x|=(*p++) & 255; }
- #define UINT16WRITE(p, x) { *p++ = (x>>8) & 255; *p++ = x & 255; }
- #define INT16WRITE(p, x) { *p++ = (x>>8) & 255; *p++ = x & 255; }
- #define INT32WRITE(p, x) { *p++ = (x>>24) & 255; *p++ = (x>>16) & 255; \
- *p++ = (x>>8) & 255; *p++ = x & 255; }
- #define DF_CREAT(name, prot) creat(name, prot)
- #define DF_MT DFMT_UNICOS
- #endif UNICOS
-
-
- #ifdef SUN
- #include <sys/file.h> /* for unbuffered i/o stuff */
- #define int16 short
- #define uint16 unsigned short
- #define int32 long
- #define DFmovmem(from, to, len) memcpy(to, from, len)
- #ifndef DF_STRUCTOK
- #define UINT16READ(p, x) { x = ((*p++) & 255)<<8; x |= (*p++) & 255; }
- #define INT16READ(p, x) { x = (*p++)<<8; x |= (*p++) & 255; }
- #define INT32READ(p, x) { x = (*p++)<<24; x|=((*p++) & 255)<<16; \
- x|=((*p++) & 255)<<8; x|=(*p++) & 255; }
- #define UINT16WRITE(p, x) { *p++ = (x>>8) & 255; *p++ = x & 255; }
- #define INT16WRITE(p, x) { *p++ = (x>>8) & 255; *p++ = x & 255; }
- #define INT32WRITE(p, x) { *p++ = (x>>24) & 255; *p++ = (x>>16) & 255; \
- *p++ = (x>>8) & 255; *p++ = x & 255; }
- #endif DF_STRUCTOK
- #define DF_CREAT(name, prot) creat(name, prot)
- #define DF_MT DFMT_SUN
- #endif SUN
-
-
- #ifdef ALLIANT
- #include <sys/file.h> /* for unbuffered i/o stuff */
- #define int16 short
- #define uint16 unsigned short
- #define int32 long
- #define DFmovmem(from, to, len) bcopy(from, to, len)
- #ifndef DF_STRUCTOK
- #define UINT16READ(p, x) { DFmovmem(p, &x, 2); p+=2; }
- #define INT16READ(p, x) { DFmovmem(p, &x, 2); p+=2; }
- #define INT32READ(p, x) { DFmovmem(p, &x, 4); p+=4; }
- #define UINT16WRITE(p, x) { DFmovmem(&x, p, 2); p+=2; }
- #define INT16WRITE(p, x) { DFmovmem(&x, p, 2); p+=2; }
- #define INT32WRITE(p, x) { DFmovmem(&x, p, 4); p+=4; }
- #endif DF_STRUCTOK
- #define DF_CREAT(name, prot) creat(name, prot)
- #define DF_MT DFMT_ALLIANT
- #endif ALLIANT
-
-
- #ifdef MAC
- #include <Files.h> /* for unbuffered i/o stuff */
- #define int16 short
- #define uint16 unsigned short
- #define int32 long
- #define DFmovmem(from, to, len) memcpy(to, from, len)
- #ifndef DF_STRUCTOK
- #define UINT16READ(p, x) { DFmovmem(p, &x, 2); p+=2; }
- #define INT16READ(p, x) { DFmovmem(p, &x, 2); p+=2; }
- #define INT32READ(p, x) { DFmovmem(p, &x, 4); p+=4; }
- #define UINT16WRITE(p, x) { DFmovmem(&x, p, 2); p+=2; }
- #define INT16WRITE(p, x) { DFmovmem(&x, p, 2); p+=2; }
- #define INT32WRITE(p, x) { DFmovmem(&x, p, 4); p+=4; }
- #endif DF_STRUCTOK
- #define DF_CREAT(name, prot) creat(name, prot)
- #define DF_MT DFMT_MAC
- #endif MAC
-
-
- /*--------------------------------------------------------------------------*/
- /* Flexibility parameters */
-
- #ifdef DF_BUFFIO /* set all calls to do buffered I/O */
- #define DF_OPEN(x,y) fopen(x,y)
- #define DF_CLOSE(x) fclose(x)
- #define DF_SEEK(x,y,z) fseek(x,y,z)
- #define DF_SKEND(x,y,z) fseek(x,y,z)
- #define DF_TELL(x) ftell(x)
- #define DF_READ(a,b,c,d) fread(a,b,c,d)
- #define DF_WRITE(a,b,c,d) fwrite(a,b,c,d)
- #define DF_FLUSH(a) fflush(a)
- #ifdef PC
- #define DF_RDACCESS "rb"
- #define DF_WRACCESS "rb+"
- #else PC
- #define DF_RDACCESS "r"
- #define DF_WRACCESS "r+"
- #endif PC
-
- #else DF_BUFFIO /* unbuffered i/o */
- #define DF_OPEN(x,y) open(x,y)
- #define DF_CLOSE(x) close(x)
- #define DF_SEEK(x,y,z) lseek(x,y,z)
- #define DF_SKEND(x,y,z) lseek(x,-1*y,z)
- #define DF_TELL(x) lseek(x,0L,L_INCR)
- #define DF_READ(a,b,c,d) read(d,a,b*c)
- #define DF_WRITE(a,b,c,d) write(d,a,b*c)
- #define DF_FLUSH(a) /* no need to flush */
- #ifdef PC
- #define DF_RDACCESS O_RDONLY | O_RAW
- #define DF_WRACCESS O_RDWR | O_RAW
- #else PC
- #define DF_RDACCESS O_RDONLY
- #define DF_WRACCESS O_RDWR
- #endif PC
- #endif DF_BUFFIO
-
-
- /* if not allocating memory dynamically, need buffer for compression */
- #ifndef DF_DYNAMIC
- #define DF_TBUF
- #endif DF_DYNAMIC
-
- /* if reading/writing structures not ok, need buffer for conversion */
- #ifndef DF_TBUF
- #ifndef DF_STRUCTOK
- #define DF_TBUF
- #endif DF_STRUCTOK
- #endif DF_TBUF
-
- /* set buffer size */
- #ifdef DF_TBUF
- #define DF_TBUFSZ 10000
- #ifndef DFMASTER
- extern
- #endif DFMASTER
- unsigned char DFtbuf[DF_TBUFSZ];
- #endif DF_TBUF
-
- /*--------------------------------------------------------------------------*/
- /* Size parameters */
- #define DF_MAXDFS 32 /* How many DF's can be open at once */
- #define DF_DEFAULTDDS 16 /* How many DD's a file has by default */
-
- #endif DF_MAGICK
-