zend_jit_x86.dasc 466 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885388638873888388938903891389238933894389538963897389838993900390139023903390439053906390739083909391039113912391339143915391639173918391939203921392239233924392539263927392839293930393139323933393439353936393739383939394039413942394339443945394639473948394939503951395239533954395539563957395839593960396139623963396439653966396739683969397039713972397339743975397639773978397939803981398239833984398539863987398839893990399139923993399439953996399739983999400040014002400340044005400640074008400940104011401240134014401540164017401840194020402140224023402440254026402740284029403040314032403340344035403640374038403940404041404240434044404540464047404840494050405140524053405440554056405740584059406040614062406340644065406640674068406940704071407240734074407540764077407840794080408140824083408440854086408740884089409040914092409340944095409640974098409941004101410241034104410541064107410841094110411141124113411441154116411741184119412041214122412341244125412641274128412941304131413241334134413541364137413841394140414141424143414441454146414741484149415041514152415341544155415641574158415941604161416241634164416541664167416841694170417141724173417441754176417741784179418041814182418341844185418641874188418941904191419241934194419541964197419841994200420142024203420442054206420742084209421042114212421342144215421642174218421942204221422242234224422542264227422842294230423142324233423442354236423742384239424042414242424342444245424642474248424942504251425242534254425542564257425842594260426142624263426442654266426742684269427042714272427342744275427642774278427942804281428242834284428542864287428842894290429142924293429442954296429742984299430043014302430343044305430643074308430943104311431243134314431543164317431843194320432143224323432443254326432743284329433043314332433343344335433643374338433943404341434243434344434543464347434843494350435143524353435443554356435743584359436043614362436343644365436643674368436943704371437243734374437543764377437843794380438143824383438443854386438743884389439043914392439343944395439643974398439944004401440244034404440544064407440844094410441144124413441444154416441744184419442044214422442344244425442644274428442944304431443244334434443544364437443844394440444144424443444444454446444744484449445044514452445344544455445644574458445944604461446244634464446544664467446844694470447144724473447444754476447744784479448044814482448344844485448644874488448944904491449244934494449544964497449844994500450145024503450445054506450745084509451045114512451345144515451645174518451945204521452245234524452545264527452845294530453145324533453445354536453745384539454045414542454345444545454645474548454945504551455245534554455545564557455845594560456145624563456445654566456745684569457045714572457345744575457645774578457945804581458245834584458545864587458845894590459145924593459445954596459745984599460046014602460346044605460646074608460946104611461246134614461546164617461846194620462146224623462446254626462746284629463046314632463346344635463646374638463946404641464246434644464546464647464846494650465146524653465446554656465746584659466046614662466346644665466646674668466946704671467246734674467546764677467846794680468146824683468446854686468746884689469046914692469346944695469646974698469947004701470247034704470547064707470847094710471147124713471447154716471747184719472047214722472347244725472647274728472947304731473247334734473547364737473847394740474147424743474447454746474747484749475047514752475347544755475647574758475947604761476247634764476547664767476847694770477147724773477447754776477747784779478047814782478347844785478647874788478947904791479247934794479547964797479847994800480148024803480448054806480748084809481048114812481348144815481648174818481948204821482248234824482548264827482848294830483148324833483448354836483748384839484048414842484348444845484648474848484948504851485248534854485548564857485848594860486148624863486448654866486748684869487048714872487348744875487648774878487948804881488248834884488548864887488848894890489148924893489448954896489748984899490049014902490349044905490649074908490949104911491249134914491549164917491849194920492149224923492449254926492749284929493049314932493349344935493649374938493949404941494249434944494549464947494849494950495149524953495449554956495749584959496049614962496349644965496649674968496949704971497249734974497549764977497849794980498149824983498449854986498749884989499049914992499349944995499649974998499950005001500250035004500550065007500850095010501150125013501450155016501750185019502050215022502350245025502650275028502950305031503250335034503550365037503850395040504150425043504450455046504750485049505050515052505350545055505650575058505950605061506250635064506550665067506850695070507150725073507450755076507750785079508050815082508350845085508650875088508950905091509250935094509550965097509850995100510151025103510451055106510751085109511051115112511351145115511651175118511951205121512251235124512551265127512851295130513151325133513451355136513751385139514051415142514351445145514651475148514951505151515251535154515551565157515851595160516151625163516451655166516751685169517051715172517351745175517651775178517951805181518251835184518551865187518851895190519151925193519451955196519751985199520052015202520352045205520652075208520952105211521252135214521552165217521852195220522152225223522452255226522752285229523052315232523352345235523652375238523952405241524252435244524552465247524852495250525152525253525452555256525752585259526052615262526352645265526652675268526952705271527252735274527552765277527852795280528152825283528452855286528752885289529052915292529352945295529652975298529953005301530253035304530553065307530853095310531153125313531453155316531753185319532053215322532353245325532653275328532953305331533253335334533553365337533853395340534153425343534453455346534753485349535053515352535353545355535653575358535953605361536253635364536553665367536853695370537153725373537453755376537753785379538053815382538353845385538653875388538953905391539253935394539553965397539853995400540154025403540454055406540754085409541054115412541354145415541654175418541954205421542254235424542554265427542854295430543154325433543454355436543754385439544054415442544354445445544654475448544954505451545254535454545554565457545854595460546154625463546454655466546754685469547054715472547354745475547654775478547954805481548254835484548554865487548854895490549154925493549454955496549754985499550055015502550355045505550655075508550955105511551255135514551555165517551855195520552155225523552455255526552755285529553055315532553355345535553655375538553955405541554255435544554555465547554855495550555155525553555455555556555755585559556055615562556355645565556655675568556955705571557255735574557555765577557855795580558155825583558455855586558755885589559055915592559355945595559655975598559956005601560256035604560556065607560856095610561156125613561456155616561756185619562056215622562356245625562656275628562956305631563256335634563556365637563856395640564156425643564456455646564756485649565056515652565356545655565656575658565956605661566256635664566556665667566856695670567156725673567456755676567756785679568056815682568356845685568656875688568956905691569256935694569556965697569856995700570157025703570457055706570757085709571057115712571357145715571657175718571957205721572257235724572557265727572857295730573157325733573457355736573757385739574057415742574357445745574657475748574957505751575257535754575557565757575857595760576157625763576457655766576757685769577057715772577357745775577657775778577957805781578257835784578557865787578857895790579157925793579457955796579757985799580058015802580358045805580658075808580958105811581258135814581558165817581858195820582158225823582458255826582758285829583058315832583358345835583658375838583958405841584258435844584558465847584858495850585158525853585458555856585758585859586058615862586358645865586658675868586958705871587258735874587558765877587858795880588158825883588458855886588758885889589058915892589358945895589658975898589959005901590259035904590559065907590859095910591159125913591459155916591759185919592059215922592359245925592659275928592959305931593259335934593559365937593859395940594159425943594459455946594759485949595059515952595359545955595659575958595959605961596259635964596559665967596859695970597159725973597459755976597759785979598059815982598359845985598659875988598959905991599259935994599559965997599859996000600160026003600460056006600760086009601060116012601360146015601660176018601960206021602260236024602560266027602860296030603160326033603460356036603760386039604060416042604360446045604660476048604960506051605260536054605560566057605860596060606160626063606460656066606760686069607060716072607360746075607660776078607960806081608260836084608560866087608860896090609160926093609460956096609760986099610061016102610361046105610661076108610961106111611261136114611561166117611861196120612161226123612461256126612761286129613061316132613361346135613661376138613961406141614261436144614561466147614861496150615161526153615461556156615761586159616061616162616361646165616661676168616961706171617261736174617561766177617861796180618161826183618461856186618761886189619061916192619361946195619661976198619962006201620262036204620562066207620862096210621162126213621462156216621762186219622062216222622362246225622662276228622962306231623262336234623562366237623862396240624162426243624462456246624762486249625062516252625362546255625662576258625962606261626262636264626562666267626862696270627162726273627462756276627762786279628062816282628362846285628662876288628962906291629262936294629562966297629862996300630163026303630463056306630763086309631063116312631363146315631663176318631963206321632263236324632563266327632863296330633163326333633463356336633763386339634063416342634363446345634663476348634963506351635263536354635563566357635863596360636163626363636463656366636763686369637063716372637363746375637663776378637963806381638263836384638563866387638863896390639163926393639463956396639763986399640064016402640364046405640664076408640964106411641264136414641564166417641864196420642164226423642464256426642764286429643064316432643364346435643664376438643964406441644264436444644564466447644864496450645164526453645464556456645764586459646064616462646364646465646664676468646964706471647264736474647564766477647864796480648164826483648464856486648764886489649064916492649364946495649664976498649965006501650265036504650565066507650865096510651165126513651465156516651765186519652065216522652365246525652665276528652965306531653265336534653565366537653865396540654165426543654465456546654765486549655065516552655365546555655665576558655965606561656265636564656565666567656865696570657165726573657465756576657765786579658065816582658365846585658665876588658965906591659265936594659565966597659865996600660166026603660466056606660766086609661066116612661366146615661666176618661966206621662266236624662566266627662866296630663166326633663466356636663766386639664066416642664366446645664666476648664966506651665266536654665566566657665866596660666166626663666466656666666766686669667066716672667366746675667666776678667966806681668266836684668566866687668866896690669166926693669466956696669766986699670067016702670367046705670667076708670967106711671267136714671567166717671867196720672167226723672467256726672767286729673067316732673367346735673667376738673967406741674267436744674567466747674867496750675167526753675467556756675767586759676067616762676367646765676667676768676967706771677267736774677567766777677867796780678167826783678467856786678767886789679067916792679367946795679667976798679968006801680268036804680568066807680868096810681168126813681468156816681768186819682068216822682368246825682668276828682968306831683268336834683568366837683868396840684168426843684468456846684768486849685068516852685368546855685668576858685968606861686268636864686568666867686868696870687168726873687468756876687768786879688068816882688368846885688668876888688968906891689268936894689568966897689868996900690169026903690469056906690769086909691069116912691369146915691669176918691969206921692269236924692569266927692869296930693169326933693469356936693769386939694069416942694369446945694669476948694969506951695269536954695569566957695869596960696169626963696469656966696769686969697069716972697369746975697669776978697969806981698269836984698569866987698869896990699169926993699469956996699769986999700070017002700370047005700670077008700970107011701270137014701570167017701870197020702170227023702470257026702770287029703070317032703370347035703670377038703970407041704270437044704570467047704870497050705170527053705470557056705770587059706070617062706370647065706670677068706970707071707270737074707570767077707870797080708170827083708470857086708770887089709070917092709370947095709670977098709971007101710271037104710571067107710871097110711171127113711471157116711771187119712071217122712371247125712671277128712971307131713271337134713571367137713871397140714171427143714471457146714771487149715071517152715371547155715671577158715971607161716271637164716571667167716871697170717171727173717471757176717771787179718071817182718371847185718671877188718971907191719271937194719571967197719871997200720172027203720472057206720772087209721072117212721372147215721672177218721972207221722272237224722572267227722872297230723172327233723472357236723772387239724072417242724372447245724672477248724972507251725272537254725572567257725872597260726172627263726472657266726772687269727072717272727372747275727672777278727972807281728272837284728572867287728872897290729172927293729472957296729772987299730073017302730373047305730673077308730973107311731273137314731573167317731873197320732173227323732473257326732773287329733073317332733373347335733673377338733973407341734273437344734573467347734873497350735173527353735473557356735773587359736073617362736373647365736673677368736973707371737273737374737573767377737873797380738173827383738473857386738773887389739073917392739373947395739673977398739974007401740274037404740574067407740874097410741174127413741474157416741774187419742074217422742374247425742674277428742974307431743274337434743574367437743874397440744174427443744474457446744774487449745074517452745374547455745674577458745974607461746274637464746574667467746874697470747174727473747474757476747774787479748074817482748374847485748674877488748974907491749274937494749574967497749874997500750175027503750475057506750775087509751075117512751375147515751675177518751975207521752275237524752575267527752875297530753175327533753475357536753775387539754075417542754375447545754675477548754975507551755275537554755575567557755875597560756175627563756475657566756775687569757075717572757375747575757675777578757975807581758275837584758575867587758875897590759175927593759475957596759775987599760076017602760376047605760676077608760976107611761276137614761576167617761876197620762176227623762476257626762776287629763076317632763376347635763676377638763976407641764276437644764576467647764876497650765176527653765476557656765776587659766076617662766376647665766676677668766976707671767276737674767576767677767876797680768176827683768476857686768776887689769076917692769376947695769676977698769977007701770277037704770577067707770877097710771177127713771477157716771777187719772077217722772377247725772677277728772977307731773277337734773577367737773877397740774177427743774477457746774777487749775077517752775377547755775677577758775977607761776277637764776577667767776877697770777177727773777477757776777777787779778077817782778377847785778677877788778977907791779277937794779577967797779877997800780178027803780478057806780778087809781078117812781378147815781678177818781978207821782278237824782578267827782878297830783178327833783478357836783778387839784078417842784378447845784678477848784978507851785278537854785578567857785878597860786178627863786478657866786778687869787078717872787378747875787678777878787978807881788278837884788578867887788878897890789178927893789478957896789778987899790079017902790379047905790679077908790979107911791279137914791579167917791879197920792179227923792479257926792779287929793079317932793379347935793679377938793979407941794279437944794579467947794879497950795179527953795479557956795779587959796079617962796379647965796679677968796979707971797279737974797579767977797879797980798179827983798479857986798779887989799079917992799379947995799679977998799980008001800280038004800580068007800880098010801180128013801480158016801780188019802080218022802380248025802680278028802980308031803280338034803580368037803880398040804180428043804480458046804780488049805080518052805380548055805680578058805980608061806280638064806580668067806880698070807180728073807480758076807780788079808080818082808380848085808680878088808980908091809280938094809580968097809880998100810181028103810481058106810781088109811081118112811381148115811681178118811981208121812281238124812581268127812881298130813181328133813481358136813781388139814081418142814381448145814681478148814981508151815281538154815581568157815881598160816181628163816481658166816781688169817081718172817381748175817681778178817981808181818281838184818581868187818881898190819181928193819481958196819781988199820082018202820382048205820682078208820982108211821282138214821582168217821882198220822182228223822482258226822782288229823082318232823382348235823682378238823982408241824282438244824582468247824882498250825182528253825482558256825782588259826082618262826382648265826682678268826982708271827282738274827582768277827882798280828182828283828482858286828782888289829082918292829382948295829682978298829983008301830283038304830583068307830883098310831183128313831483158316831783188319832083218322832383248325832683278328832983308331833283338334833583368337833883398340834183428343834483458346834783488349835083518352835383548355835683578358835983608361836283638364836583668367836883698370837183728373837483758376837783788379838083818382838383848385838683878388838983908391839283938394839583968397839883998400840184028403840484058406840784088409841084118412841384148415841684178418841984208421842284238424842584268427842884298430843184328433843484358436843784388439844084418442844384448445844684478448844984508451845284538454845584568457845884598460846184628463846484658466846784688469847084718472847384748475847684778478847984808481848284838484848584868487848884898490849184928493849484958496849784988499850085018502850385048505850685078508850985108511851285138514851585168517851885198520852185228523852485258526852785288529853085318532853385348535853685378538853985408541854285438544854585468547854885498550855185528553855485558556855785588559856085618562856385648565856685678568856985708571857285738574857585768577857885798580858185828583858485858586858785888589859085918592859385948595859685978598859986008601860286038604860586068607860886098610861186128613861486158616861786188619862086218622862386248625862686278628862986308631863286338634863586368637863886398640864186428643864486458646864786488649865086518652865386548655865686578658865986608661866286638664866586668667866886698670867186728673867486758676867786788679868086818682868386848685868686878688868986908691869286938694869586968697869886998700870187028703870487058706870787088709871087118712871387148715871687178718871987208721872287238724872587268727872887298730873187328733873487358736873787388739874087418742874387448745874687478748874987508751875287538754875587568757875887598760876187628763876487658766876787688769877087718772877387748775877687778778877987808781878287838784878587868787878887898790879187928793879487958796879787988799880088018802880388048805880688078808880988108811881288138814881588168817881888198820882188228823882488258826882788288829883088318832883388348835883688378838883988408841884288438844884588468847884888498850885188528853885488558856885788588859886088618862886388648865886688678868886988708871887288738874887588768877887888798880888188828883888488858886888788888889889088918892889388948895889688978898889989008901890289038904890589068907890889098910891189128913891489158916891789188919892089218922892389248925892689278928892989308931893289338934893589368937893889398940894189428943894489458946894789488949895089518952895389548955895689578958895989608961896289638964896589668967896889698970897189728973897489758976897789788979898089818982898389848985898689878988898989908991899289938994899589968997899889999000900190029003900490059006900790089009901090119012901390149015901690179018901990209021902290239024902590269027902890299030903190329033903490359036903790389039904090419042904390449045904690479048904990509051905290539054905590569057905890599060906190629063906490659066906790689069907090719072907390749075907690779078907990809081908290839084908590869087908890899090909190929093909490959096909790989099910091019102910391049105910691079108910991109111911291139114911591169117911891199120912191229123912491259126912791289129913091319132913391349135913691379138913991409141914291439144914591469147914891499150915191529153915491559156915791589159916091619162916391649165916691679168916991709171917291739174917591769177917891799180918191829183918491859186918791889189919091919192919391949195919691979198919992009201920292039204920592069207920892099210921192129213921492159216921792189219922092219222922392249225922692279228922992309231923292339234923592369237923892399240924192429243924492459246924792489249925092519252925392549255925692579258925992609261926292639264926592669267926892699270927192729273927492759276927792789279928092819282928392849285928692879288928992909291929292939294929592969297929892999300930193029303930493059306930793089309931093119312931393149315931693179318931993209321932293239324932593269327932893299330933193329333933493359336933793389339934093419342934393449345934693479348934993509351935293539354935593569357935893599360936193629363936493659366936793689369937093719372937393749375937693779378937993809381938293839384938593869387938893899390939193929393939493959396939793989399940094019402940394049405940694079408940994109411941294139414941594169417941894199420942194229423942494259426942794289429943094319432943394349435943694379438943994409441944294439444944594469447944894499450945194529453945494559456945794589459946094619462946394649465946694679468946994709471947294739474947594769477947894799480948194829483948494859486948794889489949094919492949394949495949694979498949995009501950295039504950595069507950895099510951195129513951495159516951795189519952095219522952395249525952695279528952995309531953295339534953595369537953895399540954195429543954495459546954795489549955095519552955395549555955695579558955995609561956295639564956595669567956895699570957195729573957495759576957795789579958095819582958395849585958695879588958995909591959295939594959595969597959895999600960196029603960496059606960796089609961096119612961396149615961696179618961996209621962296239624962596269627962896299630963196329633963496359636963796389639964096419642964396449645964696479648964996509651965296539654965596569657965896599660966196629663966496659666966796689669967096719672967396749675967696779678967996809681968296839684968596869687968896899690969196929693969496959696969796989699970097019702970397049705970697079708970997109711971297139714971597169717971897199720972197229723972497259726972797289729973097319732973397349735973697379738973997409741974297439744974597469747974897499750975197529753975497559756975797589759976097619762976397649765976697679768976997709771977297739774977597769777977897799780978197829783978497859786978797889789979097919792979397949795979697979798979998009801980298039804980598069807980898099810981198129813981498159816981798189819982098219822982398249825982698279828982998309831983298339834983598369837983898399840984198429843984498459846984798489849985098519852985398549855985698579858985998609861986298639864986598669867986898699870987198729873987498759876987798789879988098819882988398849885988698879888988998909891989298939894989598969897989898999900990199029903990499059906990799089909991099119912991399149915991699179918991999209921992299239924992599269927992899299930993199329933993499359936993799389939994099419942994399449945994699479948994999509951995299539954995599569957995899599960996199629963996499659966996799689969997099719972997399749975997699779978997999809981998299839984998599869987998899899990999199929993999499959996999799989999100001000110002100031000410005100061000710008100091001010011100121001310014100151001610017100181001910020100211002210023100241002510026100271002810029100301003110032100331003410035100361003710038100391004010041100421004310044100451004610047100481004910050100511005210053100541005510056100571005810059100601006110062100631006410065100661006710068100691007010071100721007310074100751007610077100781007910080100811008210083100841008510086100871008810089100901009110092100931009410095100961009710098100991010010101101021010310104101051010610107101081010910110101111011210113101141011510116101171011810119101201012110122101231012410125101261012710128101291013010131101321013310134101351013610137101381013910140101411014210143101441014510146101471014810149101501015110152101531015410155101561015710158101591016010161101621016310164101651016610167101681016910170101711017210173101741017510176101771017810179101801018110182101831018410185101861018710188101891019010191101921019310194101951019610197101981019910200102011020210203102041020510206102071020810209102101021110212102131021410215102161021710218102191022010221102221022310224102251022610227102281022910230102311023210233102341023510236102371023810239102401024110242102431024410245102461024710248102491025010251102521025310254102551025610257102581025910260102611026210263102641026510266102671026810269102701027110272102731027410275102761027710278102791028010281102821028310284102851028610287102881028910290102911029210293102941029510296102971029810299103001030110302103031030410305103061030710308103091031010311103121031310314103151031610317103181031910320103211032210323103241032510326103271032810329103301033110332103331033410335103361033710338103391034010341103421034310344103451034610347103481034910350103511035210353103541035510356103571035810359103601036110362103631036410365103661036710368103691037010371103721037310374103751037610377103781037910380103811038210383103841038510386103871038810389103901039110392103931039410395103961039710398103991040010401104021040310404104051040610407104081040910410104111041210413104141041510416104171041810419104201042110422104231042410425104261042710428104291043010431104321043310434104351043610437104381043910440104411044210443104441044510446104471044810449104501045110452104531045410455104561045710458104591046010461104621046310464104651046610467104681046910470104711047210473104741047510476104771047810479104801048110482104831048410485104861048710488104891049010491104921049310494104951049610497104981049910500105011050210503105041050510506105071050810509105101051110512105131051410515105161051710518105191052010521105221052310524105251052610527105281052910530105311053210533105341053510536105371053810539105401054110542105431054410545105461054710548105491055010551105521055310554105551055610557105581055910560105611056210563105641056510566105671056810569105701057110572105731057410575105761057710578105791058010581105821058310584105851058610587105881058910590105911059210593105941059510596105971059810599106001060110602106031060410605106061060710608106091061010611106121061310614106151061610617106181061910620106211062210623106241062510626106271062810629106301063110632106331063410635106361063710638106391064010641106421064310644106451064610647106481064910650106511065210653106541065510656106571065810659106601066110662106631066410665106661066710668106691067010671106721067310674106751067610677106781067910680106811068210683106841068510686106871068810689106901069110692106931069410695106961069710698106991070010701107021070310704107051070610707107081070910710107111071210713107141071510716107171071810719107201072110722107231072410725107261072710728107291073010731107321073310734107351073610737107381073910740107411074210743107441074510746107471074810749107501075110752107531075410755107561075710758107591076010761107621076310764107651076610767107681076910770107711077210773107741077510776107771077810779107801078110782107831078410785107861078710788107891079010791107921079310794107951079610797107981079910800108011080210803108041080510806108071080810809108101081110812108131081410815108161081710818108191082010821108221082310824108251082610827108281082910830108311083210833108341083510836108371083810839108401084110842108431084410845108461084710848108491085010851108521085310854108551085610857108581085910860108611086210863108641086510866108671086810869108701087110872108731087410875108761087710878108791088010881108821088310884108851088610887108881088910890108911089210893108941089510896108971089810899109001090110902109031090410905109061090710908109091091010911109121091310914109151091610917109181091910920109211092210923109241092510926109271092810929109301093110932109331093410935109361093710938109391094010941109421094310944109451094610947109481094910950109511095210953109541095510956109571095810959109601096110962109631096410965109661096710968109691097010971109721097310974109751097610977109781097910980109811098210983109841098510986109871098810989109901099110992109931099410995109961099710998109991100011001110021100311004110051100611007110081100911010110111101211013110141101511016110171101811019110201102111022110231102411025110261102711028110291103011031110321103311034110351103611037110381103911040110411104211043110441104511046110471104811049110501105111052110531105411055110561105711058110591106011061110621106311064110651106611067110681106911070110711107211073110741107511076110771107811079110801108111082110831108411085110861108711088110891109011091110921109311094110951109611097110981109911100111011110211103111041110511106111071110811109111101111111112111131111411115111161111711118111191112011121111221112311124111251112611127111281112911130111311113211133111341113511136111371113811139111401114111142111431114411145111461114711148111491115011151111521115311154111551115611157111581115911160111611116211163111641116511166111671116811169111701117111172111731117411175111761117711178111791118011181111821118311184111851118611187111881118911190111911119211193111941119511196111971119811199112001120111202112031120411205112061120711208112091121011211112121121311214112151121611217112181121911220112211122211223112241122511226112271122811229112301123111232112331123411235112361123711238112391124011241112421124311244112451124611247112481124911250112511125211253112541125511256112571125811259112601126111262112631126411265112661126711268112691127011271112721127311274112751127611277112781127911280112811128211283112841128511286112871128811289112901129111292112931129411295112961129711298112991130011301113021130311304113051130611307113081130911310113111131211313113141131511316113171131811319113201132111322113231132411325113261132711328113291133011331113321133311334113351133611337113381133911340113411134211343113441134511346113471134811349113501135111352113531135411355113561135711358113591136011361113621136311364113651136611367113681136911370113711137211373113741137511376113771137811379113801138111382113831138411385113861138711388113891139011391113921139311394113951139611397113981139911400114011140211403114041140511406114071140811409114101141111412114131141411415114161141711418114191142011421114221142311424114251142611427114281142911430114311143211433114341143511436114371143811439114401144111442114431144411445114461144711448114491145011451114521145311454114551145611457114581145911460114611146211463114641146511466114671146811469114701147111472114731147411475114761147711478114791148011481114821148311484114851148611487114881148911490114911149211493114941149511496114971149811499115001150111502115031150411505115061150711508115091151011511115121151311514115151151611517115181151911520115211152211523115241152511526115271152811529115301153111532115331153411535115361153711538115391154011541115421154311544115451154611547115481154911550115511155211553115541155511556115571155811559115601156111562115631156411565115661156711568115691157011571115721157311574115751157611577115781157911580115811158211583115841158511586115871158811589115901159111592115931159411595115961159711598115991160011601116021160311604116051160611607116081160911610116111161211613116141161511616116171161811619116201162111622116231162411625116261162711628116291163011631116321163311634116351163611637116381163911640116411164211643116441164511646116471164811649116501165111652116531165411655116561165711658116591166011661116621166311664116651166611667116681166911670116711167211673116741167511676116771167811679116801168111682116831168411685116861168711688116891169011691116921169311694116951169611697116981169911700117011170211703117041170511706117071170811709117101171111712117131171411715117161171711718117191172011721117221172311724117251172611727117281172911730117311173211733117341173511736117371173811739117401174111742117431174411745117461174711748117491175011751117521175311754117551175611757117581175911760117611176211763117641176511766117671176811769117701177111772117731177411775117761177711778117791178011781117821178311784117851178611787117881178911790117911179211793117941179511796117971179811799118001180111802118031180411805118061180711808118091181011811118121181311814118151181611817118181181911820118211182211823118241182511826118271182811829118301183111832118331183411835118361183711838118391184011841118421184311844118451184611847118481184911850118511185211853118541185511856118571185811859118601186111862118631186411865118661186711868118691187011871118721187311874118751187611877118781187911880118811188211883118841188511886118871188811889118901189111892118931189411895118961189711898118991190011901119021190311904119051190611907119081190911910119111191211913119141191511916119171191811919119201192111922119231192411925119261192711928119291193011931119321193311934119351193611937119381193911940119411194211943119441194511946119471194811949119501195111952119531195411955119561195711958119591196011961119621196311964119651196611967119681196911970119711197211973119741197511976119771197811979119801198111982119831198411985119861198711988119891199011991119921199311994119951199611997119981199912000120011200212003120041200512006120071200812009120101201112012120131201412015120161201712018120191202012021120221202312024120251202612027120281202912030120311203212033120341203512036120371203812039120401204112042120431204412045120461204712048120491205012051120521205312054120551205612057120581205912060120611206212063120641206512066120671206812069120701207112072120731207412075120761207712078120791208012081120821208312084120851208612087120881208912090120911209212093120941209512096120971209812099121001210112102121031210412105121061210712108121091211012111121121211312114121151211612117121181211912120121211212212123121241212512126121271212812129121301213112132121331213412135121361213712138121391214012141121421214312144121451214612147121481214912150121511215212153121541215512156121571215812159121601216112162121631216412165121661216712168121691217012171121721217312174121751217612177121781217912180121811218212183121841218512186121871218812189121901219112192121931219412195121961219712198121991220012201122021220312204122051220612207122081220912210122111221212213122141221512216122171221812219122201222112222122231222412225122261222712228122291223012231122321223312234122351223612237122381223912240122411224212243122441224512246122471224812249122501225112252122531225412255122561225712258122591226012261122621226312264122651226612267122681226912270122711227212273122741227512276122771227812279122801228112282122831228412285122861228712288122891229012291122921229312294122951229612297122981229912300123011230212303123041230512306123071230812309123101231112312123131231412315123161231712318123191232012321123221232312324123251232612327123281232912330123311233212333123341233512336123371233812339123401234112342123431234412345123461234712348123491235012351123521235312354123551235612357123581235912360123611236212363123641236512366123671236812369123701237112372123731237412375123761237712378123791238012381123821238312384123851238612387123881238912390123911239212393123941239512396123971239812399124001240112402124031240412405124061240712408124091241012411124121241312414124151241612417124181241912420124211242212423124241242512426124271242812429124301243112432124331243412435124361243712438124391244012441124421244312444124451244612447124481244912450124511245212453124541245512456124571245812459124601246112462124631246412465124661246712468124691247012471124721247312474124751247612477124781247912480124811248212483124841248512486124871248812489124901249112492124931249412495124961249712498124991250012501125021250312504125051250612507125081250912510125111251212513125141251512516125171251812519125201252112522125231252412525125261252712528125291253012531125321253312534125351253612537125381253912540125411254212543125441254512546125471254812549125501255112552125531255412555125561255712558125591256012561125621256312564125651256612567125681256912570125711257212573125741257512576125771257812579125801258112582125831258412585125861258712588125891259012591125921259312594125951259612597125981259912600126011260212603126041260512606126071260812609126101261112612126131261412615126161261712618126191262012621126221262312624126251262612627126281262912630126311263212633126341263512636126371263812639126401264112642126431264412645126461264712648126491265012651126521265312654126551265612657126581265912660126611266212663126641266512666126671266812669126701267112672126731267412675126761267712678126791268012681126821268312684126851268612687126881268912690126911269212693126941269512696126971269812699127001270112702127031270412705127061270712708127091271012711127121271312714127151271612717127181271912720127211272212723127241272512726127271272812729127301273112732127331273412735127361273712738127391274012741127421274312744127451274612747127481274912750127511275212753127541275512756127571275812759127601276112762127631276412765127661276712768127691277012771127721277312774127751277612777127781277912780127811278212783127841278512786127871278812789127901279112792127931279412795127961279712798127991280012801128021280312804128051280612807128081280912810128111281212813128141281512816128171281812819128201282112822128231282412825128261282712828128291283012831128321283312834128351283612837128381283912840128411284212843128441284512846128471284812849128501285112852128531285412855128561285712858128591286012861128621286312864128651286612867128681286912870128711287212873128741287512876128771287812879128801288112882128831288412885128861288712888128891289012891128921289312894128951289612897128981289912900129011290212903129041290512906129071290812909129101291112912129131291412915129161291712918129191292012921129221292312924129251292612927129281292912930129311293212933129341293512936129371293812939129401294112942129431294412945129461294712948129491295012951129521295312954129551295612957129581295912960129611296212963129641296512966129671296812969129701297112972129731297412975129761297712978129791298012981129821298312984129851298612987129881298912990129911299212993129941299512996129971299812999130001300113002130031300413005130061300713008130091301013011130121301313014130151301613017130181301913020130211302213023130241302513026130271302813029130301303113032130331303413035130361303713038130391304013041130421304313044130451304613047130481304913050130511305213053130541305513056130571305813059130601306113062130631306413065130661306713068130691307013071130721307313074130751307613077130781307913080130811308213083130841308513086130871308813089130901309113092130931309413095130961309713098130991310013101131021310313104131051310613107131081310913110131111311213113131141311513116131171311813119131201312113122131231312413125131261312713128131291313013131131321313313134131351313613137131381313913140131411314213143131441314513146131471314813149131501315113152131531315413155131561315713158131591316013161131621316313164131651316613167131681316913170131711317213173131741317513176131771317813179131801318113182131831318413185131861318713188131891319013191131921319313194131951319613197131981319913200132011320213203132041320513206132071320813209132101321113212132131321413215132161321713218132191322013221132221322313224132251322613227132281322913230132311323213233132341323513236132371323813239132401324113242132431324413245132461324713248132491325013251132521325313254132551325613257132581325913260132611326213263132641326513266132671326813269132701327113272132731327413275132761327713278132791328013281132821328313284132851328613287132881328913290132911329213293132941329513296132971329813299133001330113302133031330413305133061330713308133091331013311133121331313314133151331613317133181331913320133211332213323133241332513326133271332813329133301333113332133331333413335133361333713338133391334013341133421334313344133451334613347133481334913350133511335213353133541335513356133571335813359133601336113362133631336413365133661336713368133691337013371133721337313374133751337613377133781337913380133811338213383133841338513386133871338813389133901339113392133931339413395133961339713398133991340013401134021340313404134051340613407134081340913410134111341213413134141341513416134171341813419134201342113422134231342413425134261342713428134291343013431134321343313434134351343613437134381343913440134411344213443134441344513446134471344813449134501345113452134531345413455134561345713458134591346013461134621346313464134651346613467134681346913470134711347213473134741347513476134771347813479134801348113482134831348413485134861348713488134891349013491134921349313494134951349613497134981349913500135011350213503135041350513506135071350813509135101351113512135131351413515135161351713518135191352013521135221352313524135251352613527135281352913530135311353213533135341353513536135371353813539135401354113542135431354413545135461354713548135491355013551135521355313554135551355613557135581355913560135611356213563135641356513566135671356813569135701357113572135731357413575135761357713578135791358013581135821358313584135851358613587135881358913590135911359213593135941359513596135971359813599136001360113602136031360413605136061360713608136091361013611136121361313614136151361613617136181361913620136211362213623136241362513626136271362813629136301363113632136331363413635136361363713638136391364013641136421364313644136451364613647136481364913650136511365213653136541365513656136571365813659136601366113662136631366413665136661366713668136691367013671136721367313674136751367613677136781367913680136811368213683136841368513686136871368813689136901369113692136931369413695136961369713698136991370013701137021370313704137051370613707137081370913710137111371213713137141371513716137171371813719137201372113722137231372413725137261372713728137291373013731137321373313734137351373613737137381373913740137411374213743137441374513746137471374813749137501375113752137531375413755137561375713758137591376013761137621376313764137651376613767137681376913770137711377213773137741377513776137771377813779137801378113782137831378413785137861378713788137891379013791137921379313794137951379613797137981379913800138011380213803138041380513806138071380813809138101381113812138131381413815138161381713818138191382013821138221382313824138251382613827138281382913830138311383213833138341383513836138371383813839138401384113842138431384413845138461384713848138491385013851138521385313854138551385613857138581385913860138611386213863138641386513866138671386813869138701387113872138731387413875138761387713878138791388013881138821388313884138851388613887138881388913890138911389213893138941389513896138971389813899139001390113902139031390413905139061390713908139091391013911139121391313914139151391613917139181391913920139211392213923139241392513926139271392813929139301393113932139331393413935139361393713938139391394013941139421394313944139451394613947139481394913950139511395213953139541395513956139571395813959139601396113962139631396413965139661396713968139691397013971139721397313974139751397613977139781397913980139811398213983139841398513986139871398813989139901399113992139931399413995139961399713998139991400014001140021400314004140051400614007140081400914010140111401214013140141401514016140171401814019140201402114022140231402414025140261402714028140291403014031140321403314034140351403614037140381403914040140411404214043140441404514046140471404814049140501405114052140531405414055140561405714058140591406014061140621406314064140651406614067140681406914070140711407214073140741407514076140771407814079140801408114082140831408414085140861408714088140891409014091140921409314094140951409614097140981409914100141011410214103141041410514106141071410814109141101411114112141131411414115141161411714118141191412014121141221412314124141251412614127141281412914130141311413214133141341413514136141371413814139141401414114142141431414414145141461414714148141491415014151141521415314154141551415614157141581415914160141611416214163141641416514166141671416814169141701417114172141731417414175141761417714178141791418014181141821418314184141851418614187141881418914190141911419214193141941419514196141971419814199142001420114202142031420414205142061420714208142091421014211142121421314214142151421614217142181421914220142211422214223142241422514226142271422814229142301423114232142331423414235142361423714238142391424014241142421424314244142451424614247142481424914250142511425214253142541425514256142571425814259142601426114262142631426414265142661426714268142691427014271142721427314274142751427614277142781427914280142811428214283142841428514286142871428814289142901429114292142931429414295142961429714298142991430014301143021430314304143051430614307143081430914310143111431214313143141431514316143171431814319143201432114322143231432414325143261432714328143291433014331143321433314334143351433614337143381433914340143411434214343143441434514346143471434814349143501435114352143531435414355143561435714358143591436014361143621436314364143651436614367143681436914370143711437214373143741437514376143771437814379143801438114382143831438414385143861438714388143891439014391143921439314394143951439614397143981439914400144011440214403144041440514406144071440814409144101441114412144131441414415144161441714418144191442014421144221442314424144251442614427144281442914430144311443214433144341443514436144371443814439144401444114442144431444414445144461444714448144491445014451144521445314454144551445614457144581445914460144611446214463144641446514466144671446814469144701447114472144731447414475144761447714478144791448014481144821448314484144851448614487144881448914490144911449214493144941449514496144971449814499145001450114502145031450414505145061450714508145091451014511145121451314514145151451614517145181451914520145211452214523145241452514526145271452814529145301453114532145331453414535145361453714538145391454014541145421454314544145451454614547145481454914550145511455214553145541455514556145571455814559145601456114562145631456414565145661456714568145691457014571145721457314574145751457614577145781457914580145811458214583145841458514586145871458814589145901459114592145931459414595145961459714598145991460014601146021460314604146051460614607146081460914610146111461214613146141461514616146171461814619146201462114622146231462414625146261462714628146291463014631146321463314634146351463614637146381463914640146411464214643146441464514646146471464814649146501465114652146531465414655146561465714658146591466014661146621466314664146651466614667146681466914670146711467214673146741467514676146771467814679146801468114682146831468414685146861468714688146891469014691146921469314694146951469614697146981469914700147011470214703147041470514706147071470814709147101471114712147131471414715147161471714718147191472014721147221472314724147251472614727147281472914730147311473214733147341473514736147371473814739147401474114742147431474414745147461474714748147491475014751147521475314754147551475614757147581475914760147611476214763147641476514766147671476814769147701477114772147731477414775147761477714778147791478014781147821478314784147851478614787147881478914790147911479214793147941479514796147971479814799148001480114802148031480414805148061480714808148091481014811148121481314814148151481614817148181481914820148211482214823148241482514826148271482814829148301483114832148331483414835148361483714838148391484014841148421484314844148451484614847148481484914850148511485214853148541485514856148571485814859148601486114862148631486414865148661486714868148691487014871148721487314874148751487614877148781487914880148811488214883148841488514886148871488814889148901489114892148931489414895148961489714898148991490014901149021490314904149051490614907149081490914910149111491214913149141491514916149171491814919149201492114922149231492414925149261492714928149291493014931149321493314934149351493614937149381493914940149411494214943149441494514946149471494814949149501495114952149531495414955149561495714958149591496014961149621496314964149651496614967149681496914970149711497214973149741497514976149771497814979149801498114982149831498414985149861498714988149891499014991149921499314994149951499614997149981499915000150011500215003150041500515006150071500815009150101501115012150131501415015150161501715018150191502015021150221502315024150251502615027150281502915030150311503215033150341503515036150371503815039150401504115042150431504415045150461504715048150491505015051150521505315054150551505615057150581505915060150611506215063150641506515066150671506815069150701507115072150731507415075150761507715078150791508015081150821508315084150851508615087150881508915090150911509215093150941509515096150971509815099151001510115102151031510415105151061510715108151091511015111151121511315114151151511615117151181511915120151211512215123151241512515126151271512815129151301513115132151331513415135151361513715138151391514015141151421514315144151451514615147151481514915150151511515215153151541515515156151571515815159151601516115162151631516415165151661516715168151691517015171151721517315174151751517615177151781517915180151811518215183151841518515186151871518815189151901519115192151931519415195151961519715198151991520015201152021520315204152051520615207152081520915210152111521215213152141521515216152171521815219152201522115222152231522415225152261522715228152291523015231152321523315234152351523615237152381523915240152411524215243152441524515246152471524815249152501525115252152531525415255152561525715258152591526015261152621526315264152651526615267152681526915270152711527215273152741527515276152771527815279152801528115282152831528415285152861528715288152891529015291152921529315294152951529615297152981529915300153011530215303153041530515306153071530815309153101531115312153131531415315153161531715318153191532015321153221532315324153251532615327153281532915330153311533215333153341533515336153371533815339153401534115342153431534415345153461534715348153491535015351153521535315354153551535615357153581535915360153611536215363153641536515366153671536815369153701537115372153731537415375153761537715378153791538015381153821538315384153851538615387153881538915390153911539215393153941539515396153971539815399154001540115402154031540415405154061540715408154091541015411154121541315414154151541615417154181541915420154211542215423154241542515426154271542815429154301543115432154331543415435154361543715438154391544015441154421544315444154451544615447154481544915450154511545215453154541545515456154571545815459154601546115462154631546415465154661546715468154691547015471154721547315474154751547615477154781547915480154811548215483154841548515486154871548815489154901549115492154931549415495154961549715498154991550015501155021550315504155051550615507155081550915510155111551215513155141551515516155171551815519155201552115522155231552415525155261552715528155291553015531155321553315534155351553615537155381553915540155411554215543155441554515546155471554815549155501555115552155531555415555155561555715558155591556015561155621556315564155651556615567155681556915570155711557215573155741557515576155771557815579155801558115582155831558415585155861558715588155891559015591155921559315594155951559615597155981559915600156011560215603156041560515606156071560815609156101561115612156131561415615156161561715618156191562015621156221562315624156251562615627156281562915630156311563215633156341563515636156371563815639156401564115642156431564415645156461564715648156491565015651156521565315654156551565615657156581565915660156611566215663156641566515666156671566815669156701567115672156731567415675156761567715678156791568015681156821568315684156851568615687156881568915690156911569215693156941569515696156971569815699157001570115702157031570415705157061570715708157091571015711157121571315714157151571615717157181571915720157211572215723157241572515726157271572815729157301573115732157331573415735157361573715738157391574015741157421574315744157451574615747157481574915750157511575215753157541575515756157571575815759157601576115762157631576415765157661576715768157691577015771157721577315774157751577615777157781577915780157811578215783157841578515786157871578815789157901579115792157931579415795157961579715798157991580015801158021580315804158051580615807158081580915810158111581215813158141581515816158171581815819158201582115822158231582415825158261582715828158291583015831158321583315834158351583615837158381583915840158411584215843158441584515846158471584815849158501585115852158531585415855158561585715858158591586015861158621586315864158651586615867158681586915870158711587215873158741587515876158771587815879158801588115882158831588415885158861588715888158891589015891158921589315894158951589615897158981589915900159011590215903159041590515906159071590815909159101591115912159131591415915159161591715918159191592015921159221592315924159251592615927159281592915930159311593215933159341593515936159371593815939159401594115942159431594415945159461594715948159491595015951159521595315954159551595615957159581595915960159611596215963159641596515966159671596815969159701597115972159731597415975159761597715978159791598015981159821598315984159851598615987159881598915990159911599215993159941599515996159971599815999160001600116002160031600416005160061600716008160091601016011160121601316014160151601616017160181601916020160211602216023160241602516026160271602816029160301603116032160331603416035160361603716038160391604016041160421604316044160451604616047160481604916050160511605216053160541605516056160571605816059160601606116062160631606416065160661606716068160691607016071160721607316074160751607616077160781607916080160811608216083160841608516086160871608816089160901609116092160931609416095160961609716098160991610016101161021610316104161051610616107161081610916110161111611216113161141611516116161171611816119161201612116122161231612416125161261612716128161291613016131161321613316134161351613616137161381613916140161411614216143161441614516146161471614816149161501615116152161531615416155161561615716158161591616016161161621616316164161651616616167161681616916170161711617216173161741617516176161771617816179161801618116182161831618416185161861618716188161891619016191161921619316194161951619616197161981619916200162011620216203162041620516206162071620816209162101621116212162131621416215162161621716218162191622016221162221622316224162251622616227162281622916230162311623216233162341623516236162371623816239162401624116242162431624416245162461624716248162491625016251162521625316254162551625616257162581625916260162611626216263162641626516266162671626816269162701627116272162731627416275162761627716278162791628016281162821628316284162851628616287162881628916290162911629216293162941629516296162971629816299163001630116302163031630416305163061630716308163091631016311163121631316314163151631616317163181631916320163211632216323163241632516326163271632816329163301633116332163331633416335163361633716338163391634016341163421634316344163451634616347163481634916350163511635216353163541635516356163571635816359163601636116362163631636416365163661636716368163691637016371163721637316374163751637616377163781637916380163811638216383163841638516386163871638816389163901639116392163931639416395163961639716398163991640016401164021640316404164051640616407164081640916410164111641216413164141641516416
  1. /*
  2. * +----------------------------------------------------------------------+
  3. * | Zend JIT |
  4. * +----------------------------------------------------------------------+
  5. * | Copyright (c) The PHP Group |
  6. * +----------------------------------------------------------------------+
  7. * | This source file is subject to version 3.01 of the PHP license, |
  8. * | that is bundled with this package in the file LICENSE, and is |
  9. * | available through the world-wide-web at the following url: |
  10. * | https://www.php.net/license/3_01.txt |
  11. * | If you did not receive a copy of the PHP license and are unable to |
  12. * | obtain it through the world-wide-web, please send a note to |
  13. * | license@php.net so we can mail you a copy immediately. |
  14. * +----------------------------------------------------------------------+
  15. * | Authors: Dmitry Stogov <dmitry@php.net> |
  16. * | Xinchen Hui <laruence@php.net> |
  17. * +----------------------------------------------------------------------+
  18. */
  19. |.if X64
  20. |.arch x64
  21. |.else
  22. |.arch x86
  23. |.endif
  24. |.if X64WIN
  25. |.define FP, r14
  26. |.define IP, r15
  27. |.define IPl, r15d
  28. |.define RX, r15 // the same as VM IP reused as a general purpose reg
  29. |.define CARG1, rcx // x64/POSIX C call arguments.
  30. |.define CARG2, rdx
  31. |.define CARG3, r8
  32. |.define CARG4, r9
  33. |.define CARG1d, ecx
  34. |.define CARG2d, edx
  35. |.define CARG3d, r8d
  36. |.define CARG4d, r9d
  37. |.define FCARG1a, CARG1 // Simulate x86 fastcall.
  38. |.define FCARG2a, CARG2
  39. |.define FCARG1d, CARG1d
  40. |.define FCARG2d, CARG2d
  41. |.define SPAD, 0x58 // padding for CPU stack alignment
  42. |.define NR_SPAD, 0x58 // padding for CPU stack alignment
  43. |.define T3, [r4+0x50] // Used to store old value of IP
  44. |.define T2, [r4+0x48] // Used to store old value of FP
  45. |.define T1, [r4+0x40]
  46. |.define A6, [r4+0x28] // preallocated slot for 6-th argument
  47. |.define A5, [r4+0x20] // preallocated slot for 5-th argument
  48. |.elif X64
  49. |.define FP, r14
  50. |.define IP, r15
  51. |.define IPl, r15d
  52. |.define RX, r15 // the same as VM IP reused as a general purpose reg
  53. |.define CARG1, rdi // x64/POSIX C call arguments.
  54. |.define CARG2, rsi
  55. |.define CARG3, rdx
  56. |.define CARG4, rcx
  57. |.define CARG5, r8
  58. |.define CARG6, r9
  59. |.define CARG1d, edi
  60. |.define CARG2d, esi
  61. |.define CARG3d, edx
  62. |.define CARG4d, ecx
  63. |.define CARG5d, r8d
  64. |.define CARG6d, r9d
  65. |.define FCARG1a, CARG1 // Simulate x86 fastcall.
  66. |.define FCARG2a, CARG2
  67. |.define FCARG1d, CARG1d
  68. |.define FCARG2d, CARG2d
  69. |.define SPAD, 0x18 // padding for CPU stack alignment
  70. |.define NR_SPAD, 0x28 // padding for CPU stack alignment
  71. |.define T3, [r4+0x20] // Used to store old value of IP (CALL VM only)
  72. |.define T2, [r4+0x18] // Used to store old value of FP (CALL VM only)
  73. |.define T1, [r4]
  74. |.else
  75. |.define FP, esi
  76. |.define IP, edi
  77. |.define IPl, edi
  78. |.define RX, edi // the same as VM IP reused as a general purpose reg
  79. |.define FCARG1a, ecx // x86 fastcall arguments.
  80. |.define FCARG2a, edx
  81. |.define FCARG1d, ecx
  82. |.define FCARG2d, edx
  83. |.define SPAD, 0x1c // padding for CPU stack alignment
  84. |.define NR_SPAD, 0x1c // padding for CPU stack alignment
  85. |.define T3, [r4+0x18] // Used to store old value of IP (CALL VM only)
  86. |.define T2, [r4+0x14] // Used to store old value of FP (CALL VM only)
  87. |.define T1, [r4]
  88. |.define A4, [r4+0xC] // preallocated slots for arguments of "cdecl" functions (intersect with T1)
  89. |.define A3, [r4+0x8]
  90. |.define A2, [r4+0x4]
  91. |.define A1, [r4]
  92. |.endif
  93. |.define HYBRID_SPAD, 16 // padding for stack alignment
  94. #ifdef _WIN64
  95. # define TMP_ZVAL_OFFSET 0x20
  96. #else
  97. # define TMP_ZVAL_OFFSET 0
  98. #endif
  99. #define DASM_ALIGNMENT 16
  100. /* According to x86 and x86_64 ABI, CPU stack has to be 16 byte aligned to
  101. * guarantee proper alignment of 128-bit SSE data allocated on stack.
  102. * With broken alignment any execution of SSE code, including calls to
  103. * memcpy() and others, may lead to crash.
  104. */
  105. const char* zend_reg_name[] = {
  106. #if defined(__x86_64__) || defined(_M_X64)
  107. "rax", "rcx", "rdx", "rbx", "rsp", "rbp", "rsi", "rdi",
  108. "r8", "r9", "r10", "r11", "r12", "r13", "r14", "r15",
  109. "xmm0", "xmm1", "xmm2", "xmm3", "xmm4", "xmm5", "xmm6", "xmm7",
  110. "xmm8", "xmm9", "xmm10", "xmm11", "xmm12", "xmm13", "xmm14", "xmm15"
  111. #else
  112. "rax", "rcx", "rdx", "rbx", "rsp", "rbp", "rsi", "rdi",
  113. "xmm0", "xmm1", "xmm2", "xmm3", "xmm4", "xmm5", "xmm6", "xmm7"
  114. #endif
  115. };
  116. /* Simulate x86 fastcall */
  117. #ifdef _WIN64
  118. # define ZREG_FCARG1 ZREG_RCX
  119. # define ZREG_FCARG2 ZREG_RDX
  120. #elif defined(__x86_64__)
  121. # define ZREG_FCARG1 ZREG_RDI
  122. # define ZREG_FCARG2 ZREG_RSI
  123. #else
  124. # define ZREG_FCARG1 ZREG_RCX
  125. # define ZREG_FCARG2 ZREG_RDX
  126. #endif
  127. |.type EX, zend_execute_data, FP
  128. |.type OP, zend_op
  129. |.type ZVAL, zval
  130. |.actionlist dasm_actions
  131. |.globals zend_lb
  132. |.section code, cold_code, jmp_table
  133. static void* dasm_labels[zend_lb_MAX];
  134. #if ZTS
  135. static size_t tsrm_ls_cache_tcb_offset = 0;
  136. static size_t tsrm_tls_index;
  137. static size_t tsrm_tls_offset;
  138. #endif
  139. #define IS_32BIT(addr) (((uintptr_t)(addr)) <= 0x7fffffff)
  140. #define IS_SIGNED_32BIT(val) ((((intptr_t)(val)) <= 0x7fffffff) && (((intptr_t)(val)) >= (-2147483647 - 1)))
  141. /* Call range is before or after 2GB */
  142. #define MAY_USE_32BIT_ADDR(addr) \
  143. (IS_SIGNED_32BIT((char*)(addr) - (char*)dasm_buf) && \
  144. IS_SIGNED_32BIT((char*)(addr) - (char*)dasm_end))
  145. #define CAN_USE_AVX() (JIT_G(opt_flags) & allowed_opt_flags & ZEND_JIT_CPU_AVX)
  146. /* Not Implemented Yet */
  147. |.macro NIY
  148. || //ZEND_ASSERT(0);
  149. | int3
  150. |.endmacro
  151. |.macro NIY_STUB
  152. || //ZEND_ASSERT(0);
  153. | int3
  154. |.endmacro
  155. |.macro ADD_HYBRID_SPAD
  156. ||#ifndef ZEND_VM_HYBRID_JIT_RED_ZONE_SIZE
  157. | add r4, HYBRID_SPAD
  158. ||#endif
  159. |.endmacro
  160. |.macro SUB_HYBRID_SPAD
  161. ||#ifndef ZEND_VM_HYBRID_JIT_RED_ZONE_SIZE
  162. | sub r4, HYBRID_SPAD
  163. ||#endif
  164. |.endmacro
  165. |.macro LOAD_ADDR, reg, addr
  166. | .if X64
  167. || if (IS_SIGNED_32BIT(addr)) {
  168. | mov reg, ((ptrdiff_t)addr) // 0x48 0xc7 0xc0 <imm-32-bit>
  169. || } else {
  170. | mov64 reg, ((ptrdiff_t)addr) // 0x48 0xb8 <imm-64-bit>
  171. || }
  172. | .else
  173. | mov reg, ((ptrdiff_t)addr)
  174. | .endif
  175. |.endmacro
  176. |.macro LOAD_TSRM_CACHE, reg
  177. | .if X64WIN
  178. | gs
  179. | mov reg, aword [0x58]
  180. | mov reg, aword [reg+tsrm_tls_index]
  181. | mov reg, aword [reg+tsrm_tls_offset]
  182. | .elif WIN
  183. | fs
  184. | mov reg, aword [0x2c]
  185. | mov reg, aword [reg+tsrm_tls_index]
  186. | mov reg, aword [reg+tsrm_tls_offset]
  187. | .elif X64APPLE
  188. | gs
  189. || if (tsrm_ls_cache_tcb_offset) {
  190. | mov reg, aword [tsrm_ls_cache_tcb_offset]
  191. || } else {
  192. | mov reg, aword [tsrm_tls_index]
  193. | mov reg, aword [reg+tsrm_tls_offset]
  194. || }
  195. | .elif X64
  196. | fs
  197. || if (tsrm_ls_cache_tcb_offset) {
  198. | mov reg, aword [tsrm_ls_cache_tcb_offset]
  199. || } else {
  200. | mov reg, [0x8]
  201. | mov reg, aword [reg+tsrm_tls_index]
  202. | mov reg, aword [reg+tsrm_tls_offset]
  203. || }
  204. | .else
  205. | gs
  206. || if (tsrm_ls_cache_tcb_offset) {
  207. | mov reg, aword [tsrm_ls_cache_tcb_offset]
  208. || } else {
  209. | mov reg, [0x4]
  210. | mov reg, aword [reg+tsrm_tls_index]
  211. | mov reg, aword [reg+tsrm_tls_offset]
  212. || }
  213. | .endif
  214. |.endmacro
  215. |.macro LOAD_ADDR_ZTS, reg, struct, field
  216. | .if ZTS
  217. | LOAD_TSRM_CACHE reg
  218. | lea reg, aword [reg + (struct.._offset + offsetof(zend_..struct, field))]
  219. | .else
  220. | LOAD_ADDR reg, &struct.field
  221. | .endif
  222. |.endmacro
  223. |.macro PUSH_ADDR, addr, tmp_reg
  224. | .if X64
  225. || if (IS_SIGNED_32BIT(addr)) {
  226. | push ((ptrdiff_t)addr)
  227. || } else {
  228. | mov64 tmp_reg, ((ptrdiff_t)addr)
  229. | push tmp_reg
  230. || }
  231. | .else
  232. | push ((ptrdiff_t)addr)
  233. | .endif
  234. |.endmacro
  235. |.macro ADDR_STORE, mem, addr, tmp_reg
  236. | .if X64
  237. || if (IS_SIGNED_32BIT(addr)) {
  238. | mov mem, ((ptrdiff_t)addr)
  239. || } else {
  240. | mov64 tmp_reg, ((ptrdiff_t)addr)
  241. | mov mem, tmp_reg
  242. || }
  243. | .else
  244. | mov mem, ((ptrdiff_t)addr)
  245. | .endif
  246. |.endmacro
  247. |.macro ADDR_CMP, mem, addr, tmp_reg
  248. | .if X64
  249. || if (IS_SIGNED_32BIT(addr)) {
  250. | cmp mem, ((ptrdiff_t)addr)
  251. || } else {
  252. | mov64 tmp_reg, ((ptrdiff_t)addr)
  253. | cmp mem, tmp_reg
  254. || }
  255. | .else
  256. | cmp mem, ((ptrdiff_t)addr)
  257. | .endif
  258. |.endmacro
  259. |.macro PUSH_ADDR_ZTS, struct, field, tmp_reg
  260. | .if ZTS
  261. | LOAD_TSRM_CACHE tmp_reg
  262. | lea tmp_reg, aword [tmp_reg + (struct.._offset + offsetof(zend_..struct, field))]
  263. | push tmp_reg
  264. | .else
  265. | PUSH_ADDR &struct.field, tmp_reg
  266. | .endif
  267. |.endmacro
  268. |.macro _MEM_OP, mem_ins, prefix, addr, op2, tmp_reg
  269. | .if X64
  270. || if (IS_SIGNED_32BIT(addr)) {
  271. | mem_ins prefix [addr], op2
  272. || } else {
  273. | mov64 tmp_reg, ((ptrdiff_t)addr)
  274. | mem_ins prefix [tmp_reg], op2
  275. || }
  276. | .else
  277. | mem_ins prefix [addr], op2
  278. | .endif
  279. |.endmacro
  280. |.macro MEM_LOAD_OP, mem_ins, reg, prefix, addr, tmp_reg
  281. | .if X64
  282. || if (IS_SIGNED_32BIT(addr)) {
  283. | mem_ins reg, prefix [addr]
  284. || } else {
  285. | mov64 tmp_reg, ((ptrdiff_t)addr)
  286. | mem_ins reg, prefix [tmp_reg]
  287. || }
  288. | .else
  289. | mem_ins reg, prefix [addr]
  290. | .endif
  291. |.endmacro
  292. |.macro MEM_LOAD, op1, prefix, addr, tmp_reg
  293. | MEM_LOAD_OP mov, op1, prefix, addr, tmp_reg
  294. |.endmacro
  295. |.macro _MEM_OP_ZTS, mem_ins, prefix, struct, field, op2, tmp_reg
  296. | .if ZTS
  297. | LOAD_TSRM_CACHE tmp_reg
  298. | mem_ins prefix [tmp_reg+(struct.._offset+offsetof(zend_..struct, field))], op2
  299. | .else
  300. | _MEM_OP mem_ins, prefix, &struct.field, op2, tmp_reg
  301. | .endif
  302. |.endmacro
  303. |.macro MEM_STORE_ZTS, prefix, struct, field, op2, tmp_reg
  304. | _MEM_OP_ZTS mov, prefix, struct, field, op2, tmp_reg
  305. |.endmacro
  306. |.macro MEM_CMP_ZTS, prefix, struct, field, op2, tmp_reg
  307. | _MEM_OP_ZTS cmp, prefix, struct, field, op2, tmp_reg
  308. |.endmacro
  309. |.macro MEM_UPDATE_ZTS, mem_ins, prefix, struct, field, op2, tmp_reg
  310. | _MEM_OP_ZTS mem_ins, prefix, struct, field, op2, tmp_reg
  311. |.endmacro
  312. |.macro MEM_LOAD_OP_ZTS, mem_ins, reg, prefix, struct, field, tmp_reg
  313. | .if ZTS
  314. | LOAD_TSRM_CACHE tmp_reg
  315. | mem_ins reg, prefix [tmp_reg+(struct.._offset+offsetof(zend_..struct, field))]
  316. | .else
  317. | MEM_LOAD_OP mem_ins, reg, prefix, &struct.field, tmp_reg
  318. | .endif
  319. |.endmacro
  320. |.macro MEM_LOAD_ZTS, reg, prefix, struct, field, tmp_reg
  321. | MEM_LOAD_OP_ZTS mov, reg, prefix, struct, field, tmp_reg
  322. |.endmacro
  323. |.macro EXT_CALL, func, tmp_reg
  324. | .if X64
  325. || if (MAY_USE_32BIT_ADDR(func)) {
  326. | call qword &func
  327. || } else {
  328. | LOAD_ADDR tmp_reg, func
  329. | call tmp_reg
  330. || }
  331. | .else
  332. | call dword &func
  333. | .endif
  334. |.endmacro
  335. |.macro EXT_JMP, func, tmp_reg
  336. | .if X64
  337. || if (MAY_USE_32BIT_ADDR(func)) {
  338. | jmp qword &func
  339. || } else {
  340. | LOAD_ADDR tmp_reg, func
  341. | jmp tmp_reg
  342. || }
  343. | .else
  344. | jmp dword &func
  345. | .endif
  346. |.endmacro
  347. |.macro SAVE_IP
  348. || if (GCC_GLOBAL_REGS) {
  349. | mov aword EX->opline, IP
  350. || }
  351. |.endmacro
  352. |.macro LOAD_IP
  353. || if (GCC_GLOBAL_REGS) {
  354. | mov IP, aword EX->opline
  355. || }
  356. |.endmacro
  357. |.macro LOAD_IP_ADDR, addr
  358. || if (GCC_GLOBAL_REGS) {
  359. | LOAD_ADDR IP, addr
  360. || } else {
  361. | ADDR_STORE aword EX->opline, addr, RX
  362. || }
  363. |.endmacro
  364. |.macro LOAD_IP_ADDR_ZTS, struct, field
  365. | .if ZTS
  366. || if (GCC_GLOBAL_REGS) {
  367. | LOAD_TSRM_CACHE IP
  368. | mov IP, aword [IP + (struct.._offset + offsetof(zend_..struct, field))]
  369. || } else {
  370. | LOAD_TSRM_CACHE RX
  371. | lea RX, aword [RX + (struct.._offset + offsetof(zend_..struct, field))]
  372. | mov aword EX->opline, RX
  373. || }
  374. | .else
  375. | LOAD_IP_ADDR &struct.field
  376. | .endif
  377. |.endmacro
  378. |.macro GET_IP, reg
  379. || if (GCC_GLOBAL_REGS) {
  380. | mov reg, IP
  381. || } else {
  382. | mov reg, aword EX->opline
  383. || }
  384. |.endmacro
  385. |.macro ADD_IP, val
  386. || if (GCC_GLOBAL_REGS) {
  387. | add IP, val
  388. || } else {
  389. | add aword EX->opline, val
  390. || }
  391. |.endmacro
  392. |.macro JMP_IP
  393. || if (GCC_GLOBAL_REGS) {
  394. | jmp aword [IP]
  395. || } else {
  396. | mov r0, aword EX:FCARG1a->opline
  397. | jmp aword [r0]
  398. || }
  399. |.endmacro
  400. /* In 64-bit build we compare only low 32-bits.
  401. * x86_64 cmp instruction doesn't support immediate 64-bit operand, and full
  402. * comparison would require an additional load of 64-bit address into register.
  403. * This is not a problem at all, while JIT buffer size is less than 4GB.
  404. */
  405. |.macro CMP_IP, addr
  406. || if (GCC_GLOBAL_REGS) {
  407. | cmp IPl, addr
  408. || } else {
  409. | cmp dword EX->opline, addr
  410. || }
  411. |.endmacro
  412. |.macro LOAD_ZVAL_ADDR, reg, addr
  413. || if (Z_MODE(addr) == IS_CONST_ZVAL) {
  414. | LOAD_ADDR reg, Z_ZV(addr)
  415. || } else if (Z_MODE(addr) == IS_MEM_ZVAL) {
  416. || if (Z_OFFSET(addr)) {
  417. | lea reg, qword [Ra(Z_REG(addr))+Z_OFFSET(addr)]
  418. || } else {
  419. | mov reg, Ra(Z_REG(addr))
  420. || }
  421. || } else {
  422. || ZEND_UNREACHABLE();
  423. || }
  424. |.endmacro
  425. |.macro PUSH_ZVAL_ADDR, addr, tmp_reg
  426. || if (Z_MODE(addr) == IS_CONST_ZVAL) {
  427. | PUSH_ADDR Z_ZV(addr), tmp_reg
  428. || } else if (Z_MODE(addr) == IS_MEM_ZVAL) {
  429. || if (Z_OFFSET(addr)) {
  430. | lea tmp_reg, qword [Ra(Z_REG(addr))+Z_OFFSET(addr)]
  431. | push tmp_reg
  432. || } else {
  433. | push Ra(Z_REG(addr))
  434. || }
  435. || } else {
  436. || ZEND_UNREACHABLE();
  437. || }
  438. |.endmacro
  439. |.macro GET_Z_TYPE_INFO, reg, zv
  440. | mov reg, dword [zv+offsetof(zval,u1.type_info)]
  441. |.endmacro
  442. |.macro SET_Z_TYPE_INFO, zv, type
  443. | mov dword [zv+offsetof(zval,u1.type_info)], type
  444. |.endmacro
  445. |.macro GET_ZVAL_TYPE, reg, addr
  446. || ZEND_ASSERT(Z_MODE(addr) == IS_MEM_ZVAL);
  447. | mov reg, byte [Ra(Z_REG(addr))+Z_OFFSET(addr)+offsetof(zval,u1.v.type)]
  448. |.endmacro
  449. |.macro GET_ZVAL_TYPE_INFO, reg, addr
  450. || ZEND_ASSERT(Z_MODE(addr) == IS_MEM_ZVAL);
  451. | mov reg, dword [Ra(Z_REG(addr))+Z_OFFSET(addr)+offsetof(zval,u1.type_info)]
  452. |.endmacro
  453. |.macro SET_ZVAL_TYPE_INFO, addr, type
  454. || ZEND_ASSERT(Z_MODE(addr) == IS_MEM_ZVAL);
  455. | mov dword [Ra(Z_REG(addr))+Z_OFFSET(addr)+offsetof(zval,u1.type_info)], type
  456. |.endmacro
  457. |.macro GET_Z_PTR, reg, zv
  458. | mov reg, aword [zv]
  459. |.endmacro
  460. |.macro GET_Z_W2, reg, zv
  461. | mov reg, dword [zv+4]
  462. |.endmacro
  463. |.macro SET_Z_W2, zv, reg
  464. | mov dword [zv+4], reg
  465. |.endmacro
  466. |.macro GET_ZVAL_PTR, reg, addr
  467. || ZEND_ASSERT(Z_MODE(addr) == IS_MEM_ZVAL);
  468. | mov reg, aword [Ra(Z_REG(addr))+Z_OFFSET(addr)]
  469. |.endmacro
  470. |.macro SET_ZVAL_PTR, addr, val
  471. || ZEND_ASSERT(Z_MODE(addr) == IS_MEM_ZVAL);
  472. | mov aword [Ra(Z_REG(addr))+Z_OFFSET(addr)], val
  473. |.endmacro
  474. |.macro GET_ZVAL_W2, reg, addr
  475. || ZEND_ASSERT(Z_MODE(addr) == IS_MEM_ZVAL);
  476. | mov reg, dword [Ra(Z_REG(addr))+Z_OFFSET(addr)+4]
  477. |.endmacro
  478. |.macro SET_ZVAL_W2, addr, val
  479. || ZEND_ASSERT(Z_MODE(addr) == IS_MEM_ZVAL);
  480. | mov dword [Ra(Z_REG(addr))+Z_OFFSET(addr)+4], val
  481. |.endmacro
  482. |.macro UNDEF_OPLINE_RESULT
  483. | mov r0, EX->opline
  484. | mov eax, dword OP:r0->result.var
  485. | SET_Z_TYPE_INFO FP + r0, IS_UNDEF
  486. |.endmacro
  487. |.macro UNDEF_OPLINE_RESULT_IF_USED
  488. | test byte OP:RX->result_type, (IS_TMP_VAR|IS_VAR)
  489. | jz >1
  490. | mov eax, dword OP:RX->result.var
  491. | SET_Z_TYPE_INFO FP + r0, IS_UNDEF
  492. |1:
  493. |.endmacro
  494. |.macro SSE_AVX_INS, sse_ins, avx_ins, op1, op2
  495. || if (CAN_USE_AVX()) {
  496. | avx_ins op1, op2
  497. || } else {
  498. | sse_ins op1, op2
  499. || }
  500. |.endmacro
  501. |.macro SSE_OP, sse_ins, reg, addr, tmp_reg
  502. || if (Z_MODE(addr) == IS_CONST_ZVAL) {
  503. | MEM_LOAD_OP sse_ins, xmm(reg-ZREG_XMM0), qword, Z_ZV(addr), tmp_reg
  504. || } else if (Z_MODE(addr) == IS_MEM_ZVAL) {
  505. | sse_ins xmm(reg-ZREG_XMM0), qword [Ra(Z_REG(addr))+Z_OFFSET(addr)]
  506. || } else if (Z_MODE(addr) == IS_REG) {
  507. | sse_ins xmm(reg-ZREG_XMM0), xmm(Z_REG(addr)-ZREG_XMM0)
  508. || } else {
  509. || ZEND_UNREACHABLE();
  510. || }
  511. |.endmacro
  512. |.macro DOUBLE_CMP, reg, addr
  513. || if (Z_MODE(addr) == IS_CONST_ZVAL) {
  514. | .if X64
  515. || if (IS_SIGNED_32BIT(Z_ZV(addr))) {
  516. | SSE_AVX_INS ucomisd, vucomisd, xmm(reg-ZREG_XMM0), qword [Z_ZV(addr)]
  517. || } else {
  518. | LOAD_ADDR r0, Z_ZV(addr)
  519. | SSE_AVX_INS ucomisd, vucomisd, xmm(reg-ZREG_XMM0), qword [r0]
  520. || }
  521. | .else
  522. | SSE_AVX_INS ucomisd, vucomisd, xmm(reg-ZREG_XMM0), qword [Z_ZV(addr)]
  523. | .endif
  524. || } else if (Z_MODE(addr) == IS_MEM_ZVAL) {
  525. | SSE_AVX_INS ucomisd, vucomisd, xmm(reg-ZREG_XMM0), qword [Ra(Z_REG(addr))+Z_OFFSET(addr)]
  526. || } else if (Z_MODE(addr) == IS_REG) {
  527. | SSE_AVX_INS ucomisd, vucomisd, xmm(reg-ZREG_XMM0), xmm(Z_REG(addr)-ZREG_XMM0)
  528. || } else {
  529. || ZEND_UNREACHABLE();
  530. || }
  531. |.endmacro
  532. |.macro DOUBLE_GET_LONG, reg, lval, tmp_reg
  533. || if (lval == 0) {
  534. || if (CAN_USE_AVX()) {
  535. | vxorps xmm(reg-ZREG_XMM0), xmm(reg-ZREG_XMM0), xmm(reg-ZREG_XMM0)
  536. || } else {
  537. | xorps xmm(reg-ZREG_XMM0), xmm(reg-ZREG_XMM0)
  538. || }
  539. || } else {
  540. |.if X64
  541. || if (!IS_SIGNED_32BIT(lval)) {
  542. | mov64 Ra(tmp_reg), lval
  543. || } else {
  544. | mov Ra(tmp_reg), lval
  545. || }
  546. |.else
  547. | mov Ra(tmp_reg), lval
  548. |.endif
  549. || if (CAN_USE_AVX()) {
  550. | vxorps xmm(reg-ZREG_XMM0), xmm(reg-ZREG_XMM0), xmm(reg-ZREG_XMM0)
  551. | vcvtsi2sd, xmm(reg-ZREG_XMM0), xmm(reg-ZREG_XMM0), Ra(tmp_reg)
  552. || } else {
  553. | xorps xmm(reg-ZREG_XMM0), xmm(reg-ZREG_XMM0)
  554. | cvtsi2sd, xmm(reg-ZREG_XMM0), Ra(tmp_reg)
  555. || }
  556. || }
  557. |.endmacro
  558. |.macro DOUBLE_GET_ZVAL_LVAL, reg, addr, tmp_reg
  559. || if (Z_MODE(addr) == IS_CONST_ZVAL) {
  560. | DOUBLE_GET_LONG reg, Z_LVAL_P(Z_ZV(addr)), tmp_reg
  561. || } else if (Z_MODE(addr) == IS_MEM_ZVAL) {
  562. || if (CAN_USE_AVX()) {
  563. | vxorps xmm(reg-ZREG_XMM0), xmm(reg-ZREG_XMM0), xmm(reg-ZREG_XMM0)
  564. | vcvtsi2sd xmm(reg-ZREG_XMM0), xmm(reg-ZREG_XMM0), aword [Ra(Z_REG(addr))+Z_OFFSET(addr)]
  565. || } else {
  566. | xorps xmm(reg-ZREG_XMM0), xmm(reg-ZREG_XMM0)
  567. | cvtsi2sd xmm(reg-ZREG_XMM0), aword [Ra(Z_REG(addr))+Z_OFFSET(addr)]
  568. || }
  569. || } else if (Z_MODE(addr) == IS_REG) {
  570. || if (CAN_USE_AVX()) {
  571. | vxorps xmm(reg-ZREG_XMM0), xmm(reg-ZREG_XMM0), xmm(reg-ZREG_XMM0)
  572. | vcvtsi2sd xmm(reg-ZREG_XMM0), xmm(reg-ZREG_XMM0), Ra(Z_REG(addr))
  573. || } else {
  574. | xorps xmm(reg-ZREG_XMM0), xmm(reg-ZREG_XMM0)
  575. | cvtsi2sd xmm(reg-ZREG_XMM0), Ra(Z_REG(addr))
  576. || }
  577. || } else {
  578. || ZEND_UNREACHABLE();
  579. || }
  580. |.endmacro
  581. |.macro DOUBLE_GET_ZVAL_DVAL, reg, addr
  582. || if (Z_MODE(addr) != IS_REG || reg != Z_REG(addr)) {
  583. || if (Z_MODE(addr) == IS_CONST_ZVAL) {
  584. | .if X64
  585. || if (IS_SIGNED_32BIT(Z_ZV(addr))) {
  586. | SSE_AVX_INS movsd, vmovsd, xmm(reg-ZREG_XMM0), qword [Z_ZV(addr)]
  587. || } else {
  588. | LOAD_ADDR r0, Z_ZV(addr)
  589. | SSE_AVX_INS movsd, vmovsd, xmm(reg-ZREG_XMM0), qword [r0]
  590. || }
  591. | .else
  592. | SSE_AVX_INS movsd, vmovsd, xmm(reg-ZREG_XMM0), qword [Z_ZV(addr)]
  593. | .endif
  594. || } else if (Z_MODE(addr) == IS_MEM_ZVAL) {
  595. | SSE_AVX_INS movsd, vmovsd, xmm(reg-ZREG_XMM0), qword [Ra(Z_REG(addr))+Z_OFFSET(addr)]
  596. || } else if (Z_MODE(addr) == IS_REG) {
  597. | SSE_AVX_INS movaps, vmovaps, xmm(reg-ZREG_XMM0), xmm(Z_REG(addr)-ZREG_XMM0)
  598. || } else {
  599. || ZEND_UNREACHABLE();
  600. || }
  601. || }
  602. |.endmacro
  603. |.macro SSE_MATH, opcode, reg, addr, tmp_reg
  604. || switch (opcode) {
  605. || case ZEND_ADD:
  606. | SSE_OP addsd, reg, addr, tmp_reg
  607. || break;
  608. || case ZEND_SUB:
  609. | SSE_OP subsd, reg, addr, tmp_reg
  610. || break;
  611. || case ZEND_MUL:
  612. | SSE_OP mulsd, reg, addr, tmp_reg
  613. || break;
  614. || case ZEND_DIV:
  615. | SSE_OP divsd, reg, addr, tmp_reg
  616. || break;
  617. || }
  618. |.endmacro
  619. |.macro SSE_MATH_REG, opcode, dst_reg, src_reg
  620. || switch (opcode) {
  621. || case ZEND_ADD:
  622. | addsd xmm(dst_reg-ZREG_XMM0), xmm(src_reg-ZREG_XMM0)
  623. || break;
  624. || case ZEND_SUB:
  625. | subsd xmm(dst_reg-ZREG_XMM0), xmm(src_reg-ZREG_XMM0)
  626. || break;
  627. || case ZEND_MUL:
  628. | mulsd xmm(dst_reg-ZREG_XMM0), xmm(src_reg-ZREG_XMM0)
  629. || break;
  630. || case ZEND_DIV:
  631. | divsd xmm(dst_reg-ZREG_XMM0), xmm(src_reg-ZREG_XMM0)
  632. || break;
  633. || }
  634. |.endmacro
  635. |.macro DOUBLE_SET_ZVAL_DVAL, addr, reg
  636. || if (Z_MODE(addr) == IS_REG) {
  637. || if (reg != Z_REG(addr)) {
  638. | SSE_AVX_INS movaps, vmovaps, xmm(Z_REG(addr)-ZREG_XMM0), xmm(reg-ZREG_XMM0)
  639. || }
  640. || } else {
  641. || ZEND_ASSERT(Z_MODE(addr) == IS_MEM_ZVAL);
  642. | SSE_AVX_INS movsd, vmovsd, qword [Ra(Z_REG(addr))+Z_OFFSET(addr)], xmm(reg-ZREG_XMM0)
  643. || }
  644. |.endmacro
  645. |.macro AVX_OP, avx_ins, reg, op1_reg, addr, tmp_reg
  646. || if (Z_MODE(addr) == IS_CONST_ZVAL) {
  647. | .if X64
  648. || if (IS_SIGNED_32BIT(Z_ZV(addr))) {
  649. | avx_ins xmm(reg-ZREG_XMM0), xmm(op1_reg-ZREG_XMM0), qword [Z_ZV(addr)]
  650. || } else {
  651. | mov64 tmp_reg, ((ptrdiff_t)Z_ZV(addr))
  652. | avx_ins xmm(reg-ZREG_XMM0), xmm(op1_reg-ZREG_XMM0), qword [tmp_reg]
  653. || }
  654. | .else
  655. | avx_ins xmm(reg-ZREG_XMM0), xmm(op1_reg-ZREG_XMM0), qword [addr]
  656. | .endif
  657. || } else if (Z_MODE(addr) == IS_MEM_ZVAL) {
  658. | avx_ins xmm(reg-ZREG_XMM0), xmm(op1_reg-ZREG_XMM0), qword [Ra(Z_REG(addr))+Z_OFFSET(addr)]
  659. || } else if (Z_MODE(addr) == IS_REG) {
  660. | avx_ins xmm(reg-ZREG_XMM0), xmm(op1_reg-ZREG_XMM0), xmm(Z_REG(addr)-ZREG_XMM0)
  661. || } else {
  662. || ZEND_UNREACHABLE();
  663. || }
  664. |.endmacro
  665. |.macro AVX_MATH, opcode, reg, op1_reg, addr, tmp_reg
  666. || switch (opcode) {
  667. || case ZEND_ADD:
  668. | AVX_OP vaddsd, reg, op1_reg, addr, tmp_reg
  669. || break;
  670. || case ZEND_SUB:
  671. | AVX_OP vsubsd, reg, op1_reg, addr, tmp_reg
  672. || break;
  673. || case ZEND_MUL:
  674. | AVX_OP vmulsd, reg, op1_reg, addr, tmp_reg
  675. || break;
  676. || case ZEND_DIV:
  677. | AVX_OP vdivsd, reg, op1_reg, addr, tmp_reg
  678. || break;
  679. || }
  680. |.endmacro
  681. |.macro AVX_MATH_REG, opcode, dst_reg, op1_reg, src_reg
  682. || switch (opcode) {
  683. || case ZEND_ADD:
  684. | vaddsd xmm(dst_reg-ZREG_XMM0), xmm(op1_reg-ZREG_XMM0), xmm(src_reg-ZREG_XMM0)
  685. || break;
  686. || case ZEND_SUB:
  687. | vsubsd xmm(dst_reg-ZREG_XMM0), xmm(op1_reg-ZREG_XMM0), xmm(src_reg-ZREG_XMM0)
  688. || break;
  689. || case ZEND_MUL:
  690. | vmulsd xmm(dst_reg-ZREG_XMM0), xmm(op1_reg-ZREG_XMM0), xmm(src_reg-ZREG_XMM0)
  691. || break;
  692. || case ZEND_DIV:
  693. | vdivsd xmm(dst_reg-ZREG_XMM0), xmm(op1_reg-ZREG_XMM0), xmm(src_reg-ZREG_XMM0)
  694. || break;
  695. || }
  696. |.endmacro
  697. |.macro LONG_OP, long_ins, reg, addr, tmp_reg
  698. || if (Z_MODE(addr) == IS_CONST_ZVAL) {
  699. | .if X64
  700. || if (!IS_SIGNED_32BIT(Z_LVAL_P(Z_ZV(addr)))) {
  701. | mov64 tmp_reg, Z_LVAL_P(Z_ZV(addr))
  702. | long_ins Ra(reg), tmp_reg
  703. || } else {
  704. | long_ins Ra(reg), Z_LVAL_P(Z_ZV(addr))
  705. || }
  706. | .else
  707. | long_ins Ra(reg), Z_LVAL_P(Z_ZV(addr))
  708. | .endif
  709. || } else if (Z_MODE(addr) == IS_MEM_ZVAL) {
  710. | long_ins Ra(reg), aword [Ra(Z_REG(addr))+Z_OFFSET(addr)]
  711. || } else if (Z_MODE(addr) == IS_REG) {
  712. | long_ins Ra(reg), Ra(Z_REG(addr))
  713. || } else {
  714. || ZEND_UNREACHABLE();
  715. || }
  716. |.endmacro
  717. |.macro LONG_OP_WITH_32BIT_CONST, long_ins, op1_addr, lval
  718. || if (Z_MODE(op1_addr) == IS_MEM_ZVAL) {
  719. | long_ins aword [Ra(Z_REG(op1_addr))+Z_OFFSET(op1_addr)], lval
  720. || } else if (Z_MODE(op1_addr) == IS_REG) {
  721. | long_ins Ra(Z_REG(op1_addr)), lval
  722. || } else {
  723. || ZEND_UNREACHABLE();
  724. || }
  725. |.endmacro
  726. |.macro LONG_OP_WITH_CONST, long_ins, op1_addr, lval
  727. || if (Z_MODE(op1_addr) == IS_MEM_ZVAL) {
  728. | .if X64
  729. || if (!IS_SIGNED_32BIT(lval)) {
  730. | mov64 r0, lval
  731. | long_ins aword [Ra(Z_REG(op1_addr))+Z_OFFSET(op1_addr)], r0
  732. || } else {
  733. | long_ins aword [Ra(Z_REG(op1_addr))+Z_OFFSET(op1_addr)], lval
  734. || }
  735. | .else
  736. | long_ins aword [Ra(Z_REG(op1_addr))+Z_OFFSET(op1_addr)], lval
  737. | .endif
  738. || } else if (Z_MODE(op1_addr) == IS_REG) {
  739. | .if X64
  740. || if (!IS_SIGNED_32BIT(lval)) {
  741. | mov64 r0, lval
  742. | long_ins Ra(Z_REG(op1_addr)), r0
  743. || } else {
  744. | long_ins Ra(Z_REG(op1_addr)), lval
  745. || }
  746. | .else
  747. | long_ins Ra(Z_REG(op1_addr)), lval
  748. | .endif
  749. || } else {
  750. || ZEND_UNREACHABLE();
  751. || }
  752. |.endmacro
  753. |.macro GET_ZVAL_LVAL, reg, addr
  754. || if (Z_MODE(addr) == IS_CONST_ZVAL) {
  755. || if (Z_LVAL_P(Z_ZV(addr)) == 0) {
  756. | xor Ra(reg), Ra(reg)
  757. || } else {
  758. | .if X64
  759. || if (!IS_SIGNED_32BIT(Z_LVAL_P(Z_ZV(addr)))) {
  760. | mov64 Ra(reg), Z_LVAL_P(Z_ZV(addr))
  761. || } else {
  762. | mov Ra(reg), Z_LVAL_P(Z_ZV(addr))
  763. || }
  764. | .else
  765. | mov Ra(reg), Z_LVAL_P(Z_ZV(addr))
  766. | .endif
  767. || }
  768. || } else if (Z_MODE(addr) == IS_MEM_ZVAL) {
  769. | mov Ra(reg), aword [Ra(Z_REG(addr))+Z_OFFSET(addr)]
  770. || } else if (Z_MODE(addr) == IS_REG) {
  771. || if (reg != Z_REG(addr)) {
  772. | mov Ra(reg), Ra(Z_REG(addr))
  773. || }
  774. || } else {
  775. || ZEND_UNREACHABLE();
  776. || }
  777. |.endmacro
  778. |.macro LONG_MATH, opcode, reg, addr, tmp_reg
  779. || switch (opcode) {
  780. || case ZEND_ADD:
  781. | LONG_OP add, reg, addr, Ra(tmp_reg)
  782. || break;
  783. || case ZEND_SUB:
  784. | LONG_OP sub, reg, addr, Ra(tmp_reg)
  785. || break;
  786. || case ZEND_MUL:
  787. | LONG_OP imul, reg, addr, Ra(tmp_reg)
  788. || break;
  789. || case ZEND_BW_OR:
  790. | LONG_OP or, reg, addr, Ra(tmp_reg)
  791. || break;
  792. || case ZEND_BW_AND:
  793. | LONG_OP and, reg, addr, Ra(tmp_reg)
  794. || break;
  795. || case ZEND_BW_XOR:
  796. | LONG_OP xor, reg, addr, Ra(tmp_reg)
  797. || break;
  798. || default:
  799. || ZEND_UNREACHABLE();
  800. || }
  801. |.endmacro
  802. |.macro LONG_MATH_REG, opcode, dst_reg, src_reg
  803. || switch (opcode) {
  804. || case ZEND_ADD:
  805. | add dst_reg, src_reg
  806. || break;
  807. || case ZEND_SUB:
  808. | sub dst_reg, src_reg
  809. || break;
  810. || case ZEND_MUL:
  811. | imul dst_reg, src_reg
  812. || break;
  813. || case ZEND_BW_OR:
  814. | or dst_reg, src_reg
  815. || break;
  816. || case ZEND_BW_AND:
  817. | and dst_reg, src_reg
  818. || break;
  819. || case ZEND_BW_XOR:
  820. | xor dst_reg, src_reg
  821. || break;
  822. || default:
  823. || ZEND_UNREACHABLE();
  824. || }
  825. |.endmacro
  826. |.macro SET_ZVAL_LVAL, addr, lval
  827. || if (Z_MODE(addr) == IS_REG) {
  828. | mov Ra(Z_REG(addr)), lval
  829. || } else {
  830. || ZEND_ASSERT(Z_MODE(addr) == IS_MEM_ZVAL);
  831. | mov aword [Ra(Z_REG(addr))+Z_OFFSET(addr)], lval
  832. || }
  833. |.endmacro
  834. |.macro ZVAL_COPY_CONST, dst_addr, dst_info, dst_def_info, zv, tmp_reg
  835. || if (Z_TYPE_P(zv) > IS_TRUE) {
  836. || if (Z_TYPE_P(zv) == IS_DOUBLE) {
  837. || zend_reg dst_reg = (Z_MODE(dst_addr) == IS_REG) ? Z_REG(dst_addr) : ZREG_XMM0;
  838. || if (Z_DVAL_P(zv) == 0.0 && !is_signed(Z_DVAL_P(zv))) {
  839. || if (CAN_USE_AVX()) {
  840. | vxorps xmm(dst_reg-ZREG_XMM0), xmm(dst_reg-ZREG_XMM0), xmm(dst_reg-ZREG_XMM0)
  841. || } else {
  842. | xorps xmm(dst_reg-ZREG_XMM0), xmm(dst_reg-ZREG_XMM0)
  843. || }
  844. | .if X64
  845. || } else if (!IS_SIGNED_32BIT(zv)) {
  846. | mov64 Ra(tmp_reg), ((uintptr_t)zv)
  847. | SSE_AVX_INS movsd, vmovsd, xmm(dst_reg-ZREG_XMM0), qword [Ra(tmp_reg)]
  848. | .endif
  849. || } else {
  850. | SSE_AVX_INS movsd, vmovsd, xmm(dst_reg-ZREG_XMM0), qword [((uint32_t)(uintptr_t)zv)]
  851. || }
  852. | DOUBLE_SET_ZVAL_DVAL dst_addr, dst_reg
  853. || } else if (Z_TYPE_P(zv) == IS_LONG && dst_def_info == MAY_BE_DOUBLE) {
  854. || zend_reg dst_reg = (Z_MODE(dst_addr) == IS_REG) ? Z_REG(dst_addr) : ZREG_XMM0;
  855. | DOUBLE_GET_LONG dst_reg, Z_LVAL_P(zv), ZREG_R0
  856. | DOUBLE_SET_ZVAL_DVAL dst_addr, dst_reg
  857. || } else if (Z_LVAL_P(zv) == 0 && Z_MODE(dst_addr) == IS_REG) {
  858. | xor Ra(Z_REG(dst_addr)), Ra(Z_REG(dst_addr))
  859. || } else {
  860. | .if X64
  861. || if (!IS_SIGNED_32BIT(Z_LVAL_P(zv))) {
  862. || if (Z_MODE(dst_addr) == IS_REG) {
  863. | mov64 Ra(Z_REG(dst_addr)), ((uintptr_t)Z_LVAL_P(zv))
  864. || } else {
  865. | mov64 Ra(tmp_reg), ((uintptr_t)Z_LVAL_P(zv))
  866. | SET_ZVAL_LVAL dst_addr, Ra(tmp_reg)
  867. || }
  868. || } else {
  869. | SET_ZVAL_LVAL dst_addr, Z_LVAL_P(zv)
  870. || }
  871. | .else
  872. | SET_ZVAL_LVAL dst_addr, Z_LVAL_P(zv)
  873. | .endif
  874. || }
  875. || }
  876. || if (Z_MODE(dst_addr) == IS_MEM_ZVAL) {
  877. || if (dst_def_info == MAY_BE_DOUBLE) {
  878. || if ((dst_info & (MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_GUARD)) != MAY_BE_DOUBLE) {
  879. | SET_ZVAL_TYPE_INFO dst_addr, IS_DOUBLE
  880. || }
  881. || } else if (((dst_info & (MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_GUARD)) != (1<<Z_TYPE_P(zv))) || (dst_info & (MAY_BE_STRING|MAY_BE_ARRAY)) != 0) {
  882. | SET_ZVAL_TYPE_INFO dst_addr, Z_TYPE_INFO_P(zv)
  883. || }
  884. || }
  885. |.endmacro
  886. |.macro ZVAL_COPY_CONST_2, dst_addr, res_addr, dst_info, dst_def_info, zv, tmp_reg
  887. || if (Z_TYPE_P(zv) > IS_TRUE) {
  888. || if (Z_TYPE_P(zv) == IS_DOUBLE) {
  889. || zend_reg dst_reg = (Z_MODE(dst_addr) == IS_REG) ?
  890. || Z_REG(dst_addr) : ((Z_MODE(res_addr) == IS_REG) ? Z_REG(res_addr) : ZREG_XMM0);
  891. || if (Z_DVAL_P(zv) == 0.0 && !is_signed(Z_DVAL_P(zv))) {
  892. || if (CAN_USE_AVX()) {
  893. | vxorps xmm(dst_reg-ZREG_XMM0), xmm(dst_reg-ZREG_XMM0), xmm(dst_reg-ZREG_XMM0)
  894. || } else {
  895. | xorps xmm(dst_reg-ZREG_XMM0), xmm(dst_reg-ZREG_XMM0)
  896. || }
  897. | .if X64
  898. || } else if (!IS_SIGNED_32BIT(zv)) {
  899. | mov64 Ra(tmp_reg), ((uintptr_t)zv)
  900. | SSE_AVX_INS movsd, vmovsd, xmm(dst_reg-ZREG_XMM0), qword [Ra(tmp_reg)]
  901. | .endif
  902. || } else {
  903. | SSE_AVX_INS movsd, vmovsd, xmm(dst_reg-ZREG_XMM0), qword [((uint32_t)(uintptr_t)zv)]
  904. || }
  905. | DOUBLE_SET_ZVAL_DVAL dst_addr, ZREG_XMM0
  906. | DOUBLE_SET_ZVAL_DVAL res_addr, ZREG_XMM0
  907. || } else if (Z_TYPE_P(zv) == IS_LONG && dst_def_info == MAY_BE_DOUBLE) {
  908. || if (Z_MODE(dst_addr) == IS_REG) {
  909. | DOUBLE_GET_LONG Z_REG(dst_addr), Z_LVAL_P(zv), ZREG_R0
  910. | DOUBLE_SET_ZVAL_DVAL res_addr, Z_REG(dst_addr)
  911. || } else if (Z_MODE(res_addr) == IS_REG) {
  912. | DOUBLE_GET_LONG Z_REG(res_addr), Z_LVAL_P(zv), ZREG_R0
  913. | DOUBLE_SET_ZVAL_DVAL dst_addr, Z_REG(res_addr)
  914. || } else {
  915. | DOUBLE_GET_LONG ZREG_XMM0, Z_LVAL_P(zv), ZREG_R0
  916. | DOUBLE_SET_ZVAL_DVAL dst_addr, ZREG_XMM0
  917. | DOUBLE_SET_ZVAL_DVAL res_addr, ZREG_XMM0
  918. || }
  919. || } else if (Z_LVAL_P(zv) == 0 && (Z_MODE(dst_addr) == IS_REG || Z_MODE(res_addr) == IS_REG)) {
  920. || if (Z_MODE(dst_addr) == IS_REG) {
  921. | xor Ra(Z_REG(dst_addr)), Ra(Z_REG(dst_addr))
  922. | SET_ZVAL_LVAL res_addr, Ra(Z_REG(dst_addr))
  923. || } else {
  924. | xor Ra(Z_REG(res_addr)), Ra(Z_REG(res_addr))
  925. | SET_ZVAL_LVAL dst_addr, Ra(Z_REG(res_addr))
  926. || }
  927. || } else {
  928. | .if X64
  929. || if (!IS_SIGNED_32BIT(Z_LVAL_P(zv))) {
  930. || if (Z_MODE(dst_addr) == IS_REG) {
  931. | mov64 Ra(Z_REG(dst_addr)), ((uintptr_t)Z_LVAL_P(zv))
  932. | SET_ZVAL_LVAL res_addr, Ra(Z_REG(dst_addr))
  933. || } else if (Z_MODE(res_addr) == IS_REG) {
  934. | mov64 Ra(Z_REG(res_addr)), ((uintptr_t)Z_LVAL_P(zv))
  935. | SET_ZVAL_LVAL dst_addr, Ra(Z_REG(res_addr))
  936. || } else {
  937. | mov64 Ra(tmp_reg), ((uintptr_t)Z_LVAL_P(zv))
  938. | SET_ZVAL_LVAL dst_addr, Ra(tmp_reg)
  939. | SET_ZVAL_LVAL res_addr, Ra(tmp_reg)
  940. || }
  941. || } else if (Z_MODE(dst_addr) == IS_REG) {
  942. | SET_ZVAL_LVAL dst_addr, Z_LVAL_P(zv)
  943. | SET_ZVAL_LVAL res_addr, Ra(Z_REG(dst_addr))
  944. || } else if (Z_MODE(res_addr) == IS_REG) {
  945. | SET_ZVAL_LVAL res_addr, Z_LVAL_P(zv)
  946. | SET_ZVAL_LVAL dst_addr, Ra(Z_REG(res_addr))
  947. || } else {
  948. | SET_ZVAL_LVAL dst_addr, Z_LVAL_P(zv)
  949. | SET_ZVAL_LVAL res_addr, Z_LVAL_P(zv)
  950. || }
  951. | .else
  952. || if (Z_MODE(dst_addr) == IS_REG) {
  953. | SET_ZVAL_LVAL dst_addr, Z_LVAL_P(zv)
  954. | SET_ZVAL_LVAL res_addr, Ra(Z_REG(dst_addr))
  955. || } else if (Z_MODE(res_addr) == IS_REG) {
  956. | SET_ZVAL_LVAL res_addr, Z_LVAL_P(zv)
  957. | SET_ZVAL_LVAL dst_addr, Ra(Z_REG(res_addr))
  958. || } else {
  959. | SET_ZVAL_LVAL dst_addr, Z_LVAL_P(zv)
  960. | SET_ZVAL_LVAL res_addr, Z_LVAL_P(zv)
  961. || }
  962. | .endif
  963. || }
  964. || }
  965. || if (Z_MODE(dst_addr) == IS_MEM_ZVAL) {
  966. || if (dst_def_info == MAY_BE_DOUBLE) {
  967. || if ((dst_info & (MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_GUARD)) != MAY_BE_DOUBLE) {
  968. | SET_ZVAL_TYPE_INFO dst_addr, IS_DOUBLE
  969. || }
  970. || } else if (((dst_info & (MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_GUARD)) != (1<<Z_TYPE_P(zv))) || (dst_info & (MAY_BE_STRING|MAY_BE_ARRAY)) != 0) {
  971. | SET_ZVAL_TYPE_INFO dst_addr, Z_TYPE_INFO_P(zv)
  972. || }
  973. || }
  974. || if (Z_MODE(res_addr) == IS_MEM_ZVAL) {
  975. || if (dst_def_info == MAY_BE_DOUBLE) {
  976. | SET_ZVAL_TYPE_INFO res_addr, IS_DOUBLE
  977. || } else {
  978. | SET_ZVAL_TYPE_INFO res_addr, Z_TYPE_INFO_P(zv)
  979. || }
  980. || }
  981. |.endmacro
  982. /* the same as above, but "src" may overlap with "tmp_reg1" */
  983. |.macro ZVAL_COPY_VALUE, dst_addr, dst_info, src_addr, src_info, tmp_reg1, tmp_reg2
  984. | ZVAL_COPY_VALUE_V dst_addr, dst_info, src_addr, src_info, tmp_reg1, tmp_reg2
  985. || if ((src_info & (MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG|MAY_BE_DOUBLE)) &&
  986. || !(src_info & MAY_BE_GUARD) &&
  987. || has_concrete_type(src_info & MAY_BE_ANY)) {
  988. || if (Z_MODE(dst_addr) == IS_MEM_ZVAL) {
  989. || if ((dst_info & (MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_GUARD)) != (src_info & (MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_GUARD))) {
  990. || zend_uchar type = concrete_type(src_info);
  991. | SET_ZVAL_TYPE_INFO dst_addr, type
  992. || }
  993. || }
  994. || } else {
  995. | GET_ZVAL_TYPE_INFO Rd(tmp_reg1), src_addr
  996. | SET_ZVAL_TYPE_INFO dst_addr, Rd(tmp_reg1)
  997. || }
  998. |.endmacro
  999. |.macro ZVAL_COPY_VALUE_V, dst_addr, dst_info, src_addr, src_info, tmp_reg1, tmp_reg2
  1000. || if (src_info & (MAY_BE_ANY-(MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE))) {
  1001. || if ((src_info & (MAY_BE_ANY|MAY_BE_GUARD)) == MAY_BE_LONG) {
  1002. || if (Z_MODE(src_addr) == IS_REG) {
  1003. || if (Z_MODE(dst_addr) != IS_REG || Z_REG(dst_addr) != Z_REG(src_addr)) {
  1004. | SET_ZVAL_LVAL dst_addr, Ra(Z_REG(src_addr))
  1005. || }
  1006. || } else if (Z_MODE(dst_addr) == IS_REG) {
  1007. | GET_ZVAL_LVAL Z_REG(dst_addr), src_addr
  1008. || } else {
  1009. | GET_ZVAL_LVAL tmp_reg2, src_addr
  1010. | SET_ZVAL_LVAL dst_addr, Ra(tmp_reg2)
  1011. || }
  1012. || } else if ((src_info & (MAY_BE_ANY|MAY_BE_GUARD)) == MAY_BE_DOUBLE) {
  1013. || if (Z_MODE(src_addr) == IS_REG) {
  1014. | DOUBLE_SET_ZVAL_DVAL dst_addr, Z_REG(src_addr)
  1015. || } else if (Z_MODE(dst_addr) == IS_REG) {
  1016. | DOUBLE_GET_ZVAL_DVAL Z_REG(dst_addr), src_addr
  1017. || } else {
  1018. | DOUBLE_GET_ZVAL_DVAL ZREG_XMM0, src_addr
  1019. | DOUBLE_SET_ZVAL_DVAL dst_addr, ZREG_XMM0
  1020. || }
  1021. || } else if (!(src_info & (MAY_BE_DOUBLE|MAY_BE_GUARD))) {
  1022. | GET_ZVAL_PTR Ra(tmp_reg2), src_addr
  1023. | SET_ZVAL_PTR dst_addr, Ra(tmp_reg2)
  1024. || } else {
  1025. | .if X64
  1026. | GET_ZVAL_PTR Ra(tmp_reg2), src_addr
  1027. | SET_ZVAL_PTR dst_addr, Ra(tmp_reg2)
  1028. | .else
  1029. || if ((tmp_reg1 == tmp_reg2 || tmp_reg1 == Z_REG(src_addr))) {
  1030. | GET_ZVAL_W2 Ra(tmp_reg2), src_addr
  1031. | SET_ZVAL_W2 dst_addr, Ra(tmp_reg2)
  1032. | GET_ZVAL_PTR Ra(tmp_reg2), src_addr
  1033. | SET_ZVAL_PTR dst_addr, Ra(tmp_reg2)
  1034. || } else {
  1035. | GET_ZVAL_PTR Ra(tmp_reg2), src_addr
  1036. | GET_ZVAL_W2 Ra(tmp_reg1), src_addr
  1037. | SET_ZVAL_PTR dst_addr, Ra(tmp_reg2)
  1038. | SET_ZVAL_W2 dst_addr, Ra(tmp_reg1)
  1039. || }
  1040. | .endif
  1041. || }
  1042. || }
  1043. |.endmacro
  1044. |.macro ZVAL_COPY_VALUE_2, dst_addr, dst_info, res_addr, src_addr, src_info, tmp_reg1, tmp_reg2
  1045. || if (src_info & (MAY_BE_ANY-(MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE))) {
  1046. || if ((src_info & MAY_BE_ANY) == MAY_BE_LONG) {
  1047. || if (Z_MODE(src_addr) == IS_REG) {
  1048. || if (Z_MODE(dst_addr) != IS_REG || Z_REG(dst_addr) != Z_REG(src_addr)) {
  1049. | SET_ZVAL_LVAL dst_addr, Ra(Z_REG(src_addr))
  1050. || }
  1051. || if (Z_MODE(res_addr) != IS_REG || Z_REG(res_addr) != Z_REG(src_addr)) {
  1052. | SET_ZVAL_LVAL res_addr, Ra(Z_REG(src_addr))
  1053. || }
  1054. || } else if (Z_MODE(dst_addr) == IS_REG) {
  1055. | GET_ZVAL_LVAL Z_REG(dst_addr), src_addr
  1056. || if (Z_MODE(res_addr) != IS_REG || Z_REG(res_addr) != Z_REG(dst_addr)) {
  1057. | SET_ZVAL_LVAL res_addr, Ra(Z_REG(dst_addr))
  1058. || }
  1059. || } else if (Z_MODE(res_addr) == IS_REG) {
  1060. | GET_ZVAL_LVAL Z_REG(res_addr), src_addr
  1061. | SET_ZVAL_LVAL dst_addr, Ra(Z_REG(res_addr))
  1062. || } else {
  1063. | GET_ZVAL_LVAL tmp_reg2, src_addr
  1064. | SET_ZVAL_LVAL dst_addr, Ra(tmp_reg2)
  1065. | SET_ZVAL_LVAL res_addr, Ra(tmp_reg2)
  1066. || }
  1067. || } else if ((src_info & MAY_BE_ANY) == MAY_BE_DOUBLE) {
  1068. || if (Z_MODE(src_addr) == IS_REG) {
  1069. | DOUBLE_SET_ZVAL_DVAL dst_addr, Z_REG(src_addr)
  1070. | DOUBLE_SET_ZVAL_DVAL res_addr, Z_REG(src_addr)
  1071. || } else if (Z_MODE(dst_addr) == IS_REG) {
  1072. | DOUBLE_GET_ZVAL_DVAL Z_REG(dst_addr), src_addr
  1073. | DOUBLE_SET_ZVAL_DVAL res_addr, Z_REG(dst_addr)
  1074. || } else if (Z_MODE(res_addr) == IS_REG) {
  1075. | DOUBLE_GET_ZVAL_DVAL Z_REG(res_addr), src_addr
  1076. | DOUBLE_SET_ZVAL_DVAL dst_addr, Z_REG(res_addr)
  1077. || } else {
  1078. | DOUBLE_GET_ZVAL_DVAL ZREG_XMM0, src_addr
  1079. | DOUBLE_SET_ZVAL_DVAL dst_addr, ZREG_XMM0
  1080. | DOUBLE_SET_ZVAL_DVAL res_addr, ZREG_XMM0
  1081. || }
  1082. || } else if (!(src_info & MAY_BE_DOUBLE)) {
  1083. | GET_ZVAL_PTR Ra(tmp_reg2), src_addr
  1084. | SET_ZVAL_PTR dst_addr, Ra(tmp_reg2)
  1085. | SET_ZVAL_PTR res_addr, Ra(tmp_reg2)
  1086. || } else {
  1087. | .if X64
  1088. | GET_ZVAL_PTR Ra(tmp_reg2), src_addr
  1089. | SET_ZVAL_PTR dst_addr, Ra(tmp_reg2)
  1090. | SET_ZVAL_PTR res_addr, Ra(tmp_reg2)
  1091. | .else
  1092. || if (tmp_reg1 == tmp_reg2 || tmp_reg1 == Z_REG(src_addr)) {
  1093. | GET_ZVAL_W2 Ra(tmp_reg2), src_addr
  1094. | SET_ZVAL_W2 dst_addr, Ra(tmp_reg2)
  1095. | SET_ZVAL_W2 res_addr, Ra(tmp_reg2)
  1096. | GET_ZVAL_PTR Ra(tmp_reg2), src_addr
  1097. | SET_ZVAL_PTR dst_addr, Ra(tmp_reg2)
  1098. | SET_ZVAL_PTR res_addr, Ra(tmp_reg2)
  1099. || } else {
  1100. | GET_ZVAL_PTR Ra(tmp_reg2), src_addr
  1101. | GET_ZVAL_W2 Ra(tmp_reg1), src_addr
  1102. | SET_ZVAL_PTR dst_addr, Ra(tmp_reg2)
  1103. | SET_ZVAL_PTR res_addr, Ra(tmp_reg2)
  1104. | SET_ZVAL_W2 dst_addr, Ra(tmp_reg1)
  1105. | SET_ZVAL_W2 res_addr, Ra(tmp_reg1)
  1106. || }
  1107. | .endif
  1108. || }
  1109. || }
  1110. || if ((src_info & (MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG|MAY_BE_DOUBLE)) &&
  1111. || has_concrete_type(src_info & MAY_BE_ANY)) {
  1112. || zend_uchar type = concrete_type(src_info);
  1113. || if (Z_MODE(dst_addr) == IS_MEM_ZVAL) {
  1114. || if ((dst_info & (MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_GUARD)) != (src_info & (MAY_BE_ANY|MAY_BE_UNDEF))) {
  1115. | SET_ZVAL_TYPE_INFO dst_addr, type
  1116. || }
  1117. || }
  1118. || if (Z_MODE(res_addr) == IS_MEM_ZVAL) {
  1119. | SET_ZVAL_TYPE_INFO res_addr, type
  1120. || }
  1121. || } else {
  1122. | GET_ZVAL_TYPE_INFO Rd(tmp_reg1), src_addr
  1123. | SET_ZVAL_TYPE_INFO dst_addr, Rd(tmp_reg1)
  1124. | SET_ZVAL_TYPE_INFO res_addr, Rd(tmp_reg1)
  1125. || }
  1126. |.endmacro
  1127. |.macro IF_UNDEF, type_reg, label
  1128. | test type_reg, type_reg
  1129. | je label
  1130. |.endmacro
  1131. |.macro IF_TYPE, type, val, label
  1132. | cmp type, val
  1133. | je label
  1134. |.endmacro
  1135. |.macro IF_NOT_TYPE, type, val, label
  1136. | cmp type, val
  1137. | jne label
  1138. |.endmacro
  1139. |.macro IF_Z_TYPE, zv, val, label
  1140. | IF_TYPE byte [zv+offsetof(zval, u1.v.type)], val, label
  1141. |.endmacro
  1142. |.macro IF_NOT_Z_TYPE, zv, val, label
  1143. | IF_NOT_TYPE byte [zv+offsetof(zval, u1.v.type)], val, label
  1144. |.endmacro
  1145. |.macro CMP_ZVAL_TYPE, addr, val
  1146. || ZEND_ASSERT(Z_MODE(addr) == IS_MEM_ZVAL);
  1147. | cmp byte [Ra(Z_REG(addr))+Z_OFFSET(addr)+offsetof(zval, u1.v.type)], val
  1148. |.endmacro
  1149. |.macro IF_ZVAL_TYPE, addr, val, label
  1150. || ZEND_ASSERT(Z_MODE(addr) == IS_MEM_ZVAL);
  1151. | IF_TYPE byte [Ra(Z_REG(addr))+Z_OFFSET(addr)+offsetof(zval, u1.v.type)], val, label
  1152. |.endmacro
  1153. |.macro IF_NOT_ZVAL_TYPE, addr, val, label
  1154. || ZEND_ASSERT(Z_MODE(addr) == IS_MEM_ZVAL);
  1155. | IF_NOT_TYPE byte [Ra(Z_REG(addr))+Z_OFFSET(addr)+offsetof(zval, u1.v.type)], val, label
  1156. |.endmacro
  1157. |.macro IF_FLAGS, type_flags, mask, label
  1158. | test type_flags, mask
  1159. | jnz label
  1160. |.endmacro
  1161. |.macro IF_NOT_FLAGS, type_flags, mask, label
  1162. | test type_flags, mask
  1163. | jz label
  1164. |.endmacro
  1165. |.macro IF_REFCOUNTED, type_flags, label
  1166. | IF_FLAGS type_flags, IS_TYPE_REFCOUNTED, label
  1167. |.endmacro
  1168. |.macro IF_NOT_REFCOUNTED, type_flags, label
  1169. | //IF_NOT_FLAGS type_flags, IS_TYPE_REFCOUNTED, label
  1170. | test type_flags, type_flags
  1171. | jz label
  1172. |.endmacro
  1173. |.macro IF_ZVAL_FLAGS, addr, mask, label
  1174. || ZEND_ASSERT(Z_MODE(addr) == IS_MEM_ZVAL);
  1175. | IF_FLAGS byte [Ra(Z_REG(addr))+Z_OFFSET(addr)+offsetof(zval, u1.v.type_flags)], mask, label
  1176. |.endmacro
  1177. |.macro IF_NOT_ZVAL_FLAGS, addr, mask, label
  1178. || ZEND_ASSERT(Z_MODE(addr) == IS_MEM_ZVAL);
  1179. | IF_NOT_FLAGS byte [Ra(Z_REG(addr))+Z_OFFSET(addr)+offsetof(zval, u1.v.type_flags)], mask, label
  1180. |.endmacro
  1181. |.macro IF_ZVAL_REFCOUNTED, addr, label
  1182. | IF_ZVAL_FLAGS addr, IS_TYPE_REFCOUNTED, label
  1183. |.endmacro
  1184. |.macro IF_NOT_ZVAL_REFCOUNTED, addr, label
  1185. | IF_NOT_ZVAL_FLAGS addr, IS_TYPE_REFCOUNTED, label
  1186. |.endmacro
  1187. |.macro IF_NOT_ZVAL_COLLECTABLE, addr, label
  1188. | IF_NOT_ZVAL_FLAGS addr, IS_TYPE_COLLECTABLE, label
  1189. |.endmacro
  1190. |.macro GC_ADDREF, zv
  1191. | add dword [zv], 1
  1192. |.endmacro
  1193. |.macro GC_DELREF, zv
  1194. | sub dword [zv], 1
  1195. |.endmacro
  1196. |.macro IF_GC_MAY_NOT_LEAK, ptr, label
  1197. | test dword [ptr+4],(GC_INFO_MASK | (GC_NOT_COLLECTABLE << GC_FLAGS_SHIFT))
  1198. | jne label
  1199. |.endmacro
  1200. |.macro ADDREF_CONST, zv, tmp_reg
  1201. | .if X64
  1202. || if (!IS_SIGNED_32BIT(Z_LVAL_P(zv))) {
  1203. | mov64 tmp_reg, ((uintptr_t)Z_LVAL_P(zv))
  1204. | add dword [tmp_reg], 1
  1205. || } else {
  1206. | add dword [Z_LVAL_P(zv)], 1
  1207. || }
  1208. | .else
  1209. | add dword [Z_LVAL_P(zv)], 1
  1210. | .endif
  1211. |.endmacro
  1212. |.macro ADDREF_CONST_2, zv, tmp_reg
  1213. | .if X64
  1214. || if (!IS_SIGNED_32BIT(Z_LVAL_P(zv))) {
  1215. | mov64 tmp_reg, ((uintptr_t)Z_LVAL_P(zv))
  1216. | add dword [tmp_reg], 2
  1217. || } else {
  1218. | add dword [Z_LVAL_P(zv)], 2
  1219. || }
  1220. | .else
  1221. | add dword [Z_LVAL_P(zv)], 2
  1222. | .endif
  1223. |.endmacro
  1224. |.macro TRY_ADDREF, val_info, type_flags_reg, value_ptr_reg
  1225. || if (val_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE)) {
  1226. || if (val_info & (MAY_BE_ANY-(MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  1227. | IF_NOT_REFCOUNTED type_flags_reg, >1
  1228. || }
  1229. | GC_ADDREF value_ptr_reg
  1230. |1:
  1231. || }
  1232. |.endmacro
  1233. |.macro TRY_ADDREF_2, val_info, type_flags_reg, value_ptr_reg
  1234. || if (val_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE)) {
  1235. || if (val_info & (MAY_BE_ANY-(MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  1236. | IF_NOT_REFCOUNTED type_flags_reg, >1
  1237. || }
  1238. | add dword [value_ptr_reg], 2
  1239. |1:
  1240. || }
  1241. |.endmacro
  1242. |.macro ZVAL_DEREF, reg, info
  1243. || if (info & MAY_BE_REF) {
  1244. | IF_NOT_Z_TYPE, reg, IS_REFERENCE, >1
  1245. | GET_Z_PTR reg, reg
  1246. | add reg, offsetof(zend_reference, val)
  1247. |1:
  1248. || }
  1249. |.endmacro
  1250. |.macro SET_EX_OPLINE, op, tmp_reg
  1251. || if (op == last_valid_opline) {
  1252. || zend_jit_use_last_valid_opline();
  1253. | SAVE_IP
  1254. || } else {
  1255. | ADDR_STORE aword EX->opline, op, tmp_reg
  1256. || if (!GCC_GLOBAL_REGS) {
  1257. || zend_jit_reset_last_valid_opline();
  1258. || }
  1259. || }
  1260. |.endmacro
  1261. // zval should be in FCARG1a
  1262. |.macro ZVAL_DTOR_FUNC, var_info, opline // arg1 must be in FCARG1a
  1263. || do {
  1264. || if (!((var_info) & MAY_BE_GUARD)
  1265. || && has_concrete_type((var_info) & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  1266. || zend_uchar type = concrete_type((var_info) & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE));
  1267. || if (type == IS_STRING && !ZEND_DEBUG) {
  1268. | EXT_CALL _efree, r0
  1269. || break;
  1270. || } else if (type == IS_ARRAY) {
  1271. || if ((var_info) & (MAY_BE_ARRAY_KEY_STRING|MAY_BE_ARRAY_OF_STRING|MAY_BE_ARRAY_OF_ARRAY|MAY_BE_ARRAY_OF_OBJECT|MAY_BE_ARRAY_OF_RESOURCE|MAY_BE_ARRAY_OF_REF)) {
  1272. || if (opline && ((var_info) & (MAY_BE_ARRAY_OF_ARRAY|MAY_BE_ARRAY_OF_OBJECT|MAY_BE_ARRAY_OF_RESOURCE|MAY_BE_ARRAY_OF_REF))) {
  1273. | SET_EX_OPLINE opline, r0
  1274. || }
  1275. | EXT_CALL zend_array_destroy, r0
  1276. || } else {
  1277. | EXT_CALL zend_jit_array_free, r0
  1278. || }
  1279. || break;
  1280. || } else if (type == IS_OBJECT) {
  1281. || if (opline) {
  1282. | SET_EX_OPLINE opline, r0
  1283. || }
  1284. | EXT_CALL zend_objects_store_del, r0
  1285. || break;
  1286. || }
  1287. || }
  1288. || if (opline) {
  1289. | SET_EX_OPLINE opline, r0
  1290. || }
  1291. | EXT_CALL rc_dtor_func, r0
  1292. || } while(0);
  1293. |.endmacro
  1294. |.macro ZVAL_PTR_DTOR, addr, op_info, gc, cold, opline
  1295. || if ((op_info) & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE|MAY_BE_REF|MAY_BE_GUARD)) {
  1296. || if ((op_info) & ((MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_INDIRECT|MAY_BE_GUARD)-(MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  1297. | // if (Z_REFCOUNTED_P(cv)) {
  1298. || if (cold) {
  1299. | IF_ZVAL_REFCOUNTED addr, >1
  1300. |.cold_code
  1301. |1:
  1302. || } else {
  1303. | IF_NOT_ZVAL_REFCOUNTED addr, >4
  1304. || }
  1305. || }
  1306. | // if (!Z_DELREF_P(cv)) {
  1307. | GET_ZVAL_PTR FCARG1a, addr
  1308. | GC_DELREF FCARG1a
  1309. || if (((op_info) & MAY_BE_GUARD) || RC_MAY_BE_1(op_info)) {
  1310. || if (((op_info) & MAY_BE_GUARD) || RC_MAY_BE_N(op_info)) {
  1311. || if (gc && (((op_info) & MAY_BE_GUARD) || (RC_MAY_BE_N(op_info) && ((op_info) & (MAY_BE_REF|MAY_BE_ARRAY|MAY_BE_OBJECT)) != 0))) {
  1312. | jnz >3
  1313. || } else {
  1314. | jnz >4
  1315. || }
  1316. || }
  1317. | // zval_dtor_func(r);
  1318. | ZVAL_DTOR_FUNC op_info, opline
  1319. || if (gc && (((op_info) & MAY_BE_GUARD) || (RC_MAY_BE_N(op_info) && ((op_info) & (MAY_BE_REF|MAY_BE_ARRAY|MAY_BE_OBJECT)) != 0))) {
  1320. | jmp >4
  1321. || }
  1322. |3:
  1323. || }
  1324. || if (gc && (((op_info) & MAY_BE_GUARD) || (RC_MAY_BE_N(op_info) && ((op_info) & (MAY_BE_REF|MAY_BE_ARRAY|MAY_BE_OBJECT)) != 0))) {
  1325. || if ((op_info) & (MAY_BE_REF|MAY_BE_GUARD)) {
  1326. || zend_jit_addr ref_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, offsetof(zend_reference, val));
  1327. | IF_NOT_ZVAL_TYPE addr, IS_REFERENCE, >1
  1328. | IF_NOT_ZVAL_COLLECTABLE ref_addr, >4
  1329. | GET_ZVAL_PTR FCARG1a, ref_addr
  1330. |1:
  1331. || }
  1332. | IF_GC_MAY_NOT_LEAK FCARG1a, >4
  1333. | // gc_possible_root(Z_COUNTED_P(z))
  1334. | EXT_CALL gc_possible_root, r0
  1335. || }
  1336. || if (cold && ((op_info) & ((MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_INDIRECT|MAY_BE_GUARD)-(MAY_BE_OBJECT|MAY_BE_RESOURCE))) != 0) {
  1337. | jmp >4
  1338. |.code
  1339. || }
  1340. |4:
  1341. || }
  1342. |.endmacro
  1343. |.macro FREE_OP, op_type, op, op_info, cold, opline
  1344. || if (op_type & (IS_VAR|IS_TMP_VAR)) {
  1345. | ZVAL_PTR_DTOR ZEND_ADDR_MEM_ZVAL(ZREG_FP, op.var), op_info, 0, cold, opline
  1346. || }
  1347. |.endmacro
  1348. |.macro SEPARATE_ARRAY, addr, op_info, cold
  1349. || if (RC_MAY_BE_N(op_info)) {
  1350. || if (Z_REG(addr) != ZREG_FP) {
  1351. | GET_ZVAL_LVAL ZREG_R0, addr
  1352. || if (RC_MAY_BE_1(op_info)) {
  1353. | cmp dword [r0], 1 // if (GC_REFCOUNT() > 1)
  1354. | jbe >2
  1355. || }
  1356. || if (Z_REG(addr) != ZREG_FCARG1 || Z_OFFSET(addr) != 0) {
  1357. | LOAD_ZVAL_ADDR FCARG1a, addr
  1358. || }
  1359. | EXT_CALL zend_jit_zval_array_dup, r0
  1360. |2:
  1361. | mov FCARG1a, r0
  1362. || } else {
  1363. | GET_ZVAL_LVAL ZREG_FCARG1, addr
  1364. || if (RC_MAY_BE_1(op_info)) {
  1365. | cmp dword [FCARG1a], 1 // if (GC_REFCOUNT() > 1)
  1366. || if (cold) {
  1367. | ja >1
  1368. |.cold_code
  1369. |1:
  1370. || } else {
  1371. | jbe >2
  1372. || }
  1373. || }
  1374. | IF_NOT_ZVAL_REFCOUNTED addr, >1
  1375. | GC_DELREF FCARG1a
  1376. |1:
  1377. | EXT_CALL zend_array_dup, r0
  1378. | SET_ZVAL_PTR addr, r0
  1379. | SET_ZVAL_TYPE_INFO addr, IS_ARRAY_EX
  1380. | mov FCARG1a, r0
  1381. || if (RC_MAY_BE_1(op_info)) {
  1382. || if (cold) {
  1383. | jmp >2
  1384. |.code
  1385. || }
  1386. || }
  1387. |2:
  1388. || }
  1389. || } else {
  1390. | GET_ZVAL_LVAL ZREG_FCARG1, addr
  1391. || }
  1392. |.endmacro
  1393. |.macro EFREE_REG_REFERENCE
  1394. ||#if ZEND_DEBUG
  1395. | xor FCARG2a, FCARG2a // filename
  1396. | .if X64WIN
  1397. | xor CARG3d, CARG3d // lineno
  1398. | xor CARG4, CARG4
  1399. | mov aword A5, 0
  1400. | EXT_CALL _efree, r0
  1401. | .elif X64
  1402. | xor CARG3d, CARG3d // lineno
  1403. | xor CARG4, CARG4
  1404. | xor CARG5, CARG5
  1405. | EXT_CALL _efree, r0
  1406. | .else
  1407. | sub r4, 4
  1408. | push 0
  1409. | push 0
  1410. | push 0 // lineno
  1411. | EXT_CALL _efree, r0
  1412. | add r4, 4
  1413. | .endif
  1414. ||#else
  1415. ||#ifdef HAVE_BUILTIN_CONSTANT_P
  1416. | EXT_CALL _efree_32, r0
  1417. ||#else
  1418. | EXT_CALL _efree, r0
  1419. ||#endif
  1420. ||#endif
  1421. |.endmacro
  1422. |.macro EFREE_REFERENCE, ptr
  1423. | mov FCARG1a, ptr
  1424. | EFREE_REG_REFERENCE
  1425. |.endmacro
  1426. |.macro EMALLOC, size, op_array, opline
  1427. ||#if ZEND_DEBUG
  1428. || const char *filename = op_array->filename ? op_array->filename->val : NULL;
  1429. | mov FCARG1a, size
  1430. | LOAD_ADDR FCARG2a, filename
  1431. | .if X64WIN
  1432. | mov CARG3d, opline->lineno
  1433. | xor CARG4, CARG4
  1434. | mov aword A5, 0
  1435. | EXT_CALL _emalloc, r0
  1436. | .elif X64
  1437. | mov CARG3d, opline->lineno
  1438. | xor CARG4, CARG4
  1439. | xor CARG5, CARG5
  1440. | EXT_CALL _emalloc, r0
  1441. | .else
  1442. | sub r4, 4
  1443. | push 0
  1444. | push 0
  1445. | push opline->lineno
  1446. | EXT_CALL _emalloc, r0
  1447. | add r4, 4
  1448. | .endif
  1449. ||#else
  1450. ||#ifdef HAVE_BUILTIN_CONSTANT_P
  1451. || if (size > 24 && size <= 32) {
  1452. | EXT_CALL _emalloc_32, r0
  1453. || } else {
  1454. | mov FCARG1a, size
  1455. | EXT_CALL _emalloc, r0
  1456. || }
  1457. ||#else
  1458. | mov FCARG1a, size
  1459. | EXT_CALL _emalloc, r0
  1460. ||#endif
  1461. ||#endif
  1462. |.endmacro
  1463. |.macro OBJ_RELEASE, reg, exit_label
  1464. | GC_DELREF Ra(reg)
  1465. | jne >1
  1466. | // zend_objects_store_del(obj);
  1467. || if (reg != ZREG_FCARG1) {
  1468. | mov FCARG1a, Ra(reg)
  1469. || }
  1470. | EXT_CALL zend_objects_store_del, r0
  1471. | jmp exit_label
  1472. |1:
  1473. | IF_GC_MAY_NOT_LEAK Ra(reg), >1
  1474. | // gc_possible_root(obj)
  1475. || if (reg != ZREG_FCARG1) {
  1476. | mov FCARG1a, Ra(reg)
  1477. || }
  1478. | EXT_CALL gc_possible_root, r0
  1479. |1:
  1480. |.endmacro
  1481. |.macro UNDEFINED_OFFSET, opline
  1482. || if (opline == last_valid_opline) {
  1483. || zend_jit_use_last_valid_opline();
  1484. | call ->undefined_offset_ex
  1485. || } else {
  1486. | SET_EX_OPLINE opline, r0
  1487. | call ->undefined_offset
  1488. || }
  1489. |.endmacro
  1490. |.macro UNDEFINED_INDEX, opline
  1491. || if (opline == last_valid_opline) {
  1492. || zend_jit_use_last_valid_opline();
  1493. | call ->undefined_index_ex
  1494. || } else {
  1495. | SET_EX_OPLINE opline, r0
  1496. | call ->undefined_index
  1497. || }
  1498. |.endmacro
  1499. |.macro CANNOT_ADD_ELEMENT, opline
  1500. || if (opline == last_valid_opline) {
  1501. || zend_jit_use_last_valid_opline();
  1502. | call ->cannot_add_element_ex
  1503. || } else {
  1504. | SET_EX_OPLINE opline, r0
  1505. | call ->cannot_add_element
  1506. || }
  1507. |.endmacro
  1508. static bool reuse_ip = 0;
  1509. static bool delayed_call_chain = 0;
  1510. static uint32_t delayed_call_level = 0;
  1511. static const zend_op *last_valid_opline = NULL;
  1512. static bool use_last_vald_opline = 0;
  1513. static bool track_last_valid_opline = 0;
  1514. static int jit_return_label = -1;
  1515. static uint32_t current_trace_num = 0;
  1516. static uint32_t allowed_opt_flags = 0;
  1517. static void zend_jit_track_last_valid_opline(void)
  1518. {
  1519. use_last_vald_opline = 0;
  1520. track_last_valid_opline = 1;
  1521. }
  1522. static void zend_jit_use_last_valid_opline(void)
  1523. {
  1524. if (track_last_valid_opline) {
  1525. use_last_vald_opline = 1;
  1526. track_last_valid_opline = 0;
  1527. }
  1528. }
  1529. static bool zend_jit_trace_uses_initial_ip(void)
  1530. {
  1531. return use_last_vald_opline;
  1532. }
  1533. static void zend_jit_set_last_valid_opline(const zend_op *target_opline)
  1534. {
  1535. if (!reuse_ip) {
  1536. track_last_valid_opline = 0;
  1537. last_valid_opline = target_opline;
  1538. }
  1539. }
  1540. static void zend_jit_reset_last_valid_opline(void)
  1541. {
  1542. track_last_valid_opline = 0;
  1543. last_valid_opline = NULL;
  1544. }
  1545. static void zend_jit_start_reuse_ip(void)
  1546. {
  1547. zend_jit_reset_last_valid_opline();
  1548. reuse_ip = 1;
  1549. }
  1550. static int zend_jit_reuse_ip(dasm_State **Dst)
  1551. {
  1552. if (!reuse_ip) {
  1553. zend_jit_start_reuse_ip();
  1554. | // call = EX(call);
  1555. | mov RX, EX->call
  1556. }
  1557. return 1;
  1558. }
  1559. static void zend_jit_stop_reuse_ip(void)
  1560. {
  1561. reuse_ip = 0;
  1562. }
  1563. static int zend_jit_interrupt_handler_stub(dasm_State **Dst)
  1564. {
  1565. |->interrupt_handler:
  1566. | SAVE_IP
  1567. | //EG(vm_interrupt) = 0;
  1568. | MEM_STORE_ZTS byte, executor_globals, vm_interrupt, 0, r0
  1569. | //if (EG(timed_out)) {
  1570. | MEM_CMP_ZTS byte, executor_globals, timed_out, 0, r0
  1571. | je >1
  1572. | //zend_timeout();
  1573. | EXT_CALL zend_timeout, r0
  1574. |1:
  1575. | //} else if (zend_interrupt_function) {
  1576. if (zend_interrupt_function) {
  1577. | //zend_interrupt_function(execute_data);
  1578. |.if X64
  1579. | mov CARG1, FP
  1580. | EXT_CALL zend_interrupt_function, r0
  1581. |.else
  1582. | mov aword A1, FP
  1583. | EXT_CALL zend_interrupt_function, r0
  1584. |.endif
  1585. | MEM_CMP_ZTS aword, executor_globals, exception, 0, r0
  1586. | je >1
  1587. | EXT_CALL zend_jit_exception_in_interrupt_handler_helper, r0
  1588. |1:
  1589. | //ZEND_VM_ENTER();
  1590. | //execute_data = EG(current_execute_data);
  1591. | MEM_LOAD_ZTS FP, aword, executor_globals, current_execute_data, r0
  1592. | LOAD_IP
  1593. }
  1594. | //ZEND_VM_CONTINUE()
  1595. if (zend_jit_vm_kind == ZEND_VM_KIND_HYBRID) {
  1596. | ADD_HYBRID_SPAD
  1597. | JMP_IP
  1598. } else if (GCC_GLOBAL_REGS) {
  1599. | add r4, SPAD // stack alignment
  1600. | JMP_IP
  1601. } else {
  1602. | mov FP, aword T2 // restore FP
  1603. | mov RX, aword T3 // restore IP
  1604. | add r4, NR_SPAD // stack alignment
  1605. | mov r0, 1 // ZEND_VM_ENTER
  1606. | ret
  1607. }
  1608. return 1;
  1609. }
  1610. static int zend_jit_exception_handler_stub(dasm_State **Dst)
  1611. {
  1612. |->exception_handler:
  1613. if (zend_jit_vm_kind == ZEND_VM_KIND_HYBRID) {
  1614. const void *handler = zend_get_opcode_handler_func(EG(exception_op));
  1615. | ADD_HYBRID_SPAD
  1616. | EXT_CALL handler, r0
  1617. | JMP_IP
  1618. } else {
  1619. const void *handler = EG(exception_op)->handler;
  1620. if (GCC_GLOBAL_REGS) {
  1621. | add r4, SPAD // stack alignment
  1622. | EXT_JMP handler, r0
  1623. } else {
  1624. | mov FCARG1a, FP
  1625. | EXT_CALL handler, r0
  1626. | mov FP, aword T2 // restore FP
  1627. | mov RX, aword T3 // restore IP
  1628. | add r4, NR_SPAD // stack alignment
  1629. | test eax, eax
  1630. | jl >1
  1631. | mov r0, 1 // ZEND_VM_ENTER
  1632. |1:
  1633. | ret
  1634. }
  1635. }
  1636. return 1;
  1637. }
  1638. static int zend_jit_exception_handler_undef_stub(dasm_State **Dst)
  1639. {
  1640. |->exception_handler_undef:
  1641. | MEM_LOAD_ZTS r0, aword, executor_globals, opline_before_exception, r0
  1642. | test byte OP:r0->result_type, (IS_TMP_VAR|IS_VAR)
  1643. | jz >1
  1644. | mov eax, dword OP:r0->result.var
  1645. | SET_Z_TYPE_INFO FP + r0, IS_UNDEF
  1646. |1:
  1647. | jmp ->exception_handler
  1648. return 1;
  1649. }
  1650. static int zend_jit_exception_handler_free_op1_op2_stub(dasm_State **Dst)
  1651. {
  1652. |->exception_handler_free_op1_op2:
  1653. | UNDEF_OPLINE_RESULT_IF_USED
  1654. | test byte OP:RX->op1_type, (IS_TMP_VAR|IS_VAR)
  1655. | je >9
  1656. | mov eax, dword OP:RX->op1.var
  1657. | add r0, FP
  1658. | ZVAL_PTR_DTOR ZEND_ADDR_MEM_ZVAL(ZREG_R0, 0), MAY_BE_ANY|MAY_BE_RC1|MAY_BE_RCN|MAY_BE_REF, 0, 0, NULL
  1659. |9:
  1660. | test byte OP:RX->op2_type, (IS_TMP_VAR|IS_VAR)
  1661. | je >9
  1662. | mov eax, dword OP:RX->op2.var
  1663. | add r0, FP
  1664. | ZVAL_PTR_DTOR ZEND_ADDR_MEM_ZVAL(ZREG_R0, 0), MAY_BE_ANY|MAY_BE_RC1|MAY_BE_RCN|MAY_BE_REF, 0, 0, NULL
  1665. |9:
  1666. | jmp ->exception_handler
  1667. return 1;
  1668. }
  1669. static int zend_jit_exception_handler_free_op2_stub(dasm_State **Dst)
  1670. {
  1671. |->exception_handler_free_op2:
  1672. | MEM_LOAD_ZTS RX, aword, executor_globals, opline_before_exception, r0
  1673. | UNDEF_OPLINE_RESULT_IF_USED
  1674. | test byte OP:RX->op2_type, (IS_TMP_VAR|IS_VAR)
  1675. | je >9
  1676. | mov eax, dword OP:RX->op2.var
  1677. | add r0, FP
  1678. | ZVAL_PTR_DTOR ZEND_ADDR_MEM_ZVAL(ZREG_R0, 0), MAY_BE_ANY|MAY_BE_RC1|MAY_BE_RCN|MAY_BE_REF, 0, 0, NULL
  1679. |9:
  1680. | jmp ->exception_handler
  1681. return 1;
  1682. }
  1683. static int zend_jit_leave_function_stub(dasm_State **Dst)
  1684. {
  1685. |->leave_function_handler:
  1686. | mov FCARG1d, dword [FP + offsetof(zend_execute_data, This.u1.type_info)]
  1687. if (zend_jit_vm_kind == ZEND_VM_KIND_HYBRID) {
  1688. | test FCARG1d, ZEND_CALL_TOP
  1689. | jnz >1
  1690. | EXT_CALL zend_jit_leave_nested_func_helper, r0
  1691. | ADD_HYBRID_SPAD
  1692. | JMP_IP
  1693. |1:
  1694. | EXT_CALL zend_jit_leave_top_func_helper, r0
  1695. | ADD_HYBRID_SPAD
  1696. | JMP_IP
  1697. } else {
  1698. if (GCC_GLOBAL_REGS) {
  1699. | add r4, SPAD
  1700. } else {
  1701. | mov FCARG2a, FP
  1702. | mov FP, aword T2 // restore FP
  1703. | mov RX, aword T3 // restore IP
  1704. | add r4, NR_SPAD
  1705. }
  1706. | test FCARG1d, ZEND_CALL_TOP
  1707. | jnz >1
  1708. | EXT_JMP zend_jit_leave_nested_func_helper, r0
  1709. |1:
  1710. | EXT_JMP zend_jit_leave_top_func_helper, r0
  1711. }
  1712. return 1;
  1713. }
  1714. static int zend_jit_leave_throw_stub(dasm_State **Dst)
  1715. {
  1716. |->leave_throw_handler:
  1717. | // if (opline->opcode != ZEND_HANDLE_EXCEPTION) {
  1718. if (GCC_GLOBAL_REGS) {
  1719. | cmp byte OP:IP->opcode, ZEND_HANDLE_EXCEPTION
  1720. | je >5
  1721. | // EG(opline_before_exception) = opline;
  1722. | MEM_STORE_ZTS aword, executor_globals, opline_before_exception, IP, r0
  1723. |5:
  1724. | // opline = EG(exception_op);
  1725. | LOAD_IP_ADDR_ZTS executor_globals, exception_op
  1726. | // HANDLE_EXCEPTION()
  1727. | jmp ->exception_handler
  1728. } else {
  1729. | GET_IP FCARG1a
  1730. | cmp byte OP:FCARG1a->opcode, ZEND_HANDLE_EXCEPTION
  1731. | je >5
  1732. | // EG(opline_before_exception) = opline;
  1733. | MEM_STORE_ZTS aword, executor_globals, opline_before_exception, FCARG1a, r0
  1734. |5:
  1735. | // opline = EG(exception_op);
  1736. | LOAD_IP_ADDR_ZTS executor_globals, exception_op
  1737. | mov FP, aword T2 // restore FP
  1738. | mov RX, aword T3 // restore IP
  1739. | add r4, NR_SPAD // stack alignment
  1740. | mov r0, 2 // ZEND_VM_LEAVE
  1741. | ret
  1742. }
  1743. return 1;
  1744. }
  1745. static int zend_jit_icall_throw_stub(dasm_State **Dst)
  1746. {
  1747. |->icall_throw_handler:
  1748. | // zend_rethrow_exception(zend_execute_data *execute_data)
  1749. | mov IP, aword EX->opline
  1750. | // if (EX(opline)->opcode != ZEND_HANDLE_EXCEPTION) {
  1751. | cmp byte OP:IP->opcode, ZEND_HANDLE_EXCEPTION
  1752. | je >1
  1753. | // EG(opline_before_exception) = opline;
  1754. | MEM_STORE_ZTS aword, executor_globals, opline_before_exception, IP, r0
  1755. |1:
  1756. | // opline = EG(exception_op);
  1757. | LOAD_IP_ADDR_ZTS executor_globals, exception_op
  1758. || if (GCC_GLOBAL_REGS) {
  1759. | mov aword EX->opline, IP
  1760. || }
  1761. | // HANDLE_EXCEPTION()
  1762. | jmp ->exception_handler
  1763. return 1;
  1764. }
  1765. static int zend_jit_throw_cannot_pass_by_ref_stub(dasm_State **Dst)
  1766. {
  1767. |->throw_cannot_pass_by_ref:
  1768. | mov r0, EX->opline
  1769. | mov ecx, dword OP:r0->result.var
  1770. | SET_Z_TYPE_INFO RX+r1, IS_UNDEF
  1771. | // last EX(call) frame may be delayed
  1772. | cmp RX, EX->call
  1773. | je >1
  1774. | mov r1, EX->call
  1775. | mov EX:RX->prev_execute_data, r1
  1776. | mov EX->call, RX
  1777. |1:
  1778. | mov RX, r0
  1779. | mov FCARG1d, dword OP:r0->op2.num
  1780. | EXT_CALL zend_cannot_pass_by_reference, r0
  1781. | cmp byte OP:RX->op1_type, IS_TMP_VAR
  1782. | jne >9
  1783. | mov eax, dword OP:RX->op1.var
  1784. | add r0, FP
  1785. | ZVAL_PTR_DTOR ZEND_ADDR_MEM_ZVAL(ZREG_R0, 0), MAY_BE_ANY|MAY_BE_RC1|MAY_BE_RCN|MAY_BE_REF, 0, 0, NULL
  1786. |9:
  1787. | jmp ->exception_handler
  1788. return 1;
  1789. }
  1790. static int zend_jit_undefined_offset_ex_stub(dasm_State **Dst)
  1791. {
  1792. |->undefined_offset_ex:
  1793. | SAVE_IP
  1794. | jmp ->undefined_offset
  1795. return 1;
  1796. }
  1797. static int zend_jit_undefined_offset_stub(dasm_State **Dst)
  1798. {
  1799. |->undefined_offset:
  1800. |.if X64WIN
  1801. | sub r4, 0x28
  1802. |.elif X64
  1803. | sub r4, 8
  1804. |.else
  1805. | sub r4, 12
  1806. |.endif
  1807. | mov r0, EX->opline
  1808. | mov ecx, dword OP:r0->result.var
  1809. | cmp byte OP:r0->op2_type, IS_CONST
  1810. | SET_Z_TYPE_INFO FP + r1, IS_NULL
  1811. | jne >2
  1812. |.if X64
  1813. | movsxd r1, dword OP:r0->op2.constant
  1814. | add r0, r1
  1815. |.else
  1816. | mov r0, aword OP:r0->op2.zv
  1817. |.endif
  1818. | jmp >3
  1819. |2:
  1820. | mov eax, dword OP:r0->op2.var
  1821. | add r0, FP
  1822. |3:
  1823. |.if X64WIN
  1824. | mov CARG1, E_WARNING
  1825. | LOAD_ADDR CARG2, "Undefined array key " ZEND_LONG_FMT
  1826. | mov CARG3, aword [r0]
  1827. | EXT_CALL zend_error, r0
  1828. | add r4, 0x28 // stack alignment
  1829. |.elif X64
  1830. | mov CARG1, E_WARNING
  1831. | LOAD_ADDR CARG2, "Undefined array key " ZEND_LONG_FMT
  1832. | mov CARG3, aword [r0]
  1833. | EXT_CALL zend_error, r0
  1834. | add r4, 8 // stack alignment
  1835. |.else
  1836. | sub r4, 4
  1837. | push aword [r0]
  1838. | push "Undefined array key " ZEND_LONG_FMT
  1839. | push E_WARNING
  1840. | EXT_CALL zend_error, r0
  1841. | add r4, 28
  1842. |.endif
  1843. | ret
  1844. return 1;
  1845. }
  1846. static int zend_jit_undefined_index_ex_stub(dasm_State **Dst)
  1847. {
  1848. |->undefined_index_ex:
  1849. | SAVE_IP
  1850. | jmp ->undefined_index
  1851. return 1;
  1852. }
  1853. static int zend_jit_undefined_index_stub(dasm_State **Dst)
  1854. {
  1855. |->undefined_index:
  1856. |.if X64WIN
  1857. | sub r4, 0x28
  1858. |.elif X64
  1859. | sub r4, 8
  1860. |.else
  1861. | sub r4, 12
  1862. |.endif
  1863. | mov r0, EX->opline
  1864. | mov ecx, dword OP:r0->result.var
  1865. | cmp byte OP:r0->op2_type, IS_CONST
  1866. | SET_Z_TYPE_INFO FP + r1, IS_NULL
  1867. | jne >2
  1868. |.if X64
  1869. | movsxd r1, dword OP:r0->op2.constant
  1870. | add r0, r1
  1871. |.else
  1872. | mov r0, aword OP:r0->op2.zv
  1873. |.endif
  1874. | jmp >3
  1875. |2:
  1876. | mov eax, dword OP:r0->op2.var
  1877. | add r0, FP
  1878. |3:
  1879. |.if X64WIN
  1880. | mov CARG1, E_WARNING
  1881. | LOAD_ADDR CARG2, "Undefined array key \"%s\""
  1882. | mov CARG3, aword [r0]
  1883. | add CARG3, offsetof(zend_string, val)
  1884. | EXT_CALL zend_error, r0
  1885. | add r4, 0x28
  1886. |.elif X64
  1887. | mov CARG1, E_WARNING
  1888. | LOAD_ADDR CARG2, "Undefined array key \"%s\""
  1889. | mov CARG3, aword [r0]
  1890. | add CARG3, offsetof(zend_string, val)
  1891. | EXT_CALL zend_error, r0
  1892. | add r4, 8
  1893. |.else
  1894. | sub r4, 4
  1895. | mov r0, aword [r0]
  1896. | add r0, offsetof(zend_string, val)
  1897. | push r0
  1898. | push "Undefined array key \"%s\""
  1899. | push E_WARNING
  1900. | EXT_CALL zend_error, r0
  1901. | add r4, 28
  1902. |.endif
  1903. | ret
  1904. return 1;
  1905. }
  1906. static int zend_jit_cannot_add_element_ex_stub(dasm_State **Dst)
  1907. {
  1908. |->cannot_add_element_ex:
  1909. | SAVE_IP
  1910. | jmp ->cannot_add_element
  1911. return 1;
  1912. }
  1913. static int zend_jit_cannot_add_element_stub(dasm_State **Dst)
  1914. {
  1915. |->cannot_add_element:
  1916. |.if X64WIN
  1917. | sub r4, 0x28
  1918. |.elif X64
  1919. | sub r4, 8
  1920. |.else
  1921. | sub r4, 12
  1922. |.endif
  1923. | mov r0, EX->opline
  1924. | cmp byte OP:r0->result_type, IS_UNUSED
  1925. | jz >1
  1926. | mov eax, dword OP:r0->result.var
  1927. | SET_Z_TYPE_INFO FP + r0, IS_NULL
  1928. |1:
  1929. |.if X64WIN
  1930. | xor CARG1, CARG1
  1931. | LOAD_ADDR CARG2, "Cannot add element to the array as the next element is already occupied"
  1932. | EXT_CALL zend_throw_error, r0
  1933. | add r4, 0x28
  1934. |.elif X64
  1935. | xor CARG1, CARG1
  1936. | LOAD_ADDR CARG2, "Cannot add element to the array as the next element is already occupied"
  1937. | EXT_CALL zend_throw_error, r0
  1938. | add r4, 8
  1939. |.else
  1940. | sub r4, 8
  1941. | push "Cannot add element to the array as the next element is already occupied"
  1942. | push 0
  1943. | EXT_CALL zend_throw_error, r0
  1944. | add r4, 28
  1945. |.endif
  1946. | ret
  1947. return 1;
  1948. }
  1949. static int zend_jit_undefined_function_stub(dasm_State **Dst)
  1950. {
  1951. |->undefined_function:
  1952. | mov r0, aword EX->opline
  1953. |.if X64
  1954. | xor CARG1, CARG1
  1955. | LOAD_ADDR CARG2, "Call to undefined function %s()"
  1956. | movsxd CARG3, dword [r0 + offsetof(zend_op, op2.constant)]
  1957. | mov CARG3, aword [r0 + CARG3]
  1958. | add CARG3, offsetof(zend_string, val)
  1959. | EXT_CALL zend_throw_error, r0
  1960. |.else
  1961. | mov r0, aword [r0 + offsetof(zend_op, op2.zv)]
  1962. | mov r0, aword [r0]
  1963. | add r0, offsetof(zend_string, val)
  1964. | mov aword A3, r0
  1965. | mov aword A2, "Call to undefined function %s()"
  1966. | mov aword A1, 0
  1967. | EXT_CALL zend_throw_error, r0
  1968. |.endif
  1969. | jmp ->exception_handler
  1970. return 1;
  1971. }
  1972. static int zend_jit_negative_shift_stub(dasm_State **Dst)
  1973. {
  1974. |->negative_shift:
  1975. | mov RX, EX->opline
  1976. |.if X64
  1977. |.if WIN
  1978. | LOAD_ADDR CARG1, &zend_ce_arithmetic_error
  1979. | mov CARG1, aword [CARG1]
  1980. |.else
  1981. | LOAD_ADDR CARG1, zend_ce_arithmetic_error
  1982. |.endif
  1983. | LOAD_ADDR CARG2, "Bit shift by negative number"
  1984. | EXT_CALL zend_throw_error, r0
  1985. |.else
  1986. | sub r4, 8
  1987. | push "Bit shift by negative number"
  1988. |.if WIN
  1989. | LOAD_ADDR r0, &zend_ce_arithmetic_error
  1990. | push aword [r0]
  1991. |.else
  1992. | PUSH_ADDR zend_ce_arithmetic_error, r0
  1993. |.endif
  1994. | EXT_CALL zend_throw_error, r0
  1995. | add r4, 16
  1996. |.endif
  1997. | jmp ->exception_handler_free_op1_op2
  1998. return 1;
  1999. }
  2000. static int zend_jit_mod_by_zero_stub(dasm_State **Dst)
  2001. {
  2002. |->mod_by_zero:
  2003. | mov RX, EX->opline
  2004. |.if X64
  2005. |.if WIN
  2006. | LOAD_ADDR CARG1, &zend_ce_division_by_zero_error
  2007. | mov CARG1, aword [CARG1]
  2008. |.else
  2009. | LOAD_ADDR CARG1, zend_ce_division_by_zero_error
  2010. |.endif
  2011. | LOAD_ADDR CARG2, "Modulo by zero"
  2012. | EXT_CALL zend_throw_error, r0
  2013. |.else
  2014. | sub r4, 8
  2015. | push "Modulo by zero"
  2016. |.if WIN
  2017. | LOAD_ADDR r0, &zend_ce_division_by_zero_error
  2018. | push aword [r0]
  2019. |.else
  2020. | PUSH_ADDR zend_ce_division_by_zero_error, r0
  2021. |.endif
  2022. | EXT_CALL zend_throw_error, r0
  2023. | add r4, 16
  2024. |.endif
  2025. | jmp ->exception_handler_free_op1_op2
  2026. return 1;
  2027. }
  2028. static int zend_jit_invalid_this_stub(dasm_State **Dst)
  2029. {
  2030. |->invalid_this:
  2031. | UNDEF_OPLINE_RESULT
  2032. |.if X64
  2033. | xor CARG1, CARG1
  2034. | LOAD_ADDR CARG2, "Using $this when not in object context"
  2035. | EXT_CALL zend_throw_error, r0
  2036. |.else
  2037. | sub r4, 8
  2038. | push "Using $this when not in object context"
  2039. | push 0
  2040. | EXT_CALL zend_throw_error, r0
  2041. | add r4, 16
  2042. |.endif
  2043. | jmp ->exception_handler
  2044. return 1;
  2045. }
  2046. static int zend_jit_double_one_stub(dasm_State **Dst)
  2047. {
  2048. |->one:
  2049. |.dword 0, 0x3ff00000
  2050. return 1;
  2051. }
  2052. static int zend_jit_hybrid_runtime_jit_stub(dasm_State **Dst)
  2053. {
  2054. if (zend_jit_vm_kind != ZEND_VM_KIND_HYBRID) {
  2055. return 1;
  2056. }
  2057. |->hybrid_runtime_jit:
  2058. | EXT_CALL zend_runtime_jit, r0
  2059. | JMP_IP
  2060. return 1;
  2061. }
  2062. static int zend_jit_hybrid_profile_jit_stub(dasm_State **Dst)
  2063. {
  2064. if (zend_jit_vm_kind != ZEND_VM_KIND_HYBRID) {
  2065. return 1;
  2066. }
  2067. |->hybrid_profile_jit:
  2068. | // ++zend_jit_profile_counter;
  2069. | .if X64
  2070. | LOAD_ADDR r0, &zend_jit_profile_counter
  2071. | inc aword [r0]
  2072. | .else
  2073. | inc aword [&zend_jit_profile_counter]
  2074. | .endif
  2075. | // op_array = (zend_op_array*)EX(func);
  2076. | mov r0, EX->func
  2077. | // run_time_cache = EX(run_time_cache);
  2078. | mov r2, EX->run_time_cache
  2079. | // jit_extension = (const void*)ZEND_FUNC_INFO(op_array);
  2080. | mov r0, aword [r0 + offsetof(zend_op_array, reserved[zend_func_info_rid])]
  2081. | // ++ZEND_COUNTER_INFO(op_array)
  2082. | inc aword [r2 + zend_jit_profile_counter_rid * sizeof(void*)]
  2083. | // return ((zend_vm_opcode_handler_t)jit_extension->orig_handler)()
  2084. | jmp aword [r0 + offsetof(zend_jit_op_array_extension, orig_handler)]
  2085. return 1;
  2086. }
  2087. static int zend_jit_hybrid_hot_code_stub(dasm_State **Dst)
  2088. {
  2089. if (zend_jit_vm_kind != ZEND_VM_KIND_HYBRID) {
  2090. return 1;
  2091. }
  2092. |->hybrid_hot_code:
  2093. | mov word [r2], ZEND_JIT_COUNTER_INIT
  2094. | mov FCARG1a, FP
  2095. | GET_IP FCARG2a
  2096. | EXT_CALL zend_jit_hot_func, r0
  2097. | JMP_IP
  2098. return 1;
  2099. }
  2100. /*
  2101. * This code is based Mike Pall's "Hashed profile counters" idea, implemented
  2102. * in LuaJIT. The full description may be found in "LuaJIT 2.0 intellectual
  2103. * property disclosure and research opportunities" email
  2104. * at http://lua-users.org/lists/lua-l/2009-11/msg00089.html
  2105. *
  2106. * In addition we use a variation of Knuth's multiplicative hash function
  2107. * described at https://code.i-harness.com/en/q/a21ce
  2108. *
  2109. * uint64_t hash(uint64_t x) {
  2110. * x = (x ^ (x >> 30)) * 0xbf58476d1ce4e5b9;
  2111. * x = (x ^ (x >> 27)) * 0x94d049bb133111eb;
  2112. * x = x ^ (x >> 31);
  2113. * return x;
  2114. * }
  2115. *
  2116. * uint_32_t hash(uint32_t x) {
  2117. * x = ((x >> 16) ^ x) * 0x45d9f3b;
  2118. * x = ((x >> 16) ^ x) * 0x45d9f3b;
  2119. * x = (x >> 16) ^ x;
  2120. * return x;
  2121. * }
  2122. *
  2123. */
  2124. static int zend_jit_hybrid_hot_counter_stub(dasm_State **Dst, uint32_t cost)
  2125. {
  2126. | mov r0, EX->func
  2127. | mov r1, aword [r0 + offsetof(zend_op_array, reserved[zend_func_info_rid])]
  2128. | mov r2, aword [r1 + offsetof(zend_jit_op_array_hot_extension, counter)]
  2129. | sub word [r2], cost
  2130. | jle ->hybrid_hot_code
  2131. | GET_IP r2
  2132. | sub r2, aword [r0 + offsetof(zend_op_array, opcodes)]
  2133. | // divide by sizeof(zend_op)
  2134. | .if X64
  2135. || ZEND_ASSERT(sizeof(zend_op) == 32);
  2136. | sar r2, 2
  2137. | .else
  2138. || ZEND_ASSERT(sizeof(zend_op) == 28);
  2139. | imul r2, 0xb6db6db7
  2140. | .endif
  2141. | .if X64
  2142. | jmp aword [r1+r2+offsetof(zend_jit_op_array_hot_extension, orig_handlers)]
  2143. | .else
  2144. | jmp aword [r1+r2+offsetof(zend_jit_op_array_hot_extension, orig_handlers)]
  2145. | .endif
  2146. return 1;
  2147. }
  2148. static int zend_jit_hybrid_func_hot_counter_stub(dasm_State **Dst)
  2149. {
  2150. if (zend_jit_vm_kind != ZEND_VM_KIND_HYBRID || !JIT_G(hot_func)) {
  2151. return 1;
  2152. }
  2153. |->hybrid_func_hot_counter:
  2154. return zend_jit_hybrid_hot_counter_stub(Dst,
  2155. ((ZEND_JIT_COUNTER_INIT + JIT_G(hot_func) - 1) / JIT_G(hot_func)));
  2156. }
  2157. static int zend_jit_hybrid_loop_hot_counter_stub(dasm_State **Dst)
  2158. {
  2159. if (zend_jit_vm_kind != ZEND_VM_KIND_HYBRID || !JIT_G(hot_loop)) {
  2160. return 1;
  2161. }
  2162. |->hybrid_loop_hot_counter:
  2163. return zend_jit_hybrid_hot_counter_stub(Dst,
  2164. ((ZEND_JIT_COUNTER_INIT + JIT_G(hot_loop) - 1) / JIT_G(hot_loop)));
  2165. }
  2166. static int zend_jit_hybrid_hot_trace_stub(dasm_State **Dst)
  2167. {
  2168. if (zend_jit_vm_kind != ZEND_VM_KIND_HYBRID) {
  2169. return 1;
  2170. }
  2171. |->hybrid_hot_trace:
  2172. | mov word [r2], ZEND_JIT_COUNTER_INIT
  2173. | mov FCARG1a, FP
  2174. | GET_IP FCARG2a
  2175. | EXT_CALL zend_jit_trace_hot_root, r0
  2176. | test eax, eax // TODO : remove this check at least for HYBRID VM ???
  2177. | jl >1
  2178. | MEM_LOAD_ZTS FP, aword, executor_globals, current_execute_data, r0
  2179. | LOAD_IP
  2180. | JMP_IP
  2181. |1:
  2182. | EXT_JMP zend_jit_halt_op->handler, r0
  2183. return 1;
  2184. }
  2185. static int zend_jit_hybrid_trace_counter_stub(dasm_State **Dst, uint32_t cost)
  2186. {
  2187. | mov r0, EX->func
  2188. | mov r1, aword [r0 + offsetof(zend_op_array, reserved[zend_func_info_rid])]
  2189. | mov r1, aword [r1 + offsetof(zend_jit_op_array_trace_extension, offset)]
  2190. | mov r2, aword [IP + r1 + offsetof(zend_op_trace_info, counter)]
  2191. | sub word [r2], cost
  2192. | jle ->hybrid_hot_trace
  2193. | jmp aword [IP + r1]
  2194. return 1;
  2195. }
  2196. static int zend_jit_hybrid_func_trace_counter_stub(dasm_State **Dst)
  2197. {
  2198. if (zend_jit_vm_kind != ZEND_VM_KIND_HYBRID || !JIT_G(hot_func)) {
  2199. return 1;
  2200. }
  2201. |->hybrid_func_trace_counter:
  2202. return zend_jit_hybrid_trace_counter_stub(Dst,
  2203. ((ZEND_JIT_COUNTER_INIT + JIT_G(hot_func) - 1) / JIT_G(hot_func)));
  2204. }
  2205. static int zend_jit_hybrid_ret_trace_counter_stub(dasm_State **Dst)
  2206. {
  2207. if (zend_jit_vm_kind != ZEND_VM_KIND_HYBRID || !JIT_G(hot_return)) {
  2208. return 1;
  2209. }
  2210. |->hybrid_ret_trace_counter:
  2211. return zend_jit_hybrid_trace_counter_stub(Dst,
  2212. ((ZEND_JIT_COUNTER_INIT + JIT_G(hot_return) - 1) / JIT_G(hot_return)));
  2213. }
  2214. static int zend_jit_hybrid_loop_trace_counter_stub(dasm_State **Dst)
  2215. {
  2216. if (zend_jit_vm_kind != ZEND_VM_KIND_HYBRID || !JIT_G(hot_loop)) {
  2217. return 1;
  2218. }
  2219. |->hybrid_loop_trace_counter:
  2220. return zend_jit_hybrid_trace_counter_stub(Dst,
  2221. ((ZEND_JIT_COUNTER_INIT + JIT_G(hot_loop) - 1) / JIT_G(hot_loop)));
  2222. }
  2223. static int zend_jit_trace_halt_stub(dasm_State **Dst)
  2224. {
  2225. |->trace_halt:
  2226. if (zend_jit_vm_kind == ZEND_VM_KIND_HYBRID) {
  2227. | ADD_HYBRID_SPAD
  2228. | EXT_JMP zend_jit_halt_op->handler, r0
  2229. } else if (GCC_GLOBAL_REGS) {
  2230. | add r4, SPAD // stack alignment
  2231. | xor IP, IP // PC must be zero
  2232. | ret
  2233. } else {
  2234. | mov FP, aword T2 // restore FP
  2235. | mov RX, aword T3 // restore IP
  2236. | add r4, NR_SPAD // stack alignment
  2237. | mov r0, -1 // ZEND_VM_RETURN
  2238. | ret
  2239. }
  2240. return 1;
  2241. }
  2242. static int zend_jit_trace_exit_stub(dasm_State **Dst)
  2243. {
  2244. |->trace_exit:
  2245. |
  2246. | // Save CPU registers
  2247. |.if X64
  2248. | sub r4, 16*8+16*8-8 /* CPU regs + SSE regs */
  2249. | mov aword [r4+15*8], r15
  2250. | mov aword [r4+11*8], r11
  2251. | mov aword [r4+10*8], r10
  2252. | mov aword [r4+9*8], r9
  2253. | mov aword [r4+8*8], r8
  2254. | mov aword [r4+7*8], rdi
  2255. | mov aword [r4+6*8], rsi
  2256. | mov aword [r4+2*8], rdx
  2257. | mov aword [r4+1*8], rcx
  2258. | mov aword [r4+0*8], rax
  2259. | mov FCARG1a, aword [r4+16*8+16*8-8] // exit_num = POP
  2260. | mov FCARG2a, r4
  2261. | movsd qword [r4+16*8+15*8], xmm15
  2262. | movsd qword [r4+16*8+14*8], xmm14
  2263. | movsd qword [r4+16*8+13*8], xmm13
  2264. | movsd qword [r4+16*8+12*8], xmm12
  2265. | movsd qword [r4+16*8+11*8], xmm11
  2266. | movsd qword [r4+16*8+10*8], xmm10
  2267. | movsd qword [r4+16*8+9*8], xmm9
  2268. | movsd qword [r4+16*8+8*8], xmm8
  2269. | movsd qword [r4+16*8+7*8], xmm7
  2270. | movsd qword [r4+16*8+6*8], xmm6
  2271. | movsd qword [r4+16*8+5*8], xmm5
  2272. | movsd qword [r4+16*8+4*8], xmm4
  2273. | movsd qword [r4+16*8+3*8], xmm3
  2274. | movsd qword [r4+16*8+2*8], xmm2
  2275. | movsd qword [r4+16*8+1*8], xmm1
  2276. | movsd qword [r4+16*8+0*8], xmm0
  2277. |.if X64WIN
  2278. | sub r4, 32 /* shadow space */
  2279. |.endif
  2280. |.else
  2281. | sub r4, 8*4+8*8-4 /* CPU regs + SSE regs */
  2282. | mov aword [r4+7*4], edi
  2283. | mov aword [r4+2*4], edx
  2284. | mov aword [r4+1*4], ecx
  2285. | mov aword [r4+0*4], eax
  2286. | mov FCARG1a, aword [r4+8*4+8*8-4] // exit_num = POP
  2287. | mov FCARG2a, r4
  2288. | movsd qword [r4+8*4+7*8], xmm7
  2289. | movsd qword [r4+8*4+6*8], xmm6
  2290. | movsd qword [r4+8*4+5*8], xmm5
  2291. | movsd qword [r4+8*4+4*8], xmm4
  2292. | movsd qword [r4+8*4+3*8], xmm3
  2293. | movsd qword [r4+8*4+2*8], xmm2
  2294. | movsd qword [r4+8*4+1*8], xmm1
  2295. | movsd qword [r4+8*4+0*8], xmm0
  2296. |.endif
  2297. |
  2298. | // EX(opline) = opline
  2299. | SAVE_IP
  2300. | // zend_jit_trace_exit(trace_num, exit_num)
  2301. | EXT_CALL zend_jit_trace_exit, r0
  2302. |.if X64WIN
  2303. | add r4, 16*8+16*8+32 /* CPU regs + SSE regs + shadow space */
  2304. |.elif X64
  2305. | add r4, 16*8+16*8 /* CPU regs + SSE regs */
  2306. |.else
  2307. | add r4, 8*4+8*8 /* CPU regs + SSE regs */
  2308. |.endif
  2309. | test eax, eax
  2310. | jne >1
  2311. | // execute_data = EG(current_execute_data)
  2312. | MEM_LOAD_ZTS FP, aword, executor_globals, current_execute_data, r0
  2313. | // opline = EX(opline)
  2314. | LOAD_IP
  2315. if (zend_jit_vm_kind == ZEND_VM_KIND_HYBRID) {
  2316. | ADD_HYBRID_SPAD
  2317. | JMP_IP
  2318. } else if (GCC_GLOBAL_REGS) {
  2319. | add r4, SPAD // stack alignment
  2320. | JMP_IP
  2321. } else {
  2322. | mov FP, aword T2 // restore FP
  2323. | mov RX, aword T3 // restore IP
  2324. | add r4, NR_SPAD // stack alignment
  2325. | mov r0, 1 // ZEND_VM_ENTER
  2326. | ret
  2327. }
  2328. |1:
  2329. | jl ->trace_halt
  2330. | // execute_data = EG(current_execute_data)
  2331. | MEM_LOAD_ZTS FP, aword, executor_globals, current_execute_data, r0
  2332. | // opline = EX(opline)
  2333. | LOAD_IP
  2334. | // check for interrupt (try to avoid this ???)
  2335. | MEM_CMP_ZTS byte, executor_globals, vm_interrupt, 0, r0
  2336. | jne ->interrupt_handler
  2337. if (zend_jit_vm_kind == ZEND_VM_KIND_HYBRID) {
  2338. | ADD_HYBRID_SPAD
  2339. | mov r0, EX->func
  2340. | mov r0, aword [r0 + offsetof(zend_op_array, reserved[zend_func_info_rid])]
  2341. | mov r0, aword [r0 + offsetof(zend_jit_op_array_trace_extension, offset)]
  2342. | jmp aword [IP + r0]
  2343. } else if (GCC_GLOBAL_REGS) {
  2344. | add r4, SPAD // stack alignment
  2345. | mov r0, EX->func
  2346. | mov r0, aword [r0 + offsetof(zend_op_array, reserved[zend_func_info_rid])]
  2347. | mov r0, aword [r0 + offsetof(zend_jit_op_array_trace_extension, offset)]
  2348. | jmp aword [IP + r0]
  2349. } else {
  2350. | mov IP, aword EX->opline
  2351. | mov FCARG1a, FP
  2352. | mov r0, EX->func
  2353. | mov r0, aword [r0 + offsetof(zend_op_array, reserved[zend_func_info_rid])]
  2354. | mov r0, aword [r0 + offsetof(zend_jit_op_array_trace_extension, offset)]
  2355. | call aword [IP + r0]
  2356. | test eax, eax
  2357. | jl ->trace_halt
  2358. | mov FP, aword T2 // restore FP
  2359. | mov RX, aword T3 // restore IP
  2360. | add r4, NR_SPAD // stack alignment
  2361. | mov r0, 1 // ZEND_VM_ENTER
  2362. | ret
  2363. }
  2364. return 1;
  2365. }
  2366. static int zend_jit_trace_escape_stub(dasm_State **Dst)
  2367. {
  2368. |->trace_escape:
  2369. |
  2370. if (zend_jit_vm_kind == ZEND_VM_KIND_HYBRID) {
  2371. | ADD_HYBRID_SPAD
  2372. | JMP_IP
  2373. } else if (GCC_GLOBAL_REGS) {
  2374. | add r4, SPAD // stack alignment
  2375. | JMP_IP
  2376. } else {
  2377. | mov FP, aword T2 // restore FP
  2378. | mov RX, aword T3 // restore IP
  2379. | add r4, NR_SPAD // stack alignment
  2380. | mov r0, 1 // ZEND_VM_ENTER
  2381. | ret
  2382. }
  2383. return 1;
  2384. }
  2385. /* Keep 32 exit points in a single code block */
  2386. #define ZEND_JIT_EXIT_POINTS_SPACING 4 // push byte + short jmp = bytes
  2387. #define ZEND_JIT_EXIT_POINTS_PER_GROUP 32 // number of continuous exit points
  2388. static int zend_jit_trace_exit_group_stub(dasm_State **Dst, uint32_t n)
  2389. {
  2390. uint32_t i;
  2391. for (i = 0; i < ZEND_JIT_EXIT_POINTS_PER_GROUP - 1; i++) {
  2392. | push byte i
  2393. | .byte 0xeb, (4*(ZEND_JIT_EXIT_POINTS_PER_GROUP-i)-6) // jmp >1
  2394. }
  2395. | push byte i
  2396. |// 1:
  2397. | add aword [r4], n
  2398. | jmp ->trace_exit
  2399. return 1;
  2400. }
  2401. #ifdef CONTEXT_THREADED_JIT
  2402. static int zend_jit_context_threaded_call_stub(dasm_State **Dst)
  2403. {
  2404. |->context_threaded_call:
  2405. | pop r0
  2406. if (zend_jit_vm_kind == ZEND_VM_KIND_HYBRID) {
  2407. | ADD_HYBRID_SPAD
  2408. | jmp aword [IP]
  2409. } else if (GCC_GLOBAL_REGS) {
  2410. | add r4, SPAD // stack alignment
  2411. | jmp aword [IP]
  2412. } else {
  2413. ZEND_UNREACHABLE();
  2414. // TODO: context threading can't work without GLOBAL REGS because we have to change
  2415. // the value of execute_data in execute_ex()
  2416. | mov FCARG1a, FP
  2417. | mov r0, aword [FP]
  2418. | mov FP, aword T2 // restore FP
  2419. | mov RX, aword T3 // restore IP
  2420. | add r4, NR_SPAD // stack alignment
  2421. | jmp aword [r0]
  2422. }
  2423. return 1;
  2424. }
  2425. #endif
  2426. static int zend_jit_assign_const_stub(dasm_State **Dst)
  2427. {
  2428. zend_jit_addr var_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  2429. zend_jit_addr val_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG2, 0);
  2430. uint32_t val_info = MAY_BE_ANY|MAY_BE_RC1|MAY_BE_RCN;
  2431. |->assign_const:
  2432. |.if X64WIN
  2433. | sub r4, 0x28
  2434. |.elif X64
  2435. | sub r4, 8
  2436. |.else
  2437. | sub r4, 12
  2438. |.endif
  2439. if (!zend_jit_assign_to_variable(
  2440. Dst, NULL,
  2441. var_addr, var_addr, -1, -1,
  2442. IS_CONST, val_addr, val_info,
  2443. 0, 0)) {
  2444. return 0;
  2445. }
  2446. |.if X64WIN
  2447. | add r4, 0x28
  2448. |.elif X64
  2449. | add r4, 8
  2450. |.else
  2451. | add r4, 12
  2452. |.endif
  2453. | ret
  2454. return 1;
  2455. }
  2456. static int zend_jit_assign_tmp_stub(dasm_State **Dst)
  2457. {
  2458. zend_jit_addr var_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  2459. zend_jit_addr val_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG2, 0);
  2460. uint32_t val_info = MAY_BE_ANY|MAY_BE_RC1|MAY_BE_RCN;
  2461. |->assign_tmp:
  2462. |.if X64WIN
  2463. | sub r4, 0x28
  2464. |.elif X64
  2465. | sub r4, 8
  2466. |.else
  2467. | sub r4, 12
  2468. |.endif
  2469. if (!zend_jit_assign_to_variable(
  2470. Dst, NULL,
  2471. var_addr, var_addr, -1, -1,
  2472. IS_TMP_VAR, val_addr, val_info,
  2473. 0, 0)) {
  2474. return 0;
  2475. }
  2476. |.if X64WIN
  2477. | add r4, 0x28
  2478. |.elif X64
  2479. | add r4, 8
  2480. |.else
  2481. | add r4, 12
  2482. |.endif
  2483. | ret
  2484. return 1;
  2485. }
  2486. static int zend_jit_assign_var_stub(dasm_State **Dst)
  2487. {
  2488. zend_jit_addr var_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  2489. zend_jit_addr val_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG2, 0);
  2490. uint32_t val_info = MAY_BE_ANY|MAY_BE_RC1|MAY_BE_RCN|MAY_BE_REF;
  2491. |->assign_var:
  2492. |.if X64WIN
  2493. | sub r4, 0x28
  2494. |.elif X64
  2495. | sub r4, 8
  2496. |.else
  2497. | sub r4, 12
  2498. |.endif
  2499. if (!zend_jit_assign_to_variable(
  2500. Dst, NULL,
  2501. var_addr, var_addr, -1, -1,
  2502. IS_VAR, val_addr, val_info,
  2503. 0, 0)) {
  2504. return 0;
  2505. }
  2506. |.if X64WIN
  2507. | add r4, 0x28
  2508. |.elif X64
  2509. | add r4, 8
  2510. |.else
  2511. | add r4, 12
  2512. |.endif
  2513. | ret
  2514. return 1;
  2515. }
  2516. static int zend_jit_assign_cv_noref_stub(dasm_State **Dst)
  2517. {
  2518. zend_jit_addr var_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  2519. zend_jit_addr val_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG2, 0);
  2520. uint32_t val_info = MAY_BE_ANY|MAY_BE_RC1|MAY_BE_RCN/*|MAY_BE_UNDEF*/;
  2521. |->assign_cv_noref:
  2522. |.if X64WIN
  2523. | sub r4, 0x28
  2524. |.elif X64
  2525. | sub r4, 8
  2526. |.else
  2527. | sub r4, 12
  2528. |.endif
  2529. if (!zend_jit_assign_to_variable(
  2530. Dst, NULL,
  2531. var_addr, var_addr, -1, -1,
  2532. IS_CV, val_addr, val_info,
  2533. 0, 0)) {
  2534. return 0;
  2535. }
  2536. |.if X64WIN
  2537. | add r4, 0x28
  2538. |.elif X64
  2539. | add r4, 8
  2540. |.else
  2541. | add r4, 12
  2542. |.endif
  2543. | ret
  2544. return 1;
  2545. }
  2546. static int zend_jit_assign_cv_stub(dasm_State **Dst)
  2547. {
  2548. zend_jit_addr var_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  2549. zend_jit_addr val_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG2, 0);
  2550. uint32_t val_info = MAY_BE_ANY|MAY_BE_RC1|MAY_BE_RCN|MAY_BE_REF/*|MAY_BE_UNDEF*/;
  2551. |->assign_cv:
  2552. |.if X64WIN
  2553. | sub r4, 0x28
  2554. |.elif X64
  2555. | sub r4, 8
  2556. |.else
  2557. | sub r4, 12
  2558. |.endif
  2559. if (!zend_jit_assign_to_variable(
  2560. Dst, NULL,
  2561. var_addr, var_addr, -1, -1,
  2562. IS_CV, val_addr, val_info,
  2563. 0, 0)) {
  2564. return 0;
  2565. }
  2566. |.if X64WIN
  2567. | add r4, 0x28
  2568. |.elif X64
  2569. | add r4, 8
  2570. |.else
  2571. | add r4, 12
  2572. |.endif
  2573. | ret
  2574. return 1;
  2575. }
  2576. static const zend_jit_stub zend_jit_stubs[] = {
  2577. JIT_STUB(interrupt_handler, SP_ADJ_JIT, SP_ADJ_VM),
  2578. JIT_STUB(exception_handler, SP_ADJ_JIT, SP_ADJ_VM),
  2579. JIT_STUB(exception_handler_undef, SP_ADJ_JIT, SP_ADJ_VM),
  2580. JIT_STUB(exception_handler_free_op1_op2, SP_ADJ_JIT, SP_ADJ_VM),
  2581. JIT_STUB(exception_handler_free_op2, SP_ADJ_JIT, SP_ADJ_VM),
  2582. JIT_STUB(leave_function, SP_ADJ_JIT, SP_ADJ_VM),
  2583. JIT_STUB(leave_throw, SP_ADJ_JIT, SP_ADJ_VM),
  2584. JIT_STUB(icall_throw, SP_ADJ_JIT, SP_ADJ_VM),
  2585. JIT_STUB(throw_cannot_pass_by_ref, SP_ADJ_JIT, SP_ADJ_VM),
  2586. JIT_STUB(undefined_offset, SP_ADJ_JIT, SP_ADJ_VM),
  2587. JIT_STUB(undefined_index, SP_ADJ_JIT, SP_ADJ_VM),
  2588. JIT_STUB(cannot_add_element, SP_ADJ_JIT, SP_ADJ_VM),
  2589. JIT_STUB(undefined_offset_ex, SP_ADJ_JIT, SP_ADJ_VM),
  2590. JIT_STUB(undefined_index_ex, SP_ADJ_JIT, SP_ADJ_VM),
  2591. JIT_STUB(cannot_add_element_ex, SP_ADJ_JIT, SP_ADJ_VM),
  2592. JIT_STUB(undefined_function, SP_ADJ_JIT, SP_ADJ_VM),
  2593. JIT_STUB(negative_shift, SP_ADJ_JIT, SP_ADJ_VM),
  2594. JIT_STUB(mod_by_zero, SP_ADJ_JIT, SP_ADJ_VM),
  2595. JIT_STUB(invalid_this, SP_ADJ_JIT, SP_ADJ_VM),
  2596. JIT_STUB(trace_halt, SP_ADJ_JIT, SP_ADJ_VM),
  2597. JIT_STUB(trace_exit, SP_ADJ_JIT, SP_ADJ_VM),
  2598. JIT_STUB(trace_escape, SP_ADJ_JIT, SP_ADJ_VM),
  2599. JIT_STUB(hybrid_runtime_jit, SP_ADJ_VM, SP_ADJ_NONE),
  2600. JIT_STUB(hybrid_profile_jit, SP_ADJ_VM, SP_ADJ_NONE),
  2601. JIT_STUB(hybrid_hot_code, SP_ADJ_VM, SP_ADJ_NONE),
  2602. JIT_STUB(hybrid_func_hot_counter, SP_ADJ_VM, SP_ADJ_NONE),
  2603. JIT_STUB(hybrid_loop_hot_counter, SP_ADJ_VM, SP_ADJ_NONE),
  2604. JIT_STUB(hybrid_hot_trace, SP_ADJ_VM, SP_ADJ_NONE),
  2605. JIT_STUB(hybrid_func_trace_counter, SP_ADJ_VM, SP_ADJ_NONE),
  2606. JIT_STUB(hybrid_ret_trace_counter, SP_ADJ_VM, SP_ADJ_NONE),
  2607. JIT_STUB(hybrid_loop_trace_counter, SP_ADJ_VM, SP_ADJ_NONE),
  2608. JIT_STUB(assign_const, SP_ADJ_RET, SP_ADJ_ASSIGN),
  2609. JIT_STUB(assign_tmp, SP_ADJ_RET, SP_ADJ_ASSIGN),
  2610. JIT_STUB(assign_var, SP_ADJ_RET, SP_ADJ_ASSIGN),
  2611. JIT_STUB(assign_cv_noref, SP_ADJ_RET, SP_ADJ_ASSIGN),
  2612. JIT_STUB(assign_cv, SP_ADJ_RET, SP_ADJ_ASSIGN),
  2613. JIT_STUB(double_one, SP_ADJ_NONE, SP_ADJ_NONE),
  2614. #ifdef CONTEXT_THREADED_JIT
  2615. JIT_STUB(context_threaded_call, SP_ADJ_RET, SP_ADJ_NONE),
  2616. #endif
  2617. };
  2618. #if ZTS && defined(ZEND_WIN32)
  2619. extern uint32_t _tls_index;
  2620. extern char *_tls_start;
  2621. extern char *_tls_end;
  2622. #endif
  2623. #ifdef HAVE_GDB
  2624. typedef struct _Unwind_Context _Unwind_Context;
  2625. typedef int (*_Unwind_Trace_Fn)(_Unwind_Context *, void *);
  2626. extern int _Unwind_Backtrace(_Unwind_Trace_Fn, void *);
  2627. extern uintptr_t _Unwind_GetCFA(_Unwind_Context *);
  2628. typedef struct _zend_jit_unwind_arg {
  2629. int cnt;
  2630. uintptr_t cfa[3];
  2631. } zend_jit_unwind_arg;
  2632. static int zend_jit_unwind_cb(_Unwind_Context *ctx, void *a)
  2633. {
  2634. zend_jit_unwind_arg *arg = (zend_jit_unwind_arg*)a;
  2635. arg->cfa[arg->cnt] = _Unwind_GetCFA(ctx);
  2636. arg->cnt++;
  2637. if (arg->cnt == 3) {
  2638. return 5; // _URC_END_OF_STACK
  2639. }
  2640. return 0; // _URC_NO_REASON;
  2641. }
  2642. static void ZEND_FASTCALL zend_jit_touch_vm_stack_data(void *vm_stack_data)
  2643. {
  2644. zend_jit_unwind_arg arg;
  2645. memset(&arg, 0, sizeof(arg));
  2646. _Unwind_Backtrace(zend_jit_unwind_cb, &arg);
  2647. if (arg.cnt == 3) {
  2648. sp_adj[SP_ADJ_VM] = arg.cfa[2] - arg.cfa[1];
  2649. }
  2650. }
  2651. extern void (ZEND_FASTCALL *zend_touch_vm_stack_data)(void *vm_stack_data);
  2652. static zend_never_inline void zend_jit_set_sp_adj_vm(void)
  2653. {
  2654. void (ZEND_FASTCALL *orig_zend_touch_vm_stack_data)(void *);
  2655. orig_zend_touch_vm_stack_data = zend_touch_vm_stack_data;
  2656. zend_touch_vm_stack_data = zend_jit_touch_vm_stack_data;
  2657. execute_ex(NULL); // set sp_adj[SP_ADJ_VM]
  2658. zend_touch_vm_stack_data = orig_zend_touch_vm_stack_data;
  2659. }
  2660. #endif
  2661. static int zend_jit_setup(void)
  2662. {
  2663. if (!zend_cpu_supports_sse2()) {
  2664. zend_error(E_CORE_ERROR, "CPU doesn't support SSE2");
  2665. return FAILURE;
  2666. }
  2667. allowed_opt_flags = 0;
  2668. if (zend_cpu_supports_avx()) {
  2669. allowed_opt_flags |= ZEND_JIT_CPU_AVX;
  2670. }
  2671. #if ZTS
  2672. # ifdef _WIN64
  2673. tsrm_tls_index = _tls_index * sizeof(void*);
  2674. /* To find offset of "_tsrm_ls_cache" in TLS segment we perform a linear scan of local TLS memory */
  2675. /* Probably, it might be better solution */
  2676. do {
  2677. void ***tls_mem = ((void**)__readgsqword(0x58))[_tls_index];
  2678. void *val = _tsrm_ls_cache;
  2679. size_t offset = 0;
  2680. size_t size = (char*)&_tls_end - (char*)&_tls_start;
  2681. while (offset < size) {
  2682. if (*tls_mem == val) {
  2683. tsrm_tls_offset = offset;
  2684. break;
  2685. }
  2686. tls_mem++;
  2687. offset += sizeof(void*);
  2688. }
  2689. if (offset >= size) {
  2690. // TODO: error message ???
  2691. return FAILURE;
  2692. }
  2693. } while(0);
  2694. # elif ZEND_WIN32
  2695. tsrm_tls_index = _tls_index * sizeof(void*);
  2696. /* To find offset of "_tsrm_ls_cache" in TLS segment we perform a linear scan of local TLS memory */
  2697. /* Probably, it might be better solution */
  2698. do {
  2699. void ***tls_mem = ((void***)__readfsdword(0x2c))[_tls_index];
  2700. void *val = _tsrm_ls_cache;
  2701. size_t offset = 0;
  2702. size_t size = (char*)&_tls_end - (char*)&_tls_start;
  2703. while (offset < size) {
  2704. if (*tls_mem == val) {
  2705. tsrm_tls_offset = offset;
  2706. break;
  2707. }
  2708. tls_mem++;
  2709. offset += sizeof(void*);
  2710. }
  2711. if (offset >= size) {
  2712. // TODO: error message ???
  2713. return FAILURE;
  2714. }
  2715. } while(0);
  2716. # elif defined(__APPLE__) && defined(__x86_64__)
  2717. tsrm_ls_cache_tcb_offset = tsrm_get_ls_cache_tcb_offset();
  2718. if (tsrm_ls_cache_tcb_offset == 0) {
  2719. size_t *ti;
  2720. __asm__(
  2721. "leaq __tsrm_ls_cache(%%rip),%0"
  2722. : "=r" (ti));
  2723. tsrm_tls_offset = ti[2];
  2724. tsrm_tls_index = ti[1] * 8;
  2725. }
  2726. # elif defined(__GNUC__) && defined(__x86_64__)
  2727. tsrm_ls_cache_tcb_offset = tsrm_get_ls_cache_tcb_offset();
  2728. if (tsrm_ls_cache_tcb_offset == 0) {
  2729. #if defined(__has_attribute) && __has_attribute(tls_model) && !defined(__FreeBSD__) && !defined(__OpenBSD__) && !defined(__MUSL__)
  2730. size_t ret;
  2731. asm ("movq _tsrm_ls_cache@gottpoff(%%rip),%0"
  2732. : "=r" (ret));
  2733. tsrm_ls_cache_tcb_offset = ret;
  2734. #else
  2735. size_t *ti;
  2736. __asm__(
  2737. "leaq _tsrm_ls_cache@tlsgd(%%rip), %0\n"
  2738. : "=a" (ti));
  2739. tsrm_tls_offset = ti[1];
  2740. tsrm_tls_index = ti[0] * 16;
  2741. #endif
  2742. }
  2743. # elif defined(__GNUC__) && defined(__i386__)
  2744. tsrm_ls_cache_tcb_offset = tsrm_get_ls_cache_tcb_offset();
  2745. if (tsrm_ls_cache_tcb_offset == 0) {
  2746. #if !defined(__FreeBSD__) && !defined(__OpenBSD__) && !defined(__MUSL__)
  2747. size_t ret;
  2748. asm ("leal _tsrm_ls_cache@ntpoff,%0\n"
  2749. : "=a" (ret));
  2750. tsrm_ls_cache_tcb_offset = ret;
  2751. #else
  2752. size_t *ti, _ebx, _ecx, _edx;
  2753. __asm__(
  2754. "call 1f\n"
  2755. ".subsection 1\n"
  2756. "1:\tmovl (%%esp), %%ebx\n\t"
  2757. "ret\n"
  2758. ".previous\n\t"
  2759. "addl $_GLOBAL_OFFSET_TABLE_, %%ebx\n\t"
  2760. "leal _tsrm_ls_cache@tlsldm(%%ebx), %0\n\t"
  2761. "call ___tls_get_addr@plt\n\t"
  2762. "leal _tsrm_ls_cache@tlsldm(%%ebx), %0\n"
  2763. : "=a" (ti), "=&b" (_ebx), "=&c" (_ecx), "=&d" (_edx));
  2764. tsrm_tls_offset = ti[1];
  2765. tsrm_tls_index = ti[0] * 8;
  2766. #endif
  2767. }
  2768. # endif
  2769. #endif
  2770. memset(sp_adj, 0, sizeof(sp_adj));
  2771. #ifdef HAVE_GDB
  2772. sp_adj[SP_ADJ_RET] = sizeof(void*);
  2773. |.if X64WIN
  2774. || sp_adj[SP_ADJ_ASSIGN] = sp_adj[SP_ADJ_RET] + 0x28; // sub r4, 0x28
  2775. |.elif X64
  2776. || sp_adj[SP_ADJ_ASSIGN] = sp_adj[SP_ADJ_RET] + 8; // sub r4, 8
  2777. |.else
  2778. || sp_adj[SP_ADJ_ASSIGN] = sp_adj[SP_ADJ_RET] + 12; // sub r4, 12
  2779. |.endif
  2780. if (zend_jit_vm_kind == ZEND_VM_KIND_HYBRID) {
  2781. zend_jit_set_sp_adj_vm(); // set sp_adj[SP_ADJ_VM]
  2782. #ifndef ZEND_VM_HYBRID_JIT_RED_ZONE_SIZE
  2783. || sp_adj[SP_ADJ_JIT] = sp_adj[SP_ADJ_VM] + HYBRID_SPAD; // sub r4, HYBRID_SPAD
  2784. #else
  2785. || sp_adj[SP_ADJ_JIT] = sp_adj[SP_ADJ_VM];
  2786. #endif
  2787. } else if (GCC_GLOBAL_REGS) {
  2788. || sp_adj[SP_ADJ_JIT] = sp_adj[SP_ADJ_RET] + SPAD; // sub r4, SPAD
  2789. } else {
  2790. || sp_adj[SP_ADJ_JIT] = sp_adj[SP_ADJ_RET] + NR_SPAD; // sub r4, NR_SPAD
  2791. }
  2792. #endif
  2793. return SUCCESS;
  2794. }
  2795. static ZEND_ATTRIBUTE_UNUSED int zend_jit_trap(dasm_State **Dst)
  2796. {
  2797. | int3
  2798. return 1;
  2799. }
  2800. static int zend_jit_align_func(dasm_State **Dst)
  2801. {
  2802. reuse_ip = 0;
  2803. delayed_call_chain = 0;
  2804. last_valid_opline = NULL;
  2805. use_last_vald_opline = 0;
  2806. track_last_valid_opline = 0;
  2807. jit_return_label = -1;
  2808. |.align 16
  2809. return 1;
  2810. }
  2811. static int zend_jit_prologue(dasm_State **Dst)
  2812. {
  2813. if (zend_jit_vm_kind == ZEND_VM_KIND_HYBRID) {
  2814. | SUB_HYBRID_SPAD
  2815. } else if (GCC_GLOBAL_REGS) {
  2816. | sub r4, SPAD // stack alignment
  2817. } else {
  2818. | sub r4, NR_SPAD // stack alignment
  2819. | mov aword T2, FP // save FP
  2820. | mov aword T3, RX // save IP
  2821. | mov FP, FCARG1a
  2822. }
  2823. return 1;
  2824. }
  2825. static int zend_jit_label(dasm_State **Dst, unsigned int label)
  2826. {
  2827. |=>label:
  2828. return 1;
  2829. }
  2830. static int zend_jit_save_call_chain(dasm_State **Dst, uint32_t call_level)
  2831. {
  2832. | // call->prev_execute_data = EX(call);
  2833. if (call_level == 1) {
  2834. | mov aword EX:RX->prev_execute_data, 0
  2835. } else {
  2836. | mov r0, EX->call
  2837. | mov EX:RX->prev_execute_data, r0
  2838. }
  2839. | // EX(call) = call;
  2840. | mov EX->call, RX
  2841. delayed_call_chain = 0;
  2842. return 1;
  2843. }
  2844. static int zend_jit_set_ip(dasm_State **Dst, const zend_op *opline)
  2845. {
  2846. if (last_valid_opline == opline) {
  2847. zend_jit_use_last_valid_opline();
  2848. } else if (GCC_GLOBAL_REGS && last_valid_opline) {
  2849. zend_jit_use_last_valid_opline();
  2850. | ADD_IP (opline - last_valid_opline) * sizeof(zend_op);
  2851. } else {
  2852. | LOAD_IP_ADDR opline
  2853. }
  2854. zend_jit_set_last_valid_opline(opline);
  2855. return 1;
  2856. }
  2857. static int zend_jit_set_ip_ex(dasm_State **Dst, const zend_op *opline, bool set_ip_reg)
  2858. {
  2859. if (last_valid_opline == opline) {
  2860. zend_jit_use_last_valid_opline();
  2861. } else if (GCC_GLOBAL_REGS && last_valid_opline) {
  2862. zend_jit_use_last_valid_opline();
  2863. | ADD_IP (opline - last_valid_opline) * sizeof(zend_op);
  2864. } else if (!GCC_GLOBAL_REGS && set_ip_reg) {
  2865. | LOAD_ADDR RX, opline
  2866. | mov aword EX->opline, RX
  2867. } else {
  2868. | LOAD_IP_ADDR opline
  2869. }
  2870. zend_jit_set_last_valid_opline(opline);
  2871. return 1;
  2872. }
  2873. static int zend_jit_set_valid_ip(dasm_State **Dst, const zend_op *opline)
  2874. {
  2875. if (delayed_call_chain) {
  2876. if (!zend_jit_save_call_chain(Dst, delayed_call_level)) {
  2877. return 0;
  2878. }
  2879. }
  2880. if (!zend_jit_set_ip(Dst, opline)) {
  2881. return 0;
  2882. }
  2883. reuse_ip = 0;
  2884. return 1;
  2885. }
  2886. static int zend_jit_check_timeout(dasm_State **Dst, const zend_op *opline, const void *exit_addr)
  2887. {
  2888. #if 0
  2889. if (!zend_jit_set_valid_ip(Dst, opline)) {
  2890. return 0;
  2891. }
  2892. | MEM_CMP_ZTS byte, executor_globals, vm_interrupt, 0, r0
  2893. | jne ->interrupt_handler
  2894. #else
  2895. | MEM_CMP_ZTS byte, executor_globals, vm_interrupt, 0, r0
  2896. if (exit_addr) {
  2897. | jne &exit_addr
  2898. } else if (last_valid_opline == opline) {
  2899. || zend_jit_use_last_valid_opline();
  2900. | jne ->interrupt_handler
  2901. } else {
  2902. | jne >1
  2903. |.cold_code
  2904. |1:
  2905. | LOAD_IP_ADDR opline
  2906. | jmp ->interrupt_handler
  2907. |.code
  2908. }
  2909. #endif
  2910. return 1;
  2911. }
  2912. static int zend_jit_trace_end_loop(dasm_State **Dst, int loop_label, const void *timeout_exit_addr)
  2913. {
  2914. if (timeout_exit_addr) {
  2915. | MEM_CMP_ZTS byte, executor_globals, vm_interrupt, 0, r0
  2916. | je =>loop_label
  2917. | jmp &timeout_exit_addr
  2918. } else {
  2919. | jmp =>loop_label
  2920. }
  2921. return 1;
  2922. }
  2923. static int zend_jit_check_exception(dasm_State **Dst)
  2924. {
  2925. | MEM_CMP_ZTS aword, executor_globals, exception, 0, r0
  2926. | jne ->exception_handler
  2927. return 1;
  2928. }
  2929. static int zend_jit_check_exception_undef_result(dasm_State **Dst, const zend_op *opline)
  2930. {
  2931. if (opline->result_type & (IS_TMP_VAR|IS_VAR)) {
  2932. | MEM_CMP_ZTS aword, executor_globals, exception, 0, r0
  2933. | jne ->exception_handler_undef
  2934. return 1;
  2935. }
  2936. return zend_jit_check_exception(Dst);
  2937. }
  2938. static int zend_jit_trace_begin(dasm_State **Dst, uint32_t trace_num, zend_jit_trace_info *parent, uint32_t exit_num)
  2939. {
  2940. zend_regset regset = ZEND_REGSET_SCRATCH;
  2941. #if ZTS
  2942. if (1) {
  2943. #else
  2944. if ((sizeof(void*) == 8 && !IS_SIGNED_32BIT(&EG(jit_trace_num)))) {
  2945. #endif
  2946. /* assignment to EG(jit_trace_num) shouldn't clober CPU register used by deoptimizer */
  2947. if (parent) {
  2948. int i;
  2949. int parent_vars_count = parent->exit_info[exit_num].stack_size;
  2950. zend_jit_trace_stack *parent_stack =
  2951. parent->stack_map +
  2952. parent->exit_info[exit_num].stack_offset;
  2953. for (i = 0; i < parent_vars_count; i++) {
  2954. if (STACK_REG(parent_stack, i) != ZREG_NONE) {
  2955. if (STACK_REG(parent_stack, i) < ZREG_NUM) {
  2956. ZEND_REGSET_EXCL(regset, STACK_REG(parent_stack, i));
  2957. } else if (STACK_REG(parent_stack, i) == ZREG_ZVAL_COPY_GPR0) {
  2958. ZEND_REGSET_EXCL(regset, ZREG_R0);
  2959. }
  2960. }
  2961. }
  2962. }
  2963. }
  2964. if (parent && parent->exit_info[exit_num].flags & ZEND_JIT_EXIT_METHOD_CALL) {
  2965. ZEND_REGSET_EXCL(regset, ZREG_R0);
  2966. }
  2967. current_trace_num = trace_num;
  2968. | // EG(jit_trace_num) = trace_num;
  2969. if (regset == ZEND_REGSET_EMPTY) {
  2970. | push r0
  2971. | MEM_STORE_ZTS dword, executor_globals, jit_trace_num, trace_num, r0
  2972. | pop r0
  2973. } else {
  2974. zend_reg tmp = ZEND_REGSET_FIRST(regset);
  2975. | MEM_STORE_ZTS dword, executor_globals, jit_trace_num, trace_num, Ra(tmp)
  2976. (void)tmp;
  2977. }
  2978. return 1;
  2979. }
  2980. static int zend_jit_trace_end(dasm_State **Dst, zend_jit_trace_info *t)
  2981. {
  2982. |.cold_code
  2983. |=>1: // end of the code
  2984. |.code
  2985. return 1;
  2986. }
  2987. /* This taken from LuaJIT. Thanks to Mike Pall. */
  2988. static uint32_t _asm_x86_inslen(const uint8_t* p)
  2989. {
  2990. static const uint8_t map_op1[256] = {
  2991. 0x92,0x92,0x92,0x92,0x52,0x45,0x51,0x51,0x92,0x92,0x92,0x92,0x52,0x45,0x51,0x20,
  2992. 0x92,0x92,0x92,0x92,0x52,0x45,0x51,0x51,0x92,0x92,0x92,0x92,0x52,0x45,0x51,0x51,
  2993. 0x92,0x92,0x92,0x92,0x52,0x45,0x10,0x51,0x92,0x92,0x92,0x92,0x52,0x45,0x10,0x51,
  2994. 0x92,0x92,0x92,0x92,0x52,0x45,0x10,0x51,0x92,0x92,0x92,0x92,0x52,0x45,0x10,0x51,
  2995. #if defined(__x86_64__) || defined(_M_X64)
  2996. 0x10,0x10,0x10,0x10,0x10,0x10,0x10,0x10,0x14,0x14,0x14,0x14,0x14,0x14,0x14,0x14,
  2997. #else
  2998. 0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,
  2999. #endif
  3000. 0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,
  3001. 0x51,0x51,0x92,0x92,0x10,0x10,0x12,0x11,0x45,0x86,0x52,0x93,0x51,0x51,0x51,0x51,
  3002. 0x52,0x52,0x52,0x52,0x52,0x52,0x52,0x52,0x52,0x52,0x52,0x52,0x52,0x52,0x52,0x52,
  3003. 0x93,0x86,0x93,0x93,0x92,0x92,0x92,0x92,0x92,0x92,0x92,0x92,0x92,0x92,0x92,0x92,
  3004. 0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x51,0x47,0x51,0x51,0x51,0x51,0x51,
  3005. #if defined(__x86_64__) || defined(_M_X64)
  3006. 0x59,0x59,0x59,0x59,0x51,0x51,0x51,0x51,0x52,0x45,0x51,0x51,0x51,0x51,0x51,0x51,
  3007. #else
  3008. 0x55,0x55,0x55,0x55,0x51,0x51,0x51,0x51,0x52,0x45,0x51,0x51,0x51,0x51,0x51,0x51,
  3009. #endif
  3010. 0x52,0x52,0x52,0x52,0x52,0x52,0x52,0x52,0x05,0x05,0x05,0x05,0x05,0x05,0x05,0x05,
  3011. 0x93,0x93,0x53,0x51,0x70,0x71,0x93,0x86,0x54,0x51,0x53,0x51,0x51,0x52,0x51,0x51,
  3012. 0x92,0x92,0x92,0x92,0x52,0x52,0x51,0x51,0x92,0x92,0x92,0x92,0x92,0x92,0x92,0x92,
  3013. 0x52,0x52,0x52,0x52,0x52,0x52,0x52,0x52,0x45,0x45,0x47,0x52,0x51,0x51,0x51,0x51,
  3014. 0x10,0x51,0x10,0x10,0x51,0x51,0x63,0x66,0x51,0x51,0x51,0x51,0x51,0x51,0x92,0x92
  3015. };
  3016. static const uint8_t map_op2[256] = {
  3017. 0x93,0x93,0x93,0x93,0x52,0x52,0x52,0x52,0x52,0x52,0x51,0x52,0x51,0x93,0x52,0x94,
  3018. 0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,
  3019. 0x53,0x53,0x53,0x53,0x53,0x53,0x53,0x53,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,
  3020. 0x52,0x52,0x52,0x52,0x52,0x52,0x52,0x52,0x34,0x51,0x35,0x51,0x51,0x51,0x51,0x51,
  3021. 0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,
  3022. 0x53,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,
  3023. 0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,
  3024. 0x94,0x54,0x54,0x54,0x93,0x93,0x93,0x52,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,
  3025. 0x46,0x46,0x46,0x46,0x46,0x46,0x46,0x46,0x46,0x46,0x46,0x46,0x46,0x46,0x46,0x46,
  3026. 0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,
  3027. 0x52,0x52,0x52,0x93,0x94,0x93,0x51,0x51,0x52,0x52,0x52,0x93,0x94,0x93,0x93,0x93,
  3028. 0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x94,0x93,0x93,0x93,0x93,0x93,
  3029. 0x93,0x93,0x94,0x93,0x94,0x94,0x94,0x93,0x52,0x52,0x52,0x52,0x52,0x52,0x52,0x52,
  3030. 0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,
  3031. 0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,
  3032. 0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x93,0x52
  3033. };
  3034. uint32_t result = 0;
  3035. uint32_t prefixes = 0;
  3036. uint32_t x = map_op1[*p];
  3037. for (;;) {
  3038. switch (x >> 4) {
  3039. case 0:
  3040. return result + x + (prefixes & 4);
  3041. case 1:
  3042. prefixes |= x;
  3043. x = map_op1[*++p];
  3044. result++;
  3045. break;
  3046. case 2:
  3047. x = map_op2[*++p];
  3048. break;
  3049. case 3:
  3050. p++;
  3051. goto mrm;
  3052. case 4:
  3053. result -= (prefixes & 2);
  3054. /* fallthrough */
  3055. case 5:
  3056. return result + (x & 15);
  3057. case 6: /* Group 3. */
  3058. if (p[1] & 0x38) {
  3059. x = 2;
  3060. } else if ((prefixes & 2) && (x == 0x66)) {
  3061. x = 4;
  3062. }
  3063. goto mrm;
  3064. case 7: /* VEX c4/c5. */
  3065. #if !defined(__x86_64__) && !defined(_M_X64)
  3066. if (p[1] < 0xc0) {
  3067. x = 2;
  3068. goto mrm;
  3069. }
  3070. #endif
  3071. if (x == 0x70) {
  3072. x = *++p & 0x1f;
  3073. result++;
  3074. if (x >= 2) {
  3075. p += 2;
  3076. result += 2;
  3077. goto mrm;
  3078. }
  3079. }
  3080. p++;
  3081. result++;
  3082. x = map_op2[*++p];
  3083. break;
  3084. case 8:
  3085. result -= (prefixes & 2);
  3086. /* fallthrough */
  3087. case 9:
  3088. mrm:
  3089. /* ModR/M and possibly SIB. */
  3090. result += (x & 15);
  3091. x = *++p;
  3092. switch (x >> 6) {
  3093. case 0:
  3094. if ((x & 7) == 5) {
  3095. return result + 4;
  3096. }
  3097. break;
  3098. case 1:
  3099. result++;
  3100. break;
  3101. case 2:
  3102. result += 4;
  3103. break;
  3104. case 3:
  3105. return result;
  3106. }
  3107. if ((x & 7) == 4) {
  3108. result++;
  3109. if (x < 0x40 && (p[1] & 7) == 5) {
  3110. result += 4;
  3111. }
  3112. }
  3113. return result;
  3114. }
  3115. }
  3116. }
  3117. typedef ZEND_SET_ALIGNED(1, uint16_t unaligned_uint16_t);
  3118. typedef ZEND_SET_ALIGNED(1, int32_t unaligned_int32_t);
  3119. static int zend_jit_patch(const void *code, size_t size, uint32_t jmp_table_size, const void *from_addr, const void *to_addr)
  3120. {
  3121. int ret = 0;
  3122. uint8_t *p, *end;
  3123. if (jmp_table_size) {
  3124. const void **jmp_slot = (const void **)((char*)code + ZEND_MM_ALIGNED_SIZE_EX(size, sizeof(void*)));
  3125. do {
  3126. if (*jmp_slot == from_addr) {
  3127. *jmp_slot = to_addr;
  3128. ret++;
  3129. }
  3130. jmp_slot++;
  3131. } while (--jmp_table_size);
  3132. }
  3133. p = (uint8_t*)code;
  3134. end = p + size - 5;
  3135. while (p < end) {
  3136. if ((*(unaligned_uint16_t*)p & 0xf0ff) == 0x800f && p + *(unaligned_int32_t*)(p+2) == (uint8_t*)from_addr - 6) {
  3137. *(unaligned_int32_t*)(p+2) = ((uint8_t*)to_addr - (p + 6));
  3138. ret++;
  3139. } else if (*p == 0xe9 && p + *(unaligned_int32_t*)(p+1) == (uint8_t*)from_addr - 5) {
  3140. *(unaligned_int32_t*)(p+1) = ((uint8_t*)to_addr - (p + 5));
  3141. ret++;
  3142. }
  3143. p += _asm_x86_inslen(p);
  3144. }
  3145. #ifdef HAVE_VALGRIND
  3146. VALGRIND_DISCARD_TRANSLATIONS(code, size);
  3147. #endif
  3148. return ret;
  3149. }
  3150. static int zend_jit_link_side_trace(const void *code, size_t size, uint32_t jmp_table_size, uint32_t exit_num, const void *addr)
  3151. {
  3152. return zend_jit_patch(code, size, jmp_table_size, zend_jit_trace_get_exit_addr(exit_num), addr);
  3153. }
  3154. static int zend_jit_trace_link_to_root(dasm_State **Dst, zend_jit_trace_info *t, const void *timeout_exit_addr)
  3155. {
  3156. const void *link_addr;
  3157. size_t prologue_size;
  3158. /* Skip prologue. */
  3159. // TODO: don't hardcode this ???
  3160. if (zend_jit_vm_kind == ZEND_VM_KIND_HYBRID) {
  3161. #ifdef ZEND_VM_HYBRID_JIT_RED_ZONE_SIZE
  3162. prologue_size = 0;
  3163. #elif defined(__x86_64__) || defined(_M_X64)
  3164. // sub r4, HYBRID_SPAD
  3165. prologue_size = 4;
  3166. #else
  3167. // sub r4, HYBRID_SPAD
  3168. prologue_size = 3;
  3169. #endif
  3170. } else if (GCC_GLOBAL_REGS) {
  3171. // sub r4, SPAD // stack alignment
  3172. #if defined(__x86_64__) || defined(_M_X64)
  3173. prologue_size = 4;
  3174. #else
  3175. prologue_size = 3;
  3176. #endif
  3177. } else {
  3178. // sub r4, NR_SPAD // stack alignment
  3179. // mov aword T2, FP // save FP
  3180. // mov aword T3, RX // save IP
  3181. // mov FP, FCARG1a
  3182. #if defined(__x86_64__) || defined(_M_X64)
  3183. prologue_size = 17;
  3184. #else
  3185. prologue_size = 13;
  3186. #endif
  3187. }
  3188. link_addr = (const void*)((const char*)t->code_start + prologue_size);
  3189. if (timeout_exit_addr) {
  3190. /* Check timeout for links to LOOP */
  3191. | MEM_CMP_ZTS byte, executor_globals, vm_interrupt, 0, r0
  3192. | je &link_addr
  3193. | jmp &timeout_exit_addr
  3194. } else {
  3195. | jmp &link_addr
  3196. }
  3197. return 1;
  3198. }
  3199. static int zend_jit_trace_return(dasm_State **Dst, bool original_handler, const zend_op *opline)
  3200. {
  3201. #if 0
  3202. | jmp ->trace_escape
  3203. #else
  3204. if (zend_jit_vm_kind == ZEND_VM_KIND_HYBRID) {
  3205. | ADD_HYBRID_SPAD
  3206. if (!original_handler) {
  3207. | JMP_IP
  3208. } else {
  3209. | mov r0, EX->func
  3210. | mov r0, aword [r0 + offsetof(zend_op_array, reserved[zend_func_info_rid])]
  3211. | mov r0, aword [r0 + offsetof(zend_jit_op_array_trace_extension, offset)]
  3212. | jmp aword [IP + r0]
  3213. }
  3214. } else if (GCC_GLOBAL_REGS) {
  3215. | add r4, SPAD // stack alignment
  3216. if (!original_handler) {
  3217. | JMP_IP
  3218. } else {
  3219. | mov r0, EX->func
  3220. | mov r0, aword [r0 + offsetof(zend_op_array, reserved[zend_func_info_rid])]
  3221. | mov r0, aword [r0 + offsetof(zend_jit_op_array_trace_extension, offset)]
  3222. | jmp aword [IP + r0]
  3223. }
  3224. } else {
  3225. if (original_handler) {
  3226. | mov FCARG1a, FP
  3227. | mov r0, EX->func
  3228. | mov r0, aword [r0 + offsetof(zend_op_array, reserved[zend_func_info_rid])]
  3229. | mov r0, aword [r0 + offsetof(zend_jit_op_array_trace_extension, offset)]
  3230. | call aword [IP + r0]
  3231. }
  3232. | mov FP, aword T2 // restore FP
  3233. | mov RX, aword T3 // restore IP
  3234. | add r4, NR_SPAD // stack alignment
  3235. if (!original_handler || !opline ||
  3236. (opline->opcode != ZEND_RETURN
  3237. && opline->opcode != ZEND_RETURN_BY_REF
  3238. && opline->opcode != ZEND_GENERATOR_RETURN
  3239. && opline->opcode != ZEND_GENERATOR_CREATE
  3240. && opline->opcode != ZEND_YIELD
  3241. && opline->opcode != ZEND_YIELD_FROM)) {
  3242. | mov r0, 2 // ZEND_VM_LEAVE
  3243. }
  3244. | ret
  3245. }
  3246. #endif
  3247. return 1;
  3248. }
  3249. static int zend_jit_type_guard(dasm_State **Dst, const zend_op *opline, uint32_t var, uint8_t type)
  3250. {
  3251. int32_t exit_point = zend_jit_trace_get_exit_point(opline, 0);
  3252. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  3253. if (!exit_addr) {
  3254. return 0;
  3255. }
  3256. | IF_NOT_Z_TYPE FP + var, type, &exit_addr
  3257. return 1;
  3258. }
  3259. static int zend_jit_scalar_type_guard(dasm_State **Dst, const zend_op *opline, uint32_t var)
  3260. {
  3261. int32_t exit_point = zend_jit_trace_get_exit_point(opline, 0);
  3262. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  3263. if (!exit_addr) {
  3264. return 0;
  3265. }
  3266. | cmp byte [FP+var+offsetof(zval, u1.v.type)], IS_STRING
  3267. | jae &exit_addr
  3268. return 1;
  3269. }
  3270. static int zend_jit_packed_guard(dasm_State **Dst, const zend_op *opline, uint32_t var, uint32_t op_info)
  3271. {
  3272. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_PACKED_GUARD);
  3273. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  3274. if (!exit_addr) {
  3275. return 0;
  3276. }
  3277. | GET_ZVAL_LVAL ZREG_FCARG1, ZEND_ADDR_MEM_ZVAL(ZREG_FP, var)
  3278. if (op_info & MAY_BE_ARRAY_PACKED) {
  3279. | test dword [FCARG1a + offsetof(zend_array, u.flags)], HASH_FLAG_PACKED
  3280. | jz &exit_addr
  3281. } else {
  3282. | test dword [FCARG1a + offsetof(zend_array, u.flags)], HASH_FLAG_PACKED
  3283. | jnz &exit_addr
  3284. }
  3285. return 1;
  3286. }
  3287. static int zend_jit_trace_handler(dasm_State **Dst, const zend_op_array *op_array, const zend_op *opline, int may_throw, zend_jit_trace_rec *trace)
  3288. {
  3289. zend_jit_op_array_trace_extension *jit_extension =
  3290. (zend_jit_op_array_trace_extension*)ZEND_FUNC_INFO(op_array);
  3291. size_t offset = jit_extension->offset;
  3292. const void *handler =
  3293. (zend_vm_opcode_handler_t)ZEND_OP_TRACE_INFO(opline, offset)->call_handler;
  3294. if (!zend_jit_set_valid_ip(Dst, opline)) {
  3295. return 0;
  3296. }
  3297. if (!GCC_GLOBAL_REGS) {
  3298. | mov FCARG1a, FP
  3299. }
  3300. | EXT_CALL handler, r0
  3301. if (may_throw
  3302. && opline->opcode != ZEND_RETURN
  3303. && opline->opcode != ZEND_RETURN_BY_REF) {
  3304. | MEM_CMP_ZTS aword, executor_globals, exception, 0, r1
  3305. | jne ->exception_handler
  3306. }
  3307. while (trace->op != ZEND_JIT_TRACE_VM && trace->op != ZEND_JIT_TRACE_END) {
  3308. trace++;
  3309. }
  3310. if (!GCC_GLOBAL_REGS
  3311. && (trace->op != ZEND_JIT_TRACE_END || trace->stop != ZEND_JIT_TRACE_STOP_RETURN)) {
  3312. if (opline->opcode == ZEND_RETURN ||
  3313. opline->opcode == ZEND_RETURN_BY_REF ||
  3314. opline->opcode == ZEND_DO_UCALL ||
  3315. opline->opcode == ZEND_DO_FCALL_BY_NAME ||
  3316. opline->opcode == ZEND_DO_FCALL ||
  3317. opline->opcode == ZEND_GENERATOR_CREATE) {
  3318. | MEM_LOAD_ZTS FP, aword, executor_globals, current_execute_data, r1
  3319. }
  3320. }
  3321. if (zend_jit_trace_may_exit(op_array, opline)) {
  3322. if (opline->opcode == ZEND_RETURN ||
  3323. opline->opcode == ZEND_RETURN_BY_REF ||
  3324. opline->opcode == ZEND_GENERATOR_CREATE) {
  3325. if (zend_jit_vm_kind == ZEND_VM_KIND_HYBRID) {
  3326. if (trace->op != ZEND_JIT_TRACE_END ||
  3327. (trace->stop != ZEND_JIT_TRACE_STOP_RETURN &&
  3328. trace->stop != ZEND_JIT_TRACE_STOP_INTERPRETER)) {
  3329. /* this check may be handled by the following OPLINE guard or jmp [IP] */
  3330. | cmp IP, zend_jit_halt_op
  3331. | je ->trace_halt
  3332. }
  3333. } else if (GCC_GLOBAL_REGS) {
  3334. | test IP, IP
  3335. | je ->trace_halt
  3336. } else {
  3337. | test eax, eax
  3338. | jl ->trace_halt
  3339. }
  3340. } else if (opline->opcode == ZEND_EXIT ||
  3341. opline->opcode == ZEND_GENERATOR_RETURN ||
  3342. opline->opcode == ZEND_YIELD ||
  3343. opline->opcode == ZEND_YIELD_FROM) {
  3344. | jmp ->trace_halt
  3345. }
  3346. if (trace->op != ZEND_JIT_TRACE_END ||
  3347. (trace->stop != ZEND_JIT_TRACE_STOP_RETURN &&
  3348. trace->stop != ZEND_JIT_TRACE_STOP_INTERPRETER)) {
  3349. const zend_op *next_opline = trace->opline;
  3350. const zend_op *exit_opline = NULL;
  3351. uint32_t exit_point;
  3352. const void *exit_addr;
  3353. uint32_t old_info = 0;
  3354. uint32_t old_res_info = 0;
  3355. zend_jit_trace_stack *stack = JIT_G(current_frame)->stack;
  3356. if (zend_is_smart_branch(opline)) {
  3357. bool exit_if_true = 0;
  3358. exit_opline = zend_jit_trace_get_exit_opline(trace, opline + 1, &exit_if_true);
  3359. } else {
  3360. switch (opline->opcode) {
  3361. case ZEND_JMPZ:
  3362. case ZEND_JMPNZ:
  3363. case ZEND_JMPZ_EX:
  3364. case ZEND_JMPNZ_EX:
  3365. case ZEND_JMP_SET:
  3366. case ZEND_COALESCE:
  3367. case ZEND_JMP_NULL:
  3368. case ZEND_FE_RESET_R:
  3369. case ZEND_FE_RESET_RW:
  3370. exit_opline = (trace->opline == opline + 1) ?
  3371. OP_JMP_ADDR(opline, opline->op2) :
  3372. opline + 1;
  3373. break;
  3374. case ZEND_JMPZNZ:
  3375. exit_opline = (trace->opline == OP_JMP_ADDR(opline, opline->op2)) ?
  3376. ZEND_OFFSET_TO_OPLINE(opline, opline->extended_value) :
  3377. OP_JMP_ADDR(opline, opline->op2);
  3378. break;
  3379. case ZEND_FE_FETCH_R:
  3380. case ZEND_FE_FETCH_RW:
  3381. exit_opline = (trace->opline == opline + 1) ?
  3382. ZEND_OFFSET_TO_OPLINE(opline, opline->extended_value) :
  3383. opline + 1;
  3384. break;
  3385. }
  3386. }
  3387. switch (opline->opcode) {
  3388. case ZEND_FE_FETCH_R:
  3389. case ZEND_FE_FETCH_RW:
  3390. if (opline->op2_type != IS_UNUSED) {
  3391. old_info = STACK_INFO(stack, EX_VAR_TO_NUM(opline->op2.var));
  3392. SET_STACK_TYPE(stack, EX_VAR_TO_NUM(opline->op2.var), IS_UNKNOWN, 1);
  3393. }
  3394. break;
  3395. }
  3396. if (opline->result_type == IS_VAR || opline->result_type == IS_TMP_VAR) {
  3397. old_res_info = STACK_INFO(stack, EX_VAR_TO_NUM(opline->result.var));
  3398. SET_STACK_TYPE(stack, EX_VAR_TO_NUM(opline->result.var), IS_UNKNOWN, 1);
  3399. }
  3400. exit_point = zend_jit_trace_get_exit_point(exit_opline, 0);
  3401. exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  3402. if (opline->result_type == IS_VAR || opline->result_type == IS_TMP_VAR) {
  3403. SET_STACK_INFO(stack, EX_VAR_TO_NUM(opline->result.var), old_res_info);
  3404. }
  3405. switch (opline->opcode) {
  3406. case ZEND_FE_FETCH_R:
  3407. case ZEND_FE_FETCH_RW:
  3408. if (opline->op2_type != IS_UNUSED) {
  3409. SET_STACK_INFO(stack, EX_VAR_TO_NUM(opline->op2.var), old_info);
  3410. }
  3411. break;
  3412. }
  3413. if (!exit_addr) {
  3414. return 0;
  3415. }
  3416. | CMP_IP next_opline
  3417. | jne &exit_addr
  3418. }
  3419. }
  3420. zend_jit_set_last_valid_opline(trace->opline);
  3421. return 1;
  3422. }
  3423. static int zend_jit_handler(dasm_State **Dst, const zend_op *opline, int may_throw)
  3424. {
  3425. const void *handler;
  3426. if (zend_jit_vm_kind == ZEND_VM_KIND_HYBRID) {
  3427. handler = zend_get_opcode_handler_func(opline);
  3428. } else {
  3429. handler = opline->handler;
  3430. }
  3431. if (!zend_jit_set_valid_ip(Dst, opline)) {
  3432. return 0;
  3433. }
  3434. if (!GCC_GLOBAL_REGS) {
  3435. | mov FCARG1a, FP
  3436. }
  3437. | EXT_CALL handler, r0
  3438. if (may_throw) {
  3439. zend_jit_check_exception(Dst);
  3440. }
  3441. /* Skip the following OP_DATA */
  3442. switch (opline->opcode) {
  3443. case ZEND_ASSIGN_DIM:
  3444. case ZEND_ASSIGN_OBJ:
  3445. case ZEND_ASSIGN_STATIC_PROP:
  3446. case ZEND_ASSIGN_DIM_OP:
  3447. case ZEND_ASSIGN_OBJ_OP:
  3448. case ZEND_ASSIGN_STATIC_PROP_OP:
  3449. case ZEND_ASSIGN_STATIC_PROP_REF:
  3450. case ZEND_ASSIGN_OBJ_REF:
  3451. zend_jit_set_last_valid_opline(opline + 2);
  3452. break;
  3453. default:
  3454. zend_jit_set_last_valid_opline(opline + 1);
  3455. break;
  3456. }
  3457. return 1;
  3458. }
  3459. static int zend_jit_tail_handler(dasm_State **Dst, const zend_op *opline)
  3460. {
  3461. if (!zend_jit_set_valid_ip(Dst, opline)) {
  3462. return 0;
  3463. }
  3464. if (zend_jit_vm_kind == ZEND_VM_KIND_HYBRID) {
  3465. if (opline->opcode == ZEND_DO_UCALL ||
  3466. opline->opcode == ZEND_DO_FCALL_BY_NAME ||
  3467. opline->opcode == ZEND_DO_FCALL ||
  3468. opline->opcode == ZEND_RETURN) {
  3469. /* Use inlined HYBRID VM handler */
  3470. const void *handler = opline->handler;
  3471. | ADD_HYBRID_SPAD
  3472. | EXT_JMP handler, r0
  3473. } else {
  3474. const void *handler = zend_get_opcode_handler_func(opline);
  3475. | EXT_CALL handler, r0
  3476. | ADD_HYBRID_SPAD
  3477. | JMP_IP
  3478. }
  3479. } else {
  3480. const void *handler = opline->handler;
  3481. if (GCC_GLOBAL_REGS) {
  3482. | add r4, SPAD // stack alignment
  3483. } else {
  3484. | mov FCARG1a, FP
  3485. | mov FP, aword T2 // restore FP
  3486. | mov RX, aword T3 // restore IP
  3487. | add r4, NR_SPAD // stack alignment
  3488. }
  3489. | EXT_JMP handler, r0
  3490. }
  3491. zend_jit_reset_last_valid_opline();
  3492. return 1;
  3493. }
  3494. static int zend_jit_trace_opline_guard(dasm_State **Dst, const zend_op *opline)
  3495. {
  3496. uint32_t exit_point = zend_jit_trace_get_exit_point(NULL, 0);
  3497. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  3498. if (!exit_addr) {
  3499. return 0;
  3500. }
  3501. | CMP_IP opline
  3502. | jne &exit_addr
  3503. zend_jit_set_last_valid_opline(opline);
  3504. return 1;
  3505. }
  3506. static int zend_jit_jmp(dasm_State **Dst, unsigned int target_label)
  3507. {
  3508. | jmp =>target_label
  3509. return 1;
  3510. }
  3511. static int zend_jit_cond_jmp(dasm_State **Dst, const zend_op *next_opline, unsigned int target_label)
  3512. {
  3513. | CMP_IP next_opline
  3514. | jne =>target_label
  3515. zend_jit_set_last_valid_opline(next_opline);
  3516. return 1;
  3517. }
  3518. #ifdef CONTEXT_THREADED_JIT
  3519. static int zend_jit_context_threaded_call(dasm_State **Dst, const zend_op *opline, unsigned int next_block)
  3520. {
  3521. if (!zend_jit_handler(Dst, opline, 1)) return 0;
  3522. if (opline->opcode == ZEND_DO_UCALL) {
  3523. | call ->context_threaded_call
  3524. } else {
  3525. const zend_op *next_opline = opline + 1;
  3526. | CMP_IP next_opline
  3527. | je =>next_block
  3528. | call ->context_threaded_call
  3529. }
  3530. return 1;
  3531. }
  3532. #endif
  3533. static int zend_jit_call(dasm_State **Dst, const zend_op *opline, unsigned int next_block)
  3534. {
  3535. #ifdef CONTEXT_THREADED_JIT
  3536. return zend_jit_context_threaded_call(Dst, opline, next_block);
  3537. #else
  3538. return zend_jit_tail_handler(Dst, opline);
  3539. #endif
  3540. }
  3541. static int zend_jit_spill_store(dasm_State **Dst, zend_jit_addr src, zend_jit_addr dst, uint32_t info, bool set_type)
  3542. {
  3543. ZEND_ASSERT(Z_MODE(src) == IS_REG);
  3544. ZEND_ASSERT(Z_MODE(dst) == IS_MEM_ZVAL);
  3545. if ((info & MAY_BE_ANY) == MAY_BE_LONG) {
  3546. | SET_ZVAL_LVAL dst, Ra(Z_REG(src))
  3547. if (set_type &&
  3548. (Z_REG(dst) != ZREG_FP ||
  3549. !JIT_G(current_frame) ||
  3550. STACK_MEM_TYPE(JIT_G(current_frame)->stack, EX_VAR_TO_NUM(Z_OFFSET(dst))) != IS_LONG)) {
  3551. | SET_ZVAL_TYPE_INFO dst, IS_LONG
  3552. }
  3553. } else if ((info & MAY_BE_ANY) == MAY_BE_DOUBLE) {
  3554. | DOUBLE_SET_ZVAL_DVAL dst, Z_REG(src)
  3555. if (set_type &&
  3556. (Z_REG(dst) != ZREG_FP ||
  3557. !JIT_G(current_frame) ||
  3558. STACK_MEM_TYPE(JIT_G(current_frame)->stack, EX_VAR_TO_NUM(Z_OFFSET(dst))) != IS_DOUBLE)) {
  3559. | SET_ZVAL_TYPE_INFO dst, IS_DOUBLE
  3560. }
  3561. } else {
  3562. ZEND_UNREACHABLE();
  3563. }
  3564. return 1;
  3565. }
  3566. static int zend_jit_load_reg(dasm_State **Dst, zend_jit_addr src, zend_jit_addr dst, uint32_t info)
  3567. {
  3568. ZEND_ASSERT(Z_MODE(src) == IS_MEM_ZVAL);
  3569. ZEND_ASSERT(Z_MODE(dst) == IS_REG);
  3570. if ((info & MAY_BE_ANY) == MAY_BE_LONG) {
  3571. | GET_ZVAL_LVAL Z_REG(dst), src
  3572. } else if ((info & MAY_BE_ANY) == MAY_BE_DOUBLE) {
  3573. | DOUBLE_GET_ZVAL_DVAL Z_REG(dst), src
  3574. } else {
  3575. ZEND_UNREACHABLE();
  3576. }
  3577. return 1;
  3578. }
  3579. static int zend_jit_store_var(dasm_State **Dst, uint32_t info, int var, zend_reg reg, bool set_type)
  3580. {
  3581. zend_jit_addr src = ZEND_ADDR_REG(reg);
  3582. zend_jit_addr dst = ZEND_ADDR_MEM_ZVAL(ZREG_FP, EX_NUM_TO_VAR(var));
  3583. return zend_jit_spill_store(Dst, src, dst, info, set_type);
  3584. }
  3585. static int zend_jit_store_var_type(dasm_State **Dst, int var, uint32_t type)
  3586. {
  3587. zend_jit_addr dst = ZEND_ADDR_MEM_ZVAL(ZREG_FP, EX_NUM_TO_VAR(var));
  3588. | SET_ZVAL_TYPE_INFO dst, type
  3589. return 1;
  3590. }
  3591. static int zend_jit_store_var_if_necessary(dasm_State **Dst, int var, zend_jit_addr src, uint32_t info)
  3592. {
  3593. if (Z_MODE(src) == IS_REG && Z_STORE(src)) {
  3594. zend_jit_addr dst = ZEND_ADDR_MEM_ZVAL(ZREG_FP, var);
  3595. return zend_jit_spill_store(Dst, src, dst, info, 1);
  3596. }
  3597. return 1;
  3598. }
  3599. static int zend_jit_store_var_if_necessary_ex(dasm_State **Dst, int var, zend_jit_addr src, uint32_t info, zend_jit_addr old, uint32_t old_info)
  3600. {
  3601. if (Z_MODE(src) == IS_REG && Z_STORE(src)) {
  3602. zend_jit_addr dst = ZEND_ADDR_MEM_ZVAL(ZREG_FP, var);
  3603. bool set_type = 1;
  3604. if ((info & (MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF)) ==
  3605. (old_info & (MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF))) {
  3606. if (Z_MODE(old) != IS_REG || Z_LOAD(old) || Z_STORE(old)) {
  3607. set_type = 0;
  3608. }
  3609. }
  3610. return zend_jit_spill_store(Dst, src, dst, info, set_type);
  3611. }
  3612. return 1;
  3613. }
  3614. static int zend_jit_load_var(dasm_State **Dst, uint32_t info, int var, zend_reg reg)
  3615. {
  3616. zend_jit_addr src = ZEND_ADDR_MEM_ZVAL(ZREG_FP, EX_NUM_TO_VAR(var));
  3617. zend_jit_addr dst = ZEND_ADDR_REG(reg);
  3618. return zend_jit_load_reg(Dst, src, dst, info);
  3619. }
  3620. static int zend_jit_invalidate_var_if_necessary(dasm_State **Dst, zend_uchar op_type, zend_jit_addr addr, znode_op op)
  3621. {
  3622. if ((op_type & (IS_TMP_VAR|IS_VAR)) && Z_MODE(addr) == IS_REG && !Z_LOAD(addr) && !Z_STORE(addr)) {
  3623. zend_jit_addr dst = ZEND_ADDR_MEM_ZVAL(ZREG_FP, op.var);
  3624. | SET_ZVAL_TYPE_INFO dst, IS_UNDEF
  3625. }
  3626. return 1;
  3627. }
  3628. static int zend_jit_update_regs(dasm_State **Dst, uint32_t var, zend_jit_addr src, zend_jit_addr dst, uint32_t info)
  3629. {
  3630. if (!zend_jit_same_addr(src, dst)) {
  3631. if (Z_MODE(src) == IS_REG) {
  3632. if (Z_MODE(dst) == IS_REG) {
  3633. if ((info & MAY_BE_ANY) == MAY_BE_LONG) {
  3634. | mov Ra(Z_REG(dst)), Ra(Z_REG(src))
  3635. } else if ((info & MAY_BE_ANY) == MAY_BE_DOUBLE) {
  3636. | SSE_AVX_INS movaps, vmovaps, xmm(Z_REG(dst)-ZREG_XMM0), xmm(Z_REG(src)-ZREG_XMM0)
  3637. } else {
  3638. ZEND_UNREACHABLE();
  3639. }
  3640. if (!Z_LOAD(src) && !Z_STORE(src) && Z_STORE(dst)) {
  3641. zend_jit_addr var_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, var);
  3642. if (!zend_jit_spill_store(Dst, dst, var_addr, info,
  3643. JIT_G(trigger) != ZEND_JIT_ON_HOT_TRACE ||
  3644. JIT_G(current_frame) == NULL ||
  3645. STACK_MEM_TYPE(JIT_G(current_frame)->stack, EX_VAR_TO_NUM(var)) == IS_UNKNOWN ||
  3646. (1 << STACK_MEM_TYPE(JIT_G(current_frame)->stack, EX_VAR_TO_NUM(var))) != (info & MAY_BE_ANY)
  3647. )) {
  3648. return 0;
  3649. }
  3650. }
  3651. } else if (Z_MODE(dst) == IS_MEM_ZVAL) {
  3652. if (!Z_LOAD(src) && !Z_STORE(src)) {
  3653. if (!zend_jit_spill_store(Dst, src, dst, info,
  3654. JIT_G(trigger) != ZEND_JIT_ON_HOT_TRACE ||
  3655. JIT_G(current_frame) == NULL ||
  3656. STACK_MEM_TYPE(JIT_G(current_frame)->stack, EX_VAR_TO_NUM(var)) == IS_UNKNOWN ||
  3657. (1 << STACK_MEM_TYPE(JIT_G(current_frame)->stack, EX_VAR_TO_NUM(var))) != (info & MAY_BE_ANY)
  3658. )) {
  3659. return 0;
  3660. }
  3661. }
  3662. } else {
  3663. ZEND_UNREACHABLE();
  3664. }
  3665. } else if (Z_MODE(src) == IS_MEM_ZVAL) {
  3666. if (Z_MODE(dst) == IS_REG) {
  3667. if (!zend_jit_load_reg(Dst, src, dst, info)) {
  3668. return 0;
  3669. }
  3670. } else {
  3671. ZEND_UNREACHABLE();
  3672. }
  3673. } else {
  3674. ZEND_UNREACHABLE();
  3675. }
  3676. } else if (Z_MODE(dst) == IS_REG && Z_STORE(dst)) {
  3677. dst = ZEND_ADDR_MEM_ZVAL(ZREG_FP, var);
  3678. if (!zend_jit_spill_store(Dst, src, dst, info,
  3679. JIT_G(trigger) != ZEND_JIT_ON_HOT_TRACE ||
  3680. JIT_G(current_frame) == NULL ||
  3681. STACK_MEM_TYPE(JIT_G(current_frame)->stack, EX_VAR_TO_NUM(var)) == IS_UNKNOWN ||
  3682. (1 << STACK_MEM_TYPE(JIT_G(current_frame)->stack, EX_VAR_TO_NUM(var))) != (info & MAY_BE_ANY)
  3683. )) {
  3684. return 0;
  3685. }
  3686. }
  3687. return 1;
  3688. }
  3689. static int zend_jit_escape_if_undef_r0(dasm_State **Dst, int var, uint32_t flags, const zend_op *opline)
  3690. {
  3691. zend_jit_addr val_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R0, 0);
  3692. | IF_NOT_ZVAL_TYPE val_addr, IS_UNDEF, >1
  3693. if (flags & ZEND_JIT_EXIT_RESTORE_CALL) {
  3694. if (!zend_jit_save_call_chain(Dst, -1)) {
  3695. return 0;
  3696. }
  3697. }
  3698. ZEND_ASSERT(opline);
  3699. if ((opline-1)->opcode != ZEND_FETCH_CONSTANT
  3700. && (opline-1)->opcode != ZEND_FETCH_LIST_R
  3701. && ((opline-1)->op1_type & (IS_VAR|IS_TMP_VAR))
  3702. && !(flags & ZEND_JIT_EXIT_FREE_OP1)) {
  3703. val_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, (opline-1)->op1.var);
  3704. | IF_NOT_ZVAL_REFCOUNTED val_addr, >2
  3705. | GET_ZVAL_PTR r0, val_addr
  3706. | GC_ADDREF r0
  3707. |2:
  3708. }
  3709. | LOAD_IP_ADDR (opline - 1)
  3710. | jmp ->trace_escape
  3711. |1:
  3712. return 1;
  3713. }
  3714. static int zend_jit_store_const(dasm_State **Dst, int var, zend_reg reg)
  3715. {
  3716. zend_jit_addr dst = ZEND_ADDR_MEM_ZVAL(ZREG_FP, EX_NUM_TO_VAR(var));
  3717. if (reg == ZREG_LONG_MIN_MINUS_1) {
  3718. |.if X64
  3719. | SET_ZVAL_LVAL dst, 0x00000000
  3720. | SET_ZVAL_W2 dst, 0xc3e00000
  3721. |.else
  3722. | SET_ZVAL_LVAL dst, 0x00200000
  3723. | SET_ZVAL_W2 dst, 0xc1e00000
  3724. |.endif
  3725. | SET_ZVAL_TYPE_INFO dst, IS_DOUBLE
  3726. } else if (reg == ZREG_LONG_MIN) {
  3727. |.if X64
  3728. | SET_ZVAL_LVAL dst, 0x00000000
  3729. | SET_ZVAL_W2 dst, 0x80000000
  3730. |.else
  3731. | SET_ZVAL_LVAL dst, ZEND_LONG_MIN
  3732. |.endif
  3733. | SET_ZVAL_TYPE_INFO dst, IS_LONG
  3734. } else if (reg == ZREG_LONG_MAX) {
  3735. |.if X64
  3736. | SET_ZVAL_LVAL dst, 0xffffffff
  3737. | SET_ZVAL_W2 dst, 0x7fffffff
  3738. |.else
  3739. | SET_ZVAL_LVAL dst, ZEND_LONG_MAX
  3740. |.endif
  3741. | SET_ZVAL_TYPE_INFO dst, IS_LONG
  3742. } else if (reg == ZREG_LONG_MAX_PLUS_1) {
  3743. |.if X64
  3744. | SET_ZVAL_LVAL dst, 0
  3745. | SET_ZVAL_W2 dst, 0x43e00000
  3746. |.else
  3747. | SET_ZVAL_LVAL dst, 0
  3748. | SET_ZVAL_W2 dst, 0x41e00000
  3749. |.endif
  3750. | SET_ZVAL_TYPE_INFO dst, IS_DOUBLE
  3751. } else if (reg == ZREG_NULL) {
  3752. | SET_ZVAL_TYPE_INFO dst, IS_NULL
  3753. } else if (reg == ZREG_ZVAL_TRY_ADDREF) {
  3754. | IF_NOT_ZVAL_REFCOUNTED dst, >1
  3755. | GET_ZVAL_PTR r1, dst
  3756. | GC_ADDREF r1
  3757. |1:
  3758. } else if (reg == ZREG_ZVAL_COPY_GPR0) {
  3759. zend_jit_addr val_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R0, 0);
  3760. | ZVAL_COPY_VALUE dst, -1, val_addr, -1, ZREG_R1, ZREG_R2
  3761. | TRY_ADDREF -1, ch, r2
  3762. } else {
  3763. ZEND_UNREACHABLE();
  3764. }
  3765. return 1;
  3766. }
  3767. static int zend_jit_free_trampoline(dasm_State **Dst)
  3768. {
  3769. | /// if (UNEXPECTED(func->common.fn_flags & ZEND_ACC_CALL_VIA_TRAMPOLINE))
  3770. | test dword [r0 + offsetof(zend_function, common.fn_flags)], ZEND_ACC_CALL_VIA_TRAMPOLINE
  3771. | jz >1
  3772. | mov FCARG1a, r0
  3773. | EXT_CALL zend_jit_free_trampoline_helper, r0
  3774. |1:
  3775. return 1;
  3776. }
  3777. static int zend_jit_inc_dec(dasm_State **Dst, const zend_op *opline, uint32_t op1_info, zend_jit_addr op1_addr, uint32_t op1_def_info, zend_jit_addr op1_def_addr, uint32_t res_use_info, uint32_t res_info, zend_jit_addr res_addr, int may_overflow, int may_throw)
  3778. {
  3779. if (op1_info & ((MAY_BE_UNDEF|MAY_BE_ANY)-MAY_BE_LONG)) {
  3780. | IF_NOT_ZVAL_TYPE op1_addr, IS_LONG, >2
  3781. }
  3782. if (opline->opcode == ZEND_POST_INC || opline->opcode == ZEND_POST_DEC) {
  3783. | ZVAL_COPY_VALUE res_addr, res_use_info, op1_addr, MAY_BE_LONG, ZREG_R0, ZREG_R1
  3784. }
  3785. if (!zend_jit_update_regs(Dst, opline->op1.var, op1_addr, op1_def_addr, MAY_BE_LONG)) {
  3786. return 0;
  3787. }
  3788. if (opline->opcode == ZEND_PRE_INC || opline->opcode == ZEND_POST_INC) {
  3789. | LONG_OP_WITH_32BIT_CONST add, op1_def_addr, Z_L(1)
  3790. } else {
  3791. | LONG_OP_WITH_32BIT_CONST sub, op1_def_addr, Z_L(1)
  3792. }
  3793. if (may_overflow &&
  3794. (((op1_def_info & MAY_BE_GUARD) && (op1_def_info & MAY_BE_LONG)) ||
  3795. ((opline->result_type != IS_UNUSED && (res_info & MAY_BE_GUARD) && (res_info & MAY_BE_LONG))))) {
  3796. int32_t exit_point;
  3797. const void *exit_addr;
  3798. zend_jit_trace_stack *stack;
  3799. uint32_t old_op1_info, old_res_info = 0;
  3800. stack = JIT_G(current_frame)->stack;
  3801. old_op1_info = STACK_INFO(stack, EX_VAR_TO_NUM(opline->op1.var));
  3802. SET_STACK_TYPE(stack, EX_VAR_TO_NUM(opline->op1.var), IS_DOUBLE, 0);
  3803. if (opline->opcode == ZEND_PRE_INC || opline->opcode == ZEND_POST_INC) {
  3804. SET_STACK_REG(stack, EX_VAR_TO_NUM(opline->op1.var), ZREG_LONG_MAX_PLUS_1);
  3805. } else {
  3806. SET_STACK_REG(stack, EX_VAR_TO_NUM(opline->op1.var), ZREG_LONG_MIN_MINUS_1);
  3807. }
  3808. if (opline->result_type != IS_UNUSED) {
  3809. old_res_info = STACK_INFO(stack, EX_VAR_TO_NUM(opline->result.var));
  3810. if (opline->opcode == ZEND_PRE_INC) {
  3811. SET_STACK_TYPE(stack, EX_VAR_TO_NUM(opline->result.var), IS_DOUBLE, 0);
  3812. SET_STACK_REG(stack, EX_VAR_TO_NUM(opline->result.var), ZREG_LONG_MAX_PLUS_1);
  3813. } else if (opline->opcode == ZEND_PRE_DEC) {
  3814. SET_STACK_TYPE(stack, EX_VAR_TO_NUM(opline->result.var), IS_DOUBLE, 0);
  3815. SET_STACK_REG(stack, EX_VAR_TO_NUM(opline->result.var), ZREG_LONG_MIN_MINUS_1);
  3816. } else if (opline->opcode == ZEND_POST_INC) {
  3817. SET_STACK_TYPE(stack, EX_VAR_TO_NUM(opline->result.var), IS_LONG, 0);
  3818. SET_STACK_REG(stack, EX_VAR_TO_NUM(opline->result.var), ZREG_LONG_MAX);
  3819. } else if (opline->opcode == ZEND_POST_DEC) {
  3820. SET_STACK_TYPE(stack, EX_VAR_TO_NUM(opline->result.var), IS_LONG, 0);
  3821. SET_STACK_REG(stack, EX_VAR_TO_NUM(opline->result.var), ZREG_LONG_MIN);
  3822. }
  3823. }
  3824. exit_point = zend_jit_trace_get_exit_point(opline + 1, 0);
  3825. exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  3826. if (!exit_addr) {
  3827. return 0;
  3828. }
  3829. | jo &exit_addr
  3830. if ((opline->opcode == ZEND_PRE_INC || opline->opcode == ZEND_PRE_DEC) &&
  3831. opline->result_type != IS_UNUSED) {
  3832. | ZVAL_COPY_VALUE res_addr, res_use_info, op1_def_addr, MAY_BE_LONG, ZREG_R0, ZREG_R1
  3833. }
  3834. SET_STACK_INFO(stack, EX_VAR_TO_NUM(opline->op1.var), old_op1_info);
  3835. if (opline->result_type != IS_UNUSED) {
  3836. SET_STACK_INFO(stack, EX_VAR_TO_NUM(opline->result.var), old_res_info);
  3837. }
  3838. } else if (may_overflow) {
  3839. | jo >1
  3840. if ((opline->opcode == ZEND_PRE_INC || opline->opcode == ZEND_PRE_DEC) &&
  3841. opline->result_type != IS_UNUSED) {
  3842. | ZVAL_COPY_VALUE res_addr, res_use_info, op1_def_addr, MAY_BE_LONG, ZREG_R0, ZREG_R1
  3843. }
  3844. |.cold_code
  3845. |1:
  3846. if (opline->opcode == ZEND_PRE_INC || opline->opcode == ZEND_POST_INC) {
  3847. |.if X64
  3848. | mov64 rax, 0x43e0000000000000
  3849. | SET_ZVAL_LVAL op1_def_addr, rax
  3850. |.else
  3851. | SET_ZVAL_LVAL op1_def_addr, 0
  3852. | SET_ZVAL_W2 op1_def_addr, 0x41e00000
  3853. |.endif
  3854. } else {
  3855. |.if X64
  3856. | mov64 rax, 0xc3e0000000000000
  3857. | SET_ZVAL_LVAL op1_def_addr, rax
  3858. |.else
  3859. | SET_ZVAL_LVAL op1_def_addr, 0x00200000
  3860. | SET_ZVAL_W2 op1_def_addr, 0xc1e00000
  3861. |.endif
  3862. }
  3863. if (Z_MODE(op1_def_addr) == IS_MEM_ZVAL) {
  3864. | SET_ZVAL_TYPE_INFO op1_def_addr, IS_DOUBLE
  3865. }
  3866. if ((opline->opcode == ZEND_PRE_INC || opline->opcode == ZEND_PRE_DEC) &&
  3867. opline->result_type != IS_UNUSED) {
  3868. | ZVAL_COPY_VALUE res_addr, res_use_info, op1_def_addr, MAY_BE_DOUBLE, ZREG_R0, ZREG_R1
  3869. }
  3870. | jmp >3
  3871. |.code
  3872. } else {
  3873. if ((opline->opcode == ZEND_PRE_INC || opline->opcode == ZEND_PRE_DEC) &&
  3874. opline->result_type != IS_UNUSED) {
  3875. | ZVAL_COPY_VALUE res_addr, res_use_info, op1_def_addr, MAY_BE_LONG, ZREG_R0, ZREG_R1
  3876. }
  3877. }
  3878. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-MAY_BE_LONG)) {
  3879. |.cold_code
  3880. |2:
  3881. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_LONG|MAY_BE_DOUBLE))) {
  3882. | SET_EX_OPLINE opline, r0
  3883. if (op1_info & MAY_BE_UNDEF) {
  3884. | IF_NOT_ZVAL_TYPE op1_addr, IS_UNDEF, >2
  3885. | // zend_error(E_WARNING, "Undefined variable $%s", ZSTR_VAL(CV_DEF_OF(EX_VAR_TO_NUM(opline->op1.var))));
  3886. | mov FCARG1d, opline->op1.var
  3887. | EXT_CALL zend_jit_undefined_op_helper, r0
  3888. | SET_ZVAL_TYPE_INFO op1_addr, IS_NULL
  3889. op1_info |= MAY_BE_NULL;
  3890. }
  3891. |2:
  3892. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  3893. | // ZVAL_DEREF(var_ptr);
  3894. if (op1_info & MAY_BE_REF) {
  3895. | IF_NOT_Z_TYPE, FCARG1a, IS_REFERENCE, >2
  3896. | GET_Z_PTR FCARG1a, FCARG1a
  3897. | cmp aword [FCARG1a + offsetof(zend_reference, sources.ptr)], 0
  3898. | jz >1
  3899. if (RETURN_VALUE_USED(opline)) {
  3900. | LOAD_ZVAL_ADDR FCARG2a, res_addr
  3901. } else {
  3902. | xor FCARG2a, FCARG2a
  3903. }
  3904. if (opline->opcode == ZEND_PRE_INC) {
  3905. | EXT_CALL zend_jit_pre_inc_typed_ref, r0
  3906. } else if (opline->opcode == ZEND_PRE_DEC) {
  3907. | EXT_CALL zend_jit_pre_dec_typed_ref, r0
  3908. } else if (opline->opcode == ZEND_POST_INC) {
  3909. | EXT_CALL zend_jit_post_inc_typed_ref, r0
  3910. } else if (opline->opcode == ZEND_POST_DEC) {
  3911. | EXT_CALL zend_jit_post_dec_typed_ref, r0
  3912. } else {
  3913. ZEND_UNREACHABLE();
  3914. }
  3915. zend_jit_check_exception(Dst);
  3916. | jmp >3
  3917. |1:
  3918. | lea FCARG1a, [FCARG1a + offsetof(zend_reference, val)]
  3919. |2:
  3920. }
  3921. if (opline->opcode == ZEND_POST_INC || opline->opcode == ZEND_POST_DEC) {
  3922. zend_jit_addr val_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  3923. | ZVAL_COPY_VALUE res_addr, res_use_info, val_addr, op1_info, ZREG_R0, ZREG_R2
  3924. | TRY_ADDREF op1_info, ah, r2
  3925. }
  3926. if (opline->opcode == ZEND_PRE_INC || opline->opcode == ZEND_POST_INC) {
  3927. if (opline->opcode == ZEND_PRE_INC && opline->result_type != IS_UNUSED) {
  3928. | LOAD_ZVAL_ADDR FCARG2a, res_addr
  3929. | EXT_CALL zend_jit_pre_inc, r0
  3930. } else {
  3931. | EXT_CALL increment_function, r0
  3932. }
  3933. } else {
  3934. if (opline->opcode == ZEND_PRE_DEC && opline->result_type != IS_UNUSED) {
  3935. | LOAD_ZVAL_ADDR FCARG2a, res_addr
  3936. | EXT_CALL zend_jit_pre_dec, r0
  3937. } else {
  3938. | EXT_CALL decrement_function, r0
  3939. }
  3940. }
  3941. if (may_throw) {
  3942. zend_jit_check_exception(Dst);
  3943. }
  3944. } else {
  3945. zend_reg tmp_reg;
  3946. if (opline->opcode == ZEND_POST_INC || opline->opcode == ZEND_POST_DEC) {
  3947. | ZVAL_COPY_VALUE res_addr, res_use_info, op1_addr, MAY_BE_DOUBLE, ZREG_R0, ZREG_R2
  3948. }
  3949. if (Z_MODE(op1_def_addr) == IS_REG) {
  3950. tmp_reg = Z_REG(op1_def_addr);
  3951. } else if (Z_MODE(op1_addr) == IS_REG && Z_LAST_USE(op1_addr)) {
  3952. tmp_reg = Z_REG(op1_addr);
  3953. } else {
  3954. tmp_reg = ZREG_XMM0;
  3955. }
  3956. | DOUBLE_GET_ZVAL_DVAL tmp_reg, op1_addr
  3957. if (opline->opcode == ZEND_PRE_INC || opline->opcode == ZEND_POST_INC) {
  3958. if (CAN_USE_AVX()) {
  3959. | vaddsd xmm(tmp_reg-ZREG_XMM0), xmm(tmp_reg-ZREG_XMM0), qword [->one]
  3960. } else {
  3961. | addsd xmm(tmp_reg-ZREG_XMM0), qword [->one]
  3962. }
  3963. } else {
  3964. if (CAN_USE_AVX()) {
  3965. | vsubsd xmm(tmp_reg-ZREG_XMM0), xmm(tmp_reg-ZREG_XMM0), qword [->one]
  3966. } else {
  3967. | subsd xmm(tmp_reg-ZREG_XMM0), qword [->one]
  3968. }
  3969. }
  3970. | DOUBLE_SET_ZVAL_DVAL op1_def_addr, tmp_reg
  3971. if ((opline->opcode == ZEND_PRE_INC || opline->opcode == ZEND_PRE_DEC) &&
  3972. opline->result_type != IS_UNUSED) {
  3973. | ZVAL_COPY_VALUE res_addr, res_use_info, op1_addr, op1_def_info, ZREG_R0, ZREG_R1
  3974. | TRY_ADDREF op1_def_info, ah, r1
  3975. }
  3976. }
  3977. | jmp >3
  3978. |.code
  3979. }
  3980. |3:
  3981. if (!zend_jit_store_var_if_necessary_ex(Dst, opline->op1.var, op1_def_addr, op1_def_info, op1_addr, op1_info)) {
  3982. return 0;
  3983. }
  3984. if (opline->result_type != IS_UNUSED) {
  3985. if (!zend_jit_store_var_if_necessary(Dst, opline->result.var, res_addr, res_info)) {
  3986. return 0;
  3987. }
  3988. }
  3989. return 1;
  3990. }
  3991. static int zend_jit_opline_uses_reg(const zend_op *opline, int8_t reg)
  3992. {
  3993. if ((opline+1)->opcode == ZEND_OP_DATA
  3994. && ((opline+1)->op1_type & (IS_VAR|IS_TMP_VAR|IS_CV))
  3995. && JIT_G(current_frame)->stack[EX_VAR_TO_NUM((opline+1)->op1.var)].reg == reg) {
  3996. return 1;
  3997. }
  3998. return
  3999. ((opline->result_type & (IS_VAR|IS_TMP_VAR|IS_CV)) &&
  4000. JIT_G(current_frame)->stack[EX_VAR_TO_NUM(opline->result.var)].reg == reg) ||
  4001. ((opline->op1_type & (IS_VAR|IS_TMP_VAR|IS_CV)) &&
  4002. JIT_G(current_frame)->stack[EX_VAR_TO_NUM(opline->op1.var)].reg == reg) ||
  4003. ((opline->op2_type & (IS_VAR|IS_TMP_VAR|IS_CV)) &&
  4004. JIT_G(current_frame)->stack[EX_VAR_TO_NUM(opline->op2.var)].reg == reg);
  4005. }
  4006. static int zend_jit_math_long_long(dasm_State **Dst,
  4007. const zend_op *opline,
  4008. zend_uchar opcode,
  4009. zend_jit_addr op1_addr,
  4010. zend_jit_addr op2_addr,
  4011. zend_jit_addr res_addr,
  4012. uint32_t res_info,
  4013. uint32_t res_use_info,
  4014. int may_overflow)
  4015. {
  4016. bool same_ops = zend_jit_same_addr(op1_addr, op2_addr);
  4017. zend_reg result_reg;
  4018. zend_reg tmp_reg = ZREG_R0;
  4019. if (Z_MODE(res_addr) == IS_REG && (res_info & MAY_BE_LONG)) {
  4020. if (may_overflow && (res_info & MAY_BE_GUARD)
  4021. && JIT_G(current_frame)
  4022. && zend_jit_opline_uses_reg(opline, Z_REG(res_addr))) {
  4023. result_reg = ZREG_R0;
  4024. } else {
  4025. result_reg = Z_REG(res_addr);
  4026. }
  4027. } else if (Z_MODE(op1_addr) == IS_REG && Z_LAST_USE(op1_addr) && !may_overflow) {
  4028. result_reg = Z_REG(op1_addr);
  4029. } else if (Z_REG(res_addr) != ZREG_R0) {
  4030. result_reg = ZREG_R0;
  4031. } else {
  4032. /* ASSIGN_DIM_OP */
  4033. result_reg = ZREG_FCARG1;
  4034. tmp_reg = ZREG_FCARG1;
  4035. }
  4036. if (opcode == ZEND_MUL &&
  4037. Z_MODE(op2_addr) == IS_CONST_ZVAL &&
  4038. Z_LVAL_P(Z_ZV(op2_addr)) == 2) {
  4039. if (Z_MODE(op1_addr) == IS_REG && !may_overflow) {
  4040. | lea Ra(result_reg), [Ra(Z_REG(op1_addr))+Ra(Z_REG(op1_addr))]
  4041. } else {
  4042. | GET_ZVAL_LVAL result_reg, op1_addr
  4043. | add Ra(result_reg), Ra(result_reg)
  4044. }
  4045. } else if (opcode == ZEND_MUL &&
  4046. Z_MODE(op2_addr) == IS_CONST_ZVAL &&
  4047. !may_overflow &&
  4048. Z_LVAL_P(Z_ZV(op2_addr)) > 0 &&
  4049. zend_long_is_power_of_two(Z_LVAL_P(Z_ZV(op2_addr)))) {
  4050. | GET_ZVAL_LVAL result_reg, op1_addr
  4051. | shl Ra(result_reg), zend_long_floor_log2(Z_LVAL_P(Z_ZV(op2_addr)))
  4052. } else if (opcode == ZEND_MUL &&
  4053. Z_MODE(op1_addr) == IS_CONST_ZVAL &&
  4054. Z_LVAL_P(Z_ZV(op1_addr)) == 2) {
  4055. if (Z_MODE(op2_addr) == IS_REG && !may_overflow) {
  4056. | lea Ra(result_reg), [Ra(Z_REG(op2_addr))+Ra(Z_REG(op2_addr))]
  4057. } else {
  4058. | GET_ZVAL_LVAL result_reg, op2_addr
  4059. | add Ra(result_reg), Ra(result_reg)
  4060. }
  4061. } else if (opcode == ZEND_MUL &&
  4062. Z_MODE(op1_addr) == IS_CONST_ZVAL &&
  4063. !may_overflow &&
  4064. Z_LVAL_P(Z_ZV(op1_addr)) > 0 &&
  4065. zend_long_is_power_of_two(Z_LVAL_P(Z_ZV(op1_addr)))) {
  4066. | GET_ZVAL_LVAL result_reg, op2_addr
  4067. | shl Ra(result_reg), zend_long_floor_log2(Z_LVAL_P(Z_ZV(op1_addr)))
  4068. } else if (opcode == ZEND_DIV &&
  4069. (Z_MODE(op2_addr) == IS_CONST_ZVAL &&
  4070. zend_long_is_power_of_two(Z_LVAL_P(Z_ZV(op2_addr))))) {
  4071. | GET_ZVAL_LVAL result_reg, op1_addr
  4072. | shr Ra(result_reg), zend_long_floor_log2(Z_LVAL_P(Z_ZV(op2_addr)))
  4073. } else if (opcode == ZEND_ADD &&
  4074. !may_overflow &&
  4075. Z_MODE(op1_addr) == IS_REG &&
  4076. Z_MODE(op2_addr) == IS_CONST_ZVAL &&
  4077. IS_SIGNED_32BIT(Z_LVAL_P(Z_ZV(op2_addr)))) {
  4078. | lea Ra(result_reg), [Ra(Z_REG(op1_addr))+Z_LVAL_P(Z_ZV(op2_addr))]
  4079. } else if (opcode == ZEND_ADD &&
  4080. !may_overflow &&
  4081. Z_MODE(op2_addr) == IS_REG &&
  4082. Z_MODE(op1_addr) == IS_CONST_ZVAL &&
  4083. IS_SIGNED_32BIT(Z_LVAL_P(Z_ZV(op1_addr)))) {
  4084. | lea Ra(result_reg), [Ra(Z_REG(op2_addr))+Z_LVAL_P(Z_ZV(op1_addr))]
  4085. } else if (opcode == ZEND_SUB &&
  4086. !may_overflow &&
  4087. Z_MODE(op1_addr) == IS_REG &&
  4088. Z_MODE(op2_addr) == IS_CONST_ZVAL &&
  4089. IS_SIGNED_32BIT(-Z_LVAL_P(Z_ZV(op2_addr)))) {
  4090. | lea Ra(result_reg), [Ra(Z_REG(op1_addr))-Z_LVAL_P(Z_ZV(op2_addr))]
  4091. } else {
  4092. | GET_ZVAL_LVAL result_reg, op1_addr
  4093. if ((opcode == ZEND_ADD || opcode == ZEND_SUB)
  4094. && Z_MODE(op2_addr) == IS_CONST_ZVAL
  4095. && Z_LVAL_P(Z_ZV(op2_addr)) == 0) {
  4096. /* +/- 0 */
  4097. may_overflow = 0;
  4098. } else if (same_ops && opcode != ZEND_DIV) {
  4099. | LONG_MATH_REG opcode, Ra(result_reg), Ra(result_reg)
  4100. } else {
  4101. zend_reg tmp_reg;
  4102. if (Z_MODE(res_addr) == IS_MEM_ZVAL && Z_REG(res_addr) == ZREG_R0) {
  4103. tmp_reg = ZREG_R1;
  4104. } else if (result_reg != ZREG_R0) {
  4105. tmp_reg = ZREG_R0;
  4106. } else {
  4107. tmp_reg = ZREG_R1;
  4108. }
  4109. | LONG_MATH opcode, result_reg, op2_addr, tmp_reg
  4110. (void)tmp_reg;
  4111. }
  4112. }
  4113. if (may_overflow) {
  4114. if (res_info & MAY_BE_GUARD) {
  4115. int32_t exit_point = zend_jit_trace_get_exit_point(opline, 0);
  4116. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  4117. if (!exit_addr) {
  4118. return 0;
  4119. }
  4120. if ((res_info & MAY_BE_ANY) == MAY_BE_LONG) {
  4121. | jo &exit_addr
  4122. if (Z_MODE(res_addr) == IS_REG && result_reg != Z_REG(res_addr)) {
  4123. | mov Ra(Z_REG(res_addr)), Ra(result_reg)
  4124. }
  4125. } else if ((res_info & MAY_BE_ANY) == MAY_BE_DOUBLE) {
  4126. | jno &exit_addr
  4127. } else {
  4128. ZEND_UNREACHABLE();
  4129. }
  4130. } else {
  4131. if (res_info & MAY_BE_LONG) {
  4132. | jo >1
  4133. } else {
  4134. | jno >1
  4135. }
  4136. }
  4137. }
  4138. if (Z_MODE(res_addr) == IS_MEM_ZVAL && (res_info & MAY_BE_LONG)) {
  4139. | SET_ZVAL_LVAL res_addr, Ra(result_reg)
  4140. if (Z_MODE(op1_addr) != IS_MEM_ZVAL || Z_REG(op1_addr) != Z_REG(res_addr) || Z_OFFSET(op1_addr) != Z_OFFSET(res_addr)) {
  4141. if ((res_use_info & (MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_REF|MAY_BE_GUARD)) != MAY_BE_LONG) {
  4142. | SET_ZVAL_TYPE_INFO res_addr, IS_LONG
  4143. }
  4144. }
  4145. }
  4146. if (may_overflow && (!(res_info & MAY_BE_GUARD) || (res_info & MAY_BE_ANY) == MAY_BE_DOUBLE)) {
  4147. zend_reg tmp_reg1 = ZREG_XMM0;
  4148. zend_reg tmp_reg2 = ZREG_XMM1;
  4149. if (res_info & MAY_BE_LONG) {
  4150. |.cold_code
  4151. |1:
  4152. }
  4153. do {
  4154. if ((sizeof(void*) == 8 || Z_MODE(res_addr) != IS_REG) &&
  4155. ((Z_MODE(op1_addr) == IS_CONST_ZVAL && Z_LVAL_P(Z_ZV(op1_addr)) == 1) ||
  4156. (Z_MODE(op2_addr) == IS_CONST_ZVAL && Z_LVAL_P(Z_ZV(op2_addr)) == 1))) {
  4157. if (opcode == ZEND_ADD) {
  4158. |.if X64
  4159. | mov64 Ra(tmp_reg), 0x43e0000000000000
  4160. if (Z_MODE(res_addr) == IS_REG) {
  4161. | movd xmm(Z_REG(res_addr)-ZREG_XMM0), Ra(tmp_reg)
  4162. } else {
  4163. | SET_ZVAL_LVAL res_addr, Ra(tmp_reg)
  4164. }
  4165. |.else
  4166. | SET_ZVAL_LVAL res_addr, 0
  4167. | SET_ZVAL_W2 res_addr, 0x41e00000
  4168. |.endif
  4169. break;
  4170. } else if (opcode == ZEND_SUB) {
  4171. |.if X64
  4172. | mov64 Ra(tmp_reg), 0xc3e0000000000000
  4173. if (Z_MODE(res_addr) == IS_REG) {
  4174. | movd xmm(Z_REG(res_addr)-ZREG_XMM0), Ra(tmp_reg)
  4175. } else {
  4176. | SET_ZVAL_LVAL res_addr, Ra(tmp_reg)
  4177. }
  4178. |.else
  4179. | SET_ZVAL_LVAL res_addr, 0x00200000
  4180. | SET_ZVAL_W2 res_addr, 0xc1e00000
  4181. |.endif
  4182. break;
  4183. }
  4184. }
  4185. | DOUBLE_GET_ZVAL_LVAL tmp_reg1, op1_addr, tmp_reg
  4186. | DOUBLE_GET_ZVAL_LVAL tmp_reg2, op2_addr, tmp_reg
  4187. if (CAN_USE_AVX()) {
  4188. | AVX_MATH_REG opcode, tmp_reg1, tmp_reg1, tmp_reg2
  4189. } else {
  4190. | SSE_MATH_REG opcode, tmp_reg1, tmp_reg2
  4191. }
  4192. | DOUBLE_SET_ZVAL_DVAL res_addr, tmp_reg1
  4193. } while (0);
  4194. if (Z_MODE(res_addr) == IS_MEM_ZVAL
  4195. && (res_use_info & (MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_REF|MAY_BE_GUARD)) != MAY_BE_DOUBLE) {
  4196. | SET_ZVAL_TYPE_INFO res_addr, IS_DOUBLE
  4197. }
  4198. if (res_info & MAY_BE_LONG) {
  4199. | jmp >2
  4200. |.code
  4201. }
  4202. |2:
  4203. }
  4204. return 1;
  4205. }
  4206. static int zend_jit_math_long_double(dasm_State **Dst,
  4207. zend_uchar opcode,
  4208. zend_jit_addr op1_addr,
  4209. zend_jit_addr op2_addr,
  4210. zend_jit_addr res_addr,
  4211. uint32_t res_use_info)
  4212. {
  4213. zend_reg result_reg =
  4214. (Z_MODE(res_addr) == IS_REG) ? Z_REG(res_addr) : ZREG_XMM0;
  4215. zend_reg tmp_reg;
  4216. if (Z_MODE(res_addr) == IS_MEM_ZVAL && Z_REG(res_addr) == ZREG_R0) {
  4217. /* ASSIGN_DIM_OP */
  4218. tmp_reg = ZREG_R1;
  4219. } else {
  4220. tmp_reg = ZREG_R0;
  4221. }
  4222. | DOUBLE_GET_ZVAL_LVAL result_reg, op1_addr, tmp_reg
  4223. if (Z_MODE(res_addr) == IS_MEM_ZVAL && Z_REG(res_addr) == ZREG_R0) {
  4224. /* ASSIGN_DIM_OP */
  4225. if (CAN_USE_AVX()) {
  4226. | AVX_MATH opcode, result_reg, result_reg, op2_addr, r1
  4227. } else {
  4228. | SSE_MATH opcode, result_reg, op2_addr, r1
  4229. }
  4230. } else {
  4231. if (CAN_USE_AVX()) {
  4232. | AVX_MATH opcode, result_reg, result_reg, op2_addr, r0
  4233. } else {
  4234. | SSE_MATH opcode, result_reg, op2_addr, r0
  4235. }
  4236. }
  4237. | DOUBLE_SET_ZVAL_DVAL res_addr, result_reg
  4238. if (Z_MODE(res_addr) == IS_MEM_ZVAL) {
  4239. if ((res_use_info & (MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_REF|MAY_BE_GUARD)) != MAY_BE_DOUBLE) {
  4240. | SET_ZVAL_TYPE_INFO res_addr, IS_DOUBLE
  4241. }
  4242. }
  4243. return 1;
  4244. }
  4245. static int zend_jit_math_double_long(dasm_State **Dst,
  4246. zend_uchar opcode,
  4247. zend_jit_addr op1_addr,
  4248. zend_jit_addr op2_addr,
  4249. zend_jit_addr res_addr,
  4250. uint32_t res_use_info)
  4251. {
  4252. zend_reg result_reg, tmp_reg_gp;
  4253. if (Z_MODE(res_addr) == IS_MEM_ZVAL && Z_REG(res_addr) == ZREG_R0) {
  4254. /* ASSIGN_DIM_OP */
  4255. tmp_reg_gp = ZREG_R1;
  4256. } else {
  4257. tmp_reg_gp = ZREG_R0;
  4258. }
  4259. if (zend_is_commutative(opcode)
  4260. && (Z_MODE(res_addr) != IS_REG || Z_MODE(op1_addr) != IS_REG || Z_REG(res_addr) != Z_REG(op1_addr))) {
  4261. if (Z_MODE(res_addr) == IS_REG) {
  4262. result_reg = Z_REG(res_addr);
  4263. } else {
  4264. result_reg = ZREG_XMM0;
  4265. }
  4266. | DOUBLE_GET_ZVAL_LVAL result_reg, op2_addr, tmp_reg_gp
  4267. if (Z_MODE(res_addr) == IS_MEM_ZVAL && Z_REG(res_addr) == ZREG_R0) {
  4268. /* ASSIGN_DIM_OP */
  4269. if (CAN_USE_AVX()) {
  4270. | AVX_MATH opcode, result_reg, result_reg, op1_addr, r1
  4271. } else {
  4272. | SSE_MATH opcode, result_reg, op1_addr, r1
  4273. }
  4274. } else {
  4275. if (CAN_USE_AVX()) {
  4276. | AVX_MATH opcode, result_reg, result_reg, op1_addr, r0
  4277. } else {
  4278. | SSE_MATH opcode, result_reg, op1_addr, r0
  4279. }
  4280. }
  4281. } else {
  4282. zend_reg tmp_reg;
  4283. if (Z_MODE(res_addr) == IS_REG) {
  4284. result_reg = Z_REG(res_addr);
  4285. tmp_reg = (result_reg == ZREG_XMM0) ? ZREG_XMM1 : ZREG_XMM0;
  4286. } else if (Z_MODE(op1_addr) == IS_REG && Z_LAST_USE(op1_addr)) {
  4287. result_reg = Z_REG(op1_addr);
  4288. tmp_reg = ZREG_XMM0;
  4289. } else {
  4290. result_reg = ZREG_XMM0;
  4291. tmp_reg = ZREG_XMM1;
  4292. }
  4293. if (CAN_USE_AVX()) {
  4294. zend_reg op1_reg;
  4295. if (Z_MODE(op1_addr) == IS_REG) {
  4296. op1_reg = Z_REG(op1_addr);
  4297. } else {
  4298. | DOUBLE_GET_ZVAL_DVAL result_reg, op1_addr
  4299. op1_reg = result_reg;
  4300. }
  4301. if ((opcode == ZEND_ADD || opcode == ZEND_SUB)
  4302. && Z_MODE(op2_addr) == IS_CONST_ZVAL
  4303. && Z_LVAL_P(Z_ZV(op2_addr)) == 0) {
  4304. /* +/- 0 */
  4305. } else {
  4306. | DOUBLE_GET_ZVAL_LVAL tmp_reg, op2_addr, tmp_reg_gp
  4307. | AVX_MATH_REG opcode, result_reg, op1_reg, tmp_reg
  4308. }
  4309. } else {
  4310. | DOUBLE_GET_ZVAL_DVAL result_reg, op1_addr
  4311. if ((opcode == ZEND_ADD || opcode == ZEND_SUB)
  4312. && Z_MODE(op2_addr) == IS_CONST_ZVAL
  4313. && Z_LVAL_P(Z_ZV(op2_addr)) == 0) {
  4314. /* +/- 0 */
  4315. } else {
  4316. | DOUBLE_GET_ZVAL_LVAL tmp_reg, op2_addr, tmp_reg_gp
  4317. | SSE_MATH_REG opcode, result_reg, tmp_reg
  4318. }
  4319. }
  4320. }
  4321. | DOUBLE_SET_ZVAL_DVAL res_addr, result_reg
  4322. if (Z_MODE(res_addr) == IS_MEM_ZVAL) {
  4323. if (Z_MODE(op1_addr) != IS_MEM_ZVAL || Z_REG(op1_addr) != Z_REG(res_addr) || Z_OFFSET(op1_addr) != Z_OFFSET(res_addr)) {
  4324. if ((res_use_info & (MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_REF|MAY_BE_GUARD)) != MAY_BE_DOUBLE) {
  4325. | SET_ZVAL_TYPE_INFO res_addr, IS_DOUBLE
  4326. }
  4327. }
  4328. }
  4329. return 1;
  4330. }
  4331. static int zend_jit_math_double_double(dasm_State **Dst,
  4332. zend_uchar opcode,
  4333. zend_jit_addr op1_addr,
  4334. zend_jit_addr op2_addr,
  4335. zend_jit_addr res_addr,
  4336. uint32_t res_use_info)
  4337. {
  4338. bool same_ops = zend_jit_same_addr(op1_addr, op2_addr);
  4339. zend_reg result_reg;
  4340. if (Z_MODE(res_addr) == IS_REG) {
  4341. result_reg = Z_REG(res_addr);
  4342. } else if (Z_MODE(op1_addr) == IS_REG && Z_LAST_USE(op1_addr)) {
  4343. result_reg = Z_REG(op1_addr);
  4344. } else if (zend_is_commutative(opcode) && Z_MODE(op2_addr) == IS_REG && Z_LAST_USE(op2_addr)) {
  4345. result_reg = Z_REG(op2_addr);
  4346. } else {
  4347. result_reg = ZREG_XMM0;
  4348. }
  4349. if (CAN_USE_AVX()) {
  4350. zend_reg op1_reg;
  4351. zend_jit_addr val_addr;
  4352. if (Z_MODE(op1_addr) == IS_REG) {
  4353. op1_reg = Z_REG(op1_addr);
  4354. val_addr = op2_addr;
  4355. } else if (Z_MODE(op2_addr) == IS_REG && zend_is_commutative(opcode)) {
  4356. op1_reg = Z_REG(op2_addr);
  4357. val_addr = op1_addr;
  4358. } else {
  4359. | DOUBLE_GET_ZVAL_DVAL result_reg, op1_addr
  4360. op1_reg = result_reg;
  4361. val_addr = op2_addr;
  4362. }
  4363. if ((opcode == ZEND_MUL) &&
  4364. Z_MODE(val_addr) == IS_CONST_ZVAL && Z_DVAL_P(Z_ZV(val_addr)) == 2.0) {
  4365. | AVX_MATH_REG ZEND_ADD, result_reg, op1_reg, op1_reg
  4366. } else if (Z_MODE(res_addr) == IS_MEM_ZVAL && Z_REG(res_addr) == ZREG_R0) {
  4367. /* ASSIGN_DIM_OP */
  4368. | AVX_MATH opcode, result_reg, op1_reg, val_addr, r1
  4369. } else {
  4370. | AVX_MATH opcode, result_reg, op1_reg, val_addr, r0
  4371. }
  4372. } else {
  4373. zend_jit_addr val_addr;
  4374. if (Z_MODE(op1_addr) != IS_REG && Z_MODE(op2_addr) == IS_REG && zend_is_commutative(opcode)) {
  4375. | DOUBLE_GET_ZVAL_DVAL result_reg, op2_addr
  4376. val_addr = op1_addr;
  4377. } else {
  4378. | DOUBLE_GET_ZVAL_DVAL result_reg, op1_addr
  4379. val_addr = op2_addr;
  4380. }
  4381. if (same_ops) {
  4382. | SSE_MATH_REG opcode, result_reg, result_reg
  4383. } else if ((opcode == ZEND_MUL) &&
  4384. Z_MODE(val_addr) == IS_CONST_ZVAL && Z_DVAL_P(Z_ZV(val_addr)) == 2.0) {
  4385. | SSE_MATH_REG ZEND_ADD, result_reg, result_reg
  4386. } else if (Z_MODE(res_addr) == IS_MEM_ZVAL && Z_REG(res_addr) == ZREG_R0) {
  4387. /* ASSIGN_DIM_OP */
  4388. | SSE_MATH opcode, result_reg, val_addr, r1
  4389. } else {
  4390. | SSE_MATH opcode, result_reg, val_addr, r0
  4391. }
  4392. }
  4393. | DOUBLE_SET_ZVAL_DVAL res_addr, result_reg
  4394. if (Z_MODE(res_addr) == IS_MEM_ZVAL) {
  4395. if (Z_MODE(op1_addr) != IS_MEM_ZVAL || Z_REG(op1_addr) != Z_REG(res_addr) || Z_OFFSET(op1_addr) != Z_OFFSET(res_addr)) {
  4396. if ((res_use_info & (MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_REF|MAY_BE_GUARD)) != MAY_BE_DOUBLE) {
  4397. | SET_ZVAL_TYPE_INFO res_addr, IS_DOUBLE
  4398. }
  4399. }
  4400. }
  4401. return 1;
  4402. }
  4403. static int zend_jit_math_helper(dasm_State **Dst,
  4404. const zend_op *opline,
  4405. zend_uchar opcode,
  4406. zend_uchar op1_type,
  4407. znode_op op1,
  4408. zend_jit_addr op1_addr,
  4409. uint32_t op1_info,
  4410. zend_uchar op2_type,
  4411. znode_op op2,
  4412. zend_jit_addr op2_addr,
  4413. uint32_t op2_info,
  4414. uint32_t res_var,
  4415. zend_jit_addr res_addr,
  4416. uint32_t res_info,
  4417. uint32_t res_use_info,
  4418. int may_overflow,
  4419. int may_throw)
  4420. /* Labels: 1,2,3,4,5,6 */
  4421. {
  4422. bool same_ops = zend_jit_same_addr(op1_addr, op2_addr);
  4423. if ((op1_info & MAY_BE_LONG) && (op2_info & MAY_BE_LONG) && (res_info & (MAY_BE_LONG|MAY_BE_DOUBLE))) {
  4424. if (op1_info & (MAY_BE_ANY-MAY_BE_LONG)) {
  4425. if (op1_info & MAY_BE_DOUBLE) {
  4426. | IF_NOT_ZVAL_TYPE op1_addr, IS_LONG, >3
  4427. } else {
  4428. | IF_NOT_ZVAL_TYPE op1_addr, IS_LONG, >6
  4429. }
  4430. }
  4431. if (!same_ops && (op2_info & (MAY_BE_ANY-MAY_BE_LONG))) {
  4432. if (op2_info & MAY_BE_DOUBLE) {
  4433. | IF_NOT_ZVAL_TYPE op2_addr, IS_LONG, >1
  4434. |.cold_code
  4435. |1:
  4436. if (op2_info & (MAY_BE_ANY-(MAY_BE_LONG|MAY_BE_DOUBLE))) {
  4437. | IF_NOT_ZVAL_TYPE op2_addr, IS_DOUBLE, >6
  4438. }
  4439. if (!zend_jit_math_long_double(Dst, opcode, op1_addr, op2_addr, res_addr, res_use_info)) {
  4440. return 0;
  4441. }
  4442. | jmp >5
  4443. |.code
  4444. } else {
  4445. | IF_NOT_ZVAL_TYPE op2_addr, IS_LONG, >6
  4446. }
  4447. }
  4448. if (!zend_jit_math_long_long(Dst, opline, opcode, op1_addr, op2_addr, res_addr, res_info, res_use_info, may_overflow)) {
  4449. return 0;
  4450. }
  4451. if (op1_info & MAY_BE_DOUBLE) {
  4452. |.cold_code
  4453. |3:
  4454. if (op1_info & (MAY_BE_ANY-(MAY_BE_LONG|MAY_BE_DOUBLE))) {
  4455. | IF_NOT_ZVAL_TYPE op1_addr, IS_DOUBLE, >6
  4456. }
  4457. if (op2_info & MAY_BE_DOUBLE) {
  4458. if (!same_ops && (op2_info & (MAY_BE_ANY-MAY_BE_DOUBLE))) {
  4459. if (!same_ops) {
  4460. | IF_NOT_ZVAL_TYPE, op2_addr, IS_DOUBLE, >1
  4461. } else {
  4462. | IF_NOT_ZVAL_TYPE, op2_addr, IS_DOUBLE, >6
  4463. }
  4464. }
  4465. if (!zend_jit_math_double_double(Dst, opcode, op1_addr, op2_addr, res_addr, res_use_info)) {
  4466. return 0;
  4467. }
  4468. | jmp >5
  4469. }
  4470. if (!same_ops) {
  4471. |1:
  4472. if (op2_info & (MAY_BE_ANY-(MAY_BE_LONG|MAY_BE_DOUBLE))) {
  4473. | IF_NOT_ZVAL_TYPE op2_addr, IS_LONG, >6
  4474. }
  4475. if (!zend_jit_math_double_long(Dst, opcode, op1_addr, op2_addr, res_addr, res_use_info)) {
  4476. return 0;
  4477. }
  4478. | jmp >5
  4479. }
  4480. |.code
  4481. }
  4482. } else if ((op1_info & MAY_BE_DOUBLE) &&
  4483. !(op1_info & MAY_BE_LONG) &&
  4484. (op2_info & (MAY_BE_LONG|MAY_BE_DOUBLE)) &&
  4485. (res_info & MAY_BE_DOUBLE)) {
  4486. if (op1_info & (MAY_BE_ANY-MAY_BE_DOUBLE)) {
  4487. | IF_NOT_ZVAL_TYPE op1_addr, IS_DOUBLE, >6
  4488. }
  4489. if (op2_info & MAY_BE_DOUBLE) {
  4490. if (!same_ops && (op2_info & (MAY_BE_ANY-MAY_BE_DOUBLE))) {
  4491. if (!same_ops && (op2_info & MAY_BE_LONG)) {
  4492. | IF_NOT_ZVAL_TYPE op2_addr, IS_DOUBLE, >1
  4493. } else {
  4494. | IF_NOT_ZVAL_TYPE op2_addr, IS_DOUBLE, >6
  4495. }
  4496. }
  4497. if (!zend_jit_math_double_double(Dst, opcode, op1_addr, op2_addr, res_addr, res_use_info)) {
  4498. return 0;
  4499. }
  4500. }
  4501. if (!same_ops && (op2_info & MAY_BE_LONG)) {
  4502. if (op2_info & MAY_BE_DOUBLE) {
  4503. |.cold_code
  4504. }
  4505. |1:
  4506. if (op2_info & (MAY_BE_ANY-(MAY_BE_DOUBLE|MAY_BE_LONG))) {
  4507. | IF_NOT_ZVAL_TYPE op2_addr, IS_LONG, >6
  4508. }
  4509. if (!zend_jit_math_double_long(Dst, opcode, op1_addr, op2_addr, res_addr, res_use_info)) {
  4510. return 0;
  4511. }
  4512. if (op2_info & MAY_BE_DOUBLE) {
  4513. | jmp >5
  4514. |.code
  4515. }
  4516. }
  4517. } else if ((op2_info & MAY_BE_DOUBLE) &&
  4518. !(op2_info & MAY_BE_LONG) &&
  4519. (op1_info & (MAY_BE_LONG|MAY_BE_DOUBLE)) &&
  4520. (res_info & MAY_BE_DOUBLE)) {
  4521. if (op2_info & (MAY_BE_ANY-MAY_BE_DOUBLE)) {
  4522. | IF_NOT_ZVAL_TYPE op2_addr, IS_DOUBLE, >6
  4523. }
  4524. if (op1_info & MAY_BE_DOUBLE) {
  4525. if (!same_ops && (op1_info & (MAY_BE_ANY-MAY_BE_DOUBLE))) {
  4526. if (!same_ops && (op1_info & MAY_BE_LONG)) {
  4527. | IF_NOT_ZVAL_TYPE op1_addr, IS_DOUBLE, >1
  4528. } else {
  4529. | IF_NOT_ZVAL_TYPE op1_addr, IS_DOUBLE, >6
  4530. }
  4531. }
  4532. if (!zend_jit_math_double_double(Dst, opcode, op1_addr, op2_addr, res_addr, res_use_info)) {
  4533. return 0;
  4534. }
  4535. }
  4536. if (!same_ops && (op1_info & MAY_BE_LONG)) {
  4537. if (op1_info & MAY_BE_DOUBLE) {
  4538. |.cold_code
  4539. }
  4540. |1:
  4541. if (op1_info & (MAY_BE_ANY-(MAY_BE_DOUBLE|MAY_BE_LONG))) {
  4542. | IF_NOT_ZVAL_TYPE op1_addr, IS_LONG, >6
  4543. }
  4544. if (!zend_jit_math_long_double(Dst, opcode, op1_addr, op2_addr, res_addr, res_use_info)) {
  4545. return 0;
  4546. }
  4547. if (op1_info & MAY_BE_DOUBLE) {
  4548. | jmp >5
  4549. |.code
  4550. }
  4551. }
  4552. }
  4553. |5:
  4554. if ((op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_LONG|MAY_BE_DOUBLE))) ||
  4555. (op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_LONG|MAY_BE_DOUBLE)))) {
  4556. if ((op1_info & (MAY_BE_LONG|MAY_BE_DOUBLE)) &&
  4557. (op2_info & (MAY_BE_LONG|MAY_BE_DOUBLE)) &&
  4558. (res_info & (MAY_BE_LONG|MAY_BE_DOUBLE))) {
  4559. |.cold_code
  4560. }
  4561. |6:
  4562. if (Z_MODE(op1_addr) != IS_MEM_ZVAL || Z_REG(op1_addr) != ZREG_FCARG1) {
  4563. if (Z_MODE(res_addr) == IS_REG) {
  4564. zend_jit_addr real_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, res_var);
  4565. | LOAD_ZVAL_ADDR FCARG1a, real_addr
  4566. } else if (Z_REG(res_addr) != ZREG_FCARG1 || Z_OFFSET(res_addr) != 0) {
  4567. | LOAD_ZVAL_ADDR FCARG1a, res_addr
  4568. }
  4569. if (Z_MODE(op1_addr) == IS_REG) {
  4570. zend_jit_addr real_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, op1.var);
  4571. if (!zend_jit_spill_store(Dst, op1_addr, real_addr, op1_info, 1)) {
  4572. return 0;
  4573. }
  4574. op1_addr = real_addr;
  4575. }
  4576. | LOAD_ZVAL_ADDR FCARG2a, op1_addr
  4577. } else {
  4578. if (Z_MODE(op1_addr) == IS_REG) {
  4579. zend_jit_addr real_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, op1.var);
  4580. if (!zend_jit_spill_store(Dst, op1_addr, real_addr, op1_info, 1)) {
  4581. return 0;
  4582. }
  4583. op1_addr = real_addr;
  4584. }
  4585. | LOAD_ZVAL_ADDR FCARG2a, op1_addr
  4586. if (Z_MODE(res_addr) == IS_REG) {
  4587. zend_jit_addr real_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, res_var);
  4588. | LOAD_ZVAL_ADDR FCARG1a, real_addr
  4589. } else if (Z_REG(res_addr) != ZREG_FCARG1 || Z_OFFSET(res_addr) != 0) {
  4590. | LOAD_ZVAL_ADDR FCARG1a, res_addr
  4591. }
  4592. }
  4593. if (Z_MODE(op2_addr) == IS_REG) {
  4594. zend_jit_addr real_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, op2.var);
  4595. if (!zend_jit_spill_store(Dst, op2_addr, real_addr, op2_info, 1)) {
  4596. return 0;
  4597. }
  4598. op2_addr = real_addr;
  4599. }
  4600. |.if X64
  4601. | LOAD_ZVAL_ADDR CARG3, op2_addr
  4602. |.else
  4603. | sub r4, 12
  4604. | PUSH_ZVAL_ADDR op2_addr, r0
  4605. |.endif
  4606. | SET_EX_OPLINE opline, r0
  4607. if (opcode == ZEND_ADD) {
  4608. | EXT_CALL add_function, r0
  4609. } else if (opcode == ZEND_SUB) {
  4610. | EXT_CALL sub_function, r0
  4611. } else if (opcode == ZEND_MUL) {
  4612. | EXT_CALL mul_function, r0
  4613. } else if (opcode == ZEND_DIV) {
  4614. | EXT_CALL div_function, r0
  4615. } else {
  4616. ZEND_UNREACHABLE();
  4617. }
  4618. |.if not(X64)
  4619. | add r4, 12
  4620. |.endif
  4621. | FREE_OP op1_type, op1, op1_info, 0, NULL
  4622. | FREE_OP op2_type, op2, op2_info, 0, NULL
  4623. if (may_throw) {
  4624. if (opline->opcode == ZEND_ASSIGN_DIM_OP && (opline->op2_type & (IS_VAR|IS_TMP_VAR))) {
  4625. | MEM_CMP_ZTS aword, executor_globals, exception, 0, r0
  4626. | jne ->exception_handler_free_op2
  4627. } else if (Z_MODE(res_addr) == IS_MEM_ZVAL && Z_REG(res_addr) == ZREG_RX) {
  4628. zend_jit_check_exception_undef_result(Dst, opline);
  4629. } else {
  4630. zend_jit_check_exception(Dst);
  4631. }
  4632. }
  4633. if (Z_MODE(res_addr) == IS_REG) {
  4634. zend_jit_addr real_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, res_var);
  4635. if (!zend_jit_load_reg(Dst, real_addr, res_addr, res_info)) {
  4636. return 0;
  4637. }
  4638. }
  4639. if ((op1_info & (MAY_BE_LONG|MAY_BE_DOUBLE)) &&
  4640. (op2_info & (MAY_BE_LONG|MAY_BE_DOUBLE)) &&
  4641. (res_info & (MAY_BE_LONG|MAY_BE_DOUBLE))) {
  4642. | jmp <5
  4643. |.code
  4644. }
  4645. }
  4646. return 1;
  4647. }
  4648. static int zend_jit_math(dasm_State **Dst, const zend_op *opline, uint32_t op1_info, zend_jit_addr op1_addr, uint32_t op2_info, zend_jit_addr op2_addr, uint32_t res_use_info, uint32_t res_info, zend_jit_addr res_addr, int may_overflow, int may_throw)
  4649. {
  4650. ZEND_ASSERT(!(op1_info & MAY_BE_UNDEF) && !(op2_info & MAY_BE_UNDEF));
  4651. ZEND_ASSERT((op1_info & (MAY_BE_LONG|MAY_BE_DOUBLE)) &&
  4652. (op2_info & (MAY_BE_LONG|MAY_BE_DOUBLE)));
  4653. if (!zend_jit_math_helper(Dst, opline, opline->opcode, opline->op1_type, opline->op1, op1_addr, op1_info, opline->op2_type, opline->op2, op2_addr, op2_info, opline->result.var, res_addr, res_info, res_use_info, may_overflow, may_throw)) {
  4654. return 0;
  4655. }
  4656. if (!zend_jit_store_var_if_necessary(Dst, opline->result.var, res_addr, res_info)) {
  4657. return 0;
  4658. }
  4659. return 1;
  4660. }
  4661. static int zend_jit_add_arrays(dasm_State **Dst, const zend_op *opline, uint32_t op1_info, zend_jit_addr op1_addr, uint32_t op2_info, zend_jit_addr op2_addr, zend_jit_addr res_addr)
  4662. {
  4663. if (Z_MODE(op2_addr) != IS_MEM_ZVAL || Z_REG(op2_addr) != ZREG_FCARG1) {
  4664. | GET_ZVAL_LVAL ZREG_FCARG1, op1_addr
  4665. | GET_ZVAL_LVAL ZREG_FCARG2, op2_addr
  4666. } else if (Z_MODE(op1_addr) != IS_MEM_ZVAL || Z_REG(op1_addr) != ZREG_FCARG2) {
  4667. | GET_ZVAL_LVAL ZREG_FCARG2, op2_addr
  4668. | GET_ZVAL_LVAL ZREG_FCARG1, op1_addr
  4669. } else {
  4670. | GET_ZVAL_LVAL ZREG_R0, op2_addr
  4671. | GET_ZVAL_LVAL ZREG_FCARG1, op1_addr
  4672. | mov FCARG2a, r0
  4673. }
  4674. | EXT_CALL zend_jit_add_arrays_helper, r0
  4675. | SET_ZVAL_PTR res_addr, r0
  4676. | SET_ZVAL_TYPE_INFO res_addr, IS_ARRAY_EX
  4677. | FREE_OP opline->op1_type, opline->op1, op1_info, 0, opline
  4678. | FREE_OP opline->op2_type, opline->op2, op2_info, 0, opline
  4679. return 1;
  4680. }
  4681. static int zend_jit_long_math_helper(dasm_State **Dst,
  4682. const zend_op *opline,
  4683. zend_uchar opcode,
  4684. zend_uchar op1_type,
  4685. znode_op op1,
  4686. zend_jit_addr op1_addr,
  4687. uint32_t op1_info,
  4688. zend_ssa_range *op1_range,
  4689. zend_uchar op2_type,
  4690. znode_op op2,
  4691. zend_jit_addr op2_addr,
  4692. uint32_t op2_info,
  4693. zend_ssa_range *op2_range,
  4694. uint32_t res_var,
  4695. zend_jit_addr res_addr,
  4696. uint32_t res_info,
  4697. uint32_t res_use_info,
  4698. int may_throw)
  4699. /* Labels: 6 */
  4700. {
  4701. bool same_ops = zend_jit_same_addr(op1_addr, op2_addr);
  4702. zend_reg result_reg;
  4703. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-MAY_BE_LONG)) {
  4704. | IF_NOT_ZVAL_TYPE op1_addr, IS_LONG, >6
  4705. }
  4706. if (!same_ops && (op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-MAY_BE_LONG))) {
  4707. | IF_NOT_ZVAL_TYPE op2_addr, IS_LONG, >6
  4708. }
  4709. if (opcode == ZEND_MOD) {
  4710. result_reg = ZREG_RAX;
  4711. } else if (Z_MODE(res_addr) == IS_REG) {
  4712. if ((opline->opcode == ZEND_SL || opline->opcode == ZEND_SR)
  4713. && opline->op2_type != IS_CONST) {
  4714. result_reg = ZREG_R0;
  4715. } else {
  4716. result_reg = Z_REG(res_addr);
  4717. }
  4718. } else if (Z_MODE(op1_addr) == IS_REG && Z_LAST_USE(op1_addr)) {
  4719. result_reg = Z_REG(op1_addr);
  4720. } else if (Z_REG(res_addr) != ZREG_R0) {
  4721. result_reg = ZREG_R0;
  4722. } else {
  4723. /* ASSIGN_DIM_OP */
  4724. if (sizeof(void*) == 4
  4725. && (opcode == ZEND_SL || opcode == ZEND_SR)
  4726. && Z_MODE(op2_addr) != IS_CONST_ZVAL) {
  4727. result_reg = ZREG_R2;
  4728. } else {
  4729. result_reg = ZREG_FCARG1;
  4730. }
  4731. }
  4732. if (opcode == ZEND_SL) {
  4733. if (Z_MODE(op2_addr) == IS_CONST_ZVAL) {
  4734. zend_long op2_lval = Z_LVAL_P(Z_ZV(op2_addr));
  4735. if (UNEXPECTED((zend_ulong)op2_lval >= SIZEOF_ZEND_LONG * 8)) {
  4736. if (EXPECTED(op2_lval > 0)) {
  4737. | xor Ra(result_reg), Ra(result_reg)
  4738. } else {
  4739. zend_jit_invalidate_var_if_necessary(Dst, op1_type, op1_addr, op1);
  4740. zend_jit_invalidate_var_if_necessary(Dst, op2_type, op2_addr, op2);
  4741. | SET_EX_OPLINE opline, r0
  4742. | jmp ->negative_shift
  4743. }
  4744. } else if (Z_MODE(op1_addr) == IS_REG && op2_lval == 1) {
  4745. | lea Ra(result_reg), [Ra(Z_REG(op1_addr))+Ra(Z_REG(op1_addr))]
  4746. } else {
  4747. | GET_ZVAL_LVAL result_reg, op1_addr
  4748. | shl Ra(result_reg), op2_lval
  4749. }
  4750. } else {
  4751. if (Z_MODE(op2_addr) != IS_REG || Z_REG(op2_addr) != ZREG_RCX) {
  4752. | GET_ZVAL_LVAL ZREG_RCX, op2_addr
  4753. }
  4754. if (!op2_range ||
  4755. op2_range->min < 0 ||
  4756. op2_range->max >= SIZEOF_ZEND_LONG * 8) {
  4757. | cmp r1, (SIZEOF_ZEND_LONG*8)
  4758. | jae >1
  4759. |.cold_code
  4760. |1:
  4761. | cmp r1, 0
  4762. | mov Ra(result_reg), 0
  4763. | jg >1
  4764. zend_jit_invalidate_var_if_necessary(Dst, op1_type, op1_addr, op1);
  4765. zend_jit_invalidate_var_if_necessary(Dst, op2_type, op2_addr, op2);
  4766. | SET_EX_OPLINE opline, r0
  4767. | jmp ->negative_shift
  4768. |.code
  4769. }
  4770. | GET_ZVAL_LVAL result_reg, op1_addr
  4771. | shl Ra(result_reg), cl
  4772. |1:
  4773. }
  4774. } else if (opcode == ZEND_SR) {
  4775. | GET_ZVAL_LVAL result_reg, op1_addr
  4776. if (Z_MODE(op2_addr) == IS_CONST_ZVAL) {
  4777. zend_long op2_lval = Z_LVAL_P(Z_ZV(op2_addr));
  4778. if (UNEXPECTED((zend_ulong)op2_lval >= SIZEOF_ZEND_LONG * 8)) {
  4779. if (EXPECTED(op2_lval > 0)) {
  4780. | sar Ra(result_reg), (SIZEOF_ZEND_LONG * 8) - 1
  4781. } else {
  4782. zend_jit_invalidate_var_if_necessary(Dst, op1_type, op1_addr, op1);
  4783. zend_jit_invalidate_var_if_necessary(Dst, op2_type, op2_addr, op2);
  4784. | SET_EX_OPLINE opline, r0
  4785. | jmp ->negative_shift
  4786. }
  4787. } else {
  4788. | sar Ra(result_reg), op2_lval
  4789. }
  4790. } else {
  4791. if (Z_MODE(op2_addr) != IS_REG || Z_REG(op2_addr) != ZREG_RCX) {
  4792. | GET_ZVAL_LVAL ZREG_RCX, op2_addr
  4793. }
  4794. if (!op2_range ||
  4795. op2_range->min < 0 ||
  4796. op2_range->max >= SIZEOF_ZEND_LONG * 8) {
  4797. | cmp r1, (SIZEOF_ZEND_LONG*8)
  4798. | jae >1
  4799. |.cold_code
  4800. |1:
  4801. | cmp r1, 0
  4802. | mov r1, (SIZEOF_ZEND_LONG * 8) - 1
  4803. | jg >1
  4804. zend_jit_invalidate_var_if_necessary(Dst, op1_type, op1_addr, op1);
  4805. zend_jit_invalidate_var_if_necessary(Dst, op2_type, op2_addr, op2);
  4806. | SET_EX_OPLINE opline, r0
  4807. | jmp ->negative_shift
  4808. |.code
  4809. }
  4810. |1:
  4811. | sar Ra(result_reg), cl
  4812. }
  4813. } else if (opcode == ZEND_MOD) {
  4814. if (Z_MODE(op2_addr) == IS_CONST_ZVAL) {
  4815. zend_long op2_lval = Z_LVAL_P(Z_ZV(op2_addr));
  4816. if (op2_lval == 0) {
  4817. zend_jit_invalidate_var_if_necessary(Dst, op1_type, op1_addr, op1);
  4818. zend_jit_invalidate_var_if_necessary(Dst, op2_type, op2_addr, op2);
  4819. | SET_EX_OPLINE opline, r0
  4820. | jmp ->mod_by_zero
  4821. } else if (zend_long_is_power_of_two(op2_lval) && op1_range && op1_range->min >= 0) {
  4822. zval tmp;
  4823. zend_jit_addr tmp_addr;
  4824. zend_reg tmp_reg;
  4825. /* Optimisation for mod of power of 2 */
  4826. ZVAL_LONG(&tmp, op2_lval - 1);
  4827. tmp_addr = ZEND_ADDR_CONST_ZVAL(&tmp);
  4828. if (Z_MODE(res_addr) == IS_MEM_ZVAL && Z_REG(res_addr) == ZREG_R0) {
  4829. tmp_reg = ZREG_R1;
  4830. } else if (result_reg != ZREG_R0) {
  4831. tmp_reg = ZREG_R0;
  4832. } else {
  4833. tmp_reg = ZREG_R1;
  4834. }
  4835. | GET_ZVAL_LVAL result_reg, op1_addr
  4836. | LONG_MATH ZEND_BW_AND, result_reg, tmp_addr, tmp_reg
  4837. (void)tmp_reg;
  4838. } else {
  4839. if (Z_MODE(res_addr) == IS_MEM_ZVAL && Z_REG(res_addr) == ZREG_RAX) {
  4840. | mov aword T1, r0 // save
  4841. } else if (Z_MODE(res_addr) == IS_MEM_ZVAL && Z_REG(res_addr) == ZREG_RCX) {
  4842. | mov aword T1, Ra(ZREG_RCX) // save
  4843. }
  4844. result_reg = ZREG_RDX;
  4845. if (op2_lval == -1) {
  4846. | xor Ra(result_reg), Ra(result_reg)
  4847. } else {
  4848. | GET_ZVAL_LVAL ZREG_RAX, op1_addr
  4849. | GET_ZVAL_LVAL ZREG_RCX, op2_addr
  4850. |.if X64
  4851. | cqo
  4852. |.else
  4853. | cdq
  4854. |.endif
  4855. | idiv Ra(ZREG_RCX)
  4856. }
  4857. if (Z_MODE(res_addr) == IS_MEM_ZVAL && Z_REG(res_addr) == ZREG_RAX) {
  4858. | mov r0, aword T1 // restore
  4859. } else if (Z_MODE(res_addr) == IS_MEM_ZVAL && Z_REG(res_addr) == ZREG_RCX) {
  4860. | mov Ra(ZREG_RCX), aword T1 // restore
  4861. }
  4862. }
  4863. } else {
  4864. if (!op2_range || (op2_range->min <= 0 && op2_range->max >= 0)) {
  4865. if (Z_MODE(op2_addr) == IS_MEM_ZVAL) {
  4866. | cmp aword [Ra(Z_REG(op2_addr))+Z_OFFSET(op2_addr)], 0
  4867. } else if (Z_MODE(op2_addr) == IS_REG) {
  4868. | test Ra(Z_REG(op2_addr)), Ra(Z_REG(op2_addr))
  4869. }
  4870. | jz >1
  4871. |.cold_code
  4872. |1:
  4873. zend_jit_invalidate_var_if_necessary(Dst, op1_type, op1_addr, op1);
  4874. zend_jit_invalidate_var_if_necessary(Dst, op2_type, op2_addr, op2);
  4875. | SET_EX_OPLINE opline, r0
  4876. | jmp ->mod_by_zero
  4877. |.code
  4878. }
  4879. /* Prevent overflow error/crash if op1 == LONG_MIN and op2 == -1 */
  4880. if (!op2_range || (op2_range->min <= -1 && op2_range->max >= -1)) {
  4881. if (Z_MODE(op2_addr) == IS_MEM_ZVAL) {
  4882. | cmp aword [Ra(Z_REG(op2_addr))+Z_OFFSET(op2_addr)], -1
  4883. } else if (Z_MODE(op2_addr) == IS_REG) {
  4884. | cmp Ra(Z_REG(op2_addr)), -1
  4885. }
  4886. | jz >1
  4887. |.cold_code
  4888. |1:
  4889. | SET_ZVAL_LVAL res_addr, 0
  4890. if (Z_MODE(res_addr) == IS_MEM_ZVAL) {
  4891. if (Z_MODE(op1_addr) != IS_MEM_ZVAL || Z_REG(op1_addr) != Z_REG(res_addr) || Z_OFFSET(op1_addr) != Z_OFFSET(res_addr)) {
  4892. if ((res_use_info & (MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_REF|MAY_BE_GUARD)) != MAY_BE_LONG) {
  4893. | SET_ZVAL_TYPE_INFO res_addr, IS_LONG
  4894. }
  4895. }
  4896. }
  4897. | jmp >5
  4898. |.code
  4899. }
  4900. if (Z_MODE(res_addr) == IS_MEM_ZVAL && Z_REG(res_addr) == ZREG_RAX) {
  4901. | mov aword T1, r0 // save
  4902. }
  4903. result_reg = ZREG_RDX;
  4904. | GET_ZVAL_LVAL ZREG_RAX, op1_addr
  4905. |.if X64
  4906. | cqo
  4907. |.else
  4908. | cdq
  4909. |.endif
  4910. if (Z_MODE(op2_addr) == IS_MEM_ZVAL) {
  4911. | idiv aword [Ra(Z_REG(op2_addr))+Z_OFFSET(op2_addr)]
  4912. } else if (Z_MODE(op2_addr) == IS_REG) {
  4913. | idiv Ra(Z_REG(op2_addr))
  4914. }
  4915. if (Z_MODE(res_addr) == IS_MEM_ZVAL && Z_REG(res_addr) == ZREG_RAX) {
  4916. | mov r0, aword T1 // restore
  4917. }
  4918. }
  4919. } else if (same_ops) {
  4920. | GET_ZVAL_LVAL result_reg, op1_addr
  4921. | LONG_MATH_REG opcode, Ra(result_reg), Ra(result_reg)
  4922. } else {
  4923. zend_reg tmp_reg;
  4924. if (Z_MODE(res_addr) == IS_MEM_ZVAL && Z_REG(res_addr) == ZREG_R0) {
  4925. tmp_reg = ZREG_R1;
  4926. } else if (result_reg != ZREG_R0) {
  4927. tmp_reg = ZREG_R0;
  4928. } else {
  4929. tmp_reg = ZREG_R1;
  4930. }
  4931. | GET_ZVAL_LVAL result_reg, op1_addr
  4932. | LONG_MATH opcode, result_reg, op2_addr, tmp_reg
  4933. (void)tmp_reg;
  4934. }
  4935. if (Z_MODE(res_addr) != IS_REG || Z_REG(res_addr) != result_reg) {
  4936. | SET_ZVAL_LVAL res_addr, Ra(result_reg)
  4937. }
  4938. if (Z_MODE(res_addr) == IS_MEM_ZVAL) {
  4939. if (Z_MODE(op1_addr) != IS_MEM_ZVAL || Z_REG(op1_addr) != Z_REG(res_addr) || Z_OFFSET(op1_addr) != Z_OFFSET(res_addr)) {
  4940. if ((res_use_info & (MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_REF|MAY_BE_GUARD)) != MAY_BE_LONG) {
  4941. | SET_ZVAL_TYPE_INFO res_addr, IS_LONG
  4942. }
  4943. }
  4944. }
  4945. if ((op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-MAY_BE_LONG)) ||
  4946. (op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-MAY_BE_LONG))) {
  4947. if ((op1_info & MAY_BE_LONG) &&
  4948. (op2_info & MAY_BE_LONG)) {
  4949. |.cold_code
  4950. }
  4951. |6:
  4952. if (Z_MODE(op1_addr) != IS_MEM_ZVAL || Z_REG(op1_addr) != ZREG_FCARG1) {
  4953. if (Z_MODE(res_addr) == IS_REG) {
  4954. zend_jit_addr real_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, res_var);
  4955. | LOAD_ZVAL_ADDR FCARG1a, real_addr
  4956. } else if (Z_REG(res_addr) != ZREG_FCARG1 || Z_OFFSET(res_addr) != 0) {
  4957. | LOAD_ZVAL_ADDR FCARG1a, res_addr
  4958. }
  4959. if (Z_MODE(op1_addr) == IS_REG) {
  4960. zend_jit_addr real_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, op1.var);
  4961. if (!zend_jit_spill_store(Dst, op1_addr, real_addr, op1_info, 1)) {
  4962. return 0;
  4963. }
  4964. op1_addr = real_addr;
  4965. }
  4966. | LOAD_ZVAL_ADDR FCARG2a, op1_addr
  4967. } else {
  4968. if (Z_MODE(op1_addr) == IS_REG) {
  4969. zend_jit_addr real_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, op1.var);
  4970. if (!zend_jit_spill_store(Dst, op1_addr, real_addr, op1_info, 1)) {
  4971. return 0;
  4972. }
  4973. op1_addr = real_addr;
  4974. }
  4975. | LOAD_ZVAL_ADDR FCARG2a, op1_addr
  4976. if (Z_MODE(res_addr) == IS_REG) {
  4977. zend_jit_addr real_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, res_var);
  4978. | LOAD_ZVAL_ADDR FCARG1a, real_addr
  4979. } else if (Z_REG(res_addr) != ZREG_FCARG1 || Z_OFFSET(res_addr) != 0) {
  4980. | LOAD_ZVAL_ADDR FCARG1a, res_addr
  4981. }
  4982. }
  4983. if (Z_MODE(op2_addr) == IS_REG) {
  4984. zend_jit_addr real_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, op2.var);
  4985. if (!zend_jit_spill_store(Dst, op2_addr, real_addr, op2_info, 1)) {
  4986. return 0;
  4987. }
  4988. op2_addr = real_addr;
  4989. }
  4990. |.if X64
  4991. | LOAD_ZVAL_ADDR CARG3, op2_addr
  4992. |.else
  4993. | sub r4, 12
  4994. | PUSH_ZVAL_ADDR op2_addr, r0
  4995. |.endif
  4996. | SET_EX_OPLINE opline, r0
  4997. if (opcode == ZEND_BW_OR) {
  4998. | EXT_CALL bitwise_or_function, r0
  4999. } else if (opcode == ZEND_BW_AND) {
  5000. | EXT_CALL bitwise_and_function, r0
  5001. } else if (opcode == ZEND_BW_XOR) {
  5002. | EXT_CALL bitwise_xor_function, r0
  5003. } else if (opcode == ZEND_SL) {
  5004. | EXT_CALL shift_left_function, r0
  5005. } else if (opcode == ZEND_SR) {
  5006. | EXT_CALL shift_right_function, r0
  5007. } else if (opcode == ZEND_MOD) {
  5008. | EXT_CALL mod_function, r0
  5009. } else {
  5010. ZEND_UNREACHABLE();
  5011. }
  5012. |.if not(X64)
  5013. | add r4, 12
  5014. |.endif
  5015. if (op1_addr == res_addr && (op2_info & MAY_BE_RCN)) {
  5016. /* compound assignment may decrement "op2" refcount */
  5017. op2_info |= MAY_BE_RC1;
  5018. }
  5019. | FREE_OP op1_type, op1, op1_info, 0, NULL
  5020. | FREE_OP op2_type, op2, op2_info, 0, NULL
  5021. if (may_throw) {
  5022. if (opline->opcode == ZEND_ASSIGN_DIM_OP && (opline->op2_type & (IS_VAR|IS_TMP_VAR))) {
  5023. | MEM_CMP_ZTS aword, executor_globals, exception, 0, r0
  5024. | jne ->exception_handler_free_op2
  5025. } else if (Z_MODE(res_addr) == IS_MEM_ZVAL && Z_REG(res_addr) == ZREG_RX) {
  5026. zend_jit_check_exception_undef_result(Dst, opline);
  5027. } else {
  5028. zend_jit_check_exception(Dst);
  5029. }
  5030. }
  5031. if (Z_MODE(res_addr) == IS_REG) {
  5032. zend_jit_addr real_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, res_var);
  5033. if (!zend_jit_load_reg(Dst, real_addr, res_addr, res_info)) {
  5034. return 0;
  5035. }
  5036. }
  5037. if ((op1_info & MAY_BE_LONG) &&
  5038. (op2_info & MAY_BE_LONG)) {
  5039. | jmp >5
  5040. |.code
  5041. }
  5042. }
  5043. |5:
  5044. return 1;
  5045. }
  5046. static int zend_jit_long_math(dasm_State **Dst, const zend_op *opline, uint32_t op1_info, zend_ssa_range *op1_range, zend_jit_addr op1_addr, uint32_t op2_info, zend_ssa_range *op2_range, zend_jit_addr op2_addr, uint32_t res_use_info, uint32_t res_info, zend_jit_addr res_addr, int may_throw)
  5047. {
  5048. ZEND_ASSERT(!(op1_info & MAY_BE_UNDEF) && !(op2_info & MAY_BE_UNDEF));
  5049. ZEND_ASSERT((op1_info & MAY_BE_LONG) && (op2_info & MAY_BE_LONG));
  5050. if (!zend_jit_long_math_helper(Dst, opline, opline->opcode,
  5051. opline->op1_type, opline->op1, op1_addr, op1_info, op1_range,
  5052. opline->op2_type, opline->op2, op2_addr, op2_info, op2_range,
  5053. opline->result.var, res_addr, res_info, res_use_info, may_throw)) {
  5054. return 0;
  5055. }
  5056. if (!zend_jit_store_var_if_necessary(Dst, opline->result.var, res_addr, res_info)) {
  5057. return 0;
  5058. }
  5059. return 1;
  5060. }
  5061. static int zend_jit_concat_helper(dasm_State **Dst,
  5062. const zend_op *opline,
  5063. zend_uchar op1_type,
  5064. znode_op op1,
  5065. zend_jit_addr op1_addr,
  5066. uint32_t op1_info,
  5067. zend_uchar op2_type,
  5068. znode_op op2,
  5069. zend_jit_addr op2_addr,
  5070. uint32_t op2_info,
  5071. zend_jit_addr res_addr,
  5072. int may_throw)
  5073. {
  5074. #if 1
  5075. if ((op1_info & MAY_BE_STRING) && (op2_info & MAY_BE_STRING)) {
  5076. if (op1_info & ((MAY_BE_UNDEF|MAY_BE_ANY|MAY_BE_REF) - MAY_BE_STRING)) {
  5077. | IF_NOT_ZVAL_TYPE op1_addr, IS_STRING, >6
  5078. }
  5079. if (op2_info & ((MAY_BE_UNDEF|MAY_BE_ANY|MAY_BE_REF) - MAY_BE_STRING)) {
  5080. | IF_NOT_ZVAL_TYPE op2_addr, IS_STRING, >6
  5081. }
  5082. if (Z_MODE(op1_addr) == IS_MEM_ZVAL && Z_REG(op1_addr) == Z_REG(res_addr) && Z_OFFSET(op1_addr) == Z_OFFSET(res_addr)) {
  5083. if (Z_REG(res_addr) != ZREG_FCARG1 || Z_OFFSET(res_addr) != 0) {
  5084. | LOAD_ZVAL_ADDR FCARG1a, res_addr
  5085. }
  5086. | LOAD_ZVAL_ADDR FCARG2a, op2_addr
  5087. | EXT_CALL zend_jit_fast_assign_concat_helper, r0
  5088. /* concatination with itself may reduce refcount */
  5089. op2_info |= MAY_BE_RC1;
  5090. } else {
  5091. if (Z_REG(res_addr) != ZREG_FCARG1 || Z_OFFSET(res_addr) != 0) {
  5092. | LOAD_ZVAL_ADDR FCARG1a, res_addr
  5093. }
  5094. | LOAD_ZVAL_ADDR FCARG2a, op1_addr
  5095. |.if X64
  5096. | LOAD_ZVAL_ADDR CARG3, op2_addr
  5097. |.else
  5098. | sub r4, 12
  5099. | PUSH_ZVAL_ADDR op2_addr, r0
  5100. |.endif
  5101. if (op1_type == IS_CV || op1_type == IS_CONST) {
  5102. | EXT_CALL zend_jit_fast_concat_helper, r0
  5103. } else {
  5104. | EXT_CALL zend_jit_fast_concat_tmp_helper, r0
  5105. }
  5106. |.if not(X64)
  5107. | add r4, 12
  5108. |.endif
  5109. }
  5110. /* concatination with empty string may increase refcount */
  5111. op2_info |= MAY_BE_RCN;
  5112. | FREE_OP op2_type, op2, op2_info, 0, opline
  5113. |5:
  5114. }
  5115. if ((op1_info & ((MAY_BE_UNDEF|MAY_BE_ANY|MAY_BE_REF) - MAY_BE_STRING)) ||
  5116. (op2_info & ((MAY_BE_UNDEF|MAY_BE_ANY|MAY_BE_REF) - MAY_BE_STRING))) {
  5117. if ((op1_info & MAY_BE_STRING) && (op2_info & MAY_BE_STRING)) {
  5118. |.cold_code
  5119. |6:
  5120. }
  5121. #endif
  5122. if (Z_MODE(op1_addr) != IS_MEM_ZVAL || Z_REG(op1_addr) != ZREG_FCARG1) {
  5123. if (Z_REG(res_addr) != ZREG_FCARG1 || Z_OFFSET(res_addr) != 0) {
  5124. | LOAD_ZVAL_ADDR FCARG1a, res_addr
  5125. }
  5126. | LOAD_ZVAL_ADDR FCARG2a, op1_addr
  5127. } else {
  5128. | LOAD_ZVAL_ADDR FCARG2a, op1_addr
  5129. if (Z_REG(res_addr) != ZREG_FCARG1 || Z_OFFSET(res_addr) != 0) {
  5130. | LOAD_ZVAL_ADDR FCARG1a, res_addr
  5131. }
  5132. }
  5133. |.if X64
  5134. | LOAD_ZVAL_ADDR CARG3, op2_addr
  5135. |.else
  5136. | sub r4, 12
  5137. | PUSH_ZVAL_ADDR op2_addr, r0
  5138. |.endif
  5139. | SET_EX_OPLINE opline, r0
  5140. | EXT_CALL concat_function, r0
  5141. |.if not(X64)
  5142. | add r4, 12
  5143. |.endif
  5144. /* concatination with empty string may increase refcount */
  5145. op1_info |= MAY_BE_RCN;
  5146. op2_info |= MAY_BE_RCN;
  5147. | FREE_OP op1_type, op1, op1_info, 0, NULL
  5148. | FREE_OP op2_type, op2, op2_info, 0, NULL
  5149. if (may_throw) {
  5150. if (Z_MODE(res_addr) == IS_MEM_ZVAL && Z_REG(res_addr) == ZREG_RX) {
  5151. zend_jit_check_exception_undef_result(Dst, opline);
  5152. } else {
  5153. zend_jit_check_exception(Dst);
  5154. }
  5155. }
  5156. #if 1
  5157. if ((op1_info & MAY_BE_STRING) && (op2_info & MAY_BE_STRING)) {
  5158. | jmp <5
  5159. |.code
  5160. }
  5161. }
  5162. #endif
  5163. return 1;
  5164. }
  5165. static int zend_jit_concat(dasm_State **Dst, const zend_op *opline, uint32_t op1_info, uint32_t op2_info, zend_jit_addr res_addr, int may_throw)
  5166. {
  5167. zend_jit_addr op1_addr, op2_addr;
  5168. ZEND_ASSERT(!(op1_info & MAY_BE_UNDEF) && !(op2_info & MAY_BE_UNDEF));
  5169. ZEND_ASSERT((op1_info & MAY_BE_STRING) && (op2_info & MAY_BE_STRING));
  5170. op1_addr = OP1_ADDR();
  5171. op2_addr = OP2_ADDR();
  5172. return zend_jit_concat_helper(Dst, opline, opline->op1_type, opline->op1, op1_addr, op1_info, opline->op2_type, opline->op2, op2_addr, op2_info, res_addr, may_throw);
  5173. }
  5174. static int zend_jit_fetch_dimension_address_inner(dasm_State **Dst, const zend_op *opline, uint32_t type, uint32_t op1_info, uint32_t op2_info, uint8_t dim_type, const void *found_exit_addr, const void *not_found_exit_addr, const void *exit_addr)
  5175. /* Labels: 1,2,3,4,5 */
  5176. {
  5177. zend_jit_addr op2_addr = OP2_ADDR();
  5178. zend_jit_addr res_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->result.var);
  5179. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE
  5180. && type == BP_VAR_R
  5181. && !exit_addr) {
  5182. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  5183. exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  5184. if (!exit_addr) {
  5185. return 0;
  5186. }
  5187. }
  5188. if (op2_info & MAY_BE_LONG) {
  5189. bool op2_loaded = 0;
  5190. bool packed_loaded = 0;
  5191. bool bad_packed_key = 0;
  5192. if (op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF) - MAY_BE_LONG)) {
  5193. | // if (EXPECTED(Z_TYPE_P(dim) == IS_LONG))
  5194. | IF_NOT_ZVAL_TYPE op2_addr, IS_LONG, >3
  5195. }
  5196. if (op1_info & MAY_BE_PACKED_GUARD) {
  5197. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_PACKED_GUARD);
  5198. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  5199. if (!exit_addr) {
  5200. return 0;
  5201. }
  5202. if (op1_info & MAY_BE_ARRAY_PACKED) {
  5203. | test dword [FCARG1a + offsetof(zend_array, u.flags)], HASH_FLAG_PACKED
  5204. | jz &exit_addr
  5205. } else {
  5206. | test dword [FCARG1a + offsetof(zend_array, u.flags)], HASH_FLAG_PACKED
  5207. | jnz &exit_addr
  5208. }
  5209. }
  5210. if (type == BP_VAR_W) {
  5211. | // hval = Z_LVAL_P(dim);
  5212. | GET_ZVAL_LVAL ZREG_FCARG2, op2_addr
  5213. op2_loaded = 1;
  5214. }
  5215. if (op1_info & MAY_BE_ARRAY_PACKED) {
  5216. zend_long val = -1;
  5217. if (Z_MODE(op2_addr) == IS_CONST_ZVAL) {
  5218. val = Z_LVAL_P(Z_ZV(op2_addr));
  5219. if (val >= 0 && val < HT_MAX_SIZE) {
  5220. packed_loaded = 1;
  5221. } else {
  5222. bad_packed_key = 1;
  5223. }
  5224. } else {
  5225. if (!op2_loaded) {
  5226. | // hval = Z_LVAL_P(dim);
  5227. | GET_ZVAL_LVAL ZREG_FCARG2, op2_addr
  5228. op2_loaded = 1;
  5229. }
  5230. packed_loaded = 1;
  5231. }
  5232. if (dim_type == IS_UNDEF && type == BP_VAR_W && packed_loaded) {
  5233. /* don't generate "fast" code for packed array */
  5234. packed_loaded = 0;
  5235. }
  5236. if (packed_loaded) {
  5237. | // ZEND_HASH_INDEX_FIND(ht, hval, retval, num_undef);
  5238. if (op1_info & MAY_BE_ARRAY_NUMERIC_HASH) {
  5239. | test dword [FCARG1a + offsetof(zend_array, u.flags)], HASH_FLAG_PACKED
  5240. | jz >4 // HASH_FIND
  5241. }
  5242. | // if (EXPECTED((zend_ulong)(_h) < (zend_ulong)(_ht)->nNumUsed))
  5243. |.if X64
  5244. | mov eax, dword [FCARG1a + offsetof(zend_array, nNumUsed)]
  5245. if (val == 0) {
  5246. | test r0, r0
  5247. } else if (val > 0 && !op2_loaded) {
  5248. | cmp r0, val
  5249. } else {
  5250. | cmp r0, FCARG2a
  5251. }
  5252. |.else
  5253. if (val >= 0 && !op2_loaded) {
  5254. | cmp dword [FCARG1a + offsetof(zend_array, nNumUsed)], val
  5255. } else {
  5256. | cmp dword [FCARG1a + offsetof(zend_array, nNumUsed)], FCARG2a
  5257. }
  5258. |.endif
  5259. if (type == BP_JIT_IS) {
  5260. if (not_found_exit_addr) {
  5261. | jbe &not_found_exit_addr
  5262. } else {
  5263. | jbe >9 // NOT_FOUND
  5264. }
  5265. } else if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE && type == BP_VAR_R) {
  5266. | jbe &exit_addr
  5267. } else if (type == BP_VAR_IS && not_found_exit_addr) {
  5268. | jbe &not_found_exit_addr
  5269. } else if (type == BP_VAR_RW && not_found_exit_addr) {
  5270. | jbe &not_found_exit_addr
  5271. } else if (type == BP_VAR_IS && found_exit_addr) {
  5272. | jbe >7 // NOT_FOUND
  5273. } else {
  5274. | jbe >2 // NOT_FOUND
  5275. }
  5276. | // _ret = &_ht->arData[_h].val;
  5277. if (val >= 0) {
  5278. | mov r0, aword [FCARG1a + offsetof(zend_array, arData)]
  5279. if (val != 0) {
  5280. | add r0, val * sizeof(Bucket)
  5281. }
  5282. } else {
  5283. |.if X64
  5284. | mov r0, FCARG2a
  5285. | shl r0, 5
  5286. |.else
  5287. | imul r0, FCARG2a, sizeof(Bucket)
  5288. |.endif
  5289. | add r0, aword [FCARG1a + offsetof(zend_array, arData)]
  5290. }
  5291. }
  5292. }
  5293. switch (type) {
  5294. case BP_JIT_IS:
  5295. if (op1_info & MAY_BE_ARRAY_NUMERIC_HASH) {
  5296. if (packed_loaded) {
  5297. | jmp >5
  5298. }
  5299. |4:
  5300. if (!op2_loaded) {
  5301. | // hval = Z_LVAL_P(dim);
  5302. | GET_ZVAL_LVAL ZREG_FCARG2, op2_addr
  5303. }
  5304. if (packed_loaded) {
  5305. | EXT_CALL _zend_hash_index_find, r0
  5306. } else {
  5307. | EXT_CALL zend_hash_index_find, r0
  5308. }
  5309. | test r0, r0
  5310. if (not_found_exit_addr) {
  5311. | jz &not_found_exit_addr
  5312. } else {
  5313. | jz >9 // NOT_FOUND
  5314. }
  5315. if (op2_info & MAY_BE_STRING) {
  5316. | jmp >5
  5317. }
  5318. } else if (packed_loaded) {
  5319. if (op2_info & MAY_BE_STRING) {
  5320. | jmp >5
  5321. }
  5322. } else if (not_found_exit_addr) {
  5323. | jmp &not_found_exit_addr
  5324. } else {
  5325. | jmp >9 // NOT_FOUND
  5326. }
  5327. break;
  5328. case BP_VAR_R:
  5329. case BP_VAR_IS:
  5330. case BP_VAR_UNSET:
  5331. if (packed_loaded) {
  5332. if (op1_info & MAY_BE_ARRAY_NUMERIC_HASH) {
  5333. | IF_NOT_Z_TYPE r0, IS_UNDEF, >8
  5334. } else if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE && type == BP_VAR_R) {
  5335. /* perform IS_UNDEF check only after result type guard (during deoptimization) */
  5336. if (!found_exit_addr || (op1_info & MAY_BE_ARRAY_NUMERIC_HASH)) {
  5337. | IF_Z_TYPE r0, IS_UNDEF, &exit_addr
  5338. }
  5339. } else if (type == BP_VAR_IS && not_found_exit_addr) {
  5340. | IF_Z_TYPE r0, IS_UNDEF, &not_found_exit_addr
  5341. } else if (type == BP_VAR_IS && found_exit_addr) {
  5342. | IF_Z_TYPE r0, IS_UNDEF, >7 // NOT_FOUND
  5343. } else {
  5344. | IF_Z_TYPE r0, IS_UNDEF, >2 // NOT_FOUND
  5345. }
  5346. }
  5347. if (!(op1_info & MAY_BE_ARRAY_KEY_LONG) || (packed_loaded && (op1_info & MAY_BE_ARRAY_NUMERIC_HASH))) {
  5348. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE && type == BP_VAR_R) {
  5349. | jmp &exit_addr
  5350. } else if (type == BP_VAR_IS && not_found_exit_addr) {
  5351. | jmp &not_found_exit_addr
  5352. } else if (type == BP_VAR_IS && found_exit_addr) {
  5353. | jmp >7 // NOT_FOUND
  5354. } else {
  5355. | jmp >2 // NOT_FOUND
  5356. }
  5357. }
  5358. if (!packed_loaded || (op1_info & MAY_BE_ARRAY_NUMERIC_HASH)) {
  5359. |4:
  5360. if (!op2_loaded) {
  5361. | // hval = Z_LVAL_P(dim);
  5362. | GET_ZVAL_LVAL ZREG_FCARG2, op2_addr
  5363. }
  5364. if (packed_loaded) {
  5365. | EXT_CALL _zend_hash_index_find, r0
  5366. } else {
  5367. | EXT_CALL zend_hash_index_find, r0
  5368. }
  5369. | test r0, r0
  5370. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE && type == BP_VAR_R) {
  5371. | jz &exit_addr
  5372. } else if (type == BP_VAR_IS && not_found_exit_addr) {
  5373. | jz &not_found_exit_addr
  5374. } else if (type == BP_VAR_IS && found_exit_addr) {
  5375. | jz >7 // NOT_FOUND
  5376. } else {
  5377. | jz >2 // NOT_FOUND
  5378. }
  5379. }
  5380. |.cold_code
  5381. |2:
  5382. switch (type) {
  5383. case BP_VAR_R:
  5384. if (JIT_G(trigger) != ZEND_JIT_ON_HOT_TRACE) {
  5385. | // zend_error(E_WARNING,"Undefined array key " ZEND_LONG_FMT, hval);
  5386. | // retval = &EG(uninitialized_zval);
  5387. | UNDEFINED_OFFSET opline
  5388. | jmp >9
  5389. }
  5390. break;
  5391. case BP_VAR_IS:
  5392. case BP_VAR_UNSET:
  5393. if (!not_found_exit_addr && !found_exit_addr) {
  5394. | // retval = &EG(uninitialized_zval);
  5395. | SET_ZVAL_TYPE_INFO res_addr, IS_NULL
  5396. | jmp >9
  5397. }
  5398. break;
  5399. default:
  5400. ZEND_UNREACHABLE();
  5401. }
  5402. |.code
  5403. break;
  5404. case BP_VAR_RW:
  5405. if (packed_loaded && !not_found_exit_addr) {
  5406. | IF_NOT_Z_TYPE r0, IS_UNDEF, >8
  5407. }
  5408. if (!packed_loaded ||
  5409. !not_found_exit_addr ||
  5410. (op1_info & MAY_BE_ARRAY_NUMERIC_HASH)) {
  5411. if (packed_loaded && not_found_exit_addr) {
  5412. |.cold_code
  5413. }
  5414. |2:
  5415. |4:
  5416. if (!op2_loaded) {
  5417. | // hval = Z_LVAL_P(dim);
  5418. | GET_ZVAL_LVAL ZREG_FCARG2, op2_addr
  5419. }
  5420. | SET_EX_OPLINE opline, r0
  5421. if (packed_loaded) {
  5422. | EXT_CALL zend_jit_hash_index_lookup_rw_no_packed, r0
  5423. } else {
  5424. | EXT_CALL zend_jit_hash_index_lookup_rw, r0
  5425. }
  5426. | test r0, r0
  5427. if (not_found_exit_addr) {
  5428. if (packed_loaded) {
  5429. | jnz >8
  5430. | jmp &not_found_exit_addr
  5431. |.code
  5432. } else {
  5433. | jz &not_found_exit_addr
  5434. }
  5435. } else {
  5436. | jz >9
  5437. }
  5438. }
  5439. break;
  5440. case BP_VAR_W:
  5441. if (packed_loaded) {
  5442. | IF_NOT_Z_TYPE r0, IS_UNDEF, >8
  5443. }
  5444. if (!(op1_info & MAY_BE_ARRAY_KEY_LONG) || (op1_info & MAY_BE_ARRAY_NUMERIC_HASH) || packed_loaded || bad_packed_key || dim_type == IS_UNDEF) {
  5445. |2:
  5446. |4:
  5447. if (!op2_loaded) {
  5448. | // hval = Z_LVAL_P(dim);
  5449. | GET_ZVAL_LVAL ZREG_FCARG2, op2_addr
  5450. }
  5451. | EXT_CALL zend_hash_index_lookup, r0
  5452. }
  5453. break;
  5454. default:
  5455. ZEND_UNREACHABLE();
  5456. }
  5457. if (type != BP_JIT_IS && (op2_info & MAY_BE_STRING)) {
  5458. | jmp >8
  5459. }
  5460. }
  5461. if (op2_info & MAY_BE_STRING) {
  5462. |3:
  5463. if (op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF) - (MAY_BE_LONG|MAY_BE_STRING))) {
  5464. | // if (EXPECTED(Z_TYPE_P(dim) == IS_STRING))
  5465. | IF_NOT_ZVAL_TYPE op2_addr, IS_STRING, >3
  5466. }
  5467. | // offset_key = Z_STR_P(dim);
  5468. | GET_ZVAL_LVAL ZREG_FCARG2, op2_addr
  5469. | // retval = zend_hash_find(ht, offset_key);
  5470. switch (type) {
  5471. case BP_JIT_IS:
  5472. if (opline->op2_type != IS_CONST) {
  5473. | cmp byte [FCARG2a + offsetof(zend_string, val)], '9'
  5474. | jle >1
  5475. |.cold_code
  5476. |1:
  5477. | EXT_CALL zend_jit_symtable_find, r0
  5478. | jmp >1
  5479. |.code
  5480. | EXT_CALL zend_hash_find, r0
  5481. |1:
  5482. } else {
  5483. | EXT_CALL zend_hash_find_known_hash, r0
  5484. }
  5485. | test r0, r0
  5486. if (not_found_exit_addr) {
  5487. | jz &not_found_exit_addr
  5488. } else {
  5489. | jz >9 // NOT_FOUND
  5490. }
  5491. break;
  5492. case BP_VAR_R:
  5493. case BP_VAR_IS:
  5494. case BP_VAR_UNSET:
  5495. if (opline->op2_type != IS_CONST) {
  5496. | cmp byte [FCARG2a + offsetof(zend_string, val)], '9'
  5497. | jle >1
  5498. |.cold_code
  5499. |1:
  5500. | EXT_CALL zend_jit_symtable_find, r0
  5501. | jmp >1
  5502. |.code
  5503. | EXT_CALL zend_hash_find, r0
  5504. |1:
  5505. } else {
  5506. | EXT_CALL zend_hash_find_known_hash, r0
  5507. }
  5508. | test r0, r0
  5509. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE && type == BP_VAR_R) {
  5510. | jz &exit_addr
  5511. } else if (type == BP_VAR_IS && not_found_exit_addr) {
  5512. | jz &not_found_exit_addr
  5513. } else if (type == BP_VAR_IS && found_exit_addr) {
  5514. | jz >7 // NOT_FOUND
  5515. } else {
  5516. | jz >2 // NOT_FOUND
  5517. |.cold_code
  5518. |2:
  5519. switch (type) {
  5520. case BP_VAR_R:
  5521. // zend_error(E_WARNING, "Undefined array key \"%s\"", ZSTR_VAL(offset_key));
  5522. | UNDEFINED_INDEX opline
  5523. | jmp >9
  5524. break;
  5525. case BP_VAR_IS:
  5526. case BP_VAR_UNSET:
  5527. | // retval = &EG(uninitialized_zval);
  5528. | SET_ZVAL_TYPE_INFO res_addr, IS_NULL
  5529. | jmp >9
  5530. break;
  5531. default:
  5532. ZEND_UNREACHABLE();
  5533. }
  5534. |.code
  5535. }
  5536. break;
  5537. case BP_VAR_RW:
  5538. | SET_EX_OPLINE opline, r0
  5539. if (opline->op2_type != IS_CONST) {
  5540. | EXT_CALL zend_jit_symtable_lookup_rw, r0
  5541. } else {
  5542. | EXT_CALL zend_jit_hash_lookup_rw, r0
  5543. }
  5544. | test r0, r0
  5545. if (not_found_exit_addr) {
  5546. | jz &not_found_exit_addr
  5547. } else {
  5548. | jz >9
  5549. }
  5550. break;
  5551. case BP_VAR_W:
  5552. if (opline->op2_type != IS_CONST) {
  5553. | EXT_CALL zend_jit_symtable_lookup_w, r0
  5554. } else {
  5555. | EXT_CALL zend_hash_lookup, r0
  5556. }
  5557. break;
  5558. default:
  5559. ZEND_UNREACHABLE();
  5560. }
  5561. }
  5562. if (type == BP_JIT_IS && (op2_info & (MAY_BE_LONG|MAY_BE_STRING))) {
  5563. |5:
  5564. if (op1_info & MAY_BE_ARRAY_OF_REF) {
  5565. | ZVAL_DEREF r0, MAY_BE_REF
  5566. }
  5567. | cmp byte [r0 + 8], IS_NULL
  5568. if (not_found_exit_addr) {
  5569. | jle &not_found_exit_addr
  5570. } else if (found_exit_addr) {
  5571. | jg &found_exit_addr
  5572. } else {
  5573. | jle >9 // NOT FOUND
  5574. }
  5575. }
  5576. if (op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF) - (MAY_BE_LONG|MAY_BE_STRING))) {
  5577. if (op2_info & (MAY_BE_LONG|MAY_BE_STRING)) {
  5578. |.cold_code
  5579. |3:
  5580. }
  5581. | SET_EX_OPLINE opline, r0
  5582. | LOAD_ZVAL_ADDR FCARG2a, op2_addr
  5583. switch (type) {
  5584. case BP_VAR_R:
  5585. |.if X64
  5586. | LOAD_ZVAL_ADDR CARG3, res_addr
  5587. |.else
  5588. | sub r4, 12
  5589. | PUSH_ZVAL_ADDR res_addr, r0
  5590. |.endif
  5591. | EXT_CALL zend_jit_fetch_dim_r_helper, r0
  5592. |.if not(X64)
  5593. | add r4, 12
  5594. |.endif
  5595. | jmp >9
  5596. break;
  5597. case BP_JIT_IS:
  5598. | EXT_CALL zend_jit_fetch_dim_isset_helper, r0
  5599. | test r0, r0
  5600. if (not_found_exit_addr) {
  5601. | je &not_found_exit_addr
  5602. if (op2_info & (MAY_BE_LONG|MAY_BE_STRING)) {
  5603. | jmp >8
  5604. }
  5605. } else if (found_exit_addr) {
  5606. | jne &found_exit_addr
  5607. if (op2_info & (MAY_BE_LONG|MAY_BE_STRING)) {
  5608. | jmp >9
  5609. }
  5610. } else {
  5611. | jne >8
  5612. | jmp >9
  5613. }
  5614. break;
  5615. case BP_VAR_IS:
  5616. case BP_VAR_UNSET:
  5617. |.if X64
  5618. | LOAD_ZVAL_ADDR CARG3, res_addr
  5619. |.else
  5620. | sub r4, 12
  5621. | PUSH_ZVAL_ADDR res_addr, r0
  5622. |.endif
  5623. | EXT_CALL zend_jit_fetch_dim_is_helper, r0
  5624. |.if not(X64)
  5625. | add r4, 12
  5626. |.endif
  5627. | jmp >9
  5628. break;
  5629. case BP_VAR_RW:
  5630. | EXT_CALL zend_jit_fetch_dim_rw_helper, r0
  5631. | test r0, r0
  5632. | jne >8
  5633. | jmp >9
  5634. break;
  5635. case BP_VAR_W:
  5636. | EXT_CALL zend_jit_fetch_dim_w_helper, r0
  5637. | test r0, r0
  5638. | jne >8
  5639. | jmp >9
  5640. break;
  5641. default:
  5642. ZEND_UNREACHABLE();
  5643. }
  5644. if (op2_info & (MAY_BE_LONG|MAY_BE_STRING)) {
  5645. |.code
  5646. }
  5647. }
  5648. return 1;
  5649. }
  5650. static int zend_jit_simple_assign(dasm_State **Dst,
  5651. const zend_op *opline,
  5652. zend_jit_addr var_addr,
  5653. uint32_t var_info,
  5654. uint32_t var_def_info,
  5655. zend_uchar val_type,
  5656. zend_jit_addr val_addr,
  5657. uint32_t val_info,
  5658. zend_jit_addr res_addr,
  5659. int in_cold,
  5660. int save_r1)
  5661. /* Labels: 1,2,3 */
  5662. {
  5663. zend_reg tmp_reg;
  5664. if (Z_MODE(var_addr) == IS_REG || Z_REG(var_addr) != ZREG_R0) {
  5665. tmp_reg = ZREG_R0;
  5666. } else {
  5667. /* ASSIGN_DIM */
  5668. tmp_reg = ZREG_FCARG1;
  5669. }
  5670. if (Z_MODE(val_addr) == IS_CONST_ZVAL) {
  5671. zval *zv = Z_ZV(val_addr);
  5672. if (!res_addr) {
  5673. | ZVAL_COPY_CONST var_addr, var_info, var_def_info, zv, tmp_reg
  5674. } else {
  5675. | ZVAL_COPY_CONST_2 var_addr, res_addr, var_info, var_def_info, zv, tmp_reg
  5676. }
  5677. if (Z_REFCOUNTED_P(zv)) {
  5678. if (!res_addr) {
  5679. | ADDREF_CONST zv, Ra(tmp_reg)
  5680. } else {
  5681. | ADDREF_CONST_2 zv, Ra(tmp_reg)
  5682. }
  5683. }
  5684. } else {
  5685. if (val_info & MAY_BE_UNDEF) {
  5686. if (in_cold) {
  5687. | IF_NOT_ZVAL_TYPE val_addr, IS_UNDEF, >2
  5688. } else {
  5689. | IF_ZVAL_TYPE val_addr, IS_UNDEF, >1
  5690. |.cold_code
  5691. |1:
  5692. }
  5693. | // zend_error(E_WARNING, "Undefined variable $%s", ZSTR_VAL(CV_DEF_OF(EX_VAR_TO_NUM(opline->op1.var))));
  5694. if (save_r1) {
  5695. | mov aword T1, FCARG1a // save
  5696. }
  5697. | SET_ZVAL_TYPE_INFO var_addr, IS_NULL
  5698. if (res_addr) {
  5699. | SET_ZVAL_TYPE_INFO res_addr, IS_NULL
  5700. }
  5701. if (opline) {
  5702. | SET_EX_OPLINE opline, Ra(tmp_reg)
  5703. }
  5704. ZEND_ASSERT(Z_MODE(val_addr) == IS_MEM_ZVAL && Z_REG(val_addr) == ZREG_FP);
  5705. | mov FCARG1d, Z_OFFSET(val_addr)
  5706. | EXT_CALL zend_jit_undefined_op_helper, r0
  5707. | test r0, r0
  5708. | jz ->exception_handler_undef
  5709. if (save_r1) {
  5710. | mov FCARG1a, aword T1 // restore
  5711. }
  5712. | jmp >3
  5713. if (in_cold) {
  5714. |2:
  5715. } else {
  5716. |.code
  5717. }
  5718. }
  5719. if (val_info & MAY_BE_REF) {
  5720. if (val_type == IS_CV) {
  5721. ZEND_ASSERT(Z_REG(var_addr) != ZREG_R2);
  5722. if (Z_MODE(val_addr) != IS_MEM_ZVAL || Z_REG(val_addr) != ZREG_R2 || Z_OFFSET(val_addr) != 0) {
  5723. | LOAD_ZVAL_ADDR r2, val_addr
  5724. }
  5725. | ZVAL_DEREF r2, val_info
  5726. val_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R2, 0);
  5727. } else {
  5728. zend_jit_addr ref_addr;
  5729. zend_reg type_reg = tmp_reg;
  5730. if (in_cold) {
  5731. | IF_NOT_ZVAL_TYPE val_addr, IS_REFERENCE, >1
  5732. } else {
  5733. | IF_ZVAL_TYPE val_addr, IS_REFERENCE, >1
  5734. |.cold_code
  5735. |1:
  5736. }
  5737. | // zend_refcounted *ref = Z_COUNTED_P(retval_ptr);
  5738. | GET_ZVAL_PTR r2, val_addr
  5739. | GC_DELREF r2
  5740. | // ZVAL_COPY_VALUE(return_value, &ref->value);
  5741. ref_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R2, 8);
  5742. if (!res_addr) {
  5743. | ZVAL_COPY_VALUE var_addr, var_info, ref_addr, val_info, type_reg, tmp_reg
  5744. } else {
  5745. | ZVAL_COPY_VALUE_2 var_addr, var_info, res_addr, ref_addr, val_info, type_reg, tmp_reg
  5746. }
  5747. | je >2
  5748. if (tmp_reg == ZREG_R0) {
  5749. | IF_NOT_REFCOUNTED ah, >3
  5750. } else {
  5751. | IF_NOT_FLAGS Rd(tmp_reg), (IS_TYPE_REFCOUNTED << Z_TYPE_FLAGS_SHIFT), >3
  5752. }
  5753. | GET_ZVAL_PTR Ra(tmp_reg), var_addr
  5754. if (!res_addr) {
  5755. | GC_ADDREF Ra(tmp_reg)
  5756. } else {
  5757. | add dword [Ra(tmp_reg)], 2
  5758. }
  5759. | jmp >3
  5760. |2:
  5761. if (res_addr) {
  5762. if (tmp_reg == ZREG_R0) {
  5763. | IF_NOT_REFCOUNTED ah, >2
  5764. } else {
  5765. | IF_NOT_FLAGS Rd(tmp_reg), (IS_TYPE_REFCOUNTED << Z_TYPE_FLAGS_SHIFT), >2
  5766. }
  5767. | GET_ZVAL_PTR Ra(tmp_reg), var_addr
  5768. | GC_ADDREF Ra(tmp_reg)
  5769. |2:
  5770. }
  5771. if (save_r1) {
  5772. | mov aword T1, FCARG1a // save
  5773. }
  5774. | EFREE_REFERENCE r2
  5775. if (save_r1) {
  5776. | mov FCARG1a, aword T1 // restore
  5777. }
  5778. | jmp >3
  5779. if (in_cold) {
  5780. |1:
  5781. } else {
  5782. |.code
  5783. }
  5784. }
  5785. }
  5786. if (!res_addr) {
  5787. | ZVAL_COPY_VALUE var_addr, var_info, val_addr, val_info, ZREG_R2, tmp_reg
  5788. } else {
  5789. | ZVAL_COPY_VALUE_2 var_addr, var_info, res_addr, val_addr, val_info, ZREG_R2, tmp_reg
  5790. }
  5791. if (val_type == IS_CV) {
  5792. if (!res_addr) {
  5793. | TRY_ADDREF val_info, dh, Ra(tmp_reg)
  5794. } else {
  5795. | TRY_ADDREF_2 val_info, dh, Ra(tmp_reg)
  5796. }
  5797. } else {
  5798. if (res_addr) {
  5799. | TRY_ADDREF val_info, dh, Ra(tmp_reg)
  5800. }
  5801. }
  5802. |3:
  5803. }
  5804. return 1;
  5805. }
  5806. static int zend_jit_assign_to_typed_ref(dasm_State **Dst,
  5807. const zend_op *opline,
  5808. zend_uchar val_type,
  5809. zend_jit_addr val_addr,
  5810. zend_jit_addr res_addr,
  5811. bool check_exception)
  5812. {
  5813. | // if (UNEXPECTED(ZEND_REF_HAS_TYPE_SOURCES(Z_REF_P(variable_ptr)))) {
  5814. | cmp aword [FCARG1a + offsetof(zend_reference, sources.ptr)], 0
  5815. | jnz >2
  5816. |.cold_code
  5817. |2:
  5818. if (Z_MODE(val_addr) != IS_MEM_ZVAL || Z_REG(val_addr) != ZREG_FCARG2 || Z_OFFSET(val_addr) != 0) {
  5819. | LOAD_ZVAL_ADDR FCARG2a, val_addr
  5820. }
  5821. if (opline) {
  5822. | SET_EX_OPLINE opline, r0
  5823. }
  5824. if (val_type == IS_CONST) {
  5825. | EXT_CALL zend_jit_assign_const_to_typed_ref, r0
  5826. } else if (val_type == IS_TMP_VAR) {
  5827. | EXT_CALL zend_jit_assign_tmp_to_typed_ref, r0
  5828. } else if (val_type == IS_VAR) {
  5829. | EXT_CALL zend_jit_assign_var_to_typed_ref, r0
  5830. } else if (val_type == IS_CV) {
  5831. | EXT_CALL zend_jit_assign_cv_to_typed_ref, r0
  5832. } else {
  5833. ZEND_UNREACHABLE();
  5834. }
  5835. if (res_addr) {
  5836. zend_jit_addr ret_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R0, 0);
  5837. | ZVAL_COPY_VALUE res_addr, -1, ret_addr, -1, ZREG_R1, ZREG_R2
  5838. | TRY_ADDREF -1, ch, r2
  5839. }
  5840. if (check_exception) {
  5841. | // if (UNEXPECTED(EG(exception) != NULL)) {
  5842. | MEM_CMP_ZTS aword, executor_globals, exception, 0, r0
  5843. | je >8 // END OF zend_jit_assign_to_variable()
  5844. | jmp ->exception_handler
  5845. } else {
  5846. | jmp >8
  5847. }
  5848. |.code
  5849. return 1;
  5850. }
  5851. static int zend_jit_assign_to_variable_call(dasm_State **Dst,
  5852. const zend_op *opline,
  5853. zend_jit_addr __var_use_addr,
  5854. zend_jit_addr var_addr,
  5855. uint32_t __var_info,
  5856. uint32_t __var_def_info,
  5857. zend_uchar val_type,
  5858. zend_jit_addr val_addr,
  5859. uint32_t val_info,
  5860. zend_jit_addr __res_addr,
  5861. bool __check_exception)
  5862. {
  5863. if (val_info & MAY_BE_UNDEF) {
  5864. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  5865. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  5866. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  5867. if (!exit_addr) {
  5868. return 0;
  5869. }
  5870. | IF_ZVAL_TYPE val_addr, IS_UNDEF, &exit_addr
  5871. } else {
  5872. | IF_ZVAL_TYPE val_addr, IS_UNDEF, >1
  5873. |.cold_code
  5874. |1:
  5875. ZEND_ASSERT(Z_REG(val_addr) == ZREG_FP);
  5876. if (Z_REG(var_addr) != ZREG_FP) {
  5877. | mov aword T1, Ra(Z_REG(var_addr)) // save
  5878. }
  5879. | SET_EX_OPLINE opline, r0
  5880. | mov FCARG1d, Z_OFFSET(val_addr)
  5881. | EXT_CALL zend_jit_undefined_op_helper, r0
  5882. if (Z_REG(var_addr) != ZREG_FP) {
  5883. | mov Ra(Z_REG(var_addr)), aword T1 // restore
  5884. }
  5885. if (Z_MODE(var_addr) != IS_MEM_ZVAL || Z_REG(var_addr) != ZREG_FCARG1 || Z_OFFSET(var_addr) != 0) {
  5886. | LOAD_ZVAL_ADDR FCARG1a, var_addr
  5887. }
  5888. | LOAD_ADDR_ZTS FCARG2a, executor_globals, uninitialized_zval
  5889. | call ->assign_const
  5890. | jmp >9
  5891. |.code
  5892. }
  5893. }
  5894. if (Z_MODE(var_addr) != IS_MEM_ZVAL || Z_REG(var_addr) != ZREG_FCARG1 || Z_OFFSET(var_addr) != 0) {
  5895. | LOAD_ZVAL_ADDR FCARG1a, var_addr
  5896. }
  5897. if (Z_MODE(val_addr) != IS_MEM_ZVAL || Z_REG(val_addr) != ZREG_FCARG2 || Z_OFFSET(val_addr) != 0) {
  5898. | LOAD_ZVAL_ADDR FCARG2a, val_addr
  5899. }
  5900. if (opline) {
  5901. | SET_EX_OPLINE opline, r0
  5902. }
  5903. if (!(val_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE|MAY_BE_REF))) {
  5904. | call ->assign_tmp
  5905. } else if (val_type == IS_CONST) {
  5906. | call ->assign_const
  5907. } else if (val_type == IS_TMP_VAR) {
  5908. | call ->assign_tmp
  5909. } else if (val_type == IS_VAR) {
  5910. if (!(val_info & MAY_BE_REF)) {
  5911. | call ->assign_tmp
  5912. } else {
  5913. | call ->assign_var
  5914. }
  5915. } else if (val_type == IS_CV) {
  5916. if (!(val_info & MAY_BE_REF)) {
  5917. | call ->assign_cv_noref
  5918. } else {
  5919. | call ->assign_cv
  5920. }
  5921. if ((val_info & MAY_BE_UNDEF) && JIT_G(trigger) != ZEND_JIT_ON_HOT_TRACE) {
  5922. |9:
  5923. }
  5924. } else {
  5925. ZEND_UNREACHABLE();
  5926. }
  5927. return 1;
  5928. }
  5929. static int zend_jit_assign_to_variable(dasm_State **Dst,
  5930. const zend_op *opline,
  5931. zend_jit_addr var_use_addr,
  5932. zend_jit_addr var_addr,
  5933. uint32_t var_info,
  5934. uint32_t var_def_info,
  5935. zend_uchar val_type,
  5936. zend_jit_addr val_addr,
  5937. uint32_t val_info,
  5938. zend_jit_addr res_addr,
  5939. bool check_exception)
  5940. /* Labels: 1,2,3,4,5,8 */
  5941. {
  5942. int done = 0;
  5943. zend_reg ref_reg, tmp_reg;
  5944. if (Z_MODE(var_addr) == IS_REG || Z_REG(var_use_addr) != ZREG_R0) {
  5945. ref_reg = ZREG_FCARG1;
  5946. tmp_reg = ZREG_R0;
  5947. } else {
  5948. /* ASSIGN_DIM */
  5949. ref_reg = ZREG_R0;
  5950. tmp_reg = ZREG_FCARG1;
  5951. }
  5952. if (var_info & MAY_BE_REF) {
  5953. if (Z_MODE(var_use_addr) != IS_MEM_ZVAL || Z_REG(var_use_addr) != ref_reg || Z_OFFSET(var_use_addr) != 0) {
  5954. | LOAD_ZVAL_ADDR Ra(ref_reg), var_use_addr
  5955. var_addr = var_use_addr = ZEND_ADDR_MEM_ZVAL(ref_reg, 0);
  5956. }
  5957. | // if (Z_ISREF_P(variable_ptr)) {
  5958. | IF_NOT_Z_TYPE, Ra(ref_reg), IS_REFERENCE, >3
  5959. | // if (UNEXPECTED(ZEND_REF_HAS_TYPE_SOURCES(Z_REF_P(variable_ptr)))) {
  5960. | GET_Z_PTR FCARG1a, Ra(ref_reg)
  5961. if (!zend_jit_assign_to_typed_ref(Dst, opline, val_type, val_addr, res_addr, check_exception)) {
  5962. return 0;
  5963. }
  5964. | lea Ra(ref_reg), [FCARG1a + offsetof(zend_reference, val)]
  5965. |3:
  5966. }
  5967. if (var_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE)) {
  5968. if (RC_MAY_BE_1(var_info)) {
  5969. int in_cold = 0;
  5970. if (var_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  5971. | IF_ZVAL_REFCOUNTED var_use_addr, >1
  5972. |.cold_code
  5973. |1:
  5974. in_cold = 1;
  5975. }
  5976. if (Z_REG(var_use_addr) == ZREG_FCARG1 || Z_REG(var_use_addr) == ZREG_R0) {
  5977. bool keep_gc = 0;
  5978. | GET_ZVAL_PTR Ra(tmp_reg), var_use_addr
  5979. if (tmp_reg == ZREG_FCARG1) {
  5980. if (Z_MODE(val_addr) == IS_REG) {
  5981. keep_gc = 1;
  5982. } else if ((val_info & ((MAY_BE_UNDEF|MAY_BE_ANY|MAY_BE_GUARD)-(MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE))) == 0) {
  5983. keep_gc = 1;
  5984. } else if (Z_MODE(val_addr) == IS_CONST_ZVAL) {
  5985. if (sizeof(void*) == 4) {
  5986. keep_gc = 1;
  5987. } else {
  5988. zval *zv = Z_ZV(val_addr);
  5989. if (Z_TYPE_P(zv) == IS_DOUBLE) {
  5990. if (Z_DVAL_P(zv) == 0 || IS_SIGNED_32BIT(zv)) {
  5991. keep_gc = 1;
  5992. }
  5993. } else if (IS_SIGNED_32BIT(Z_LVAL_P(zv))) {
  5994. keep_gc = 1;
  5995. }
  5996. }
  5997. } else if (Z_MODE(val_addr) == IS_MEM_ZVAL) {
  5998. if ((val_info & (MAY_BE_UNDEF|MAY_BE_ANY|MAY_BE_GUARD)) == MAY_BE_DOUBLE) {
  5999. keep_gc = 1;
  6000. }
  6001. }
  6002. }
  6003. if (!keep_gc) {
  6004. | mov aword T1, Ra(tmp_reg) // save
  6005. }
  6006. if (!zend_jit_simple_assign(Dst, opline, var_addr, var_info, var_def_info, val_type, val_addr, val_info, res_addr, in_cold, 0)) {
  6007. return 0;
  6008. }
  6009. if (!keep_gc) {
  6010. | mov FCARG1a, aword T1 // restore
  6011. }
  6012. } else {
  6013. | GET_ZVAL_PTR FCARG1a, var_use_addr
  6014. if (!zend_jit_simple_assign(Dst, opline, var_addr, var_info, var_def_info, val_type, val_addr, val_info, res_addr, in_cold, 1)) {
  6015. return 0;
  6016. }
  6017. }
  6018. | GC_DELREF FCARG1a
  6019. if (RC_MAY_BE_N(var_info) && (var_info & (MAY_BE_ARRAY|MAY_BE_OBJECT)) != 0) {
  6020. | jnz >4
  6021. } else {
  6022. | jnz >8
  6023. }
  6024. | ZVAL_DTOR_FUNC var_info, opline
  6025. if (in_cold || (RC_MAY_BE_N(var_info) && (var_info & (MAY_BE_ARRAY|MAY_BE_OBJECT)) != 0)) {
  6026. if (check_exception) {
  6027. | MEM_CMP_ZTS aword, executor_globals, exception, 0, r0
  6028. | je >8
  6029. | jmp ->exception_handler
  6030. } else {
  6031. | jmp >8
  6032. }
  6033. }
  6034. if (RC_MAY_BE_N(var_info) && (var_info & (MAY_BE_ARRAY|MAY_BE_OBJECT)) != 0) {
  6035. |4:
  6036. | IF_GC_MAY_NOT_LEAK FCARG1a, >8
  6037. | EXT_CALL gc_possible_root, r0
  6038. if (in_cold) {
  6039. | jmp >8
  6040. }
  6041. }
  6042. if (in_cold) {
  6043. |.code
  6044. } else {
  6045. done = 1;
  6046. }
  6047. } else /* if (RC_MAY_BE_N(var_info)) */ {
  6048. if (var_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  6049. | IF_NOT_ZVAL_REFCOUNTED var_use_addr, >5
  6050. }
  6051. if (var_info & (MAY_BE_ARRAY|MAY_BE_OBJECT)) {
  6052. if (Z_REG(var_use_addr) != ZREG_FP) {
  6053. | mov T1, Ra(Z_REG(var_use_addr)) // save
  6054. }
  6055. | GET_ZVAL_PTR FCARG1a, var_use_addr
  6056. | GC_DELREF FCARG1a
  6057. | IF_GC_MAY_NOT_LEAK FCARG1a, >5
  6058. | EXT_CALL gc_possible_root, r0
  6059. if (Z_REG(var_use_addr) != ZREG_FP) {
  6060. | mov Ra(Z_REG(var_use_addr)), T1 // restore
  6061. }
  6062. } else {
  6063. | GET_ZVAL_PTR Ra(tmp_reg), var_use_addr
  6064. | GC_DELREF Ra(tmp_reg)
  6065. }
  6066. |5:
  6067. }
  6068. }
  6069. if (!done && !zend_jit_simple_assign(Dst, opline, var_addr, var_info, var_def_info, val_type, val_addr, val_info, res_addr, 0, 0)) {
  6070. return 0;
  6071. }
  6072. |8:
  6073. return 1;
  6074. }
  6075. static int zend_jit_assign_dim(dasm_State **Dst, const zend_op *opline, uint32_t op1_info, zend_jit_addr op1_addr, uint32_t op2_info, uint32_t val_info, uint8_t dim_type, int may_throw)
  6076. {
  6077. zend_jit_addr op2_addr, op3_addr, res_addr;
  6078. op2_addr = (opline->op2_type != IS_UNUSED) ? OP2_ADDR() : 0;
  6079. op3_addr = OP1_DATA_ADDR();
  6080. if (opline->result_type == IS_UNUSED) {
  6081. res_addr = 0;
  6082. } else {
  6083. res_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->result.var);
  6084. }
  6085. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE && (val_info & MAY_BE_UNDEF)) {
  6086. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  6087. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  6088. if (!exit_addr) {
  6089. return 0;
  6090. }
  6091. | IF_ZVAL_TYPE op3_addr, IS_UNDEF, &exit_addr
  6092. val_info &= ~MAY_BE_UNDEF;
  6093. }
  6094. if (op1_info & MAY_BE_REF) {
  6095. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  6096. | IF_NOT_Z_TYPE FCARG1a, IS_REFERENCE, >1
  6097. | GET_Z_PTR FCARG2a, FCARG1a
  6098. | IF_NOT_TYPE byte [FCARG2a + offsetof(zend_reference, val) + offsetof(zval, u1.v.type)], IS_ARRAY, >2
  6099. | lea FCARG1a, [FCARG2a + offsetof(zend_reference, val)]
  6100. | jmp >3
  6101. |.cold_code
  6102. |2:
  6103. | SET_EX_OPLINE opline, r0
  6104. | EXT_CALL zend_jit_prepare_assign_dim_ref, r0
  6105. | test r0, r0
  6106. | mov FCARG1a, r0
  6107. | jne >1
  6108. | jmp ->exception_handler_undef
  6109. |.code
  6110. |1:
  6111. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  6112. }
  6113. if (op1_info & MAY_BE_ARRAY) {
  6114. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF) - MAY_BE_ARRAY)) {
  6115. | IF_NOT_ZVAL_TYPE op1_addr, IS_ARRAY, >7
  6116. }
  6117. |3:
  6118. | SEPARATE_ARRAY op1_addr, op1_info, 1
  6119. } else if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL)) {
  6120. if (op1_info & (MAY_BE_ANY-(MAY_BE_NULL|MAY_BE_ARRAY))) {
  6121. | CMP_ZVAL_TYPE op1_addr, IS_NULL
  6122. | jg >7
  6123. }
  6124. | // ZVAL_ARR(container, zend_new_array(8));
  6125. if (Z_REG(op1_addr) != ZREG_FP) {
  6126. | mov T1, Ra(Z_REG(op1_addr)) // save
  6127. }
  6128. | EXT_CALL _zend_new_array_0, r0
  6129. if (Z_REG(op1_addr) != ZREG_FP) {
  6130. | mov Ra(Z_REG(op1_addr)), T1 // restore
  6131. }
  6132. | SET_ZVAL_LVAL op1_addr, r0
  6133. | SET_ZVAL_TYPE_INFO op1_addr, IS_ARRAY_EX
  6134. | mov FCARG1a, r0
  6135. }
  6136. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_ARRAY)) {
  6137. |6:
  6138. if (opline->op2_type == IS_UNUSED) {
  6139. uint32_t var_info = MAY_BE_NULL;
  6140. zend_jit_addr var_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R0, 0);
  6141. | // var_ptr = zend_hash_next_index_insert(Z_ARRVAL_P(container), &EG(uninitialized_zval));
  6142. | LOAD_ADDR_ZTS FCARG2a, executor_globals, uninitialized_zval
  6143. | EXT_CALL zend_hash_next_index_insert, r0
  6144. | // if (UNEXPECTED(!var_ptr)) {
  6145. | test r0, r0
  6146. | jz >1
  6147. |.cold_code
  6148. |1:
  6149. | // zend_throw_error(NULL, "Cannot add element to the array as the next element is already occupied");
  6150. | CANNOT_ADD_ELEMENT opline
  6151. | //ZEND_VM_C_GOTO(assign_dim_op_ret_null);
  6152. | jmp >9
  6153. |.code
  6154. if (!zend_jit_simple_assign(Dst, opline, var_addr, var_info, -1, (opline+1)->op1_type, op3_addr, val_info, res_addr, 0, 0)) {
  6155. return 0;
  6156. }
  6157. } else {
  6158. uint32_t var_info = zend_array_element_type(op1_info, opline->op1_type, 0, 0);
  6159. zend_jit_addr var_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R0, 0);
  6160. if (!zend_jit_fetch_dimension_address_inner(Dst, opline, BP_VAR_W, op1_info, op2_info, dim_type, NULL, NULL, NULL)) {
  6161. return 0;
  6162. }
  6163. if (op1_info & (MAY_BE_ARRAY_OF_REF|MAY_BE_OBJECT)) {
  6164. var_info |= MAY_BE_REF;
  6165. }
  6166. if (var_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE)) {
  6167. var_info |= MAY_BE_RC1;
  6168. }
  6169. |8:
  6170. | // value = zend_assign_to_variable(variable_ptr, value, OP_DATA_TYPE);
  6171. if (opline->op1_type == IS_VAR) {
  6172. ZEND_ASSERT(opline->result_type == IS_UNUSED);
  6173. if (!zend_jit_assign_to_variable_call(Dst, opline, var_addr, var_addr, var_info, -1, (opline+1)->op1_type, op3_addr, val_info, res_addr, 0)) {
  6174. return 0;
  6175. }
  6176. } else {
  6177. if (!zend_jit_assign_to_variable(Dst, opline, var_addr, var_addr, var_info, -1, (opline+1)->op1_type, op3_addr, val_info, res_addr, 0)) {
  6178. return 0;
  6179. }
  6180. }
  6181. }
  6182. }
  6183. if (((op1_info & MAY_BE_ARRAY) &&
  6184. (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL))) ||
  6185. (op1_info & (MAY_BE_ANY-(MAY_BE_NULL|MAY_BE_ARRAY)))) {
  6186. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_ARRAY)) {
  6187. |.cold_code
  6188. |7:
  6189. }
  6190. if ((op1_info & (MAY_BE_UNDEF|MAY_BE_NULL)) &&
  6191. (op1_info & MAY_BE_ARRAY)) {
  6192. if (op1_info & (MAY_BE_ANY-(MAY_BE_NULL|MAY_BE_ARRAY))) {
  6193. | CMP_ZVAL_TYPE op1_addr, IS_NULL
  6194. | jg >2
  6195. }
  6196. | // ZVAL_ARR(container, zend_new_array(8));
  6197. if (Z_REG(op1_addr) != ZREG_FP) {
  6198. | mov T1, Ra(Z_REG(op1_addr)) // save
  6199. }
  6200. | EXT_CALL _zend_new_array_0, r0
  6201. if (Z_REG(op1_addr) != ZREG_FP) {
  6202. | mov Ra(Z_REG(op1_addr)), T1 // restore
  6203. }
  6204. | SET_ZVAL_LVAL op1_addr, r0
  6205. | SET_ZVAL_TYPE_INFO op1_addr, IS_ARRAY_EX
  6206. | mov FCARG1a, r0
  6207. | // ZEND_VM_C_GOTO(assign_dim_op_new_array);
  6208. | jmp <6
  6209. |2:
  6210. }
  6211. if (op1_info & (MAY_BE_ANY-(MAY_BE_NULL|MAY_BE_ARRAY))) {
  6212. | SET_EX_OPLINE opline, r0
  6213. if (Z_REG(op1_addr) != ZREG_FCARG1 || Z_OFFSET(op1_addr) != 0) {
  6214. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  6215. }
  6216. if (opline->op2_type == IS_UNUSED) {
  6217. | xor FCARG2a, FCARG2a
  6218. } else if (opline->op2_type == IS_CONST && Z_EXTRA_P(RT_CONSTANT(opline, opline->op2)) == ZEND_EXTRA_VALUE) {
  6219. ZEND_ASSERT(Z_MODE(op2_addr) == IS_CONST_ZVAL);
  6220. | LOAD_ADDR FCARG2a, (Z_ZV(op2_addr) + 1)
  6221. } else {
  6222. | LOAD_ZVAL_ADDR FCARG2a, op2_addr
  6223. }
  6224. |.if not(X64)
  6225. | sub r4, 8
  6226. |.endif
  6227. if (opline->result_type == IS_UNUSED) {
  6228. |.if X64
  6229. | xor CARG4, CARG4
  6230. |.else
  6231. | push 0
  6232. |.endif
  6233. } else {
  6234. |.if X64
  6235. | LOAD_ZVAL_ADDR CARG4, res_addr
  6236. |.else
  6237. | PUSH_ZVAL_ADDR res_addr, r0
  6238. |.endif
  6239. }
  6240. |.if X64
  6241. | LOAD_ZVAL_ADDR CARG3, op3_addr
  6242. |.else
  6243. | PUSH_ZVAL_ADDR op3_addr, r0
  6244. |.endif
  6245. | EXT_CALL zend_jit_assign_dim_helper, r0
  6246. |.if not(X64)
  6247. | add r4, 8
  6248. |.endif
  6249. #ifdef ZEND_JIT_USE_RC_INFERENCE
  6250. if (((opline+1)->op1_type & (IS_TMP_VAR|IS_VAR)) && (val_info & MAY_BE_RC1)) {
  6251. /* ASSIGN_DIM may increase refcount of the value */
  6252. val_info |= MAY_BE_RCN;
  6253. }
  6254. #endif
  6255. | FREE_OP (opline+1)->op1_type, (opline+1)->op1, val_info, 0, NULL
  6256. }
  6257. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_ARRAY)) {
  6258. if (op1_info & (MAY_BE_ANY-(MAY_BE_NULL|MAY_BE_ARRAY))) {
  6259. | jmp >9 // END
  6260. }
  6261. |.code
  6262. }
  6263. }
  6264. #ifdef ZEND_JIT_USE_RC_INFERENCE
  6265. if ((opline->op2_type & (IS_TMP_VAR|IS_VAR)) && (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_ARRAY|MAY_BE_OBJECT))) {
  6266. /* ASSIGN_DIM may increase refcount of the key */
  6267. op2_info |= MAY_BE_RCN;
  6268. }
  6269. #endif
  6270. |9:
  6271. | FREE_OP opline->op2_type, opline->op2, op2_info, 0, opline
  6272. if (may_throw) {
  6273. zend_jit_check_exception(Dst);
  6274. }
  6275. return 1;
  6276. }
  6277. static int zend_jit_assign_dim_op(dasm_State **Dst, const zend_op *opline, uint32_t op1_info, uint32_t op1_def_info, zend_jit_addr op1_addr, uint32_t op2_info, uint32_t op1_data_info, zend_ssa_range *op1_data_range, uint8_t dim_type, int may_throw)
  6278. {
  6279. zend_jit_addr op2_addr, op3_addr, var_addr;
  6280. const void *not_found_exit_addr = NULL;
  6281. uint32_t var_info = MAY_BE_NULL;
  6282. ZEND_ASSERT(opline->result_type == IS_UNUSED);
  6283. op2_addr = (opline->op2_type != IS_UNUSED) ? OP2_ADDR() : 0;
  6284. op3_addr = OP1_DATA_ADDR();
  6285. if (op1_info & MAY_BE_REF) {
  6286. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  6287. | IF_NOT_Z_TYPE FCARG1a, IS_REFERENCE, >1
  6288. | GET_Z_PTR FCARG2a, FCARG1a
  6289. | IF_NOT_TYPE byte [FCARG2a + offsetof(zend_reference, val) + offsetof(zval, u1.v.type)], IS_ARRAY, >2
  6290. | lea FCARG1a, [FCARG2a + offsetof(zend_reference, val)]
  6291. | jmp >3
  6292. |.cold_code
  6293. |2:
  6294. | SET_EX_OPLINE opline, r0
  6295. | EXT_CALL zend_jit_prepare_assign_dim_ref, r0
  6296. | test r0, r0
  6297. | mov FCARG1a, r0
  6298. | jne >1
  6299. | jmp ->exception_handler_undef
  6300. |.code
  6301. |1:
  6302. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  6303. }
  6304. if (op1_info & MAY_BE_ARRAY) {
  6305. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF) - MAY_BE_ARRAY)) {
  6306. | IF_NOT_ZVAL_TYPE op1_addr, IS_ARRAY, >7
  6307. }
  6308. |3:
  6309. | SEPARATE_ARRAY op1_addr, op1_info, 1
  6310. }
  6311. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL)) {
  6312. if (op1_info & MAY_BE_ARRAY) {
  6313. |.cold_code
  6314. |7:
  6315. }
  6316. if (op1_info & (MAY_BE_ANY-(MAY_BE_NULL|MAY_BE_ARRAY))) {
  6317. | CMP_ZVAL_TYPE op1_addr, IS_NULL
  6318. | jg >7
  6319. }
  6320. if (Z_REG(op1_addr) != ZREG_FP) {
  6321. | mov T1, Ra(Z_REG(op1_addr)) // save
  6322. }
  6323. if (op1_info & MAY_BE_UNDEF) {
  6324. if (op1_info & MAY_BE_NULL) {
  6325. | IF_NOT_ZVAL_TYPE op1_addr, IS_UNDEF, >1
  6326. }
  6327. | SET_EX_OPLINE opline, r0
  6328. | mov FCARG1a, opline->op1.var
  6329. | EXT_CALL zend_jit_undefined_op_helper, r0
  6330. |1:
  6331. }
  6332. | // ZVAL_ARR(container, zend_new_array(8));
  6333. | EXT_CALL _zend_new_array_0, r0
  6334. if (Z_REG(op1_addr) != ZREG_FP) {
  6335. | mov Ra(Z_REG(op1_addr)), T1 // restore
  6336. }
  6337. | SET_ZVAL_LVAL op1_addr, r0
  6338. | SET_ZVAL_TYPE_INFO op1_addr, IS_ARRAY_EX
  6339. | mov FCARG1a, r0
  6340. if (op1_info & MAY_BE_ARRAY) {
  6341. | jmp >1
  6342. |.code
  6343. |1:
  6344. }
  6345. }
  6346. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_ARRAY)) {
  6347. uint32_t var_def_info = zend_array_element_type(op1_def_info, opline->op1_type, 1, 0);
  6348. |6:
  6349. if (opline->op2_type == IS_UNUSED) {
  6350. var_info = MAY_BE_NULL;
  6351. | // var_ptr = zend_hash_next_index_insert(Z_ARRVAL_P(container), &EG(uninitialized_zval));
  6352. | LOAD_ADDR_ZTS FCARG2a, executor_globals, uninitialized_zval
  6353. | EXT_CALL zend_hash_next_index_insert, r0
  6354. | // if (UNEXPECTED(!var_ptr)) {
  6355. | test r0, r0
  6356. | jz >1
  6357. |.cold_code
  6358. |1:
  6359. | // zend_throw_error(NULL, "Cannot add element to the array as the next element is already occupied");
  6360. | CANNOT_ADD_ELEMENT opline
  6361. | //ZEND_VM_C_GOTO(assign_dim_op_ret_null);
  6362. | jmp >9
  6363. |.code
  6364. } else {
  6365. var_info = zend_array_element_type(op1_info, opline->op1_type, 0, 0);
  6366. if (op1_info & (MAY_BE_ARRAY_OF_REF|MAY_BE_OBJECT)) {
  6367. var_info |= MAY_BE_REF;
  6368. }
  6369. if (var_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE)) {
  6370. var_info |= MAY_BE_RC1;
  6371. }
  6372. if (dim_type != IS_UNKNOWN
  6373. && dim_type != IS_UNDEF
  6374. && (op1_info & (MAY_BE_ANY|MAY_BE_UNDEF)) == MAY_BE_ARRAY
  6375. && (op2_info & (MAY_BE_LONG|MAY_BE_STRING))
  6376. && !(op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF) - (MAY_BE_LONG|MAY_BE_STRING)))) {
  6377. int32_t exit_point = zend_jit_trace_get_exit_point(opline, 0);
  6378. not_found_exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  6379. if (!not_found_exit_addr) {
  6380. return 0;
  6381. }
  6382. }
  6383. if (!zend_jit_fetch_dimension_address_inner(Dst, opline, BP_VAR_RW, op1_info, op2_info, dim_type, NULL, not_found_exit_addr, NULL)) {
  6384. return 0;
  6385. }
  6386. |8:
  6387. if (not_found_exit_addr && dim_type != IS_REFERENCE) {
  6388. | IF_NOT_Z_TYPE, r0, dim_type, &not_found_exit_addr
  6389. var_info = (1 << dim_type) | (var_info & ~(MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_REF));
  6390. }
  6391. if (var_info & MAY_BE_REF) {
  6392. binary_op_type binary_op = get_binary_op(opline->extended_value);
  6393. | IF_NOT_Z_TYPE, r0, IS_REFERENCE, >1
  6394. | GET_Z_PTR FCARG1a, r0
  6395. | cmp aword [FCARG1a + offsetof(zend_reference, sources.ptr)], 0
  6396. | jnz >2
  6397. | lea r0, aword [FCARG1a + offsetof(zend_reference, val)]
  6398. |.cold_code
  6399. |2:
  6400. | LOAD_ZVAL_ADDR FCARG2a, op3_addr
  6401. |.if X64
  6402. | LOAD_ADDR CARG3, binary_op
  6403. |.else
  6404. | sub r4, 12
  6405. | PUSH_ADDR binary_op, r0
  6406. |.endif
  6407. | SET_EX_OPLINE opline, r0
  6408. if (((opline+1)->op1_type & (IS_TMP_VAR|IS_VAR))
  6409. && (op1_data_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  6410. | EXT_CALL zend_jit_assign_op_to_typed_ref_tmp, r0
  6411. } else {
  6412. | EXT_CALL zend_jit_assign_op_to_typed_ref, r0
  6413. }
  6414. |.if not(X64)
  6415. | add r4, 12
  6416. |.endif
  6417. | jmp >9
  6418. |.code
  6419. |1:
  6420. }
  6421. }
  6422. var_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R0, 0);
  6423. switch (opline->extended_value) {
  6424. case ZEND_ADD:
  6425. case ZEND_SUB:
  6426. case ZEND_MUL:
  6427. case ZEND_DIV:
  6428. if (!zend_jit_math_helper(Dst, opline, opline->extended_value, IS_CV, opline->op1, var_addr, var_info, (opline+1)->op1_type, (opline+1)->op1, op3_addr, op1_data_info, 0, var_addr, var_def_info, var_info,
  6429. 1 /* may overflow */, may_throw)) {
  6430. return 0;
  6431. }
  6432. break;
  6433. case ZEND_BW_OR:
  6434. case ZEND_BW_AND:
  6435. case ZEND_BW_XOR:
  6436. case ZEND_SL:
  6437. case ZEND_SR:
  6438. case ZEND_MOD:
  6439. if (!zend_jit_long_math_helper(Dst, opline, opline->extended_value,
  6440. IS_CV, opline->op1, var_addr, var_info, NULL,
  6441. (opline+1)->op1_type, (opline+1)->op1, op3_addr, op1_data_info,
  6442. op1_data_range,
  6443. 0, var_addr, var_def_info, var_info, may_throw)) {
  6444. return 0;
  6445. }
  6446. break;
  6447. case ZEND_CONCAT:
  6448. if (!zend_jit_concat_helper(Dst, opline, IS_CV, opline->op1, var_addr, var_info, (opline+1)->op1_type, (opline+1)->op1, op3_addr, op1_data_info, var_addr,
  6449. may_throw)) {
  6450. return 0;
  6451. }
  6452. break;
  6453. default:
  6454. ZEND_UNREACHABLE();
  6455. }
  6456. | FREE_OP opline->op2_type, opline->op2, op2_info, 0, opline
  6457. }
  6458. if (op1_info & (MAY_BE_ANY-(MAY_BE_NULL|MAY_BE_ARRAY))) {
  6459. binary_op_type binary_op;
  6460. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_ARRAY)) {
  6461. |.cold_code
  6462. |7:
  6463. }
  6464. | SET_EX_OPLINE opline, r0
  6465. if (Z_REG(op1_addr) != ZREG_FCARG1 || Z_OFFSET(op1_addr) != 0) {
  6466. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  6467. }
  6468. if (opline->op2_type == IS_UNUSED) {
  6469. | xor FCARG2a, FCARG2a
  6470. } else if (opline->op2_type == IS_CONST && Z_EXTRA_P(RT_CONSTANT(opline, opline->op2)) == ZEND_EXTRA_VALUE) {
  6471. ZEND_ASSERT(Z_MODE(op2_addr) == IS_CONST_ZVAL);
  6472. | LOAD_ADDR FCARG2a, (Z_ZV(op2_addr) + 1)
  6473. } else {
  6474. | LOAD_ZVAL_ADDR FCARG2a, op2_addr
  6475. }
  6476. binary_op = get_binary_op(opline->extended_value);
  6477. |.if X64
  6478. | LOAD_ZVAL_ADDR CARG3, op3_addr
  6479. | LOAD_ADDR CARG4, binary_op
  6480. |.else
  6481. | sub r4, 8
  6482. | PUSH_ADDR binary_op, r0
  6483. | PUSH_ZVAL_ADDR op3_addr, r0
  6484. |.endif
  6485. | EXT_CALL zend_jit_assign_dim_op_helper, r0
  6486. |.if not(X64)
  6487. | add r4, 8
  6488. |.endif
  6489. |9:
  6490. | FREE_OP (opline+1)->op1_type, (opline+1)->op1, op1_data_info, 0, NULL
  6491. | FREE_OP opline->op2_type, opline->op2, op2_info, 0, NULL
  6492. if (may_throw) {
  6493. zend_jit_check_exception(Dst);
  6494. }
  6495. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_ARRAY)) {
  6496. | jmp >9 // END
  6497. |.code
  6498. |9:
  6499. }
  6500. } else if ((op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_ARRAY))
  6501. && (!not_found_exit_addr || (var_info & MAY_BE_REF))) {
  6502. |.cold_code
  6503. |9:
  6504. | FREE_OP (opline+1)->op1_type, (opline+1)->op1, op1_data_info, 0, opline
  6505. | FREE_OP opline->op2_type, opline->op2, op2_info, 0, opline
  6506. if (may_throw) {
  6507. zend_jit_check_exception(Dst);
  6508. }
  6509. | jmp >9
  6510. |.code
  6511. |9:
  6512. }
  6513. return 1;
  6514. }
  6515. static int zend_jit_assign_op(dasm_State **Dst, const zend_op *opline, uint32_t op1_info, uint32_t op1_def_info, zend_ssa_range *op1_range, uint32_t op2_info, zend_ssa_range *op2_range, int may_overflow, int may_throw)
  6516. {
  6517. zend_jit_addr op1_addr, op2_addr;
  6518. ZEND_ASSERT(opline->op1_type == IS_CV && opline->result_type == IS_UNUSED);
  6519. ZEND_ASSERT(!(op1_info & MAY_BE_UNDEF) && !(op2_info & MAY_BE_UNDEF));
  6520. op1_addr = OP1_ADDR();
  6521. op2_addr = OP2_ADDR();
  6522. if (op1_info & MAY_BE_REF) {
  6523. binary_op_type binary_op = get_binary_op(opline->extended_value);
  6524. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  6525. | IF_NOT_Z_TYPE, FCARG1a, IS_REFERENCE, >1
  6526. | GET_Z_PTR FCARG1a, FCARG1a
  6527. | cmp aword [FCARG1a + offsetof(zend_reference, sources.ptr)], 0
  6528. | jnz >2
  6529. | add FCARG1a, offsetof(zend_reference, val)
  6530. |.cold_code
  6531. |2:
  6532. | LOAD_ZVAL_ADDR FCARG2a, op2_addr
  6533. |.if X64
  6534. | LOAD_ADDR CARG3, binary_op
  6535. |.else
  6536. | sub r4, 12
  6537. | PUSH_ADDR binary_op, r0
  6538. |.endif
  6539. | SET_EX_OPLINE opline, r0
  6540. if ((opline->op2_type & (IS_TMP_VAR|IS_VAR))
  6541. && (op2_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  6542. | EXT_CALL zend_jit_assign_op_to_typed_ref_tmp, r0
  6543. } else {
  6544. | EXT_CALL zend_jit_assign_op_to_typed_ref, r0
  6545. }
  6546. |.if not(X64)
  6547. | add r4, 12
  6548. |.endif
  6549. zend_jit_check_exception(Dst);
  6550. | jmp >9
  6551. |.code
  6552. |1:
  6553. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  6554. }
  6555. int result;
  6556. switch (opline->extended_value) {
  6557. case ZEND_ADD:
  6558. case ZEND_SUB:
  6559. case ZEND_MUL:
  6560. case ZEND_DIV:
  6561. result = zend_jit_math_helper(Dst, opline, opline->extended_value, opline->op1_type, opline->op1, op1_addr, op1_info, opline->op2_type, opline->op2, op2_addr, op2_info, opline->op1.var, op1_addr, op1_def_info, op1_info, may_overflow, may_throw);
  6562. break;
  6563. case ZEND_BW_OR:
  6564. case ZEND_BW_AND:
  6565. case ZEND_BW_XOR:
  6566. case ZEND_SL:
  6567. case ZEND_SR:
  6568. case ZEND_MOD:
  6569. result = zend_jit_long_math_helper(Dst, opline, opline->extended_value,
  6570. opline->op1_type, opline->op1, op1_addr, op1_info, op1_range,
  6571. opline->op2_type, opline->op2, op2_addr, op2_info, op2_range,
  6572. opline->op1.var, op1_addr, op1_def_info, op1_info, may_throw);
  6573. break;
  6574. case ZEND_CONCAT:
  6575. result = zend_jit_concat_helper(Dst, opline, opline->op1_type, opline->op1, op1_addr, op1_info, opline->op2_type, opline->op2, op2_addr, op2_info, op1_addr, may_throw);
  6576. break;
  6577. default:
  6578. ZEND_UNREACHABLE();
  6579. }
  6580. |9:
  6581. return result;
  6582. }
  6583. static int zend_jit_cmp_long_long(dasm_State **Dst,
  6584. const zend_op *opline,
  6585. zend_ssa_range *op1_range,
  6586. zend_jit_addr op1_addr,
  6587. zend_ssa_range *op2_range,
  6588. zend_jit_addr op2_addr,
  6589. zend_jit_addr res_addr,
  6590. zend_uchar smart_branch_opcode,
  6591. uint32_t target_label,
  6592. uint32_t target_label2,
  6593. const void *exit_addr,
  6594. bool skip_comparison)
  6595. {
  6596. bool swap = 0;
  6597. bool result;
  6598. if (zend_jit_is_constant_cmp_long_long(opline, op1_range, op1_addr, op2_range, op2_addr, &result)) {
  6599. if (!smart_branch_opcode ||
  6600. smart_branch_opcode == ZEND_JMPZ_EX ||
  6601. smart_branch_opcode == ZEND_JMPNZ_EX) {
  6602. | SET_ZVAL_TYPE_INFO res_addr, (result ? IS_TRUE : IS_FALSE)
  6603. }
  6604. if (smart_branch_opcode && !exit_addr) {
  6605. if (smart_branch_opcode == ZEND_JMPZ ||
  6606. smart_branch_opcode == ZEND_JMPZ_EX) {
  6607. if (!result) {
  6608. | jmp => target_label
  6609. }
  6610. } else if (smart_branch_opcode == ZEND_JMPNZ ||
  6611. smart_branch_opcode == ZEND_JMPNZ_EX) {
  6612. if (result) {
  6613. | jmp => target_label
  6614. }
  6615. } else if (smart_branch_opcode == ZEND_JMPZNZ) {
  6616. if (!result) {
  6617. | jmp => target_label
  6618. } else {
  6619. | jmp => target_label2
  6620. }
  6621. } else {
  6622. ZEND_UNREACHABLE();
  6623. }
  6624. }
  6625. return 1;
  6626. }
  6627. if (skip_comparison) {
  6628. if (Z_MODE(op1_addr) != IS_REG &&
  6629. (Z_MODE(op2_addr) == IS_REG ||
  6630. (Z_MODE(op1_addr) == IS_CONST_ZVAL && Z_MODE(op2_addr) != IS_CONST_ZVAL))) {
  6631. swap = 1;
  6632. }
  6633. } else if (Z_MODE(op1_addr) == IS_REG) {
  6634. if (Z_MODE(op2_addr) == IS_CONST_ZVAL && Z_LVAL_P(Z_ZV(op2_addr)) == 0) {
  6635. | test Ra(Z_REG(op1_addr)), Ra(Z_REG(op1_addr))
  6636. } else {
  6637. | LONG_OP cmp, Z_REG(op1_addr), op2_addr, r0
  6638. }
  6639. } else if (Z_MODE(op2_addr) == IS_REG) {
  6640. if (Z_MODE(op1_addr) == IS_CONST_ZVAL && Z_LVAL_P(Z_ZV(op1_addr)) == 0) {
  6641. | test Ra(Z_REG(op2_addr)), Ra(Z_REG(op2_addr))
  6642. } else {
  6643. | LONG_OP cmp, Z_REG(op2_addr), op1_addr, r0
  6644. }
  6645. swap = 1;
  6646. } else if (Z_MODE(op1_addr) == IS_CONST_ZVAL && Z_MODE(op2_addr) != IS_CONST_ZVAL) {
  6647. | LONG_OP_WITH_CONST cmp, op2_addr, Z_LVAL_P(Z_ZV(op1_addr))
  6648. swap = 1;
  6649. } else if (Z_MODE(op2_addr) == IS_CONST_ZVAL && Z_MODE(op1_addr) != IS_CONST_ZVAL) {
  6650. | LONG_OP_WITH_CONST cmp, op1_addr, Z_LVAL_P(Z_ZV(op2_addr))
  6651. } else {
  6652. | GET_ZVAL_LVAL ZREG_R0, op1_addr
  6653. if (Z_MODE(op2_addr) == IS_CONST_ZVAL && Z_LVAL_P(Z_ZV(op2_addr)) == 0) {
  6654. | test r0, r0
  6655. } else {
  6656. | LONG_OP cmp, ZREG_R0, op2_addr, r0
  6657. }
  6658. }
  6659. if (smart_branch_opcode) {
  6660. if (smart_branch_opcode == ZEND_JMPZ_EX ||
  6661. smart_branch_opcode == ZEND_JMPNZ_EX) {
  6662. switch (opline->opcode) {
  6663. case ZEND_IS_EQUAL:
  6664. case ZEND_IS_IDENTICAL:
  6665. case ZEND_CASE:
  6666. case ZEND_CASE_STRICT:
  6667. | sete al
  6668. break;
  6669. case ZEND_IS_NOT_EQUAL:
  6670. case ZEND_IS_NOT_IDENTICAL:
  6671. | setne al
  6672. break;
  6673. case ZEND_IS_SMALLER:
  6674. if (swap) {
  6675. | setg al
  6676. } else {
  6677. | setl al
  6678. }
  6679. break;
  6680. case ZEND_IS_SMALLER_OR_EQUAL:
  6681. if (swap) {
  6682. | setge al
  6683. } else {
  6684. | setle al
  6685. }
  6686. break;
  6687. default:
  6688. ZEND_UNREACHABLE();
  6689. }
  6690. | movzx eax, al
  6691. | lea eax, [eax + 2]
  6692. | SET_ZVAL_TYPE_INFO res_addr, eax
  6693. }
  6694. if (smart_branch_opcode == ZEND_JMPZ ||
  6695. smart_branch_opcode == ZEND_JMPZ_EX) {
  6696. switch (opline->opcode) {
  6697. case ZEND_IS_EQUAL:
  6698. case ZEND_IS_IDENTICAL:
  6699. case ZEND_CASE:
  6700. case ZEND_CASE_STRICT:
  6701. if (exit_addr) {
  6702. | jne &exit_addr
  6703. } else {
  6704. | jne => target_label
  6705. }
  6706. break;
  6707. case ZEND_IS_NOT_EQUAL:
  6708. if (exit_addr) {
  6709. | je &exit_addr
  6710. } else {
  6711. | je => target_label
  6712. }
  6713. break;
  6714. case ZEND_IS_NOT_IDENTICAL:
  6715. if (exit_addr) {
  6716. | jne &exit_addr
  6717. } else {
  6718. | je => target_label
  6719. }
  6720. break;
  6721. case ZEND_IS_SMALLER:
  6722. if (swap) {
  6723. if (exit_addr) {
  6724. | jle &exit_addr
  6725. } else {
  6726. | jle => target_label
  6727. }
  6728. } else {
  6729. if (exit_addr) {
  6730. | jge &exit_addr
  6731. } else {
  6732. | jge => target_label
  6733. }
  6734. }
  6735. break;
  6736. case ZEND_IS_SMALLER_OR_EQUAL:
  6737. if (swap) {
  6738. if (exit_addr) {
  6739. | jl &exit_addr
  6740. } else {
  6741. | jl => target_label
  6742. }
  6743. } else {
  6744. if (exit_addr) {
  6745. | jg &exit_addr
  6746. } else {
  6747. | jg => target_label
  6748. }
  6749. }
  6750. break;
  6751. default:
  6752. ZEND_UNREACHABLE();
  6753. }
  6754. } else if (smart_branch_opcode == ZEND_JMPNZ ||
  6755. smart_branch_opcode == ZEND_JMPNZ_EX) {
  6756. switch (opline->opcode) {
  6757. case ZEND_IS_EQUAL:
  6758. case ZEND_IS_IDENTICAL:
  6759. case ZEND_CASE:
  6760. case ZEND_CASE_STRICT:
  6761. if (exit_addr) {
  6762. | je &exit_addr
  6763. } else {
  6764. | je => target_label
  6765. }
  6766. break;
  6767. case ZEND_IS_NOT_EQUAL:
  6768. if (exit_addr) {
  6769. | jne &exit_addr
  6770. } else {
  6771. | jne => target_label
  6772. }
  6773. break;
  6774. case ZEND_IS_NOT_IDENTICAL:
  6775. if (exit_addr) {
  6776. | je &exit_addr
  6777. } else {
  6778. | jne => target_label
  6779. }
  6780. break;
  6781. case ZEND_IS_SMALLER:
  6782. if (swap) {
  6783. if (exit_addr) {
  6784. | jg &exit_addr
  6785. } else {
  6786. | jg => target_label
  6787. }
  6788. } else {
  6789. if (exit_addr) {
  6790. | jl &exit_addr
  6791. } else {
  6792. | jl => target_label
  6793. }
  6794. }
  6795. break;
  6796. case ZEND_IS_SMALLER_OR_EQUAL:
  6797. if (swap) {
  6798. if (exit_addr) {
  6799. | jge &exit_addr
  6800. } else {
  6801. | jge => target_label
  6802. }
  6803. } else {
  6804. if (exit_addr) {
  6805. | jle &exit_addr
  6806. } else {
  6807. | jle => target_label
  6808. }
  6809. }
  6810. break;
  6811. default:
  6812. ZEND_UNREACHABLE();
  6813. }
  6814. } else if (smart_branch_opcode == ZEND_JMPZNZ) {
  6815. switch (opline->opcode) {
  6816. case ZEND_IS_EQUAL:
  6817. case ZEND_IS_IDENTICAL:
  6818. case ZEND_CASE:
  6819. case ZEND_CASE_STRICT:
  6820. | jne => target_label
  6821. break;
  6822. case ZEND_IS_NOT_EQUAL:
  6823. case ZEND_IS_NOT_IDENTICAL:
  6824. | je => target_label
  6825. break;
  6826. case ZEND_IS_SMALLER:
  6827. if (swap) {
  6828. | jle => target_label
  6829. } else {
  6830. | jge => target_label
  6831. }
  6832. break;
  6833. case ZEND_IS_SMALLER_OR_EQUAL:
  6834. if (swap) {
  6835. | jl => target_label
  6836. } else {
  6837. | jg => target_label
  6838. }
  6839. break;
  6840. default:
  6841. ZEND_UNREACHABLE();
  6842. }
  6843. | jmp => target_label2
  6844. } else {
  6845. ZEND_UNREACHABLE();
  6846. }
  6847. } else {
  6848. switch (opline->opcode) {
  6849. case ZEND_IS_EQUAL:
  6850. case ZEND_IS_IDENTICAL:
  6851. case ZEND_CASE:
  6852. case ZEND_CASE_STRICT:
  6853. | sete al
  6854. break;
  6855. case ZEND_IS_NOT_EQUAL:
  6856. case ZEND_IS_NOT_IDENTICAL:
  6857. | setne al
  6858. break;
  6859. case ZEND_IS_SMALLER:
  6860. if (swap) {
  6861. | setg al
  6862. } else {
  6863. | setl al
  6864. }
  6865. break;
  6866. case ZEND_IS_SMALLER_OR_EQUAL:
  6867. if (swap) {
  6868. | setge al
  6869. } else {
  6870. | setle al
  6871. }
  6872. break;
  6873. default:
  6874. ZEND_UNREACHABLE();
  6875. }
  6876. | movzx eax, al
  6877. | add eax, 2
  6878. | SET_ZVAL_TYPE_INFO res_addr, eax
  6879. }
  6880. return 1;
  6881. }
  6882. static int zend_jit_cmp_double_common(dasm_State **Dst, const zend_op *opline, zend_jit_addr res_addr, bool swap, zend_uchar smart_branch_opcode, uint32_t target_label, uint32_t target_label2, const void *exit_addr)
  6883. {
  6884. if (smart_branch_opcode) {
  6885. if (smart_branch_opcode == ZEND_JMPZ) {
  6886. switch (opline->opcode) {
  6887. case ZEND_IS_EQUAL:
  6888. case ZEND_IS_IDENTICAL:
  6889. case ZEND_CASE:
  6890. case ZEND_CASE_STRICT:
  6891. if (exit_addr) {
  6892. | jne &exit_addr
  6893. | jp &exit_addr
  6894. } else {
  6895. | jne => target_label
  6896. | jp => target_label
  6897. }
  6898. break;
  6899. case ZEND_IS_NOT_EQUAL:
  6900. | jp >1
  6901. if (exit_addr) {
  6902. | je &exit_addr
  6903. } else {
  6904. | je => target_label
  6905. }
  6906. |1:
  6907. break;
  6908. case ZEND_IS_NOT_IDENTICAL:
  6909. if (exit_addr) {
  6910. | jne &exit_addr
  6911. | jp &exit_addr
  6912. } else {
  6913. | jp >1
  6914. | je => target_label
  6915. |1:
  6916. }
  6917. break;
  6918. case ZEND_IS_SMALLER:
  6919. if (swap) {
  6920. if (exit_addr) {
  6921. | jbe &exit_addr
  6922. } else {
  6923. | jbe => target_label
  6924. }
  6925. } else {
  6926. if (exit_addr) {
  6927. | jae &exit_addr
  6928. | jp &exit_addr
  6929. } else {
  6930. | jae => target_label
  6931. | jp => target_label
  6932. }
  6933. }
  6934. break;
  6935. case ZEND_IS_SMALLER_OR_EQUAL:
  6936. if (swap) {
  6937. if (exit_addr) {
  6938. | jb &exit_addr
  6939. } else {
  6940. | jb => target_label
  6941. }
  6942. } else {
  6943. if (exit_addr) {
  6944. | ja &exit_addr
  6945. | jp &exit_addr
  6946. } else {
  6947. | ja => target_label
  6948. | jp => target_label
  6949. }
  6950. }
  6951. break;
  6952. default:
  6953. ZEND_UNREACHABLE();
  6954. }
  6955. } else if (smart_branch_opcode == ZEND_JMPNZ) {
  6956. switch (opline->opcode) {
  6957. case ZEND_IS_EQUAL:
  6958. case ZEND_IS_IDENTICAL:
  6959. case ZEND_CASE:
  6960. case ZEND_CASE_STRICT:
  6961. | jp >1
  6962. if (exit_addr) {
  6963. | je &exit_addr
  6964. } else {
  6965. | je => target_label
  6966. }
  6967. |1:
  6968. break;
  6969. case ZEND_IS_NOT_EQUAL:
  6970. if (exit_addr) {
  6971. | jne &exit_addr
  6972. | jp &exit_addr
  6973. } else {
  6974. | jne => target_label
  6975. | jp => target_label
  6976. }
  6977. break;
  6978. case ZEND_IS_NOT_IDENTICAL:
  6979. if (exit_addr) {
  6980. | jp >1
  6981. | je &exit_addr
  6982. |1:
  6983. } else {
  6984. | jne => target_label
  6985. | jp => target_label
  6986. }
  6987. break;
  6988. case ZEND_IS_SMALLER:
  6989. if (swap) {
  6990. if (exit_addr) {
  6991. | ja &exit_addr
  6992. } else {
  6993. | ja => target_label
  6994. }
  6995. } else {
  6996. | jp >1
  6997. if (exit_addr) {
  6998. | jb &exit_addr
  6999. } else {
  7000. | jb => target_label
  7001. }
  7002. |1:
  7003. }
  7004. break;
  7005. case ZEND_IS_SMALLER_OR_EQUAL:
  7006. if (swap) {
  7007. if (exit_addr) {
  7008. | jae &exit_addr
  7009. } else {
  7010. | jae => target_label
  7011. }
  7012. } else {
  7013. | jp >1
  7014. if (exit_addr) {
  7015. | jbe &exit_addr
  7016. } else {
  7017. | jbe => target_label
  7018. }
  7019. |1:
  7020. }
  7021. break;
  7022. default:
  7023. ZEND_UNREACHABLE();
  7024. }
  7025. } else if (smart_branch_opcode == ZEND_JMPZNZ) {
  7026. switch (opline->opcode) {
  7027. case ZEND_IS_EQUAL:
  7028. case ZEND_IS_IDENTICAL:
  7029. case ZEND_CASE:
  7030. case ZEND_CASE_STRICT:
  7031. | jne => target_label
  7032. | jp => target_label
  7033. break;
  7034. case ZEND_IS_NOT_EQUAL:
  7035. case ZEND_IS_NOT_IDENTICAL:
  7036. | jp => target_label2
  7037. | je => target_label
  7038. break;
  7039. case ZEND_IS_SMALLER:
  7040. if (swap) {
  7041. | jbe => target_label
  7042. } else {
  7043. | jae => target_label
  7044. | jp => target_label
  7045. }
  7046. break;
  7047. case ZEND_IS_SMALLER_OR_EQUAL:
  7048. if (swap) {
  7049. | jb => target_label
  7050. } else {
  7051. | ja => target_label
  7052. | jp => target_label
  7053. }
  7054. break;
  7055. default:
  7056. ZEND_UNREACHABLE();
  7057. }
  7058. | jmp => target_label2
  7059. } else if (smart_branch_opcode == ZEND_JMPZ_EX) {
  7060. switch (opline->opcode) {
  7061. case ZEND_IS_EQUAL:
  7062. case ZEND_IS_IDENTICAL:
  7063. case ZEND_CASE:
  7064. case ZEND_CASE_STRICT:
  7065. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  7066. | jne => target_label
  7067. | jp => target_label
  7068. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  7069. break;
  7070. case ZEND_IS_NOT_EQUAL:
  7071. case ZEND_IS_NOT_IDENTICAL:
  7072. | jp >1
  7073. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  7074. | je => target_label
  7075. |1:
  7076. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  7077. break;
  7078. case ZEND_IS_SMALLER:
  7079. if (swap) {
  7080. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  7081. | jbe => target_label
  7082. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  7083. } else {
  7084. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  7085. | jae => target_label
  7086. | jp => target_label
  7087. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  7088. }
  7089. break;
  7090. case ZEND_IS_SMALLER_OR_EQUAL:
  7091. if (swap) {
  7092. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  7093. | jb => target_label
  7094. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  7095. } else {
  7096. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  7097. | ja => target_label
  7098. | jp => target_label
  7099. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  7100. }
  7101. break;
  7102. default:
  7103. ZEND_UNREACHABLE();
  7104. }
  7105. } else if (smart_branch_opcode == ZEND_JMPNZ_EX) {
  7106. switch (opline->opcode) {
  7107. case ZEND_IS_EQUAL:
  7108. case ZEND_IS_IDENTICAL:
  7109. case ZEND_CASE:
  7110. case ZEND_CASE_STRICT:
  7111. | jp >1
  7112. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  7113. | je => target_label
  7114. |1:
  7115. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  7116. break;
  7117. case ZEND_IS_NOT_EQUAL:
  7118. case ZEND_IS_NOT_IDENTICAL:
  7119. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  7120. | jne => target_label
  7121. | jp => target_label
  7122. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  7123. break;
  7124. case ZEND_IS_SMALLER:
  7125. if (swap) {
  7126. | seta al
  7127. | movzx eax, al
  7128. | lea eax, [eax + 2]
  7129. | SET_ZVAL_TYPE_INFO res_addr, eax
  7130. | ja => target_label
  7131. } else {
  7132. | jp >1
  7133. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  7134. | jb => target_label
  7135. |1:
  7136. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  7137. }
  7138. break;
  7139. case ZEND_IS_SMALLER_OR_EQUAL:
  7140. if (swap) {
  7141. | setae al
  7142. | movzx eax, al
  7143. | lea eax, [eax + 2]
  7144. | SET_ZVAL_TYPE_INFO res_addr, eax
  7145. | jae => target_label
  7146. } else {
  7147. | jp >1
  7148. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  7149. | jbe => target_label
  7150. |1:
  7151. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  7152. }
  7153. break;
  7154. default:
  7155. ZEND_UNREACHABLE();
  7156. }
  7157. } else {
  7158. ZEND_UNREACHABLE();
  7159. }
  7160. } else {
  7161. switch (opline->opcode) {
  7162. case ZEND_IS_EQUAL:
  7163. case ZEND_IS_IDENTICAL:
  7164. case ZEND_CASE:
  7165. case ZEND_CASE_STRICT:
  7166. | jp >1
  7167. | mov eax, IS_TRUE
  7168. | je >2
  7169. |1:
  7170. | mov eax, IS_FALSE
  7171. |2:
  7172. break;
  7173. case ZEND_IS_NOT_EQUAL:
  7174. case ZEND_IS_NOT_IDENTICAL:
  7175. | jp >1
  7176. | mov eax, IS_FALSE
  7177. | je >2
  7178. |1:
  7179. | mov eax, IS_TRUE
  7180. |2:
  7181. break;
  7182. case ZEND_IS_SMALLER:
  7183. if (swap) {
  7184. | seta al
  7185. | movzx eax, al
  7186. | add eax, 2
  7187. } else {
  7188. | jp >1
  7189. | mov eax, IS_TRUE
  7190. | jb >2
  7191. |1:
  7192. | mov eax, IS_FALSE
  7193. |2:
  7194. }
  7195. break;
  7196. case ZEND_IS_SMALLER_OR_EQUAL:
  7197. if (swap) {
  7198. | setae al
  7199. | movzx eax, al
  7200. | add eax, 2
  7201. } else {
  7202. | jp >1
  7203. | mov eax, IS_TRUE
  7204. | jbe >2
  7205. |1:
  7206. | mov eax, IS_FALSE
  7207. |2:
  7208. }
  7209. break;
  7210. default:
  7211. ZEND_UNREACHABLE();
  7212. }
  7213. | SET_ZVAL_TYPE_INFO res_addr, eax
  7214. }
  7215. return 1;
  7216. }
  7217. static int zend_jit_cmp_long_double(dasm_State **Dst, const zend_op *opline, zend_jit_addr op1_addr, zend_jit_addr op2_addr, zend_jit_addr res_addr, zend_uchar smart_branch_opcode, uint32_t target_label, uint32_t target_label2, const void *exit_addr)
  7218. {
  7219. zend_reg tmp_reg = ZREG_XMM0;
  7220. | DOUBLE_GET_ZVAL_LVAL tmp_reg, op1_addr, ZREG_R0
  7221. | DOUBLE_CMP tmp_reg, op2_addr
  7222. return zend_jit_cmp_double_common(Dst, opline, res_addr, 0, smart_branch_opcode, target_label, target_label2, exit_addr);
  7223. }
  7224. static int zend_jit_cmp_double_long(dasm_State **Dst, const zend_op *opline, zend_jit_addr op1_addr, zend_jit_addr op2_addr, zend_jit_addr res_addr, zend_uchar smart_branch_opcode, uint32_t target_label, uint32_t target_label2, const void *exit_addr)
  7225. {
  7226. zend_reg tmp_reg = ZREG_XMM0;
  7227. | DOUBLE_GET_ZVAL_LVAL tmp_reg, op2_addr, ZREG_R0
  7228. | DOUBLE_CMP tmp_reg, op1_addr
  7229. return zend_jit_cmp_double_common(Dst, opline, res_addr, /* swap */ 1, smart_branch_opcode, target_label, target_label2, exit_addr);
  7230. }
  7231. static int zend_jit_cmp_double_double(dasm_State **Dst, const zend_op *opline, zend_jit_addr op1_addr, zend_jit_addr op2_addr, zend_jit_addr res_addr, zend_uchar smart_branch_opcode, uint32_t target_label, uint32_t target_label2, const void *exit_addr)
  7232. {
  7233. bool swap = 0;
  7234. if (Z_MODE(op1_addr) == IS_REG) {
  7235. | DOUBLE_CMP Z_REG(op1_addr), op2_addr
  7236. } else if (Z_MODE(op2_addr) == IS_REG) {
  7237. | DOUBLE_CMP Z_REG(op2_addr), op1_addr
  7238. swap = 1;
  7239. } else {
  7240. zend_reg tmp_reg = ZREG_XMM0;
  7241. | DOUBLE_GET_ZVAL_DVAL tmp_reg, op1_addr
  7242. | DOUBLE_CMP tmp_reg, op2_addr
  7243. }
  7244. return zend_jit_cmp_double_common(Dst, opline, res_addr, swap, smart_branch_opcode, target_label, target_label2, exit_addr);
  7245. }
  7246. static int zend_jit_cmp_slow(dasm_State **Dst, const zend_op *opline, zend_jit_addr res_addr, zend_uchar smart_branch_opcode, uint32_t target_label, uint32_t target_label2, const void *exit_addr)
  7247. {
  7248. | test, eax, eax
  7249. if (smart_branch_opcode) {
  7250. if (smart_branch_opcode == ZEND_JMPZ_EX ||
  7251. smart_branch_opcode == ZEND_JMPNZ_EX) {
  7252. switch (opline->opcode) {
  7253. case ZEND_IS_EQUAL:
  7254. case ZEND_CASE:
  7255. | sete al
  7256. break;
  7257. case ZEND_IS_NOT_EQUAL:
  7258. | setne al
  7259. break;
  7260. case ZEND_IS_SMALLER:
  7261. | setl al
  7262. break;
  7263. case ZEND_IS_SMALLER_OR_EQUAL:
  7264. | setle al
  7265. break;
  7266. default:
  7267. ZEND_UNREACHABLE();
  7268. }
  7269. | movzx eax, al
  7270. | lea eax, [eax + 2]
  7271. | SET_ZVAL_TYPE_INFO res_addr, eax
  7272. }
  7273. if (smart_branch_opcode == ZEND_JMPZ ||
  7274. smart_branch_opcode == ZEND_JMPZ_EX) {
  7275. switch (opline->opcode) {
  7276. case ZEND_IS_EQUAL:
  7277. case ZEND_CASE:
  7278. if (exit_addr) {
  7279. | jne &exit_addr
  7280. } else {
  7281. | jne => target_label
  7282. }
  7283. break;
  7284. case ZEND_IS_NOT_EQUAL:
  7285. if (exit_addr) {
  7286. | je &exit_addr
  7287. } else {
  7288. | je => target_label
  7289. }
  7290. break;
  7291. case ZEND_IS_SMALLER:
  7292. if (exit_addr) {
  7293. | jge &exit_addr
  7294. } else {
  7295. | jge => target_label
  7296. }
  7297. break;
  7298. case ZEND_IS_SMALLER_OR_EQUAL:
  7299. if (exit_addr) {
  7300. | jg &exit_addr
  7301. } else {
  7302. | jg => target_label
  7303. }
  7304. break;
  7305. default:
  7306. ZEND_UNREACHABLE();
  7307. }
  7308. } else if (smart_branch_opcode == ZEND_JMPNZ ||
  7309. smart_branch_opcode == ZEND_JMPNZ_EX) {
  7310. switch (opline->opcode) {
  7311. case ZEND_IS_EQUAL:
  7312. case ZEND_CASE:
  7313. if (exit_addr) {
  7314. | je &exit_addr
  7315. } else {
  7316. | je => target_label
  7317. }
  7318. break;
  7319. case ZEND_IS_NOT_EQUAL:
  7320. if (exit_addr) {
  7321. | jne &exit_addr
  7322. } else {
  7323. | jne => target_label
  7324. }
  7325. break;
  7326. case ZEND_IS_SMALLER:
  7327. if (exit_addr) {
  7328. | jl &exit_addr
  7329. } else {
  7330. | jl => target_label
  7331. }
  7332. break;
  7333. case ZEND_IS_SMALLER_OR_EQUAL:
  7334. if (exit_addr) {
  7335. | jle &exit_addr
  7336. } else {
  7337. | jle => target_label
  7338. }
  7339. break;
  7340. default:
  7341. ZEND_UNREACHABLE();
  7342. }
  7343. } else if (smart_branch_opcode == ZEND_JMPZNZ) {
  7344. switch (opline->opcode) {
  7345. case ZEND_IS_EQUAL:
  7346. case ZEND_CASE:
  7347. | jne => target_label
  7348. break;
  7349. case ZEND_IS_NOT_EQUAL:
  7350. | je => target_label
  7351. break;
  7352. case ZEND_IS_SMALLER:
  7353. | jge => target_label
  7354. break;
  7355. case ZEND_IS_SMALLER_OR_EQUAL:
  7356. | jg => target_label
  7357. break;
  7358. default:
  7359. ZEND_UNREACHABLE();
  7360. }
  7361. | jmp => target_label2
  7362. } else {
  7363. ZEND_UNREACHABLE();
  7364. }
  7365. } else {
  7366. switch (opline->opcode) {
  7367. case ZEND_IS_EQUAL:
  7368. case ZEND_CASE:
  7369. | sete al
  7370. break;
  7371. case ZEND_IS_NOT_EQUAL:
  7372. | setne al
  7373. break;
  7374. case ZEND_IS_SMALLER:
  7375. | setl al
  7376. break;
  7377. case ZEND_IS_SMALLER_OR_EQUAL:
  7378. | setle al
  7379. break;
  7380. default:
  7381. ZEND_UNREACHABLE();
  7382. }
  7383. | movzx eax, al
  7384. | add eax, 2
  7385. | SET_ZVAL_TYPE_INFO res_addr, eax
  7386. }
  7387. return 1;
  7388. }
  7389. static int zend_jit_cmp(dasm_State **Dst,
  7390. const zend_op *opline,
  7391. uint32_t op1_info,
  7392. zend_ssa_range *op1_range,
  7393. zend_jit_addr op1_addr,
  7394. uint32_t op2_info,
  7395. zend_ssa_range *op2_range,
  7396. zend_jit_addr op2_addr,
  7397. zend_jit_addr res_addr,
  7398. int may_throw,
  7399. zend_uchar smart_branch_opcode,
  7400. uint32_t target_label,
  7401. uint32_t target_label2,
  7402. const void *exit_addr,
  7403. bool skip_comparison)
  7404. {
  7405. bool same_ops = (opline->op1_type == opline->op2_type) && (opline->op1.var == opline->op2.var);
  7406. bool has_slow;
  7407. has_slow =
  7408. (op1_info & (MAY_BE_LONG|MAY_BE_DOUBLE)) &&
  7409. (op2_info & (MAY_BE_LONG|MAY_BE_DOUBLE)) &&
  7410. ((op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_LONG|MAY_BE_DOUBLE))) ||
  7411. (op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_LONG|MAY_BE_DOUBLE))));
  7412. if ((op1_info & MAY_BE_LONG) && (op2_info & MAY_BE_LONG)) {
  7413. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-MAY_BE_LONG)) {
  7414. if (op1_info & MAY_BE_DOUBLE) {
  7415. | IF_NOT_ZVAL_TYPE op1_addr, IS_LONG, >4
  7416. } else {
  7417. | IF_NOT_ZVAL_TYPE op1_addr, IS_LONG, >9
  7418. }
  7419. }
  7420. if (!same_ops && (op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-MAY_BE_LONG))) {
  7421. if (op2_info & MAY_BE_DOUBLE) {
  7422. | IF_NOT_ZVAL_TYPE op2_addr, IS_LONG, >3
  7423. |.cold_code
  7424. |3:
  7425. if (op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_LONG|MAY_BE_DOUBLE))) {
  7426. | IF_NOT_ZVAL_TYPE op2_addr, IS_DOUBLE, >9
  7427. }
  7428. if (!zend_jit_cmp_long_double(Dst, opline, op1_addr, op2_addr, res_addr, smart_branch_opcode, target_label, target_label2, exit_addr)) {
  7429. return 0;
  7430. }
  7431. | jmp >6
  7432. |.code
  7433. } else {
  7434. | IF_NOT_ZVAL_TYPE op2_addr, IS_LONG, >9
  7435. }
  7436. }
  7437. if (!zend_jit_cmp_long_long(Dst, opline, op1_range, op1_addr, op2_range, op2_addr, res_addr, smart_branch_opcode, target_label, target_label2, exit_addr, skip_comparison)) {
  7438. return 0;
  7439. }
  7440. if (op1_info & MAY_BE_DOUBLE) {
  7441. |.cold_code
  7442. |4:
  7443. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_LONG|MAY_BE_DOUBLE))) {
  7444. | IF_NOT_ZVAL_TYPE op1_addr, IS_DOUBLE, >9
  7445. }
  7446. if (op2_info & MAY_BE_DOUBLE) {
  7447. if (!same_ops && (op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-MAY_BE_DOUBLE))) {
  7448. if (!same_ops) {
  7449. | IF_NOT_ZVAL_TYPE op2_addr, IS_DOUBLE, >5
  7450. } else {
  7451. | IF_NOT_ZVAL_TYPE op2_addr, IS_DOUBLE, >9
  7452. }
  7453. }
  7454. if (!zend_jit_cmp_double_double(Dst, opline, op1_addr, op2_addr, res_addr, smart_branch_opcode, target_label, target_label2, exit_addr)) {
  7455. return 0;
  7456. }
  7457. | jmp >6
  7458. }
  7459. if (!same_ops) {
  7460. |5:
  7461. if (op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_LONG|MAY_BE_DOUBLE))) {
  7462. | IF_NOT_ZVAL_TYPE op2_addr, IS_LONG, >9
  7463. }
  7464. if (!zend_jit_cmp_double_long(Dst, opline, op1_addr, op2_addr, res_addr, smart_branch_opcode, target_label, target_label2, exit_addr)) {
  7465. return 0;
  7466. }
  7467. | jmp >6
  7468. }
  7469. |.code
  7470. }
  7471. } else if ((op1_info & MAY_BE_DOUBLE) &&
  7472. !(op1_info & MAY_BE_LONG) &&
  7473. (op2_info & (MAY_BE_LONG|MAY_BE_DOUBLE))) {
  7474. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-MAY_BE_DOUBLE)) {
  7475. | IF_NOT_ZVAL_TYPE op1_addr, IS_DOUBLE, >9
  7476. }
  7477. if (op2_info & MAY_BE_DOUBLE) {
  7478. if (!same_ops && (op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-MAY_BE_DOUBLE))) {
  7479. if (!same_ops && (op2_info & MAY_BE_LONG)) {
  7480. | IF_NOT_ZVAL_TYPE op2_addr, IS_DOUBLE, >3
  7481. } else {
  7482. | IF_NOT_ZVAL_TYPE op2_addr, IS_DOUBLE, >9
  7483. }
  7484. }
  7485. if (!zend_jit_cmp_double_double(Dst, opline, op1_addr, op2_addr, res_addr, smart_branch_opcode, target_label, target_label2, exit_addr)) {
  7486. return 0;
  7487. }
  7488. }
  7489. if (!same_ops && (op2_info & MAY_BE_LONG)) {
  7490. if (op2_info & MAY_BE_DOUBLE) {
  7491. |.cold_code
  7492. }
  7493. |3:
  7494. if (op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_DOUBLE|MAY_BE_LONG))) {
  7495. | IF_NOT_ZVAL_TYPE op2_addr, IS_LONG, >9
  7496. }
  7497. if (!zend_jit_cmp_double_long(Dst, opline, op1_addr, op2_addr, res_addr, smart_branch_opcode, target_label, target_label2, exit_addr)) {
  7498. return 0;
  7499. }
  7500. if (op2_info & MAY_BE_DOUBLE) {
  7501. | jmp >6
  7502. |.code
  7503. }
  7504. }
  7505. } else if ((op2_info & MAY_BE_DOUBLE) &&
  7506. !(op2_info & MAY_BE_LONG) &&
  7507. (op1_info & (MAY_BE_LONG|MAY_BE_DOUBLE))) {
  7508. if (op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-MAY_BE_DOUBLE)) {
  7509. | IF_NOT_ZVAL_TYPE op2_addr, IS_DOUBLE, >9
  7510. }
  7511. if (op1_info & MAY_BE_DOUBLE) {
  7512. if (!same_ops && (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-MAY_BE_DOUBLE))) {
  7513. if (!same_ops && (op1_info & MAY_BE_LONG)) {
  7514. | IF_NOT_ZVAL_TYPE op1_addr, IS_DOUBLE, >3
  7515. } else {
  7516. | IF_NOT_ZVAL_TYPE op1_addr, IS_DOUBLE, >9
  7517. }
  7518. }
  7519. if (!zend_jit_cmp_double_double(Dst, opline, op1_addr, op2_addr, res_addr, smart_branch_opcode, target_label, target_label2, exit_addr)) {
  7520. return 0;
  7521. }
  7522. }
  7523. if (!same_ops && (op1_info & MAY_BE_LONG)) {
  7524. if (op1_info & MAY_BE_DOUBLE) {
  7525. |.cold_code
  7526. }
  7527. |3:
  7528. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_DOUBLE|MAY_BE_LONG))) {
  7529. | IF_NOT_ZVAL_TYPE op1_addr, IS_LONG, >9
  7530. }
  7531. if (!zend_jit_cmp_long_double(Dst, opline, op1_addr, op2_addr, res_addr, smart_branch_opcode, target_label, target_label2, exit_addr)) {
  7532. return 0;
  7533. }
  7534. if (op1_info & MAY_BE_DOUBLE) {
  7535. | jmp >6
  7536. |.code
  7537. }
  7538. }
  7539. }
  7540. if (has_slow ||
  7541. (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_LONG|MAY_BE_DOUBLE))) ||
  7542. (op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_LONG|MAY_BE_DOUBLE)))) {
  7543. if (has_slow) {
  7544. |.cold_code
  7545. |9:
  7546. }
  7547. | SET_EX_OPLINE opline, r0
  7548. if (Z_MODE(op1_addr) == IS_REG) {
  7549. zend_jit_addr real_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->op1.var);
  7550. if (!zend_jit_spill_store(Dst, op1_addr, real_addr, op1_info, 1)) {
  7551. return 0;
  7552. }
  7553. op1_addr = real_addr;
  7554. }
  7555. if (Z_MODE(op2_addr) == IS_REG) {
  7556. zend_jit_addr real_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->op2.var);
  7557. if (!zend_jit_spill_store(Dst, op2_addr, real_addr, op2_info, 1)) {
  7558. return 0;
  7559. }
  7560. op2_addr = real_addr;
  7561. }
  7562. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  7563. if (opline->op1_type == IS_CV && (op1_info & MAY_BE_UNDEF)) {
  7564. | IF_NOT_Z_TYPE FCARG1a, IS_UNDEF, >1
  7565. | mov FCARG1a, opline->op1.var
  7566. | EXT_CALL zend_jit_undefined_op_helper, r0
  7567. | LOAD_ADDR_ZTS FCARG1a, executor_globals, uninitialized_zval
  7568. |1:
  7569. }
  7570. if (opline->op2_type == IS_CV && (op2_info & MAY_BE_UNDEF)) {
  7571. | IF_NOT_ZVAL_TYPE op2_addr, IS_UNDEF, >1
  7572. | mov T1, FCARG1a // save
  7573. | mov FCARG1a, opline->op2.var
  7574. | EXT_CALL zend_jit_undefined_op_helper, r0
  7575. | mov FCARG1a, T1 // restore
  7576. | LOAD_ADDR_ZTS FCARG2a, executor_globals, uninitialized_zval
  7577. | jmp >2
  7578. |1:
  7579. | LOAD_ZVAL_ADDR FCARG2a, op2_addr
  7580. |2:
  7581. } else {
  7582. | LOAD_ZVAL_ADDR FCARG2a, op2_addr
  7583. }
  7584. | EXT_CALL zend_compare, r0
  7585. if ((opline->opcode != ZEND_CASE &&
  7586. (opline->op1_type & (IS_VAR|IS_TMP_VAR)) &&
  7587. (op1_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE|MAY_BE_REF))) ||
  7588. ((opline->op2_type & (IS_VAR|IS_TMP_VAR)) &&
  7589. (op2_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE|MAY_BE_REF)))) {
  7590. | mov dword T1, eax // save
  7591. if (opline->opcode != ZEND_CASE) {
  7592. | FREE_OP opline->op1_type, opline->op1, op1_info, 0, NULL
  7593. }
  7594. | FREE_OP opline->op2_type, opline->op2, op2_info, 0, NULL
  7595. if (may_throw) {
  7596. zend_jit_check_exception_undef_result(Dst, opline);
  7597. }
  7598. | mov eax, dword T1 // restore
  7599. } else if (may_throw) {
  7600. #if ZTS
  7601. | mov dword T1, eax // save
  7602. #else
  7603. if ((sizeof(void*) == 8 && !IS_SIGNED_32BIT(&EG(exception)))) {
  7604. | mov dword T1, eax // save
  7605. }
  7606. #endif
  7607. zend_jit_check_exception_undef_result(Dst, opline);
  7608. #if ZTS
  7609. | mov eax, dword T1 // restore
  7610. #else
  7611. if ((sizeof(void*) == 8 && !IS_SIGNED_32BIT(&EG(exception)))) {
  7612. | mov eax, dword T1 // restore
  7613. }
  7614. #endif
  7615. }
  7616. if (!zend_jit_cmp_slow(Dst, opline, res_addr, smart_branch_opcode, target_label, target_label2, exit_addr)) {
  7617. return 0;
  7618. }
  7619. if (has_slow) {
  7620. | jmp >6
  7621. |.code
  7622. }
  7623. }
  7624. |6:
  7625. return 1;
  7626. }
  7627. static int zend_jit_identical(dasm_State **Dst,
  7628. const zend_op *opline,
  7629. uint32_t op1_info,
  7630. zend_ssa_range *op1_range,
  7631. zend_jit_addr op1_addr,
  7632. uint32_t op2_info,
  7633. zend_ssa_range *op2_range,
  7634. zend_jit_addr op2_addr,
  7635. zend_jit_addr res_addr,
  7636. int may_throw,
  7637. zend_uchar smart_branch_opcode,
  7638. uint32_t target_label,
  7639. uint32_t target_label2,
  7640. const void *exit_addr,
  7641. bool skip_comparison)
  7642. {
  7643. uint32_t identical_label = (uint32_t)-1;
  7644. uint32_t not_identical_label = (uint32_t)-1;
  7645. if (smart_branch_opcode && !exit_addr) {
  7646. if (opline->opcode != ZEND_IS_NOT_IDENTICAL) {
  7647. if (smart_branch_opcode == ZEND_JMPZ) {
  7648. not_identical_label = target_label;
  7649. } else if (smart_branch_opcode == ZEND_JMPNZ) {
  7650. identical_label = target_label;
  7651. } else if (smart_branch_opcode == ZEND_JMPZNZ) {
  7652. not_identical_label = target_label;
  7653. identical_label = target_label2;
  7654. } else {
  7655. ZEND_UNREACHABLE();
  7656. }
  7657. } else {
  7658. if (smart_branch_opcode == ZEND_JMPZ) {
  7659. identical_label = target_label;
  7660. } else if (smart_branch_opcode == ZEND_JMPNZ) {
  7661. not_identical_label = target_label;
  7662. } else if (smart_branch_opcode == ZEND_JMPZNZ) {
  7663. identical_label = target_label;
  7664. not_identical_label = target_label2;
  7665. } else {
  7666. ZEND_UNREACHABLE();
  7667. }
  7668. }
  7669. }
  7670. if ((op1_info & (MAY_BE_REF|MAY_BE_ANY|MAY_BE_UNDEF)) == MAY_BE_LONG &&
  7671. (op2_info & (MAY_BE_REF|MAY_BE_ANY|MAY_BE_UNDEF)) == MAY_BE_LONG) {
  7672. if (!zend_jit_cmp_long_long(Dst, opline, op1_range, op1_addr, op2_range, op2_addr, res_addr, smart_branch_opcode, target_label, target_label2, exit_addr, skip_comparison)) {
  7673. return 0;
  7674. }
  7675. return 1;
  7676. } else if ((op1_info & (MAY_BE_REF|MAY_BE_ANY|MAY_BE_UNDEF)) == MAY_BE_DOUBLE &&
  7677. (op2_info & (MAY_BE_REF|MAY_BE_ANY|MAY_BE_UNDEF)) == MAY_BE_DOUBLE) {
  7678. if (!zend_jit_cmp_double_double(Dst, opline, op1_addr, op2_addr, res_addr, smart_branch_opcode, target_label, target_label2, exit_addr)) {
  7679. return 0;
  7680. }
  7681. return 1;
  7682. }
  7683. if ((op1_info & MAY_BE_UNDEF) && (op2_info & MAY_BE_UNDEF)) {
  7684. op1_info |= MAY_BE_NULL;
  7685. op2_info |= MAY_BE_NULL;
  7686. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  7687. | IF_Z_TYPE FCARG1a, IS_UNDEF, >1
  7688. |.cold_code
  7689. |1:
  7690. | // zend_error(E_WARNING, "Undefined variable $%s", ZSTR_VAL(CV_DEF_OF(EX_VAR_TO_NUM(opline->op1.var))));
  7691. | SET_EX_OPLINE opline, r0
  7692. | mov FCARG1d, opline->op1.var
  7693. | EXT_CALL zend_jit_undefined_op_helper, r0
  7694. if (may_throw) {
  7695. zend_jit_check_exception_undef_result(Dst, opline);
  7696. }
  7697. | LOAD_ADDR_ZTS FCARG1a, executor_globals, uninitialized_zval
  7698. | jmp >1
  7699. |.code
  7700. |1:
  7701. | LOAD_ZVAL_ADDR FCARG2a, op2_addr
  7702. | IF_Z_TYPE FCARG2a, IS_UNDEF, >1
  7703. |.cold_code
  7704. |1:
  7705. | // zend_error(E_WARNING, "Undefined variable $%s", ZSTR_VAL(CV_DEF_OF(EX_VAR_TO_NUM(opline->op1.var))));
  7706. | SET_EX_OPLINE opline, r0
  7707. | mov aword T1, FCARG1a // save
  7708. | mov FCARG1d, opline->op2.var
  7709. | EXT_CALL zend_jit_undefined_op_helper, r0
  7710. if (may_throw) {
  7711. zend_jit_check_exception_undef_result(Dst, opline);
  7712. }
  7713. | mov FCARG1a, aword T1 // restore
  7714. | LOAD_ADDR_ZTS FCARG2a, executor_globals, uninitialized_zval
  7715. | jmp >1
  7716. |.code
  7717. |1:
  7718. } else if (op1_info & MAY_BE_UNDEF) {
  7719. op1_info |= MAY_BE_NULL;
  7720. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  7721. | IF_Z_TYPE FCARG1a, IS_UNDEF, >1
  7722. |.cold_code
  7723. |1:
  7724. | // zend_error(E_WARNING, "Undefined variable $%s", ZSTR_VAL(CV_DEF_OF(EX_VAR_TO_NUM(opline->op1.var))));
  7725. | SET_EX_OPLINE opline, r0
  7726. | mov FCARG1d, opline->op1.var
  7727. | EXT_CALL zend_jit_undefined_op_helper, r0
  7728. if (may_throw) {
  7729. zend_jit_check_exception_undef_result(Dst, opline);
  7730. }
  7731. | LOAD_ADDR_ZTS FCARG1a, executor_globals, uninitialized_zval
  7732. | jmp >1
  7733. |.code
  7734. |1:
  7735. if (opline->op2_type != IS_CONST) {
  7736. | LOAD_ZVAL_ADDR FCARG2a, op2_addr
  7737. }
  7738. } else if (op2_info & MAY_BE_UNDEF) {
  7739. op2_info |= MAY_BE_NULL;
  7740. | LOAD_ZVAL_ADDR FCARG2a, op2_addr
  7741. | IF_Z_TYPE FCARG2a, IS_UNDEF, >1
  7742. |.cold_code
  7743. |1:
  7744. | // zend_error(E_WARNING, "Undefined variable $%s", ZSTR_VAL(CV_DEF_OF(EX_VAR_TO_NUM(opline->op1.var))));
  7745. | SET_EX_OPLINE opline, r0
  7746. | mov FCARG1d, opline->op2.var
  7747. | EXT_CALL zend_jit_undefined_op_helper, r0
  7748. if (may_throw) {
  7749. zend_jit_check_exception_undef_result(Dst, opline);
  7750. }
  7751. | LOAD_ADDR_ZTS FCARG2a, executor_globals, uninitialized_zval
  7752. | jmp >1
  7753. |.code
  7754. |1:
  7755. if (opline->op1_type != IS_CONST) {
  7756. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  7757. }
  7758. } else if ((op1_info & op2_info & MAY_BE_ANY) != 0) {
  7759. if (opline->op1_type != IS_CONST) {
  7760. if (Z_MODE(op1_addr) == IS_REG) {
  7761. zend_jit_addr real_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->op1.var);
  7762. if (!zend_jit_spill_store(Dst, op1_addr, real_addr, op1_info, 1)) {
  7763. return 0;
  7764. }
  7765. op1_addr = real_addr;
  7766. }
  7767. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  7768. }
  7769. if (opline->op2_type != IS_CONST) {
  7770. if (Z_MODE(op2_addr) == IS_REG) {
  7771. zend_jit_addr real_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->op2.var);
  7772. if (!zend_jit_spill_store(Dst, op2_addr, real_addr, op2_info, 1)) {
  7773. return 0;
  7774. }
  7775. op2_addr = real_addr;
  7776. }
  7777. | LOAD_ZVAL_ADDR FCARG2a, op2_addr
  7778. }
  7779. }
  7780. if ((op1_info & op2_info & MAY_BE_ANY) == 0) {
  7781. if ((opline->opcode != ZEND_CASE_STRICT &&
  7782. (opline->op1_type & (IS_VAR|IS_TMP_VAR)) &&
  7783. (op1_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE|MAY_BE_REF))) ||
  7784. ((opline->op2_type & (IS_VAR|IS_TMP_VAR)) &&
  7785. (op2_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE|MAY_BE_REF)))) {
  7786. if (opline->opcode != ZEND_CASE_STRICT) {
  7787. | FREE_OP opline->op1_type, opline->op1, op1_info, 1, opline
  7788. }
  7789. | FREE_OP opline->op2_type, opline->op2, op2_info, 1, opline
  7790. }
  7791. if (smart_branch_opcode) {
  7792. if (may_throw) {
  7793. zend_jit_check_exception_undef_result(Dst, opline);
  7794. }
  7795. if (exit_addr) {
  7796. if (smart_branch_opcode == ZEND_JMPZ) {
  7797. | jmp &exit_addr
  7798. }
  7799. } else if (not_identical_label != (uint32_t)-1) {
  7800. | jmp =>not_identical_label
  7801. }
  7802. } else {
  7803. | SET_ZVAL_TYPE_INFO res_addr, (opline->opcode != ZEND_IS_NOT_IDENTICAL ? IS_FALSE : IS_TRUE)
  7804. if (may_throw) {
  7805. zend_jit_check_exception(Dst);
  7806. }
  7807. }
  7808. return 1;
  7809. }
  7810. if (opline->op1_type & (IS_CV|IS_VAR)) {
  7811. | ZVAL_DEREF FCARG1a, op1_info
  7812. }
  7813. if (opline->op2_type & (IS_CV|IS_VAR)) {
  7814. | ZVAL_DEREF FCARG2a, op2_info
  7815. }
  7816. if (has_concrete_type(op1_info)
  7817. && has_concrete_type(op2_info)
  7818. && concrete_type(op1_info) == concrete_type(op2_info)
  7819. && concrete_type(op1_info) <= IS_TRUE) {
  7820. if (smart_branch_opcode) {
  7821. if (exit_addr) {
  7822. if (smart_branch_opcode == ZEND_JMPNZ) {
  7823. | jmp &exit_addr
  7824. }
  7825. } else if (identical_label != (uint32_t)-1) {
  7826. | jmp =>identical_label
  7827. }
  7828. } else {
  7829. | SET_ZVAL_TYPE_INFO res_addr, (opline->opcode != ZEND_IS_NOT_IDENTICAL ? IS_TRUE : IS_FALSE)
  7830. }
  7831. } else if (Z_MODE(op1_addr) == IS_CONST_ZVAL && Z_MODE(op2_addr) == IS_CONST_ZVAL) {
  7832. if (zend_is_identical(Z_ZV(op1_addr), Z_ZV(op2_addr))) {
  7833. if (smart_branch_opcode) {
  7834. if (exit_addr) {
  7835. if (smart_branch_opcode == ZEND_JMPNZ) {
  7836. | jmp &exit_addr
  7837. }
  7838. } else if (identical_label != (uint32_t)-1) {
  7839. | jmp =>identical_label
  7840. }
  7841. } else {
  7842. | SET_ZVAL_TYPE_INFO res_addr, (opline->opcode != ZEND_IS_NOT_IDENTICAL ? IS_TRUE : IS_FALSE)
  7843. }
  7844. } else {
  7845. if (smart_branch_opcode) {
  7846. if (exit_addr) {
  7847. if (smart_branch_opcode == ZEND_JMPZ) {
  7848. | jmp &exit_addr
  7849. }
  7850. } else if (not_identical_label != (uint32_t)-1) {
  7851. | jmp =>not_identical_label
  7852. }
  7853. } else {
  7854. | SET_ZVAL_TYPE_INFO res_addr, (opline->opcode != ZEND_IS_NOT_IDENTICAL ? IS_FALSE : IS_TRUE)
  7855. }
  7856. }
  7857. } else if (Z_MODE(op1_addr) == IS_CONST_ZVAL && Z_TYPE_P(Z_ZV(op1_addr)) <= IS_TRUE) {
  7858. zval *val = Z_ZV(op1_addr);
  7859. | cmp byte [FCARG2a + offsetof(zval, u1.v.type)], Z_TYPE_P(val)
  7860. if (smart_branch_opcode) {
  7861. if (opline->op2_type == IS_VAR && (op2_info & MAY_BE_REF)) {
  7862. | jne >8
  7863. | FREE_OP opline->op2_type, opline->op2, op2_info, 1, opline
  7864. if (may_throw) {
  7865. zend_jit_check_exception_undef_result(Dst, opline);
  7866. }
  7867. if (exit_addr && smart_branch_opcode == ZEND_JMPNZ) {
  7868. | jmp &exit_addr
  7869. } else if (identical_label != (uint32_t)-1) {
  7870. | jmp =>identical_label
  7871. } else {
  7872. | jmp >9
  7873. }
  7874. |8:
  7875. } else if (exit_addr && smart_branch_opcode == ZEND_JMPNZ) {
  7876. | je &exit_addr
  7877. } else if (identical_label != (uint32_t)-1) {
  7878. | je =>identical_label
  7879. } else {
  7880. | je >9
  7881. }
  7882. } else {
  7883. if (opline->opcode != ZEND_IS_NOT_IDENTICAL) {
  7884. | sete al
  7885. } else {
  7886. | setne al
  7887. }
  7888. | movzx eax, al
  7889. | lea eax, [eax + 2]
  7890. | SET_ZVAL_TYPE_INFO res_addr, eax
  7891. }
  7892. if ((opline->op2_type & (IS_VAR|IS_TMP_VAR)) &&
  7893. (op2_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE|MAY_BE_REF))) {
  7894. | FREE_OP opline->op2_type, opline->op2, op2_info, 1, opline
  7895. if (may_throw) {
  7896. zend_jit_check_exception_undef_result(Dst, opline);
  7897. }
  7898. }
  7899. if (exit_addr) {
  7900. if (smart_branch_opcode == ZEND_JMPZ) {
  7901. | jmp &exit_addr
  7902. }
  7903. } else if (smart_branch_opcode && not_identical_label != (uint32_t)-1) {
  7904. | jmp =>not_identical_label
  7905. }
  7906. } else if (Z_MODE(op2_addr) == IS_CONST_ZVAL && Z_TYPE_P(Z_ZV(op2_addr)) <= IS_TRUE) {
  7907. zval *val = Z_ZV(op2_addr);
  7908. | cmp byte [FCARG1a + offsetof(zval, u1.v.type)], Z_TYPE_P(val)
  7909. if (smart_branch_opcode) {
  7910. if (opline->opcode != ZEND_CASE_STRICT
  7911. && opline->op1_type == IS_VAR && (op1_info & MAY_BE_REF)) {
  7912. | jne >8
  7913. | FREE_OP opline->op1_type, opline->op1, op1_info, 1, opline
  7914. if (may_throw) {
  7915. zend_jit_check_exception_undef_result(Dst, opline);
  7916. }
  7917. if (exit_addr && smart_branch_opcode == ZEND_JMPNZ) {
  7918. | jmp &exit_addr
  7919. } else if (identical_label != (uint32_t)-1) {
  7920. | jmp =>identical_label
  7921. } else {
  7922. | jmp >9
  7923. }
  7924. |8:
  7925. } else if (exit_addr && smart_branch_opcode == ZEND_JMPNZ) {
  7926. | je &exit_addr
  7927. } else if (identical_label != (uint32_t)-1) {
  7928. | je =>identical_label
  7929. } else {
  7930. | je >9
  7931. }
  7932. } else {
  7933. if (opline->opcode != ZEND_IS_NOT_IDENTICAL) {
  7934. | sete al
  7935. } else {
  7936. | setne al
  7937. }
  7938. | movzx eax, al
  7939. | lea eax, [eax + 2]
  7940. | SET_ZVAL_TYPE_INFO res_addr, eax
  7941. }
  7942. if (opline->opcode != ZEND_CASE_STRICT
  7943. && (opline->op1_type & (IS_VAR|IS_TMP_VAR)) &&
  7944. (op1_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE|MAY_BE_REF))) {
  7945. | FREE_OP opline->op1_type, opline->op1, op1_info, 1, opline
  7946. if (may_throw) {
  7947. zend_jit_check_exception_undef_result(Dst, opline);
  7948. }
  7949. }
  7950. if (smart_branch_opcode) {
  7951. if (exit_addr) {
  7952. if (smart_branch_opcode == ZEND_JMPZ) {
  7953. | jmp &exit_addr
  7954. }
  7955. } else if (not_identical_label != (uint32_t)-1) {
  7956. | jmp =>not_identical_label
  7957. }
  7958. }
  7959. } else {
  7960. if (opline->op1_type == IS_CONST) {
  7961. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  7962. }
  7963. if (opline->op2_type == IS_CONST) {
  7964. | LOAD_ZVAL_ADDR FCARG2a, op2_addr
  7965. }
  7966. | EXT_CALL zend_is_identical, r0
  7967. if ((opline->opcode != ZEND_CASE_STRICT &&
  7968. (opline->op1_type & (IS_VAR|IS_TMP_VAR)) &&
  7969. (op1_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE|MAY_BE_REF))) ||
  7970. ((opline->op2_type & (IS_VAR|IS_TMP_VAR)) &&
  7971. (op2_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE|MAY_BE_REF)))) {
  7972. | mov aword T1, r0 // save
  7973. if (opline->opcode != ZEND_CASE_STRICT) {
  7974. | FREE_OP opline->op1_type, opline->op1, op1_info, 1, opline
  7975. }
  7976. | FREE_OP opline->op2_type, opline->op2, op2_info, 1, opline
  7977. if (may_throw) {
  7978. zend_jit_check_exception_undef_result(Dst, opline);
  7979. }
  7980. | mov r0, aword T1 // restore
  7981. }
  7982. if (smart_branch_opcode) {
  7983. | test al, al
  7984. if (exit_addr) {
  7985. if (smart_branch_opcode == ZEND_JMPNZ) {
  7986. | jnz &exit_addr
  7987. } else {
  7988. | jz &exit_addr
  7989. }
  7990. } else if (not_identical_label != (uint32_t)-1) {
  7991. | jz =>not_identical_label
  7992. if (identical_label != (uint32_t)-1) {
  7993. | jmp =>identical_label
  7994. }
  7995. } else if (identical_label != (uint32_t)-1) {
  7996. | jnz =>identical_label
  7997. }
  7998. } else {
  7999. | movzx eax, al
  8000. if (opline->opcode != ZEND_IS_NOT_IDENTICAL) {
  8001. | lea eax, [eax + 2]
  8002. } else {
  8003. | neg eax
  8004. | lea eax, [eax + 3]
  8005. }
  8006. | SET_ZVAL_TYPE_INFO res_addr, eax
  8007. }
  8008. }
  8009. |9:
  8010. if (may_throw) {
  8011. zend_jit_check_exception(Dst);
  8012. }
  8013. return 1;
  8014. }
  8015. static int zend_jit_bool_jmpznz(dasm_State **Dst, const zend_op *opline, uint32_t op1_info, zend_jit_addr op1_addr, zend_jit_addr res_addr, uint32_t target_label, uint32_t target_label2, int may_throw, zend_uchar branch_opcode, const void *exit_addr)
  8016. {
  8017. uint32_t true_label = -1;
  8018. uint32_t false_label = -1;
  8019. bool set_bool = 0;
  8020. bool set_bool_not = 0;
  8021. bool set_delayed = 0;
  8022. bool jmp_done = 0;
  8023. if (branch_opcode == ZEND_BOOL) {
  8024. set_bool = 1;
  8025. } else if (branch_opcode == ZEND_BOOL_NOT) {
  8026. set_bool = 1;
  8027. set_bool_not = 1;
  8028. } else if (branch_opcode == ZEND_JMPZ) {
  8029. false_label = target_label;
  8030. } else if (branch_opcode == ZEND_JMPNZ) {
  8031. true_label = target_label;
  8032. } else if (branch_opcode == ZEND_JMPZNZ) {
  8033. true_label = target_label2;
  8034. false_label = target_label;
  8035. } else if (branch_opcode == ZEND_JMPZ_EX) {
  8036. set_bool = 1;
  8037. false_label = target_label;
  8038. } else if (branch_opcode == ZEND_JMPNZ_EX) {
  8039. set_bool = 1;
  8040. true_label = target_label;
  8041. } else {
  8042. ZEND_UNREACHABLE();
  8043. }
  8044. if (Z_MODE(op1_addr) == IS_CONST_ZVAL) {
  8045. if (zend_is_true(Z_ZV(op1_addr))) {
  8046. /* Always TRUE */
  8047. if (set_bool) {
  8048. if (set_bool_not) {
  8049. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  8050. } else {
  8051. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  8052. }
  8053. }
  8054. if (true_label != (uint32_t)-1) {
  8055. | jmp =>true_label;
  8056. }
  8057. } else {
  8058. /* Always FALSE */
  8059. if (set_bool) {
  8060. if (set_bool_not) {
  8061. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  8062. } else {
  8063. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  8064. }
  8065. }
  8066. if (false_label != (uint32_t)-1) {
  8067. | jmp =>false_label;
  8068. }
  8069. }
  8070. return 1;
  8071. }
  8072. if (opline->op1_type == IS_CV && (op1_info & MAY_BE_REF)) {
  8073. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  8074. | ZVAL_DEREF FCARG1a, op1_info
  8075. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  8076. }
  8077. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE)) {
  8078. if (!(op1_info & ((MAY_BE_UNDEF|MAY_BE_ANY)-MAY_BE_TRUE))) {
  8079. /* Always TRUE */
  8080. if (set_bool) {
  8081. if (set_bool_not) {
  8082. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  8083. } else {
  8084. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  8085. }
  8086. }
  8087. if (true_label != (uint32_t)-1) {
  8088. | jmp =>true_label;
  8089. }
  8090. } else {
  8091. if (!(op1_info & (MAY_BE_ANY-(MAY_BE_NULL|MAY_BE_FALSE)))) {
  8092. /* Always FALSE */
  8093. if (set_bool) {
  8094. if (set_bool_not) {
  8095. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  8096. } else {
  8097. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  8098. }
  8099. }
  8100. } else {
  8101. | CMP_ZVAL_TYPE op1_addr, IS_TRUE
  8102. if (op1_info & (MAY_BE_ANY-(MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE))) {
  8103. if ((op1_info & MAY_BE_LONG) &&
  8104. !(op1_info & MAY_BE_UNDEF) &&
  8105. !set_bool) {
  8106. if (exit_addr) {
  8107. if (branch_opcode == ZEND_JMPNZ) {
  8108. | jl >9
  8109. } else {
  8110. | jl &exit_addr
  8111. }
  8112. } else if (false_label != (uint32_t)-1) {
  8113. | jl =>false_label
  8114. } else {
  8115. | jl >9
  8116. }
  8117. jmp_done = 1;
  8118. } else {
  8119. | jg >2
  8120. }
  8121. }
  8122. if (!(op1_info & MAY_BE_TRUE)) {
  8123. /* It's FALSE */
  8124. if (set_bool) {
  8125. if (set_bool_not) {
  8126. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  8127. } else {
  8128. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  8129. }
  8130. }
  8131. } else {
  8132. if (exit_addr) {
  8133. if (set_bool) {
  8134. | jne >1
  8135. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  8136. if (branch_opcode == ZEND_JMPNZ || branch_opcode == ZEND_JMPNZ_EX) {
  8137. | jmp &exit_addr
  8138. } else {
  8139. | jmp >9
  8140. }
  8141. |1:
  8142. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  8143. if (branch_opcode == ZEND_JMPZ || branch_opcode == ZEND_JMPZ_EX) {
  8144. if (!(op1_info & (MAY_BE_UNDEF|MAY_BE_LONG))) {
  8145. | jne &exit_addr
  8146. }
  8147. }
  8148. } else {
  8149. if (branch_opcode == ZEND_JMPNZ || branch_opcode == ZEND_JMPNZ_EX) {
  8150. | je &exit_addr
  8151. } else if (!(op1_info & (MAY_BE_UNDEF|MAY_BE_LONG))) {
  8152. | jne &exit_addr
  8153. } else {
  8154. | je >9
  8155. }
  8156. }
  8157. } else if (true_label != (uint32_t)-1 || false_label != (uint32_t)-1) {
  8158. if (set_bool) {
  8159. | jne >1
  8160. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  8161. if (true_label != (uint32_t)-1) {
  8162. | jmp =>true_label
  8163. } else {
  8164. | jmp >9
  8165. }
  8166. |1:
  8167. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  8168. } else {
  8169. if (true_label != (uint32_t)-1) {
  8170. | je =>true_label
  8171. } else if (!(op1_info & (MAY_BE_UNDEF|MAY_BE_LONG))) {
  8172. | jne =>false_label
  8173. jmp_done = 1;
  8174. } else {
  8175. | je >9
  8176. }
  8177. }
  8178. } else if (set_bool) {
  8179. | sete al
  8180. | movzx eax, al
  8181. if (set_bool_not) {
  8182. | neg eax
  8183. | add eax, 3
  8184. } else {
  8185. | add eax, 2
  8186. }
  8187. if ((op1_info & MAY_BE_UNDEF) && (op1_info & MAY_BE_ANY)) {
  8188. set_delayed = 1;
  8189. } else {
  8190. | SET_ZVAL_TYPE_INFO res_addr, eax
  8191. }
  8192. }
  8193. }
  8194. }
  8195. /* It's FALSE, but may be UNDEF */
  8196. if (op1_info & MAY_BE_UNDEF) {
  8197. if (op1_info & MAY_BE_ANY) {
  8198. if (set_delayed) {
  8199. | CMP_ZVAL_TYPE op1_addr, IS_UNDEF
  8200. | SET_ZVAL_TYPE_INFO res_addr, eax
  8201. | jz >1
  8202. } else {
  8203. | IF_ZVAL_TYPE op1_addr, IS_UNDEF, >1
  8204. }
  8205. |.cold_code
  8206. |1:
  8207. }
  8208. | mov FCARG1d, opline->op1.var
  8209. | SET_EX_OPLINE opline, r0
  8210. | EXT_CALL zend_jit_undefined_op_helper, r0
  8211. if (may_throw) {
  8212. if (!zend_jit_check_exception_undef_result(Dst, opline)) {
  8213. return 0;
  8214. }
  8215. }
  8216. if (exit_addr) {
  8217. if (branch_opcode == ZEND_JMPZ || branch_opcode == ZEND_JMPZ_EX) {
  8218. | jmp &exit_addr
  8219. }
  8220. } else if (false_label != (uint32_t)-1) {
  8221. | jmp =>false_label
  8222. }
  8223. if (op1_info & MAY_BE_ANY) {
  8224. if (exit_addr) {
  8225. if (branch_opcode == ZEND_JMPNZ || branch_opcode == ZEND_JMPNZ_EX) {
  8226. | jmp >9
  8227. }
  8228. } else if (false_label == (uint32_t)-1) {
  8229. | jmp >9
  8230. }
  8231. |.code
  8232. }
  8233. }
  8234. if (!jmp_done) {
  8235. if (exit_addr) {
  8236. if (branch_opcode == ZEND_JMPNZ || branch_opcode == ZEND_JMPNZ_EX) {
  8237. if (op1_info & MAY_BE_LONG) {
  8238. | jmp >9
  8239. }
  8240. } else if (op1_info & MAY_BE_LONG) {
  8241. | jmp &exit_addr
  8242. }
  8243. } else if (false_label != (uint32_t)-1) {
  8244. | jmp =>false_label
  8245. } else if ((op1_info & MAY_BE_LONG) || (op1_info & MAY_BE_ANY) == MAY_BE_DOUBLE) {
  8246. | jmp >9
  8247. }
  8248. }
  8249. }
  8250. }
  8251. if (op1_info & MAY_BE_LONG) {
  8252. |2:
  8253. if (op1_info & (MAY_BE_ANY-(MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG))) {
  8254. | IF_NOT_ZVAL_TYPE op1_addr, IS_LONG, >2
  8255. }
  8256. if (Z_MODE(op1_addr) == IS_REG) {
  8257. | test Ra(Z_REG(op1_addr)), Ra(Z_REG(op1_addr))
  8258. } else {
  8259. | LONG_OP_WITH_CONST, cmp, op1_addr, Z_L(0)
  8260. }
  8261. if (set_bool) {
  8262. | setne al
  8263. | movzx eax, al
  8264. if (set_bool_not) {
  8265. | neg eax
  8266. | add eax, 3
  8267. } else {
  8268. | lea eax, [eax + 2]
  8269. }
  8270. | SET_ZVAL_TYPE_INFO res_addr, eax
  8271. }
  8272. if (exit_addr) {
  8273. if (branch_opcode == ZEND_JMPNZ || branch_opcode == ZEND_JMPNZ_EX) {
  8274. | jne &exit_addr
  8275. } else {
  8276. | je &exit_addr
  8277. }
  8278. } else if (true_label != (uint32_t)-1 || false_label != (uint32_t)-1) {
  8279. if (true_label != (uint32_t)-1) {
  8280. | jne =>true_label
  8281. if (false_label != (uint32_t)-1) {
  8282. | jmp =>false_label
  8283. }
  8284. } else {
  8285. | je =>false_label
  8286. }
  8287. }
  8288. }
  8289. if ((op1_info & (MAY_BE_ANY-(MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG))) == MAY_BE_DOUBLE) {
  8290. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG)) {
  8291. |.cold_code
  8292. }
  8293. |2:
  8294. if (CAN_USE_AVX()) {
  8295. | vxorps xmm0, xmm0, xmm0
  8296. } else {
  8297. | xorps xmm0, xmm0
  8298. }
  8299. | DOUBLE_CMP ZREG_XMM0, op1_addr
  8300. if (set_bool) {
  8301. if (exit_addr) {
  8302. if (branch_opcode == ZEND_JMPNZ || branch_opcode == ZEND_JMPNZ_EX) {
  8303. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  8304. | jp &exit_addr
  8305. | jne &exit_addr
  8306. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  8307. } else {
  8308. | jp >1
  8309. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  8310. | je &exit_addr
  8311. |1:
  8312. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  8313. }
  8314. } else if (false_label != (uint32_t)-1) { // JMPZ_EX (p=>true, z=>false, false=>jmp)
  8315. | jp >1
  8316. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  8317. | je => false_label
  8318. |1:
  8319. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  8320. } else if (true_label != (uint32_t)-1) { // JMPNZ_EX (p=>true, z=>false, true=>jmp)
  8321. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  8322. | jp => true_label
  8323. | jne => true_label
  8324. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  8325. } else if (set_bool_not) { // BOOL_NOT (p=>false, z=>true)
  8326. | mov eax, IS_FALSE
  8327. | jp >1
  8328. | jne >1
  8329. | mov eax, IS_TRUE
  8330. |1:
  8331. | SET_ZVAL_TYPE_INFO res_addr, eax
  8332. } else { // BOOL (p=>true, z=>false)
  8333. | mov eax, IS_TRUE
  8334. | jp >1
  8335. | jne >1
  8336. | mov eax, IS_FALSE
  8337. |1:
  8338. | SET_ZVAL_TYPE_INFO res_addr, eax
  8339. }
  8340. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG)) {
  8341. | jmp >9
  8342. |.code
  8343. }
  8344. } else {
  8345. if (exit_addr) {
  8346. if (branch_opcode == ZEND_JMPNZ || branch_opcode == ZEND_JMPNZ_EX) {
  8347. | jp &exit_addr
  8348. | jne &exit_addr
  8349. |1:
  8350. } else {
  8351. | jp >1
  8352. | je &exit_addr
  8353. |1:
  8354. }
  8355. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG)) {
  8356. | jmp >9
  8357. }
  8358. } else {
  8359. ZEND_ASSERT(true_label != (uint32_t)-1 || false_label != (uint32_t)-1);
  8360. if (false_label != (uint32_t)-1 ) {
  8361. | jp >1
  8362. | je => false_label
  8363. |1:
  8364. if (true_label != (uint32_t)-1) {
  8365. | jmp =>true_label
  8366. } else if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG)) {
  8367. | jmp >9
  8368. }
  8369. } else {
  8370. | jp => true_label
  8371. | jne => true_label
  8372. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG)) {
  8373. | jmp >9
  8374. }
  8375. }
  8376. }
  8377. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG)) {
  8378. |.code
  8379. }
  8380. }
  8381. } else if (op1_info & (MAY_BE_ANY - (MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG))) {
  8382. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG)) {
  8383. |.cold_code
  8384. |2:
  8385. }
  8386. if (Z_REG(op1_addr) != ZREG_FCARG1 || Z_OFFSET(op1_addr) != 0) {
  8387. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  8388. }
  8389. | SET_EX_OPLINE opline, r0
  8390. | EXT_CALL zend_is_true, r0
  8391. if ((opline->op1_type & (IS_VAR|IS_TMP_VAR)) &&
  8392. (op1_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  8393. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->op1.var);
  8394. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  8395. | IF_NOT_ZVAL_REFCOUNTED op1_addr, >3
  8396. }
  8397. | GET_ZVAL_PTR FCARG1a, op1_addr
  8398. | GC_DELREF FCARG1a
  8399. | jnz >3
  8400. | mov aword T1, r0 // save
  8401. | ZVAL_DTOR_FUNC op1_info, opline
  8402. | mov r0, aword T1 // restore
  8403. |3:
  8404. }
  8405. if (may_throw) {
  8406. | MEM_CMP_ZTS aword, executor_globals, exception, 0, r1
  8407. | jne ->exception_handler_undef
  8408. }
  8409. if (set_bool) {
  8410. if (set_bool_not) {
  8411. | neg eax
  8412. | add eax, 3
  8413. } else {
  8414. | add eax, 2
  8415. }
  8416. | SET_ZVAL_TYPE_INFO res_addr, eax
  8417. if (exit_addr) {
  8418. | CMP_ZVAL_TYPE res_addr, IS_FALSE
  8419. if (branch_opcode == ZEND_JMPNZ || branch_opcode == ZEND_JMPNZ_EX) {
  8420. | jne &exit_addr
  8421. } else {
  8422. | je &exit_addr
  8423. }
  8424. } else if (true_label != (uint32_t)-1 || false_label != (uint32_t)-1) {
  8425. | CMP_ZVAL_TYPE res_addr, IS_FALSE
  8426. if (true_label != (uint32_t)-1) {
  8427. | jne =>true_label
  8428. if (false_label != (uint32_t)-1) {
  8429. | jmp =>false_label
  8430. } else if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG)) {
  8431. | jmp >9
  8432. }
  8433. } else {
  8434. | je =>false_label
  8435. }
  8436. }
  8437. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG)) {
  8438. | jmp >9
  8439. |.code
  8440. }
  8441. } else {
  8442. | test r0, r0
  8443. if (exit_addr) {
  8444. if (branch_opcode == ZEND_JMPNZ || branch_opcode == ZEND_JMPNZ_EX) {
  8445. | jne &exit_addr
  8446. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG)) {
  8447. | jmp >9
  8448. }
  8449. } else {
  8450. | je &exit_addr
  8451. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG)) {
  8452. | jmp >9
  8453. }
  8454. }
  8455. } else if (true_label != (uint32_t)-1) {
  8456. | jne =>true_label
  8457. if (false_label != (uint32_t)-1) {
  8458. | jmp =>false_label
  8459. } else if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG)) {
  8460. | jmp >9
  8461. }
  8462. } else {
  8463. | je =>false_label
  8464. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG)) {
  8465. | jmp >9
  8466. }
  8467. }
  8468. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG)) {
  8469. |.code
  8470. }
  8471. }
  8472. }
  8473. |9:
  8474. return 1;
  8475. }
  8476. static int zend_jit_qm_assign(dasm_State **Dst, const zend_op *opline, uint32_t op1_info, zend_jit_addr op1_addr, zend_jit_addr op1_def_addr, uint32_t res_use_info, uint32_t res_info, zend_jit_addr res_addr)
  8477. {
  8478. if (op1_addr != op1_def_addr) {
  8479. if (!zend_jit_update_regs(Dst, opline->op1.var, op1_addr, op1_def_addr, op1_info)) {
  8480. return 0;
  8481. }
  8482. if (Z_MODE(op1_def_addr) == IS_REG && Z_MODE(op1_addr) != IS_REG) {
  8483. op1_addr = op1_def_addr;
  8484. }
  8485. }
  8486. if (!zend_jit_simple_assign(Dst, opline, res_addr, res_use_info, res_info, opline->op1_type, op1_addr, op1_info, 0, 0, 0)) {
  8487. return 0;
  8488. }
  8489. if (!zend_jit_store_var_if_necessary(Dst, opline->result.var, res_addr, res_info)) {
  8490. return 0;
  8491. }
  8492. if (op1_info & MAY_BE_UNDEF) {
  8493. zend_jit_check_exception(Dst);
  8494. }
  8495. return 1;
  8496. }
  8497. static int zend_jit_assign(dasm_State **Dst, const zend_op *opline, uint32_t op1_info, zend_jit_addr op1_use_addr, uint32_t op1_def_info, zend_jit_addr op1_addr, uint32_t op2_info, zend_jit_addr op2_addr, zend_jit_addr op2_def_addr, uint32_t res_info, zend_jit_addr res_addr, int may_throw)
  8498. {
  8499. ZEND_ASSERT(opline->op1_type == IS_CV);
  8500. if (op2_addr != op2_def_addr) {
  8501. if (!zend_jit_update_regs(Dst, opline->op2.var, op2_addr, op2_def_addr, op2_info)) {
  8502. return 0;
  8503. }
  8504. if (Z_MODE(op2_def_addr) == IS_REG && Z_MODE(op2_addr) != IS_REG) {
  8505. op2_addr = op2_def_addr;
  8506. }
  8507. }
  8508. if (Z_MODE(op1_addr) != IS_REG
  8509. && Z_MODE(op1_use_addr) == IS_REG
  8510. && !Z_LOAD(op1_use_addr)
  8511. && !Z_STORE(op1_use_addr)) {
  8512. /* Force type update */
  8513. op1_info |= MAY_BE_UNDEF;
  8514. }
  8515. if (!zend_jit_assign_to_variable(Dst, opline, op1_use_addr, op1_addr, op1_info, op1_def_info, opline->op2_type, op2_addr, op2_info, res_addr,
  8516. may_throw)) {
  8517. return 0;
  8518. }
  8519. if (!zend_jit_store_var_if_necessary_ex(Dst, opline->op1.var, op1_addr, op1_def_info, op1_use_addr, op1_info)) {
  8520. return 0;
  8521. }
  8522. if (opline->result_type != IS_UNUSED) {
  8523. if (!zend_jit_store_var_if_necessary(Dst, opline->result.var, res_addr, res_info)) {
  8524. return 0;
  8525. }
  8526. }
  8527. return 1;
  8528. }
  8529. /* copy of hidden zend_closure */
  8530. typedef struct _zend_closure {
  8531. zend_object std;
  8532. zend_function func;
  8533. zval this_ptr;
  8534. zend_class_entry *called_scope;
  8535. zif_handler orig_internal_handler;
  8536. } zend_closure;
  8537. static int zend_jit_stack_check(dasm_State **Dst, const zend_op *opline, uint32_t used_stack)
  8538. {
  8539. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  8540. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  8541. if (!exit_addr) {
  8542. return 0;
  8543. }
  8544. | // Check Stack Overflow
  8545. | MEM_LOAD_ZTS r1, aword, executor_globals, vm_stack_end, r0
  8546. | MEM_LOAD_OP_ZTS sub, r1, aword, executor_globals, vm_stack_top, r0
  8547. | cmp r1, used_stack
  8548. | jb &exit_addr
  8549. return 1;
  8550. }
  8551. static int zend_jit_push_call_frame(dasm_State **Dst, const zend_op *opline, const zend_op_array *op_array, zend_function *func, bool is_closure, bool delayed_fetch_this, int checked_stack)
  8552. {
  8553. uint32_t used_stack;
  8554. bool stack_check = 1;
  8555. if (func) {
  8556. used_stack = zend_vm_calc_used_stack(opline->extended_value, func);
  8557. if ((int)used_stack <= checked_stack) {
  8558. stack_check = 0;
  8559. }
  8560. } else {
  8561. used_stack = (ZEND_CALL_FRAME_SLOT + opline->extended_value) * sizeof(zval);
  8562. | // if (EXPECTED(ZEND_USER_CODE(func->type))) {
  8563. if (!is_closure) {
  8564. | test byte [r0 + offsetof(zend_function, type)], 1
  8565. | mov FCARG1a, used_stack
  8566. | jnz >1
  8567. } else {
  8568. | mov FCARG1a, used_stack
  8569. }
  8570. | // used_stack += (func->op_array.last_var + func->op_array.T - MIN(func->op_array.num_args, num_args)) * sizeof(zval);
  8571. | mov edx, opline->extended_value
  8572. if (!is_closure) {
  8573. | cmp edx, dword [r0 + offsetof(zend_function, op_array.num_args)]
  8574. | cmova edx, dword [r0 + offsetof(zend_function, op_array.num_args)]
  8575. | sub edx, dword [r0 + offsetof(zend_function, op_array.last_var)]
  8576. | sub edx, dword [r0 + offsetof(zend_function, op_array.T)]
  8577. } else {
  8578. | cmp edx, dword [r0 + offsetof(zend_closure, func.op_array.num_args)]
  8579. | cmova edx, dword [r0 + offsetof(zend_closure, func.op_array.num_args)]
  8580. | sub edx, dword [r0 + offsetof(zend_closure, func.op_array.last_var)]
  8581. | sub edx, dword [r0 + offsetof(zend_closure, func.op_array.T)]
  8582. }
  8583. | shl edx, 4
  8584. |.if X64
  8585. | movsxd r2, edx
  8586. |.endif
  8587. | sub FCARG1a, r2
  8588. |1:
  8589. }
  8590. zend_jit_start_reuse_ip();
  8591. | // if (UNEXPECTED(used_stack > (size_t)(((char*)EG(vm_stack_end)) - (char*)call))) {
  8592. | MEM_LOAD_ZTS RX, aword, executor_globals, vm_stack_top, RX
  8593. if (stack_check) {
  8594. | // Check Stack Overflow
  8595. | MEM_LOAD_ZTS r2, aword, executor_globals, vm_stack_end, r2
  8596. | sub r2, RX
  8597. if (func) {
  8598. | cmp r2, used_stack
  8599. } else {
  8600. | cmp r2, FCARG1a
  8601. }
  8602. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  8603. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  8604. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  8605. if (!exit_addr) {
  8606. return 0;
  8607. }
  8608. | jb &exit_addr
  8609. } else {
  8610. | jb >1
  8611. | // EG(vm_stack_top) = (zval*)((char*)call + used_stack);
  8612. |.cold_code
  8613. |1:
  8614. if (func) {
  8615. | mov FCARG1d, used_stack
  8616. }
  8617. #ifdef _WIN32
  8618. if (0) {
  8619. #else
  8620. if (opline->opcode == ZEND_INIT_FCALL && func && func->type == ZEND_INTERNAL_FUNCTION) {
  8621. #endif
  8622. | SET_EX_OPLINE opline, r0
  8623. | EXT_CALL zend_jit_int_extend_stack_helper, r0
  8624. } else {
  8625. if (!is_closure) {
  8626. if (func
  8627. && op_array == &func->op_array
  8628. && (func->op_array.fn_flags & ZEND_ACC_IMMUTABLE)
  8629. && (sizeof(void*) != 8 || IS_SIGNED_32BIT(func))) {
  8630. | LOAD_ADDR FCARG2a, func
  8631. } else {
  8632. | mov FCARG2a, r0
  8633. }
  8634. } else {
  8635. | lea FCARG2a, aword [r0 + offsetof(zend_closure, func)]
  8636. }
  8637. | SET_EX_OPLINE opline, r0
  8638. | EXT_CALL zend_jit_extend_stack_helper, r0
  8639. }
  8640. | mov RX, r0
  8641. | jmp >1
  8642. |.code
  8643. }
  8644. }
  8645. if (func) {
  8646. | MEM_UPDATE_ZTS add, aword, executor_globals, vm_stack_top, used_stack, r2
  8647. } else {
  8648. | MEM_UPDATE_ZTS add, aword, executor_globals, vm_stack_top, FCARG1a, r2
  8649. }
  8650. | // zend_vm_init_call_frame(call, call_info, func, num_args, called_scope, object);
  8651. if (JIT_G(trigger) != ZEND_JIT_ON_HOT_TRACE || opline->opcode != ZEND_INIT_METHOD_CALL) {
  8652. | // ZEND_SET_CALL_INFO(call, 0, call_info);
  8653. | mov dword EX:RX->This.u1.type_info, (IS_UNDEF | ZEND_CALL_NESTED_FUNCTION)
  8654. }
  8655. #ifdef _WIN32
  8656. if (0) {
  8657. #else
  8658. if (opline->opcode == ZEND_INIT_FCALL && func && func->type == ZEND_INTERNAL_FUNCTION) {
  8659. #endif
  8660. | // call->func = func;
  8661. |1:
  8662. | ADDR_STORE aword EX:RX->func, func, r1
  8663. } else {
  8664. if (!is_closure) {
  8665. | // call->func = func;
  8666. if (func
  8667. && op_array == &func->op_array
  8668. && (func->op_array.fn_flags & ZEND_ACC_IMMUTABLE)
  8669. && (sizeof(void*) != 8 || IS_SIGNED_32BIT(func))) {
  8670. | ADDR_STORE aword EX:RX->func, func, r1
  8671. } else {
  8672. | mov aword EX:RX->func, r0
  8673. }
  8674. } else {
  8675. | // call->func = &closure->func;
  8676. | lea r1, aword [r0 + offsetof(zend_closure, func)]
  8677. | mov aword EX:RX->func, r1
  8678. }
  8679. |1:
  8680. }
  8681. if (opline->opcode == ZEND_INIT_METHOD_CALL) {
  8682. | // Z_PTR(call->This) = obj;
  8683. | mov r1, aword T1
  8684. | mov aword EX:RX->This.value.ptr, r1
  8685. if (opline->op1_type == IS_UNUSED || delayed_fetch_this) {
  8686. | // call->call_info |= ZEND_CALL_HAS_THIS;
  8687. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  8688. | mov dword EX:RX->This.u1.type_info, ZEND_CALL_HAS_THIS
  8689. } else {
  8690. | or dword EX:RX->This.u1.type_info, ZEND_CALL_HAS_THIS
  8691. }
  8692. } else {
  8693. if (opline->op1_type == IS_CV) {
  8694. | // GC_ADDREF(obj);
  8695. | add dword [r1], 1
  8696. }
  8697. | // call->call_info |= ZEND_CALL_HAS_THIS | ZEND_CALL_RELEASE_THIS;
  8698. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  8699. | mov dword EX:RX->This.u1.type_info, (ZEND_CALL_HAS_THIS | ZEND_CALL_RELEASE_THIS)
  8700. } else {
  8701. | or dword EX:RX->This.u1.type_info, (ZEND_CALL_HAS_THIS | ZEND_CALL_RELEASE_THIS)
  8702. }
  8703. }
  8704. } else if (!is_closure) {
  8705. | // Z_CE(call->This) = called_scope;
  8706. | mov aword EX:RX->This.value.ptr, 0
  8707. } else {
  8708. if (opline->op2_type == IS_CV) {
  8709. | // GC_ADDREF(closure);
  8710. | add dword [r0], 1
  8711. }
  8712. | // object_or_called_scope = closure->called_scope;
  8713. | mov r1, aword [r0 + offsetof(zend_closure, called_scope)]
  8714. | mov aword EX:RX->This.value.ptr, r1
  8715. | // call_info = ZEND_CALL_NESTED_FUNCTION | ZEND_CALL_DYNAMIC | ZEND_CALL_CLOSURE |
  8716. | // (closure->func->common.fn_flags & ZEND_ACC_FAKE_CLOSURE);
  8717. | mov edx, dword [r0 + offsetof(zend_closure, func.common.fn_flags)]
  8718. | and edx, ZEND_ACC_FAKE_CLOSURE
  8719. | or edx, (ZEND_CALL_NESTED_FUNCTION | ZEND_CALL_DYNAMIC | ZEND_CALL_CLOSURE)
  8720. | // if (Z_TYPE(closure->this_ptr) != IS_UNDEF) {
  8721. | cmp byte [r0 + offsetof(zend_closure, this_ptr.u1.v.type)], IS_UNDEF
  8722. | jz >1
  8723. | // call_info |= ZEND_CALL_HAS_THIS;
  8724. | or edx, ZEND_CALL_HAS_THIS
  8725. | // object_or_called_scope = Z_OBJ(closure->this_ptr);
  8726. | mov r1, aword [r0 + offsetof(zend_closure, this_ptr.value.ptr)]
  8727. |1:
  8728. | // ZEND_SET_CALL_INFO(call, 0, call_info);
  8729. | or dword EX:RX->This.u1.type_info, edx
  8730. | // Z_PTR(call->This) = object_or_called_scope;
  8731. | mov aword EX:RX->This.value.ptr, r1
  8732. | cmp aword [r0 + offsetof(zend_closure, func.op_array.run_time_cache__ptr)], 0
  8733. | jnz >1
  8734. | lea FCARG1a, aword [r0 + offsetof(zend_closure, func)]
  8735. | EXT_CALL zend_jit_init_func_run_time_cache_helper, r0
  8736. |1:
  8737. }
  8738. | // ZEND_CALL_NUM_ARGS(call) = num_args;
  8739. | mov dword EX:RX->This.u2.num_args, opline->extended_value
  8740. return 1;
  8741. }
  8742. static int zend_jit_init_fcall_guard(dasm_State **Dst, uint32_t level, const zend_function *func, const zend_op *to_opline)
  8743. {
  8744. int32_t exit_point;
  8745. const void *exit_addr;
  8746. if (func->type == ZEND_INTERNAL_FUNCTION) {
  8747. #ifdef ZEND_WIN32
  8748. // TODO: ASLR may cause different addresses in different workers ???
  8749. return 0;
  8750. #endif
  8751. } else if (func->type == ZEND_USER_FUNCTION) {
  8752. if (!zend_accel_in_shm(func->op_array.opcodes)) {
  8753. /* op_array and op_array->opcodes are not persistent. We can't link. */
  8754. return 0;
  8755. }
  8756. } else {
  8757. ZEND_UNREACHABLE();
  8758. return 0;
  8759. }
  8760. exit_point = zend_jit_trace_get_exit_point(to_opline, ZEND_JIT_EXIT_POLYMORPHISM);
  8761. exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  8762. if (!exit_addr) {
  8763. return 0;
  8764. }
  8765. | // call = EX(call);
  8766. | mov r1, EX->call
  8767. while (level > 0) {
  8768. | mov r1, EX:r1->prev_execute_data
  8769. level--;
  8770. }
  8771. if (func->type == ZEND_USER_FUNCTION &&
  8772. (!(func->common.fn_flags & ZEND_ACC_IMMUTABLE) ||
  8773. (func->common.fn_flags & ZEND_ACC_CLOSURE) ||
  8774. !func->common.function_name)) {
  8775. const zend_op *opcodes = func->op_array.opcodes;
  8776. | mov r1, aword EX:r1->func
  8777. | .if X64
  8778. || if (!IS_SIGNED_32BIT(opcodes)) {
  8779. | mov64 r2, ((ptrdiff_t)opcodes)
  8780. | cmp aword [r1 + offsetof(zend_op_array, opcodes)], r2
  8781. || } else {
  8782. | cmp aword [r1 + offsetof(zend_op_array, opcodes)], opcodes
  8783. || }
  8784. | .else
  8785. | cmp aword [r1 + offsetof(zend_op_array, opcodes)], opcodes
  8786. | .endif
  8787. | jne &exit_addr
  8788. } else {
  8789. | .if X64
  8790. || if (!IS_SIGNED_32BIT(func)) {
  8791. | mov64 r2, ((ptrdiff_t)func)
  8792. | cmp aword EX:r1->func, r2
  8793. || } else {
  8794. | cmp aword EX:r1->func, func
  8795. || }
  8796. | .else
  8797. | cmp aword EX:r1->func, func
  8798. | .endif
  8799. | jne &exit_addr
  8800. }
  8801. return 1;
  8802. }
  8803. static int zend_jit_init_fcall(dasm_State **Dst, const zend_op *opline, uint32_t b, const zend_op_array *op_array, zend_ssa *ssa, const zend_ssa_op *ssa_op, int call_level, zend_jit_trace_rec *trace, int checked_stack)
  8804. {
  8805. zend_func_info *info = ZEND_FUNC_INFO(op_array);
  8806. zend_call_info *call_info = NULL;
  8807. zend_function *func = NULL;
  8808. if (delayed_call_chain) {
  8809. if (!zend_jit_save_call_chain(Dst, delayed_call_level)) {
  8810. return 0;
  8811. }
  8812. }
  8813. if (info) {
  8814. call_info = info->callee_info;
  8815. while (call_info && call_info->caller_init_opline != opline) {
  8816. call_info = call_info->next_callee;
  8817. }
  8818. if (call_info && call_info->callee_func && !call_info->is_prototype) {
  8819. func = call_info->callee_func;
  8820. }
  8821. }
  8822. if (!func
  8823. && trace
  8824. && trace->op == ZEND_JIT_TRACE_INIT_CALL) {
  8825. #ifdef _WIN32
  8826. /* ASLR */
  8827. if (trace->func->type != ZEND_INTERNAL_FUNCTION) {
  8828. func = (zend_function*)trace->func;
  8829. }
  8830. #else
  8831. func = (zend_function*)trace->func;
  8832. #endif
  8833. }
  8834. #ifdef _WIN32
  8835. if (0) {
  8836. #else
  8837. if (opline->opcode == ZEND_INIT_FCALL
  8838. && func
  8839. && func->type == ZEND_INTERNAL_FUNCTION) {
  8840. #endif
  8841. /* load constant address later */
  8842. } else if (func && op_array == &func->op_array) {
  8843. /* recursive call */
  8844. if (!(func->op_array.fn_flags & ZEND_ACC_IMMUTABLE) ||
  8845. (sizeof(void*) == 8 && !IS_SIGNED_32BIT(func))) {
  8846. | mov r0, EX->func
  8847. }
  8848. } else {
  8849. | // if (CACHED_PTR(opline->result.num))
  8850. | mov r2, EX->run_time_cache
  8851. | mov r0, aword [r2 + opline->result.num]
  8852. | test r0, r0
  8853. | jz >1
  8854. |.cold_code
  8855. |1:
  8856. if (opline->opcode == ZEND_INIT_FCALL
  8857. && func
  8858. && func->type == ZEND_USER_FUNCTION
  8859. && (func->op_array.fn_flags & ZEND_ACC_IMMUTABLE)) {
  8860. | LOAD_ADDR FCARG1a, func
  8861. | mov aword [r2 + opline->result.num], FCARG1a
  8862. | EXT_CALL zend_jit_init_func_run_time_cache_helper, r0
  8863. | jmp >3
  8864. } else {
  8865. zval *zv = RT_CONSTANT(opline, opline->op2);
  8866. if (opline->opcode == ZEND_INIT_FCALL) {
  8867. | LOAD_ADDR FCARG1a, Z_STR_P(zv);
  8868. | lea FCARG2a, aword [r2 + opline->result.num]
  8869. | EXT_CALL zend_jit_find_func_helper, r0
  8870. } else if (opline->opcode == ZEND_INIT_FCALL_BY_NAME) {
  8871. | LOAD_ADDR FCARG1a, Z_STR_P(zv + 1);
  8872. | lea FCARG2a, aword [r2 + opline->result.num]
  8873. | EXT_CALL zend_jit_find_func_helper, r0
  8874. } else if (opline->opcode == ZEND_INIT_NS_FCALL_BY_NAME) {
  8875. | LOAD_ADDR FCARG1a, zv;
  8876. | lea FCARG2a, aword [r2 + opline->result.num]
  8877. | EXT_CALL zend_jit_find_ns_func_helper, r0
  8878. } else {
  8879. ZEND_UNREACHABLE();
  8880. }
  8881. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  8882. int32_t exit_point = zend_jit_trace_get_exit_point(opline,
  8883. func && (func->common.fn_flags & ZEND_ACC_IMMUTABLE) ? ZEND_JIT_EXIT_INVALIDATE : 0);
  8884. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  8885. if (!exit_addr) {
  8886. return 0;
  8887. }
  8888. if (!func || opline->opcode == ZEND_INIT_FCALL) {
  8889. | test r0, r0
  8890. | jnz >3
  8891. } else if (func->type == ZEND_USER_FUNCTION
  8892. && !(func->common.fn_flags & ZEND_ACC_IMMUTABLE)) {
  8893. const zend_op *opcodes = func->op_array.opcodes;
  8894. | .if X64
  8895. || if (!IS_SIGNED_32BIT(opcodes)) {
  8896. | mov64 r1, ((ptrdiff_t)opcodes)
  8897. | cmp aword [r0 + offsetof(zend_op_array, opcodes)], r1
  8898. || } else {
  8899. | cmp aword [r0 + offsetof(zend_op_array, opcodes)], opcodes
  8900. || }
  8901. | .else
  8902. | cmp aword [r0 + offsetof(zend_op_array, opcodes)], opcodes
  8903. | .endif
  8904. | jz >3
  8905. } else {
  8906. | .if X64
  8907. || if (!IS_SIGNED_32BIT(func)) {
  8908. | mov64 r1, ((ptrdiff_t)func)
  8909. | cmp r0, r1
  8910. || } else {
  8911. | cmp r0, func
  8912. || }
  8913. | .else
  8914. | cmp r0, func
  8915. | .endif
  8916. | jz >3
  8917. }
  8918. | jmp &exit_addr
  8919. } else {
  8920. | test r0, r0
  8921. | jnz >3
  8922. | // SAVE_OPLINE();
  8923. | SET_EX_OPLINE opline, r0
  8924. | jmp ->undefined_function
  8925. }
  8926. }
  8927. |.code
  8928. |3:
  8929. }
  8930. if (!zend_jit_push_call_frame(Dst, opline, op_array, func, 0, 0, checked_stack)) {
  8931. return 0;
  8932. }
  8933. if (zend_jit_needs_call_chain(call_info, b, op_array, ssa, ssa_op, opline, call_level, trace)) {
  8934. if (!zend_jit_save_call_chain(Dst, call_level)) {
  8935. return 0;
  8936. }
  8937. } else {
  8938. delayed_call_chain = 1;
  8939. delayed_call_level = call_level;
  8940. }
  8941. return 1;
  8942. }
  8943. static int zend_jit_init_method_call(dasm_State **Dst,
  8944. const zend_op *opline,
  8945. uint32_t b,
  8946. const zend_op_array *op_array,
  8947. zend_ssa *ssa,
  8948. const zend_ssa_op *ssa_op,
  8949. int call_level,
  8950. uint32_t op1_info,
  8951. zend_jit_addr op1_addr,
  8952. zend_class_entry *ce,
  8953. bool ce_is_instanceof,
  8954. bool on_this,
  8955. bool delayed_fetch_this,
  8956. zend_class_entry *trace_ce,
  8957. zend_jit_trace_rec *trace,
  8958. int checked_stack,
  8959. bool polymorphic_side_trace)
  8960. {
  8961. zend_func_info *info = ZEND_FUNC_INFO(op_array);
  8962. zend_call_info *call_info = NULL;
  8963. zend_function *func = NULL;
  8964. zval *function_name;
  8965. ZEND_ASSERT(opline->op2_type == IS_CONST);
  8966. ZEND_ASSERT(op1_info & MAY_BE_OBJECT);
  8967. function_name = RT_CONSTANT(opline, opline->op2);
  8968. if (info) {
  8969. call_info = info->callee_info;
  8970. while (call_info && call_info->caller_init_opline != opline) {
  8971. call_info = call_info->next_callee;
  8972. }
  8973. if (call_info && call_info->callee_func && !call_info->is_prototype) {
  8974. func = call_info->callee_func;
  8975. }
  8976. }
  8977. if (polymorphic_side_trace) {
  8978. /* function is passed in r0 from parent_trace */
  8979. } else {
  8980. if (on_this) {
  8981. zend_jit_addr this_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, offsetof(zend_execute_data, This));
  8982. | GET_ZVAL_PTR FCARG1a, this_addr
  8983. } else {
  8984. if (op1_info & MAY_BE_REF) {
  8985. if (opline->op1_type == IS_CV) {
  8986. if (Z_REG(op1_addr) != ZREG_FCARG1 || Z_OFFSET(op1_addr) != 0) {
  8987. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  8988. }
  8989. | ZVAL_DEREF FCARG1a, op1_info
  8990. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  8991. } else {
  8992. /* Hack: Convert reference to regular value to simplify JIT code */
  8993. ZEND_ASSERT(Z_REG(op1_addr) == ZREG_FP);
  8994. | IF_NOT_ZVAL_TYPE op1_addr, IS_REFERENCE, >1
  8995. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  8996. | EXT_CALL zend_jit_unref_helper, r0
  8997. |1:
  8998. }
  8999. }
  9000. if (op1_info & ((MAY_BE_UNDEF|MAY_BE_ANY)- MAY_BE_OBJECT)) {
  9001. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  9002. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  9003. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  9004. if (!exit_addr) {
  9005. return 0;
  9006. }
  9007. | IF_NOT_ZVAL_TYPE op1_addr, IS_OBJECT, &exit_addr
  9008. } else {
  9009. | IF_NOT_ZVAL_TYPE op1_addr, IS_OBJECT, >1
  9010. |.cold_code
  9011. |1:
  9012. if (Z_REG(op1_addr) != ZREG_FCARG1 || Z_OFFSET(op1_addr) != 0) {
  9013. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  9014. }
  9015. | SET_EX_OPLINE opline, r0
  9016. if ((opline->op1_type & (IS_VAR|IS_TMP_VAR)) && !delayed_fetch_this) {
  9017. | EXT_CALL zend_jit_invalid_method_call_tmp, r0
  9018. } else {
  9019. | EXT_CALL zend_jit_invalid_method_call, r0
  9020. }
  9021. | jmp ->exception_handler
  9022. |.code
  9023. }
  9024. }
  9025. | GET_ZVAL_PTR FCARG1a, op1_addr
  9026. }
  9027. if (delayed_call_chain) {
  9028. if (!zend_jit_save_call_chain(Dst, delayed_call_level)) {
  9029. return 0;
  9030. }
  9031. }
  9032. | mov aword T1, FCARG1a // save
  9033. if (func) {
  9034. | // fbc = CACHED_PTR(opline->result.num + sizeof(void*));
  9035. | mov r0, EX->run_time_cache
  9036. | mov r0, aword [r0 + opline->result.num + sizeof(void*)]
  9037. | test r0, r0
  9038. | jz >1
  9039. } else {
  9040. | // if (CACHED_PTR(opline->result.num) == obj->ce)) {
  9041. | mov r0, EX->run_time_cache
  9042. | mov r2, aword [r0 + opline->result.num]
  9043. | cmp r2, [FCARG1a + offsetof(zend_object, ce)]
  9044. | jnz >1
  9045. | // fbc = CACHED_PTR(opline->result.num + sizeof(void*));
  9046. | mov r0, aword [r0 + opline->result.num + sizeof(void*)]
  9047. }
  9048. |.cold_code
  9049. |1:
  9050. | LOAD_ADDR FCARG2a, function_name
  9051. |.if X64
  9052. | lea CARG3, aword T1
  9053. |.else
  9054. | lea r0, aword T1
  9055. | sub r4, 12
  9056. | push r0
  9057. |.endif
  9058. | SET_EX_OPLINE opline, r0
  9059. if ((opline->op1_type & (IS_VAR|IS_TMP_VAR)) && !delayed_fetch_this) {
  9060. | EXT_CALL zend_jit_find_method_tmp_helper, r0
  9061. } else {
  9062. | EXT_CALL zend_jit_find_method_helper, r0
  9063. }
  9064. |.if not(X64)
  9065. | add r4, 12
  9066. |.endif
  9067. | test r0, r0
  9068. | jnz >2
  9069. | jmp ->exception_handler
  9070. |.code
  9071. |2:
  9072. }
  9073. if ((!func || zend_jit_may_be_modified(func, op_array))
  9074. && trace
  9075. && trace->op == ZEND_JIT_TRACE_INIT_CALL
  9076. && trace->func
  9077. #ifdef _WIN32
  9078. && trace->func->type != ZEND_INTERNAL_FUNCTION
  9079. #endif
  9080. ) {
  9081. int32_t exit_point;
  9082. const void *exit_addr;
  9083. exit_point = zend_jit_trace_get_exit_point(opline, func ? ZEND_JIT_EXIT_INVALIDATE : ZEND_JIT_EXIT_METHOD_CALL);
  9084. exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  9085. if (!exit_addr) {
  9086. return 0;
  9087. }
  9088. func = (zend_function*)trace->func;
  9089. if (func->type == ZEND_USER_FUNCTION &&
  9090. (!(func->common.fn_flags & ZEND_ACC_IMMUTABLE) ||
  9091. (func->common.fn_flags & ZEND_ACC_CLOSURE) ||
  9092. !func->common.function_name)) {
  9093. const zend_op *opcodes = func->op_array.opcodes;
  9094. | .if X64
  9095. || if (!IS_SIGNED_32BIT(opcodes)) {
  9096. | mov64 r1, ((ptrdiff_t)opcodes)
  9097. | cmp aword [r0 + offsetof(zend_op_array, opcodes)], r1
  9098. || } else {
  9099. | cmp aword [r0 + offsetof(zend_op_array, opcodes)], opcodes
  9100. || }
  9101. | .else
  9102. | cmp aword [r0 + offsetof(zend_op_array, opcodes)], opcodes
  9103. | .endif
  9104. | jne &exit_addr
  9105. } else {
  9106. | .if X64
  9107. || if (!IS_SIGNED_32BIT(func)) {
  9108. | mov64 r1, ((ptrdiff_t)func)
  9109. | cmp r0, r1
  9110. || } else {
  9111. | cmp r0, func
  9112. || }
  9113. | .else
  9114. | cmp r0, func
  9115. | .endif
  9116. | jne &exit_addr
  9117. }
  9118. }
  9119. if (!func) {
  9120. | // if (fbc->common.fn_flags & ZEND_ACC_STATIC) {
  9121. | test dword [r0 + offsetof(zend_function, common.fn_flags)], ZEND_ACC_STATIC
  9122. | jnz >1
  9123. |.cold_code
  9124. |1:
  9125. }
  9126. if (!func || (func->common.fn_flags & ZEND_ACC_STATIC) != 0) {
  9127. | mov FCARG1a, aword T1 // restore
  9128. | mov FCARG2a, r0
  9129. |.if X64
  9130. | mov CARG3d, opline->extended_value
  9131. |.else
  9132. | sub r4, 12
  9133. | push opline->extended_value
  9134. |.endif
  9135. if ((opline->op1_type & (IS_VAR|IS_TMP_VAR)) && !delayed_fetch_this) {
  9136. | EXT_CALL zend_jit_push_static_metod_call_frame_tmp, r0
  9137. } else {
  9138. | EXT_CALL zend_jit_push_static_metod_call_frame, r0
  9139. }
  9140. |.if not(X64)
  9141. | add r4, 12
  9142. |.endif
  9143. if ((opline->op1_type & (IS_VAR|IS_TMP_VAR) && !delayed_fetch_this)) {
  9144. | test r0, r0
  9145. | jz ->exception_handler
  9146. }
  9147. | mov RX, r0
  9148. }
  9149. if (!func) {
  9150. | jmp >9
  9151. |.code
  9152. }
  9153. if (!func || (func->common.fn_flags & ZEND_ACC_STATIC) == 0) {
  9154. if (!zend_jit_push_call_frame(Dst, opline, NULL, func, 0, delayed_fetch_this, checked_stack)) {
  9155. return 0;
  9156. }
  9157. }
  9158. if (!func) {
  9159. |9:
  9160. }
  9161. zend_jit_start_reuse_ip();
  9162. if (zend_jit_needs_call_chain(call_info, b, op_array, ssa, ssa_op, opline, call_level, trace)) {
  9163. if (!zend_jit_save_call_chain(Dst, call_level)) {
  9164. return 0;
  9165. }
  9166. } else {
  9167. delayed_call_chain = 1;
  9168. delayed_call_level = call_level;
  9169. }
  9170. return 1;
  9171. }
  9172. static int zend_jit_init_closure_call(dasm_State **Dst,
  9173. const zend_op *opline,
  9174. uint32_t b,
  9175. const zend_op_array *op_array,
  9176. zend_ssa *ssa,
  9177. const zend_ssa_op *ssa_op,
  9178. int call_level,
  9179. zend_jit_trace_rec *trace,
  9180. int checked_stack)
  9181. {
  9182. zend_function *func = NULL;
  9183. zend_jit_addr op2_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->op2.var);
  9184. | GET_ZVAL_PTR r0, op2_addr
  9185. if (ssa->var_info[ssa_op->op2_use].ce != zend_ce_closure
  9186. && !(ssa->var_info[ssa_op->op2_use].type & MAY_BE_CLASS_GUARD)) {
  9187. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  9188. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  9189. if (!exit_addr) {
  9190. return 0;
  9191. }
  9192. |.if X64
  9193. || if (!IS_SIGNED_32BIT(zend_ce_closure)) {
  9194. | mov64 FCARG1a, ((ptrdiff_t)zend_ce_closure)
  9195. | cmp aword [r0 + offsetof(zend_object, ce)], FCARG1a
  9196. || } else {
  9197. | cmp aword [r0 + offsetof(zend_object, ce)], zend_ce_closure
  9198. || }
  9199. |.else
  9200. | cmp aword [r0 + offsetof(zend_object, ce)], zend_ce_closure
  9201. |.endif
  9202. | jne &exit_addr
  9203. if (ssa->var_info && ssa_op->op2_use >= 0) {
  9204. ssa->var_info[ssa_op->op2_use].type |= MAY_BE_CLASS_GUARD;
  9205. ssa->var_info[ssa_op->op2_use].ce = zend_ce_closure;
  9206. ssa->var_info[ssa_op->op2_use].is_instanceof = 0;
  9207. }
  9208. }
  9209. if (trace
  9210. && trace->op == ZEND_JIT_TRACE_INIT_CALL
  9211. && trace->func
  9212. && trace->func->type == ZEND_USER_FUNCTION) {
  9213. const zend_op *opcodes;
  9214. int32_t exit_point;
  9215. const void *exit_addr;
  9216. func = (zend_function*)trace->func;
  9217. opcodes = func->op_array.opcodes;
  9218. exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_CLOSURE_CALL);
  9219. exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  9220. if (!exit_addr) {
  9221. return 0;
  9222. }
  9223. | .if X64
  9224. || if (!IS_SIGNED_32BIT(opcodes)) {
  9225. | mov64 FCARG1a, ((ptrdiff_t)opcodes)
  9226. | cmp aword [r0 + offsetof(zend_closure, func.op_array.opcodes)], FCARG1a
  9227. || } else {
  9228. | cmp aword [r0 + offsetof(zend_closure, func.op_array.opcodes)], opcodes
  9229. || }
  9230. | .else
  9231. | cmp aword [r0 + offsetof(zend_closure, func.op_array.opcodes)], opcodes
  9232. | .endif
  9233. | jne &exit_addr
  9234. }
  9235. if (delayed_call_chain) {
  9236. if (!zend_jit_save_call_chain(Dst, delayed_call_level)) {
  9237. return 0;
  9238. }
  9239. }
  9240. if (!zend_jit_push_call_frame(Dst, opline, NULL, func, 1, 0, checked_stack)) {
  9241. return 0;
  9242. }
  9243. if (zend_jit_needs_call_chain(NULL, b, op_array, ssa, ssa_op, opline, call_level, trace)) {
  9244. if (!zend_jit_save_call_chain(Dst, call_level)) {
  9245. return 0;
  9246. }
  9247. } else {
  9248. delayed_call_chain = 1;
  9249. delayed_call_level = call_level;
  9250. }
  9251. if (trace
  9252. && trace->op == ZEND_JIT_TRACE_END
  9253. && trace->stop == ZEND_JIT_TRACE_STOP_INTERPRETER) {
  9254. if (!zend_jit_set_valid_ip(Dst, opline + 1)) {
  9255. return 0;
  9256. }
  9257. }
  9258. return 1;
  9259. }
  9260. static int zend_jit_do_fcall(dasm_State **Dst, const zend_op *opline, const zend_op_array *op_array, zend_ssa *ssa, int call_level, unsigned int next_block, zend_jit_trace_rec *trace)
  9261. {
  9262. zend_func_info *info = ZEND_FUNC_INFO(op_array);
  9263. zend_call_info *call_info = NULL;
  9264. const zend_function *func = NULL;
  9265. uint32_t i;
  9266. zend_jit_addr res_addr;
  9267. uint32_t call_num_args = 0;
  9268. bool unknown_num_args = 0;
  9269. const void *exit_addr = NULL;
  9270. const zend_op *prev_opline;
  9271. if (RETURN_VALUE_USED(opline)) {
  9272. res_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->result.var);
  9273. } else {
  9274. /* CPU stack allocated temporary zval */
  9275. res_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R4, TMP_ZVAL_OFFSET);
  9276. }
  9277. prev_opline = opline - 1;
  9278. while (prev_opline->opcode == ZEND_EXT_FCALL_BEGIN || prev_opline->opcode == ZEND_TICKS) {
  9279. prev_opline--;
  9280. }
  9281. if (prev_opline->opcode == ZEND_SEND_UNPACK || prev_opline->opcode == ZEND_SEND_ARRAY ||
  9282. prev_opline->opcode == ZEND_CHECK_UNDEF_ARGS) {
  9283. unknown_num_args = 1;
  9284. }
  9285. if (info) {
  9286. call_info = info->callee_info;
  9287. while (call_info && call_info->caller_call_opline != opline) {
  9288. call_info = call_info->next_callee;
  9289. }
  9290. if (call_info && call_info->callee_func && !call_info->is_prototype) {
  9291. func = call_info->callee_func;
  9292. }
  9293. if ((op_array->fn_flags & ZEND_ACC_TRAIT_CLONE)
  9294. && JIT_G(current_frame)
  9295. && JIT_G(current_frame)->call
  9296. && !JIT_G(current_frame)->call->func) {
  9297. call_info = NULL; func = NULL; /* megamorphic call from trait */
  9298. }
  9299. }
  9300. if (!func) {
  9301. /* resolve function at run time */
  9302. } else if (func->type == ZEND_USER_FUNCTION) {
  9303. ZEND_ASSERT(opline->opcode != ZEND_DO_ICALL);
  9304. call_num_args = call_info->num_args;
  9305. } else if (func->type == ZEND_INTERNAL_FUNCTION) {
  9306. ZEND_ASSERT(opline->opcode != ZEND_DO_UCALL);
  9307. call_num_args = call_info->num_args;
  9308. } else {
  9309. ZEND_UNREACHABLE();
  9310. }
  9311. if (trace && !func) {
  9312. if (trace->op == ZEND_JIT_TRACE_DO_ICALL) {
  9313. ZEND_ASSERT(trace->func->type == ZEND_INTERNAL_FUNCTION);
  9314. #ifndef ZEND_WIN32
  9315. // TODO: ASLR may cause different addresses in different workers ???
  9316. func = trace->func;
  9317. if (JIT_G(current_frame) &&
  9318. JIT_G(current_frame)->call &&
  9319. TRACE_FRAME_NUM_ARGS(JIT_G(current_frame)->call) >= 0) {
  9320. call_num_args = TRACE_FRAME_NUM_ARGS(JIT_G(current_frame)->call);
  9321. } else {
  9322. unknown_num_args = 1;
  9323. }
  9324. #endif
  9325. } else if (trace->op == ZEND_JIT_TRACE_ENTER) {
  9326. ZEND_ASSERT(trace->func->type == ZEND_USER_FUNCTION);
  9327. if (zend_accel_in_shm(trace->func->op_array.opcodes)) {
  9328. func = trace->func;
  9329. if (JIT_G(current_frame) &&
  9330. JIT_G(current_frame)->call &&
  9331. TRACE_FRAME_NUM_ARGS(JIT_G(current_frame)->call) >= 0) {
  9332. call_num_args = TRACE_FRAME_NUM_ARGS(JIT_G(current_frame)->call);
  9333. } else {
  9334. unknown_num_args = 1;
  9335. }
  9336. }
  9337. }
  9338. }
  9339. bool may_have_extra_named_params =
  9340. opline->extended_value == ZEND_FCALL_MAY_HAVE_EXTRA_NAMED_PARAMS &&
  9341. (!func || func->common.fn_flags & ZEND_ACC_VARIADIC);
  9342. if (!reuse_ip) {
  9343. zend_jit_start_reuse_ip();
  9344. | // call = EX(call);
  9345. | mov RX, EX->call
  9346. }
  9347. zend_jit_stop_reuse_ip();
  9348. | // fbc = call->func;
  9349. | // mov r2, EX:RX->func ???
  9350. | // SAVE_OPLINE();
  9351. | SET_EX_OPLINE opline, r0
  9352. if (opline->opcode == ZEND_DO_FCALL) {
  9353. if (!func) {
  9354. if (trace) {
  9355. uint32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  9356. exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  9357. if (!exit_addr) {
  9358. return 0;
  9359. }
  9360. | mov r0, EX:RX->func
  9361. | test dword [r0 + offsetof(zend_op_array, fn_flags)], ZEND_ACC_DEPRECATED
  9362. | jnz &exit_addr
  9363. }
  9364. }
  9365. }
  9366. if (!delayed_call_chain) {
  9367. if (call_level == 1) {
  9368. | mov aword EX->call, 0
  9369. } else {
  9370. | //EX(call) = call->prev_execute_data;
  9371. | mov r0, EX:RX->prev_execute_data
  9372. | mov EX->call, r0
  9373. }
  9374. }
  9375. delayed_call_chain = 0;
  9376. | //call->prev_execute_data = execute_data;
  9377. | mov EX:RX->prev_execute_data, EX
  9378. if (!func) {
  9379. | mov r0, EX:RX->func
  9380. }
  9381. if (opline->opcode == ZEND_DO_FCALL) {
  9382. if (!func) {
  9383. if (!trace) {
  9384. | test dword [r0 + offsetof(zend_op_array, fn_flags)], ZEND_ACC_DEPRECATED
  9385. | jnz >1
  9386. |.cold_code
  9387. |1:
  9388. if (!GCC_GLOBAL_REGS) {
  9389. | mov FCARG1a, RX
  9390. }
  9391. | EXT_CALL zend_jit_deprecated_helper, r0
  9392. | test al, al
  9393. | mov r0, EX:RX->func // reload
  9394. | jne >1
  9395. | jmp ->exception_handler
  9396. |.code
  9397. |1:
  9398. }
  9399. } else if (func->common.fn_flags & ZEND_ACC_DEPRECATED) {
  9400. if (!GCC_GLOBAL_REGS) {
  9401. | mov FCARG1a, RX
  9402. }
  9403. | EXT_CALL zend_jit_deprecated_helper, r0
  9404. | test al, al
  9405. | je ->exception_handler
  9406. }
  9407. }
  9408. if (!func
  9409. && opline->opcode != ZEND_DO_UCALL
  9410. && opline->opcode != ZEND_DO_ICALL) {
  9411. | cmp byte [r0 + offsetof(zend_function, type)], ZEND_USER_FUNCTION
  9412. | jne >8
  9413. }
  9414. if ((!func || func->type == ZEND_USER_FUNCTION)
  9415. && opline->opcode != ZEND_DO_ICALL) {
  9416. | // EX(call) = NULL;
  9417. | mov aword EX:RX->call, 0
  9418. if (RETURN_VALUE_USED(opline)) {
  9419. | // EX(return_value) = EX_VAR(opline->result.var);
  9420. | LOAD_ZVAL_ADDR r2, res_addr
  9421. | mov aword EX:RX->return_value, r2
  9422. } else {
  9423. | // EX(return_value) = 0;
  9424. | mov aword EX:RX->return_value, 0
  9425. }
  9426. //EX_LOAD_RUN_TIME_CACHE(op_array);
  9427. if (!func || func->op_array.cache_size) {
  9428. if (func && op_array == &func->op_array) {
  9429. /* recursive call */
  9430. if (trace || func->op_array.cache_size > sizeof(void*)) {
  9431. | mov r2, EX->run_time_cache
  9432. | mov EX:RX->run_time_cache, r2
  9433. }
  9434. } else {
  9435. #if ZEND_MAP_PTR_KIND == ZEND_MAP_PTR_KIND_PTR
  9436. if (func) {
  9437. | mov r0, EX:RX->func
  9438. }
  9439. | mov r2, aword [r0 + offsetof(zend_op_array, run_time_cache__ptr)]
  9440. | mov r2, aword [r2]
  9441. #elif ZEND_MAP_PTR_KIND == ZEND_MAP_PTR_KIND_PTR_OR_OFFSET
  9442. if (func && !(func->op_array.fn_flags & ZEND_ACC_CLOSURE)) {
  9443. if (ZEND_MAP_PTR_IS_OFFSET(func->op_array.run_time_cache)) {
  9444. | MEM_LOAD_ZTS r2, aword, compiler_globals, map_ptr_base, r1
  9445. | mov r2, aword [r2 + (uintptr_t)ZEND_MAP_PTR(func->op_array.run_time_cache)]
  9446. } else if ((func->op_array.fn_flags & ZEND_ACC_IMMUTABLE)
  9447. && (!func->op_array.scope || (func->op_array.scope->ce_flags & ZEND_ACC_LINKED))) {
  9448. if (func) {
  9449. | mov r0, EX:RX->func
  9450. }
  9451. | mov r2, aword [r0 + offsetof(zend_op_array, run_time_cache__ptr)]
  9452. | MEM_LOAD_OP_ZTS add, r2, aword, compiler_globals, map_ptr_base, r1
  9453. | mov r2, aword [r2]
  9454. } else {
  9455. /* the called op_array may be not persisted yet */
  9456. if (func) {
  9457. | mov r0, EX:RX->func
  9458. }
  9459. | mov r2, aword [r0 + offsetof(zend_op_array, run_time_cache__ptr)]
  9460. | test r2, 1
  9461. | jz >1
  9462. | MEM_LOAD_OP_ZTS add, r2, aword, compiler_globals, map_ptr_base, r1
  9463. |1:
  9464. | mov r2, aword [r2]
  9465. }
  9466. } else {
  9467. if (func) {
  9468. | mov r0, EX:RX->func
  9469. }
  9470. | mov r2, aword [r0 + offsetof(zend_op_array, run_time_cache__ptr)]
  9471. | test r2, 1
  9472. | jz >1
  9473. | MEM_LOAD_OP_ZTS add, r2, aword, compiler_globals, map_ptr_base, r1
  9474. |1:
  9475. | mov r2, aword [r2]
  9476. }
  9477. #else
  9478. # error "Unknown ZEND_MAP_PTR_KIND"
  9479. #endif
  9480. | mov EX:RX->run_time_cache, r2
  9481. }
  9482. }
  9483. | // EG(current_execute_data) = execute_data;
  9484. | MEM_STORE_ZTS aword, executor_globals, current_execute_data, RX, r1
  9485. | mov FP, RX
  9486. | // opline = op_array->opcodes;
  9487. if (func && !unknown_num_args) {
  9488. for (i = call_num_args; i < func->op_array.last_var; i++) {
  9489. uint32_t n = EX_NUM_TO_VAR(i);
  9490. | SET_Z_TYPE_INFO RX + n, IS_UNDEF
  9491. }
  9492. if (call_num_args <= func->op_array.num_args) {
  9493. if (!trace || (trace->op == ZEND_JIT_TRACE_END
  9494. && trace->stop == ZEND_JIT_TRACE_STOP_INTERPRETER)) {
  9495. uint32_t num_args;
  9496. if ((func->op_array.fn_flags & ZEND_ACC_HAS_TYPE_HINTS) != 0) {
  9497. if (trace) {
  9498. num_args = 0;
  9499. } else if (call_info) {
  9500. num_args = skip_valid_arguments(op_array, ssa, call_info);
  9501. } else {
  9502. num_args = call_num_args;
  9503. }
  9504. } else {
  9505. num_args = call_num_args;
  9506. }
  9507. if (zend_accel_in_shm(func->op_array.opcodes)) {
  9508. | LOAD_IP_ADDR (func->op_array.opcodes + num_args)
  9509. } else {
  9510. | mov r0, EX->func
  9511. if (GCC_GLOBAL_REGS) {
  9512. | mov IP, aword [r0 + offsetof(zend_op_array, opcodes)]
  9513. if (num_args) {
  9514. | add IP, (num_args * sizeof(zend_op))
  9515. }
  9516. } else {
  9517. | mov FCARG1a, aword [r0 + offsetof(zend_op_array, opcodes)]
  9518. if (num_args) {
  9519. | add FCARG1a, (num_args * sizeof(zend_op))
  9520. }
  9521. | mov aword EX->opline, FCARG1a
  9522. }
  9523. }
  9524. if (GCC_GLOBAL_REGS && !trace && op_array == &func->op_array
  9525. && num_args >= op_array->required_num_args) {
  9526. /* recursive call */
  9527. if (ZEND_OBSERVER_ENABLED) {
  9528. | SAVE_IP
  9529. | mov FCARG1a, FP
  9530. | EXT_CALL zend_observer_fcall_begin, r0
  9531. }
  9532. #ifdef CONTEXT_THREADED_JIT
  9533. | call >1
  9534. |.cold_code
  9535. |1:
  9536. | pop r0
  9537. | jmp =>num_args
  9538. |.code
  9539. #else
  9540. | jmp =>num_args
  9541. #endif
  9542. return 1;
  9543. }
  9544. }
  9545. } else {
  9546. if (!trace || (trace->op == ZEND_JIT_TRACE_END
  9547. && trace->stop == ZEND_JIT_TRACE_STOP_INTERPRETER)) {
  9548. if (func && zend_accel_in_shm(func->op_array.opcodes)) {
  9549. | LOAD_IP_ADDR (func->op_array.opcodes)
  9550. } else if (GCC_GLOBAL_REGS) {
  9551. | mov IP, aword [r0 + offsetof(zend_op_array, opcodes)]
  9552. } else {
  9553. | mov FCARG1a, aword [r0 + offsetof(zend_op_array, opcodes)]
  9554. | mov aword EX->opline, FCARG1a
  9555. }
  9556. }
  9557. if (!GCC_GLOBAL_REGS) {
  9558. | mov FCARG1a, FP
  9559. }
  9560. | EXT_CALL zend_jit_copy_extra_args_helper, r0
  9561. }
  9562. } else {
  9563. | // opline = op_array->opcodes
  9564. if (func && zend_accel_in_shm(func->op_array.opcodes)) {
  9565. | LOAD_IP_ADDR (func->op_array.opcodes)
  9566. } else if (GCC_GLOBAL_REGS) {
  9567. | mov IP, aword [r0 + offsetof(zend_op_array, opcodes)]
  9568. } else {
  9569. | mov FCARG1a, aword [r0 + offsetof(zend_op_array, opcodes)]
  9570. | mov aword EX->opline, FCARG1a
  9571. }
  9572. if (func) {
  9573. | // num_args = EX_NUM_ARGS();
  9574. | mov ecx, dword [FP + offsetof(zend_execute_data, This.u2.num_args)]
  9575. | // if (UNEXPECTED(num_args > first_extra_arg))
  9576. | cmp ecx, (func->op_array.num_args)
  9577. } else {
  9578. | // first_extra_arg = op_array->num_args;
  9579. | mov edx, dword [r0 + offsetof(zend_op_array, num_args)]
  9580. | // num_args = EX_NUM_ARGS();
  9581. | mov ecx, dword [FP + offsetof(zend_execute_data, This.u2.num_args)]
  9582. | // if (UNEXPECTED(num_args > first_extra_arg))
  9583. | cmp ecx, edx
  9584. }
  9585. | jg >1
  9586. |.cold_code
  9587. |1:
  9588. if (!GCC_GLOBAL_REGS) {
  9589. | mov FCARG1a, FP
  9590. }
  9591. | EXT_CALL zend_jit_copy_extra_args_helper, r0
  9592. if (!func) {
  9593. | mov r0, EX->func // reload
  9594. }
  9595. | mov ecx, dword [FP + offsetof(zend_execute_data, This.u2.num_args)] // reload
  9596. | jmp >1
  9597. |.code
  9598. if (!func || (func->op_array.fn_flags & ZEND_ACC_HAS_TYPE_HINTS) == 0) {
  9599. if (!func) {
  9600. | // if (EXPECTED((op_array->fn_flags & ZEND_ACC_HAS_TYPE_HINTS) == 0))
  9601. | test dword [r0 + offsetof(zend_op_array, fn_flags)], ZEND_ACC_HAS_TYPE_HINTS
  9602. | jnz >1
  9603. }
  9604. | // opline += num_args;
  9605. |.if X64
  9606. || ZEND_ASSERT(sizeof(zend_op) == 32);
  9607. | mov edx, ecx
  9608. | shl r2, 5
  9609. |.else
  9610. | imul r2, ecx, sizeof(zend_op)
  9611. |.endif
  9612. | ADD_IP r2
  9613. }
  9614. |1:
  9615. | // if (EXPECTED((int)num_args < op_array->last_var)) {
  9616. if (func) {
  9617. | mov edx, (func->op_array.last_var)
  9618. } else {
  9619. | mov edx, dword [r0 + offsetof(zend_op_array, last_var)]
  9620. }
  9621. | sub edx, ecx
  9622. | jle >3 //???
  9623. | // zval *var = EX_VAR_NUM(num_args);
  9624. // |.if X64
  9625. // | movsxd r1, ecx
  9626. // |.endif
  9627. | shl r1, 4
  9628. | lea r1, [FP + r1 + (ZEND_CALL_FRAME_SLOT * sizeof(zval))]
  9629. |2:
  9630. | SET_Z_TYPE_INFO r1, IS_UNDEF
  9631. | sub edx, 1
  9632. | lea r1, [r1 + 16]
  9633. | jne <2
  9634. |3:
  9635. }
  9636. if (ZEND_OBSERVER_ENABLED) {
  9637. | SAVE_IP
  9638. | mov FCARG1a, FP
  9639. | EXT_CALL zend_observer_fcall_begin, r0
  9640. }
  9641. if (trace) {
  9642. if (!func && (opline->opcode != ZEND_DO_UCALL)) {
  9643. | jmp >9
  9644. }
  9645. } else {
  9646. #ifdef CONTEXT_THREADED_JIT
  9647. | call ->context_threaded_call
  9648. if (!func && (opline->opcode != ZEND_DO_UCALL)) {
  9649. | jmp >9
  9650. }
  9651. | call ->context_threaded_call
  9652. if (!func) {
  9653. | jmp >9
  9654. }
  9655. #else
  9656. if (zend_jit_vm_kind == ZEND_VM_KIND_HYBRID) {
  9657. | ADD_HYBRID_SPAD
  9658. | JMP_IP
  9659. } else if (GCC_GLOBAL_REGS) {
  9660. | add r4, SPAD // stack alignment
  9661. | JMP_IP
  9662. } else {
  9663. | mov FP, aword T2 // restore FP
  9664. | mov RX, aword T3 // restore IP
  9665. | add r4, NR_SPAD // stack alignment
  9666. | mov r0, 1 // ZEND_VM_ENTER
  9667. | ret
  9668. }
  9669. }
  9670. #endif
  9671. }
  9672. if ((!func || func->type == ZEND_INTERNAL_FUNCTION)
  9673. && (opline->opcode != ZEND_DO_UCALL)) {
  9674. if (!func && (opline->opcode != ZEND_DO_ICALL)) {
  9675. |8:
  9676. }
  9677. if (opline->opcode == ZEND_DO_FCALL_BY_NAME) {
  9678. if (!func) {
  9679. if (trace) {
  9680. uint32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  9681. exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  9682. if (!exit_addr) {
  9683. return 0;
  9684. }
  9685. | test dword [r0 + offsetof(zend_op_array, fn_flags)], ZEND_ACC_DEPRECATED
  9686. | jnz &exit_addr
  9687. } else {
  9688. | test dword [r0 + offsetof(zend_op_array, fn_flags)], ZEND_ACC_DEPRECATED
  9689. | jnz >1
  9690. |.cold_code
  9691. |1:
  9692. if (!GCC_GLOBAL_REGS) {
  9693. | mov FCARG1a, RX
  9694. }
  9695. | EXT_CALL zend_jit_deprecated_helper, r0
  9696. | test al, al
  9697. | mov r0, EX:RX->func // reload
  9698. | jne >1
  9699. | jmp ->exception_handler
  9700. |.code
  9701. |1:
  9702. }
  9703. } else if (func->common.fn_flags & ZEND_ACC_DEPRECATED) {
  9704. if (!GCC_GLOBAL_REGS) {
  9705. | mov FCARG1a, RX
  9706. }
  9707. | EXT_CALL zend_jit_deprecated_helper, r0
  9708. | test al, al
  9709. | je ->exception_handler
  9710. | mov r0, EX:RX->func // reload
  9711. }
  9712. }
  9713. | // ZVAL_NULL(EX_VAR(opline->result.var));
  9714. | LOAD_ZVAL_ADDR FCARG2a, res_addr
  9715. | SET_Z_TYPE_INFO FCARG2a, IS_NULL
  9716. | // EG(current_execute_data) = execute_data;
  9717. | MEM_STORE_ZTS aword, executor_globals, current_execute_data, RX, r1
  9718. zend_jit_reset_last_valid_opline();
  9719. | // fbc->internal_function.handler(call, ret);
  9720. | mov FCARG1a, RX
  9721. if (func) {
  9722. | EXT_CALL func->internal_function.handler, r0
  9723. } else {
  9724. | call aword [r0 + offsetof(zend_internal_function, handler)]
  9725. }
  9726. | // EG(current_execute_data) = execute_data;
  9727. | MEM_STORE_ZTS aword, executor_globals, current_execute_data, FP, r0
  9728. | // zend_vm_stack_free_args(call);
  9729. if (func && !unknown_num_args) {
  9730. for (i = 0; i < call_num_args; i++ ) {
  9731. if (zend_jit_needs_arg_dtor(func, i, call_info)) {
  9732. uint32_t offset = EX_NUM_TO_VAR(i);
  9733. | ZVAL_PTR_DTOR ZEND_ADDR_MEM_ZVAL(ZREG_RX, offset), MAY_BE_ANY|MAY_BE_RC1|MAY_BE_RCN, 0, 1, opline
  9734. }
  9735. }
  9736. } else {
  9737. | mov FCARG1a, RX
  9738. | EXT_CALL zend_jit_vm_stack_free_args_helper, r0
  9739. }
  9740. if (may_have_extra_named_params) {
  9741. | test byte [RX + offsetof(zend_execute_data, This.u1.type_info) + 3], (ZEND_CALL_HAS_EXTRA_NAMED_PARAMS >> 24)
  9742. | jnz >1
  9743. |.cold_code
  9744. |1:
  9745. | mov FCARG1a, aword [RX + offsetof(zend_execute_data, extra_named_params)]
  9746. | EXT_CALL zend_free_extra_named_params, r0
  9747. | jmp >2
  9748. |.code
  9749. |2:
  9750. }
  9751. |8:
  9752. if (opline->opcode == ZEND_DO_FCALL) {
  9753. // TODO: optimize ???
  9754. | // if (UNEXPECTED(ZEND_CALL_INFO(call) & ZEND_CALL_RELEASE_THIS))
  9755. | test byte [RX + offsetof(zend_execute_data, This.u1.type_info) + 2], (ZEND_CALL_RELEASE_THIS >> 16)
  9756. | jnz >1
  9757. |.cold_code
  9758. |1:
  9759. | GET_Z_PTR FCARG1a, RX + offsetof(zend_execute_data, This)
  9760. | // OBJ_RELEASE(object);
  9761. | OBJ_RELEASE ZREG_FCARG1, >2
  9762. | jmp >2
  9763. |.code
  9764. |2:
  9765. }
  9766. if (JIT_G(trigger) != ZEND_JIT_ON_HOT_TRACE ||
  9767. !JIT_G(current_frame) ||
  9768. !JIT_G(current_frame)->call ||
  9769. !TRACE_FRAME_IS_NESTED(JIT_G(current_frame)->call) ||
  9770. prev_opline->opcode == ZEND_SEND_UNPACK ||
  9771. prev_opline->opcode == ZEND_SEND_ARRAY ||
  9772. prev_opline->opcode == ZEND_CHECK_UNDEF_ARGS) {
  9773. | // zend_vm_stack_free_call_frame(call);
  9774. | test byte [RX + offsetof(zend_execute_data, This.u1.type_info) + 2], (ZEND_CALL_ALLOCATED >> 16)
  9775. | jnz >1
  9776. |.cold_code
  9777. |1:
  9778. | mov FCARG1a, RX
  9779. | EXT_CALL zend_jit_free_call_frame, r0
  9780. | jmp >1
  9781. |.code
  9782. }
  9783. | MEM_STORE_ZTS aword, executor_globals, vm_stack_top, RX, r0
  9784. |1:
  9785. if (!RETURN_VALUE_USED(opline)) {
  9786. zend_class_entry *ce;
  9787. bool ce_is_instanceof;
  9788. uint32_t func_info = call_info ?
  9789. zend_get_func_info(call_info, ssa, &ce, &ce_is_instanceof) :
  9790. (MAY_BE_ANY|MAY_BE_REF|MAY_BE_RC1|MAY_BE_RCN);
  9791. /* If an exception is thrown, the return_value may stay at the
  9792. * original value of null. */
  9793. func_info |= MAY_BE_NULL;
  9794. if (func_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE|MAY_BE_REF)) {
  9795. | ZVAL_PTR_DTOR res_addr, func_info, 1, 1, opline
  9796. }
  9797. }
  9798. | // if (UNEXPECTED(EG(exception) != NULL)) {
  9799. | MEM_CMP_ZTS aword, executor_globals, exception, 0, r0
  9800. | jne ->icall_throw_handler
  9801. // TODO: Can we avoid checking for interrupts after each call ???
  9802. if (trace && last_valid_opline != opline) {
  9803. int32_t exit_point = zend_jit_trace_get_exit_point(opline + 1, ZEND_JIT_EXIT_TO_VM);
  9804. exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  9805. if (!exit_addr) {
  9806. return 0;
  9807. }
  9808. } else {
  9809. exit_addr = NULL;
  9810. }
  9811. if (!zend_jit_check_timeout(Dst, opline + 1, exit_addr)) {
  9812. return 0;
  9813. }
  9814. if ((!trace || !func) && opline->opcode != ZEND_DO_ICALL) {
  9815. | LOAD_IP_ADDR (opline + 1)
  9816. } else if (trace
  9817. && trace->op == ZEND_JIT_TRACE_END
  9818. && trace->stop == ZEND_JIT_TRACE_STOP_INTERPRETER) {
  9819. | LOAD_IP_ADDR (opline + 1)
  9820. }
  9821. }
  9822. if (!func) {
  9823. |9:
  9824. }
  9825. return 1;
  9826. }
  9827. static int zend_jit_send_val(dasm_State **Dst, const zend_op *opline, uint32_t op1_info, zend_jit_addr op1_addr)
  9828. {
  9829. uint32_t arg_num = opline->op2.num;
  9830. zend_jit_addr arg_addr;
  9831. ZEND_ASSERT(opline->opcode == ZEND_SEND_VAL || arg_num <= MAX_ARG_FLAG_NUM);
  9832. if (!zend_jit_reuse_ip(Dst)) {
  9833. return 0;
  9834. }
  9835. if (opline->opcode == ZEND_SEND_VAL_EX) {
  9836. uint32_t mask = ZEND_SEND_BY_REF << ((arg_num + 3) * 2);
  9837. ZEND_ASSERT(arg_num <= MAX_ARG_FLAG_NUM);
  9838. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE
  9839. && JIT_G(current_frame)
  9840. && JIT_G(current_frame)->call
  9841. && JIT_G(current_frame)->call->func) {
  9842. if (ARG_MUST_BE_SENT_BY_REF(JIT_G(current_frame)->call->func, arg_num)) {
  9843. /* Don't generate code that always throws exception */
  9844. return 0;
  9845. }
  9846. } else if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  9847. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  9848. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  9849. if (!exit_addr) {
  9850. return 0;
  9851. }
  9852. | mov r0, EX:RX->func
  9853. | test dword [r0 + offsetof(zend_function, quick_arg_flags)], mask
  9854. | jnz &exit_addr
  9855. } else {
  9856. | mov r0, EX:RX->func
  9857. | test dword [r0 + offsetof(zend_function, quick_arg_flags)], mask
  9858. | jnz >1
  9859. |.cold_code
  9860. |1:
  9861. if (Z_MODE(op1_addr) == IS_REG) {
  9862. /* set type to avoid zval_ptr_dtor() on uninitialized value */
  9863. zend_jit_addr addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->op1.var);
  9864. | SET_ZVAL_TYPE_INFO addr, IS_UNDEF
  9865. }
  9866. | SET_EX_OPLINE opline, r0
  9867. | jmp ->throw_cannot_pass_by_ref
  9868. |.code
  9869. }
  9870. }
  9871. arg_addr = ZEND_ADDR_MEM_ZVAL(ZREG_RX, opline->result.var);
  9872. if (opline->op1_type == IS_CONST) {
  9873. zval *zv = RT_CONSTANT(opline, opline->op1);
  9874. | ZVAL_COPY_CONST arg_addr, MAY_BE_ANY, MAY_BE_ANY, zv, ZREG_R0
  9875. if (Z_REFCOUNTED_P(zv)) {
  9876. | ADDREF_CONST zv, r0
  9877. }
  9878. } else {
  9879. | ZVAL_COPY_VALUE arg_addr, MAY_BE_ANY, op1_addr, op1_info, ZREG_R0, ZREG_R2
  9880. }
  9881. return 1;
  9882. }
  9883. static int zend_jit_check_undef_args(dasm_State **Dst, const zend_op *opline)
  9884. {
  9885. | mov FCARG1a, EX->call
  9886. | test byte [FCARG1a + offsetof(zend_execute_data, This.u1.type_info) + 3], (ZEND_CALL_MAY_HAVE_UNDEF >> 24)
  9887. | jnz >1
  9888. |.cold_code
  9889. |1:
  9890. | SET_EX_OPLINE opline, r0
  9891. | EXT_CALL zend_handle_undef_args, r0
  9892. | test r0, r0
  9893. | jnz ->exception_handler
  9894. | jmp >2
  9895. |.code
  9896. |2:
  9897. return 1;
  9898. }
  9899. static int zend_jit_send_ref(dasm_State **Dst, const zend_op *opline, const zend_op_array *op_array, uint32_t op1_info, int cold)
  9900. {
  9901. zend_jit_addr op1_addr, arg_addr, ref_addr;
  9902. op1_addr = OP1_ADDR();
  9903. arg_addr = ZEND_ADDR_MEM_ZVAL(ZREG_RX, opline->result.var);
  9904. if (!zend_jit_reuse_ip(Dst)) {
  9905. return 0;
  9906. }
  9907. if (opline->op1_type == IS_VAR) {
  9908. if (op1_info & MAY_BE_INDIRECT) {
  9909. | LOAD_ZVAL_ADDR r0, op1_addr
  9910. | // if (EXPECTED(Z_TYPE_P(ret) == IS_INDIRECT)) {
  9911. | IF_NOT_Z_TYPE r0, IS_INDIRECT, >1
  9912. | // ret = Z_INDIRECT_P(ret);
  9913. | GET_Z_PTR r0, r0
  9914. |1:
  9915. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R0, 0);
  9916. }
  9917. } else if (opline->op1_type == IS_CV) {
  9918. if (op1_info & MAY_BE_UNDEF) {
  9919. if (op1_info & (MAY_BE_ANY|MAY_BE_REF)) {
  9920. | IF_NOT_ZVAL_TYPE op1_addr, IS_UNDEF, >1
  9921. | SET_ZVAL_TYPE_INFO op1_addr, IS_NULL
  9922. | jmp >2
  9923. |1:
  9924. }
  9925. op1_info &= ~MAY_BE_UNDEF;
  9926. op1_info |= MAY_BE_NULL;
  9927. }
  9928. } else {
  9929. ZEND_UNREACHABLE();
  9930. }
  9931. if (op1_info & (MAY_BE_UNDEF|MAY_BE_ANY|MAY_BE_REF)) {
  9932. if (op1_info & MAY_BE_REF) {
  9933. | IF_NOT_ZVAL_TYPE op1_addr, IS_REFERENCE, >2
  9934. | GET_ZVAL_PTR r1, op1_addr
  9935. | GC_ADDREF r1
  9936. | SET_ZVAL_PTR arg_addr, r1
  9937. | SET_ZVAL_TYPE_INFO arg_addr, IS_REFERENCE_EX
  9938. | jmp >6
  9939. }
  9940. |2:
  9941. | // ZVAL_NEW_REF(arg, varptr);
  9942. if (opline->op1_type == IS_VAR) {
  9943. if (Z_REG(op1_addr) != ZREG_R0 || Z_OFFSET(op1_addr) != 0) {
  9944. | LOAD_ZVAL_ADDR r0, op1_addr
  9945. }
  9946. | mov aword T1, r0 // save
  9947. }
  9948. | EMALLOC sizeof(zend_reference), op_array, opline
  9949. | mov dword [r0], 2
  9950. | mov dword [r0 + offsetof(zend_reference, gc.u.type_info)], GC_REFERENCE
  9951. | mov aword [r0 + offsetof(zend_reference, sources.ptr)], 0
  9952. ref_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R0, offsetof(zend_reference, val));
  9953. if (opline->op1_type == IS_VAR) {
  9954. zend_jit_addr val_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R1, 0);
  9955. | mov r1, aword T1 // restore
  9956. | ZVAL_COPY_VALUE ref_addr, MAY_BE_ANY, val_addr, op1_info, ZREG_R2, ZREG_R2
  9957. | SET_ZVAL_PTR val_addr, r0
  9958. | SET_ZVAL_TYPE_INFO val_addr, IS_REFERENCE_EX
  9959. } else {
  9960. | ZVAL_COPY_VALUE ref_addr, MAY_BE_ANY, op1_addr, op1_info, ZREG_R1, ZREG_R2
  9961. | SET_ZVAL_PTR op1_addr, r0
  9962. | SET_ZVAL_TYPE_INFO op1_addr, IS_REFERENCE_EX
  9963. }
  9964. | SET_ZVAL_PTR arg_addr, r0
  9965. | SET_ZVAL_TYPE_INFO arg_addr, IS_REFERENCE_EX
  9966. }
  9967. |6:
  9968. | FREE_OP opline->op1_type, opline->op1, op1_info, !cold, opline
  9969. |7:
  9970. return 1;
  9971. }
  9972. static int zend_jit_send_var(dasm_State **Dst, const zend_op *opline, const zend_op_array *op_array, uint32_t op1_info, zend_jit_addr op1_addr, zend_jit_addr op1_def_addr)
  9973. {
  9974. uint32_t arg_num = opline->op2.num;
  9975. zend_jit_addr arg_addr;
  9976. ZEND_ASSERT((opline->opcode != ZEND_SEND_VAR_EX &&
  9977. opline->opcode != ZEND_SEND_VAR_NO_REF_EX) ||
  9978. arg_num <= MAX_ARG_FLAG_NUM);
  9979. arg_addr = ZEND_ADDR_MEM_ZVAL(ZREG_RX, opline->result.var);
  9980. if (!zend_jit_reuse_ip(Dst)) {
  9981. return 0;
  9982. }
  9983. if (opline->opcode == ZEND_SEND_VAR_EX) {
  9984. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE
  9985. && JIT_G(current_frame)
  9986. && JIT_G(current_frame)->call
  9987. && JIT_G(current_frame)->call->func) {
  9988. if (ARG_SHOULD_BE_SENT_BY_REF(JIT_G(current_frame)->call->func, arg_num)) {
  9989. if (!zend_jit_send_ref(Dst, opline, op_array, op1_info, 0)) {
  9990. return 0;
  9991. }
  9992. return 1;
  9993. }
  9994. } else {
  9995. uint32_t mask = (ZEND_SEND_BY_REF|ZEND_SEND_PREFER_REF) << ((arg_num + 3) * 2);
  9996. | mov r0, EX:RX->func
  9997. | test dword [r0 + offsetof(zend_function, quick_arg_flags)], mask
  9998. | jnz >1
  9999. |.cold_code
  10000. |1:
  10001. if (!zend_jit_send_ref(Dst, opline, op_array, op1_info, 1)) {
  10002. return 0;
  10003. }
  10004. | jmp >7
  10005. |.code
  10006. }
  10007. } else if (opline->opcode == ZEND_SEND_VAR_NO_REF_EX) {
  10008. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE
  10009. && JIT_G(current_frame)
  10010. && JIT_G(current_frame)->call
  10011. && JIT_G(current_frame)->call->func) {
  10012. if (ARG_SHOULD_BE_SENT_BY_REF(JIT_G(current_frame)->call->func, arg_num)) {
  10013. | ZVAL_COPY_VALUE arg_addr, MAY_BE_ANY, op1_addr, op1_info, ZREG_R1, ZREG_R2
  10014. if (!ARG_MAY_BE_SENT_BY_REF(JIT_G(current_frame)->call->func, arg_num)) {
  10015. if (!(op1_info & MAY_BE_REF)) {
  10016. /* Don't generate code that always throws exception */
  10017. return 0;
  10018. } else {
  10019. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  10020. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  10021. if (!exit_addr) {
  10022. return 0;
  10023. }
  10024. | cmp cl, IS_REFERENCE
  10025. | jne &exit_addr
  10026. }
  10027. }
  10028. return 1;
  10029. }
  10030. } else {
  10031. uint32_t mask = (ZEND_SEND_BY_REF|ZEND_SEND_PREFER_REF) << ((arg_num + 3) * 2);
  10032. | mov r0, EX:RX->func
  10033. | test dword [r0 + offsetof(zend_function, quick_arg_flags)], mask
  10034. | jnz >1
  10035. |.cold_code
  10036. |1:
  10037. mask = ZEND_SEND_PREFER_REF << ((arg_num + 3) * 2);
  10038. | ZVAL_COPY_VALUE arg_addr, MAY_BE_ANY, op1_addr, op1_info, ZREG_R1, ZREG_R2
  10039. if (op1_info & MAY_BE_REF) {
  10040. | cmp cl, IS_REFERENCE
  10041. | je >7
  10042. }
  10043. | test dword [r0 + offsetof(zend_function, quick_arg_flags)], mask
  10044. | jnz >7
  10045. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  10046. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  10047. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  10048. if (!exit_addr) {
  10049. return 0;
  10050. }
  10051. | jmp &exit_addr
  10052. } else {
  10053. | SET_EX_OPLINE opline, r0
  10054. | LOAD_ZVAL_ADDR FCARG1a, arg_addr
  10055. | EXT_CALL zend_jit_only_vars_by_reference, r0
  10056. if (!zend_jit_check_exception(Dst)) {
  10057. return 0;
  10058. }
  10059. | jmp >7
  10060. }
  10061. |.code
  10062. }
  10063. } else if (opline->opcode == ZEND_SEND_FUNC_ARG) {
  10064. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE
  10065. && JIT_G(current_frame)
  10066. && JIT_G(current_frame)->call
  10067. && JIT_G(current_frame)->call->func) {
  10068. if (ARG_SHOULD_BE_SENT_BY_REF(JIT_G(current_frame)->call->func, arg_num)) {
  10069. if (!zend_jit_send_ref(Dst, opline, op_array, op1_info, 0)) {
  10070. return 0;
  10071. }
  10072. return 1;
  10073. }
  10074. } else {
  10075. | test dword [RX + offsetof(zend_execute_data, This.u1.type_info)], ZEND_CALL_SEND_ARG_BY_REF
  10076. | jnz >1
  10077. |.cold_code
  10078. |1:
  10079. if (!zend_jit_send_ref(Dst, opline, op_array, op1_info, 1)) {
  10080. return 0;
  10081. }
  10082. | jmp >7
  10083. |.code
  10084. }
  10085. }
  10086. if (op1_info & MAY_BE_UNDEF) {
  10087. if (op1_info & (MAY_BE_ANY|MAY_BE_REF)) {
  10088. | IF_ZVAL_TYPE op1_addr, IS_UNDEF, >1
  10089. |.cold_code
  10090. |1:
  10091. }
  10092. | SET_EX_OPLINE opline, r0
  10093. | mov FCARG1d, opline->op1.var
  10094. | EXT_CALL zend_jit_undefined_op_helper, r0
  10095. | SET_ZVAL_TYPE_INFO arg_addr, IS_NULL
  10096. | test r0, r0
  10097. | jz ->exception_handler
  10098. if (op1_info & (MAY_BE_ANY|MAY_BE_REF)) {
  10099. | jmp >7
  10100. |.code
  10101. } else {
  10102. |7:
  10103. return 1;
  10104. }
  10105. }
  10106. if (opline->opcode == ZEND_SEND_VAR_NO_REF) {
  10107. | ZVAL_COPY_VALUE arg_addr, MAY_BE_ANY, op1_addr, op1_info, ZREG_R1, ZREG_R2
  10108. if (op1_info & MAY_BE_REF) {
  10109. | cmp cl, IS_REFERENCE
  10110. | je >7
  10111. }
  10112. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  10113. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  10114. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  10115. if (!exit_addr) {
  10116. return 0;
  10117. }
  10118. | jmp &exit_addr
  10119. } else {
  10120. | SET_EX_OPLINE opline, r0
  10121. | LOAD_ZVAL_ADDR FCARG1a, arg_addr
  10122. | EXT_CALL zend_jit_only_vars_by_reference, r0
  10123. if (!zend_jit_check_exception(Dst)) {
  10124. return 0;
  10125. }
  10126. }
  10127. } else {
  10128. if (op1_info & MAY_BE_REF) {
  10129. if (opline->op1_type == IS_CV) {
  10130. zend_jit_addr val_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  10131. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  10132. | ZVAL_DEREF FCARG1a, op1_info
  10133. | ZVAL_COPY_VALUE arg_addr, MAY_BE_ANY, val_addr, op1_info, ZREG_R0, ZREG_R2
  10134. | TRY_ADDREF op1_info, ah, r2
  10135. } else {
  10136. zend_jit_addr ref_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 8);
  10137. | IF_ZVAL_TYPE op1_addr, IS_REFERENCE, >1
  10138. |.cold_code
  10139. |1:
  10140. | // zend_refcounted *ref = Z_COUNTED_P(retval_ptr);
  10141. | GET_ZVAL_PTR FCARG1a, op1_addr
  10142. | // ZVAL_COPY_VALUE(return_value, &ref->value);
  10143. | ZVAL_COPY_VALUE arg_addr, MAY_BE_ANY, ref_addr, op1_info, ZREG_R0, ZREG_R2
  10144. | GC_DELREF FCARG1a
  10145. | je >1
  10146. | IF_NOT_REFCOUNTED ah, >2
  10147. | GC_ADDREF r2
  10148. | jmp >2
  10149. |1:
  10150. | EFREE_REG_REFERENCE
  10151. | jmp >2
  10152. |.code
  10153. | ZVAL_COPY_VALUE arg_addr, MAY_BE_ANY, op1_addr, op1_info, ZREG_R0, ZREG_R2
  10154. |2:
  10155. }
  10156. } else {
  10157. if (op1_addr != op1_def_addr) {
  10158. if (!zend_jit_update_regs(Dst, opline->op1.var, op1_addr, op1_def_addr, op1_info)) {
  10159. return 0;
  10160. }
  10161. if (Z_MODE(op1_def_addr) == IS_REG && Z_MODE(op1_addr) != IS_REG) {
  10162. op1_addr= op1_def_addr;
  10163. }
  10164. }
  10165. | ZVAL_COPY_VALUE arg_addr, MAY_BE_ANY, op1_addr, op1_info, ZREG_R0, ZREG_R2
  10166. if (opline->op1_type == IS_CV) {
  10167. | TRY_ADDREF op1_info, ah, r2
  10168. }
  10169. }
  10170. }
  10171. |7:
  10172. return 1;
  10173. }
  10174. static int zend_jit_check_func_arg(dasm_State **Dst, const zend_op *opline)
  10175. {
  10176. uint32_t arg_num = opline->op2.num;
  10177. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE
  10178. && JIT_G(current_frame)
  10179. && JIT_G(current_frame)->call
  10180. && JIT_G(current_frame)->call->func) {
  10181. if (ARG_SHOULD_BE_SENT_BY_REF(JIT_G(current_frame)->call->func, arg_num)) {
  10182. if (!TRACE_FRAME_IS_LAST_SEND_BY_REF(JIT_G(current_frame)->call)) {
  10183. TRACE_FRAME_SET_LAST_SEND_BY_REF(JIT_G(current_frame)->call);
  10184. | // ZEND_ADD_CALL_FLAG(EX(call), ZEND_CALL_SEND_ARG_BY_REF);
  10185. || if (reuse_ip) {
  10186. | or dword [RX + offsetof(zend_execute_data, This.u1.type_info)], ZEND_CALL_SEND_ARG_BY_REF
  10187. || } else {
  10188. | mov r0, EX->call
  10189. | or dword [r0 + offsetof(zend_execute_data, This.u1.type_info)], ZEND_CALL_SEND_ARG_BY_REF
  10190. || }
  10191. }
  10192. } else {
  10193. if (!TRACE_FRAME_IS_LAST_SEND_BY_VAL(JIT_G(current_frame)->call)) {
  10194. TRACE_FRAME_SET_LAST_SEND_BY_VAL(JIT_G(current_frame)->call);
  10195. | // ZEND_DEL_CALL_FLAG(EX(call), ZEND_CALL_SEND_ARG_BY_REF);
  10196. || if (reuse_ip) {
  10197. | and dword [RX + offsetof(zend_execute_data, This.u1.type_info)], ~ZEND_CALL_SEND_ARG_BY_REF
  10198. || } else {
  10199. | mov r0, EX->call
  10200. | and dword [r0 + offsetof(zend_execute_data, This.u1.type_info)], ~ZEND_CALL_SEND_ARG_BY_REF
  10201. || }
  10202. }
  10203. }
  10204. } else {
  10205. // if (QUICK_ARG_SHOULD_BE_SENT_BY_REF(EX(call)->func, arg_num)) {
  10206. uint32_t mask = (ZEND_SEND_BY_REF|ZEND_SEND_PREFER_REF) << ((arg_num + 3) * 2);
  10207. if (!zend_jit_reuse_ip(Dst)) {
  10208. return 0;
  10209. }
  10210. | mov r0, EX:RX->func
  10211. | test dword [r0 + offsetof(zend_function, quick_arg_flags)], mask
  10212. | jnz >1
  10213. |.cold_code
  10214. |1:
  10215. | // ZEND_ADD_CALL_FLAG(EX(call), ZEND_CALL_SEND_ARG_BY_REF);
  10216. | or dword [RX + offsetof(zend_execute_data, This.u1.type_info)], ZEND_CALL_SEND_ARG_BY_REF
  10217. | jmp >1
  10218. |.code
  10219. | // ZEND_DEL_CALL_FLAG(EX(call), ZEND_CALL_SEND_ARG_BY_REF);
  10220. | and dword [RX + offsetof(zend_execute_data, This.u1.type_info)], ~ZEND_CALL_SEND_ARG_BY_REF
  10221. |1:
  10222. }
  10223. return 1;
  10224. }
  10225. static int zend_jit_smart_true(dasm_State **Dst, const zend_op *opline, int jmp, zend_uchar smart_branch_opcode, uint32_t target_label, uint32_t target_label2)
  10226. {
  10227. if (smart_branch_opcode) {
  10228. if (smart_branch_opcode == ZEND_JMPZ) {
  10229. if (jmp) {
  10230. | jmp >7
  10231. }
  10232. } else if (smart_branch_opcode == ZEND_JMPNZ) {
  10233. | jmp =>target_label
  10234. } else if (smart_branch_opcode == ZEND_JMPZNZ) {
  10235. | jmp =>target_label2
  10236. } else {
  10237. ZEND_UNREACHABLE();
  10238. }
  10239. } else {
  10240. zend_jit_addr res_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->result.var);
  10241. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  10242. if (jmp) {
  10243. | jmp >7
  10244. }
  10245. }
  10246. return 1;
  10247. }
  10248. static int zend_jit_smart_false(dasm_State **Dst, const zend_op *opline, int jmp, zend_uchar smart_branch_opcode, uint32_t target_label)
  10249. {
  10250. if (smart_branch_opcode) {
  10251. if (smart_branch_opcode == ZEND_JMPZ) {
  10252. | jmp =>target_label
  10253. } else if (smart_branch_opcode == ZEND_JMPNZ) {
  10254. if (jmp) {
  10255. | jmp >7
  10256. }
  10257. } else if (smart_branch_opcode == ZEND_JMPZNZ) {
  10258. | jmp =>target_label
  10259. } else {
  10260. ZEND_UNREACHABLE();
  10261. }
  10262. } else {
  10263. zend_jit_addr res_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->result.var);
  10264. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  10265. if (jmp) {
  10266. | jmp >7
  10267. }
  10268. }
  10269. return 1;
  10270. }
  10271. static int zend_jit_defined(dasm_State **Dst, const zend_op *opline, zend_uchar smart_branch_opcode, uint32_t target_label, uint32_t target_label2, const void *exit_addr)
  10272. {
  10273. uint32_t defined_label = (uint32_t)-1;
  10274. uint32_t undefined_label = (uint32_t)-1;
  10275. zval *zv = RT_CONSTANT(opline, opline->op1);
  10276. zend_jit_addr res_addr = 0;
  10277. if (smart_branch_opcode && !exit_addr) {
  10278. if (smart_branch_opcode == ZEND_JMPZ) {
  10279. undefined_label = target_label;
  10280. } else if (smart_branch_opcode == ZEND_JMPNZ) {
  10281. defined_label = target_label;
  10282. } else if (smart_branch_opcode == ZEND_JMPZNZ) {
  10283. undefined_label = target_label;
  10284. defined_label = target_label2;
  10285. } else {
  10286. ZEND_UNREACHABLE();
  10287. }
  10288. }
  10289. | // if (CACHED_PTR(opline->extended_value)) {
  10290. | mov r0, EX->run_time_cache
  10291. | mov r0, aword [r0 + opline->extended_value]
  10292. | test r0, r0
  10293. | jz >1
  10294. | test r0, 0x1
  10295. | jnz >4
  10296. |.cold_code
  10297. |4:
  10298. | MEM_LOAD_ZTS FCARG1a, aword, executor_globals, zend_constants, FCARG1a
  10299. | shr r0, 1
  10300. | cmp dword [FCARG1a + offsetof(HashTable, nNumOfElements)], eax
  10301. if (smart_branch_opcode) {
  10302. if (exit_addr) {
  10303. if (smart_branch_opcode == ZEND_JMPZ) {
  10304. | jz &exit_addr
  10305. } else {
  10306. | jz >3
  10307. }
  10308. } else if (undefined_label != (uint32_t)-1) {
  10309. | jz =>undefined_label
  10310. } else {
  10311. | jz >3
  10312. }
  10313. } else {
  10314. | jz >2
  10315. }
  10316. |1:
  10317. | SET_EX_OPLINE opline, r0
  10318. | LOAD_ADDR FCARG1a, zv
  10319. | EXT_CALL zend_jit_check_constant, r0
  10320. | test r0, r0
  10321. if (exit_addr) {
  10322. if (smart_branch_opcode == ZEND_JMPNZ) {
  10323. | jz >3
  10324. } else {
  10325. | jnz >3
  10326. }
  10327. | jmp &exit_addr
  10328. } else if (smart_branch_opcode) {
  10329. if (undefined_label != (uint32_t)-1) {
  10330. | jz =>undefined_label
  10331. } else {
  10332. | jz >3
  10333. }
  10334. if (defined_label != (uint32_t)-1) {
  10335. | jmp =>defined_label
  10336. } else {
  10337. | jmp >3
  10338. }
  10339. } else {
  10340. res_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->result.var);
  10341. | jnz >1
  10342. |2:
  10343. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  10344. | jmp >3
  10345. }
  10346. |.code
  10347. if (smart_branch_opcode) {
  10348. if (exit_addr) {
  10349. if (smart_branch_opcode == ZEND_JMPNZ) {
  10350. | jmp &exit_addr
  10351. }
  10352. } else if (defined_label != (uint32_t)-1) {
  10353. | jmp =>defined_label
  10354. }
  10355. } else {
  10356. |1:
  10357. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  10358. }
  10359. |3:
  10360. return 1;
  10361. }
  10362. static int zend_jit_type_check(dasm_State **Dst, const zend_op *opline, uint32_t op1_info, zend_uchar smart_branch_opcode, uint32_t target_label, uint32_t target_label2, const void *exit_addr)
  10363. {
  10364. uint32_t mask;
  10365. zend_jit_addr op1_addr = OP1_ADDR();
  10366. // TODO: support for is_resource() ???
  10367. ZEND_ASSERT(opline->extended_value != MAY_BE_RESOURCE);
  10368. if (op1_info & MAY_BE_UNDEF) {
  10369. if (op1_info & (MAY_BE_ANY|MAY_BE_REF)) {
  10370. | IF_ZVAL_TYPE op1_addr, IS_UNDEF, >1
  10371. |.cold_code
  10372. |1:
  10373. }
  10374. | SET_EX_OPLINE opline, r0
  10375. | mov FCARG1d, opline->op1.var
  10376. | EXT_CALL zend_jit_undefined_op_helper, r0
  10377. zend_jit_check_exception_undef_result(Dst, opline);
  10378. if (opline->extended_value & MAY_BE_NULL) {
  10379. if (exit_addr) {
  10380. if (smart_branch_opcode == ZEND_JMPNZ) {
  10381. | jmp &exit_addr
  10382. } else if ((op1_info & (MAY_BE_ANY|MAY_BE_REF)) != 0) {
  10383. | jmp >7
  10384. }
  10385. } else if (!zend_jit_smart_true(Dst, opline, (op1_info & (MAY_BE_ANY|MAY_BE_REF)) != 0, smart_branch_opcode, target_label, target_label2)) {
  10386. return 0;
  10387. }
  10388. } else {
  10389. if (exit_addr) {
  10390. if (smart_branch_opcode == ZEND_JMPZ) {
  10391. | jmp &exit_addr
  10392. } else if ((op1_info & (MAY_BE_ANY|MAY_BE_REF)) != 0) {
  10393. | jmp >7
  10394. }
  10395. } else if (!zend_jit_smart_false(Dst, opline, (op1_info & (MAY_BE_ANY|MAY_BE_REF)) != 0, smart_branch_opcode, target_label)) {
  10396. return 0;
  10397. }
  10398. }
  10399. if (op1_info & (MAY_BE_ANY|MAY_BE_REF)) {
  10400. |.code
  10401. }
  10402. }
  10403. if (op1_info & (MAY_BE_ANY|MAY_BE_REF)) {
  10404. mask = opline->extended_value;
  10405. if (!(op1_info & MAY_BE_GUARD) && !(op1_info & (MAY_BE_ANY - mask))) {
  10406. | FREE_OP opline->op1_type, opline->op1, op1_info, 1, opline
  10407. if (exit_addr) {
  10408. if (smart_branch_opcode == ZEND_JMPNZ) {
  10409. | jmp &exit_addr
  10410. }
  10411. } else if (!zend_jit_smart_true(Dst, opline, 0, smart_branch_opcode, target_label, target_label2)) {
  10412. return 0;
  10413. }
  10414. } else if (!(op1_info & MAY_BE_GUARD) && !(op1_info & mask)) {
  10415. | FREE_OP opline->op1_type, opline->op1, op1_info, 1, opline
  10416. if (exit_addr) {
  10417. if (smart_branch_opcode == ZEND_JMPZ) {
  10418. | jmp &exit_addr
  10419. }
  10420. } else if (!zend_jit_smart_false(Dst, opline, 0, smart_branch_opcode, target_label)) {
  10421. return 0;
  10422. }
  10423. } else {
  10424. bool invert = 0;
  10425. zend_uchar type;
  10426. switch (mask) {
  10427. case MAY_BE_NULL: type = IS_NULL; break;
  10428. case MAY_BE_FALSE: type = IS_FALSE; break;
  10429. case MAY_BE_TRUE: type = IS_TRUE; break;
  10430. case MAY_BE_LONG: type = IS_LONG; break;
  10431. case MAY_BE_DOUBLE: type = IS_DOUBLE; break;
  10432. case MAY_BE_STRING: type = IS_STRING; break;
  10433. case MAY_BE_ARRAY: type = IS_ARRAY; break;
  10434. case MAY_BE_OBJECT: type = IS_OBJECT; break;
  10435. case MAY_BE_ANY - MAY_BE_NULL: type = IS_NULL; invert = 1; break;
  10436. case MAY_BE_ANY - MAY_BE_FALSE: type = IS_FALSE; invert = 1; break;
  10437. case MAY_BE_ANY - MAY_BE_TRUE: type = IS_TRUE; invert = 1; break;
  10438. case MAY_BE_ANY - MAY_BE_LONG: type = IS_LONG; invert = 1; break;
  10439. case MAY_BE_ANY - MAY_BE_DOUBLE: type = IS_DOUBLE; invert = 1; break;
  10440. case MAY_BE_ANY - MAY_BE_STRING: type = IS_STRING; invert = 1; break;
  10441. case MAY_BE_ANY - MAY_BE_ARRAY: type = IS_ARRAY; invert = 1; break;
  10442. case MAY_BE_ANY - MAY_BE_OBJECT: type = IS_OBJECT; invert = 1; break;
  10443. case MAY_BE_ANY - MAY_BE_RESOURCE: type = IS_OBJECT; invert = 1; break;
  10444. default:
  10445. type = 0;
  10446. }
  10447. if (op1_info & MAY_BE_REF) {
  10448. | LOAD_ZVAL_ADDR r0, op1_addr
  10449. | ZVAL_DEREF r0, op1_info
  10450. }
  10451. if (type == 0) {
  10452. if (smart_branch_opcode &&
  10453. (opline->op1_type & (IS_VAR|IS_TMP_VAR)) &&
  10454. (op1_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  10455. if ((op1_info) & (MAY_BE_ANY-(MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  10456. | // if (Z_REFCOUNTED_P(cv)) {
  10457. | IF_ZVAL_REFCOUNTED op1_addr, >1
  10458. |.cold_code
  10459. |1:
  10460. }
  10461. | // if (!Z_DELREF_P(cv)) {
  10462. | GET_ZVAL_PTR FCARG1a, op1_addr
  10463. | GC_DELREF FCARG1a
  10464. if (RC_MAY_BE_1(op1_info)) {
  10465. if (RC_MAY_BE_N(op1_info)) {
  10466. | jnz >3
  10467. }
  10468. if (op1_info & MAY_BE_REF) {
  10469. | mov al, byte [r0 + 8]
  10470. } else {
  10471. | mov al, byte [FP + opline->op1.var + 8]
  10472. }
  10473. | mov byte T1, al // save
  10474. | // zval_dtor_func(r);
  10475. | ZVAL_DTOR_FUNC op1_info, opline
  10476. | mov cl, byte T1 // restore
  10477. |jmp >2
  10478. }
  10479. if ((op1_info) & (MAY_BE_ANY-(MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  10480. if (!RC_MAY_BE_1(op1_info)) {
  10481. | jmp >3
  10482. }
  10483. |.code
  10484. }
  10485. |3:
  10486. if (op1_info & MAY_BE_REF) {
  10487. | mov cl, byte [r0 + 8]
  10488. } else {
  10489. | mov cl, byte [FP + opline->op1.var + 8]
  10490. }
  10491. |2:
  10492. } else {
  10493. if (op1_info & MAY_BE_REF) {
  10494. | mov cl, byte [r0 + 8]
  10495. } else {
  10496. | mov cl, byte [FP + opline->op1.var + 8]
  10497. }
  10498. }
  10499. | mov eax, 1
  10500. | shl eax, cl
  10501. | test eax, mask
  10502. if (exit_addr) {
  10503. if (smart_branch_opcode == ZEND_JMPNZ) {
  10504. | jne &exit_addr
  10505. } else {
  10506. | je &exit_addr
  10507. }
  10508. } else if (smart_branch_opcode) {
  10509. if (smart_branch_opcode == ZEND_JMPZ) {
  10510. | je =>target_label
  10511. } else if (smart_branch_opcode == ZEND_JMPNZ) {
  10512. | jne =>target_label
  10513. } else if (smart_branch_opcode == ZEND_JMPZNZ) {
  10514. | je =>target_label
  10515. | jmp =>target_label2
  10516. } else {
  10517. ZEND_UNREACHABLE();
  10518. }
  10519. } else {
  10520. zend_jit_addr res_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->result.var);
  10521. | setne al
  10522. | movzx eax, al
  10523. | add eax, 2
  10524. | SET_ZVAL_TYPE_INFO res_addr, eax
  10525. | FREE_OP opline->op1_type, opline->op1, op1_info, 1, opline
  10526. }
  10527. } else {
  10528. if (smart_branch_opcode &&
  10529. (opline->op1_type & (IS_VAR|IS_TMP_VAR)) &&
  10530. (op1_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  10531. if ((op1_info) & (MAY_BE_ANY-(MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  10532. | // if (Z_REFCOUNTED_P(cv)) {
  10533. | IF_ZVAL_REFCOUNTED op1_addr, >1
  10534. |.cold_code
  10535. |1:
  10536. }
  10537. | // if (!Z_DELREF_P(cv)) {
  10538. | GET_ZVAL_PTR FCARG1a, op1_addr
  10539. | GC_DELREF FCARG1a
  10540. if (RC_MAY_BE_1(op1_info)) {
  10541. if (RC_MAY_BE_N(op1_info)) {
  10542. | jnz >3
  10543. }
  10544. if (op1_info & MAY_BE_REF) {
  10545. | mov al, byte [r0 + 8]
  10546. } else {
  10547. | mov al, byte [FP + opline->op1.var + 8]
  10548. }
  10549. | mov byte T1, al // save
  10550. | // zval_dtor_func(r);
  10551. | ZVAL_DTOR_FUNC op1_info, opline
  10552. | mov cl, byte T1 // restore
  10553. |jmp >2
  10554. }
  10555. if ((op1_info) & (MAY_BE_ANY-(MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  10556. if (!RC_MAY_BE_1(op1_info)) {
  10557. | jmp >3
  10558. }
  10559. |.code
  10560. }
  10561. |3:
  10562. if (op1_info & MAY_BE_REF) {
  10563. | mov cl, byte [r0 + 8]
  10564. } else {
  10565. | mov cl, byte [FP + opline->op1.var + 8]
  10566. }
  10567. |2:
  10568. | cmp cl, type
  10569. } else {
  10570. if (op1_info & MAY_BE_REF) {
  10571. | cmp byte [r0 + 8], type
  10572. } else {
  10573. | cmp byte [FP + opline->op1.var + 8], type
  10574. }
  10575. }
  10576. if (exit_addr) {
  10577. if (invert) {
  10578. if (smart_branch_opcode == ZEND_JMPNZ) {
  10579. | jne &exit_addr
  10580. } else {
  10581. | je &exit_addr
  10582. }
  10583. } else {
  10584. if (smart_branch_opcode == ZEND_JMPNZ) {
  10585. | je &exit_addr
  10586. } else {
  10587. | jne &exit_addr
  10588. }
  10589. }
  10590. } else if (smart_branch_opcode) {
  10591. if (invert) {
  10592. if (smart_branch_opcode == ZEND_JMPZ) {
  10593. | je =>target_label
  10594. } else if (smart_branch_opcode == ZEND_JMPNZ) {
  10595. | jne =>target_label
  10596. } else if (smart_branch_opcode == ZEND_JMPZNZ) {
  10597. | je =>target_label
  10598. | jmp =>target_label2
  10599. } else {
  10600. ZEND_UNREACHABLE();
  10601. }
  10602. } else {
  10603. if (smart_branch_opcode == ZEND_JMPZ) {
  10604. | jne =>target_label
  10605. } else if (smart_branch_opcode == ZEND_JMPNZ) {
  10606. | je =>target_label
  10607. } else if (smart_branch_opcode == ZEND_JMPZNZ) {
  10608. | jne =>target_label
  10609. | jmp =>target_label2
  10610. } else {
  10611. ZEND_UNREACHABLE();
  10612. }
  10613. }
  10614. } else {
  10615. zend_jit_addr res_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->result.var);
  10616. if (invert) {
  10617. | setne al
  10618. } else {
  10619. | sete al
  10620. }
  10621. | movzx eax, al
  10622. | add eax, 2
  10623. | SET_ZVAL_TYPE_INFO res_addr, eax
  10624. | FREE_OP opline->op1_type, opline->op1, op1_info, 1, opline
  10625. }
  10626. }
  10627. }
  10628. }
  10629. |7:
  10630. return 1;
  10631. }
  10632. static int zend_jit_leave_frame(dasm_State **Dst)
  10633. {
  10634. | // EG(current_execute_data) = EX(prev_execute_data);
  10635. | mov r0, EX->prev_execute_data
  10636. | MEM_STORE_ZTS aword, executor_globals, current_execute_data, r0, r2
  10637. return 1;
  10638. }
  10639. static int zend_jit_free_cvs(dasm_State **Dst)
  10640. {
  10641. | // EG(current_execute_data) = EX(prev_execute_data);
  10642. | mov FCARG1a, EX->prev_execute_data
  10643. | MEM_STORE_ZTS aword, executor_globals, current_execute_data, FCARG1a, r0
  10644. | // zend_free_compiled_variables(execute_data);
  10645. | mov FCARG1a, FP
  10646. | EXT_CALL zend_free_compiled_variables, r0
  10647. return 1;
  10648. }
  10649. static int zend_jit_free_cv(dasm_State **Dst, uint32_t info, uint32_t var)
  10650. {
  10651. if (info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE|MAY_BE_REF)) {
  10652. uint32_t offset = EX_NUM_TO_VAR(var);
  10653. | ZVAL_PTR_DTOR ZEND_ADDR_MEM_ZVAL(ZREG_FP, offset), info, 1, 1, NULL
  10654. }
  10655. return 1;
  10656. }
  10657. static int zend_jit_free_op(dasm_State **Dst, const zend_op *opline, uint32_t info, uint32_t var_offset)
  10658. {
  10659. if (info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE|MAY_BE_REF)) {
  10660. | ZVAL_PTR_DTOR ZEND_ADDR_MEM_ZVAL(ZREG_FP, var_offset), info, 0, 1, opline
  10661. }
  10662. return 1;
  10663. }
  10664. static int zend_jit_leave_func(dasm_State **Dst,
  10665. const zend_op_array *op_array,
  10666. const zend_op *opline,
  10667. uint32_t op1_info,
  10668. bool left_frame,
  10669. zend_jit_trace_rec *trace,
  10670. zend_jit_trace_info *trace_info,
  10671. int indirect_var_access,
  10672. int may_throw)
  10673. {
  10674. bool may_be_top_frame =
  10675. JIT_G(trigger) != ZEND_JIT_ON_HOT_TRACE ||
  10676. !JIT_G(current_frame) ||
  10677. !TRACE_FRAME_IS_NESTED(JIT_G(current_frame));
  10678. bool may_need_call_helper =
  10679. indirect_var_access || /* may have symbol table */
  10680. !op_array->function_name || /* may have symbol table */
  10681. may_be_top_frame ||
  10682. (op_array->fn_flags & ZEND_ACC_VARIADIC) || /* may have extra named args */
  10683. JIT_G(trigger) != ZEND_JIT_ON_HOT_TRACE ||
  10684. !JIT_G(current_frame) ||
  10685. TRACE_FRAME_NUM_ARGS(JIT_G(current_frame)) == -1 || /* unknown number of args */
  10686. (uint32_t)TRACE_FRAME_NUM_ARGS(JIT_G(current_frame)) > op_array->num_args; /* extra args */
  10687. bool may_need_release_this =
  10688. !(op_array->fn_flags & ZEND_ACC_CLOSURE) &&
  10689. op_array->scope &&
  10690. !(op_array->fn_flags & ZEND_ACC_STATIC) &&
  10691. (JIT_G(trigger) != ZEND_JIT_ON_HOT_TRACE ||
  10692. !JIT_G(current_frame) ||
  10693. !TRACE_FRAME_NO_NEED_RELEASE_THIS(JIT_G(current_frame)));
  10694. if (may_need_release_this) {
  10695. | mov FCARG1d, dword [FP + offsetof(zend_execute_data, This.u1.type_info)]
  10696. }
  10697. if (may_need_call_helper) {
  10698. if (!left_frame) {
  10699. left_frame = 1;
  10700. if (!zend_jit_leave_frame(Dst)) {
  10701. return 0;
  10702. }
  10703. }
  10704. /* ZEND_CALL_FAKE_CLOSURE handled on slow path to eliminate check for ZEND_CALL_CLOSURE on fast path */
  10705. if (may_need_release_this) {
  10706. | test FCARG1d, (ZEND_CALL_TOP|ZEND_CALL_HAS_SYMBOL_TABLE|ZEND_CALL_FREE_EXTRA_ARGS|ZEND_CALL_ALLOCATED|ZEND_CALL_HAS_EXTRA_NAMED_PARAMS|ZEND_CALL_FAKE_CLOSURE)
  10707. } else {
  10708. | test dword [FP + offsetof(zend_execute_data, This.u1.type_info)], (ZEND_CALL_TOP|ZEND_CALL_HAS_SYMBOL_TABLE|ZEND_CALL_FREE_EXTRA_ARGS|ZEND_CALL_ALLOCATED|ZEND_CALL_HAS_EXTRA_NAMED_PARAMS|ZEND_CALL_FAKE_CLOSURE)
  10709. }
  10710. if (trace && trace->op != ZEND_JIT_TRACE_END) {
  10711. | jnz >1
  10712. |.cold_code
  10713. |1:
  10714. if (!GCC_GLOBAL_REGS) {
  10715. | mov FCARG1a, FP
  10716. }
  10717. | EXT_CALL zend_jit_leave_func_helper, r0
  10718. if (may_be_top_frame) {
  10719. // TODO: try to avoid this check ???
  10720. if (zend_jit_vm_kind == ZEND_VM_KIND_HYBRID) {
  10721. #if 0
  10722. /* this check should be handled by the following OPLINE guard */
  10723. | cmp IP, zend_jit_halt_op
  10724. | je ->trace_halt
  10725. #endif
  10726. } else if (GCC_GLOBAL_REGS) {
  10727. | test IP, IP
  10728. | je ->trace_halt
  10729. } else {
  10730. | test eax, eax
  10731. | jl ->trace_halt
  10732. }
  10733. }
  10734. if (!GCC_GLOBAL_REGS) {
  10735. | // execute_data = EG(current_execute_data)
  10736. | MEM_LOAD_ZTS FP, aword, executor_globals, current_execute_data, r0
  10737. }
  10738. | jmp >8
  10739. |.code
  10740. } else {
  10741. | jnz ->leave_function_handler
  10742. }
  10743. }
  10744. if (op_array->fn_flags & ZEND_ACC_CLOSURE) {
  10745. if (!left_frame) {
  10746. left_frame = 1;
  10747. if (!zend_jit_leave_frame(Dst)) {
  10748. return 0;
  10749. }
  10750. }
  10751. | // OBJ_RELEASE(ZEND_CLOSURE_OBJECT(EX(func)));
  10752. | mov FCARG1a, EX->func
  10753. | sub FCARG1a, sizeof(zend_object)
  10754. | OBJ_RELEASE ZREG_FCARG1, >4
  10755. |4:
  10756. } else if (may_need_release_this) {
  10757. if (!left_frame) {
  10758. left_frame = 1;
  10759. if (!zend_jit_leave_frame(Dst)) {
  10760. return 0;
  10761. }
  10762. }
  10763. | // if (call_info & ZEND_CALL_RELEASE_THIS)
  10764. | test FCARG1d, ZEND_CALL_RELEASE_THIS
  10765. | je >4
  10766. | // zend_object *object = Z_OBJ(execute_data->This);
  10767. | mov FCARG1a, EX->This.value.obj
  10768. | // OBJ_RELEASE(object);
  10769. | OBJ_RELEASE ZREG_FCARG1, >4
  10770. |4:
  10771. // TODO: avoid EG(excption) check for $this->foo() calls
  10772. may_throw = 1;
  10773. }
  10774. | // EG(vm_stack_top) = (zval*)execute_data;
  10775. | MEM_STORE_ZTS aword, executor_globals, vm_stack_top, FP, r0
  10776. | // execute_data = EX(prev_execute_data);
  10777. | mov FP, EX->prev_execute_data
  10778. if (!left_frame) {
  10779. | // EG(current_execute_data) = execute_data;
  10780. | MEM_STORE_ZTS aword, executor_globals, current_execute_data, FP, r0
  10781. }
  10782. |9:
  10783. if (trace) {
  10784. if (trace->op != ZEND_JIT_TRACE_END
  10785. && (JIT_G(current_frame) && !TRACE_FRAME_IS_UNKNOWN_RETURN(JIT_G(current_frame)))) {
  10786. zend_jit_reset_last_valid_opline();
  10787. } else {
  10788. | LOAD_IP
  10789. | ADD_IP sizeof(zend_op)
  10790. }
  10791. |8:
  10792. if (trace->op == ZEND_JIT_TRACE_BACK
  10793. && (!JIT_G(current_frame) || TRACE_FRAME_IS_UNKNOWN_RETURN(JIT_G(current_frame)))) {
  10794. const zend_op *next_opline = trace->opline;
  10795. if ((opline->op1_type & (IS_VAR|IS_TMP_VAR))
  10796. && (op1_info & MAY_BE_RC1)
  10797. && (op1_info & (MAY_BE_OBJECT|MAY_BE_RESOURCE|MAY_BE_ARRAY_OF_OBJECT|MAY_BE_ARRAY_OF_RESOURCE|MAY_BE_ARRAY_OF_ARRAY))) {
  10798. /* exception might be thrown during destruction of unused return value */
  10799. | // if (EG(exception))
  10800. | MEM_CMP_ZTS aword, executor_globals, exception, 0, r0
  10801. | jne ->leave_throw_handler
  10802. }
  10803. do {
  10804. trace++;
  10805. } while (trace->op == ZEND_JIT_TRACE_INIT_CALL);
  10806. ZEND_ASSERT(trace->op == ZEND_JIT_TRACE_VM || trace->op == ZEND_JIT_TRACE_END);
  10807. next_opline = trace->opline;
  10808. ZEND_ASSERT(next_opline != NULL);
  10809. if (trace->op == ZEND_JIT_TRACE_END
  10810. && trace->stop == ZEND_JIT_TRACE_STOP_RECURSIVE_RET) {
  10811. trace_info->flags |= ZEND_JIT_TRACE_LOOP;
  10812. | CMP_IP next_opline
  10813. | je =>0 // LOOP
  10814. #ifdef ZEND_VM_HYBRID_JIT_RED_ZONE_SIZE
  10815. | JMP_IP
  10816. #else
  10817. | jmp ->trace_escape
  10818. #endif
  10819. } else {
  10820. | CMP_IP next_opline
  10821. | jne ->trace_escape
  10822. }
  10823. zend_jit_set_last_valid_opline(trace->opline);
  10824. return 1;
  10825. } else if (may_throw ||
  10826. (((opline->op1_type & (IS_VAR|IS_TMP_VAR))
  10827. && (op1_info & MAY_BE_RC1)
  10828. && (op1_info & (MAY_BE_OBJECT|MAY_BE_RESOURCE|MAY_BE_ARRAY_OF_OBJECT|MAY_BE_ARRAY_OF_RESOURCE|MAY_BE_ARRAY_OF_ARRAY)))
  10829. && (!JIT_G(current_frame) || TRACE_FRAME_IS_RETURN_VALUE_UNUSED(JIT_G(current_frame))))) {
  10830. | // if (EG(exception))
  10831. | MEM_CMP_ZTS aword, executor_globals, exception, 0, r0
  10832. | jne ->leave_throw_handler
  10833. }
  10834. return 1;
  10835. } else {
  10836. | // if (EG(exception))
  10837. | MEM_CMP_ZTS aword, executor_globals, exception, 0, r0
  10838. | LOAD_IP
  10839. | jne ->leave_throw_handler
  10840. | // opline = EX(opline) + 1
  10841. | ADD_IP sizeof(zend_op)
  10842. }
  10843. if (zend_jit_vm_kind == ZEND_VM_KIND_HYBRID) {
  10844. | ADD_HYBRID_SPAD
  10845. #ifdef CONTEXT_THREADED_JIT
  10846. | push aword [IP]
  10847. | ret
  10848. #else
  10849. | JMP_IP
  10850. #endif
  10851. } else if (GCC_GLOBAL_REGS) {
  10852. | add r4, SPAD // stack alignment
  10853. #ifdef CONTEXT_THREADED_JIT
  10854. | push aword [IP]
  10855. | ret
  10856. #else
  10857. | JMP_IP
  10858. #endif
  10859. } else {
  10860. #ifdef CONTEXT_THREADED_JIT
  10861. ZEND_UNREACHABLE();
  10862. // TODO: context threading can't work without GLOBAL REGS because we have to change
  10863. // the value of execute_data in execute_ex()
  10864. | mov FCARG1a, FP
  10865. | mov r0, aword [FP]
  10866. | mov FP, aword T2 // restore FP
  10867. | mov RX, aword T3 // restore IP
  10868. | add r4, NR_SPAD // stack alignment
  10869. | push aword [r0]
  10870. | ret
  10871. #else
  10872. | mov FP, aword T2 // restore FP
  10873. | mov RX, aword T3 // restore IP
  10874. | add r4, NR_SPAD // stack alignment
  10875. | mov r0, 2 // ZEND_VM_LEAVE
  10876. | ret
  10877. #endif
  10878. }
  10879. return 1;
  10880. }
  10881. static int zend_jit_return(dasm_State **Dst, const zend_op *opline, const zend_op_array *op_array, uint32_t op1_info, zend_jit_addr op1_addr)
  10882. {
  10883. zend_jit_addr ret_addr;
  10884. int8_t return_value_used;
  10885. ZEND_ASSERT(op_array->type != ZEND_EVAL_CODE && op_array->function_name);
  10886. ZEND_ASSERT(!(op1_info & MAY_BE_UNDEF));
  10887. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE && JIT_G(current_frame)) {
  10888. if (TRACE_FRAME_IS_RETURN_VALUE_USED(JIT_G(current_frame))) {
  10889. return_value_used = 1;
  10890. } else if (TRACE_FRAME_IS_RETURN_VALUE_UNUSED(JIT_G(current_frame))) {
  10891. return_value_used = 0;
  10892. } else {
  10893. return_value_used = -1;
  10894. }
  10895. } else {
  10896. return_value_used = -1;
  10897. }
  10898. if (ZEND_OBSERVER_ENABLED) {
  10899. if (Z_MODE(op1_addr) == IS_REG) {
  10900. zend_jit_addr dst = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->op1.var);
  10901. if (!zend_jit_spill_store(Dst, op1_addr, dst, op1_info, 1)) {
  10902. return 0;
  10903. }
  10904. op1_addr = dst;
  10905. }
  10906. | LOAD_ZVAL_ADDR FCARG2a, op1_addr
  10907. | mov FCARG1a, FP
  10908. | SET_EX_OPLINE opline, r0
  10909. | EXT_CALL zend_observer_fcall_end, r0
  10910. }
  10911. // if (!EX(return_value))
  10912. if (Z_MODE(op1_addr) == IS_REG && Z_REG(op1_addr) == ZREG_R1) {
  10913. if (return_value_used != 0) {
  10914. | mov r2, EX->return_value
  10915. }
  10916. if (return_value_used == -1) {
  10917. | test r2, r2
  10918. }
  10919. ret_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R2, 0);
  10920. } else {
  10921. if (return_value_used != 0) {
  10922. | mov r1, EX->return_value
  10923. }
  10924. if (return_value_used == -1) {
  10925. | test r1, r1
  10926. }
  10927. ret_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R1, 0);
  10928. }
  10929. if ((opline->op1_type & (IS_VAR|IS_TMP_VAR)) &&
  10930. (op1_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  10931. if (return_value_used == -1) {
  10932. | jz >1
  10933. |.cold_code
  10934. |1:
  10935. }
  10936. if (return_value_used != 1) {
  10937. if (op1_info & ((MAY_BE_UNDEF|MAY_BE_ANY|MAY_BE_REF)-(MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  10938. if (jit_return_label >= 0) {
  10939. | IF_NOT_ZVAL_REFCOUNTED op1_addr, =>jit_return_label
  10940. } else {
  10941. | IF_NOT_ZVAL_REFCOUNTED op1_addr, >9
  10942. }
  10943. }
  10944. | GET_ZVAL_PTR FCARG1a, op1_addr
  10945. | GC_DELREF FCARG1a
  10946. if (RC_MAY_BE_1(op1_info)) {
  10947. if (RC_MAY_BE_N(op1_info)) {
  10948. if (jit_return_label >= 0) {
  10949. | jnz =>jit_return_label
  10950. } else {
  10951. | jnz >9
  10952. }
  10953. }
  10954. | //SAVE_OPLINE()
  10955. | ZVAL_DTOR_FUNC op1_info, opline
  10956. | //????mov r1, EX->return_value // reload ???
  10957. }
  10958. if (return_value_used == -1) {
  10959. if (jit_return_label >= 0) {
  10960. | jmp =>jit_return_label
  10961. } else {
  10962. | jmp >9
  10963. }
  10964. |.code
  10965. }
  10966. }
  10967. } else if (return_value_used == -1) {
  10968. if (jit_return_label >= 0) {
  10969. | jz =>jit_return_label
  10970. } else {
  10971. | jz >9
  10972. }
  10973. }
  10974. if (return_value_used == 0) {
  10975. |9:
  10976. return 1;
  10977. }
  10978. if (opline->op1_type == IS_CONST) {
  10979. zval *zv = RT_CONSTANT(opline, opline->op1);
  10980. | ZVAL_COPY_CONST ret_addr, MAY_BE_ANY, MAY_BE_ANY, zv, ZREG_R0
  10981. if (Z_REFCOUNTED_P(zv)) {
  10982. | ADDREF_CONST zv, r0
  10983. }
  10984. } else if (opline->op1_type == IS_TMP_VAR) {
  10985. | ZVAL_COPY_VALUE ret_addr, MAY_BE_ANY, op1_addr, op1_info, ZREG_R0, ZREG_R2
  10986. } else if (opline->op1_type == IS_CV) {
  10987. if (op1_info & MAY_BE_REF) {
  10988. | LOAD_ZVAL_ADDR r0, op1_addr
  10989. | ZVAL_DEREF r0, op1_info
  10990. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R0, 0);
  10991. }
  10992. | ZVAL_COPY_VALUE ret_addr, MAY_BE_ANY, op1_addr, op1_info, ZREG_R0, ZREG_R2
  10993. if (op1_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE)) {
  10994. if (JIT_G(trigger) != ZEND_JIT_ON_HOT_TRACE ||
  10995. (op1_info & (MAY_BE_REF|MAY_BE_OBJECT)) ||
  10996. !op_array->function_name) {
  10997. | TRY_ADDREF op1_info, ah, r2
  10998. } else if (return_value_used != 1) {
  10999. | // if (EXPECTED(!(EX_CALL_INFO() & ZEND_CALL_CODE))) ZVAL_NULL(retval_ptr);
  11000. | SET_ZVAL_TYPE_INFO op1_addr, IS_NULL
  11001. }
  11002. }
  11003. } else {
  11004. if (op1_info & MAY_BE_REF) {
  11005. zend_jit_addr ref_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R0, offsetof(zend_reference, val));
  11006. | IF_ZVAL_TYPE op1_addr, IS_REFERENCE, >1
  11007. |.cold_code
  11008. |1:
  11009. | // zend_refcounted *ref = Z_COUNTED_P(retval_ptr);
  11010. | GET_ZVAL_PTR r0, op1_addr
  11011. | // ZVAL_COPY_VALUE(return_value, &ref->value);
  11012. | ZVAL_COPY_VALUE ret_addr, MAY_BE_ANY, ref_addr, op1_info, ZREG_R2, ZREG_R2
  11013. | GC_DELREF r0
  11014. | je >2
  11015. | // if (IS_REFCOUNTED())
  11016. if (jit_return_label >= 0) {
  11017. | IF_NOT_REFCOUNTED dh, =>jit_return_label
  11018. } else {
  11019. | IF_NOT_REFCOUNTED dh, >9
  11020. }
  11021. | // ADDREF
  11022. | GET_ZVAL_PTR r2, ret_addr // reload
  11023. | GC_ADDREF r2
  11024. if (jit_return_label >= 0) {
  11025. | jmp =>jit_return_label
  11026. } else {
  11027. | jmp >9
  11028. }
  11029. |2:
  11030. | EFREE_REFERENCE r0
  11031. if (jit_return_label >= 0) {
  11032. | jmp =>jit_return_label
  11033. } else {
  11034. | jmp >9
  11035. }
  11036. |.code
  11037. }
  11038. | ZVAL_COPY_VALUE ret_addr, MAY_BE_ANY, op1_addr, op1_info, ZREG_R0, ZREG_R2
  11039. }
  11040. |9:
  11041. return 1;
  11042. }
  11043. static int zend_jit_zval_copy_deref(dasm_State **Dst, zend_jit_addr res_addr, zend_jit_addr val_addr, zend_reg type_reg)
  11044. {
  11045. ZEND_ASSERT(type_reg == ZREG_R2);
  11046. |.if not(X64)
  11047. || if (Z_REG(val_addr) == ZREG_R1) {
  11048. | GET_ZVAL_W2 r0, val_addr
  11049. || }
  11050. |.endif
  11051. | GET_ZVAL_PTR r1, val_addr
  11052. |.if not(X64)
  11053. || if (Z_REG(val_addr) != ZREG_R1) {
  11054. | GET_ZVAL_W2 r0, val_addr
  11055. || }
  11056. |.endif
  11057. | IF_NOT_REFCOUNTED dh, >2
  11058. | IF_NOT_TYPE dl, IS_REFERENCE, >1
  11059. | GET_Z_TYPE_INFO edx, r1+offsetof(zend_reference, val)
  11060. |.if not(X64)
  11061. | GET_Z_W2 r0, r1+offsetof(zend_reference, val)
  11062. |.endif
  11063. | GET_Z_PTR r1, r1+offsetof(zend_reference, val)
  11064. | IF_NOT_REFCOUNTED dh, >2
  11065. |1:
  11066. | GC_ADDREF r1
  11067. |2:
  11068. | SET_ZVAL_PTR res_addr, r1
  11069. |.if not(X64)
  11070. | SET_ZVAL_W2 res_addr, r0
  11071. |.endif
  11072. | SET_ZVAL_TYPE_INFO res_addr, edx
  11073. return 1;
  11074. }
  11075. static int zend_jit_fetch_dim_read(dasm_State **Dst,
  11076. const zend_op *opline,
  11077. zend_ssa *ssa,
  11078. const zend_ssa_op *ssa_op,
  11079. uint32_t op1_info,
  11080. zend_jit_addr op1_addr,
  11081. bool op1_avoid_refcounting,
  11082. uint32_t op2_info,
  11083. uint32_t res_info,
  11084. zend_jit_addr res_addr,
  11085. uint8_t dim_type)
  11086. {
  11087. zend_jit_addr orig_op1_addr, op2_addr;
  11088. const void *exit_addr = NULL;
  11089. const void *not_found_exit_addr = NULL;
  11090. const void *res_exit_addr = NULL;
  11091. bool result_avoid_refcounting = 0;
  11092. uint32_t may_be_string = (opline->opcode != ZEND_FETCH_LIST_R) ? MAY_BE_STRING : 0;
  11093. int may_throw = 0;
  11094. orig_op1_addr = OP1_ADDR();
  11095. op2_addr = OP2_ADDR();
  11096. if (opline->opcode != ZEND_FETCH_DIM_IS
  11097. && JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  11098. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  11099. exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  11100. if (!exit_addr) {
  11101. return 0;
  11102. }
  11103. }
  11104. if ((res_info & MAY_BE_GUARD)
  11105. && JIT_G(current_frame)
  11106. && (op1_info & (MAY_BE_ANY|MAY_BE_UNDEF)) == MAY_BE_ARRAY) {
  11107. uint32_t flags = 0;
  11108. uint32_t old_op1_info = 0;
  11109. uint32_t old_info;
  11110. zend_jit_trace_stack *stack = JIT_G(current_frame)->stack;
  11111. int32_t exit_point;
  11112. if (opline->opcode != ZEND_FETCH_LIST_R
  11113. && (opline->op1_type & (IS_VAR|IS_TMP_VAR))
  11114. && !op1_avoid_refcounting) {
  11115. flags |= ZEND_JIT_EXIT_FREE_OP1;
  11116. }
  11117. if ((opline->op2_type & (IS_VAR|IS_TMP_VAR))
  11118. && (op2_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  11119. flags |= ZEND_JIT_EXIT_FREE_OP2;
  11120. }
  11121. if ((opline->result_type & (IS_VAR|IS_TMP_VAR))
  11122. && !(flags & ZEND_JIT_EXIT_FREE_OP1)
  11123. && (res_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))
  11124. && (ssa_op+1)->op1_use == ssa_op->result_def
  11125. && !(op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_REF) - (MAY_BE_STRING|MAY_BE_LONG)))
  11126. && zend_jit_may_avoid_refcounting(opline+1, res_info)) {
  11127. result_avoid_refcounting = 1;
  11128. ssa->var_info[ssa_op->result_def].avoid_refcounting = 1;
  11129. }
  11130. if (op1_avoid_refcounting) {
  11131. old_op1_info = STACK_INFO(stack, EX_VAR_TO_NUM(opline->op1.var));
  11132. SET_STACK_REG(stack, EX_VAR_TO_NUM(opline->op1.var), ZREG_NONE);
  11133. }
  11134. if (!(op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_REF) - (MAY_BE_STRING|MAY_BE_LONG)))) {
  11135. old_info = STACK_INFO(stack, EX_VAR_TO_NUM(opline->result.var));
  11136. SET_STACK_TYPE(stack, EX_VAR_TO_NUM(opline->result.var), IS_UNKNOWN, 1);
  11137. SET_STACK_REG(stack, EX_VAR_TO_NUM(opline->result.var), ZREG_ZVAL_COPY_GPR0);
  11138. exit_point = zend_jit_trace_get_exit_point(opline+1, flags);
  11139. SET_STACK_INFO(stack, EX_VAR_TO_NUM(opline->result.var), old_info);
  11140. res_exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  11141. if (!res_exit_addr) {
  11142. return 0;
  11143. }
  11144. res_info &= ~MAY_BE_GUARD;
  11145. ssa->var_info[ssa_op->result_def].type &= ~MAY_BE_GUARD;
  11146. }
  11147. if (opline->opcode == ZEND_FETCH_DIM_IS
  11148. && !(res_info & MAY_BE_NULL)) {
  11149. old_info = STACK_INFO(stack, EX_VAR_TO_NUM(opline->result.var));
  11150. SET_STACK_TYPE(stack, EX_VAR_TO_NUM(opline->result.var), IS_NULL, 0);
  11151. SET_STACK_REG(stack, EX_VAR_TO_NUM(opline->result.var), ZREG_NULL);
  11152. exit_point = zend_jit_trace_get_exit_point(opline+1, flags);
  11153. SET_STACK_INFO(stack, EX_VAR_TO_NUM(opline->result.var), old_info);
  11154. not_found_exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  11155. if (!not_found_exit_addr) {
  11156. return 0;
  11157. }
  11158. }
  11159. if (op1_avoid_refcounting) {
  11160. SET_STACK_INFO(stack, EX_VAR_TO_NUM(opline->op1.var), old_op1_info);
  11161. }
  11162. }
  11163. if (op1_info & MAY_BE_REF) {
  11164. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  11165. | ZVAL_DEREF FCARG1a, op1_info
  11166. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  11167. }
  11168. if (op1_info & MAY_BE_ARRAY) {
  11169. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF) - MAY_BE_ARRAY)) {
  11170. if (exit_addr && !(op1_info & (MAY_BE_OBJECT|may_be_string))) {
  11171. | IF_NOT_ZVAL_TYPE op1_addr, IS_ARRAY, &exit_addr
  11172. } else {
  11173. | IF_NOT_ZVAL_TYPE op1_addr, IS_ARRAY, >7
  11174. }
  11175. }
  11176. | GET_ZVAL_LVAL ZREG_FCARG1, op1_addr
  11177. if ((op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF) - (MAY_BE_LONG|MAY_BE_STRING))) ||
  11178. (opline->opcode != ZEND_FETCH_DIM_IS && JIT_G(trigger) != ZEND_JIT_ON_HOT_TRACE)) {
  11179. may_throw = 1;
  11180. }
  11181. if (!zend_jit_fetch_dimension_address_inner(Dst, opline, (opline->opcode != ZEND_FETCH_DIM_IS) ? BP_VAR_R : BP_VAR_IS, op1_info, op2_info, dim_type, res_exit_addr, not_found_exit_addr, exit_addr)) {
  11182. return 0;
  11183. }
  11184. }
  11185. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-MAY_BE_ARRAY)) {
  11186. if (op1_info & MAY_BE_ARRAY) {
  11187. |.cold_code
  11188. |7:
  11189. }
  11190. if (opline->opcode != ZEND_FETCH_LIST_R && (op1_info & MAY_BE_STRING)) {
  11191. may_throw = 1;
  11192. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_ARRAY|MAY_BE_STRING))) {
  11193. if (exit_addr && !(op1_info & MAY_BE_OBJECT)) {
  11194. | IF_NOT_ZVAL_TYPE op1_addr, IS_STRING, &exit_addr
  11195. } else {
  11196. | IF_NOT_ZVAL_TYPE op1_addr, IS_STRING, >6
  11197. }
  11198. }
  11199. | SET_EX_OPLINE opline, r0
  11200. | GET_ZVAL_LVAL ZREG_FCARG1, op1_addr
  11201. if (opline->opcode != ZEND_FETCH_DIM_IS) {
  11202. if ((op2_info & (MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_GUARD)) == MAY_BE_LONG) {
  11203. | GET_ZVAL_LVAL ZREG_FCARG2, op2_addr
  11204. | EXT_CALL zend_jit_fetch_dim_str_offset_r_helper, r0
  11205. } else {
  11206. | LOAD_ZVAL_ADDR FCARG2a, op2_addr
  11207. | EXT_CALL zend_jit_fetch_dim_str_r_helper, r0
  11208. }
  11209. | SET_ZVAL_PTR res_addr, r0
  11210. | SET_ZVAL_TYPE_INFO res_addr, IS_STRING
  11211. } else {
  11212. | LOAD_ZVAL_ADDR FCARG2a, op2_addr
  11213. |.if X64
  11214. | LOAD_ZVAL_ADDR CARG3, res_addr
  11215. |.else
  11216. | sub r4, 12
  11217. | PUSH_ZVAL_ADDR res_addr, r0
  11218. |.endif
  11219. | EXT_CALL zend_jit_fetch_dim_str_is_helper, r0
  11220. |.if not(X64)
  11221. | add r4, 12
  11222. |.endif
  11223. }
  11224. if ((op1_info & MAY_BE_ARRAY) ||
  11225. (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_ARRAY|MAY_BE_STRING)))) {
  11226. | jmp >9 // END
  11227. }
  11228. |6:
  11229. }
  11230. if (op1_info & MAY_BE_OBJECT) {
  11231. may_throw = 1;
  11232. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_ARRAY|MAY_BE_OBJECT|may_be_string))) {
  11233. if (exit_addr) {
  11234. | IF_NOT_ZVAL_TYPE op1_addr, IS_OBJECT, &exit_addr
  11235. } else {
  11236. | IF_NOT_ZVAL_TYPE op1_addr, IS_OBJECT, >6
  11237. }
  11238. }
  11239. | SET_EX_OPLINE opline, r0
  11240. if (Z_REG(op1_addr) != ZREG_FCARG1 || Z_OFFSET(op1_addr) != 0) {
  11241. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  11242. }
  11243. if (opline->op2_type == IS_CONST && Z_EXTRA_P(RT_CONSTANT(opline, opline->op2)) == ZEND_EXTRA_VALUE) {
  11244. ZEND_ASSERT(Z_MODE(op2_addr) == IS_CONST_ZVAL);
  11245. | LOAD_ADDR FCARG2a, (Z_ZV(op2_addr) + 1)
  11246. } else {
  11247. | LOAD_ZVAL_ADDR FCARG2a, op2_addr
  11248. }
  11249. |.if X64
  11250. | LOAD_ZVAL_ADDR CARG3, res_addr
  11251. |.else
  11252. | sub r4, 12
  11253. | PUSH_ZVAL_ADDR res_addr, r0
  11254. |.endif
  11255. if (opline->opcode != ZEND_FETCH_DIM_IS) {
  11256. | EXT_CALL zend_jit_fetch_dim_obj_r_helper, r0
  11257. } else {
  11258. | EXT_CALL zend_jit_fetch_dim_obj_is_helper, r0
  11259. }
  11260. |.if not(X64)
  11261. | add r4, 12
  11262. |.endif
  11263. if ((op1_info & MAY_BE_ARRAY) ||
  11264. (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_ARRAY|MAY_BE_OBJECT|may_be_string)))) {
  11265. | jmp >9 // END
  11266. }
  11267. |6:
  11268. }
  11269. if ((op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_ARRAY|MAY_BE_OBJECT|may_be_string)))
  11270. && (!exit_addr || !(op1_info & (MAY_BE_ARRAY|MAY_BE_OBJECT|may_be_string)))) {
  11271. if ((opline->opcode != ZEND_FETCH_DIM_IS && (op1_info & MAY_BE_UNDEF)) || (op2_info & MAY_BE_UNDEF)) {
  11272. | SET_EX_OPLINE opline, r0
  11273. if (opline->opcode != ZEND_FETCH_DIM_IS && (op1_info & MAY_BE_UNDEF)) {
  11274. may_throw = 1;
  11275. | IF_NOT_ZVAL_TYPE op1_addr, IS_UNDEF, >1
  11276. | // zend_error(E_WARNING, "Undefined variable $%s", ZSTR_VAL(CV_DEF_OF(EX_VAR_TO_NUM(opline->op1.var))));
  11277. | mov FCARG1d, opline->op1.var
  11278. | EXT_CALL zend_jit_undefined_op_helper, r0
  11279. |1:
  11280. }
  11281. if (op2_info & MAY_BE_UNDEF) {
  11282. may_throw = 1;
  11283. | IF_NOT_ZVAL_TYPE op2_addr, IS_UNDEF, >1
  11284. | mov FCARG1d, opline->op2.var
  11285. | EXT_CALL zend_jit_undefined_op_helper, r0
  11286. |1:
  11287. }
  11288. }
  11289. if (opline->opcode != ZEND_FETCH_DIM_IS && opline->opcode != ZEND_FETCH_LIST_R) {
  11290. may_throw = 1;
  11291. if ((op1_info & MAY_BE_UNDEF) || (op2_info & MAY_BE_UNDEF)) {
  11292. | LOAD_ZVAL_ADDR FCARG1a, orig_op1_addr
  11293. } else {
  11294. | SET_EX_OPLINE opline, r0
  11295. if (Z_MODE(op1_addr) != IS_MEM_ZVAL ||
  11296. Z_REG(op1_addr) != ZREG_FCARG1 ||
  11297. Z_OFFSET(op1_addr) != 0) {
  11298. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  11299. }
  11300. }
  11301. | EXT_CALL zend_jit_invalid_array_access, r0
  11302. }
  11303. | SET_ZVAL_TYPE_INFO res_addr, IS_NULL
  11304. if (op1_info & MAY_BE_ARRAY) {
  11305. | jmp >9 // END
  11306. }
  11307. }
  11308. if (op1_info & MAY_BE_ARRAY) {
  11309. |.code
  11310. }
  11311. }
  11312. if (op1_info & MAY_BE_ARRAY) {
  11313. zend_jit_addr val_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R0, 0);
  11314. |8:
  11315. if (res_exit_addr) {
  11316. zend_uchar type = concrete_type(res_info);
  11317. if ((op1_info & MAY_BE_ARRAY_OF_REF)
  11318. && dim_type != IS_UNKNOWN
  11319. && dim_type != IS_REFERENCE) {
  11320. if (type < IS_STRING) {
  11321. | IF_NOT_ZVAL_TYPE val_addr, type, >1
  11322. |.cold_code
  11323. |1:
  11324. | IF_NOT_ZVAL_TYPE val_addr, IS_REFERENCE, &res_exit_addr
  11325. | GET_Z_PTR r0, r0
  11326. | add r0, offsetof(zend_reference, val)
  11327. | IF_ZVAL_TYPE val_addr, type, >1
  11328. | jmp &res_exit_addr
  11329. |.code
  11330. |1:
  11331. } else {
  11332. | GET_ZVAL_TYPE_INFO edx, val_addr
  11333. | IF_NOT_TYPE dl, type, >1
  11334. |.cold_code
  11335. |1:
  11336. | IF_NOT_TYPE dl, IS_REFERENCE, &res_exit_addr
  11337. | GET_Z_PTR r0, r0
  11338. | add r0, offsetof(zend_reference, val)
  11339. | GET_ZVAL_TYPE_INFO edx, val_addr
  11340. | IF_TYPE dl, type, >1
  11341. | jmp &res_exit_addr
  11342. |.code
  11343. |1:
  11344. }
  11345. } else {
  11346. if (op1_info & MAY_BE_ARRAY_OF_REF) {
  11347. | ZVAL_DEREF r0, MAY_BE_REF
  11348. }
  11349. if (type < IS_STRING) {
  11350. | IF_NOT_ZVAL_TYPE val_addr, type, &res_exit_addr
  11351. } else {
  11352. | GET_ZVAL_TYPE_INFO edx, val_addr
  11353. | IF_NOT_TYPE dl, type, &res_exit_addr
  11354. }
  11355. }
  11356. | // ZVAL_COPY
  11357. |7:
  11358. | ZVAL_COPY_VALUE_V res_addr, -1, val_addr, res_info, ZREG_R0, ZREG_R1
  11359. if (Z_MODE(res_addr) == IS_MEM_ZVAL) {
  11360. if (type < IS_STRING) {
  11361. if (Z_REG(res_addr) != ZREG_FP ||
  11362. JIT_G(current_frame) == NULL ||
  11363. STACK_MEM_TYPE(JIT_G(current_frame)->stack, EX_VAR_TO_NUM(Z_OFFSET(res_addr))) != type) {
  11364. | SET_ZVAL_TYPE_INFO res_addr, type
  11365. }
  11366. } else {
  11367. | SET_ZVAL_TYPE_INFO res_addr, edx
  11368. if (!result_avoid_refcounting) {
  11369. | TRY_ADDREF res_info, dh, r1
  11370. }
  11371. }
  11372. } else if (!zend_jit_store_var_if_necessary(Dst, opline->result.var, res_addr, res_info)) {
  11373. return 0;
  11374. }
  11375. } else if (op1_info & MAY_BE_ARRAY_OF_REF) {
  11376. | // ZVAL_COPY_DEREF
  11377. | GET_ZVAL_TYPE_INFO Rd(ZREG_R2), val_addr
  11378. if (!zend_jit_zval_copy_deref(Dst, res_addr, val_addr, ZREG_R2)) {
  11379. return 0;
  11380. }
  11381. } else {
  11382. | // ZVAL_COPY
  11383. | ZVAL_COPY_VALUE res_addr, -1, val_addr, res_info, ZREG_R1, ZREG_R2
  11384. | TRY_ADDREF res_info, ch, r2
  11385. }
  11386. }
  11387. |9: // END
  11388. #ifdef ZEND_JIT_USE_RC_INFERENCE
  11389. if ((opline->op2_type & (IS_TMP_VAR|IS_VAR)) && (op1_info & MAY_BE_OBJECT)) {
  11390. /* Magic offsetGet() may increase refcount of the key */
  11391. op2_info |= MAY_BE_RCN;
  11392. }
  11393. #endif
  11394. if (opline->op2_type & (IS_TMP_VAR|IS_VAR)) {
  11395. if ((op2_info & MAY_HAVE_DTOR) && (op2_info & MAY_BE_RC1)) {
  11396. may_throw = 1;
  11397. }
  11398. | FREE_OP opline->op2_type, opline->op2, op2_info, 0, opline
  11399. }
  11400. if (opline->opcode != ZEND_FETCH_LIST_R && !op1_avoid_refcounting) {
  11401. if (opline->op1_type & (IS_TMP_VAR|IS_VAR)) {
  11402. if ((op1_info & MAY_HAVE_DTOR) && (op1_info & MAY_BE_RC1)) {
  11403. may_throw = 1;
  11404. }
  11405. | FREE_OP opline->op1_type, opline->op1, op1_info, 0, opline
  11406. }
  11407. }
  11408. if (may_throw) {
  11409. if (!zend_jit_check_exception(Dst)) {
  11410. return 0;
  11411. }
  11412. }
  11413. return 1;
  11414. }
  11415. static int zend_jit_fetch_dim(dasm_State **Dst,
  11416. const zend_op *opline,
  11417. uint32_t op1_info,
  11418. zend_jit_addr op1_addr,
  11419. uint32_t op2_info,
  11420. zend_jit_addr res_addr,
  11421. uint8_t dim_type)
  11422. {
  11423. zend_jit_addr op2_addr;
  11424. int may_throw = 0;
  11425. op2_addr = (opline->op2_type != IS_UNUSED) ? OP2_ADDR() : 0;
  11426. if (op1_info & MAY_BE_REF) {
  11427. may_throw = 1;
  11428. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  11429. | IF_NOT_Z_TYPE FCARG1a, IS_REFERENCE, >1
  11430. | GET_Z_PTR FCARG2a, FCARG1a
  11431. | IF_NOT_TYPE byte [FCARG2a + offsetof(zend_reference, val) + offsetof(zval, u1.v.type)], IS_ARRAY, >2
  11432. | lea FCARG1a, [FCARG2a + offsetof(zend_reference, val)]
  11433. | jmp >3
  11434. |.cold_code
  11435. |2:
  11436. | SET_EX_OPLINE opline, r0
  11437. | EXT_CALL zend_jit_prepare_assign_dim_ref, r0
  11438. | test r0, r0
  11439. | mov FCARG1a, r0
  11440. | jne >1
  11441. | jmp ->exception_handler_undef
  11442. |.code
  11443. |1:
  11444. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  11445. }
  11446. if (op1_info & MAY_BE_ARRAY) {
  11447. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF) - MAY_BE_ARRAY)) {
  11448. | IF_NOT_ZVAL_TYPE op1_addr, IS_ARRAY, >7
  11449. }
  11450. |3:
  11451. | SEPARATE_ARRAY op1_addr, op1_info, 1
  11452. }
  11453. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL)) {
  11454. if (op1_info & MAY_BE_ARRAY) {
  11455. |.cold_code
  11456. |7:
  11457. }
  11458. if (op1_info & (MAY_BE_ANY-(MAY_BE_NULL|MAY_BE_ARRAY))) {
  11459. | CMP_ZVAL_TYPE op1_addr, IS_NULL
  11460. | jg >7
  11461. }
  11462. if (Z_REG(op1_addr) != ZREG_FP) {
  11463. | mov T1, Ra(Z_REG(op1_addr)) // save
  11464. }
  11465. if ((op1_info & MAY_BE_UNDEF)
  11466. && opline->opcode == ZEND_FETCH_DIM_RW) {
  11467. may_throw = 1;
  11468. if (op1_info & MAY_BE_NULL) {
  11469. | IF_NOT_ZVAL_TYPE op1_addr, IS_UNDEF, >1
  11470. }
  11471. | SET_EX_OPLINE opline, r0
  11472. | mov FCARG1a, opline->op1.var
  11473. | EXT_CALL zend_jit_undefined_op_helper, r0
  11474. |1:
  11475. }
  11476. | // ZVAL_ARR(container, zend_new_array(8));
  11477. | EXT_CALL _zend_new_array_0, r0
  11478. if (Z_REG(op1_addr) != ZREG_FP) {
  11479. | mov Ra(Z_REG(op1_addr)), T1 // restore
  11480. }
  11481. | SET_ZVAL_LVAL op1_addr, r0
  11482. | SET_ZVAL_TYPE_INFO op1_addr, IS_ARRAY_EX
  11483. | mov FCARG1a, r0
  11484. if (op1_info & MAY_BE_ARRAY) {
  11485. | jmp >1
  11486. |.code
  11487. |1:
  11488. }
  11489. }
  11490. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_ARRAY)) {
  11491. |6:
  11492. if (opline->op2_type == IS_UNUSED) {
  11493. may_throw = 1;
  11494. | // var_ptr = zend_hash_next_index_insert(Z_ARRVAL_P(container), &EG(uninitialized_zval));
  11495. | LOAD_ADDR_ZTS FCARG2a, executor_globals, uninitialized_zval
  11496. | EXT_CALL zend_hash_next_index_insert, r0
  11497. | // if (UNEXPECTED(!var_ptr)) {
  11498. | test r0, r0
  11499. | jz >1
  11500. |.cold_code
  11501. |1:
  11502. | // zend_throw_error(NULL, "Cannot add element to the array as the next element is already occupied");
  11503. | CANNOT_ADD_ELEMENT opline
  11504. | SET_ZVAL_TYPE_INFO res_addr, IS_UNDEF
  11505. | //ZEND_VM_C_GOTO(assign_dim_op_ret_null);
  11506. | jmp >8
  11507. |.code
  11508. | SET_ZVAL_PTR res_addr, r0
  11509. | SET_ZVAL_TYPE_INFO res_addr, IS_INDIRECT
  11510. } else {
  11511. uint32_t type;
  11512. switch (opline->opcode) {
  11513. case ZEND_FETCH_DIM_W:
  11514. case ZEND_FETCH_LIST_W:
  11515. type = BP_VAR_W;
  11516. break;
  11517. case ZEND_FETCH_DIM_RW:
  11518. may_throw = 1;
  11519. type = BP_VAR_RW;
  11520. break;
  11521. case ZEND_FETCH_DIM_UNSET:
  11522. type = BP_VAR_UNSET;
  11523. break;
  11524. default:
  11525. ZEND_UNREACHABLE();
  11526. }
  11527. if (op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF) - (MAY_BE_LONG|MAY_BE_STRING))) {
  11528. may_throw = 1;
  11529. }
  11530. if (!zend_jit_fetch_dimension_address_inner(Dst, opline, type, op1_info, op2_info, dim_type, NULL, NULL, NULL)) {
  11531. return 0;
  11532. }
  11533. |8:
  11534. | SET_ZVAL_PTR res_addr, r0
  11535. | SET_ZVAL_TYPE_INFO res_addr, IS_INDIRECT
  11536. if (type == BP_VAR_RW || (op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF) - (MAY_BE_LONG|MAY_BE_STRING)))) {
  11537. |.cold_code
  11538. |9:
  11539. | SET_ZVAL_TYPE_INFO res_addr, IS_NULL
  11540. | jmp >8
  11541. |.code
  11542. }
  11543. }
  11544. }
  11545. if (op1_info & (MAY_BE_ANY-(MAY_BE_NULL|MAY_BE_ARRAY))) {
  11546. may_throw = 1;
  11547. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_ARRAY)) {
  11548. |.cold_code
  11549. |7:
  11550. }
  11551. | SET_EX_OPLINE opline, r0
  11552. if (Z_REG(op1_addr) != ZREG_FCARG1 || Z_OFFSET(op1_addr) != 0) {
  11553. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  11554. }
  11555. if (opline->op2_type == IS_UNUSED) {
  11556. | xor FCARG2a, FCARG2a
  11557. } else if (opline->op2_type == IS_CONST && Z_EXTRA_P(RT_CONSTANT(opline, opline->op2)) == ZEND_EXTRA_VALUE) {
  11558. ZEND_ASSERT(Z_MODE(op2_addr) == IS_CONST_ZVAL);
  11559. | LOAD_ADDR FCARG2a, (Z_ZV(op2_addr) + 1)
  11560. } else {
  11561. | LOAD_ZVAL_ADDR FCARG2a, op2_addr
  11562. }
  11563. |.if X64
  11564. | LOAD_ZVAL_ADDR CARG3, res_addr
  11565. |.else
  11566. | sub r4, 12
  11567. | PUSH_ZVAL_ADDR res_addr, r0
  11568. |.endif
  11569. switch (opline->opcode) {
  11570. case ZEND_FETCH_DIM_W:
  11571. case ZEND_FETCH_LIST_W:
  11572. | EXT_CALL zend_jit_fetch_dim_obj_w_helper, r0
  11573. break;
  11574. case ZEND_FETCH_DIM_RW:
  11575. | EXT_CALL zend_jit_fetch_dim_obj_rw_helper, r0
  11576. break;
  11577. // case ZEND_FETCH_DIM_UNSET:
  11578. // | EXT_CALL zend_jit_fetch_dim_obj_unset_helper, r0
  11579. // break;
  11580. default:
  11581. ZEND_UNREACHABLE();
  11582. }
  11583. |.if not(X64)
  11584. | add r4, 12
  11585. |.endif
  11586. if (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_ARRAY)) {
  11587. | jmp >8 // END
  11588. |.code
  11589. }
  11590. }
  11591. #ifdef ZEND_JIT_USE_RC_INFERENCE
  11592. if ((opline->op2_type & (IS_TMP_VAR|IS_VAR)) && (op1_info & (MAY_BE_UNDEF|MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_ARRAY|MAY_BE_OBJECT))) {
  11593. /* ASSIGN_DIM may increase refcount of the key */
  11594. op2_info |= MAY_BE_RCN;
  11595. }
  11596. #endif
  11597. if ((opline->op2_type & (IS_TMP_VAR|IS_VAR))
  11598. && (op2_info & MAY_HAVE_DTOR)
  11599. && (op2_info & MAY_BE_RC1)) {
  11600. may_throw = 1;
  11601. }
  11602. |8:
  11603. | FREE_OP opline->op2_type, opline->op2, op2_info, 0, opline
  11604. if (may_throw) {
  11605. if (!zend_jit_check_exception(Dst)) {
  11606. return 0;
  11607. }
  11608. }
  11609. return 1;
  11610. }
  11611. static int zend_jit_isset_isempty_dim(dasm_State **Dst,
  11612. const zend_op *opline,
  11613. uint32_t op1_info,
  11614. zend_jit_addr op1_addr,
  11615. bool op1_avoid_refcounting,
  11616. uint32_t op2_info,
  11617. uint8_t dim_type,
  11618. int may_throw,
  11619. zend_uchar smart_branch_opcode,
  11620. uint32_t target_label,
  11621. uint32_t target_label2,
  11622. const void *exit_addr)
  11623. {
  11624. zend_jit_addr op2_addr, res_addr;
  11625. // TODO: support for empty() ???
  11626. ZEND_ASSERT(!(opline->extended_value & ZEND_ISEMPTY));
  11627. op2_addr = OP2_ADDR();
  11628. res_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->result.var);
  11629. if (op1_info & MAY_BE_REF) {
  11630. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  11631. | ZVAL_DEREF FCARG1a, op1_info
  11632. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  11633. }
  11634. if (op1_info & MAY_BE_ARRAY) {
  11635. const void *found_exit_addr = NULL;
  11636. const void *not_found_exit_addr = NULL;
  11637. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF) - MAY_BE_ARRAY)) {
  11638. | IF_NOT_ZVAL_TYPE op1_addr, IS_ARRAY, >7
  11639. }
  11640. | GET_ZVAL_LVAL ZREG_FCARG1, op1_addr
  11641. if (exit_addr
  11642. && !(op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-MAY_BE_ARRAY))
  11643. && !may_throw
  11644. && (!(opline->op1_type & (IS_TMP_VAR|IS_VAR)) || op1_avoid_refcounting)
  11645. && (!(opline->op2_type & (IS_TMP_VAR|IS_VAR)) || !(op2_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-MAY_BE_LONG)))) {
  11646. if (smart_branch_opcode == ZEND_JMPNZ) {
  11647. found_exit_addr = exit_addr;
  11648. } else {
  11649. not_found_exit_addr = exit_addr;
  11650. }
  11651. }
  11652. if (!zend_jit_fetch_dimension_address_inner(Dst, opline, BP_JIT_IS, op1_info, op2_info, dim_type, found_exit_addr, not_found_exit_addr, NULL)) {
  11653. return 0;
  11654. }
  11655. if (found_exit_addr) {
  11656. |9:
  11657. return 1;
  11658. } else if (not_found_exit_addr) {
  11659. |8:
  11660. return 1;
  11661. }
  11662. }
  11663. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-MAY_BE_ARRAY)) {
  11664. if (op1_info & MAY_BE_ARRAY) {
  11665. |.cold_code
  11666. |7:
  11667. }
  11668. if (op1_info & (MAY_BE_STRING|MAY_BE_OBJECT)) {
  11669. | SET_EX_OPLINE opline, r0
  11670. if (Z_REG(op1_addr) != ZREG_FCARG1 || Z_OFFSET(op1_addr) != 0) {
  11671. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  11672. }
  11673. if (opline->op2_type == IS_CONST && Z_EXTRA_P(RT_CONSTANT(opline, opline->op2)) == ZEND_EXTRA_VALUE) {
  11674. ZEND_ASSERT(Z_MODE(op2_addr) == IS_CONST_ZVAL);
  11675. | LOAD_ADDR FCARG2a, (Z_ZV(op2_addr) + 1)
  11676. } else {
  11677. | LOAD_ZVAL_ADDR FCARG2a, op2_addr
  11678. }
  11679. | EXT_CALL zend_jit_isset_dim_helper, r0
  11680. | test r0, r0
  11681. | jz >9
  11682. if (op1_info & MAY_BE_ARRAY) {
  11683. | jmp >8
  11684. |.code
  11685. }
  11686. } else {
  11687. if (op2_info & MAY_BE_UNDEF) {
  11688. if (op2_info & MAY_BE_ANY) {
  11689. | IF_NOT_ZVAL_TYPE op2_addr, IS_UNDEF, >1
  11690. }
  11691. | SET_EX_OPLINE opline, r0
  11692. | mov FCARG1d, opline->op2.var
  11693. | EXT_CALL zend_jit_undefined_op_helper, r0
  11694. |1:
  11695. }
  11696. if (op1_info & MAY_BE_ARRAY) {
  11697. | jmp >9
  11698. |.code
  11699. }
  11700. }
  11701. }
  11702. #ifdef ZEND_JIT_USE_RC_INFERENCE
  11703. if ((opline->op2_type & (IS_TMP_VAR|IS_VAR)) && (op1_info & MAY_BE_OBJECT)) {
  11704. /* Magic offsetExists() may increase refcount of the key */
  11705. op2_info |= MAY_BE_RCN;
  11706. }
  11707. #endif
  11708. if (op1_info & (MAY_BE_ARRAY|MAY_BE_STRING|MAY_BE_OBJECT)) {
  11709. |8:
  11710. | FREE_OP opline->op2_type, opline->op2, op2_info, 0, opline
  11711. if (!op1_avoid_refcounting) {
  11712. | FREE_OP opline->op1_type, opline->op1, op1_info, 0, opline
  11713. }
  11714. if (may_throw) {
  11715. if (!zend_jit_check_exception_undef_result(Dst, opline)) {
  11716. return 0;
  11717. }
  11718. }
  11719. if (!(opline->extended_value & ZEND_ISEMPTY)) {
  11720. if (exit_addr) {
  11721. if (smart_branch_opcode == ZEND_JMPNZ) {
  11722. | jmp &exit_addr
  11723. } else {
  11724. | jmp >8
  11725. }
  11726. } else if (smart_branch_opcode) {
  11727. if (smart_branch_opcode == ZEND_JMPZ) {
  11728. | jmp =>target_label2
  11729. } else if (smart_branch_opcode == ZEND_JMPNZ) {
  11730. | jmp =>target_label
  11731. } else if (smart_branch_opcode == ZEND_JMPZNZ) {
  11732. | jmp =>target_label2
  11733. } else {
  11734. ZEND_UNREACHABLE();
  11735. }
  11736. } else {
  11737. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  11738. | jmp >8
  11739. }
  11740. } else {
  11741. | NIY // TODO: support for empty()
  11742. }
  11743. }
  11744. |9: // not found
  11745. | FREE_OP opline->op2_type, opline->op2, op2_info, 0, opline
  11746. if (!op1_avoid_refcounting) {
  11747. | FREE_OP opline->op1_type, opline->op1, op1_info, 0, opline
  11748. }
  11749. if (may_throw) {
  11750. if (!zend_jit_check_exception_undef_result(Dst, opline)) {
  11751. return 0;
  11752. }
  11753. }
  11754. if (!(opline->extended_value & ZEND_ISEMPTY)) {
  11755. if (exit_addr) {
  11756. if (smart_branch_opcode == ZEND_JMPZ) {
  11757. | jmp &exit_addr
  11758. }
  11759. } else if (smart_branch_opcode) {
  11760. if (smart_branch_opcode == ZEND_JMPZ) {
  11761. | jmp =>target_label
  11762. } else if (smart_branch_opcode == ZEND_JMPNZ) {
  11763. } else if (smart_branch_opcode == ZEND_JMPZNZ) {
  11764. | jmp =>target_label
  11765. } else {
  11766. ZEND_UNREACHABLE();
  11767. }
  11768. } else {
  11769. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  11770. }
  11771. } else {
  11772. | NIY // TODO: support for empty()
  11773. }
  11774. |8:
  11775. return 1;
  11776. }
  11777. static int zend_jit_bind_global(dasm_State **Dst, const zend_op *opline, uint32_t op1_info)
  11778. {
  11779. zend_jit_addr op1_addr = OP1_ADDR();
  11780. zend_string *varname = Z_STR_P(RT_CONSTANT(opline, opline->op2));
  11781. | // idx = (uint32_t)(uintptr_t)CACHED_PTR(opline->extended_value) - 1;
  11782. | mov FCARG2a, EX->run_time_cache
  11783. | mov r0, aword [FCARG2a + opline->extended_value]
  11784. | sub r0, 1
  11785. | // if (EXPECTED(idx < EG(symbol_table).nNumUsed * sizeof(Bucket)))
  11786. | MEM_LOAD_ZTS ecx, dword, executor_globals, symbol_table.nNumUsed, r1
  11787. |.if X64
  11788. | shl r1, 5
  11789. |.else
  11790. | imul r1, sizeof(Bucket)
  11791. |.endif
  11792. | cmp r0, r1
  11793. | jae >9
  11794. | // Bucket *p = (Bucket*)((char*)EG(symbol_table).arData + idx);
  11795. | MEM_LOAD_OP_ZTS add, r0, aword, executor_globals, symbol_table.arData, r1
  11796. | IF_NOT_Z_TYPE r0, IS_REFERENCE, >9
  11797. | // (EXPECTED(p->key == varname))
  11798. | ADDR_CMP aword [r0 + offsetof(Bucket, key)], varname, r1
  11799. | jne >9
  11800. | GET_Z_PTR r0, r0
  11801. | GC_ADDREF r0
  11802. |1:
  11803. if (op1_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE|MAY_BE_REF)) {
  11804. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF) - (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  11805. | // if (UNEXPECTED(Z_REFCOUNTED_P(variable_ptr)))
  11806. | IF_ZVAL_REFCOUNTED op1_addr, >2
  11807. |.cold_code
  11808. |2:
  11809. }
  11810. | // zend_refcounted *garbage = Z_COUNTED_P(variable_ptr);
  11811. | GET_ZVAL_PTR FCARG1a, op1_addr
  11812. | // ZVAL_REF(variable_ptr, ref)
  11813. | SET_ZVAL_PTR op1_addr, r0
  11814. | SET_ZVAL_TYPE_INFO op1_addr, IS_REFERENCE_EX
  11815. | // if (GC_DELREF(garbage) == 0)
  11816. | GC_DELREF FCARG1a
  11817. if (op1_info & (MAY_BE_REF|MAY_BE_ARRAY|MAY_BE_OBJECT)) {
  11818. | jnz >3
  11819. } else {
  11820. | jnz >5
  11821. }
  11822. | ZVAL_DTOR_FUNC op1_info, opline
  11823. | jmp >5
  11824. if (op1_info & (MAY_BE_REF|MAY_BE_ARRAY|MAY_BE_OBJECT)) {
  11825. |3:
  11826. | // GC_ZVAL_CHECK_POSSIBLE_ROOT(variable_ptr)
  11827. | IF_GC_MAY_NOT_LEAK FCARG1a, >5
  11828. | EXT_CALL gc_possible_root, r1
  11829. | jmp >5
  11830. }
  11831. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF) - (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  11832. |.code
  11833. }
  11834. }
  11835. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF) - (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  11836. | // ZVAL_REF(variable_ptr, ref)
  11837. | SET_ZVAL_PTR op1_addr, r0
  11838. | SET_ZVAL_TYPE_INFO op1_addr, IS_REFERENCE_EX
  11839. }
  11840. |5:
  11841. //END of handler
  11842. |.cold_code
  11843. |9:
  11844. | LOAD_ADDR FCARG1a, (ptrdiff_t)varname
  11845. if (opline->extended_value) {
  11846. | add FCARG2a, opline->extended_value
  11847. }
  11848. | EXT_CALL zend_jit_fetch_global_helper, r0
  11849. | jmp <1
  11850. |.code
  11851. return 1;
  11852. }
  11853. static int zend_jit_verify_arg_type(dasm_State **Dst, const zend_op *opline, zend_arg_info *arg_info, bool check_exception)
  11854. {
  11855. zend_jit_addr res_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->result.var);
  11856. bool in_cold = 0;
  11857. uint32_t type_mask = ZEND_TYPE_PURE_MASK(arg_info->type) & MAY_BE_ANY;
  11858. zend_reg tmp_reg = (type_mask == 0 || is_power_of_two(type_mask)) ? ZREG_FCARG1 : ZREG_R0;
  11859. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE
  11860. && JIT_G(current_frame)
  11861. && JIT_G(current_frame)->prev) {
  11862. zend_jit_trace_stack *stack = JIT_G(current_frame)->stack;
  11863. uint8_t type = STACK_TYPE(stack, EX_VAR_TO_NUM(opline->result.var));
  11864. if (type != IS_UNKNOWN && (type_mask & (1u << type))) {
  11865. return 1;
  11866. }
  11867. }
  11868. if (ZEND_ARG_SEND_MODE(arg_info)) {
  11869. if (opline->opcode == ZEND_RECV_INIT) {
  11870. | LOAD_ZVAL_ADDR Ra(tmp_reg), res_addr
  11871. | ZVAL_DEREF Ra(tmp_reg), MAY_BE_REF
  11872. res_addr = ZEND_ADDR_MEM_ZVAL(tmp_reg, 0);
  11873. } else {
  11874. | GET_ZVAL_PTR Ra(tmp_reg), res_addr
  11875. res_addr = ZEND_ADDR_MEM_ZVAL(tmp_reg, offsetof(zend_reference, val));
  11876. }
  11877. }
  11878. if (type_mask != 0) {
  11879. if (is_power_of_two(type_mask)) {
  11880. uint32_t type_code = concrete_type(type_mask);
  11881. | IF_NOT_ZVAL_TYPE res_addr, type_code, >1
  11882. } else {
  11883. | mov edx, 1
  11884. | mov cl, byte [Ra(Z_REG(res_addr))+Z_OFFSET(res_addr)+offsetof(zval, u1.v.type)]
  11885. | shl edx, cl
  11886. | test edx, type_mask
  11887. | je >1
  11888. }
  11889. |.cold_code
  11890. |1:
  11891. in_cold = 1;
  11892. }
  11893. if (Z_REG(res_addr) != ZREG_FCARG1 || Z_OFFSET(res_addr) != 0) {
  11894. | LOAD_ZVAL_ADDR FCARG1a, res_addr
  11895. }
  11896. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  11897. | SET_EX_OPLINE opline, r0
  11898. } else {
  11899. | ADDR_STORE aword EX->opline, opline, r0
  11900. }
  11901. | LOAD_ADDR FCARG2a, (ptrdiff_t)arg_info
  11902. | EXT_CALL zend_jit_verify_arg_slow, r0
  11903. if (check_exception) {
  11904. | test al, al
  11905. if (in_cold) {
  11906. | jnz >1
  11907. | jmp ->exception_handler
  11908. |.code
  11909. |1:
  11910. } else {
  11911. | jz ->exception_handler
  11912. }
  11913. } else if (in_cold) {
  11914. | jmp >1
  11915. |.code
  11916. |1:
  11917. }
  11918. return 1;
  11919. }
  11920. static int zend_jit_recv(dasm_State **Dst, const zend_op *opline, const zend_op_array *op_array)
  11921. {
  11922. uint32_t arg_num = opline->op1.num;
  11923. zend_arg_info *arg_info = NULL;
  11924. if (op_array->fn_flags & ZEND_ACC_HAS_TYPE_HINTS) {
  11925. if (EXPECTED(arg_num <= op_array->num_args)) {
  11926. arg_info = &op_array->arg_info[arg_num-1];
  11927. } else if (UNEXPECTED(op_array->fn_flags & ZEND_ACC_VARIADIC)) {
  11928. arg_info = &op_array->arg_info[op_array->num_args];
  11929. }
  11930. if (arg_info && !ZEND_TYPE_IS_SET(arg_info->type)) {
  11931. arg_info = NULL;
  11932. }
  11933. }
  11934. if (arg_info || (opline+1)->opcode != ZEND_RECV) {
  11935. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  11936. if (!JIT_G(current_frame) ||
  11937. TRACE_FRAME_NUM_ARGS(JIT_G(current_frame)) < 0 ||
  11938. arg_num > TRACE_FRAME_NUM_ARGS(JIT_G(current_frame))) {
  11939. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  11940. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  11941. if (!exit_addr) {
  11942. return 0;
  11943. }
  11944. | cmp dword EX->This.u2.num_args, arg_num
  11945. | jb &exit_addr
  11946. }
  11947. } else {
  11948. | cmp dword EX->This.u2.num_args, arg_num
  11949. | jb >1
  11950. |.cold_code
  11951. |1:
  11952. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  11953. | SET_EX_OPLINE opline, r0
  11954. } else {
  11955. | ADDR_STORE aword EX->opline, opline, r0
  11956. }
  11957. | mov FCARG1a, FP
  11958. | EXT_CALL zend_missing_arg_error, r0
  11959. | jmp ->exception_handler
  11960. |.code
  11961. }
  11962. }
  11963. if (arg_info) {
  11964. if (!zend_jit_verify_arg_type(Dst, opline, arg_info, 1)) {
  11965. return 0;
  11966. }
  11967. }
  11968. if (JIT_G(trigger) != ZEND_JIT_ON_HOT_TRACE) {
  11969. if ((opline+1)->opcode != ZEND_RECV && (opline+1)->opcode != ZEND_RECV_INIT) {
  11970. | LOAD_IP_ADDR (opline + 1)
  11971. zend_jit_set_last_valid_opline(opline + 1);
  11972. }
  11973. }
  11974. return 1;
  11975. }
  11976. static int zend_jit_recv_init(dasm_State **Dst, const zend_op *opline, const zend_op_array *op_array, bool is_last, int may_throw)
  11977. {
  11978. uint32_t arg_num = opline->op1.num;
  11979. zval *zv = RT_CONSTANT(opline, opline->op2);
  11980. zend_jit_addr res_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->result.var);
  11981. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE
  11982. && JIT_G(current_frame)
  11983. && TRACE_FRAME_NUM_ARGS(JIT_G(current_frame)) >= 0) {
  11984. if (arg_num > TRACE_FRAME_NUM_ARGS(JIT_G(current_frame))) {
  11985. | ZVAL_COPY_CONST res_addr, -1, -1, zv, ZREG_R0
  11986. if (Z_REFCOUNTED_P(zv)) {
  11987. | ADDREF_CONST zv, r0
  11988. }
  11989. }
  11990. } else {
  11991. if (JIT_G(trigger) != ZEND_JIT_ON_HOT_TRACE ||
  11992. (op_array->fn_flags & ZEND_ACC_HAS_TYPE_HINTS)) {
  11993. | cmp dword EX->This.u2.num_args, arg_num
  11994. | jae >5
  11995. }
  11996. | ZVAL_COPY_CONST res_addr, -1, -1, zv, ZREG_R0
  11997. if (Z_REFCOUNTED_P(zv)) {
  11998. | ADDREF_CONST zv, r0
  11999. }
  12000. }
  12001. if (Z_CONSTANT_P(zv)) {
  12002. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  12003. | SET_EX_OPLINE opline, r0
  12004. } else {
  12005. | ADDR_STORE aword EX->opline, opline, r0
  12006. }
  12007. | LOAD_ZVAL_ADDR FCARG1a, res_addr
  12008. | mov r0, EX->func
  12009. | mov FCARG2a, [r0 + offsetof(zend_op_array, scope)]
  12010. | .if X64
  12011. | EXT_CALL zval_update_constant_ex, r0
  12012. | .else
  12013. ||#if (PHP_VERSION_ID < 80100) && (SIZEOF_SIZE_T == 4)
  12014. | EXT_CALL zval_jit_update_constant_ex, r0
  12015. ||#else
  12016. | EXT_CALL zval_update_constant_ex, r0
  12017. ||#endif
  12018. | .endif
  12019. | test al, al
  12020. | jnz >1
  12021. |.cold_code
  12022. |1:
  12023. | ZVAL_PTR_DTOR res_addr, MAY_BE_ANY|MAY_BE_RC1|MAY_BE_RCN, 1, 0, opline
  12024. | SET_ZVAL_TYPE_INFO res_addr, IS_UNDEF
  12025. | jmp ->exception_handler
  12026. |.code
  12027. }
  12028. |5:
  12029. if (op_array->fn_flags & ZEND_ACC_HAS_TYPE_HINTS) {
  12030. do {
  12031. zend_arg_info *arg_info;
  12032. if (arg_num <= op_array->num_args) {
  12033. arg_info = &op_array->arg_info[arg_num-1];
  12034. } else if (op_array->fn_flags & ZEND_ACC_VARIADIC) {
  12035. arg_info = &op_array->arg_info[op_array->num_args];
  12036. } else {
  12037. break;
  12038. }
  12039. if (!ZEND_TYPE_IS_SET(arg_info->type)) {
  12040. break;
  12041. }
  12042. if (!zend_jit_verify_arg_type(Dst, opline, arg_info, may_throw)) {
  12043. return 0;
  12044. }
  12045. } while (0);
  12046. }
  12047. if (JIT_G(trigger) != ZEND_JIT_ON_HOT_TRACE) {
  12048. if (is_last) {
  12049. | LOAD_IP_ADDR (opline + 1)
  12050. zend_jit_set_last_valid_opline(opline + 1);
  12051. }
  12052. }
  12053. return 1;
  12054. }
  12055. static int zend_jit_class_guard(dasm_State **Dst, const zend_op *opline, zend_class_entry *ce)
  12056. {
  12057. int32_t exit_point = zend_jit_trace_get_exit_point(opline, 0);
  12058. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  12059. if (!exit_addr) {
  12060. return 0;
  12061. }
  12062. |.if X64
  12063. || if (!IS_SIGNED_32BIT(ce)) {
  12064. | mov64 r0, ((ptrdiff_t)ce)
  12065. | cmp aword [FCARG1a + offsetof(zend_object, ce)], r0
  12066. || } else {
  12067. | cmp aword [FCARG1a + offsetof(zend_object, ce)], ce
  12068. || }
  12069. |.else
  12070. | cmp aword [FCARG1a + offsetof(zend_object, ce)], ce
  12071. |.endif
  12072. | jne &exit_addr
  12073. return 1;
  12074. }
  12075. static int zend_jit_fetch_obj(dasm_State **Dst,
  12076. const zend_op *opline,
  12077. const zend_op_array *op_array,
  12078. zend_ssa *ssa,
  12079. const zend_ssa_op *ssa_op,
  12080. uint32_t op1_info,
  12081. zend_jit_addr op1_addr,
  12082. bool op1_indirect,
  12083. zend_class_entry *ce,
  12084. bool ce_is_instanceof,
  12085. bool on_this,
  12086. bool delayed_fetch_this,
  12087. bool op1_avoid_refcounting,
  12088. zend_class_entry *trace_ce,
  12089. uint8_t prop_type,
  12090. int may_throw)
  12091. {
  12092. zval *member;
  12093. zend_property_info *prop_info;
  12094. bool may_be_dynamic = 1;
  12095. zend_jit_addr res_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->result.var);
  12096. zend_jit_addr this_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, offsetof(zend_execute_data, This));
  12097. zend_jit_addr prop_addr;
  12098. uint32_t res_info = RES_INFO();
  12099. bool type_loaded = 0;
  12100. ZEND_ASSERT(opline->op2_type == IS_CONST);
  12101. ZEND_ASSERT(op1_info & MAY_BE_OBJECT);
  12102. member = RT_CONSTANT(opline, opline->op2);
  12103. ZEND_ASSERT(Z_TYPE_P(member) == IS_STRING && Z_STRVAL_P(member)[0] != '\0');
  12104. prop_info = zend_get_known_property_info(op_array, ce, Z_STR_P(member), on_this, op_array->filename);
  12105. if (on_this) {
  12106. | GET_ZVAL_PTR FCARG1a, this_addr
  12107. } else {
  12108. if (opline->op1_type == IS_VAR
  12109. && opline->opcode == ZEND_FETCH_OBJ_W
  12110. && (op1_info & MAY_BE_INDIRECT)
  12111. && Z_REG(op1_addr) == ZREG_FP) {
  12112. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  12113. | IF_NOT_Z_TYPE FCARG1a, IS_INDIRECT, >1
  12114. | GET_Z_PTR FCARG1a, FCARG1a
  12115. |1:
  12116. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  12117. }
  12118. if (op1_info & MAY_BE_REF) {
  12119. if (Z_REG(op1_addr) != ZREG_FCARG1 || Z_OFFSET(op1_addr) != 0) {
  12120. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  12121. }
  12122. | ZVAL_DEREF FCARG1a, op1_info
  12123. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  12124. }
  12125. if (op1_info & ((MAY_BE_UNDEF|MAY_BE_ANY)- MAY_BE_OBJECT)) {
  12126. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  12127. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  12128. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  12129. if (!exit_addr) {
  12130. return 0;
  12131. }
  12132. | IF_NOT_ZVAL_TYPE op1_addr, IS_OBJECT, &exit_addr
  12133. } else {
  12134. | IF_NOT_ZVAL_TYPE op1_addr, IS_OBJECT, >7
  12135. }
  12136. }
  12137. | GET_ZVAL_PTR FCARG1a, op1_addr
  12138. }
  12139. if (!prop_info && trace_ce && (trace_ce->ce_flags & ZEND_ACC_IMMUTABLE)) {
  12140. prop_info = zend_get_known_property_info(op_array, trace_ce, Z_STR_P(member), on_this, op_array->filename);
  12141. if (prop_info) {
  12142. ce = trace_ce;
  12143. ce_is_instanceof = 0;
  12144. if (!(op1_info & MAY_BE_CLASS_GUARD)) {
  12145. if (on_this && JIT_G(current_frame)
  12146. && TRACE_FRAME_IS_THIS_CLASS_CHECKED(JIT_G(current_frame))) {
  12147. ZEND_ASSERT(JIT_G(current_frame)->ce == ce);
  12148. } else if (zend_jit_class_guard(Dst, opline, ce)) {
  12149. if (on_this && JIT_G(current_frame)) {
  12150. JIT_G(current_frame)->ce = ce;
  12151. TRACE_FRAME_SET_THIS_CLASS_CHECKED(JIT_G(current_frame));
  12152. }
  12153. } else {
  12154. return 0;
  12155. }
  12156. if (ssa->var_info && ssa_op->op1_use >= 0) {
  12157. ssa->var_info[ssa_op->op1_use].type |= MAY_BE_CLASS_GUARD;
  12158. ssa->var_info[ssa_op->op1_use].ce = ce;
  12159. ssa->var_info[ssa_op->op1_use].is_instanceof = ce_is_instanceof;
  12160. }
  12161. }
  12162. }
  12163. }
  12164. if (!prop_info) {
  12165. | mov r0, EX->run_time_cache
  12166. | mov r2, aword [r0 + (opline->extended_value & ~ZEND_FETCH_OBJ_FLAGS)]
  12167. | cmp r2, aword [FCARG1a + offsetof(zend_object, ce)]
  12168. | jne >5
  12169. | mov r0, aword [r0 + (opline->extended_value & ~ZEND_FETCH_OBJ_FLAGS) + sizeof(void*)]
  12170. may_be_dynamic = zend_may_be_dynamic_property(ce, Z_STR_P(member), opline->op1_type == IS_UNUSED, op_array->filename);
  12171. if (may_be_dynamic) {
  12172. | test r0, r0
  12173. if (opline->opcode == ZEND_FETCH_OBJ_W) {
  12174. | jl >5
  12175. } else {
  12176. | jl >8 // dynamic property
  12177. }
  12178. }
  12179. | mov edx, dword [FCARG1a + r0 + 8]
  12180. | IF_UNDEF dl, >5
  12181. | add FCARG1a, r0
  12182. type_loaded = 1;
  12183. prop_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  12184. if (opline->opcode == ZEND_FETCH_OBJ_W
  12185. && (!ce || ce_is_instanceof || (ce->ce_flags & ZEND_ACC_HAS_TYPE_HINTS))) {
  12186. uint32_t flags = opline->extended_value & ZEND_FETCH_OBJ_FLAGS;
  12187. | mov r0, EX->run_time_cache
  12188. | mov FCARG2a, aword [r0 + (opline->extended_value & ~ZEND_FETCH_OBJ_FLAGS) + sizeof(void*) * 2]
  12189. | test FCARG2a, FCARG2a
  12190. | jnz >1
  12191. |.cold_code
  12192. |1:
  12193. | test dword [FCARG2a + offsetof(zend_property_info, flags)], ZEND_ACC_READONLY
  12194. if (flags) {
  12195. | jz >3
  12196. } else {
  12197. | jz >4
  12198. }
  12199. | IF_NOT_Z_TYPE FCARG1a, IS_OBJECT, >2
  12200. | GET_Z_PTR r0, FCARG1a
  12201. | GC_ADDREF r0
  12202. | SET_ZVAL_PTR res_addr, r0
  12203. | SET_ZVAL_TYPE_INFO res_addr, IS_OBJECT_EX
  12204. | jmp >9
  12205. |2:
  12206. | mov FCARG1a, FCARG2a
  12207. | SET_EX_OPLINE opline, r0
  12208. | EXT_CALL zend_readonly_property_modification_error, r0
  12209. | SET_ZVAL_TYPE_INFO res_addr, _IS_ERROR
  12210. | jmp >9
  12211. |3:
  12212. if (flags == ZEND_FETCH_DIM_WRITE) {
  12213. | SET_EX_OPLINE opline, r0
  12214. | EXT_CALL zend_jit_check_array_promotion, r0
  12215. | jmp >9
  12216. } else if (flags == ZEND_FETCH_REF) {
  12217. |.if X64
  12218. | LOAD_ZVAL_ADDR CARG3, res_addr
  12219. |.else
  12220. | sub r4, 12
  12221. | PUSH_ZVAL_ADDR res_addr, r0
  12222. |.endif
  12223. | EXT_CALL zend_jit_create_typed_ref, r0
  12224. |.if not(X64)
  12225. | add r4, 12
  12226. |.endif
  12227. | jmp >9
  12228. } else {
  12229. ZEND_ASSERT(flags == 0);
  12230. }
  12231. |.code
  12232. |4:
  12233. }
  12234. } else {
  12235. prop_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, prop_info->offset);
  12236. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  12237. if (opline->opcode == ZEND_FETCH_OBJ_W || !(res_info & MAY_BE_GUARD) || !JIT_G(current_frame)) {
  12238. /* perform IS_UNDEF check only after result type guard (during deoptimization) */
  12239. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  12240. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  12241. if (!exit_addr) {
  12242. return 0;
  12243. }
  12244. type_loaded = 1;
  12245. | mov edx, dword [FCARG1a + prop_info->offset + 8]
  12246. | IF_UNDEF dl, &exit_addr
  12247. }
  12248. } else {
  12249. type_loaded = 1;
  12250. | mov edx, dword [FCARG1a + prop_info->offset + 8]
  12251. | IF_UNDEF dl, >5
  12252. }
  12253. if (opline->opcode == ZEND_FETCH_OBJ_W && (prop_info->flags & ZEND_ACC_READONLY)) {
  12254. if (!type_loaded) {
  12255. type_loaded = 1;
  12256. | mov edx, dword [FCARG1a + prop_info->offset + 8]
  12257. }
  12258. | IF_NOT_TYPE dl, IS_OBJECT, >4
  12259. | GET_ZVAL_PTR r0, prop_addr
  12260. | GC_ADDREF r0
  12261. | SET_ZVAL_PTR res_addr, r0
  12262. | SET_ZVAL_TYPE_INFO res_addr, IS_OBJECT_EX
  12263. | jmp >9
  12264. |.cold_code
  12265. |4:
  12266. | LOAD_ADDR FCARG1a, prop_info
  12267. | SET_EX_OPLINE opline, r0
  12268. | EXT_CALL zend_readonly_property_modification_error, r0
  12269. | SET_ZVAL_TYPE_INFO res_addr, _IS_ERROR
  12270. | jmp >9
  12271. |.code
  12272. }
  12273. if (opline->opcode == ZEND_FETCH_OBJ_W
  12274. && (opline->extended_value & ZEND_FETCH_OBJ_FLAGS)
  12275. && ZEND_TYPE_IS_SET(prop_info->type)) {
  12276. uint32_t flags = opline->extended_value & ZEND_FETCH_OBJ_FLAGS;
  12277. if (flags == ZEND_FETCH_DIM_WRITE) {
  12278. if ((ZEND_TYPE_FULL_MASK(prop_info->type) & (MAY_BE_ITERABLE|MAY_BE_ARRAY)) == 0) {
  12279. if (!type_loaded) {
  12280. type_loaded = 1;
  12281. | mov edx, dword [FCARG1a + prop_info->offset + 8]
  12282. }
  12283. | cmp dl, IS_FALSE
  12284. | jle >1
  12285. |.cold_code
  12286. |1:
  12287. if (Z_REG(prop_addr) != ZREG_FCARG1 || Z_OFFSET(prop_addr) != 0) {
  12288. | LOAD_ZVAL_ADDR FCARG1a, prop_addr
  12289. }
  12290. | LOAD_ADDR FCARG2a, prop_info
  12291. | SET_EX_OPLINE opline, r0
  12292. | EXT_CALL zend_jit_check_array_promotion, r0
  12293. | jmp >9
  12294. |.code
  12295. }
  12296. } else if (flags == ZEND_FETCH_REF) {
  12297. if (!type_loaded) {
  12298. type_loaded = 1;
  12299. | mov edx, dword [FCARG1a + prop_info->offset + 8]
  12300. }
  12301. | IF_TYPE dl, IS_REFERENCE, >1
  12302. if (ce && ce->ce_flags & ZEND_ACC_IMMUTABLE) {
  12303. | LOAD_ADDR FCARG2a, prop_info
  12304. } else {
  12305. int prop_info_offset =
  12306. (((prop_info->offset - (sizeof(zend_object) - sizeof(zval))) / sizeof(zval)) * sizeof(void*));
  12307. | mov r0, aword [FCARG1a + offsetof(zend_object, ce)]
  12308. | mov r0, aword [r0 + offsetof(zend_class_entry, properties_info_table)]
  12309. | mov FCARG2a, aword[r0 + prop_info_offset]
  12310. }
  12311. if (Z_REG(prop_addr) != ZREG_FCARG1 || Z_OFFSET(prop_addr) != 0) {
  12312. | LOAD_ZVAL_ADDR FCARG1a, prop_addr
  12313. }
  12314. |.if X64
  12315. | LOAD_ZVAL_ADDR CARG3, res_addr
  12316. |.else
  12317. | sub r4, 12
  12318. | PUSH_ZVAL_ADDR res_addr, r0
  12319. |.endif
  12320. | EXT_CALL zend_jit_create_typed_ref, r0
  12321. |.if not(X64)
  12322. | add r4, 12
  12323. |.endif
  12324. | jmp >9
  12325. |1:
  12326. } else {
  12327. ZEND_UNREACHABLE();
  12328. }
  12329. }
  12330. }
  12331. if (opline->opcode == ZEND_FETCH_OBJ_W) {
  12332. if (Z_REG(prop_addr) != ZREG_FCARG1 || Z_OFFSET(prop_addr) != 0) {
  12333. | LOAD_ZVAL_ADDR FCARG1a, prop_addr
  12334. }
  12335. | SET_ZVAL_PTR res_addr, FCARG1a
  12336. | SET_ZVAL_TYPE_INFO res_addr, IS_INDIRECT
  12337. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE && prop_info) {
  12338. ssa->var_info[ssa_op->result_def].indirect_reference = 1;
  12339. }
  12340. } else {
  12341. bool result_avoid_refcounting = 0;
  12342. if ((res_info & MAY_BE_GUARD) && JIT_G(current_frame) && prop_info) {
  12343. uint32_t flags = 0;
  12344. uint32_t old_info;
  12345. zend_jit_trace_stack *stack = JIT_G(current_frame)->stack;
  12346. int32_t exit_point;
  12347. const void *exit_addr;
  12348. zend_uchar type;
  12349. zend_jit_addr val_addr = prop_addr;
  12350. if ((opline->op1_type & (IS_VAR|IS_TMP_VAR))
  12351. && !delayed_fetch_this
  12352. && !op1_avoid_refcounting) {
  12353. flags = ZEND_JIT_EXIT_FREE_OP1;
  12354. }
  12355. if ((opline->result_type & (IS_VAR|IS_TMP_VAR))
  12356. && !(flags & ZEND_JIT_EXIT_FREE_OP1)
  12357. && (res_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))
  12358. && (ssa_op+1)->op1_use == ssa_op->result_def
  12359. && zend_jit_may_avoid_refcounting(opline+1, res_info)) {
  12360. result_avoid_refcounting = 1;
  12361. ssa->var_info[ssa_op->result_def].avoid_refcounting = 1;
  12362. }
  12363. type = concrete_type(res_info);
  12364. if (prop_type != IS_UNKNOWN
  12365. && prop_type != IS_UNDEF
  12366. && prop_type != IS_REFERENCE
  12367. && (op1_info & (MAY_BE_ANY|MAY_BE_UNDEF)) == MAY_BE_OBJECT) {
  12368. exit_point = zend_jit_trace_get_exit_point(opline, 0);
  12369. exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  12370. if (!exit_addr) {
  12371. return 0;
  12372. }
  12373. } else {
  12374. val_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R0, 0);
  12375. | LOAD_ZVAL_ADDR r0, prop_addr
  12376. if (op1_avoid_refcounting) {
  12377. SET_STACK_REG(JIT_G(current_frame)->stack,
  12378. EX_VAR_TO_NUM(opline->op1.var), ZREG_NONE);
  12379. }
  12380. old_info = STACK_INFO(stack, EX_VAR_TO_NUM(opline->result.var));
  12381. SET_STACK_TYPE(stack, EX_VAR_TO_NUM(opline->result.var), IS_UNKNOWN, 1);
  12382. SET_STACK_REG(stack, EX_VAR_TO_NUM(opline->result.var), ZREG_ZVAL_COPY_GPR0);
  12383. exit_point = zend_jit_trace_get_exit_point(opline+1, flags);
  12384. SET_STACK_INFO(stack, EX_VAR_TO_NUM(opline->result.var), old_info);
  12385. exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  12386. if (!exit_addr) {
  12387. return 0;
  12388. }
  12389. if (!type_loaded) {
  12390. type_loaded = 1;
  12391. | mov edx, dword [FCARG1a + prop_info->offset + 8]
  12392. }
  12393. | // ZVAL_DEREF()
  12394. | IF_NOT_TYPE dl, IS_REFERENCE, >1
  12395. | GET_Z_PTR r0, r0
  12396. | add r0, offsetof(zend_reference, val)
  12397. | GET_ZVAL_TYPE_INFO edx, val_addr
  12398. }
  12399. res_info &= ~MAY_BE_GUARD;
  12400. ssa->var_info[ssa_op->result_def].type &= ~MAY_BE_GUARD;
  12401. if (type < IS_STRING) {
  12402. |1:
  12403. if (type_loaded) {
  12404. | IF_NOT_TYPE dl, type, &exit_addr
  12405. } else {
  12406. | IF_NOT_ZVAL_TYPE val_addr, type, &exit_addr
  12407. }
  12408. } else {
  12409. if (!type_loaded) {
  12410. type_loaded = 1;
  12411. | GET_ZVAL_TYPE_INFO edx, val_addr
  12412. }
  12413. |1:
  12414. | IF_NOT_TYPE dl, type, &exit_addr
  12415. }
  12416. | // ZVAL_COPY
  12417. | ZVAL_COPY_VALUE_V res_addr, -1, val_addr, res_info, ZREG_R0, ZREG_R1
  12418. if (type < IS_STRING) {
  12419. if (Z_REG(res_addr) != ZREG_FP ||
  12420. JIT_G(current_frame) == NULL ||
  12421. STACK_MEM_TYPE(JIT_G(current_frame)->stack, EX_VAR_TO_NUM(Z_OFFSET(res_addr))) != type) {
  12422. | SET_ZVAL_TYPE_INFO res_addr, type
  12423. }
  12424. } else {
  12425. | SET_ZVAL_TYPE_INFO res_addr, edx
  12426. if (!result_avoid_refcounting) {
  12427. | TRY_ADDREF res_info, dh, r1
  12428. }
  12429. }
  12430. } else {
  12431. if (!zend_jit_zval_copy_deref(Dst, res_addr, prop_addr, ZREG_R2)) {
  12432. return 0;
  12433. }
  12434. }
  12435. }
  12436. if (op1_avoid_refcounting) {
  12437. SET_STACK_REG(JIT_G(current_frame)->stack,
  12438. EX_VAR_TO_NUM(opline->op1.var), ZREG_NONE);
  12439. }
  12440. |.cold_code
  12441. if (JIT_G(trigger) != ZEND_JIT_ON_HOT_TRACE || !prop_info) {
  12442. |5:
  12443. | SET_EX_OPLINE opline, r0
  12444. if (opline->opcode == ZEND_FETCH_OBJ_W) {
  12445. | EXT_CALL zend_jit_fetch_obj_w_slow, r0
  12446. } else if (opline->opcode != ZEND_FETCH_OBJ_IS) {
  12447. | EXT_CALL zend_jit_fetch_obj_r_slow, r0
  12448. } else {
  12449. | EXT_CALL zend_jit_fetch_obj_is_slow, r0
  12450. }
  12451. | jmp >9
  12452. }
  12453. if ((op1_info & ((MAY_BE_UNDEF|MAY_BE_ANY|MAY_BE_REF)- MAY_BE_OBJECT)) && JIT_G(trigger) != ZEND_JIT_ON_HOT_TRACE) {
  12454. |7:
  12455. if (opline->opcode != ZEND_FETCH_OBJ_IS) {
  12456. | SET_EX_OPLINE opline, r0
  12457. if (opline->opcode != ZEND_FETCH_OBJ_W
  12458. && (op1_info & MAY_BE_UNDEF)) {
  12459. zend_jit_addr orig_op1_addr = OP1_ADDR();
  12460. if (op1_info & MAY_BE_ANY) {
  12461. | IF_NOT_ZVAL_TYPE op1_addr, IS_UNDEF, >1
  12462. }
  12463. | mov FCARG1d, opline->op1.var
  12464. | EXT_CALL zend_jit_undefined_op_helper, r0
  12465. |1:
  12466. | LOAD_ZVAL_ADDR FCARG1a, orig_op1_addr
  12467. } else if (Z_REG(op1_addr) != ZREG_FCARG1 || Z_OFFSET(op1_addr) != 0) {
  12468. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  12469. }
  12470. | LOAD_ADDR FCARG2a, Z_STRVAL_P(member)
  12471. if (opline->opcode == ZEND_FETCH_OBJ_W) {
  12472. | EXT_CALL zend_jit_invalid_property_write, r0
  12473. | SET_ZVAL_TYPE_INFO res_addr, _IS_ERROR
  12474. } else {
  12475. | EXT_CALL zend_jit_invalid_property_read, r0
  12476. | SET_ZVAL_TYPE_INFO res_addr, IS_NULL
  12477. }
  12478. | jmp >9
  12479. } else {
  12480. | SET_ZVAL_TYPE_INFO res_addr, IS_NULL
  12481. | jmp >9
  12482. }
  12483. }
  12484. if (!prop_info
  12485. && may_be_dynamic
  12486. && opline->opcode != ZEND_FETCH_OBJ_W) {
  12487. |8:
  12488. | mov FCARG2a, r0
  12489. | SET_EX_OPLINE opline, r0
  12490. if (opline->opcode != ZEND_FETCH_OBJ_IS) {
  12491. | EXT_CALL zend_jit_fetch_obj_r_dynamic, r0
  12492. } else {
  12493. | EXT_CALL zend_jit_fetch_obj_is_dynamic, r0
  12494. }
  12495. | jmp >9
  12496. }
  12497. |.code;
  12498. |9: // END
  12499. if (opline->op1_type != IS_UNUSED && !delayed_fetch_this && !op1_indirect) {
  12500. if (opline->op1_type == IS_VAR
  12501. && opline->opcode == ZEND_FETCH_OBJ_W
  12502. && (op1_info & MAY_BE_RC1)) {
  12503. zend_jit_addr orig_op1_addr = OP1_ADDR();
  12504. | IF_NOT_ZVAL_REFCOUNTED orig_op1_addr, >1
  12505. | GET_ZVAL_PTR FCARG1a, orig_op1_addr
  12506. | GC_DELREF FCARG1a
  12507. | jnz >1
  12508. | SET_EX_OPLINE opline, r0
  12509. | EXT_CALL zend_jit_extract_helper, r0
  12510. |1:
  12511. } else if (!op1_avoid_refcounting) {
  12512. if (on_this) {
  12513. op1_info &= ~MAY_BE_RC1;
  12514. }
  12515. | FREE_OP opline->op1_type, opline->op1, op1_info, 1, opline
  12516. }
  12517. }
  12518. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE
  12519. && prop_info
  12520. && (opline->opcode != ZEND_FETCH_OBJ_W ||
  12521. !(opline->extended_value & ZEND_FETCH_OBJ_FLAGS) ||
  12522. !ZEND_TYPE_IS_SET(prop_info->type))
  12523. && (!(opline->op1_type & (IS_VAR|IS_TMP_VAR)) || on_this || op1_indirect)) {
  12524. may_throw = 0;
  12525. }
  12526. if (may_throw) {
  12527. if (!zend_jit_check_exception(Dst)) {
  12528. return 0;
  12529. }
  12530. }
  12531. return 1;
  12532. }
  12533. static int zend_jit_incdec_obj(dasm_State **Dst,
  12534. const zend_op *opline,
  12535. const zend_op_array *op_array,
  12536. zend_ssa *ssa,
  12537. const zend_ssa_op *ssa_op,
  12538. uint32_t op1_info,
  12539. zend_jit_addr op1_addr,
  12540. bool op1_indirect,
  12541. zend_class_entry *ce,
  12542. bool ce_is_instanceof,
  12543. bool on_this,
  12544. bool delayed_fetch_this,
  12545. zend_class_entry *trace_ce,
  12546. uint8_t prop_type)
  12547. {
  12548. zval *member;
  12549. zend_string *name;
  12550. zend_property_info *prop_info;
  12551. zend_jit_addr this_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, offsetof(zend_execute_data, This));
  12552. zend_jit_addr res_addr = 0;
  12553. zend_jit_addr prop_addr;
  12554. bool needs_slow_path = 0;
  12555. bool use_prop_guard = 0;
  12556. bool may_throw = 0;
  12557. uint32_t res_info = (opline->result_type != IS_UNDEF) ? RES_INFO() : 0;
  12558. ZEND_ASSERT(opline->op2_type == IS_CONST);
  12559. ZEND_ASSERT(op1_info & MAY_BE_OBJECT);
  12560. if (opline->result_type != IS_UNUSED) {
  12561. res_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->result.var);
  12562. }
  12563. member = RT_CONSTANT(opline, opline->op2);
  12564. ZEND_ASSERT(Z_TYPE_P(member) == IS_STRING && Z_STRVAL_P(member)[0] != '\0');
  12565. name = Z_STR_P(member);
  12566. prop_info = zend_get_known_property_info(op_array, ce, name, on_this, op_array->filename);
  12567. if (on_this) {
  12568. | GET_ZVAL_PTR FCARG1a, this_addr
  12569. } else {
  12570. if (opline->op1_type == IS_VAR
  12571. && (op1_info & MAY_BE_INDIRECT)
  12572. && Z_REG(op1_addr) == ZREG_FP) {
  12573. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  12574. | IF_NOT_Z_TYPE FCARG1a, IS_INDIRECT, >1
  12575. | GET_Z_PTR FCARG1a, FCARG1a
  12576. |1:
  12577. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  12578. }
  12579. if (op1_info & MAY_BE_REF) {
  12580. if (Z_REG(op1_addr) != ZREG_FCARG1 || Z_OFFSET(op1_addr) != 0) {
  12581. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  12582. }
  12583. | ZVAL_DEREF FCARG1a, op1_info
  12584. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  12585. }
  12586. if (op1_info & ((MAY_BE_UNDEF|MAY_BE_ANY)- MAY_BE_OBJECT)) {
  12587. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  12588. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  12589. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  12590. if (!exit_addr) {
  12591. return 0;
  12592. }
  12593. | IF_NOT_ZVAL_TYPE op1_addr, IS_OBJECT, &exit_addr
  12594. } else {
  12595. | IF_NOT_ZVAL_TYPE op1_addr, IS_OBJECT, >1
  12596. |.cold_code
  12597. |1:
  12598. | SET_EX_OPLINE opline, r0
  12599. if (Z_REG(op1_addr) != ZREG_FCARG1 || Z_OFFSET(op1_addr) != 0) {
  12600. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  12601. }
  12602. | LOAD_ADDR FCARG2a, ZSTR_VAL(name)
  12603. | EXT_CALL zend_jit_invalid_property_incdec, r0
  12604. | jmp ->exception_handler
  12605. |.code
  12606. }
  12607. }
  12608. | GET_ZVAL_PTR FCARG1a, op1_addr
  12609. }
  12610. if (!prop_info && trace_ce && (trace_ce->ce_flags & ZEND_ACC_IMMUTABLE)) {
  12611. prop_info = zend_get_known_property_info(op_array, trace_ce, name, on_this, op_array->filename);
  12612. if (prop_info) {
  12613. ce = trace_ce;
  12614. ce_is_instanceof = 0;
  12615. if (!(op1_info & MAY_BE_CLASS_GUARD)) {
  12616. if (on_this && JIT_G(current_frame)
  12617. && TRACE_FRAME_IS_THIS_CLASS_CHECKED(JIT_G(current_frame))) {
  12618. ZEND_ASSERT(JIT_G(current_frame)->ce == ce);
  12619. } else if (zend_jit_class_guard(Dst, opline, ce)) {
  12620. if (on_this && JIT_G(current_frame)) {
  12621. JIT_G(current_frame)->ce = ce;
  12622. TRACE_FRAME_SET_THIS_CLASS_CHECKED(JIT_G(current_frame));
  12623. }
  12624. } else {
  12625. return 0;
  12626. }
  12627. if (ssa->var_info && ssa_op->op1_use >= 0) {
  12628. ssa->var_info[ssa_op->op1_use].type |= MAY_BE_CLASS_GUARD;
  12629. ssa->var_info[ssa_op->op1_use].ce = ce;
  12630. ssa->var_info[ssa_op->op1_use].is_instanceof = ce_is_instanceof;
  12631. }
  12632. if (ssa->var_info && ssa_op->op1_def >= 0) {
  12633. ssa->var_info[ssa_op->op1_def].type |= MAY_BE_CLASS_GUARD;
  12634. ssa->var_info[ssa_op->op1_def].ce = ce;
  12635. ssa->var_info[ssa_op->op1_def].is_instanceof = ce_is_instanceof;
  12636. }
  12637. }
  12638. }
  12639. }
  12640. use_prop_guard = (prop_type != IS_UNKNOWN
  12641. && prop_type != IS_UNDEF
  12642. && prop_type != IS_REFERENCE
  12643. && (op1_info & (MAY_BE_ANY|MAY_BE_UNDEF)) == MAY_BE_OBJECT);
  12644. if (!prop_info) {
  12645. needs_slow_path = 1;
  12646. | mov r0, EX->run_time_cache
  12647. | mov r2, aword [r0 + opline->extended_value]
  12648. | cmp r2, aword [FCARG1a + offsetof(zend_object, ce)]
  12649. | jne >7
  12650. if (!ce || ce_is_instanceof || (ce->ce_flags & ZEND_ACC_HAS_TYPE_HINTS)) {
  12651. | cmp aword [r0 + opline->extended_value + sizeof(void*) * 2], 0
  12652. | jnz >7
  12653. }
  12654. | mov r0, aword [r0 + opline->extended_value + sizeof(void*)]
  12655. | test r0, r0
  12656. | jl >7
  12657. if (!use_prop_guard) {
  12658. | IF_TYPE byte [FCARG1a + r0 + 8], IS_UNDEF, >7
  12659. }
  12660. | add FCARG1a, r0
  12661. prop_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  12662. } else {
  12663. prop_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, prop_info->offset);
  12664. if (ZEND_TYPE_IS_SET(prop_info->type) || !use_prop_guard) {
  12665. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  12666. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  12667. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  12668. if (!exit_addr) {
  12669. return 0;
  12670. }
  12671. | IF_TYPE byte [FCARG1a + prop_info->offset + 8], IS_UNDEF, &exit_addr
  12672. } else {
  12673. | IF_TYPE byte [FCARG1a + prop_info->offset + 8], IS_UNDEF, >7
  12674. needs_slow_path = 1;
  12675. }
  12676. }
  12677. if (ZEND_TYPE_IS_SET(prop_info->type)) {
  12678. may_throw = 1;
  12679. | SET_EX_OPLINE opline, r0
  12680. if (ce && ce->ce_flags & ZEND_ACC_IMMUTABLE) {
  12681. | LOAD_ADDR FCARG2a, prop_info
  12682. } else {
  12683. int prop_info_offset =
  12684. (((prop_info->offset - (sizeof(zend_object) - sizeof(zval))) / sizeof(zval)) * sizeof(void*));
  12685. | mov r0, aword [FCARG1a + offsetof(zend_object, ce)]
  12686. | mov r0, aword [r0 + offsetof(zend_class_entry, properties_info_table)]
  12687. | mov FCARG2a, aword[r0 + prop_info_offset]
  12688. }
  12689. | LOAD_ZVAL_ADDR FCARG1a, prop_addr
  12690. if (opline->result_type == IS_UNUSED) {
  12691. switch (opline->opcode) {
  12692. case ZEND_PRE_INC_OBJ:
  12693. case ZEND_POST_INC_OBJ:
  12694. | EXT_CALL zend_jit_inc_typed_prop, r0
  12695. break;
  12696. case ZEND_PRE_DEC_OBJ:
  12697. case ZEND_POST_DEC_OBJ:
  12698. | EXT_CALL zend_jit_dec_typed_prop, r0
  12699. break;
  12700. default:
  12701. ZEND_UNREACHABLE();
  12702. }
  12703. } else {
  12704. |.if X64
  12705. | LOAD_ZVAL_ADDR CARG3, res_addr
  12706. |.else
  12707. | sub r4, 12
  12708. | PUSH_ZVAL_ADDR res_addr, r0
  12709. |.endif
  12710. switch (opline->opcode) {
  12711. case ZEND_PRE_INC_OBJ:
  12712. | EXT_CALL zend_jit_pre_inc_typed_prop, r0
  12713. break;
  12714. case ZEND_PRE_DEC_OBJ:
  12715. | EXT_CALL zend_jit_pre_dec_typed_prop, r0
  12716. break;
  12717. case ZEND_POST_INC_OBJ:
  12718. | EXT_CALL zend_jit_post_inc_typed_prop, r0
  12719. break;
  12720. case ZEND_POST_DEC_OBJ:
  12721. | EXT_CALL zend_jit_post_dec_typed_prop, r0
  12722. break;
  12723. default:
  12724. ZEND_UNREACHABLE();
  12725. }
  12726. |.if not(X64)
  12727. | add r4, 12
  12728. |.endif
  12729. }
  12730. }
  12731. }
  12732. if (!prop_info || !ZEND_TYPE_IS_SET(prop_info->type)) {
  12733. uint32_t var_info = MAY_BE_ANY|MAY_BE_REF|MAY_BE_RC1|MAY_BE_RCN;
  12734. zend_jit_addr var_addr = prop_addr;
  12735. if (use_prop_guard) {
  12736. int32_t exit_point = zend_jit_trace_get_exit_point(opline, 0);
  12737. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  12738. if (!exit_addr) {
  12739. return 0;
  12740. }
  12741. | IF_NOT_ZVAL_TYPE var_addr, prop_type, &exit_addr
  12742. var_info = (1 << prop_type) | (var_info & ~(MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_REF));
  12743. }
  12744. if (var_info & MAY_BE_REF) {
  12745. may_throw = 1;
  12746. var_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  12747. if (Z_REG(prop_addr) != ZREG_FCARG1 || Z_OFFSET(prop_addr) != 0) {
  12748. | LOAD_ZVAL_ADDR FCARG1a, prop_addr
  12749. }
  12750. | IF_NOT_ZVAL_TYPE var_addr, IS_REFERENCE, >2
  12751. | GET_ZVAL_PTR FCARG1a, var_addr
  12752. | cmp aword [FCARG1a + offsetof(zend_reference, sources.ptr)], 0
  12753. | jnz >1
  12754. | lea FCARG1a, aword [FCARG1a + offsetof(zend_reference, val)]
  12755. |.cold_code
  12756. |1:
  12757. if (opline) {
  12758. | SET_EX_OPLINE opline, r0
  12759. }
  12760. if (opline->result_type == IS_UNUSED) {
  12761. | xor FCARG2a, FCARG2a
  12762. } else {
  12763. | LOAD_ZVAL_ADDR FCARG2a, res_addr
  12764. }
  12765. switch (opline->opcode) {
  12766. case ZEND_PRE_INC_OBJ:
  12767. | EXT_CALL zend_jit_pre_inc_typed_ref, r0
  12768. break;
  12769. case ZEND_PRE_DEC_OBJ:
  12770. | EXT_CALL zend_jit_pre_dec_typed_ref, r0
  12771. break;
  12772. case ZEND_POST_INC_OBJ:
  12773. | EXT_CALL zend_jit_post_inc_typed_ref, r0
  12774. break;
  12775. case ZEND_POST_DEC_OBJ:
  12776. | EXT_CALL zend_jit_post_dec_typed_ref, r0
  12777. break;
  12778. default:
  12779. ZEND_UNREACHABLE();
  12780. }
  12781. | jmp >9
  12782. |.code
  12783. |2:
  12784. }
  12785. if (var_info & MAY_BE_LONG) {
  12786. if (var_info & (MAY_BE_ANY - MAY_BE_LONG)) {
  12787. | IF_NOT_ZVAL_TYPE var_addr, IS_LONG, >2
  12788. }
  12789. if (opline->opcode == ZEND_POST_INC_OBJ || opline->opcode == ZEND_POST_DEC_OBJ) {
  12790. if (opline->result_type != IS_UNUSED) {
  12791. | ZVAL_COPY_VALUE res_addr, -1, var_addr, MAY_BE_LONG, ZREG_R1, ZREG_R2
  12792. }
  12793. }
  12794. if (opline->opcode == ZEND_PRE_INC_OBJ || opline->opcode == ZEND_POST_INC_OBJ) {
  12795. | LONG_OP_WITH_32BIT_CONST add, var_addr, Z_L(1)
  12796. } else {
  12797. | LONG_OP_WITH_32BIT_CONST sub, var_addr, Z_L(1)
  12798. }
  12799. | jo >3
  12800. if (opline->opcode == ZEND_PRE_INC_OBJ || opline->opcode == ZEND_PRE_DEC_OBJ) {
  12801. if (opline->result_type != IS_UNUSED) {
  12802. | ZVAL_COPY_VALUE res_addr, -1, var_addr, MAY_BE_LONG, ZREG_R0, ZREG_R2
  12803. }
  12804. }
  12805. |.cold_code
  12806. }
  12807. if (var_info & (MAY_BE_ANY - MAY_BE_LONG)) {
  12808. if (var_info & (MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE)) {
  12809. may_throw = 1;
  12810. }
  12811. if (var_info & MAY_BE_LONG) {
  12812. |2:
  12813. }
  12814. if (Z_REG(var_addr) != ZREG_FCARG1 || Z_OFFSET(var_addr) != 0) {
  12815. var_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  12816. | LOAD_ZVAL_ADDR FCARG1a, prop_addr
  12817. }
  12818. if (opline->opcode == ZEND_POST_INC_OBJ || opline->opcode == ZEND_POST_DEC_OBJ) {
  12819. | ZVAL_COPY_VALUE res_addr, -1, var_addr, MAY_BE_ANY, ZREG_R0, ZREG_R2
  12820. | TRY_ADDREF MAY_BE_ANY, ah, r2
  12821. }
  12822. if (opline->opcode == ZEND_PRE_INC_OBJ || opline->opcode == ZEND_POST_INC_OBJ) {
  12823. if (opline->opcode == ZEND_PRE_INC_OBJ && opline->result_type != IS_UNUSED) {
  12824. | LOAD_ZVAL_ADDR FCARG2a, res_addr
  12825. | EXT_CALL zend_jit_pre_inc, r0
  12826. } else {
  12827. | EXT_CALL increment_function, r0
  12828. }
  12829. } else {
  12830. if (opline->opcode == ZEND_PRE_DEC_OBJ && opline->result_type != IS_UNUSED) {
  12831. | LOAD_ZVAL_ADDR FCARG2a, res_addr
  12832. | EXT_CALL zend_jit_pre_dec, r0
  12833. } else {
  12834. | EXT_CALL decrement_function, r0
  12835. }
  12836. }
  12837. if (var_info & MAY_BE_LONG) {
  12838. | jmp >4
  12839. }
  12840. }
  12841. if (var_info & MAY_BE_LONG) {
  12842. |3:
  12843. if (opline->opcode == ZEND_PRE_INC_OBJ || opline->opcode == ZEND_POST_INC_OBJ) {
  12844. |.if X64
  12845. | mov64 rax, 0x43e0000000000000
  12846. | SET_ZVAL_LVAL var_addr, rax
  12847. | SET_ZVAL_TYPE_INFO var_addr, IS_DOUBLE
  12848. if (opline->opcode == ZEND_PRE_INC_OBJ && opline->result_type != IS_UNUSED) {
  12849. | SET_ZVAL_LVAL res_addr, rax
  12850. | SET_ZVAL_TYPE_INFO res_addr, IS_DOUBLE
  12851. }
  12852. |.else
  12853. | SET_ZVAL_LVAL var_addr, 0
  12854. | SET_ZVAL_W2 var_addr, 0x41e00000
  12855. | SET_ZVAL_TYPE_INFO var_addr, IS_DOUBLE
  12856. if (opline->opcode == ZEND_PRE_INC_OBJ && opline->result_type != IS_UNUSED) {
  12857. | SET_ZVAL_LVAL res_addr, 0
  12858. | SET_ZVAL_W2 res_addr, 0x41e00000
  12859. | SET_ZVAL_TYPE_INFO res_addr, IS_DOUBLE
  12860. }
  12861. |.endif
  12862. } else {
  12863. |.if X64
  12864. | mov64 rax, 0xc3e0000000000000
  12865. | SET_ZVAL_LVAL var_addr, rax
  12866. | SET_ZVAL_TYPE_INFO var_addr, IS_DOUBLE
  12867. if (opline->opcode == ZEND_PRE_DEC_OBJ && opline->result_type != IS_UNUSED) {
  12868. | SET_ZVAL_LVAL res_addr, rax
  12869. | SET_ZVAL_TYPE_INFO res_addr, IS_DOUBLE
  12870. }
  12871. |.else
  12872. | SET_ZVAL_LVAL var_addr, 0x00200000
  12873. | SET_ZVAL_W2 var_addr, 0xc1e00000
  12874. | SET_ZVAL_TYPE_INFO var_addr, IS_DOUBLE
  12875. if (opline->opcode == ZEND_PRE_DEC_OBJ && opline->result_type != IS_UNUSED) {
  12876. | SET_ZVAL_LVAL res_addr, 0x00200000
  12877. | SET_ZVAL_W2 res_addr, 0xc1e00000
  12878. | SET_ZVAL_TYPE_INFO res_addr, IS_DOUBLE
  12879. }
  12880. |.endif
  12881. }
  12882. if (opline->result_type != IS_UNUSED
  12883. && (opline->opcode == ZEND_PRE_INC_OBJ || opline->opcode == ZEND_PRE_DEC_OBJ)
  12884. && prop_info
  12885. && !ZEND_TYPE_IS_SET(prop_info->type)
  12886. && (res_info & MAY_BE_GUARD)
  12887. && (res_info & MAY_BE_LONG)) {
  12888. zend_jit_trace_stack *stack = JIT_G(current_frame)->stack;
  12889. uint32_t old_res_info = STACK_INFO(stack, EX_VAR_TO_NUM(opline->result.var));
  12890. int32_t exit_point;
  12891. const void *exit_addr;
  12892. SET_STACK_TYPE(stack, EX_VAR_TO_NUM(opline->result.var), IS_DOUBLE, 0);
  12893. exit_point = zend_jit_trace_get_exit_point(opline + 1, 0);
  12894. exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  12895. if (!exit_addr) {
  12896. return 0;
  12897. }
  12898. SET_STACK_INFO(stack, EX_VAR_TO_NUM(opline->result.var), old_res_info);
  12899. ssa->var_info[ssa_op->result_def].type = res_info & ~MAY_BE_GUARD;
  12900. | jmp &exit_addr
  12901. |.code
  12902. } else {
  12903. | jmp >4
  12904. |.code
  12905. |4:
  12906. }
  12907. }
  12908. }
  12909. if (needs_slow_path) {
  12910. may_throw = 1;
  12911. |.cold_code
  12912. |7:
  12913. | SET_EX_OPLINE opline, r0
  12914. | // value = zobj->handlers->write_property(zobj, name, value, CACHE_ADDR(opline->extended_value));
  12915. | LOAD_ADDR FCARG2a, name
  12916. |.if X64
  12917. | mov CARG3, EX->run_time_cache
  12918. | add CARG3, opline->extended_value
  12919. if (opline->result_type == IS_UNUSED) {
  12920. | xor CARG4, CARG4
  12921. } else {
  12922. | LOAD_ZVAL_ADDR CARG4, res_addr
  12923. }
  12924. |.else
  12925. | sub r4, 8
  12926. if (opline->result_type == IS_UNUSED) {
  12927. | push 0
  12928. } else {
  12929. | PUSH_ZVAL_ADDR res_addr, r0
  12930. }
  12931. | mov r0, EX->run_time_cache
  12932. | add r0, opline->extended_value
  12933. | push r0
  12934. |.endif
  12935. switch (opline->opcode) {
  12936. case ZEND_PRE_INC_OBJ:
  12937. | EXT_CALL zend_jit_pre_inc_obj_helper, r0
  12938. break;
  12939. case ZEND_PRE_DEC_OBJ:
  12940. | EXT_CALL zend_jit_pre_dec_obj_helper, r0
  12941. break;
  12942. case ZEND_POST_INC_OBJ:
  12943. | EXT_CALL zend_jit_post_inc_obj_helper, r0
  12944. break;
  12945. case ZEND_POST_DEC_OBJ:
  12946. | EXT_CALL zend_jit_post_dec_obj_helper, r0
  12947. break;
  12948. default:
  12949. ZEND_UNREACHABLE();
  12950. }
  12951. |.if not(X64)
  12952. | add r4, 8
  12953. |.endif
  12954. | jmp >9
  12955. |.code
  12956. }
  12957. |9:
  12958. if (opline->op1_type != IS_UNUSED && !delayed_fetch_this && !op1_indirect) {
  12959. if ((op1_info & MAY_HAVE_DTOR) && (op1_info & MAY_BE_RC1)) {
  12960. may_throw = 1;
  12961. }
  12962. | FREE_OP opline->op1_type, opline->op1, op1_info, 1, opline
  12963. }
  12964. if (may_throw) {
  12965. if (!zend_jit_check_exception(Dst)) {
  12966. return 0;
  12967. }
  12968. }
  12969. return 1;
  12970. }
  12971. static int zend_jit_assign_obj_op(dasm_State **Dst,
  12972. const zend_op *opline,
  12973. const zend_op_array *op_array,
  12974. zend_ssa *ssa,
  12975. const zend_ssa_op *ssa_op,
  12976. uint32_t op1_info,
  12977. zend_jit_addr op1_addr,
  12978. uint32_t val_info,
  12979. zend_ssa_range *val_range,
  12980. bool op1_indirect,
  12981. zend_class_entry *ce,
  12982. bool ce_is_instanceof,
  12983. bool on_this,
  12984. bool delayed_fetch_this,
  12985. zend_class_entry *trace_ce,
  12986. uint8_t prop_type)
  12987. {
  12988. zval *member;
  12989. zend_string *name;
  12990. zend_property_info *prop_info;
  12991. zend_jit_addr val_addr = OP1_DATA_ADDR();
  12992. zend_jit_addr this_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, offsetof(zend_execute_data, This));
  12993. zend_jit_addr prop_addr;
  12994. bool needs_slow_path = 0;
  12995. bool use_prop_guard = 0;
  12996. bool may_throw = 0;
  12997. binary_op_type binary_op = get_binary_op(opline->extended_value);
  12998. ZEND_ASSERT(opline->op2_type == IS_CONST);
  12999. ZEND_ASSERT(op1_info & MAY_BE_OBJECT);
  13000. ZEND_ASSERT(opline->result_type == IS_UNUSED);
  13001. member = RT_CONSTANT(opline, opline->op2);
  13002. ZEND_ASSERT(Z_TYPE_P(member) == IS_STRING && Z_STRVAL_P(member)[0] != '\0');
  13003. name = Z_STR_P(member);
  13004. prop_info = zend_get_known_property_info(op_array, ce, name, on_this, op_array->filename);
  13005. if (on_this) {
  13006. | GET_ZVAL_PTR FCARG1a, this_addr
  13007. } else {
  13008. if (opline->op1_type == IS_VAR
  13009. && (op1_info & MAY_BE_INDIRECT)
  13010. && Z_REG(op1_addr) == ZREG_FP) {
  13011. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  13012. | IF_NOT_Z_TYPE FCARG1a, IS_INDIRECT, >1
  13013. | GET_Z_PTR FCARG1a, FCARG1a
  13014. |1:
  13015. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  13016. }
  13017. if (op1_info & MAY_BE_REF) {
  13018. if (Z_REG(op1_addr) != ZREG_FCARG1 || Z_OFFSET(op1_addr) != 0) {
  13019. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  13020. }
  13021. | ZVAL_DEREF FCARG1a, op1_info
  13022. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  13023. }
  13024. if (op1_info & ((MAY_BE_UNDEF|MAY_BE_ANY)- MAY_BE_OBJECT)) {
  13025. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  13026. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  13027. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  13028. if (!exit_addr) {
  13029. return 0;
  13030. }
  13031. | IF_NOT_ZVAL_TYPE op1_addr, IS_OBJECT, &exit_addr
  13032. } else {
  13033. | IF_NOT_ZVAL_TYPE op1_addr, IS_OBJECT, >1
  13034. |.cold_code
  13035. |1:
  13036. | SET_EX_OPLINE opline, r0
  13037. if (Z_REG(op1_addr) != ZREG_FCARG1 || Z_OFFSET(op1_addr) != 0) {
  13038. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  13039. }
  13040. | LOAD_ADDR FCARG2a, ZSTR_VAL(name)
  13041. if (op1_info & MAY_BE_UNDEF) {
  13042. | EXT_CALL zend_jit_invalid_property_assign_op, r0
  13043. } else {
  13044. | EXT_CALL zend_jit_invalid_property_assign, r0
  13045. }
  13046. may_throw = 1;
  13047. if (((opline+1)->op1_type & (IS_VAR|IS_TMP_VAR))
  13048. && (val_info & (MAY_BE_REF|MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  13049. may_throw = 1;
  13050. | jmp >8
  13051. } else {
  13052. | jmp >9
  13053. }
  13054. |.code
  13055. }
  13056. }
  13057. | GET_ZVAL_PTR FCARG1a, op1_addr
  13058. }
  13059. if (!prop_info && trace_ce && (trace_ce->ce_flags & ZEND_ACC_IMMUTABLE)) {
  13060. prop_info = zend_get_known_property_info(op_array, trace_ce, name, on_this, op_array->filename);
  13061. if (prop_info) {
  13062. ce = trace_ce;
  13063. ce_is_instanceof = 0;
  13064. if (!(op1_info & MAY_BE_CLASS_GUARD)) {
  13065. if (on_this && JIT_G(current_frame)
  13066. && TRACE_FRAME_IS_THIS_CLASS_CHECKED(JIT_G(current_frame))) {
  13067. ZEND_ASSERT(JIT_G(current_frame)->ce == ce);
  13068. } else if (zend_jit_class_guard(Dst, opline, ce)) {
  13069. if (on_this && JIT_G(current_frame)) {
  13070. JIT_G(current_frame)->ce = ce;
  13071. TRACE_FRAME_SET_THIS_CLASS_CHECKED(JIT_G(current_frame));
  13072. }
  13073. } else {
  13074. return 0;
  13075. }
  13076. if (ssa->var_info && ssa_op->op1_use >= 0) {
  13077. ssa->var_info[ssa_op->op1_use].type |= MAY_BE_CLASS_GUARD;
  13078. ssa->var_info[ssa_op->op1_use].ce = ce;
  13079. ssa->var_info[ssa_op->op1_use].is_instanceof = ce_is_instanceof;
  13080. }
  13081. if (ssa->var_info && ssa_op->op1_def >= 0) {
  13082. ssa->var_info[ssa_op->op1_def].type |= MAY_BE_CLASS_GUARD;
  13083. ssa->var_info[ssa_op->op1_def].ce = ce;
  13084. ssa->var_info[ssa_op->op1_def].is_instanceof = ce_is_instanceof;
  13085. }
  13086. }
  13087. }
  13088. }
  13089. use_prop_guard = (prop_type != IS_UNKNOWN
  13090. && prop_type != IS_UNDEF
  13091. && prop_type != IS_REFERENCE
  13092. && (op1_info & (MAY_BE_ANY|MAY_BE_UNDEF)) == MAY_BE_OBJECT);
  13093. if (!prop_info) {
  13094. needs_slow_path = 1;
  13095. | mov r0, EX->run_time_cache
  13096. | mov r2, aword [r0 + (opline+1)->extended_value]
  13097. | cmp r2, aword [FCARG1a + offsetof(zend_object, ce)]
  13098. | jne >7
  13099. if (!ce || ce_is_instanceof || (ce->ce_flags & ZEND_ACC_HAS_TYPE_HINTS)) {
  13100. | cmp aword [r0 + (opline+1)->extended_value + sizeof(void*) * 2], 0
  13101. | jnz >7
  13102. }
  13103. | mov r0, aword [r0 + (opline+1)->extended_value + sizeof(void*)]
  13104. | test r0, r0
  13105. | jl >7
  13106. if (!use_prop_guard) {
  13107. | IF_TYPE byte [FCARG1a + r0 + 8], IS_UNDEF, >7
  13108. }
  13109. | add FCARG1a, r0
  13110. prop_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  13111. } else {
  13112. prop_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, prop_info->offset);
  13113. if (ZEND_TYPE_IS_SET(prop_info->type) || !use_prop_guard) {
  13114. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  13115. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  13116. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  13117. if (!exit_addr) {
  13118. return 0;
  13119. }
  13120. | IF_TYPE byte [FCARG1a + prop_info->offset + 8], IS_UNDEF, &exit_addr
  13121. } else {
  13122. | IF_TYPE byte [FCARG1a + prop_info->offset + 8], IS_UNDEF, >7
  13123. needs_slow_path = 1;
  13124. }
  13125. }
  13126. if (ZEND_TYPE_IS_SET(prop_info->type)) {
  13127. uint32_t info = val_info;
  13128. may_throw = 1;
  13129. if (opline) {
  13130. | SET_EX_OPLINE opline, r0
  13131. }
  13132. | IF_ZVAL_TYPE prop_addr, IS_REFERENCE, >1
  13133. |.cold_code
  13134. |1:
  13135. | GET_ZVAL_PTR FCARG1a, prop_addr
  13136. if (Z_MODE(val_addr) != IS_MEM_ZVAL || Z_REG(val_addr) != ZREG_FCARG2 || Z_OFFSET(val_addr) != 0) {
  13137. | LOAD_ZVAL_ADDR FCARG2a, val_addr
  13138. }
  13139. |.if X64
  13140. | LOAD_ADDR CARG3, binary_op
  13141. |.else
  13142. | sub r4, 12
  13143. | PUSH_ADDR binary_op, r0
  13144. |.endif
  13145. if (((opline+1)->op1_type & (IS_TMP_VAR|IS_VAR))
  13146. && (val_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  13147. | EXT_CALL zend_jit_assign_op_to_typed_ref_tmp, r0
  13148. } else {
  13149. | EXT_CALL zend_jit_assign_op_to_typed_ref, r0
  13150. }
  13151. |.if not(X64)
  13152. | add r4, 12
  13153. |.endif
  13154. | jmp >9
  13155. |.code
  13156. | // value = zend_assign_to_typed_prop(prop_info, property_val, value EXECUTE_DATA_CC);
  13157. if (ce && ce->ce_flags & ZEND_ACC_IMMUTABLE) {
  13158. | LOAD_ADDR FCARG2a, prop_info
  13159. } else {
  13160. int prop_info_offset =
  13161. (((prop_info->offset - (sizeof(zend_object) - sizeof(zval))) / sizeof(zval)) * sizeof(void*));
  13162. | mov r0, aword [FCARG1a + offsetof(zend_object, ce)]
  13163. | mov r0, aword [r0 + offsetof(zend_class_entry, properties_info_table)]
  13164. | mov FCARG2a, aword[r0 + prop_info_offset]
  13165. }
  13166. | LOAD_ZVAL_ADDR FCARG1a, prop_addr
  13167. |.if X64
  13168. | LOAD_ZVAL_ADDR CARG3, val_addr
  13169. | LOAD_ADDR CARG4, binary_op
  13170. |.else
  13171. | sub r4, 8
  13172. | PUSH_ADDR binary_op, r0
  13173. | PUSH_ZVAL_ADDR val_addr, r0
  13174. |.endif
  13175. | EXT_CALL zend_jit_assign_op_to_typed_prop, r0
  13176. |.if not(X64)
  13177. | add r4, 8
  13178. |.endif
  13179. if (info & (MAY_BE_REF|MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE)) {
  13180. info |= MAY_BE_RC1|MAY_BE_RCN;
  13181. }
  13182. | FREE_OP (opline+1)->op1_type, (opline+1)->op1, info, 0, NULL
  13183. }
  13184. }
  13185. if (!prop_info || !ZEND_TYPE_IS_SET(prop_info->type)) {
  13186. zend_jit_addr var_addr = prop_addr;
  13187. uint32_t var_info = MAY_BE_ANY|MAY_BE_REF|MAY_BE_RC1|MAY_BE_RCN;
  13188. uint32_t var_def_info = MAY_BE_ANY|MAY_BE_REF|MAY_BE_RC1|MAY_BE_RCN;
  13189. if (use_prop_guard) {
  13190. int32_t exit_point = zend_jit_trace_get_exit_point(opline, 0);
  13191. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  13192. if (!exit_addr) {
  13193. return 0;
  13194. }
  13195. | IF_NOT_ZVAL_TYPE var_addr, prop_type, &exit_addr
  13196. var_info = (1 << prop_type) | (var_info & ~(MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_REF));
  13197. }
  13198. if (var_info & MAY_BE_REF) {
  13199. may_throw = 1;
  13200. var_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R0, 0);
  13201. | LOAD_ZVAL_ADDR r0, prop_addr
  13202. | IF_NOT_ZVAL_TYPE var_addr, IS_REFERENCE, >2
  13203. | GET_ZVAL_PTR FCARG1a, var_addr
  13204. | cmp aword [FCARG1a + offsetof(zend_reference, sources.ptr)], 0
  13205. | jnz >1
  13206. | lea r0, aword [FCARG1a + offsetof(zend_reference, val)]
  13207. |.cold_code
  13208. |1:
  13209. if (Z_MODE(val_addr) != IS_MEM_ZVAL || Z_REG(val_addr) != ZREG_FCARG2 || Z_OFFSET(val_addr) != 0) {
  13210. | LOAD_ZVAL_ADDR FCARG2a, val_addr
  13211. }
  13212. if (opline) {
  13213. | SET_EX_OPLINE opline, r0
  13214. }
  13215. |.if X64
  13216. | LOAD_ADDR CARG3, binary_op
  13217. |.else
  13218. | sub r4, 12
  13219. | PUSH_ADDR binary_op, r0
  13220. |.endif
  13221. if (((opline+1)->op1_type & (IS_TMP_VAR|IS_VAR))
  13222. && (val_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  13223. | EXT_CALL zend_jit_assign_op_to_typed_ref_tmp, r0
  13224. } else {
  13225. | EXT_CALL zend_jit_assign_op_to_typed_ref, r0
  13226. }
  13227. |.if not(X64)
  13228. | add r4, 12
  13229. |.endif
  13230. | jmp >9
  13231. |.code
  13232. |2:
  13233. var_info &= ~MAY_BE_REF;
  13234. }
  13235. switch (opline->extended_value) {
  13236. case ZEND_ADD:
  13237. case ZEND_SUB:
  13238. case ZEND_MUL:
  13239. if ((var_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE)) ||
  13240. (val_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  13241. if (opline->extended_value != ZEND_ADD ||
  13242. (var_info & MAY_BE_ANY) != MAY_BE_ARRAY ||
  13243. (val_info & MAY_BE_ANY) == MAY_BE_ARRAY) {
  13244. may_throw = 1;
  13245. }
  13246. }
  13247. if (!zend_jit_math_helper(Dst, opline, opline->extended_value, IS_CV, opline->op1, var_addr, var_info, (opline+1)->op1_type, (opline+1)->op1, val_addr, val_info, 0, var_addr, var_def_info, var_info,
  13248. 1 /* may overflow */, 0)) {
  13249. return 0;
  13250. }
  13251. break;
  13252. case ZEND_BW_OR:
  13253. case ZEND_BW_AND:
  13254. case ZEND_BW_XOR:
  13255. may_throw = 1;
  13256. if ((var_info & (MAY_BE_STRING|MAY_BE_DOUBLE|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE)) ||
  13257. (val_info & (MAY_BE_STRING|MAY_BE_DOUBLE|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  13258. if ((var_info & MAY_BE_ANY) != MAY_BE_STRING ||
  13259. (val_info & MAY_BE_ANY) != MAY_BE_STRING) {
  13260. may_throw = 1;
  13261. }
  13262. }
  13263. goto long_math;
  13264. case ZEND_SL:
  13265. case ZEND_SR:
  13266. if ((var_info & (MAY_BE_STRING|MAY_BE_DOUBLE|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE)) ||
  13267. (val_info & (MAY_BE_STRING|MAY_BE_DOUBLE|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  13268. may_throw = 1;
  13269. }
  13270. if ((opline+1)->op1_type != IS_CONST ||
  13271. Z_TYPE_P(RT_CONSTANT((opline+1), (opline+1)->op1)) != IS_LONG ||
  13272. Z_LVAL_P(RT_CONSTANT((opline+1), (opline+1)->op1)) < 0) {
  13273. may_throw = 1;
  13274. }
  13275. goto long_math;
  13276. case ZEND_MOD:
  13277. if ((var_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE)) ||
  13278. (val_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  13279. if (opline->extended_value != ZEND_ADD ||
  13280. (var_info & MAY_BE_ANY) != MAY_BE_ARRAY ||
  13281. (val_info & MAY_BE_ANY) == MAY_BE_ARRAY) {
  13282. may_throw = 1;
  13283. }
  13284. }
  13285. if ((opline+1)->op1_type != IS_CONST ||
  13286. Z_TYPE_P(RT_CONSTANT((opline+1), (opline+1)->op1)) != IS_LONG ||
  13287. Z_LVAL_P(RT_CONSTANT((opline+1), (opline+1)->op1)) == 0) {
  13288. may_throw = 1;
  13289. }
  13290. long_math:
  13291. if (!zend_jit_long_math_helper(Dst, opline, opline->extended_value,
  13292. IS_CV, opline->op1, var_addr, var_info, NULL,
  13293. (opline+1)->op1_type, (opline+1)->op1, val_addr, val_info,
  13294. val_range,
  13295. 0, var_addr, var_def_info, var_info, /* may throw */ 1)) {
  13296. return 0;
  13297. }
  13298. break;
  13299. case ZEND_CONCAT:
  13300. may_throw = 1;
  13301. if (!zend_jit_concat_helper(Dst, opline, IS_CV, opline->op1, var_addr, var_info, (opline+1)->op1_type, (opline+1)->op1, val_addr, val_info, var_addr,
  13302. 0)) {
  13303. return 0;
  13304. }
  13305. break;
  13306. default:
  13307. ZEND_UNREACHABLE();
  13308. }
  13309. }
  13310. if (needs_slow_path) {
  13311. may_throw = 1;
  13312. |.cold_code
  13313. |7:
  13314. | SET_EX_OPLINE opline, r0
  13315. | // value = zobj->handlers->write_property(zobj, name, value, CACHE_ADDR(opline->extended_value));
  13316. | LOAD_ADDR FCARG2a, name
  13317. |.if X64
  13318. | LOAD_ZVAL_ADDR CARG3, val_addr
  13319. | mov CARG4, EX->run_time_cache
  13320. | add CARG4, (opline+1)->extended_value
  13321. |.if X64WIN
  13322. | LOAD_ADDR r0, binary_op
  13323. | mov aword A5, r0
  13324. |.else
  13325. | LOAD_ADDR CARG5, binary_op
  13326. |.endif
  13327. |.else
  13328. | sub r4, 4
  13329. | PUSH_ADDR binary_op, r0
  13330. | mov r0, EX->run_time_cache
  13331. | add r0, (opline+1)->extended_value
  13332. | push r0
  13333. | PUSH_ZVAL_ADDR val_addr, r0
  13334. |.endif
  13335. | EXT_CALL zend_jit_assign_obj_op_helper, r0
  13336. |.if not(X64)
  13337. | add r4, 4
  13338. |.endif
  13339. if (val_info & (MAY_BE_REF|MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE)) {
  13340. val_info |= MAY_BE_RC1|MAY_BE_RCN;
  13341. }
  13342. |8:
  13343. | // FREE_OP_DATA();
  13344. | FREE_OP (opline+1)->op1_type, (opline+1)->op1, val_info, 0, opline
  13345. | jmp >9
  13346. |.code
  13347. }
  13348. |9:
  13349. if (opline->op1_type != IS_UNUSED && !delayed_fetch_this && !op1_indirect) {
  13350. if ((op1_info & MAY_HAVE_DTOR) && (op1_info & MAY_BE_RC1)) {
  13351. may_throw = 1;
  13352. }
  13353. | FREE_OP opline->op1_type, opline->op1, op1_info, 1, opline
  13354. }
  13355. if (may_throw) {
  13356. if (!zend_jit_check_exception(Dst)) {
  13357. return 0;
  13358. }
  13359. }
  13360. return 1;
  13361. }
  13362. static int zend_jit_assign_obj(dasm_State **Dst,
  13363. const zend_op *opline,
  13364. const zend_op_array *op_array,
  13365. zend_ssa *ssa,
  13366. const zend_ssa_op *ssa_op,
  13367. uint32_t op1_info,
  13368. zend_jit_addr op1_addr,
  13369. uint32_t val_info,
  13370. bool op1_indirect,
  13371. zend_class_entry *ce,
  13372. bool ce_is_instanceof,
  13373. bool on_this,
  13374. bool delayed_fetch_this,
  13375. zend_class_entry *trace_ce,
  13376. uint8_t prop_type,
  13377. int may_throw)
  13378. {
  13379. zval *member;
  13380. zend_string *name;
  13381. zend_property_info *prop_info;
  13382. zend_jit_addr val_addr = OP1_DATA_ADDR();
  13383. zend_jit_addr res_addr = 0;
  13384. zend_jit_addr this_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, offsetof(zend_execute_data, This));
  13385. zend_jit_addr prop_addr;
  13386. bool needs_slow_path = 0;
  13387. bool needs_val_dtor = 0;
  13388. if (RETURN_VALUE_USED(opline)) {
  13389. res_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->result.var);
  13390. }
  13391. ZEND_ASSERT(opline->op2_type == IS_CONST);
  13392. ZEND_ASSERT(op1_info & MAY_BE_OBJECT);
  13393. member = RT_CONSTANT(opline, opline->op2);
  13394. ZEND_ASSERT(Z_TYPE_P(member) == IS_STRING && Z_STRVAL_P(member)[0] != '\0');
  13395. name = Z_STR_P(member);
  13396. prop_info = zend_get_known_property_info(op_array, ce, name, on_this, op_array->filename);
  13397. if (on_this) {
  13398. | GET_ZVAL_PTR FCARG1a, this_addr
  13399. } else {
  13400. if (opline->op1_type == IS_VAR
  13401. && (op1_info & MAY_BE_INDIRECT)
  13402. && Z_REG(op1_addr) == ZREG_FP) {
  13403. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  13404. | IF_NOT_Z_TYPE FCARG1a, IS_INDIRECT, >1
  13405. | GET_Z_PTR FCARG1a, FCARG1a
  13406. |1:
  13407. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  13408. }
  13409. if (op1_info & MAY_BE_REF) {
  13410. if (Z_REG(op1_addr) != ZREG_FCARG1 || Z_OFFSET(op1_addr) != 0) {
  13411. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  13412. }
  13413. | ZVAL_DEREF FCARG1a, op1_info
  13414. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  13415. }
  13416. if (op1_info & ((MAY_BE_UNDEF|MAY_BE_ANY)- MAY_BE_OBJECT)) {
  13417. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  13418. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  13419. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  13420. if (!exit_addr) {
  13421. return 0;
  13422. }
  13423. | IF_NOT_ZVAL_TYPE op1_addr, IS_OBJECT, &exit_addr
  13424. } else {
  13425. | IF_NOT_ZVAL_TYPE op1_addr, IS_OBJECT, >1
  13426. |.cold_code
  13427. |1:
  13428. | SET_EX_OPLINE opline, r0
  13429. if (Z_REG(op1_addr) != ZREG_FCARG1 || Z_OFFSET(op1_addr) != 0) {
  13430. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  13431. }
  13432. | LOAD_ADDR FCARG2a, ZSTR_VAL(name)
  13433. | EXT_CALL zend_jit_invalid_property_assign, r0
  13434. if (RETURN_VALUE_USED(opline)) {
  13435. | SET_ZVAL_TYPE_INFO res_addr, IS_NULL
  13436. }
  13437. if (((opline+1)->op1_type & (IS_VAR|IS_TMP_VAR))
  13438. && (val_info & (MAY_BE_REF|MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  13439. needs_val_dtor = 1;
  13440. | jmp >7
  13441. } else {
  13442. | jmp >9
  13443. }
  13444. |.code
  13445. }
  13446. }
  13447. | GET_ZVAL_PTR FCARG1a, op1_addr
  13448. }
  13449. if (!prop_info && trace_ce && (trace_ce->ce_flags & ZEND_ACC_IMMUTABLE)) {
  13450. prop_info = zend_get_known_property_info(op_array, trace_ce, name, on_this, op_array->filename);
  13451. if (prop_info) {
  13452. ce = trace_ce;
  13453. ce_is_instanceof = 0;
  13454. if (!(op1_info & MAY_BE_CLASS_GUARD)) {
  13455. if (on_this && JIT_G(current_frame)
  13456. && TRACE_FRAME_IS_THIS_CLASS_CHECKED(JIT_G(current_frame))) {
  13457. ZEND_ASSERT(JIT_G(current_frame)->ce == ce);
  13458. } else if (zend_jit_class_guard(Dst, opline, ce)) {
  13459. if (on_this && JIT_G(current_frame)) {
  13460. JIT_G(current_frame)->ce = ce;
  13461. TRACE_FRAME_SET_THIS_CLASS_CHECKED(JIT_G(current_frame));
  13462. }
  13463. } else {
  13464. return 0;
  13465. }
  13466. if (ssa->var_info && ssa_op->op1_use >= 0) {
  13467. ssa->var_info[ssa_op->op1_use].type |= MAY_BE_CLASS_GUARD;
  13468. ssa->var_info[ssa_op->op1_use].ce = ce;
  13469. ssa->var_info[ssa_op->op1_use].is_instanceof = ce_is_instanceof;
  13470. }
  13471. if (ssa->var_info && ssa_op->op1_def >= 0) {
  13472. ssa->var_info[ssa_op->op1_def].type |= MAY_BE_CLASS_GUARD;
  13473. ssa->var_info[ssa_op->op1_def].ce = ce;
  13474. ssa->var_info[ssa_op->op1_def].is_instanceof = ce_is_instanceof;
  13475. }
  13476. }
  13477. }
  13478. }
  13479. if (!prop_info) {
  13480. needs_slow_path = 1;
  13481. | mov r0, EX->run_time_cache
  13482. | mov r2, aword [r0 + opline->extended_value]
  13483. | cmp r2, aword [FCARG1a + offsetof(zend_object, ce)]
  13484. | jne >5
  13485. if (!ce || ce_is_instanceof || (ce->ce_flags & ZEND_ACC_HAS_TYPE_HINTS)) {
  13486. | mov FCARG2a, aword [r0 + opline->extended_value + sizeof(void*) * 2]
  13487. }
  13488. | mov r0, aword [r0 + opline->extended_value + sizeof(void*)]
  13489. | test r0, r0
  13490. | jl >5
  13491. | IF_TYPE byte [FCARG1a + r0 + 8], IS_UNDEF, >5
  13492. | add FCARG1a, r0
  13493. prop_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  13494. if (!ce || ce_is_instanceof || (ce->ce_flags & ZEND_ACC_HAS_TYPE_HINTS)) {
  13495. | test FCARG2a, FCARG2a
  13496. | jnz >1
  13497. |.cold_code
  13498. |1:
  13499. | // value = zend_assign_to_typed_prop(prop_info, property_val, value EXECUTE_DATA_CC);
  13500. | SET_EX_OPLINE opline, r0
  13501. |.if X64
  13502. | LOAD_ZVAL_ADDR CARG3, val_addr
  13503. if (RETURN_VALUE_USED(opline)) {
  13504. | LOAD_ZVAL_ADDR CARG4, res_addr
  13505. } else {
  13506. | xor CARG4, CARG4
  13507. }
  13508. |.else
  13509. | sub r4, 8
  13510. if (RETURN_VALUE_USED(opline)) {
  13511. | PUSH_ZVAL_ADDR res_addr, r0
  13512. } else {
  13513. | push 0
  13514. }
  13515. | PUSH_ZVAL_ADDR val_addr, r0
  13516. |.endif
  13517. | EXT_CALL zend_jit_assign_to_typed_prop, r0
  13518. |.if not(X64)
  13519. | add r4, 8
  13520. |.endif
  13521. if ((opline+1)->op1_type == IS_CONST) {
  13522. | // TODO: ???
  13523. | // if (Z_TYPE_P(value) == orig_type) {
  13524. | // CACHE_PTR_EX(cache_slot + 2, NULL);
  13525. }
  13526. if (((opline+1)->op1_type & (IS_VAR|IS_TMP_VAR))
  13527. && (val_info & (MAY_BE_REF|MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) {
  13528. | jmp >7
  13529. } else {
  13530. | jmp >9
  13531. }
  13532. |.code
  13533. }
  13534. } else {
  13535. prop_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, prop_info->offset);
  13536. if (!ce || ce_is_instanceof || !(ce->ce_flags & ZEND_ACC_IMMUTABLE) || ce->__get || ce->__set || (prop_info->flags & ZEND_ACC_READONLY)) {
  13537. // Undefined property with magic __get()/__set()
  13538. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  13539. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  13540. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  13541. if (!exit_addr) {
  13542. return 0;
  13543. }
  13544. | IF_TYPE byte [FCARG1a + prop_info->offset + 8], IS_UNDEF, &exit_addr
  13545. } else {
  13546. | IF_TYPE byte [FCARG1a + prop_info->offset + 8], IS_UNDEF, >5
  13547. needs_slow_path = 1;
  13548. }
  13549. }
  13550. if (ZEND_TYPE_IS_SET(prop_info->type)) {
  13551. uint32_t info = val_info;
  13552. | // value = zend_assign_to_typed_prop(prop_info, property_val, value EXECUTE_DATA_CC);
  13553. | SET_EX_OPLINE opline, r0
  13554. if (ce && ce->ce_flags & ZEND_ACC_IMMUTABLE) {
  13555. | LOAD_ADDR FCARG2a, prop_info
  13556. } else {
  13557. int prop_info_offset =
  13558. (((prop_info->offset - (sizeof(zend_object) - sizeof(zval))) / sizeof(zval)) * sizeof(void*));
  13559. | mov r0, aword [FCARG1a + offsetof(zend_object, ce)]
  13560. | mov r0, aword [r0 + offsetof(zend_class_entry, properties_info_table)]
  13561. | mov FCARG2a, aword[r0 + prop_info_offset]
  13562. }
  13563. | LOAD_ZVAL_ADDR FCARG1a, prop_addr
  13564. |.if X64
  13565. | LOAD_ZVAL_ADDR CARG3, val_addr
  13566. if (RETURN_VALUE_USED(opline)) {
  13567. | LOAD_ZVAL_ADDR CARG4, res_addr
  13568. } else {
  13569. | xor CARG4, CARG4
  13570. }
  13571. |.else
  13572. | sub r4, 8
  13573. if (RETURN_VALUE_USED(opline)) {
  13574. | PUSH_ZVAL_ADDR res_addr, r0
  13575. } else {
  13576. | push 0
  13577. }
  13578. | PUSH_ZVAL_ADDR val_addr, r0
  13579. |.endif
  13580. | EXT_CALL zend_jit_assign_to_typed_prop, r0
  13581. |.if not(X64)
  13582. | add r4, 8
  13583. |.endif
  13584. if (info & (MAY_BE_REF|MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE)) {
  13585. info |= MAY_BE_RC1|MAY_BE_RCN;
  13586. }
  13587. | FREE_OP (opline+1)->op1_type, (opline+1)->op1, info, 0, NULL
  13588. }
  13589. }
  13590. if (!prop_info || !ZEND_TYPE_IS_SET(prop_info->type)) {
  13591. // value = zend_assign_to_variable(property_val, value, OP_DATA_TYPE, EX_USES_STRICT_TYPES());
  13592. if (opline->result_type == IS_UNUSED) {
  13593. if (!zend_jit_assign_to_variable_call(Dst, opline, prop_addr, prop_addr, -1, -1, (opline+1)->op1_type, val_addr, val_info, res_addr, 0)) {
  13594. return 0;
  13595. }
  13596. } else {
  13597. if (!zend_jit_assign_to_variable(Dst, opline, prop_addr, prop_addr, -1, -1, (opline+1)->op1_type, val_addr, val_info, res_addr, 0)) {
  13598. return 0;
  13599. }
  13600. }
  13601. }
  13602. if (needs_slow_path) {
  13603. |.cold_code
  13604. |5:
  13605. | SET_EX_OPLINE opline, r0
  13606. | // value = zobj->handlers->write_property(zobj, name, value, CACHE_ADDR(opline->extended_value));
  13607. | LOAD_ADDR FCARG2a, name
  13608. |.if X64
  13609. | LOAD_ZVAL_ADDR CARG3, val_addr
  13610. | mov CARG4, EX->run_time_cache
  13611. | add CARG4, opline->extended_value
  13612. if (RETURN_VALUE_USED(opline)) {
  13613. |.if X64WIN
  13614. | LOAD_ZVAL_ADDR r0, res_addr
  13615. | mov aword A5, r0
  13616. |.else
  13617. | LOAD_ZVAL_ADDR CARG5, res_addr
  13618. |.endif
  13619. } else {
  13620. |.if X64WIN
  13621. | mov aword A5, 0
  13622. |.else
  13623. | xor CARG5, CARG5
  13624. |.endif
  13625. }
  13626. |.else
  13627. | sub r4, 4
  13628. if (RETURN_VALUE_USED(opline)) {
  13629. | PUSH_ZVAL_ADDR res_addr, r0
  13630. } else {
  13631. | push 0
  13632. }
  13633. | mov r0, EX->run_time_cache
  13634. | add r0, opline->extended_value
  13635. | push r0
  13636. | PUSH_ZVAL_ADDR val_addr, r0
  13637. |.endif
  13638. | EXT_CALL zend_jit_assign_obj_helper, r0
  13639. |.if not(X64)
  13640. | add r4, 4
  13641. |.endif
  13642. if (val_info & (MAY_BE_REF|MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE)) {
  13643. val_info |= MAY_BE_RC1|MAY_BE_RCN;
  13644. }
  13645. |7:
  13646. | // FREE_OP_DATA();
  13647. | FREE_OP (opline+1)->op1_type, (opline+1)->op1, val_info, 0, opline
  13648. | jmp >9
  13649. |.code
  13650. } else if (needs_val_dtor) {
  13651. |.cold_code
  13652. |7:
  13653. | // FREE_OP_DATA();
  13654. | FREE_OP (opline+1)->op1_type, (opline+1)->op1, val_info, 0, opline
  13655. | jmp >9
  13656. |.code
  13657. }
  13658. |9:
  13659. if (opline->op1_type != IS_UNUSED && !delayed_fetch_this && !op1_indirect) {
  13660. | FREE_OP opline->op1_type, opline->op1, op1_info, 1, opline
  13661. }
  13662. if (may_throw) {
  13663. if (!zend_jit_check_exception(Dst)) {
  13664. return 0;
  13665. }
  13666. }
  13667. return 1;
  13668. }
  13669. static int zend_jit_free(dasm_State **Dst, const zend_op *opline, uint32_t op1_info, int may_throw)
  13670. {
  13671. zend_jit_addr op1_addr = OP1_ADDR();
  13672. if (op1_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE|MAY_BE_REF)) {
  13673. if (may_throw) {
  13674. | SET_EX_OPLINE opline, r0
  13675. }
  13676. if (opline->opcode == ZEND_FE_FREE && (op1_info & (MAY_BE_OBJECT|MAY_BE_REF))) {
  13677. if (op1_info & MAY_BE_ARRAY) {
  13678. | IF_ZVAL_TYPE op1_addr, IS_ARRAY, >7
  13679. }
  13680. | mov FCARG1d, dword [FP + opline->op1.var + offsetof(zval, u2.fe_iter_idx)]
  13681. | cmp FCARG1d, -1
  13682. | je >7
  13683. | EXT_CALL zend_hash_iterator_del, r0
  13684. |7:
  13685. }
  13686. | ZVAL_PTR_DTOR op1_addr, op1_info, 0, 0, opline
  13687. if (may_throw) {
  13688. if (!zend_jit_check_exception(Dst)) {
  13689. return 0;
  13690. }
  13691. }
  13692. }
  13693. return 1;
  13694. }
  13695. static int zend_jit_echo(dasm_State **Dst, const zend_op *opline, uint32_t op1_info)
  13696. {
  13697. if (opline->op1_type == IS_CONST) {
  13698. zval *zv;
  13699. size_t len;
  13700. zv = RT_CONSTANT(opline, opline->op1);
  13701. ZEND_ASSERT(Z_TYPE_P(zv) == IS_STRING);
  13702. len = Z_STRLEN_P(zv);
  13703. if (len > 0) {
  13704. const char *str = Z_STRVAL_P(zv);
  13705. | SET_EX_OPLINE opline, r0
  13706. |.if X64
  13707. | LOAD_ADDR CARG1, str
  13708. | LOAD_ADDR CARG2, len
  13709. | EXT_CALL zend_write, r0
  13710. |.else
  13711. | mov aword A2, len
  13712. | mov aword A1, str
  13713. | EXT_CALL zend_write, r0
  13714. |.endif
  13715. if (!zend_jit_check_exception(Dst)) {
  13716. return 0;
  13717. }
  13718. }
  13719. } else {
  13720. zend_jit_addr op1_addr = OP1_ADDR();
  13721. ZEND_ASSERT((op1_info & (MAY_BE_UNDEF|MAY_BE_ANY|MAY_BE_REF)) == MAY_BE_STRING);
  13722. | SET_EX_OPLINE opline, r0
  13723. | GET_ZVAL_PTR r0, op1_addr
  13724. |.if X64
  13725. | lea CARG1, aword [r0 + offsetof(zend_string, val)]
  13726. | mov CARG2, aword [r0 + offsetof(zend_string, len)]
  13727. | EXT_CALL zend_write, r0
  13728. |.else
  13729. | add r0, offsetof(zend_string, val)
  13730. | mov aword A1, r0
  13731. | mov r0, aword [r0 + (offsetof(zend_string, len)-offsetof(zend_string, val))]
  13732. | mov aword A2, r0
  13733. | EXT_CALL zend_write, r0
  13734. |.endif
  13735. if (opline->op1_type & (IS_VAR|IS_TMP_VAR)) {
  13736. | ZVAL_PTR_DTOR op1_addr, op1_info, 0, 0, opline
  13737. }
  13738. if (!zend_jit_check_exception(Dst)) {
  13739. return 0;
  13740. }
  13741. }
  13742. return 1;
  13743. }
  13744. static int zend_jit_strlen(dasm_State **Dst, const zend_op *opline, uint32_t op1_info, zend_jit_addr op1_addr, zend_jit_addr res_addr)
  13745. {
  13746. if (opline->op1_type == IS_CONST) {
  13747. zval *zv;
  13748. size_t len;
  13749. zv = RT_CONSTANT(opline, opline->op1);
  13750. ZEND_ASSERT(Z_TYPE_P(zv) == IS_STRING);
  13751. len = Z_STRLEN_P(zv);
  13752. | SET_ZVAL_LVAL res_addr, len
  13753. if (Z_MODE(res_addr) == IS_MEM_ZVAL) {
  13754. | SET_ZVAL_TYPE_INFO res_addr, IS_LONG
  13755. } else if (!zend_jit_store_var_if_necessary(Dst, opline->result.var, res_addr, MAY_BE_LONG)) {
  13756. return 0;
  13757. }
  13758. } else {
  13759. ZEND_ASSERT((op1_info & (MAY_BE_UNDEF|MAY_BE_ANY|MAY_BE_REF)) == MAY_BE_STRING);
  13760. if (Z_MODE(res_addr) == IS_REG) {
  13761. | GET_ZVAL_PTR Ra(Z_REG(res_addr)), op1_addr
  13762. | mov Ra(Z_REG(res_addr)), aword [Ra(Z_REG(res_addr))+offsetof(zend_string, len)]
  13763. if (!zend_jit_store_var_if_necessary(Dst, opline->result.var, res_addr, MAY_BE_LONG)) {
  13764. return 0;
  13765. }
  13766. } else {
  13767. | GET_ZVAL_PTR r0, op1_addr
  13768. | mov r0, aword [r0 + offsetof(zend_string, len)]
  13769. | SET_ZVAL_LVAL res_addr, r0
  13770. | SET_ZVAL_TYPE_INFO res_addr, IS_LONG
  13771. }
  13772. | FREE_OP opline->op1_type, opline->op1, op1_info, 0, opline
  13773. }
  13774. return 1;
  13775. }
  13776. static int zend_jit_count(dasm_State **Dst, const zend_op *opline, uint32_t op1_info, zend_jit_addr op1_addr, zend_jit_addr res_addr, int may_throw)
  13777. {
  13778. if (opline->op1_type == IS_CONST) {
  13779. zval *zv;
  13780. zend_long count;
  13781. zv = RT_CONSTANT(opline, opline->op1);
  13782. ZEND_ASSERT(Z_TYPE_P(zv) == IS_ARRAY);
  13783. count = zend_hash_num_elements(Z_ARRVAL_P(zv));
  13784. | SET_ZVAL_LVAL res_addr, count
  13785. if (Z_MODE(res_addr) == IS_MEM_ZVAL) {
  13786. | SET_ZVAL_TYPE_INFO res_addr, IS_LONG
  13787. } else if (!zend_jit_store_var_if_necessary(Dst, opline->result.var, res_addr, MAY_BE_LONG)) {
  13788. return 0;
  13789. }
  13790. } else {
  13791. ZEND_ASSERT((op1_info & (MAY_BE_UNDEF|MAY_BE_ANY|MAY_BE_REF)) == MAY_BE_ARRAY);
  13792. // Note: See the implementation of ZEND_COUNT in Zend/zend_vm_def.h - arrays do not contain IS_UNDEF starting in php 8.1+.
  13793. if (Z_MODE(res_addr) == IS_REG) {
  13794. | GET_ZVAL_PTR Ra(Z_REG(res_addr)), op1_addr
  13795. // Sign-extend the 32-bit value to a potentially 64-bit zend_long
  13796. | mov Rd(Z_REG(res_addr)), dword [Ra(Z_REG(res_addr))+offsetof(HashTable, nNumOfElements)]
  13797. if (!zend_jit_store_var_if_necessary(Dst, opline->result.var, res_addr, MAY_BE_LONG)) {
  13798. return 0;
  13799. }
  13800. } else {
  13801. | GET_ZVAL_PTR r0, op1_addr
  13802. // Sign-extend the 32-bit value to a potentially 64-bit zend_long
  13803. | mov eax, dword [r0 + offsetof(HashTable, nNumOfElements)]
  13804. | SET_ZVAL_LVAL res_addr, r0
  13805. | SET_ZVAL_TYPE_INFO res_addr, IS_LONG
  13806. }
  13807. | FREE_OP opline->op1_type, opline->op1, op1_info, 0, opline
  13808. }
  13809. if (may_throw) {
  13810. return zend_jit_check_exception(Dst);
  13811. }
  13812. return 1;
  13813. }
  13814. static int zend_jit_load_this(dasm_State **Dst, uint32_t var)
  13815. {
  13816. zend_jit_addr var_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, var);
  13817. | mov FCARG1a, aword EX->This.value.ptr
  13818. | SET_ZVAL_PTR var_addr, FCARG1a
  13819. | SET_ZVAL_TYPE_INFO var_addr, IS_OBJECT_EX
  13820. | GC_ADDREF FCARG1a
  13821. return 1;
  13822. }
  13823. static int zend_jit_fetch_this(dasm_State **Dst, const zend_op *opline, const zend_op_array *op_array, bool check_only)
  13824. {
  13825. if (!op_array->scope || (op_array->fn_flags & ZEND_ACC_STATIC)) {
  13826. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  13827. if (!JIT_G(current_frame) ||
  13828. !TRACE_FRAME_IS_THIS_CHECKED(JIT_G(current_frame))) {
  13829. int32_t exit_point = zend_jit_trace_get_exit_point(opline, ZEND_JIT_EXIT_TO_VM);
  13830. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  13831. if (!exit_addr) {
  13832. return 0;
  13833. }
  13834. | cmp byte EX->This.u1.v.type, IS_OBJECT
  13835. | jne &exit_addr
  13836. if (JIT_G(current_frame)) {
  13837. TRACE_FRAME_SET_THIS_CHECKED(JIT_G(current_frame));
  13838. }
  13839. }
  13840. } else {
  13841. | cmp byte EX->This.u1.v.type, IS_OBJECT
  13842. | jne >1
  13843. |.cold_code
  13844. |1:
  13845. | SET_EX_OPLINE opline, r0
  13846. | jmp ->invalid_this
  13847. |.code
  13848. }
  13849. }
  13850. if (!check_only) {
  13851. if (!zend_jit_load_this(Dst, opline->result.var)) {
  13852. return 0;
  13853. }
  13854. }
  13855. return 1;
  13856. }
  13857. static int zend_jit_hash_jmp(dasm_State **Dst, const zend_op *opline, const zend_op_array *op_array, zend_ssa *ssa, HashTable *jumptable, int default_b, const void *default_label, const zend_op *next_opline, zend_jit_trace_info *trace_info)
  13858. {
  13859. uint32_t count;
  13860. Bucket *p;
  13861. const zend_op *target;
  13862. int b;
  13863. int32_t exit_point;
  13864. const void *exit_addr;
  13865. | test r0, r0
  13866. if (default_label) {
  13867. | jz &default_label
  13868. } else if (next_opline) {
  13869. | jz >3
  13870. } else {
  13871. | jz =>default_b
  13872. }
  13873. | LOAD_ADDR FCARG1a, jumptable
  13874. | sub r0, aword [FCARG1a + offsetof(HashTable, arData)]
  13875. | mov FCARG1a, (sizeof(Bucket) / sizeof(void*))
  13876. |.if X64
  13877. | cqo
  13878. |.else
  13879. | cdq
  13880. |.endif
  13881. | idiv FCARG1a
  13882. |.if X64
  13883. if (!IS_32BIT(dasm_end)) {
  13884. | lea FCARG1a, aword [>4]
  13885. | jmp aword [FCARG1a + r0]
  13886. } else {
  13887. | jmp aword [r0 + >4]
  13888. }
  13889. |.else
  13890. | jmp aword [r0 + >4]
  13891. |.endif
  13892. |.jmp_table
  13893. |.align aword
  13894. |4:
  13895. if (trace_info) {
  13896. trace_info->jmp_table_size += zend_hash_num_elements(jumptable);
  13897. }
  13898. count = jumptable->nNumUsed;
  13899. p = jumptable->arData;
  13900. do {
  13901. if (Z_TYPE(p->val) == IS_UNDEF) {
  13902. if (default_label) {
  13903. | .aword &default_label
  13904. } else if (next_opline) {
  13905. | .aword >3
  13906. } else {
  13907. | .aword =>default_b
  13908. }
  13909. } else {
  13910. target = ZEND_OFFSET_TO_OPLINE(opline, Z_LVAL(p->val));
  13911. if (!next_opline) {
  13912. b = ssa->cfg.map[target - op_array->opcodes];
  13913. | .aword =>b
  13914. } else if (next_opline == target) {
  13915. | .aword >3
  13916. } else {
  13917. exit_point = zend_jit_trace_get_exit_point(target, 0);
  13918. exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  13919. if (!exit_addr) {
  13920. return 0;
  13921. }
  13922. | .aword &exit_addr
  13923. }
  13924. }
  13925. p++;
  13926. count--;
  13927. } while (count);
  13928. |.code
  13929. return 1;
  13930. }
  13931. static int zend_jit_switch(dasm_State **Dst, const zend_op *opline, const zend_op_array *op_array, zend_ssa *ssa, zend_jit_trace_rec *trace, zend_jit_trace_info *trace_info)
  13932. {
  13933. HashTable *jumptable = Z_ARRVAL_P(RT_CONSTANT(opline, opline->op2));
  13934. const zend_op *next_opline = NULL;
  13935. if (trace) {
  13936. ZEND_ASSERT(trace->op == ZEND_JIT_TRACE_VM || trace->op == ZEND_JIT_TRACE_END);
  13937. ZEND_ASSERT(trace->opline != NULL);
  13938. next_opline = trace->opline;
  13939. }
  13940. if (opline->op1_type == IS_CONST) {
  13941. zval *zv = RT_CONSTANT(opline, opline->op1);
  13942. zval *jump_zv = NULL;
  13943. int b;
  13944. if (opline->opcode == ZEND_SWITCH_LONG) {
  13945. if (Z_TYPE_P(zv) == IS_LONG) {
  13946. jump_zv = zend_hash_index_find(jumptable, Z_LVAL_P(zv));
  13947. }
  13948. } else if (opline->opcode == ZEND_SWITCH_STRING) {
  13949. if (Z_TYPE_P(zv) == IS_STRING) {
  13950. jump_zv = zend_hash_find_known_hash(jumptable, Z_STR_P(zv));
  13951. }
  13952. } else if (opline->opcode == ZEND_MATCH) {
  13953. if (Z_TYPE_P(zv) == IS_LONG) {
  13954. jump_zv = zend_hash_index_find(jumptable, Z_LVAL_P(zv));
  13955. } else if (Z_TYPE_P(zv) == IS_STRING) {
  13956. jump_zv = zend_hash_find_known_hash(jumptable, Z_STR_P(zv));
  13957. }
  13958. } else {
  13959. ZEND_UNREACHABLE();
  13960. }
  13961. if (next_opline) {
  13962. const zend_op *target;
  13963. if (jump_zv != NULL) {
  13964. target = ZEND_OFFSET_TO_OPLINE(opline, Z_LVAL_P(jump_zv));
  13965. } else {
  13966. target = ZEND_OFFSET_TO_OPLINE(opline, opline->extended_value);
  13967. }
  13968. ZEND_ASSERT(target == next_opline);
  13969. } else {
  13970. if (jump_zv != NULL) {
  13971. b = ssa->cfg.map[ZEND_OFFSET_TO_OPLINE(opline, Z_LVAL_P(jump_zv)) - op_array->opcodes];
  13972. } else {
  13973. b = ssa->cfg.map[ZEND_OFFSET_TO_OPLINE(opline, opline->extended_value) - op_array->opcodes];
  13974. }
  13975. | jmp =>b
  13976. }
  13977. } else {
  13978. zend_ssa_op *ssa_op = &ssa->ops[opline - op_array->opcodes];
  13979. uint32_t op1_info = OP1_INFO();
  13980. zend_jit_addr op1_addr = OP1_ADDR();
  13981. const zend_op *default_opline = ZEND_OFFSET_TO_OPLINE(opline, opline->extended_value);
  13982. const zend_op *target;
  13983. int default_b = next_opline ? -1 : ssa->cfg.map[default_opline - op_array->opcodes];
  13984. int b;
  13985. int32_t exit_point;
  13986. const void *fallback_label = NULL;
  13987. const void *default_label = NULL;
  13988. const void *exit_addr;
  13989. if (next_opline) {
  13990. if (next_opline != opline + 1) {
  13991. exit_point = zend_jit_trace_get_exit_point(opline + 1, 0);
  13992. fallback_label = zend_jit_trace_get_exit_addr(exit_point);
  13993. if (!fallback_label) {
  13994. return 0;
  13995. }
  13996. }
  13997. if (next_opline != default_opline) {
  13998. exit_point = zend_jit_trace_get_exit_point(default_opline, 0);
  13999. default_label = zend_jit_trace_get_exit_addr(exit_point);
  14000. if (!default_label) {
  14001. return 0;
  14002. }
  14003. }
  14004. }
  14005. if (opline->opcode == ZEND_SWITCH_LONG) {
  14006. if (op1_info & MAY_BE_LONG) {
  14007. if (op1_info & MAY_BE_REF) {
  14008. | IF_NOT_ZVAL_TYPE op1_addr, IS_LONG, >1
  14009. | GET_ZVAL_LVAL ZREG_FCARG2, op1_addr
  14010. |.cold_code
  14011. |1:
  14012. | // ZVAL_DEREF(op)
  14013. if (fallback_label) {
  14014. | IF_NOT_ZVAL_TYPE op1_addr, IS_REFERENCE, &fallback_label
  14015. } else {
  14016. | IF_NOT_ZVAL_TYPE op1_addr, IS_REFERENCE, >3
  14017. }
  14018. | GET_ZVAL_PTR FCARG2a, op1_addr
  14019. if (fallback_label) {
  14020. | IF_NOT_Z_TYPE FCARG2a + offsetof(zend_reference, val), IS_LONG, &fallback_label
  14021. } else {
  14022. | IF_NOT_Z_TYPE FCARG2a + offsetof(zend_reference, val), IS_LONG, >3
  14023. }
  14024. | mov FCARG2a, aword [FCARG2a + offsetof(zend_reference, val.value.lval)]
  14025. | jmp >2
  14026. |.code
  14027. |2:
  14028. } else {
  14029. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-MAY_BE_LONG)) {
  14030. if (fallback_label) {
  14031. | IF_NOT_ZVAL_TYPE op1_addr, IS_LONG, &fallback_label
  14032. } else {
  14033. | IF_NOT_ZVAL_TYPE op1_addr, IS_LONG, >3
  14034. }
  14035. }
  14036. | GET_ZVAL_LVAL ZREG_FCARG2, op1_addr
  14037. }
  14038. if (HT_IS_PACKED(jumptable)) {
  14039. uint32_t count = jumptable->nNumUsed;
  14040. Bucket *p = jumptable->arData;
  14041. | cmp FCARG2a, jumptable->nNumUsed
  14042. if (default_label) {
  14043. | jae &default_label
  14044. } else if (next_opline) {
  14045. | jae >3
  14046. } else {
  14047. | jae =>default_b
  14048. }
  14049. |.if X64
  14050. if (!IS_32BIT(dasm_end)) {
  14051. | lea r0, aword [>4]
  14052. | jmp aword [r0 + FCARG2a * 8]
  14053. } else {
  14054. | jmp aword [FCARG2a * 8 + >4]
  14055. }
  14056. |.else
  14057. | jmp aword [FCARG2a * 4 + >4]
  14058. |.endif
  14059. |.jmp_table
  14060. |.align aword
  14061. |4:
  14062. if (trace_info) {
  14063. trace_info->jmp_table_size += count;
  14064. }
  14065. p = jumptable->arData;
  14066. do {
  14067. if (Z_TYPE(p->val) == IS_UNDEF) {
  14068. if (default_label) {
  14069. | .aword &default_label
  14070. } else if (next_opline) {
  14071. | .aword >3
  14072. } else {
  14073. | .aword =>default_b
  14074. }
  14075. } else {
  14076. target = ZEND_OFFSET_TO_OPLINE(opline, Z_LVAL(p->val));
  14077. if (!next_opline) {
  14078. b = ssa->cfg.map[target - op_array->opcodes];
  14079. | .aword =>b
  14080. } else if (next_opline == target) {
  14081. | .aword >3
  14082. } else {
  14083. exit_point = zend_jit_trace_get_exit_point(target, 0);
  14084. exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  14085. if (!exit_addr) {
  14086. return 0;
  14087. }
  14088. | .aword &exit_addr
  14089. }
  14090. }
  14091. p++;
  14092. count--;
  14093. } while (count);
  14094. |.code
  14095. |3:
  14096. } else {
  14097. | LOAD_ADDR FCARG1a, jumptable
  14098. | EXT_CALL zend_hash_index_find, r0
  14099. if (!zend_jit_hash_jmp(Dst, opline, op_array, ssa, jumptable, default_b, default_label, next_opline, trace_info)) {
  14100. return 0;
  14101. }
  14102. |3:
  14103. }
  14104. }
  14105. } else if (opline->opcode == ZEND_SWITCH_STRING) {
  14106. if (op1_info & MAY_BE_STRING) {
  14107. if (op1_info & MAY_BE_REF) {
  14108. | IF_NOT_ZVAL_TYPE op1_addr, IS_STRING, >1
  14109. | GET_ZVAL_PTR FCARG2a, op1_addr
  14110. |.cold_code
  14111. |1:
  14112. | // ZVAL_DEREF(op)
  14113. if (fallback_label) {
  14114. | IF_NOT_ZVAL_TYPE op1_addr, IS_REFERENCE, &fallback_label
  14115. } else {
  14116. | IF_NOT_ZVAL_TYPE op1_addr, IS_REFERENCE, >3
  14117. }
  14118. | GET_ZVAL_PTR FCARG2a, op1_addr
  14119. if (fallback_label) {
  14120. | IF_NOT_Z_TYPE FCARG2a + offsetof(zend_reference, val), IS_STRING, &fallback_label
  14121. } else {
  14122. | IF_NOT_Z_TYPE FCARG2a + offsetof(zend_reference, val), IS_STRING, >3
  14123. }
  14124. | mov FCARG2a, aword [FCARG2a + offsetof(zend_reference, val.value.ptr)]
  14125. | jmp >2
  14126. |.code
  14127. |2:
  14128. } else {
  14129. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-MAY_BE_STRING)) {
  14130. if (fallback_label) {
  14131. | IF_NOT_ZVAL_TYPE op1_addr, IS_STRING, &fallback_label
  14132. } else {
  14133. | IF_NOT_ZVAL_TYPE op1_addr, IS_STRING, >3
  14134. }
  14135. }
  14136. | GET_ZVAL_PTR FCARG2a, op1_addr
  14137. }
  14138. | LOAD_ADDR FCARG1a, jumptable
  14139. | EXT_CALL zend_hash_find, r0
  14140. if (!zend_jit_hash_jmp(Dst, opline, op_array, ssa, jumptable, default_b, default_label, next_opline, trace_info)) {
  14141. return 0;
  14142. }
  14143. |3:
  14144. }
  14145. } else if (opline->opcode == ZEND_MATCH) {
  14146. if (op1_info & (MAY_BE_LONG|MAY_BE_STRING)) {
  14147. if (op1_info & MAY_BE_REF) {
  14148. | LOAD_ZVAL_ADDR FCARG2a, op1_addr
  14149. | ZVAL_DEREF FCARG2a, op1_info
  14150. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG2, 0);
  14151. }
  14152. | LOAD_ADDR FCARG1a, jumptable
  14153. if (op1_info & MAY_BE_LONG) {
  14154. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-MAY_BE_LONG)) {
  14155. if (op1_info & MAY_BE_STRING) {
  14156. | IF_NOT_ZVAL_TYPE op1_addr, IS_LONG, >5
  14157. } else if (op1_info & MAY_BE_UNDEF) {
  14158. | IF_NOT_ZVAL_TYPE op1_addr, IS_LONG, >6
  14159. } else if (default_label) {
  14160. | IF_NOT_ZVAL_TYPE op1_addr, IS_LONG, &default_label
  14161. } else if (next_opline) {
  14162. | IF_NOT_ZVAL_TYPE op1_addr, IS_LONG, >3
  14163. } else {
  14164. | IF_NOT_ZVAL_TYPE op1_addr, IS_LONG, =>default_b
  14165. }
  14166. }
  14167. | GET_ZVAL_LVAL ZREG_FCARG2, op1_addr
  14168. | EXT_CALL zend_hash_index_find, r0
  14169. if (op1_info & MAY_BE_STRING) {
  14170. | jmp >2
  14171. }
  14172. }
  14173. if (op1_info & MAY_BE_STRING) {
  14174. |5:
  14175. if (op1_info & ((MAY_BE_ANY|MAY_BE_UNDEF)-(MAY_BE_LONG|MAY_BE_STRING))) {
  14176. if (op1_info & MAY_BE_UNDEF) {
  14177. | IF_NOT_ZVAL_TYPE op1_addr, IS_STRING, >6
  14178. } else if (default_label) {
  14179. | IF_NOT_ZVAL_TYPE op1_addr, IS_STRING, &default_label
  14180. } else if (next_opline) {
  14181. | IF_NOT_ZVAL_TYPE op1_addr, IS_STRING, >3
  14182. } else {
  14183. | IF_NOT_ZVAL_TYPE op1_addr, IS_STRING, =>default_b
  14184. }
  14185. }
  14186. | GET_ZVAL_PTR FCARG2a, op1_addr
  14187. | EXT_CALL zend_hash_find, r0
  14188. }
  14189. |2:
  14190. if (!zend_jit_hash_jmp(Dst, opline, op_array, ssa, jumptable, default_b, default_label, next_opline, trace_info)) {
  14191. return 0;
  14192. }
  14193. }
  14194. if (op1_info & MAY_BE_UNDEF) {
  14195. |6:
  14196. if (op1_info & (MAY_BE_ANY-(MAY_BE_LONG|MAY_BE_STRING))) {
  14197. if (default_label) {
  14198. | IF_NOT_ZVAL_TYPE op1_addr, IS_UNDEF, &default_label
  14199. } else if (next_opline) {
  14200. | IF_NOT_ZVAL_TYPE op1_addr, IS_UNDEF, >3
  14201. } else {
  14202. | IF_NOT_ZVAL_TYPE op1_addr, IS_UNDEF, =>default_b
  14203. }
  14204. }
  14205. | // zend_error(E_WARNING, "Undefined variable $%s", ZSTR_VAL(CV_DEF_OF(EX_VAR_TO_NUM(opline->op1.var))));
  14206. | SET_EX_OPLINE opline, r0
  14207. | mov FCARG1d, opline->op1.var
  14208. | EXT_CALL zend_jit_undefined_op_helper, r0
  14209. if (!zend_jit_check_exception_undef_result(Dst, opline)) {
  14210. return 0;
  14211. }
  14212. }
  14213. if (default_label) {
  14214. | jmp &default_label
  14215. } else if (next_opline) {
  14216. | jmp >3
  14217. } else {
  14218. | jmp =>default_b
  14219. }
  14220. |3:
  14221. } else {
  14222. ZEND_UNREACHABLE();
  14223. }
  14224. }
  14225. return 1;
  14226. }
  14227. static bool zend_jit_verify_return_type(dasm_State **Dst, const zend_op *opline, const zend_op_array *op_array, uint32_t op1_info)
  14228. {
  14229. zend_arg_info *arg_info = &op_array->arg_info[-1];
  14230. ZEND_ASSERT(ZEND_TYPE_IS_SET(arg_info->type));
  14231. zend_jit_addr op1_addr = OP1_ADDR();
  14232. bool needs_slow_check = 1;
  14233. bool slow_check_in_cold = 1;
  14234. uint32_t type_mask = ZEND_TYPE_PURE_MASK(arg_info->type) & MAY_BE_ANY;
  14235. if (type_mask == 0) {
  14236. slow_check_in_cold = 0;
  14237. } else {
  14238. if (((op1_info & MAY_BE_ANY) & type_mask) == 0) {
  14239. slow_check_in_cold = 0;
  14240. } else if (((op1_info & MAY_BE_ANY) | type_mask) == type_mask) {
  14241. needs_slow_check = 0;
  14242. } else if (is_power_of_two(type_mask)) {
  14243. uint32_t type_code = concrete_type(type_mask);
  14244. | IF_NOT_ZVAL_TYPE op1_addr, type_code, >6
  14245. } else {
  14246. | mov edx, 1
  14247. | GET_ZVAL_TYPE cl, op1_addr
  14248. | shl edx, cl
  14249. | test edx, type_mask
  14250. | je >6
  14251. }
  14252. }
  14253. if (needs_slow_check) {
  14254. if (slow_check_in_cold) {
  14255. |.cold_code
  14256. |6:
  14257. }
  14258. | SET_EX_OPLINE opline, r1
  14259. if (op1_info & MAY_BE_UNDEF) {
  14260. | IF_NOT_ZVAL_TYPE op1_addr, IS_UNDEF, >7
  14261. | mov FCARG1a, opline->op1.var
  14262. | EXT_CALL zend_jit_undefined_op_helper, FCARG2a
  14263. | test r0, r0
  14264. | jz ->exception_handler
  14265. | LOAD_ADDR_ZTS FCARG1a, executor_globals, uninitialized_zval
  14266. | jmp >8
  14267. }
  14268. |7:
  14269. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  14270. |8:
  14271. | mov FCARG2a, EX->func
  14272. |.if X64
  14273. | LOAD_ADDR CARG3, (ptrdiff_t)arg_info
  14274. | mov r0, EX->run_time_cache
  14275. | lea CARG4, aword [r0+opline->op2.num]
  14276. | EXT_CALL zend_jit_verify_return_slow, r0
  14277. |.else
  14278. | sub r4, 8
  14279. | mov r0, EX->run_time_cache
  14280. | add r0, opline->op2.num
  14281. | push r0
  14282. | push (ptrdiff_t)arg_info
  14283. | EXT_CALL zend_jit_verify_return_slow, r0
  14284. | add r4, 8
  14285. |.endif
  14286. if (!zend_jit_check_exception(Dst)) {
  14287. return 0;
  14288. }
  14289. if (slow_check_in_cold) {
  14290. | jmp >9
  14291. |.code
  14292. }
  14293. }
  14294. |9:
  14295. return 1;
  14296. }
  14297. static int zend_jit_isset_isempty_cv(dasm_State **Dst, const zend_op *opline, uint32_t op1_info, zend_jit_addr op1_addr, zend_uchar smart_branch_opcode, uint32_t target_label, uint32_t target_label2, const void *exit_addr)
  14298. {
  14299. zend_jit_addr res_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->result.var);
  14300. // TODO: support for empty() ???
  14301. ZEND_ASSERT(!(opline->extended_value & ZEND_ISEMPTY));
  14302. if (op1_info & MAY_BE_REF) {
  14303. if (Z_MODE(op1_addr) != IS_MEM_ZVAL || Z_REG(op1_addr) != ZREG_FCARG1 || Z_OFFSET(op1_addr) != 0) {
  14304. | LOAD_ZVAL_ADDR FCARG1a, op1_addr
  14305. op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  14306. }
  14307. | ZVAL_DEREF FCARG1a, op1_info
  14308. |1:
  14309. }
  14310. if (!(op1_info & (MAY_BE_UNDEF|MAY_BE_NULL))) {
  14311. if (exit_addr) {
  14312. ZEND_ASSERT(smart_branch_opcode == ZEND_JMPZ);
  14313. } else if (smart_branch_opcode) {
  14314. if (smart_branch_opcode == ZEND_JMPNZ) {
  14315. | jmp =>target_label
  14316. } else if (smart_branch_opcode == ZEND_JMPZNZ) {
  14317. | jmp =>target_label2
  14318. }
  14319. } else {
  14320. | SET_ZVAL_TYPE_INFO res_addr, IS_TRUE
  14321. }
  14322. } else if (!(op1_info & (MAY_BE_ANY - MAY_BE_NULL))) {
  14323. if (exit_addr) {
  14324. ZEND_ASSERT(smart_branch_opcode == ZEND_JMPNZ);
  14325. } else if (smart_branch_opcode) {
  14326. if (smart_branch_opcode != ZEND_JMPNZ) {
  14327. | jmp =>target_label
  14328. }
  14329. } else {
  14330. | SET_ZVAL_TYPE_INFO res_addr, IS_FALSE
  14331. }
  14332. } else {
  14333. ZEND_ASSERT(Z_MODE(op1_addr) == IS_MEM_ZVAL);
  14334. | cmp byte [Ra(Z_REG(op1_addr))+Z_OFFSET(op1_addr)+offsetof(zval, u1.v.type)], IS_NULL
  14335. if (exit_addr) {
  14336. if (smart_branch_opcode == ZEND_JMPNZ) {
  14337. | jg &exit_addr
  14338. } else {
  14339. | jle &exit_addr
  14340. }
  14341. } else if (smart_branch_opcode) {
  14342. if (smart_branch_opcode == ZEND_JMPZ) {
  14343. | jle =>target_label
  14344. } else if (smart_branch_opcode == ZEND_JMPNZ) {
  14345. | jg =>target_label
  14346. } else if (smart_branch_opcode == ZEND_JMPZNZ) {
  14347. | jle =>target_label
  14348. | jmp =>target_label2
  14349. } else {
  14350. ZEND_UNREACHABLE();
  14351. }
  14352. } else {
  14353. | setg al
  14354. | movzx eax, al
  14355. | lea eax, [eax + IS_FALSE]
  14356. | SET_ZVAL_TYPE_INFO res_addr, eax
  14357. }
  14358. }
  14359. return 1;
  14360. }
  14361. static int zend_jit_fe_reset(dasm_State **Dst, const zend_op *opline, uint32_t op1_info)
  14362. {
  14363. zend_jit_addr res_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->result.var);
  14364. if (opline->op1_type == IS_CONST) {
  14365. zval *zv = RT_CONSTANT(opline, opline->op1);
  14366. | ZVAL_COPY_CONST res_addr, MAY_BE_ANY, MAY_BE_ANY, zv, ZREG_R0
  14367. if (Z_REFCOUNTED_P(zv)) {
  14368. | ADDREF_CONST zv, r0
  14369. }
  14370. } else {
  14371. zend_jit_addr op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->op1.var);
  14372. | // ZVAL_COPY(res, value);
  14373. | ZVAL_COPY_VALUE res_addr, -1, op1_addr, op1_info, ZREG_R0, ZREG_FCARG1
  14374. if (opline->op1_type == IS_CV) {
  14375. | TRY_ADDREF op1_info, ah, FCARG1a
  14376. }
  14377. }
  14378. | // Z_FE_POS_P(res) = 0;
  14379. | mov dword [FP + opline->result.var + offsetof(zval, u2.fe_pos)], 0
  14380. return 1;
  14381. }
  14382. static int zend_jit_fe_fetch(dasm_State **Dst, const zend_op *opline, uint32_t op1_info, uint32_t op2_info, unsigned int target_label, zend_uchar exit_opcode, const void *exit_addr)
  14383. {
  14384. zend_jit_addr op1_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->op1.var);
  14385. | // array = EX_VAR(opline->op1.var);
  14386. | // fe_ht = Z_ARRVAL_P(array);
  14387. | GET_ZVAL_PTR FCARG1a, op1_addr
  14388. | // pos = Z_FE_POS_P(array);
  14389. | mov eax, dword [FP + opline->op1.var + offsetof(zval, u2.fe_pos)]
  14390. | // p = fe_ht->arData + pos;
  14391. |.if X64
  14392. || ZEND_ASSERT(sizeof(Bucket) == 32);
  14393. | mov FCARG2d, eax
  14394. | shl FCARG2a, 5
  14395. |.else
  14396. | imul FCARG2a, r0, sizeof(Bucket)
  14397. |.endif
  14398. | add FCARG2a, aword [FCARG1a + offsetof(zend_array, arData)]
  14399. |1:
  14400. | // if (UNEXPECTED(pos >= fe_ht->nNumUsed)) {
  14401. | cmp dword [FCARG1a + offsetof(zend_array, nNumUsed)], eax
  14402. | // ZEND_VM_SET_RELATIVE_OPCODE(opline, opline->extended_value);
  14403. | // ZEND_VM_CONTINUE();
  14404. if (exit_addr) {
  14405. if (exit_opcode == ZEND_JMP) {
  14406. | jbe &exit_addr
  14407. } else {
  14408. | jbe >3
  14409. }
  14410. } else {
  14411. | jbe =>target_label
  14412. }
  14413. | // pos++;
  14414. | add eax, 1
  14415. | // value_type = Z_TYPE_INFO_P(value);
  14416. | // if (EXPECTED(value_type != IS_UNDEF)) {
  14417. if (!exit_addr || exit_opcode == ZEND_JMP) {
  14418. | IF_NOT_Z_TYPE FCARG2a, IS_UNDEF, >3
  14419. } else {
  14420. | IF_NOT_Z_TYPE FCARG2a, IS_UNDEF, &exit_addr
  14421. }
  14422. | // p++;
  14423. | add FCARG2a, sizeof(Bucket)
  14424. | jmp <1
  14425. |3:
  14426. if (!exit_addr || exit_opcode == ZEND_JMP) {
  14427. zend_jit_addr val_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG2, 0);
  14428. zend_jit_addr var_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->op2.var);
  14429. uint32_t val_info;
  14430. | // Z_FE_POS_P(array) = pos + 1;
  14431. | mov dword [FP + opline->op1.var + offsetof(zval, u2.fe_pos)], eax
  14432. if (RETURN_VALUE_USED(opline)) {
  14433. zend_jit_addr res_addr = RES_ADDR();
  14434. if ((op1_info & MAY_BE_ARRAY_KEY_LONG)
  14435. && (op1_info & MAY_BE_ARRAY_KEY_STRING)) {
  14436. | // if (!p->key) {
  14437. | cmp aword [FCARG2a + offsetof(Bucket, key)], 0
  14438. | jz >2
  14439. }
  14440. if (op1_info & MAY_BE_ARRAY_KEY_STRING) {
  14441. | // ZVAL_STR_COPY(EX_VAR(opline->result.var), p->key);
  14442. | mov r0, aword [FCARG2a + offsetof(Bucket, key)]
  14443. | SET_ZVAL_PTR res_addr, r0
  14444. | test dword [r0 + offsetof(zend_refcounted, gc.u.type_info)], IS_STR_INTERNED
  14445. | jz >1
  14446. | SET_ZVAL_TYPE_INFO res_addr, IS_STRING
  14447. | jmp >3
  14448. |1:
  14449. | GC_ADDREF r0
  14450. | SET_ZVAL_TYPE_INFO res_addr, IS_STRING_EX
  14451. if (op1_info & MAY_BE_ARRAY_KEY_LONG) {
  14452. | jmp >3
  14453. |2:
  14454. }
  14455. }
  14456. if (op1_info & MAY_BE_ARRAY_KEY_LONG) {
  14457. | // ZVAL_LONG(EX_VAR(opline->result.var), p->h);
  14458. | mov r0, aword [FCARG2a + offsetof(Bucket, h)]
  14459. | SET_ZVAL_LVAL res_addr, r0
  14460. | SET_ZVAL_TYPE_INFO res_addr, IS_LONG
  14461. }
  14462. |3:
  14463. }
  14464. val_info = ((op1_info & MAY_BE_ARRAY_OF_ANY) >> MAY_BE_ARRAY_SHIFT);
  14465. if (val_info & MAY_BE_ARRAY) {
  14466. val_info |= MAY_BE_ARRAY_KEY_ANY | MAY_BE_ARRAY_OF_ANY | MAY_BE_ARRAY_OF_REF;
  14467. }
  14468. if (op1_info & MAY_BE_ARRAY_OF_REF) {
  14469. val_info |= MAY_BE_REF | MAY_BE_RC1 | MAY_BE_RCN | MAY_BE_ANY |
  14470. MAY_BE_ARRAY_KEY_ANY | MAY_BE_ARRAY_OF_ANY | MAY_BE_ARRAY_OF_REF;
  14471. } else if (val_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE)) {
  14472. val_info |= MAY_BE_RC1 | MAY_BE_RCN;
  14473. }
  14474. if (opline->op2_type == IS_CV) {
  14475. | // zend_assign_to_variable(variable_ptr, value, IS_CV, EX_USES_STRICT_TYPES());
  14476. if (!zend_jit_assign_to_variable(Dst, opline, var_addr, var_addr, op2_info, -1, IS_CV, val_addr, val_info, 0, 1)) {
  14477. return 0;
  14478. }
  14479. } else {
  14480. | // ZVAL_COPY(res, value);
  14481. | ZVAL_COPY_VALUE var_addr, -1, val_addr, val_info, ZREG_R0, ZREG_FCARG1
  14482. | TRY_ADDREF val_info, ah, FCARG1a
  14483. }
  14484. }
  14485. return 1;
  14486. }
  14487. static int zend_jit_fetch_constant(dasm_State **Dst,
  14488. const zend_op *opline,
  14489. const zend_op_array *op_array,
  14490. zend_ssa *ssa,
  14491. const zend_ssa_op *ssa_op,
  14492. zend_jit_addr res_addr)
  14493. {
  14494. zval *zv = RT_CONSTANT(opline, opline->op2) + 1;
  14495. zend_jit_addr const_addr = ZEND_ADDR_MEM_ZVAL(ZREG_R0, 0);
  14496. uint32_t res_info = RES_INFO();
  14497. | // c = CACHED_PTR(opline->extended_value);
  14498. | mov FCARG1a, EX->run_time_cache
  14499. | mov r0, aword [FCARG1a + opline->extended_value]
  14500. | // if (c != NULL)
  14501. | test r0, r0
  14502. | jz >9
  14503. if (!zend_jit_is_persistent_constant(zv, opline->op1.num)) {
  14504. | // if (!IS_SPECIAL_CACHE_VAL(c))
  14505. | test r0, CACHE_SPECIAL
  14506. | jnz >9
  14507. }
  14508. |8:
  14509. if ((res_info & MAY_BE_GUARD) && JIT_G(current_frame)) {
  14510. zend_jit_trace_stack *stack = JIT_G(current_frame)->stack;
  14511. uint32_t old_info = STACK_INFO(stack, EX_VAR_TO_NUM(opline->result.var));
  14512. int32_t exit_point;
  14513. const void *exit_addr = NULL;
  14514. SET_STACK_TYPE(stack, EX_VAR_TO_NUM(opline->result.var), IS_UNKNOWN, 1);
  14515. SET_STACK_REG(stack, EX_VAR_TO_NUM(opline->result.var), ZREG_ZVAL_COPY_GPR0);
  14516. exit_point = zend_jit_trace_get_exit_point(opline+1, 0);
  14517. SET_STACK_INFO(stack, EX_VAR_TO_NUM(opline->result.var), old_info);
  14518. exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  14519. if (!exit_addr) {
  14520. return 0;
  14521. }
  14522. res_info &= ~MAY_BE_GUARD;
  14523. ssa->var_info[ssa_op->result_def].type &= ~MAY_BE_GUARD;
  14524. zend_uchar type = concrete_type(res_info);
  14525. if (type < IS_STRING) {
  14526. | IF_NOT_ZVAL_TYPE const_addr, type, &exit_addr
  14527. } else {
  14528. | GET_ZVAL_TYPE_INFO edx, const_addr
  14529. | IF_NOT_TYPE dl, type, &exit_addr
  14530. }
  14531. | ZVAL_COPY_VALUE_V res_addr, -1, const_addr, res_info, ZREG_R0, ZREG_R1
  14532. if (type < IS_STRING) {
  14533. if (Z_MODE(res_addr) == IS_MEM_ZVAL) {
  14534. | SET_ZVAL_TYPE_INFO res_addr, type
  14535. } else if (!zend_jit_store_var_if_necessary(Dst, opline->result.var, res_addr, res_info)) {
  14536. return 0;
  14537. }
  14538. } else {
  14539. | SET_ZVAL_TYPE_INFO res_addr, edx
  14540. | TRY_ADDREF res_info, dh, r1
  14541. }
  14542. } else {
  14543. | // ZVAL_COPY_OR_DUP(EX_VAR(opline->result.var), &c->value); (no dup)
  14544. | ZVAL_COPY_VALUE res_addr, MAY_BE_ANY, const_addr, MAY_BE_ANY, ZREG_R0, ZREG_R1
  14545. | TRY_ADDREF MAY_BE_ANY, ah, r1
  14546. }
  14547. |.cold_code
  14548. |9:
  14549. | // SAVE_OPLINE();
  14550. | SET_EX_OPLINE opline, r0
  14551. | // zend_quick_get_constant(RT_CONSTANT(opline, opline->op2) + 1, opline->op1.num OPLINE_CC EXECUTE_DATA_CC);
  14552. | LOAD_ADDR FCARG1a, zv
  14553. | mov FCARG2a, opline->op1.num
  14554. | EXT_CALL zend_jit_get_constant, r0
  14555. | // ZEND_VM_NEXT_OPCODE_CHECK_EXCEPTION();
  14556. | test r0, r0
  14557. | jnz <8
  14558. | jmp ->exception_handler
  14559. |.code
  14560. return 1;
  14561. }
  14562. static int zend_jit_in_array(dasm_State **Dst, const zend_op *opline, uint32_t op1_info, zend_jit_addr op1_addr, zend_uchar smart_branch_opcode, uint32_t target_label, uint32_t target_label2, const void *exit_addr)
  14563. {
  14564. HashTable *ht = Z_ARRVAL_P(RT_CONSTANT(opline, opline->op2));
  14565. zend_jit_addr res_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FP, opline->result.var);
  14566. ZEND_ASSERT(opline->op1_type != IS_VAR && opline->op1_type != IS_TMP_VAR);
  14567. ZEND_ASSERT((op1_info & (MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_REF)) == MAY_BE_STRING);
  14568. | // result = zend_hash_find_ex(ht, Z_STR_P(op1), OP1_TYPE == IS_CONST);
  14569. | LOAD_ADDR FCARG1a, ht
  14570. if (opline->op1_type != IS_CONST) {
  14571. | GET_ZVAL_PTR FCARG2a, op1_addr
  14572. | EXT_CALL zend_hash_find, r0
  14573. } else {
  14574. zend_string *str = Z_STR_P(RT_CONSTANT(opline, opline->op1));
  14575. | LOAD_ADDR FCARG2a, str
  14576. | EXT_CALL zend_hash_find_known_hash, r0
  14577. }
  14578. | test r0, r0
  14579. if (exit_addr) {
  14580. if (smart_branch_opcode == ZEND_JMPZ) {
  14581. | jz &exit_addr
  14582. } else {
  14583. | jnz &exit_addr
  14584. }
  14585. } else if (smart_branch_opcode) {
  14586. if (smart_branch_opcode == ZEND_JMPZ) {
  14587. | jz =>target_label
  14588. } else if (smart_branch_opcode == ZEND_JMPNZ) {
  14589. | jnz =>target_label
  14590. } else if (smart_branch_opcode == ZEND_JMPZNZ) {
  14591. | jz =>target_label
  14592. | jmp =>target_label2
  14593. } else {
  14594. ZEND_UNREACHABLE();
  14595. }
  14596. } else {
  14597. | setnz al
  14598. | movzx eax, al
  14599. | lea eax, [eax + IS_FALSE]
  14600. | SET_ZVAL_TYPE_INFO res_addr, eax
  14601. }
  14602. return 1;
  14603. }
  14604. static int zend_jit_rope(dasm_State **Dst, const zend_op *opline, uint32_t op2_info)
  14605. {
  14606. uint32_t offset;
  14607. offset = (opline->opcode == ZEND_ROPE_INIT) ?
  14608. opline->result.var :
  14609. opline->op1.var + opline->extended_value * sizeof(zend_string*);
  14610. if (opline->op2_type == IS_CONST) {
  14611. zval *zv = RT_CONSTANT(opline, opline->op2);
  14612. zend_string *str;
  14613. ZEND_ASSERT(Z_TYPE_P(zv) == IS_STRING);
  14614. str = Z_STR_P(zv);
  14615. | ADDR_STORE aword [FP + offset], str, r0
  14616. } else {
  14617. zend_jit_addr op2_addr = OP2_ADDR();
  14618. ZEND_ASSERT((op2_info & (MAY_BE_UNDEF|MAY_BE_ANY|MAY_BE_REF)) == MAY_BE_STRING);
  14619. | GET_ZVAL_PTR r1, op2_addr
  14620. | mov aword [FP + offset], r1
  14621. if (opline->op2_type == IS_CV) {
  14622. | GET_ZVAL_TYPE_INFO eax, op2_addr
  14623. | TRY_ADDREF op2_info, ah, r1
  14624. }
  14625. }
  14626. if (opline->opcode == ZEND_ROPE_END) {
  14627. zend_jit_addr res_addr = RES_ADDR();
  14628. | lea FCARG1a, [FP + opline->op1.var]
  14629. | mov FCARG2d, opline->extended_value
  14630. | EXT_CALL zend_jit_rope_end, r0
  14631. | SET_ZVAL_PTR res_addr, r0
  14632. | SET_ZVAL_TYPE_INFO res_addr, IS_STRING_EX
  14633. }
  14634. return 1;
  14635. }
  14636. static bool zend_jit_noref_guard(dasm_State **Dst, const zend_op *opline, zend_jit_addr var_addr)
  14637. {
  14638. int32_t exit_point = zend_jit_trace_get_exit_point(opline, 0);
  14639. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  14640. if (!exit_addr) {
  14641. return 0;
  14642. }
  14643. | IF_ZVAL_TYPE var_addr, IS_REFERENCE, &exit_addr
  14644. return 1;
  14645. }
  14646. static bool zend_jit_fetch_reference(dasm_State **Dst, const zend_op *opline, uint8_t var_type, uint32_t *var_info_ptr, zend_jit_addr *var_addr_ptr, bool add_ref_guard, bool add_type_guard)
  14647. {
  14648. zend_jit_addr var_addr = *var_addr_ptr;
  14649. uint32_t var_info = *var_info_ptr;
  14650. const void *exit_addr = NULL;
  14651. if (add_ref_guard || add_type_guard) {
  14652. int32_t exit_point = zend_jit_trace_get_exit_point(opline, 0);
  14653. exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  14654. if (!exit_addr) {
  14655. return 0;
  14656. }
  14657. }
  14658. if (add_ref_guard) {
  14659. | IF_NOT_ZVAL_TYPE var_addr, IS_REFERENCE, &exit_addr
  14660. }
  14661. if (opline->opcode == ZEND_INIT_METHOD_CALL && opline->op1_type == IS_VAR) {
  14662. /* Hack: Convert reference to regular value to simplify JIT code for INIT_METHOD_CALL */
  14663. if (Z_REG(var_addr) != ZREG_FCARG1 || Z_OFFSET(var_addr) != 0) {
  14664. | LOAD_ZVAL_ADDR FCARG1a, var_addr
  14665. }
  14666. | EXT_CALL zend_jit_unref_helper, r0
  14667. } else {
  14668. | GET_ZVAL_PTR FCARG1a, var_addr
  14669. var_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, offsetof(zend_reference, val));
  14670. *var_addr_ptr = var_addr;
  14671. }
  14672. if (var_type != IS_UNKNOWN) {
  14673. var_type &= ~(IS_TRACE_REFERENCE|IS_TRACE_INDIRECT|IS_TRACE_PACKED);
  14674. }
  14675. if (add_type_guard
  14676. && var_type != IS_UNKNOWN
  14677. && (var_info & (MAY_BE_ANY|MAY_BE_UNDEF)) != (1 << var_type)) {
  14678. | IF_NOT_ZVAL_TYPE var_addr, var_type, &exit_addr
  14679. ZEND_ASSERT(var_info & (1 << var_type));
  14680. if (var_type < IS_STRING) {
  14681. var_info = (1 << var_type);
  14682. } else if (var_type != IS_ARRAY) {
  14683. var_info = (1 << var_type) | (var_info & (MAY_BE_RC1|MAY_BE_RCN));
  14684. } else {
  14685. var_info = MAY_BE_ARRAY | (var_info & (MAY_BE_ARRAY_OF_ANY|MAY_BE_ARRAY_OF_REF|MAY_BE_ARRAY_KEY_ANY|MAY_BE_RC1|MAY_BE_RCN));
  14686. }
  14687. *var_info_ptr = var_info;
  14688. } else {
  14689. var_info &= ~MAY_BE_REF;
  14690. *var_info_ptr = var_info;
  14691. }
  14692. *var_info_ptr |= MAY_BE_GUARD; /* prevent generation of specialized zval dtor */
  14693. return 1;
  14694. }
  14695. static bool zend_jit_fetch_indirect_var(dasm_State **Dst, const zend_op *opline, uint8_t var_type, uint32_t *var_info_ptr, zend_jit_addr *var_addr_ptr, bool add_indirect_guard)
  14696. {
  14697. zend_jit_addr var_addr = *var_addr_ptr;
  14698. uint32_t var_info = *var_info_ptr;
  14699. int32_t exit_point;
  14700. const void *exit_addr;
  14701. if (add_indirect_guard) {
  14702. int32_t exit_point = zend_jit_trace_get_exit_point(opline, 0);
  14703. const void *exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  14704. if (!exit_addr) {
  14705. return 0;
  14706. }
  14707. | IF_NOT_ZVAL_TYPE var_addr, IS_INDIRECT, &exit_addr
  14708. | GET_ZVAL_PTR FCARG1a, var_addr
  14709. } else {
  14710. /* May be already loaded into FCARG1a or RAX by previus FETCH_OBJ_W/DIM_W */
  14711. if (opline->op1_type != IS_VAR ||
  14712. (opline-1)->result_type != IS_VAR ||
  14713. (opline-1)->result.var != opline->op1.var ||
  14714. (opline-1)->op2_type == IS_VAR ||
  14715. (opline-1)->op2_type == IS_TMP_VAR) {
  14716. | GET_ZVAL_PTR FCARG1a, var_addr
  14717. } else if ((opline-1)->opcode == ZEND_FETCH_DIM_W || (opline-1)->opcode == ZEND_FETCH_DIM_RW) {
  14718. | mov FCARG1a, r0
  14719. }
  14720. }
  14721. *var_info_ptr &= ~MAY_BE_INDIRECT;
  14722. var_addr = ZEND_ADDR_MEM_ZVAL(ZREG_FCARG1, 0);
  14723. *var_addr_ptr = var_addr;
  14724. if (var_type != IS_UNKNOWN) {
  14725. var_type &= ~(IS_TRACE_INDIRECT|IS_TRACE_PACKED);
  14726. }
  14727. if (!(var_type & IS_TRACE_REFERENCE)
  14728. && var_type != IS_UNKNOWN
  14729. && (var_info & (MAY_BE_ANY|MAY_BE_UNDEF)) != (1 << var_type)) {
  14730. exit_point = zend_jit_trace_get_exit_point(opline, 0);
  14731. exit_addr = zend_jit_trace_get_exit_addr(exit_point);
  14732. if (!exit_addr) {
  14733. return 0;
  14734. }
  14735. | IF_NOT_Z_TYPE FCARG1a, var_type, &exit_addr
  14736. //var_info = zend_jit_trace_type_to_info_ex(var_type, var_info);
  14737. ZEND_ASSERT(var_info & (1 << var_type));
  14738. if (var_type < IS_STRING) {
  14739. var_info = (1 << var_type);
  14740. } else if (var_type != IS_ARRAY) {
  14741. var_info = (1 << var_type) | (var_info & (MAY_BE_RC1|MAY_BE_RCN));
  14742. } else {
  14743. var_info = MAY_BE_ARRAY | (var_info & (MAY_BE_ARRAY_OF_ANY|MAY_BE_ARRAY_OF_REF|MAY_BE_ARRAY_KEY_ANY|MAY_BE_RC1|MAY_BE_RCN));
  14744. }
  14745. *var_info_ptr = var_info;
  14746. }
  14747. return 1;
  14748. }
  14749. static bool zend_jit_may_reuse_reg(const zend_op *opline, const zend_ssa_op *ssa_op, zend_ssa *ssa, int def_var, int use_var)
  14750. {
  14751. if ((ssa->var_info[def_var].type & ~MAY_BE_GUARD) != (ssa->var_info[use_var].type & ~MAY_BE_GUARD)) {
  14752. return 0;
  14753. }
  14754. switch (opline->opcode) {
  14755. case ZEND_QM_ASSIGN:
  14756. case ZEND_SEND_VAR:
  14757. case ZEND_ASSIGN:
  14758. case ZEND_PRE_INC:
  14759. case ZEND_PRE_DEC:
  14760. case ZEND_POST_INC:
  14761. case ZEND_POST_DEC:
  14762. return 1;
  14763. case ZEND_ADD:
  14764. case ZEND_SUB:
  14765. case ZEND_MUL:
  14766. case ZEND_BW_OR:
  14767. case ZEND_BW_AND:
  14768. case ZEND_BW_XOR:
  14769. if (def_var == ssa_op->result_def &&
  14770. use_var == ssa_op->op1_use) {
  14771. return 1;
  14772. }
  14773. break;
  14774. default:
  14775. break;
  14776. }
  14777. return 0;
  14778. }
  14779. static bool zend_jit_opline_supports_reg(const zend_op_array *op_array, zend_ssa *ssa, const zend_op *opline, const zend_ssa_op *ssa_op, zend_jit_trace_rec *trace)
  14780. {
  14781. uint32_t op1_info, op2_info;
  14782. switch (opline->opcode) {
  14783. case ZEND_SEND_VAR:
  14784. case ZEND_SEND_VAL:
  14785. case ZEND_SEND_VAL_EX:
  14786. return (opline->op2_type != IS_CONST);
  14787. case ZEND_QM_ASSIGN:
  14788. case ZEND_IS_SMALLER:
  14789. case ZEND_IS_SMALLER_OR_EQUAL:
  14790. case ZEND_IS_EQUAL:
  14791. case ZEND_IS_NOT_EQUAL:
  14792. case ZEND_IS_IDENTICAL:
  14793. case ZEND_IS_NOT_IDENTICAL:
  14794. case ZEND_CASE:
  14795. return 1;
  14796. case ZEND_RETURN:
  14797. return (op_array->type != ZEND_EVAL_CODE && op_array->function_name);
  14798. case ZEND_ASSIGN:
  14799. op1_info = OP1_INFO();
  14800. op2_info = OP2_INFO();
  14801. return
  14802. opline->op1_type == IS_CV &&
  14803. !(op1_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_RESOURCE|MAY_BE_OBJECT|MAY_BE_REF)) &&
  14804. !(op2_info & ((MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF)-(MAY_BE_LONG|MAY_BE_DOUBLE)));
  14805. case ZEND_ADD:
  14806. case ZEND_SUB:
  14807. case ZEND_MUL:
  14808. op1_info = OP1_INFO();
  14809. op2_info = OP2_INFO();
  14810. return !((op1_info | op2_info) & ((MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF) - (MAY_BE_LONG|MAY_BE_DOUBLE)));
  14811. case ZEND_BW_OR:
  14812. case ZEND_BW_AND:
  14813. case ZEND_BW_XOR:
  14814. case ZEND_SL:
  14815. case ZEND_SR:
  14816. case ZEND_MOD:
  14817. op1_info = OP1_INFO();
  14818. op2_info = OP2_INFO();
  14819. return !((op1_info | op2_info) & ((MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF) - MAY_BE_LONG));
  14820. case ZEND_PRE_INC:
  14821. case ZEND_PRE_DEC:
  14822. case ZEND_POST_INC:
  14823. case ZEND_POST_DEC:
  14824. op1_info = OP1_INFO();
  14825. op2_info = OP1_DEF_INFO();
  14826. return opline->op1_type == IS_CV
  14827. && !(op1_info & ((MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF) - MAY_BE_LONG))
  14828. && (op2_info & MAY_BE_LONG);
  14829. case ZEND_STRLEN:
  14830. op1_info = OP1_INFO();
  14831. return (opline->op1_type & (IS_CV|IS_CONST))
  14832. && (op1_info & (MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF)) == MAY_BE_STRING;
  14833. case ZEND_COUNT:
  14834. op1_info = OP1_INFO();
  14835. return (opline->op1_type & (IS_CV|IS_CONST))
  14836. && (op1_info & (MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF)) == MAY_BE_ARRAY;
  14837. case ZEND_JMPZ:
  14838. case ZEND_JMPNZ:
  14839. if (JIT_G(trigger) != ZEND_JIT_ON_HOT_TRACE) {
  14840. if (!ssa->cfg.map) {
  14841. return 0;
  14842. }
  14843. if (opline > op_array->opcodes + ssa->cfg.blocks[ssa->cfg.map[opline-op_array->opcodes]].start &&
  14844. ((opline-1)->result_type & (IS_SMART_BRANCH_JMPZ|IS_SMART_BRANCH_JMPNZ)) != 0) {
  14845. return 0;
  14846. }
  14847. }
  14848. ZEND_FALLTHROUGH;
  14849. case ZEND_BOOL:
  14850. case ZEND_BOOL_NOT:
  14851. case ZEND_JMPZNZ:
  14852. case ZEND_JMPZ_EX:
  14853. case ZEND_JMPNZ_EX:
  14854. return 1;
  14855. case ZEND_FETCH_CONSTANT:
  14856. return 1;
  14857. case ZEND_FETCH_DIM_R:
  14858. op1_info = OP1_INFO();
  14859. op2_info = OP2_INFO();
  14860. if (trace
  14861. && trace->op1_type != IS_UNKNOWN
  14862. && (trace->op1_type & ~(IS_TRACE_REFERENCE|IS_TRACE_INDIRECT|IS_TRACE_PACKED)) == IS_ARRAY) {
  14863. op1_info &= ~((MAY_BE_ANY|MAY_BE_UNDEF) - MAY_BE_ARRAY);
  14864. }
  14865. return ((op1_info & (MAY_BE_ANY|MAY_BE_UNDEF)) == MAY_BE_ARRAY) &&
  14866. (!(opline->op1_type & (IS_TMP_VAR|IS_VAR)) || !(op1_info & MAY_BE_RC1)) &&
  14867. (((op2_info & (MAY_BE_ANY|MAY_BE_UNDEF)) == MAY_BE_LONG) ||
  14868. (((op2_info & (MAY_BE_ANY|MAY_BE_UNDEF)) == MAY_BE_STRING) &&
  14869. (!(opline->op2_type & (IS_TMP_VAR|IS_VAR)) || !(op2_info & MAY_BE_RC1))));
  14870. }
  14871. return 0;
  14872. }
  14873. static bool zend_jit_var_supports_reg(zend_ssa *ssa, int var)
  14874. {
  14875. if (ssa->vars[var].no_val) {
  14876. /* we don't need the value */
  14877. return 0;
  14878. }
  14879. if (!(JIT_G(opt_flags) & ZEND_JIT_REG_ALLOC_GLOBAL)) {
  14880. /* Disable global register allocation,
  14881. * register allocation for SSA variables connected through Phi functions
  14882. */
  14883. if (ssa->vars[var].definition_phi) {
  14884. return 0;
  14885. }
  14886. if (ssa->vars[var].phi_use_chain) {
  14887. zend_ssa_phi *phi = ssa->vars[var].phi_use_chain;
  14888. do {
  14889. if (!ssa->vars[phi->ssa_var].no_val) {
  14890. return 0;
  14891. }
  14892. phi = zend_ssa_next_use_phi(ssa, var, phi);
  14893. } while (phi);
  14894. }
  14895. }
  14896. if (((ssa->var_info[var].type & (MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_REF)) != MAY_BE_DOUBLE) &&
  14897. ((ssa->var_info[var].type & (MAY_BE_ANY|MAY_BE_UNDEF|MAY_BE_REF)) != MAY_BE_LONG)) {
  14898. /* bad type */
  14899. return 0;
  14900. }
  14901. return 1;
  14902. }
  14903. static bool zend_jit_may_be_in_reg(const zend_op_array *op_array, zend_ssa *ssa, int var)
  14904. {
  14905. if (!zend_jit_var_supports_reg(ssa, var)) {
  14906. return 0;
  14907. }
  14908. if (ssa->vars[var].definition >= 0) {
  14909. uint32_t def = ssa->vars[var].definition;
  14910. if (!zend_jit_opline_supports_reg(op_array, ssa, op_array->opcodes + def, ssa->ops + def, NULL)) {
  14911. return 0;
  14912. }
  14913. }
  14914. if (ssa->vars[var].use_chain >= 0) {
  14915. int use = ssa->vars[var].use_chain;
  14916. do {
  14917. if (!zend_ssa_is_no_val_use(op_array->opcodes + use, ssa->ops + use, var) &&
  14918. !zend_jit_opline_supports_reg(op_array, ssa, op_array->opcodes + use, ssa->ops + use, NULL)) {
  14919. return 0;
  14920. }
  14921. use = zend_ssa_next_use(ssa->ops, var, use);
  14922. } while (use >= 0);
  14923. }
  14924. return 1;
  14925. }
  14926. static bool zend_needs_extra_reg_for_const(const zend_op *opline, zend_uchar op_type, znode_op op)
  14927. {
  14928. |.if X64
  14929. || if (op_type == IS_CONST) {
  14930. || zval *zv = RT_CONSTANT(opline, op);
  14931. || if (Z_TYPE_P(zv) == IS_DOUBLE && Z_DVAL_P(zv) != 0 && !IS_SIGNED_32BIT(zv)) {
  14932. || return 1;
  14933. || } else if (Z_TYPE_P(zv) == IS_LONG && !IS_SIGNED_32BIT(Z_LVAL_P(zv))) {
  14934. || return 1;
  14935. || }
  14936. || }
  14937. |.endif
  14938. return 0;
  14939. }
  14940. static zend_regset zend_jit_get_def_scratch_regset(const zend_op *opline, const zend_ssa_op *ssa_op, const zend_op_array *op_array, zend_ssa *ssa, int current_var, bool last_use)
  14941. {
  14942. uint32_t op1_info, op2_info;
  14943. switch (opline->opcode) {
  14944. case ZEND_FETCH_DIM_R:
  14945. op1_info = OP1_INFO();
  14946. op2_info = OP2_INFO();
  14947. if (((opline->op1_type & (IS_TMP_VAR|IS_VAR)) &&
  14948. (op1_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE))) ||
  14949. ((opline->op2_type & (IS_TMP_VAR|IS_VAR)) &&
  14950. (op2_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE)))) {
  14951. return ZEND_REGSET(ZREG_FCARG1);
  14952. }
  14953. break;
  14954. default:
  14955. break;
  14956. }
  14957. return ZEND_REGSET_EMPTY;
  14958. }
  14959. static zend_regset zend_jit_get_scratch_regset(const zend_op *opline, const zend_ssa_op *ssa_op, const zend_op_array *op_array, zend_ssa *ssa, int current_var, bool last_use)
  14960. {
  14961. uint32_t op1_info, op2_info, res_info;
  14962. zend_regset regset = ZEND_REGSET_SCRATCH;
  14963. switch (opline->opcode) {
  14964. case ZEND_NOP:
  14965. case ZEND_OP_DATA:
  14966. case ZEND_JMP:
  14967. case ZEND_RETURN:
  14968. regset = ZEND_REGSET_EMPTY;
  14969. break;
  14970. case ZEND_QM_ASSIGN:
  14971. if (ssa_op->op1_def == current_var ||
  14972. ssa_op->result_def == current_var) {
  14973. regset = ZEND_REGSET_EMPTY;
  14974. break;
  14975. }
  14976. /* break missing intentionally */
  14977. case ZEND_SEND_VAL:
  14978. case ZEND_SEND_VAL_EX:
  14979. if (opline->op2_type == IS_CONST) {
  14980. break;
  14981. }
  14982. if (ssa_op->op1_use == current_var) {
  14983. regset = ZEND_REGSET(ZREG_R0);
  14984. break;
  14985. }
  14986. op1_info = OP1_INFO();
  14987. if (!(op1_info & MAY_BE_UNDEF)) {
  14988. if ((op1_info & (MAY_BE_ANY|MAY_BE_REF)) == MAY_BE_DOUBLE) {
  14989. regset = ZEND_REGSET(ZREG_XMM0);
  14990. } else if ((op1_info & (MAY_BE_ANY|MAY_BE_REF)) == MAY_BE_LONG) {
  14991. regset = ZEND_REGSET(ZREG_R0);
  14992. } else {
  14993. regset = ZEND_REGSET_UNION(ZEND_REGSET(ZREG_R0), ZEND_REGSET(ZREG_R2));
  14994. }
  14995. }
  14996. break;
  14997. case ZEND_SEND_VAR:
  14998. if (opline->op2_type == IS_CONST) {
  14999. break;
  15000. }
  15001. if (ssa_op->op1_use == current_var ||
  15002. ssa_op->op1_def == current_var) {
  15003. regset = ZEND_REGSET_EMPTY;
  15004. break;
  15005. }
  15006. op1_info = OP1_INFO();
  15007. if (!(op1_info & MAY_BE_UNDEF)) {
  15008. if ((op1_info & (MAY_BE_ANY|MAY_BE_REF)) == MAY_BE_DOUBLE) {
  15009. regset = ZEND_REGSET(ZREG_XMM0);
  15010. } else if ((op1_info & (MAY_BE_ANY|MAY_BE_REF)) == MAY_BE_LONG) {
  15011. } else {
  15012. regset = ZEND_REGSET_UNION(ZEND_REGSET(ZREG_R0), ZEND_REGSET(ZREG_R2));
  15013. if (op1_info & MAY_BE_REF) {
  15014. ZEND_REGSET_INCL(regset, ZREG_R1);
  15015. }
  15016. }
  15017. }
  15018. break;
  15019. case ZEND_ASSIGN:
  15020. if (ssa_op->op2_use == current_var ||
  15021. ssa_op->op2_def == current_var ||
  15022. ssa_op->op1_def == current_var ||
  15023. ssa_op->result_def == current_var) {
  15024. regset = ZEND_REGSET_EMPTY;
  15025. break;
  15026. }
  15027. op1_info = OP1_INFO();
  15028. op2_info = OP2_INFO();
  15029. if (opline->op1_type == IS_CV
  15030. && !(op2_info & MAY_BE_UNDEF)
  15031. && !(op1_info & (MAY_BE_STRING|MAY_BE_ARRAY|MAY_BE_OBJECT|MAY_BE_RESOURCE|MAY_BE_REF))) {
  15032. if ((op2_info & (MAY_BE_ANY|MAY_BE_REF)) == MAY_BE_DOUBLE) {
  15033. regset = ZEND_REGSET(ZREG_XMM0);
  15034. } else if ((op2_info & (MAY_BE_ANY|MAY_BE_REF)) == MAY_BE_LONG) {
  15035. regset = ZEND_REGSET(ZREG_R0);
  15036. } else {
  15037. regset = ZEND_REGSET_UNION(ZEND_REGSET(ZREG_R0), ZEND_REGSET(ZREG_R2));
  15038. }
  15039. }
  15040. break;
  15041. case ZEND_PRE_INC:
  15042. case ZEND_PRE_DEC:
  15043. case ZEND_POST_INC:
  15044. case ZEND_POST_DEC:
  15045. if (ssa_op->op1_use == current_var ||
  15046. ssa_op->op1_def == current_var ||
  15047. ssa_op->result_def == current_var) {
  15048. regset = ZEND_REGSET_EMPTY;
  15049. break;
  15050. }
  15051. op1_info = OP1_INFO();
  15052. if (opline->op1_type == IS_CV
  15053. && (op1_info & MAY_BE_LONG)
  15054. && !(op1_info & ((MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF)-(MAY_BE_LONG|MAY_BE_DOUBLE)))) {
  15055. regset = ZEND_REGSET_EMPTY;
  15056. if (op1_info & MAY_BE_DOUBLE) {
  15057. regset = ZEND_REGSET(ZREG_XMM0);
  15058. }
  15059. if (opline->result_type != IS_UNUSED && (op1_info & MAY_BE_LONG)) {
  15060. ZEND_REGSET_INCL(regset, ZREG_R1);
  15061. }
  15062. }
  15063. break;
  15064. case ZEND_ADD:
  15065. case ZEND_SUB:
  15066. case ZEND_MUL:
  15067. op1_info = OP1_INFO();
  15068. op2_info = OP2_INFO();
  15069. if (!(op1_info & ((MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF)-(MAY_BE_LONG|MAY_BE_DOUBLE))) &&
  15070. !(op2_info & ((MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF)-(MAY_BE_LONG|MAY_BE_DOUBLE)))) {
  15071. regset = ZEND_REGSET_EMPTY;
  15072. if ((op1_info & MAY_BE_LONG) && (op2_info & MAY_BE_LONG)) {
  15073. if (ssa_op->result_def != current_var &&
  15074. (ssa_op->op1_use != current_var || !last_use)) {
  15075. ZEND_REGSET_INCL(regset, ZREG_R0);
  15076. }
  15077. res_info = RES_INFO();
  15078. if (res_info & MAY_BE_DOUBLE) {
  15079. ZEND_REGSET_INCL(regset, ZREG_R0);
  15080. ZEND_REGSET_INCL(regset, ZREG_XMM0);
  15081. ZEND_REGSET_INCL(regset, ZREG_XMM1);
  15082. } else if (res_info & MAY_BE_GUARD) {
  15083. ZEND_REGSET_INCL(regset, ZREG_R0);
  15084. }
  15085. }
  15086. if ((op1_info & MAY_BE_LONG) && (op2_info & MAY_BE_DOUBLE)) {
  15087. if (ssa_op->result_def != current_var) {
  15088. ZEND_REGSET_INCL(regset, ZREG_XMM0);
  15089. }
  15090. }
  15091. if ((op1_info & MAY_BE_DOUBLE) && (op2_info & MAY_BE_LONG)) {
  15092. if (zend_is_commutative(opline->opcode)) {
  15093. if (ssa_op->result_def != current_var) {
  15094. ZEND_REGSET_INCL(regset, ZREG_XMM0);
  15095. }
  15096. } else {
  15097. ZEND_REGSET_INCL(regset, ZREG_XMM0);
  15098. if (ssa_op->result_def != current_var &&
  15099. (ssa_op->op1_use != current_var || !last_use)) {
  15100. ZEND_REGSET_INCL(regset, ZREG_XMM1);
  15101. }
  15102. }
  15103. }
  15104. if ((op1_info & MAY_BE_DOUBLE) && (op2_info & MAY_BE_DOUBLE)) {
  15105. if (ssa_op->result_def != current_var &&
  15106. (ssa_op->op1_use != current_var || !last_use) &&
  15107. (!zend_is_commutative(opline->opcode) || ssa_op->op2_use != current_var || !last_use)) {
  15108. ZEND_REGSET_INCL(regset, ZREG_XMM0);
  15109. }
  15110. }
  15111. if (zend_needs_extra_reg_for_const(opline, opline->op1_type, opline->op1) ||
  15112. zend_needs_extra_reg_for_const(opline, opline->op2_type, opline->op2)) {
  15113. if (!ZEND_REGSET_IN(regset, ZREG_R0)) {
  15114. ZEND_REGSET_INCL(regset, ZREG_R0);
  15115. } else {
  15116. ZEND_REGSET_INCL(regset, ZREG_R1);
  15117. }
  15118. }
  15119. }
  15120. break;
  15121. case ZEND_BW_OR:
  15122. case ZEND_BW_AND:
  15123. case ZEND_BW_XOR:
  15124. op1_info = OP1_INFO();
  15125. op2_info = OP2_INFO();
  15126. if (!(op1_info & ((MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF)-MAY_BE_LONG)) &&
  15127. !(op2_info & ((MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF)-MAY_BE_LONG))) {
  15128. regset = ZEND_REGSET_EMPTY;
  15129. if (ssa_op->result_def != current_var &&
  15130. (ssa_op->op1_use != current_var || !last_use)) {
  15131. ZEND_REGSET_INCL(regset, ZREG_R0);
  15132. }
  15133. if (zend_needs_extra_reg_for_const(opline, opline->op1_type, opline->op1) ||
  15134. zend_needs_extra_reg_for_const(opline, opline->op2_type, opline->op2)) {
  15135. if (!ZEND_REGSET_IN(regset, ZREG_R0)) {
  15136. ZEND_REGSET_INCL(regset, ZREG_R0);
  15137. } else {
  15138. ZEND_REGSET_INCL(regset, ZREG_R1);
  15139. }
  15140. }
  15141. }
  15142. break;
  15143. case ZEND_SL:
  15144. case ZEND_SR:
  15145. op1_info = OP1_INFO();
  15146. op2_info = OP2_INFO();
  15147. if (!(op1_info & ((MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF)-MAY_BE_LONG)) &&
  15148. !(op2_info & ((MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF)-MAY_BE_LONG))) {
  15149. bw_op:
  15150. regset = ZEND_REGSET_EMPTY;
  15151. if (ssa_op->result_def != current_var &&
  15152. (ssa_op->op1_use != current_var || !last_use)) {
  15153. ZEND_REGSET_INCL(regset, ZREG_R0);
  15154. }
  15155. if (opline->op2_type != IS_CONST && ssa_op->op2_use != current_var) {
  15156. ZEND_REGSET_INCL(regset, ZREG_R1);
  15157. }
  15158. }
  15159. break;
  15160. case ZEND_MOD:
  15161. op1_info = OP1_INFO();
  15162. op2_info = OP2_INFO();
  15163. if (!(op1_info & ((MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF)-MAY_BE_LONG)) &&
  15164. !(op2_info & ((MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF)-MAY_BE_LONG))) {
  15165. if (opline->op2_type == IS_CONST &&
  15166. opline->op1_type != IS_CONST &&
  15167. Z_TYPE_P(RT_CONSTANT(opline, opline->op2)) == IS_LONG &&
  15168. zend_long_is_power_of_two(Z_LVAL_P(RT_CONSTANT(opline, opline->op2))) &&
  15169. OP1_HAS_RANGE() &&
  15170. OP1_MIN_RANGE() >= 0) {
  15171. /* MOD is going to be optimized into AND */
  15172. goto bw_op;
  15173. } else {
  15174. regset = ZEND_REGSET_EMPTY;
  15175. ZEND_REGSET_INCL(regset, ZREG_R0);
  15176. ZEND_REGSET_INCL(regset, ZREG_R2);
  15177. if (opline->op2_type == IS_CONST) {
  15178. ZEND_REGSET_INCL(regset, ZREG_R1);
  15179. }
  15180. }
  15181. }
  15182. break;
  15183. case ZEND_IS_SMALLER:
  15184. case ZEND_IS_SMALLER_OR_EQUAL:
  15185. case ZEND_IS_EQUAL:
  15186. case ZEND_IS_NOT_EQUAL:
  15187. case ZEND_IS_IDENTICAL:
  15188. case ZEND_IS_NOT_IDENTICAL:
  15189. case ZEND_CASE:
  15190. op1_info = OP1_INFO();
  15191. op2_info = OP2_INFO();
  15192. if (!(op1_info & ((MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF)-(MAY_BE_LONG|MAY_BE_DOUBLE))) &&
  15193. !(op2_info & ((MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF)-(MAY_BE_LONG|MAY_BE_DOUBLE)))) {
  15194. regset = ZEND_REGSET_EMPTY;
  15195. if (!(opline->result_type & (IS_SMART_BRANCH_JMPZ|IS_SMART_BRANCH_JMPNZ))) {
  15196. ZEND_REGSET_INCL(regset, ZREG_R0);
  15197. }
  15198. if ((op1_info & MAY_BE_LONG) && (op2_info & MAY_BE_LONG) &&
  15199. opline->op1_type != IS_CONST && opline->op2_type != IS_CONST) {
  15200. if (ssa_op->op1_use != current_var &&
  15201. ssa_op->op2_use != current_var) {
  15202. ZEND_REGSET_INCL(regset, ZREG_R0);
  15203. }
  15204. }
  15205. if ((op1_info & MAY_BE_LONG) && (op2_info & MAY_BE_DOUBLE)) {
  15206. ZEND_REGSET_INCL(regset, ZREG_XMM0);
  15207. }
  15208. if ((op1_info & MAY_BE_DOUBLE) && (op2_info & MAY_BE_LONG)) {
  15209. ZEND_REGSET_INCL(regset, ZREG_XMM0);
  15210. }
  15211. if ((op1_info & MAY_BE_DOUBLE) && (op2_info & MAY_BE_DOUBLE)) {
  15212. if (ssa_op->op1_use != current_var &&
  15213. ssa_op->op2_use != current_var) {
  15214. ZEND_REGSET_INCL(regset, ZREG_XMM0);
  15215. }
  15216. }
  15217. if (zend_needs_extra_reg_for_const(opline, opline->op1_type, opline->op1) ||
  15218. zend_needs_extra_reg_for_const(opline, opline->op2_type, opline->op2)) {
  15219. ZEND_REGSET_INCL(regset, ZREG_R0);
  15220. }
  15221. }
  15222. break;
  15223. case ZEND_BOOL:
  15224. case ZEND_BOOL_NOT:
  15225. case ZEND_JMPZ:
  15226. case ZEND_JMPNZ:
  15227. case ZEND_JMPZNZ:
  15228. case ZEND_JMPZ_EX:
  15229. case ZEND_JMPNZ_EX:
  15230. op1_info = OP1_INFO();
  15231. if (!(op1_info & ((MAY_BE_ANY|MAY_BE_REF|MAY_BE_UNDEF)-(MAY_BE_NULL|MAY_BE_FALSE|MAY_BE_TRUE|MAY_BE_LONG|MAY_BE_DOUBLE)))) {
  15232. regset = ZEND_REGSET_EMPTY;
  15233. if (op1_info & MAY_BE_DOUBLE) {
  15234. ZEND_REGSET_INCL(regset, ZREG_XMM0);
  15235. }
  15236. if (opline->opcode == ZEND_BOOL ||
  15237. opline->opcode == ZEND_BOOL_NOT ||
  15238. opline->opcode == ZEND_JMPZ_EX ||
  15239. opline->opcode == ZEND_JMPNZ_EX) {
  15240. ZEND_REGSET_INCL(regset, ZREG_R0);
  15241. }
  15242. }
  15243. break;
  15244. case ZEND_DO_UCALL:
  15245. case ZEND_DO_FCALL:
  15246. case ZEND_DO_FCALL_BY_NAME:
  15247. case ZEND_INCLUDE_OR_EVAL:
  15248. case ZEND_GENERATOR_CREATE:
  15249. case ZEND_YIELD:
  15250. case ZEND_YIELD_FROM:
  15251. regset = ZEND_REGSET_UNION(ZEND_REGSET_GP, ZEND_REGSET_FP);
  15252. break;
  15253. default:
  15254. break;
  15255. }
  15256. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  15257. if (ssa_op == ssa->ops
  15258. && JIT_G(current_trace)[ZEND_JIT_TRACE_START_REC_SIZE].op == ZEND_JIT_TRACE_INIT_CALL
  15259. && (JIT_G(current_trace)[ZEND_JIT_TRACE_START_REC_SIZE].info & ZEND_JIT_TRACE_FAKE_INIT_CALL)) {
  15260. ZEND_REGSET_INCL(regset, ZREG_R0);
  15261. ZEND_REGSET_INCL(regset, ZREG_R1);
  15262. }
  15263. }
  15264. /* %r0 is used to check EG(vm_interrupt) */
  15265. if (JIT_G(trigger) == ZEND_JIT_ON_HOT_TRACE) {
  15266. if (ssa_op == ssa->ops
  15267. && (JIT_G(current_trace)->stop == ZEND_JIT_TRACE_STOP_LOOP ||
  15268. JIT_G(current_trace)->stop == ZEND_JIT_TRACE_STOP_RECURSIVE_CALL)) {
  15269. #if ZTS
  15270. ZEND_REGSET_INCL(regset, ZREG_R0);
  15271. #else
  15272. if ((sizeof(void*) == 8 && !IS_SIGNED_32BIT(&EG(vm_interrupt)))) {
  15273. ZEND_REGSET_INCL(regset, ZREG_R0);
  15274. }
  15275. #endif
  15276. }
  15277. } else {
  15278. uint32_t b = ssa->cfg.map[ssa_op - ssa->ops];
  15279. if ((ssa->cfg.blocks[b].flags & ZEND_BB_LOOP_HEADER) != 0
  15280. && ssa->cfg.blocks[b].start == ssa_op - ssa->ops) {
  15281. #if ZTS
  15282. ZEND_REGSET_INCL(regset, ZREG_R0);
  15283. #else
  15284. if ((sizeof(void*) == 8 && !IS_SIGNED_32BIT(&EG(vm_interrupt)))) {
  15285. ZEND_REGSET_INCL(regset, ZREG_R0);
  15286. }
  15287. #endif
  15288. }
  15289. }
  15290. return regset;
  15291. }
  15292. /*
  15293. * Local variables:
  15294. * tab-width: 4
  15295. * c-basic-offset: 4
  15296. * indent-tabs-mode: t
  15297. * End:
  15298. */