ILIntepreter.cs 312 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623262426252626262726282629263026312632263326342635263626372638263926402641264226432644264526462647264826492650265126522653265426552656265726582659266026612662266326642665266626672668266926702671267226732674267526762677267826792680268126822683268426852686268726882689269026912692269326942695269626972698269927002701270227032704270527062707270827092710271127122713271427152716271727182719272027212722272327242725272627272728272927302731273227332734273527362737273827392740274127422743274427452746274727482749275027512752275327542755275627572758275927602761276227632764276527662767276827692770277127722773277427752776277727782779278027812782278327842785278627872788278927902791279227932794279527962797279827992800280128022803280428052806280728082809281028112812281328142815281628172818281928202821282228232824282528262827282828292830283128322833283428352836283728382839284028412842284328442845284628472848284928502851285228532854285528562857285828592860286128622863286428652866286728682869287028712872287328742875287628772878287928802881288228832884288528862887288828892890289128922893289428952896289728982899290029012902290329042905290629072908290929102911291229132914291529162917291829192920292129222923292429252926292729282929293029312932293329342935293629372938293929402941294229432944294529462947294829492950295129522953295429552956295729582959296029612962296329642965296629672968296929702971297229732974297529762977297829792980298129822983298429852986298729882989299029912992299329942995299629972998299930003001300230033004300530063007300830093010301130123013301430153016301730183019302030213022302330243025302630273028302930303031303230333034303530363037303830393040304130423043304430453046304730483049305030513052305330543055305630573058305930603061306230633064306530663067306830693070307130723073307430753076307730783079308030813082308330843085308630873088308930903091309230933094309530963097309830993100310131023103310431053106310731083109311031113112311331143115311631173118311931203121312231233124312531263127312831293130313131323133313431353136313731383139314031413142314331443145314631473148314931503151315231533154315531563157315831593160316131623163316431653166316731683169317031713172317331743175317631773178317931803181318231833184318531863187318831893190319131923193319431953196319731983199320032013202320332043205320632073208320932103211321232133214321532163217321832193220322132223223322432253226322732283229323032313232323332343235323632373238323932403241324232433244324532463247324832493250325132523253325432553256325732583259326032613262326332643265326632673268326932703271327232733274327532763277327832793280328132823283328432853286328732883289329032913292329332943295329632973298329933003301330233033304330533063307330833093310331133123313331433153316331733183319332033213322332333243325332633273328332933303331333233333334333533363337333833393340334133423343334433453346334733483349335033513352335333543355335633573358335933603361336233633364336533663367336833693370337133723373337433753376337733783379338033813382338333843385338633873388338933903391339233933394339533963397339833993400340134023403340434053406340734083409341034113412341334143415341634173418341934203421342234233424342534263427342834293430343134323433343434353436343734383439344034413442344334443445344634473448344934503451345234533454345534563457345834593460346134623463346434653466346734683469347034713472347334743475347634773478347934803481348234833484348534863487348834893490349134923493349434953496349734983499350035013502350335043505350635073508350935103511351235133514351535163517351835193520352135223523352435253526352735283529353035313532353335343535353635373538353935403541354235433544354535463547354835493550355135523553355435553556355735583559356035613562356335643565356635673568356935703571357235733574357535763577357835793580358135823583358435853586358735883589359035913592359335943595359635973598359936003601360236033604360536063607360836093610361136123613361436153616361736183619362036213622362336243625362636273628362936303631363236333634363536363637363836393640364136423643364436453646364736483649365036513652365336543655365636573658365936603661366236633664366536663667366836693670367136723673367436753676367736783679368036813682368336843685368636873688368936903691369236933694369536963697369836993700370137023703370437053706370737083709371037113712371337143715371637173718371937203721372237233724372537263727372837293730373137323733373437353736373737383739374037413742374337443745374637473748374937503751375237533754375537563757375837593760376137623763376437653766376737683769377037713772377337743775377637773778377937803781378237833784378537863787378837893790379137923793379437953796379737983799380038013802380338043805380638073808380938103811381238133814381538163817381838193820382138223823382438253826382738283829383038313832383338343835383638373838383938403841384238433844384538463847384838493850385138523853385438553856385738583859386038613862386338643865386638673868386938703871387238733874387538763877387838793880388138823883388438853886388738883889389038913892389338943895389638973898389939003901390239033904390539063907390839093910391139123913391439153916391739183919392039213922392339243925392639273928392939303931393239333934393539363937393839393940394139423943394439453946394739483949395039513952395339543955395639573958395939603961396239633964396539663967396839693970397139723973397439753976397739783979398039813982398339843985398639873988398939903991399239933994399539963997399839994000400140024003400440054006400740084009401040114012401340144015401640174018401940204021402240234024402540264027402840294030403140324033403440354036403740384039404040414042404340444045404640474048404940504051405240534054405540564057405840594060406140624063406440654066406740684069407040714072407340744075407640774078407940804081408240834084408540864087408840894090409140924093409440954096409740984099410041014102410341044105410641074108410941104111411241134114411541164117411841194120412141224123412441254126412741284129413041314132413341344135413641374138413941404141414241434144414541464147414841494150415141524153415441554156415741584159416041614162416341644165416641674168416941704171417241734174417541764177417841794180418141824183418441854186418741884189419041914192419341944195419641974198419942004201420242034204420542064207420842094210421142124213421442154216421742184219422042214222422342244225422642274228422942304231423242334234423542364237423842394240424142424243424442454246424742484249425042514252425342544255425642574258425942604261426242634264426542664267426842694270427142724273427442754276427742784279428042814282428342844285428642874288428942904291429242934294429542964297429842994300430143024303430443054306430743084309431043114312431343144315431643174318431943204321432243234324432543264327432843294330433143324333433443354336433743384339434043414342434343444345434643474348434943504351435243534354435543564357435843594360436143624363436443654366436743684369437043714372437343744375437643774378437943804381438243834384438543864387438843894390439143924393439443954396439743984399440044014402440344044405440644074408440944104411441244134414441544164417441844194420442144224423442444254426442744284429443044314432443344344435443644374438443944404441444244434444444544464447444844494450445144524453445444554456445744584459446044614462446344644465446644674468446944704471447244734474447544764477447844794480448144824483448444854486448744884489449044914492449344944495449644974498449945004501450245034504450545064507450845094510451145124513451445154516451745184519452045214522452345244525452645274528452945304531453245334534453545364537453845394540454145424543454445454546454745484549455045514552455345544555455645574558455945604561456245634564456545664567456845694570457145724573457445754576457745784579458045814582458345844585458645874588458945904591459245934594459545964597459845994600460146024603460446054606460746084609461046114612461346144615461646174618461946204621462246234624462546264627462846294630463146324633463446354636463746384639464046414642464346444645464646474648464946504651465246534654465546564657465846594660466146624663466446654666466746684669467046714672467346744675467646774678467946804681468246834684468546864687468846894690469146924693469446954696469746984699470047014702470347044705470647074708470947104711471247134714471547164717471847194720472147224723472447254726472747284729473047314732473347344735473647374738473947404741474247434744474547464747474847494750475147524753475447554756475747584759476047614762476347644765476647674768476947704771477247734774477547764777477847794780478147824783478447854786478747884789479047914792479347944795479647974798479948004801480248034804480548064807480848094810481148124813481448154816481748184819482048214822482348244825482648274828482948304831483248334834483548364837483848394840484148424843484448454846484748484849485048514852485348544855485648574858485948604861486248634864486548664867486848694870487148724873487448754876487748784879488048814882488348844885488648874888488948904891489248934894489548964897489848994900490149024903490449054906490749084909491049114912491349144915491649174918491949204921492249234924492549264927492849294930493149324933493449354936493749384939494049414942494349444945494649474948494949504951495249534954495549564957495849594960496149624963496449654966496749684969497049714972497349744975497649774978497949804981498249834984498549864987498849894990499149924993499449954996499749984999500050015002500350045005500650075008500950105011501250135014501550165017501850195020502150225023502450255026502750285029503050315032503350345035503650375038503950405041504250435044504550465047504850495050505150525053505450555056505750585059506050615062506350645065506650675068506950705071507250735074507550765077507850795080508150825083508450855086508750885089509050915092509350945095509650975098509951005101510251035104510551065107510851095110511151125113511451155116511751185119512051215122512351245125512651275128512951305131513251335134513551365137513851395140514151425143514451455146514751485149515051515152515351545155515651575158515951605161516251635164516551665167516851695170517151725173517451755176517751785179518051815182518351845185518651875188518951905191519251935194519551965197519851995200520152025203520452055206520752085209521052115212521352145215521652175218521952205221522252235224522552265227522852295230523152325233523452355236523752385239524052415242524352445245524652475248524952505251525252535254525552565257525852595260526152625263526452655266526752685269527052715272527352745275527652775278527952805281528252835284528552865287528852895290529152925293529452955296529752985299530053015302530353045305530653075308530953105311531253135314531553165317531853195320532153225323532453255326532753285329533053315332533353345335533653375338533953405341534253435344534553465347534853495350535153525353535453555356535753585359536053615362536353645365536653675368536953705371537253735374537553765377537853795380538153825383538453855386538753885389539053915392539353945395539653975398539954005401540254035404540554065407540854095410541154125413541454155416541754185419542054215422542354245425542654275428542954305431543254335434543554365437543854395440544154425443544454455446544754485449545054515452545354545455545654575458545954605461546254635464546554665467546854695470547154725473547454755476547754785479548054815482548354845485548654875488548954905491549254935494549554965497549854995500550155025503550455055506550755085509551055115512551355145515551655175518551955205521552255235524552555265527552855295530553155325533553455355536553755385539554055415542554355445545554655475548554955505551555255535554555555565557555855595560556155625563556455655566556755685569557055715572557355745575557655775578557955805581558255835584558555865587558855895590559155925593559455955596559755985599560056015602560356045605560656075608560956105611561256135614561556165617561856195620562156225623562456255626562756285629563056315632563356345635563656375638563956405641564256435644564556465647564856495650565156525653565456555656565756585659566056615662566356645665566656675668566956705671567256735674567556765677567856795680568156825683568456855686568756885689569056915692569356945695569656975698569957005701570257035704570557065707570857095710571157125713571457155716571757185719572057215722572357245725572657275728572957305731573257335734573557365737573857395740574157425743574457455746574757485749575057515752575357545755575657575758575957605761576257635764576557665767576857695770577157725773577457755776577757785779578057815782578357845785578657875788578957905791579257935794579557965797579857995800580158025803580458055806580758085809581058115812581358145815
  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 && (ip->TokenInteger < e.TryStart || ip->TokenInteger > e.TryEnd) && e.HandlerType == ExceptionHandlerType.Finally
  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. if (finallyEndAddress < 0)
  1901. {
  1902. unhandledException = true;
  1903. finallyEndAddress = 0;
  1904. throw lastCaughtEx;
  1905. }
  1906. else
  1907. {
  1908. ip = ptr + finallyEndAddress;
  1909. finallyEndAddress = 0;
  1910. continue;
  1911. }
  1912. }
  1913. case OpCodeEnum.Call:
  1914. case OpCodeEnum.Callvirt:
  1915. {
  1916. IMethod m = domain.GetMethod(ip->TokenInteger);
  1917. if (m == null)
  1918. {
  1919. //Irrelevant method
  1920. int cnt = (int)ip->TokenLong;
  1921. //Balance the stack
  1922. for (int i = 0; i < cnt; i++)
  1923. {
  1924. Free(esp - 1);
  1925. esp--;
  1926. }
  1927. }
  1928. else
  1929. {
  1930. if (m is ILMethod)
  1931. {
  1932. ILMethod ilm = (ILMethod)m;
  1933. bool processed = false;
  1934. if (m.IsDelegateInvoke)
  1935. {
  1936. var instance = StackObject.ToObject((Minus(esp, m.ParameterCount + 1)), domain, mStack);
  1937. if (instance is IDelegateAdapter)
  1938. {
  1939. esp = ((IDelegateAdapter)instance).ILInvoke(this, esp, mStack);
  1940. processed = true;
  1941. }
  1942. }
  1943. if (!processed)
  1944. {
  1945. if (code == OpCodeEnum.Callvirt)
  1946. {
  1947. objRef = GetObjectAndResolveReference(Minus(esp, ilm.ParameterCount + 1));
  1948. if (objRef->ObjectType == ObjectTypes.Null)
  1949. throw new NullReferenceException();
  1950. if (objRef->ObjectType == ObjectTypes.ValueTypeObjectReference)
  1951. {
  1952. dst = ILIntepreter.ResolveReference(objRef);
  1953. var ft = domain.GetTypeByIndex(dst->Value) as ILType;
  1954. ilm = ft.GetVirtualMethod(ilm) as ILMethod;
  1955. }
  1956. else
  1957. {
  1958. obj = mStack[objRef->Value];
  1959. if (obj == null)
  1960. throw new NullReferenceException();
  1961. ilm = ((ILTypeInstance)obj).Type.GetVirtualMethod(ilm) as ILMethod;
  1962. }
  1963. }
  1964. if (ilm.ShouldUseRegisterVM)
  1965. {
  1966. PrepareRegisterCallStack(esp, mStack, ilm);
  1967. esp = ExecuteR(ilm, esp, out unhandledException);
  1968. }
  1969. else
  1970. esp = Execute(ilm, esp, out unhandledException);
  1971. ValueTypeBasePointer = bp;
  1972. if (unhandledException)
  1973. returned = true;
  1974. }
  1975. }
  1976. else
  1977. {
  1978. CLRMethod cm = (CLRMethod)m;
  1979. bool processed = false;
  1980. if (cm.IsDelegateInvoke)
  1981. {
  1982. var instance = StackObject.ToObject((Minus(esp, cm.ParameterCount + 1)), domain, mStack);
  1983. if (instance is IDelegateAdapter)
  1984. {
  1985. esp = ((IDelegateAdapter)instance).ILInvoke(this, esp, mStack);
  1986. processed = true;
  1987. }
  1988. }
  1989. if (!processed)
  1990. {
  1991. var redirect = cm.Redirection;
  1992. if (redirect != null)
  1993. esp = redirect(this, esp, mStack, cm, false);
  1994. else
  1995. {
  1996. #if DEBUG && !DISABLE_ILRUNTIME_DEBUG
  1997. if (!allowUnboundCLRMethod)
  1998. throw new NotSupportedException(cm.ToString() + " is not bound!");
  1999. #endif
  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.BeginSample(cm.ToString());
  2004. #else
  2005. UnityEngine.Profiler.BeginSample(cm.ToString());
  2006. #endif
  2007. #endif
  2008. object result = cm.Invoke(this, esp, mStack);
  2009. #if DEBUG && !NO_PROFILER
  2010. if (System.Threading.Thread.CurrentThread.ManagedThreadId == AppDomain.UnityMainThreadID)
  2011. #if UNITY_5_5_OR_NEWER
  2012. UnityEngine.Profiling.Profiler.EndSample();
  2013. #else
  2014. UnityEngine.Profiler.EndSample();
  2015. #endif
  2016. #endif
  2017. if (result is CrossBindingAdaptorType)
  2018. result = ((CrossBindingAdaptorType)result).ILInstance;
  2019. int paramCount = cm.ParameterCount;
  2020. for (int i = 1; i <= paramCount; i++)
  2021. {
  2022. Free(Minus(esp, i));
  2023. }
  2024. esp = Minus(esp, paramCount);
  2025. if (cm.HasThis)
  2026. {
  2027. Free(esp - 1);
  2028. esp--;
  2029. }
  2030. if (cm.ReturnType != AppDomain.VoidType && !cm.IsConstructor)
  2031. {
  2032. esp = PushObject(esp, mStack, result, cm.ReturnType.TypeForCLR == typeof(object));
  2033. }
  2034. }
  2035. }
  2036. }
  2037. }
  2038. }
  2039. break;
  2040. #endregion
  2041. #region FieldOperation
  2042. case OpCodeEnum.Stfld:
  2043. {
  2044. objRef = GetObjectAndResolveReference(esp - 1 - 1);
  2045. if (objRef->ObjectType == ObjectTypes.ValueTypeObjectReference)
  2046. {
  2047. dst = ILIntepreter.ResolveReference(objRef);
  2048. var ft = domain.GetTypeByIndex(dst->Value);
  2049. if (ft is ILType)
  2050. CopyToValueTypeField(dst, (int)ip->TokenLong, esp - 1, mStack);
  2051. else
  2052. CopyToValueTypeField(dst, ((CLRType)ft).FieldIndexMapping[(int)ip->TokenLong], esp - 1, mStack);
  2053. }
  2054. else
  2055. {
  2056. obj = RetriveObject(objRef, mStack);
  2057. if (obj != null)
  2058. {
  2059. if (obj is ILTypeInstance)
  2060. {
  2061. ILTypeInstance instance = obj as ILTypeInstance;
  2062. val = esp - 1;
  2063. instance.AssignFromStack((int)ip->TokenLong, val, AppDomain, mStack);
  2064. }
  2065. else
  2066. {
  2067. var t = obj.GetType();
  2068. type = AppDomain.GetType((int)(ip->TokenLong >> 32));
  2069. if (type != null)
  2070. {
  2071. val = esp - 1;
  2072. var fieldToken = (int)ip->TokenLong;
  2073. var f = ((CLRType)type).GetField(fieldToken);
  2074. if (!((CLRType)type).AssignFieldFromStack(fieldToken, ref obj, this, val, mStack))
  2075. ((CLRType)type).SetFieldValue(fieldToken, ref obj, f.FieldType.CheckCLRTypes(CheckAndCloneValueType(StackObject.ToObject(val, domain, mStack), domain)));
  2076. //Writeback
  2077. if (t.IsValueType)
  2078. {
  2079. switch (objRef->ObjectType)
  2080. {
  2081. case ObjectTypes.Object:
  2082. mStack[objRef->Value] = obj;
  2083. break;
  2084. case ObjectTypes.FieldReference:
  2085. {
  2086. var oldObj = mStack[objRef->Value];
  2087. int idx = objRef->ValueLow;
  2088. if (oldObj is ILTypeInstance)
  2089. {
  2090. ((ILTypeInstance)oldObj)[idx] = obj;
  2091. }
  2092. else
  2093. {
  2094. var it = AppDomain.GetType(oldObj.GetType());
  2095. ((CLRType)it).SetFieldValue(idx, ref oldObj, obj);
  2096. }
  2097. }
  2098. break;
  2099. case ObjectTypes.ArrayReference:
  2100. {
  2101. var arr = mStack[objRef->Value] as Array;
  2102. int idx = objRef->ValueLow;
  2103. arr.SetValue(obj, idx);
  2104. }
  2105. break;
  2106. case ObjectTypes.StaticFieldReference:
  2107. {
  2108. var it = AppDomain.GetType(objRef->Value);
  2109. int idx = objRef->ValueLow;
  2110. if (it is ILType)
  2111. {
  2112. ((ILType)it).StaticInstance[idx] = obj;
  2113. }
  2114. else
  2115. {
  2116. ((CLRType)it).SetStaticFieldValue(idx, obj);
  2117. }
  2118. }
  2119. break;
  2120. case ObjectTypes.ValueTypeObjectReference:
  2121. {
  2122. dst = ILIntepreter.ResolveReference(objRef);
  2123. var ct = domain.GetTypeByIndex(dst->Value) as CLRType;
  2124. var binder = ct.ValueTypeBinder;
  2125. binder.CopyValueTypeToStack(obj, dst, mStack);
  2126. }
  2127. break;
  2128. default:
  2129. throw new NotImplementedException();
  2130. }
  2131. }
  2132. }
  2133. else
  2134. throw new TypeLoadException();
  2135. }
  2136. }
  2137. else
  2138. throw new NullReferenceException();
  2139. }
  2140. Free(esp - 1);
  2141. Free(esp - 1 - 1);
  2142. esp = esp - 1 - 1;
  2143. }
  2144. break;
  2145. case OpCodeEnum.Ldfld:
  2146. {
  2147. var ret = esp - 1;
  2148. objRef = GetObjectAndResolveReference(ret);
  2149. if (objRef->ObjectType == ObjectTypes.ValueTypeObjectReference)
  2150. {
  2151. dst = ILIntepreter.ResolveReference(objRef);
  2152. var ft = domain.GetTypeByIndex(dst->Value);
  2153. if (ft is ILType)
  2154. val = Minus(dst, (int)ip->TokenLong + 1);
  2155. else
  2156. val = Minus(dst, ((CLRType)ft).FieldIndexMapping[(int)ip->TokenLong] + 1);
  2157. if (val->ObjectType == ObjectTypes.ValueTypeObjectReference && ret->ObjectType == ObjectTypes.ValueTypeObjectReference)
  2158. {
  2159. stack.RelocateValueTypeAndFreeAfterDst(val, ret);
  2160. }
  2161. else
  2162. {
  2163. StackObject valRef;
  2164. if (val->ObjectType == ObjectTypes.ValueTypeObjectReference)
  2165. {
  2166. Free(ret);
  2167. CopyToStack(ret, val, mStack);
  2168. }
  2169. else
  2170. {
  2171. valRef = *val;
  2172. if (val->ObjectType >= ObjectTypes.Object)
  2173. obj = mStack[val->Value];
  2174. //CopyToStack(ret, dst, mStack);
  2175. Free(ret);
  2176. if (valRef.ObjectType >= ObjectTypes.Object)
  2177. {
  2178. valRef.Value = mStack.Count;
  2179. mStack.Add(obj);
  2180. }
  2181. *ret = valRef;
  2182. }
  2183. }
  2184. }
  2185. else
  2186. {
  2187. obj = RetriveObject(objRef, mStack);
  2188. Free(ret);
  2189. if (obj != null)
  2190. {
  2191. if (obj is ILTypeInstance)
  2192. {
  2193. ILTypeInstance instance = obj as ILTypeInstance;
  2194. instance.PushToStack((int)ip->TokenLong, ret, this, mStack);
  2195. }
  2196. else
  2197. {
  2198. //var t = obj.GetType();
  2199. type = AppDomain.GetType((int)(ip->TokenLong >> 32));
  2200. if (type != null)
  2201. {
  2202. var token = (int)ip->TokenLong;
  2203. if (!((CLRType)type).CopyFieldToStack(token, obj, this, ref ret, mStack))
  2204. {
  2205. var ft = ((CLRType)type).GetField(token);
  2206. obj = ((CLRType)type).GetFieldValue(token, obj);
  2207. if (obj is CrossBindingAdaptorType)
  2208. obj = ((CrossBindingAdaptorType)obj).ILInstance;
  2209. PushObject(ret, mStack, obj, ft.FieldType == typeof(object));
  2210. }
  2211. }
  2212. else
  2213. throw new TypeLoadException();
  2214. }
  2215. }
  2216. else
  2217. throw new NullReferenceException();
  2218. }
  2219. }
  2220. break;
  2221. case OpCodeEnum.Ldflda:
  2222. {
  2223. objRef = GetObjectAndResolveReference(esp - 1);
  2224. if (objRef->ObjectType == ObjectTypes.ValueTypeObjectReference)
  2225. {
  2226. dst = esp - 1;
  2227. var ft = domain.GetType((int)(ip->TokenLong >> 32));
  2228. StackObject* fieldAddr;
  2229. if (ft is ILType)
  2230. {
  2231. fieldAddr = Minus(ILIntepreter.ResolveReference(objRef), (int)ip->TokenLong + 1);
  2232. }
  2233. else
  2234. {
  2235. fieldAddr = Minus(ILIntepreter.ResolveReference(objRef), ((CLRType)ft).FieldIndexMapping[(int)ip->TokenLong] + 1);
  2236. }
  2237. StackObject valRef = *dst;
  2238. dst->ObjectType = ObjectTypes.StackObjectReference;
  2239. *(long*)&dst->Value = (long)fieldAddr;
  2240. FreeStackValueType(&valRef);
  2241. }
  2242. else
  2243. {
  2244. obj = RetriveObject(objRef, mStack);
  2245. Free(esp - 1);
  2246. if (obj != null)
  2247. {
  2248. if (obj is ILTypeInstance)
  2249. {
  2250. ILTypeInstance instance = obj as ILTypeInstance;
  2251. instance.PushFieldAddress((int)ip->TokenLong, esp - 1, mStack);
  2252. }
  2253. else
  2254. {
  2255. objRef = esp - 1;
  2256. objRef->ObjectType = ObjectTypes.FieldReference;
  2257. objRef->Value = mStack.Count;
  2258. mStack.Add(obj);
  2259. objRef->ValueLow = (int)ip->TokenLong;
  2260. }
  2261. }
  2262. else
  2263. throw new NullReferenceException();
  2264. }
  2265. }
  2266. break;
  2267. case OpCodeEnum.Stsfld:
  2268. {
  2269. type = AppDomain.GetType((int)(ip->TokenLong >> 32));
  2270. if (type != null)
  2271. {
  2272. if (type is ILType)
  2273. {
  2274. ILType t = type as ILType;
  2275. val = esp - 1;
  2276. t.StaticInstance.AssignFromStack((int)ip->TokenLong, val, AppDomain, mStack);
  2277. }
  2278. else
  2279. {
  2280. CLRType t = type as CLRType;
  2281. int idx = (int)ip->TokenLong;
  2282. var f = t.GetField(idx);
  2283. val = esp - 1;
  2284. obj = null;
  2285. if (!((CLRType)t).AssignFieldFromStack(idx, ref obj, this, val, mStack))
  2286. t.SetStaticFieldValue(idx, f.FieldType.CheckCLRTypes(CheckAndCloneValueType(StackObject.ToObject(val, domain, mStack), domain)));
  2287. }
  2288. }
  2289. else
  2290. throw new TypeLoadException();
  2291. Free(esp - 1);
  2292. esp -= 1;
  2293. }
  2294. break;
  2295. case OpCodeEnum.Ldsfld:
  2296. {
  2297. type = AppDomain.GetType((int)(ip->TokenLong >> 32));
  2298. if (type != null)
  2299. {
  2300. if (type is ILType)
  2301. {
  2302. ILType t = type as ILType;
  2303. t.StaticInstance.PushToStack((int)ip->TokenLong, esp, this, mStack);
  2304. esp++;
  2305. }
  2306. else
  2307. {
  2308. CLRType t = type as CLRType;
  2309. int idx = (int)ip->TokenLong;
  2310. if (!((CLRType)type).CopyFieldToStack(idx, null, this, ref esp, mStack))
  2311. {
  2312. var f = t.GetField(idx);
  2313. obj = t.GetFieldValue(idx, null);
  2314. if (obj is CrossBindingAdaptorType)
  2315. obj = ((CrossBindingAdaptorType)obj).ILInstance;
  2316. esp = PushObject(esp, mStack, obj, f.FieldType == typeof(object));
  2317. }
  2318. }
  2319. }
  2320. else
  2321. throw new TypeLoadException();
  2322. }
  2323. break;
  2324. case OpCodeEnum.Ldsflda:
  2325. {
  2326. int typeId = (int)(ip->TokenLong >> 32);
  2327. int fieldIdx = (int)(ip->TokenLong);
  2328. esp->ObjectType = ObjectTypes.StaticFieldReference;
  2329. esp->Value = typeId;
  2330. esp->ValueLow = fieldIdx;
  2331. esp++;
  2332. }
  2333. break;
  2334. case OpCodeEnum.Ldtoken:
  2335. {
  2336. switch (ip->TokenInteger)
  2337. {
  2338. case 0:
  2339. {
  2340. type = AppDomain.GetType((int)(ip->TokenLong >> 32));
  2341. if (type != null)
  2342. {
  2343. if (type is ILType)
  2344. {
  2345. ILType t = type as ILType;
  2346. t.StaticInstance.PushToStack((int)ip->TokenLong, esp, this, mStack);
  2347. }
  2348. else
  2349. throw new NotImplementedException();
  2350. }
  2351. }
  2352. esp++;
  2353. break;
  2354. case 1:
  2355. {
  2356. type = AppDomain.GetType((int)ip->TokenLong);
  2357. if (type != null)
  2358. {
  2359. esp = PushObject(esp, mStack, type.ReflectionType);
  2360. }
  2361. else
  2362. throw new TypeLoadException();
  2363. }
  2364. break;
  2365. default:
  2366. throw new NotImplementedException();
  2367. }
  2368. }
  2369. break;
  2370. case OpCodeEnum.Ldftn:
  2371. {
  2372. IMethod m = domain.GetMethod(ip->TokenInteger);
  2373. esp = PushObject(esp, mStack, m);
  2374. }
  2375. break;
  2376. case OpCodeEnum.Ldvirtftn:
  2377. {
  2378. IMethod m = domain.GetMethod(ip->TokenInteger);
  2379. objRef = esp - 1;
  2380. if (m is ILMethod)
  2381. {
  2382. ILMethod ilm = (ILMethod)m;
  2383. obj = mStack[objRef->Value];
  2384. m = ((ILTypeInstance)obj).Type.GetVirtualMethod(ilm) as ILMethod;
  2385. }
  2386. else
  2387. {
  2388. obj = mStack[objRef->Value];
  2389. if (obj is ILTypeInstance)
  2390. m = ((ILTypeInstance)obj).Type.GetVirtualMethod(m);
  2391. else if (obj is CrossBindingAdaptorType)
  2392. {
  2393. m = ((CrossBindingAdaptorType)obj).ILInstance.Type.BaseType.GetVirtualMethod(m);
  2394. }
  2395. }
  2396. Free(objRef);
  2397. esp = PushObject(objRef, mStack, m);
  2398. }
  2399. break;
  2400. #endregion
  2401. #region Compare
  2402. case OpCodeEnum.Ceq:
  2403. {
  2404. StackObject* obj1 = esp - 1 - 1;
  2405. StackObject* obj2 = esp - 1;
  2406. bool res = false;
  2407. if (obj1->ObjectType == obj2->ObjectType)
  2408. {
  2409. switch (obj1->ObjectType)
  2410. {
  2411. case ObjectTypes.Integer:
  2412. case ObjectTypes.Float:
  2413. res = obj1->Value == obj2->Value;
  2414. break;
  2415. case ObjectTypes.Object:
  2416. res = mStack[obj1->Value] == mStack[obj2->Value];
  2417. break;
  2418. case ObjectTypes.FieldReference:
  2419. res = mStack[obj1->Value] == mStack[obj2->Value] && obj1->ValueLow == obj2->ValueLow;
  2420. break;
  2421. case ObjectTypes.Null:
  2422. res = true;
  2423. break;
  2424. default:
  2425. res = obj1->Value == obj2->Value && obj1->ValueLow == obj2->ValueLow;
  2426. break;
  2427. }
  2428. }
  2429. else
  2430. {
  2431. switch (obj1->ObjectType)
  2432. {
  2433. case ObjectTypes.Object:
  2434. res = mStack[obj1->Value] == null && obj2->ObjectType == ObjectTypes.Null;
  2435. break;
  2436. case ObjectTypes.Null:
  2437. res = obj2->ObjectType == ObjectTypes.Object && mStack[obj2->Value] == null;
  2438. break;
  2439. }
  2440. }
  2441. Free(esp - 1);
  2442. Free(esp - 1 - 1);
  2443. if (res)
  2444. esp = PushOne(esp - 1 - 1);
  2445. else
  2446. esp = PushZero(esp - 1 - 1);
  2447. }
  2448. break;
  2449. case OpCodeEnum.Clt:
  2450. {
  2451. StackObject* obj1 = esp - 1 - 1;
  2452. StackObject* obj2 = esp - 1;
  2453. bool res = false;
  2454. switch (obj1->ObjectType)
  2455. {
  2456. case ObjectTypes.Integer:
  2457. res = obj1->Value < obj2->Value;
  2458. break;
  2459. case ObjectTypes.Long:
  2460. res = *(long*)&obj1->Value < *(long*)&obj2->Value;
  2461. break;
  2462. case ObjectTypes.Float:
  2463. res = *(float*)&obj1->Value < *(float*)&obj2->Value;
  2464. break;
  2465. case ObjectTypes.Double:
  2466. res = *(double*)&obj1->Value < *(double*)&obj2->Value;
  2467. break;
  2468. default:
  2469. throw new NotImplementedException();
  2470. }
  2471. if (res)
  2472. esp = PushOne(esp - 1 - 1);
  2473. else
  2474. esp = PushZero(esp - 1 - 1);
  2475. }
  2476. break;
  2477. case OpCodeEnum.Clt_Un:
  2478. {
  2479. StackObject* obj1 = esp - 1 - 1;
  2480. StackObject* obj2 = esp - 1;
  2481. bool res = false;
  2482. switch (obj1->ObjectType)
  2483. {
  2484. case ObjectTypes.Integer:
  2485. res = (uint)obj1->Value < (uint)obj2->Value && obj2->ObjectType != ObjectTypes.Null;
  2486. break;
  2487. case ObjectTypes.Long:
  2488. res = (ulong)*(long*)&obj1->Value < (ulong)*(long*)&obj2->Value && obj2->ObjectType != ObjectTypes.Null;
  2489. break;
  2490. case ObjectTypes.Float:
  2491. res = *(float*)&obj1->Value < *(float*)&obj2->Value && obj2->ObjectType != ObjectTypes.Null;
  2492. break;
  2493. case ObjectTypes.Double:
  2494. res = *(double*)&obj1->Value < *(double*)&obj2->Value && obj2->ObjectType != ObjectTypes.Null;
  2495. break;
  2496. default:
  2497. throw new NotImplementedException();
  2498. }
  2499. if (res)
  2500. esp = PushOne(esp - 1 - 1);
  2501. else
  2502. esp = PushZero(esp - 1 - 1);
  2503. }
  2504. break;
  2505. case OpCodeEnum.Cgt:
  2506. {
  2507. StackObject* obj1 = esp - 1 - 1;
  2508. StackObject* obj2 = esp - 1;
  2509. bool res = false;
  2510. switch (obj1->ObjectType)
  2511. {
  2512. case ObjectTypes.Integer:
  2513. res = obj1->Value > obj2->Value || obj2->ObjectType == ObjectTypes.Null;
  2514. break;
  2515. case ObjectTypes.Long:
  2516. res = *(long*)&obj1->Value > *(long*)&obj2->Value || obj2->ObjectType == ObjectTypes.Null;
  2517. break;
  2518. case ObjectTypes.Float:
  2519. res = *(float*)&obj1->Value > *(float*)&obj2->Value || obj2->ObjectType == ObjectTypes.Null;
  2520. break;
  2521. case ObjectTypes.Double:
  2522. res = *(double*)&obj1->Value > *(double*)&obj2->Value || obj2->ObjectType == ObjectTypes.Null;
  2523. break;
  2524. default:
  2525. throw new NotImplementedException();
  2526. }
  2527. if (res)
  2528. esp = PushOne(esp - 1 - 1);
  2529. else
  2530. esp = PushZero(esp - 1 - 1);
  2531. }
  2532. break;
  2533. case OpCodeEnum.Cgt_Un:
  2534. {
  2535. StackObject* obj1 = esp - 1 - 1;
  2536. StackObject* obj2 = esp - 1;
  2537. bool res = false;
  2538. switch (obj1->ObjectType)
  2539. {
  2540. case ObjectTypes.Integer:
  2541. res = ((uint)obj1->Value > (uint)obj2->Value) || obj2->ObjectType == ObjectTypes.Null;
  2542. break;
  2543. case ObjectTypes.Long:
  2544. res = (ulong)*(long*)&obj1->Value > (ulong)*(long*)&obj2->Value || obj2->ObjectType == ObjectTypes.Null;
  2545. break;
  2546. case ObjectTypes.Float:
  2547. res = *(float*)&obj1->Value > *(float*)&obj2->Value || obj2->ObjectType == ObjectTypes.Null;
  2548. break;
  2549. case ObjectTypes.Double:
  2550. res = *(double*)&obj1->Value > *(double*)&obj2->Value || obj2->ObjectType == ObjectTypes.Null;
  2551. break;
  2552. case ObjectTypes.Object:
  2553. res = mStack[obj1->Value] != null && obj2->ObjectType == ObjectTypes.Null;
  2554. break;
  2555. case ObjectTypes.Null:
  2556. res = false;
  2557. break;
  2558. default:
  2559. throw new NotImplementedException();
  2560. }
  2561. if (res)
  2562. esp = PushOne(esp - 1 - 1);
  2563. else
  2564. esp = PushZero(esp - 1 - 1);
  2565. }
  2566. break;
  2567. #endregion
  2568. #region Initialization & Instantiation
  2569. case OpCodeEnum.Newobj:
  2570. {
  2571. IMethod m = domain.GetMethod(ip->TokenInteger);
  2572. if (m is ILMethod)
  2573. {
  2574. type = m.DeclearingType as ILType;
  2575. if (type.IsDelegate)
  2576. {
  2577. objRef = GetObjectAndResolveReference(esp - 1 - 1);
  2578. var mi = (IMethod)mStack[(esp - 1)->Value];
  2579. object ins;
  2580. if (objRef->ObjectType == ObjectTypes.Null)
  2581. ins = null;
  2582. else
  2583. ins = mStack[objRef->Value];
  2584. Free(esp - 1);
  2585. Free(esp - 1 - 1);
  2586. esp = esp - 1 - 1;
  2587. object dele;
  2588. var ilMethod = mi as ILMethod;
  2589. if (ilMethod != null)
  2590. {
  2591. if (ins != null)
  2592. {
  2593. dele = ((ILTypeInstance) ins).GetDelegateAdapter(ilMethod);
  2594. if (dele == null)
  2595. {
  2596. var invokeMethod = type.GetMethod("Invoke", mi.ParameterCount);
  2597. if (invokeMethod == null && ilMethod.IsExtend)
  2598. {
  2599. invokeMethod = type.GetMethod("Invoke", mi.ParameterCount - 1);
  2600. }
  2601. dele = domain.DelegateManager.FindDelegateAdapter(
  2602. (ILTypeInstance) ins, ilMethod, invokeMethod);
  2603. }
  2604. }
  2605. else
  2606. {
  2607. if (ilMethod.DelegateAdapter == null)
  2608. {
  2609. var invokeMethod = type.GetMethod("Invoke", mi.ParameterCount);
  2610. ilMethod.DelegateAdapter = domain.DelegateManager.FindDelegateAdapter(null, ilMethod, invokeMethod);
  2611. }
  2612. dele = ilMethod.DelegateAdapter;
  2613. }
  2614. }
  2615. else
  2616. {
  2617. throw new NotImplementedException();
  2618. }
  2619. esp = PushObject(esp, mStack, dele);
  2620. }
  2621. else
  2622. {
  2623. intVal = m.ParameterCount;
  2624. a = esp - intVal;
  2625. obj = null;
  2626. bool isValueType = type.IsValueType;
  2627. ILIntepreter tmpIntp;
  2628. IList<object> tmStack;
  2629. if (isValueType && intVal > 0)
  2630. {
  2631. tmpIntp = domain.RequestILIntepreter();
  2632. tmpIntp.stack.ResetValueTypePointer();
  2633. esp = tmpIntp.stack.StackBase;
  2634. tmStack = tmpIntp.stack.ManagedStack;
  2635. }
  2636. else
  2637. {
  2638. tmpIntp = this;
  2639. tmStack = mStack;
  2640. }
  2641. if (isValueType)
  2642. {
  2643. tmpIntp.stack.AllocValueType(esp, type);
  2644. objRef = esp + 1;
  2645. objRef->ObjectType = ObjectTypes.StackObjectReference;
  2646. *(long*)&objRef->Value = (long)esp;
  2647. objRef++;
  2648. }
  2649. else
  2650. {
  2651. obj = ((ILType)type).Instantiate(false);
  2652. objRef = PushObject(esp, tmStack, obj);//this parameter for constructor
  2653. }
  2654. esp = objRef;
  2655. for (int i = 0; i < intVal; i++)
  2656. {
  2657. tmpIntp.CopyToStack(esp, a + i, mStack, tmStack);
  2658. esp++;
  2659. }
  2660. if (((ILMethod)m).ShouldUseRegisterVM)
  2661. {
  2662. PrepareRegisterCallStack(esp, tmStack, (ILMethod)m);
  2663. esp = tmpIntp.ExecuteR((ILMethod)m, esp, out unhandledException);
  2664. }
  2665. else
  2666. esp = tmpIntp.Execute((ILMethod)m, esp, out unhandledException);
  2667. ValueTypeBasePointer = bp;
  2668. for (int i = intVal - 1; i >= 0; i--)
  2669. {
  2670. Free(Add(a, i));
  2671. }
  2672. if (isValueType)
  2673. {
  2674. if (intVal > 0)
  2675. {
  2676. stack.AllocValueType(a, type);
  2677. CopyStackValueType(esp - 1, a, tmpIntp.stack.ManagedStack, mStack);
  2678. domain.FreeILIntepreter(tmpIntp);
  2679. }
  2680. else
  2681. {
  2682. var ins = objRef - 1 - 1;
  2683. *a = *ins;
  2684. }
  2685. esp = a + 1;
  2686. }
  2687. else
  2688. esp = PushObject(a, mStack, obj);//new constructedObj
  2689. }
  2690. if (unhandledException)
  2691. returned = true;
  2692. }
  2693. else
  2694. {
  2695. CLRMethod cm = (CLRMethod)m;
  2696. //Means new object();
  2697. if (cm == null)
  2698. {
  2699. esp = PushObject(esp, mStack, new object());
  2700. }
  2701. else
  2702. {
  2703. if (cm.DeclearingType.IsDelegate)
  2704. {
  2705. objRef = GetObjectAndResolveReference(esp - 1 - 1);
  2706. var mi = (IMethod)mStack[(esp - 1)->Value];
  2707. object ins;
  2708. if (objRef->ObjectType == ObjectTypes.Null)
  2709. ins = null;
  2710. else
  2711. ins = mStack[objRef->Value];
  2712. Free(esp - 1);
  2713. Free(esp - 1 - 1);
  2714. esp = esp - 1 - 1;
  2715. object dele;
  2716. var ilMethod = mi as ILMethod;
  2717. if (ilMethod != null)
  2718. {
  2719. dele = domain.DelegateManager.FindDelegateAdapter((CLRType)cm.DeclearingType, (ILTypeInstance)ins, ilMethod);
  2720. }
  2721. else
  2722. {
  2723. if (ins is ILTypeInstance)
  2724. ins = ((ILTypeInstance)ins).CLRInstance;
  2725. dele = Delegate.CreateDelegate(cm.DeclearingType.TypeForCLR, ins, ((CLRMethod)mi).MethodInfo);
  2726. }
  2727. esp = PushObject(esp, mStack, dele);
  2728. }
  2729. else
  2730. {
  2731. var redirect = cm.Redirection;
  2732. if (redirect != null)
  2733. esp = redirect(this, esp, mStack, cm, true);
  2734. else
  2735. {
  2736. #if DEBUG && !DISABLE_ILRUNTIME_DEBUG
  2737. if (!allowUnboundCLRMethod)
  2738. throw new NotSupportedException(cm.ToString() + " is not bound!");
  2739. #endif
  2740. object result = cm.Invoke(this, esp, mStack, true);
  2741. int paramCount = cm.ParameterCount;
  2742. for (int i = 1; i <= paramCount; i++)
  2743. {
  2744. Free(esp - i);
  2745. }
  2746. esp = Minus(esp, paramCount);
  2747. esp = PushObject(esp, mStack, result);//new constructedObj
  2748. }
  2749. }
  2750. }
  2751. }
  2752. }
  2753. break;
  2754. case OpCodeEnum.Constrained:
  2755. {
  2756. type = domain.GetType(ip->TokenInteger);
  2757. var m = domain.GetMethod((int)ip->TokenLong);
  2758. var pCnt = m.ParameterCount;
  2759. objRef = Minus(esp, pCnt + 1);
  2760. var insIdx = mStack.Count;
  2761. if (objRef->ObjectType < ObjectTypes.Object)
  2762. {
  2763. bool moved = false;
  2764. //move parameters
  2765. for (int i = 0; i < pCnt; i++)
  2766. {
  2767. var pPtr = Minus(esp, i + 1);
  2768. if (pPtr->ObjectType >= ObjectTypes.Object)
  2769. {
  2770. var oldVal = pPtr->Value;
  2771. insIdx--;
  2772. if (!moved)
  2773. {
  2774. pPtr->Value = mStack.Count;
  2775. mStack.Add(mStack[oldVal]);
  2776. mStack[oldVal] = null;
  2777. moved = true;
  2778. }
  2779. else
  2780. {
  2781. mStack[oldVal + 1] = mStack[oldVal];
  2782. mStack[oldVal] = null;
  2783. pPtr->Value = oldVal + 1;
  2784. }
  2785. }
  2786. }
  2787. if (!moved)
  2788. {
  2789. mStack.Add(null);
  2790. }
  2791. }
  2792. else
  2793. insIdx = objRef->Value;
  2794. objRef2 = GetObjectAndResolveReference(objRef);
  2795. if (type != null)
  2796. {
  2797. if (type is ILType)
  2798. {
  2799. var t = (ILType)type;
  2800. if (t.IsEnum)
  2801. {
  2802. ILEnumTypeInstance ins = new ILEnumTypeInstance(t);
  2803. switch (objRef2->ObjectType)
  2804. {
  2805. case ObjectTypes.FieldReference:
  2806. {
  2807. var owner = mStack[objRef2->Value] as ILTypeInstance;
  2808. int idx = objRef2->ValueLow;
  2809. //Free(objRef);
  2810. owner.PushToStack(idx, objRef, this, mStack);
  2811. ins.AssignFromStack(0, objRef, AppDomain, mStack);
  2812. ins.Boxed = true;
  2813. }
  2814. break;
  2815. case ObjectTypes.StaticFieldReference:
  2816. {
  2817. var st = AppDomain.GetType(objRef2->Value) as ILType;
  2818. int idx = objRef2->ValueLow;
  2819. //Free(objRef);
  2820. st.StaticInstance.PushToStack(idx, objRef, this, mStack);
  2821. ins.AssignFromStack(0, objRef, AppDomain, mStack);
  2822. ins.Boxed = true;
  2823. }
  2824. break;
  2825. case ObjectTypes.ArrayReference:
  2826. {
  2827. var arr = mStack[objRef2->Value];
  2828. var idx = objRef2->ValueLow;
  2829. //Free(objRef);
  2830. LoadFromArrayReference(arr, idx, objRef, t, mStack);
  2831. ins.AssignFromStack(0, objRef, AppDomain, mStack);
  2832. ins.Boxed = true;
  2833. }
  2834. break;
  2835. default:
  2836. ins.AssignFromStack(0, objRef2, AppDomain, mStack);
  2837. ins.Boxed = true;
  2838. break;
  2839. }
  2840. objRef->ObjectType = ObjectTypes.Object;
  2841. objRef->Value = insIdx;
  2842. mStack[insIdx] = ins;
  2843. //esp = PushObject(esp - 1, mStack, ins);
  2844. }
  2845. else if(objRef2->ObjectType != ObjectTypes.ValueTypeObjectReference)
  2846. {
  2847. object res = RetriveObject(objRef2, mStack);
  2848. //Free(objRef);
  2849. objRef->ObjectType = ObjectTypes.Object;
  2850. objRef->Value = insIdx;
  2851. mStack[insIdx] = res;
  2852. //esp = PushObject(objRef, mStack, res, true);
  2853. }
  2854. }
  2855. else
  2856. {
  2857. var tt = type.TypeForCLR;
  2858. if (tt.IsEnum)
  2859. {
  2860. mStack[insIdx] = Enum.ToObject(tt, StackObject.ToObject(objRef2, AppDomain, mStack));
  2861. objRef->ObjectType = ObjectTypes.Object;
  2862. objRef->Value = insIdx;
  2863. //esp = PushObject(esp - 1, mStack, Enum.ToObject(tt, StackObject.ToObject(obj, AppDomain, mStack)), true);
  2864. }
  2865. else if (tt.IsPrimitive)
  2866. {
  2867. mStack[insIdx] = tt.CheckCLRTypes(StackObject.ToObject(objRef2, AppDomain, mStack));
  2868. objRef->ObjectType = ObjectTypes.Object;
  2869. objRef->Value = insIdx;
  2870. //esp = PushObject(esp - 1, mStack, tt.CheckCLRTypes(StackObject.ToObject(obj, AppDomain, mStack)));
  2871. }
  2872. else if (objRef2->ObjectType != ObjectTypes.ValueTypeObjectReference)
  2873. {
  2874. object res = RetriveObject(objRef2, mStack);
  2875. //Free(objRef);
  2876. objRef->ObjectType = ObjectTypes.Object;
  2877. objRef->Value = insIdx;
  2878. mStack[insIdx] = res;
  2879. //esp = PushObject(objRef, mStack, res, true);
  2880. }
  2881. }
  2882. }
  2883. else
  2884. throw new NullReferenceException();
  2885. }
  2886. break;
  2887. case OpCodeEnum.Box:
  2888. {
  2889. objRef = esp - 1;
  2890. type = domain.GetType(ip->TokenInteger);
  2891. if (type != null)
  2892. {
  2893. if (type is ILType)
  2894. {
  2895. if (((ILType)type).IsEnum)
  2896. {
  2897. ILEnumTypeInstance ins = new Intepreter.ILEnumTypeInstance((ILType)type);
  2898. ins.AssignFromStack(0, objRef, AppDomain, mStack);
  2899. ins.Boxed = true;
  2900. esp = PushObject(objRef, mStack, ins, true);
  2901. }
  2902. else
  2903. {
  2904. switch (objRef->ObjectType)
  2905. {
  2906. case ObjectTypes.Null:
  2907. break;
  2908. case ObjectTypes.ValueTypeObjectReference:
  2909. {
  2910. ILTypeInstance ins = ((ILType)type).Instantiate(false);
  2911. ins.AssignFromStack(objRef, domain, mStack);
  2912. FreeStackValueType(objRef);
  2913. esp = PushObject(objRef, mStack, ins, true);
  2914. }
  2915. break;
  2916. default:
  2917. {
  2918. obj = mStack[objRef->Value];
  2919. Free(objRef);
  2920. if (type.IsArray)
  2921. {
  2922. esp = PushObject(objRef, mStack, obj, true);
  2923. }
  2924. else
  2925. {
  2926. ILTypeInstance ins = (ILTypeInstance)obj;
  2927. if (ins != null)
  2928. {
  2929. if (ins.IsValueType)
  2930. {
  2931. ins.Boxed = true;
  2932. }
  2933. esp = PushObject(objRef, mStack, ins, true);
  2934. }
  2935. else
  2936. {
  2937. esp = PushNull(objRef);
  2938. }
  2939. }
  2940. }
  2941. break;
  2942. }
  2943. }
  2944. }
  2945. else
  2946. {
  2947. if (type.TypeForCLR.IsPrimitive)
  2948. {
  2949. var t = type.TypeForCLR;
  2950. if (t == typeof(int))
  2951. {
  2952. switch (objRef->ObjectType)
  2953. {
  2954. case ObjectTypes.Integer:
  2955. esp = PushObject(objRef, mStack, objRef->Value, true);
  2956. break;
  2957. case ObjectTypes.Null:
  2958. esp = PushObject(objRef, mStack, 0, true);
  2959. break;
  2960. case ObjectTypes.Object:
  2961. break;
  2962. default:
  2963. throw new NotImplementedException();
  2964. }
  2965. }
  2966. else if (t == typeof(bool))
  2967. {
  2968. switch (objRef->ObjectType)
  2969. {
  2970. case ObjectTypes.Integer:
  2971. esp = PushObject(objRef, mStack, (objRef->Value == 1), true);
  2972. break;
  2973. case ObjectTypes.Null:
  2974. esp = PushObject(objRef, mStack, false, true);
  2975. break;
  2976. case ObjectTypes.Object:
  2977. break;
  2978. default:
  2979. throw new NotImplementedException();
  2980. }
  2981. }
  2982. else if (t == typeof(byte))
  2983. {
  2984. switch (objRef->ObjectType)
  2985. {
  2986. case ObjectTypes.Integer:
  2987. esp = PushObject(objRef, mStack, (byte)objRef->Value, true);
  2988. break;
  2989. case ObjectTypes.Null:
  2990. esp = PushObject(objRef, mStack, 0L, true);
  2991. break;
  2992. case ObjectTypes.Object:
  2993. break;
  2994. default:
  2995. throw new NotImplementedException();
  2996. }
  2997. }
  2998. else if (t == typeof(short))
  2999. {
  3000. switch (objRef->ObjectType)
  3001. {
  3002. case ObjectTypes.Integer:
  3003. esp = PushObject(objRef, mStack, (short)objRef->Value, true);
  3004. break;
  3005. case ObjectTypes.Null:
  3006. esp = PushObject(objRef, mStack, (short)0, true);
  3007. break;
  3008. case ObjectTypes.Object:
  3009. break;
  3010. default:
  3011. throw new NotImplementedException();
  3012. }
  3013. }
  3014. else if (t == typeof(long))
  3015. {
  3016. switch (objRef->ObjectType)
  3017. {
  3018. case ObjectTypes.Long:
  3019. esp = PushObject(objRef, mStack, *(long*)&objRef->Value, true);
  3020. break;
  3021. case ObjectTypes.Null:
  3022. esp = PushObject(objRef, mStack, 0L, true);
  3023. break;
  3024. case ObjectTypes.Object:
  3025. break;
  3026. default:
  3027. throw new NotImplementedException();
  3028. }
  3029. }
  3030. else if (t == typeof(float))
  3031. {
  3032. switch (objRef->ObjectType)
  3033. {
  3034. case ObjectTypes.Float:
  3035. esp = PushObject(objRef, mStack, *(float*)&objRef->Value, true);
  3036. break;
  3037. case ObjectTypes.Null:
  3038. esp = PushObject(objRef, mStack, 0f, true);
  3039. break;
  3040. case ObjectTypes.Object:
  3041. break;
  3042. default:
  3043. throw new NotImplementedException();
  3044. }
  3045. }
  3046. else if (t == typeof(double))
  3047. {
  3048. switch (objRef->ObjectType)
  3049. {
  3050. case ObjectTypes.Double:
  3051. esp = PushObject(objRef, mStack, *(double*)&objRef->Value, true);
  3052. break;
  3053. case ObjectTypes.Null:
  3054. esp = PushObject(objRef, mStack, 0.0, true);
  3055. break;
  3056. case ObjectTypes.Object:
  3057. break;
  3058. default:
  3059. throw new NotImplementedException();
  3060. }
  3061. }
  3062. else if (t == typeof(char))
  3063. {
  3064. switch (objRef->ObjectType)
  3065. {
  3066. case ObjectTypes.Integer:
  3067. esp = PushObject(objRef, mStack, (char)objRef->Value, true);
  3068. break;
  3069. case ObjectTypes.Object:
  3070. break;
  3071. default:
  3072. throw new NotImplementedException();
  3073. }
  3074. }
  3075. else if (t == typeof(uint))
  3076. {
  3077. switch (objRef->ObjectType)
  3078. {
  3079. case ObjectTypes.Integer:
  3080. esp = PushObject(objRef, mStack, (uint)objRef->Value, true);
  3081. break;
  3082. case ObjectTypes.Null:
  3083. esp = PushObject(objRef, mStack, (uint)0, true);
  3084. break;
  3085. case ObjectTypes.Object:
  3086. break;
  3087. default:
  3088. throw new NotImplementedException();
  3089. }
  3090. }
  3091. else if (t == typeof(ushort))
  3092. {
  3093. switch (objRef->ObjectType)
  3094. {
  3095. case ObjectTypes.Integer:
  3096. esp = PushObject(objRef, mStack, (ushort)objRef->Value, true);
  3097. break;
  3098. case ObjectTypes.Null:
  3099. esp = PushObject(objRef, mStack, (ushort)0, true);
  3100. break;
  3101. case ObjectTypes.Object:
  3102. break;
  3103. default:
  3104. throw new NotImplementedException();
  3105. }
  3106. }
  3107. else if (t == typeof(ulong))
  3108. {
  3109. switch (objRef->ObjectType)
  3110. {
  3111. case ObjectTypes.Long:
  3112. esp = PushObject(objRef, mStack, *(ulong*)&objRef->Value, true);
  3113. break;
  3114. case ObjectTypes.Null:
  3115. esp = PushObject(objRef, mStack, (ulong)0, true);
  3116. break;
  3117. case ObjectTypes.Object:
  3118. break;
  3119. default:
  3120. throw new NotImplementedException();
  3121. }
  3122. }
  3123. else if (t == typeof(sbyte))
  3124. {
  3125. switch (objRef->ObjectType)
  3126. {
  3127. case ObjectTypes.Integer:
  3128. esp = PushObject(objRef, mStack, (sbyte)objRef->Value, true);
  3129. break;
  3130. case ObjectTypes.Null:
  3131. esp = PushObject(objRef, mStack, (sbyte)0, true);
  3132. break;
  3133. case ObjectTypes.Object:
  3134. break;
  3135. default:
  3136. throw new NotImplementedException();
  3137. }
  3138. }
  3139. else
  3140. throw new NotImplementedException();
  3141. }
  3142. else if (type.TypeForCLR.IsEnum)
  3143. {
  3144. esp = PushObject(objRef, mStack, Enum.ToObject(type.TypeForCLR, StackObject.ToObject(objRef, AppDomain, mStack)), true);
  3145. }
  3146. else
  3147. {
  3148. if (objRef->ObjectType == ObjectTypes.ValueTypeObjectReference)
  3149. {
  3150. dst = ILIntepreter.ResolveReference(objRef);
  3151. var vt = domain.GetTypeByIndex(dst->Value);
  3152. if (vt != type)
  3153. throw new InvalidCastException();
  3154. object ins = ((CLRType)vt).ValueTypeBinder.ToObject(dst, mStack);
  3155. FreeStackValueType(objRef);
  3156. esp = PushObject(objRef, mStack, ins, true);
  3157. }
  3158. //nothing to do for CLR type boxing
  3159. }
  3160. }
  3161. }
  3162. else
  3163. throw new NullReferenceException();
  3164. }
  3165. break;
  3166. case OpCodeEnum.Unbox:
  3167. case OpCodeEnum.Unbox_Any:
  3168. {
  3169. objRef = esp - 1;
  3170. if (objRef->ObjectType == ObjectTypes.Object)
  3171. {
  3172. obj = mStack[objRef->Value];
  3173. Free(objRef);
  3174. if (obj != null)
  3175. {
  3176. var t = domain.GetType(ip->TokenInteger);
  3177. if (t != null)
  3178. {
  3179. clrType = t.TypeForCLR;
  3180. bool isEnumObj = obj is ILEnumTypeInstance;
  3181. if ((t is CLRType) && clrType.IsPrimitive && !isEnumObj)
  3182. {
  3183. if (clrType == typeof(int))
  3184. {
  3185. int value = obj.ToInt32();
  3186. objRef->ObjectType = ObjectTypes.Integer;
  3187. objRef->Value = value;
  3188. }
  3189. else if (clrType == typeof(bool))
  3190. {
  3191. bool value = (bool)obj;
  3192. objRef->ObjectType = ObjectTypes.Integer;
  3193. objRef->Value = value ? 1 : 0;
  3194. }
  3195. else if (clrType == typeof(short))
  3196. {
  3197. short value = obj.ToInt16();
  3198. objRef->ObjectType = ObjectTypes.Integer;
  3199. objRef->Value = value;
  3200. }
  3201. else if (clrType == typeof(long))
  3202. {
  3203. long value = obj.ToInt64();
  3204. objRef->ObjectType = ObjectTypes.Long;
  3205. *(long*)&objRef->Value = value;
  3206. }
  3207. else if (clrType == typeof(float))
  3208. {
  3209. float value = obj.ToFloat();
  3210. objRef->ObjectType = ObjectTypes.Float;
  3211. *(float*)&objRef->Value = value;
  3212. }
  3213. else if (clrType == typeof(byte))
  3214. {
  3215. byte value = (byte)obj;
  3216. objRef->ObjectType = ObjectTypes.Integer;
  3217. objRef->Value = value;
  3218. }
  3219. else if (clrType == typeof(double))
  3220. {
  3221. double value = obj.ToDouble();
  3222. objRef->ObjectType = ObjectTypes.Double;
  3223. *(double*)&objRef->Value = value;
  3224. }
  3225. else if (clrType == typeof(char))
  3226. {
  3227. char value = (char)obj;
  3228. objRef->ObjectType = ObjectTypes.Integer;
  3229. *(&objRef->Value) = value;
  3230. }
  3231. else if (clrType == typeof(uint))
  3232. {
  3233. uint value = (uint)obj;
  3234. objRef->ObjectType = ObjectTypes.Integer;
  3235. objRef->Value = (int)value;
  3236. }
  3237. else if (clrType == typeof(ushort))
  3238. {
  3239. ushort value = (ushort)obj;
  3240. objRef->ObjectType = ObjectTypes.Integer;
  3241. objRef->Value = value;
  3242. }
  3243. else if (clrType == typeof(ulong))
  3244. {
  3245. ulong value = (ulong)obj;
  3246. objRef->ObjectType = ObjectTypes.Long;
  3247. *(ulong*)&objRef->Value = value;
  3248. }
  3249. else if (clrType == typeof(sbyte))
  3250. {
  3251. sbyte value = (sbyte)obj;
  3252. objRef->ObjectType = ObjectTypes.Integer;
  3253. objRef->Value = value;
  3254. }
  3255. else
  3256. throw new NotImplementedException();
  3257. }
  3258. else if (t.IsValueType)
  3259. {
  3260. if (obj is ILTypeInstance)
  3261. {
  3262. var res = ((ILTypeInstance)obj);
  3263. if (res is ILEnumTypeInstance)
  3264. {
  3265. res.PushToStack(0, objRef, this, mStack);
  3266. }
  3267. else
  3268. {
  3269. if (res.Boxed)
  3270. {
  3271. res = res.Clone();
  3272. res.Boxed = false;
  3273. }
  3274. PushObject(objRef, mStack, res);
  3275. }
  3276. }
  3277. else
  3278. PushObject(objRef, mStack, obj);
  3279. }
  3280. else
  3281. {
  3282. PushObject(objRef, mStack, obj);
  3283. }
  3284. }
  3285. else
  3286. throw new TypeLoadException();
  3287. }
  3288. else
  3289. throw new NullReferenceException();
  3290. }
  3291. else if (objRef->ObjectType < ObjectTypes.StackObjectReference)
  3292. {
  3293. //Nothing to do with primitive types
  3294. }
  3295. else
  3296. throw new InvalidCastException();
  3297. }
  3298. break;
  3299. case OpCodeEnum.Initobj:
  3300. {
  3301. objRef = GetObjectAndResolveReference(esp - 1);
  3302. type = domain.GetType(ip->TokenInteger);
  3303. if (type is ILType)
  3304. {
  3305. ILType it = (ILType)type;
  3306. if (it.IsValueType)
  3307. {
  3308. switch (objRef->ObjectType)
  3309. {
  3310. case ObjectTypes.Null:
  3311. throw new NullReferenceException();
  3312. case ObjectTypes.Integer:
  3313. case ObjectTypes.Float:
  3314. objRef->Value = 0;
  3315. break;
  3316. case ObjectTypes.Long:
  3317. case ObjectTypes.Double:
  3318. *(long*)&objRef->Value = 0;
  3319. break;
  3320. case ObjectTypes.ValueTypeObjectReference:
  3321. stack.ClearValueTypeObject(type, ILIntepreter.ResolveReference(objRef));
  3322. break;
  3323. case ObjectTypes.Object:
  3324. {
  3325. obj = mStack[objRef->Value];
  3326. if (obj != null)
  3327. {
  3328. if (obj is ILTypeInstance)
  3329. {
  3330. ILTypeInstance instance = obj as ILTypeInstance;
  3331. instance.Clear();
  3332. }
  3333. else
  3334. throw new NotSupportedException();
  3335. }
  3336. else
  3337. throw new NullReferenceException();
  3338. }
  3339. break;
  3340. case ObjectTypes.ArrayReference:
  3341. {
  3342. var arr = mStack[objRef->Value] as Array;
  3343. var idx = objRef->ValueLow;
  3344. obj = arr.GetValue(idx);
  3345. if (obj == null)
  3346. arr.SetValue(it.Instantiate(), idx);
  3347. else
  3348. {
  3349. if (obj is ILTypeInstance)
  3350. {
  3351. ILTypeInstance instance = obj as ILTypeInstance;
  3352. instance.Clear();
  3353. }
  3354. else
  3355. throw new NotImplementedException();
  3356. }
  3357. }
  3358. break;
  3359. case ObjectTypes.FieldReference:
  3360. {
  3361. obj = mStack[objRef->Value];
  3362. if (obj != null)
  3363. {
  3364. if (obj is ILTypeInstance)
  3365. {
  3366. ILTypeInstance instance = obj as ILTypeInstance;
  3367. var tar = instance[objRef->ValueLow] as ILTypeInstance;
  3368. if (tar != null)
  3369. tar.Clear();
  3370. else
  3371. throw new NotSupportedException();
  3372. }
  3373. else
  3374. throw new NotSupportedException();
  3375. }
  3376. else
  3377. throw new NullReferenceException();
  3378. }
  3379. break;
  3380. case ObjectTypes.StaticFieldReference:
  3381. {
  3382. var t = AppDomain.GetType(objRef->Value);
  3383. int idx = objRef->ValueLow;
  3384. if (t is ILType)
  3385. {
  3386. var tar = ((ILType)t).StaticInstance[idx] as ILTypeInstance;
  3387. if (tar != null)
  3388. tar.Clear();
  3389. else
  3390. throw new NotSupportedException();
  3391. }
  3392. else
  3393. throw new NotSupportedException();
  3394. }
  3395. break;
  3396. default:
  3397. throw new NotImplementedException();
  3398. }
  3399. }
  3400. else
  3401. {
  3402. PushNull(esp);
  3403. switch (objRef->ObjectType)
  3404. {
  3405. case ObjectTypes.StaticFieldReference:
  3406. {
  3407. var t = AppDomain.GetType(objRef->Value) as ILType;
  3408. t.StaticInstance.AssignFromStack(objRef->ValueLow, esp, AppDomain, mStack);
  3409. }
  3410. break;
  3411. case ObjectTypes.FieldReference:
  3412. {
  3413. var instance = mStack[objRef->Value] as ILTypeInstance;
  3414. instance.AssignFromStack(objRef->ValueLow, esp, AppDomain, mStack);
  3415. }
  3416. break;
  3417. default:
  3418. {
  3419. if (objRef->ObjectType >= ObjectTypes.Object)
  3420. mStack[objRef->Value] = null;
  3421. else
  3422. PushNull(objRef);
  3423. }
  3424. break;
  3425. }
  3426. }
  3427. }
  3428. else
  3429. {
  3430. if (objRef->ObjectType == ObjectTypes.ValueTypeObjectReference)
  3431. {
  3432. stack.ClearValueTypeObject(type, ILIntepreter.ResolveReference(objRef));
  3433. }
  3434. else if (objRef->ObjectType == ObjectTypes.FieldReference)
  3435. {
  3436. var instance = mStack[objRef->Value] as ILTypeInstance;
  3437. if (instance != null)
  3438. {
  3439. instance.InitializeField(objRef->ValueLow);
  3440. }
  3441. else
  3442. throw new NotImplementedException();
  3443. }
  3444. else if (type.IsPrimitive)
  3445. StackObject.Initialized(objRef, type);
  3446. else
  3447. {
  3448. if (!type.IsValueType)
  3449. {
  3450. if (objRef->ObjectType >= ObjectTypes.Object)
  3451. mStack[objRef->Value] = null;
  3452. else
  3453. PushNull(objRef);
  3454. }
  3455. }
  3456. }
  3457. Free(esp - 1);
  3458. esp--;
  3459. }
  3460. break;
  3461. case OpCodeEnum.Isinst:
  3462. {
  3463. objRef = esp - 1;
  3464. var oriRef = objRef;
  3465. type = domain.GetType(ip->TokenInteger);
  3466. if (type != null)
  3467. {
  3468. objRef = GetObjectAndResolveReference(objRef);
  3469. if (objRef->ObjectType <= ObjectTypes.Double)
  3470. {
  3471. var tclr = type.TypeForCLR;
  3472. switch (objRef->ObjectType)
  3473. {
  3474. case ObjectTypes.Integer:
  3475. {
  3476. if (tclr != typeof(int) && tclr != typeof(bool) && tclr != typeof(short) && tclr != typeof(byte) && tclr != typeof(ushort) && tclr != typeof(uint))
  3477. {
  3478. oriRef->ObjectType = ObjectTypes.Null;
  3479. oriRef->Value = -1;
  3480. oriRef->ValueLow = 0;
  3481. }
  3482. }
  3483. break;
  3484. case ObjectTypes.Long:
  3485. {
  3486. if (tclr != typeof(long) && tclr != typeof(ulong))
  3487. {
  3488. oriRef->ObjectType = ObjectTypes.Null;
  3489. oriRef->Value = -1;
  3490. oriRef->ValueLow = 0;
  3491. }
  3492. }
  3493. break;
  3494. case ObjectTypes.Float:
  3495. {
  3496. if (tclr != typeof(float))
  3497. {
  3498. oriRef->ObjectType = ObjectTypes.Null;
  3499. oriRef->Value = -1;
  3500. oriRef->ValueLow = 0;
  3501. }
  3502. }
  3503. break;
  3504. case ObjectTypes.Double:
  3505. {
  3506. if (tclr != typeof(double))
  3507. {
  3508. oriRef->ObjectType = ObjectTypes.Null;
  3509. oriRef->Value = -1;
  3510. oriRef->ValueLow = 0;
  3511. }
  3512. }
  3513. break;
  3514. case ObjectTypes.Null:
  3515. oriRef->ObjectType = ObjectTypes.Null;
  3516. oriRef->Value = -1;
  3517. oriRef->ValueLow = 0;
  3518. break;
  3519. }
  3520. }
  3521. else
  3522. {
  3523. obj = RetriveObject(objRef, mStack);
  3524. Free(oriRef);
  3525. if (obj != null)
  3526. {
  3527. if (obj is ILTypeInstance)
  3528. {
  3529. if (((ILTypeInstance)obj).CanAssignTo(type))
  3530. {
  3531. esp = PushObject(oriRef, mStack, obj);
  3532. }
  3533. else
  3534. {
  3535. #if !DEBUG || DISABLE_ILRUNTIME_DEBUG
  3536. oriRef->ObjectType = ObjectTypes.Null;
  3537. oriRef->Value = -1;
  3538. oriRef->ValueLow = 0;
  3539. #endif
  3540. }
  3541. }
  3542. else
  3543. {
  3544. if (type.TypeForCLR.IsAssignableFrom(obj.GetType()))
  3545. {
  3546. esp = PushObject(oriRef, mStack, obj, true);
  3547. }
  3548. else
  3549. {
  3550. #if !DEBUG || DISABLE_ILRUNTIME_DEBUG
  3551. oriRef->ObjectType = ObjectTypes.Null;
  3552. oriRef->Value = -1;
  3553. oriRef->ValueLow = 0;
  3554. #endif
  3555. }
  3556. }
  3557. }
  3558. else
  3559. {
  3560. #if !DEBUG || DISABLE_ILRUNTIME_DEBUG
  3561. oriRef->ObjectType = ObjectTypes.Null;
  3562. oriRef->Value = -1;
  3563. oriRef->ValueLow = 0;
  3564. #endif
  3565. }
  3566. }
  3567. }
  3568. else
  3569. throw new NullReferenceException();
  3570. }
  3571. break;
  3572. #endregion
  3573. #region Array
  3574. case OpCodeEnum.Newarr:
  3575. {
  3576. var cnt = (esp - 1);
  3577. type = domain.GetType(ip->TokenInteger);
  3578. object arr = null;
  3579. if (type != null)
  3580. {
  3581. if (type.TypeForCLR != typeof(ILTypeInstance))
  3582. {
  3583. if (type is CLRType)
  3584. {
  3585. arr = ((CLRType)type).CreateArrayInstance(cnt->Value);
  3586. }
  3587. else
  3588. {
  3589. arr = Array.CreateInstance(type.TypeForCLR, cnt->Value);
  3590. }
  3591. //Register Type
  3592. AppDomain.GetType(arr.GetType());
  3593. }
  3594. else
  3595. {
  3596. arr = new ILTypeInstance[cnt->Value];
  3597. ILTypeInstance[] ilArr = (ILTypeInstance[])arr;
  3598. if (type.IsValueType)
  3599. {
  3600. for (int i = 0; i < cnt->Value; i++)
  3601. {
  3602. ilArr[i] = ((ILType)type).Instantiate(true);
  3603. }
  3604. }
  3605. }
  3606. }
  3607. cnt->ObjectType = ObjectTypes.Object;
  3608. cnt->Value = mStack.Count;
  3609. mStack.Add(arr);
  3610. }
  3611. break;
  3612. case OpCodeEnum.Stelem_Ref:
  3613. case OpCodeEnum.Stelem_Any:
  3614. {
  3615. val = GetObjectAndResolveReference(esp - 1);
  3616. var idx = esp - 1 - 1;
  3617. arrRef = esp - 1 - 1 - 1;
  3618. Array arr = mStack[arrRef->Value] as Array;
  3619. if (arr is object[])
  3620. {
  3621. switch (val->ObjectType)
  3622. {
  3623. case ObjectTypes.Null:
  3624. arr.SetValue(null, idx->Value);
  3625. break;
  3626. case ObjectTypes.Object:
  3627. ArraySetValue(arr, mStack[val->Value], idx->Value);
  3628. break;
  3629. case ObjectTypes.Integer:
  3630. arr.SetValue(val->Value, idx->Value);
  3631. break;
  3632. case ObjectTypes.Long:
  3633. arr.SetValue(*(long*)&val->Value, idx->Value);
  3634. break;
  3635. case ObjectTypes.Float:
  3636. arr.SetValue(*(float*)&val->Value, idx->Value);
  3637. break;
  3638. case ObjectTypes.Double:
  3639. arr.SetValue(*(double*)&val->Value, idx->Value);
  3640. break;
  3641. case ObjectTypes.ValueTypeObjectReference:
  3642. ArraySetValue(arr, StackObject.ToObject(val, domain, mStack), idx->Value);
  3643. FreeStackValueType(esp - 1);
  3644. break;
  3645. default:
  3646. throw new NotImplementedException();
  3647. }
  3648. }
  3649. else
  3650. {
  3651. switch (val->ObjectType)
  3652. {
  3653. case ObjectTypes.Object:
  3654. ArraySetValue(arr, mStack[val->Value], idx->Value);
  3655. break;
  3656. case ObjectTypes.Integer:
  3657. {
  3658. StoreIntValueToArray(arr, val, idx);
  3659. }
  3660. break;
  3661. case ObjectTypes.Long:
  3662. {
  3663. if (arr is long[])
  3664. {
  3665. ((long[])arr)[idx->Value] = *(long*)&val->Value;
  3666. }
  3667. else
  3668. {
  3669. ((ulong[])arr)[idx->Value] = *(ulong*)&val->Value;
  3670. }
  3671. }
  3672. break;
  3673. case ObjectTypes.Float:
  3674. {
  3675. ((float[])arr)[idx->Value] = *(float*)&val->Value;
  3676. }
  3677. break;
  3678. case ObjectTypes.Double:
  3679. {
  3680. ((double[])arr)[idx->Value] = *(double*)&val->Value;
  3681. }
  3682. break;
  3683. case ObjectTypes.ValueTypeObjectReference:
  3684. ArraySetValue(arr, StackObject.ToObject(val, domain, mStack), idx->Value);
  3685. FreeStackValueType(esp - 1);
  3686. break;
  3687. default:
  3688. throw new NotImplementedException();
  3689. }
  3690. }
  3691. Free(esp - 1);
  3692. Free(esp - 1 - 1);
  3693. Free(esp - 1 - 1 - 1);
  3694. esp = esp - 1 - 1 - 1;
  3695. }
  3696. break;
  3697. case OpCodeEnum.Ldelem_Ref:
  3698. case OpCodeEnum.Ldelem_Any:
  3699. {
  3700. var idx = esp - 1;
  3701. arrRef = esp - 1 - 1;
  3702. Array arr = mStack[arrRef->Value] as Array;
  3703. obj = arr.GetValue(idx->Value);
  3704. if (obj is CrossBindingAdaptorType)
  3705. obj = ((CrossBindingAdaptorType)obj).ILInstance;
  3706. Free(esp - 1);
  3707. Free(esp - 1 - 1);
  3708. if (obj is ILTypeInstance)
  3709. {
  3710. ILTypeInstance ins = (ILTypeInstance)obj;
  3711. if (!(ins is DelegateAdapter) && ins.Type.IsValueType && !ins.Boxed)
  3712. {
  3713. AllocValueType(arrRef, ins.Type);
  3714. dst = ILIntepreter.ResolveReference(arrRef);
  3715. ins.CopyValueTypeToStack(dst, mStack);
  3716. esp = idx;
  3717. }
  3718. else
  3719. esp = PushObject(esp - 1 - 1, mStack, obj, true);
  3720. }
  3721. else
  3722. esp = PushObject(esp - 1 - 1, mStack, obj, !arr.GetType().GetElementType().IsPrimitive);
  3723. }
  3724. break;
  3725. case OpCodeEnum.Stelem_I1:
  3726. {
  3727. val = esp - 1;
  3728. var idx = esp - 1 - 1;
  3729. arrRef = esp - 1 - 1 - 1;
  3730. byte[] arr = mStack[arrRef->Value] as byte[];
  3731. if (arr != null)
  3732. {
  3733. arr[idx->Value] = (byte)val->Value;
  3734. }
  3735. else
  3736. {
  3737. bool[] arr2 = mStack[arrRef->Value] as bool[];
  3738. if (arr2 != null)
  3739. {
  3740. arr2[idx->Value] = val->Value == 1;
  3741. }
  3742. else
  3743. {
  3744. sbyte[] arr3 = mStack[arrRef->Value] as sbyte[];
  3745. arr3[idx->Value] = (sbyte)val->Value;
  3746. }
  3747. }
  3748. Free(esp - 1);
  3749. Free(esp - 1 - 1);
  3750. Free(esp - 1 - 1 - 1);
  3751. esp = esp - 1 - 1 - 1;
  3752. }
  3753. break;
  3754. case OpCodeEnum.Ldelem_I1:
  3755. {
  3756. var idx = esp - 1;
  3757. arrRef = esp - 1 - 1;
  3758. bool[] arr = mStack[arrRef->Value] as bool[];
  3759. if (arr != null)
  3760. intVal = arr[idx->Value] ? 1 : 0;
  3761. else
  3762. {
  3763. sbyte[] arr2 = mStack[arrRef->Value] as sbyte[];
  3764. intVal = arr2[idx->Value];
  3765. }
  3766. Free(esp - 1);
  3767. Free(esp - 1 - 1);
  3768. arrRef->ObjectType = ObjectTypes.Integer;
  3769. arrRef->Value = intVal;
  3770. esp -= 1;
  3771. }
  3772. break;
  3773. case OpCodeEnum.Ldelem_U1:
  3774. {
  3775. var idx = (esp - 1);
  3776. arrRef = esp - 1 - 1;
  3777. byte[] arr = mStack[arrRef->Value] as byte[];
  3778. if (arr != null)
  3779. intVal = arr[idx->Value];
  3780. else
  3781. {
  3782. bool[] arr2 = mStack[arrRef->Value] as bool[];
  3783. intVal = arr2[idx->Value] ? 1 : 0;
  3784. }
  3785. Free(esp - 1);
  3786. Free(esp - 1 - 1);
  3787. arrRef->ObjectType = ObjectTypes.Integer;
  3788. arrRef->Value = intVal;
  3789. esp -= 1;
  3790. }
  3791. break;
  3792. case OpCodeEnum.Stelem_I2:
  3793. {
  3794. val = esp - 1;
  3795. var idx = esp - 1 - 1;
  3796. arrRef = esp - 1 - 1 - 1;
  3797. short[] arr = mStack[arrRef->Value] as short[];
  3798. if (arr != null)
  3799. {
  3800. arr[idx->Value] = (short)val->Value;
  3801. }
  3802. else
  3803. {
  3804. ushort[] arr2 = mStack[arrRef->Value] as ushort[];
  3805. if (arr2 != null)
  3806. {
  3807. arr2[idx->Value] = (ushort)val->Value;
  3808. }
  3809. else
  3810. {
  3811. char[] arr3 = mStack[arrRef->Value] as char[];
  3812. arr3[idx->Value] = (char)val->Value;
  3813. }
  3814. }
  3815. Free(esp - 1);
  3816. Free(esp - 1 - 1);
  3817. Free(esp - 1 - 1 - 1);
  3818. esp = esp - 1 - 1 - 1;
  3819. }
  3820. break;
  3821. case OpCodeEnum.Ldelem_I2:
  3822. {
  3823. var idx = (esp - 1)->Value;
  3824. arrRef = esp - 1 - 1;
  3825. short[] arr = mStack[arrRef->Value] as short[];
  3826. if (arr != null)
  3827. {
  3828. intVal = arr[idx];
  3829. }
  3830. else
  3831. {
  3832. char[] arr2 = mStack[arrRef->Value] as char[];
  3833. intVal = arr2[idx];
  3834. }
  3835. Free(esp - 1);
  3836. Free(esp - 1 - 1);
  3837. arrRef->ObjectType = ObjectTypes.Integer;
  3838. arrRef->Value = intVal;
  3839. esp -= 1;
  3840. }
  3841. break;
  3842. case OpCodeEnum.Ldelem_U2:
  3843. {
  3844. var idx = (esp - 1)->Value;
  3845. arrRef = esp - 1 - 1;
  3846. ushort[] arr = mStack[arrRef->Value] as ushort[];
  3847. if (arr != null)
  3848. {
  3849. intVal = arr[idx];
  3850. }
  3851. else
  3852. {
  3853. char[] arr2 = mStack[arrRef->Value] as char[];
  3854. intVal = arr2[idx];
  3855. }
  3856. Free(esp - 1);
  3857. Free(esp - 1 - 1);
  3858. arrRef->ObjectType = ObjectTypes.Integer;
  3859. arrRef->Value = intVal;
  3860. esp -= 1;
  3861. }
  3862. break;
  3863. case OpCodeEnum.Stelem_I4:
  3864. {
  3865. val = esp - 1;
  3866. var idx = esp - 1 - 1;
  3867. arrRef = esp - 1 - 1 - 1;
  3868. int[] arr = mStack[arrRef->Value] as int[];
  3869. if (arr != null)
  3870. {
  3871. arr[idx->Value] = val->Value;
  3872. }
  3873. else
  3874. {
  3875. uint[] arr2 = mStack[arrRef->Value] as uint[];
  3876. arr2[idx->Value] = (uint)val->Value;
  3877. }
  3878. Free(esp - 1);
  3879. Free(esp - 1 - 1);
  3880. Free(esp - 1 - 1 - 1);
  3881. esp = esp - 1 - 1 - 1;
  3882. }
  3883. break;
  3884. case OpCodeEnum.Ldelem_I4:
  3885. {
  3886. var idx = (esp - 1)->Value;
  3887. arrRef = esp - 1 - 1;
  3888. int[] arr = mStack[arrRef->Value] as int[];
  3889. Free(esp - 1);
  3890. Free(esp - 1 - 1);
  3891. arrRef->ObjectType = ObjectTypes.Integer;
  3892. arrRef->Value = arr[idx];
  3893. esp -= 1;
  3894. }
  3895. break;
  3896. case OpCodeEnum.Ldelem_U4:
  3897. {
  3898. var idx = (esp - 1)->Value;
  3899. arrRef = esp - 1 - 1;
  3900. uint[] arr = mStack[arrRef->Value] as uint[];
  3901. Free(esp - 1);
  3902. Free(esp - 1 - 1);
  3903. arrRef->ObjectType = ObjectTypes.Integer;
  3904. arrRef->Value = (int)arr[idx];
  3905. esp -= 1;
  3906. }
  3907. break;
  3908. case OpCodeEnum.Stelem_I8:
  3909. {
  3910. val = esp - 1;
  3911. var idx = esp - 1 - 1;
  3912. arrRef = esp - 1 - 1 - 1;
  3913. long[] arr = mStack[arrRef->Value] as long[];
  3914. if (arr != null)
  3915. {
  3916. arr[idx->Value] = *(long*)&val->Value;
  3917. }
  3918. else
  3919. {
  3920. ulong[] arr2 = mStack[arrRef->Value] as ulong[];
  3921. arr2[idx->Value] = *(ulong*)&val->Value;
  3922. }
  3923. Free(esp - 1);
  3924. Free(esp - 1 - 1);
  3925. Free(esp - 1 - 1 - 1);
  3926. esp = esp - 1 - 1 - 1;
  3927. }
  3928. break;
  3929. case OpCodeEnum.Ldelem_I8:
  3930. {
  3931. var idx = esp - 1;
  3932. arrRef = esp - 1 - 1;
  3933. long[] arr = mStack[arrRef->Value] as long[];
  3934. long longVal;
  3935. if (arr != null)
  3936. longVal = arr[idx->Value];
  3937. else
  3938. {
  3939. ulong[] arr2 = mStack[arrRef->Value] as ulong[];
  3940. longVal = (long)arr2[idx->Value];
  3941. }
  3942. Free(esp - 1);
  3943. Free(esp - 1 - 1);
  3944. arrRef->ObjectType = ObjectTypes.Long;
  3945. *(long*)&arrRef->Value = longVal;
  3946. esp -= 1;
  3947. }
  3948. break;
  3949. case OpCodeEnum.Stelem_R4:
  3950. {
  3951. val = esp - 1;
  3952. var idx = esp - 1 - 1;
  3953. arrRef = esp - 1 - 1 - 1;
  3954. float[] arr = mStack[arrRef->Value] as float[];
  3955. arr[idx->Value] = *(float*)&val->Value;
  3956. Free(esp - 1);
  3957. Free(esp - 1 - 1);
  3958. Free(esp - 1 - 1 - 1);
  3959. esp = esp - 1 - 1 - 1;
  3960. }
  3961. break;
  3962. case OpCodeEnum.Ldelem_R4:
  3963. {
  3964. var idx = (esp - 1)->Value;
  3965. arrRef = esp - 1 - 1;
  3966. float[] arr = mStack[arrRef->Value] as float[];
  3967. Free(esp - 1);
  3968. Free(esp - 1 - 1);
  3969. arrRef->ObjectType = ObjectTypes.Float;
  3970. *(float*)&arrRef->Value = arr[idx];
  3971. esp -= 1;
  3972. }
  3973. break;
  3974. case OpCodeEnum.Stelem_R8:
  3975. {
  3976. val = esp - 1;
  3977. var idx = esp - 1 - 1;
  3978. arrRef = esp - 1 - 1 - 1;
  3979. double[] arr = mStack[arrRef->Value] as double[];
  3980. arr[idx->Value] = *(double*)&val->Value;
  3981. Free(esp - 1);
  3982. Free(esp - 1 - 1);
  3983. Free(esp - 1 - 1 - 1);
  3984. esp = esp - 1 - 1 - 1;
  3985. }
  3986. break;
  3987. case OpCodeEnum.Ldelem_R8:
  3988. {
  3989. var idx = (esp - 1)->Value;
  3990. arrRef = esp - 1 - 1;
  3991. double[] arr = mStack[arrRef->Value] as double[];
  3992. Free(esp - 1);
  3993. Free(esp - 1 - 1);
  3994. arrRef->ObjectType = ObjectTypes.Double;
  3995. *(double*)&arrRef->Value = arr[idx];
  3996. esp -= 1;
  3997. }
  3998. break;
  3999. case OpCodeEnum.Ldlen:
  4000. {
  4001. arrRef = esp - 1;
  4002. Array arr = mStack[arrRef->Value] as Array;
  4003. Free(esp - 1);
  4004. arrRef->ObjectType = ObjectTypes.Integer;
  4005. arrRef->Value = arr.Length;
  4006. }
  4007. break;
  4008. case OpCodeEnum.Ldelema:
  4009. {
  4010. arrRef = esp - 1 - 1;
  4011. var idx = (esp - 1)->Value;
  4012. Array arr = mStack[arrRef->Value] as Array;
  4013. Free(esp - 1);
  4014. Free(esp - 1 - 1);
  4015. arrRef->ObjectType = ObjectTypes.ArrayReference;
  4016. arrRef->Value = mStack.Count;
  4017. mStack.Add(arr);
  4018. arrRef->ValueLow = idx;
  4019. esp--;
  4020. }
  4021. break;
  4022. #endregion
  4023. #region Conversion
  4024. case OpCodeEnum.Conv_U1:
  4025. case OpCodeEnum.Conv_Ovf_U1:
  4026. case OpCodeEnum.Conv_Ovf_U1_Un:
  4027. {
  4028. objRef = esp - 1;
  4029. switch (objRef->ObjectType)
  4030. {
  4031. case ObjectTypes.Long:
  4032. case ObjectTypes.Integer:
  4033. intVal = (byte)objRef->Value;
  4034. break;
  4035. case ObjectTypes.Float:
  4036. intVal = (byte)*(float*)&objRef->Value;
  4037. break;
  4038. case ObjectTypes.Double:
  4039. intVal = (byte)*(double*)&objRef->Value;
  4040. break;
  4041. default:
  4042. throw new NotImplementedException();
  4043. }
  4044. objRef->ObjectType = ObjectTypes.Integer;
  4045. objRef->Value = intVal;
  4046. objRef->ValueLow = 0;
  4047. }
  4048. break;
  4049. case OpCodeEnum.Conv_I1:
  4050. case OpCodeEnum.Conv_Ovf_I1:
  4051. case OpCodeEnum.Conv_Ovf_I1_Un:
  4052. {
  4053. objRef = esp - 1;
  4054. switch (objRef->ObjectType)
  4055. {
  4056. case ObjectTypes.Long:
  4057. case ObjectTypes.Integer:
  4058. intVal = (sbyte)objRef->Value;
  4059. break;
  4060. case ObjectTypes.Float:
  4061. intVal = (sbyte)*(float*)&objRef->Value;
  4062. break;
  4063. case ObjectTypes.Double:
  4064. intVal = (sbyte)*(double*)&objRef->Value;
  4065. break;
  4066. default:
  4067. throw new NotImplementedException();
  4068. }
  4069. objRef->ObjectType = ObjectTypes.Integer;
  4070. objRef->Value = intVal;
  4071. objRef->ValueLow = 0;
  4072. }
  4073. break;
  4074. case OpCodeEnum.Conv_U2:
  4075. case OpCodeEnum.Conv_Ovf_U2:
  4076. case OpCodeEnum.Conv_Ovf_U2_Un:
  4077. {
  4078. objRef = esp - 1;
  4079. switch (objRef->ObjectType)
  4080. {
  4081. case ObjectTypes.Long:
  4082. case ObjectTypes.Integer:
  4083. intVal = (ushort)objRef->Value;
  4084. break;
  4085. case ObjectTypes.Float:
  4086. intVal = (ushort)*(float*)&objRef->Value;
  4087. break;
  4088. case ObjectTypes.Double:
  4089. intVal = (ushort)*(double*)&objRef->Value;
  4090. break;
  4091. default:
  4092. throw new NotImplementedException();
  4093. }
  4094. objRef->ObjectType = ObjectTypes.Integer;
  4095. objRef->Value = intVal;
  4096. objRef->ValueLow = 0;
  4097. }
  4098. break;
  4099. case OpCodeEnum.Conv_I2:
  4100. case OpCodeEnum.Conv_Ovf_I2:
  4101. case OpCodeEnum.Conv_Ovf_I2_Un:
  4102. {
  4103. objRef = esp - 1;
  4104. switch (objRef->ObjectType)
  4105. {
  4106. case ObjectTypes.Long:
  4107. case ObjectTypes.Integer:
  4108. intVal = (short)(objRef->Value);
  4109. break;
  4110. case ObjectTypes.Float:
  4111. intVal = (short)*(float*)&objRef->Value;
  4112. break;
  4113. case ObjectTypes.Double:
  4114. intVal = (short)*(double*)&objRef->Value;
  4115. break;
  4116. default:
  4117. throw new NotImplementedException();
  4118. }
  4119. objRef->ObjectType = ObjectTypes.Integer;
  4120. objRef->Value = intVal;
  4121. objRef->ValueLow = 0;
  4122. }
  4123. break;
  4124. case OpCodeEnum.Conv_U4:
  4125. case OpCodeEnum.Conv_U:
  4126. case OpCodeEnum.Conv_Ovf_U4:
  4127. case OpCodeEnum.Conv_Ovf_U4_Un:
  4128. {
  4129. objRef = esp - 1;
  4130. uint uintVal;
  4131. switch (objRef->ObjectType)
  4132. {
  4133. case ObjectTypes.Long:
  4134. uintVal = (uint)*(long*)&objRef->Value;
  4135. break;
  4136. case ObjectTypes.Integer:
  4137. uintVal = (uint)objRef->Value;
  4138. break;
  4139. case ObjectTypes.Float:
  4140. uintVal = (uint)*(float*)&objRef->Value;
  4141. break;
  4142. case ObjectTypes.Double:
  4143. uintVal = (uint)*(double*)&objRef->Value;
  4144. break;
  4145. default:
  4146. throw new NotImplementedException();
  4147. }
  4148. objRef->ObjectType = ObjectTypes.Integer;
  4149. objRef->Value = (int)uintVal;
  4150. objRef->ValueLow = 0;
  4151. }
  4152. break;
  4153. case OpCodeEnum.Conv_I4:
  4154. case OpCodeEnum.Conv_I:
  4155. case OpCodeEnum.Conv_Ovf_I:
  4156. case OpCodeEnum.Conv_Ovf_I_Un:
  4157. case OpCodeEnum.Conv_Ovf_I4:
  4158. case OpCodeEnum.Conv_Ovf_I4_Un:
  4159. {
  4160. objRef = esp - 1;
  4161. switch (objRef->ObjectType)
  4162. {
  4163. case ObjectTypes.Long:
  4164. intVal = (int)*(long*)&objRef->Value;
  4165. break;
  4166. case ObjectTypes.Float:
  4167. intVal = (int)*(float*)&objRef->Value;
  4168. break;
  4169. case ObjectTypes.Double:
  4170. intVal = (int)*(double*)&objRef->Value;
  4171. break;
  4172. case ObjectTypes.Integer:
  4173. intVal = objRef->Value;
  4174. break;
  4175. default:
  4176. throw new NotImplementedException();
  4177. }
  4178. objRef->ObjectType = ObjectTypes.Integer;
  4179. objRef->Value = intVal;
  4180. }
  4181. break;
  4182. case OpCodeEnum.Conv_I8:
  4183. case OpCodeEnum.Conv_Ovf_I8:
  4184. case OpCodeEnum.Conv_Ovf_I8_Un:
  4185. {
  4186. objRef = esp - 1;
  4187. long longVal;
  4188. switch (objRef->ObjectType)
  4189. {
  4190. case ObjectTypes.Integer:
  4191. longVal = objRef->Value;
  4192. break;
  4193. case ObjectTypes.Long:
  4194. ip++;
  4195. continue;
  4196. case ObjectTypes.Float:
  4197. longVal = (long)*(float*)&objRef->Value;
  4198. break;
  4199. case ObjectTypes.Double:
  4200. longVal = (long)*(double*)&objRef->Value;
  4201. break;
  4202. default:
  4203. throw new NotImplementedException();
  4204. }
  4205. objRef->ObjectType = ObjectTypes.Long;
  4206. *(long*)(&objRef->Value) = longVal;
  4207. }
  4208. break;
  4209. case OpCodeEnum.Conv_U8:
  4210. case OpCodeEnum.Conv_Ovf_U8:
  4211. case OpCodeEnum.Conv_Ovf_U8_Un:
  4212. {
  4213. objRef = esp - 1;
  4214. ulong ulongVal;
  4215. switch (objRef->ObjectType)
  4216. {
  4217. case ObjectTypes.Integer:
  4218. ulongVal = (uint)objRef->Value;
  4219. break;
  4220. case ObjectTypes.Long:
  4221. ip++;
  4222. continue;
  4223. case ObjectTypes.Float:
  4224. ulongVal = (ulong)*(float*)&objRef->Value;
  4225. break;
  4226. case ObjectTypes.Double:
  4227. ulongVal = (ulong)*(double*)&objRef->Value;
  4228. break;
  4229. default:
  4230. throw new NotImplementedException();
  4231. }
  4232. objRef->ObjectType = ObjectTypes.Long;
  4233. *(ulong*)(&objRef->Value) = ulongVal;
  4234. }
  4235. break;
  4236. case OpCodeEnum.Conv_R4:
  4237. {
  4238. objRef = esp - 1;
  4239. float floatVal;
  4240. switch (objRef->ObjectType)
  4241. {
  4242. case ObjectTypes.Long:
  4243. floatVal = (float)*(long*)&objRef->Value;
  4244. break;
  4245. case ObjectTypes.Float:
  4246. ip++;
  4247. continue;
  4248. case ObjectTypes.Double:
  4249. floatVal = (float)*(double*)&objRef->Value;
  4250. break;
  4251. case ObjectTypes.Integer:
  4252. floatVal = objRef->Value;
  4253. break;
  4254. default:
  4255. throw new NotImplementedException();
  4256. }
  4257. objRef->ObjectType = ObjectTypes.Float;
  4258. *(float*)&objRef->Value = floatVal;
  4259. }
  4260. break;
  4261. case OpCodeEnum.Conv_R8:
  4262. {
  4263. objRef = esp - 1;
  4264. double doubleVal;
  4265. switch (objRef->ObjectType)
  4266. {
  4267. case ObjectTypes.Long:
  4268. doubleVal = (double)*(long*)&objRef->Value;
  4269. break;
  4270. case ObjectTypes.Float:
  4271. doubleVal = *(float*)&objRef->Value;
  4272. break;
  4273. case ObjectTypes.Integer:
  4274. doubleVal = objRef->Value;
  4275. break;
  4276. case ObjectTypes.Double:
  4277. ip++;
  4278. continue;
  4279. default:
  4280. throw new NotImplementedException();
  4281. }
  4282. objRef->ObjectType = ObjectTypes.Double;
  4283. *(double*)&objRef->Value = doubleVal;
  4284. }
  4285. break;
  4286. case OpCodeEnum.Conv_R_Un:
  4287. {
  4288. objRef = esp - 1;
  4289. bool isDouble = false;
  4290. float floatVal = 0;
  4291. double val2 = 0;
  4292. switch (objRef->ObjectType)
  4293. {
  4294. case ObjectTypes.Long:
  4295. val2 = (double)*(ulong*)&objRef->Value;
  4296. isDouble = true;
  4297. break;
  4298. case ObjectTypes.Float:
  4299. ip++;
  4300. continue;
  4301. case ObjectTypes.Integer:
  4302. floatVal = (uint)objRef->Value;
  4303. break;
  4304. case ObjectTypes.Double:
  4305. ip++;
  4306. continue;
  4307. default:
  4308. throw new NotImplementedException();
  4309. }
  4310. if (isDouble)
  4311. {
  4312. objRef->ObjectType = ObjectTypes.Double;
  4313. *(double*)&objRef->Value = val2;
  4314. }
  4315. else
  4316. {
  4317. objRef->ObjectType = ObjectTypes.Float;
  4318. *(float*)&objRef->Value = floatVal;
  4319. }
  4320. }
  4321. break;
  4322. #endregion
  4323. #region Stack operation
  4324. case OpCodeEnum.Pop:
  4325. {
  4326. Free(esp - 1);
  4327. esp--;
  4328. }
  4329. break;
  4330. case OpCodeEnum.Dup:
  4331. {
  4332. objRef = esp - 1;
  4333. if (objRef->ObjectType == ObjectTypes.ValueTypeObjectReference)
  4334. {
  4335. CloneStackValueType(objRef, esp, mStack);
  4336. }
  4337. else
  4338. {
  4339. *esp = *objRef;
  4340. if (esp->ObjectType >= ObjectTypes.Object)
  4341. {
  4342. esp->Value = mStack.Count;
  4343. mStack.Add(mStack[objRef->Value]);
  4344. }
  4345. }
  4346. esp++;
  4347. }
  4348. break;
  4349. #endregion
  4350. case OpCodeEnum.Throw:
  4351. {
  4352. objRef = GetObjectAndResolveReference(esp - 1);
  4353. var ex = mStack[objRef->Value] as Exception;
  4354. Free(objRef);
  4355. esp--;
  4356. throw ex;
  4357. }
  4358. case OpCodeEnum.Rethrow:
  4359. {
  4360. throw lastCaughtEx;
  4361. }
  4362. case OpCodeEnum.Nop:
  4363. case OpCodeEnum.Volatile:
  4364. case OpCodeEnum.Castclass:
  4365. case OpCodeEnum.Readonly:
  4366. break;
  4367. default:
  4368. throw new NotSupportedException("Not supported opcode " + code);
  4369. }
  4370. ip++;
  4371. }
  4372. catch (Exception ex)
  4373. {
  4374. if (ehs != null)
  4375. {
  4376. int addr = (int)(ip - ptr);
  4377. var eh = GetCorrespondingExceptionHandler(ehs, ex, addr, ExceptionHandlerType.Catch, true);
  4378. if (eh == null)
  4379. {
  4380. eh = GetCorrespondingExceptionHandler(ehs, ex, addr, ExceptionHandlerType.Catch, false);
  4381. }
  4382. if (eh != null)
  4383. {
  4384. if (ex is ILRuntimeException)
  4385. {
  4386. ILRuntimeException ire = (ILRuntimeException)ex;
  4387. var inner = ire.InnerException;
  4388. inner.Data["ThisInfo"] = ire.ThisInfo;
  4389. inner.Data["StackTrace"] = ire.StackTrace;
  4390. inner.Data["LocalInfo"] = ire.LocalInfo;
  4391. ex = inner;
  4392. }
  4393. else
  4394. {
  4395. var debugger = AppDomain.DebugService;
  4396. if (method.HasThis)
  4397. ex.Data["ThisInfo"] = debugger.GetThisInfo(this);
  4398. else
  4399. ex.Data["ThisInfo"] = "";
  4400. ex.Data["StackTrace"] = debugger.GetStackTrace(this);
  4401. ex.Data["LocalInfo"] = debugger.GetLocalVariableInfo(this);
  4402. }
  4403. //Clear call stack
  4404. while (stack.Frames.Peek().BasePointer != frame.BasePointer)
  4405. {
  4406. var f = stack.Frames.Peek();
  4407. esp = stack.PopFrame(ref f, esp);
  4408. if (f.Method.ReturnType != AppDomain.VoidType)
  4409. {
  4410. Free(esp - 1);
  4411. esp--;
  4412. }
  4413. }
  4414. lastCaughtEx = ex;
  4415. esp = PushObject(esp, mStack, ex);
  4416. unhandledException = false;
  4417. var sql = from e in ehs
  4418. where addr >= e.TryStart && addr <= e.TryEnd && (eh.HandlerStart < e.TryStart || eh.HandlerStart > e.TryEnd) && e.HandlerType == ExceptionHandlerType.Finally
  4419. select e;
  4420. var eh2 = sql.FirstOrDefault();
  4421. if (eh2 != null)
  4422. {
  4423. finallyEndAddress = eh.HandlerStart;
  4424. ip = ptr + eh2.HandlerStart;
  4425. continue;
  4426. }
  4427. ip = ptr + eh.HandlerStart;
  4428. continue;
  4429. }
  4430. eh = GetCorrespondingExceptionHandler(ehs, null, addr, ExceptionHandlerType.Fault, false);
  4431. if(eh == null)
  4432. eh = GetCorrespondingExceptionHandler(ehs, null, addr, ExceptionHandlerType.Finally, false);
  4433. if(eh != null)
  4434. {
  4435. unhandledException = false;
  4436. finallyEndAddress = -1;
  4437. lastCaughtEx = ex is ILRuntimeException ? ex : new ILRuntimeException(ex.Message, this, method, ex);
  4438. ip = ptr + eh.HandlerStart;
  4439. continue;
  4440. }
  4441. }
  4442. if (unhandledException)
  4443. {
  4444. throw ex;
  4445. }
  4446. unhandledException = true;
  4447. returned = true;
  4448. #if DEBUG && !DISABLE_ILRUNTIME_DEBUG
  4449. if (!AppDomain.DebugService.Break(this, ex))
  4450. #endif
  4451. {
  4452. var newEx = new ILRuntimeException(ex.Message, this, method, ex);
  4453. throw newEx;
  4454. }
  4455. }
  4456. }
  4457. }
  4458. #if DEBUG && !NO_PROFILER
  4459. if (System.Threading.Thread.CurrentThread.ManagedThreadId == AppDomain.UnityMainThreadID)
  4460. #if UNITY_5_5_OR_NEWER
  4461. UnityEngine.Profiling.Profiler.EndSample();
  4462. #else
  4463. UnityEngine.Profiler.EndSample();
  4464. #endif
  4465. #endif
  4466. //ClearStack
  4467. return stack.PopFrame(ref frame, esp);
  4468. }
  4469. void PrepareRegisterCallStack(StackObject* esp, IList<object> mStack, ILMethod method)
  4470. {
  4471. var pCnt = method.HasThis ? method.ParameterCount + 1 : method.ParameterCount;
  4472. StackObject* basePointer = esp - pCnt;
  4473. int mBase = mStack.Count;
  4474. int existing = 0;
  4475. for (int i = 0; i < pCnt; i++)
  4476. {
  4477. StackObject* cur = basePointer + i;
  4478. if (cur->ObjectType < ObjectTypes.Object)
  4479. {
  4480. mStack.Add(null);
  4481. }
  4482. else
  4483. existing++;
  4484. }
  4485. if (existing > 0)
  4486. {
  4487. mBase = mBase - existing;
  4488. for (int i = pCnt - 1; i >= 0; i--)
  4489. {
  4490. StackObject* cur = basePointer + i;
  4491. if (cur->ObjectType >= ObjectTypes.Object)
  4492. {
  4493. mStack[mBase + i] = mStack[cur->Value];
  4494. cur->Value = mBase + i;
  4495. }
  4496. else
  4497. {
  4498. if (cur->ObjectType == ObjectTypes.Null)
  4499. {
  4500. cur->ObjectType = ObjectTypes.Object;
  4501. cur->Value = mBase + i;
  4502. }
  4503. mStack[mBase + i] = null;
  4504. }
  4505. }
  4506. }
  4507. }
  4508. void DumpStack(StackObject* esp)
  4509. {
  4510. AppDomain.DebugService.DumpStack(esp, stack);
  4511. }
  4512. void CloneStackValueType(StackObject* src, StackObject* dst, IList<object> mStack)
  4513. {
  4514. StackObject* descriptor = ILIntepreter.ResolveReference(src);
  4515. stack.AllocValueType(dst, AppDomain.GetTypeByIndex(descriptor->Value));
  4516. StackObject* dstDescriptor = ILIntepreter.ResolveReference(dst);
  4517. int cnt = descriptor->ValueLow;
  4518. for (int i = 0; i < cnt; i++)
  4519. {
  4520. StackObject* val = Minus(descriptor, i + 1);
  4521. CopyToValueTypeField(dstDescriptor, i, val, mStack);
  4522. }
  4523. }
  4524. bool CanCastTo(StackObject* src, StackObject* dst)
  4525. {
  4526. var sType = AppDomain.GetTypeByIndex(src->Value);
  4527. var dType = AppDomain.GetTypeByIndex(dst->Value);
  4528. return sType.CanAssignTo(dType);
  4529. }
  4530. bool CanCopyStackValueType(StackObject* src, StackObject* dst)
  4531. {
  4532. if (src->ObjectType == ObjectTypes.ValueTypeObjectReference && dst->ObjectType == ObjectTypes.ValueTypeObjectReference)
  4533. {
  4534. StackObject* descriptor = ILIntepreter.ResolveReference(src);
  4535. StackObject* dstDescriptor = ILIntepreter.ResolveReference(dst);
  4536. return CanCastTo(descriptor, dstDescriptor);
  4537. }
  4538. else
  4539. return false;
  4540. }
  4541. #if DEBUG
  4542. public void CopyStackValueType(StackObject* src, StackObject* dst, IList<object> mStack, bool noCheck = false)
  4543. #else
  4544. public void CopyStackValueType(StackObject* src, StackObject* dst, IList<object> mStack)
  4545. #endif
  4546. {
  4547. #if DEBUG
  4548. CopyStackValueType(src, dst, mStack, mStack, noCheck);
  4549. #else
  4550. CopyStackValueType(src, dst, mStack, mStack);
  4551. #endif
  4552. }
  4553. #if DEBUG
  4554. public void CopyStackValueType(StackObject* src, StackObject* dst, IList<object> mStack, IList<object> dstmStack, bool noCheck = false)
  4555. #else
  4556. public void CopyStackValueType(StackObject* src, StackObject* dst, IList<object> mStack, IList<object> dstmStack)
  4557. #endif
  4558. {
  4559. StackObject* descriptor = ILIntepreter.ResolveReference(src);
  4560. StackObject* dstDescriptor = ILIntepreter.ResolveReference(dst);
  4561. #if DEBUG
  4562. if (!CanCastTo(descriptor, dstDescriptor))
  4563. throw new InvalidCastException();
  4564. #endif
  4565. int cnt = descriptor->ValueLow;
  4566. for (int i = 0; i < cnt; i++)
  4567. {
  4568. StackObject* srcVal = Minus(descriptor, i + 1);
  4569. StackObject* dstVal = Minus(dstDescriptor, i + 1);
  4570. #if DEBUG
  4571. if (!noCheck && srcVal->ObjectType != dstVal->ObjectType)
  4572. throw new NotSupportedException();
  4573. #endif
  4574. switch (srcVal->ObjectType)
  4575. {
  4576. case ObjectTypes.Object:
  4577. case ObjectTypes.ArrayReference:
  4578. case ObjectTypes.FieldReference:
  4579. dstmStack[dstVal->Value] = mStack[srcVal->Value];
  4580. break;
  4581. case ObjectTypes.ValueTypeObjectReference:
  4582. CopyStackValueType(srcVal, dstVal, mStack, dstmStack);
  4583. break;
  4584. default:
  4585. *dstVal = *srcVal;
  4586. break;
  4587. }
  4588. }
  4589. }
  4590. void CopyValueTypeToStack(StackObject* dst, object ins, IList<object> mStack)
  4591. {
  4592. if (ins is ILTypeInstance)
  4593. {
  4594. ((ILTypeInstance)ins).CopyValueTypeToStack(dst, mStack);
  4595. }
  4596. else
  4597. {
  4598. if (ins is CrossBindingAdaptorType)
  4599. {
  4600. ((CrossBindingAdaptorType)ins).ILInstance.CopyValueTypeToStack(dst, mStack);
  4601. }
  4602. else
  4603. {
  4604. var vb = ((CLRType)domain.GetTypeByIndex(dst->Value)).ValueTypeBinder;
  4605. vb.CopyValueTypeToStack(ins, dst, mStack);
  4606. }
  4607. }
  4608. }
  4609. void CopyToValueTypeField(StackObject* obj, int idx, StackObject* val, IList<object> mStack)
  4610. {
  4611. StackObject* dst = Minus(obj, idx + 1);
  4612. switch (val->ObjectType)
  4613. {
  4614. case ObjectTypes.Null:
  4615. {
  4616. mStack[dst->Value] = null;
  4617. }
  4618. break;
  4619. case ObjectTypes.Object:
  4620. case ObjectTypes.FieldReference:
  4621. case ObjectTypes.ArrayReference:
  4622. {
  4623. if (dst->ObjectType == ObjectTypes.ValueTypeObjectReference)
  4624. {
  4625. var ins = mStack[val->Value];
  4626. dst = ILIntepreter.ResolveReference(dst);
  4627. CopyValueTypeToStack(dst, ins, mStack);
  4628. }
  4629. else
  4630. {
  4631. mStack[dst->Value] = CheckAndCloneValueType(mStack[val->Value], domain);
  4632. }
  4633. }
  4634. break;
  4635. case ObjectTypes.ValueTypeObjectReference:
  4636. {
  4637. if (dst->ObjectType == ObjectTypes.ValueTypeObjectReference)
  4638. {
  4639. CopyStackValueType(val, dst, mStack);
  4640. }
  4641. else
  4642. throw new NotImplementedException();
  4643. }
  4644. break;
  4645. default:
  4646. *dst = *val;
  4647. break;
  4648. }
  4649. }
  4650. void StLocSub(StackObject* esp, StackObject* v, int idx, IList<object> mStack)
  4651. {
  4652. switch (esp->ObjectType)
  4653. {
  4654. case ObjectTypes.Null:
  4655. v->ObjectType = ObjectTypes.Object;
  4656. v->Value = idx;
  4657. mStack[idx] = null;
  4658. break;
  4659. case ObjectTypes.Object:
  4660. case ObjectTypes.FieldReference:
  4661. case ObjectTypes.ArrayReference:
  4662. if (v->ObjectType == ObjectTypes.ValueTypeObjectReference)
  4663. {
  4664. var obj = mStack[esp->Value];
  4665. if (obj is ILTypeInstance)
  4666. {
  4667. var dst = ILIntepreter.ResolveReference(v);
  4668. ((ILTypeInstance)obj).CopyValueTypeToStack(dst, mStack);
  4669. }
  4670. else
  4671. {
  4672. var dst = ILIntepreter.ResolveReference(v);
  4673. var ct = domain.GetTypeByIndex(dst->Value) as CLRType;
  4674. var binder = ct.ValueTypeBinder;
  4675. binder.CopyValueTypeToStack(obj, dst, mStack);
  4676. }
  4677. }
  4678. else
  4679. {
  4680. *v = *esp;
  4681. mStack[idx] = CheckAndCloneValueType(mStack[v->Value], domain);
  4682. v->Value = idx;
  4683. }
  4684. Free(esp);
  4685. break;
  4686. case ObjectTypes.ValueTypeObjectReference:
  4687. if (v->ObjectType == ObjectTypes.ValueTypeObjectReference)
  4688. {
  4689. CopyStackValueType(esp, v, mStack);
  4690. }
  4691. else
  4692. throw new NotImplementedException();
  4693. FreeStackValueType(esp);
  4694. break;
  4695. default:
  4696. *v = *esp;
  4697. mStack[idx] = null;
  4698. break;
  4699. }
  4700. }
  4701. public object RetriveObject(StackObject* esp, IList<object> mStack)
  4702. {
  4703. StackObject* objRef = GetObjectAndResolveReference(esp);
  4704. if (objRef->ObjectType == ObjectTypes.Null)
  4705. return null;
  4706. object obj = null;
  4707. switch (objRef->ObjectType)
  4708. {
  4709. case ObjectTypes.Object:
  4710. obj = mStack[objRef->Value];
  4711. break;
  4712. case ObjectTypes.FieldReference:
  4713. {
  4714. obj = mStack[objRef->Value];
  4715. int idx = objRef->ValueLow;
  4716. if (obj is ILTypeInstance)
  4717. {
  4718. obj = ((ILTypeInstance)obj)[idx];
  4719. }
  4720. else
  4721. {
  4722. var t = AppDomain.GetType(obj.GetType());
  4723. obj = ((CLRType)t).GetFieldValue(idx, obj);
  4724. }
  4725. }
  4726. break;
  4727. case ObjectTypes.ArrayReference:
  4728. {
  4729. Array arr = mStack[objRef->Value] as Array;
  4730. int idx = objRef->ValueLow;
  4731. obj = arr.GetValue(idx);
  4732. }
  4733. break;
  4734. case ObjectTypes.StaticFieldReference:
  4735. {
  4736. var t = AppDomain.GetType(objRef->Value);
  4737. int idx = objRef->ValueLow;
  4738. if (t is ILType)
  4739. {
  4740. obj = ((ILType)t).StaticInstance[idx];
  4741. }
  4742. else
  4743. {
  4744. obj = ((CLRType)t).GetFieldValue(idx, null);
  4745. }
  4746. }
  4747. break;
  4748. case ObjectTypes.ValueTypeObjectReference:
  4749. obj = StackObject.ToObject(objRef, domain, mStack);
  4750. break;
  4751. default:
  4752. throw new NotImplementedException();
  4753. }
  4754. return obj;
  4755. }
  4756. public int RetriveInt32(StackObject* esp, IList<object> mStack)
  4757. {
  4758. StackObject* objRef = GetObjectAndResolveReference(esp);
  4759. if (objRef->ObjectType == ObjectTypes.Null)
  4760. return 0;
  4761. object obj = null;
  4762. int res = 0;
  4763. switch (objRef->ObjectType)
  4764. {
  4765. case ObjectTypes.Object:
  4766. res = (int)mStack[objRef->Value];
  4767. break;
  4768. case ObjectTypes.Integer:
  4769. res = objRef->Value;
  4770. break;
  4771. case ObjectTypes.FieldReference:
  4772. {
  4773. obj = mStack[objRef->Value];
  4774. int idx = objRef->ValueLow;
  4775. if (obj is ILTypeInstance)
  4776. {
  4777. res = ((ILTypeInstance)obj).Fields[idx].Value;
  4778. }
  4779. else
  4780. {
  4781. var t = AppDomain.GetType(obj.GetType());
  4782. StackObject so;
  4783. var sop = &so;
  4784. if (!((CLRType)t).CopyFieldToStack(idx, obj, this, ref sop, mStack))
  4785. res = (int)((CLRType)t).GetFieldValue(idx, obj);
  4786. else
  4787. {
  4788. res = so.Value;
  4789. }
  4790. }
  4791. }
  4792. break;
  4793. case ObjectTypes.ArrayReference:
  4794. {
  4795. Array arr = mStack[objRef->Value] as Array;
  4796. int idx = objRef->ValueLow;
  4797. if (arr is int[])
  4798. res = ((int[])arr)[idx];
  4799. else
  4800. {
  4801. res = (int)Convert.ToInt32(arr.GetValue(idx));
  4802. }
  4803. }
  4804. break;
  4805. case ObjectTypes.StaticFieldReference:
  4806. {
  4807. var t = AppDomain.GetType(objRef->Value);
  4808. int idx = objRef->ValueLow;
  4809. if (t is ILType)
  4810. {
  4811. res = ((ILType)t).StaticInstance.Fields[idx].Value;
  4812. }
  4813. else
  4814. {
  4815. StackObject so;
  4816. var sop = &so;
  4817. if (!((CLRType)t).CopyFieldToStack(idx, null, this, ref sop, mStack))
  4818. res = (int)((CLRType)t).GetFieldValue(idx, null);
  4819. else
  4820. {
  4821. res = so.Value;
  4822. }
  4823. }
  4824. }
  4825. break;
  4826. default:
  4827. throw new NotImplementedException();
  4828. }
  4829. return res;
  4830. }
  4831. public long RetriveInt64(StackObject* esp, IList<object> mStack)
  4832. {
  4833. StackObject* objRef = GetObjectAndResolveReference(esp);
  4834. if (objRef->ObjectType == ObjectTypes.Null)
  4835. return 0;
  4836. object obj = null;
  4837. long res = 0;
  4838. switch (objRef->ObjectType)
  4839. {
  4840. case ObjectTypes.Object:
  4841. res = (long)mStack[objRef->Value];
  4842. break;
  4843. case ObjectTypes.Long:
  4844. res = *(long*)&objRef->Value;
  4845. break;
  4846. case ObjectTypes.FieldReference:
  4847. {
  4848. obj = mStack[objRef->Value];
  4849. int idx = objRef->ValueLow;
  4850. StackObject so;
  4851. if (obj is ILTypeInstance)
  4852. {
  4853. so = ((ILTypeInstance)obj).Fields[idx];
  4854. res = *(long*)&so.Value;
  4855. }
  4856. else
  4857. {
  4858. var t = AppDomain.GetType(obj.GetType());
  4859. var sop = &so;
  4860. if (!((CLRType)t).CopyFieldToStack(idx, obj, this, ref sop, mStack))
  4861. res = (long)((CLRType)t).GetFieldValue(idx, obj);
  4862. else
  4863. {
  4864. res = *(long*)&so.Value;
  4865. }
  4866. }
  4867. }
  4868. break;
  4869. case ObjectTypes.ArrayReference:
  4870. {
  4871. Array arr = mStack[objRef->Value] as Array;
  4872. int idx = objRef->ValueLow;
  4873. if (arr is long[])
  4874. res = ((long[])arr)[idx];
  4875. else
  4876. {
  4877. res = (long)arr.GetValue(idx);
  4878. }
  4879. }
  4880. break;
  4881. case ObjectTypes.StaticFieldReference:
  4882. {
  4883. var t = AppDomain.GetType(objRef->Value);
  4884. int idx = objRef->ValueLow;
  4885. StackObject so;
  4886. if (t is ILType)
  4887. {
  4888. so = ((ILType)t).StaticInstance.Fields[idx];
  4889. res = *(long*)&so.Value;
  4890. }
  4891. else
  4892. {
  4893. var sop = &so;
  4894. if (!((CLRType)t).CopyFieldToStack(idx, null, this, ref sop, mStack))
  4895. res = (long)((CLRType)t).GetFieldValue(idx, null);
  4896. else
  4897. {
  4898. res = *(long*)&so.Value;
  4899. }
  4900. }
  4901. }
  4902. break;
  4903. default:
  4904. throw new NotImplementedException();
  4905. }
  4906. return res;
  4907. }
  4908. public float RetriveFloat(StackObject* esp, IList<object> mStack)
  4909. {
  4910. StackObject* objRef = GetObjectAndResolveReference(esp);
  4911. if (objRef->ObjectType == ObjectTypes.Null)
  4912. return 0;
  4913. object obj = null;
  4914. float res = 0;
  4915. switch (objRef->ObjectType)
  4916. {
  4917. case ObjectTypes.Object:
  4918. res = (float)mStack[objRef->Value];
  4919. break;
  4920. case ObjectTypes.Float:
  4921. res = *(float*)&objRef->Value;
  4922. break;
  4923. case ObjectTypes.FieldReference:
  4924. {
  4925. obj = mStack[objRef->Value];
  4926. int idx = objRef->ValueLow;
  4927. StackObject so;
  4928. if (obj is ILTypeInstance)
  4929. {
  4930. so = ((ILTypeInstance)obj).Fields[idx];
  4931. res = *(float*)&so.Value;
  4932. }
  4933. else
  4934. {
  4935. var t = AppDomain.GetType(obj.GetType());
  4936. var sop = &so;
  4937. if (!((CLRType)t).CopyFieldToStack(idx, obj, this, ref sop, mStack))
  4938. res = (float)((CLRType)t).GetFieldValue(idx, obj);
  4939. else
  4940. {
  4941. res = *(float*)&so.Value;
  4942. }
  4943. }
  4944. }
  4945. break;
  4946. case ObjectTypes.ArrayReference:
  4947. {
  4948. Array arr = mStack[objRef->Value] as Array;
  4949. int idx = objRef->ValueLow;
  4950. if (arr is float[])
  4951. res = ((float[])arr)[idx];
  4952. else
  4953. {
  4954. res = (float)arr.GetValue(idx);
  4955. }
  4956. }
  4957. break;
  4958. case ObjectTypes.StaticFieldReference:
  4959. {
  4960. var t = AppDomain.GetType(objRef->Value);
  4961. int idx = objRef->ValueLow;
  4962. StackObject so;
  4963. if (t is ILType)
  4964. {
  4965. so = ((ILType)t).StaticInstance.Fields[idx];
  4966. res = *(float*)&so.Value;
  4967. }
  4968. else
  4969. {
  4970. var sop = &so;
  4971. if (!((CLRType)t).CopyFieldToStack(idx, null, this, ref sop, mStack))
  4972. res = (float)((CLRType)t).GetFieldValue(idx, null);
  4973. else
  4974. {
  4975. res = *(float*)&so.Value;
  4976. }
  4977. }
  4978. }
  4979. break;
  4980. default:
  4981. throw new NotImplementedException();
  4982. }
  4983. return res;
  4984. }
  4985. public double RetriveDouble(StackObject* esp, IList<object> mStack)
  4986. {
  4987. StackObject* objRef = GetObjectAndResolveReference(esp);
  4988. if (objRef->ObjectType == ObjectTypes.Null)
  4989. return 0;
  4990. object obj = null;
  4991. double res = 0;
  4992. switch (objRef->ObjectType)
  4993. {
  4994. case ObjectTypes.Object:
  4995. res = (double)mStack[objRef->Value];
  4996. break;
  4997. case ObjectTypes.Double:
  4998. res = *(double*)&objRef->Value;
  4999. break;
  5000. case ObjectTypes.FieldReference:
  5001. {
  5002. obj = mStack[objRef->Value];
  5003. int idx = objRef->ValueLow;
  5004. StackObject so;
  5005. if (obj is ILTypeInstance)
  5006. {
  5007. so = ((ILTypeInstance)obj).Fields[idx];
  5008. res = *(double*)&so.Value;
  5009. }
  5010. else
  5011. {
  5012. var t = AppDomain.GetType(obj.GetType());
  5013. var sop = &so;
  5014. if (!((CLRType)t).CopyFieldToStack(idx, obj, this, ref sop, mStack))
  5015. res = (double)((CLRType)t).GetFieldValue(idx, obj);
  5016. else
  5017. {
  5018. res = *(double*)&so.Value;
  5019. }
  5020. }
  5021. }
  5022. break;
  5023. case ObjectTypes.ArrayReference:
  5024. {
  5025. Array arr = mStack[objRef->Value] as Array;
  5026. int idx = objRef->ValueLow;
  5027. if (arr is double[])
  5028. res = ((double[])arr)[idx];
  5029. else
  5030. {
  5031. res = (double)arr.GetValue(idx);
  5032. }
  5033. }
  5034. break;
  5035. case ObjectTypes.StaticFieldReference:
  5036. {
  5037. var t = AppDomain.GetType(objRef->Value);
  5038. int idx = objRef->ValueLow;
  5039. StackObject so;
  5040. if (t is ILType)
  5041. {
  5042. so = ((ILType)t).StaticInstance.Fields[idx];
  5043. res = *(double*)&so.Value;
  5044. }
  5045. else
  5046. {
  5047. var sop = &so;
  5048. if (!((CLRType)t).CopyFieldToStack(idx, null, this, ref sop, mStack))
  5049. res = (double)((CLRType)t).GetFieldValue(idx, null);
  5050. else
  5051. {
  5052. res = *(double*)&so.Value;
  5053. }
  5054. }
  5055. }
  5056. break;
  5057. default:
  5058. throw new NotImplementedException();
  5059. }
  5060. return res;
  5061. }
  5062. void ArraySetValue(Array arr, object obj, int idx)
  5063. {
  5064. if (obj == null)
  5065. arr.SetValue(null, idx);
  5066. else
  5067. {
  5068. arr.SetValue(arr.GetType().GetElementType().CheckCLRTypes(obj), idx);
  5069. }
  5070. }
  5071. void StoreIntValueToArray(Array arr, StackObject* val, StackObject* idx)
  5072. {
  5073. {
  5074. int[] tmp = arr as int[];
  5075. if (tmp != null)
  5076. {
  5077. tmp[idx->Value] = val->Value;
  5078. return;
  5079. }
  5080. }
  5081. {
  5082. short[] tmp = arr as short[];
  5083. if (tmp != null)
  5084. {
  5085. tmp[idx->Value] = (short)val->Value;
  5086. return;
  5087. }
  5088. }
  5089. {
  5090. byte[] tmp = arr as byte[];
  5091. if (tmp != null)
  5092. {
  5093. tmp[idx->Value] = (byte)val->Value;
  5094. return;
  5095. }
  5096. }
  5097. {
  5098. bool[] tmp = arr as bool[];
  5099. if (tmp != null)
  5100. {
  5101. tmp[idx->Value] = val->Value == 1;
  5102. return;
  5103. }
  5104. }
  5105. {
  5106. uint[] tmp = arr as uint[];
  5107. if (tmp != null)
  5108. {
  5109. tmp[idx->Value] = (uint)val->Value;
  5110. return;
  5111. }
  5112. }
  5113. {
  5114. ushort[] tmp = arr as ushort[];
  5115. if (tmp != null)
  5116. {
  5117. tmp[idx->Value] = (ushort)val->Value;
  5118. return;
  5119. }
  5120. }
  5121. {
  5122. char[] tmp = arr as char[];
  5123. if (tmp != null)
  5124. {
  5125. tmp[idx->Value] = (char)val->Value;
  5126. return;
  5127. }
  5128. }
  5129. {
  5130. sbyte[] tmp = arr as sbyte[];
  5131. if (tmp != null)
  5132. {
  5133. tmp[idx->Value] = (sbyte)val->Value;
  5134. return;
  5135. }
  5136. }
  5137. throw new NotImplementedException();
  5138. }
  5139. ExceptionHandler GetCorrespondingExceptionHandler(ExceptionHandler[] eh, object obj, int addr, ExceptionHandlerType type, bool explicitMatch)
  5140. {
  5141. ExceptionHandler res = null;
  5142. int distance = int.MaxValue;
  5143. Exception ex = obj is ILRuntimeException ? ((ILRuntimeException)obj).InnerException : obj as Exception;
  5144. foreach (var i in eh)
  5145. {
  5146. if (i.HandlerType == type)
  5147. {
  5148. if (addr >= i.TryStart && addr <= i.TryEnd)
  5149. {
  5150. if (CheckExceptionType(i.CatchType, ex, explicitMatch))
  5151. {
  5152. int d = addr - i.TryStart;
  5153. if (d < distance)
  5154. {
  5155. distance = d;
  5156. res = i;
  5157. }
  5158. }
  5159. }
  5160. }
  5161. }
  5162. return res;
  5163. }
  5164. void LoadFromFieldReference(object obj, int idx, StackObject* dst, IList<object> mStack)
  5165. {
  5166. if (obj is ILTypeInstance)
  5167. {
  5168. ((ILTypeInstance)obj).PushToStack(idx, dst, this, mStack);
  5169. }
  5170. else
  5171. {
  5172. CLRType t = AppDomain.GetType(obj.GetType()) as CLRType;
  5173. if (!t.CopyFieldToStack(idx, obj, this, ref dst, mStack))
  5174. ILIntepreter.PushObject(dst, mStack, t.GetFieldValue(idx, obj));
  5175. }
  5176. }
  5177. void StoreValueToFieldReference(ref object obj, int idx, StackObject* val, IList<object> mStack)
  5178. {
  5179. if (obj is ILTypeInstance)
  5180. {
  5181. ((ILTypeInstance)obj).AssignFromStack(idx, val, AppDomain, mStack);
  5182. }
  5183. else
  5184. {
  5185. CLRType t = AppDomain.GetType(obj.GetType()) as CLRType;
  5186. //It's impossible to garantee this field reference is a direct reference, it'll cause problem if it's not
  5187. //if (!t.AssignFieldFromStack(idx, ref obj, this, val, mStack))
  5188. {
  5189. var v = obj.GetType().CheckCLRTypes(CheckAndCloneValueType(StackObject.ToObject(val, AppDomain, mStack), AppDomain));
  5190. t.SetFieldValue(idx, ref obj, v, true);
  5191. }
  5192. }
  5193. }
  5194. void LoadFromArrayReference(object obj, int idx, StackObject* objRef, IType t, IList<object> mStack, int managedIdx = -1)
  5195. {
  5196. var nT = t.TypeForCLR;
  5197. LoadFromArrayReference(obj, idx, objRef, nT, mStack, managedIdx);
  5198. }
  5199. void LoadFromArrayReference(object obj, int idx, StackObject* objRef, Type nT, IList<object> mStack, int managedIdx = -1)
  5200. {
  5201. if (nT.IsPrimitive)
  5202. {
  5203. if (nT == typeof(int))
  5204. {
  5205. int[] arr = obj as int[];
  5206. objRef->ObjectType = ObjectTypes.Integer;
  5207. objRef->Value = arr[idx];
  5208. objRef->ValueLow = 0;
  5209. }
  5210. else if (nT == typeof(short))
  5211. {
  5212. short[] arr = obj as short[];
  5213. objRef->ObjectType = ObjectTypes.Integer;
  5214. objRef->Value = arr[idx];
  5215. objRef->ValueLow = 0;
  5216. }
  5217. else if (nT == typeof(long))
  5218. {
  5219. long[] arr = obj as long[];
  5220. objRef->ObjectType = ObjectTypes.Long;
  5221. *(long*)&objRef->Value = arr[idx];
  5222. }
  5223. else if (nT == typeof(float))
  5224. {
  5225. float[] arr = obj as float[];
  5226. objRef->ObjectType = ObjectTypes.Float;
  5227. *(float*)&objRef->Value = arr[idx];
  5228. objRef->ValueLow = 0;
  5229. }
  5230. else if (nT == typeof(double))
  5231. {
  5232. double[] arr = obj as double[];
  5233. objRef->ObjectType = ObjectTypes.Double;
  5234. *(double*)&objRef->Value = arr[idx];
  5235. }
  5236. else if (nT == typeof(byte))
  5237. {
  5238. byte[] arr = obj as byte[];
  5239. objRef->ObjectType = ObjectTypes.Integer;
  5240. objRef->Value = arr[idx];
  5241. objRef->ValueLow = 0;
  5242. }
  5243. else if (nT == typeof(char))
  5244. {
  5245. char[] arr = obj as char[];
  5246. objRef->ObjectType = ObjectTypes.Integer;
  5247. objRef->Value = arr[idx];
  5248. objRef->ValueLow = 0;
  5249. }
  5250. else if (nT == typeof(uint))
  5251. {
  5252. uint[] arr = obj as uint[];
  5253. objRef->ObjectType = ObjectTypes.Integer;
  5254. *(uint*)&objRef->Value = arr[idx];
  5255. objRef->ValueLow = 0;
  5256. }
  5257. else if (nT == typeof(sbyte))
  5258. {
  5259. sbyte[] arr = obj as sbyte[];
  5260. objRef->ObjectType = ObjectTypes.Integer;
  5261. objRef->Value = arr[idx];
  5262. objRef->ValueLow = 0;
  5263. }
  5264. else if (nT == typeof(ulong))
  5265. {
  5266. ulong[] arr = obj as ulong[];
  5267. objRef->ObjectType = ObjectTypes.Long;
  5268. *(ulong*)&objRef->Value = arr[idx];
  5269. }
  5270. else
  5271. throw new NotImplementedException();
  5272. }
  5273. else
  5274. {
  5275. Array arr = obj as Array;
  5276. objRef->ObjectType = ObjectTypes.Object;
  5277. if (managedIdx >= 0)
  5278. {
  5279. objRef->Value = managedIdx;
  5280. mStack[managedIdx] = arr.GetValue(idx);
  5281. }
  5282. else
  5283. {
  5284. objRef->Value = mStack.Count;
  5285. mStack.Add(arr.GetValue(idx));
  5286. }
  5287. objRef->ValueLow = 0;
  5288. }
  5289. }
  5290. void StoreValueToArrayReference(StackObject* objRef, StackObject* val, IType t, IList<object> mStack)
  5291. {
  5292. var nT = t.TypeForCLR;
  5293. StoreValueToArrayReference(objRef, val, nT, mStack);
  5294. }
  5295. void StoreValueToArrayReference(StackObject* objRef, StackObject* val, Type nT, IList<object> mStack)
  5296. {
  5297. if (nT.IsPrimitive)
  5298. {
  5299. if (nT == typeof(int))
  5300. {
  5301. int[] arr = mStack[objRef->Value] as int[];
  5302. arr[objRef->ValueLow] = val->Value;
  5303. }
  5304. else if (nT == typeof(short))
  5305. {
  5306. short[] arr = mStack[objRef->Value] as short[];
  5307. arr[objRef->ValueLow] = (short)val->Value;
  5308. }
  5309. else if (nT == typeof(long))
  5310. {
  5311. long[] arr = mStack[objRef->Value] as long[];
  5312. arr[objRef->ValueLow] = *(long*)&val->Value;
  5313. }
  5314. else if (nT == typeof(float))
  5315. {
  5316. float[] arr = mStack[objRef->Value] as float[];
  5317. arr[objRef->ValueLow] = *(float*)&val->Value;
  5318. }
  5319. else if (nT == typeof(double))
  5320. {
  5321. double[] arr = mStack[objRef->Value] as double[];
  5322. arr[objRef->ValueLow] = *(double*)&val->Value;
  5323. }
  5324. else if (nT == typeof(byte))
  5325. {
  5326. byte[] arr = mStack[objRef->Value] as byte[];
  5327. arr[objRef->ValueLow] = (byte)val->Value;
  5328. }
  5329. else if (nT == typeof(char))
  5330. {
  5331. char[] arr = mStack[objRef->Value] as char[];
  5332. arr[objRef->ValueLow] = (char)val->Value;
  5333. }
  5334. else if (nT == typeof(uint))
  5335. {
  5336. uint[] arr = mStack[objRef->Value] as uint[];
  5337. arr[objRef->ValueLow] = (uint)val->Value;
  5338. }
  5339. else if (nT == typeof(sbyte))
  5340. {
  5341. sbyte[] arr = mStack[objRef->Value] as sbyte[];
  5342. arr[objRef->ValueLow] = (sbyte)val->Value;
  5343. }
  5344. else
  5345. throw new NotImplementedException();
  5346. }
  5347. else
  5348. {
  5349. Array arr = mStack[objRef->Value] as Array;
  5350. arr.SetValue(StackObject.ToObject(val, domain, mStack), objRef->ValueLow);
  5351. }
  5352. }
  5353. bool CheckExceptionType(IType catchType, object exception, bool explicitMatch)
  5354. {
  5355. if (catchType == null)
  5356. return true;
  5357. if (catchType is CLRType)
  5358. {
  5359. if (explicitMatch)
  5360. return exception.GetType() == catchType.TypeForCLR;
  5361. else
  5362. return catchType.TypeForCLR.IsAssignableFrom(exception.GetType());
  5363. }
  5364. else
  5365. throw new NotImplementedException();
  5366. }
  5367. #if NET_4_6 || NET_STANDARD_2_0
  5368. [System.Runtime.CompilerServices.MethodImpl(System.Runtime.CompilerServices.MethodImplOptions.AggressiveInlining)]
  5369. #endif
  5370. public static StackObject* ResolveReference(StackObject* esp)
  5371. {
  5372. var addr = *(long*)&esp->Value;
  5373. return (StackObject*)addr;
  5374. }
  5375. #if NET_4_6 || NET_STANDARD_2_0
  5376. [System.Runtime.CompilerServices.MethodImpl(System.Runtime.CompilerServices.MethodImplOptions.AggressiveInlining)]
  5377. #endif
  5378. public static StackObject* GetObjectAndResolveReference(StackObject* esp)
  5379. {
  5380. if (esp->ObjectType == ObjectTypes.StackObjectReference)
  5381. {
  5382. return ResolveReference(esp);
  5383. }
  5384. else
  5385. return esp;
  5386. }
  5387. StackObject* PushParameters(IMethod method, StackObject* esp, object[] p, bool useRegister)
  5388. {
  5389. IList<object> mStack = stack.ManagedStack;
  5390. var plist = method.Parameters;
  5391. int pCnt = plist != null ? plist.Count : 0;
  5392. int pCnt2 = p != null ? p.Length : 0;
  5393. if (pCnt != pCnt2)
  5394. throw new ArgumentOutOfRangeException("Parameter mismatch");
  5395. if (pCnt2 > 0)
  5396. {
  5397. for (int i = 0; i < p.Length; i++)
  5398. {
  5399. bool isBox = false;
  5400. if (plist != null && i < plist.Count)
  5401. isBox = plist[i] == AppDomain.ObjectType;
  5402. object obj = p[i];
  5403. if (obj is CrossBindingAdaptorType)
  5404. obj = ((CrossBindingAdaptorType)obj).ILInstance;
  5405. var res = ILIntepreter.PushObject(esp, mStack, obj, isBox);
  5406. if (esp->ObjectType < ObjectTypes.Object && useRegister)
  5407. mStack.Add(null);
  5408. esp = res;
  5409. }
  5410. }
  5411. return esp;
  5412. }
  5413. public void CopyToStack(StackObject* dst, StackObject* src, IList<object> mStack)
  5414. {
  5415. CopyToStack(dst, src, mStack, mStack);
  5416. }
  5417. void CopyToStack(StackObject* dst, StackObject* src, IList<object> mStack, IList<object> dstmStack)
  5418. {
  5419. if (src->ObjectType == ObjectTypes.ValueTypeObjectReference)
  5420. {
  5421. var descriptor = ResolveReference(src);
  5422. var t = domain.GetTypeByIndex(descriptor->Value);
  5423. AllocValueType(dst, t);
  5424. CopyStackValueType(src, dst, mStack, dstmStack);
  5425. }
  5426. else
  5427. {
  5428. *dst = *src;
  5429. if (dst->ObjectType >= ObjectTypes.Object)
  5430. {
  5431. dst->Value = dstmStack.Count;
  5432. var obj = mStack[src->Value];
  5433. dstmStack.Add(obj);
  5434. }
  5435. }
  5436. }
  5437. internal static object CheckAndCloneValueType(object obj, Enviorment.AppDomain domain)
  5438. {
  5439. if (obj != null)
  5440. {
  5441. if (obj is ILTypeInstance)
  5442. {
  5443. ILTypeInstance ins = obj as ILTypeInstance;
  5444. if (ins.IsValueType)
  5445. {
  5446. return ins.Clone();
  5447. }
  5448. }
  5449. else
  5450. {
  5451. var type = obj.GetType();
  5452. var typeFlags = type.GetTypeFlags();
  5453. var isPrimitive = (typeFlags & CLR.Utils.Extensions.TypeFlags.IsPrimitive) != 0;
  5454. var isValueType = (typeFlags & CLR.Utils.Extensions.TypeFlags.IsValueType) != 0;
  5455. if (!isPrimitive && isValueType)
  5456. {
  5457. var t = domain.GetType(type);
  5458. return ((CLRType)t).PerformMemberwiseClone(obj);
  5459. }
  5460. }
  5461. }
  5462. return obj;
  5463. }
  5464. #if NET_4_6 || NET_STANDARD_2_0
  5465. [System.Runtime.CompilerServices.MethodImpl(System.Runtime.CompilerServices.MethodImplOptions.AggressiveInlining)]
  5466. #endif
  5467. public static StackObject* PushOne(StackObject* esp)
  5468. {
  5469. esp->ObjectType = ObjectTypes.Integer;
  5470. esp->Value = 1;
  5471. return esp + 1;
  5472. }
  5473. #if NET_4_6 || NET_STANDARD_2_0
  5474. [System.Runtime.CompilerServices.MethodImpl(System.Runtime.CompilerServices.MethodImplOptions.AggressiveInlining)]
  5475. #endif
  5476. public static StackObject* PushZero(StackObject* esp)
  5477. {
  5478. esp->ObjectType = ObjectTypes.Integer;
  5479. esp->Value = 0;
  5480. return esp + 1;
  5481. }
  5482. #if NET_4_6 || NET_STANDARD_2_0
  5483. [System.Runtime.CompilerServices.MethodImpl(System.Runtime.CompilerServices.MethodImplOptions.AggressiveInlining)]
  5484. #endif
  5485. public static StackObject* PushNull(StackObject* esp)
  5486. {
  5487. esp->ObjectType = ObjectTypes.Null;
  5488. esp->Value = -1;
  5489. esp->ValueLow = 0;
  5490. return esp + 1;
  5491. }
  5492. public static void UnboxObject(StackObject* esp, object obj, IList<object> mStack = null, Enviorment.AppDomain domain = null)
  5493. {
  5494. if (esp->ObjectType == ObjectTypes.ValueTypeObjectReference && domain != null)
  5495. {
  5496. var dst = ILIntepreter.ResolveReference(esp);
  5497. var vt = domain.GetTypeByIndex(dst->Value);
  5498. if (obj == null)//Nothing to do
  5499. return;
  5500. if (obj is ILTypeInstance)
  5501. {
  5502. var ins = (ILTypeInstance)obj;
  5503. ins.CopyValueTypeToStack(dst, mStack);
  5504. }
  5505. else if (obj is CrossBindingAdaptorType)
  5506. {
  5507. var ins = ((CrossBindingAdaptorType)obj).ILInstance;
  5508. ins.CopyValueTypeToStack(dst, mStack);
  5509. }
  5510. else
  5511. {
  5512. ((CLRType)vt).ValueTypeBinder.CopyValueTypeToStack(obj, dst, mStack);
  5513. }
  5514. }
  5515. else if(obj == null)
  5516. {
  5517. return;
  5518. }
  5519. else if (obj is int)
  5520. {
  5521. esp->ObjectType = ObjectTypes.Integer;
  5522. esp->Value = (int)obj;
  5523. }
  5524. else if (obj is bool)
  5525. {
  5526. esp->ObjectType = ObjectTypes.Integer;
  5527. esp->Value = (bool)(obj) ? 1 : 0;
  5528. }
  5529. else if (obj is short)
  5530. {
  5531. esp->ObjectType = ObjectTypes.Integer;
  5532. esp->Value = (short)obj;
  5533. }
  5534. else if (obj is long)
  5535. {
  5536. esp->ObjectType = ObjectTypes.Long;
  5537. *(long*)(&esp->Value) = (long)obj;
  5538. }
  5539. else if (obj is float)
  5540. {
  5541. esp->ObjectType = ObjectTypes.Float;
  5542. *(float*)(&esp->Value) = (float)obj;
  5543. }
  5544. else if (obj is byte)
  5545. {
  5546. esp->ObjectType = ObjectTypes.Integer;
  5547. esp->Value = (byte)obj;
  5548. }
  5549. else if (obj is uint)
  5550. {
  5551. esp->ObjectType = ObjectTypes.Integer;
  5552. esp->Value = (int)(uint)obj;
  5553. }
  5554. else if (obj is ushort)
  5555. {
  5556. esp->ObjectType = ObjectTypes.Integer;
  5557. esp->Value = (int)(ushort)obj;
  5558. }
  5559. else if (obj is char)
  5560. {
  5561. esp->ObjectType = ObjectTypes.Integer;
  5562. esp->Value = (int)(char)obj;
  5563. }
  5564. else if (obj is double)
  5565. {
  5566. esp->ObjectType = ObjectTypes.Double;
  5567. *(double*)(&esp->Value) = (double)obj;
  5568. }
  5569. else if (obj is ulong)
  5570. {
  5571. esp->ObjectType = ObjectTypes.Long;
  5572. *(ulong*)(&esp->Value) = (ulong)obj;
  5573. }
  5574. else if (obj is sbyte)
  5575. {
  5576. esp->ObjectType = ObjectTypes.Integer;
  5577. esp->Value = (sbyte)obj;
  5578. }
  5579. else if (obj is Enum)
  5580. {
  5581. esp->ObjectType = ObjectTypes.Integer;
  5582. esp->Value = Convert.ToInt32(obj);
  5583. }
  5584. else
  5585. throw new NotImplementedException();
  5586. }
  5587. public static StackObject* PushObject(StackObject* esp, IList<object> mStack, object obj, bool isBox = false)
  5588. {
  5589. if (obj != null)
  5590. {
  5591. if (!isBox)
  5592. {
  5593. var typeFlags = obj.GetType().GetTypeFlags();
  5594. if ((typeFlags & CLR.Utils.Extensions.TypeFlags.IsPrimitive) != 0)
  5595. {
  5596. UnboxObject(esp, obj, mStack);
  5597. }
  5598. else if ((typeFlags & CLR.Utils.Extensions.TypeFlags.IsEnum) != 0)
  5599. {
  5600. esp->ObjectType = ObjectTypes.Integer;
  5601. esp->Value = Convert.ToInt32(obj);
  5602. }
  5603. else
  5604. {
  5605. esp->ObjectType = ObjectTypes.Object;
  5606. esp->Value = mStack.Count;
  5607. mStack.Add(obj);
  5608. }
  5609. }
  5610. else
  5611. {
  5612. esp->ObjectType = ObjectTypes.Object;
  5613. esp->Value = mStack.Count;
  5614. mStack.Add(obj);
  5615. }
  5616. }
  5617. else
  5618. {
  5619. if (isBox)
  5620. {
  5621. esp->ObjectType = ObjectTypes.Object;
  5622. esp->Value = mStack.Count;
  5623. mStack.Add(obj);
  5624. }
  5625. else
  5626. return PushNull(esp);
  5627. }
  5628. return esp + 1;
  5629. }
  5630. //Don't ask me why add this funky method for this, otherwise Unity won't calculate the right value
  5631. #if NET_4_6 || NET_STANDARD_2_0
  5632. [System.Runtime.CompilerServices.MethodImpl(System.Runtime.CompilerServices.MethodImplOptions.AggressiveInlining)]
  5633. #endif
  5634. public static StackObject* Add(StackObject* a, int b)
  5635. {
  5636. return (StackObject*)((long)a + sizeof(StackObject) * b);
  5637. }
  5638. #if NET_4_6 || NET_STANDARD_2_0
  5639. [System.Runtime.CompilerServices.MethodImpl(System.Runtime.CompilerServices.MethodImplOptions.AggressiveInlining)]
  5640. #endif
  5641. public static StackObject* Minus(StackObject* a, int b)
  5642. {
  5643. return (StackObject*)((long)a - sizeof(StackObject) * b);
  5644. }
  5645. #if NET_4_6 || NET_STANDARD_2_0
  5646. [System.Runtime.CompilerServices.MethodImpl(System.Runtime.CompilerServices.MethodImplOptions.AggressiveInlining)]
  5647. #endif
  5648. public void Free(StackObject* esp)
  5649. {
  5650. switch (esp->ObjectType)
  5651. {
  5652. case ObjectTypes.Object:
  5653. case ObjectTypes.FieldReference:
  5654. case ObjectTypes.ArrayReference:
  5655. var mStack = stack.ManagedStack;
  5656. if (esp->Value == mStack.Count - 1)
  5657. mStack.RemoveAt(esp->Value);
  5658. break;
  5659. case ObjectTypes.ValueTypeObjectReference:
  5660. FreeStackValueType(esp);
  5661. break;
  5662. }
  5663. #if DEBUG && !DISABLE_ILRUNTIME_DEBUG
  5664. esp->ObjectType = ObjectTypes.Null;
  5665. esp->Value = -1;
  5666. esp->ValueLow = 0;
  5667. #endif
  5668. }
  5669. public void FreeStackValueType(StackObject* esp)
  5670. {
  5671. if (esp->ObjectType == ObjectTypes.ValueTypeObjectReference)
  5672. {
  5673. var addr = ILIntepreter.ResolveReference(esp);
  5674. if (addr <= ValueTypeBasePointer)//Only Stack allocation after base pointer should be freed, local variable are freed automatically
  5675. stack.FreeValueTypeObject(esp);
  5676. esp->ObjectType = ObjectTypes.Null;
  5677. }
  5678. }
  5679. public void AllocValueType(StackObject* ptr, IType type)
  5680. {
  5681. stack.AllocValueType(ptr, type);
  5682. }
  5683. }
  5684. }