ILIntepreter.cs 309 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411241224132414241524162417241824192420242124222423242424252426242724282429243024312432243324342435243624372438243924402441244224432444244524462447244824492450245124522453245424552456245724582459246024612462246324642465246624672468246924702471247224732474247524762477247824792480248124822483248424852486248724882489249024912492249324942495249624972498249925002501250225032504250525062507250825092510251125122513251425152516251725182519252025212522252325242525252625272528252925302531253225332534253525362537253825392540254125422543254425452546254725482549255025512552255325542555255625572558255925602561256225632564256525662567256825692570257125722573257425752576257725782579258025812582258325842585258625872588258925902591259225932594259525962597259825992600260126022603260426052606260726082609261026112612261326142615261626172618261926202621262226232624262526262627262826292630263126322633263426352636263726382639264026412642264326442645264626472648264926502651265226532654265526562657265826592660266126622663266426652666266726682669267026712672267326742675267626772678267926802681268226832684268526862687268826892690269126922693269426952696269726982699270027012702270327042705270627072708270927102711271227132714271527162717271827192720272127222723272427252726272727282729273027312732273327342735273627372738273927402741274227432744274527462747274827492750275127522753275427552756275727582759276027612762276327642765276627672768276927702771277227732774277527762777277827792780278127822783278427852786278727882789279027912792279327942795279627972798279928002801280228032804280528062807280828092810281128122813281428152816281728182819282028212822282328242825282628272828282928302831283228332834283528362837283828392840284128422843284428452846284728482849285028512852285328542855285628572858285928602861286228632864286528662867286828692870287128722873287428752876287728782879288028812882288328842885288628872888288928902891289228932894289528962897289828992900290129022903290429052906290729082909291029112912291329142915291629172918291929202921292229232924292529262927292829292930293129322933293429352936293729382939294029412942294329442945294629472948294929502951295229532954295529562957295829592960296129622963296429652966296729682969297029712972297329742975297629772978297929802981298229832984298529862987298829892990299129922993299429952996299729982999300030013002300330043005300630073008300930103011301230133014301530163017301830193020302130223023302430253026302730283029303030313032303330343035303630373038303930403041304230433044304530463047304830493050305130523053305430553056305730583059306030613062306330643065306630673068306930703071307230733074307530763077307830793080308130823083308430853086308730883089309030913092309330943095309630973098309931003101310231033104310531063107310831093110311131123113311431153116311731183119312031213122312331243125312631273128312931303131313231333134313531363137313831393140314131423143314431453146314731483149315031513152315331543155315631573158315931603161316231633164316531663167316831693170317131723173317431753176317731783179318031813182318331843185318631873188318931903191319231933194319531963197319831993200320132023203320432053206320732083209321032113212321332143215321632173218321932203221322232233224322532263227322832293230323132323233323432353236323732383239324032413242324332443245324632473248324932503251325232533254325532563257325832593260326132623263326432653266326732683269327032713272327332743275327632773278327932803281328232833284328532863287328832893290329132923293329432953296329732983299330033013302330333043305330633073308330933103311331233133314331533163317331833193320332133223323332433253326332733283329333033313332333333343335333633373338333933403341334233433344334533463347334833493350335133523353335433553356335733583359336033613362336333643365336633673368336933703371337233733374337533763377337833793380338133823383338433853386338733883389339033913392339333943395339633973398339934003401340234033404340534063407340834093410341134123413341434153416341734183419342034213422342334243425342634273428342934303431343234333434343534363437343834393440344134423443344434453446344734483449345034513452345334543455345634573458345934603461346234633464346534663467346834693470347134723473347434753476347734783479348034813482348334843485348634873488348934903491349234933494349534963497349834993500350135023503350435053506350735083509351035113512351335143515351635173518351935203521352235233524352535263527352835293530353135323533353435353536353735383539354035413542354335443545354635473548354935503551355235533554355535563557355835593560356135623563356435653566356735683569357035713572357335743575357635773578357935803581358235833584358535863587358835893590359135923593359435953596359735983599360036013602360336043605360636073608360936103611361236133614361536163617361836193620362136223623362436253626362736283629363036313632363336343635363636373638363936403641364236433644364536463647364836493650365136523653365436553656365736583659366036613662366336643665366636673668366936703671367236733674367536763677367836793680368136823683368436853686368736883689369036913692369336943695369636973698369937003701370237033704370537063707370837093710371137123713371437153716371737183719372037213722372337243725372637273728372937303731373237333734373537363737373837393740374137423743374437453746374737483749375037513752375337543755375637573758375937603761376237633764376537663767376837693770377137723773377437753776377737783779378037813782378337843785378637873788378937903791379237933794379537963797379837993800380138023803380438053806380738083809381038113812381338143815381638173818381938203821382238233824382538263827382838293830383138323833383438353836383738383839384038413842384338443845384638473848384938503851385238533854385538563857385838593860386138623863386438653866386738683869387038713872387338743875387638773878387938803881388238833884388538863887388838893890389138923893389438953896389738983899390039013902390339043905390639073908390939103911391239133914391539163917391839193920392139223923392439253926392739283929393039313932393339343935393639373938393939403941394239433944394539463947394839493950395139523953395439553956395739583959396039613962396339643965396639673968396939703971397239733974397539763977397839793980398139823983398439853986398739883989399039913992399339943995399639973998399940004001400240034004400540064007400840094010401140124013401440154016401740184019402040214022402340244025402640274028402940304031403240334034403540364037403840394040404140424043404440454046404740484049405040514052405340544055405640574058405940604061406240634064406540664067406840694070407140724073407440754076407740784079408040814082408340844085408640874088408940904091409240934094409540964097409840994100410141024103410441054106410741084109411041114112411341144115411641174118411941204121412241234124412541264127412841294130413141324133413441354136413741384139414041414142414341444145414641474148414941504151415241534154415541564157415841594160416141624163416441654166416741684169417041714172417341744175417641774178417941804181418241834184418541864187418841894190419141924193419441954196419741984199420042014202420342044205420642074208420942104211421242134214421542164217421842194220422142224223422442254226422742284229423042314232423342344235423642374238423942404241424242434244424542464247424842494250425142524253425442554256425742584259426042614262426342644265426642674268426942704271427242734274427542764277427842794280428142824283428442854286428742884289429042914292429342944295429642974298429943004301430243034304430543064307430843094310431143124313431443154316431743184319432043214322432343244325432643274328432943304331433243334334433543364337433843394340434143424343434443454346434743484349435043514352435343544355435643574358435943604361436243634364436543664367436843694370437143724373437443754376437743784379438043814382438343844385438643874388438943904391439243934394439543964397439843994400440144024403440444054406440744084409441044114412441344144415441644174418441944204421442244234424442544264427442844294430443144324433443444354436443744384439444044414442444344444445444644474448444944504451445244534454445544564457445844594460446144624463446444654466446744684469447044714472447344744475447644774478447944804481448244834484448544864487448844894490449144924493449444954496449744984499450045014502450345044505450645074508450945104511451245134514451545164517451845194520452145224523452445254526452745284529453045314532453345344535453645374538453945404541454245434544454545464547454845494550455145524553455445554556455745584559456045614562456345644565456645674568456945704571457245734574457545764577457845794580458145824583458445854586458745884589459045914592459345944595459645974598459946004601460246034604460546064607460846094610461146124613461446154616461746184619462046214622462346244625462646274628462946304631463246334634463546364637463846394640464146424643464446454646464746484649465046514652465346544655465646574658465946604661466246634664466546664667466846694670467146724673467446754676467746784679468046814682468346844685468646874688468946904691469246934694469546964697469846994700470147024703470447054706470747084709471047114712471347144715471647174718471947204721472247234724472547264727472847294730473147324733473447354736473747384739474047414742474347444745474647474748474947504751475247534754475547564757475847594760476147624763476447654766476747684769477047714772477347744775477647774778477947804781478247834784478547864787478847894790479147924793479447954796479747984799480048014802480348044805480648074808480948104811481248134814481548164817481848194820482148224823482448254826482748284829483048314832483348344835483648374838483948404841484248434844484548464847484848494850485148524853485448554856485748584859486048614862486348644865486648674868486948704871487248734874487548764877487848794880488148824883488448854886488748884889489048914892489348944895489648974898489949004901490249034904490549064907490849094910491149124913491449154916491749184919492049214922492349244925492649274928492949304931493249334934493549364937493849394940494149424943494449454946494749484949495049514952495349544955495649574958495949604961496249634964496549664967496849694970497149724973497449754976497749784979498049814982498349844985498649874988498949904991499249934994499549964997499849995000500150025003500450055006500750085009501050115012501350145015501650175018501950205021502250235024502550265027502850295030503150325033503450355036503750385039504050415042504350445045504650475048504950505051505250535054505550565057505850595060506150625063506450655066506750685069507050715072507350745075507650775078507950805081508250835084508550865087508850895090509150925093509450955096509750985099510051015102510351045105510651075108510951105111511251135114511551165117511851195120512151225123512451255126512751285129513051315132513351345135513651375138513951405141514251435144514551465147514851495150515151525153515451555156515751585159516051615162516351645165516651675168516951705171517251735174517551765177517851795180518151825183518451855186518751885189519051915192519351945195519651975198519952005201520252035204520552065207520852095210521152125213521452155216521752185219522052215222522352245225522652275228522952305231523252335234523552365237523852395240524152425243524452455246524752485249525052515252525352545255525652575258525952605261526252635264526552665267526852695270527152725273527452755276527752785279528052815282528352845285528652875288528952905291529252935294529552965297529852995300530153025303530453055306530753085309531053115312531353145315531653175318531953205321532253235324532553265327532853295330533153325333533453355336533753385339534053415342534353445345534653475348534953505351535253535354535553565357535853595360536153625363536453655366536753685369537053715372537353745375537653775378537953805381538253835384538553865387538853895390539153925393539453955396539753985399540054015402540354045405540654075408540954105411541254135414541554165417541854195420542154225423542454255426542754285429543054315432543354345435543654375438543954405441544254435444544554465447544854495450545154525453545454555456545754585459546054615462546354645465546654675468546954705471547254735474547554765477547854795480548154825483548454855486548754885489549054915492549354945495549654975498549955005501550255035504550555065507550855095510551155125513551455155516551755185519552055215522552355245525552655275528552955305531553255335534553555365537553855395540554155425543554455455546554755485549555055515552555355545555555655575558555955605561556255635564556555665567556855695570557155725573557455755576557755785579558055815582558355845585558655875588558955905591559255935594559555965597559855995600560156025603560456055606560756085609561056115612561356145615561656175618561956205621562256235624562556265627562856295630563156325633563456355636563756385639564056415642564356445645564656475648564956505651565256535654565556565657565856595660566156625663566456655666566756685669567056715672567356745675567656775678567956805681568256835684568556865687568856895690569156925693569456955696569756985699570057015702570357045705570657075708570957105711571257135714571557165717571857195720572157225723572457255726572757285729573057315732573357345735573657375738573957405741574257435744574557465747574857495750575157525753575457555756
  1. using System;
  2. using System.Collections.Generic;
  3. using System.Linq;
  4. using System.Text;
  5. using System.Threading;
  6. using ILRuntime.Runtime.Enviorment;
  7. using ILRuntime.Runtime.Stack;
  8. using ILRuntime.CLR.Method;
  9. using ILRuntime.CLR.TypeSystem;
  10. using ILRuntime.Runtime.Intepreter.OpCodes;
  11. using ILRuntime.Runtime.Debugger;
  12. using ILRuntime.CLR.Utils;
  13. using ILRuntime.Other;
  14. namespace ILRuntime.Runtime.Intepreter
  15. {
  16. public unsafe partial class ILIntepreter
  17. {
  18. Enviorment.AppDomain domain;
  19. RuntimeStack stack;
  20. object _lockObj;
  21. bool allowUnboundCLRMethod;
  22. internal RuntimeStack Stack { get { return stack; } }
  23. public bool ShouldBreak { get; set; }
  24. public StepTypes CurrentStepType { get; set; }
  25. public StackObject* LastStepFrameBase { get; set; }
  26. public int LastStepInstructionIndex { get; set; }
  27. StackObject* ValueTypeBasePointer;
  28. #pragma warning disable CS0414
  29. bool mainthreadLock;
  30. public ILIntepreter(Enviorment.AppDomain domain)
  31. {
  32. this.domain = domain;
  33. stack = new RuntimeStack(this);
  34. allowUnboundCLRMethod = domain.AllowUnboundCLRMethod;
  35. #if DEBUG && !DISABLE_ILRUNTIME_DEBUG
  36. _lockObj = new object();
  37. #endif
  38. }
  39. public Enviorment.AppDomain AppDomain { get { return domain; } }
  40. public void Break()
  41. {
  42. //Clear old debug state
  43. ClearDebugState();
  44. #if DEBUG && !NO_PROFILER
  45. if(domain.UnityMainThreadID == Thread.CurrentThread.ManagedThreadId)
  46. {
  47. mainthreadLock = true;
  48. while (mainthreadLock)
  49. {
  50. domain.DebugService.ResolvePendingRequests();
  51. Thread.Sleep(10);
  52. }
  53. return;
  54. }
  55. #endif
  56. lock (_lockObj)
  57. {
  58. Monitor.Wait(_lockObj);
  59. }
  60. }
  61. public void Resume()
  62. {
  63. mainthreadLock = false;
  64. lock (_lockObj)
  65. Monitor.Pulse(_lockObj);
  66. }
  67. public void ClearDebugState()
  68. {
  69. ShouldBreak = false;
  70. CurrentStepType = StepTypes.None;
  71. LastStepFrameBase = (StackObject*)0;
  72. LastStepInstructionIndex = 0;
  73. }
  74. public object Run(ILMethod method, object instance, object[] p)
  75. {
  76. IList<object> mStack = stack.ManagedStack;
  77. int mStackBase = mStack.Count;
  78. StackObject* esp = stack.StackBase;
  79. stack.ResetValueTypePointer();
  80. if (method.HasThis)
  81. {
  82. if (instance is CrossBindingAdaptorType)
  83. instance = ((CrossBindingAdaptorType)instance).ILInstance;
  84. if (instance == null)
  85. throw new NullReferenceException("instance should not be null!");
  86. esp = PushObject(esp, mStack, instance);
  87. }
  88. bool useRegister = method.ShouldUseRegisterVM;
  89. esp = PushParameters(method, esp, p, useRegister);
  90. bool unhandledException;
  91. if (useRegister)
  92. esp = ExecuteR(method, esp, out unhandledException);
  93. else
  94. esp = Execute(method, esp, out unhandledException);
  95. object result = method.ReturnType != domain.VoidType ? method.ReturnType.TypeForCLR.CheckCLRTypes(StackObject.ToObject((esp - 1), domain, mStack)) : null;
  96. //ClearStack
  97. #if DEBUG && !DISABLE_ILRUNTIME_DEBUG
  98. ((List<object>)mStack).RemoveRange(mStackBase, mStack.Count - mStackBase);
  99. #else
  100. ((UncheckedList<object>)mStack).RemoveRange(mStackBase, mStack.Count - mStackBase);
  101. #endif
  102. return result;
  103. }
  104. internal StackObject* Execute(ILMethod method, StackObject* esp, out bool unhandledException)
  105. {
  106. #if DEBUG
  107. if (method == null)
  108. throw new NullReferenceException();
  109. #endif
  110. #if DEBUG && !NO_PROFILER
  111. if (System.Threading.Thread.CurrentThread.ManagedThreadId == AppDomain.UnityMainThreadID)
  112. #if UNITY_5_5_OR_NEWER
  113. UnityEngine.Profiling.Profiler.BeginSample(method.ToString());
  114. #else
  115. UnityEngine.Profiler.BeginSample(method.ToString());
  116. #endif
  117. #endif
  118. OpCode[] body = method.Body;
  119. StackFrame frame;
  120. stack.InitializeFrame(method, esp, out frame);
  121. StackObject* v1 = frame.LocalVarPointer;
  122. StackObject* v2 = frame.LocalVarPointer + 1;
  123. StackObject* v3 = frame.LocalVarPointer + 1 + 1;
  124. StackObject* v4 = Add(frame.LocalVarPointer, 3);
  125. Exception lastCaughtEx = null;
  126. int finallyEndAddress = 0;
  127. var ehs = method.ExceptionHandler;
  128. esp = frame.BasePointer;
  129. var arg = Minus(frame.LocalVarPointer, method.ParameterCount);
  130. IList<object> mStack = stack.ManagedStack;
  131. int paramCnt = method.ParameterCount;
  132. if (method.HasThis)//this parameter is always object reference
  133. {
  134. arg--;
  135. paramCnt++;
  136. /// 为确保性能,暂时先确保开发的时候,安全检查完备。
  137. /// 当然手机端运行时可能会出现为空的类对象可正常调用成员函数,导致成员函数里面访问成员变量报错时可能使得根据Log跟踪BUG时方向错误。
  138. #if DEBUG && !DISABLE_ILRUNTIME_DEBUG
  139. var thisObj = RetriveObject(arg, mStack);
  140. if (thisObj == null)
  141. throw new NullReferenceException();
  142. #endif
  143. }
  144. unhandledException = false;
  145. StackObject* objRef, objRef2, dst, val, a, b, arrRef;
  146. object obj = null;
  147. IType type;
  148. Type clrType;
  149. int intVal;
  150. //Managed Stack reserved for arguments(In case of starg)
  151. for (int i = 0; i < paramCnt; i++)
  152. {
  153. a = Add(arg, i);
  154. switch (a->ObjectType)
  155. {
  156. case ObjectTypes.Null:
  157. //Need to reserve place for null, in case of starg
  158. a->ObjectType = ObjectTypes.Object;
  159. a->Value = mStack.Count;
  160. mStack.Add(null);
  161. break;
  162. case ObjectTypes.ValueTypeObjectReference:
  163. //CloneStackValueType(a, a, mStack);
  164. break;
  165. case ObjectTypes.Object:
  166. case ObjectTypes.FieldReference:
  167. case ObjectTypes.ArrayReference:
  168. {
  169. if (i > 0 || !method.HasThis)//this instance should not be cloned
  170. mStack[a->Value] = CheckAndCloneValueType(mStack[a->Value], AppDomain);
  171. }
  172. frame.ManagedStackBase--;
  173. break;
  174. }
  175. }
  176. stack.PushFrame(ref frame);
  177. int locBase = mStack.Count;
  178. //Managed Stack reserved for local variable
  179. for (int i = 0; i < method.LocalVariableCount; i++)
  180. {
  181. mStack.Add(null);
  182. }
  183. for (int i = 0; i < method.LocalVariableCount; i++)
  184. {
  185. var v = method.Variables[i];
  186. bool isEnum = false;
  187. var vt = v.VariableType;
  188. IType t;
  189. if (vt.IsGenericParameter)
  190. {
  191. t = method.FindGenericArgument(vt.Name);
  192. }
  193. else
  194. {
  195. t = AppDomain.GetType(v.VariableType, method.DeclearingType, method);
  196. }
  197. isEnum = t.IsEnum;
  198. if (!t.IsByRef && t.IsValueType && !t.IsPrimitive && !isEnum)
  199. {
  200. if (t is ILType)
  201. {
  202. //var obj = ((ILType)t).Instantiate(false);
  203. var loc = Add(v1, i);
  204. stack.AllocValueType(loc, t);
  205. /*loc->ObjectType = ObjectTypes.Object;
  206. loc->Value = mStack.Count;
  207. mStack.Add(obj);*/
  208. }
  209. else
  210. {
  211. CLRType cT = (CLRType)t;
  212. var loc = Add(v1, i);
  213. if (cT.ValueTypeBinder != null)
  214. {
  215. stack.AllocValueType(loc, t);
  216. }
  217. else
  218. {
  219. obj = ((CLRType)t).CreateDefaultInstance();
  220. loc->ObjectType = ObjectTypes.Object;
  221. loc->Value = locBase + i;
  222. mStack[locBase + i] = obj;
  223. }
  224. }
  225. }
  226. else
  227. {
  228. if (t.IsPrimitive || isEnum)
  229. {
  230. var loc = Add(v1, i);
  231. StackObject.Initialized(loc, t);
  232. }
  233. else
  234. {
  235. var loc = Add(v1, i);
  236. loc->ObjectType = ObjectTypes.Object;
  237. loc->Value = locBase + i;
  238. }
  239. }
  240. }
  241. var bp = stack.ValueTypeStackPointer;
  242. ValueTypeBasePointer = bp;
  243. fixed (OpCode* ptr = body)
  244. {
  245. OpCode* ip = ptr;
  246. OpCodeEnum code = ip->Code;
  247. bool returned = false;
  248. while (!returned)
  249. {
  250. try
  251. {
  252. #if DEBUG && !DISABLE_ILRUNTIME_DEBUG
  253. if (ShouldBreak)
  254. Break();
  255. var insOffset = (int)(ip - ptr);
  256. frame.Address.Value = insOffset;
  257. AppDomain.DebugService.CheckShouldBreak(method, this, insOffset);
  258. #endif
  259. code = ip->Code;
  260. switch (code)
  261. {
  262. #region Arguments and Local Variable
  263. case OpCodeEnum.Ldarg_0:
  264. CopyToStack(esp, arg, mStack);
  265. esp++;
  266. break;
  267. case OpCodeEnum.Ldarg_1:
  268. CopyToStack(esp, arg + 1, mStack);
  269. esp++;
  270. break;
  271. case OpCodeEnum.Ldarg_2:
  272. CopyToStack(esp, arg + 1 + 1, mStack);
  273. esp++;
  274. break;
  275. case OpCodeEnum.Ldarg_3:
  276. CopyToStack(esp, arg + 1 + 1 + 1, mStack);
  277. esp++;
  278. break;
  279. case OpCodeEnum.Ldarg:
  280. case OpCodeEnum.Ldarg_S:
  281. CopyToStack(esp, Add(arg, ip->TokenInteger), mStack);
  282. esp++;
  283. break;
  284. case OpCodeEnum.Ldarga:
  285. case OpCodeEnum.Ldarga_S:
  286. {
  287. a = Add(arg, ip->TokenInteger);
  288. esp->ObjectType = ObjectTypes.StackObjectReference;
  289. *(long*)&esp->Value = (long)a;
  290. esp++;
  291. }
  292. break;
  293. case OpCodeEnum.Starg:
  294. case OpCodeEnum.Starg_S:
  295. {
  296. a = Add(arg, ip->TokenInteger);
  297. val = esp - 1;
  298. int idx = a->Value;
  299. bool isObj = a->ObjectType >= ObjectTypes.Object;
  300. if (val->ObjectType >= ObjectTypes.Object)
  301. {
  302. if (a->ObjectType == ObjectTypes.ValueTypeObjectReference)
  303. {
  304. dst = ILIntepreter.ResolveReference(a);
  305. CopyValueTypeToStack(dst, mStack[val->Value], mStack);
  306. }
  307. else
  308. {
  309. a->ObjectType = val->ObjectType;
  310. mStack[a->Value] = mStack[val->Value];
  311. a->ValueLow = val->ValueLow;
  312. }
  313. }
  314. else
  315. {
  316. if (a->ObjectType == ObjectTypes.ValueTypeObjectReference)
  317. {
  318. if (val->ObjectType == ObjectTypes.ValueTypeObjectReference)
  319. {
  320. CopyStackValueType(val, a, mStack);
  321. FreeStackValueType(val);
  322. }
  323. else
  324. throw new NotSupportedException();
  325. }
  326. else
  327. {
  328. if (val->ObjectType == ObjectTypes.ValueTypeObjectReference)
  329. {
  330. if (isObj)
  331. {
  332. mStack[a->Value] = StackObject.ToObject(val, domain, mStack);
  333. }
  334. else
  335. throw new NotSupportedException();
  336. }
  337. else
  338. {
  339. *a = *val;
  340. if (isObj)
  341. {
  342. a->Value = idx;
  343. if (val->ObjectType == ObjectTypes.Null)
  344. {
  345. mStack[a->Value] = null;
  346. }
  347. }
  348. }
  349. }
  350. }
  351. Free(val);
  352. esp--;
  353. }
  354. break;
  355. case OpCodeEnum.Stloc_0:
  356. {
  357. esp--;
  358. int idx = locBase;
  359. StLocSub(esp, v1, idx, mStack);
  360. }
  361. break;
  362. case OpCodeEnum.Ldloc_0:
  363. CopyToStack(esp, v1, mStack);
  364. esp++;
  365. break;
  366. case OpCodeEnum.Stloc_1:
  367. {
  368. esp--;
  369. int idx = locBase + 1;
  370. StLocSub(esp, v2, idx, mStack);
  371. }
  372. break;
  373. case OpCodeEnum.Ldloc_1:
  374. CopyToStack(esp, v2, mStack);
  375. esp++;
  376. break;
  377. case OpCodeEnum.Stloc_2:
  378. {
  379. esp--;
  380. int idx = locBase + 2;
  381. StLocSub(esp, v3, idx, mStack);
  382. break;
  383. }
  384. case OpCodeEnum.Ldloc_2:
  385. CopyToStack(esp, v3, mStack);
  386. esp++;
  387. break;
  388. case OpCodeEnum.Stloc_3:
  389. {
  390. esp--;
  391. int idx = locBase + 3;
  392. StLocSub(esp, v4, idx, mStack);
  393. }
  394. break;
  395. case OpCodeEnum.Ldloc_3:
  396. CopyToStack(esp, v4, mStack);
  397. esp++;
  398. break;
  399. case OpCodeEnum.Stloc:
  400. case OpCodeEnum.Stloc_S:
  401. {
  402. esp--;
  403. var v = Add(frame.LocalVarPointer, ip->TokenInteger);
  404. int idx = locBase + ip->TokenInteger;
  405. StLocSub(esp, v, idx, mStack);
  406. }
  407. break;
  408. case OpCodeEnum.Ldloc:
  409. case OpCodeEnum.Ldloc_S:
  410. {
  411. var v = Add(frame.LocalVarPointer, ip->TokenInteger);
  412. CopyToStack(esp, v, mStack);
  413. esp++;
  414. }
  415. break;
  416. case OpCodeEnum.Ldloca:
  417. case OpCodeEnum.Ldloca_S:
  418. {
  419. var v = Add(frame.LocalVarPointer, ip->TokenInteger);
  420. esp->ObjectType = ObjectTypes.StackObjectReference;
  421. *(long*)&esp->Value = (long)v;
  422. esp++;
  423. }
  424. break;
  425. case OpCodeEnum.Ldobj:
  426. {
  427. objRef = esp - 1;
  428. switch (objRef->ObjectType)
  429. {
  430. case ObjectTypes.ArrayReference:
  431. {
  432. var t = AppDomain.GetType(ip->TokenInteger);
  433. obj = mStack[objRef->Value];
  434. var idx = objRef->ValueLow;
  435. Free(objRef);
  436. LoadFromArrayReference(obj, idx, objRef, t, mStack);
  437. }
  438. break;
  439. case ObjectTypes.StackObjectReference:
  440. {
  441. CopyToStack(objRef, GetObjectAndResolveReference(objRef), mStack);
  442. }
  443. break;
  444. case ObjectTypes.FieldReference:
  445. {
  446. obj = mStack[objRef->Value];
  447. int idx = objRef->ValueLow;
  448. Free(objRef);
  449. if (obj is ILTypeInstance)
  450. {
  451. ((ILTypeInstance)obj).PushToStack(idx, objRef, this, mStack);
  452. }
  453. else
  454. {
  455. var t = AppDomain.GetType(ip->TokenInteger);
  456. if (!((CLRType)t).CopyFieldToStack(idx, obj, this, ref objRef, mStack))
  457. {
  458. obj = ((CLRType)t).GetFieldValue(idx, obj);
  459. PushObject(objRef, mStack, obj);
  460. }
  461. }
  462. }
  463. break;
  464. case ObjectTypes.StaticFieldReference:
  465. {
  466. var t = AppDomain.GetType(objRef->Value);
  467. int idx = objRef->ValueLow;
  468. Free(objRef);
  469. if (t is ILType)
  470. {
  471. ((ILType)t).StaticInstance.PushToStack(idx, objRef, this, mStack);
  472. }
  473. else
  474. {
  475. if (!((CLRType)t).CopyFieldToStack(idx, null, this, ref objRef, mStack))
  476. {
  477. obj = ((CLRType)t).GetFieldValue(idx, null);
  478. PushObject(objRef, mStack, obj);
  479. }
  480. }
  481. }
  482. break;
  483. default:
  484. throw new NotImplementedException();
  485. }
  486. }
  487. break;
  488. case OpCodeEnum.Stobj:
  489. {
  490. objRef = esp - 1 - 1;
  491. val = esp - 1;
  492. switch (objRef->ObjectType)
  493. {
  494. case ObjectTypes.ArrayReference:
  495. {
  496. var t = AppDomain.GetType(ip->TokenInteger);
  497. StoreValueToArrayReference(objRef, val, t, mStack);
  498. }
  499. break;
  500. case ObjectTypes.StackObjectReference:
  501. {
  502. objRef = GetObjectAndResolveReference(objRef);
  503. if (objRef->ObjectType == ObjectTypes.ValueTypeObjectReference)
  504. {
  505. switch (val->ObjectType)
  506. {
  507. case ObjectTypes.Object:
  508. dst = ILIntepreter.ResolveReference(objRef);
  509. CopyValueTypeToStack(dst, mStack[val->Value], mStack);
  510. break;
  511. case ObjectTypes.ValueTypeObjectReference:
  512. CopyStackValueType(val, objRef, mStack);
  513. break;
  514. default:
  515. throw new NotImplementedException();
  516. }
  517. }
  518. else
  519. {
  520. if (val->ObjectType >= ObjectTypes.Object)
  521. {
  522. mStack[objRef->Value] = mStack[val->Value];
  523. objRef->ValueLow = val->ValueLow;
  524. }
  525. else
  526. {
  527. *objRef = *val;
  528. }
  529. }
  530. }
  531. break;
  532. case ObjectTypes.FieldReference:
  533. {
  534. obj = mStack[objRef->Value];
  535. int idx = objRef->ValueLow;
  536. if (obj is ILTypeInstance)
  537. {
  538. ((ILTypeInstance)obj).AssignFromStack(idx, val, AppDomain, mStack);
  539. }
  540. else
  541. {
  542. var t = AppDomain.GetType(ip->TokenInteger);
  543. if (!((CLRType)t).AssignFieldFromStack(idx, ref obj, this, val, mStack))
  544. ((CLRType)t).SetFieldValue(idx, ref obj, t.TypeForCLR.CheckCLRTypes(StackObject.ToObject(val, AppDomain, mStack)));
  545. }
  546. }
  547. break;
  548. case ObjectTypes.StaticFieldReference:
  549. {
  550. var t = AppDomain.GetType(objRef->Value);
  551. if (t is ILType)
  552. {
  553. ((ILType)t).StaticInstance.AssignFromStack(objRef->ValueLow, val, AppDomain, mStack);
  554. }
  555. else
  556. {
  557. obj = null;
  558. if (!((CLRType)t).AssignFieldFromStack(objRef->ValueLow, ref obj, this, val, mStack))
  559. ((CLRType)t).SetStaticFieldValue(objRef->ValueLow, t.TypeForCLR.CheckCLRTypes(StackObject.ToObject(val, AppDomain, mStack)));
  560. }
  561. }
  562. break;
  563. default:
  564. throw new NotImplementedException();
  565. }
  566. Free(esp - 1);
  567. Free(esp - 1 - 1);
  568. esp = esp - 1 - 1;
  569. }
  570. break;
  571. #endregion
  572. #region Load Constants
  573. case OpCodeEnum.Ldc_I4_M1:
  574. esp->Value = -1;
  575. esp->ObjectType = ObjectTypes.Integer;
  576. esp++;
  577. break;
  578. case OpCodeEnum.Ldc_I4_0:
  579. esp->Value = 0;
  580. esp->ObjectType = ObjectTypes.Integer;
  581. esp++;
  582. break;
  583. case OpCodeEnum.Ldc_I4_1:
  584. esp->Value = 1;
  585. esp->ObjectType = ObjectTypes.Integer;
  586. esp++;
  587. break;
  588. case OpCodeEnum.Ldc_I4_2:
  589. esp->Value = 2;
  590. esp->ObjectType = ObjectTypes.Integer;
  591. esp++;
  592. break;
  593. case OpCodeEnum.Ldc_I4_3:
  594. esp->Value = 3;
  595. esp->ObjectType = ObjectTypes.Integer;
  596. esp++;
  597. break;
  598. case OpCodeEnum.Ldc_I4_4:
  599. esp->Value = 4;
  600. esp->ObjectType = ObjectTypes.Integer;
  601. esp++;
  602. break;
  603. case OpCodeEnum.Ldc_I4_5:
  604. esp->Value = 5;
  605. esp->ObjectType = ObjectTypes.Integer;
  606. esp++;
  607. break;
  608. case OpCodeEnum.Ldc_I4_6:
  609. esp->Value = 6;
  610. esp->ObjectType = ObjectTypes.Integer;
  611. esp++;
  612. break;
  613. case OpCodeEnum.Ldc_I4_7:
  614. esp->Value = 7;
  615. esp->ObjectType = ObjectTypes.Integer;
  616. esp++;
  617. break;
  618. case OpCodeEnum.Ldc_I4_8:
  619. esp->Value = 8;
  620. esp->ObjectType = ObjectTypes.Integer;
  621. esp++;
  622. break;
  623. case OpCodeEnum.Ldc_I4:
  624. case OpCodeEnum.Ldc_I4_S:
  625. esp->Value = ip->TokenInteger;
  626. esp->ObjectType = ObjectTypes.Integer;
  627. esp++;
  628. break;
  629. case OpCodeEnum.Ldc_I8:
  630. {
  631. *(long*)(&esp->Value) = ip->TokenLong;
  632. esp->ObjectType = ObjectTypes.Long;
  633. esp++;
  634. }
  635. break;
  636. case OpCodeEnum.Ldc_R4:
  637. {
  638. *(float*)(&esp->Value) = *(float*)&ip->TokenInteger;
  639. esp->ObjectType = ObjectTypes.Float;
  640. esp++;
  641. }
  642. break;
  643. case OpCodeEnum.Ldc_R8:
  644. {
  645. *(double*)(&esp->Value) = *(double*)&ip->TokenLong;
  646. esp->ObjectType = ObjectTypes.Double;
  647. esp++;
  648. }
  649. break;
  650. case OpCodeEnum.Ldnull:
  651. {
  652. esp = PushNull(esp);
  653. }
  654. break;
  655. case OpCodeEnum.Ldind_I:
  656. case OpCodeEnum.Ldind_I1:
  657. case OpCodeEnum.Ldind_I2:
  658. case OpCodeEnum.Ldind_I4:
  659. case OpCodeEnum.Ldind_U1:
  660. case OpCodeEnum.Ldind_U2:
  661. case OpCodeEnum.Ldind_U4:
  662. {
  663. val = GetObjectAndResolveReference(esp - 1);
  664. dst = esp - 1;
  665. switch (val->ObjectType)
  666. {
  667. case ObjectTypes.FieldReference:
  668. {
  669. var instance = mStack[val->Value];
  670. var idx = val->ValueLow;
  671. Free(dst);
  672. LoadFromFieldReference(instance, idx, dst, mStack);
  673. }
  674. break;
  675. case ObjectTypes.ArrayReference:
  676. {
  677. var instance = mStack[val->Value];
  678. var idx = val->ValueLow;
  679. Free(dst);
  680. LoadFromArrayReference(instance, idx, dst, instance.GetType().GetElementType(), mStack);
  681. }
  682. break;
  683. case ObjectTypes.StaticFieldReference:
  684. {
  685. var t = AppDomain.GetType(val->Value);
  686. int idx = val->ValueLow;
  687. Free(dst);
  688. if (t is ILType)
  689. {
  690. ((ILType)t).StaticInstance.PushToStack(idx, dst, this, mStack);
  691. }
  692. else
  693. {
  694. if (!((CLRType)t).CopyFieldToStack(idx, null, this, ref dst, mStack))
  695. {
  696. obj = ((CLRType)t).GetFieldValue(idx, null);
  697. PushObject(dst, mStack, obj);
  698. }
  699. }
  700. }
  701. break;
  702. default:
  703. {
  704. dst->ObjectType = ObjectTypes.Integer;
  705. dst->Value = val->Value;
  706. dst->ValueLow = 0;
  707. }
  708. break;
  709. }
  710. }
  711. break;
  712. case OpCodeEnum.Ldind_I8:
  713. {
  714. val = GetObjectAndResolveReference(esp - 1);
  715. dst = esp - 1;
  716. switch (val->ObjectType)
  717. {
  718. case ObjectTypes.FieldReference:
  719. {
  720. var instance = mStack[val->Value];
  721. var idx = val->ValueLow;
  722. Free(dst);
  723. LoadFromFieldReference(instance, idx, dst, mStack);
  724. }
  725. break;
  726. case ObjectTypes.ArrayReference:
  727. {
  728. var instance = mStack[val->Value];
  729. var idx = val->ValueLow;
  730. Free(dst);
  731. LoadFromArrayReference(instance, idx, dst, instance.GetType().GetElementType(), mStack);
  732. }
  733. break;
  734. case ObjectTypes.StaticFieldReference:
  735. {
  736. var t = AppDomain.GetType(val->Value);
  737. int idx = val->ValueLow;
  738. Free(dst);
  739. if (t is ILType)
  740. {
  741. ((ILType)t).StaticInstance.PushToStack(idx, dst, this, mStack);
  742. }
  743. else
  744. {
  745. if (!((CLRType)t).CopyFieldToStack(idx, null, this, ref dst, mStack))
  746. {
  747. obj = ((CLRType)t).GetFieldValue(idx, null);
  748. PushObject(dst, mStack, obj);
  749. }
  750. }
  751. }
  752. break;
  753. default:
  754. {
  755. *dst = *val;
  756. dst->ObjectType = ObjectTypes.Long;
  757. }
  758. break;
  759. }
  760. }
  761. break;
  762. case OpCodeEnum.Ldind_R4:
  763. {
  764. val = GetObjectAndResolveReference(esp - 1);
  765. dst = esp - 1;
  766. switch (val->ObjectType)
  767. {
  768. case ObjectTypes.FieldReference:
  769. {
  770. var instance = mStack[val->Value];
  771. var idx = val->ValueLow;
  772. Free(dst);
  773. LoadFromFieldReference(instance, idx, dst, mStack);
  774. }
  775. break;
  776. case ObjectTypes.ArrayReference:
  777. {
  778. var instance = mStack[val->Value];
  779. var idx = val->ValueLow;
  780. Free(dst);
  781. LoadFromArrayReference(instance, idx, dst, instance.GetType().GetElementType(), mStack);
  782. }
  783. break;
  784. case ObjectTypes.StaticFieldReference:
  785. {
  786. var t = AppDomain.GetType(val->Value);
  787. int idx = val->ValueLow;
  788. Free(dst);
  789. if (t is ILType)
  790. {
  791. ((ILType)t).StaticInstance.PushToStack(idx, dst, this, mStack);
  792. }
  793. else
  794. {
  795. if (!((CLRType)t).CopyFieldToStack(idx, null, this, ref dst, mStack))
  796. {
  797. obj = ((CLRType)t).GetFieldValue(idx, null);
  798. PushObject(dst, mStack, obj);
  799. }
  800. }
  801. }
  802. break;
  803. default:
  804. {
  805. dst->ObjectType = ObjectTypes.Float;
  806. dst->Value = val->Value;
  807. dst->ValueLow = 0;
  808. }
  809. break;
  810. }
  811. }
  812. break;
  813. case OpCodeEnum.Ldind_R8:
  814. {
  815. val = GetObjectAndResolveReference(esp - 1);
  816. dst = esp - 1;
  817. switch (val->ObjectType)
  818. {
  819. case ObjectTypes.FieldReference:
  820. {
  821. var instance = mStack[val->Value];
  822. var idx = val->ValueLow;
  823. Free(dst);
  824. LoadFromFieldReference(instance, idx, dst, mStack);
  825. }
  826. break;
  827. case ObjectTypes.ArrayReference:
  828. {
  829. var instance = mStack[val->Value];
  830. var idx = val->ValueLow;
  831. Free(dst);
  832. LoadFromArrayReference(instance, idx, dst, instance.GetType().GetElementType(), mStack);
  833. }
  834. break;
  835. case ObjectTypes.StaticFieldReference:
  836. {
  837. var t = AppDomain.GetType(val->Value);
  838. int idx = val->ValueLow;
  839. Free(dst);
  840. if (t is ILType)
  841. {
  842. ((ILType)t).StaticInstance.PushToStack(idx, dst, this, mStack);
  843. }
  844. else
  845. {
  846. if (!((CLRType)t).CopyFieldToStack(idx, null, this, ref dst, mStack))
  847. {
  848. obj = ((CLRType)t).GetFieldValue(idx, null);
  849. PushObject(dst, mStack, obj);
  850. }
  851. }
  852. }
  853. break;
  854. default:
  855. {
  856. *dst = *val;
  857. dst->ObjectType = ObjectTypes.Double;
  858. }
  859. break;
  860. }
  861. }
  862. break;
  863. case OpCodeEnum.Ldind_Ref:
  864. {
  865. val = GetObjectAndResolveReference(esp - 1);
  866. dst = esp - 1;
  867. switch (val->ObjectType)
  868. {
  869. case ObjectTypes.FieldReference:
  870. {
  871. var instance = mStack[val->Value];
  872. var idx = val->ValueLow;
  873. Free(dst);
  874. LoadFromFieldReference(instance, idx, dst, mStack);
  875. }
  876. break;
  877. case ObjectTypes.ArrayReference:
  878. {
  879. var instance = mStack[val->Value];
  880. var idx = val->ValueLow;
  881. Free(dst);
  882. LoadFromArrayReference(instance, idx, dst, instance.GetType().GetElementType(), mStack);
  883. }
  884. break;
  885. case ObjectTypes.StaticFieldReference:
  886. {
  887. var t = AppDomain.GetType(val->Value);
  888. int idx = val->ValueLow;
  889. Free(dst);
  890. if (t is ILType)
  891. {
  892. ((ILType)t).StaticInstance.PushToStack(idx, dst, this, mStack);
  893. }
  894. else
  895. {
  896. if (!((CLRType)t).CopyFieldToStack(idx, null, this, ref dst, mStack))
  897. {
  898. obj = ((CLRType)t).GetFieldValue(idx, null);
  899. PushObject(dst, mStack, obj);
  900. }
  901. }
  902. }
  903. break;
  904. default:
  905. {
  906. dst->ObjectType = ObjectTypes.Object;
  907. dst->Value = mStack.Count;
  908. mStack.Add(mStack[val->Value]);
  909. }
  910. break;
  911. }
  912. }
  913. break;
  914. case OpCodeEnum.Stind_I:
  915. case OpCodeEnum.Stind_I1:
  916. case OpCodeEnum.Stind_I2:
  917. case OpCodeEnum.Stind_I4:
  918. case OpCodeEnum.Stind_R4:
  919. {
  920. dst = GetObjectAndResolveReference(esp - 1 - 1);
  921. val = esp - 1;
  922. switch (dst->ObjectType)
  923. {
  924. case ObjectTypes.FieldReference:
  925. {
  926. obj = mStack[dst->Value];
  927. StoreValueToFieldReference(ref obj, dst->ValueLow, val, mStack);
  928. mStack[dst->Value] = obj;
  929. }
  930. break;
  931. case ObjectTypes.ArrayReference:
  932. {
  933. StoreValueToArrayReference(dst, val, mStack[dst->Value].GetType().GetElementType(), mStack);
  934. }
  935. break;
  936. case ObjectTypes.StaticFieldReference:
  937. {
  938. type = AppDomain.GetType(dst->Value);
  939. int idx = dst->ValueLow;
  940. if (type != null)
  941. {
  942. if (type is ILType)
  943. {
  944. ILType t = type as ILType;
  945. t.StaticInstance.AssignFromStack(idx, val, AppDomain, mStack);
  946. }
  947. else
  948. {
  949. CLRType t = type as CLRType;
  950. var f = t.GetField(idx);
  951. obj = null;
  952. if (!((CLRType)t).AssignFieldFromStack(idx, ref obj, this, val, mStack))
  953. t.SetStaticFieldValue(idx, f.FieldType.CheckCLRTypes(CheckAndCloneValueType(StackObject.ToObject(val, domain, mStack), domain)));
  954. }
  955. }
  956. else
  957. throw new TypeLoadException();
  958. }
  959. break;
  960. default:
  961. {
  962. dst->Value = val->Value;
  963. }
  964. break;
  965. }
  966. Free(esp - 1);
  967. Free(esp - 1 - 1);
  968. esp = esp - 1 - 1;
  969. }
  970. break;
  971. case OpCodeEnum.Stind_I8:
  972. {
  973. dst = GetObjectAndResolveReference(esp - 1 - 1);
  974. val = esp - 1;
  975. switch (dst->ObjectType)
  976. {
  977. case ObjectTypes.FieldReference:
  978. {
  979. obj = mStack[dst->Value];
  980. StoreValueToFieldReference(ref obj, dst->ValueLow, val, mStack);
  981. mStack[dst->Value] = obj;
  982. }
  983. break;
  984. case ObjectTypes.ArrayReference:
  985. {
  986. StoreValueToArrayReference(dst, val, typeof(long), mStack);
  987. }
  988. break;
  989. case ObjectTypes.StaticFieldReference:
  990. {
  991. type = AppDomain.GetType(dst->Value);
  992. int idx = dst->ValueLow;
  993. if (type != null)
  994. {
  995. if (type is ILType)
  996. {
  997. ILType t = type as ILType;
  998. t.StaticInstance.AssignFromStack(idx, val, AppDomain, mStack);
  999. }
  1000. else
  1001. {
  1002. CLRType t = type as CLRType;
  1003. obj = null;
  1004. if (!((CLRType)t).AssignFieldFromStack(idx, ref obj, this, val, mStack))
  1005. t.SetStaticFieldValue(idx, typeof(long).CheckCLRTypes(CheckAndCloneValueType(StackObject.ToObject(val, domain, mStack), domain)));
  1006. }
  1007. }
  1008. else
  1009. throw new TypeLoadException();
  1010. }
  1011. break;
  1012. default:
  1013. {
  1014. dst->Value = val->Value;
  1015. dst->ValueLow = val->ValueLow;
  1016. }
  1017. break;
  1018. }
  1019. Free(esp - 1);
  1020. Free(esp - 1 - 1);
  1021. esp = esp - 1 - 1;
  1022. }
  1023. break;
  1024. case OpCodeEnum.Stind_R8:
  1025. {
  1026. dst = GetObjectAndResolveReference(esp - 1 - 1);
  1027. val = esp - 1;
  1028. switch (dst->ObjectType)
  1029. {
  1030. case ObjectTypes.FieldReference:
  1031. {
  1032. obj = mStack[dst->Value];
  1033. StoreValueToFieldReference(ref obj, dst->ValueLow, val, mStack);
  1034. mStack[dst->Value] = obj;
  1035. }
  1036. break;
  1037. case ObjectTypes.ArrayReference:
  1038. {
  1039. StoreValueToArrayReference(dst, val, typeof(double), mStack);
  1040. }
  1041. break;
  1042. case ObjectTypes.StaticFieldReference:
  1043. {
  1044. type = AppDomain.GetType(dst->Value);
  1045. int idx = dst->ValueLow;
  1046. if (type != null)
  1047. {
  1048. if (type is ILType)
  1049. {
  1050. ILType t = type as ILType;
  1051. t.StaticInstance.AssignFromStack(idx, val, AppDomain, mStack);
  1052. }
  1053. else
  1054. {
  1055. CLRType t = type as CLRType;
  1056. obj = null;
  1057. if (!((CLRType)t).AssignFieldFromStack(idx, ref obj, this, val, mStack))
  1058. t.SetStaticFieldValue(idx, typeof(double).CheckCLRTypes(CheckAndCloneValueType(StackObject.ToObject(val, domain, mStack), domain)));
  1059. }
  1060. }
  1061. else
  1062. throw new TypeLoadException();
  1063. }
  1064. break;
  1065. default:
  1066. {
  1067. dst->Value = val->Value;
  1068. dst->ValueLow = val->ValueLow;
  1069. }
  1070. break;
  1071. }
  1072. Free(esp - 1);
  1073. Free(esp - 1 - 1);
  1074. esp = esp - 1 - 1;
  1075. }
  1076. break;
  1077. case OpCodeEnum.Stind_Ref:
  1078. {
  1079. dst = GetObjectAndResolveReference(esp - 1 - 1);
  1080. val = esp - 1;
  1081. switch (dst->ObjectType)
  1082. {
  1083. case ObjectTypes.FieldReference:
  1084. {
  1085. obj = mStack[dst->Value];
  1086. StoreValueToFieldReference(ref obj, dst->ValueLow, val, mStack);
  1087. mStack[dst->Value] = obj;
  1088. }
  1089. break;
  1090. case ObjectTypes.ArrayReference:
  1091. {
  1092. StoreValueToArrayReference(dst, val, typeof(object), mStack);
  1093. }
  1094. break;
  1095. case ObjectTypes.StaticFieldReference:
  1096. {
  1097. type = AppDomain.GetType(dst->Value);
  1098. int idx = dst->ValueLow;
  1099. if (type != null)
  1100. {
  1101. if (type is ILType)
  1102. {
  1103. ILType t = type as ILType;
  1104. t.StaticInstance.AssignFromStack(idx, val, AppDomain, mStack);
  1105. }
  1106. else
  1107. {
  1108. CLRType t = type as CLRType;
  1109. var f = t.GetField(idx);
  1110. obj = null;
  1111. if (!((CLRType)t).AssignFieldFromStack(idx, ref obj, this, val, mStack))
  1112. t.SetStaticFieldValue(idx, f.FieldType.CheckCLRTypes(CheckAndCloneValueType(StackObject.ToObject(val, domain, mStack), domain)));
  1113. }
  1114. }
  1115. else
  1116. throw new TypeLoadException();
  1117. }
  1118. break;
  1119. default:
  1120. {
  1121. switch (val->ObjectType)
  1122. {
  1123. case ObjectTypes.Object:
  1124. mStack[dst->Value] = mStack[val->Value];
  1125. break;
  1126. case ObjectTypes.Null:
  1127. mStack[dst->Value] = null;
  1128. break;
  1129. default:
  1130. throw new NotImplementedException();
  1131. }
  1132. }
  1133. break;
  1134. }
  1135. Free(esp - 1);
  1136. Free(esp - 1 - 1);
  1137. esp = esp - 1 - 1;
  1138. }
  1139. break;
  1140. case OpCodeEnum.Ldstr:
  1141. esp = PushObject(esp, mStack, AppDomain.GetString(ip->TokenLong));
  1142. break;
  1143. #endregion
  1144. #region Althemetics
  1145. case OpCodeEnum.Add:
  1146. {
  1147. b = esp - 1;
  1148. a = esp - 1 - 1;
  1149. esp = a;
  1150. switch (a->ObjectType)
  1151. {
  1152. case ObjectTypes.Long:
  1153. *((long*)&esp->Value) = *((long*)&a->Value) + *((long*)&b->Value);
  1154. break;
  1155. case ObjectTypes.Integer:
  1156. esp->Value = a->Value + b->Value;
  1157. break;
  1158. case ObjectTypes.Float:
  1159. *((float*)&esp->Value) = *((float*)&a->Value) + *((float*)&b->Value);
  1160. break;
  1161. case ObjectTypes.Double:
  1162. *((double*)&esp->Value) = *((double*)&a->Value) + *((double*)&b->Value);
  1163. break;
  1164. default:
  1165. throw new NotImplementedException();
  1166. }
  1167. esp++;
  1168. }
  1169. break;
  1170. case OpCodeEnum.Sub:
  1171. {
  1172. b = esp - 1;
  1173. a = esp - 1 - 1;
  1174. esp = a;
  1175. switch (a->ObjectType)
  1176. {
  1177. case ObjectTypes.Long:
  1178. *((long*)&esp->Value) = *((long*)&a->Value) - *((long*)&b->Value);
  1179. break;
  1180. case ObjectTypes.Integer:
  1181. esp->Value = a->Value - b->Value;
  1182. break;
  1183. case ObjectTypes.Float:
  1184. *((float*)&esp->Value) = *((float*)&a->Value) - *((float*)&b->Value);
  1185. break;
  1186. case ObjectTypes.Double:
  1187. *((double*)&esp->Value) = *((double*)&a->Value) - *((double*)&b->Value);
  1188. break;
  1189. default:
  1190. throw new NotImplementedException();
  1191. }
  1192. esp++;
  1193. }
  1194. break;
  1195. case OpCodeEnum.Mul:
  1196. {
  1197. b = esp - 1;
  1198. a = esp - 1 - 1;
  1199. esp = a;
  1200. switch (a->ObjectType)
  1201. {
  1202. case ObjectTypes.Long:
  1203. *((long*)&esp->Value) = *((long*)&a->Value) * *((long*)&b->Value);
  1204. break;
  1205. case ObjectTypes.Integer:
  1206. esp->Value = a->Value * b->Value;
  1207. break;
  1208. case ObjectTypes.Float:
  1209. *((float*)&esp->Value) = *((float*)&a->Value) * *((float*)&b->Value);
  1210. break;
  1211. case ObjectTypes.Double:
  1212. *((double*)&esp->Value) = *((double*)&a->Value) * *((double*)&b->Value);
  1213. break;
  1214. default:
  1215. throw new NotImplementedException();
  1216. }
  1217. esp++;
  1218. }
  1219. break;
  1220. case OpCodeEnum.Div:
  1221. {
  1222. b = esp - 1;
  1223. a = esp - 1 - 1;
  1224. esp = a;
  1225. switch (a->ObjectType)
  1226. {
  1227. case ObjectTypes.Long:
  1228. *((long*)&esp->Value) = *((long*)&a->Value) / *((long*)&b->Value);
  1229. break;
  1230. case ObjectTypes.Integer:
  1231. esp->Value = a->Value / b->Value;
  1232. break;
  1233. case ObjectTypes.Float:
  1234. *((float*)&esp->Value) = *((float*)&a->Value) / *((float*)&b->Value);
  1235. break;
  1236. case ObjectTypes.Double:
  1237. *((double*)&esp->Value) = *((double*)&a->Value) / *((double*)&b->Value);
  1238. break;
  1239. default:
  1240. throw new NotImplementedException();
  1241. }
  1242. esp++;
  1243. }
  1244. break;
  1245. case OpCodeEnum.Div_Un:
  1246. {
  1247. b = esp - 1;
  1248. a = esp - 1 - 1;
  1249. esp = a;
  1250. switch (a->ObjectType)
  1251. {
  1252. case ObjectTypes.Long:
  1253. *((ulong*)&esp->Value) = *((ulong*)&a->Value) / *((ulong*)&b->Value);
  1254. break;
  1255. case ObjectTypes.Integer:
  1256. esp->Value = (int)((uint)a->Value / (uint)b->Value);
  1257. break;
  1258. default:
  1259. throw new NotImplementedException();
  1260. }
  1261. esp++;
  1262. }
  1263. break;
  1264. case OpCodeEnum.Rem:
  1265. {
  1266. b = esp - 1;
  1267. a = esp - 1 - 1;
  1268. esp = a;
  1269. switch (a->ObjectType)
  1270. {
  1271. case ObjectTypes.Long:
  1272. *((long*)&esp->Value) = *((long*)&a->Value) % *((long*)&b->Value);
  1273. break;
  1274. case ObjectTypes.Integer:
  1275. esp->Value = a->Value % b->Value;
  1276. break;
  1277. case ObjectTypes.Float:
  1278. *(float*)&esp->Value = *(float*)&a->Value % *(float*)&b->Value;
  1279. break;
  1280. case ObjectTypes.Double:
  1281. *(double*)&esp->Value = *(double*)&a->Value % *(double*)&b->Value;
  1282. break;
  1283. default:
  1284. throw new NotImplementedException();
  1285. }
  1286. esp++;
  1287. }
  1288. break;
  1289. case OpCodeEnum.Rem_Un:
  1290. {
  1291. b = esp - 1;
  1292. a = esp - 1 - 1;
  1293. esp = a;
  1294. switch (a->ObjectType)
  1295. {
  1296. case ObjectTypes.Long:
  1297. *((ulong*)&esp->Value) = *((ulong*)&a->Value) % *((ulong*)&b->Value);
  1298. break;
  1299. case ObjectTypes.Integer:
  1300. esp->Value = (int)((uint)a->Value % (uint)b->Value);
  1301. break;
  1302. default:
  1303. throw new NotImplementedException();
  1304. }
  1305. esp++;
  1306. }
  1307. break;
  1308. case OpCodeEnum.Xor:
  1309. {
  1310. b = esp - 1;
  1311. a = esp - 1 - 1;
  1312. esp = a;
  1313. switch (a->ObjectType)
  1314. {
  1315. case ObjectTypes.Long:
  1316. *((long*)&esp->Value) = *((long*)&a->Value) ^ *((long*)&b->Value);
  1317. break;
  1318. case ObjectTypes.Integer:
  1319. esp->Value = a->Value ^ b->Value;
  1320. break;
  1321. default:
  1322. throw new NotImplementedException();
  1323. }
  1324. esp++;
  1325. }
  1326. break;
  1327. case OpCodeEnum.And:
  1328. {
  1329. b = esp - 1;
  1330. a = esp - 1 - 1;
  1331. esp = a;
  1332. switch (a->ObjectType)
  1333. {
  1334. case ObjectTypes.Long:
  1335. *((long*)&esp->Value) = *((long*)&a->Value) & *((long*)&b->Value);
  1336. break;
  1337. case ObjectTypes.Integer:
  1338. esp->Value = a->Value & b->Value;
  1339. break;
  1340. default:
  1341. throw new NotImplementedException();
  1342. }
  1343. esp++;
  1344. }
  1345. break;
  1346. case OpCodeEnum.Or:
  1347. {
  1348. b = esp - 1;
  1349. a = esp - 1 - 1;
  1350. esp = a;
  1351. switch (a->ObjectType)
  1352. {
  1353. case ObjectTypes.Long:
  1354. *((long*)&esp->Value) = *((long*)&a->Value) | *((long*)&b->Value);
  1355. break;
  1356. case ObjectTypes.Integer:
  1357. esp->Value = a->Value | b->Value;
  1358. break;
  1359. default:
  1360. throw new NotImplementedException();
  1361. }
  1362. esp++;
  1363. }
  1364. break;
  1365. case OpCodeEnum.Shl:
  1366. {
  1367. b = esp - 1;
  1368. a = esp - 1 - 1;
  1369. esp = a;
  1370. int bits = b->Value;
  1371. switch (a->ObjectType)
  1372. {
  1373. case ObjectTypes.Long:
  1374. *((long*)&esp->Value) = *((long*)&a->Value) << bits;
  1375. break;
  1376. case ObjectTypes.Integer:
  1377. esp->Value = a->Value << bits;
  1378. break;
  1379. default:
  1380. throw new NotImplementedException();
  1381. }
  1382. esp++;
  1383. }
  1384. break;
  1385. case OpCodeEnum.Shr:
  1386. {
  1387. b = esp - 1;
  1388. a = esp - 1 - 1;
  1389. esp = a;
  1390. int bits = b->Value;
  1391. switch (a->ObjectType)
  1392. {
  1393. case ObjectTypes.Long:
  1394. *((long*)&esp->Value) = *((long*)&a->Value) >> bits;
  1395. break;
  1396. case ObjectTypes.Integer:
  1397. esp->Value = a->Value >> bits;
  1398. break;
  1399. default:
  1400. throw new NotImplementedException();
  1401. }
  1402. esp++;
  1403. }
  1404. break;
  1405. case OpCodeEnum.Shr_Un:
  1406. {
  1407. b = esp - 1;
  1408. a = esp - 1 - 1;
  1409. esp = a;
  1410. int bits = b->Value;
  1411. switch (a->ObjectType)
  1412. {
  1413. case ObjectTypes.Long:
  1414. *((ulong*)&esp->Value) = *((ulong*)&a->Value) >> bits;
  1415. break;
  1416. case ObjectTypes.Integer:
  1417. *(uint*)&esp->Value = (uint)a->Value >> bits;
  1418. break;
  1419. default:
  1420. throw new NotImplementedException();
  1421. }
  1422. esp++;
  1423. }
  1424. break;
  1425. case OpCodeEnum.Not:
  1426. {
  1427. a = esp - 1;
  1428. switch (a->ObjectType)
  1429. {
  1430. case ObjectTypes.Long:
  1431. *((long*)&a->Value) = ~*((long*)&a->Value);
  1432. break;
  1433. case ObjectTypes.Integer:
  1434. a->Value = ~a->Value;
  1435. break;
  1436. default:
  1437. throw new NotImplementedException();
  1438. }
  1439. }
  1440. break;
  1441. case OpCodeEnum.Neg:
  1442. {
  1443. a = esp - 1;
  1444. switch (a->ObjectType)
  1445. {
  1446. case ObjectTypes.Long:
  1447. *((long*)&a->Value) = -*((long*)&a->Value);
  1448. break;
  1449. case ObjectTypes.Integer:
  1450. a->Value = -a->Value;
  1451. break;
  1452. case ObjectTypes.Float:
  1453. *((float*)&a->Value) = -*((float*)&a->Value);
  1454. break;
  1455. case ObjectTypes.Double:
  1456. *((double*)&a->Value) = -*((double*)&a->Value);
  1457. break;
  1458. default:
  1459. throw new NotImplementedException();
  1460. }
  1461. }
  1462. break;
  1463. #endregion
  1464. #region Control Flows
  1465. case OpCodeEnum.Ret:
  1466. returned = true;
  1467. break;
  1468. case OpCodeEnum.Brtrue:
  1469. case OpCodeEnum.Brtrue_S:
  1470. {
  1471. esp--;
  1472. bool res = false;
  1473. switch (esp->ObjectType)
  1474. {
  1475. case ObjectTypes.Integer:
  1476. res = esp->Value != 0;
  1477. break;
  1478. case ObjectTypes.Long:
  1479. res = *(long*)&esp->Value != 0;
  1480. break;
  1481. case ObjectTypes.Object:
  1482. res = mStack[esp->Value] != null;
  1483. break;
  1484. }
  1485. if (res)
  1486. {
  1487. ip = ptr + ip->TokenInteger;
  1488. Free(esp);
  1489. continue;
  1490. }
  1491. else
  1492. Free(esp);
  1493. }
  1494. break;
  1495. case OpCodeEnum.Brfalse:
  1496. case OpCodeEnum.Brfalse_S:
  1497. {
  1498. esp--;
  1499. bool res = false;
  1500. switch (esp->ObjectType)
  1501. {
  1502. case ObjectTypes.Null:
  1503. res = true;
  1504. break;
  1505. case ObjectTypes.Integer:
  1506. res = esp->Value == 0;
  1507. break;
  1508. case ObjectTypes.Long:
  1509. res = *(long*)&esp->Value == 0;
  1510. break;
  1511. case ObjectTypes.Object:
  1512. res = mStack[esp->Value] == null;
  1513. Free(esp);
  1514. break;
  1515. default:
  1516. Free(esp);
  1517. break;
  1518. }
  1519. if (res)
  1520. {
  1521. ip = ptr + ip->TokenInteger;
  1522. continue;
  1523. }
  1524. }
  1525. break;
  1526. case OpCodeEnum.Beq:
  1527. case OpCodeEnum.Beq_S:
  1528. {
  1529. b = esp - 1;
  1530. a = esp - 1 - 1;
  1531. bool transfer = false;
  1532. if (a->ObjectType == b->ObjectType)
  1533. {
  1534. switch (a->ObjectType)
  1535. {
  1536. case ObjectTypes.Null:
  1537. transfer = true;
  1538. break;
  1539. case ObjectTypes.Integer:
  1540. transfer = a->Value == b->Value;
  1541. break;
  1542. case ObjectTypes.Long:
  1543. transfer = *(long*)&a->Value == *(long*)&b->Value;
  1544. break;
  1545. case ObjectTypes.Float:
  1546. transfer = *(float*)&a->Value == *(float*)&b->Value;
  1547. break;
  1548. case ObjectTypes.Double:
  1549. transfer = *(double*)&a->Value == *(double*)&b->Value;
  1550. break;
  1551. case ObjectTypes.Object:
  1552. transfer = mStack[a->Value] == mStack[b->Value];
  1553. break;
  1554. default:
  1555. throw new NotImplementedException();
  1556. }
  1557. }
  1558. Free(esp - 1);
  1559. Free(esp - 1 - 1);
  1560. esp = esp - 1 - 1;
  1561. if (transfer)
  1562. {
  1563. ip = ptr + ip->TokenInteger;
  1564. continue;
  1565. }
  1566. }
  1567. break;
  1568. case OpCodeEnum.Bne_Un:
  1569. case OpCodeEnum.Bne_Un_S:
  1570. {
  1571. b = esp - 1;
  1572. a = esp - 1 - 1;
  1573. bool transfer = false;
  1574. if (a->ObjectType == b->ObjectType)
  1575. {
  1576. switch (a->ObjectType)
  1577. {
  1578. case ObjectTypes.Null:
  1579. transfer = false;
  1580. break;
  1581. case ObjectTypes.Integer:
  1582. transfer = (uint)a->Value != (uint)b->Value;
  1583. break;
  1584. case ObjectTypes.Float:
  1585. transfer = *(float*)&a->Value != *(float*)&b->Value;
  1586. break;
  1587. case ObjectTypes.Long:
  1588. transfer = *(long*)&a->Value != *(long*)&b->Value;
  1589. break;
  1590. case ObjectTypes.Double:
  1591. transfer = *(double*)&a->Value != *(double*)&b->Value;
  1592. break;
  1593. case ObjectTypes.Object:
  1594. transfer = mStack[a->Value] != mStack[b->Value];
  1595. break;
  1596. default:
  1597. throw new NotImplementedException();
  1598. }
  1599. }
  1600. else
  1601. transfer = true;
  1602. Free(esp - 1);
  1603. Free(esp - 1 - 1);
  1604. esp = esp - 1 - 1;
  1605. if (transfer)
  1606. {
  1607. ip = ptr + ip->TokenInteger;
  1608. continue;
  1609. }
  1610. }
  1611. break;
  1612. case OpCodeEnum.Bgt:
  1613. case OpCodeEnum.Bgt_S:
  1614. {
  1615. b = esp - 1;
  1616. a = esp - 1 - 1;
  1617. esp = esp - 1 - 1;
  1618. bool transfer = false;
  1619. switch (esp->ObjectType)
  1620. {
  1621. case ObjectTypes.Integer:
  1622. transfer = a->Value > b->Value;
  1623. break;
  1624. case ObjectTypes.Long:
  1625. transfer = *(long*)&a->Value > *(long*)&b->Value;
  1626. break;
  1627. case ObjectTypes.Float:
  1628. transfer = *(float*)&a->Value > *(float*)&b->Value;
  1629. break;
  1630. case ObjectTypes.Double:
  1631. transfer = *(double*)&a->Value > *(double*)&b->Value;
  1632. break;
  1633. default:
  1634. throw new NotImplementedException();
  1635. }
  1636. if (transfer)
  1637. {
  1638. ip = ptr + ip->TokenInteger;
  1639. continue;
  1640. }
  1641. }
  1642. break;
  1643. case OpCodeEnum.Bgt_Un:
  1644. case OpCodeEnum.Bgt_Un_S:
  1645. {
  1646. b = esp - 1;
  1647. a = esp - 1 - 1;
  1648. esp = esp - 1 - 1;
  1649. bool transfer = false;
  1650. switch (esp->ObjectType)
  1651. {
  1652. case ObjectTypes.Integer:
  1653. transfer = (uint)a->Value > (uint)b->Value;
  1654. break;
  1655. case ObjectTypes.Long:
  1656. transfer = *(ulong*)&a->Value > *(ulong*)&b->Value;
  1657. break;
  1658. case ObjectTypes.Float:
  1659. transfer = *(float*)&a->Value > *(float*)&b->Value;
  1660. break;
  1661. case ObjectTypes.Double:
  1662. transfer = *(double*)&a->Value > *(double*)&b->Value;
  1663. break;
  1664. default:
  1665. throw new NotImplementedException();
  1666. }
  1667. if (transfer)
  1668. {
  1669. ip = ptr + ip->TokenInteger;
  1670. continue;
  1671. }
  1672. }
  1673. break;
  1674. case OpCodeEnum.Bge:
  1675. case OpCodeEnum.Bge_S:
  1676. {
  1677. b = esp - 1;
  1678. a = esp - 1 - 1;
  1679. esp = esp - 1 - 1;
  1680. bool transfer = false;
  1681. switch (esp->ObjectType)
  1682. {
  1683. case ObjectTypes.Integer:
  1684. transfer = a->Value >= b->Value;
  1685. break;
  1686. case ObjectTypes.Long:
  1687. transfer = *(long*)&a->Value >= *(long*)&b->Value;
  1688. break;
  1689. case ObjectTypes.Float:
  1690. transfer = *(float*)&a->Value >= *(float*)&b->Value;
  1691. break;
  1692. case ObjectTypes.Double:
  1693. transfer = *(double*)&a->Value >= *(double*)&b->Value;
  1694. break;
  1695. default:
  1696. throw new NotImplementedException();
  1697. }
  1698. if (transfer)
  1699. {
  1700. ip = ptr + ip->TokenInteger;
  1701. continue;
  1702. }
  1703. }
  1704. break;
  1705. case OpCodeEnum.Bge_Un:
  1706. case OpCodeEnum.Bge_Un_S:
  1707. {
  1708. b = esp - 1;
  1709. a = esp - 1 - 1;
  1710. esp = esp - 1 - 1;
  1711. bool transfer = false;
  1712. switch (esp->ObjectType)
  1713. {
  1714. case ObjectTypes.Integer:
  1715. transfer = (uint)a->Value >= (uint)b->Value;
  1716. break;
  1717. case ObjectTypes.Long:
  1718. transfer = *(ulong*)&a->Value >= *(ulong*)&b->Value;
  1719. break;
  1720. case ObjectTypes.Float:
  1721. transfer = *(float*)&a->Value >= *(float*)&b->Value;
  1722. break;
  1723. case ObjectTypes.Double:
  1724. transfer = *(double*)&a->Value >= *(double*)&b->Value;
  1725. break;
  1726. default:
  1727. throw new NotImplementedException();
  1728. }
  1729. if (transfer)
  1730. {
  1731. ip = ptr + ip->TokenInteger;
  1732. continue;
  1733. }
  1734. }
  1735. break;
  1736. case OpCodeEnum.Blt:
  1737. case OpCodeEnum.Blt_S:
  1738. {
  1739. b = esp - 1;
  1740. a = esp - 1 - 1;
  1741. esp = esp - 1 - 1;
  1742. bool transfer = false;
  1743. switch (esp->ObjectType)
  1744. {
  1745. case ObjectTypes.Integer:
  1746. transfer = a->Value < b->Value;
  1747. break;
  1748. case ObjectTypes.Long:
  1749. transfer = *(long*)&a->Value < *(long*)&b->Value;
  1750. break;
  1751. case ObjectTypes.Float:
  1752. transfer = *(float*)&a->Value < *(float*)&b->Value;
  1753. break;
  1754. case ObjectTypes.Double:
  1755. transfer = *(double*)&a->Value < *(double*)&b->Value;
  1756. break;
  1757. default:
  1758. throw new NotImplementedException();
  1759. }
  1760. if (transfer)
  1761. {
  1762. ip = ptr + ip->TokenInteger;
  1763. continue;
  1764. }
  1765. }
  1766. break;
  1767. case OpCodeEnum.Blt_Un:
  1768. case OpCodeEnum.Blt_Un_S:
  1769. {
  1770. b = esp - 1;
  1771. a = esp - 1 - 1;
  1772. esp = esp - 1 - 1;
  1773. bool transfer = false;
  1774. switch (esp->ObjectType)
  1775. {
  1776. case ObjectTypes.Integer:
  1777. transfer = (uint)a->Value < (uint)b->Value;
  1778. break;
  1779. case ObjectTypes.Long:
  1780. transfer = *(ulong*)&a->Value < *(ulong*)&b->Value;
  1781. break;
  1782. case ObjectTypes.Float:
  1783. transfer = *(float*)&a->Value < *(float*)&b->Value;
  1784. break;
  1785. case ObjectTypes.Double:
  1786. transfer = *(double*)&a->Value < *(double*)&b->Value;
  1787. break;
  1788. default:
  1789. throw new NotImplementedException();
  1790. }
  1791. if (transfer)
  1792. {
  1793. ip = ptr + ip->TokenInteger;
  1794. continue;
  1795. }
  1796. }
  1797. break;
  1798. case OpCodeEnum.Ble:
  1799. case OpCodeEnum.Ble_S:
  1800. {
  1801. b = esp - 1;
  1802. a = esp - 1 - 1;
  1803. esp = esp - 1 - 1;
  1804. bool transfer = false;
  1805. switch (esp->ObjectType)
  1806. {
  1807. case ObjectTypes.Integer:
  1808. transfer = a->Value <= b->Value;
  1809. break;
  1810. case ObjectTypes.Long:
  1811. transfer = *(long*)&a->Value <= *(long*)&b->Value;
  1812. break;
  1813. case ObjectTypes.Float:
  1814. transfer = *(float*)&a->Value <= *(float*)&b->Value;
  1815. break;
  1816. case ObjectTypes.Double:
  1817. transfer = *(double*)&a->Value <= *(double*)&b->Value;
  1818. break;
  1819. default:
  1820. throw new NotImplementedException();
  1821. }
  1822. if (transfer)
  1823. {
  1824. ip = ptr + ip->TokenInteger;
  1825. continue;
  1826. }
  1827. }
  1828. break;
  1829. case OpCodeEnum.Ble_Un:
  1830. case OpCodeEnum.Ble_Un_S:
  1831. {
  1832. b = esp - 1;
  1833. a = esp - 1 - 1;
  1834. esp = esp - 1 - 1;
  1835. bool transfer = false;
  1836. switch (esp->ObjectType)
  1837. {
  1838. case ObjectTypes.Integer:
  1839. transfer = (uint)a->Value <= (uint)b->Value;
  1840. break;
  1841. case ObjectTypes.Long:
  1842. transfer = *(ulong*)&a->Value <= *(ulong*)&b->Value;
  1843. break;
  1844. case ObjectTypes.Float:
  1845. transfer = *(float*)&a->Value <= *(float*)&b->Value;
  1846. break;
  1847. case ObjectTypes.Double:
  1848. transfer = *(double*)&a->Value <= *(double*)&b->Value;
  1849. break;
  1850. default:
  1851. throw new NotImplementedException();
  1852. }
  1853. if (transfer)
  1854. {
  1855. ip = ptr + ip->TokenInteger;
  1856. continue;
  1857. }
  1858. }
  1859. break;
  1860. case OpCodeEnum.Br_S:
  1861. case OpCodeEnum.Br:
  1862. ip = ptr + ip->TokenInteger;
  1863. continue;
  1864. case OpCodeEnum.Switch:
  1865. {
  1866. intVal = (esp - 1)->Value;
  1867. Free(esp - 1);
  1868. esp--;
  1869. var table = method.JumpTables[ip->TokenInteger];
  1870. if (intVal >= 0 && intVal < table.Length)
  1871. {
  1872. ip = ptr + table[intVal];
  1873. continue;
  1874. }
  1875. }
  1876. break;
  1877. case OpCodeEnum.Leave:
  1878. case OpCodeEnum.Leave_S:
  1879. {
  1880. if (ehs != null)
  1881. {
  1882. ExceptionHandler eh = null;
  1883. int addr = (int)(ip - ptr);
  1884. var sql = from e in ehs
  1885. where addr >= e.TryStart && addr <=e.TryEnd && e.HandlerType == ExceptionHandlerType.Finally || e.HandlerType == ExceptionHandlerType.Fault
  1886. select e;
  1887. eh = sql.FirstOrDefault();
  1888. if (eh != null)
  1889. {
  1890. finallyEndAddress = ip->TokenInteger;
  1891. ip = ptr + eh.HandlerStart;
  1892. continue;
  1893. }
  1894. }
  1895. ip = ptr + ip->TokenInteger;
  1896. continue;
  1897. }
  1898. case OpCodeEnum.Endfinally:
  1899. {
  1900. ip = ptr + finallyEndAddress;
  1901. finallyEndAddress = 0;
  1902. continue;
  1903. }
  1904. case OpCodeEnum.Call:
  1905. case OpCodeEnum.Callvirt:
  1906. {
  1907. IMethod m = domain.GetMethod(ip->TokenInteger);
  1908. if (m == null)
  1909. {
  1910. //Irrelevant method
  1911. int cnt = (int)ip->TokenLong;
  1912. //Balance the stack
  1913. for (int i = 0; i < cnt; i++)
  1914. {
  1915. Free(esp - 1);
  1916. esp--;
  1917. }
  1918. }
  1919. else
  1920. {
  1921. if (m is ILMethod)
  1922. {
  1923. ILMethod ilm = (ILMethod)m;
  1924. bool processed = false;
  1925. if (m.IsDelegateInvoke)
  1926. {
  1927. var instance = StackObject.ToObject((Minus(esp, m.ParameterCount + 1)), domain, mStack);
  1928. if (instance is IDelegateAdapter)
  1929. {
  1930. esp = ((IDelegateAdapter)instance).ILInvoke(this, esp, mStack);
  1931. processed = true;
  1932. }
  1933. }
  1934. if (!processed)
  1935. {
  1936. if (code == OpCodeEnum.Callvirt)
  1937. {
  1938. objRef = GetObjectAndResolveReference(Minus(esp, ilm.ParameterCount + 1));
  1939. if (objRef->ObjectType == ObjectTypes.Null)
  1940. throw new NullReferenceException();
  1941. if (objRef->ObjectType == ObjectTypes.ValueTypeObjectReference)
  1942. {
  1943. dst = ILIntepreter.ResolveReference(objRef);
  1944. var ft = domain.GetTypeByIndex(dst->Value) as ILType;
  1945. ilm = ft.GetVirtualMethod(ilm) as ILMethod;
  1946. }
  1947. else
  1948. {
  1949. obj = mStack[objRef->Value];
  1950. if (obj == null)
  1951. throw new NullReferenceException();
  1952. ilm = ((ILTypeInstance)obj).Type.GetVirtualMethod(ilm) as ILMethod;
  1953. }
  1954. }
  1955. if (ilm.ShouldUseRegisterVM)
  1956. {
  1957. PrepareRegisterCallStack(esp, mStack, ilm);
  1958. esp = ExecuteR(ilm, esp, out unhandledException);
  1959. }
  1960. else
  1961. esp = Execute(ilm, esp, out unhandledException);
  1962. ValueTypeBasePointer = bp;
  1963. if (unhandledException)
  1964. returned = true;
  1965. }
  1966. }
  1967. else
  1968. {
  1969. CLRMethod cm = (CLRMethod)m;
  1970. bool processed = false;
  1971. if (cm.IsDelegateInvoke)
  1972. {
  1973. var instance = StackObject.ToObject((Minus(esp, cm.ParameterCount + 1)), domain, mStack);
  1974. if (instance is IDelegateAdapter)
  1975. {
  1976. esp = ((IDelegateAdapter)instance).ILInvoke(this, esp, mStack);
  1977. processed = true;
  1978. }
  1979. }
  1980. if (!processed)
  1981. {
  1982. var redirect = cm.Redirection;
  1983. if (redirect != null)
  1984. esp = redirect(this, esp, mStack, cm, false);
  1985. else
  1986. {
  1987. #if DEBUG && !DISABLE_ILRUNTIME_DEBUG
  1988. if (!allowUnboundCLRMethod)
  1989. throw new NotSupportedException(cm.ToString() + " is not bound!");
  1990. #endif
  1991. #if DEBUG && !NO_PROFILER
  1992. if (System.Threading.Thread.CurrentThread.ManagedThreadId == AppDomain.UnityMainThreadID)
  1993. #if UNITY_5_5_OR_NEWER
  1994. UnityEngine.Profiling.Profiler.BeginSample(cm.ToString());
  1995. #else
  1996. UnityEngine.Profiler.BeginSample(cm.ToString());
  1997. #endif
  1998. #endif
  1999. object result = cm.Invoke(this, esp, mStack);
  2000. #if DEBUG && !NO_PROFILER
  2001. if (System.Threading.Thread.CurrentThread.ManagedThreadId == AppDomain.UnityMainThreadID)
  2002. #if UNITY_5_5_OR_NEWER
  2003. UnityEngine.Profiling.Profiler.EndSample();
  2004. #else
  2005. UnityEngine.Profiler.EndSample();
  2006. #endif
  2007. #endif
  2008. if (result is CrossBindingAdaptorType)
  2009. result = ((CrossBindingAdaptorType)result).ILInstance;
  2010. int paramCount = cm.ParameterCount;
  2011. for (int i = 1; i <= paramCount; i++)
  2012. {
  2013. Free(Minus(esp, i));
  2014. }
  2015. esp = Minus(esp, paramCount);
  2016. if (cm.HasThis)
  2017. {
  2018. Free(esp - 1);
  2019. esp--;
  2020. }
  2021. if (cm.ReturnType != AppDomain.VoidType && !cm.IsConstructor)
  2022. {
  2023. esp = PushObject(esp, mStack, result, cm.ReturnType.TypeForCLR == typeof(object));
  2024. }
  2025. }
  2026. }
  2027. }
  2028. }
  2029. }
  2030. break;
  2031. #endregion
  2032. #region FieldOperation
  2033. case OpCodeEnum.Stfld:
  2034. {
  2035. objRef = GetObjectAndResolveReference(esp - 1 - 1);
  2036. if (objRef->ObjectType == ObjectTypes.ValueTypeObjectReference)
  2037. {
  2038. dst = ILIntepreter.ResolveReference(objRef);
  2039. var ft = domain.GetTypeByIndex(dst->Value);
  2040. if (ft is ILType)
  2041. CopyToValueTypeField(dst, (int)ip->TokenLong, esp - 1, mStack);
  2042. else
  2043. CopyToValueTypeField(dst, ((CLRType)ft).FieldIndexMapping[(int)ip->TokenLong], esp - 1, mStack);
  2044. }
  2045. else
  2046. {
  2047. obj = RetriveObject(objRef, mStack);
  2048. if (obj != null)
  2049. {
  2050. if (obj is ILTypeInstance)
  2051. {
  2052. ILTypeInstance instance = obj as ILTypeInstance;
  2053. val = esp - 1;
  2054. instance.AssignFromStack((int)ip->TokenLong, val, AppDomain, mStack);
  2055. }
  2056. else
  2057. {
  2058. var t = obj.GetType();
  2059. type = AppDomain.GetType((int)(ip->TokenLong >> 32));
  2060. if (type != null)
  2061. {
  2062. val = esp - 1;
  2063. var fieldToken = (int)ip->TokenLong;
  2064. var f = ((CLRType)type).GetField(fieldToken);
  2065. if (!((CLRType)type).AssignFieldFromStack(fieldToken, ref obj, this, val, mStack))
  2066. ((CLRType)type).SetFieldValue(fieldToken, ref obj, f.FieldType.CheckCLRTypes(CheckAndCloneValueType(StackObject.ToObject(val, domain, mStack), domain)));
  2067. //Writeback
  2068. if (t.IsValueType)
  2069. {
  2070. switch (objRef->ObjectType)
  2071. {
  2072. case ObjectTypes.Object:
  2073. mStack[objRef->Value] = obj;
  2074. break;
  2075. case ObjectTypes.FieldReference:
  2076. {
  2077. var oldObj = mStack[objRef->Value];
  2078. int idx = objRef->ValueLow;
  2079. if (oldObj is ILTypeInstance)
  2080. {
  2081. ((ILTypeInstance)oldObj)[idx] = obj;
  2082. }
  2083. else
  2084. {
  2085. var it = AppDomain.GetType(oldObj.GetType());
  2086. ((CLRType)it).SetFieldValue(idx, ref oldObj, obj);
  2087. }
  2088. }
  2089. break;
  2090. case ObjectTypes.ArrayReference:
  2091. {
  2092. var arr = mStack[objRef->Value] as Array;
  2093. int idx = objRef->ValueLow;
  2094. arr.SetValue(obj, idx);
  2095. }
  2096. break;
  2097. case ObjectTypes.StaticFieldReference:
  2098. {
  2099. var it = AppDomain.GetType(objRef->Value);
  2100. int idx = objRef->ValueLow;
  2101. if (it is ILType)
  2102. {
  2103. ((ILType)it).StaticInstance[idx] = obj;
  2104. }
  2105. else
  2106. {
  2107. ((CLRType)it).SetStaticFieldValue(idx, obj);
  2108. }
  2109. }
  2110. break;
  2111. case ObjectTypes.ValueTypeObjectReference:
  2112. {
  2113. dst = ILIntepreter.ResolveReference(objRef);
  2114. var ct = domain.GetTypeByIndex(dst->Value) as CLRType;
  2115. var binder = ct.ValueTypeBinder;
  2116. binder.CopyValueTypeToStack(obj, dst, mStack);
  2117. }
  2118. break;
  2119. default:
  2120. throw new NotImplementedException();
  2121. }
  2122. }
  2123. }
  2124. else
  2125. throw new TypeLoadException();
  2126. }
  2127. }
  2128. else
  2129. throw new NullReferenceException();
  2130. }
  2131. Free(esp - 1);
  2132. Free(esp - 1 - 1);
  2133. esp = esp - 1 - 1;
  2134. }
  2135. break;
  2136. case OpCodeEnum.Ldfld:
  2137. {
  2138. var ret = esp - 1;
  2139. objRef = GetObjectAndResolveReference(ret);
  2140. if (objRef->ObjectType == ObjectTypes.ValueTypeObjectReference)
  2141. {
  2142. dst = ILIntepreter.ResolveReference(objRef);
  2143. var ft = domain.GetTypeByIndex(dst->Value);
  2144. if (ft is ILType)
  2145. val = Minus(dst, (int)ip->TokenLong + 1);
  2146. else
  2147. val = Minus(dst, ((CLRType)ft).FieldIndexMapping[(int)ip->TokenLong] + 1);
  2148. if (val->ObjectType == ObjectTypes.ValueTypeObjectReference && ret->ObjectType == ObjectTypes.ValueTypeObjectReference)
  2149. {
  2150. stack.RelocateValueTypeAndFreeAfterDst(val, ret);
  2151. }
  2152. else
  2153. {
  2154. StackObject valRef;
  2155. if (val->ObjectType == ObjectTypes.ValueTypeObjectReference)
  2156. {
  2157. Free(ret);
  2158. CopyToStack(ret, val, mStack);
  2159. }
  2160. else
  2161. {
  2162. valRef = *val;
  2163. if (val->ObjectType >= ObjectTypes.Object)
  2164. obj = mStack[val->Value];
  2165. //CopyToStack(ret, dst, mStack);
  2166. Free(ret);
  2167. if (valRef.ObjectType >= ObjectTypes.Object)
  2168. {
  2169. valRef.Value = mStack.Count;
  2170. mStack.Add(obj);
  2171. }
  2172. *ret = valRef;
  2173. }
  2174. }
  2175. }
  2176. else
  2177. {
  2178. obj = RetriveObject(objRef, mStack);
  2179. Free(ret);
  2180. if (obj != null)
  2181. {
  2182. if (obj is ILTypeInstance)
  2183. {
  2184. ILTypeInstance instance = obj as ILTypeInstance;
  2185. instance.PushToStack((int)ip->TokenLong, ret, this, mStack);
  2186. }
  2187. else
  2188. {
  2189. //var t = obj.GetType();
  2190. type = AppDomain.GetType((int)(ip->TokenLong >> 32));
  2191. if (type != null)
  2192. {
  2193. var token = (int)ip->TokenLong;
  2194. if (!((CLRType)type).CopyFieldToStack(token, obj, this, ref ret, mStack))
  2195. {
  2196. var ft = ((CLRType)type).GetField(token);
  2197. obj = ((CLRType)type).GetFieldValue(token, obj);
  2198. if (obj is CrossBindingAdaptorType)
  2199. obj = ((CrossBindingAdaptorType)obj).ILInstance;
  2200. PushObject(ret, mStack, obj, ft.FieldType == typeof(object));
  2201. }
  2202. }
  2203. else
  2204. throw new TypeLoadException();
  2205. }
  2206. }
  2207. else
  2208. throw new NullReferenceException();
  2209. }
  2210. }
  2211. break;
  2212. case OpCodeEnum.Ldflda:
  2213. {
  2214. objRef = GetObjectAndResolveReference(esp - 1);
  2215. if (objRef->ObjectType == ObjectTypes.ValueTypeObjectReference)
  2216. {
  2217. dst = esp - 1;
  2218. var ft = domain.GetType((int)(ip->TokenLong >> 32));
  2219. StackObject* fieldAddr;
  2220. if (ft is ILType)
  2221. {
  2222. fieldAddr = Minus(ILIntepreter.ResolveReference(objRef), (int)ip->TokenLong + 1);
  2223. }
  2224. else
  2225. {
  2226. fieldAddr = Minus(ILIntepreter.ResolveReference(objRef), ((CLRType)ft).FieldIndexMapping[(int)ip->TokenLong] + 1);
  2227. }
  2228. StackObject valRef = *dst;
  2229. dst->ObjectType = ObjectTypes.StackObjectReference;
  2230. *(long*)&dst->Value = (long)fieldAddr;
  2231. FreeStackValueType(&valRef);
  2232. }
  2233. else
  2234. {
  2235. obj = RetriveObject(objRef, mStack);
  2236. Free(esp - 1);
  2237. if (obj != null)
  2238. {
  2239. if (obj is ILTypeInstance)
  2240. {
  2241. ILTypeInstance instance = obj as ILTypeInstance;
  2242. instance.PushFieldAddress((int)ip->TokenLong, esp - 1, mStack);
  2243. }
  2244. else
  2245. {
  2246. objRef = esp - 1;
  2247. objRef->ObjectType = ObjectTypes.FieldReference;
  2248. objRef->Value = mStack.Count;
  2249. mStack.Add(obj);
  2250. objRef->ValueLow = (int)ip->TokenLong;
  2251. }
  2252. }
  2253. else
  2254. throw new NullReferenceException();
  2255. }
  2256. }
  2257. break;
  2258. case OpCodeEnum.Stsfld:
  2259. {
  2260. type = AppDomain.GetType((int)(ip->TokenLong >> 32));
  2261. if (type != null)
  2262. {
  2263. if (type is ILType)
  2264. {
  2265. ILType t = type as ILType;
  2266. val = esp - 1;
  2267. t.StaticInstance.AssignFromStack((int)ip->TokenLong, val, AppDomain, mStack);
  2268. }
  2269. else
  2270. {
  2271. CLRType t = type as CLRType;
  2272. int idx = (int)ip->TokenLong;
  2273. var f = t.GetField(idx);
  2274. val = esp - 1;
  2275. obj = null;
  2276. if (!((CLRType)t).AssignFieldFromStack(idx, ref obj, this, val, mStack))
  2277. t.SetStaticFieldValue(idx, f.FieldType.CheckCLRTypes(CheckAndCloneValueType(StackObject.ToObject(val, domain, mStack), domain)));
  2278. }
  2279. }
  2280. else
  2281. throw new TypeLoadException();
  2282. Free(esp - 1);
  2283. esp -= 1;
  2284. }
  2285. break;
  2286. case OpCodeEnum.Ldsfld:
  2287. {
  2288. type = AppDomain.GetType((int)(ip->TokenLong >> 32));
  2289. if (type != null)
  2290. {
  2291. if (type is ILType)
  2292. {
  2293. ILType t = type as ILType;
  2294. t.StaticInstance.PushToStack((int)ip->TokenLong, esp, this, mStack);
  2295. esp++;
  2296. }
  2297. else
  2298. {
  2299. CLRType t = type as CLRType;
  2300. int idx = (int)ip->TokenLong;
  2301. if (!((CLRType)type).CopyFieldToStack(idx, null, this, ref esp, mStack))
  2302. {
  2303. var f = t.GetField(idx);
  2304. obj = t.GetFieldValue(idx, null);
  2305. if (obj is CrossBindingAdaptorType)
  2306. obj = ((CrossBindingAdaptorType)obj).ILInstance;
  2307. esp = PushObject(esp, mStack, obj, f.FieldType == typeof(object));
  2308. }
  2309. }
  2310. }
  2311. else
  2312. throw new TypeLoadException();
  2313. }
  2314. break;
  2315. case OpCodeEnum.Ldsflda:
  2316. {
  2317. int typeId = (int)(ip->TokenLong >> 32);
  2318. int fieldIdx = (int)(ip->TokenLong);
  2319. esp->ObjectType = ObjectTypes.StaticFieldReference;
  2320. esp->Value = typeId;
  2321. esp->ValueLow = fieldIdx;
  2322. esp++;
  2323. }
  2324. break;
  2325. case OpCodeEnum.Ldtoken:
  2326. {
  2327. switch (ip->TokenInteger)
  2328. {
  2329. case 0:
  2330. {
  2331. type = AppDomain.GetType((int)(ip->TokenLong >> 32));
  2332. if (type != null)
  2333. {
  2334. if (type is ILType)
  2335. {
  2336. ILType t = type as ILType;
  2337. t.StaticInstance.PushToStack((int)ip->TokenLong, esp, this, mStack);
  2338. }
  2339. else
  2340. throw new NotImplementedException();
  2341. }
  2342. }
  2343. esp++;
  2344. break;
  2345. case 1:
  2346. {
  2347. type = AppDomain.GetType((int)ip->TokenLong);
  2348. if (type != null)
  2349. {
  2350. esp = PushObject(esp, mStack, type.ReflectionType);
  2351. }
  2352. else
  2353. throw new TypeLoadException();
  2354. }
  2355. break;
  2356. default:
  2357. throw new NotImplementedException();
  2358. }
  2359. }
  2360. break;
  2361. case OpCodeEnum.Ldftn:
  2362. {
  2363. IMethod m = domain.GetMethod(ip->TokenInteger);
  2364. esp = PushObject(esp, mStack, m);
  2365. }
  2366. break;
  2367. case OpCodeEnum.Ldvirtftn:
  2368. {
  2369. IMethod m = domain.GetMethod(ip->TokenInteger);
  2370. objRef = esp - 1;
  2371. if (m is ILMethod)
  2372. {
  2373. ILMethod ilm = (ILMethod)m;
  2374. obj = mStack[objRef->Value];
  2375. m = ((ILTypeInstance)obj).Type.GetVirtualMethod(ilm) as ILMethod;
  2376. }
  2377. else
  2378. {
  2379. obj = mStack[objRef->Value];
  2380. if (obj is ILTypeInstance)
  2381. m = ((ILTypeInstance)obj).Type.GetVirtualMethod(m);
  2382. else if (obj is CrossBindingAdaptorType)
  2383. {
  2384. m = ((CrossBindingAdaptorType)obj).ILInstance.Type.BaseType.GetVirtualMethod(m);
  2385. }
  2386. }
  2387. Free(objRef);
  2388. esp = PushObject(objRef, mStack, m);
  2389. }
  2390. break;
  2391. #endregion
  2392. #region Compare
  2393. case OpCodeEnum.Ceq:
  2394. {
  2395. StackObject* obj1 = esp - 1 - 1;
  2396. StackObject* obj2 = esp - 1;
  2397. bool res = false;
  2398. if (obj1->ObjectType == obj2->ObjectType)
  2399. {
  2400. switch (obj1->ObjectType)
  2401. {
  2402. case ObjectTypes.Integer:
  2403. case ObjectTypes.Float:
  2404. res = obj1->Value == obj2->Value;
  2405. break;
  2406. case ObjectTypes.Object:
  2407. res = mStack[obj1->Value] == mStack[obj2->Value];
  2408. break;
  2409. case ObjectTypes.FieldReference:
  2410. res = mStack[obj1->Value] == mStack[obj2->Value] && obj1->ValueLow == obj2->ValueLow;
  2411. break;
  2412. case ObjectTypes.Null:
  2413. res = true;
  2414. break;
  2415. default:
  2416. res = obj1->Value == obj2->Value && obj1->ValueLow == obj2->ValueLow;
  2417. break;
  2418. }
  2419. }
  2420. else
  2421. {
  2422. switch (obj1->ObjectType)
  2423. {
  2424. case ObjectTypes.Object:
  2425. res = mStack[obj1->Value] == null && obj2->ObjectType == ObjectTypes.Null;
  2426. break;
  2427. case ObjectTypes.Null:
  2428. res = obj2->ObjectType == ObjectTypes.Object && mStack[obj2->Value] == null;
  2429. break;
  2430. }
  2431. }
  2432. Free(esp - 1);
  2433. Free(esp - 1 - 1);
  2434. if (res)
  2435. esp = PushOne(esp - 1 - 1);
  2436. else
  2437. esp = PushZero(esp - 1 - 1);
  2438. }
  2439. break;
  2440. case OpCodeEnum.Clt:
  2441. {
  2442. StackObject* obj1 = esp - 1 - 1;
  2443. StackObject* obj2 = esp - 1;
  2444. bool res = false;
  2445. switch (obj1->ObjectType)
  2446. {
  2447. case ObjectTypes.Integer:
  2448. res = obj1->Value < obj2->Value;
  2449. break;
  2450. case ObjectTypes.Long:
  2451. res = *(long*)&obj1->Value < *(long*)&obj2->Value;
  2452. break;
  2453. case ObjectTypes.Float:
  2454. res = *(float*)&obj1->Value < *(float*)&obj2->Value;
  2455. break;
  2456. case ObjectTypes.Double:
  2457. res = *(double*)&obj1->Value < *(double*)&obj2->Value;
  2458. break;
  2459. default:
  2460. throw new NotImplementedException();
  2461. }
  2462. if (res)
  2463. esp = PushOne(esp - 1 - 1);
  2464. else
  2465. esp = PushZero(esp - 1 - 1);
  2466. }
  2467. break;
  2468. case OpCodeEnum.Clt_Un:
  2469. {
  2470. StackObject* obj1 = esp - 1 - 1;
  2471. StackObject* obj2 = esp - 1;
  2472. bool res = false;
  2473. switch (obj1->ObjectType)
  2474. {
  2475. case ObjectTypes.Integer:
  2476. res = (uint)obj1->Value < (uint)obj2->Value && obj2->ObjectType != ObjectTypes.Null;
  2477. break;
  2478. case ObjectTypes.Long:
  2479. res = (ulong)*(long*)&obj1->Value < (ulong)*(long*)&obj2->Value && obj2->ObjectType != ObjectTypes.Null;
  2480. break;
  2481. case ObjectTypes.Float:
  2482. res = *(float*)&obj1->Value < *(float*)&obj2->Value && obj2->ObjectType != ObjectTypes.Null;
  2483. break;
  2484. case ObjectTypes.Double:
  2485. res = *(double*)&obj1->Value < *(double*)&obj2->Value && obj2->ObjectType != ObjectTypes.Null;
  2486. break;
  2487. default:
  2488. throw new NotImplementedException();
  2489. }
  2490. if (res)
  2491. esp = PushOne(esp - 1 - 1);
  2492. else
  2493. esp = PushZero(esp - 1 - 1);
  2494. }
  2495. break;
  2496. case OpCodeEnum.Cgt:
  2497. {
  2498. StackObject* obj1 = esp - 1 - 1;
  2499. StackObject* obj2 = esp - 1;
  2500. bool res = false;
  2501. switch (obj1->ObjectType)
  2502. {
  2503. case ObjectTypes.Integer:
  2504. res = obj1->Value > obj2->Value || obj2->ObjectType == ObjectTypes.Null;
  2505. break;
  2506. case ObjectTypes.Long:
  2507. res = *(long*)&obj1->Value > *(long*)&obj2->Value || obj2->ObjectType == ObjectTypes.Null;
  2508. break;
  2509. case ObjectTypes.Float:
  2510. res = *(float*)&obj1->Value > *(float*)&obj2->Value || obj2->ObjectType == ObjectTypes.Null;
  2511. break;
  2512. case ObjectTypes.Double:
  2513. res = *(double*)&obj1->Value > *(double*)&obj2->Value || obj2->ObjectType == ObjectTypes.Null;
  2514. break;
  2515. default:
  2516. throw new NotImplementedException();
  2517. }
  2518. if (res)
  2519. esp = PushOne(esp - 1 - 1);
  2520. else
  2521. esp = PushZero(esp - 1 - 1);
  2522. }
  2523. break;
  2524. case OpCodeEnum.Cgt_Un:
  2525. {
  2526. StackObject* obj1 = esp - 1 - 1;
  2527. StackObject* obj2 = esp - 1;
  2528. bool res = false;
  2529. switch (obj1->ObjectType)
  2530. {
  2531. case ObjectTypes.Integer:
  2532. res = ((uint)obj1->Value > (uint)obj2->Value) || obj2->ObjectType == ObjectTypes.Null;
  2533. break;
  2534. case ObjectTypes.Long:
  2535. res = (ulong)*(long*)&obj1->Value > (ulong)*(long*)&obj2->Value || obj2->ObjectType == ObjectTypes.Null;
  2536. break;
  2537. case ObjectTypes.Float:
  2538. res = *(float*)&obj1->Value > *(float*)&obj2->Value || obj2->ObjectType == ObjectTypes.Null;
  2539. break;
  2540. case ObjectTypes.Double:
  2541. res = *(double*)&obj1->Value > *(double*)&obj2->Value || obj2->ObjectType == ObjectTypes.Null;
  2542. break;
  2543. case ObjectTypes.Object:
  2544. res = mStack[obj1->Value] != null && obj2->ObjectType == ObjectTypes.Null;
  2545. break;
  2546. case ObjectTypes.Null:
  2547. res = false;
  2548. break;
  2549. default:
  2550. throw new NotImplementedException();
  2551. }
  2552. if (res)
  2553. esp = PushOne(esp - 1 - 1);
  2554. else
  2555. esp = PushZero(esp - 1 - 1);
  2556. }
  2557. break;
  2558. #endregion
  2559. #region Initialization & Instantiation
  2560. case OpCodeEnum.Newobj:
  2561. {
  2562. IMethod m = domain.GetMethod(ip->TokenInteger);
  2563. if (m is ILMethod)
  2564. {
  2565. type = m.DeclearingType as ILType;
  2566. if (type.IsDelegate)
  2567. {
  2568. objRef = GetObjectAndResolveReference(esp - 1 - 1);
  2569. var mi = (IMethod)mStack[(esp - 1)->Value];
  2570. object ins;
  2571. if (objRef->ObjectType == ObjectTypes.Null)
  2572. ins = null;
  2573. else
  2574. ins = mStack[objRef->Value];
  2575. Free(esp - 1);
  2576. Free(esp - 1 - 1);
  2577. esp = esp - 1 - 1;
  2578. object dele;
  2579. var ilMethod = mi as ILMethod;
  2580. if (ilMethod != null)
  2581. {
  2582. if (ins != null)
  2583. {
  2584. dele = ((ILTypeInstance) ins).GetDelegateAdapter(ilMethod);
  2585. if (dele == null)
  2586. {
  2587. var invokeMethod = type.GetMethod("Invoke", mi.ParameterCount);
  2588. dele = domain.DelegateManager.FindDelegateAdapter(
  2589. (ILTypeInstance) ins, ilMethod, invokeMethod);
  2590. }
  2591. }
  2592. else
  2593. {
  2594. if (ilMethod.DelegateAdapter == null)
  2595. {
  2596. var invokeMethod = type.GetMethod("Invoke", mi.ParameterCount);
  2597. ilMethod.DelegateAdapter = domain.DelegateManager.FindDelegateAdapter(null, ilMethod, invokeMethod);
  2598. }
  2599. dele = ilMethod.DelegateAdapter;
  2600. }
  2601. }
  2602. else
  2603. {
  2604. throw new NotImplementedException();
  2605. }
  2606. esp = PushObject(esp, mStack, dele);
  2607. }
  2608. else
  2609. {
  2610. a = esp - m.ParameterCount;
  2611. obj = null;
  2612. bool isValueType = type.IsValueType;
  2613. if (isValueType)
  2614. {
  2615. stack.AllocValueType(esp, type);
  2616. objRef = esp + 1;
  2617. objRef->ObjectType = ObjectTypes.StackObjectReference;
  2618. *(long*)&objRef->Value = (long)esp;
  2619. objRef++;
  2620. }
  2621. else
  2622. {
  2623. obj = ((ILType)type).Instantiate(false);
  2624. objRef = PushObject(esp, mStack, obj);//this parameter for constructor
  2625. }
  2626. esp = objRef;
  2627. for (int i = 0; i < m.ParameterCount; i++)
  2628. {
  2629. CopyToStack(esp, a + i, mStack);
  2630. esp++;
  2631. }
  2632. if (((ILMethod)m).ShouldUseRegisterVM)
  2633. {
  2634. PrepareRegisterCallStack(esp, mStack, (ILMethod)m);
  2635. esp = ExecuteR((ILMethod)m, esp, out unhandledException);
  2636. }
  2637. else
  2638. esp = Execute((ILMethod)m, esp, out unhandledException);
  2639. ValueTypeBasePointer = bp;
  2640. for (int i = m.ParameterCount - 1; i >= 0; i--)
  2641. {
  2642. Free(Add(a, i));
  2643. }
  2644. if (isValueType)
  2645. {
  2646. var ins = objRef - 1 - 1;
  2647. *a = *ins;
  2648. esp = a + 1;
  2649. }
  2650. else
  2651. esp = PushObject(a, mStack, obj);//new constructedObj
  2652. }
  2653. if (unhandledException)
  2654. returned = true;
  2655. }
  2656. else
  2657. {
  2658. CLRMethod cm = (CLRMethod)m;
  2659. //Means new object();
  2660. if (cm == null)
  2661. {
  2662. esp = PushObject(esp, mStack, new object());
  2663. }
  2664. else
  2665. {
  2666. if (cm.DeclearingType.IsDelegate)
  2667. {
  2668. objRef = GetObjectAndResolveReference(esp - 1 - 1);
  2669. var mi = (IMethod)mStack[(esp - 1)->Value];
  2670. object ins;
  2671. if (objRef->ObjectType == ObjectTypes.Null)
  2672. ins = null;
  2673. else
  2674. ins = mStack[objRef->Value];
  2675. Free(esp - 1);
  2676. Free(esp - 1 - 1);
  2677. esp = esp - 1 - 1;
  2678. object dele;
  2679. var ilMethod = mi as ILMethod;
  2680. if (ilMethod != null)
  2681. {
  2682. if (ins != null)
  2683. {
  2684. dele = ((ILTypeInstance)ins).GetDelegateAdapter(ilMethod);
  2685. if (dele == null)
  2686. {
  2687. var invokeMethod =
  2688. cm.DeclearingType.GetMethod("Invoke",
  2689. mi.ParameterCount);
  2690. dele = domain.DelegateManager.FindDelegateAdapter(
  2691. (ILTypeInstance) ins, ilMethod, invokeMethod);
  2692. }
  2693. }
  2694. else
  2695. {
  2696. if (ilMethod.DelegateAdapter == null)
  2697. {
  2698. var invokeMethod = cm.DeclearingType.GetMethod("Invoke", mi.ParameterCount);
  2699. ilMethod.DelegateAdapter = domain.DelegateManager.FindDelegateAdapter(null, ilMethod, invokeMethod);
  2700. }
  2701. dele = ilMethod.DelegateAdapter;
  2702. }
  2703. }
  2704. else
  2705. {
  2706. if (ins is ILTypeInstance)
  2707. ins = ((ILTypeInstance)ins).CLRInstance;
  2708. dele = Delegate.CreateDelegate(cm.DeclearingType.TypeForCLR, ins, ((CLRMethod)mi).MethodInfo);
  2709. }
  2710. esp = PushObject(esp, mStack, dele);
  2711. }
  2712. else
  2713. {
  2714. var redirect = cm.Redirection;
  2715. if (redirect != null)
  2716. esp = redirect(this, esp, mStack, cm, true);
  2717. else
  2718. {
  2719. #if DEBUG && !DISABLE_ILRUNTIME_DEBUG
  2720. if (!allowUnboundCLRMethod)
  2721. throw new NotSupportedException(cm.ToString() + " is not bound!");
  2722. #endif
  2723. object result = cm.Invoke(this, esp, mStack, true);
  2724. int paramCount = cm.ParameterCount;
  2725. for (int i = 1; i <= paramCount; i++)
  2726. {
  2727. Free(esp - i);
  2728. }
  2729. esp = Minus(esp, paramCount);
  2730. esp = PushObject(esp, mStack, result);//new constructedObj
  2731. }
  2732. }
  2733. }
  2734. }
  2735. }
  2736. break;
  2737. case OpCodeEnum.Constrained:
  2738. {
  2739. type = domain.GetType(ip->TokenInteger);
  2740. var m = domain.GetMethod((int)ip->TokenLong);
  2741. var pCnt = m.ParameterCount;
  2742. objRef = Minus(esp, pCnt + 1);
  2743. var insIdx = mStack.Count;
  2744. if (objRef->ObjectType < ObjectTypes.Object)
  2745. {
  2746. bool moved = false;
  2747. //move parameters
  2748. for (int i = 0; i < pCnt; i++)
  2749. {
  2750. var pPtr = Minus(esp, i + 1);
  2751. if (pPtr->ObjectType >= ObjectTypes.Object)
  2752. {
  2753. var oldVal = pPtr->Value;
  2754. insIdx--;
  2755. if (!moved)
  2756. {
  2757. pPtr->Value = mStack.Count;
  2758. mStack.Add(mStack[oldVal]);
  2759. mStack[oldVal] = null;
  2760. moved = true;
  2761. }
  2762. else
  2763. {
  2764. mStack[oldVal + 1] = mStack[oldVal];
  2765. mStack[oldVal] = null;
  2766. pPtr->Value = oldVal + 1;
  2767. }
  2768. }
  2769. }
  2770. if (!moved)
  2771. {
  2772. mStack.Add(null);
  2773. }
  2774. }
  2775. else
  2776. insIdx = objRef->Value;
  2777. objRef2 = GetObjectAndResolveReference(objRef);
  2778. if (type != null)
  2779. {
  2780. if (type is ILType)
  2781. {
  2782. var t = (ILType)type;
  2783. if (t.IsEnum)
  2784. {
  2785. ILEnumTypeInstance ins = new ILEnumTypeInstance(t);
  2786. switch (objRef2->ObjectType)
  2787. {
  2788. case ObjectTypes.FieldReference:
  2789. {
  2790. var owner = mStack[objRef2->Value] as ILTypeInstance;
  2791. int idx = objRef2->ValueLow;
  2792. //Free(objRef);
  2793. owner.PushToStack(idx, objRef, this, mStack);
  2794. ins.AssignFromStack(0, objRef, AppDomain, mStack);
  2795. ins.Boxed = true;
  2796. }
  2797. break;
  2798. case ObjectTypes.StaticFieldReference:
  2799. {
  2800. var st = AppDomain.GetType(objRef2->Value) as ILType;
  2801. int idx = objRef2->ValueLow;
  2802. //Free(objRef);
  2803. st.StaticInstance.PushToStack(idx, objRef, this, mStack);
  2804. ins.AssignFromStack(0, objRef, AppDomain, mStack);
  2805. ins.Boxed = true;
  2806. }
  2807. break;
  2808. case ObjectTypes.ArrayReference:
  2809. {
  2810. var arr = mStack[objRef2->Value];
  2811. var idx = objRef2->ValueLow;
  2812. //Free(objRef);
  2813. LoadFromArrayReference(arr, idx, objRef, t, mStack);
  2814. ins.AssignFromStack(0, objRef, AppDomain, mStack);
  2815. ins.Boxed = true;
  2816. }
  2817. break;
  2818. default:
  2819. ins.AssignFromStack(0, objRef2, AppDomain, mStack);
  2820. ins.Boxed = true;
  2821. break;
  2822. }
  2823. objRef->ObjectType = ObjectTypes.Object;
  2824. objRef->Value = insIdx;
  2825. mStack[insIdx] = ins;
  2826. //esp = PushObject(esp - 1, mStack, ins);
  2827. }
  2828. else if(objRef2->ObjectType != ObjectTypes.ValueTypeObjectReference)
  2829. {
  2830. object res = RetriveObject(objRef2, mStack);
  2831. //Free(objRef);
  2832. objRef->ObjectType = ObjectTypes.Object;
  2833. objRef->Value = insIdx;
  2834. mStack[insIdx] = res;
  2835. //esp = PushObject(objRef, mStack, res, true);
  2836. }
  2837. }
  2838. else
  2839. {
  2840. var tt = type.TypeForCLR;
  2841. if (tt.IsEnum)
  2842. {
  2843. mStack[insIdx] = Enum.ToObject(tt, StackObject.ToObject(objRef2, AppDomain, mStack));
  2844. objRef->ObjectType = ObjectTypes.Object;
  2845. objRef->Value = insIdx;
  2846. //esp = PushObject(esp - 1, mStack, Enum.ToObject(tt, StackObject.ToObject(obj, AppDomain, mStack)), true);
  2847. }
  2848. else if (tt.IsPrimitive)
  2849. {
  2850. mStack[insIdx] = tt.CheckCLRTypes(StackObject.ToObject(objRef2, AppDomain, mStack));
  2851. objRef->ObjectType = ObjectTypes.Object;
  2852. objRef->Value = insIdx;
  2853. //esp = PushObject(esp - 1, mStack, tt.CheckCLRTypes(StackObject.ToObject(obj, AppDomain, mStack)));
  2854. }
  2855. else if (objRef2->ObjectType != ObjectTypes.ValueTypeObjectReference)
  2856. {
  2857. object res = RetriveObject(objRef2, mStack);
  2858. //Free(objRef);
  2859. objRef->ObjectType = ObjectTypes.Object;
  2860. objRef->Value = insIdx;
  2861. mStack[insIdx] = res;
  2862. //esp = PushObject(objRef, mStack, res, true);
  2863. }
  2864. }
  2865. }
  2866. else
  2867. throw new NullReferenceException();
  2868. }
  2869. break;
  2870. case OpCodeEnum.Box:
  2871. {
  2872. objRef = esp - 1;
  2873. type = domain.GetType(ip->TokenInteger);
  2874. if (type != null)
  2875. {
  2876. if (type is ILType)
  2877. {
  2878. if (((ILType)type).IsEnum)
  2879. {
  2880. ILEnumTypeInstance ins = new Intepreter.ILEnumTypeInstance((ILType)type);
  2881. ins.AssignFromStack(0, objRef, AppDomain, mStack);
  2882. ins.Boxed = true;
  2883. esp = PushObject(objRef, mStack, ins, true);
  2884. }
  2885. else
  2886. {
  2887. switch (objRef->ObjectType)
  2888. {
  2889. case ObjectTypes.Null:
  2890. break;
  2891. case ObjectTypes.ValueTypeObjectReference:
  2892. {
  2893. ILTypeInstance ins = ((ILType)type).Instantiate(false);
  2894. ins.AssignFromStack(objRef, domain, mStack);
  2895. FreeStackValueType(objRef);
  2896. esp = PushObject(objRef, mStack, ins, true);
  2897. }
  2898. break;
  2899. default:
  2900. {
  2901. obj = mStack[objRef->Value];
  2902. Free(objRef);
  2903. if (type.IsArray)
  2904. {
  2905. esp = PushObject(objRef, mStack, obj, true);
  2906. }
  2907. else
  2908. {
  2909. ILTypeInstance ins = (ILTypeInstance)obj;
  2910. if (ins != null)
  2911. {
  2912. if (ins.IsValueType)
  2913. {
  2914. ins.Boxed = true;
  2915. }
  2916. esp = PushObject(objRef, mStack, ins, true);
  2917. }
  2918. else
  2919. {
  2920. esp = PushNull(objRef);
  2921. }
  2922. }
  2923. }
  2924. break;
  2925. }
  2926. }
  2927. }
  2928. else
  2929. {
  2930. if (type.TypeForCLR.IsPrimitive)
  2931. {
  2932. var t = type.TypeForCLR;
  2933. if (t == typeof(int))
  2934. {
  2935. switch (objRef->ObjectType)
  2936. {
  2937. case ObjectTypes.Integer:
  2938. esp = PushObject(objRef, mStack, objRef->Value, true);
  2939. break;
  2940. case ObjectTypes.Null:
  2941. esp = PushObject(objRef, mStack, 0, true);
  2942. break;
  2943. case ObjectTypes.Object:
  2944. break;
  2945. default:
  2946. throw new NotImplementedException();
  2947. }
  2948. }
  2949. else if (t == typeof(bool))
  2950. {
  2951. switch (objRef->ObjectType)
  2952. {
  2953. case ObjectTypes.Integer:
  2954. esp = PushObject(objRef, mStack, (objRef->Value == 1), true);
  2955. break;
  2956. case ObjectTypes.Null:
  2957. esp = PushObject(objRef, mStack, false, true);
  2958. break;
  2959. case ObjectTypes.Object:
  2960. break;
  2961. default:
  2962. throw new NotImplementedException();
  2963. }
  2964. }
  2965. else if (t == typeof(byte))
  2966. {
  2967. switch (objRef->ObjectType)
  2968. {
  2969. case ObjectTypes.Integer:
  2970. esp = PushObject(objRef, mStack, (byte)objRef->Value, true);
  2971. break;
  2972. case ObjectTypes.Null:
  2973. esp = PushObject(objRef, mStack, 0L, true);
  2974. break;
  2975. case ObjectTypes.Object:
  2976. break;
  2977. default:
  2978. throw new NotImplementedException();
  2979. }
  2980. }
  2981. else if (t == typeof(short))
  2982. {
  2983. switch (objRef->ObjectType)
  2984. {
  2985. case ObjectTypes.Integer:
  2986. esp = PushObject(objRef, mStack, (short)objRef->Value, true);
  2987. break;
  2988. case ObjectTypes.Null:
  2989. esp = PushObject(objRef, mStack, (short)0, true);
  2990. break;
  2991. case ObjectTypes.Object:
  2992. break;
  2993. default:
  2994. throw new NotImplementedException();
  2995. }
  2996. }
  2997. else if (t == typeof(long))
  2998. {
  2999. switch (objRef->ObjectType)
  3000. {
  3001. case ObjectTypes.Long:
  3002. esp = PushObject(objRef, mStack, *(long*)&objRef->Value, true);
  3003. break;
  3004. case ObjectTypes.Null:
  3005. esp = PushObject(objRef, mStack, 0L, true);
  3006. break;
  3007. case ObjectTypes.Object:
  3008. break;
  3009. default:
  3010. throw new NotImplementedException();
  3011. }
  3012. }
  3013. else if (t == typeof(float))
  3014. {
  3015. switch (objRef->ObjectType)
  3016. {
  3017. case ObjectTypes.Float:
  3018. esp = PushObject(objRef, mStack, *(float*)&objRef->Value, true);
  3019. break;
  3020. case ObjectTypes.Null:
  3021. esp = PushObject(objRef, mStack, 0f, true);
  3022. break;
  3023. case ObjectTypes.Object:
  3024. break;
  3025. default:
  3026. throw new NotImplementedException();
  3027. }
  3028. }
  3029. else if (t == typeof(double))
  3030. {
  3031. switch (objRef->ObjectType)
  3032. {
  3033. case ObjectTypes.Double:
  3034. esp = PushObject(objRef, mStack, *(double*)&objRef->Value, true);
  3035. break;
  3036. case ObjectTypes.Null:
  3037. esp = PushObject(objRef, mStack, 0.0, true);
  3038. break;
  3039. case ObjectTypes.Object:
  3040. break;
  3041. default:
  3042. throw new NotImplementedException();
  3043. }
  3044. }
  3045. else if (t == typeof(char))
  3046. {
  3047. switch (objRef->ObjectType)
  3048. {
  3049. case ObjectTypes.Integer:
  3050. esp = PushObject(objRef, mStack, (char)objRef->Value, true);
  3051. break;
  3052. case ObjectTypes.Object:
  3053. break;
  3054. default:
  3055. throw new NotImplementedException();
  3056. }
  3057. }
  3058. else if (t == typeof(uint))
  3059. {
  3060. switch (objRef->ObjectType)
  3061. {
  3062. case ObjectTypes.Integer:
  3063. esp = PushObject(objRef, mStack, (uint)objRef->Value, true);
  3064. break;
  3065. case ObjectTypes.Null:
  3066. esp = PushObject(objRef, mStack, (uint)0, true);
  3067. break;
  3068. case ObjectTypes.Object:
  3069. break;
  3070. default:
  3071. throw new NotImplementedException();
  3072. }
  3073. }
  3074. else if (t == typeof(ushort))
  3075. {
  3076. switch (objRef->ObjectType)
  3077. {
  3078. case ObjectTypes.Integer:
  3079. esp = PushObject(objRef, mStack, (ushort)objRef->Value, true);
  3080. break;
  3081. case ObjectTypes.Null:
  3082. esp = PushObject(objRef, mStack, (ushort)0, true);
  3083. break;
  3084. case ObjectTypes.Object:
  3085. break;
  3086. default:
  3087. throw new NotImplementedException();
  3088. }
  3089. }
  3090. else if (t == typeof(ulong))
  3091. {
  3092. switch (objRef->ObjectType)
  3093. {
  3094. case ObjectTypes.Long:
  3095. esp = PushObject(objRef, mStack, *(ulong*)&objRef->Value, true);
  3096. break;
  3097. case ObjectTypes.Null:
  3098. esp = PushObject(objRef, mStack, (ulong)0, true);
  3099. break;
  3100. case ObjectTypes.Object:
  3101. break;
  3102. default:
  3103. throw new NotImplementedException();
  3104. }
  3105. }
  3106. else if (t == typeof(sbyte))
  3107. {
  3108. switch (objRef->ObjectType)
  3109. {
  3110. case ObjectTypes.Integer:
  3111. esp = PushObject(objRef, mStack, (sbyte)objRef->Value, true);
  3112. break;
  3113. case ObjectTypes.Null:
  3114. esp = PushObject(objRef, mStack, (sbyte)0, true);
  3115. break;
  3116. case ObjectTypes.Object:
  3117. break;
  3118. default:
  3119. throw new NotImplementedException();
  3120. }
  3121. }
  3122. else
  3123. throw new NotImplementedException();
  3124. }
  3125. else if (type.TypeForCLR.IsEnum)
  3126. {
  3127. esp = PushObject(objRef, mStack, Enum.ToObject(type.TypeForCLR, StackObject.ToObject(objRef, AppDomain, mStack)), true);
  3128. }
  3129. else
  3130. {
  3131. if (objRef->ObjectType == ObjectTypes.ValueTypeObjectReference)
  3132. {
  3133. dst = ILIntepreter.ResolveReference(objRef);
  3134. var vt = domain.GetTypeByIndex(dst->Value);
  3135. if (vt != type)
  3136. throw new InvalidCastException();
  3137. object ins = ((CLRType)vt).ValueTypeBinder.ToObject(dst, mStack);
  3138. FreeStackValueType(objRef);
  3139. esp = PushObject(objRef, mStack, ins, true);
  3140. }
  3141. //nothing to do for CLR type boxing
  3142. }
  3143. }
  3144. }
  3145. else
  3146. throw new NullReferenceException();
  3147. }
  3148. break;
  3149. case OpCodeEnum.Unbox:
  3150. case OpCodeEnum.Unbox_Any:
  3151. {
  3152. objRef = esp - 1;
  3153. if (objRef->ObjectType == ObjectTypes.Object)
  3154. {
  3155. obj = mStack[objRef->Value];
  3156. Free(objRef);
  3157. if (obj != null)
  3158. {
  3159. var t = domain.GetType(ip->TokenInteger);
  3160. if (t != null)
  3161. {
  3162. clrType = t.TypeForCLR;
  3163. bool isEnumObj = obj is ILEnumTypeInstance;
  3164. if ((t is CLRType) && clrType.IsPrimitive && !isEnumObj)
  3165. {
  3166. if (clrType == typeof(int))
  3167. {
  3168. int value = obj.ToInt32();
  3169. objRef->ObjectType = ObjectTypes.Integer;
  3170. objRef->Value = value;
  3171. }
  3172. else if (clrType == typeof(bool))
  3173. {
  3174. bool value = (bool)obj;
  3175. objRef->ObjectType = ObjectTypes.Integer;
  3176. objRef->Value = value ? 1 : 0;
  3177. }
  3178. else if (clrType == typeof(short))
  3179. {
  3180. short value = obj.ToInt16();
  3181. objRef->ObjectType = ObjectTypes.Integer;
  3182. objRef->Value = value;
  3183. }
  3184. else if (clrType == typeof(long))
  3185. {
  3186. long value = obj.ToInt64();
  3187. objRef->ObjectType = ObjectTypes.Long;
  3188. *(long*)&objRef->Value = value;
  3189. }
  3190. else if (clrType == typeof(float))
  3191. {
  3192. float value = obj.ToFloat();
  3193. objRef->ObjectType = ObjectTypes.Float;
  3194. *(float*)&objRef->Value = value;
  3195. }
  3196. else if (clrType == typeof(byte))
  3197. {
  3198. byte value = (byte)obj;
  3199. objRef->ObjectType = ObjectTypes.Integer;
  3200. objRef->Value = value;
  3201. }
  3202. else if (clrType == typeof(double))
  3203. {
  3204. double value = obj.ToDouble();
  3205. objRef->ObjectType = ObjectTypes.Double;
  3206. *(double*)&objRef->Value = value;
  3207. }
  3208. else if (clrType == typeof(char))
  3209. {
  3210. char value = (char)obj;
  3211. objRef->ObjectType = ObjectTypes.Integer;
  3212. *(&objRef->Value) = value;
  3213. }
  3214. else if (clrType == typeof(uint))
  3215. {
  3216. uint value = (uint)obj;
  3217. objRef->ObjectType = ObjectTypes.Integer;
  3218. objRef->Value = (int)value;
  3219. }
  3220. else if (clrType == typeof(ushort))
  3221. {
  3222. ushort value = (ushort)obj;
  3223. objRef->ObjectType = ObjectTypes.Integer;
  3224. objRef->Value = value;
  3225. }
  3226. else if (clrType == typeof(ulong))
  3227. {
  3228. ulong value = (ulong)obj;
  3229. objRef->ObjectType = ObjectTypes.Long;
  3230. *(ulong*)&objRef->Value = value;
  3231. }
  3232. else if (clrType == typeof(sbyte))
  3233. {
  3234. sbyte value = (sbyte)obj;
  3235. objRef->ObjectType = ObjectTypes.Integer;
  3236. objRef->Value = value;
  3237. }
  3238. else
  3239. throw new NotImplementedException();
  3240. }
  3241. else if (t.IsValueType)
  3242. {
  3243. if (obj is ILTypeInstance)
  3244. {
  3245. var res = ((ILTypeInstance)obj);
  3246. if (res is ILEnumTypeInstance)
  3247. {
  3248. res.PushToStack(0, objRef, this, mStack);
  3249. }
  3250. else
  3251. {
  3252. if (res.Boxed)
  3253. {
  3254. res = res.Clone();
  3255. res.Boxed = false;
  3256. }
  3257. PushObject(objRef, mStack, res);
  3258. }
  3259. }
  3260. else
  3261. PushObject(objRef, mStack, obj);
  3262. }
  3263. else
  3264. {
  3265. PushObject(objRef, mStack, obj);
  3266. }
  3267. }
  3268. else
  3269. throw new TypeLoadException();
  3270. }
  3271. else
  3272. throw new NullReferenceException();
  3273. }
  3274. else if (objRef->ObjectType < ObjectTypes.StackObjectReference)
  3275. {
  3276. //Nothing to do with primitive types
  3277. }
  3278. else
  3279. throw new InvalidCastException();
  3280. }
  3281. break;
  3282. case OpCodeEnum.Initobj:
  3283. {
  3284. objRef = GetObjectAndResolveReference(esp - 1);
  3285. type = domain.GetType(ip->TokenInteger);
  3286. if (type is ILType)
  3287. {
  3288. ILType it = (ILType)type;
  3289. if (it.IsValueType)
  3290. {
  3291. switch (objRef->ObjectType)
  3292. {
  3293. case ObjectTypes.Null:
  3294. throw new NullReferenceException();
  3295. case ObjectTypes.Integer:
  3296. case ObjectTypes.Float:
  3297. objRef->Value = 0;
  3298. break;
  3299. case ObjectTypes.Long:
  3300. case ObjectTypes.Double:
  3301. *(long*)&objRef->Value = 0;
  3302. break;
  3303. case ObjectTypes.ValueTypeObjectReference:
  3304. stack.ClearValueTypeObject(type, ILIntepreter.ResolveReference(objRef));
  3305. break;
  3306. case ObjectTypes.Object:
  3307. {
  3308. obj = mStack[objRef->Value];
  3309. if (obj != null)
  3310. {
  3311. if (obj is ILTypeInstance)
  3312. {
  3313. ILTypeInstance instance = obj as ILTypeInstance;
  3314. instance.Clear();
  3315. }
  3316. else
  3317. throw new NotSupportedException();
  3318. }
  3319. else
  3320. throw new NullReferenceException();
  3321. }
  3322. break;
  3323. case ObjectTypes.ArrayReference:
  3324. {
  3325. var arr = mStack[objRef->Value] as Array;
  3326. var idx = objRef->ValueLow;
  3327. obj = arr.GetValue(idx);
  3328. if (obj == null)
  3329. arr.SetValue(it.Instantiate(), idx);
  3330. else
  3331. {
  3332. if (obj is ILTypeInstance)
  3333. {
  3334. ILTypeInstance instance = obj as ILTypeInstance;
  3335. instance.Clear();
  3336. }
  3337. else
  3338. throw new NotImplementedException();
  3339. }
  3340. }
  3341. break;
  3342. case ObjectTypes.FieldReference:
  3343. {
  3344. obj = mStack[objRef->Value];
  3345. if (obj != null)
  3346. {
  3347. if (obj is ILTypeInstance)
  3348. {
  3349. ILTypeInstance instance = obj as ILTypeInstance;
  3350. var tar = instance[objRef->ValueLow] as ILTypeInstance;
  3351. if (tar != null)
  3352. tar.Clear();
  3353. else
  3354. throw new NotSupportedException();
  3355. }
  3356. else
  3357. throw new NotSupportedException();
  3358. }
  3359. else
  3360. throw new NullReferenceException();
  3361. }
  3362. break;
  3363. case ObjectTypes.StaticFieldReference:
  3364. {
  3365. var t = AppDomain.GetType(objRef->Value);
  3366. int idx = objRef->ValueLow;
  3367. if (t is ILType)
  3368. {
  3369. var tar = ((ILType)t).StaticInstance[idx] as ILTypeInstance;
  3370. if (tar != null)
  3371. tar.Clear();
  3372. else
  3373. throw new NotSupportedException();
  3374. }
  3375. else
  3376. throw new NotSupportedException();
  3377. }
  3378. break;
  3379. default:
  3380. throw new NotImplementedException();
  3381. }
  3382. }
  3383. else
  3384. {
  3385. PushNull(esp);
  3386. switch (objRef->ObjectType)
  3387. {
  3388. case ObjectTypes.StaticFieldReference:
  3389. {
  3390. var t = AppDomain.GetType(objRef->Value) as ILType;
  3391. t.StaticInstance.AssignFromStack(objRef->ValueLow, esp, AppDomain, mStack);
  3392. }
  3393. break;
  3394. case ObjectTypes.FieldReference:
  3395. {
  3396. var instance = mStack[objRef->Value] as ILTypeInstance;
  3397. instance.AssignFromStack(objRef->ValueLow, esp, AppDomain, mStack);
  3398. }
  3399. break;
  3400. default:
  3401. {
  3402. if (objRef->ObjectType >= ObjectTypes.Object)
  3403. mStack[objRef->Value] = null;
  3404. else
  3405. PushNull(objRef);
  3406. }
  3407. break;
  3408. }
  3409. }
  3410. }
  3411. else
  3412. {
  3413. if (objRef->ObjectType == ObjectTypes.ValueTypeObjectReference)
  3414. {
  3415. stack.ClearValueTypeObject(type, ILIntepreter.ResolveReference(objRef));
  3416. }
  3417. else if (objRef->ObjectType == ObjectTypes.FieldReference)
  3418. {
  3419. var instance = mStack[objRef->Value] as ILTypeInstance;
  3420. if (instance != null)
  3421. {
  3422. instance.InitializeField(objRef->ValueLow);
  3423. }
  3424. else
  3425. throw new NotImplementedException();
  3426. }
  3427. else if (type.IsPrimitive)
  3428. StackObject.Initialized(objRef, type);
  3429. else
  3430. {
  3431. if (!type.IsValueType)
  3432. {
  3433. if (objRef->ObjectType >= ObjectTypes.Object)
  3434. mStack[objRef->Value] = null;
  3435. else
  3436. PushNull(objRef);
  3437. }
  3438. }
  3439. }
  3440. Free(esp - 1);
  3441. esp--;
  3442. }
  3443. break;
  3444. case OpCodeEnum.Isinst:
  3445. {
  3446. objRef = esp - 1;
  3447. var oriRef = objRef;
  3448. type = domain.GetType(ip->TokenInteger);
  3449. if (type != null)
  3450. {
  3451. objRef = GetObjectAndResolveReference(objRef);
  3452. if (objRef->ObjectType <= ObjectTypes.Double)
  3453. {
  3454. var tclr = type.TypeForCLR;
  3455. switch (objRef->ObjectType)
  3456. {
  3457. case ObjectTypes.Integer:
  3458. {
  3459. if (tclr != typeof(int) && tclr != typeof(bool) && tclr != typeof(short) && tclr != typeof(byte) && tclr != typeof(ushort) && tclr != typeof(uint))
  3460. {
  3461. oriRef->ObjectType = ObjectTypes.Null;
  3462. oriRef->Value = -1;
  3463. oriRef->ValueLow = 0;
  3464. }
  3465. }
  3466. break;
  3467. case ObjectTypes.Long:
  3468. {
  3469. if (tclr != typeof(long) && tclr != typeof(ulong))
  3470. {
  3471. oriRef->ObjectType = ObjectTypes.Null;
  3472. oriRef->Value = -1;
  3473. oriRef->ValueLow = 0;
  3474. }
  3475. }
  3476. break;
  3477. case ObjectTypes.Float:
  3478. {
  3479. if (tclr != typeof(float))
  3480. {
  3481. oriRef->ObjectType = ObjectTypes.Null;
  3482. oriRef->Value = -1;
  3483. oriRef->ValueLow = 0;
  3484. }
  3485. }
  3486. break;
  3487. case ObjectTypes.Double:
  3488. {
  3489. if (tclr != typeof(double))
  3490. {
  3491. oriRef->ObjectType = ObjectTypes.Null;
  3492. oriRef->Value = -1;
  3493. oriRef->ValueLow = 0;
  3494. }
  3495. }
  3496. break;
  3497. case ObjectTypes.Null:
  3498. oriRef->ObjectType = ObjectTypes.Null;
  3499. oriRef->Value = -1;
  3500. oriRef->ValueLow = 0;
  3501. break;
  3502. }
  3503. }
  3504. else
  3505. {
  3506. obj = RetriveObject(objRef, mStack);
  3507. Free(oriRef);
  3508. if (obj != null)
  3509. {
  3510. if (obj is ILTypeInstance)
  3511. {
  3512. if (((ILTypeInstance)obj).CanAssignTo(type))
  3513. {
  3514. esp = PushObject(oriRef, mStack, obj);
  3515. }
  3516. else
  3517. {
  3518. #if !DEBUG || DISABLE_ILRUNTIME_DEBUG
  3519. oriRef->ObjectType = ObjectTypes.Null;
  3520. oriRef->Value = -1;
  3521. oriRef->ValueLow = 0;
  3522. #endif
  3523. }
  3524. }
  3525. else
  3526. {
  3527. if (type.TypeForCLR.IsAssignableFrom(obj.GetType()))
  3528. {
  3529. esp = PushObject(oriRef, mStack, obj, true);
  3530. }
  3531. else
  3532. {
  3533. #if !DEBUG || DISABLE_ILRUNTIME_DEBUG
  3534. oriRef->ObjectType = ObjectTypes.Null;
  3535. oriRef->Value = -1;
  3536. oriRef->ValueLow = 0;
  3537. #endif
  3538. }
  3539. }
  3540. }
  3541. else
  3542. {
  3543. #if !DEBUG || DISABLE_ILRUNTIME_DEBUG
  3544. oriRef->ObjectType = ObjectTypes.Null;
  3545. oriRef->Value = -1;
  3546. oriRef->ValueLow = 0;
  3547. #endif
  3548. }
  3549. }
  3550. }
  3551. else
  3552. throw new NullReferenceException();
  3553. }
  3554. break;
  3555. #endregion
  3556. #region Array
  3557. case OpCodeEnum.Newarr:
  3558. {
  3559. var cnt = (esp - 1);
  3560. type = domain.GetType(ip->TokenInteger);
  3561. object arr = null;
  3562. if (type != null)
  3563. {
  3564. if (type.TypeForCLR != typeof(ILTypeInstance))
  3565. {
  3566. if (type is CLRType)
  3567. {
  3568. arr = ((CLRType)type).CreateArrayInstance(cnt->Value);
  3569. }
  3570. else
  3571. {
  3572. arr = Array.CreateInstance(type.TypeForCLR, cnt->Value);
  3573. }
  3574. //Register Type
  3575. AppDomain.GetType(arr.GetType());
  3576. }
  3577. else
  3578. {
  3579. arr = new ILTypeInstance[cnt->Value];
  3580. ILTypeInstance[] ilArr = (ILTypeInstance[])arr;
  3581. if (type.IsValueType)
  3582. {
  3583. for (int i = 0; i < cnt->Value; i++)
  3584. {
  3585. ilArr[i] = ((ILType)type).Instantiate(true);
  3586. }
  3587. }
  3588. }
  3589. }
  3590. cnt->ObjectType = ObjectTypes.Object;
  3591. cnt->Value = mStack.Count;
  3592. mStack.Add(arr);
  3593. }
  3594. break;
  3595. case OpCodeEnum.Stelem_Ref:
  3596. case OpCodeEnum.Stelem_Any:
  3597. {
  3598. val = GetObjectAndResolveReference(esp - 1);
  3599. var idx = esp - 1 - 1;
  3600. arrRef = esp - 1 - 1 - 1;
  3601. Array arr = mStack[arrRef->Value] as Array;
  3602. if (arr is object[])
  3603. {
  3604. switch (val->ObjectType)
  3605. {
  3606. case ObjectTypes.Null:
  3607. arr.SetValue(null, idx->Value);
  3608. break;
  3609. case ObjectTypes.Object:
  3610. ArraySetValue(arr, mStack[val->Value], idx->Value);
  3611. break;
  3612. case ObjectTypes.Integer:
  3613. arr.SetValue(val->Value, idx->Value);
  3614. break;
  3615. case ObjectTypes.Long:
  3616. arr.SetValue(*(long*)&val->Value, idx->Value);
  3617. break;
  3618. case ObjectTypes.Float:
  3619. arr.SetValue(*(float*)&val->Value, idx->Value);
  3620. break;
  3621. case ObjectTypes.Double:
  3622. arr.SetValue(*(double*)&val->Value, idx->Value);
  3623. break;
  3624. case ObjectTypes.ValueTypeObjectReference:
  3625. ArraySetValue(arr, StackObject.ToObject(val, domain, mStack), idx->Value);
  3626. FreeStackValueType(esp - 1);
  3627. break;
  3628. default:
  3629. throw new NotImplementedException();
  3630. }
  3631. }
  3632. else
  3633. {
  3634. switch (val->ObjectType)
  3635. {
  3636. case ObjectTypes.Object:
  3637. ArraySetValue(arr, mStack[val->Value], idx->Value);
  3638. break;
  3639. case ObjectTypes.Integer:
  3640. {
  3641. StoreIntValueToArray(arr, val, idx);
  3642. }
  3643. break;
  3644. case ObjectTypes.Long:
  3645. {
  3646. if (arr is long[])
  3647. {
  3648. ((long[])arr)[idx->Value] = *(long*)&val->Value;
  3649. }
  3650. else
  3651. {
  3652. ((ulong[])arr)[idx->Value] = *(ulong*)&val->Value;
  3653. }
  3654. }
  3655. break;
  3656. case ObjectTypes.Float:
  3657. {
  3658. ((float[])arr)[idx->Value] = *(float*)&val->Value;
  3659. }
  3660. break;
  3661. case ObjectTypes.Double:
  3662. {
  3663. ((double[])arr)[idx->Value] = *(double*)&val->Value;
  3664. }
  3665. break;
  3666. case ObjectTypes.ValueTypeObjectReference:
  3667. ArraySetValue(arr, StackObject.ToObject(val, domain, mStack), idx->Value);
  3668. FreeStackValueType(esp - 1);
  3669. break;
  3670. default:
  3671. throw new NotImplementedException();
  3672. }
  3673. }
  3674. Free(esp - 1);
  3675. Free(esp - 1 - 1);
  3676. Free(esp - 1 - 1 - 1);
  3677. esp = esp - 1 - 1 - 1;
  3678. }
  3679. break;
  3680. case OpCodeEnum.Ldelem_Ref:
  3681. case OpCodeEnum.Ldelem_Any:
  3682. {
  3683. var idx = esp - 1;
  3684. arrRef = esp - 1 - 1;
  3685. Array arr = mStack[arrRef->Value] as Array;
  3686. obj = arr.GetValue(idx->Value);
  3687. if (obj is CrossBindingAdaptorType)
  3688. obj = ((CrossBindingAdaptorType)obj).ILInstance;
  3689. Free(esp - 1);
  3690. Free(esp - 1 - 1);
  3691. if (obj is ILTypeInstance)
  3692. {
  3693. ILTypeInstance ins = (ILTypeInstance)obj;
  3694. if (!(ins is DelegateAdapter) && ins.Type.IsValueType && !ins.Boxed)
  3695. {
  3696. AllocValueType(arrRef, ins.Type);
  3697. dst = ILIntepreter.ResolveReference(arrRef);
  3698. ins.CopyValueTypeToStack(dst, mStack);
  3699. esp = idx;
  3700. }
  3701. else
  3702. esp = PushObject(esp - 1 - 1, mStack, obj, true);
  3703. }
  3704. else
  3705. esp = PushObject(esp - 1 - 1, mStack, obj, !arr.GetType().GetElementType().IsPrimitive);
  3706. }
  3707. break;
  3708. case OpCodeEnum.Stelem_I1:
  3709. {
  3710. val = esp - 1;
  3711. var idx = esp - 1 - 1;
  3712. arrRef = esp - 1 - 1 - 1;
  3713. byte[] arr = mStack[arrRef->Value] as byte[];
  3714. if (arr != null)
  3715. {
  3716. arr[idx->Value] = (byte)val->Value;
  3717. }
  3718. else
  3719. {
  3720. bool[] arr2 = mStack[arrRef->Value] as bool[];
  3721. if (arr2 != null)
  3722. {
  3723. arr2[idx->Value] = val->Value == 1;
  3724. }
  3725. else
  3726. {
  3727. sbyte[] arr3 = mStack[arrRef->Value] as sbyte[];
  3728. arr3[idx->Value] = (sbyte)val->Value;
  3729. }
  3730. }
  3731. Free(esp - 1);
  3732. Free(esp - 1 - 1);
  3733. Free(esp - 1 - 1 - 1);
  3734. esp = esp - 1 - 1 - 1;
  3735. }
  3736. break;
  3737. case OpCodeEnum.Ldelem_I1:
  3738. {
  3739. var idx = esp - 1;
  3740. arrRef = esp - 1 - 1;
  3741. bool[] arr = mStack[arrRef->Value] as bool[];
  3742. if (arr != null)
  3743. intVal = arr[idx->Value] ? 1 : 0;
  3744. else
  3745. {
  3746. sbyte[] arr2 = mStack[arrRef->Value] as sbyte[];
  3747. intVal = arr2[idx->Value];
  3748. }
  3749. Free(esp - 1);
  3750. Free(esp - 1 - 1);
  3751. arrRef->ObjectType = ObjectTypes.Integer;
  3752. arrRef->Value = intVal;
  3753. esp -= 1;
  3754. }
  3755. break;
  3756. case OpCodeEnum.Ldelem_U1:
  3757. {
  3758. var idx = (esp - 1);
  3759. arrRef = esp - 1 - 1;
  3760. byte[] arr = mStack[arrRef->Value] as byte[];
  3761. if (arr != null)
  3762. intVal = arr[idx->Value];
  3763. else
  3764. {
  3765. bool[] arr2 = mStack[arrRef->Value] as bool[];
  3766. intVal = arr2[idx->Value] ? 1 : 0;
  3767. }
  3768. Free(esp - 1);
  3769. Free(esp - 1 - 1);
  3770. arrRef->ObjectType = ObjectTypes.Integer;
  3771. arrRef->Value = intVal;
  3772. esp -= 1;
  3773. }
  3774. break;
  3775. case OpCodeEnum.Stelem_I2:
  3776. {
  3777. val = esp - 1;
  3778. var idx = esp - 1 - 1;
  3779. arrRef = esp - 1 - 1 - 1;
  3780. short[] arr = mStack[arrRef->Value] as short[];
  3781. if (arr != null)
  3782. {
  3783. arr[idx->Value] = (short)val->Value;
  3784. }
  3785. else
  3786. {
  3787. ushort[] arr2 = mStack[arrRef->Value] as ushort[];
  3788. if (arr2 != null)
  3789. {
  3790. arr2[idx->Value] = (ushort)val->Value;
  3791. }
  3792. else
  3793. {
  3794. char[] arr3 = mStack[arrRef->Value] as char[];
  3795. arr3[idx->Value] = (char)val->Value;
  3796. }
  3797. }
  3798. Free(esp - 1);
  3799. Free(esp - 1 - 1);
  3800. Free(esp - 1 - 1 - 1);
  3801. esp = esp - 1 - 1 - 1;
  3802. }
  3803. break;
  3804. case OpCodeEnum.Ldelem_I2:
  3805. {
  3806. var idx = (esp - 1)->Value;
  3807. arrRef = esp - 1 - 1;
  3808. short[] arr = mStack[arrRef->Value] as short[];
  3809. if (arr != null)
  3810. {
  3811. intVal = arr[idx];
  3812. }
  3813. else
  3814. {
  3815. char[] arr2 = mStack[arrRef->Value] as char[];
  3816. intVal = arr2[idx];
  3817. }
  3818. Free(esp - 1);
  3819. Free(esp - 1 - 1);
  3820. arrRef->ObjectType = ObjectTypes.Integer;
  3821. arrRef->Value = intVal;
  3822. esp -= 1;
  3823. }
  3824. break;
  3825. case OpCodeEnum.Ldelem_U2:
  3826. {
  3827. var idx = (esp - 1)->Value;
  3828. arrRef = esp - 1 - 1;
  3829. ushort[] arr = mStack[arrRef->Value] as ushort[];
  3830. if (arr != null)
  3831. {
  3832. intVal = arr[idx];
  3833. }
  3834. else
  3835. {
  3836. char[] arr2 = mStack[arrRef->Value] as char[];
  3837. intVal = arr2[idx];
  3838. }
  3839. Free(esp - 1);
  3840. Free(esp - 1 - 1);
  3841. arrRef->ObjectType = ObjectTypes.Integer;
  3842. arrRef->Value = intVal;
  3843. esp -= 1;
  3844. }
  3845. break;
  3846. case OpCodeEnum.Stelem_I4:
  3847. {
  3848. val = esp - 1;
  3849. var idx = esp - 1 - 1;
  3850. arrRef = esp - 1 - 1 - 1;
  3851. int[] arr = mStack[arrRef->Value] as int[];
  3852. if (arr != null)
  3853. {
  3854. arr[idx->Value] = val->Value;
  3855. }
  3856. else
  3857. {
  3858. uint[] arr2 = mStack[arrRef->Value] as uint[];
  3859. arr2[idx->Value] = (uint)val->Value;
  3860. }
  3861. Free(esp - 1);
  3862. Free(esp - 1 - 1);
  3863. Free(esp - 1 - 1 - 1);
  3864. esp = esp - 1 - 1 - 1;
  3865. }
  3866. break;
  3867. case OpCodeEnum.Ldelem_I4:
  3868. {
  3869. var idx = (esp - 1)->Value;
  3870. arrRef = esp - 1 - 1;
  3871. int[] arr = mStack[arrRef->Value] as int[];
  3872. Free(esp - 1);
  3873. Free(esp - 1 - 1);
  3874. arrRef->ObjectType = ObjectTypes.Integer;
  3875. arrRef->Value = arr[idx];
  3876. esp -= 1;
  3877. }
  3878. break;
  3879. case OpCodeEnum.Ldelem_U4:
  3880. {
  3881. var idx = (esp - 1)->Value;
  3882. arrRef = esp - 1 - 1;
  3883. uint[] arr = mStack[arrRef->Value] as uint[];
  3884. Free(esp - 1);
  3885. Free(esp - 1 - 1);
  3886. arrRef->ObjectType = ObjectTypes.Integer;
  3887. arrRef->Value = (int)arr[idx];
  3888. esp -= 1;
  3889. }
  3890. break;
  3891. case OpCodeEnum.Stelem_I8:
  3892. {
  3893. val = esp - 1;
  3894. var idx = esp - 1 - 1;
  3895. arrRef = esp - 1 - 1 - 1;
  3896. long[] arr = mStack[arrRef->Value] as long[];
  3897. if (arr != null)
  3898. {
  3899. arr[idx->Value] = *(long*)&val->Value;
  3900. }
  3901. else
  3902. {
  3903. ulong[] arr2 = mStack[arrRef->Value] as ulong[];
  3904. arr2[idx->Value] = *(ulong*)&val->Value;
  3905. }
  3906. Free(esp - 1);
  3907. Free(esp - 1 - 1);
  3908. Free(esp - 1 - 1 - 1);
  3909. esp = esp - 1 - 1 - 1;
  3910. }
  3911. break;
  3912. case OpCodeEnum.Ldelem_I8:
  3913. {
  3914. var idx = esp - 1;
  3915. arrRef = esp - 1 - 1;
  3916. long[] arr = mStack[arrRef->Value] as long[];
  3917. long longVal;
  3918. if (arr != null)
  3919. longVal = arr[idx->Value];
  3920. else
  3921. {
  3922. ulong[] arr2 = mStack[arrRef->Value] as ulong[];
  3923. longVal = (long)arr2[idx->Value];
  3924. }
  3925. Free(esp - 1);
  3926. Free(esp - 1 - 1);
  3927. arrRef->ObjectType = ObjectTypes.Long;
  3928. *(long*)&arrRef->Value = longVal;
  3929. esp -= 1;
  3930. }
  3931. break;
  3932. case OpCodeEnum.Stelem_R4:
  3933. {
  3934. val = esp - 1;
  3935. var idx = esp - 1 - 1;
  3936. arrRef = esp - 1 - 1 - 1;
  3937. float[] arr = mStack[arrRef->Value] as float[];
  3938. arr[idx->Value] = *(float*)&val->Value;
  3939. Free(esp - 1);
  3940. Free(esp - 1 - 1);
  3941. Free(esp - 1 - 1 - 1);
  3942. esp = esp - 1 - 1 - 1;
  3943. }
  3944. break;
  3945. case OpCodeEnum.Ldelem_R4:
  3946. {
  3947. var idx = (esp - 1)->Value;
  3948. arrRef = esp - 1 - 1;
  3949. float[] arr = mStack[arrRef->Value] as float[];
  3950. Free(esp - 1);
  3951. Free(esp - 1 - 1);
  3952. arrRef->ObjectType = ObjectTypes.Float;
  3953. *(float*)&arrRef->Value = arr[idx];
  3954. esp -= 1;
  3955. }
  3956. break;
  3957. case OpCodeEnum.Stelem_R8:
  3958. {
  3959. val = esp - 1;
  3960. var idx = esp - 1 - 1;
  3961. arrRef = esp - 1 - 1 - 1;
  3962. double[] arr = mStack[arrRef->Value] as double[];
  3963. arr[idx->Value] = *(double*)&val->Value;
  3964. Free(esp - 1);
  3965. Free(esp - 1 - 1);
  3966. Free(esp - 1 - 1 - 1);
  3967. esp = esp - 1 - 1 - 1;
  3968. }
  3969. break;
  3970. case OpCodeEnum.Ldelem_R8:
  3971. {
  3972. var idx = (esp - 1)->Value;
  3973. arrRef = esp - 1 - 1;
  3974. double[] arr = mStack[arrRef->Value] as double[];
  3975. Free(esp - 1);
  3976. Free(esp - 1 - 1);
  3977. arrRef->ObjectType = ObjectTypes.Double;
  3978. *(double*)&arrRef->Value = arr[idx];
  3979. esp -= 1;
  3980. }
  3981. break;
  3982. case OpCodeEnum.Ldlen:
  3983. {
  3984. arrRef = esp - 1;
  3985. Array arr = mStack[arrRef->Value] as Array;
  3986. Free(esp - 1);
  3987. arrRef->ObjectType = ObjectTypes.Integer;
  3988. arrRef->Value = arr.Length;
  3989. }
  3990. break;
  3991. case OpCodeEnum.Ldelema:
  3992. {
  3993. arrRef = esp - 1 - 1;
  3994. var idx = (esp - 1)->Value;
  3995. Array arr = mStack[arrRef->Value] as Array;
  3996. Free(esp - 1);
  3997. Free(esp - 1 - 1);
  3998. arrRef->ObjectType = ObjectTypes.ArrayReference;
  3999. arrRef->Value = mStack.Count;
  4000. mStack.Add(arr);
  4001. arrRef->ValueLow = idx;
  4002. esp--;
  4003. }
  4004. break;
  4005. #endregion
  4006. #region Conversion
  4007. case OpCodeEnum.Conv_U1:
  4008. case OpCodeEnum.Conv_Ovf_U1:
  4009. case OpCodeEnum.Conv_Ovf_U1_Un:
  4010. {
  4011. objRef = esp - 1;
  4012. switch (objRef->ObjectType)
  4013. {
  4014. case ObjectTypes.Long:
  4015. case ObjectTypes.Integer:
  4016. intVal = (byte)objRef->Value;
  4017. break;
  4018. case ObjectTypes.Float:
  4019. intVal = (byte)*(float*)&objRef->Value;
  4020. break;
  4021. case ObjectTypes.Double:
  4022. intVal = (byte)*(double*)&objRef->Value;
  4023. break;
  4024. default:
  4025. throw new NotImplementedException();
  4026. }
  4027. objRef->ObjectType = ObjectTypes.Integer;
  4028. objRef->Value = intVal;
  4029. objRef->ValueLow = 0;
  4030. }
  4031. break;
  4032. case OpCodeEnum.Conv_I1:
  4033. case OpCodeEnum.Conv_Ovf_I1:
  4034. case OpCodeEnum.Conv_Ovf_I1_Un:
  4035. {
  4036. objRef = esp - 1;
  4037. switch (objRef->ObjectType)
  4038. {
  4039. case ObjectTypes.Long:
  4040. case ObjectTypes.Integer:
  4041. intVal = (sbyte)objRef->Value;
  4042. break;
  4043. case ObjectTypes.Float:
  4044. intVal = (sbyte)*(float*)&objRef->Value;
  4045. break;
  4046. case ObjectTypes.Double:
  4047. intVal = (sbyte)*(double*)&objRef->Value;
  4048. break;
  4049. default:
  4050. throw new NotImplementedException();
  4051. }
  4052. objRef->ObjectType = ObjectTypes.Integer;
  4053. objRef->Value = intVal;
  4054. objRef->ValueLow = 0;
  4055. }
  4056. break;
  4057. case OpCodeEnum.Conv_U2:
  4058. case OpCodeEnum.Conv_Ovf_U2:
  4059. case OpCodeEnum.Conv_Ovf_U2_Un:
  4060. {
  4061. objRef = esp - 1;
  4062. switch (objRef->ObjectType)
  4063. {
  4064. case ObjectTypes.Long:
  4065. case ObjectTypes.Integer:
  4066. intVal = (ushort)objRef->Value;
  4067. break;
  4068. case ObjectTypes.Float:
  4069. intVal = (ushort)*(float*)&objRef->Value;
  4070. break;
  4071. case ObjectTypes.Double:
  4072. intVal = (ushort)*(double*)&objRef->Value;
  4073. break;
  4074. default:
  4075. throw new NotImplementedException();
  4076. }
  4077. objRef->ObjectType = ObjectTypes.Integer;
  4078. objRef->Value = intVal;
  4079. objRef->ValueLow = 0;
  4080. }
  4081. break;
  4082. case OpCodeEnum.Conv_I2:
  4083. case OpCodeEnum.Conv_Ovf_I2:
  4084. case OpCodeEnum.Conv_Ovf_I2_Un:
  4085. {
  4086. objRef = esp - 1;
  4087. switch (objRef->ObjectType)
  4088. {
  4089. case ObjectTypes.Long:
  4090. case ObjectTypes.Integer:
  4091. intVal = (short)(objRef->Value);
  4092. break;
  4093. case ObjectTypes.Float:
  4094. intVal = (short)*(float*)&objRef->Value;
  4095. break;
  4096. case ObjectTypes.Double:
  4097. intVal = (short)*(double*)&objRef->Value;
  4098. break;
  4099. default:
  4100. throw new NotImplementedException();
  4101. }
  4102. objRef->ObjectType = ObjectTypes.Integer;
  4103. objRef->Value = intVal;
  4104. objRef->ValueLow = 0;
  4105. }
  4106. break;
  4107. case OpCodeEnum.Conv_U4:
  4108. case OpCodeEnum.Conv_U:
  4109. case OpCodeEnum.Conv_Ovf_U4:
  4110. case OpCodeEnum.Conv_Ovf_U4_Un:
  4111. {
  4112. objRef = esp - 1;
  4113. uint uintVal;
  4114. switch (objRef->ObjectType)
  4115. {
  4116. case ObjectTypes.Long:
  4117. uintVal = (uint)*(long*)&objRef->Value;
  4118. break;
  4119. case ObjectTypes.Integer:
  4120. uintVal = (uint)objRef->Value;
  4121. break;
  4122. case ObjectTypes.Float:
  4123. uintVal = (uint)*(float*)&objRef->Value;
  4124. break;
  4125. case ObjectTypes.Double:
  4126. uintVal = (uint)*(double*)&objRef->Value;
  4127. break;
  4128. default:
  4129. throw new NotImplementedException();
  4130. }
  4131. objRef->ObjectType = ObjectTypes.Integer;
  4132. objRef->Value = (int)uintVal;
  4133. objRef->ValueLow = 0;
  4134. }
  4135. break;
  4136. case OpCodeEnum.Conv_I4:
  4137. case OpCodeEnum.Conv_I:
  4138. case OpCodeEnum.Conv_Ovf_I:
  4139. case OpCodeEnum.Conv_Ovf_I_Un:
  4140. case OpCodeEnum.Conv_Ovf_I4:
  4141. case OpCodeEnum.Conv_Ovf_I4_Un:
  4142. {
  4143. objRef = esp - 1;
  4144. switch (objRef->ObjectType)
  4145. {
  4146. case ObjectTypes.Long:
  4147. intVal = (int)*(long*)&objRef->Value;
  4148. break;
  4149. case ObjectTypes.Float:
  4150. intVal = (int)*(float*)&objRef->Value;
  4151. break;
  4152. case ObjectTypes.Double:
  4153. intVal = (int)*(double*)&objRef->Value;
  4154. break;
  4155. case ObjectTypes.Integer:
  4156. intVal = objRef->Value;
  4157. break;
  4158. default:
  4159. throw new NotImplementedException();
  4160. }
  4161. objRef->ObjectType = ObjectTypes.Integer;
  4162. objRef->Value = intVal;
  4163. }
  4164. break;
  4165. case OpCodeEnum.Conv_I8:
  4166. case OpCodeEnum.Conv_Ovf_I8:
  4167. case OpCodeEnum.Conv_Ovf_I8_Un:
  4168. {
  4169. objRef = esp - 1;
  4170. long longVal;
  4171. switch (objRef->ObjectType)
  4172. {
  4173. case ObjectTypes.Integer:
  4174. longVal = objRef->Value;
  4175. break;
  4176. case ObjectTypes.Long:
  4177. ip++;
  4178. continue;
  4179. case ObjectTypes.Float:
  4180. longVal = (long)*(float*)&objRef->Value;
  4181. break;
  4182. case ObjectTypes.Double:
  4183. longVal = (long)*(double*)&objRef->Value;
  4184. break;
  4185. default:
  4186. throw new NotImplementedException();
  4187. }
  4188. objRef->ObjectType = ObjectTypes.Long;
  4189. *(long*)(&objRef->Value) = longVal;
  4190. }
  4191. break;
  4192. case OpCodeEnum.Conv_U8:
  4193. case OpCodeEnum.Conv_Ovf_U8:
  4194. case OpCodeEnum.Conv_Ovf_U8_Un:
  4195. {
  4196. objRef = esp - 1;
  4197. ulong ulongVal;
  4198. switch (objRef->ObjectType)
  4199. {
  4200. case ObjectTypes.Integer:
  4201. ulongVal = (uint)objRef->Value;
  4202. break;
  4203. case ObjectTypes.Long:
  4204. ip++;
  4205. continue;
  4206. case ObjectTypes.Float:
  4207. ulongVal = (ulong)*(float*)&objRef->Value;
  4208. break;
  4209. case ObjectTypes.Double:
  4210. ulongVal = (ulong)*(double*)&objRef->Value;
  4211. break;
  4212. default:
  4213. throw new NotImplementedException();
  4214. }
  4215. objRef->ObjectType = ObjectTypes.Long;
  4216. *(ulong*)(&objRef->Value) = ulongVal;
  4217. }
  4218. break;
  4219. case OpCodeEnum.Conv_R4:
  4220. {
  4221. objRef = esp - 1;
  4222. float floatVal;
  4223. switch (objRef->ObjectType)
  4224. {
  4225. case ObjectTypes.Long:
  4226. floatVal = (float)*(long*)&objRef->Value;
  4227. break;
  4228. case ObjectTypes.Float:
  4229. ip++;
  4230. continue;
  4231. case ObjectTypes.Double:
  4232. floatVal = (float)*(double*)&objRef->Value;
  4233. break;
  4234. case ObjectTypes.Integer:
  4235. floatVal = objRef->Value;
  4236. break;
  4237. default:
  4238. throw new NotImplementedException();
  4239. }
  4240. objRef->ObjectType = ObjectTypes.Float;
  4241. *(float*)&objRef->Value = floatVal;
  4242. }
  4243. break;
  4244. case OpCodeEnum.Conv_R8:
  4245. {
  4246. objRef = esp - 1;
  4247. double doubleVal;
  4248. switch (objRef->ObjectType)
  4249. {
  4250. case ObjectTypes.Long:
  4251. doubleVal = (double)*(long*)&objRef->Value;
  4252. break;
  4253. case ObjectTypes.Float:
  4254. doubleVal = *(float*)&objRef->Value;
  4255. break;
  4256. case ObjectTypes.Integer:
  4257. doubleVal = objRef->Value;
  4258. break;
  4259. case ObjectTypes.Double:
  4260. ip++;
  4261. continue;
  4262. default:
  4263. throw new NotImplementedException();
  4264. }
  4265. objRef->ObjectType = ObjectTypes.Double;
  4266. *(double*)&objRef->Value = doubleVal;
  4267. }
  4268. break;
  4269. case OpCodeEnum.Conv_R_Un:
  4270. {
  4271. objRef = esp - 1;
  4272. bool isDouble = false;
  4273. float floatVal = 0;
  4274. double val2 = 0;
  4275. switch (objRef->ObjectType)
  4276. {
  4277. case ObjectTypes.Long:
  4278. val2 = (double)*(ulong*)&objRef->Value;
  4279. isDouble = true;
  4280. break;
  4281. case ObjectTypes.Float:
  4282. ip++;
  4283. continue;
  4284. case ObjectTypes.Integer:
  4285. floatVal = (uint)objRef->Value;
  4286. break;
  4287. case ObjectTypes.Double:
  4288. ip++;
  4289. continue;
  4290. default:
  4291. throw new NotImplementedException();
  4292. }
  4293. if (isDouble)
  4294. {
  4295. objRef->ObjectType = ObjectTypes.Double;
  4296. *(double*)&objRef->Value = val2;
  4297. }
  4298. else
  4299. {
  4300. objRef->ObjectType = ObjectTypes.Float;
  4301. *(float*)&objRef->Value = floatVal;
  4302. }
  4303. }
  4304. break;
  4305. #endregion
  4306. #region Stack operation
  4307. case OpCodeEnum.Pop:
  4308. {
  4309. Free(esp - 1);
  4310. esp--;
  4311. }
  4312. break;
  4313. case OpCodeEnum.Dup:
  4314. {
  4315. objRef = esp - 1;
  4316. if (objRef->ObjectType == ObjectTypes.ValueTypeObjectReference)
  4317. {
  4318. CloneStackValueType(objRef, esp, mStack);
  4319. }
  4320. else
  4321. {
  4322. *esp = *objRef;
  4323. if (esp->ObjectType >= ObjectTypes.Object)
  4324. {
  4325. esp->Value = mStack.Count;
  4326. mStack.Add(mStack[objRef->Value]);
  4327. }
  4328. }
  4329. esp++;
  4330. }
  4331. break;
  4332. #endregion
  4333. case OpCodeEnum.Throw:
  4334. {
  4335. objRef = GetObjectAndResolveReference(esp - 1);
  4336. var ex = mStack[objRef->Value] as Exception;
  4337. Free(objRef);
  4338. esp--;
  4339. throw ex;
  4340. }
  4341. case OpCodeEnum.Rethrow:
  4342. {
  4343. throw lastCaughtEx;
  4344. }
  4345. case OpCodeEnum.Nop:
  4346. case OpCodeEnum.Volatile:
  4347. case OpCodeEnum.Castclass:
  4348. case OpCodeEnum.Readonly:
  4349. break;
  4350. default:
  4351. throw new NotSupportedException("Not supported opcode " + code);
  4352. }
  4353. ip++;
  4354. }
  4355. catch (Exception ex)
  4356. {
  4357. if (ehs != null)
  4358. {
  4359. int addr = (int)(ip - ptr);
  4360. var eh = GetCorrespondingExceptionHandler(ehs, ex, addr, ExceptionHandlerType.Catch, true);
  4361. if (eh == null)
  4362. {
  4363. eh = GetCorrespondingExceptionHandler(ehs, ex, addr, ExceptionHandlerType.Catch, false);
  4364. }
  4365. if (eh != null)
  4366. {
  4367. if (ex is ILRuntimeException)
  4368. {
  4369. ILRuntimeException ire = (ILRuntimeException)ex;
  4370. var inner = ire.InnerException;
  4371. inner.Data["ThisInfo"] = ire.ThisInfo;
  4372. inner.Data["StackTrace"] = ire.StackTrace;
  4373. inner.Data["LocalInfo"] = ire.LocalInfo;
  4374. ex = inner;
  4375. }
  4376. else
  4377. {
  4378. var debugger = AppDomain.DebugService;
  4379. if (method.HasThis)
  4380. ex.Data["ThisInfo"] = debugger.GetThisInfo(this);
  4381. else
  4382. ex.Data["ThisInfo"] = "";
  4383. ex.Data["StackTrace"] = debugger.GetStackTrace(this);
  4384. ex.Data["LocalInfo"] = debugger.GetLocalVariableInfo(this);
  4385. }
  4386. //Clear call stack
  4387. while (stack.Frames.Peek().BasePointer != frame.BasePointer)
  4388. {
  4389. var f = stack.Frames.Peek();
  4390. esp = stack.PopFrame(ref f, esp);
  4391. if (f.Method.ReturnType != AppDomain.VoidType)
  4392. {
  4393. Free(esp - 1);
  4394. esp--;
  4395. }
  4396. }
  4397. lastCaughtEx = ex;
  4398. esp = PushObject(esp, mStack, ex);
  4399. unhandledException = false;
  4400. ip = ptr + eh.HandlerStart;
  4401. continue;
  4402. }
  4403. }
  4404. if (unhandledException)
  4405. {
  4406. throw ex;
  4407. }
  4408. unhandledException = true;
  4409. returned = true;
  4410. #if DEBUG && !DISABLE_ILRUNTIME_DEBUG
  4411. if (!AppDomain.DebugService.Break(this, ex))
  4412. #endif
  4413. {
  4414. var newEx = new ILRuntimeException(ex.Message, this, method, ex);
  4415. throw newEx;
  4416. }
  4417. }
  4418. }
  4419. }
  4420. #if DEBUG && !NO_PROFILER
  4421. if (System.Threading.Thread.CurrentThread.ManagedThreadId == AppDomain.UnityMainThreadID)
  4422. #if UNITY_5_5_OR_NEWER
  4423. UnityEngine.Profiling.Profiler.EndSample();
  4424. #else
  4425. UnityEngine.Profiler.EndSample();
  4426. #endif
  4427. #endif
  4428. //ClearStack
  4429. return stack.PopFrame(ref frame, esp);
  4430. }
  4431. void PrepareRegisterCallStack(StackObject* esp, IList<object> mStack, ILMethod method)
  4432. {
  4433. var pCnt = method.HasThis ? method.ParameterCount + 1 : method.ParameterCount;
  4434. StackObject* basePointer = esp - pCnt;
  4435. int mBase = mStack.Count;
  4436. int existing = 0;
  4437. for (int i = 0; i < pCnt; i++)
  4438. {
  4439. StackObject* cur = basePointer + i;
  4440. if (cur->ObjectType < ObjectTypes.Object)
  4441. {
  4442. mStack.Add(null);
  4443. }
  4444. else
  4445. existing++;
  4446. }
  4447. if (existing > 0)
  4448. {
  4449. mBase = mBase - existing;
  4450. for (int i = pCnt - 1; i >= 0; i--)
  4451. {
  4452. StackObject* cur = basePointer + i;
  4453. if (cur->ObjectType >= ObjectTypes.Object)
  4454. {
  4455. mStack[mBase + i] = mStack[cur->Value];
  4456. cur->Value = mBase + i;
  4457. }
  4458. else
  4459. {
  4460. if (cur->ObjectType == ObjectTypes.Null)
  4461. {
  4462. cur->ObjectType = ObjectTypes.Object;
  4463. cur->Value = mBase + i;
  4464. }
  4465. mStack[mBase + i] = null;
  4466. }
  4467. }
  4468. }
  4469. }
  4470. void DumpStack(StackObject* esp)
  4471. {
  4472. AppDomain.DebugService.DumpStack(esp, stack);
  4473. }
  4474. void CloneStackValueType(StackObject* src, StackObject* dst, IList<object> mStack)
  4475. {
  4476. StackObject* descriptor = ILIntepreter.ResolveReference(src);
  4477. stack.AllocValueType(dst, AppDomain.GetTypeByIndex(descriptor->Value));
  4478. StackObject* dstDescriptor = ILIntepreter.ResolveReference(dst);
  4479. int cnt = descriptor->ValueLow;
  4480. for (int i = 0; i < cnt; i++)
  4481. {
  4482. StackObject* val = Minus(descriptor, i + 1);
  4483. CopyToValueTypeField(dstDescriptor, i, val, mStack);
  4484. }
  4485. }
  4486. bool CanCastTo(StackObject* src, StackObject* dst)
  4487. {
  4488. var sType = AppDomain.GetTypeByIndex(src->Value);
  4489. var dType = AppDomain.GetTypeByIndex(dst->Value);
  4490. return sType.CanAssignTo(dType);
  4491. }
  4492. bool CanCopyStackValueType(StackObject* src, StackObject* dst)
  4493. {
  4494. if (src->ObjectType == ObjectTypes.ValueTypeObjectReference && dst->ObjectType == ObjectTypes.ValueTypeObjectReference)
  4495. {
  4496. StackObject* descriptor = ILIntepreter.ResolveReference(src);
  4497. StackObject* dstDescriptor = ILIntepreter.ResolveReference(dst);
  4498. return CanCastTo(descriptor, dstDescriptor);
  4499. }
  4500. else
  4501. return false;
  4502. }
  4503. #if DEBUG
  4504. public void CopyStackValueType(StackObject* src, StackObject* dst, IList<object> mStack, bool noCheck = false)
  4505. #else
  4506. public void CopyStackValueType(StackObject* src, StackObject* dst, IList<object> mStack)
  4507. #endif
  4508. {
  4509. StackObject* descriptor = ILIntepreter.ResolveReference(src);
  4510. StackObject* dstDescriptor = ILIntepreter.ResolveReference(dst);
  4511. #if DEBUG
  4512. if (!CanCastTo(descriptor, dstDescriptor))
  4513. throw new InvalidCastException();
  4514. #endif
  4515. int cnt = descriptor->ValueLow;
  4516. for (int i = 0; i < cnt; i++)
  4517. {
  4518. StackObject* srcVal = Minus(descriptor, i + 1);
  4519. StackObject* dstVal = Minus(dstDescriptor, i + 1);
  4520. #if DEBUG
  4521. if (!noCheck && srcVal->ObjectType != dstVal->ObjectType)
  4522. throw new NotSupportedException();
  4523. #endif
  4524. switch (srcVal->ObjectType)
  4525. {
  4526. case ObjectTypes.Object:
  4527. case ObjectTypes.ArrayReference:
  4528. case ObjectTypes.FieldReference:
  4529. mStack[dstVal->Value] = mStack[srcVal->Value];
  4530. break;
  4531. case ObjectTypes.ValueTypeObjectReference:
  4532. CopyStackValueType(srcVal, dstVal, mStack);
  4533. break;
  4534. default:
  4535. *dstVal = *srcVal;
  4536. break;
  4537. }
  4538. }
  4539. }
  4540. void CopyValueTypeToStack(StackObject* dst, object ins, IList<object> mStack)
  4541. {
  4542. if (ins is ILTypeInstance)
  4543. {
  4544. ((ILTypeInstance)ins).CopyValueTypeToStack(dst, mStack);
  4545. }
  4546. else
  4547. {
  4548. if (ins is CrossBindingAdaptorType)
  4549. {
  4550. ((CrossBindingAdaptorType)ins).ILInstance.CopyValueTypeToStack(dst, mStack);
  4551. }
  4552. else
  4553. {
  4554. var vb = ((CLRType)domain.GetTypeByIndex(dst->Value)).ValueTypeBinder;
  4555. vb.CopyValueTypeToStack(ins, dst, mStack);
  4556. }
  4557. }
  4558. }
  4559. void CopyToValueTypeField(StackObject* obj, int idx, StackObject* val, IList<object> mStack)
  4560. {
  4561. StackObject* dst = Minus(obj, idx + 1);
  4562. switch (val->ObjectType)
  4563. {
  4564. case ObjectTypes.Null:
  4565. {
  4566. mStack[dst->Value] = null;
  4567. }
  4568. break;
  4569. case ObjectTypes.Object:
  4570. case ObjectTypes.FieldReference:
  4571. case ObjectTypes.ArrayReference:
  4572. {
  4573. if (dst->ObjectType == ObjectTypes.ValueTypeObjectReference)
  4574. {
  4575. var ins = mStack[val->Value];
  4576. dst = ILIntepreter.ResolveReference(dst);
  4577. CopyValueTypeToStack(dst, ins, mStack);
  4578. }
  4579. else
  4580. {
  4581. mStack[dst->Value] = CheckAndCloneValueType(mStack[val->Value], domain);
  4582. }
  4583. }
  4584. break;
  4585. case ObjectTypes.ValueTypeObjectReference:
  4586. {
  4587. if (dst->ObjectType == ObjectTypes.ValueTypeObjectReference)
  4588. {
  4589. CopyStackValueType(val, dst, mStack);
  4590. }
  4591. else
  4592. throw new NotImplementedException();
  4593. }
  4594. break;
  4595. default:
  4596. *dst = *val;
  4597. break;
  4598. }
  4599. }
  4600. void StLocSub(StackObject* esp, StackObject* v, int idx, IList<object> mStack)
  4601. {
  4602. switch (esp->ObjectType)
  4603. {
  4604. case ObjectTypes.Null:
  4605. v->ObjectType = ObjectTypes.Object;
  4606. v->Value = idx;
  4607. mStack[idx] = null;
  4608. break;
  4609. case ObjectTypes.Object:
  4610. case ObjectTypes.FieldReference:
  4611. case ObjectTypes.ArrayReference:
  4612. if (v->ObjectType == ObjectTypes.ValueTypeObjectReference)
  4613. {
  4614. var obj = mStack[esp->Value];
  4615. if (obj is ILTypeInstance)
  4616. {
  4617. var dst = ILIntepreter.ResolveReference(v);
  4618. ((ILTypeInstance)obj).CopyValueTypeToStack(dst, mStack);
  4619. }
  4620. else
  4621. {
  4622. var dst = ILIntepreter.ResolveReference(v);
  4623. var ct = domain.GetTypeByIndex(dst->Value) as CLRType;
  4624. var binder = ct.ValueTypeBinder;
  4625. binder.CopyValueTypeToStack(obj, dst, mStack);
  4626. }
  4627. }
  4628. else
  4629. {
  4630. *v = *esp;
  4631. mStack[idx] = CheckAndCloneValueType(mStack[v->Value], domain);
  4632. v->Value = idx;
  4633. }
  4634. Free(esp);
  4635. break;
  4636. case ObjectTypes.ValueTypeObjectReference:
  4637. if (v->ObjectType == ObjectTypes.ValueTypeObjectReference)
  4638. {
  4639. CopyStackValueType(esp, v, mStack);
  4640. }
  4641. else
  4642. throw new NotImplementedException();
  4643. FreeStackValueType(esp);
  4644. break;
  4645. default:
  4646. *v = *esp;
  4647. mStack[idx] = null;
  4648. break;
  4649. }
  4650. }
  4651. public object RetriveObject(StackObject* esp, IList<object> mStack)
  4652. {
  4653. StackObject* objRef = GetObjectAndResolveReference(esp);
  4654. if (objRef->ObjectType == ObjectTypes.Null)
  4655. return null;
  4656. object obj = null;
  4657. switch (objRef->ObjectType)
  4658. {
  4659. case ObjectTypes.Object:
  4660. obj = mStack[objRef->Value];
  4661. break;
  4662. case ObjectTypes.FieldReference:
  4663. {
  4664. obj = mStack[objRef->Value];
  4665. int idx = objRef->ValueLow;
  4666. if (obj is ILTypeInstance)
  4667. {
  4668. obj = ((ILTypeInstance)obj)[idx];
  4669. }
  4670. else
  4671. {
  4672. var t = AppDomain.GetType(obj.GetType());
  4673. obj = ((CLRType)t).GetFieldValue(idx, obj);
  4674. }
  4675. }
  4676. break;
  4677. case ObjectTypes.ArrayReference:
  4678. {
  4679. Array arr = mStack[objRef->Value] as Array;
  4680. int idx = objRef->ValueLow;
  4681. obj = arr.GetValue(idx);
  4682. }
  4683. break;
  4684. case ObjectTypes.StaticFieldReference:
  4685. {
  4686. var t = AppDomain.GetType(objRef->Value);
  4687. int idx = objRef->ValueLow;
  4688. if (t is ILType)
  4689. {
  4690. obj = ((ILType)t).StaticInstance[idx];
  4691. }
  4692. else
  4693. {
  4694. obj = ((CLRType)t).GetFieldValue(idx, null);
  4695. }
  4696. }
  4697. break;
  4698. case ObjectTypes.ValueTypeObjectReference:
  4699. obj = StackObject.ToObject(objRef, domain, mStack);
  4700. break;
  4701. default:
  4702. throw new NotImplementedException();
  4703. }
  4704. return obj;
  4705. }
  4706. public int RetriveInt32(StackObject* esp, IList<object> mStack)
  4707. {
  4708. StackObject* objRef = GetObjectAndResolveReference(esp);
  4709. if (objRef->ObjectType == ObjectTypes.Null)
  4710. return 0;
  4711. object obj = null;
  4712. int res = 0;
  4713. switch (objRef->ObjectType)
  4714. {
  4715. case ObjectTypes.Object:
  4716. res = (int)mStack[objRef->Value];
  4717. break;
  4718. case ObjectTypes.Integer:
  4719. res = objRef->Value;
  4720. break;
  4721. case ObjectTypes.FieldReference:
  4722. {
  4723. obj = mStack[objRef->Value];
  4724. int idx = objRef->ValueLow;
  4725. if (obj is ILTypeInstance)
  4726. {
  4727. res = ((ILTypeInstance)obj).Fields[idx].Value;
  4728. }
  4729. else
  4730. {
  4731. var t = AppDomain.GetType(obj.GetType());
  4732. StackObject so;
  4733. var sop = &so;
  4734. if (!((CLRType)t).CopyFieldToStack(idx, obj, this, ref sop, mStack))
  4735. res = (int)((CLRType)t).GetFieldValue(idx, obj);
  4736. else
  4737. {
  4738. res = so.Value;
  4739. }
  4740. }
  4741. }
  4742. break;
  4743. case ObjectTypes.ArrayReference:
  4744. {
  4745. Array arr = mStack[objRef->Value] as Array;
  4746. int idx = objRef->ValueLow;
  4747. if (arr is int[])
  4748. res = ((int[])arr)[idx];
  4749. else
  4750. {
  4751. res = (int)Convert.ToInt32(arr.GetValue(idx));
  4752. }
  4753. }
  4754. break;
  4755. case ObjectTypes.StaticFieldReference:
  4756. {
  4757. var t = AppDomain.GetType(objRef->Value);
  4758. int idx = objRef->ValueLow;
  4759. if (t is ILType)
  4760. {
  4761. res = ((ILType)t).StaticInstance.Fields[idx].Value;
  4762. }
  4763. else
  4764. {
  4765. StackObject so;
  4766. var sop = &so;
  4767. if (!((CLRType)t).CopyFieldToStack(idx, null, this, ref sop, mStack))
  4768. res = (int)((CLRType)t).GetFieldValue(idx, null);
  4769. else
  4770. {
  4771. res = so.Value;
  4772. }
  4773. }
  4774. }
  4775. break;
  4776. default:
  4777. throw new NotImplementedException();
  4778. }
  4779. return res;
  4780. }
  4781. public long RetriveInt64(StackObject* esp, IList<object> mStack)
  4782. {
  4783. StackObject* objRef = GetObjectAndResolveReference(esp);
  4784. if (objRef->ObjectType == ObjectTypes.Null)
  4785. return 0;
  4786. object obj = null;
  4787. long res = 0;
  4788. switch (objRef->ObjectType)
  4789. {
  4790. case ObjectTypes.Object:
  4791. res = (long)mStack[objRef->Value];
  4792. break;
  4793. case ObjectTypes.Long:
  4794. res = *(long*)&objRef->Value;
  4795. break;
  4796. case ObjectTypes.FieldReference:
  4797. {
  4798. obj = mStack[objRef->Value];
  4799. int idx = objRef->ValueLow;
  4800. StackObject so;
  4801. if (obj is ILTypeInstance)
  4802. {
  4803. so = ((ILTypeInstance)obj).Fields[idx];
  4804. res = *(long*)&so.Value;
  4805. }
  4806. else
  4807. {
  4808. var t = AppDomain.GetType(obj.GetType());
  4809. var sop = &so;
  4810. if (!((CLRType)t).CopyFieldToStack(idx, obj, this, ref sop, mStack))
  4811. res = (long)((CLRType)t).GetFieldValue(idx, obj);
  4812. else
  4813. {
  4814. res = *(long*)&so.Value;
  4815. }
  4816. }
  4817. }
  4818. break;
  4819. case ObjectTypes.ArrayReference:
  4820. {
  4821. Array arr = mStack[objRef->Value] as Array;
  4822. int idx = objRef->ValueLow;
  4823. if (arr is long[])
  4824. res = ((long[])arr)[idx];
  4825. else
  4826. {
  4827. res = (long)arr.GetValue(idx);
  4828. }
  4829. }
  4830. break;
  4831. case ObjectTypes.StaticFieldReference:
  4832. {
  4833. var t = AppDomain.GetType(objRef->Value);
  4834. int idx = objRef->ValueLow;
  4835. StackObject so;
  4836. if (t is ILType)
  4837. {
  4838. so = ((ILType)t).StaticInstance.Fields[idx];
  4839. res = *(long*)&so.Value;
  4840. }
  4841. else
  4842. {
  4843. var sop = &so;
  4844. if (!((CLRType)t).CopyFieldToStack(idx, null, this, ref sop, mStack))
  4845. res = (long)((CLRType)t).GetFieldValue(idx, null);
  4846. else
  4847. {
  4848. res = *(long*)&so.Value;
  4849. }
  4850. }
  4851. }
  4852. break;
  4853. default:
  4854. throw new NotImplementedException();
  4855. }
  4856. return res;
  4857. }
  4858. public float RetriveFloat(StackObject* esp, IList<object> mStack)
  4859. {
  4860. StackObject* objRef = GetObjectAndResolveReference(esp);
  4861. if (objRef->ObjectType == ObjectTypes.Null)
  4862. return 0;
  4863. object obj = null;
  4864. float res = 0;
  4865. switch (objRef->ObjectType)
  4866. {
  4867. case ObjectTypes.Object:
  4868. res = (float)mStack[objRef->Value];
  4869. break;
  4870. case ObjectTypes.Float:
  4871. res = *(float*)&objRef->Value;
  4872. break;
  4873. case ObjectTypes.FieldReference:
  4874. {
  4875. obj = mStack[objRef->Value];
  4876. int idx = objRef->ValueLow;
  4877. StackObject so;
  4878. if (obj is ILTypeInstance)
  4879. {
  4880. so = ((ILTypeInstance)obj).Fields[idx];
  4881. res = *(float*)&so.Value;
  4882. }
  4883. else
  4884. {
  4885. var t = AppDomain.GetType(obj.GetType());
  4886. var sop = &so;
  4887. if (!((CLRType)t).CopyFieldToStack(idx, obj, this, ref sop, mStack))
  4888. res = (float)((CLRType)t).GetFieldValue(idx, obj);
  4889. else
  4890. {
  4891. res = *(float*)&so.Value;
  4892. }
  4893. }
  4894. }
  4895. break;
  4896. case ObjectTypes.ArrayReference:
  4897. {
  4898. Array arr = mStack[objRef->Value] as Array;
  4899. int idx = objRef->ValueLow;
  4900. if (arr is float[])
  4901. res = ((float[])arr)[idx];
  4902. else
  4903. {
  4904. res = (float)arr.GetValue(idx);
  4905. }
  4906. }
  4907. break;
  4908. case ObjectTypes.StaticFieldReference:
  4909. {
  4910. var t = AppDomain.GetType(objRef->Value);
  4911. int idx = objRef->ValueLow;
  4912. StackObject so;
  4913. if (t is ILType)
  4914. {
  4915. so = ((ILType)t).StaticInstance.Fields[idx];
  4916. res = *(float*)&so.Value;
  4917. }
  4918. else
  4919. {
  4920. var sop = &so;
  4921. if (!((CLRType)t).CopyFieldToStack(idx, null, this, ref sop, mStack))
  4922. res = (float)((CLRType)t).GetFieldValue(idx, null);
  4923. else
  4924. {
  4925. res = *(float*)&so.Value;
  4926. }
  4927. }
  4928. }
  4929. break;
  4930. default:
  4931. throw new NotImplementedException();
  4932. }
  4933. return res;
  4934. }
  4935. public double RetriveDouble(StackObject* esp, IList<object> mStack)
  4936. {
  4937. StackObject* objRef = GetObjectAndResolveReference(esp);
  4938. if (objRef->ObjectType == ObjectTypes.Null)
  4939. return 0;
  4940. object obj = null;
  4941. double res = 0;
  4942. switch (objRef->ObjectType)
  4943. {
  4944. case ObjectTypes.Object:
  4945. res = (double)mStack[objRef->Value];
  4946. break;
  4947. case ObjectTypes.Double:
  4948. res = *(double*)&objRef->Value;
  4949. break;
  4950. case ObjectTypes.FieldReference:
  4951. {
  4952. obj = mStack[objRef->Value];
  4953. int idx = objRef->ValueLow;
  4954. StackObject so;
  4955. if (obj is ILTypeInstance)
  4956. {
  4957. so = ((ILTypeInstance)obj).Fields[idx];
  4958. res = *(double*)&so.Value;
  4959. }
  4960. else
  4961. {
  4962. var t = AppDomain.GetType(obj.GetType());
  4963. var sop = &so;
  4964. if (!((CLRType)t).CopyFieldToStack(idx, obj, this, ref sop, mStack))
  4965. res = (double)((CLRType)t).GetFieldValue(idx, obj);
  4966. else
  4967. {
  4968. res = *(double*)&so.Value;
  4969. }
  4970. }
  4971. }
  4972. break;
  4973. case ObjectTypes.ArrayReference:
  4974. {
  4975. Array arr = mStack[objRef->Value] as Array;
  4976. int idx = objRef->ValueLow;
  4977. if (arr is double[])
  4978. res = ((double[])arr)[idx];
  4979. else
  4980. {
  4981. res = (double)arr.GetValue(idx);
  4982. }
  4983. }
  4984. break;
  4985. case ObjectTypes.StaticFieldReference:
  4986. {
  4987. var t = AppDomain.GetType(objRef->Value);
  4988. int idx = objRef->ValueLow;
  4989. StackObject so;
  4990. if (t is ILType)
  4991. {
  4992. so = ((ILType)t).StaticInstance.Fields[idx];
  4993. res = *(double*)&so.Value;
  4994. }
  4995. else
  4996. {
  4997. var sop = &so;
  4998. if (!((CLRType)t).CopyFieldToStack(idx, null, this, ref sop, mStack))
  4999. res = (double)((CLRType)t).GetFieldValue(idx, null);
  5000. else
  5001. {
  5002. res = *(double*)&so.Value;
  5003. }
  5004. }
  5005. }
  5006. break;
  5007. default:
  5008. throw new NotImplementedException();
  5009. }
  5010. return res;
  5011. }
  5012. void ArraySetValue(Array arr, object obj, int idx)
  5013. {
  5014. if (obj == null)
  5015. arr.SetValue(null, idx);
  5016. else
  5017. arr.SetValue(arr.GetType().GetElementType().CheckCLRTypes(obj), idx);
  5018. }
  5019. void StoreIntValueToArray(Array arr, StackObject* val, StackObject* idx)
  5020. {
  5021. {
  5022. int[] tmp = arr as int[];
  5023. if (tmp != null)
  5024. {
  5025. tmp[idx->Value] = val->Value;
  5026. return;
  5027. }
  5028. }
  5029. {
  5030. short[] tmp = arr as short[];
  5031. if (tmp != null)
  5032. {
  5033. tmp[idx->Value] = (short)val->Value;
  5034. return;
  5035. }
  5036. }
  5037. {
  5038. byte[] tmp = arr as byte[];
  5039. if (tmp != null)
  5040. {
  5041. tmp[idx->Value] = (byte)val->Value;
  5042. return;
  5043. }
  5044. }
  5045. {
  5046. bool[] tmp = arr as bool[];
  5047. if (tmp != null)
  5048. {
  5049. tmp[idx->Value] = val->Value == 1;
  5050. return;
  5051. }
  5052. }
  5053. {
  5054. uint[] tmp = arr as uint[];
  5055. if (tmp != null)
  5056. {
  5057. tmp[idx->Value] = (uint)val->Value;
  5058. return;
  5059. }
  5060. }
  5061. {
  5062. ushort[] tmp = arr as ushort[];
  5063. if (tmp != null)
  5064. {
  5065. tmp[idx->Value] = (ushort)val->Value;
  5066. return;
  5067. }
  5068. }
  5069. {
  5070. char[] tmp = arr as char[];
  5071. if (tmp != null)
  5072. {
  5073. tmp[idx->Value] = (char)val->Value;
  5074. return;
  5075. }
  5076. }
  5077. {
  5078. sbyte[] tmp = arr as sbyte[];
  5079. if (tmp != null)
  5080. {
  5081. tmp[idx->Value] = (sbyte)val->Value;
  5082. return;
  5083. }
  5084. }
  5085. throw new NotImplementedException();
  5086. }
  5087. ExceptionHandler GetCorrespondingExceptionHandler(ExceptionHandler[] eh, object obj, int addr, ExceptionHandlerType type, bool explicitMatch)
  5088. {
  5089. ExceptionHandler res = null;
  5090. int distance = int.MaxValue;
  5091. Exception ex = obj is ILRuntimeException ? ((ILRuntimeException)obj).InnerException : obj as Exception;
  5092. foreach (var i in eh)
  5093. {
  5094. if (i.HandlerType == type)
  5095. {
  5096. if (addr >= i.TryStart && addr <= i.TryEnd)
  5097. {
  5098. if (CheckExceptionType(i.CatchType, ex, explicitMatch))
  5099. {
  5100. int d = addr - i.TryStart;
  5101. if (d < distance)
  5102. {
  5103. distance = d;
  5104. res = i;
  5105. }
  5106. }
  5107. }
  5108. }
  5109. }
  5110. return res;
  5111. }
  5112. void LoadFromFieldReference(object obj, int idx, StackObject* dst, IList<object> mStack)
  5113. {
  5114. if (obj is ILTypeInstance)
  5115. {
  5116. ((ILTypeInstance)obj).PushToStack(idx, dst, this, mStack);
  5117. }
  5118. else
  5119. {
  5120. CLRType t = AppDomain.GetType(obj.GetType()) as CLRType;
  5121. if (!t.CopyFieldToStack(idx, obj, this, ref dst, mStack))
  5122. ILIntepreter.PushObject(dst, mStack, t.GetFieldValue(idx, obj));
  5123. }
  5124. }
  5125. void StoreValueToFieldReference(ref object obj, int idx, StackObject* val, IList<object> mStack)
  5126. {
  5127. if (obj is ILTypeInstance)
  5128. {
  5129. ((ILTypeInstance)obj).AssignFromStack(idx, val, AppDomain, mStack);
  5130. }
  5131. else
  5132. {
  5133. CLRType t = AppDomain.GetType(obj.GetType()) as CLRType;
  5134. //It's impossible to garantee this field reference is a direct reference, it'll cause problem if it's not
  5135. //if (!t.AssignFieldFromStack(idx, ref obj, this, val, mStack))
  5136. {
  5137. var v = obj.GetType().CheckCLRTypes(CheckAndCloneValueType(StackObject.ToObject(val, AppDomain, mStack), AppDomain));
  5138. t.SetFieldValue(idx, ref obj, v, true);
  5139. }
  5140. }
  5141. }
  5142. void LoadFromArrayReference(object obj, int idx, StackObject* objRef, IType t, IList<object> mStack, int managedIdx = -1)
  5143. {
  5144. var nT = t.TypeForCLR;
  5145. LoadFromArrayReference(obj, idx, objRef, nT, mStack, managedIdx);
  5146. }
  5147. void LoadFromArrayReference(object obj, int idx, StackObject* objRef, Type nT, IList<object> mStack, int managedIdx = -1)
  5148. {
  5149. if (nT.IsPrimitive)
  5150. {
  5151. if (nT == typeof(int))
  5152. {
  5153. int[] arr = obj as int[];
  5154. objRef->ObjectType = ObjectTypes.Integer;
  5155. objRef->Value = arr[idx];
  5156. objRef->ValueLow = 0;
  5157. }
  5158. else if (nT == typeof(short))
  5159. {
  5160. short[] arr = obj as short[];
  5161. objRef->ObjectType = ObjectTypes.Integer;
  5162. objRef->Value = arr[idx];
  5163. objRef->ValueLow = 0;
  5164. }
  5165. else if (nT == typeof(long))
  5166. {
  5167. long[] arr = obj as long[];
  5168. objRef->ObjectType = ObjectTypes.Long;
  5169. *(long*)&objRef->Value = arr[idx];
  5170. }
  5171. else if (nT == typeof(float))
  5172. {
  5173. float[] arr = obj as float[];
  5174. objRef->ObjectType = ObjectTypes.Float;
  5175. *(float*)&objRef->Value = arr[idx];
  5176. objRef->ValueLow = 0;
  5177. }
  5178. else if (nT == typeof(double))
  5179. {
  5180. double[] arr = obj as double[];
  5181. objRef->ObjectType = ObjectTypes.Double;
  5182. *(double*)&objRef->Value = arr[idx];
  5183. }
  5184. else if (nT == typeof(byte))
  5185. {
  5186. byte[] arr = obj as byte[];
  5187. objRef->ObjectType = ObjectTypes.Integer;
  5188. objRef->Value = arr[idx];
  5189. objRef->ValueLow = 0;
  5190. }
  5191. else if (nT == typeof(char))
  5192. {
  5193. char[] arr = obj as char[];
  5194. objRef->ObjectType = ObjectTypes.Integer;
  5195. objRef->Value = arr[idx];
  5196. objRef->ValueLow = 0;
  5197. }
  5198. else if (nT == typeof(uint))
  5199. {
  5200. uint[] arr = obj as uint[];
  5201. objRef->ObjectType = ObjectTypes.Integer;
  5202. *(uint*)&objRef->Value = arr[idx];
  5203. objRef->ValueLow = 0;
  5204. }
  5205. else if (nT == typeof(sbyte))
  5206. {
  5207. sbyte[] arr = obj as sbyte[];
  5208. objRef->ObjectType = ObjectTypes.Integer;
  5209. objRef->Value = arr[idx];
  5210. objRef->ValueLow = 0;
  5211. }
  5212. else if (nT == typeof(ulong))
  5213. {
  5214. ulong[] arr = obj as ulong[];
  5215. objRef->ObjectType = ObjectTypes.Long;
  5216. *(ulong*)&objRef->Value = arr[idx];
  5217. }
  5218. else
  5219. throw new NotImplementedException();
  5220. }
  5221. else
  5222. {
  5223. Array arr = obj as Array;
  5224. objRef->ObjectType = ObjectTypes.Object;
  5225. if (managedIdx >= 0)
  5226. {
  5227. objRef->Value = managedIdx;
  5228. mStack[managedIdx] = arr.GetValue(idx);
  5229. }
  5230. else
  5231. {
  5232. objRef->Value = mStack.Count;
  5233. mStack.Add(arr.GetValue(idx));
  5234. }
  5235. objRef->ValueLow = 0;
  5236. }
  5237. }
  5238. void StoreValueToArrayReference(StackObject* objRef, StackObject* val, IType t, IList<object> mStack)
  5239. {
  5240. var nT = t.TypeForCLR;
  5241. StoreValueToArrayReference(objRef, val, nT, mStack);
  5242. }
  5243. void StoreValueToArrayReference(StackObject* objRef, StackObject* val, Type nT, IList<object> mStack)
  5244. {
  5245. if (nT.IsPrimitive)
  5246. {
  5247. if (nT == typeof(int))
  5248. {
  5249. int[] arr = mStack[objRef->Value] as int[];
  5250. arr[objRef->ValueLow] = val->Value;
  5251. }
  5252. else if (nT == typeof(short))
  5253. {
  5254. short[] arr = mStack[objRef->Value] as short[];
  5255. arr[objRef->ValueLow] = (short)val->Value;
  5256. }
  5257. else if (nT == typeof(long))
  5258. {
  5259. long[] arr = mStack[objRef->Value] as long[];
  5260. arr[objRef->ValueLow] = *(long*)&val->Value;
  5261. }
  5262. else if (nT == typeof(float))
  5263. {
  5264. float[] arr = mStack[objRef->Value] as float[];
  5265. arr[objRef->ValueLow] = *(float*)&val->Value;
  5266. }
  5267. else if (nT == typeof(double))
  5268. {
  5269. double[] arr = mStack[objRef->Value] as double[];
  5270. arr[objRef->ValueLow] = *(double*)&val->Value;
  5271. }
  5272. else if (nT == typeof(byte))
  5273. {
  5274. byte[] arr = mStack[objRef->Value] as byte[];
  5275. arr[objRef->ValueLow] = (byte)val->Value;
  5276. }
  5277. else if (nT == typeof(char))
  5278. {
  5279. char[] arr = mStack[objRef->Value] as char[];
  5280. arr[objRef->ValueLow] = (char)val->Value;
  5281. }
  5282. else if (nT == typeof(uint))
  5283. {
  5284. uint[] arr = mStack[objRef->Value] as uint[];
  5285. arr[objRef->ValueLow] = (uint)val->Value;
  5286. }
  5287. else if (nT == typeof(sbyte))
  5288. {
  5289. sbyte[] arr = mStack[objRef->Value] as sbyte[];
  5290. arr[objRef->ValueLow] = (sbyte)val->Value;
  5291. }
  5292. else
  5293. throw new NotImplementedException();
  5294. }
  5295. else
  5296. {
  5297. Array arr = mStack[objRef->Value] as Array;
  5298. arr.SetValue(mStack[val->Value], objRef->ValueLow);
  5299. }
  5300. }
  5301. bool CheckExceptionType(IType catchType, object exception, bool explicitMatch)
  5302. {
  5303. if (catchType is CLRType)
  5304. {
  5305. if (explicitMatch)
  5306. return exception.GetType() == catchType.TypeForCLR;
  5307. else
  5308. return catchType.TypeForCLR.IsAssignableFrom(exception.GetType());
  5309. }
  5310. else
  5311. throw new NotImplementedException();
  5312. }
  5313. #if NET_4_6 || NET_STANDARD_2_0
  5314. [System.Runtime.CompilerServices.MethodImpl(System.Runtime.CompilerServices.MethodImplOptions.AggressiveInlining)]
  5315. #endif
  5316. public static StackObject* ResolveReference(StackObject* esp)
  5317. {
  5318. var addr = *(long*)&esp->Value;
  5319. return (StackObject*)addr;
  5320. }
  5321. #if NET_4_6 || NET_STANDARD_2_0
  5322. [System.Runtime.CompilerServices.MethodImpl(System.Runtime.CompilerServices.MethodImplOptions.AggressiveInlining)]
  5323. #endif
  5324. public static StackObject* GetObjectAndResolveReference(StackObject* esp)
  5325. {
  5326. if (esp->ObjectType == ObjectTypes.StackObjectReference)
  5327. {
  5328. return ResolveReference(esp);
  5329. }
  5330. else
  5331. return esp;
  5332. }
  5333. StackObject* PushParameters(IMethod method, StackObject* esp, object[] p, bool useRegister)
  5334. {
  5335. IList<object> mStack = stack.ManagedStack;
  5336. var plist = method.Parameters;
  5337. int pCnt = plist != null ? plist.Count : 0;
  5338. int pCnt2 = p != null ? p.Length : 0;
  5339. if (pCnt != pCnt2)
  5340. throw new ArgumentOutOfRangeException("Parameter mismatch");
  5341. if (pCnt2 > 0)
  5342. {
  5343. for (int i = 0; i < p.Length; i++)
  5344. {
  5345. bool isBox = false;
  5346. if (plist != null && i < plist.Count)
  5347. isBox = plist[i] == AppDomain.ObjectType;
  5348. object obj = p[i];
  5349. if (obj is CrossBindingAdaptorType)
  5350. obj = ((CrossBindingAdaptorType)obj).ILInstance;
  5351. var res = ILIntepreter.PushObject(esp, mStack, obj, isBox);
  5352. if (esp->ObjectType < ObjectTypes.Object && useRegister)
  5353. mStack.Add(null);
  5354. esp = res;
  5355. }
  5356. }
  5357. return esp;
  5358. }
  5359. public void CopyToStack(StackObject* dst, StackObject* src, IList<object> mStack)
  5360. {
  5361. if (src->ObjectType == ObjectTypes.ValueTypeObjectReference)
  5362. {
  5363. var descriptor = ResolveReference(src);
  5364. var t = domain.GetTypeByIndex(descriptor->Value);
  5365. AllocValueType(dst, t);
  5366. CopyStackValueType(src, dst, mStack);
  5367. }
  5368. else
  5369. {
  5370. *dst = *src;
  5371. if (dst->ObjectType >= ObjectTypes.Object)
  5372. {
  5373. dst->Value = mStack.Count;
  5374. var obj = mStack[src->Value];
  5375. mStack.Add(obj);
  5376. }
  5377. }
  5378. }
  5379. internal static object CheckAndCloneValueType(object obj, Enviorment.AppDomain domain)
  5380. {
  5381. if (obj != null)
  5382. {
  5383. if (obj is ILTypeInstance)
  5384. {
  5385. ILTypeInstance ins = obj as ILTypeInstance;
  5386. if (ins.IsValueType)
  5387. {
  5388. return ins.Clone();
  5389. }
  5390. }
  5391. else
  5392. {
  5393. var type = obj.GetType();
  5394. var typeFlags = type.GetTypeFlags();
  5395. var isPrimitive = (typeFlags & CLR.Utils.Extensions.TypeFlags.IsPrimitive) != 0;
  5396. var isValueType = (typeFlags & CLR.Utils.Extensions.TypeFlags.IsValueType) != 0;
  5397. if (!isPrimitive && isValueType)
  5398. {
  5399. var t = domain.GetType(type);
  5400. return ((CLRType)t).PerformMemberwiseClone(obj);
  5401. }
  5402. }
  5403. }
  5404. return obj;
  5405. }
  5406. #if NET_4_6 || NET_STANDARD_2_0
  5407. [System.Runtime.CompilerServices.MethodImpl(System.Runtime.CompilerServices.MethodImplOptions.AggressiveInlining)]
  5408. #endif
  5409. public static StackObject* PushOne(StackObject* esp)
  5410. {
  5411. esp->ObjectType = ObjectTypes.Integer;
  5412. esp->Value = 1;
  5413. return esp + 1;
  5414. }
  5415. #if NET_4_6 || NET_STANDARD_2_0
  5416. [System.Runtime.CompilerServices.MethodImpl(System.Runtime.CompilerServices.MethodImplOptions.AggressiveInlining)]
  5417. #endif
  5418. public static StackObject* PushZero(StackObject* esp)
  5419. {
  5420. esp->ObjectType = ObjectTypes.Integer;
  5421. esp->Value = 0;
  5422. return esp + 1;
  5423. }
  5424. #if NET_4_6 || NET_STANDARD_2_0
  5425. [System.Runtime.CompilerServices.MethodImpl(System.Runtime.CompilerServices.MethodImplOptions.AggressiveInlining)]
  5426. #endif
  5427. public static StackObject* PushNull(StackObject* esp)
  5428. {
  5429. esp->ObjectType = ObjectTypes.Null;
  5430. esp->Value = -1;
  5431. esp->ValueLow = 0;
  5432. return esp + 1;
  5433. }
  5434. public static void UnboxObject(StackObject* esp, object obj, IList<object> mStack = null, Enviorment.AppDomain domain = null)
  5435. {
  5436. if (esp->ObjectType == ObjectTypes.ValueTypeObjectReference && domain != null)
  5437. {
  5438. var dst = ILIntepreter.ResolveReference(esp);
  5439. var vt = domain.GetTypeByIndex(dst->Value);
  5440. if (obj == null)//Nothing to do
  5441. return;
  5442. if (obj is ILTypeInstance)
  5443. {
  5444. var ins = (ILTypeInstance)obj;
  5445. ins.CopyValueTypeToStack(dst, mStack);
  5446. }
  5447. else if (obj is CrossBindingAdaptorType)
  5448. {
  5449. var ins = ((CrossBindingAdaptorType)obj).ILInstance;
  5450. ins.CopyValueTypeToStack(dst, mStack);
  5451. }
  5452. else
  5453. {
  5454. ((CLRType)vt).ValueTypeBinder.CopyValueTypeToStack(obj, dst, mStack);
  5455. }
  5456. }
  5457. else if(obj == null)
  5458. {
  5459. return;
  5460. }
  5461. else if (obj is int)
  5462. {
  5463. esp->ObjectType = ObjectTypes.Integer;
  5464. esp->Value = (int)obj;
  5465. }
  5466. else if (obj is bool)
  5467. {
  5468. esp->ObjectType = ObjectTypes.Integer;
  5469. esp->Value = (bool)(obj) ? 1 : 0;
  5470. }
  5471. else if (obj is short)
  5472. {
  5473. esp->ObjectType = ObjectTypes.Integer;
  5474. esp->Value = (short)obj;
  5475. }
  5476. else if (obj is long)
  5477. {
  5478. esp->ObjectType = ObjectTypes.Long;
  5479. *(long*)(&esp->Value) = (long)obj;
  5480. }
  5481. else if (obj is float)
  5482. {
  5483. esp->ObjectType = ObjectTypes.Float;
  5484. *(float*)(&esp->Value) = (float)obj;
  5485. }
  5486. else if (obj is byte)
  5487. {
  5488. esp->ObjectType = ObjectTypes.Integer;
  5489. esp->Value = (byte)obj;
  5490. }
  5491. else if (obj is uint)
  5492. {
  5493. esp->ObjectType = ObjectTypes.Integer;
  5494. esp->Value = (int)(uint)obj;
  5495. }
  5496. else if (obj is ushort)
  5497. {
  5498. esp->ObjectType = ObjectTypes.Integer;
  5499. esp->Value = (int)(ushort)obj;
  5500. }
  5501. else if (obj is char)
  5502. {
  5503. esp->ObjectType = ObjectTypes.Integer;
  5504. esp->Value = (int)(char)obj;
  5505. }
  5506. else if (obj is double)
  5507. {
  5508. esp->ObjectType = ObjectTypes.Double;
  5509. *(double*)(&esp->Value) = (double)obj;
  5510. }
  5511. else if (obj is ulong)
  5512. {
  5513. esp->ObjectType = ObjectTypes.Long;
  5514. *(ulong*)(&esp->Value) = (ulong)obj;
  5515. }
  5516. else if (obj is sbyte)
  5517. {
  5518. esp->ObjectType = ObjectTypes.Integer;
  5519. esp->Value = (sbyte)obj;
  5520. }
  5521. else if (obj is Enum)
  5522. {
  5523. esp->ObjectType = ObjectTypes.Integer;
  5524. esp->Value = Convert.ToInt32(obj);
  5525. }
  5526. else
  5527. throw new NotImplementedException();
  5528. }
  5529. public static StackObject* PushObject(StackObject* esp, IList<object> mStack, object obj, bool isBox = false)
  5530. {
  5531. if (obj != null)
  5532. {
  5533. if (!isBox)
  5534. {
  5535. var typeFlags = obj.GetType().GetTypeFlags();
  5536. if ((typeFlags & CLR.Utils.Extensions.TypeFlags.IsPrimitive) != 0)
  5537. {
  5538. UnboxObject(esp, obj, mStack);
  5539. }
  5540. else if ((typeFlags & CLR.Utils.Extensions.TypeFlags.IsEnum) != 0)
  5541. {
  5542. esp->ObjectType = ObjectTypes.Integer;
  5543. esp->Value = Convert.ToInt32(obj);
  5544. }
  5545. else
  5546. {
  5547. esp->ObjectType = ObjectTypes.Object;
  5548. esp->Value = mStack.Count;
  5549. mStack.Add(obj);
  5550. }
  5551. }
  5552. else
  5553. {
  5554. esp->ObjectType = ObjectTypes.Object;
  5555. esp->Value = mStack.Count;
  5556. mStack.Add(obj);
  5557. }
  5558. }
  5559. else
  5560. {
  5561. if (isBox)
  5562. {
  5563. esp->ObjectType = ObjectTypes.Object;
  5564. esp->Value = mStack.Count;
  5565. mStack.Add(obj);
  5566. }
  5567. else
  5568. return PushNull(esp);
  5569. }
  5570. return esp + 1;
  5571. }
  5572. //Don't ask me why add this funky method for this, otherwise Unity won't calculate the right value
  5573. #if NET_4_6 || NET_STANDARD_2_0
  5574. [System.Runtime.CompilerServices.MethodImpl(System.Runtime.CompilerServices.MethodImplOptions.AggressiveInlining)]
  5575. #endif
  5576. public static StackObject* Add(StackObject* a, int b)
  5577. {
  5578. return (StackObject*)((long)a + sizeof(StackObject) * b);
  5579. }
  5580. #if NET_4_6 || NET_STANDARD_2_0
  5581. [System.Runtime.CompilerServices.MethodImpl(System.Runtime.CompilerServices.MethodImplOptions.AggressiveInlining)]
  5582. #endif
  5583. public static StackObject* Minus(StackObject* a, int b)
  5584. {
  5585. return (StackObject*)((long)a - sizeof(StackObject) * b);
  5586. }
  5587. #if NET_4_6 || NET_STANDARD_2_0
  5588. [System.Runtime.CompilerServices.MethodImpl(System.Runtime.CompilerServices.MethodImplOptions.AggressiveInlining)]
  5589. #endif
  5590. public void Free(StackObject* esp)
  5591. {
  5592. switch (esp->ObjectType)
  5593. {
  5594. case ObjectTypes.Object:
  5595. case ObjectTypes.FieldReference:
  5596. case ObjectTypes.ArrayReference:
  5597. var mStack = stack.ManagedStack;
  5598. if (esp->Value == mStack.Count - 1)
  5599. mStack.RemoveAt(esp->Value);
  5600. break;
  5601. case ObjectTypes.ValueTypeObjectReference:
  5602. FreeStackValueType(esp);
  5603. break;
  5604. }
  5605. #if DEBUG && !DISABLE_ILRUNTIME_DEBUG
  5606. esp->ObjectType = ObjectTypes.Null;
  5607. esp->Value = -1;
  5608. esp->ValueLow = 0;
  5609. #endif
  5610. }
  5611. public void FreeStackValueType(StackObject* esp)
  5612. {
  5613. if (esp->ObjectType == ObjectTypes.ValueTypeObjectReference)
  5614. {
  5615. var addr = ILIntepreter.ResolveReference(esp);
  5616. if (addr <= ValueTypeBasePointer)//Only Stack allocation after base pointer should be freed, local variable are freed automatically
  5617. stack.FreeValueTypeObject(esp);
  5618. esp->ObjectType = ObjectTypes.Null;
  5619. }
  5620. }
  5621. public void AllocValueType(StackObject* ptr, IType type)
  5622. {
  5623. stack.AllocValueType(ptr, type);
  5624. }
  5625. }
  5626. }