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
|
/* $id$
$Locker: $ $Name: $ $State: Exp $
chgCtxt():
* Insert/replace/delete a case-sensitive variable into the specified
* context
*
* If value == NULL, the variable is deleted.
* If value == "", a variable with an empty body is created.
* If name == "", a body with an empty name is created.
*
* Return: 0 on success;; !0 on failure
chgCtxtRemove():
as chgEnv(), but value == "" deletes the variable, too
This file bases on ENVIRON.C of FreeCOM v0.81 beta 1.
$Log: chgenv.c,v $
Revision 1.2 2001/04/29 11:33:51 skaus
chg: default heap size (tools\ptchsize) set to 6KB
chg: error displaying functions centralized into lib\err_fcts.src
add: displayError()
chg: all errors are displayed through functions void error_*()
bugfix: somtimes error messages are not displayed (see displayError())
bugfix: docommand(): type:file must pass ":file" to TYPE
bugfix: error_sfile(): string _SFILE_
bugfix: error message on empty redirection
bugfix: comma and semicolon ';' are recognized as argument seperators
of internal commands
Revision 1.1 2001/04/12 00:33:52 skaus
chg: new structure
chg: If DEBUG enabled, no available commands are displayed on startup
fix: PTCHSIZE also patches min extra size to force to have this amount
of memory available on start
bugfix: CALL doesn't reset options
add: PTCHSIZE to patch heap size
add: VSPAWN, /SWAP switch, .SWP resource handling
bugfix: COMMAND.COM A:\
bugfix: CALL: if swapOnExec == ERROR, no change of swapOnExec allowed
add: command MEMORY
bugfix: runExtension(): destroys command[-2]
add: clean.bat
add: localized CRITER strings
chg: use LNG files for hard-coded strings (hangForEver(), init.c)
via STRINGS.LIB
add: DEL.C, COPY.C, CBREAK.C: STRINGS-based prompts
add: fixstrs.c: prompts & symbolic keys
add: fixstrs.c: backslash escape sequences
add: version IDs to DEFAULT.LNG and validation to FIXSTRS.C
chg: splitted code apart into LIB\*.c and CMD\*.c
bugfix: IF is now using error system & STRINGS to report errors
add: CALL: /N
*/
#include "../config.h"
#include <assert.h>
#include <environ.h>
#include "../err_fcts.h"
#include "../include/command.h"
#include "../include/misc.h"
#include "../strings.h"
int chgEnv(const char name[], const char value[])
{
assert(name);
/* return values 1 and 3 are OK */
switch(env_change(0, name, value)) {
case 2: /* variable to delete not found <-> no problem */
case 1: case 3: /* var replaced | deleted | inserted ==> OK */
return 0;
case 0: /* Cannot insert */
if(!inInit)
error_env_var(name);
return E_NoMem;
default:
error_no_env();
return E_Syntax;
}
}
|
