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
|
// 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: test6.c
**
** Purpose: Tests the PAL implementation of the fopen function.
** Test to ensure that you can write to an 'a' mode file.
** And that you can't read from a 'a' mode file. Also ensure
** that you can use fseek and still write to the end of a file.
**
** Depends:
** fprintf
** fgets
** fseek
** fclose
**
**
**===================================================================*/
#include <palsuite.h>
int __cdecl main(int argc, char **argv)
{
FILE *fp;
char buffer[128];
if (PAL_Initialize(argc, argv))
{
return FAIL;
}
/* Open a file with 'a+' mode */
if( (fp = fopen( "testfile", "a" )) == NULL )
{
Fail( "ERROR: The file failed to open with 'a' mode.\n" );
}
/* Write some text to the file */
if(fprintf(fp,"%s","some text") <= 0)
{
Fail("ERROR: Attempted to WRITE to a file opened with 'a' mode "
"but fprintf failed. Either fopen or fprintf have problems.");
}
if(fseek(fp, 0, SEEK_SET))
{
Fail("ERROR: fseek failed, and this test depends on it.");
}
/* Attempt to read from the 'a' only file, should fail */
if(fgets(buffer,10,fp) != NULL)
{
Fail("ERROR: Tried to READ from a file with 'a' mode set. "
"This should fail, but fgets returned success. Either fgets "
"or fopen is broken.");
}
/* Attempt to write to a file after using 'a' and fseek */
fp = fopen("testfile2", "a");
if(fp == NULL)
{
Fail("ERROR: The file failed to be created with 'a' mode.\n");
}
/* write text to the file initially */
if(fprintf(fp,"%s","abcd") <= 0)
{
Fail("ERROR: Attempted to WRITE to a file opened with 'a' mode "
"but fprintf failed. Either fopen or fprintf have problems.\n");
}
/* set the pointer to the front of the file */
if(fseek(fp, 0, SEEK_SET))
{
Fail("ERROR: fseek failed, and this test depends on it.\n");
}
/* using 'a' should still write to the end of the file, not the front */
if(fputs("efgh",fp) < 0)
{
Fail("ERROR: Attempted to WRITE to a file opened with 'a' mode "
"but fputs failed.\n");
}
/* set the pointer to the front of the file */
if(fseek(fp, 0, SEEK_SET))
{
Fail("ERROR: fseek failed, and this test depends on it.\n");
}
/* a file with 'a' mode can only write, so close the file before reading */
if(fclose(fp))
{
Fail("ERROR: fclose failed when it should have succeeded.\n");
}
/* open the file again to read */
fp = fopen("testfile2","r");
if(fp == NULL)
{
Fail("ERROR: fopen failed to open the file using 'r' mode");
}
/* Attempt to read from the 'a' only file, should succeed */
if(fgets(buffer,10,fp) == NULL)
{
Fail("ERROR: Tried to READ from a file with 'a' mode set. "
"This should pass, but fgets returned failure. Either fgets "
"or fopen is broken.\n");
}
/* Compare what was read and what should have been in the file */
if(memcmp(buffer,"abcdefgh",8))
{
Fail("ERROR: The string read should have equaled 'abcdefgh' "
"but instead it is %s\n", buffer);
}
PAL_Terminate();
return PASS;
}
|
