summary refs log tree commit diff
path: root/localedata/tests-mbwc/tst_wcscat.c
blob: 3dc98091c23e60bb99409aa05f65358f8e735018 (plain) (blame)
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
/*
  WCSCAT: wchar_t *wcscat (wchar_t *ws1, const wchar_t *ws2);
*/

#define TST_FUNCTION wcscat

#include "tsp_common.c"
#include "dat_wcscat.c"

int
tst_wcscat (FILE * fp, int debug_flg)
{
  TST_DECL_VARS (wchar_t *);
  wchar_t *ws1, *ws2, *ws_ex;
  int i, err;

  TST_DO_TEST (wcscat)
  {
    TST_HEAD_LOCALE (wcscat, S_WCSCAT);
    TST_DO_REC (wcscat)
    {
      TST_GET_ERRET (wcscat);
      ws1 = TST_INPUT (wcscat).ws1;	/* external value: size WCSSIZE */
      ws2 = TST_INPUT (wcscat).ws2;

      TST_CLEAR_ERRNO;
      ret = wcscat (ws1, ws2);
      TST_SAVE_ERRNO;

      TST_IF_RETURN (S_WCSCAT)
      {
	if (ret == ws1)
	  {
	    Result (C_SUCCESS, S_WCSCAT, CASE_3, MS_PASSED);
	  }
	else
	  {
	    err_count++;
	    Result (C_FAILURE, S_WCSCAT, CASE_3,
		    "the return address may not be correct");
	  }
      }

      /* function specific test cases here */

      if (ret == ws1)
	{
	  ws_ex = TST_EXPECT (wcscat).ws;
	  for (err = 0, i = 0;
	       (ws1[i] != 0L || ws_ex[i] != 0L) && i < WCSSIZE; i++)
	    {
	      if (debug_flg)
		{
		  fprintf (stdout, "tst_wcscat() : ws1[%d] = 0x%lx\n", i,
			   (unsigned long int) ws1[i]);
		}

	      if (ws1[i] != ws_ex[i])
		{
		  err++;
		  err_count++;
		  Result (C_FAILURE, S_WCSCAT, CASE_4,
			  "concatinated string is different from an "
			  "expected string");
		  break;
		}
	    }

	  if (!err)
	    {
	      Result (C_SUCCESS, S_WCSCAT, CASE_4, MS_PASSED);
	    }
	}
    }
  }

  return err_count;
}