static int InternalLoadAndRun(bool tryRun, string[] args)
{
if (!_isInitialized)
{
Init();
}
/*char**/ byte *pFileName = new S(args[0]);
tCLIFile * pCLIFile;
int retValue;
#if DIAG_TOTAL_TIME
ulong startTime;
#endif
#if DIAG_OPCODE_TIMES
Mem.memset(opcodeTimes, 0, sizeof(opcodeTimes));
#endif
#if DIAG_OPCODE_USE
Mem.memset(opcodeNumUses, 0, sizeof(opcodeNumUses));
#endif
pCLIFile = CLIFile.LoadAssembly(pFileName);
#if DIAG_TOTAL_TIME
startTime = microTime();
#endif
if (tryRun)
{
if (pCLIFile->entryPoint != 0)
{
retValue = CLIFile.Execute(pCLIFile, args);
}
else
{
Sys.printf("File %s has no entry point, skipping execution\n", (PTR)pFileName);
retValue = 0;
}
}
else
{
retValue = 0;
}
#if DIAG_TOTAL_TIME
printf("Total execution time = %d ms\n", (int)((microTime() - startTime) / 1000));
#endif
#if DIAG_GC
printf("Total GC time = %d ms\n", (int)(Heap.gcTotalTime / 1000));
#endif
#if DIAG_METHOD_CALLS
{
uint numMethods, i;
int howMany = 25;
tMetaData *pCorLib;
// Report on most-used methods
pCorLib = CLIFile_GetMetaDataForAssembly("mscorlib");
numMethods = pCorLib->tables.numRows[MetaDataTable.MD_TABLE_METHODDEF];
printf("\nCorLib method usage:\n");
for (; howMany > 0; howMany--)
{
tMD_MethodDef *pMethod;
uint maxCount = 0, maxIndex = 0;
for (i = 1; i <= numMethods; i++)
{
pMethod = (tMD_MethodDef *)MetaData.GetTableRow(pCorLib, MetaData.MAKE_TABLE_INDEX(MetaDataTable.MD_TABLE_METHODDEF, i));
if (pMethod->callCount > maxCount)
{
maxCount = pMethod->callCount;
maxIndex = i;
}
}
pMethod = (tMD_MethodDef *)MetaData.GetTableRow(pCorLib, MetaData.MAKE_TABLE_INDEX(MetaDataTable.MD_TABLE_METHODDEF, maxIndex));
printf("%d: %s (%d)\n", (int)pMethod->callCount, Sys_GetMethodDesc(pMethod), (int)(pMethod->totalTime / 1000));
pMethod->callCount = 0;
}
printf("\n");
}
{
uint numMethods, i;
int howMany = 25;
tMetaData *pCorLib;
// Report on most-used methods
pCorLib = CLIFile_GetMetaDataForAssembly("mscorlib");
numMethods = pCorLib->tables.numRows[MetaDataTable.MD_TABLE_METHODDEF];
printf("\nCorLib method execution time:\n");
for (; howMany > 0; howMany--)
{
tMD_MethodDef *pMethod;
ulong maxTime = 0;
uint maxIndex = 0;
for (i = 1; i <= numMethods; i++)
{
pMethod = (tMD_MethodDef *)MetaData.GetTableRow(pCorLib, MetaData.MAKE_TABLE_INDEX(MetaDataTable.MD_TABLE_METHODDEF, i));
if (pMethod->totalTime > maxTime)
{
maxTime = pMethod->totalTime;
maxIndex = i;
}
}
pMethod = (tMD_MethodDef *)MetaData.GetTableRow(pCorLib, MetaData.MAKE_TABLE_INDEX(MetaDataTable.MD_TABLE_METHODDEF, maxIndex));
printf("%d: %s (%d)\n", (int)pMethod->callCount, Sys_GetMethodDesc(pMethod), (int)(pMethod->totalTime / 1000));
pMethod->totalTime = 0;
}
printf("\n");
}
#endif
#if DIAG_OPCODE_TIMES
{
int howMany = 25;
uint i;
printf("\nOpCodes execution time:\n");
for (; howMany > 0; howMany--)
{
ulong maxTime = 0;
uint maxIndex = 0;
for (i = 0; i < JitOps.JIT_OPCODE_MAXNUM; i++)
{
if (opcodeTimes[i] > maxTime)
{
maxTime = opcodeTimes[i];
maxIndex = i;
}
}
printf("0x%03x: %dms (used %d times) (ave = %d)\n",
maxIndex, (int)(maxTime / 1000), (int)opcodeNumUses[maxIndex], (int)(maxTime / opcodeNumUses[maxIndex]));
opcodeTimes[maxIndex] = 0;
}
}
#endif
#if DIAG_OPCODE_USE
{
int howMany = 25;
uint i, j;
printf("\nOpcode use:\n");
for (j = 1; howMany > 0; howMany--, j++)
{
uint maxUse = 0;
uint maxIndex = 0;
for (i = 0; i < JitOps.JIT_OPCODE_MAXNUM; i++)
{
if (opcodeNumUses[i] > maxUse)
{
maxUse = opcodeNumUses[i];
maxIndex = i;
}
}
printf("%02d 0x%03x: %d\n", j, maxIndex, maxUse);
opcodeNumUses[maxIndex] = 0;
}
}
#endif
//Sys.Crash("FINISHED!!!");
return(retValue);
}
