Использование System.Reflection.Emit.ILGenerator для вызова Random в VB.Net? - PullRequest
Новая
       66

Использование System.Reflection.Emit.ILGenerator для вызова Random в VB.Net?

3 голосов
/ 11 июня 2011

Я генерирую вывод для исполняемого файла .Net с моего собственного языка ... код операции (называемый «Случайный»), который переводится с моего языка, должен создать случайное число в пределах определенного диапазона.

Цель моего кода - создать случайное число с помощью класса System.Reflection.Emit.ILGenerator ... чтобы понять, как выглядит код CIL. Я создал некоторый код vb.net: 

Sub Main()
    Dim A As Random

    A = New Random

    Console.WriteLine(A.Next(100))
End Sub

Какой ILDASM сообщает как: 

.method public static void  Main() cil managed
{
  .entrypoint
  .custom instance void [mscorlib]System.STAThreadAttribute::.ctor() = ( 01 00 00 00 ) 
  // Code size       23 (0x17)
  .maxstack  2
  .locals init ([0] class [mscorlib]System.Random A)
  IL_0000:  nop
  IL_0001:  newobj     instance void [mscorlib]System.Random::.ctor()
  IL_0006:  stloc.0
  IL_0007:  ldloc.0
  IL_0008:  ldc.i4.s   100
  IL_000a:  callvirt   instance int32 [mscorlib]System.Random::Next(int32)
  IL_000f:  call       void [mscorlib]System.Console::WriteLine(int32)
  IL_0014:  nop
  IL_0015:  nop
  IL_0016:  ret
} // end of method Main::Main

Я могу воспроизвести все, используя метод ILGenerator.Emit; за исключением строки IL_0001 ("экземпляр newobj void [mscorlib] System.Random ::. ctor ()") ...

Надеюсь, я никого не перегружал слишком большим количеством информации. Но я полагаю, что лучше быть многословным при описании проблемы, которая кажется мне сложной.

Наконец-то у меня есть код, который я создал до сих пор: 

 Sub EmitRandom()
    Dim NewRandom As New Random
    Dim stringtype As Type = GetType(System.Random)

    Dim paramtypes() As Type = {GetType(Integer)}, blankparams() As Type = {}
    'Dim RandomMethod = stringtype.GetMethod("New", paramtypes)

    m_ILGen.Emit(OpCodes.Newobj, New Random().GetType)

    EmitStoreInLocal(tempVariableRnd)
    EmitLoadLocal(tempVariableRnd)

    m_ILGen.Emit(OpCodes.Callvirt, stringtype.GetMethod("Next", paramtypes))
End Sub

Который выдает следующий код: 

.
.
.
IL_0073:  newobj     [mscorlib]System.Random
IL_0078:  stloc.2
IL_0079:  ldloc.2
IL_007a:  callvirt   instance int32 [mscorlib]System.Random::Next(int32)
.
.
.

Вещи, которые я уже пробовал :

  • Придумать способ указать IL_Gen.Emit (OpCodes.NewObj, ... ctor ()) ... не могу понять, как.

  • Придумать способ указать на New () - поскольку, похоже, это то, чем является .ctor () ... New нельзя использовать как инициализатор.

  • Просто отключив функцию Random, пока я не смогу придумать лучший способ излучения.

Проблема кажется мне сложной, но я знаю, что есть кто-то, кто понимает генерацию кода и MSIL легче, чем я, и кто готов указать на ответ.

Спасибо за ваше время,

1041 * Доминика *

1 Ответ

2 голосов
/ 11 июня 2011

Вам необходимо использовать ConstructorInfo: 

 m_ILGen.Emit(OpCodes.Newobj, GetType(Random).GetConstructor(Type.EmptyTypes))

Также - хранение и загрузка с локального компьютера не нужны. Вы действительно просто хотите получить эквивалент новой функции Random (). Next (100), верно? ... в этом случае сохранение и загрузка из локального хранилища никогда не происходит.

...