#define __STDC_FORMAT_MACROS
#include <inttypes.h>
#include <stdio.h>
#include <string.h>
#include <string>
#include <iostream>
#include <yaml-cpp/yaml.h>

#include <cpsw_api_builder.h>
#include <cpsw_obj_cnt.h>

using std::string;

class TestFailed {
public:
	string msg_;
	TestFailed(const char *msg):msg_(msg){}
};


#define SZ 128

int
main(int argc, char **argv)
{
int opt;
const char *use_yaml = 0;
const char *dmp_yaml = 0;
const char *dmp_conf = 0;
const char * ld_conf = 0;

	while ( (opt = getopt(argc, argv, "y:Y:C:L:")) > 0 ) {
		switch (opt) {
			case 'Y': use_yaml = optarg; break;
			case 'y': dmp_yaml = optarg; break;
			case 'C': dmp_conf = optarg; break;
			case 'L':  ld_conf = optarg; break;
		}
	}
try {

{
	Hub root;

	if ( use_yaml ) {
		root = IHub::loadYamlFile( use_yaml, "root" );
	} else {
		MemDev  memio = IMemDev::create("mem", SZ);
		MMIODev mmio  = IMMIODev::create("mmio", SZ, LE);

		memio->addAtAddress( mmio );

		IIntField::Builder b = IIntField::IBuilder::create();

		b->sizeBits(4);
		b->setEnum( enumBool );

		mmio->addAtAddress( b->build("bool"), 0 );

		Enum menu = IMutableEnum::create(NULL, "apples" , 2, "oranges", 0, "kiwi",    3, "mango",  13, NULL);

		b->setEnum( menu );

		menu.reset();

		mmio->addAtAddress( b->build("menu"), 0 );

		root = memio;
	}

	ScalVal boolVal = IScalVal::create( root->findByName("mmio/bool") );
	ScalVal menuVal = IScalVal::create( root->findByName("mmio/menu") );

	menuVal->setVal( 13 );

	CString  str;
	uint32_t u32;

	menuVal->getVal( &str );

	if ( ::strcmp(str->c_str(), "mango" ) ) {
		throw TestFailed("reading initial value of 'mango'");
	}


	boolVal->getVal( &str );
	if ( ::strcmp(str->c_str(), "True" ) ) {
		throw TestFailed("reading initial value of 'mango' (as bool)");
	}

	IEnum::iterator itbeg = menuVal->getEnum()->begin();
	IEnum::iterator itend = menuVal->getEnum()->end();
	IEnum::iterator it;

	unsigned nitems = 0;

	// try string->num
	for ( it=itbeg; it != itend; ++it ) {
		const char *nm = (*it).first->c_str();
		menuVal->setVal( &nm );
		menuVal->getVal( &u32 );
		if ( u32 != (*it).second ) {
			throw TestFailed("Readback of menu val (string->num) failed");
		}
		boolVal->getVal( &str );
		if ( strcmp( str->c_str(), u32 ? "True" : "False" ) ) {
			throw TestFailed("Boolean Readback (string->num) Failed");
		}
		nitems++;
	}


	// try num->string
	for ( it=itbeg; it != itend; ++it ) {
		const char *nm = (*it).first->c_str();
		uint64_t    vl = (*it).second;
		menuVal->setVal( vl );
		menuVal->getVal( &str );
		if ( ::strcmp( str->c_str(), nm ) ) {
			throw TestFailed("Readback of menu val (num->string) failed");
		}
		boolVal->getVal( &str );
		if ( strcmp( str->c_str(), vl ? "True" : "False" ) ) {
			throw TestFailed("Boolean Readback (num->string) Failed");
		}
		nitems++;
	}


	boolVal->setVal("True");
	try {

		menuVal->getVal( &str );

		throw TestFailed("Conversion should have failed");

	} catch (ConversionError e) {
		// expected
	}

	// reset to a value that is OK for menu + bool so that
	// config dump succeeds
	boolVal->setVal("False");

	if ( nitems != 8 || nitems != 2*menuVal->getEnum()->getNelms() ) {
		throw TestFailed("Unexpected number of enum entries");
	}

	if ( dmp_yaml ) {
		IYamlSupport::dumpYamlFile( root, dmp_yaml, "root" );
	}

	if ( ld_conf ) {
		YAML::Node n( YAML::LoadFile( ld_conf ) );
		IPath::create( root )->loadConfigFromYaml( n );
	}

	if ( dmp_conf ) {
		YAML::Node n;
		if ( 0 != strlen( dmp_conf ) ) {
			n = YAML::LoadFile( dmp_conf );
		}
		IPath::create( root )->dumpConfigToYaml( n );
		YAML::Emitter e; e << n;

		std::cout << e.c_str() << "\n";
		
	}

}

	if ( CpswObjCounter::report() ) {
		throw TestFailed("Unexpected object count (LEAK)\n");
	}

} catch (CPSWError err) {
	fprintf(stderr,"Test '%s' FAILED: CPSW Error: %s\n", argv[0], err.getInfo().c_str());
	return 1;
} catch (TestFailed err) {
	fprintf(stderr,"Test '%s' FAILED: %s\n", argv[0], err.msg_.c_str());
	return 1;
}

	fprintf(stderr,"Test '%s' PASSED\n", argv[0]);

	return 0;
}