1995-05-30 05:05:38 +00:00
|
|
|
/* $RCSfile: util.h,v $$Revision: 1.1.1.1 $$Date: 1994/09/10 06:27:55 $
|
1994-09-10 06:27:55 +00:00
|
|
|
*
|
|
|
|
|
* Copyright (c) 1991, Larry Wall
|
|
|
|
|
*
|
|
|
|
|
* You may distribute under the terms of either the GNU General Public
|
|
|
|
|
* License or the Artistic License, as specified in the README file.
|
|
|
|
|
*
|
|
|
|
|
* $Log: util.h,v $
|
1995-05-30 05:05:38 +00:00
|
|
|
* Revision 1.1.1.1 1994/09/10 06:27:55 gclarkii
|
|
|
|
|
* Initial import of Perl 4.046 bmaked
|
|
|
|
|
*
|
1994-09-10 06:27:55 +00:00
|
|
|
* Revision 1.1.1.1 1993/08/23 21:30:10 nate
|
|
|
|
|
* PERL!
|
|
|
|
|
*
|
|
|
|
|
* Revision 4.0.1.2 91/11/05 19:21:20 lwall
|
|
|
|
|
* patch11: various portability fixes
|
1995-05-30 05:05:38 +00:00
|
|
|
*
|
1994-09-10 06:27:55 +00:00
|
|
|
* Revision 4.0.1.1 91/06/07 12:20:43 lwall
|
|
|
|
|
* patch4: new copyright notice
|
1995-05-30 05:05:38 +00:00
|
|
|
*
|
1994-09-10 06:27:55 +00:00
|
|
|
* Revision 4.0 91/03/20 01:58:29 lwall
|
|
|
|
|
* 4.0 baseline.
|
1995-05-30 05:05:38 +00:00
|
|
|
*
|
1994-09-10 06:27:55 +00:00
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
/* is the string for makedir a directory name or a filename? */
|
|
|
|
|
|
|
|
|
|
#define fatal Myfatal
|
|
|
|
|
|
|
|
|
|
#define MD_DIR 0
|
|
|
|
|
#define MD_FILE 1
|
|
|
|
|
|
|
|
|
|
void util_init();
|
|
|
|
|
int doshell();
|
|
|
|
|
char *safemalloc();
|
|
|
|
|
char *saferealloc();
|
|
|
|
|
char *safecpy();
|
|
|
|
|
char *safecat();
|
|
|
|
|
char *cpytill();
|
|
|
|
|
char *cpy2();
|
|
|
|
|
char *instr();
|
|
|
|
|
#ifdef SETUIDGID
|
|
|
|
|
int eaccess();
|
|
|
|
|
#endif
|
|
|
|
|
char *getwd();
|
|
|
|
|
void cat();
|
|
|
|
|
void prexit();
|
|
|
|
|
char *get_a_line();
|
|
|
|
|
char *savestr();
|
|
|
|
|
int makedir();
|
|
|
|
|
void setenv();
|
|
|
|
|
int envix();
|
|
|
|
|
void notincl();
|
|
|
|
|
char *getval();
|
|
|
|
|
void growstr();
|
|
|
|
|
void setdef();
|
