File: setenv.c

package info (click to toggle)
gnucash 2.0.5-1
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 58,168 kB
  • ctags: 31,733
  • sloc: ansic: 300,644; lisp: 36,002; sh: 18,499; makefile: 6,158; xml: 1,391; perl: 829; sql: 558
file content (92 lines) | stat: -rw-r--r-- 3,022 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
/********************************************************************\
 * File: setenv.c
 * Renamed from: core-utils.c
 *
 * Copyright (C) 2001 Linux Developers Group
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License as
 * published by the Free Software Foundation; either version 2 of the
 * License, or (at your option) any later version.
 * 
 * This program is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * General Public License for more details.
 * 
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 *
\********************************************************************/

#include "config.h"

#include <glib.h>
#include <glib/gprintf.h>
#include <stdlib.h>
#include <string.h>
#include "setenv.h"

/* This setenv() papers over the brokenness of of systems that only
 * have putenv() which takes ownership of the pointer you give it,
 * making it *very* difficult, if not impossible to avoid memory
 * leaks.  Note that right now, on systems that have setenv, this is
 * just setenv, and on other systems, we just leave the memory leak.
 * Later, we may try to make things a little better by keeping track
 * of the pointers we call putenv on in a hash table and if someone
 * calls gnc_setenv on an envt var that we've previously set, then
 * we'll free it after the change.  However, given the sloppy
 * semantics (or docs) for putenv, it's not even clear that this is
 * OK, since it's not clear that people aren't allowed to keep the
 * pointer from getenv around, as long as they don't try to modify
 * it... <shrug> */

#ifndef HAVE_SETENV

int
setenv(const char *name, const char *value, int overwrite)
{
  const char *old_value = getenv(name);
  int result = 0;

  if ((name == NULL) || (value == NULL)) return -1;

  if(overwrite || (!old_value))
  {
    char *new_value = g_strdup_printf("%s=%s", name, value);
    if(putenv(new_value) != 0) result = -1;
    if(old_value)
    {
      /* for now, do nothing, but it would be nice if we could figure
         out a safe way to reclaim any memory that *we* allocated,
         taking in to account whether or not other code (in other
         system libs) is allowed to have cached a pointer into the
         value via getenv -- is that kosher?
         
         Also we have to *know* that we allocated the memory.
      */
    }
  }
  return result;
}

int
unsetenv(const char *name)
{
  int result = 0;
  char *putenv_str;
  
  if(name == NULL) return -1;
  if(strchr(name, '=') != NULL) return -1;
  if(*name == '\0') return -1;
  
  putenv_str = g_strdup_printf("%s=", name);
  if(!putenv_str) return -1;

  result = putenv(putenv_str);
  g_free(putenv_str);
  return result;
}

#endif