/*

* Copyright (c) 1997-2007 Nokia Corporation and/or its subsidiary(-ies).

* All rights reserved.

* This component and the accompanying materials are made available

* under the terms of "Eclipse Public License v1.0"

* which accompanies this distribution, and is available

* at the URL "http://www.eclipse.org/legal/epl-v10.html".

*

* Initial Contributors:

* Nokia Corporation - initial contribution.

*

* Contributors:

*

* Description:

*

*/

#include <stdlib.h>

#include <stdio.h>

#include <string.h>

#include "CTEST.H"

#define TELLME "Tell Me The Answer"

test_Data;

/**

@SYMTestCaseID          SYSLIB-STDLIB-CT-1081

@SYMTestCaseDesc	    Tests for multibyte to wide character conversions

@SYMTestPriority 	    High

@SYMTestActions  	    Tests for conversions from multibyte to wide character and wide character to multibyte

@SYMTestExpectedResults Test must not fail

@SYMREQ                 REQ0000

*/		

int main()

{

    int      i,x;

    char    *pmbc    = (char *)malloc(MB_CUR_MAX);

    wchar_t  wc      = L'a';

    wchar_t *pwcnull = NULL;

    wchar_t *pwc     = (wchar_t *)malloc( sizeof( wchar_t ) );

	char * narrowstring = (char*)malloc(50);

	wchar_t * pwcstring = (wchar_t *)malloc(sizeof(wchar_t)*50);

	wchar_t greek[] = {0x03a3, 0x03bf, 0x03bc, 0x03b4, 0x03b5, 0x0345, 0x03a9, 0x0392, 0x0395, 0x03a1, 0};

	test_Title("Wide/Multibyte character conversions.");

	test_Next("Convert a NULL wide character to multibyte character");

    i = wctomb( pmbc, L'\0');

    test(1==i);

    test(*pmbc=='\0');

	test_Next("Convert a wide character to multibyte character:");

    i = wctomb(pmbc, wc);

    test(i==1);

    test(*pmbc=='a');

    test_Next("Convert multibyte character back to a wide character");

    i = mbtowc(pwc, pmbc, 20);

    test(i==1);

    test(*pwc==L'a');

    //check this

	test_Next("Attempt to convert when target is NULL");

    i = mbtowc(pwcnull, pmbc, MB_CUR_MAX);

    test(i==1);

    test_Next( "Attempt to convert a NULL pointer to a wide character");

    pmbc = NULL;

    i = mbtowc( pwc, pmbc, MB_CUR_MAX );

    test(i==0);

	test_Next("Convert narrow string to unicode");

	strcpy(narrowstring, TELLME);

	i = mbstowcs(pwcstring, narrowstring, 50);

	test(i==(int)strlen(TELLME));		//should be same

	test_Next("Convert unicode string back to UTF8");

	i = wcstombs(narrowstring, pwcstring, 50);

	test(i==(int)strlen(TELLME));		//should be same

	test(strcmp(narrowstring, TELLME) == 0);	

	test_Next("Get length of dest string");

	i = wcstombs(NULL, pwcstring, 50);

//	test(i==strlen(TELLME));		//should be same

//	test(strcmp(narrowstring, TELLME) == 0);	

	test_Next("Convert first 10 wide characters");

	strcpy(narrowstring,"XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX");

	i = wcstombs(narrowstring, pwcstring, 10);

	test(i==10);

	test(memcmp(narrowstring,TELLME,10)==0);

	test_Next("Convert greek characters to unicode and back");

	i = wcstombs(narrowstring, &greek[0], 50);

	x = i;

	i = mbstowcs(pwcstring, narrowstring, 50);

	test(2*i==x);

	test(0==memcmp(pwcstring, greek, sizeof(greek)));

	test_Next("onto mblen");

	i = mblen("abc",3);

	test(i==1);

	test_Next("length of a greek character");

	i = mblen(narrowstring,6);

	test (i==2);

	test_Next("test an empty string");

	i = mblen("",2);

	test(i==0);

	test_Next("test a null pointer");

	i = mblen(NULL,2);

	test(i==0);

	test_Next("test a failure");

	i = mblen(narrowstring,1);

	test(i==-1);

	free(pmbc);

	free(pwc);

	free(pwcstring);

	free(narrowstring);

	test_Close();

}