| /* |
| WCSNCAT: wchar_t *wcsncat (wchar_t *ws1, const wchar_t *ws2, size_t n); |
| */ |
| |
| #define TST_FUNCTION wcsncat |
| |
| #include "tsp_common.c" |
| #include "dat_wcsncat.c" |
| |
| int |
| tst_wcsncat (FILE * fp, int debug_flg) |
| { |
| TST_DECL_VARS (wchar_t *); |
| wchar_t *ws1, *ws2, *ws_ex; |
| int n, i, err; |
| |
| TST_DO_TEST (wcsncat) |
| { |
| TST_HEAD_LOCALE (wcsncat, S_WCSNCAT); |
| TST_DO_REC (wcsncat) |
| { |
| TST_GET_ERRET (wcsncat); |
| ws1 = TST_INPUT (wcsncat).ws1; /* external value: size WCSSIZE */ |
| ws2 = TST_INPUT (wcsncat).ws2; |
| n = TST_INPUT (wcsncat).n; |
| ret = wcsncat (ws1, ws2, n); |
| |
| TST_IF_RETURN (S_WCSNCAT) |
| { |
| if (ret == ws1) |
| { |
| Result (C_SUCCESS, S_WCSNCAT, CASE_3, MS_PASSED); |
| } |
| else |
| { |
| err_count++; |
| Result (C_FAILURE, S_WCSNCAT, CASE_3, |
| "the return address may not be correct"); |
| } |
| } |
| |
| if (ret == ws1) |
| { |
| ws_ex = TST_EXPECT (wcsncat).ws; |
| |
| for (err = 0, i = 0; |
| (ws1[i] != 0L || ws_ex[i] != 0L) && i < WCSSIZE; i++) |
| { |
| if (debug_flg) |
| { |
| fprintf (stderr, "ws1[%d] = 0x%lx\n", i, |
| (unsigned long int) ws1[i]); |
| } |
| |
| if (ws1[i] != ws_ex[i]) |
| { |
| err++; |
| err_count++; |
| Result (C_FAILURE, S_WCSNCAT, CASE_4, |
| "the concatinated string has " |
| "different value from an expected string"); |
| break; |
| } |
| } |
| |
| if (!err) |
| { |
| Result (C_SUCCESS, S_WCSNCAT, CASE_4, MS_PASSED); |
| } |
| } |
| } |
| } |
| |
| return err_count; |
| } |