/*
* Check: a unit test framework for C
* Copyright (C) 2001, 2002 Arien Malec
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,
* MA 02110-1301, USA.
*/
#include "../lib/libcompat.h"
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include "check.h"
#include "check_pack.h"
#include "check_error.h"
#include "check_check.h"
#include "check_msg.h"
static char errm[512];
START_TEST(test_pack_fmsg)
{
FailMsg *fmsg;
char *buf;
enum ck_msg_type type;
fmsg = (FailMsg *)emalloc (sizeof (FailMsg));
fmsg->msg = (char *) "Hello, world!";
pack (CK_MSG_FAIL, &buf, (CheckMsg *) fmsg);
fmsg->msg = NULL;
upack (buf, (CheckMsg *) fmsg, &type);
ck_assert_msg (type == CK_MSG_FAIL,
"Bad type unpacked for FailMsg");
ck_assert_msg (fmsg->msg != NULL,
"Unpacked string is NULL, should be Hello, World!");
if (strcmp (fmsg->msg, "Hello, world!") != 0) {
snprintf (errm, sizeof(errm),
"Unpacked string is %s, should be Hello, World!",
fmsg->msg);
fail (errm);
}
free (fmsg->msg);
free (fmsg);
free (buf);
}
END_TEST
START_TEST(test_pack_loc)
{
LocMsg *lmsg;
char *buf;
enum ck_msg_type type;
lmsg =(LocMsg *) emalloc (sizeof (LocMsg));
lmsg->file = (char *) "abc123.c";
lmsg->line = 125;
pack (CK_MSG_LOC, &buf, (CheckMsg *) lmsg);
lmsg->file = NULL;
lmsg->line = 0;
upack (buf, (CheckMsg *) lmsg, &type);
ck_assert_msg (type == CK_MSG_LOC,
"Bad type unpacked for LocMsg");
if (lmsg->line != 125) {
snprintf (errm, sizeof (errm),
"LocMsg line was %d, should be %d",
lmsg->line, 125);
fail (errm);
}
if (strcmp (lmsg->file, "abc123.c") != 0) {
snprintf (errm, sizeof (errm),
"LocMsg file was %s, should be abc123.c",
lmsg->file);
fail (errm);
}
free (lmsg->file);
free (lmsg);
free (buf);
}
END_TEST
START_TEST(test_pack_ctx)
{
CtxMsg cmsg;
char *buf;
enum ck_msg_type type;
cmsg.ctx = CK_CTX_SETUP;
pack (CK_MSG_CTX, &buf, (CheckMsg *) &cmsg);
cmsg.ctx = CK_CTX_TEARDOWN;
upack (buf, (CheckMsg *) &cmsg, &type);
ck_assert_msg (type == CK_MSG_CTX,
"Bad type unpacked for CtxMsg");
if (cmsg.ctx != CK_CTX_SETUP) {
snprintf (errm, sizeof (errm),
"CtxMsg ctx got %d, expected %d",
cmsg.ctx, CK_CTX_SETUP);
fail (errm);
}
free (buf);
}
END_TEST
START_TEST(test_pack_len)
{
CtxMsg cmsg;
char *buf;
int n = 0;
enum ck_msg_type type;
cmsg.ctx = CK_CTX_TEST;
n = pack (CK_MSG_CTX, &buf, (CheckMsg *) &cmsg);
ck_assert_msg (n > 0, "Return val from pack not set correctly");
/* Value below may change with different implementations of pack */
ck_assert_msg (n == 8, "Return val from pack not correct");
n = upack (buf, (CheckMsg *) &cmsg, &type);
if (n != 8) {
snprintf (errm, sizeof (errm), "%d bytes read from upack, should be 8", n);
fail (errm);
}
free (buf);
}
END_TEST
START_TEST(test_pack_abuse)
{
char *buf;
CtxMsg cmsg;
enum ck_msg_type type;
/* Should report -1 (e.g. invalid) if no buffer is passed */
ck_assert_int_eq(pack(CK_MSG_CTX, NULL, (CheckMsg *) &cmsg), -1);
/* Should report 0 (e.g. nothing packed) if no message is passed */
ck_assert_int_eq(pack(CK_MSG_CTX, &buf, NULL), 0);
/* Should report -1 (e.g. invalid) if no buffer is passed */
ck_assert_int_eq(upack(NULL, (CheckMsg *) &cmsg, &type), -1);
}
END_TEST
START_TEST(test_pack_ctx_limit)
{
CtxMsg cmsg;
CtxMsg *cmsgp = NULL;
char *buf;
cmsg.ctx = (enum ck_result_ctx)-1;
pack (CK_MSG_CTX, &buf, (CheckMsg *) &cmsg);
pack (CK_MSG_CTX, &buf, (CheckMsg *) cmsgp);
}
END_TEST
START_TEST(test_pack_fail_limit)
{
FailMsg fmsg;
FailMsg *fmsgp = NULL;
char *buf;
enum ck_msg_type type;
fmsg.msg = (char *) "";
pack (CK_MSG_FAIL, &buf, (CheckMsg *) &fmsg);
fmsg.msg = NULL;
upack (buf, (CheckMsg *) &fmsg, &type);
free (buf);
ck_assert_msg (fmsg.msg != NULL,
"Empty string not handled properly");
ck_assert_msg (strcmp (fmsg.msg, "") == 0,
"Empty string not handled properly");
free (fmsg.msg);
fmsg.msg = NULL;
pack (CK_MSG_FAIL, &buf, (CheckMsg *) &fmsg);
pack (CK_MSG_FAIL, &buf, (CheckMsg *) fmsgp);
}
END_TEST
START_TEST(test_pack_loc_limit)
{
LocMsg lmsg;
LocMsg *lmsgp = NULL;
char *buf;
enum ck_msg_type type;
lmsg.file = (char *) "";
lmsg.line = 0;
pack (CK_MSG_LOC, &buf, (CheckMsg *) &lmsg);
lmsg.file = NULL;
upack (buf, (CheckMsg *) &lmsg, &type);
ck_assert_msg (lmsg.file != NULL,
"Empty string not handled properly");
ck_assert_msg (strcmp (lmsg.file, "") == 0,
"Empty string not handled properly");
free (lmsg.file);
lmsg.file = NULL;
pack (CK_MSG_LOC, &buf, (CheckMsg *) &lmsg);
pack (CK_MSG_LOC, &buf, (CheckMsg *) lmsgp);
}
END_TEST
/* the ppack probably means 'pipe' pack */
#if defined(HAVE_FORK) && HAVE_FORK==1
START_TEST(test_ppack)
{
FILE * result_file;
char * result_file_name = NULL;
CtxMsg cmsg;
LocMsg lmsg;
FailMsg fmsg;
RcvMsg *rmsg;
cmsg.ctx = CK_CTX_TEST;
lmsg.file = (char *) "abc123.c";
lmsg.line = 10;
fmsg.msg = (char *) "oops";
result_file = open_tmp_file(&result_file_name);
free(result_file_name);
ppack (result_file, CK_MSG_CTX, (CheckMsg *) &cmsg);
ppack (result_file, CK_MSG_LOC, (CheckMsg *) &lmsg);
ppack (result_file, CK_MSG_FAIL, (CheckMsg *) &fmsg);
rewind(result_file);
rmsg = punpack (result_file);
ck_assert_msg (rmsg != NULL,
"Return value from ppack should always be malloc'ed");
ck_assert_msg (rmsg->lastctx == CK_CTX_TEST,
"CTX not set correctly in ppack");
ck_assert_msg (rmsg->fixture_line == -1,
"Default fixture loc not correct");
ck_assert_msg (rmsg->fixture_file == NULL,
"Default fixture loc not correct");
ck_assert_msg (rmsg->test_line == 10,
"Test line not received correctly");
ck_assert_msg (strcmp(rmsg->test_file,"abc123.c") == 0,
"Test file not received correctly");
ck_assert_msg (strcmp(rmsg->msg, "oops") == 0,
"Failure message not received correctly");
free(rmsg);
fclose(result_file);
}
END_TEST
START_TEST(test_ppack_noctx)
{
FILE * result_file;
char * result_file_name = NULL;
LocMsg lmsg;
FailMsg fmsg;
RcvMsg *rmsg;
lmsg.file = (char *) "abc123.c";
lmsg.line = 10;
fmsg.msg = (char *) "oops";
result_file = open_tmp_file(&result_file_name);
free(result_file_name);
ppack (result_file, CK_MSG_LOC, (CheckMsg *) &lmsg);
ppack (result_file, CK_MSG_FAIL, (CheckMsg *) &fmsg);
rewind(result_file);
rmsg = punpack (result_file);
ck_assert_msg (rmsg == NULL,
"Result should be NULL with no CTX");
if (rmsg != NULL)
free (rmsg);
fclose(result_file);
}
END_TEST
START_TEST(test_ppack_onlyctx)
{
FILE * result_file;
char * result_file_name = NULL;
CtxMsg cmsg;
RcvMsg *rmsg;
cmsg.ctx = CK_CTX_SETUP;
result_file = open_tmp_file(&result_file_name);
free(result_file_name);
ppack (result_file, CK_MSG_CTX, (CheckMsg *) &cmsg);
rewind(result_file);
rmsg = punpack (result_file);
ck_assert_msg (rmsg != NULL && rmsg->msg == NULL,
"Result message should be NULL with only CTX");
ck_assert_msg (rmsg->fixture_line == -1,
"Result loc line should be -1 with only CTX");
ck_assert_msg (rmsg->test_line == -1,
"Result loc line should be -1 with only CTX");
if (rmsg != NULL)
free (rmsg);
fclose(result_file);
}
END_TEST
START_TEST(test_ppack_multictx)
{
FILE * result_file;
char * result_file_name = NULL;
CtxMsg cmsg;
LocMsg lmsg;
RcvMsg *rmsg;
cmsg.ctx = CK_CTX_SETUP;
lmsg.line = 5;
lmsg.file = (char *) "abc123.c";
result_file = open_tmp_file(&result_file_name);
free(result_file_name);
ppack (result_file, CK_MSG_CTX, (CheckMsg *) &cmsg);
ppack (result_file, CK_MSG_LOC, (CheckMsg *) &lmsg);
cmsg.ctx = CK_CTX_TEST;
ppack (result_file, CK_MSG_CTX, (CheckMsg *) &cmsg);
ppack (result_file, CK_MSG_LOC, (CheckMsg *) &lmsg);
cmsg.ctx = CK_CTX_TEARDOWN;
ppack (result_file, CK_MSG_CTX, (CheckMsg *) &cmsg);
rewind(result_file);
rmsg = punpack (result_file);
ck_assert_msg (rmsg != NULL && rmsg->test_line == 5,
"Test loc not being preserved on CTX change");
ck_assert_msg (rmsg->fixture_line == -1,
"Fixture not reset on CTX change");
free (rmsg);
fclose(result_file);
}
END_TEST
START_TEST(test_ppack_nofail)
{
FILE * result_file;
char * result_file_name = NULL;
CtxMsg cmsg;
LocMsg lmsg;
RcvMsg *rmsg;
lmsg.file = (char *) "abc123.c";
lmsg.line = 10;
cmsg.ctx = CK_CTX_SETUP;
result_file = open_tmp_file(&result_file_name);
free(result_file_name);
ppack (result_file, CK_MSG_CTX, (CheckMsg *) &cmsg);
ppack (result_file, CK_MSG_LOC, (CheckMsg *) &lmsg);
rewind (result_file);
rmsg = punpack (result_file);
ck_assert_msg (rmsg != NULL && rmsg->msg == NULL,
"Failure result should be NULL with no failure message");
free (rmsg);
fclose(result_file);
}
END_TEST
#define BIG_MSG_LEN 1037
START_TEST(test_ppack_big)
{
FILE * result_file;
char * result_file_name = NULL;
CtxMsg cmsg;
LocMsg lmsg;
FailMsg fmsg;
RcvMsg *rmsg;
cmsg.ctx = CK_CTX_TEST;
lmsg.file = (char *)emalloc (BIG_MSG_LEN);
memset (lmsg.file,'a',BIG_MSG_LEN - 1);
lmsg.file[BIG_MSG_LEN - 1] = '\0';
lmsg.line = 10;
fmsg.msg = (char *)emalloc (BIG_MSG_LEN);
memset (fmsg.msg, 'a', BIG_MSG_LEN - 1);
fmsg.msg[BIG_MSG_LEN - 1] = '\0';
result_file = open_tmp_file(&result_file_name);
free(result_file_name);
ppack (result_file, CK_MSG_CTX, (CheckMsg *) &cmsg);
ppack (result_file, CK_MSG_LOC, (CheckMsg *) &lmsg);
ppack (result_file, CK_MSG_FAIL, (CheckMsg *) &fmsg);
rewind (result_file);
rmsg = punpack (result_file);
ck_assert_msg (rmsg != NULL,
"Return value from ppack should always be malloc'ed");
ck_assert_msg (rmsg->lastctx == CK_CTX_TEST,
"CTX not set correctly in ppack");
ck_assert_msg (rmsg->test_line == 10,
"Test line not received correctly");
ck_assert_msg (strcmp (rmsg->test_file, lmsg.file) == 0,
"Test file not received correctly");
ck_assert_msg (strcmp (rmsg->msg, fmsg.msg) == 0,
"Failure message not received correctly");
free (rmsg);
free (lmsg.file);
free (fmsg.msg);
fclose(result_file);
}
END_TEST
#endif /* HAVE_FORK */
Suite *make_pack_suite(void)
{
Suite *s;
TCase *tc_core;
TCase *tc_limit;
s = suite_create ("Pack");
tc_core = tcase_create ("Core");
tc_limit = tcase_create ("Limit");
suite_add_tcase (s, tc_core);
tcase_add_test (tc_core, test_pack_fmsg);
tcase_add_test (tc_core, test_pack_loc);
tcase_add_test (tc_core, test_pack_ctx);
tcase_add_test (tc_core, test_pack_len);
tcase_add_test (tc_core, test_pack_abuse);
#if defined(HAVE_FORK) && HAVE_FORK==1
tcase_add_test (tc_core, test_ppack);
tcase_add_test (tc_core, test_ppack_noctx);
tcase_add_test (tc_core, test_ppack_onlyctx);
tcase_add_test (tc_core, test_ppack_multictx);
tcase_add_test (tc_core, test_ppack_nofail);
#endif /* HAVE_FORK */
suite_add_tcase (s, tc_limit);
tcase_add_test (tc_limit, test_pack_ctx_limit);
tcase_add_test (tc_limit, test_pack_fail_limit);
tcase_add_test (tc_limit, test_pack_loc_limit);
#if defined(HAVE_FORK) && HAVE_FORK==1
tcase_add_test (tc_limit, test_ppack_big);
#endif /* HAVE_FORK */
return s;
}