awk: guard against empty environment

This commit is contained in:
Denis Vlasenko 2007-05-03 22:57:56 +00:00
parent e725bfe6e0
commit f71d916b60

View File

@ -2696,7 +2696,8 @@ int awk_main(int argc, char **argv)
newfile("/dev/stdout")->F = stdout; newfile("/dev/stdout")->F = stdout;
newfile("/dev/stderr")->F = stderr; newfile("/dev/stderr")->F = stderr;
for (envp = environ; *envp; envp++) { /* Huh, people report that sometimes environ is NULL. Oh well. */
if (environ) for (envp = environ; *envp; envp++) {
char *s = xstrdup(*envp); char *s = xstrdup(*envp);
char *s1 = strchr(s, '='); char *s1 = strchr(s, '=');
if (s1) { if (s1) {