blob: 8b4dd7b4307a57b62b32be7721f2553b124d0d1e (
plain)
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
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
|
// 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: PAL_TRY_EXCEPT.c (test 1)
**
** Purpose: Tests the PAL implementation of the PAL_TRY and
** PAL_EXCEPT functions. Exceptions are forced to ensure
** the exception blocks are hit.
**
**
**===================================================================*/
#include <palsuite.h>
int __cdecl main(int argc, char *argv[])
{
int* p = 0x00000000; /* NULL pointer */
BOOL bTry = FALSE;
BOOL bExcept = FALSE;
BOOL bTestA = TRUE;
if (0 != PAL_Initialize(argc, argv))
{
return FAIL;
}
/*
** test to make sure we get into the exception block
*/
PAL_TRY
{
if (!bTestA)
{
Fail("PAL_TRY_EXCEPT: ERROR ->"
" It appears the first try block was hit a second time.\n");
}
bTry = TRUE; /* indicate we hit the PAL_TRY block */
*p = 13; /* causes an access violation exception */
Fail("PAL_TRY_EXCEPT: ERROR -> code was executed after the "
"access violation.\n");
}
PAL_EXCEPT(EXCEPTION_EXECUTE_HANDLER)
{
if (!bTestA)
{
Fail("PAL_TRY_EXCEPT: ERROR ->"
" It appears the first except block was hit a second time.\n");
}
bExcept = TRUE; /* indicate we hit the PAL_EXCEPT block */
}
PAL_ENDTRY;
if (!bTry)
{
Trace("PAL_TRY_EXCEPT: ERROR -> It appears the code in the PAL_TRY"
" block was not executed.\n");
}
if (!bExcept)
{
Trace("PAL_TRY_EXCEPT: ERROR -> It appears the code in the first"
" PAL_EXCEPT block was not executed.\n");
}
/* did we hit all the code blocks? */
if(!bTry || !bExcept)
{
Fail("");
}
/*
** test to make sure we get into the second exception block
*/
bTry = FALSE;
bExcept = FALSE;
bTestA = FALSE; /* we are now going into the second block test */
PAL_TRY
{
if (bTestA)
{
Fail("PAL_TRY_EXCEPT: ERROR -> It appears"
" the second try block was hit too early.\n");
}
bTry = TRUE; /* indicate we hit the PAL_TRY block */
*p = 13; /* causes an access violation exception */
Fail("PAL_TRY_EXCEPT: ERROR -> code was executed after the "
"access violation.\n");
}
PAL_EXCEPT(EXCEPTION_EXECUTE_HANDLER)
{
if (bTestA)
{
Fail("PAL_TRY_EXCEPT: ERROR -> It appears"
" the second except block was hit too early.\n");
}
bExcept = TRUE; /* indicate we hit the PAL_EXCEPT block */
}
PAL_ENDTRY;
if (!bTry)
{
Trace("PAL_TRY_EXCEPT: ERROR -> It appears the code in the second"
" PAL_TRY block was not executed.");
}
if (!bExcept)
{
Trace("PAL_TRY_EXCEPT: ERROR -> It appears the code in the PAL_EXCEPT"
" block was not executed.");
}
/* did we hit all the code blocks? */
if(!bTry || !bExcept)
{
Fail("\n");
}
PAL_Terminate();
return PASS;
}
|
