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
134
135
136
137
138
139
140
141
142
143
|
//+-------------------------------------------------------------------------
//
// Microsoft Windows
// Copyright (C) Microsoft Corporation, 1992 - 1993.
//
// File: SIFT.cxx
//
// Contents: Simulated Iterated Failure Testing Harness
//
// Functions: Sift
//
// History: 25-Jan-93 AlexT Created
//
//--------------------------------------------------------------------------
#include <headers.cxx>
#pragma hdrstop
#if DBG != 1
#error FAIL.EXE requires DBG == 1
#endif
#include <sift.hxx>
#define SET_DISPLAY_BUF_SIZE _wsetscreenbuf(_fileno(stdout), _WINBUFINF)
void main (int argc, char *argv[])
{
int i;
int cTests = TestCount();
SiftInit();
SET_DISPLAY_BUF_SIZE; //set QuickWin buffer size to infinite
printf("SIFT %d tests.\n", cTests);
for (i = 0; i < cTests; i++)
{
SiftDriver(TestItem(i));
}
// Be a good citizen and leave the Docfile clean
SetFailLimit(0L);
CoUninitialize();
printf("SIFT complete.\n");
}
//+-------------------------------------------------------------------------
//
// Function: Initialize
//
// Synopsis: Standard initialization
//
// History: 21-Jan-93 AlexT Created
//
//--------------------------------------------------------------------------
void SiftInit(void)
{
SCODE sc;
#if WIN32 == 300
if (FAILED(sc = DfGetScode(CoInitializeEx(NULL, COINIT_MULTITHREADED))))
#else
if (FAILED(sc = DfGetScode(CoInitialize(NULL))))
#endif
printf("SIFT: Unable to CoInitialize, sc = 0x%lX\n", sc);
DfDebug(0x00100101, 0x101);
}
void SiftDriver(CTestCase *ptc)
{
SCODE sc;
if (!ptc->Init())
{
// Test's obligation to display failure message
return;
}
do
{
LONG iteration, lcf = 0;
for (iteration = 0; iteration <= lcf; iteration++)
{
SetFailLimit(0L);
sc = ptc->Prep(iteration);
if (FAILED(sc))
continue;
SetFailLimit(iteration);
sc = ptc->Call(iteration);
if (SUCCEEDED(sc))
{
if (iteration == 0)
{
lcf = DfGetResLimit(DBR_FAILCOUNT);
printf("%ld failure points\n", lcf);
}
else
{
// Shouldn't have succeeded
printf("..Iteration %ld succeeded!\n", iteration);
}
SetFailLimit(0L);
ptc->EndCall(iteration);
}
else
{
SetFailLimit(0L);
ptc->CallVerify(iteration);
}
ptc->EndPrep(iteration);
ptc->EndVerify(iteration);
}
} while (ptc->Next());
}
//+-------------------------------------------------------------------------
//
// Function: SetFailLimit
//
// Synopsis: clear count, set limit
//
// Arguments: [limit] -- failure limit
//
// History: 22-Jan-93 AlexT Created
//
//--------------------------------------------------------------------------
void SetFailLimit(LONG limit)
{
DfSetResLimit(DBR_FAILCOUNT, 0);
DfSetResLimit(DBR_FAILLIMIT, limit);
}
|