12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411241224132414241524162417241824192420242124222423242424252426242724282429243024312432243324342435243624372438243924402441244224432444244524462447244824492450245124522453245424552456245724582459246024612462246324642465246624672468246924702471247224732474247524762477247824792480248124822483248424852486248724882489249024912492249324942495249624972498249925002501250225032504250525062507250825092510251125122513251425152516251725182519252025212522252325242525252625272528252925302531253225332534253525362537253825392540254125422543254425452546254725482549255025512552255325542555255625572558255925602561256225632564256525662567256825692570257125722573257425752576257725782579258025812582258325842585258625872588258925902591259225932594259525962597259825992600260126022603260426052606260726082609261026112612261326142615261626172618261926202621262226232624262526262627262826292630263126322633263426352636263726382639264026412642264326442645264626472648264926502651265226532654265526562657265826592660266126622663266426652666266726682669267026712672267326742675267626772678267926802681268226832684268526862687268826892690269126922693269426952696269726982699270027012702270327042705270627072708270927102711271227132714271527162717271827192720272127222723272427252726272727282729273027312732273327342735273627372738273927402741274227432744274527462747274827492750275127522753275427552756275727582759276027612762276327642765276627672768276927702771277227732774277527762777277827792780278127822783278427852786278727882789279027912792279327942795279627972798279928002801280228032804280528062807280828092810281128122813281428152816281728182819282028212822282328242825282628272828282928302831283228332834283528362837283828392840284128422843284428452846284728482849285028512852285328542855285628572858285928602861286228632864286528662867286828692870287128722873287428752876287728782879288028812882288328842885288628872888288928902891289228932894289528962897289828992900290129022903290429052906290729082909291029112912291329142915291629172918291929202921292229232924292529262927292829292930293129322933293429352936293729382939294029412942294329442945294629472948294929502951295229532954295529562957295829592960296129622963296429652966296729682969297029712972297329742975297629772978297929802981298229832984298529862987298829892990299129922993299429952996299729982999300030013002300330043005300630073008300930103011301230133014301530163017301830193020302130223023302430253026302730283029303030313032303330343035303630373038303930403041304230433044304530463047304830493050305130523053305430553056305730583059306030613062306330643065306630673068306930703071307230733074307530763077307830793080308130823083308430853086308730883089309030913092309330943095309630973098309931003101310231033104310531063107310831093110311131123113311431153116311731183119312031213122312331243125312631273128312931303131313231333134313531363137313831393140314131423143314431453146314731483149315031513152315331543155315631573158315931603161316231633164316531663167316831693170317131723173317431753176317731783179318031813182318331843185318631873188318931903191319231933194319531963197319831993200320132023203320432053206320732083209321032113212321332143215321632173218321932203221322232233224322532263227322832293230323132323233323432353236323732383239324032413242324332443245324632473248324932503251325232533254325532563257325832593260326132623263326432653266326732683269327032713272327332743275327632773278327932803281328232833284328532863287328832893290329132923293329432953296329732983299330033013302330333043305330633073308330933103311331233133314331533163317331833193320332133223323332433253326332733283329333033313332333333343335333633373338333933403341334233433344334533463347334833493350335133523353335433553356335733583359336033613362336333643365336633673368336933703371337233733374337533763377337833793380338133823383338433853386338733883389339033913392339333943395339633973398339934003401340234033404340534063407340834093410341134123413341434153416341734183419342034213422342334243425342634273428342934303431343234333434343534363437343834393440344134423443344434453446344734483449345034513452345334543455345634573458345934603461346234633464 |
- /*
- * Copyright (c) 2023, Andreas Kling <kling@serenityos.org>
- * Copyright (c) 2023, Simon Wanner <simon@skyrising.xyz>
- *
- * SPDX-License-Identifier: BSD-2-Clause
- */
- #include <AK/OwnPtr.h>
- #include <AK/Platform.h>
- #include <LibJS/Bytecode/CommonImplementations.h>
- #include <LibJS/Bytecode/Instruction.h>
- #include <LibJS/Bytecode/Interpreter.h>
- #include <LibJS/Bytecode/RegexTable.h>
- #include <LibJS/JIT/Compiler.h>
- #include <LibJS/Runtime/AbstractOperations.h>
- #include <LibJS/Runtime/Array.h>
- #include <LibJS/Runtime/DeclarativeEnvironment.h>
- #include <LibJS/Runtime/ECMAScriptFunctionObject.h>
- #include <LibJS/Runtime/FunctionEnvironment.h>
- #include <LibJS/Runtime/GlobalEnvironment.h>
- #include <LibJS/Runtime/ObjectEnvironment.h>
- #include <LibJS/Runtime/VM.h>
- #include <LibJS/Runtime/ValueInlines.h>
- #include <sys/mman.h>
- #include <unistd.h>
- #ifdef JIT_ARCH_SUPPORTED
- # define LOG_JIT_SUCCESS 0
- # define LOG_JIT_FAILURE 1
- # define DUMP_JIT_MACHINE_CODE_TO_STDOUT 0
- # define DUMP_JIT_DISASSEMBLY 0
- # define TRY_OR_SET_EXCEPTION(expression) \
- ({ \
- /* Ignore -Wshadow to allow nesting the macro. */ \
- AK_IGNORE_DIAGNOSTIC("-Wshadow", \
- auto&& _temporary_result = (expression)); \
- static_assert(!::AK::Detail::IsLvalueReference<decltype(_temporary_result.release_value())>, \
- "Do not return a reference from a fallible expression"); \
- if (_temporary_result.is_error()) [[unlikely]] { \
- vm.bytecode_interpreter().reg(Bytecode::Register::exception()) = _temporary_result.release_error().value().value(); \
- return {}; \
- } \
- _temporary_result.release_value(); \
- })
- namespace JS::JIT {
- void Compiler::store_vm_register(Bytecode::Register dst, Assembler::Reg src)
- {
- m_assembler.mov(
- Assembler::Operand::Mem64BaseAndOffset(REGISTER_ARRAY_BASE, dst.index() * sizeof(Value)),
- Assembler::Operand::Register(src));
- }
- void Compiler::load_vm_register(Assembler::Reg dst, Bytecode::Register src)
- {
- m_assembler.mov(
- Assembler::Operand::Register(dst),
- Assembler::Operand::Mem64BaseAndOffset(REGISTER_ARRAY_BASE, src.index() * sizeof(Value)));
- }
- void Compiler::load_accumulator(Assembler::Reg dst)
- {
- m_assembler.mov(
- Assembler::Operand::Register(dst),
- Assembler::Operand::Register(CACHED_ACCUMULATOR));
- }
- void Compiler::store_accumulator(Assembler::Reg src)
- {
- m_assembler.mov(
- Assembler::Operand::Register(CACHED_ACCUMULATOR),
- Assembler::Operand::Register(src));
- }
- void Compiler::reload_cached_accumulator()
- {
- m_assembler.mov(
- Assembler::Operand::Register(CACHED_ACCUMULATOR),
- Assembler::Operand::Mem64BaseAndOffset(REGISTER_ARRAY_BASE, Bytecode::Register::accumulator_index * sizeof(Value)));
- }
- void Compiler::flush_cached_accumulator()
- {
- m_assembler.mov(
- Assembler::Operand::Mem64BaseAndOffset(REGISTER_ARRAY_BASE, Bytecode::Register::accumulator_index * sizeof(Value)),
- Assembler::Operand::Register(CACHED_ACCUMULATOR));
- }
- void Compiler::store_vm_local(size_t dst, Assembler::Reg src)
- {
- m_assembler.mov(
- Assembler::Operand::Mem64BaseAndOffset(LOCALS_ARRAY_BASE, dst * sizeof(Value)),
- Assembler::Operand::Register(src));
- }
- void Compiler::load_vm_local(Assembler::Reg dst, size_t src)
- {
- m_assembler.mov(
- Assembler::Operand::Register(dst),
- Assembler::Operand::Mem64BaseAndOffset(LOCALS_ARRAY_BASE, src * sizeof(Value)));
- }
- void Compiler::compile_load_immediate(Bytecode::Op::LoadImmediate const& op)
- {
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Imm(op.value().encoded()));
- store_accumulator(GPR0);
- }
- void Compiler::compile_load(Bytecode::Op::Load const& op)
- {
- load_vm_register(GPR0, op.src());
- store_accumulator(GPR0);
- }
- void Compiler::compile_store(Bytecode::Op::Store const& op)
- {
- load_accumulator(GPR0);
- store_vm_register(op.dst(), GPR0);
- }
- static Value cxx_throw_binding_not_initialized(VM& vm, size_t index)
- {
- auto const& variable_name = vm.running_execution_context().function->local_variables_names()[index];
- TRY_OR_SET_EXCEPTION(vm.throw_completion<ReferenceError>(ErrorType::BindingNotInitialized, variable_name));
- return {};
- }
- void Compiler::compile_get_local(Bytecode::Op::GetLocal const& op)
- {
- load_vm_local(GPR0, op.index());
- // if (GPR0 == <empty>) throw ReferenceError(BindingNotInitialized)
- Assembler::Label not_empty {};
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Imm(Value().encoded()));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Register(GPR1),
- not_empty);
- m_assembler.mov(Assembler::Operand::Register(ARG1), Assembler::Operand::Imm(op.index()));
- native_call((void*)cxx_throw_binding_not_initialized);
- check_exception();
- not_empty.link(m_assembler);
- store_accumulator(GPR0);
- }
- void Compiler::compile_set_local(Bytecode::Op::SetLocal const& op)
- {
- load_accumulator(GPR0);
- store_vm_local(op.index(), GPR0);
- }
- static Value cxx_typeof_local(VM& vm, Value value)
- {
- return PrimitiveString::create(vm, value.typeof());
- }
- void Compiler::compile_typeof_local(Bytecode::Op::TypeofLocal const& op)
- {
- load_vm_local(ARG1, op.index());
- native_call((void*)cxx_typeof_local);
- store_accumulator(GPR0);
- }
- void Compiler::compile_jump(Bytecode::Op::Jump const& op)
- {
- m_assembler.jump(label_for(op.true_target()->block()));
- }
- static bool cxx_to_boolean(VM&, Value value)
- {
- return value.to_boolean_slow_case();
- }
- void Compiler::compile_to_boolean(Assembler::Reg dst, Assembler::Reg src)
- {
- // dst = src;
- m_assembler.mov(
- Assembler::Operand::Register(dst),
- Assembler::Operand::Register(src));
- // dst >>= 48;
- m_assembler.shift_right(
- Assembler::Operand::Register(dst),
- Assembler::Operand::Imm(48));
- // if (dst != BOOLEAN_TAG) goto slow_case;
- Assembler::Label slow_case {};
- m_assembler.jump_if(
- Assembler::Operand::Register(dst),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Imm(BOOLEAN_TAG),
- slow_case);
- // Fast path for JS::Value booleans.
- // dst = src;
- m_assembler.mov(
- Assembler::Operand::Register(dst),
- Assembler::Operand::Register(src));
- // goto end;
- auto end = m_assembler.jump();
- // slow_case: // call C++ helper
- slow_case.link(m_assembler);
- m_assembler.mov(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Register(src));
- native_call((void*)cxx_to_boolean);
- m_assembler.mov(
- Assembler::Operand::Register(dst),
- Assembler::Operand::Register(RET));
- // end:
- end.link(m_assembler);
- // dst &= 1;
- m_assembler.bitwise_and(
- Assembler::Operand::Register(dst),
- Assembler::Operand::Imm(1));
- }
- void Compiler::compile_jump_conditional(Bytecode::Op::JumpConditional const& op)
- {
- load_accumulator(GPR1);
- compile_to_boolean(GPR0, GPR1);
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(0),
- label_for(op.false_target()->block()));
- m_assembler.jump(label_for(op.true_target()->block()));
- }
- void Compiler::compile_jump_nullish(Bytecode::Op::JumpNullish const& op)
- {
- load_accumulator(GPR0);
- m_assembler.shift_right(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Imm(48));
- m_assembler.bitwise_and(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Imm(IS_NULLISH_EXTRACT_PATTERN));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(IS_NULLISH_PATTERN),
- label_for(op.true_target()->block()));
- m_assembler.jump(label_for(op.false_target()->block()));
- }
- void Compiler::compile_jump_undefined(Bytecode::Op::JumpUndefined const& op)
- {
- load_accumulator(GPR0);
- m_assembler.shift_right(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Imm(48));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(UNDEFINED_TAG),
- label_for(op.true_target()->block()));
- m_assembler.jump(label_for(op.false_target()->block()));
- }
- [[maybe_unused]] static Value cxx_increment(VM& vm, Value value)
- {
- auto old_value = TRY_OR_SET_EXCEPTION(value.to_numeric(vm));
- if (old_value.is_number())
- return Value(old_value.as_double() + 1);
- return BigInt::create(vm, old_value.as_bigint().big_integer().plus(Crypto::SignedBigInteger { 1 }));
- }
- void Compiler::jump_if_int32(Assembler::Reg reg, Assembler::Label& label)
- {
- // GPR0 = reg >> 48;
- m_assembler.mov(Assembler::Operand::Register(GPR0), Assembler::Operand::Register(reg));
- m_assembler.shift_right(Assembler::Operand::Register(GPR0), Assembler::Operand::Imm(48));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(INT32_TAG),
- label);
- }
- template<typename Codegen>
- void Compiler::branch_if_type(Assembler::Reg reg, u16 type_tag, Codegen codegen)
- {
- // GPR0 = reg >> 48;
- m_assembler.mov(Assembler::Operand::Register(GPR0), Assembler::Operand::Register(reg));
- m_assembler.shift_right(Assembler::Operand::Register(GPR0), Assembler::Operand::Imm(48));
- Assembler::Label not_type_case {};
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Imm(type_tag),
- not_type_case);
- codegen();
- not_type_case.link(m_assembler);
- }
- template<typename Codegen>
- void Compiler::branch_if_both_int32(Assembler::Reg lhs, Assembler::Reg rhs, Codegen codegen)
- {
- // GPR0 = lhs >> 48;
- m_assembler.mov(Assembler::Operand::Register(GPR0), Assembler::Operand::Register(lhs));
- m_assembler.shift_right(Assembler::Operand::Register(GPR0), Assembler::Operand::Imm(48));
- // GPR1 = rhs >> 48;
- m_assembler.mov(Assembler::Operand::Register(GPR1), Assembler::Operand::Register(rhs));
- m_assembler.shift_right(Assembler::Operand::Register(GPR1), Assembler::Operand::Imm(48));
- Assembler::Label not_int32_case {};
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Imm(INT32_TAG),
- not_int32_case);
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR1),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Imm(INT32_TAG),
- not_int32_case);
- codegen();
- not_int32_case.link(m_assembler);
- }
- void Compiler::jump_if_not_double(Assembler::Reg reg, Assembler::Reg nan, Assembler::Reg temp, Assembler::Label& label)
- {
- Assembler::Label is_double {};
- // if (reg == nan) goto is_double
- m_assembler.jump_if(
- Assembler::Operand::Register(reg),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Register(nan),
- is_double);
- // temp = reg
- m_assembler.mov(Assembler::Operand::Register(temp), Assembler::Operand::Register(reg));
- // if (temp & CANON_NAN_BITS == CANON_NAN_BITS) goto label
- m_assembler.bitwise_and(
- Assembler::Operand::Register(temp),
- Assembler::Operand::Register(nan));
- m_assembler.jump_if(
- Assembler::Operand::Register(temp),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Register(nan),
- label);
- is_double.link(m_assembler);
- }
- void Compiler::convert_to_double(Assembler::Reg dst, Assembler::Reg src, Assembler::Reg nan, Assembler::Reg temp, Assembler::Label& not_number)
- {
- Assembler::Label is_i32;
- Assembler::Label end;
- jump_if_int32(src, is_i32);
- jump_if_not_double(src, nan, temp, not_number);
- m_assembler.mov(
- Assembler::Operand::FloatRegister(dst),
- Assembler::Operand::Register(src));
- m_assembler.jump(end);
- is_i32.link(m_assembler);
- m_assembler.convert_i32_to_double(
- Assembler::Operand::FloatRegister(dst),
- Assembler::Operand::Register(src));
- end.link(m_assembler);
- }
- template<typename CodegenI32, typename CodegenDouble, typename CodegenValue>
- void Compiler::compile_binary_op_fastpaths(Assembler::Reg lhs, Assembler::Reg rhs, CodegenI32 codegen_i32, CodegenDouble codegen_double, CodegenValue codegen_value)
- {
- Assembler::Label end {};
- Assembler::Label slow_case {};
- // The only case where we can take the int32 fastpath
- branch_if_both_int32(lhs, rhs, [&] {
- // use GPR0 to preserve lhs for the slow case
- m_assembler.mov32(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(lhs));
- store_accumulator(codegen_i32(GPR0, rhs, slow_case));
- // accumulator |= SHIFTED_INT32_TAG;
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Imm(SHIFTED_INT32_TAG));
- m_assembler.bitwise_or(
- Assembler::Operand::Register(CACHED_ACCUMULATOR),
- Assembler::Operand::Register(GPR0));
- m_assembler.jump(end);
- });
- // accumulator = op_double(lhs.to_double(), rhs.to_double()) [if not numeric goto slow_case]
- auto temp_register = GPR0;
- auto nan_register = GPR1;
- m_assembler.mov(Assembler::Operand::Register(nan_register), Assembler::Operand::Imm(CANON_NAN_BITS));
- convert_to_double(FPR0, ARG1, nan_register, temp_register, slow_case);
- convert_to_double(FPR1, ARG2, nan_register, temp_register, slow_case);
- auto result_fp_register = codegen_double(FPR0, FPR1);
- // if result != result then result = nan (canonical)
- Assembler::Label nan_case;
- m_assembler.jump_if(
- Assembler::Operand::FloatRegister(result_fp_register),
- Assembler::Condition::Unordered,
- Assembler::Operand::FloatRegister(result_fp_register),
- nan_case);
- m_assembler.mov(
- Assembler::Operand::Register(CACHED_ACCUMULATOR),
- Assembler::Operand::FloatRegister(result_fp_register));
- m_assembler.jump(end);
- nan_case.link(m_assembler);
- m_assembler.mov(
- Assembler::Operand::Register(CACHED_ACCUMULATOR),
- Assembler::Operand::Register(nan_register));
- m_assembler.jump(end);
- slow_case.link(m_assembler);
- // accumulator = TRY(op_value(lhs, rhs))
- store_accumulator(codegen_value(lhs, rhs));
- check_exception();
- end.link(m_assembler);
- }
- template<typename CodegenI32, typename CodegenDouble, typename CodegenValue>
- void Compiler::compiler_comparison_fastpaths(Assembler::Reg lhs, Assembler::Reg rhs, CodegenI32 codegen_i32, CodegenDouble codegen_double, CodegenValue codegen_value)
- {
- Assembler::Label end {};
- Assembler::Label slow_case {};
- // The only case where we can take the int32 fastpath
- branch_if_both_int32(lhs, rhs, [&] {
- store_accumulator(codegen_i32(lhs, rhs));
- // accumulator |= SHIFTED_BOOLEAN_TAG;
- m_assembler.jump(end);
- });
- // accumulator = op_double(lhs.to_double(), rhs.to_double())
- auto temp_register = GPR0;
- auto nan_register = GPR1;
- m_assembler.mov(Assembler::Operand::Register(nan_register), Assembler::Operand::Imm(CANON_NAN_BITS));
- convert_to_double(FPR0, ARG1, nan_register, temp_register, slow_case);
- convert_to_double(FPR1, ARG2, nan_register, temp_register, slow_case);
- store_accumulator(codegen_double(FPR0, FPR1));
- m_assembler.jump(end);
- slow_case.link(m_assembler);
- // accumulator = TRY(op_value(lhs, rhs))
- store_accumulator(codegen_value(lhs, rhs));
- check_exception();
- end.link(m_assembler);
- }
- void Compiler::compile_increment(Bytecode::Op::Increment const&)
- {
- load_accumulator(ARG1);
- Assembler::Label end {};
- Assembler::Label slow_case {};
- branch_if_int32(ARG1, [&] {
- // GPR0 = ARG1
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(ARG1));
- // GPR0++;
- m_assembler.inc32(
- Assembler::Operand::Register(GPR0),
- slow_case);
- // accumulator = GPR0 | SHIFTED_INT32_TAG;
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Imm(SHIFTED_INT32_TAG));
- m_assembler.bitwise_or(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(GPR1));
- store_accumulator(GPR0);
- m_assembler.jump(end);
- });
- slow_case.link(m_assembler);
- native_call((void*)cxx_increment);
- store_accumulator(RET);
- check_exception();
- end.link(m_assembler);
- }
- static Value cxx_decrement(VM& vm, Value value)
- {
- auto old_value = TRY_OR_SET_EXCEPTION(value.to_numeric(vm));
- if (old_value.is_number())
- return Value(old_value.as_double() - 1);
- return BigInt::create(vm, old_value.as_bigint().big_integer().minus(Crypto::SignedBigInteger { 1 }));
- }
- void Compiler::compile_decrement(Bytecode::Op::Decrement const&)
- {
- load_accumulator(ARG1);
- Assembler::Label end {};
- Assembler::Label slow_case {};
- branch_if_int32(ARG1, [&] {
- // GPR0 = ARG1;
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(ARG1));
- // GPR0--;
- m_assembler.dec32(
- Assembler::Operand::Register(GPR0),
- slow_case);
- // accumulator = GPR0 | SHIFTED_INT32_TAG;
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Imm(SHIFTED_INT32_TAG));
- m_assembler.bitwise_or(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(GPR1));
- // accumulator = GPR0;
- store_accumulator(GPR0);
- m_assembler.jump(end);
- });
- slow_case.link(m_assembler);
- native_call((void*)cxx_decrement);
- store_accumulator(RET);
- check_exception();
- end.link(m_assembler);
- }
- void Compiler::check_exception()
- {
- load_vm_register(GPR0, Bytecode::Register::exception());
- m_assembler.mov(Assembler::Operand::Register(GPR1), Assembler::Operand::Imm(Value().encoded()));
- if (auto const* handler = current_block().handler(); handler) {
- Assembler::Label no_exception;
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Register(GPR1),
- no_exception);
- store_accumulator(GPR0);
- store_vm_register(Bytecode::Register::exception(), GPR1);
- m_assembler.jump(label_for(*handler));
- no_exception.link(m_assembler);
- } else if (auto const* finalizer = current_block().finalizer(); finalizer) {
- store_vm_register(Bytecode::Register::saved_exception(), GPR0);
- store_vm_register(Bytecode::Register::exception(), GPR1);
- m_assembler.jump_if(Assembler::Operand::Register(GPR0),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Register(GPR1),
- label_for(*finalizer));
- } else {
- m_assembler.jump_if(Assembler::Operand::Register(GPR0),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Register(GPR1),
- m_exit_label);
- }
- }
- static void cxx_enter_unwind_context(VM& vm)
- {
- vm.bytecode_interpreter().enter_unwind_context();
- }
- void Compiler::compile_enter_unwind_context(Bytecode::Op::EnterUnwindContext const& op)
- {
- native_call((void*)cxx_enter_unwind_context);
- m_assembler.jump(label_for(op.entry_point().block()));
- }
- static void cxx_leave_unwind_context(VM& vm)
- {
- vm.bytecode_interpreter().leave_unwind_context();
- }
- void Compiler::compile_leave_unwind_context(Bytecode::Op::LeaveUnwindContext const&)
- {
- native_call((void*)cxx_leave_unwind_context);
- }
- void Compiler::compile_throw(Bytecode::Op::Throw const&)
- {
- load_accumulator(GPR0);
- store_vm_register(Bytecode::Register::exception(), GPR0);
- check_exception();
- }
- static void cxx_catch(VM& vm)
- {
- vm.bytecode_interpreter().catch_exception();
- }
- void Compiler::compile_catch(Bytecode::Op::Catch const&)
- {
- native_call((void*)cxx_catch);
- }
- static ThrowCompletionOr<Value> loosely_inequals(VM& vm, Value src1, Value src2)
- {
- return Value(!TRY(is_loosely_equal(vm, src1, src2)));
- }
- static ThrowCompletionOr<Value> loosely_equals(VM& vm, Value src1, Value src2)
- {
- return Value(TRY(is_loosely_equal(vm, src1, src2)));
- }
- static ThrowCompletionOr<Value> strict_inequals(VM&, Value src1, Value src2)
- {
- return Value(!is_strictly_equal(src1, src2));
- }
- static ThrowCompletionOr<Value> strict_equals(VM&, Value src1, Value src2)
- {
- return Value(is_strictly_equal(src1, src2));
- }
- template<typename Codegen>
- void Compiler::branch_if_same_type_for_equality(Assembler::Reg lhs, Assembler::Reg rhs, Codegen codegen)
- {
- Assembler::Label same_type_case {};
- Assembler::Label not_same_type_case {};
- // GPR0 = lhs >> TAG_SHIFT
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(lhs));
- m_assembler.shift_right(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Imm(TAG_SHIFT));
- // GPR1 = rhs >> TAG_SHIFT
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Register(rhs));
- m_assembler.shift_right(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Imm(TAG_SHIFT));
- // if (GPR0 == GPR1) goto same_type_case
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Register(GPR1),
- same_type_case);
- Assembler::Label lhs_is_number {};
- // if (lhs & CANON_NAN_BITS != CANON_NAN_BITS) goto lhs_is_number
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(lhs));
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Imm(CANON_NAN_BITS));
- m_assembler.bitwise_and(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(GPR1));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Register(GPR1),
- lhs_is_number);
- // if (lhs == CANON_NAN_BITS) goto lhs_is_number
- m_assembler.jump_if(
- Assembler::Operand::Register(lhs),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Register(GPR1),
- lhs_is_number);
- // if (lhs >> TAG_SHIFT == INT32_TAG) goto lhs_is_number
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(lhs));
- m_assembler.shift_right(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Imm(TAG_SHIFT));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(INT32_TAG),
- lhs_is_number);
- m_assembler.jump(not_same_type_case);
- lhs_is_number.link(m_assembler);
- Assembler::Label rhs_is_number {};
- // if (rhs & CANON_NAN_BITS != CANON_NAN_BITS) goto rhs_is_number
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(rhs));
- m_assembler.bitwise_and(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(GPR1));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Register(GPR1),
- rhs_is_number);
- // if (rhs == CANON_NAN_BITS) goto rhs_is_number
- m_assembler.jump_if(
- Assembler::Operand::Register(rhs),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Register(GPR1),
- rhs_is_number);
- // if (rhs >> TAG_SHIFT == INT32_TAG) goto rhs_is_number
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(rhs));
- m_assembler.shift_right(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Imm(TAG_SHIFT));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(INT32_TAG),
- rhs_is_number);
- m_assembler.jump(not_same_type_case);
- same_type_case.link(m_assembler);
- rhs_is_number.link(m_assembler);
- codegen();
- not_same_type_case.link(m_assembler);
- }
- void Compiler::compile_is_strictly_equal(Assembler::Reg lhs, Assembler::Reg rhs, Assembler::Label& slow_case)
- {
- Assembler::Label end {};
- Assembler::Label general_case {};
- Assembler::Label false_case {};
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Imm(CANON_NAN_BITS));
- convert_to_double(FPR0, lhs, GPR1, GPR0, general_case);
- convert_to_double(FPR1, rhs, GPR1, GPR0, general_case);
- // if (FPR0 == nan || FPR1 == nan) goto false_case;
- m_assembler.jump_if(
- Assembler::Operand::FloatRegister(FPR0),
- Assembler::Condition::Unordered,
- Assembler::Operand::FloatRegister(FPR1),
- false_case);
- // if (FPR0 != FPR1) goto false_case;
- m_assembler.jump_if(
- Assembler::Operand::FloatRegister(FPR0),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::FloatRegister(FPR1),
- false_case);
- m_assembler.mov(
- Assembler::Operand::Register(RET),
- Assembler::Operand::Imm(1));
- m_assembler.jump(end);
- general_case.link(m_assembler);
- // if (lhs.is_bigint()) goto slow_case;
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(lhs));
- m_assembler.shift_right(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Imm(TAG_SHIFT));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(BIGINT_TAG),
- slow_case);
- // if (lhs.is_string()) goto slow_case;
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(STRING_TAG),
- slow_case);
- m_assembler.jump_if(
- Assembler::Operand::Register(lhs),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Register(rhs),
- false_case);
- m_assembler.mov(
- Assembler::Operand::Register(RET),
- Assembler::Operand::Imm(1));
- m_assembler.jump(end);
- false_case.link(m_assembler);
- m_assembler.mov(
- Assembler::Operand::Register(RET),
- Assembler::Operand::Imm(0));
- end.link(m_assembler);
- }
- static Value cxx_strict_equals(VM& vm, Value lhs, Value rhs)
- {
- return TRY_OR_SET_EXCEPTION(strict_equals(vm, lhs, rhs));
- }
- void Compiler::compile_strict_equals(Bytecode::Op::StrictlyEquals const& op)
- {
- load_vm_register(ARG1, op.lhs());
- load_accumulator(ARG2);
- Assembler::Label end {};
- Assembler::Label slow_case {};
- branch_if_same_type_for_equality(ARG1, ARG2, [&] {
- compile_is_strictly_equal(ARG1, ARG2, slow_case);
- // RET = RET | BOOLEAN_TAG << TAG_SHIFT;
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Imm(BOOLEAN_TAG << TAG_SHIFT));
- m_assembler.bitwise_or(
- Assembler::Operand::Register(RET),
- Assembler::Operand::Register(GPR1));
- store_accumulator(RET);
- m_assembler.jump(end);
- });
- // RET = false
- m_assembler.mov(
- Assembler::Operand::Register(RET),
- Assembler::Operand::Imm(Value(false).encoded()));
- store_accumulator(RET);
- m_assembler.jump(end);
- slow_case.link(m_assembler);
- native_call((void*)cxx_strict_equals);
- store_accumulator(RET);
- check_exception();
- end.link(m_assembler);
- }
- static Value cxx_strict_inequals(VM& vm, Value lhs, Value rhs)
- {
- return TRY_OR_SET_EXCEPTION(strict_inequals(vm, lhs, rhs));
- }
- void Compiler::compile_strict_inequals(Bytecode::Op::StrictlyInequals const& op)
- {
- load_vm_register(ARG1, op.lhs());
- load_accumulator(ARG2);
- Assembler::Label end {};
- Assembler::Label slow_case {};
- branch_if_same_type_for_equality(ARG1, ARG2, [&] {
- compile_is_strictly_equal(ARG1, ARG2, slow_case);
- // RET = (RET ^ 1) | BOOLEAN_TAG << TAG_SHIFT;
- m_assembler.bitwise_xor32(
- Assembler::Operand::Register(RET),
- Assembler::Operand::Imm(1));
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Imm(BOOLEAN_TAG << TAG_SHIFT));
- m_assembler.bitwise_or(
- Assembler::Operand::Register(RET),
- Assembler::Operand::Register(GPR1));
- store_accumulator(RET);
- m_assembler.jump(end);
- });
- // RET = true
- m_assembler.mov(
- Assembler::Operand::Register(RET),
- Assembler::Operand::Imm(Value(true).encoded()));
- store_accumulator(RET);
- m_assembler.jump(end);
- slow_case.link(m_assembler);
- native_call((void*)cxx_strict_inequals);
- store_accumulator(RET);
- check_exception();
- end.link(m_assembler);
- }
- static Value cxx_loosely_equals(VM& vm, Value lhs, Value rhs)
- {
- return TRY_OR_SET_EXCEPTION(loosely_equals(vm, lhs, rhs));
- }
- void Compiler::compile_loosely_equals(Bytecode::Op::LooselyEquals const& op)
- {
- load_vm_register(ARG1, op.lhs());
- load_accumulator(ARG2);
- Assembler::Label end {};
- Assembler::Label slow_case {};
- branch_if_same_type_for_equality(ARG1, ARG2, [&] {
- compile_is_strictly_equal(ARG1, ARG2, slow_case);
- // RET = RET | BOOLEAN_TAG << TAG_SHIFT;
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Imm(BOOLEAN_TAG << TAG_SHIFT));
- m_assembler.bitwise_or(
- Assembler::Operand::Register(RET),
- Assembler::Operand::Register(GPR1));
- store_accumulator(RET);
- m_assembler.jump(end);
- });
- slow_case.link(m_assembler);
- native_call((void*)cxx_loosely_equals);
- store_accumulator(RET);
- check_exception();
- end.link(m_assembler);
- }
- static Value cxx_loosely_inequals(VM& vm, Value lhs, Value rhs)
- {
- return TRY_OR_SET_EXCEPTION(loosely_inequals(vm, lhs, rhs));
- }
- void Compiler::compile_loosely_inequals(Bytecode::Op::LooselyInequals const& op)
- {
- load_vm_register(ARG1, op.lhs());
- load_accumulator(ARG2);
- Assembler::Label end {};
- Assembler::Label slow_case {};
- branch_if_same_type_for_equality(ARG1, ARG2, [&] {
- compile_is_strictly_equal(ARG1, ARG2, slow_case);
- // RET = (RET ^ 1) | BOOLEAN_TAG << TAG_SHIFT;
- m_assembler.bitwise_xor32(
- Assembler::Operand::Register(RET),
- Assembler::Operand::Imm(1));
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Imm(BOOLEAN_TAG << TAG_SHIFT));
- m_assembler.bitwise_or(
- Assembler::Operand::Register(RET),
- Assembler::Operand::Register(GPR1));
- store_accumulator(RET);
- m_assembler.jump(end);
- });
- slow_case.link(m_assembler);
- native_call((void*)cxx_loosely_inequals);
- store_accumulator(RET);
- check_exception();
- end.link(m_assembler);
- }
- # define DO_COMPILE_COMMON_BINARY_OP(TitleCaseName, snake_case_name) \
- static Value cxx_##snake_case_name(VM& vm, Value lhs, Value rhs) \
- { \
- return TRY_OR_SET_EXCEPTION(snake_case_name(vm, lhs, rhs)); \
- } \
- \
- void Compiler::compile_##snake_case_name(Bytecode::Op::TitleCaseName const& op) \
- { \
- load_vm_register(ARG1, op.lhs()); \
- load_accumulator(ARG2); \
- native_call((void*)cxx_##snake_case_name); \
- store_accumulator(RET); \
- check_exception(); \
- }
- JS_ENUMERATE_COMMON_BINARY_OPS_WITHOUT_FAST_PATH(DO_COMPILE_COMMON_BINARY_OP)
- # undef DO_COMPILE_COMMON_BINARY_OP
- static Value cxx_add(VM& vm, Value lhs, Value rhs)
- {
- return TRY_OR_SET_EXCEPTION(add(vm, lhs, rhs));
- }
- void Compiler::compile_add(Bytecode::Op::Add const& op)
- {
- load_vm_register(ARG1, op.lhs());
- load_accumulator(ARG2);
- compile_binary_op_fastpaths(
- ARG1, ARG2,
- [&](auto lhs, auto rhs, auto& slow_case) {
- m_assembler.add32(
- Assembler::Operand::Register(lhs),
- Assembler::Operand::Register(rhs),
- slow_case);
- return lhs; },
- [&](auto lhs, auto rhs) {
- m_assembler.add(
- Assembler::Operand::FloatRegister(lhs),
- Assembler::Operand::FloatRegister(rhs));
- return lhs; },
- [&](auto lhs, auto rhs) {
- m_assembler.mov(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Register(lhs));
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Register(rhs));
- native_call((void*)cxx_add);
- return RET;
- });
- }
- static Value cxx_sub(VM& vm, Value lhs, Value rhs)
- {
- return TRY_OR_SET_EXCEPTION(sub(vm, lhs, rhs));
- }
- void Compiler::compile_sub(Bytecode::Op::Sub const& op)
- {
- load_vm_register(ARG1, op.lhs());
- load_accumulator(ARG2);
- compile_binary_op_fastpaths(
- ARG1, ARG2,
- [&](auto lhs, auto rhs, auto& slow_case) {
- m_assembler.sub32(
- Assembler::Operand::Register(lhs),
- Assembler::Operand::Register(rhs),
- slow_case);
- return lhs; },
- [&](auto lhs, auto rhs) {
- m_assembler.sub(
- Assembler::Operand::FloatRegister(lhs),
- Assembler::Operand::FloatRegister(rhs));
- return lhs; },
- [&](auto lhs, auto rhs) {
- m_assembler.mov(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Register(lhs));
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Register(rhs));
- native_call((void*)cxx_sub);
- return RET;
- });
- }
- static Value cxx_mul(VM& vm, Value lhs, Value rhs)
- {
- return TRY_OR_SET_EXCEPTION(mul(vm, lhs, rhs));
- }
- void Compiler::compile_mul(Bytecode::Op::Mul const& op)
- {
- load_vm_register(ARG1, op.lhs());
- load_accumulator(ARG2);
- compile_binary_op_fastpaths(
- ARG1, ARG2,
- [&](auto lhs, auto rhs, auto& slow_case) {
- m_assembler.mul32(
- Assembler::Operand::Register(lhs),
- Assembler::Operand::Register(rhs),
- slow_case);
- return lhs; },
- [&](auto lhs, auto rhs) {
- m_assembler.mul(
- Assembler::Operand::FloatRegister(lhs),
- Assembler::Operand::FloatRegister(rhs));
- return lhs; },
- [&](auto lhs, auto rhs) {
- m_assembler.mov(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Register(lhs));
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Register(rhs));
- native_call((void*)cxx_mul);
- return RET;
- });
- }
- # define DO_COMPILE_COMPARISON_OP(TitleCaseName, snake_case_name, IntegerCondition, FloatCondition) \
- static Value cxx_##snake_case_name(VM& vm, Value lhs, Value rhs) \
- { \
- return TRY_OR_SET_EXCEPTION(snake_case_name(vm, lhs, rhs)); \
- } \
- \
- void Compiler::compile_##snake_case_name(Bytecode::Op::TitleCaseName const& op) \
- { \
- load_vm_register(ARG1, op.lhs()); \
- load_accumulator(ARG2); \
- \
- compiler_comparison_fastpaths( \
- ARG1, ARG2, \
- [&](auto lhs, auto rhs) { \
- m_assembler.sign_extend_32_to_64_bits(lhs); \
- m_assembler.sign_extend_32_to_64_bits(rhs); \
- \
- /* accumulator = SHIFTED_BOOLEAN_TAG | (arg1 condition arg2) */ \
- m_assembler.mov( \
- Assembler::Operand::Register(GPR0), \
- Assembler::Operand::Imm(SHIFTED_BOOLEAN_TAG)); \
- m_assembler.cmp( \
- Assembler::Operand::Register(lhs), \
- Assembler::Operand::Register(rhs)); \
- m_assembler.set_if( \
- Assembler::Condition::IntegerCondition, \
- Assembler::Operand::Register(GPR0)); /* sets only first byte */ \
- return GPR0; \
- }, \
- [&](auto lhs, auto rhs) { \
- Assembler::Label is_nan; \
- /* accumulator = SHIFTED_BOOLEAN_TAG | (arg1 condition arg2) */ \
- m_assembler.mov( \
- Assembler::Operand::Register(GPR0), \
- Assembler::Operand::Imm(SHIFTED_BOOLEAN_TAG)); \
- m_assembler.cmp( \
- Assembler::Operand::FloatRegister(lhs), \
- Assembler::Operand::FloatRegister(rhs)); \
- m_assembler.jump_if( \
- Assembler::Condition::Unordered, \
- is_nan); \
- m_assembler.set_if( \
- Assembler::Condition::FloatCondition, \
- Assembler::Operand::Register(GPR0)); /* sets only first byte */ \
- is_nan.link(m_assembler); \
- return GPR0; \
- }, \
- [&](auto lhs, auto rhs) { \
- m_assembler.mov( \
- Assembler::Operand::Register(ARG1), \
- Assembler::Operand::Register(lhs)); \
- m_assembler.mov( \
- Assembler::Operand::Register(ARG2), \
- Assembler::Operand::Register(rhs)); \
- native_call((void*)cxx_##snake_case_name); \
- return RET; \
- }); \
- }
- JS_ENUMERATE_COMPARISON_OPS(DO_COMPILE_COMPARISON_OP)
- # undef DO_COMPILE_COMPARISON_OP
- static Value cxx_bitwise_and(VM& vm, Value lhs, Value rhs)
- {
- return TRY_OR_SET_EXCEPTION(bitwise_and(vm, lhs, rhs));
- }
- void Compiler::compile_bitwise_and(Bytecode::Op::BitwiseAnd const& op)
- {
- load_vm_register(ARG1, op.lhs());
- load_accumulator(ARG2);
- Assembler::Label end {};
- branch_if_both_int32(ARG1, ARG2, [&] {
- // NOTE: Since both sides are Int32, we know that the upper 32 bits are nothing but the INT32_TAG.
- // This means we can get away with just a simple 64-bit bitwise and.
- m_assembler.bitwise_and(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Register(ARG2));
- store_accumulator(ARG1);
- m_assembler.jump(end);
- });
- native_call((void*)cxx_bitwise_and);
- store_accumulator(RET);
- check_exception();
- end.link(m_assembler);
- }
- static Value cxx_bitwise_or(VM& vm, Value lhs, Value rhs)
- {
- return TRY_OR_SET_EXCEPTION(bitwise_or(vm, lhs, rhs));
- }
- void Compiler::compile_bitwise_or(Bytecode::Op::BitwiseOr const& op)
- {
- load_vm_register(ARG1, op.lhs());
- load_accumulator(ARG2);
- Assembler::Label end {};
- branch_if_both_int32(ARG1, ARG2, [&] {
- // NOTE: Since both sides are Int32, we know that the upper 32 bits are nothing but the INT32_TAG.
- // This means we can get away with just a simple 64-bit bitwise or.
- m_assembler.bitwise_or(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Register(ARG2));
- store_accumulator(ARG1);
- m_assembler.jump(end);
- });
- native_call((void*)cxx_bitwise_or);
- store_accumulator(RET);
- check_exception();
- end.link(m_assembler);
- }
- static Value cxx_bitwise_xor(VM& vm, Value lhs, Value rhs)
- {
- return TRY_OR_SET_EXCEPTION(bitwise_xor(vm, lhs, rhs));
- }
- void Compiler::compile_bitwise_xor(Bytecode::Op::BitwiseXor const& op)
- {
- load_vm_register(ARG1, op.lhs());
- load_accumulator(ARG2);
- Assembler::Label end {};
- branch_if_both_int32(ARG1, ARG2, [&] {
- // ARG1 ^= ARG2 (32-bit)
- m_assembler.bitwise_xor32(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Register(ARG2));
- // accumulator = ARG1 | SHIFTED_INT32_TAG;
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Imm(SHIFTED_INT32_TAG));
- m_assembler.bitwise_or(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Register(GPR0));
- store_accumulator(ARG1);
- m_assembler.jump(end);
- });
- native_call((void*)cxx_bitwise_xor);
- store_accumulator(RET);
- check_exception();
- end.link(m_assembler);
- }
- static Value cxx_left_shift(VM& vm, Value lhs, Value rhs)
- {
- return TRY_OR_SET_EXCEPTION(left_shift(vm, lhs, rhs));
- }
- void Compiler::compile_left_shift(Bytecode::Op::LeftShift const& op)
- {
- load_vm_register(ARG1, op.lhs());
- load_accumulator(ARG2);
- Assembler::Label end {};
- branch_if_both_int32(ARG1, ARG2, [&] {
- // RCX = ARG2
- m_assembler.mov(
- Assembler::Operand::Register(Assembler::Reg::RCX),
- Assembler::Operand::Register(ARG2));
- // ARG1 <<= CL (32-bit)
- m_assembler.shift_left32(Assembler::Operand::Register(ARG1), {});
- // accumulator = ARG1 | SHIFTED_INT32_TAG;
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Imm(SHIFTED_INT32_TAG));
- m_assembler.bitwise_or(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Register(GPR0));
- store_accumulator(ARG1);
- m_assembler.jump(end);
- });
- native_call((void*)cxx_left_shift);
- store_accumulator(RET);
- check_exception();
- end.link(m_assembler);
- }
- static Value cxx_right_shift(VM& vm, Value lhs, Value rhs)
- {
- return TRY_OR_SET_EXCEPTION(right_shift(vm, lhs, rhs));
- }
- void Compiler::compile_right_shift(Bytecode::Op::RightShift const& op)
- {
- load_vm_register(ARG1, op.lhs());
- load_accumulator(ARG2);
- Assembler::Label end {};
- branch_if_both_int32(ARG1, ARG2, [&] {
- // RCX = ARG2
- m_assembler.mov(
- Assembler::Operand::Register(Assembler::Reg::RCX),
- Assembler::Operand::Register(ARG2));
- // ARG1 >>= CL (32-bit)
- m_assembler.arithmetic_right_shift32(Assembler::Operand::Register(ARG1), {});
- // accumulator = ARG1 | SHIFTED_INT32_TAG;
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Imm(SHIFTED_INT32_TAG));
- m_assembler.bitwise_or(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Register(GPR0));
- store_accumulator(ARG1);
- m_assembler.jump(end);
- });
- native_call((void*)cxx_right_shift);
- store_accumulator(RET);
- check_exception();
- end.link(m_assembler);
- }
- static Value cxx_unsigned_right_shift(VM& vm, Value lhs, Value rhs)
- {
- return TRY_OR_SET_EXCEPTION(unsigned_right_shift(vm, lhs, rhs));
- }
- void Compiler::compile_unsigned_right_shift(Bytecode::Op::UnsignedRightShift const& op)
- {
- load_vm_register(ARG1, op.lhs());
- load_accumulator(ARG2);
- Assembler::Label end {};
- Assembler::Label slow_case {};
- branch_if_both_int32(ARG1, ARG2, [&] {
- // GPR0 = ARG1
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(ARG1));
- // RCX = ARG2
- m_assembler.mov(
- Assembler::Operand::Register(Assembler::Reg::RCX),
- Assembler::Operand::Register(ARG2));
- // GPR0 >>>= CL (32-bit)
- m_assembler.shift_right32(Assembler::Operand::Register(GPR0), {});
- // GPR1 = sign_extended(GPR0)
- m_assembler.mov32(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Register(GPR0),
- Assembler::Extension::SignExtend);
- // if (GPR1 < 0) goto slow_case;
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR1),
- Assembler::Condition::SignedLessThan,
- Assembler::Operand::Imm(0),
- slow_case);
- // accumulator = GPR0 | SHIFTED_INT32_TAG;
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Imm(SHIFTED_INT32_TAG));
- m_assembler.bitwise_or(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(GPR1));
- store_accumulator(GPR0);
- m_assembler.jump(end);
- });
- slow_case.link(m_assembler);
- native_call((void*)cxx_unsigned_right_shift);
- store_accumulator(RET);
- check_exception();
- end.link(m_assembler);
- }
- static ThrowCompletionOr<Value> not_(VM&, Value value)
- {
- return Value(!value.to_boolean());
- }
- static ThrowCompletionOr<Value> typeof_(VM& vm, Value value)
- {
- return PrimitiveString::create(vm, value.typeof());
- }
- # define DO_COMPILE_COMMON_UNARY_OP(TitleCaseName, snake_case_name) \
- static Value cxx_##snake_case_name(VM& vm, Value value) \
- { \
- return TRY_OR_SET_EXCEPTION(snake_case_name(vm, value)); \
- } \
- \
- void Compiler::compile_##snake_case_name(Bytecode::Op::TitleCaseName const&) \
- { \
- load_accumulator(ARG1); \
- native_call((void*)cxx_##snake_case_name); \
- store_accumulator(RET); \
- check_exception(); \
- }
- JS_ENUMERATE_COMMON_UNARY_OPS(DO_COMPILE_COMMON_UNARY_OP)
- # undef DO_COMPILE_COMMON_UNARY_OP
- void Compiler::compile_return(Bytecode::Op::Return const&)
- {
- load_accumulator(GPR0);
- if (auto const* finalizer = current_block().finalizer(); finalizer) {
- store_vm_register(Bytecode::Register::saved_return_value(), GPR0);
- m_assembler.jump(label_for(*finalizer));
- } else {
- store_vm_register(Bytecode::Register::return_value(), GPR0);
- jump_to_exit();
- }
- }
- static Value cxx_new_string(VM& vm, DeprecatedString const& string)
- {
- return PrimitiveString::create(vm, string);
- }
- void Compiler::compile_new_string(Bytecode::Op::NewString const& op)
- {
- auto const& string = m_bytecode_executable.string_table->get(op.index());
- m_assembler.mov(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Imm(bit_cast<u64>(&string)));
- native_call((void*)cxx_new_string);
- store_accumulator(RET);
- }
- void Compiler::compile_new_regexp(Bytecode::Op::NewRegExp const& op)
- {
- auto const& parsed_regex = m_bytecode_executable.regex_table->get(op.regex_index());
- auto const& pattern = m_bytecode_executable.string_table->get(op.source_index());
- auto const& flags = m_bytecode_executable.string_table->get(op.flags_index());
- m_assembler.mov(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Imm(bit_cast<u64>(&parsed_regex)));
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(bit_cast<u64>(&pattern)));
- m_assembler.mov(
- Assembler::Operand::Register(ARG3),
- Assembler::Operand::Imm(bit_cast<u64>(&flags)));
- native_call((void*)Bytecode::new_regexp);
- store_accumulator(RET);
- }
- static Value cxx_new_bigint(VM& vm, Crypto::SignedBigInteger const& bigint)
- {
- return BigInt::create(vm, bigint);
- }
- void Compiler::compile_new_bigint(Bytecode::Op::NewBigInt const& op)
- {
- m_assembler.mov(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Imm(bit_cast<u64>(&op.bigint())));
- native_call((void*)cxx_new_bigint);
- store_accumulator(RET);
- }
- static Value cxx_new_object(VM& vm)
- {
- auto& realm = *vm.current_realm();
- return Object::create(realm, realm.intrinsics().object_prototype());
- }
- void Compiler::compile_new_object(Bytecode::Op::NewObject const&)
- {
- native_call((void*)cxx_new_object);
- store_accumulator(RET);
- }
- static Value cxx_new_array(VM& vm, size_t element_count, u32 first_register_index)
- {
- auto& realm = *vm.current_realm();
- auto array = MUST(Array::create(realm, 0));
- for (size_t i = 0; i < element_count; ++i) {
- auto& value = vm.bytecode_interpreter().reg(Bytecode::Register(first_register_index + i));
- array->indexed_properties().put(i, value, default_attributes);
- }
- return array;
- }
- void Compiler::compile_new_array(Bytecode::Op::NewArray const& op)
- {
- m_assembler.mov(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Imm(op.element_count()));
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(op.element_count() ? op.start().index() : 0));
- native_call((void*)cxx_new_array);
- store_accumulator(RET);
- }
- void Compiler::compile_new_function(Bytecode::Op::NewFunction const& op)
- {
- m_assembler.mov(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Imm(bit_cast<u64>(&op.function_node())));
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(bit_cast<u64>(&op.lhs_name())));
- m_assembler.mov(
- Assembler::Operand::Register(ARG3),
- Assembler::Operand::Imm(bit_cast<u64>(&op.home_object())));
- native_call((void*)Bytecode::new_function);
- store_accumulator(RET);
- }
- static Value cxx_new_class(VM& vm, Value super_class, ClassExpression const& class_expression, Optional<Bytecode::IdentifierTableIndex> const& lhs_name)
- {
- return TRY_OR_SET_EXCEPTION(Bytecode::new_class(vm, super_class, class_expression, lhs_name));
- }
- void Compiler::compile_new_class(Bytecode::Op::NewClass const& op)
- {
- load_accumulator(ARG1);
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(bit_cast<u64>(&op.class_expression())));
- m_assembler.mov(
- Assembler::Operand::Register(ARG3),
- Assembler::Operand::Imm(bit_cast<u64>(&op.lhs_name())));
- native_call((void*)cxx_new_class);
- store_accumulator(RET);
- }
- static Value cxx_get_by_id(VM& vm, Value base, DeprecatedFlyString const& property, Bytecode::PropertyLookupCache& cache)
- {
- return TRY_OR_SET_EXCEPTION(Bytecode::get_by_id(vm, property, base, base, cache));
- }
- void Compiler::compile_get_by_id(Bytecode::Op::GetById const& op)
- {
- auto& cache = m_bytecode_executable.property_lookup_caches[op.cache_index()];
- Assembler::Label end;
- Assembler::Label slow_case;
- m_assembler.mov(
- Assembler::Operand::Register(ARG5),
- Assembler::Operand::Imm(bit_cast<u64>(&cache)));
- load_accumulator(ARG1);
- branch_if_object(ARG1, [&] {
- extract_object_pointer(GPR0, ARG1);
- // NOTE: Fast path for Array.length which magically reflects
- // the "array-like size" of the array object's property storage.
- if (m_bytecode_executable.get_identifier(op.property()) == "length"sv) {
- Assembler::Label no_magical_length_property_case;
- // if (!object.has_magical_length_property) goto no_magical_length_property_case;
- m_assembler.mov8(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, Object::has_magical_length_property_offset()));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR1),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(0),
- no_magical_length_property_case);
- // NOTE: The base object has a magical "length" property, so now we just need
- // to extract the "array-like size" from the object property storage.
- // If we run into any issues, we'll jump to the slow case and figure things out in C++.
- // GPR0 = object->indexed_properties().storage()
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, Object::indexed_properties_offset() + IndexedProperties::storage_offset()));
- // if (GPR0 == nullptr) goto slow_case;
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(0),
- slow_case);
- // if (!GPR0->is_simple_storage()) goto slow_case;
- m_assembler.mov8(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, IndexedPropertyStorage::is_simple_storage_offset()));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR1),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(0),
- slow_case);
- // accumulator = GPR0->array_like_size() | SHIFT_INT32_TAG
- // return
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, SimpleIndexedPropertyStorage::array_size_offset()));
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Imm(SHIFTED_INT32_TAG));
- m_assembler.bitwise_or(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Register(GPR0));
- store_accumulator(GPR1);
- m_assembler.jump(end);
- no_magical_length_property_case.link(m_assembler);
- }
- // if (cache.shape != &object->shape()) goto slow_case;
- m_assembler.mov(
- Assembler::Operand::Register(GPR2),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, Object::shape_offset()));
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(ARG5, Bytecode::PropertyLookupCache::shape_offset()));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR1),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(0),
- slow_case);
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR1, AK::WeakLink::ptr_offset()));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR2),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Register(GPR1),
- slow_case);
- // (!object->shape().is_unique() || object->shape().unique_shape_serial_number() == cache.unique_shape_serial_number)) {
- Assembler::Label fast_case;
- // GPR1 = object->shape().is_unique()
- m_assembler.mov8(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR2, Shape::is_unique_offset()));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR1),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(0),
- fast_case);
- // GPR1 = object->shape().unique_shape_serial_number()
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR2, Shape::unique_shape_serial_number_offset()));
- // GPR2 = cache.unique_shape_serial_number
- m_assembler.mov(
- Assembler::Operand::Register(GPR2),
- Assembler::Operand::Mem64BaseAndOffset(ARG5, Bytecode::PropertyLookupCache::unique_shape_serial_number_offset()));
- // if (GPR1 != GPR2) goto slow_case;
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR1),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Register(GPR2),
- slow_case);
- fast_case.link(m_assembler);
- // return object->get_direct(*cache.property_offset);
- // GPR0 = object
- // GPR1 = *cache.property_offset * sizeof(Value)
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(ARG5, Bytecode::PropertyLookupCache::property_offset_offset() + decltype(cache.property_offset)::value_offset()));
- m_assembler.mul32(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Imm(sizeof(Value)),
- slow_case);
- // GPR0 = object->m_storage.outline_buffer
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, Object::storage_offset() + Vector<Value>::outline_buffer_offset()));
- // GPR0 = &object->m_storage.outline_buffer[*cache.property_offset]
- m_assembler.add(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(GPR1));
- // *GPR0 = value
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, 0));
- store_accumulator(GPR1);
- m_assembler.jump(end);
- });
- slow_case.link(m_assembler);
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.get_identifier(op.property()))));
- m_assembler.mov(
- Assembler::Operand::Register(ARG3),
- Assembler::Operand::Imm(bit_cast<u64>(&cache)));
- native_call((void*)cxx_get_by_id);
- store_accumulator(RET);
- check_exception();
- end.link(m_assembler);
- }
- static Value cxx_get_by_value(VM& vm, Value base, Value property)
- {
- return TRY_OR_SET_EXCEPTION(Bytecode::get_by_value(vm, base, property));
- }
- void Compiler::compile_get_by_value(Bytecode::Op::GetByValue const& op)
- {
- load_vm_register(ARG1, op.base());
- load_accumulator(ARG2);
- Assembler::Label end {};
- Assembler::Label slow_case {};
- branch_if_object(ARG1, [&] {
- branch_if_int32(ARG2, [&] {
- // if (ARG2 < 0) goto slow_case;
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(ARG2));
- m_assembler.sign_extend_32_to_64_bits(GPR0);
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::SignedLessThan,
- Assembler::Operand::Imm(0),
- slow_case);
- // GPR0 = extract_pointer(ARG1)
- extract_object_pointer(GPR0, ARG1);
- // if (object->may_interfere_with_indexed_property_access()) goto slow_case;
- m_assembler.mov8(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, Object::may_interfere_with_indexed_property_access_offset()));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR1),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Imm(0),
- slow_case);
- // GPR0 = object->indexed_properties().storage()
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, Object::indexed_properties_offset() + IndexedProperties::storage_offset()));
- // if (GPR0 == nullptr) goto slow_case;
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(0),
- slow_case);
- // if (!GPR0->is_simple_storage()) goto slow_case;
- m_assembler.mov8(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, IndexedPropertyStorage::is_simple_storage_offset()));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR1),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(0),
- slow_case);
- // GPR2 = extract_int32(ARG2)
- m_assembler.mov32(
- Assembler::Operand::Register(GPR2),
- Assembler::Operand::Register(ARG2));
- // if (GPR2 >= GPR0->array_like_size()) goto slow_case;
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, SimpleIndexedPropertyStorage::array_size_offset()));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR2),
- Assembler::Condition::SignedGreaterThanOrEqualTo,
- Assembler::Operand::Register(GPR1),
- slow_case);
- // GPR0 = GPR0->elements().outline_buffer()
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, SimpleIndexedPropertyStorage::elements_offset() + Vector<Value>::outline_buffer_offset()));
- // GPR2 *= sizeof(Value)
- m_assembler.mul32(
- Assembler::Operand::Register(GPR2),
- Assembler::Operand::Imm(sizeof(Value)),
- slow_case);
- // GPR0 = GPR0[GPR2]
- m_assembler.add(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(GPR2));
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, 0));
- // if (GPR0.is_empty()) goto slow_case;
- m_assembler.mov(Assembler::Operand::Register(GPR1), Assembler::Operand::Register(GPR0));
- m_assembler.shift_right(Assembler::Operand::Register(GPR1), Assembler::Operand::Imm(TAG_SHIFT));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR1),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(EMPTY_TAG),
- slow_case);
- // if (GPR0.is_accessor()) goto slow_case;
- m_assembler.mov(Assembler::Operand::Register(GPR1), Assembler::Operand::Register(GPR0));
- m_assembler.shift_right(Assembler::Operand::Register(GPR1), Assembler::Operand::Imm(TAG_SHIFT));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR1),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(ACCESSOR_TAG),
- slow_case);
- // accumulator = GPR0;
- store_accumulator(GPR0);
- m_assembler.jump(end);
- });
- });
- slow_case.link(m_assembler);
- native_call((void*)cxx_get_by_value);
- store_accumulator(RET);
- check_exception();
- end.link(m_assembler);
- }
- static Value cxx_get_global(VM& vm, DeprecatedFlyString const& identifier, Bytecode::GlobalVariableCache& cache)
- {
- return TRY_OR_SET_EXCEPTION(Bytecode::get_global(vm.bytecode_interpreter(), identifier, cache));
- }
- void Compiler::compile_get_global(Bytecode::Op::GetGlobal const& op)
- {
- auto& cache = m_bytecode_executable.global_variable_caches[op.cache_index()];
- m_assembler.mov(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.get_identifier(op.identifier()))));
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(bit_cast<u64>(&cache)));
- Assembler::Label end {};
- Assembler::Label slow_case {};
- // GPR0 = vm.running_execution_context().realm;
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(RUNNING_EXECUTION_CONTEXT_BASE, ExecutionContext::realm_offset()));
- // GPR0 = GPR0->global_environment();
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, Realm::global_environment_offset()));
- // GPR1 = GPR0->object_record();
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, GlobalEnvironment::object_record_offset()));
- // GPR1 = GPR1->binding_object();
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR1, ObjectEnvironment::binding_object_offset()));
- // GPR0 = GPR0->declarative_record();
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, GlobalEnvironment::declarative_record_offset()));
- // GPR0 = GPR0->environment_serial_number();
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, DeclarativeEnvironment::environment_serial_number_offset()));
- // GPR2 = cache.environment_serial_number
- m_assembler.mov(
- Assembler::Operand::Register(GPR2),
- Assembler::Operand::Mem64BaseAndOffset(ARG2, Bytecode::GlobalVariableCache::environment_serial_number_offset()));
- // if (GPR2 != GPR0) goto slow_case;
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR2),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Register(GPR0),
- slow_case);
- // GPR0 = GPR1->shape()
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(GPR1, Object::shape_offset()));
- // GPR2 = cache.shape.ptr()
- m_assembler.mov(
- Assembler::Operand::Register(GPR2),
- Assembler::Operand::Mem64BaseAndOffset(ARG2, Bytecode::PropertyLookupCache::shape_offset()));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR2),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(0),
- slow_case);
- m_assembler.mov(
- Assembler::Operand::Register(GPR2),
- Assembler::Operand::Mem64BaseAndOffset(GPR2, AK::WeakLink::ptr_offset()));
- // if (GPR2 != GPR0) goto slow_case;
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR2),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Register(GPR0),
- slow_case);
- Assembler::Label fast_case {};
- // GPR2 = shape->unique()
- m_assembler.mov8(
- Assembler::Operand::Register(GPR2),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, Shape::is_unique_offset()));
- // if (!GPR2) goto fast_case;
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR2),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(0),
- fast_case);
- // GPR2 = shape->unique_shape_serial_number()
- m_assembler.mov(
- Assembler::Operand::Register(GPR2),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, Shape::unique_shape_serial_number_offset()));
- // GPR0 = cache.unique_shape_serial_number
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(ARG2, Bytecode::PropertyLookupCache::unique_shape_serial_number_offset()));
- // if (GPR2 != GPR0) goto slow_case;
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR2),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Register(GPR0),
- slow_case);
- fast_case.link(m_assembler);
- // accumulator = GPR1->get_direct(*cache.property_offset);
- // GPR0 = GPR1
- // GPR1 = *cache.property_offset * sizeof(Value)
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(GPR1));
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(ARG2, Bytecode::PropertyLookupCache::property_offset_offset() + decltype(cache.property_offset)::value_offset()));
- m_assembler.mul32(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Imm(sizeof(Value)),
- slow_case);
- // GPR0 = GPR0->m_storage.outline_buffer
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, Object::storage_offset() + Vector<Value>::outline_buffer_offset()));
- // GPR0 = &GPR0[*cache.property_offset]
- m_assembler.add(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(GPR1));
- // accumulator = *GPR0
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, 0));
- store_accumulator(GPR0);
- m_assembler.jump(end);
- slow_case.link(m_assembler);
- native_call((void*)cxx_get_global);
- store_accumulator(RET);
- check_exception();
- end.link(m_assembler);
- }
- static Value cxx_get_variable(VM& vm, DeprecatedFlyString const& name, Bytecode::EnvironmentVariableCache& cache)
- {
- return TRY_OR_SET_EXCEPTION(Bytecode::get_variable(vm.bytecode_interpreter(), name, cache));
- }
- void Compiler::compile_get_variable(Bytecode::Op::GetVariable const& op)
- {
- Assembler::Label slow_case;
- // if (!cache.has_value()) goto slow_case;
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.environment_variable_caches[op.cache_index()])));
- m_assembler.mov8(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(ARG2, Bytecode::EnvironmentVariableCache::has_value_offset()));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(0),
- slow_case);
- // auto environment = vm.running_execution_context().lexical_environment;
- // GPR1 = current lexical environment
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(RUNNING_EXECUTION_CONTEXT_BASE, ExecutionContext::lexical_environment_offset()));
- // for (size_t i = 0; i < cache->hops; ++i)
- // environment = environment->outer_environment();
- // GPR0 = hops
- m_assembler.mov32(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(ARG2, Bytecode::EnvironmentVariableCache::value_offset() + EnvironmentCoordinate::hops_offset()));
- {
- // while (GPR0--)
- // GPR1 = GPR1->outer_environment()
- Assembler::Label loop_start;
- Assembler::Label loop_end;
- loop_start.link(m_assembler);
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(0),
- loop_end);
- m_assembler.sub(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Imm(1));
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR1, Environment::outer_environment_offset()));
- m_assembler.jump(loop_start);
- loop_end.link(m_assembler);
- }
- // GPR1 now points to the environment holding our binding.
- // if (environment->is_permanently_screwed_by_eval()) goto slow_case;
- m_assembler.mov8(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(GPR1, Environment::is_permanently_screwed_by_eval_offset()));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Imm(0),
- slow_case);
- // GPR1 = environment->m_bindings.outline_buffer()
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR1, DeclarativeEnvironment::bindings_offset() + Vector<DeclarativeEnvironment::Binding>::outline_buffer_offset()));
- // GPR0 = index
- m_assembler.mov32(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(ARG2, Bytecode::EnvironmentVariableCache::value_offset() + EnvironmentCoordinate::index_offset()));
- // GPR0 *= sizeof(DeclarativeEnvironment::Binding)
- m_assembler.mul32(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Imm(sizeof(DeclarativeEnvironment::Binding)),
- slow_case);
- // GPR1 = &binding
- m_assembler.add(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Register(GPR0));
- // if (!binding.initialized) goto slow_case;
- m_assembler.mov(
- Assembler ::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(GPR1, DeclarativeEnvironment::Binding::initialized_offset()));
- m_assembler.bitwise_and(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Imm(0xff));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(0),
- slow_case);
- // accumulator = binding.value;
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(GPR1, DeclarativeEnvironment::Binding::value_offset()));
- store_accumulator(GPR0);
- Assembler::Label end;
- m_assembler.jump(end);
- // Slow case: Uncached access. Call C++ helper.
- slow_case.link(m_assembler);
- m_assembler.mov(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.get_identifier(op.identifier()))));
- native_call((void*)cxx_get_variable);
- store_accumulator(RET);
- check_exception();
- end.link(m_assembler);
- }
- static Value cxx_get_callee_and_this_from_environment(VM& vm, DeprecatedFlyString const& name, Bytecode::Register callee_reg, Bytecode::Register this_reg, Bytecode::EnvironmentVariableCache& cache)
- {
- auto& bytecode_interpreter = vm.bytecode_interpreter();
- auto callee_and_this = TRY_OR_SET_EXCEPTION(Bytecode::get_callee_and_this_from_environment(
- bytecode_interpreter,
- name,
- cache));
- bytecode_interpreter.reg(callee_reg) = callee_and_this.callee;
- bytecode_interpreter.reg(this_reg) = callee_and_this.this_value;
- return {};
- }
- void Compiler::compile_get_callee_and_this_from_environment(Bytecode::Op::GetCalleeAndThisFromEnvironment const& op)
- {
- m_assembler.mov(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.get_identifier(op.identifier()))));
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(op.callee().index()));
- m_assembler.mov(
- Assembler::Operand::Register(ARG3),
- Assembler::Operand::Imm(op.this_().index()));
- m_assembler.mov(
- Assembler::Operand::Register(ARG4),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.environment_variable_caches[op.cache_index()])));
- native_call((void*)cxx_get_callee_and_this_from_environment);
- check_exception();
- }
- static Value cxx_to_numeric(VM& vm, Value value)
- {
- return TRY_OR_SET_EXCEPTION(value.to_numeric(vm));
- }
- void Compiler::compile_to_numeric(Bytecode::Op::ToNumeric const&)
- {
- Assembler::Label fast_case {};
- load_accumulator(ARG1);
- jump_if_int32(ARG1, fast_case);
- native_call((void*)cxx_to_numeric);
- store_accumulator(RET);
- check_exception();
- fast_case.link(m_assembler);
- }
- static Value cxx_resolve_this_binding(VM& vm)
- {
- auto this_value = TRY_OR_SET_EXCEPTION(vm.resolve_this_binding());
- vm.bytecode_interpreter().reg(Bytecode::Register::this_value()) = this_value;
- return this_value;
- }
- void Compiler::compile_resolve_this_binding(Bytecode::Op::ResolveThisBinding const&)
- {
- // OPTIMIZATION: We cache the `this` value in a special VM register.
- // So first we check if the cache is non-empty, and if so,
- // we can avoid calling out to C++ at all. :^)
- load_vm_register(GPR0, Bytecode::Register::this_value());
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Imm(Value().encoded()));
- Assembler::Label slow_case {};
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Register(GPR1),
- slow_case);
- // Fast case: We have a cached `this` value!
- store_accumulator(GPR0);
- auto end = m_assembler.jump();
- slow_case.link(m_assembler);
- native_call((void*)cxx_resolve_this_binding);
- store_accumulator(RET);
- check_exception();
- end.link(m_assembler);
- }
- static Value cxx_put_by_id(VM& vm, Value base, DeprecatedFlyString const& property, Value value, Bytecode::Op::PropertyKind kind, Bytecode::PropertyLookupCache& cache)
- {
- TRY_OR_SET_EXCEPTION(Bytecode::put_by_property_key(vm, base, base, value, property, kind, &cache));
- return value;
- }
- void Compiler::extract_object_pointer(Assembler::Reg dst_object, Assembler::Reg src_value)
- {
- // This is basically Value::as_object() where src_value is the Value.
- m_assembler.mov(
- Assembler::Operand::Register(dst_object),
- Assembler::Operand::Register(src_value));
- m_assembler.shift_left(
- Assembler::Operand::Register(dst_object),
- Assembler::Operand::Imm(16));
- m_assembler.arithmetic_right_shift(
- Assembler::Operand::Register(dst_object),
- Assembler::Operand::Imm(16));
- }
- void Compiler::compile_put_by_id(Bytecode::Op::PutById const& op)
- {
- auto& cache = m_bytecode_executable.property_lookup_caches[op.cache_index()];
- load_vm_register(ARG1, op.base());
- m_assembler.mov(
- Assembler::Operand::Register(ARG5),
- Assembler::Operand::Imm(bit_cast<u64>(&cache)));
- Assembler::Label end;
- Assembler::Label slow_case;
- if (op.kind() == Bytecode::Op::PropertyKind::KeyValue) {
- branch_if_object(ARG1, [&] {
- extract_object_pointer(GPR0, ARG1);
- // if (cache.shape != &object->shape()) goto slow_case;
- m_assembler.mov(
- Assembler::Operand::Register(GPR2),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, Object::shape_offset()));
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(ARG5, Bytecode::PropertyLookupCache::shape_offset()));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR1),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(0),
- slow_case);
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR1, AK::WeakLink::ptr_offset()));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR2),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Register(GPR1),
- slow_case);
- // (!object->shape().is_unique() || object->shape().unique_shape_serial_number() == cache.unique_shape_serial_number)) {
- Assembler::Label fast_case;
- // GPR1 = object->shape().is_unique()
- m_assembler.mov8(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR2, Shape::is_unique_offset()));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR1),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(0),
- fast_case);
- // GPR1 = object->shape().unique_shape_serial_number()
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR2, Shape::unique_shape_serial_number_offset()));
- // GPR2 = cache.unique_shape_serial_number
- m_assembler.mov(
- Assembler::Operand::Register(GPR2),
- Assembler::Operand::Mem64BaseAndOffset(ARG5, Bytecode::PropertyLookupCache::unique_shape_serial_number_offset()));
- // if (GPR1 != GPR2) goto slow_case;
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR1),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Register(GPR2),
- slow_case);
- fast_case.link(m_assembler);
- // object->put_direct(*cache.property_offset, value);
- // GPR0 = object
- // GPR1 = *cache.property_offset * sizeof(Value)
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(ARG5, Bytecode::PropertyLookupCache::property_offset_offset() + decltype(cache.property_offset)::value_offset()));
- m_assembler.mul32(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Imm(sizeof(Value)),
- slow_case);
- // GPR0 = object->m_storage.outline_buffer
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, Object::storage_offset() + Vector<Value>::outline_buffer_offset()));
- // GPR0 = &object->m_storage.outline_buffer[*cache.property_offset]
- m_assembler.add(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(GPR1));
- // *GPR0 = value
- load_accumulator(GPR1);
- m_assembler.mov(
- Assembler::Operand::Mem64BaseAndOffset(GPR0, 0),
- Assembler::Operand::Register(GPR1));
- m_assembler.jump(end);
- });
- }
- slow_case.link(m_assembler);
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.get_identifier(op.property()))));
- load_accumulator(ARG3);
- m_assembler.mov(
- Assembler::Operand::Register(ARG4),
- Assembler::Operand::Imm(to_underlying(op.kind())));
- native_call((void*)cxx_put_by_id);
- store_accumulator(RET);
- check_exception();
- end.link(m_assembler);
- }
- static Value cxx_put_by_value(VM& vm, Value base, Value property, Value value, Bytecode::Op::PropertyKind kind)
- {
- TRY_OR_SET_EXCEPTION(Bytecode::put_by_value(vm, base, property, value, kind));
- return value;
- }
- void Compiler::compile_put_by_value(Bytecode::Op::PutByValue const& op)
- {
- load_vm_register(ARG1, op.base());
- load_vm_register(ARG2, op.property());
- Assembler::Label end {};
- Assembler::Label slow_case {};
- branch_if_object(ARG1, [&] {
- branch_if_int32(ARG2, [&] {
- // if (ARG2 < 0) goto slow_case;
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(ARG2));
- m_assembler.sign_extend_32_to_64_bits(GPR0);
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::SignedLessThan,
- Assembler::Operand::Imm(0),
- slow_case);
- // GPR0 = extract_pointer(ARG1)
- extract_object_pointer(GPR0, ARG1);
- // if (object->may_interfere_with_indexed_property_access()) goto slow_case;
- m_assembler.mov8(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, Object::may_interfere_with_indexed_property_access_offset()));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR1),
- Assembler::Condition::NotEqualTo,
- Assembler::Operand::Imm(0),
- slow_case);
- // GPR0 = object->indexed_properties().storage()
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, Object::indexed_properties_offset() + IndexedProperties::storage_offset()));
- // if (GPR0 == nullptr) goto slow_case;
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(0),
- slow_case);
- // if (!GPR0->is_simple_storage()) goto slow_case;
- m_assembler.mov8(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, IndexedPropertyStorage::is_simple_storage_offset()));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR1),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(0),
- slow_case);
- // GPR2 = extract_int32(ARG2)
- m_assembler.mov32(
- Assembler::Operand::Register(GPR2),
- Assembler::Operand::Register(ARG2));
- // if (GPR2 >= GPR0->array_like_size()) goto slow_case;
- m_assembler.mov(
- Assembler::Operand::Register(GPR1),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, SimpleIndexedPropertyStorage::array_size_offset()));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR2),
- Assembler::Condition::SignedGreaterThanOrEqualTo,
- Assembler::Operand::Register(GPR1),
- slow_case);
- // GPR0 = GPR0->elements().outline_buffer()
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, SimpleIndexedPropertyStorage::elements_offset() + Vector<Value>::outline_buffer_offset()));
- // GPR2 *= sizeof(Value)
- m_assembler.mul32(
- Assembler::Operand::Register(GPR2),
- Assembler::Operand::Imm(sizeof(Value)),
- slow_case);
- // GPR0 = &GRP0[GPR2]
- // GPR2 = *GPR0
- m_assembler.add(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Register(GPR2));
- m_assembler.mov(
- Assembler::Operand::Register(GPR2),
- Assembler::Operand::Mem64BaseAndOffset(GPR0, 0));
- // if (GPR2.is_accessor()) goto slow_case;
- m_assembler.mov(Assembler::Operand::Register(GPR1), Assembler::Operand::Register(GPR2));
- m_assembler.shift_right(Assembler::Operand::Register(GPR1), Assembler::Operand::Imm(TAG_SHIFT));
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR1),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(ACCESSOR_TAG),
- slow_case);
- // GRP1 will clobber ARG3 in X86, so load it later.
- load_accumulator(ARG3);
- // *GPR0 = value
- m_assembler.mov(
- Assembler::Operand::Mem64BaseAndOffset(GPR0, 0),
- Assembler::Operand::Register(ARG3));
- // accumulator = ARG3;
- store_accumulator(ARG3);
- m_assembler.jump(end);
- });
- });
- slow_case.link(m_assembler);
- load_accumulator(ARG3);
- m_assembler.mov(
- Assembler::Operand::Register(ARG4),
- Assembler::Operand::Imm(to_underlying(op.kind())));
- native_call((void*)cxx_put_by_value);
- store_accumulator(RET);
- check_exception();
- end.link(m_assembler);
- }
- static Value cxx_call(VM& vm, Value callee, u32 first_argument_index, u32 argument_count, Value this_value, Bytecode::Op::CallType call_type, Optional<Bytecode::StringTableIndex> const& expression_string)
- {
- TRY_OR_SET_EXCEPTION(throw_if_needed_for_call(vm.bytecode_interpreter(), callee, call_type, expression_string));
- MarkedVector<Value> argument_values(vm.heap());
- argument_values.ensure_capacity(argument_count);
- for (u32 i = 0; i < argument_count; ++i) {
- argument_values.unchecked_append(vm.bytecode_interpreter().reg(Bytecode::Register { first_argument_index + i }));
- }
- return TRY_OR_SET_EXCEPTION(perform_call(vm.bytecode_interpreter(), this_value, call_type, callee, move(argument_values)));
- }
- void Compiler::compile_call(Bytecode::Op::Call const& op)
- {
- load_vm_register(ARG1, op.callee());
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(op.first_argument().index()));
- m_assembler.mov(
- Assembler::Operand::Register(ARG3),
- Assembler::Operand::Imm(op.argument_count()));
- load_vm_register(ARG4, op.this_value());
- m_assembler.mov(
- Assembler::Operand::Register(ARG5),
- Assembler::Operand::Imm(to_underlying(op.call_type())));
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Imm(bit_cast<u64>(&op.expression_string())));
- native_call((void*)cxx_call, { Assembler::Operand::Register(GPR0) });
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_call_with_argument_array(VM& vm, Value arguments, Value callee, Value this_value, Bytecode::Op::CallType call_type, Optional<Bytecode::StringTableIndex> const& expression_string)
- {
- TRY_OR_SET_EXCEPTION(throw_if_needed_for_call(vm.bytecode_interpreter(), callee, call_type, expression_string));
- auto argument_values = Bytecode::argument_list_evaluation(vm, arguments);
- return TRY_OR_SET_EXCEPTION(perform_call(vm.bytecode_interpreter(), this_value, call_type, callee, move(argument_values)));
- }
- void Compiler::compile_call_with_argument_array(Bytecode::Op::CallWithArgumentArray const& op)
- {
- load_accumulator(ARG1);
- load_vm_register(ARG2, op.callee());
- load_vm_register(ARG3, op.this_value());
- m_assembler.mov(
- Assembler::Operand::Register(ARG4),
- Assembler::Operand::Imm(to_underlying(op.call_type())));
- m_assembler.mov(
- Assembler::Operand::Register(ARG5),
- Assembler::Operand::Imm(bit_cast<u64>(&op.expression_string())));
- native_call((void*)cxx_call_with_argument_array);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_typeof_variable(VM& vm, DeprecatedFlyString const& identifier)
- {
- return TRY_OR_SET_EXCEPTION(Bytecode::typeof_variable(vm, identifier));
- }
- void Compiler::compile_typeof_variable(Bytecode::Op::TypeofVariable const& op)
- {
- m_assembler.mov(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.get_identifier(op.identifier().value()))));
- native_call((void*)cxx_typeof_variable);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_create_variable(
- VM& vm,
- DeprecatedFlyString const& name,
- Bytecode::Op::EnvironmentMode mode,
- bool is_global,
- bool is_immutable,
- bool is_strict)
- {
- TRY_OR_SET_EXCEPTION(Bytecode::create_variable(vm, name, mode, is_global, is_immutable, is_strict));
- return {};
- }
- void Compiler::compile_create_variable(Bytecode::Op::CreateVariable const& op)
- {
- m_assembler.mov(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.get_identifier(op.identifier().value()))));
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(to_underlying(op.mode())));
- m_assembler.mov(
- Assembler::Operand::Register(ARG3),
- Assembler::Operand::Imm(static_cast<u64>(op.is_global())));
- m_assembler.mov(
- Assembler::Operand::Register(ARG4),
- Assembler::Operand::Imm(static_cast<u64>(op.is_immutable())));
- m_assembler.mov(
- Assembler::Operand::Register(ARG5),
- Assembler::Operand::Imm(static_cast<u64>(op.is_strict())));
- native_call((void*)cxx_create_variable);
- check_exception();
- }
- static Value cxx_set_variable(
- VM& vm,
- DeprecatedFlyString const& identifier,
- Value value,
- Bytecode::Op::EnvironmentMode environment_mode,
- Bytecode::Op::SetVariable::InitializationMode initialization_mode)
- {
- TRY_OR_SET_EXCEPTION(Bytecode::set_variable(vm, identifier, value, environment_mode, initialization_mode));
- return {};
- }
- void Compiler::compile_set_variable(Bytecode::Op::SetVariable const& op)
- {
- m_assembler.mov(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.get_identifier(op.identifier().value()))));
- load_accumulator(ARG2);
- m_assembler.mov(
- Assembler::Operand::Register(ARG3),
- Assembler::Operand::Imm(to_underlying(op.mode())));
- m_assembler.mov(
- Assembler::Operand::Register(ARG4),
- Assembler::Operand::Imm(to_underlying(op.initialization_mode())));
- native_call((void*)cxx_set_variable);
- check_exception();
- }
- void Compiler::compile_continue_pending_unwind(Bytecode::Op::ContinuePendingUnwind const& op)
- {
- // re-throw the exception if we reached the end of the finally block and there was no catch block to handle it
- load_vm_register(GPR0, Bytecode::Register::saved_exception());
- store_vm_register(Bytecode::Register::exception(), GPR0);
- m_assembler.mov(Assembler::Operand::Register(GPR1), Assembler::Operand::Imm(Value().encoded()));
- store_vm_register(Bytecode::Register::saved_exception(), GPR1);
- check_exception();
- // if (saved_return_value.is_empty()) goto resume_block;
- load_vm_register(GPR0, Bytecode::Register::saved_return_value());
- m_assembler.jump_if(
- Assembler::Operand::Register(GPR0),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Register(GPR1),
- label_for(op.resume_target().block()));
- // finish the pending return from the try block
- store_vm_register(Bytecode::Register::return_value(), GPR0);
- jump_to_exit();
- }
- static void cxx_create_lexical_environment(VM& vm)
- {
- auto make_and_swap_envs = [&](auto& old_environment) {
- GCPtr<Environment> environment = new_declarative_environment(*old_environment).ptr();
- swap(old_environment, environment);
- return environment;
- };
- vm.bytecode_interpreter().saved_lexical_environment_stack().append(make_and_swap_envs(vm.running_execution_context().lexical_environment));
- }
- void Compiler::compile_create_lexical_environment(Bytecode::Op::CreateLexicalEnvironment const&)
- {
- native_call((void*)cxx_create_lexical_environment);
- }
- static void cxx_leave_lexical_environment(VM& vm)
- {
- vm.running_execution_context().lexical_environment = vm.bytecode_interpreter().saved_lexical_environment_stack().take_last();
- }
- void Compiler::compile_leave_lexical_environment(Bytecode::Op::LeaveLexicalEnvironment const&)
- {
- native_call((void*)cxx_leave_lexical_environment);
- }
- static Value cxx_enter_object_environment(VM& vm, Value value)
- {
- auto object = TRY_OR_SET_EXCEPTION(value.to_object(vm));
- vm.bytecode_interpreter().enter_object_environment(*object);
- return {};
- }
- void Compiler::compile_enter_object_environment(Bytecode::Op::EnterObjectEnvironment const&)
- {
- load_accumulator(ARG1);
- native_call((void*)cxx_enter_object_environment);
- check_exception();
- }
- static Value cxx_concat_string(VM& vm, Value lhs, Value rhs)
- {
- auto string = TRY_OR_SET_EXCEPTION(rhs.to_primitive_string(vm));
- return PrimitiveString::create(vm, lhs.as_string(), string);
- }
- void Compiler::compile_concat_string(Bytecode::Op::ConcatString const& op)
- {
- load_vm_register(ARG1, op.lhs());
- load_accumulator(ARG2);
- native_call((void*)cxx_concat_string);
- store_vm_register(op.lhs(), RET);
- check_exception();
- }
- static void cxx_block_declaration_instantiation(VM& vm, ScopeNode const& scope_node)
- {
- auto old_environment = vm.running_execution_context().lexical_environment;
- vm.bytecode_interpreter().saved_lexical_environment_stack().append(old_environment);
- vm.running_execution_context().lexical_environment = new_declarative_environment(*old_environment);
- scope_node.block_declaration_instantiation(vm, vm.running_execution_context().lexical_environment);
- }
- void Compiler::compile_block_declaration_instantiation(Bytecode::Op::BlockDeclarationInstantiation const& op)
- {
- m_assembler.mov(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Imm(bit_cast<u64>(&op.scope_node())));
- native_call((void*)cxx_block_declaration_instantiation);
- }
- static Value cxx_super_call_with_argument_array(VM& vm, Value argument_array, bool is_synthetic)
- {
- return TRY_OR_SET_EXCEPTION(Bytecode::super_call_with_argument_array(vm, argument_array, is_synthetic));
- }
- void Compiler::compile_super_call_with_argument_array(Bytecode::Op::SuperCallWithArgumentArray const& op)
- {
- load_accumulator(ARG1);
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(static_cast<u64>(op.is_synthetic())));
- native_call((void*)cxx_super_call_with_argument_array);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_get_iterator(VM& vm, Value value, IteratorHint hint)
- {
- auto iterator = TRY_OR_SET_EXCEPTION(get_iterator(vm, value, hint));
- return Bytecode::iterator_to_object(vm, iterator);
- }
- void Compiler::compile_get_iterator(Bytecode::Op::GetIterator const& op)
- {
- load_accumulator(ARG1);
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(to_underlying(op.hint())));
- native_call((void*)cxx_get_iterator);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_iterator_next(VM& vm, Value iterator)
- {
- auto iterator_object = TRY_OR_SET_EXCEPTION(iterator.to_object(vm));
- auto iterator_record = Bytecode::object_to_iterator(vm, iterator_object);
- return TRY_OR_SET_EXCEPTION(iterator_next(vm, iterator_record));
- }
- void Compiler::compile_iterator_next(Bytecode::Op::IteratorNext const&)
- {
- load_accumulator(ARG1);
- native_call((void*)cxx_iterator_next);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_iterator_result_done(VM& vm, Value iterator)
- {
- auto iterator_result = TRY_OR_SET_EXCEPTION(iterator.to_object(vm));
- return Value(TRY_OR_SET_EXCEPTION(iterator_complete(vm, iterator_result)));
- }
- void Compiler::compile_iterator_result_done(Bytecode::Op::IteratorResultDone const&)
- {
- load_accumulator(ARG1);
- native_call((void*)cxx_iterator_result_done);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_throw_if_not_object(VM& vm, Value value)
- {
- if (!value.is_object())
- TRY_OR_SET_EXCEPTION(vm.throw_completion<TypeError>(ErrorType::NotAnObject, value.to_string_without_side_effects()));
- return {};
- }
- void Compiler::compile_throw_if_not_object(Bytecode::Op::ThrowIfNotObject const&)
- {
- load_accumulator(ARG1);
- native_call((void*)cxx_throw_if_not_object);
- check_exception();
- }
- static Value cxx_throw_if_nullish(VM& vm, Value value)
- {
- if (value.is_nullish())
- TRY_OR_SET_EXCEPTION(vm.throw_completion<TypeError>(ErrorType::NotObjectCoercible, value.to_string_without_side_effects()));
- return {};
- }
- void Compiler::compile_throw_if_nullish(Bytecode::Op::ThrowIfNullish const&)
- {
- load_accumulator(ARG1);
- native_call((void*)cxx_throw_if_nullish);
- check_exception();
- }
- static Value cxx_iterator_result_value(VM& vm, Value iterator)
- {
- auto iterator_result = TRY_OR_SET_EXCEPTION(iterator.to_object(vm));
- return TRY_OR_SET_EXCEPTION(iterator_value(vm, iterator_result));
- }
- void Compiler::compile_iterator_result_value(Bytecode::Op::IteratorResultValue const&)
- {
- load_accumulator(ARG1);
- native_call((void*)cxx_iterator_result_value);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_iterator_close(VM& vm, Value iterator, Completion::Type completion_type, Optional<Value> const& completion_value)
- {
- auto iterator_object = TRY_OR_SET_EXCEPTION(iterator.to_object(vm));
- auto iterator_record = Bytecode::object_to_iterator(vm, iterator_object);
- // FIXME: Return the value of the resulting completion. (Note that m_completion_value can be empty!)
- TRY_OR_SET_EXCEPTION(iterator_close(vm, iterator_record, Completion { completion_type, completion_value, {} }));
- return {};
- }
- void Compiler::compile_iterator_close(Bytecode::Op::IteratorClose const& op)
- {
- load_accumulator(ARG1);
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(to_underlying(op.completion_type())));
- m_assembler.mov(
- Assembler::Operand::Register(ARG3),
- Assembler::Operand::Imm(bit_cast<u64>(&op.completion_value())));
- native_call((void*)cxx_iterator_close);
- check_exception();
- }
- static Value iterator_to_array(VM& vm, Value iterator)
- {
- return TRY_OR_SET_EXCEPTION(Bytecode::iterator_to_array(vm, iterator));
- }
- void Compiler::compile_iterator_to_array(Bytecode::Op::IteratorToArray const&)
- {
- load_accumulator(ARG1);
- native_call((void*)iterator_to_array);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_append(VM& vm, Value lhs, Value rhs, bool is_spread)
- {
- TRY_OR_SET_EXCEPTION(Bytecode::append(vm, lhs, rhs, is_spread));
- return {};
- }
- void Compiler::compile_append(Bytecode::Op::Append const& op)
- {
- load_vm_register(ARG1, op.lhs());
- load_accumulator(ARG2);
- m_assembler.mov(
- Assembler::Operand::Register(ARG3),
- Assembler::Operand::Imm(static_cast<u64>(op.is_spread())));
- native_call((void*)cxx_append);
- check_exception();
- }
- static Value cxx_delete_by_id(VM& vm, Value base, Bytecode::IdentifierTableIndex property)
- {
- return TRY_OR_SET_EXCEPTION(Bytecode::delete_by_id(vm.bytecode_interpreter(), base, property));
- }
- void Compiler::compile_delete_by_id(Bytecode::Op::DeleteById const& op)
- {
- load_accumulator(ARG1);
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(op.property().value()));
- native_call((void*)cxx_delete_by_id);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_delete_by_value(VM& vm, Value base_value, Value property_key_value)
- {
- return TRY_OR_SET_EXCEPTION(Bytecode::delete_by_value(vm.bytecode_interpreter(), base_value, property_key_value));
- }
- void Compiler::compile_delete_by_value(Bytecode::Op::DeleteByValue const& op)
- {
- load_vm_register(ARG1, op.base());
- load_accumulator(ARG2);
- native_call((void*)cxx_delete_by_value);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_delete_by_value_with_this(VM& vm, Value base_value, Value property_key_value, Value this_value)
- {
- return TRY_OR_SET_EXCEPTION(Bytecode::delete_by_value_with_this(vm.bytecode_interpreter(), base_value, property_key_value, this_value));
- }
- void Compiler::compile_delete_by_value_with_this(Bytecode::Op::DeleteByValueWithThis const& op)
- {
- load_vm_register(ARG1, op.base());
- load_accumulator(ARG2);
- load_vm_register(ARG3, op.this_value());
- native_call((void*)cxx_delete_by_value_with_this);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_get_object_property_iterator(VM& vm, Value object)
- {
- return TRY_OR_SET_EXCEPTION(Bytecode::get_object_property_iterator(vm, object));
- }
- void Compiler::compile_get_object_property_iterator(Bytecode::Op::GetObjectPropertyIterator const&)
- {
- load_accumulator(ARG1);
- native_call((void*)cxx_get_object_property_iterator);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_get_private_by_id(VM& vm, Value base_value, DeprecatedFlyString& name)
- {
- auto private_reference = make_private_reference(vm, base_value, name);
- return TRY_OR_SET_EXCEPTION(private_reference.get_value(vm));
- }
- void Compiler::compile_get_private_by_id(Bytecode::Op::GetPrivateById const& op)
- {
- load_accumulator(ARG1);
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.get_identifier(op.property()))));
- native_call((void*)cxx_get_private_by_id);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_resolve_super_base(VM& vm)
- {
- // 1. Let env be GetThisEnvironment().
- auto& env = verify_cast<FunctionEnvironment>(*get_this_environment(vm));
- // 2. Assert: env.HasSuperBinding() is true.
- VERIFY(env.has_super_binding());
- // 3. Let baseValue be ? env.GetSuperBase().
- return TRY_OR_SET_EXCEPTION(env.get_super_base());
- }
- void Compiler::compile_resolve_super_base(Bytecode::Op::ResolveSuperBase const&)
- {
- native_call((void*)cxx_resolve_super_base);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_get_by_id_with_this(VM& vm, DeprecatedFlyString const& property, Value base_value, Value this_value, Bytecode::PropertyLookupCache& cache)
- {
- return TRY_OR_SET_EXCEPTION(Bytecode::get_by_id(vm, property, base_value, this_value, cache));
- }
- void Compiler::compile_get_by_id_with_this(Bytecode::Op::GetByIdWithThis const& op)
- {
- m_assembler.mov(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.get_identifier(op.property()))));
- load_accumulator(ARG2);
- load_vm_register(ARG3, op.this_value());
- m_assembler.mov(
- Assembler::Operand::Register(ARG4),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.property_lookup_caches[op.cache_index()])));
- native_call((void*)cxx_get_by_id_with_this);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_get_by_value_with_this(VM& vm, Value property_key_value, Value base, Value this_value)
- {
- auto object = TRY_OR_SET_EXCEPTION(base.to_object(vm));
- auto property_key = TRY_OR_SET_EXCEPTION(property_key_value.to_property_key(vm));
- return TRY_OR_SET_EXCEPTION(object->internal_get(property_key, this_value));
- }
- void Compiler::compile_get_by_value_with_this(Bytecode::Op::GetByValueWithThis const& op)
- {
- load_accumulator(ARG1);
- load_vm_register(ARG2, op.base());
- load_vm_register(ARG3, op.this_value());
- native_call((void*)cxx_get_by_value_with_this);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_delete_by_id_with_this(VM& vm, Value base_value, DeprecatedFlyString const& identifier, Value this_value)
- {
- auto reference = Reference { base_value, identifier, this_value, vm.in_strict_mode() };
- return Value(TRY_OR_SET_EXCEPTION(reference.delete_(vm)));
- }
- void Compiler::compile_delete_by_id_with_this(Bytecode::Op::DeleteByIdWithThis const& op)
- {
- load_accumulator(ARG1);
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.get_identifier(op.property()))));
- load_vm_register(ARG3, op.this_value());
- native_call((void*)cxx_delete_by_id_with_this);
- store_accumulator(RET);
- }
- static Value cxx_put_by_id_with_this(VM& vm, Value base, Value value, DeprecatedFlyString const& name, Value this_value, Bytecode::Op::PropertyKind kind, Bytecode::PropertyLookupCache& cache)
- {
- TRY_OR_SET_EXCEPTION(Bytecode::put_by_property_key(vm, base, this_value, value, name, kind, &cache));
- return {};
- }
- void Compiler::compile_put_by_id_with_this(Bytecode::Op::PutByIdWithThis const& op)
- {
- load_vm_register(ARG1, op.base());
- load_accumulator(ARG2);
- m_assembler.mov(
- Assembler::Operand::Register(ARG3),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.get_identifier(op.property()))));
- load_vm_register(ARG4, op.this_value());
- m_assembler.mov(
- Assembler::Operand::Register(ARG5),
- Assembler::Operand::Imm(to_underlying(op.kind())));
- m_assembler.mov(
- Assembler::Operand::Register(GPR0),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.property_lookup_caches[op.cache_index()])));
- native_call((void*)cxx_put_by_id_with_this, { Assembler::Operand::Register(GPR0) });
- check_exception();
- }
- static Value cxx_put_private_by_id(VM& vm, Value base, Value value, DeprecatedFlyString const& name)
- {
- auto object = TRY_OR_SET_EXCEPTION(base.to_object(vm));
- auto private_reference = make_private_reference(vm, object, name);
- TRY_OR_SET_EXCEPTION(private_reference.put_value(vm, value));
- return value;
- }
- void Compiler::compile_put_private_by_id(Bytecode::Op::PutPrivateById const& op)
- {
- load_vm_register(ARG1, op.base());
- load_accumulator(ARG2);
- m_assembler.mov(
- Assembler::Operand::Register(ARG3),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.get_identifier(op.property()))));
- native_call((void*)cxx_put_private_by_id);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_import_call(VM& vm, Value specifier, Value options)
- {
- return TRY_OR_SET_EXCEPTION(perform_import_call(vm, specifier, options));
- }
- void Compiler::compile_import_call(Bytecode::Op::ImportCall const& op)
- {
- load_vm_register(ARG1, op.specifier());
- load_vm_register(ARG2, op.options());
- native_call((void*)cxx_import_call);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_get_import_meta(VM& vm)
- {
- return vm.get_import_meta();
- }
- void Compiler::compile_get_import_meta(Bytecode::Op::GetImportMeta const&)
- {
- native_call((void*)cxx_get_import_meta);
- store_accumulator(RET);
- }
- static Value cxx_delete_variable(VM& vm, DeprecatedFlyString const& identifier)
- {
- auto reference = TRY_OR_SET_EXCEPTION(vm.resolve_binding(identifier));
- return Value(TRY_OR_SET_EXCEPTION(reference.delete_(vm)));
- }
- void Compiler::compile_delete_variable(Bytecode::Op::DeleteVariable const& op)
- {
- m_assembler.mov(
- Assembler::Operand::Register(ARG1),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.get_identifier(op.identifier().value()))));
- native_call((void*)cxx_delete_variable);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_get_method(VM& vm, Value value, DeprecatedFlyString const& identifier)
- {
- auto method = TRY_OR_SET_EXCEPTION(value.get_method(vm, identifier));
- return method ?: js_undefined();
- }
- void Compiler::compile_get_method(Bytecode::Op::GetMethod const& op)
- {
- load_accumulator(ARG1);
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.get_identifier(op.property()))));
- native_call((void*)cxx_get_method);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_get_new_target(VM& vm)
- {
- return vm.get_new_target();
- }
- void Compiler::compile_get_new_target(Bytecode::Op::GetNewTarget const&)
- {
- native_call((void*)cxx_get_new_target);
- store_accumulator(RET);
- }
- static Value cxx_has_private_id(VM& vm, Value object, DeprecatedFlyString const& identifier)
- {
- if (!object.is_object())
- TRY_OR_SET_EXCEPTION(vm.throw_completion<TypeError>(ErrorType::InOperatorWithObject));
- auto private_environment = vm.running_execution_context().private_environment;
- VERIFY(private_environment);
- auto private_name = private_environment->resolve_private_identifier(identifier);
- return Value(object.as_object().private_element_find(private_name) != nullptr);
- }
- void Compiler::compile_has_private_id(Bytecode::Op::HasPrivateId const& op)
- {
- load_accumulator(ARG1);
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.get_identifier(op.property()))));
- native_call((void*)cxx_has_private_id);
- store_accumulator(RET);
- check_exception();
- }
- # define COMPILE_NEW_BUILTIN_ERROR_OP(NewErrorName, new_error_name, ErrorName) \
- static Value cxx_##new_error_name(VM& vm, DeprecatedString const& error_string) \
- { \
- return ErrorName::create(*vm.current_realm(), error_string); \
- } \
- \
- void Compiler::compile_##new_error_name(Bytecode::Op::NewErrorName const& op) \
- { \
- m_assembler.mov( \
- Assembler::Operand::Register(ARG1), \
- Assembler::Operand::Imm(bit_cast<u64>(&m_bytecode_executable.get_string(op.error_string())))); \
- native_call((void*)cxx_##new_error_name); \
- store_accumulator(RET); \
- }
- JS_ENUMERATE_NEW_BUILTIN_ERROR_BYTECODE_OPS(COMPILE_NEW_BUILTIN_ERROR_OP)
- # undef COMPILE_NEW_BUILTIN_ERROR_OP
- static Value cxx_put_by_value_with_this(VM& vm, Value base, Value value, Value name, Value this_value, Bytecode::Op::PropertyKind kind)
- {
- auto property_key = kind != Bytecode::Op::PropertyKind::Spread ? TRY_OR_SET_EXCEPTION(name.to_property_key(vm)) : PropertyKey {};
- TRY_OR_SET_EXCEPTION(Bytecode::put_by_property_key(vm, base, this_value, value, property_key, kind));
- return value;
- }
- void Compiler::compile_put_by_value_with_this(Bytecode::Op::PutByValueWithThis const& op)
- {
- load_vm_register(ARG1, op.base());
- load_accumulator(ARG2);
- if (op.kind() != Bytecode::Op::PropertyKind::Spread) {
- load_vm_register(ARG3, op.property());
- } else {
- m_assembler.mov(
- Assembler::Operand::Register(ARG3),
- Assembler::Operand::Imm(Value().encoded()));
- }
- load_vm_register(ARG4, op.this_value());
- m_assembler.mov(
- Assembler::Operand::Register(ARG5),
- Assembler::Operand::Imm(to_underlying(op.kind())));
- native_call((void*)cxx_put_by_value_with_this);
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_copy_object_excluding_properties(VM& vm, Value from_object, u64 excluded_names_count, Value* excluded_names)
- {
- auto& realm = *vm.current_realm();
- auto to_object = Object::create(realm, realm.intrinsics().object_prototype());
- HashTable<PropertyKey> excluded_names_table;
- for (size_t i = 0; i < excluded_names_count; ++i) {
- excluded_names_table.set(TRY_OR_SET_EXCEPTION(excluded_names[i].to_property_key(vm)));
- }
- TRY_OR_SET_EXCEPTION(to_object->copy_data_properties(vm, from_object, excluded_names_table));
- return to_object;
- }
- void Compiler::compile_copy_object_excluding_properties(Bytecode::Op::CopyObjectExcludingProperties const& op)
- {
- load_vm_register(ARG1, op.from_object());
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(op.excluded_names_count()));
- // Build `Value arg3[op.excluded_names_count()] {...}` on the stack.
- auto stack_space = align_up_to(op.excluded_names_count() * sizeof(Value), 16);
- m_assembler.sub(Assembler::Operand::Register(STACK_POINTER), Assembler::Operand::Imm(stack_space));
- m_assembler.mov(Assembler::Operand::Register(ARG3), Assembler::Operand::Register(STACK_POINTER));
- for (size_t i = 0; i < op.excluded_names_count(); ++i) {
- load_vm_register(GPR0, op.excluded_names()[i]);
- m_assembler.mov(Assembler::Operand::Mem64BaseAndOffset(ARG3, i * sizeof(Value)), Assembler::Operand::Register(GPR0));
- }
- native_call((void*)cxx_copy_object_excluding_properties);
- // Restore the stack pointer / discard array.
- m_assembler.add(Assembler::Operand::Register(STACK_POINTER), Assembler::Operand::Imm(stack_space));
- store_accumulator(RET);
- check_exception();
- }
- static Value cxx_async_iterator_close(VM& vm, Value iterator, Completion::Type completion_type, Optional<Value> const& completion_value)
- {
- auto iterator_object = TRY_OR_SET_EXCEPTION(iterator.to_object(vm));
- auto iterator_record = Bytecode::object_to_iterator(vm, iterator_object);
- // FIXME: Return the value of the resulting completion. (Note that completion_value can be empty!)
- TRY_OR_SET_EXCEPTION(async_iterator_close(vm, iterator_record, Completion { completion_type, completion_value, {} }));
- return {};
- }
- void Compiler::compile_async_iterator_close(Bytecode::Op::AsyncIteratorClose const& op)
- {
- load_accumulator(ARG1);
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(to_underlying(op.completion_type())));
- m_assembler.mov(
- Assembler::Operand::Register(ARG3),
- Assembler::Operand::Imm(bit_cast<u64>(&op.completion_value())));
- native_call((void*)cxx_async_iterator_close);
- check_exception();
- }
- static Value cxx_continuation(VM& vm, Value value, Value continuation, Value is_await)
- {
- auto object = Object::create(*vm.current_realm(), nullptr);
- object->define_direct_property("result", value.value_or(js_undefined()), JS::default_attributes);
- object->define_direct_property("continuation", continuation, JS::default_attributes);
- object->define_direct_property("isAwait", is_await, JS::default_attributes);
- return object;
- }
- void Compiler::compile_continuation(Optional<Bytecode::Label> continuation, bool is_await)
- {
- load_accumulator(ARG1);
- if (continuation.has_value()) {
- // FIXME: If we get a pointer, which is not accurately representable as a double
- // will cause this to explode
- auto continuation_value = Value(static_cast<double>(bit_cast<u64>(&continuation->block())));
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(continuation_value.encoded()));
- } else {
- m_assembler.mov(
- Assembler::Operand::Register(ARG2),
- Assembler::Operand::Imm(Value(0).encoded()));
- }
- m_assembler.mov(
- Assembler::Operand::Register(ARG3),
- Assembler::Operand::Imm(Value(is_await).encoded()));
- native_call((void*)cxx_continuation);
- store_vm_register(Bytecode::Register::return_value(), RET);
- // FIXME: This should run the finalizer if it is a return
- jump_to_exit();
- }
- void Compiler::compile_yield(Bytecode::Op::Yield const& op)
- {
- compile_continuation(op.continuation(), false);
- }
- void Compiler::compile_await(Bytecode::Op::Await const& op)
- {
- compile_continuation(op.continuation(), true);
- }
- void Compiler::jump_to_exit()
- {
- m_assembler.jump(m_exit_label);
- }
- void Compiler::native_call(void* function_address, Vector<Assembler::Operand> const& stack_arguments)
- {
- // NOTE: We don't preserve caller-saved registers when making a native call.
- // This means that they may have changed after we return from the call.
- m_assembler.native_call(bit_cast<u64>(function_address), { Assembler::Operand::Register(ARG0) }, stack_arguments);
- }
- OwnPtr<NativeExecutable> Compiler::compile(Bytecode::Executable& bytecode_executable)
- {
- if (!getenv("LIBJS_JIT"))
- return nullptr;
- Compiler compiler { bytecode_executable };
- Vector<BytecodeMapping> mapping;
- mapping.append({
- .native_offset = compiler.m_output.size(),
- .block_index = BytecodeMapping::EXECUTABLE,
- .bytecode_offset = 0,
- });
- compiler.m_assembler.enter();
- compiler.m_assembler.mov(
- Assembler::Operand::Register(REGISTER_ARRAY_BASE),
- Assembler::Operand::Register(ARG1));
- compiler.m_assembler.mov(
- Assembler::Operand::Register(LOCALS_ARRAY_BASE),
- Assembler::Operand::Register(ARG2));
- compiler.m_assembler.mov(
- Assembler::Operand::Register(RUNNING_EXECUTION_CONTEXT_BASE),
- Assembler::Operand::Register(ARG4));
- compiler.reload_cached_accumulator();
- Assembler::Label normal_entry {};
- compiler.m_assembler.jump_if(
- Assembler::Operand::Register(ARG3),
- Assembler::Condition::EqualTo,
- Assembler::Operand::Imm(0),
- normal_entry);
- compiler.m_assembler.jump(Assembler::Operand::Register(ARG3));
- normal_entry.link(compiler.m_assembler);
- for (size_t block_index = 0; block_index < bytecode_executable.basic_blocks.size(); block_index++) {
- auto& block = bytecode_executable.basic_blocks[block_index];
- compiler.block_data_for(*block).start_offset = compiler.m_output.size();
- compiler.set_current_block(*block);
- auto it = Bytecode::InstructionStreamIterator(block->instruction_stream());
- if (it.at_end()) {
- mapping.append({
- .native_offset = compiler.m_output.size(),
- .block_index = block_index,
- .bytecode_offset = 0,
- });
- }
- while (!it.at_end()) {
- auto const& op = *it;
- mapping.append({
- .native_offset = compiler.m_output.size(),
- .block_index = block_index,
- .bytecode_offset = it.offset(),
- });
- switch (op.type()) {
- # define CASE_BYTECODE_OP(OpTitleCase, op_snake_case, ...) \
- case Bytecode::Instruction::Type::OpTitleCase: \
- compiler.compile_##op_snake_case(static_cast<Bytecode::Op::OpTitleCase const&>(op)); \
- break;
- JS_ENUMERATE_IMPLEMENTED_JIT_OPS(CASE_BYTECODE_OP)
- # undef CASE_BYTECODE_OP
- default:
- if constexpr (LOG_JIT_FAILURE) {
- dbgln("\033[31;1mJIT compilation failed\033[0m: {}", bytecode_executable.name);
- dbgln("Unsupported bytecode op: {}", op.to_deprecated_string(bytecode_executable));
- }
- return nullptr;
- }
- ++it;
- }
- if (!block->is_terminated())
- compiler.jump_to_exit();
- }
- mapping.append({
- .native_offset = compiler.m_output.size(),
- .block_index = BytecodeMapping::EXECUTABLE,
- .bytecode_offset = 1,
- });
- compiler.m_exit_label.link(compiler.m_assembler);
- compiler.flush_cached_accumulator();
- compiler.m_assembler.exit();
- auto* executable_memory = mmap(nullptr, compiler.m_output.size(), PROT_READ | PROT_WRITE, MAP_ANONYMOUS | MAP_PRIVATE, 0, 0);
- if (executable_memory == MAP_FAILED) {
- dbgln("mmap: {}", strerror(errno));
- return nullptr;
- }
- for (auto& block : bytecode_executable.basic_blocks) {
- auto& block_data = compiler.block_data_for(*block);
- block_data.label.link_to(compiler.m_assembler, block_data.start_offset);
- }
- if constexpr (DUMP_JIT_MACHINE_CODE_TO_STDOUT) {
- (void)write(STDOUT_FILENO, compiler.m_output.data(), compiler.m_output.size());
- }
- memcpy(executable_memory, compiler.m_output.data(), compiler.m_output.size());
- if (mprotect(executable_memory, compiler.m_output.size(), PROT_READ | PROT_EXEC) < 0) {
- dbgln("mprotect: {}", strerror(errno));
- return nullptr;
- }
- if constexpr (LOG_JIT_SUCCESS) {
- dbgln("\033[32;1mJIT compilation succeeded!\033[0m {}", bytecode_executable.name);
- }
- auto executable = make<NativeExecutable>(executable_memory, compiler.m_output.size(), mapping);
- if constexpr (DUMP_JIT_DISASSEMBLY)
- executable->dump_disassembly(bytecode_executable);
- return executable;
- }
- }
- #endif
|