_tfileio.c File Reference

#include <windows.h>
#include <tchar.h>
#include <wchar.h>
#include <stdio.h>

Include dependency graph for _tfileio.c:

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Macros
#define	WIN32_LEAN_AND_MEAN
#define	_tfopen   fopen
#define	_tunlink   _unlink
#define	_TEOF   EOF
#define	_gettchar   getchar
#define	_puttchar   putchar
#define	_THEX_FORMAT   "0x%02x "
#define	TEST_BUFFER_SIZE   200
#define	TEST_FILE_LINES   4
#define	TEST_B1_FILE_SIZE   (sizeof(dos_data)-1+TEST_FILE_LINES)
#define	TEST_B2_FILE_SIZE   (sizeof(dos_data)-1-TEST_FILE_LINES)
#define	TEST_B3_FILE_SIZE   (sizeof(nix_data)-1+TEST_FILE_LINES)
#define	TEST_B4_FILE_SIZE   (sizeof(nix_data)-1)

Functions
static BOOL	test_file_truncate (TCHAR *file_name)
static BOOL	create_output_file (TCHAR *file_name, TCHAR *file_mode, TCHAR *file_data)
static BOOL	verify_output_file (TCHAR *file_name, TCHAR *file_mode, TCHAR *file_data)
static int	create_test_file (TCHAR *file_name, TCHAR *write_mode, TCHAR *read_mode, TCHAR *file_data)
static int	check_file_size (TCHAR *file_name, TCHAR *file_mode, int expected)
static int	test_console_io (void)
static int	test_console_getchar (void)
static int	test_console_putch (void)
static int	test_unlink_files (void)
static int	test_text_fileio (TCHAR *file_name, TCHAR *file_data, int tsize, int bsize)
static int	test_binary_fileio (TCHAR *file_name, TCHAR *file_data, int tsize, int bsize)
static int	test_files (int test_num, char *type)

Variables
BOOL	verbose_flagged
BOOL	status_flagged
static TCHAR	test_buffer [TEST_BUFFER_SIZE]
static TCHAR	dos_data []
static TCHAR	nix_data []

Macro Definition Documentation

_gettchar

#define _gettchar   getchar

Definition at line 41 of file _tfileio.c.

_puttchar

#define _puttchar   putchar

Definition at line 42 of file _tfileio.c.

_TEOF

#define _TEOF   EOF

Definition at line 40 of file _tfileio.c.

_tfopen

#define _tfopen   fopen

Definition at line 38 of file _tfileio.c.

_THEX_FORMAT

#define _THEX_FORMAT   "0x%02x "

Definition at line 43 of file _tfileio.c.

_tunlink

#define _tunlink   _unlink

Definition at line 39 of file _tfileio.c.

TEST_B1_FILE_SIZE

#define TEST_B1_FILE_SIZE   (sizeof(dos_data)-1+TEST_FILE_LINES)

Definition at line 71 of file _tfileio.c.

TEST_B2_FILE_SIZE

#define TEST_B2_FILE_SIZE   (sizeof(dos_data)-1-TEST_FILE_LINES)

Definition at line 72 of file _tfileio.c.

TEST_B3_FILE_SIZE

#define TEST_B3_FILE_SIZE   (sizeof(nix_data)-1+TEST_FILE_LINES)

Definition at line 73 of file _tfileio.c.

TEST_B4_FILE_SIZE

#define TEST_B4_FILE_SIZE   (sizeof(nix_data)-1)

Definition at line 74 of file _tfileio.c.

TEST_BUFFER_SIZE

#define TEST_BUFFER_SIZE   200

Definition at line 47 of file _tfileio.c.

TEST_FILE_LINES

#define TEST_FILE_LINES   4

Definition at line 48 of file _tfileio.c.

WIN32_LEAN_AND_MEAN

#define WIN32_LEAN_AND_MEAN

Definition at line 23 of file _tfileio.c.

Function Documentation

check_file_size()

static int check_file_size ( TCHAR *  file_name, TCHAR *  file_mode, int  expected  )

static

Definition at line 250 of file _tfileio.c.

{
    int count = 0;
    FILE* file;
    TCHAR ch;
    int error_code;

    if (status_flagged) {
        //_tprintf(_T("STATUS: (%s) checking for %d bytes in %s mode\n"), file_name, expected, _tcschr(file_mode, _T('b')) ? _T("binary") : _T("text"));
        _tprintf(_T("STATUS: (%s) checking for %d bytes with mode %s\n"), file_name, expected, file_mode);
    }
    file = _tfopen(file_name, file_mode);
    if (file == NULL) {
        _tprintf(_T("ERROR: (%s) failed to open file for reading\n"), file_name);
        return 1;
    }
    while ((ch = _fgettc(file)) != _TEOF) {
        if (verbose_flagged) {
            _tprintf(_THEX_FORMAT, ch);
        }
        ++count;
    }
    error_code = ferror(file);
    if (error_code) {
         _tprintf(_T("ERROR: (%s) ferror returned %d after reading\n"), file_name, error_code);
         perror("Read error");
    }

    if (verbose_flagged) {
//        _puttc(_T('\n'), stdout);
    }
    fclose(file);
    if (count == expected) {
        if (status_flagged) {
            _tprintf(_T("PASSED: (%s) read %d bytes\n"), file_name, count);
        }
    } else {
        _tprintf(_T("FAILED: (%s) read %d bytes but expected %d using mode \"%s\"\n"), file_name, count, expected, file_mode);
    }
    return (count == expected) ? 0 : -1;
}

Referenced by test_binary_fileio(), and test_text_fileio().

create_output_file()

static BOOL create_output_file ( TCHAR *  file_name, TCHAR *  file_mode, TCHAR *  file_data  )

static

Definition at line 140 of file _tfileio.c.

{
    BOOL result = FALSE;
    FILE *file = _tfopen(file_name, file_mode);
    if (file != NULL) {
        if (_fputts(file_data, file) != _TEOF) {
            result = TRUE;
        } else {
            _tprintf(_T("ERROR: failed to write data to file \"%s\"\n"), file_name);
            _tprintf(_T("ERROR: ferror returned %d\n"), ferror(file));
        }
        fclose(file);
    } else {
        _tprintf(_T("ERROR: failed to open/create file \"%s\" for output\n"), file_name);
        _tprintf(_T("ERROR: ferror returned %d\n"), ferror(file));
    }
    return result;
}

Referenced by create_test_file().

create_test_file()

static int create_test_file ( TCHAR *  file_name, TCHAR *  write_mode, TCHAR *  read_mode, TCHAR *  file_data  )

static

Definition at line 226 of file _tfileio.c.

{
    if (status_flagged) {
        _tprintf(_T("STATUS: Attempting to create output file %s\n"), file_name);
    }
    if (create_output_file(file_name, write_mode, file_data)) {
        if (status_flagged) {
            _tprintf(_T("STATUS: Attempting to verify output file %s\n"), file_name);
        }
        if (verify_output_file(file_name, read_mode, file_data)) {
            if (status_flagged) {
                _tprintf(_T("SUCCESS: %s verified ok\n"), file_name);
            }
        } else {
            //_tprintf(_T("ERROR: failed to verify file %s\n"), file_name);
            return 2;
        }
    } else {
        _tprintf(_T("ERROR: failed to create file %s\n"), file_name);
        return 1;
    }
    return 0;
}

Referenced by test_binary_fileio(), and test_text_fileio().

test_binary_fileio()

static int test_binary_fileio ( TCHAR *  file_name, TCHAR *  file_data, int  tsize, int  bsize  )

static

Definition at line 369 of file _tfileio.c.

{
    int result = 0;

    result = create_test_file(file_name, _T("wb"), _T("rb"), file_data);
    result = check_file_size(file_name, _T("r"), tsize);
    result = check_file_size(file_name, _T("rb"), bsize);
    return result;
}

Referenced by test_files().

test_console_getchar()

static int test_console_getchar ( void  )

static

Definition at line 313 of file _tfileio.c.

{
    int result = 0;
    TCHAR ch;

    _tprintf(_T("Enter lines for dumping or <ctrl-z><nl> to finish:\n"));

    //while ((ch = _gettchar()) != _TEOF) {
    while ((ch = _gettc(stdin)) != _TEOF) {
        _tprintf(_THEX_FORMAT, ch);
        //printf("0x%04x ", ch);
    }
    return result;
}

Referenced by test_files().

test_console_io()

static int test_console_io ( void  )

static

Definition at line 292 of file _tfileio.c.

{
    TCHAR buffer[81];
    TCHAR ch;
    int i, j;

    _tprintf(_T("Enter a line for echoing:\n"));

    //for (i = 0; (i < 80) && ((ch = _gettchar()) != _TEOF) && (ch != _T('\n')); i++) {
    for (i = 0; (i < 80) && ((ch = _gettc(stdin)) != _TEOF) && (ch != _T('\n')); i++) {
        buffer[i] = (TCHAR)ch;
    }
    buffer[i] = _T('\0');
    for (j = 0; j < i; j++) {
        _puttc(buffer[j], stdout);
    }
    _puttc(_T('\n'), stdout);
    _tprintf(_T("%s\n"), buffer);
    return 0;
}

Referenced by test_files().

test_console_putch()

static int test_console_putch ( void  )

static

Definition at line 328 of file _tfileio.c.

{
    int result = 0;

    _putch('1');
    _putch('@');
    _putch('3');
    _putch(':');
    _putch('\n');
    _putch('a');
    _putch('B');
    _putch('c');
    _putch(':');
    _putch('\n');
    return result;
}

Referenced by test_files().

test_file_truncate()

static BOOL test_file_truncate ( TCHAR *  file_name )

static

Definition at line 80 of file _tfileio.c.

{
    BOOL result = FALSE;
    int count = -1;
    int error_code;
    TCHAR ch;
    TCHAR* file_data = _T("this file should have been truncated to zero bytes...");
    FILE *file = _tfopen(file_name, _T("wb"));

    if (verbose_flagged) {
        _tprintf(_T("test_file_truncate(\"%s\")\n"), file_name);
    }

    if (file != NULL) {
        if (_fputts(file_data, file) != _TEOF) {
        } else {
            _tprintf(_T("ERROR: failed to write data to file \"%s\"\n"), file_name);
            _tprintf(_T("ERROR: ferror returned %d\n"), ferror(file));
        }
        fclose(file);
    } else {
        _tprintf(_T("ERROR: failed to open/create file \"%s\" for output\n"), file_name);
        _tprintf(_T("ERROR: ferror returned %d\n"), ferror(file));
    }

    file = _tfopen(file_name, _T("wb"));
    if (file != NULL) {
        error_code = ferror(file);
        if (error_code) {
             _tprintf(_T("ERROR: (%s) ferror returned %d\n"), file_name, error_code);
        }
        fclose(file);
    } else {
        _tprintf(_T("ERROR: (%s) failed to open file for truncating\n"), file_name);
    }

    file = _tfopen(file_name, _T("rb"));
    if (file != NULL) {
        count = 0;
        while ((ch = _fgettc(file)) != _TEOF) {
            if (verbose_flagged) {
                _tprintf(_THEX_FORMAT, ch);
            }
            ++count;
        }
        error_code = ferror(file);
        if (error_code) {
             _tprintf(_T("ERROR: (%s) ferror returned %d after reading\n"), file_name, error_code);
             perror("Read error");
        }
        fclose(file);
    } else {
        _tprintf(_T("ERROR: (%s) failed to open file for reading\n"), file_name);
    }
    if (count) {
        result = TRUE;
    }
    return result;
}

Referenced by test_files().

test_files()

static int test_files ( int  test_num, char *  type  )

static

Definition at line 379 of file _tfileio.c.

{
    int result = 0;

    printf("performing test: %d (%s)\n", test_num, type);


    if (test_file_truncate(_T("zerosize.foo"))) {
        printf("System unable to truncate files yet, unlinking:\n");
        test_unlink_files();
    }

    switch (test_num) {
    case 1:
        result = test_text_fileio(_T("text.dos"), dos_data, 166, TEST_B1_FILE_SIZE);
        break;
    case 2:
        result = test_binary_fileio(_T("binary.dos"), dos_data, TEST_B2_FILE_SIZE, 166);
        break;
    case 3:
        result = test_text_fileio(_T("text.nix"), nix_data, 162, TEST_B3_FILE_SIZE);
        break;
    case 4:
        result = test_binary_fileio(_T("binary.nix"), nix_data, TEST_B4_FILE_SIZE, 162);
        break;
    case 5:
        result = test_console_io();
        break;
    case 6:
        result = test_console_getchar();
        break;
    case 7:
        result = test_console_putch();
        break;
    case -1:
        result = test_unlink_files();
        break;
    default:
        _tprintf(_T("no test number selected\n"));
        break;
    }
    return result;
}

Referenced by run_ansi_tests(), and run_unicode_tests().

test_text_fileio()

static int test_text_fileio ( TCHAR *  file_name, TCHAR *  file_data, int  tsize, int  bsize  )

static

Definition at line 359 of file _tfileio.c.

{
    int result = 0;

    result = create_test_file(file_name, _T("w"), _T("r"), file_data);
    result = check_file_size(file_name, _T("r"), tsize);
    result = check_file_size(file_name, _T("rb"), bsize);
    return result;
}

Referenced by test_files().

test_unlink_files()

static int test_unlink_files ( void  )

static

Definition at line 345 of file _tfileio.c.

{
    int result = 0;

    //printf("sizeof dos_data: %d\n", sizeof(dos_data));
    //printf("sizeof nix_data: %d\n", sizeof(nix_data));

    result |= _tunlink(_T("binary.dos"));
    result |= _tunlink(_T("binary.nix"));
    result |= _tunlink(_T("text.dos"));
    result |= _tunlink(_T("text.nix"));
    return result;
}

Referenced by test_files().

verify_output_file()

static BOOL verify_output_file ( TCHAR *  file_name, TCHAR *  file_mode, TCHAR *  file_data  )

static

Definition at line 159 of file _tfileio.c.

{
    int error_code;
    int offset = 0;
    int line_num = 0;
    BOOL result = FALSE;
    BOOL error_flagged = FALSE;
    FILE* file = _tfopen(file_name, file_mode);
    if (file == NULL) {
        _tprintf(_T("ERROR: (%s) Can't open file for reading\n"), file_name);
        _tprintf(_T("ERROR: ferror returned %d\n"), ferror(file));
        return FALSE;
    } else if (status_flagged) {
        _tprintf(_T("STATUS: (%s) opened file for reading\n"), file_name);
    }
    while (_fgetts(test_buffer, TEST_BUFFER_SIZE, file)) {
        int length = _tcslen(test_buffer);
        int req_len = _tcschr(file_data+offset, _T('\n')) - (file_data+offset) + 1;

        ++line_num;
        if (length > req_len) {
            _tprintf(_T("ERROR: read excess bytes from line %d, length %d, but expected %d\n"), line_num, length, req_len);
            error_flagged = TRUE;
            break;
        }
        if (length < req_len) {
            _tprintf(_T("ERROR: read to few bytes from line %d, length %d, but expected %d\n"), line_num, length, req_len);
            error_flagged = TRUE;
            break;
        }
        if (status_flagged) {
            _tprintf(_T("STATUS: Verifying %d bytes read from line %d\n"), length, line_num);
        }
        if (_tcsncmp(test_buffer, file_data+offset, length - 1) == 0) {
            result = TRUE;
        } else {
            if (status_flagged) {
                int i;
                _tprintf(_T("WARNING: (%s) failed to verify file\n"), file_name);
                for (i = 0; i < length; i++) {
                    if (file_data[offset+i] != test_buffer[i]) {
                        _tprintf(_T("line %d, offset %d expected: 0x%04x found: 0x%04x\n"), line_num, i, (int)file_data[offset+i], (int)test_buffer[i]);
                    }
                }
                _tprintf(_T("\n"));
            } else {
                error_flagged = TRUE;
            }
        }
        offset += length;
    }
    error_code = ferror(file);
    if (error_code) {
         _tprintf(_T("ERROR: (%s) ferror returned %d after reading\n"), file_name, error_code);
         perror("Read error");
    }
    if (!line_num) {
        _tprintf(_T("ERROR: (%s) failed to read from file\n"), file_name);
    }
    if (error_flagged == TRUE) {
        _tprintf(_T("ERROR: (%s) failed to verify file\n"), file_name);
        result = FALSE;
    }
    fclose(file);
    return result;
}

Referenced by create_test_file().

Variable Documentation

dos_data

TCHAR dos_data[]

static

Initial value:

= _T("line1: this is a bunch of readable text.\r\n")
                   _T("line2: some more printable text and punctuation !@#$%^&*()\r\n")
                   _T("line3: followed up with some numerals 1234567890\r\n")
                   _T("line4: done.\r\n")

Definition at line 55 of file _tfileio.c.

Referenced by test_files().

nix_data

TCHAR nix_data[]

static

Initial value:

= _T("line1: this is a bunch of readable text.\n")
                   _T("line2: some more printable text and punctuation !@#$%^&*()\n")
                   _T("line3: followed up with some numerals 1234567890\n")
                   _T("line4: done.\n")

Definition at line 60 of file _tfileio.c.

Referenced by test_files().

status_flagged

BOOL status_flagged

Definition at line 42 of file main.c.

Referenced by check_file_size(), create_test_file(), main(), and verify_output_file().

test_buffer

TCHAR test_buffer[TEST_BUFFER_SIZE]

static

Definition at line 53 of file _tfileio.c.

Referenced by test_frequency(), test_primary(), test_primary_secondary(), test_RtlCompressBuffer(), test_secondary(), test_sha_ctx(), and verify_output_file().

verbose_flagged

BOOL verbose_flagged

Definition at line 39 of file loadlib.c.

Referenced by check_file_size(), main(), and test_file_truncate().