/*-------------------------------------------------------------------+ | | | Copyright (c) 1996, SAS Institute Inc. | | Unpublished - All Rights Reserved | | S A S / C S A M P L E | | Name: PDSREADH | | Language: C | | Purpose: Includes for library calls, various defines, and | | prototypes for static functions. | | | | For Sample: prefix.SAMPLE.C(P2UREAD) | | | +-------------------------------------------------------------------*/ #ifndef __PDSREADH__ #define __PDSREADH__ #include <stdlib.h> #include <lclib.h> #include <string.h> #include <os.h> #include <lcio.h> #include <lcstring.h> #undef NDEBUG #include <assert.h> #include "pdsmemh.h" /* Structure maping a real PDS */ /* directory entry */ #include "p2upnode.h" /* Skiplist node structures */ #include "p2upmh.h" /* Public function prototypes for */ /* PDS2UPDT */ #define SYSLIB_MODE "rb" /* Mode for input DD, read */ /* directory block in binary */ #define MEMBER_READY 2000 /* Member returned to process */ #define END_PDS_MEMBERS 2001 /* No more members to process */ /* Note: values for the above */ /* are arbitrary, except for */ /* needing to be different */ /* from EXIT_SUCCESS and */ /* EXIT_FAILURE. */ #define ALIAS_BIT 0x80 #define LEN_TTR 3 #define TERMINATION_MEMBER "\xff\xff\xff\xff\xff\xff\xff\xff" /*--------------------------------------------------------------------+ | Prototypes for static functions | +--------------------------------------------------------------------*/ static int pdsread ( PDS_MBR *pds, /* ptr to member information */ FILE *fp /* PDS directory FILE pointer. */ ); static int pdsverfi( FILE * (*fp) /* file pointer for input dd */ ); #endif /* __PDSREADH__ */