/*
* 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();
}