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
93
94
95
96
97
98
99
100
101
102
103
104
|
/*
# Copyright 1995, InfoSeek Corporation
# All rights reserved.
# Written by Andy Bensky
#
# Permission to use, copy, modify, and distribute this Python software
# and its associated documentation for any purpose (subject to the
# restriction in the following sentence) without fee is hereby granted,
# provided that the above copyright notice appears in all copies, and
# that both that copyright notice and this permission notice appear in
# supporting documentation, and that the name of InfoSeek not be used in
# advertising or publicity pertaining to distribution of the software
# without specific, prior written permission. This permission is
# explicitly restricted to the copying and modification of the software
# to remain in Python, compiled Python, or other languages (such as C)
# wherein the modified or derived code is exclusively imported into a
# Python module.
#
# INFOSEEK CORPORATION DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS
# SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND
# FITNESS. IN NO EVENT SHALL INFOSEEK CORPORATION BE LIABLE FOR ANY
# DIRECT, SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
# WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN
# AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
# OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE,
# EVEN IF INFOSEEK SHALL HAVE BEEN MADE AWARE OF THE POSSIBILITY OF SUCH
# DAMAGES.
*/
/* Hooks to call the Unix putenv() to modify the environment
*/
#include "allobjects.h"
#include <stdlib.h>
#include <assert.h>
#include <string.h>
/* Error conditions that can be raised */
/* Headers for functions accessible from Python as module methods */
static object *put_environ( object *self, object *args );
static struct methodlist environ_methods[] = {
{"putenv", put_environ},
{NULL, NULL}
};
/*
* Name: initenvironment
* Description:
* Initialzation function that Python will use to establish callbacks to
* the methods of this module.
*
* Returns:
* void -
*
* Notes:
*/
void initenvironment()
{
object *m, *d;
m = initmodule("environment", environ_methods);
d = getmoduledict(m);
}
/*
* Name: put_environ
* Description:
* accepts 2 string objects as arguments and forms a string of the
* form string1=string2 that can be passed to the putenv() system call.
*
* Returns:
* None object if successfull, otherwise raises a SystemError exception
*
*
* Notes:
*/
static object *put_environ( object *self, object *args )
{
char *string1, *string2;
char *set_str;
object *return_object = None;
if (args && getargs(args, "(ss)", &string1, &string2))
{
set_str = malloc(strlen(string1) + strlen(string2) + 2);
assert( set_str );
(void) sprintf(set_str, "%s=%s", string1, string2);
if ( putenv( set_str ) )
{
err_setstr(SystemError, "Error in system putenv call.");
return_object = 0;
}
}
else
{
err_setstr(TypeError, "Usage: putenv(string1, string2)");
return_object = 0;
}
return( return_object );
}
|
