summaryrefslogtreecommitdiff
path: root/src/pal/tests/palsuite/c_runtime/_putw/test1/test1.c
blob: ecfc9046acad0b291ace95424d2ebdd387140dff (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
// 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:  test1.c
**
** Purpose: Writes a series of integers to a file, test.dat,
**          then verifies the results.
**
** Dependency: fopen(...)
**             fclose(...)
**             CloseHandle(...) 
**             DeleteFileA(...)
**             _getw(...)
**
**
**
**==========================================================================*/


#include <palsuite.h>

const char testFileName[] = "test.dat";

static void Cleanup(HANDLE hFile)
{
    if (fclose(hFile))
    {
        Trace("_putw: ERROR -> Unable to close file \"%s\".\n", 
            testFileName);
    }
    if (!DeleteFileA(testFileName))
    {
        Trace("_putw: ERROR -> Unable to delete file \"%s\". ", 
            "GetLastError returned %u.\n", 
            testFileName,
            GetLastError());
    }
}


int __cdecl main(int argc, char **argv)
{

    FILE * pfTest = NULL;
    int  testArray[] = {0,1,-1,0x7FFFFFFF,0x80000000,0xFFFFFFFF,0xFFFFAAAA};
    int  i = 0;
    int  retValue = 0;

    /*
     *  Initialize the PAL and return FAIL if this fails
     */
    if (0 != (PAL_Initialize(argc, argv)))
    {
        return FAIL;
    }

    /*write the file that we will use to test */
    pfTest = fopen(testFileName, "w");
    if (pfTest == NULL)
    {
        Fail ("Unable to write test file.\n");
    }

    for (i = 0; i < sizeof(testArray)/sizeof(int) ; i++)
    {
        _putw(testArray[i], pfTest);

        if( ferror( pfTest ) )        
    {
            Cleanup(pfTest);
            Fail( "Error:in _putw -> error has occurred in the "
                "stream while writing to the file: \"test.dat\"\n");
        }
      
    }

    if (fclose(pfTest) != 0)
    {
        Cleanup(pfTest);
        Fail ("Error closing file after writing with _putw(..).\n");
    }

    /*open the new test file and compare*/
    pfTest = fopen(testFileName, "r");
    if (pfTest == NULL)
    {
        Fail ("Error opening \"%s\", which is odd, since I just finished "
                "creating that file.\n", testFileName);
    }
    retValue =_getw( pfTest );
    i = 0;
    while(retValue != EOF)
    {
        if(retValue != testArray[i])
        {
            Cleanup(pfTest);
            Fail ("Integers written by _putw are not in the correct format\n",
                testFileName);
        }
        retValue = _getw( pfTest );
        i++ ;
    }

    Cleanup(pfTest);  
    PAL_Terminate();
    return PASS;
}