| 12 |
|
* gmtval(t,s) get GMT as UTC |
| 13 |
|
* fputdate(t,fp) put out the given UTC |
| 14 |
|
* fputnow(fp) put out the current date and time |
| 15 |
– |
* printargs(ac,av,fp) print an argument list to fp, followed by '\n' |
| 15 |
|
* formatval(r,s) copy the format value in s to r |
| 16 |
|
* fputformat(s,fp) write "FORMAT=%s" to fp |
| 17 |
|
* nativebigendian() are we native on big-endian machine? |
| 160 |
|
} |
| 161 |
|
|
| 162 |
|
|
| 164 |
– |
void |
| 165 |
– |
printargs( /* print arguments to a file */ |
| 166 |
– |
int ac, |
| 167 |
– |
char **av, |
| 168 |
– |
FILE *fp |
| 169 |
– |
) |
| 170 |
– |
{ |
| 171 |
– |
#if defined(_WIN32) || defined(_WIN64) |
| 172 |
– |
extern char *fixargv0(char *arg0); |
| 173 |
– |
char myav0[128]; |
| 174 |
– |
/* clean up Windows executable path */ |
| 175 |
– |
if (ac-- <= 0) return; |
| 176 |
– |
fputs(fixargv0(strcpy(myav0, *av++)), fp); |
| 177 |
– |
fputc(ac ? ' ' : '\n', fp); |
| 178 |
– |
#endif |
| 179 |
– |
while (ac-- > 0) { |
| 180 |
– |
fputword(*av++, fp); |
| 181 |
– |
fputc(ac ? ' ' : '\n', fp); |
| 182 |
– |
} |
| 183 |
– |
} |
| 184 |
– |
|
| 185 |
– |
|
| 163 |
|
int |
| 164 |
|
formatval( /* get format value (return true if format) */ |
| 165 |
|
char fmt[MAXFMTLEN], |
| 168 |
|
{ |
| 169 |
|
const char *cp = FMTSTR; |
| 170 |
|
char *r = fmt; |
| 171 |
< |
|
| 171 |
> |
/* check against format string */ |
| 172 |
|
while (*cp) if (*cp++ != *s++) return(0); |
| 173 |
|
while (isspace(*s)) s++; |
| 174 |
|
if (!*s) return(0); |
| 175 |
< |
if (r == NULL) return(1); |
| 176 |
< |
do |
| 175 |
> |
if (r == NULL) /* just checking if format? */ |
| 176 |
> |
return(1); |
| 177 |
> |
do /* copy format ID */ |
| 178 |
|
*r++ = *s++; |
| 179 |
< |
while (*s && !isspace(*s) && r-fmt < MAXFMTLEN-1); |
| 180 |
< |
*r = '\0'; |
| 179 |
> |
while (*s && r-fmt < MAXFMTLEN-1); |
| 180 |
> |
|
| 181 |
> |
do /* remove trailing white space */ |
| 182 |
> |
*r-- = '\0'; |
| 183 |
> |
while (r > fmt && isspace(*r)); |
| 184 |
> |
|
| 185 |
|
return(1); |
| 186 |
|
} |
| 187 |
|
|
| 363 |
|
s++; |
| 364 |
|
break; |
| 365 |
|
case '\\': /* literal next */ |
| 366 |
< |
p++; |
| 366 |
> |
if (!*++p) |
| 367 |
> |
return(0); |
| 368 |
|
/* fall through */ |
| 369 |
|
default: /* normal character */ |
| 370 |
< |
if (!*s | (*p != *s)) |
| 370 |
> |
if (*p != *s) |
| 371 |
|
return(0); |
| 372 |
|
s++; |
| 373 |
|
break; |