Added simple-minded (i.e. leaking :-) putenv() interface, if os has it.

This commit is contained in:
Guido van Rossum 1996-07-23 19:18:10 +00:00
parent 761f7922ad
commit f1af3fe8eb
1 changed files with 27 additions and 0 deletions

View File

@ -1596,6 +1596,30 @@ posix_ftruncate(self, args)
}
#endif
#ifdef HAVE_PUTENV
static object *
posix_putenv(self,args)
object *self;
object *args;
{
char *s1, *s2;
char *new;
if (!newgetargs(args, "ss", &s1, &s2))
return NULL;
/* XXX This leaks memory -- not easy to fix :-( */
if ((new = malloc(strlen(s1) + strlen(s2) + 2)) == NULL)
return err_nomem();
(void) sprintf(new, "%s=%s", s1, s2);
if (putenv(new)) {
posix_error();
return NULL;
}
INCREF(None);
return None;
}
#endif
static struct methodlist posix_methods[] = {
{"chdir", posix_chdir},
{"chmod", posix_chmod},
@ -1716,6 +1740,9 @@ static struct methodlist posix_methods[] = {
#endif
#ifdef HAVE_FTRUNCATE
{"ftruncate", posix_ftruncate, 1},
#endif
#ifdef HAVE_PUTENV
{"putenv", posix_putenv, 1},
#endif
{NULL, NULL} /* Sentinel */
};