Minix1.5/lib/ansi/getenv.c

#include <lib.h>
/*  getenv(3)
 *
 *  Author: Terrence W. Holm          Aug. 1988
 */

#include <stddef.h>
#include <stdlib.h>

extern char **environ;

char *getenv(name)
_CONST char *name;
{
  char **v;
  _CONST register char *n;
  register char *p;

  if (environ == (char **) NULL || name == (char *)NULL) return((char *)NULL);

  for (v = environ; *v != (char *)NULL; ++v) {
	n = name;
	p = *v;

	while (*n == *p && *n != '\0') ++n, ++p;

	if (*n == '\0' && *p == '=') return(p + 1);
  }

  return((char *)NULL);
}