Return to globals.c CVS log

Up to [Research Unix] / researchv9 / jerq / sgs / libsdp

Annotation of researchv9/jerq/sgs/libsdp/globals.c, revision 1.1.1.1

1.1       root        1: static char ID[] = "@(#) globals.c: 1.1 3/16/82";
                      2: #include <stdio.h>
                      3: #include "sdp.h"
                      4: #include "define2.h"
                      5: #include "define3.h"
                      6: 
                      7: #define COMPATIBLE     811221
                      8: 
                      9: extern int *ALLOC() ;
                     10: extern char *BUILDNAME() ;
                     11: extern int CLOSE() ;
                     12: extern int CREATE() ;
                     13: extern    FATAL() ;
                     14: extern     FREE() ;
                     15: extern FD  OPEN() ;
                     16: extern int READ() ;
                     17: extern int SEEK() ;
                     18: extern int UNLINK() ;
                     19: extern int WRITE() ;
                     20: 
                     21: int aud_flag = AUDITOFF ;              /* flag for audits                      */
                     22: long compatible = COMPATIBLE ;         /* last version compatible with old SDP */
                     23: 
                     24: struct ENVIRON *first_environ = NULL ; /* pointer to first environment         */
                     25: 
                     26: struct SPACE *first_space = NULL ;     /* pointer to first space               */
                     27: 
                     28: long Gln_file[] = FILEINIT ;           /* file lengths                         */
                     29: 
                     30: long gl1_hash = HASHNULL ;             /* for audits                           */
                     31: long gl2_hash = HASHNULL ;             /* for audits                           */
                     32: 
                     33: int Gnumbfile = sizeof(Gln_file)/sizeof(Gln_file[0]) ;
                     34:                                        /* number of files with lengths         */
                     35: 
                     36: int Gsz_stax[] = STAXINIT ;            /* stack sizes                          */
                     37: 
                     38: int Gnumbstax = sizeof(Gsz_stax)/sizeof(Gsz_stax[0]) ;
                     39:                                        /* number of stacks                     */
                     40: 
                     41: FILE *hist_fp = NULL ;                 /* for history file                     */
                     42: 
                     43: ITEMID *known_idptr = NULL ;           /* for user itemid                      */
                     44: struct LIBFILE lib_file =
                     45: {
                     46:        BUILDNAME,
                     47:        CLOSE,
                     48:        CREATE,
                     49:        OPEN,
                     50:        READ,
                     51:        SEEK,
                     52:        UNLINK,
                     53:        WRITE,
                     54: };
                     55: 
                     56: struct LIBMEM lib_mem =
                     57: {
                     58:        ALLOC,
                     59:        FREE,
                     60: } ;
                     61: 
                     62: struct LIBFILE *Glib_file ;            /* file library pointer used in macros  */
                     63: 
                     64: struct LIBMEM *Glib_mem ;              /* memory library pointer used in macros*/

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.