92 lines
2.2 KiB
C++
92 lines
2.2 KiB
C++
#include "externals.hh"
|
|
#include "opast.hh"
|
|
#include "ops.hh"
|
|
#include "opcomp.hh"
|
|
#include <ebcl/Files.hh>
|
|
#include <ebcl/SRDText.hh>
|
|
#include <ebcl/Algorithms.hh>
|
|
|
|
using namespace ebcl;
|
|
using namespace opast;
|
|
|
|
namespace {
|
|
|
|
/*============================================================================*/
|
|
|
|
|
|
void PrintStreamError(
|
|
char const* const prefix ,
|
|
T_String const& name ,
|
|
X_StreamError const& error )
|
|
{
|
|
T_StringBuilder sb;
|
|
sb << prefix << " '" << name << "': " << error.what( );
|
|
if ( error.code( ) == E_StreamError::SYSTEM_ERROR ) {
|
|
sb << " (error code " << error.systemError( ) << ")";
|
|
}
|
|
sb << '\n' << '\0';
|
|
fprintf( stderr , "%s" , sb.data( ) );
|
|
}
|
|
|
|
void WriteSRDError(
|
|
T_StringBuilder& sb ,
|
|
T_SRDError const& error )
|
|
{
|
|
sb << error.location( ) << " - " << error.error( ) << "\n";
|
|
}
|
|
|
|
|
|
/*============================================================================*/
|
|
|
|
} // namespace
|
|
|
|
int main( int argc , char** argv )
|
|
{
|
|
// Open file
|
|
const T_String inputName( argc >= 2 ? argv[ 1 ] : "demo.srd" );
|
|
T_File input( inputName , E_FileMode::READ_ONLY );
|
|
try {
|
|
input.open( );
|
|
} catch ( X_StreamError const& e ) {
|
|
PrintStreamError( "Could not open" , inputName , e );
|
|
return 1;
|
|
}
|
|
|
|
// Load SRD data
|
|
T_SRDMemoryTarget srdOut;
|
|
srdOut.clearComments( true ).clearFlushToken( true );
|
|
try {
|
|
T_SRDTextReader srdReader{ srdOut };
|
|
T_FileInputStream fis{ input };
|
|
srdReader.read( inputName , fis );
|
|
} catch ( X_StreamError const& e ) {
|
|
PrintStreamError( "Could not open" , inputName , e );
|
|
return 1;
|
|
} catch ( X_SRDErrors const& e ) {
|
|
T_StringBuilder sb;
|
|
const auto nErrors( e.errors.size( ) );
|
|
for ( auto i = 0u ; i < nErrors ; i ++ ) {
|
|
WriteSRDError( sb , e.errors[ i ] );
|
|
}
|
|
sb << "No parsing happened due to format errors\n" << '\0';
|
|
fprintf( stderr , "%s" , sb.data( ) );
|
|
return 2;
|
|
}
|
|
|
|
// Parse the fuck
|
|
T_OpsParser parser;
|
|
if ( parser.parse( srdOut.list( ) ) ) {
|
|
printf( "Parser successful. Compiling...\n" );
|
|
T_OpsCompiler compiler;
|
|
compiler.compile( *parser.result( ) );
|
|
return 0;
|
|
} else {
|
|
T_StringBuilder sb;
|
|
for ( auto const& err : parser.errors( ) ) {
|
|
WriteSRDError( sb , err );
|
|
}
|
|
sb << "Parser failed\n" << '\0';
|
|
fprintf( stderr , "%s" , sb.data( ) );
|
|
return 3;
|
|
}
|
|
}
|