/*
* Copyright (c) 2006 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:  ?Description
*
*/


#undef G_DISABLE_ASSERT
#undef G_LOG_DOMAIN


#include <stdio.h>
#include <string.h>
#include <glib.h>
#include <fcntl.h>
#include <goption.h>

#ifdef SYMBIAN
#include "mrt2_glib2_test.h"
#endif /*SYMBIAN*/

#define	C2P(c)		((gpointer) ((long) (c)))
#define GINT_TO_POINTER(i)	((gpointer)  (i))
#define GPOINTER_TO_INT(p)	((gint)   (p))
#define TESTPASS	1
#define TESTFAIL	0

//Support for scanner
void hash_func(gpointer key,gpointer value,gpointer user_data)
{
	
}

void err_func(GScanner* scanner,gchar* message, gboolean error)
{
	char s[] = "unexpected string constant \"efgh\", expected number (float) - error";
	g_assert(!strcmp(s,message));
	
}

//Test for scanner
void tg_scanner_tests()
{
	GScanner *scanner;
	int i,j,fd;
	const gint TOKEN_OPEN = G_TOKEN_LEFT_BRACE;
	const gint TOKEN_CLOSE = G_TOKEN_RIGHT_BRACE;
	const gint TOKEN_INT = G_TOKEN_INT;
	const gint TOKEN_CH = G_TOKEN_STRING;
	
	gint cur_pos,err;
	GTokenValue val;
	GTokenType token;
	gchar* g_scanner_cur_value_str;
	gpointer op;
	char* g_scanner_peek_next_token_str;
	gchar ip_text[]="(30)";
	
	err = TRUE;
	scanner = g_scanner_new(NULL);
	fd = g_open ("c:\scanfile.txt", O_RDONLY, 0);
	g_scanner_input_file (scanner, fd);
	scanner->config->symbol_2_token = TRUE;
	scanner->msg_handler = err_func;
	
	g_scanner_scope_add_symbol(scanner,0,"leftbrace",GUINT_TO_POINTER (TOKEN_OPEN));
	g_scanner_scope_add_symbol(scanner,0,"rightbrace",GUINT_TO_POINTER (TOKEN_CLOSE));
	g_scanner_scope_add_symbol(scanner,0,"intval",GUINT_TO_POINTER (TOKEN_INT));
	g_scanner_scope_add_symbol(scanner,0,"strval",GUINT_TO_POINTER (TOKEN_CH));

	for(i=0;i<10;i++)
	{
	token = g_scanner_get_next_token (scanner);
	cur_pos = g_scanner_cur_position (scanner);
	}
	
	//Tests begin here:
	
	g_assert(g_scanner_cur_line(scanner) == 2);  //g_scanner_cur_line test
	g_assert(g_scanner_cur_position(scanner) == 11);	//g_scanner_cur_position test
	g_assert(g_scanner_cur_token (scanner) == G_TOKEN_STRING); //g_scanner_cur_token test
	val = g_scanner_cur_value (scanner); //g_scanner_cur_value test
	g_scanner_cur_value_str = val.v_string;
	g_assert(!strcmp(g_scanner_cur_value_str,"efgh"));
	g_assert(g_scanner_peek_next_token(scanner) == G_TOKEN_LEFT_BRACE);	//g_scanner_peek_next_token test
	g_assert(g_scanner_scope_lookup_symbol(scanner,0,"intval") == GUINT_TO_POINTER (TOKEN_INT));	//g_scanner_scope_lookup_symbol test
	g_assert(g_scanner_lookup_symbol(scanner,"intval") == GUINT_TO_POINTER (TOKEN_INT));	//g_scanner_lookup_symbol test
	g_assert(g_scanner_set_scope(scanner,14) == 0);	//g_scanner_set_scope..set to 14
	
	g_scanner_scope_remove_symbol(scanner,14,"leftbrace");
	g_assert(g_scanner_lookup_symbol(scanner,"leftbrace") == NULL);	//g_scanner_scope_remove_symbol test
	
	g_scanner_scope_foreach_symbol(scanner,14,hash_func,GUINT_TO_POINTER(G_TOKEN_LEFT_PAREN));
	g_assert(g_scanner_lookup_symbol(scanner,"intval") == NULL);	//g_scanner_scope_foreach_symbol test
	
	
	g_scanner_unexp_token(scanner,G_TOKEN_FLOAT,NULL,NULL,"float","error",err);
	
	//Test for g_scanner_input_text
	g_scanner_set_scope(scanner,0);
	g_scanner_input_text(scanner,ip_text,strlen(ip_text));
	for(i=0;i<3;i++)
	{
	token = g_scanner_get_next_token (scanner);
	}
	g_assert(g_scanner_cur_token (scanner) == G_TOKEN_RIGHT_PAREN); //g_scanner_input_text test
	
	close(fd);
	g_scanner_destroy (scanner);
	
}



int main (int argc,char *argv[])
{

	#ifdef SYMBIAN
 
 	g_log_set_handler (NULL,  G_LOG_FLAG_FATAL| G_LOG_FLAG_RECURSION | G_LOG_LEVEL_CRITICAL | G_LOG_LEVEL_WARNING | G_LOG_LEVEL_MESSAGE | G_LOG_LEVEL_INFO |  G_LOG_LEVEL_DEBUG, &mrtLogHandler, NULL);
 	#endif /*SYMBIAN*/
 	
 	tg_scanner_tests();
 #ifdef SYMBIAN
  testResultXml("tscanner");
#endif /* EMULATOR */
 	return 0;
}