mirror of https://github.com/odrling/Aegisub
113 lines
2.4 KiB
C
113 lines
2.4 KiB
C
|
/*
|
||
|
* test_fwrite_api.c
|
||
|
* Luabins Lua-less fwrite API tests
|
||
|
* See copyright notice in luabins.h
|
||
|
*/
|
||
|
|
||
|
/*
|
||
|
* WARNING: This suite is format-specific. Change it when format changes.
|
||
|
*/
|
||
|
|
||
|
#include <stdio.h>
|
||
|
#include <stdlib.h>
|
||
|
#include <string.h>
|
||
|
|
||
|
#include "lualess.h"
|
||
|
#include "fwrite.h"
|
||
|
|
||
|
#include "test.h"
|
||
|
#include "util.h"
|
||
|
|
||
|
/******************************************************************************/
|
||
|
|
||
|
/*
|
||
|
* Note it is different from test_savebuffer variant.
|
||
|
* We're interested in higher level stuff here.
|
||
|
*/
|
||
|
static void check_buffer(
|
||
|
FILE * f,
|
||
|
const char * expected_buf_c,
|
||
|
size_t expected_length
|
||
|
)
|
||
|
{
|
||
|
const unsigned char * expected_buf = (unsigned char *)expected_buf_c;
|
||
|
unsigned char * actual_buf = NULL;
|
||
|
size_t actual_length = ftell(f);
|
||
|
size_t actually_read = 0;
|
||
|
|
||
|
fseek(f, 0, SEEK_SET);
|
||
|
|
||
|
actual_buf = (unsigned char *)malloc(actual_length);
|
||
|
actually_read = fread(actual_buf, actual_length, 1, f);
|
||
|
if (actually_read != 1ul)
|
||
|
{
|
||
|
fprintf(
|
||
|
stderr,
|
||
|
"fread count error: got %lu, expected %lu\n",
|
||
|
actually_read, 1ul
|
||
|
);
|
||
|
|
||
|
free(actual_buf);
|
||
|
fclose(f);
|
||
|
exit(1);
|
||
|
}
|
||
|
|
||
|
fseek(f, actual_length, SEEK_SET);
|
||
|
|
||
|
if (actual_length != expected_length)
|
||
|
{
|
||
|
fprintf(
|
||
|
stderr,
|
||
|
"length mismatch: got %lu, expected %lu\n",
|
||
|
actual_length, expected_length
|
||
|
);
|
||
|
fprintf(stderr, "actual:\n");
|
||
|
fprintbuf(stderr, actual_buf, actual_length);
|
||
|
fprintf(stderr, "expected:\n");
|
||
|
fprintbuf(stderr, expected_buf, expected_length);
|
||
|
|
||
|
free(actual_buf);
|
||
|
fclose(f);
|
||
|
exit(1);
|
||
|
}
|
||
|
|
||
|
if (memcmp(actual_buf, expected_buf, expected_length) != 0)
|
||
|
{
|
||
|
fprintf(stderr, "buffer mismatch\n");
|
||
|
fprintf(stderr, "actual:\n");
|
||
|
fprintbuf(stderr, actual_buf, actual_length);
|
||
|
fprintf(stderr, "expected:\n");
|
||
|
fprintbuf(stderr, expected_buf, expected_length);
|
||
|
|
||
|
free(actual_buf);
|
||
|
fclose(f);
|
||
|
exit(1);
|
||
|
}
|
||
|
|
||
|
free(actual_buf);
|
||
|
}
|
||
|
|
||
|
/******************************************************************************/
|
||
|
|
||
|
#define CAT(a, b) a ## b
|
||
|
|
||
|
#define TEST_NAME(x) CAT(test_fwrite, x)
|
||
|
#define CALL_NAME(x) CAT(lbs_fwrite, x)
|
||
|
#define BUFFER_NAME (f)
|
||
|
#define INIT_BUFFER \
|
||
|
FILE * f = tmpfile();
|
||
|
|
||
|
#define DESTROY_BUFFER \
|
||
|
fclose(f);
|
||
|
|
||
|
#define CHECK_BUFFER check_buffer
|
||
|
|
||
|
#include "write_tests.inc"
|
||
|
|
||
|
/******************************************************************************/
|
||
|
|
||
|
void test_fwrite_api()
|
||
|
{
|
||
|
RUN_GENERATED_TESTS;
|
||
|
}
|