ZL(za dZddlZddlZddlZddlZddlZddlZddlZddlm Z ddl m Z m Z ddl mZmZmZmZmZmZmZmZmZmZmZmZmZmZddlmZmZddlm Z ejBZ!ejDZ"ejFZ$ejJZ&d Z'd Z(d Z)d Z*d Z+d Z,d Z-ej\dZ/dZ0dZ1dZ2dZ3iZ4ddZ5GddZ6GddZ7Gdde8Z9dZ:ddZ;GddZ< ddZ=d Z>d!Z?d"Z@d#ZAd$ZBd%ZCd&dd'd(d)d*ZDgd+ZEGd,d-ZFGd.d/ZGdd0ZHGd1d2eGZId3eIiZJiZKd4ZLeLd5d6ZMGd7d8ZNd9ZOGd:d;eGZPGd<d=ZQd>ZRGd?d@eGZSGdAdBeSZTdddCddeUeVejjdDddEdFdG ZYddHZZdIZ[dJZ\ ddKZ]dLZ^dMZ_dNZ`dOZadPZbdQZcdRZddSZedTZfddUZg ddVZhdWZie5dXdYdZZjeUgd[ejjDcgc]}d\|z c}zZke5d]ekd^Zle5d_d`daZme5dbdcZne5dddeZoe5dfdgZpe5dhdiZqe5djdkZre5dldmZsGdndoejZue5dpdqdrZve5dsdtduZwe5dvdwdxZxe5dydzd{Zye5d|d}d~Zze5dddZ{e5ddZ|e5ddZ}e5dd`dZ~e5ddZe5dddZe5ddZejdZe5ddZe5ddZe5dddZe5dddZdZycc}w)aHandling of the new bundle2 format The goal of bundle2 is to act as an atomically packet to transmit a set of payloads in an application agnostic way. It consist in a sequence of "parts" that will be handed to and processed by the application layer. General format architecture =========================== The format is architectured as follow - magic string - stream level parameters - payload parts (any number) - end of stream marker. the Binary format ============================ All numbers are unsigned and big-endian. stream level parameters ------------------------ Binary format is as follow :params size: int32 The total number of Bytes used by the parameters :params value: arbitrary number of Bytes A blob of `params size` containing the serialized version of all stream level parameters. The blob contains a space separated list of parameters. Parameters with value are stored in the form `=`. Both name and value are urlquoted. Empty name are obviously forbidden. Name MUST start with a letter. If this first letter is lower case, the parameter is advisory and can be safely ignored. However when the first letter is capital, the parameter is mandatory and the bundling process MUST stop if he is not able to proceed it. Stream parameters use a simple textual format for two main reasons: - Stream level parameters should remain simple and we want to discourage any crazy usage. - Textual data allow easy human inspection of a bundle2 header in case of troubles. Any Applicative level options MUST go into a bundle2 part instead. Payload part ------------------------ Binary format is as follow :header size: int32 The total number of Bytes used by the part header. When the header is empty (size = 0) this is interpreted as the end of stream marker. :header: The header defines how to interpret the part. It contains two piece of data: the part type, and the part parameters. The part type is used to route an application level handler, that can interpret payload. Part parameters are passed to the application level handler. They are meant to convey information that will help the application level object to interpret the part payload. The binary format of the header is has follow :typesize: (one byte) :parttype: alphanumerical part name (restricted to [a-zA-Z0-9_:-]*) :partid: A 32bits integer (unique in the bundle) that can be used to refer to this part. :parameters: Part's parameter may have arbitrary content, the binary structure is:: :mandatory-count: 1 byte, number of mandatory parameters :advisory-count: 1 byte, number of advisory parameters :param-sizes: N couple of bytes, where N is the total number of parameters. Each couple contains (, `. `chunksize` is an int32, `chunkdata` are plain bytes (as much as `chunksize` says)` The payload part is concluded by a zero size chunk. The current implementation always produces either zero or one chunk. This is an implementation limitation that will ultimately be lifted. `chunksize` can be negative to trigger special case processing. No such processing is in place yet. Bundle processing ============================ Each part is processed in order using a "part handler". Handler are registered for a certain part type. The matching of a part to its handler is case insensitive. The case of the part type is used to know if a part is mandatory or advisory. If the Part type contains any uppercase char it is considered mandatory. When no handler is known for a Mandatory part, the process is aborted and an exception is raised. If the part is advisory and no handler is known, the part is ignored. When the process is aborted, the full bundle is still read from the stream to keep the channel usable. But none of the part read from an abort are processed. In the future, dropping the stream may become an option for channel we do not care to preserve. N)_)hexshort) bookmarks changegroupencodingerrorobsoletephasespushkeypycompat requirementsscmutil streamclonetagsurlutil) stringutilurlutil) repositorys>is>Bs>Is>BBs[^a-zA-Z0-9_:-]cR|jddr|jd|zyy)z(debug regarding output stream (bundling)devel bundle2.debugsbundle2-output: %s N configbooldebuguimessages 5usr/lib/python3.12/site-packages/mercurial/bundle2.pyoutdebugr#s( }}X/0 (7231cR|jddr|jd|zyy)z"debug on input stream (unbundling)rrsbundle2-input: %s Nrrs r"indebugr&s( }}X/0 ''121r$cDtj|r t|y)z9raise ValueError if a parttype contains invalid characterN)_parttypeforbiddensearch ValueErrorparttypes r"validateparttyper-s   *""+r$cdd|zzS)zreturn a struct format to read part parameter sizes The number parameters is variable so we need to build that format dynamically. >sBB)nbparamss r"_makefpartparamsizesr2s 58# $$r$r0c,tfd}|S)zdecorator that register a function as a bundle2 part handler eg:: @parthandler('myparttype', ('mandatory', 'param', 'handled')) def myparttypehandler(...): '''process a part of type "my part".''' ... cnj}|tvsJ|t|<t|_|SN)lowerparthandlermapping frozensetparams)func lparttyper9r,s r" _decoratorzparthandler.._decorators:NN$  2222(,9%'  r$)r-)r,r9r<s`` r" parthandlerr=sX r$c@eZdZdZdZd dZdZdZdZdZ d Z e Z y) unbundlerecordsakeep record of what happens during and unbundle New records are added using `records.add('cat', obj)`. Where 'cat' is a category of record and obj is an arbitrary object. `records['cat']` will return all entries of this category 'cat'. Iterating on the object itself will yield `('category', obj)` tuples for all entries. All iterations happens in chronological order. c.i|_g|_i|_yr5) _categories _sequences_repliesselfs r"__init__zunbundlerecords.__init__ s r$Nc|jj|gj||jj||f|"|j |j ||yy)zadd a new record of a given category. The entry can then be retrieved in the list returned by self['category'].N)rA setdefaultappendrB getrepliesadd)rEcategoryentry inreplytos r"rKzunbundlerecords.adds` ##Hb188? %01  OOI & * *8U ; !r$cJ|jj|tS)z3get the records that are replies to a specific part)rCrHr?)rEpartids r"rJzunbundlerecords.getrepliess}}''0ABBr$cLt|jj|dS)Nr0)tuplerAget)rEcats r" __getitem__zunbundlerecords.__getitem__s T%%))#r233r$c,t|jSr5)iterrBrDs r"__iter__zunbundlerecords.__iter__"DOO$$r$c,t|jSr5)lenrBrDs r"__len__zunbundlerecords.__len__%s4??##r$c,t|jSr5)boolrBrDs r" __nonzero__zunbundlerecords.__nonzero__(rYr$r5) __name__ __module__ __qualname____doc__rFrKrJrUrXr\r___bool__r0r$r"r?r?s2  <C4%$%Hr$r?c*eZdZdZ ddZdZdZy)bundleoperationaPan object that represents a single bundling process Its purpose is to carry unbundle-related objects and states. A new object should be created at the beginning of each bundle processing. The object is to be returned by the processing function. The object has very little content now it will ultimately contain: * an access to the repo the bundle is applied to, * a ui object, * a way to retrieve a transaction to add changes to the repo, * a way to record the result of processing each part, * a way to construct a bundle response when applicable. Nc||_||_|j|_t|_d|_||_i|_||_i|_ ||_ yr5) reporemoter r?recordsreply captureoutputhookargs_gettransactionmodessource)rErhtransactiongetterrlrpris r"rFzbundleoperation.__init__>sS  ''&(  * 0  r$c|j}|jr6|jj|j|j|_d|_|Sr5)rnrmupdate)rE transactions r"gettransactionzbundleoperation.gettransactionSsL**, == MM !5!5 6#'==K  r$c||jtjd|jj|y)Ns@attempted to add hookargs to operation after transaction started)rmr ProgrammingErrorrs)rErms r" addhookargszbundleoperation.addhookargsbs8 == ((7  X&r$)Tr$N)r`rarbrcrFrurxr0r$r"rfrf.s! & * 'r$rfc eZdZy)TransactionUnavailableN)r`rarbr0r$r"rzrzksr$rzct)zdefault method to get a transaction while processing a bundle Raise an exception to highlight the fact that no transaction was expected to be createdrzr0r$r"_notransactionr}os ! ""r$c ,t|tr`djd<|djvr|jd<|djvr|jd<t||fd||St |fd||}t ||||fi||S)N1bundle2ssourceurlcSr5r0trsr"zapplybundle..sRr$rpricSr5r0rsr"rzapplybundle..s2r$) isinstance unbundle20rm processbundlerf_processchangegroup)rh unbundlerrrprrikwargsops ` r" applybundlerws)Z("& J  )2;;">%+BKK " ?vR[[8"%BKK  )Zv  T:fV LB 2vsEfE r$ceZdZdZdZdZy) partiteratorcX||_||_||_d|_d|_d|_y)Nr)rhrriteratorcountcurrent)rErhrrs r"rFzpartiterator.__init__s, "   r$c>fd}|_jS)Nc3Ktjjd}|D].\}}|_|_||j d_0yw)Nr) enumerater iterpartsrrconsume)itrrprEs r"r:z$partiterator.__enter__..funcsQDNN446:Cq"    #  sAA)r)rEr:s` r" __enter__zpartiterator.__enter__s $ }}r$cH|jsyt|trd} |jr|jj |jD]}|j  d|_g}d}|j jD|j jj}|j jj}||_ ||_ |r||jjjd|jzy#t$rd}YwxYw)NFTs%bundle2-input-bundle: %i parts total )rr Exceptionrrduringunbundle2rrk salvageoutput capabilities _replycaps_bundle2salvagedoutputrhr rr)rEtypeexctb seekerrorpartsalvaged replycapss r"__exit__zpartiterator.__exit__s}}  c9 % I !<<LL((* MMDLLN*#'C HIww}}(77==668 GGMM66 &CN)1C &   5 B - !  !sAD D! D!N)r`rarbrFrrr0r$r"rrs . r$rc||t}t||||}|j|jjrdg}|jr'|j dt |jz|j|jtur|j dn|j d|j d|jjdj|t||||S)a,This function process a bundle, apply effect to/from a repo It iterates over each part then searches for and uses the proper handling code to process the part. Parts are processed in order. Unknown Mandatory part will abort the process. It is temporarily possible to provide a prebuilt bundleoperation to the function. This is used to ensure output is properly propagated in case of an error during the unbundling. This output capturing part will likely be reworked and this ability will probably go away in the process. rsbundle2-input-bundle:s %i paramss no-transactions with-transaction r$) r}rfr9r debugflagrIr[rnrjoin processparts)rhrrqrrprimsgs r"rrs( z  $ .       ww'(    JJ}s9+;+;'<< =   %););~)M JJ) * JJ+ , 5  chhsm$r9% Ir$cpt|||5}|D]}t|| dddy#1swYyxYwr5)r _processpart)rhrrpartsrs r"rrs0 dB *eD T " + * *s,5c 0|jK|jj5|jj}|j}|j|d<|j|j |||fi|}|j jdd|i|S)Ndelta_base_reuse_policy changegroupreturn)ripathcopydelta_reuse_policyapplyrhrjrK)rcgrrprr remote_pathrets r"rrs yy!;iinn ,7,J,J() "((277B 6v 6CJJNN s  Jr$cPd} tj|j}|"d}tj|jt |j d|jz|j|jz }|rPt|}|jddj|z}tj|j|d} |j jrd |jzg}|js|jd t|j}t|j|z }|s|rN|jd |r|jd |z|r|jd|z|jd|jd|z|j j!dj||S#tj$r1}|jrt |j d |zYd}~|j jrd |jzg}|js|jd t|j}t|j|z }|s|rN|jd |r|jd |z|r|jd|z|jd|jd|z|j j!dj|yyd}~wwxYw#|j jrd |jzg}|js|jd t|j}t|j|z }|s|rN|jd |r|jd |z|r|jd|z|jd|jd|z|j j!dj|wwxYw)Nsunknownsunsupported-typer+sfound a handler for part %ssunsupported-params (%s)s, )r,r9s supporteds%ignoring unsupported advisory part %ssbundle2-input-part: "%s" (advisory) (params: %i mandatory %i advisory)s %s r$)r7rSrr BundleUnknownFeatureErrorr&r mandatorykeysr9listsortr mandatoryrrIr[r) rrstatushandler unknownparamsrrnbmpnbaps r" _gethandlerrsJ F#'$((3 ?(F11499E E5 AB**W^^;  /M    /%**]2KKF11=  55??.:;C>> >*t))*Dt{{#d*Dt <(JJ/$67JJ56 4 JJx&( ) EEKK & N-  * * >> ?#EF 55??.:;C>> >*t))*Dt{{#d*Dt <(JJ/$67JJ56 4 JJx&( ) EEKK &   55??.:;C>> >*t))*Dt{{#d*Dt <(JJ/$67JJ56 4 JJx&( ) EEKK & s+CGL.&LL"LL""DP%cjt||}|yd}|jr+|j|jj ddd} |||||jj }|rP|jj d|d}|jdtj|jd yy#||jj }|rP|jj d|d}|jdtj|jd wwxYw) zprocess a single part from a bundle The part is guaranteed to have been fully consumed when the function exits (even if an exception is raised).NT)r subprocr$outputFdatar in-reply-tor) rrlrkr pushbuffer popbuffernewpartaddparamrbytestrid)rrroutputoutparts r"rr@s$ "d#G F BHH0 tT2 D  UU__&F hh&&yv&OG    0 0 9U     UU__&F hh&&yv&OG    0 0 9U   s CA0D2ci}|jD]p}|sd|vr|d}}n&|jdd\}}|jd}tj|}|Dcgc]}tj|}}|||<r|Scc}w)zdecode a bundle2 caps bytes blob into a dictionary The blob is a list of capabilities (one per line) Capabilities may have values using a line of the form:: capability=value1,value2,value3 The values are always a list.=r0r,) splitlinesspliturlrequnquote)blobcapslinekeyvalsvs r" decodecapsr]s D!  t bC 4+IC::d#DnnS!+/04aq!40S " K1s!Bcg}t|D]g}||}tj|}|Dcgc]}tj|}}|rd|dj|fz}|j |idj|Scc}w)z2encode a bundle2 caps dictionary into a bytes blob%s=%srr)sortedrquoterrI)rchunkscarrs r" encodecapsrus FTlBx \\" )-.A Q. R411B b  ::f  /sB )r$UN)HG10UNr)HG10sBZ)HG10GZsGZ)r$HG20rHG10BZr)rrrc`eZdZdZdZddZddZedZddZ dZ d Z d Z d Z d Zd Zy)bundle20zrepresent an outgoing bundle2 container Use the `addparam` method to add stream level parameter. and `newpart` to populate it. Then call `getchunks` to retrieve all the binary chunks of data that compose the bundle2 container.rc||_g|_g|_t||_t j jd|_d|_ d|_ y)NrT) r _params_partsdictrr compengines forbundletype _compengine _compoptsprefercompressed)rEr rs r"rFzbundle20.__init__sN   .++99%@!%r$Nc|dvrytd|jDrJ|jd|tjj ||_||_y)z$setup core part compression to )NrNc3HK|]\}}|jdk(yw) compressionN)r6).0nrs r" z*bundle20.setcompression..s L|tq!qwwyN2|s "s Compression)anyrrrrrrr)rEalgcompoptss r"setcompressionzbundle20.setcompressionsS -  Lt||LLLL nc*++99#>!r$c,t|jS)z*total number of parts added to the bundler)r[rrDs r"nbpartszbundle20.nbpartss4;;r$c|stjd|ddtjtj vrtjd|z|j j||fy)zadd a stream level parametersempty parameter namerrsnon letter first character: %sN)r rwrrstring ascii_lettersrrI)rEnamevalues r"rzbundle20.addparamsp(()@A A !9H,,    ((1D8  T5M*r$c|jJt|j|_|jj|y)z_add a new part to the bundle2 container Parts contains the actual applicative payload.N)rr[rrI)rErs r"addpartzbundle20.addparts4wwdkk" 4 r$cFt|g|i|}|j||S)aqcreate a new part and add it to the containers As the part is directly added to the containers. For now, this means that any failure to properly initialize the part after calling ``newpart`` should result in a failure of the whole bundling process. You can still fall back to manually create and add if you need better control.) bundlepartr)rEtypeidargsrrs r"rzbundle20.newparts)&24262 T r$c#K|jjrd|jzg}|jr'|j dt |jz|j dt |j z|jjdj|t|jd|jz|j|j}t|jd|zttt ||r||jj|j|j D]}|yw)Nsbundle2-output-bundle: "%s",s (%i params)s %i parts total r$sstart emission of %s streamsbundle parameter: %s)r r _magicstringrrIr[rrrr# _paramchunk_pack_fstreamparamsizercompressstream _getcorechunkr)rErparamchunks r" getchunkszbundle20.getchunkss 77  2T5F5FFGC|| ?S->>? JJ+c$++.>> ? GGMM#((3- (84;L;LLM  "1E9:%s5z22 K%%44    $.. EK sE$E&cg}|jD]I\}}tj|}|tj|}d||fz}|j|Kdj |S)z1return a encoded version of all stream parametersr )rrrrIr)rEblocksparrs r"r zbundle20._paramchunksf,,JC,,s#C  U+#u- MM#  ' yy  r$c#:Kt|jd|jD]J}t|jd|jz|j |jD]}|Lt|jdt t dyw)zUyield chunk for the core part of the bundle (all but headers and parameters)sstart of partssbundle part: "%s"r s end of bundlerN)r#r rrr'r!_fpartheadersize)rErr&s r"r$zbundle20._getcorechunksz +,KKD TWW2TYY> ?4773 4  *+$a((sBBcg}|jD]=}|jjds|j|j ?|S)zreturn a list with a copy of all output parts in the bundle This is meant to be used during error handling to make sure we preserve server outputr)rr startswithrIr)rErrs r"rzbundle20.salvageoutputsB KKDyy##I. , r$r0r5)r`rarbrcrrFrpropertyrrrrr'r r$rr0r$r"rrsO0 L %"  +! & ! ) r$rc"eZdZdZdZdZdZy) unpackermixinz6A mixin to extract bytes and struct data from a streamc||_yr5)_fp)rEfps r"rFzunpackermixin.__init__s r$cb|jtj|}t||S)aunpack this struct format from the stream This method is meant for internal usage by the bundle2 protocol only. They directly manipulate the low level stream including bundle2 level instruction. Do not use it to implement higher-level logic or methods.) _readexactstructcalcsize_unpackrEformatrs r"r<zunpackermixin._unpacks(vv67vt$$r$cBtj|j|S)aread exactly bytes from the stream This method is meant for internal usage by the bundle2 protocol only. They directly manipulate the low level stream including bundle2 level instruction. Do not use it to implement higher-level logic or methods.)r readexactlyr6)rEsizes r"r9zunpackermixin._readexacts&&txx66r$N)r`rarbrcrFr<r9r0r$r"r4r4 s@ %7r$r4c\|tj|d}|dd|dd}}|dk7r4|jd||fztjt dt j|}|!tjt d|z|||}t|d|z|S) z7return a valid unbundler object for a given magicstringrsHGs6error: invalid magic: %r (version %r), should be 'HG' snot a Mercurial bundlesunknown bundle version %ssstart processing of %s stream) rr@rr Abortr formatmaprSr&)r r7 magicstringmagicversionunbundlerclassrs r" getunbundlerrK(s!--b!4  1%{1Q'77E ~  Fg  kk!5677]]7+Nkk!89GCDDr2&I B0;>? r$cveZdZdZdZfdZejdZdZ dZ dZ d dZ d Z d Zd ZxZS) rz|interpret a bundle2 stream This class is fed with a binary stream and yields parts through its `iterparts` methods.rc||_tjjd|_d|_t t|#|y)z\\"34Q7 >((1J>  __Z0F++F3F r$c>tj}|jdD]o}|jdd}|Dcgc]}tj |}}t |dkr|j d|j||d||d<q|Scc}w) r)rrrDNr)rsortdictrrrr[rI _processparam)rE paramsblockr9ris r"rUzunbundle20._processallparamsYs""4(Aa A,-.Aq"AA.1vz D   "Q4F1Q4L ) /sBcr|s td|ddtjtjvrtd|z t |j }||||y#t$rF|ddjrt|jd|zYytj|fwxYw)aprocess a parameter, applying its effect if needed Parameter starting with a lower case letter are advisory and will be ignored when unknown. Those starting with an upper case letter are mandatory and will this function will raise a KeyError when unknown. Note: no option are currently supported. Any input will be either ignored or failing. zempty parameter namerrznon letter first character: %ssignoring unknown parameter %s)r9N) r*rrrrb2streamparamsmapr6KeyErrorislowerr&r r r)rErrrs r"rZzunbundle20._processparames34 4 !9H,,    =DE E '' 5G D$ &  FAay  "!AD!HI55dWEE  FsA''5B6B6c#K|jdt|vsJ|jtd}|dkrt j d|z|r|j |}|j|g}|jdD]<}|jdd\}}|jdk7s,|j|>dj|}ttt||ntt||jj|j |_d}|dkrt"t$k(sJ|jt"d}tt"||rd}n|dz }I|t&k(rS|dkrt j d |j ||dkry y w) aWutility to transfer a bundle2 as binary This is made necessary by the fact the 'getbundle' command over 'ssh' have no way to know then the reply end, relying on the bundle to be interpreted to know its end. This is terrible and we are sorry, but we needed to move forward to get general delta enabled. r9rrSr)rrr rDsnegative chunk size: %iN)rvarsr<r"r rTr9rUrr6rIrr!r[rdecompressorreaderr6r. _fpayloadsize flaginterrupt) rErVr9 outparamsrkr emptycountrAs r"_forwardchunkszunbundle20._forwardchunksstDz)))\\"34Q7 >((1J>  __Z0F  " "6 *I\\$'wwtQ'1779.$$Q'( ),I)3y>: :O):6 6##66txx@ 1n#}4 44<< 01!4D($/ / a }$,,-GHH//$' '1nsB5G8DGGc#K|rtnt}|j|jj |j |_t |jd|j}|E||j||j }||j|j}|Et |jdyw)z'yield all parts contained in the streams!start extraction of bundle2 partsNsend of bundle2 stream) seekableunbundlepart unbundlepartr9rrcr6r&r _readpartheaderr)rEseekablecls headerblockrs r"rzunbundle20.iterpartss&."L ##66txx@=>**, %tww TXX6DJ LLN..0K% 12s B1C 4C c|jtd}|dkrtjd|zt |j d|z|r|j |Sy)Qreads a part header size and return the bytes blob returns None if emptyrnegative part header size: %ispart header size: %iNr<r.r rTr&r r9rE headersizes r"rmzunbundle20._readpartheaderse\\"23A6 >((0:=  0:=> ??:. .r$c2|j|jSr5)r9rNrDs r" compressedzunbundle20.compresseds r$cxtj|jdr|jjSy)zclose underlying filecloseN)r safehasattrr6rzrDs r"rzzunbundle20.closes,   DHHg .88>># # /r$)F)r`rarbrcrrFr propertycacher9rUrZrirrmrxrz __classcell__rQs@r"rr;sR L-    '4/(b3&  $r$rs20cfd}|S)z/register a handler for a stream level parameterc.tvsJ|t<|Sr5)rFr^)r:rs r" decoratorz'b2streamparamhandler..decorators!9$$$"&$ r$r0)rrs` r"b2streamparamhandlerrs r$r c|tjjvrtj|f|ftjj ||_|d|_yy)z)rQrar`rrr)rEros r"__repr__zbundlepart.__repr__ sR22DNN4K4KLC  tH GG II NN G   r$ctj|jdrJ|j|j|j |j |j|jS)zreturn a copy of the part The new part have the very same content but no partid assigned yet. Parts with generated data cannot be copied.next) rr{rrQrrrrrrDs r"rzbundlepart.copy*sV ##DIIv666~~ II  ! !  JJ NN   r$c|jSr5)rrDs r"rzbundlepart.data9s zzr$cT|jtjd||_y)Npart is being generated)rr ReadOnlyPartErrorr)rErs r"rzbundlepart.data=s% ?? &))*DE E r$c,t|jSr5)rRrrDs r"rzbundlepart.mandatoryparamsCsT**++r$c,t|jSr5)rRrrDs r"rzbundlepart.advisoryparamsHsT))**r$c|jtjd||jvrt d|z|jj ||j }|r |j}|j||fy)zadd a parameter to the part If 'mandatory' is set to True, the remote handler must claim support for this parameter or the unbundling will be aborted. The 'name' and 'value' cannot exceed 255 bytes each. Nrr) rr rrr*rKrrrI)rErrrr9s r"rzbundlepart.addparamMs| ?? &))*DE E 4## #5<= = T"%% **F tUm$r$c # K|jtjdd|_|jrqd|jzg}|j s|j dt|j}t|j}|s|rN|j d|r|j d|z|r|j d|z|j d|js|j d nytj|jd s tj|jd r|j d n'|j d t|jz|j d|jdj||j r|jj}n|jj!}t#|dt%j&|j(|fzt+t,t||t+t.|j(g}|j}|j}|j t+t0t|t|g} |D]9\} } | j t| | j t| ;|D]9\} } | j t| | j t| ;t+t3t| dzg| } |j | |D]'\} } |j | |j | )|D]'\} } |j | |j | ) dj|} t#|dt| zt+t6t| |  |j9D]9}t#|dt|zt+t:t||; t#|dt+t:dd|_y#t4$rt5d|zwxYw#t<$r|jdt>$r}tAjB|}|jd|ztEjFd}d|z}tIdd|fgd}d|_t+t:d|jK|D]}|t#|dt+t:dt%jL||Yd}~(d}~wwxYww) Nspart can only be consumed onceFsbundle2-output-part: "%s"rrrrrs empty payloadrs__next__s streamed payloads %i bytes payloadrr$s part %s: "%s"rDz8Found a non-bytes trying to build bundle part header: %rsheader chunk size: %ipayload chunk size: %isbundle2-generatorexit s5bundle2-input-stream-interrupt: encoding exception %ssunexpected error: %s error:abortmessagerrr-sclosing payload chunkT)'rr rwrrrrIr[rrrrr{rrupperr6r#rrrr!_fparttypesize_fpartid_fpartparamcountr2 TypeErrorr._payloadchunksrd GeneratorExit BaseExceptionr forcebytestrsysexc_inforr' raisewithtb)rEr rrrr,headermanparadvparparsizesrr paramsizes headerchunkr&rbexcr interparts r"r'zbundlepart.getchunks`s| ?? &(()JK K <</$));> >*t++,Dt**+Dt <(JJ/$67JJ56 4 99 ,-!!$))V48H8H ;9 /0 /#dii.@A JJu  HHSXXc] # >>yy(Hyy(H%)9)9$'')BH(MMN .#h- 0  (DGG $ %%$$ e,c&k3v;GH JC OOCH % OOCJ '!!JC OOCH % OOCJ '!/H 0BCOhO  j! JC MM#  MM% !!JC MM#  MM% ! ((6*K -K0@@A$c+&677 *,,.6UCDM3u:66 /< -.M1%%U /178    HH/ 0  ***3/D HHH4O "B)D0C"*c!2 3uIIL r* *",,,3 4 R1 2 q) )  b ) )% *sJNU%Q07U%(A Q64'U%Q33U%6#U"B>UU%U""U%c#|Ktj|jds tj|jdrTtj|j}|j t }|r||j t }|ryyt |jr|jyyw)zmyield chunks of a the part payload Exists to handle the different methods to provide data to a part.r__next__N)rr{r chunkbufferreadpreferedchunksizer[)rEbuffr&s r"rzbundlepart._payloadchunkss   DIIv .$2B2B IIz3 ##DII.DII/0E  "34^))Os BB<'B<N)r0r0r$T)r$T)r`rarbrcrFrrr2rsetterrrrr'rr0r$r"rrs $  #6    [[ ,,++%&l\r$rrc.eZdZdZfdZdZdZxZS)interrupthandlerzread one part and process it with restricted capability This allows to transmit exception raised on the producer size during part iteration while the consumer is reading a part. Part processed in this manner only have access to a ui object,c:tt| |||_yr5)rOrrFr rPs r"rFzinterrupthandler.__init__s .r2r$c|jtd}|dkrtjd|zt |j d|z|r|j |Sy)rrrrsspart header size: %i Nrtrus r"rmz interrupthandler._readpartheaderse\\"23A6 >((0:=  2Z?@ ??:. .r$c|jjdt|jd|j}|t|jdyt |j||j }t |j}d} t|| |s|j |jjdy#ttf$rd}wxYw#|s|jwwxYw)Ns<bundle2-input-stream-interrupt: opening out of band context s0bundle2 stream interruption, looking for a part.s"no part found during interruption.FTs<bundle2-input-stream-interrupt: closing out of band context ) r rr&rmrlr6interruptoperationr SystemExitKeyboardInterruptr)rErprr hardaborts r"__call__zinterrupthandler.__call__s  L  LM**,   DGGB C DGG[$((;  (   T "    L -. I   s CC##C&&C;)r`rarbrcrFrmrr}r~s@r"rrsF  r$rc,eZdZdZdZedZdZy)rzpA limited operation to be use by part handler during interruption It only have access to an ui object. c.||_d|_d|_y)NF)r rkrl)rEr s r"rFzinterruptoperation.__init__s "r$c,tjdNs'no repo access from stream interruption)r rwrDs r"rhzinterruptoperation.repo"s$$%OPPr$ctdrr|rDs r"ruz!interruptoperation.gettransaction&s$%OPPr$N)r`rarbrcrFr2rhrur0r$r"rrs( # QQQr$rc#K|jdd}|j}tjt}|j }|j }tj}|j}||||d} t|d| z| r| dk\rG|| } t| | kr,tjtdt| | fz| n3| tk(rt!||ntj"d| z||} t| |kr,tjtdt| | fz|| d} |r |d| z| ryyw) zReads bundle2 part payload data into chunks. Part payload data consists of framed chunks. This function takes a file handle and emits those chunks. rrrrs6stream ended unexpectedly (got %d bytes, expected %d)snegative payload chunk size: %ss&bundle2-input: payload chunk size: %i N)rrr:StructrdrAunpackrr@rr&r[r rErrerrT) r fhdologr headerstructrvrr@r chunksizess r"decodepayloadchunksr*sy MM($4 5E HHE==/L""J  F))K 77D{2z23A6I B)I56  >YA1v !kk81vy) *G - ' % R $ &((2Y>    q6J ++KLq69%&  1IaL    byte from the header)rr)rErAoffsetrs r" _fromheaderzunbundlepart._fromheader{s4##&4-9#d] r$cb|jtj|}t||S)zaread given format from header This automatically compute the size of the format to read.)rr:r;r<r=s r" _unpackheaderzunbundlepart._unpackheaders* 78vt$$r$ct||_t||_tj|j|_|j j |jtd|D|_y)z7internal function to setup all logic related parametersc3&K|] }|d yw)rNr0)r rs r"r z+unbundlepart._initparams..s&E_qt_N) rRrrrrYr9rsr8r)rErrs r" _initparamszunbundlepart._initparamss_ %_5#N3mmD$8$89  4../&&E_&EEr$c T|jtd}|j||_t |j d|jz|jt d|_t |j dtj|jz|j|jjk7|_ |jj|_|jt\}}t |j d||zzt||z}|j|}tt|ddd|ddd}|d|}||d}g}|D]6\} } |j!|j| |j| f8g} |D]6\} } | j!|j| |j| f8|j#|| t%j&|j)|_d|_y) z$read the header and setup the objectrspart type: "%s"s part id: "%s"spart parameters: %iNrDrT)rrrrr&r rrrrr6rrr2rziprIrrrr_payloadstreamr) rEtypesizemancountadvcount fparamsizesrmansizesadvsizes manparamsrr advparamss r"rzunbundlepart._readheaders%%n5a8$$X. +dii78$$X.q1)H,<,? '' 4 #j1oz!$Q$/?@A ix(hi( "JC   d..s3T5E5Ee5LM N# "JC   d..s3T5E5Ee5LM N# I."..t/B/B/DE r$cBt|j|jS)z+Generator of decoded chunks in the payload.)rr r6rDs r"rzunbundlepart._payloadchunkss"477DHH55r$c|jry|jd}|r3|xjt|z c_|jd}|r2yy)zRead the part payload until completion. By consuming the part data, the underlying stream read offset will be advanced to the next part (or end of stream). Nr)rrrr[)rEr&s r"rzunbundlepart.consumesD ==  %  IIU #IIIe$Er$c|js|j||jj}n|jj|}|xjt |z c_|t ||krG|j s4|jr(|jjd|jzd|_|S)zread payload datas*bundle2-input-part: total payload size %i T) rrrrrr[rr r)rErArs r"rzunbundlepart.reads      <&&++-D&&++D1D SY <3t9t+==TYY BTYYN!DM r$r5) r`rarbrcrFrrrrrrrr}r~s@r"rlrlbs0*,%F!!F6 %r$rlcbeZdZdZfdZd dZdZdZejfdZ d dZ dZ xZ S) rkaA bundle2 part in a bundle that is seekable. Regular ``unbundlepart`` instances can only be read once. This class extends ``unbundlepart`` to enable bi-directional seeking within the part. Bundle2 part data consists of framed chunks. Offsets when seeking refer to the decoded data, not the offsets in the underlying bundle2 stream. To facilitate quickly seeking within the decoded data, instances of this class maintain a mapping between offsets in the underlying stream and the decoded payload. This mapping will consume memory in proportion to the number of chunks within the payload (which almost certainly increases in proportion with the size of the part). c>g|_tt||||yr5) _chunkindexrOrkrFrs r"rFzseekableunbundlepart.__init__s "D22vrBr$c#TKt|jdk(r8|dk(sJd|jjd|jfnC|t|jks Jd|z|j |j|d|j|d}t |j |jD]\}|dz }|t|z }|t|jk(r+|jj||jf|^yw)z/seek to specified chunk and start yielding datarsMust start with chunk 0sUnknown chunk %drN)r[rrI_tellfp_seekfprr r6)rEchunknumposr&s r"rz#seekableunbundlepart._payloadchunkss  t A %q= <"< <=    # #Q $7 8c$"2"233 #h. 3 LL))(3A6 7x(+($((;E MH 3u: C3t//00  ''dlln(=>K for a given payload position, return a chunk number and offsetrrs Unknown chunk)rrr*)rErr&pposfposs r" _findchunkzseekableunbundlepart._findchunksm#,T-=-=#> E"&"2"243F3Fu3M"ND YY~.F6{n,kk!$4"566DI r$cz|jr|jj||Stt d)amove the underlying file pointer This method is meant for internal usage by the bundle2 protocol only. They directly manipulate the low level stream including bundle2 level instruction. Do not use it to implement higher-level logic or methods.sFile pointer is not seekable)rr6rNotImplementedErrorr)rErrs r"rzseekableunbundlepart._seekfp3s1 >>88==0 0%a(G&HI Ir$c|jr |jjSy#t$r0}|jtj k(rd|_nYd}~yd}~wwxYw)a,return the file offset, or None if file is not seekable This method is meant for internal usage by the bundle2 protocol only. They directly manipulate the low level stream including bundle2 level instruction. Do not use it to implement higher-level logic or methods.FN)rr6rIOErrorerrnoESPIPE)rEes r"rzseekableunbundlepart._tellfp@s[ >> xx}}&   77ell*%*DN#  s) A"&AA")r)r`rarbrcrFrrrr r rrrr}r~s@r"rkrks7"C *+#%++@ Jr$rk)sabortsunsupportedcontents pushracedpushkey)shttpshttps)sheads)v2) r bookmarksserrorlistkeysrdigestsremote-changegroup hgtagsfnodesphasesstreamc|dvrtjdtj}t t t j||d<tj|tjr%t dtjD}||d<|rd|d<|jjdd }|d k(rd |d <d |jjddvr|jd |dk(rO|jj!ddd}|jj!dd}|r|s|jd|jj!ddrd|vr |dxxdz cc<|S)a_return the bundle2 capabilities for a given repo Exists to allow extensions (like evolution) to mutate the capabilities. The returned value is used for servers advertising their capabilities as well as clients advertising their capabilities to servers as part of bundle2 requests. The ``role`` argument specifies which is which. )clientservers&role argument must be client or serverrc3&K|] }d|z yw)sV%iNr0)r rs r"r zgetrepocaps..tsE4Dq 4Dr obsmarkersr0spushbackr$sconcurrent-push-modes check-related)srelateds checkheadsr rslegacy.exchanges uncompressedT) untrustedsbundle2.streamr! experimentals stream-v3)v3-exp)r rwrrrRrrsupportedincomingversionsr isenabled exchangeoptformatsr config configlistpopr)rh allowpushbackrolersupportedformatcpmodestreamsupportedfeaturesupporteds r" getrepocapsr7csk ))$$%NOO    D {44T:;D$ 4 45EH4D4DEE-][ WW^^I'> ?F !!+]DGG&&x1CDD  y'',, $-  77--i9JK&6 HHY  ww/<8   O| +O Kr$c|jd}|s|dk7riStj|jd}t|S)z0return the bundle capabilities of a peer as dictrr$)capablerrr)rirawcapsblobs r" bundle2capsr<s@ .. $C 3#: ~~fnnZ89H h r$c|jdd}|Dcgc]"}|jdst|dd$c}Scc}w)zIextract the list of supported obsmarkers versions from a bundle2caps dictr&r0VrN)rSr0int)robscapscs r"obsmarkersversionrBs?hh}b)G ' >11<<+=C!"J >> >s AAc |jdr*tj||d|} t|| ||||| S|jdst j d|z|j d|j} | rC| sAt|j d|j} d}|| z}t j |i}|jdd rd |d <|jd rd g|d<n|jdrdg|d<t||}|j|| t|||||||j}tj||||S)Nr01)vfs compressionrrsunknown bundle type: %ss%ln and _internal()z3backup bundle would contains %d internal changesets obsolescenceF)sV1r&streamv2rr! streamv3-expr)rE)r0rmakechangegroup writebundler rwrevs ancestorsofr[missingrSrr_addpartsfromoptsr' writechunks)r rhrpfilename bundletypeoutgoingoptsrErFrallow_internalrbundled_internalrrrbundle chunkiters r"writenewbundlerZsiW%  ( (x G    #   " "7 +$$%?*%LMMyy!79M9MNDII4h6F6FGHC u $$S)) D xx'&] xx  'Y / "$+Y b$ F +x0b$$?  "I  " "2y( DDr$c2|jddr(|jd}|tj|}tj||||}|j d|j }|j d|jd|jvr$|j dd|jdzd |jd rhtj} |jD]} t| || j} !| tjkDr|j d d| zd tj|j vrj d d|jdd rt#||d|jdd rt#||d|jddr t%||||jddr t'||||jdd rC|j(j+|j,} t/|| |jdd |jd d rItj0||j,} tj2| } |j d| yy)NrTs cg.versionrversionclcount nbchanges%dFrr  targetphase exp-sidedatarrH)streamrIstagsfnodescachesrevbranchcacherGsobsolescence-mandatory phase-heads)rSr safeversionrKrr'rrIextrasr draftrNmaxphaserREPO_FEATURE_SIDE_DATAfeaturesaddpartbundlestream2addparttagsfnodescacheaddpartrevbranchcacheobsstorerelevantmarkersrObuildobsmarkerspartsubsetphaseheads binaryencode)r rhbundlerrprTrU cgversionrr target_phasehead obsmarkers headsbyphase phasedatas r"rPrPs1 xx%HH]+  #//5I  ( (xF K~BLLNC j"**-  " MMebii &;;u   88I !<?r$cX |j}|jj}tjd |j D]<}|j |j|\}} ||j|> fd}|jd|dy)Nc*ttfSr5)rr0r$r"rz'addpartrevbranchcache../s CE35>r$c3@KtjD]}\}\}}tj|}tj t |t |t ||t|D]}|t|D]}|ywr5)ritemsr fromlocal rbcstructpackr[)branchnodesclosed utf8branchr  branchesdatas r"generatez'addpartrevbranchcache..generate4s'-l.@.@.B'C #FOUF!++F3J..Z#e*c&kJ J E]#F^$ (DsBBcache:rev-branch-cacheFr) revbranchcacher~ changelog collections defaultdictrO branchinforevrKr) rhrtrTrclrrrzrrs @r"rnrn*s    !E   $ $B**+ABL  ((6 VU#''-! OO-HJ%OPr$c|Dcgc] }|dk7s | }}tjdjt|Scc}w)Nssharedr)rrrr)rreqs r"_formatrequirementsspecrAs@#/D.Qs  )FAH  Q )Fs!)_wanted_sidedatarr)rhwanteds r"format_remote_wanted_sidedatarLs?F  )/0E0E)F   Mr$c:|jd}t|S)Nexp-wanted-sidedata)r9read_wanted_sidedata)risidedata_categoriess r"read_remote_wanted_sidedatarWs ..)?@  3 44r$cN|rt|jdStS)Nr)rr) formatteds r"rr\s 9??4()) 5Lr$c |jddsytj|s-td}td}t j ||d|j vr-td}td}t j ||t|j d}tt|d jdg}||z}|s[td }d jt|}d jt|} ||| fz}t j |t|} d|_ |jd } |jd } |jjdd} | s| r | st j tdd}|jrOt!|j }|st j td|jj"|vrd}| dk(rtj$|| | |\}}}tj&|}t)|}|j+d|}|j-dd|zd|j-dd|zd|j-d|dy| dk(r`tj.|| | |}tj&|}t)|}|j+d|}|j-d|dyy)NrcFs<stream data requested but server does not allow this featuresthe client seems buggyhintr!sOstream data requested but supported streaming clone versions were not specifiedr#)r2s3no common supported version with the client: %s; %sr includepats excludepatsr(sserver.stream-narrow-cloness,server does not support narrow stream clonessPserver has obsolescence markers, but client cannot receive them via stream cloneTrstream2r\ bytecountr`r filecount requirementsr) stream3-exp)rSrallowservergenerationrr rErrr7rrrhrr rrorB_version generatev2streamed_requirementsrrr generatev3)rtrhrrrclient_supportedserver_supportedcommon_supported str_server str_clientrIrr narrowstreamincludeobsmarkersremoteversions filecount bytecountitrrs r"rlrlbs ::h &  , ,T 2OP*+kk#D)) -- - ^ *+kk#D))7// :;;t)<@@BOP'*:: FGYYv&678 YYv&678  J''kk#"#G %G**]+K**]+K77%%7L {Lkk!KLMM }}*7+?+?@++<  ]] # #~ 5 $ %#.#9#9 +{,=$  9b#88> .|< z3 lEI$5 F lEI$5 F o|t D I   # # +{,= #88> .|< ~B7 o|t D r$c|syt|j}tj|}| t dtj |d|}|j d||S)zadd an obsmarker part to the bundler with No part is created if markers is empty. Raises ValueError if the bundler doesn't support any known obsmarker format. Ns0bundler does not support common obsmarker formatT)rIr&r)rBrr commonversionr* encodemarkersr)rtmarkersrrrIrcs r"rqrqsd &w';';.chunkiters/L#222<<>8L Ms/2rJ)rrrr'rrIrfr rEr bundletypesrrrrrrQ) r rrRrSrErFrrXrrYcomprrs ` ` @@r"rLrLsCW"k84~~n2<<>~B j"**-  " MMebii &;;u  $$& """ :: ++CD  #:.  t''<< <++a FG$NO O%%33D9   K   " "2y( DDr$c|jdDcgc]}|jdd}}d}d}|D]'}|dk(rd}n|dkr ||dzz }|dkDs ||dz z })|dkDrd|z}|S|dkrd|z}|Scc}w)z:logic to combine 0 or more addchangegroup results into onerrrrr)rjrS)rrresults changedheadsresultrs r"combinechangegroupresultsrs,.JJ~,FG,FqquuY",FGGL F !8F  8 C!G #L 1W C!G #La\! M  l" M!HsA5r)r]r_rbr treemanifestrac8ddlm}|j}|jj dd}t j ||d}d}d|jvr$t|jj d}d|jvrtj|jst|jjdk7rtjtd |jj j#t j$|j'|jj(|jj |jj*|jj,_tj0|ji}|jj d }|t||d <|jj d } t3| |d <t5||||j6dfd|i|} |j8e|j8j;dd} | j=dt?j@|jBd| j=dd| zd|jErJy)z$apply a changegroup part on the repor) localrepor]rDNr_rrs[bundle contains tree manifests, but local repo is non-empty and does not use tree manifestsra targetphaserrr expectedtotalreply:changegroupFrrr%i)#rrur9rSrrKr?ristreemanifestrhr[rr rErrrKTREEMANIFEST_REQUIREMENTresolvestorevfsoptionsr rksvfsoptionswritereporequirementsrrrprkrrrrrr) rinpartrrunpackerversionr nbchangesets extrakwargsrremote_sidedatarrs r"handlechangegrouprs,   Bmm'' E:O  ! !/64 @BLv}}$6==,,\:; &--'0F0Frww0O rww  !Q &++A    !F!FG(?? GGJJ,,bgg.>.>   %%bgg.K--##N3K%(%5 M"mm''(>?O)=o)NK%&        #    C xxxx 4F H,,VYY75   i >{{} }r$)rsizer digest:%src |jd}t j |}|jtdvr+tjt d|jz t|jd}i}|jjddjD]}d |z} |j|}|||<tjt j|j |||} |j#} d d lm} | j)|j*j | |} t-| t.j0s4tjt d t j2|zt5|| | |j6d } |j8c|j8j;d}|j=dt?j@|jBd|j=dd| zd | jE|jIrJy#t$r"tjt ddzwxYw#t$r"tjt ddzt$r"tjt ddzwxYw#t$r"tjt d|zwxYw#tj$rE}tjt dt j2||jFfzd}~wwxYw)aapply a bundle10 on the repo, given an url and validation information All the information about the remote bundle to import are given as parameters. The parameters include: - url: the url to the bundle10. - size: the bundle10 file size. It is used to validate what was retrieved by the client matches the server knowledge about the bundle. - digests: a space separated list of the digest types provided as parameters. - digest:: the hexadecimal representation of the digest with that name. Like the size, it is used to validate what was retrieved by the client matches what the server knows about the bundle. When multiple digest types are given, all of them are checked. rs&remote-changegroup: missing "%s" paramrs+remote-changegroup does not support %s urlsrs0remote-changegroup: invalid value for param "%s"rr$rr)exchanges%s: not a bundle version 1.0rNrrFrrrsbundle at %s is corrupted: %s)%r9r_r rErrrschemerr?r*rSrr digestcheckeropenr rurr readbundlerhrr cg1unpacker hidepasswordrrprkrrrrrvalidater!r)rrraw_url parsed_urlrAdigeststypr%r real_partrrrrrrs r"handleremotechangegrouprLs"Q--'W%J -B CCkk < =    6==)*G}}  S1779s" MM%(E  :""388BEE7#;T7KI   B   RWWZZG   {{} }s Qkk!EFOPPQ  kk A BW L    kk 7 87 B    ++;Is#3W=r$scheck:bookmarkscbtj|j|}d}d}d}|D]\}}|jjj |}||k7s1|||t |fz} n-|||t |fz} n||t |t |fz} t j| y)zcheck location of bookmarks This part is to be used to detect push race regarding bookmark, it contains binary encoded (bookmark, node) tuple. If the local state does not marks the one in the part, a PushRaced exception is raised s]remote repository changed while pushing - please try again (bookmark "%s" move from %s to %s)sbremote repository changed while pushing - please try again (bookmark "%s" is missing, expected %s)sfremote repository changed while pushing - please try again (bookmark "%s" set on %s, expected missing)N)r binarydecoderh _bookmarksrSrr PushRaced) rrbookdata msgstandard msgmissingmsgexistbookr currentnodefinalmsgs r"handlecheckbookmarksrs%%bggv6H .  3  7  dgg((,,T2 $ |#tU;-?&@@$%uT{(;;&$K+&* //(+ +r$s check:headsc|jd}g}t|dk(r1|j||jd}t|dk(r1|rJ|jj ddr|j t |t |jjk7rtjdy)zcheck that head of the repo did not change This is used to detect a push race when using unbundle. This replaces the "heads" argument of unbundle.r(bundle2lazylocking:remote repository changed while pushing - please try againN) rr[rIr rrurrhheadsr r)rrhr s r"handlecheckheadsrs  BA E a&B, Q KKO a&B,L5 uu)>?  e}rww}}//oo I  0r$scheck:updated-headsc|jd}g}t|dk(r1|j||jd}t|dk(r1|rJ|jj ddr|j t }|jjjD]}|j||D]}||vstjdy)aNcheck for race on the heads touched by a push This is similar to 'check:heads' but focus on the heads actually updated during the push. If other activities happen on unrelated heads, it is ignored. This allow server with high traffic to avoid push contention as long as unrelated parts of the graph are involved.r r(r r N) rr[rIr rrurrh branchmap iterheadsrsr r)rrr r  currentheadslss r"handlecheckupdatedheadsrs  BA E a&B, Q KKO a&B,L5 uu)>? 5Lgg!++-B. L //$ r$s check:phasesctj|}|jj}|j}|j }d}|j D]z\}}|D]p} |j||j| } | |k7s*|t| tj| tj|fz} tj| |y)zjcheck that phase boundaries of the repository did not change This is used to detect a push race. sQremote repository changed while pushing - please try again (%s is %s expected %s)N) r rrhr~r _phasecacherrirr phasenamesr r) rr phasetonodesunfir phasecacher expectedphaserr  actualphasers r"handlecheckphasesrs &&v.L 77   D B!!J "!- 2 2 4 uA$**4;Km+!H%%k2%%m4" ooh//!5r$rc|jjD])}|jjt d|z+y)z3forward output captured on the server to the clients remote: %s N)rrr rr)rrrs r" handleoutputr s7 ((*  Q'$./+r$s replycapsct|j}|jt|j||_yy)zqNotify that a reply bundle should be created The payload contains the capabilities information for the replyN)rrrkrr )rrrs r"handlereplycapsr! s5 fkkm $D xxBEE4(r$ceZdZdZy) AbortFromPartz=Sub-class of Abort that denotes an error from a bundle2 part.N)r`rarbrcr0r$r"r#r#( sGr$r#r)rhintcht|jd|jjd)z*Used to transmit abort error over the wirerr$r)r#r9rSrrs r"handleerrorabortr', s.  j! (9(9'(B r$s error:pushkey) namespacekeynewoldretrci}dD]%}|jj|}|!|||<'tj|jdfit j |)z=Used to transmit failure of a mandatory pushkey over the wirer(r)r*r+r,r)r9rSr PushkeyFailedr strkwargs)rrrrrs r"handleerrorpushkeyr14 sj F> !!$'   F4L?    n% )1););F)C r$serror:unsupportedcontent)parttypeparamsci}|jjd}|||d<|jjd}||jd|d<tjdit j |)z4Used to transmit unknown content error over the wirer2r3r0)r9rSrr rrr0)rrrr,r9s r"handleerrorunsupportedcontentr6D syF}}  -H&{ ]]  y )F "LL/y  ) ) GH,>,>v,F GGr$serror:pushraced)rcZtjtd|jd)z.Used to transmit push race error over the wires push failed:r)r ResponseErrorrr9r&s r"handleerrorpushracedr9R s%   a0&-- 2K LLr$r)r(c|jd}tj|j}|jj d||fy)z6retrieve pushkey namespace content stored in a bundle2r(rN)r9r decodekeysrrjrK)rr namespacers r"handlelistkeysr=X s> l+I6;;=)AJJNN;A/r$rr(r)r+r*cdtj}||jd}||jd}||jd}||jd}|jj ddr|j |j j||||}||||d}|jjd||jc|jjd } | jd tj|jd | jdd|zd |jrd|sai} dD]#}||jvs|j|| |<%t!j"ddd|jzitj$| y y )zprocess a pushkey requestr(r)r+r*r(r r>rN reply:pushkeyrFrrrr.rPr`r0)r decoder9r rrurhrjrKrkrrrrrrr r/r0) rrdecr<roldnewrrecordrpartrs r" handlepushkeyrG` s ..CFMM,/0I fmmF# $C fmmF# $C fmmF# $C uu)>?  ''//)S#s 3C%sC MFJJNN:v& xx  !12  H,,VYY75   y%#+? ACfmm#$mmC0s B!! 699$ (0(:(:6(B  !$r$rc: tjj|}jjj dd}j j dd}|dk(rij}jj}|rg |D]o\}}|jj} d| d<d| d<|| d<t|j |d | d <t||nd | d < j| q D]4} jj dd ditj| 6|D]=\}}tj |st#d|z} t%j&| |j)jj||r" fd} jj+| y y |dk(r,|D]&\}}||d} j,j/d| (y t%j0d|z)adtransmit bookmark information The part contains binary encoded bookmark information. The exact behavior of this part can be controlled by the 'bookmarks' mode on the bundle operation. When mode is 'apply' (the default) the bookmark information is applied as is to the unbundling repository. Make sure a 'check:bookmarks' part is issued earlier to check for push races in such update. This behavior is suitable for pushing. When mode is 'records', the information is recorded into the 'bookmarks' records of the bundle operation. This behavior is suitable for pulling. r$sbookmarks-pushkey-compatrsapplyrs pushkeycompatr(r)r$r+Nr*throwTs$cannot accept divergent bookmark %s!crD]1}jjditj|3y)N)r)rhhookrr0)unused_successrmallhooksrs r"runhookzhandlebookmark..runhook s- (H BGGLLLx/A/A(/KL!)r$srecords)sbookmarksnodesunknown bookmark mode: %s)s prepushkey)rrrhr rrorSrurrmrrrIrKrr0 isdivergentrr rE applychanges _afterlockrjrKrw)rrchanges pushkeycompat bookmarksmoder bookstorerrrmrrNrErMs` @r"handlebookmarkrV s"$$RWWf5GGGJJ)).MHHLLx8M    GG&& H% d;;++--1)*)5&#' #&y}}T3'?#@ #&t/?tS#I )&% !)-191C1CH1M% "JD$$$T*?@4Gkk#&&" rww(9(9(;WE  M GG  w '  * $!JD$#'$7F JJNN< 0"$$ (= 8  r$rdctj|}tj|jj |j |y)z%apply phases from bundle part to repoN)r r updatephasesrhr~ru)rrrys r" handlephasesrY s9&&v.L **,b.?.?Nr$r@ct|jd}t|jd}|jjdd|i|y)(retrieve the result of a pushkey requestrrrNrrrrrPs r"handlepushkeyreplyr] sC fmmI& 'C ~. /FJJNN: 3/8r$r&c |j}|j}|jjddr'|jj dt |z|j sF|jjjr&|jjjdy|jjj||}|jj|jjdd|i|jd|jj!d}|j#d t%j&|j(d |j#dd |zd yy) z&add a stream of obsmarkers to the repor(sobsmarkers-exchange-debugs&obsmarker-exchange: %i bytes received s3ignoring obsolescence markers, feature not enabled Nr&r*reply:obsmarkersrFrr)rurr r. writenoi18nr[rrhroreadonlyr mergemarkersinvalidatevolatilesetsrjrKrkrrrrr)rrr markerdatarDrFs r"handleobsmarkerre s.   BJ uu||O%AB  6Z H    0 0 9 9   C   ''   ' 'J 7CGG""$JJNN=63-0 xx  !45  H,,VYY75   vus{e< r$r_)r*rct|jd}t|jd}|jjdd|i|y)r[r*rr&Nrr\s r"handleobsmarkerreplyrg sB fmmF# $C ~. /FJJNN=63-8r$rc|jjddr|jtj|j j }d} |jd}|jd}t|dkst|dkr|jjdn|j|||dz }r|j|jjd|zy) z|Applies .hgtags fnodes cache entries to the local repo. Payload is pairs of 20 byte changeset nodes and filenodes. r(r rr s1ignoring incomplete received .hgtags fnodes data rs'applied %i hgtags fnodes cache entries N) r rrurr}rhr~rr[rsetfnodewrite)rrrrrrs r"handlehgtagsfnodesrk s uu)>?   " "277#5#5#7 8E E {{2 B t9r>SZ"_ EEKKM N  tU#    KKMEEKK;eCDr$s>IIIrcy)zLegacy part, ignored for compatibility with bundles from or for Mercurial before 5.7. Newer Mercurial computes the cache efficiently enough during unbundling that the additional transfer is unnecessary.Nr0r&s r" handlerbcrm sr$spushvarsc|jjddrBi}|jD]\}}|j}d|z}|||<!|j |yy)z5unbundle a bundle2 containing shellvars on the serverspushspushvars.serversUSERVAR_N)r rrrrx)rrrmrrs r"bundle2getvarsro se uu!34--JC))+C#C!HSM . x 5r$r)rrrctj|jd}|r|jdng}t |jd}t |jd}|j }t |r td}tj||jjdtj|||||y)Nrrrr1cannot apply stream clone to non empty repositoryapplying stream bundle )rrr9rr?rhr[rr rEr rr applybundlev2)rrrrrrhrs r"handlestreamv2bundlert( s>>$++o">?L/;%<%%d+LDKK -.IDKK -.I 77D 4yDEkk#GGMM-.dD)Y Mr$r)rcFtj|jd}|r|jdng}|j}t |r t d}tj||jjdtj|||y)Nrrrqrr) rrr9rrhr[rr rEr rr applybundlev3)rrrrhrs r"handlestreamv3bundlerw9 s}>>$++o">?L/;%<%%d+L 77D 4yDEkk#GGMM-.dD,7r$cZt}|j} |jd|D]"} |j| j | $|rt j |||||} | j|jht|ddd} |jd| } | jd|tj|r| jd d tj|j vr/ jd d t#|}| jd ||S) aKgenerates bundle2 for widening a narrow clone bundler is the bundle to which data should be added repo is the localrepository instance oldmatcher matches what the client already has newmatcher matches what the client needs (including what it already has) common is set of common heads between server and client known is a set of revs known on the client side (used in ellipses) cgversion is the changegroup version to send ellipses is boolean value telling whether to send ellipses data or not returns bundle2 of the data required for extending s::%ln) oldmatchermatcher fullnodesFs narrow_widen)rrr\r]rrrbr)rrrMrKrr getbundlerrnullidrrrrrrrjrkr)rtrhry newmatchercommonknownruellipses commonnodesrrpackercgdatarrs r" widen_bundlerG s  %K B YYx ( #)''  !!   [[M     ! ~F; j),  ! !$ ' MM/4 0((DMM9 ot,.t4 ,f5 Nr$r1)NN)NNr$Nr5)FN)NNNF)T)NNN)rcrrr rerr:ri18nrrrrrrrr r r r r rrrrrrrutilsrr interfacesrurlerrrrr!rr<r"r.rrrdrrcompiler(r#r&r-r2r7r=r?rf RuntimeErrorrzr}rrrrrrrrrrbundlepriorityrr4rKrrFr^rrrrerrrrlrkrRrDIGESTSkeysrr7r<rBrZrPrmrnrrrrrrlrqrLrr_remotechangegroupparamsrrrrrrrr!rEr#r'r1r6r9r=rGrVrYr]rergrkrrrmrortrwr)rgs0r"rsK\  #    --  RZZ 234 3 # %,--`:':'z \ #$D D T   .b# 'T:0  !! 3yyx778&]$]$@J  n%%&%hhV 1 }1 hQQ&5Jpu=upv<vxIfT\\..012.  .b ?  /Ed98x@2Q.9  5  GETL$HL/Ed*  4 4n!!!%!2!2!45!4A|a!456  "$<=K>K\ !#>?>@>   ",!",J ^  ( #$%> _002 Y00  \))HEKKH ^234 B    (*BC HD H /M0M  [/*0+0 Z?@ A < \@ @ F ^OO  :;9<9 ]==4 ":;9<9 _EE0 FMM' "  &'( [ ! ! ZFG NH N  ^/0 81 8-6s! N>