home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD2.mdf / gnu / djgpp / libsrc / c / lib / putenv.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-06-28  |  1.6 KB  |  50 lines
  1. /* This file may have been modified by DJ Delorie (Jan 1991).  If so,
  2. ** these modifications are Coyright (C) 1993 DJ Delorie, 24 Kirsten Ave,
  3. ** Rochester NH, 03867-2954, USA.
  4. */
  5.  
  6. /*-
  7.  * Copyright (c) 1988 The Regents of the University of California.
  8.  * All rights reserved.
  9.  *
  10.  * Redistribution and use in source and binary forms are permitted
  11.  * provided that: (1) source distributions retain this entire copyright
  12.  * notice and comment, and (2) distributions including binaries display
  13.  * the following acknowledgement:  ``This product includes software
  14.  * developed by the University of California, Berkeley and its contributors''
  15.  * in the documentation or other materials provided with the distribution
  16.  * and in all advertising materials mentioning features or use of this
  17.  * software. Neither the name of the University nor the names of its
  18.  * contributors may be used to endorse or promote products derived
  19.  * from this software without specific prior written permission.
  20.  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  21.  * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  22.  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  23.  */
  24.  
  25. #if defined(LIBC_SCCS) && !defined(lint)
  26. static char sccsid[] = "@(#)putenv.c    5.3 (Berkeley) 5/17/90";
  27. #endif /* LIBC_SCCS and not lint */
  28.  
  29. #include <stdlib.h>
  30. #include <string.h>
  31.  
  32. int
  33. putenv(str)
  34.     const char *str;
  35. {
  36.     register char *p, *equal;
  37.     int rval;
  38.  
  39.     if (!(p = strdup(str)))
  40.         return(1);
  41.     if (!(equal = index(p, '='))) {
  42.         (void)free(p);
  43.         return(1);
  44.     }
  45.     *equal = '\0';
  46.     rval = setenv(p, equal + 1, 1);
  47.     (void)free(p);
  48.     return(rval);
  49. }
  50.