1  /*
       2    WCSSTR: wchar_t *wcsstr (const wchar_t *ws1, const wchar_t *ws2);
       3  */
       4  
       5  #define TST_FUNCTION wcsstr
       6  
       7  #include "tsp_common.c"
       8  #include "dat_wcsstr.c"
       9  
      10  int
      11  tst_wcsstr (FILE * fp, int debug_flg)
      12  {
      13    TST_DECL_VARS (wchar_t *);
      14    wchar_t *ws1, *ws2;
      15    int err, i;
      16  
      17    TST_DO_TEST (wcsstr)
      18    {
      19      TST_HEAD_LOCALE (wcsstr, S_WCSSTR);
      20      TST_DO_REC (wcsstr)
      21      {
      22        TST_GET_ERRET (wcsstr);
      23        ws1 = TST_INPUT (wcsstr).ws1;
      24        ws2 = TST_INPUT (wcsstr).ws2;	/* external value: size WCSSIZE */
      25        ret = wcsstr (ws1, ws2);
      26  
      27        if (debug_flg)
      28  	{
      29  	  fprintf (stderr, "wcsstr: %d : ret = %s\n", rec + 1,
      30  		   (ret == NULL) ? "null" : "not null");
      31  	  if (ret)
      32  	    {
      33  	      fprintf (stderr,
      34  		       "	ret[ 0 ] = 0x%lx <-> 0x%lx = ws2[ 0 ]\n",
      35  		       (unsigned long int) ret[0], (unsigned long int) ws2[0]);
      36  	    }
      37  	}
      38  
      39        TST_IF_RETURN (S_WCSSTR)
      40        {
      41  	if (ws2[0] == 0)
      42  	  {
      43  	    if (ret == ws1)
      44  	      {
      45  		Result (C_SUCCESS, S_WCSSTR, CASE_3, MS_PASSED);
      46  	      }
      47  	    else
      48  	      {
      49  		err_count++;
      50  		Result (C_FAILURE, S_WCSSTR, CASE_3,
      51  			"return address is not same address as ws1");
      52  	      }
      53  
      54  	    continue;
      55  	  }
      56  
      57  	for (i = 0, err = 0; *(ws2 + i) != 0 && i < WCSSIZE; i++)
      58  	  {
      59  	    if (debug_flg)
      60  	      {
      61  		fprintf (stderr,
      62  			 "	: ret[ %d ] = 0x%lx <-> 0x%lx = ws2[ %d ]\n",
      63  			 i, (unsigned long int) ret[i],
      64  			 (unsigned long int) ws2[i], i);
      65  	      }
      66  
      67  	    if (ret[i] != ws2[i])
      68  	      {
      69  		err++;
      70  		err_count++;
      71  		Result (C_FAILURE, S_WCSSTR, CASE_4, "pointed sub-string is "
      72  			"different from an expected sub-string");
      73  		break;
      74  	      }
      75  	  }
      76  
      77  	if (!err)
      78  	  {
      79  	    Result (C_SUCCESS, S_WCSSTR, CASE_4, MS_PASSED);
      80  	  }
      81        }
      82      }
      83    }
      84  
      85    return err_count;
      86  }