jsox_parser.c

#include "jsox.h"

int level = 0;

void DumpMessage( PDATALIST pdl ) {
	struct jsox_value_container *val;
	INDEX idx;
	int leader;
	level++;
	DATA_FORALL( pdl, idx, struct jsox_value_container *, val ) {
		if( idx ) 
			printf( ",\n" );
		for( leader = 3; leader < level*3; leader++ ) {
			putc( ' ', stdout );
		}

		if( val->name ) printf( "%s:", val->name );
		if( val->value_type >= JSOX_VALUE_TYPED_ARRAY && val->value_type <= JSOX_VALUE_TYPED_ARRAY_MAX ) {
			printf( "%s(%d)[%s]\n", val->className, val->value_type, val->string );
			
		}

		else switch( val->value_type ) {
		case JSOX_VALUE_OBJECT:
			if( val->className ) printf( "%s", val->className );
			printf( "{ \n" );
			DumpMessage( val->contains );
			printf( " }" );
			break;
		case JSOX_VALUE_ARRAY:
			printf( "[ " );
			DumpMessage( val->contains );
			printf( " ]" );
			break;
		case JSOX_VALUE_STRING:
			printf( "\"%s\"", val->string );
			break;
		case JSOX_VALUE_DATE:
			printf( "%s", val->string );
			break;				
		case JSOX_VALUE_NUMBER:
			if( val->float_result )
				printf( "%g", val->result_d );
			else
				printf( "%d", val->result_n );
			break;
		case JSOX_VALUE_BIGINT:
			printf( "%sn", val->string );
			break;
		case JSOX_VALUE_NAN:
			printf( "NaN" );
			break;
		case JSOX_VALUE_INFINITY:
			printf( "Infinity" );
			break;
		case JSOX_VALUE_NEG_INFINITY:
			printf( "-Infinity" );
			break;
		case JSOX_VALUE_TRUE:
			printf( "true" );
			break;
		case JSOX_VALUE_FALSE:
			printf( "false" );
			break;
		case JSOX_VALUE_NULL:
			printf( "null" );
			break;
		case JSOX_VALUE_EMPTY:
			// array element that is ',,' 
			printf( "<EMPTY>" );
			break;
		case JSOX_VALUE_UNDEFINED:
			printf( "undefined" );
			break;
		default :
			printf( "\nunhandled value type: %d [%s]\n", val->value_type, val->string );
		}
	}
	level--;
	if( !level ) printf( "\n" );
}

void parse( char *fileName ) {
	PDATALIST pdl;
	FILE *file;
	size_t size;
	char *data;
	int r;
	struct jsox_parse_state *parser;
	file = fopen( fileName, "rb" );
	fseek( file, 0, SEEK_END );
	size = ftell( file );
	fseek( file, 0, SEEK_SET );
	data = (char*)malloc( size );
	fread( data, 1, size, file );
	fclose( file );
	parser = jsox_begin_parse();
	do {
		//r = jsox_parse_message( data, size, &pdl );
		//if( r > 0 ) {
		//	DumpMessage( pdl );
		//	jsox_dispose_message( &pdl );
		//} 
		//else if( r <= 0 )
		//	printf( "Error:%s", GetText( jsox_parse_get_error( NULL ) ) );

		r = jsox_parse_add_data( parser, data, size );
		free( data );
		data = NULL;
		size = 0;

		if( r >= 0 ) {
			pdl = jsox_parse_get_data( parser );
			DumpMessage( pdl );
			jsox_dispose_message( &pdl );
		}
		else if( r < 0 )
			printf( "Error:%s", GetText( jsox_parse_get_error( NULL ) ) );
	} while( r > 0 );
}

int main( int argc, char **argv) {
	int n;
	for( n = 1; n < argc; n++ ) {
		parse( argv[n] );
	}
}