| 10 |
|
#include "copyright.h" |
| 11 |
|
|
| 12 |
|
#include <errno.h> |
| 13 |
– |
#include <string.h> |
| 13 |
|
|
| 14 |
|
#include "rtio.h" |
| 15 |
|
#include "rtmisc.h" |
| 16 |
|
|
| 17 |
|
|
| 18 |
< |
#define MAXARGEXP 512 /* maximum argument expansion */ |
| 18 |
> |
#define MAXARGEXP 4096 /* maximum argument expansion */ |
| 19 |
|
|
| 20 |
|
/* set the following to suit, -1 to disable */ |
| 21 |
|
int envexpchr = '$'; /* environment expansion character */ |
| 23 |
|
|
| 24 |
|
|
| 25 |
|
int |
| 26 |
< |
expandarg(acp, avp, n) /* expand list at argument n */ |
| 27 |
< |
int *acp; |
| 28 |
< |
register char ***avp; |
| 29 |
< |
int n; |
| 26 |
> |
expandarg( /* expand list at argument n */ |
| 27 |
> |
int *acp, |
| 28 |
> |
char ***avp, |
| 29 |
> |
int n |
| 30 |
> |
) |
| 31 |
|
{ |
| 32 |
|
int ace; |
| 33 |
|
char *ave[MAXARGEXP]; |
| 37 |
|
return(0); |
| 38 |
|
errno = 0; |
| 39 |
|
if ((*avp)[n][0] == filexpchr) { /* file name */ |
| 40 |
< |
ace = wordfile(ave, (*avp)[n]+1); |
| 40 |
> |
ace = wordfile(ave, MAXARGEXP, (*avp)[n]+1); |
| 41 |
|
if (ace < 0) |
| 42 |
|
return(-1); /* no such file */ |
| 43 |
|
} else if ((*avp)[n][0] == envexpchr) { /* env. variable */ |
| 44 |
< |
ace = wordstring(ave, getenv((*avp)[n]+1)); |
| 44 |
> |
ace = wordstring(ave, MAXARGEXP, getenv((*avp)[n]+1)); |
| 45 |
|
if (ace < 0) |
| 46 |
|
return(-1); /* no such variable */ |
| 47 |
|
} else /* regular argument */ |
