/************************************************************************* * * m a k e : h . h * * include file for make *======================================================================== * Edition history * * # Date Comments By * --- -------- ---------------------------------------------------- --- * 1 ?? ?? * 2 23.08.89 LZ increased,N_EXISTS added,suffix as macro added RAL * 3 30.08.89 macro flags added, indention changed PSH,RAL * 4 03.09.89 fixed LZ eliminated, struct str added,... RAL * 5 06.09.89 TABCHAR,M_MAKE added RAL * 6 09.09.89 tos support added, EXTERN,INIT,PARMS added PHH,RAL * 7 17.09.89 __STDC__ added, make1 decl. fixed , N_EXEC added RAL * ------------ Version 2.0 released ------------------------------- RAL * *************************************************************************/ #ifdef unix #include #include #include #include #include #include #include #include #include #endif #ifdef eon #include #include #endif #ifdef os9 #include #include #include #include #include #endif #ifdef tos struct DOSTIME {short time,date; }; /* time structure of TOS */ #ifdef LATTICE #include #include #include #include #endif /* LATTICE */ #ifdef TURBO #include #include #include #endif /* TURBO */ #endif /* tos */ #include #include #include #ifdef eon #define MNOENT ER_NOTF #else #define MNOENT ENOENT #endif #ifndef uchar #ifdef os9 #define uchar char #define void int #define fputc putc #else #define uchar unsigned char #endif #endif #define bool uchar #ifndef time_t #define time_t long #endif #define TRUE (1) #define FALSE (0) #define max(a,b) ((a)>(b)?(a):(b)) #ifdef unix #define DEFN1 "makefile" #define DEFN2 "Makefile" #endif #ifdef eon #define DEFN1 "makefile" #define DEFN2 "Makefile" #endif #ifdef tos #define DEFN1 "makefile." #define DEFN2 (char *)0 #endif #ifdef os9 #define DEFN1 "makefile" #define DEFN2 (char *)0 #endif #ifdef os9 #define TABCHAR ' ' #else #define TABCHAR '\t' #endif #define LZ1 (2048) /* Initial input/expand string size */ #define LZ2 (256) /* Initial input/expand string size */ /* * A name. This represents a file, either to be made, or existant */ struct name { struct name *n_next; /* Next in the list of names */ char *n_name; /* Called */ struct line *n_line; /* Dependencies */ time_t n_time; /* Modify time of this name */ uchar n_flag; /* Info about the name */ }; #define N_MARK 0x01 /* For cycle check */ #define N_DONE 0x02 /* Name looked at */ #define N_TARG 0x04 /* Name is a target */ #define N_PREC 0x08 /* Target is precious */ #define N_DOUBLE 0x10 /* Double colon target */ #define N_EXISTS 0x20 /* File exists */ #define N_ERROR 0x40 /* Error occured */ #define N_EXEC 0x80 /* Commands executed */ /* * Definition of a target line. */ struct line { struct line *l_next; /* Next line (for ::) */ struct depend *l_dep; /* Dependents for this line */ struct cmd *l_cmd; /* Commands for this line */ }; /* * List of dependents for a line */ struct depend { struct depend *d_next; /* Next dependent */ struct name *d_name; /* Name of dependent */ }; /* * Commands for a line */ struct cmd { struct cmd *c_next; /* Next command line */ char *c_cmd; /* Command line */ }; /* * Macro storage */ struct macro { struct macro *m_next; /* Next variable */ char *m_name; /* Called ... */ char *m_val; /* Its value */ uchar m_flag; /* Infinite loop check */ }; #define M_MARK 0x01 /* for infinite loop check */ #define M_OVERRIDE 0x02 /* command-line override */ #define M_MAKE 0x04 /* for MAKE macro */ /* * String */ struct str { char **ptr; /* ptr to real ptr. to string */ int len; /* length of string */ int pos; /* position */ }; /* Declaration, definition & initialization of variables */ #ifndef EXTERN #define EXTERN extern #endif #ifndef INIT #define INIT(x) #endif extern int errno; extern char **environ; EXTERN char *myname; EXTERN bool domake INIT(TRUE); /* Go through the motions option */ EXTERN bool ignore INIT(FALSE); /* Ignore exit status option */ EXTERN bool conterr INIT(FALSE); /* continue on errors */ EXTERN bool silent INIT(FALSE); /* Silent option */ EXTERN bool print INIT(FALSE); /* Print debuging information */ EXTERN bool rules INIT(TRUE); /* Use inbuilt rules */ EXTERN bool dotouch INIT(FALSE); /* Touch files instead of making */ EXTERN bool quest INIT(FALSE); /* Question up-to-dateness of file */ EXTERN bool useenv INIT(FALSE); /* Env. macro def. overwrite makefile def.*/ EXTERN bool dbginfo INIT(FALSE); /* Print lot of debugging information */ EXTERN bool ambigmac INIT(TRUE); /* guess undef. ambiguous macros (*,<) */ EXTERN struct name *firstname; EXTERN char *str1; EXTERN char *str2; EXTERN struct str str1s; EXTERN struct str str2s; EXTERN struct name **suffparray; /* ptr. to array of ptrs. to name chains */ EXTERN int sizesuffarray INIT(20); /* size of suffarray */ EXTERN int maxsuffarray INIT(0); /* last used entry in suffarray */ EXTERN struct macro *macrohead; EXTERN bool expmake; /* TRUE if $(MAKE) has been expanded */ EXTERN char *makefile; /* The make file */ EXTERN int lineno; #ifdef tos #ifdef LATTICE EXTERN int _mneed INIT(60000); /* VERY important for TOS with LATTICE C*/ #endif /* LATTICE */ #endif /* tos */ #ifdef eon #define MEMSPACE (16384) EXTERN unsigned memspace = MEMSPACE; #endif #define suffix(name) strrchr(name,(int)'.') EXTERN int _ctypech; #define mylower(x) (islower(_ctypech=(x)) ? _ctypech :tolower(_ctypech)) #define myupper(x) (isupper(_ctypech=(x)) ? _ctypech :toupper(_ctypech)) /* Prototypes. */ struct sgtbuf; /* check.c */ _PROTOTYPE(void prt, (void)); _PROTOTYPE(void check, (struct name *np )); _PROTOTYPE(void circh, (void)); _PROTOTYPE(void precious, (void)); /* input.c */ _PROTOTYPE(void init, (void)); _PROTOTYPE(void strrealloc, (struct str *strs )); _PROTOTYPE(struct name *newname, (char *name )); _PROTOTYPE(struct name *testname, (char *name )); _PROTOTYPE(struct depend *newdep, (struct name *np, struct depend *dp )); _PROTOTYPE(struct cmd *newcmd, (char *str, struct cmd *cp )); _PROTOTYPE(void newline, (struct name *np, struct depend *dp, struct cmd *cp, int flag )); _PROTOTYPE(void input, (FILE *fd )); /* macro.c */ _PROTOTYPE(struct macro *getmp, (char *name )); _PROTOTYPE(char *getmacro, (char *name )); _PROTOTYPE(struct macro *setmacro, (char *name, char *val )); _PROTOTYPE(void setDFmacro, (char *name, char *val )); _PROTOTYPE(void doexp, (struct str *to, char *from )); _PROTOTYPE(void expand, (struct str *strs )); /* main.c */ _PROTOTYPE(void main, (int argc, char **argv )); _PROTOTYPE(void setoption, (char option )); _PROTOTYPE(void usage, (void)); _PROTOTYPE(void fatal, (char *msg, char *a1, int a2 )); /* make.c */ _PROTOTYPE(int dosh, (char *string, char *shell )); _PROTOTYPE(int makeold, (char *name )); _PROTOTYPE(void docmds1, (struct name *np, struct line *lp )); _PROTOTYPE(void docmds, (struct name *np )); _PROTOTYPE(int Tosexec, (char *string )); _PROTOTYPE(time_t mstonix, (unsigned int date, unsigned int time )); _PROTOTYPE(void getmdate, (int fd, struct sgtbuf *tbp )); _PROTOTYPE(time_t cnvtime, (struct sgtbuf *tbp )); _PROTOTYPE(void modtime, (struct name *np )); _PROTOTYPE(void touch, (struct name *np )); _PROTOTYPE(int make, (struct name *np, int level )); _PROTOTYPE(void make1, (struct name *np, struct line *lp, struct depend *qdp, char *basename, char *inputname )); _PROTOTYPE(void implmacros, (struct name *np, struct line *lp, char **pbasename, char **pinputname )); _PROTOTYPE(void dbgprint, (int level, struct name *np, char *comment )); /* reader.c */ _PROTOTYPE(void error, (char *msg, char *a1 )); _PROTOTYPE(bool getline, (struct str *strs, FILE *fd )); _PROTOTYPE(char *gettok, (char **ptr )); /* rules.c */ _PROTOTYPE(bool dyndep, (struct name *np, char **pbasename,char **pinputname)); _PROTOTYPE(void makerules, (void)); /* archive.c */ _PROTOTYPE(int is_archive_ref, (char *name)); _PROTOTYPE(int archive_stat, (char *name, struct stat *stp));