int main(int argc, char *argv[])
{
gme = argv[1];
FILE *file = fopen(gme, "rb");
prepare_tests(file);
uint32_t start_game = 0;
fseek(file, 0x10, SEEK_SET);
fread(&start_game, sizeof(start_game), 1, file);
// parse_list_16(file, p_unknown_table);
// printf ("Scripts:\n");
// print_block (file, 0x200, start_game, 0, file_size);
// parse_list_16(file, p_unknown_table);
// printf("Unknown (0x%X - 0x%X) = (%d)\n", unknown_table, media_table , media_table - unknown_table);
// print_block (file, unknown_table, media_table, 0, file_size);
printf("Game (%s)\n", gme);
printf("Games (0x%X)\n--------------------------\n", start_game);
parse_games(file, start_game);
fclose(file);
}
int
ACE_TMAIN(int argc, ACE_TCHAR *argv[])
{
try
{
CORBA::ORB_var orb =
CORBA::ORB_init (argc, argv);
CORBA::Object_var poa_object =
orb->resolve_initial_references("RootPOA");
PortableServer::POA_var root_poa =
PortableServer::POA::_narrow (poa_object.in ());
if (CORBA::is_nil (root_poa.in ()))
ACE_ERROR_RETURN ((LM_ERROR,
" (%P|%t) Panic: nil RootPOA\n"),
1);
if (parse_args (argc, argv) != 0)
return 1;
Test::Hello_var hello = prepare_tests (orb.in (), root_poa.in ());
CORBA::String_var ior = orb->object_to_string (hello.in ());
// Output the IOR to the <ior_output_file>
FILE *output_file= ACE_OS::fopen (ior_output_file, "w");
if (output_file == 0)
ACE_ERROR_RETURN ((LM_ERROR,
"Cannot open output file for writing IOR: %s\n",
ior_output_file),
1);
ACE_OS::fprintf (output_file, "%s", ior.in ());
ACE_OS::fclose (output_file);
orb->run ();
ACE_DEBUG ((LM_DEBUG, "(%P|%t) server - event loop finished\n"));
root_poa->destroy (1, 1);
orb->destroy ();
}
catch (const CORBA::Exception& ex)
{
ex._tao_print_exception ("Exception caught:");
return 1;
}
return 0;
}
int
ACE_TMAIN(int argc, ACE_TCHAR *argv[])
{
int result = 0;
try
{
CORBA::ORB_var orb = CORBA::ORB_init (argc, argv);
if (parse_args (argc, argv) != 0)
return 1;
Test::Hello_var hello = prepare_tests (orb.in ());
if (CORBA::is_nil (hello.in ()))
{
ACE_ERROR_RETURN ((LM_DEBUG,
"ERROR : Nil Test::Hello reference <%C>\n",
ior),
1);
}
try
{
result += start_tests(hello.in (), orb.in ());
}
catch (const CORBA::Exception& ex)
{
ex._tao_print_exception ("Exception caught:");
++result;
}
if (test == 2)
{
ACE_DEBUG((LM_DEBUG,
ACE_TEXT("*** NOTE TestCompressor is EXPECTED to throw IDL:omg.org/Compression/CompressionException ***\n")));
}
hello->shutdown ();
orb->destroy ();
}
catch (const CORBA::Exception& ex)
{
ex._tao_print_exception ("Exception caught:");
++result;
}
return result;
}
int
check_results (CORBA::ORB_ptr orb)
{
#if defined TAO_HAS_ZIOP && TAO_HAS_ZIOP == 1
switch (test)
{
case 1:
try
{
// should throw an exception
::Compression::Compressor_var compressor (
compression_manager->get_compressor (
::Compression::COMPRESSORID_LZO,
LEAST_COMPRESSION_LEVEL ));
ACE_ERROR_RETURN ((LM_ERROR,
ACE_TEXT ("ERROR : check_results, ")
ACE_TEXT ("no exception thrown when applying for ")
ACE_TEXT ("LZO Compressor\n")),
1);
}
catch (::Compression::UnknownCompressorId)
{
ACE_DEBUG ((LM_DEBUG,
ACE_TEXT ("check_results, expected exception caught, ")
ACE_TEXT ("(unknown factory)\n")));
Test::Hello_var hello = prepare_tests (orb, false);
test = -1;
return start_tests (hello.in (), orb);
}
break;
case 4:
case -1:
{
::Compression::Compressor_var compressor (
compression_manager->get_compressor (
::Compression::COMPRESSORID_ZLIB,
LEAST_COMPRESSION_LEVEL ));
if (!CORBA::is_nil (compressor))
{
if (compressor->compressed_bytes () == 0)
ACE_ERROR_RETURN ((LM_ERROR,
ACE_TEXT ("ERROR : check_results, no compression used ")
ACE_TEXT ("during test 1a\n")),
1);
else
return 0;
}
else
{
ACE_ERROR_RETURN ((LM_ERROR,
ACE_TEXT ("ERROR : check_results, zlib compressor not found ")
ACE_TEXT ("during test 1a\n")),
1);
}
}
break;
case 2:
return 0;
break;
case 3:
{
// low value policy test. No compression should be used.
::Compression::Compressor_var compressor (
compression_manager->get_compressor (
::Compression::COMPRESSORID_ZLIB,
LEAST_COMPRESSION_LEVEL ));
if (!CORBA::is_nil (compressor))
{
if (compressor->compressed_bytes () != 0)
ACE_ERROR_RETURN ((LM_ERROR,
ACE_TEXT ("ERROR : check_results, compression used ")
ACE_TEXT ("during test %d\n"), test),
1);
else
return 0;
}
else
{
ACE_ERROR_RETURN ((LM_ERROR,
ACE_TEXT ("ERROR : check_results, zlib compressor not found ")
ACE_TEXT ("during test %d\n"), test),
1);
}
}
break;
default:
ACE_ERROR_RETURN ((LM_ERROR,
ACE_TEXT ("ERROR : check_results, unknown test ID\n")),
1);
}
ACE_ERROR_RETURN ((LM_ERROR,
ACE_TEXT ("ERROR : check_results, unexpected\n")),
1);
#else
ACE_UNUSED_ARG (orb);
return 0;
#endif
}
