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
|
// Licensed to the .NET Foundation under one or more agreements.
// The .NET Foundation licenses this file to you under the MIT license.
// See the LICENSE file in the project root for more information.
/*=====================================================================
**
** Source: test3.c
**
** Purpose: Create environment variables that differ only in Case, and
** verify that the BSD operating system treats the variables
** differently.
**
**
**===================================================================*/
#include <palsuite.h>
int __cdecl main(int argc, char **argv)
{
#if WIN32
return PASS;
#else
const char* FirstVariable = "PalTestingEnvironmentVariable=The value";
const char* SecondVariable = "PALTESTINGEnvironmentVariable=Different value";
const char* FirstVarName = "PalTestingEnvironmentVariable";
const char* FirstVarValue = "The value";
char* result;
if (0 != (PAL_Initialize(argc, argv)))
{
return FAIL;
}
/* Use _putenv to set an environment variable. This ensures that the
variable we're testing on is always present.
*/
if(_putenv(FirstVariable) != 0)
{
Fail("ERROR: _putenv failed to set an environment variable that "
"getenv will be using for testing.\n");
}
/* Call getenv -- ensure it doesn't return NULL and the string it returns
is the value we set above. Also make sure that each environment variable,
differing only by case, returns it's own value.
*/
result = getenv(FirstVarName);
if(result == NULL)
{
Fail("ERROR: The result of getenv on a valid Environment Variable "
"was NULL, which indicates the environment varaible was not "
"found.\n");
}
if(strcmp(result, FirstVarValue) != 0)
{
Fail("ERROR: The value obtained by getenv() was not equal to the "
"correct value of the environment variable. The correct "
"value is '%s' and the function returned '%s'.\n",
FirstVarValue,
result);
}
/* Set the second environment variable, which only differs in Case */
if(_putenv(SecondVariable) != 0)
{
Fail("ERROR: _putenv failed to set an environment variable that "
"getenv will be using for testing.\n");
}
/* Verify that the environment variables
*/
result = getenv(FirstVarName);
if(result == NULL)
{
Fail("ERROR: The result of getenv on a valid Environment Variable "
"was NULL, which indicates the environment varaible was not "
"found.\n");
}
if(strcmp(result, FirstVarValue) != 0)
{
Fail("ERROR: The value obtained by getenv() was not equal to the "
"correct value of the environment variable. The correct "
"value is '%s' and the function returned '%s'.\n",
FirstVarValue,
result);
}
PAL_Terminate();
return PASS;
#endif
}
|
