|
Server : Apache System : Linux iad1-shared-b8-43 6.6.49-grsec-jammy+ #10 SMP Thu Sep 12 23:23:08 UTC 2024 x86_64 User : dh_edsupp ( 6597262) PHP Version : 8.2.26 Disable Function : NONE Directory : /lib/python3/dist-packages/mercurial/__pycache__/ |
Upload File : |
o
�]Lb[k � @ s� d dl mZ d dlZd dlZd dlZd dlZd dlZd dlZd dlZd dl Z d dl
Z
d dl Z d dl Z d dl
Z
d dlZd dlZd dlZd dlZd dlZd dlZd dlZddlmZ ddlmZmZmZmZ ddl m Z m Z ddl m Z m!Z!m"Z"m#Z#m$Z$m%Z%m&Z&m'Z'm(Z(m)Z)m*Z*m+Z+m,Z,m-Z-m.Z.m/Z/m0Z0m1Z1m2Z3m4Z4m5Z6m7Z7m8Z8m9Z9m:Z:m;Z;m<Z<m=Z=m Z m>Z>m?Z?m@Z@mAZAmBZBmCZCmDZDmEZEmFZFmGZGmHZHmIZImJZJmKZKmLZMmNZNmOZOmPZPmQZRmSZSmTZUmVZVmWZW ddlXmYZY dd lZm[Z[m\Z\m]Z]m^Z^m_Z_m`Z` dd
lambZcmdZdmeZemfZf e3jgZgi Zheh�ieKjjjk� e>�jeh�Zjejd g ed �d
d�dd� �Zlejdg �dd� �Zmejdg d�dd� �Znejdddded�fd d ded �fd d ded!�fd"d#ded$�fged%�� & & & &�d�d'd(��Zo�d�d)d*�Zp�d�d+d,�Zq�d�d-d.�Zrd/d0� Zs�d�d1d2�Ztejd3d4d5ded6�fd"d7g ed8�fd"d9ded:�fged�d
d;��d�d<d=��Zuejd>g ed?�d
d;�d@dA� �ZvejdBdCgdD�dEdF� �ZwejdGg d"�dHdI� �ZxejdJd"dKdedL�fgdM�dNdO� �ZydPdQ� ZzdRdS� Z{ejdTg d�dUdV� �Z|ejdWdXdYdedZ�fd[d\ded]�fd"d^ded_�fd`dadedb�fgedc�d
d��d�ddde��Z}ejdfe#j~edg���d�dhdi��Zejdjdkdldedm�fgedn�d
d
do��d�dpdq��Z�ejdre#j~e#j� eds�d
d��d�dtdu��Z�ejdvd"dwdedx�fd"dyd
edz�fd"d{ded|�fd"d5d&ed}�fged~��dd�� �Z�ejd�g ed"��d�d�� �Z�ejd�d"d�ded��fd"d�ded��fd"d�g d�fd�d�d�ge#j� e#j� ed����d�d�d���Z�d�Z�ejd�d d�d"ed��fgd
d��d�d�d���Z�ejd�e#j�g d
d�d�d�� �Z�ejd�d�d�d"ed��edD�fd"d�d&ed��fd`d�ded��fd�d�g ed��ed��fged���d�d�� �Z�ejd�d"d�d"ed��ed�fd"d�d"ed��ed�fd"d�d&ed��fge#j� �d�d�� �Z�ejd�g e#j� �d�d�� �Z�ejd�g ed��d
d;��d�d�d���Z�ejd�d�d�g ed��ed��fd�d�g ed��ed��fdXd�d�edăedŃfgedƃd
d;��d�d�dȄ�Z�ejd�g dʃd�d̄ �Z�ejd�e#j~e#j� eds���d�d�dτ�Z�ejd�e#j~eds�d
d��d�d�d҄�Z�ejd�g �d�dՄ �Z�ejd�g e#j� d"d
d;�d�d �Z�ejd�g edڃd
d;�d�d܄ �Z�ejd�g edރ�d�d� �Z�ejd�d�d�ded�fd�d�ded�fd`d�ded�fd�d�ded�fged~��d�d� �Z�ejd�d"d�d&ed�fd4d�g ed�ed�fgd"��d�d�d���Z�ejd�g e#j� d"�d�d�� �Z�ejd�g ed���d�d�� �Z�ejd�d"�d d&e�d�fd"�dd&e�d�fd"�dd&e�d�fd"�dd&e�d�fg��d�d � �Z�ej�d
d"�d d e�d �fd"�d
d&e�d�fd�d�g e�d�fd"�dd&e�d�fd"�dd&e�d�fd"�dg e�d�fge#j� e#j� e�d���dېd�d��Z�ej�dd�d�d"e�d�edD�fge�d���d �d � �Z�ej�d d�d�d"e�d�edD�fge�d���d �d � �Z�ej�d �d!�d"de�d#�fd �d$de�d%�fd4�d&de�d'�fd��d(de�d)�fge�d*���d+�d,� �Z�ej�d-e#j��d.d
�d/��d0�d1� �Z�ej�d2g ed?�d
d;��d3�d4� �Z�ej�d5d�d�d"e�d6�edD�fd"�d7de�d8�fge#j� e#j� e�d9�d
�d/��d:�d;� �Z�ej�d<g e�d=�d
d;��d>�d?� �Z�ej�d@g e�dA���dېdB�dC��Z�ej�dDd�d�d"e�dE�edD�fd"�dFde�dG�fge�d���dH�dI� �Z�ej�dJd"�dKd&e�dL�fgd"��dM�dN� �Z�ej�dOd�d�d"e�d�edD�fge�dP���dQ�dR� �Z�ej�dSg d"��dT�dU� �Z�ej�dVe#j~�dW�dXd&e�dY�fg eds�d
d��dېdZ�d[��Z�ej�d\e#j~�d!�d]d e�d^�e�d_�fg e�d`�d
d��dېda�db��Z�ej�dcd"�ddde�de�fd"�dfd
e�dg�fd`�dhde�di�fd�d�g ed��ed��fd"�djd&e�dk�fd"�dld&e�dm�fg�dn��do�dp� �Z�ej�dqd"�drd&e�ds�fd"�dtd"e�du�fd"�dvd"e�dw�fgd"��dx�dy� �Z�ej�dzg e�d{���dېd|�d}��Z�ej�d~e#j~edg���dېd�d���Z�ej�d�g �d�d
d��dېd��d���Z�ej�d��d�ge#j� e�d����d��d�� �Z�ej�d�d�d�d"e�d��edD�fge�d����dېd��d���Z�ej�d�d
d��d��d�� �Z�ej�d�d"�d�d&e�d��fge�d����d��d�� �Z�ej�d�g ��d��d�� �Z�ej�d�d�d�g e�d��edD�f�d��d�g e�d��e�d��fge�d��d
d��d��d�� �Z�ej�d�d��d�d"e�d��e�d��fge�d��d
d;��d�d��d���Z�ej�d�d��d�d"e�d��e�d��fge�d��d
d;��d�d��d���Z�ej�d�g ��d��d�� �Z�ej�d�d �ddg e�d��ed��fd"�d�d&e�d��fd"�d�d
e�d��fd"�d�de�d��fd"�d�de�d��fd"�d�de�d��fg��d�d��d���Z�ej�d�e#j�e�d��d
�d/��d��d �Z�ej�d�g edD���dĐdń �Z�ej�d�g �dǢe#j� e�dȃd
d;��dɐdʄ �Z��dːd̄ Z�ej�d�d"�d�d&e�dσfd"�d�d"e�dуfd"�d�d&e�dӃfd"�d�d&e�dՃfge#j� ed��d
d��dېddׄ�Z�dS (� � )�absolute_importN� )�_)�bin�hex�nullrev�short)�getattr�open)4�bundle2�
bundlerepo� changegroup�cmdutil�color�context�copies� dagparser�encoding�error�exchange�
extensions� filemerge� filesetlang� formatter�hg�httppeer� localrepo�lock�
logcmdutil�
mergestate�metadata�obsolete�obsutil�pathutil�phases�policy�pvec�pycompat� registrar�repair�repoview� requirements�revlog�revset�
revsetlang�scmutil� setdiscovery� simplemerge�sshpeer�sslutil� streamclone�strip�tags� templater�
treediscovery�upgrade�url�util�vfs�wireprotoframing�wireprotoserver)�
repository)�cborutil� compression�dateutil�procutil�
stringutil�urlutil)�deltas�nodemap�rewrite�sidedatas
debugancestors [INDEX] REV1 REV2T)� optionalrepoc G s� t |�dkr |\}}}t�tjt�� dd�|�}|j}n!t |�dkr6|s+t�t d���|\}}|j
}|j}nt�t d���|� ||�||��}| � d|�
|�t|�f � dS ) z<find the ancestor revision of two revisions in a given index� F��audit� �5 there is no Mercurial repository here (.hg not found)s& either two or three arguments requireds %d:%s
N)�lenr, �vfsmodr< r �getcwd�lookupr �Abortr � changelog�ancestor�write�revr ) �ui�repo�args�index�rev1�rev2�rrS �a� ra �9/usr/lib/python3/dist-packages/mercurial/debugcommands.py�
debugancestorw s
� rc s debugantivirusrunningc C s^ |j �dd��}|�t�d�� W d � n1 sw Y t�d� t�|j �d�� dS )z?attempt to trigger an antivirus scanner to see if one is activezeicar-test-file.com� wbsU ST#=}P$fV?P+K%yP+C|uG$>GBDK|qyDK~v2MM*<JQY}+dK~6+LQba95PE<)&Nm5l)EmTEQR4qnHOhq9iNGnJxNrN ) �cachevfsr
rW r; � b85decode�time�sleep�unlink�join)rY rZ �fra ra rb �debugantivirusrunning� s �� �
rl s debugapplystreamclonebundles FILEc C s( t �| |�}t�| ||�}|�|� dS )z apply a stream clone bundle fileN)r �openpathr �
readbundle�apply)rY rZ �fnamerk �genra ra rb �debugapplystreamclonebundle� s rr �
debugbuilddag� ms mergeable-files! add single file mergeable changes� os overwritten-files" add single file all revs overwrite� ns new-files add new file at each rev� s
from-existings$ continue from a non-empty repositorys [OPTION]... [TEXT]Fc " sp |du r| � td�� | j�� }|j}t|�dkr"|s"t�td���d}t� |�D ] \} }
| dkr5|d7 }q)|rLd} dd � t
� d|| �D �} | � d
� g }
| j
td �td �|d
�}|��� |�� ��� |�� ��� |�d���� d}d}g �d}|�|� t� |�D �][\} }
| dk�r�| �dt
�|
� � |
\}}g }i � d}|�rd�||d }t|�dkr�||d }|�|�}�fdd �|||fD �\}}}t�|||�}dd � t�|�d D �}|� d
� n|dkr�|� �� �d�}n| }||| d| 7 < d�|�} |� �� | � �< |�r d�|� �� d| � �< |�rZd| �|� �� d| � �< t|�dk�rZ|�sA||d }|D ]���d��rX|� �� |� �� � �< �qC� fdd �} t|�dk�sn|d dk �rsddg} nt|�dk�r��|d dg} n �fd d �|D �} t j || d | || |dfd d |id!�} |� | �} �� | � |}n.| d"k�r�|
\}}!| �d#|! � |
� d$t |j� |��|!f � n| d%k�r�| �d&|
� |
}|�|� q�|
�r�|j!�"d'd
�|
�� W d � n 1 �s�w Y W d � n 1 �sw Y W d � n1 �sw Y W d � dS W d � dS 1 �s1w Y dS )(a builds a repo with a given DAG from scratch in the current empty repo
The description of the DAG is read from stdin if not given on the
command line.
Elements:
- "+n" is a linear run of n nodes based on the current default parent
- "." is a single node based on the current default parent
- "$" resets the default parent to null (implied at the start);
otherwise the default parent is always the last node created
- "<p" sets the default parent to the backref p
- "*p" is a fork at parent p, which is a backref
- "*p1/p2" is a merge of parents p1 and p2, which are backrefs
- "/p2" is a merge of the preceding node and p2
- ":tag" defines a local tag for the preceding node
- "@branch" sets the named branch for subsequent nodes
- "#...\n" is a comment up to the end of the line
Whitespace between the above elements is ignored.
A backref is either
- a number n, which references the node curr-n, where curr is the current
node, or
- the name of a local tag you placed earlier using ":tag", or
- empty to denote the default parent.
All string valued-elements are either strictly alphanumeric, or must
be enclosed in double quotes ("..."), with "\" as escape character.
Ns reading DAG from stdin
r s repository is not emptyrv r rN c S s g | ]}d | �qS )s %dra )�.0�ira ra rb �
<listcomp>� s �z!debugbuilddag.<locals>.<listcomp>rw s buildings revisions)�unit�totals builddag���� defaults node %s
s mfc s g | ]}|� � � �qS ra )�data)rx �x��fnra rb rz s �c S s g | ]}|� � �qS ra �r5 �rx �lra ra rb rz s ���
s r%is ofs r%i
s nf%is nfc s |� v rt �| ||� | �S d S �N)r �
memfilectx)rZ �cx�path)� filecontentra rb �fctxfn9 s
�z debugbuilddag.<locals>.fctxfnc s g | ]}� | �qS ra ra �rx �p)�nodeidsra rb rz E � � r%irs � branch)�date�user�extra� ls tag %s
� %s %s
� as
branch %s
s localtags)#�statusr �fin�readrU rP r rT r �parsedagr' �xrange�append� makeprogress�wlockr � transaction�update�note�bytestrrV r1 �
Merge3Text�render_minimizedr �splitrj �
startswithr �memctx� commitctxr �noder< rW )"rY rZ �text�mergeable_file�overwritten_file�new_file�
from_existing�clr| �typer � linesperrev�initialmergedlinesr6 �progress�at�atbranch�id�ps�files�p2�p1�pa�base�local�other�m3�ml�
mergedtextr� �parsr� �nodeid�namera )r� r� r� rb �
debugbuilddag� s� B
��
�.
� �
�
�
� �� �T r� c s� d| �|r8�� d� � � ��fdd�}� �� |d� � �� |d� t� ji �D ]
}|d }||� q+d S t� tj�rEt� t
d���� �� � � � D ]}|\} }
} } }
}}}�� d �t
| �f � qMd S )
N� s3 %sformat: id, p1, p2, cset, delta base, len(delta)
c
sl �� d�| f � � �� D ]&}|\}}}}}}}} �� d�t|�t|�t|�t|�t|�t|�f � q
d S )Ns
%s%s
s %s%s %s %s %s %s %d
)rW � deltaiterr rP )
�named� deltadatar� r� r� �cs� deltabase�delta�flagsrI �rq �
indent_stringrY ra rb �
showchunksh s ����z%_debugchangegroup.<locals>.showchunks� changelog� manifests filenames use debugbundle2 for this file� %s%s
)� writenoi18n�changelogheader�manifestheader�iter�
filelogheader�
isinstancer �
unbundle20r rT r r� rW r )rY rq �all�indent�optsr� � chunkdatarp r� r� r� r� r� r� r� r� rI ra r� rb �_debugchangegroup` s. ��
� �r� c
K s� t �|�}|�� }d| }z t�|�\}}W n% tjy; } zd} | ||jt|�f; } | � | � W Y d}~dS d}~ww d} | ||t|�f; } | � | � | �
d|�}
t |�D ]} t �
d| �} |
�� |
�|� t�|
| � qV|
�� dS )�/display version and markers contained in 'data'r� s% %sunsupported version: %s (%d bytes)
Ns %sversion: %d (%d bytes)
�
debugobsolete)r' � byteskwargsr� r! � _readmarkersr �UnknownVersion�versionrP rW r �sortedr" �marker� startitem�plainr �
showmarker�end)
rY �partr� r� r r� r� �markers�exc�msg�fm� rawmarker�mra ra rb �_debugobsmarkers� s*
��
r� c C sV d| }t �|�}t jD ] }|| D ]}| �|� | �dt|�t j| f � qq dS )r� r� r� N)r$ � binarydecode� allphasesrW r �
phasenames)rY r r� r� � headsbyphase�phase�headra ra rb �_debugphaseheads� s
��r� c sB t � ttjtjf�rdd�� fdd�t� �D �� S t� t
� ��S )Ns {%s}� , c 3 s � | ] }d |� | f V qdS )s %s: %sNra )rx �k��thingra rb � <genexpr>� � � z _quasirepr.<locals>.<genexpr>) r� �dictr; �sortdict� collections� OrderedDictrj r� r' r� �reprr� ra r� rb �
_quasirepr� s
�r c K s t |tj�s
t�td���| �dt|j� � |� dg �}|�
� D ]_}|r+|j |vr+q!d}| �||j t|j�|j f � |j dkr^|j� dd�}t
�||d�}| js^t| |f|d d
�|�� |j d krq| jsqt| |fd d i|�� |j d
kr�| js�t| |d d� q!dS )z lists the contents of a bundle2s not a bundle2 files Stream params: %s
� part_types %s -- %s (mandatory: %r)
s changegroups versions 01s UN� )r� r� s
obsmarkersr� s phase-heads)r� N)r� r r� r rT r rW r �params�get� iterpartsr� � mandatoryr
� getunbundler�quietr� r� r� ) rY rq r� r� � parttypesr� r� r� �cgra ra rb �
_debugbundle2� s,
��r s debugbundler� � alls show all detailss part-types show only the named part types specs" print the bundlespec of the bundle)�norepoc K s� t �| |��K}|r t�| |�}| �d| � W d � dS t�| ||�}t|tj�r>t | |fd|i|��W d � S t
| |fd|i|�� W d � dS 1 sTw Y dS )z lists the contents of a bundle� %s
Nr� ) r rm r �
getbundlespecrW rn r� r r� r r� )rY �
bundlepathr� �specr� rk rq ra ra rb � debugbundle� s � � "�r s debugcapabilitiess PATHc
K s� t �|�}t�| ||�}zP|�� }| �d� t|�D ] }| �d| � qt� |�}|rO| �d� tt �
|��D ] \}}| �d| � |D ] } | �d| � qDq7W |� � dS W |� � dS |� � w )z'lists the capabilities of a remote peers Main capabilities:
� %s
s Bundle2 capabilities:
s %s
N) r' r� r �peer� capabilitiesr� r� rW r � bundle2caps� iteritems�close)
rY r� r� r �caps�c�b2caps�key�values�vra ra rb �debugcapabilities� s&
�� �r' s debugchangedfiles)rw s computeFs6 compute information instead of reading it from storages REVc K s t �||d�}d}|d rt�|�}n|j�|�� �}|�tj�}|dur*t� |�}|dur�t
|j �D ]R}||j v r=d} n||j
v rEd} n||jv rMd} n
||jv rUd} nd} d}
d} ||jv rhd }
|j| } n ||jv rtd
}
|j| } | |
|| f} d }
| �|
| � q3dS dS ) z,list the stored files changes for a revisionN�compute� added� removeds mergeds salvageds touchedrw � p1� p2s %-8s %2s: %s, %s;
)r � revsingler �compute_all_files_changesrU rI rX r �SD_FILES�decode_files_sidedatar� �touched�added�removed�merged�salvaged�copied_from_p1�copied_from_p2rW )rY rZ rX r� �ctxr� �sd� files_blockrk �action� copy_parent� copy_sourcer �templatera ra rb �debugchangedfiles� s@
�r? s debugcheckstatec C sz |j �� \}}|| �� }|| �� }d}|j �||�D ]}| �|d |dd� � |d7 }q |r;td�}t�|��dS )z0validate the correctness of the current dirstater r Ns8 .hg/dirstate inconsistent with current parent's manifest)�dirstate�parents�manifest�verify�warnr r rT ) rY rZ �parent1�parent2�m1�m2�errors�err�errstrra ra rb �debugcheckstate+ s
�rL s
debugcolors styles show all configured styless
hg debugcolorc K s0 | � dt�| j� � |�d�rt| �S t| �S )z&show available color, effects or styles color mode: %s
�style)r� rD �pprint�
_colormoder �_debugdisplaystyle�_debugdisplaycolor�rY rZ r� ra ra rb �
debugcolor: s
rS c C s� | � � } | j�� t�| ��� D ]}|| j|< q| jrB| �d�D ]!\}}|�d�r3|dd � | j|< q |�d�rA|dd � | j|< q | � t
d�� t | j� � dd� d �}|D ]
\}}| j d
| |d � qVd S ) Ns colors color.� s terminfo.� s available colors:
c S s d| d v | d | d fS )N� _r r ra )ry ra ra rb �<lambda>U � z$_debugdisplaycolor.<locals>.<lambda>�r$ r ��label)
�copy�_styles�clearr �_activeeffects�keys�_terminfoparams� configitemsr� rW r r� �items)rY �effectr� r& rc � colornamer[ ra ra rb rQ H s
� �rQ c s� � � td�� � js d S tdd� � jD ��}t� j�� �D ]8\}}� j d| |d� |rP� � d� � � dtd|t|� � � � � d �� fd
d�|�� D ��� � � d � q d S ) Ns available style:
c s � � | ]}t |�V qd S r� �rP �rx �sra ra rb r ^ � � z%_debugdisplaystyle.<locals>.<genexpr>� %srZ s : r� r r� c 3 s � | ] }� � ||�V qd S r� rZ �rx �e�rY ra rb r e � � r� ) rW r r] �maxr� rc rP rj r� )rY �widthr[ �effectsra rn rb rP Z s
" �rP s debugcreatestreamclonebundlec C sT t �|�r | �td�� t�|�\}}t�| ||� | �td�d� t
|�� � dS )z�create a stream clone bundle file
Stream bundles are special bundles that are essentially archives of
revlog files. They are commonly used for cloning very quickly.
s= (warning: stream clone bundle will contain secret revisions)
s bundle requirements: %s
r� N) r$ � hassecretrD r r4 �generatebundlev1r
� writechunksrW rj r� )rY rZ rp r+ rq ra ra rb � debugcreatestreamclonebundlei s
�� rv s debugdag� ts tagss use tags as labels� b� branchess annotate with branch namess dotss use dots for runs� ss spacess separate elements by spacess [OPTION]... [FILE [REV]...]c s� |� d�}|� d�}|r(t�tjt�� dd�|��dd� �D ����fdd�}n;|r\|j�|� d ��|� d
�� �rRi �|�� �� D ]\}} �� ��
| �g �� |� qA� ���fd d�}nt �
td ���tj|� |d
d
||dd�D ] }
| �|
� | �d� qpdS )a format the changelog or an index DAG as a concise textual description
If you pass a revlog index, the revlog's DAG is emitted. If you list
revision numbers, they get labeled in the output as rN.
Otherwise, the changelog DAG of the current repo is emitted.
�spaces�dotsFrL c S s h | ]}t |��qS ra )�int�rx r_ ra ra rb � <setcomp>� r� zdebugdag.<locals>.<setcomp>c 3 sL � �D ] } d| t dd� ��| �D ��ffV | � v r#d| d| ffV qd S )Nrv c s � � | ] }|d kr|V qdS �r} Nra r� ra ra rb r � ro �+debugdag.<locals>.events.<locals>.<genexpr>r� r� )�list�
parentrevs)r_ )�revs�rlogra rb �events� s �"��zdebugdag.<locals>.eventsr6 �branchesc 3 s� � d} �D ]A}� r �� ��|��d d }|| kr d|fV |} d|tdd� ��|�D ��ffV �rF��|�}|rF|D ] }d||ffV q<qd S ) Nr~ � r� r� rv c s r� r� ra r� ra ra rb r � ro r� r� )r� r� r� r� r )�br_ �newb�lsr� )r� r� �labelsr6 ra rb r� � s �
"
��s need repo for changelog dagT�F )� addspaces�
wraplabels�wrapannotations�
wrapnonlinear�usedots� maxlinewidthr� N)r r, rQ r< r rR rU r6 rc �
setdefaultrX r� r rT r r � dagtextlinesrW ) rY rZ �file_r� r� r{ r| r� r� �n�linera )r� r� r� r� r� r6 rb �debugdag� s8
�
�r� � debugdatas -c|-m|FILE REVc K s� t �|�}|�d�s|�d�s|�d�r&|dur t�dtd���d|}}n |du r2t�dtd���t�|d||�}z| �|� |�
|��� W dS t yX t� td�| ��w )z)dump the contents of a data file revisionr� r� � dirNr� � invalid arguments� invalid revision identifier %s)
r' r� r r � CommandErrorr r � openstoragerW �rawdatarS �KeyErrorrT )rY rZ r� rX r� r_ ra ra rb � debugdata� s
�r� s debugdate� es extendeds try extended date formatss [-e] DATE [RANGE])r rJ c K sp |d r t �|t j�}nt �|�}| �d| � | �dt �|� � |r6t �|�}| �d||d � � dS dS )zparse and display a date�extendeds internal: %d %d
s
standard: %s
s
match: %s
r N)rB � parsedate�extendeddateformatsr� �datestr� matchdate)rY r� �ranger� �dr� ra ra rb � debugdate� s
�r� � debugdeltachains
-c|-m|FILEc sF t �|�}t�|d||���j��j}�j}�j� t�dd�}� ��fdd�}| � d|�}|�
d� |r9|�
d� |�
d� i } �D ]�}
||
�\} } }
}}|d }| � |t | �d
�}||�}||
�}|| | }|| }z|d }W n t
y~ d }Y nw | d kr�t|�t| � }n|}|d kr�t|�t|� }n|}|�� |jd
d|
|t |�||
| | |||||f|
|t |�||
| | |||||d� � |�rd }d }d }t��|�D ]$} |d
7 }|| d �|| d � } | || d � } || 7 }|| k r�| }q�|�rt|�t|� } nd
} |jdd||| |||| |d�
|�
d� qB|�� dS )a dump information about delta chains in a revlog
Output can be templatized. Available template keywords are:
:``rev``: revision number
:``chainid``: delta chain identifier (numbered by unique base)
:``chainlen``: delta chain length to this revision
:``prevrev``: previous revision in delta chain
:``deltatype``: role of delta / how it was computed
:``compsize``: compressed size of revision
:``uncompsize``: uncompressed size of revision
:``chainsize``: total size of compressed revisions in chain
:``chainratio``: total chain size divided by uncompressed revision size
(new delta chains typically start at ratio 2.00)
:``lindist``: linear distance from base revision in delta chain to end
of this revision
:``extradist``: total size of revisions not part of this delta chain from
base of delta chain to end of this revision; a measurement
of how much extra data we need to read/seek across to read
the delta chain for this revision
:``extraratio``: extradist divided by chainsize; another representation of
how much unrelated data is needed to load this delta chain
If the repository is configured to use the sparse read, additional keywords
are available:
:``readsize``: total size of data read from the disk for a revision
(sum of the sizes of all the blocks)
:``largestblock``: size of the largest block of data read from the disk
:``readdensity``: density of useful bytes in the data read from the disk
:``srchunks``: in how many data hunks the whole revision would be read
The sparse read can be enabled with experimental.sparse-read = True
r� �_withsparsereadFc s� �| }|d }|d }d}� r=|d |d krd}n-|d |d kr&d}n"|d | d kr1d }n|d | kr:d
}nd }n |d | krFd
}nd }�� | �d }|D ] }�| }||d 7 }qQ|||||fS ) Nr rN r rK r� r+ rT r, s prevs base� other)� _deltachain)rX rm �compsize�
uncompsize� chainsize� deltatype�chain�iterrev�� generaldeltar\ r_ ra rb �revinfo s, z debugdeltachain.<locals>.revinfoss rev chain# chainlen prev delta size rawsize chainsize ratio lindist extradist extraratios) readsize largestblk rddensity srchunksr� r r ���r} sl rev chainid chainlen prevrev deltatype compsize uncompsize chainsize chainratio lindist extradist extraratios7 %7d %7d %8d %8d %7s %10d %10d %10d %9.5f %9d %9d %10.5f) rX �chainid�chainlen�prevrevr� r� r� r� �
chainratio�lindist� extradist�
extraratios* readsize largestblock readdensity srchunkss %10d %10d %9.5f %8d)�readsize� largestblock� readdensity�srchunksN)r' r� r �
openrevlogr\ �start�length�
_generaldeltar r r� r� rP �
IndexError�floatr� rW � deltautil�
slicechunkr� ) rY rZ r� r� r� r� �withsparsereadr� r� �
chainbasesrX �comp�uncompr� r� r� � chainbaser� � basestart�revstart�
lineardistr� r� r� r� r� r� r� � revschunk�blkend�blksizer� ra r� rb �debugdeltachain� s�
) �
��� ��
r� s debugdirstate|debugstates nodatess+ do not display the saved mtime (DEPRECATED)s datess display the saved mtimes datesorts sort by saved mtimes9 display dirstate-v2 tree nodes that would not exist in v1s [OPTION]...c K s |d }|� d�durd}|� d�}|rdd� }nd}t|jjj|d d ��}|j|d
� |D ]@}|\}} }
} } | d kr@d }
n|rEd
}
nt�dt�| ��}
t �
|
�}
|
d@ rZd}
n
d|
d@ t j @ }
| �
d| |
| |
|f � q0|j�� D ]}| �
td�|j�|�|f � qvdS )z)show the contents of the current dirstate�dates�nodatesNT�datesortc S s | \}}}}}||fS r� ra )�entry�filename�_state�_mode�_size�mtimera ra rb �keyfunc� s zdebugstate.<locals>.keyfuncr� )r� rY r} s unset s set z%Y-%m-%d %H:%M:%S i s lnks %3oi� s %c %s %10d %s%s
s copy: %s -> %s
)r r� r@ �_map�
debug_iter�sortrg �strftime� localtimer �
strtolocalr; �umaskrW r r �copied)rY rZ r� r� r� r� �entriesr� r� �state�mode�sizer� �timestrrk ra ra rb �
debugstate� s0
�r� s debugdirstateignorepatternshashc K sB |j jr |j jj}d}|j| d� }| �t�|�d � dS dS )z^show the hash of ignore patterns stored in dirstate if v2,
or nothing for dirstate-v2
� Nr� )r@ �_use_dirstate_v2r� �docket�
tree_metadatarW �binascii�hexlify)rY rZ r� r� �hash_len�
hash_bytesra ra rb � debugdirstateignorepatternshash� s
�r� � debugdiscovery� olds use old-style discovery� nonheadss/ use old-style discovery with non-heads included� revs& restrict discovery to this set of revs)rw � seeds 12323s) specify the random seed use for discovery)rw s
local-as-revsrw s+ treat local has having these revisions only)rw s remote-as-revsrw s4 use local as remote, with only these these revisionss [--rev REV] [OTHER]r~ c $ sb t ������� }�d }�d }t�t�d �� |s:t�d��|�\}}t� ��|�}��
t d�t� |� � n'dg f}t
�|d| g��t����fdd �} | tjd
< �� � }|j�d
�|_|r�t
�|d| g��t����fd d �}
|
tjd
< ��d
��i � ��d�r�|f� ���fdd� } n
|f� ��fdd� } tj�||dd�\} }
�d }��d��}|jr�tj� �fdd��}ntj}|� �$ t� d��}| || �\}}W d � n1 s�w Y W d � n1 s�w Y t |�}t |�}t �� � �}||@ }||@ }||@ |@ }�� d�}�� d|�}�� d|�}�� d|�} �� d| �} �� d | �} t |�t | � t |�k�s@J ��� d ||�} �� d| �} �� d | �}!| |@ }"| | @ }#|j!� d < t |�� d < t |�� d < t |�� d!< t |�� d"< t |�� d#< t |�� d$< t |�t |� � d%< t |�� d&< t |�t |� � d'< t |�� d(< t |�� d)< t | �� d*< t | �� d+< t | �� d,< t | �� d-< t | �� d.< t |!�� d/< t |"�� d0< t |#�� d1< |�"� |j#dOi t �$� ��� |�%d2� � |�%d3� � |�%d4� |�%d5� � |�%d6� � |�%d7� � |�%d8� � |�%d9� � |�%d:� � |�%d;� � |�%d<� � |�%d=� � |�%d>� � |�%d?� � |�%d@� � |�%dA� � |�%dB� � |�%dC� � |�%dD� � |�%dE� � |�%dF� � |�%dG� � |�%dH� � |�%dI� � |�%dJ� � �j&�r�|�%dKdL�'t(dMdN� |D ��� � |�)� dS )Pa� runs the changeset discovery protocol in isolation
The local peer can be "replaced" by a subset of the local repository by
using the `--local-as-revs` flag. Int he same way, usual `remote` peer can
be "replaced" by a subset of the local repository using the
`--local-as-revs` flag. This is useful to efficiently debug pathological
discovery situation.
The following developer oriented config are relevant for people playing with this command:
* devel.discovery.exchange-heads=True
If False, the discovery will not start with
remote head fetching and local head querying.
* devel.discovery.grow-sample=True
If False, the sample size used in set discovery will not be increased
through the process
* devel.discovery.grow-sample.dynamic=True
When discovery.grow-sample.dynamic is True, the default, the sample size is
adapted to the shape of the undecided set (it is set to the max of:
<target-size>, len(roots(undecided)), len(heads(undecided)
* devel.discovery.grow-sample.rate=1.05
the rate at which the sample grow
* devel.discovery.randomize=True
If andom sampling during discovery are deterministic. It is meant for
integration tests.
* devel.discovery.sample-size=200
Control the initial size of the discovery sample
* devel.discovery.sample-size.initial=100
Control the initial size of the discovery for initial change
s
local_as_revss remote_as_revsr� r� s comparing with %s
Ns not (::(%s))c � � S r� ra �r� )�remote_filtered_revsra rb � remote_funcK � z#debugdiscovery.<locals>.remote_funcs debug-discovery-remote-filterc r r� ra r )�local_filtered_revsra rb �
local_funcY r z"debugdiscovery.<locals>.local_funcs debug-discovery-local-filterr� c s� t �|d�s
t�|�� �}tj�|d�d�\}}}t|�}��d�sF�� dd�
t dd� |D ��� � �j j
� ��d |�}� fd
d �|D �}||fS ) Nry T)�forcerM r� s unpruned common: %s
r� c s rf r� �r �rx r� ra ra rb r m rj z/debugdiscovery.<locals>.doit.<locals>.<genexpr>s heads(::%ln)c s h | ]}� |��qS ra ra r~ ��clnodera rb r r r� z/debugdiscovery.<locals>.doit.<locals>.<setcomp>)r; � safehasattrr �locallegacypeerr� r8 �findcommonincoming�setr r� rj r� rU r� r� )�
pushedrevs� remoteheads�remote�common�_in�hds)r r� rZ rY r
rb �doitb s �
�� z debugdiscovery.<locals>.doitc sH d }| rt ��| �}�fdd�|D �}tj��||� d�\}}}||fS )Nc � g | ]}� | � � �qS ra �r� r~ �rZ ra rb rz { � z0debugdiscovery.<locals>.doit.<locals>.<listcomp>)� ancestorsofrM )r �revranger0 �findcommonheads)r r r �nodesr� r �anyr )r rZ rY ra rb r w s
�)r� r� c 3 s � �� � d V ��� � d< d S )N� output)�
pushbuffer� popbufferra )r rY ra rb �may_capture_output� s �z*debugdiscovery.<locals>.may_capture_outputzdebug-discoverys all()s ::%lns roots(::%ld)s not ::%lds
heads(%ld)s
roots(%ld)s not (::%ln or %ln::)s elapseds nb-common-headss nb-common-heads-locals nb-common-heads-remotes nb-common-heads-boths nb-common-rootss
nb-head-locals nb-head-local-missings nb-head-remotes nb-head-remote-unknowns nb-revss nb-revs-commons nb-revs-missings nb-missing-headss nb-missing-rootss
nb-ini_unds nb-ini_und-headss nb-ini_und-rootss nb-ini_und-commons nb-ini_und-missings# elapsed time: %(elapsed)f seconds
s- round-trips: %(total-roundtrips)9d
s heads summary:
s, total common heads: %(nb-common-heads)9d
s2 also local heads: %(nb-common-heads-local)9d
s3 also remote heads: %(nb-common-heads-remote)9d
s1 both: %(nb-common-heads-both)9d
s* local heads: %(nb-head-local)9d
s2 common: %(nb-common-heads-local)9d
s2 missing: %(nb-head-local-missing)9d
s+ remote heads: %(nb-head-remote)9d
s3 common: %(nb-common-heads-remote)9d
s3 unknown: %(nb-head-remote-unknown)9d
s$ local changesets: %(nb-revs)9d
s+ common: %(nb-revs-common)9d
s, heads: %(nb-common-heads)9d
s, roots: %(nb-common-roots)9d
s, missing: %(nb-revs-missing)9d
s- heads: %(nb-missing-heads)9d
s- roots: %(nb-missing-roots)9d
s' first undecided set: %(nb-ini_und)9d
s- heads: %(nb-ini_und-heads)9d
s- roots: %(nb-ini_und-roots)9d
s. common: %(nb-ini_und-common)9d
s/ missing: %(nb-ini_und-missing)9d
s common heads: %s
r� c s rf r� r r ra ra rb r � rj z!debugdiscovery.<locals>.<genexpr>ra )*r' r� �
unfiltered�random�seedr} rE �get_unique_pull_pathr r r� r � hidepasswordr r � frozensetr* � filtertable�_repo�filteredr �
addbranchrevsr �
strict_format�
contextlib�contextmanagerr; �nullcontextmanager�timedcmr �headsr� rP �elapsedr� r � strkwargsr� �verboserj r� r� )$rY rZ � remoteurlr� �unfi�
local_revs� remote_revsr� r r r r �
remoterevs� _checkout� localrevsr� r# �tr r � heads_common� heads_remote� heads_local�heads_common_local�heads_common_remote�heads_common_bothr� � roots_common�missing�
heads_missing�
roots_missing�initial_undecided�heads_initial_undecided�roots_initial_undecided�common_initial_undecided�missing_initial_undecidedra )r r r� r rZ rY rb �debugdiscovery� s�
I�
�
�
�� �
�
�
�� rN i s
debugdownloadr s pathc K sp t �| ||�}| }|rt|dt�}z |�t�}|r%|�|� |�t�}|sW |r.|�� dS dS |r7|�� w w )z4download a resource using Mercurial logic and configrd N)�urlmodr
�
_chunksizer� rW r )rY rZ r: �outputr� �fh�destr ra ra rb �
debugdownload� s
�� �
�rT � debugextensionsc
K s� t �|�}t�| �}t�� }| �d|�}t|t�d�d�D ]�\}}t� |�}d} t�
|d�r5t � |j �} n t
tdd�r>t j} |rCg }
nt
|dd ��� }
t
|d
d�} |�� | js[| jrc|�d d |� n(|�d d
|� |sp||
v rv|�d� n|
s�|�td�� n |
d } |�d| � |�| jo�| dtd�| p�d � | jr�|�td�ddg| � |j|d� |�| jo�|
dtd�|j|
dd�� |�| jo�| d td �| p�d � q |�� dS ) z(show information about active extensionsrU r rY N�__file__�oxidizedF�
testedwithrw �buglink� namer rk r� s
(untested!)
r} s (%s!)
s sources location: %s
s bundled: %s
� no� yes)�bundleds
testedwiths tested with: %s
s ver�r� s buglinks bug reporting: %s
)r' r� r r; r� r r� �operator�
itemgetter�ismoduleinternalr �fsencoderV r �sys�
sysexecutabler� r� r r6 rW r� r � condwriter �
formatlistr� )
rY rZ r� �exts�hgverr� �extname�extmod�
isinternal� extsource�
exttestedwith�
extbuglink�lasttestedversionra ra rb �debugextensions s^
� �� rp s debugfileset� rs# apply the filespec on this revisions all-filess3 test files from all revisions and working directorys show-matchers( print internal representation of matcher� ps
show-stages$ print parsed tree at the given stages NAMEs+ [-r REV] [--all-files] [OPTION]... FILESPECc K s6 ddl m} |j t�|�}t�||�d�d�}dtjfdt j
fdt j fg}dd � |D �}t � }| j
r<|d
s<|�d� |d
d gkrI|�|� n|d
D ]} | |vr\t�td �| ��qM|�|d
� t �|�}
|D ]$\} } | |
�}
| |v r�|d
s| dkr�| �d
| � | �t �|
�d� qkt � } |d r�|D ]}
||
}| �|�� � | �|j� q�|d s�|�� du r�|d }| �|jjt� |�t |j�ddd�� | �|j� n
| �|�� � | �|j� |� |� � |�}|d s�|d du �r| j
�r| � dt!�"|�d� t#| �D ]} || ��s�q| �d| � �qdS )z'parse and apply a fileset specificationr )�filesetr� N� parsed� analyzed� optimizedc S � h | ]\}}|�qS ra ra �rx r� rk ra ra rb r p r� z debugfileset.<locals>.<setcomp>�
show_stager � invalid stage name: %s� * %s:
r� s all_filesT)�subrepos�unknown�ignoreds show_matcher� * matcher:
r )$� rs �symbolsr' r� r r- r �identityr �analyze�optimizer r6 �addr� r rT r �parserW � prettyformatr� �substaterX r@ �walkr/ �matchallr� � matchfilesetrR r� rD �
prettyreprr� )rY rZ �exprr� rs r8 �stages�
stagenames�
showalwaysr� �treerk r� r_ r" �wctxr� ra ra rb � debugfilesetC sl "
�
�
���
�r� s debug-repair-issue6528s to-reports1 build a report of affected revisions to this files from-reports+ repair revisions listed in this report files paranoids3 check that both detection methods do the same thingc K sr t �|dddg� |�d�}|�d�}|�d�}|�d�}tj|jvr,d}t�t|���tj | |||||d� dS )a find affected revisions and repair them. See issue6528 for more details.
The `--to-report` and `--from-report` flags allow you to cache and reuse the
computation of affected revisions for a given repository across clones.
The report format is line-based (with empty lines ignored):
```
<ascii-hex of the affected revision>,... <unencoded filelog index filename>
```
There can be multiple broken revisions per filelog, they are separated by
a comma with no spaces. The only space is between the revision(s) and the
filename.
Note that this does *not* mean that this repairs future affected revisions,
that needs a separate fix at the exchange level that was introduced in
Mercurial 5.9.1.
There is a `--paranoid` flag to test that the fast implementation is correct
by checking it against the slow implementation. Since this matter is quite
urgent and testing every edge-case is probably quite costly, we use this
method to test on large repositories as a fuzzing method of sorts.
� to_report� from_report�dry_run�paranoids9 can only repair revlogv1 repositories, v2 is not affected)r� r� r� r� N)
r � check_incompatible_argumentsr r+ �REVLOGV1_REQUIREMENTr rT r rH �repair_issue6528)rY rZ r� r� r� r� r� r� ra ra rb �debug_repair_issue6528� s$ 2
�
�r� � debugformatc s� t �|�}tdd� tjD ��� ttd�� �� � fdd�}| �d|�}|�� r+dd� }nt j}|� d� |� d � td� � |� d
� | j
rK|� d � |� d � tjD ]i}|� � |� |�}|�
|�}||krld
} d}
n||jkrvd} d}
nd} d}
|jd||j�|j| d� |jdd||�|
d� |j|kr�d} nd} |j| j
dd||�| d� |j| j
dd ||j�d d� |� d � qS|�� d S ) z�display format information about the current repository
Use --verbose to get extra information about current config value and
Mercurial default.c s s � | ]}t |j�V qd S r� )rP r� )rx �fvra ra rb r � s � z debugformat.<locals>.<genexpr>s format-variantc s dd� t | � S )Ns %s:r� rg r^ ��maxvariantlengthra rb �makeformatname� s z#debugformat.<locals>.makeformatnamer� c S s t �| d�r| S | r dS dS )Ns
startswithr\ r[ )r; r ��valuera ra rb � formatvalue� s
z debugformat.<locals>.formatvaluer� s repos config defaultr� s! formatvariant.name.mismatchconfigs! formatvariant.repo.mismatchconfigs" formatvariant.name.mismatchdefaults" formatvariant.repo.mismatchdefaults formatvariant.name.uptodates formatvariant.repo.uptodaterZ rZ s repos %3ss formatvariant.config.specials formatvariant.config.defaults configs %6sr~ s %7ss formatvariant.defaultN)r' r� rp r9 �allformatvariantrP r �isplainr� r� r6 r� �fromrepo�
fromconfig�defaultrW r� re r� ) rY rZ r� r� r� r� r� � repovalue� configvalue� namelabel� repolabel� configlabelra r� rb � debugformat� s^
�� r� s debugfsinfos [PATH]� .c C s | � d| � | � dt�|�pd � | � dt�|�r dp d � | � dt�|�p*d � | � dt�|�r7dp8d � | � d t�|�rEdpFd � d}z#tjd
|d ��}t� |j
�r\dp]d}W d � n1 shw Y W n t yw Y nw | � d
| � d S )z2show information detected about current filesystems path: %s
s mounted on: %s
s (unknown)s exec: %s
r\ r[ s fstype: %s
s symlink: %s
s
hardlink: %s
s .debugfsinfo)�prefix�dirNs case-sensitive: %s
) r� r; �getfsmountpoint� checkexec� getfstype� checklink�
checknlinkr' �
namedtempfile�fscasesensitiver� �OSError)rY r� �
casesensitiverk ra ra rb � debugfsinfo6 s, � �� �� �r� s debuggetbundle� Hs heads id of head nodes ID� Cs commons id of common node� type� bzip2s bundle compression type to uses TYPEs REPO FILE [-H|-C ID]...c K s� t �|�}t�| ||�}|�d�st�d��i }|r#dd� |D �|d< |r.dd� |D �|d< d|d < |jdi |��}|�d d �� � } d
dddd�}
|
�| �} | t
j vrZt�t d���t
�
| ||| � dS )z�retrieves a bundle from a repo
Every ID must be a full-length hex node id string. Saves the bundle to the
given file.
s getbundles. getbundle() not supported by target repositoryc S � g | ]}t |��qS ra �r rh ra ra rb rz j r� z"debuggetbundle.<locals>.<listcomp>r c S r� ra r� rh ra ra rb rz l r� r3 N�
bundlecaps� debugr� r� s HG10UNs HG10BZs HG10GZs HG20)s noner� s gzips bundle2s) unknown bundle type specified with --type)r� )r' r� r r �capabler rT � getbundler �lowerr � bundletypesr � writebundle) rY �repopathr r� r r� rZ r[ �bundle�
bundletype�btypesra ra rb �debuggetbundleN s*
�
r� s debugignores [FILE]c O s. |j j}|s| �dt�|� � dS tj|d |d�}tj|dd�}|�� D ]n}t �
|�}d} d}
|dkrX||�rB|} |j � |�}
nt �
|�D ]} || �rW| } |j � | �}
nqG| r�| |krj| �td�||� � n
| �td�||�| f � |
\} }
}| �td �| |
|f � q&| �td
�||� � q&dS ) a display the combined ignore pattern and information about ignored files
With no argument display the combined ignore pattern.
Given space separated file names, shows if the given file is ignored and
if so, show the ignore rule (file and line number) that matched it.
r N)�patsT)�legacyrelativevaluer� s %s is ignored
s1 %s is ignored because of containing directory %s
s# (ignore rule in %s, line %d: '%s')
s %s is not ignored
)r@ �_ignorerW r' �bytereprr/ �match� getuipathfnr� r; �normpath�_ignorefileandliner# �finddirsr )rY rZ r� r� �ignorer� �uipathfnrk �nfr~ �
ignoredatar� �
ignorefile�linenor� ra ra rb � debugignore~ sJ
��
��
���r� �
debugindexc K s t �|�}t�|d||�}| jrt}nt}d}|D ] }t||�|���} | � d|�}|�
dd� |�d� |�f � |D ]E} |�| �}
|� |
�} |�
� |�dd| � |�dd |�| �� |�d
d ||
�� |�dd || d �� |�d
d|| d �� |�
d� q<|�� dS )z'dump index data for a storage primitiver� � � rev linkrev %s %s p2
� nodeidr+ r� s %6d s linkrevs %7d � nodes %s r r, rk r r� N)r' r� r r� � debugflagr r rP r� r r� �ljustrA r� rW �linkrevr� ) rY rZ r� r� �store�shortfn�idlenry r� rX r� rA ra ra rb �
debugindex� s4
��
r� �
debugindexdotc K s� t �|�}t�|d||�}| �d� |D ]/}|�|�}|�|�}| �d|�|d �|f � |d |j krC| �d|�|d �|f � q| �d� dS )z(dump an index DAG as a graphviz dot filer� s digraph G {
s
%d -> %d
r r s }
N)
r' r� r r� r� r� rA rW rX �nullid)rY rZ r� r� r_ ry r� �ppra ra rb �
debugindexdot� s
�r� s debugindexstatsc C sb |j �|jd� |j j}t�|d�st�td���t |�
� � � �D ]
\}}| � d||f � q!dS )z)show stats related to the changelog indexr s statss+ debugindexstats only works with native codes %s: %d
N)
rU �shortestr� r\ r; r r rT r r� �statsrc rW )rY rZ r\ r� r& ra ra rb �debugindexstats� s �r� � debuginstallc "
K s� t �|�}d}| �d|�}|�� |�ddtj� d}z t�t �tj�� W n t yA } zt
� |�}|d7 }W Y d}~nd}~ww |� |dd|� d}t
�td �r]tj�t �tj��}n ttd
d �rft j}|�d td
�t jprtd�� |�dtd�t �t�� �� |�dtd�dtjdd� � |�dtd�|p�td�� z ddl m } |j W n t y� d}Y nw t t!j"�}t!j#r�|�$d� |�dtd�|j%t&|�dd d d �� d |vr�|�'td �� d|vr�|�'td!�� |�'td"|du r�d#nd$ �� t
�(� } |�d%td&�| �)d'�d � |�d(td)�d'�*| �)d'�dd� �� d}
t
�tj+t, d ��r5tj�t �t��}
n
ttd
d ��r?t j}
|�d*td+�t-j-� |�d,td-�|
�pUtd�� t-j-d.v } | }t-j-d/v �pe| } | �pj|}
|
�r�d}z2| �r�dd0l.m/}m0}m1}m2} t3|�t3|�t3|�t3|�f |�r�dd1l m4}m5} t3|�t3|�f W n t6�y� } zt
� |�}|d7 }W Y d}~nd}~ww |� |d2d3|� t
j7j8�9� }|�d4td5�|j%t&d6d7� |D ��d8d d9d �� |�d:td;�|j%t&d<d7� |D ��d8d d9d �� t:j7�;t:j<�}|�d=td>�|j%d?d@� |D �d8d d9d �� d#}t
j=�r dA}|�'tdB�| � |j>t?t
j=�dC� t@�A� }|�dDdE|�p=dF� |� | dFtdG�� |�r�t@�BdH�\}}|�r�d}zt@j@�C|� W n t6�yz } z
t
� |�}d}W Y d}~nd}~ww |� |dId3|� nd}|� |dJtdK�|� |� | dLtdM�dN� |�s�|d7 }|� | dFtdO�� | �D� }t
�E|�}tF�G|�d }|�dPtdQ�|� tF�H|�} |� | �o�|dRkdStdT�| �o�|dRk�o�|� |� | �o�|dRkdUtdV�| �o�|� | �s|dRk�r|d7 }d} d}z| �I� } W n tJjK�y( } z
| jL}|d7 }W Y d} ~ nd} ~ ww |� | dWtdX�| � |� |dYtdZ�|� tM�M� D ]\} } t| d[d�}!|!du�rW||!| |�7 }�qA|� | dFtd\�� |�sl|j>|d]� |� |d^td_�|� |�N� |S )`z;test Mercurial installation
Returns 0 on success.
r r� s encodings checking encoding (%s)...
Nr s
encodingerrors. %s
(check that your locale is properly set)
rV rW Fs pythonexes checking Python executable (%s)
s unknowns pythonimplementations$ checking Python implementation (%s)
s pythonvers checking Python version (%s)
s %d.%d.%drK s pythonlibs checking Python lib (%s)...
)�rustexts snis pythonsecuritys& checking Python security support (%s)
s protocolrk � ,)r� �fmt�seps tls1.2sT TLS 1.2 not supported by Python install; network connections lack modern security
sV SNI not supported by Python install; may have connectivity issues with some servers
s checking Rust extensions (%s)
� missings installeds hgvers checking Mercurial version (%s)
� +s
hgverextras% checking Mercurial custom build (%s)
s hgmodulepolicys checking module policy (%s)
s hgmoduless# checking installed modules (%s)...
)s rust+cs rust+c-allow)� cs allow)�base85�bdiff�mpatch�osutil)rV r@ s extensionserrors %s
s compenginess- checking registered compression engines (%s)
c s � � | ]}|� � V qd S r� r^ rl ra ra rb r � rj z debuginstall.<locals>.<genexpr>s
compenginer� s compenginesavails, checking available compression engines (%s)
c s s � | ] }|� � r|�� V qd S r� )� availabler� rl ra ra rb r � r s compenginesservers> checking available compression engines for wire protocol (%s)
c S s g | ]
}|� � r|�� �qS ra )�wireprotosupportr� rl ra ra rb rz � � z debuginstall.<locals>.<listcomp>s availables" checking "re2" regexp engine (%s)
)�re2s templatedirss checking templates (%s)...
rw s no template directories found
s map-cmdline.defaults defaulttemplateerrors defaulttemplates checking default template (%s)
s defaulttemplatenotfounds template '%s' not found
r~ s5 (templates seem to have been installed incorrectly)
s editors checking commit editor... (%s)
s vis
vinotfoundsf No commit editor set and can't find %s in PATH
(specify a commit editor in your configuration file)
s editornotfoundsV Can't find editor '%s' in PATH
(specify a commit editor in your configuration file)
s usernames checking username (%s)
s
usernameerrorsJ checking username...
%s
(specify a username in your configuration file)
� debuginstalls no problems detected
)�problemss problemss1 %d problems detected, please check your install!
)Or' r� r r� rW r �codecsrS �sysstr� LookupErrorrD � forcebytestrre r; r �osr� �dirnamerb rV r rc rd r �sysbytes�platform�python_implementation� version_infor� r� �__doc__� ImportErrorr r3 �supportedprotocols�hassnir� rf r� r� r� r� rj �modules�__name__r% �cextr� r� r� r� r� rV r@ � Exception� compengines�_enginesr% rA �supportedwireengines�
SERVERROLE�_re2r �boolr7 � templatedir�try_open_template� frommapfile� geteditor�
expandpathrC �
shellsplit�findexe�usernamer rT �messager r� )"rY r� r r� rJ �inst� pythonlibr� �securityrh � hgmodules�rustandcr �nopurer� r� r� r� rV r@ r �wirecompenginesr r� r� �fp�editor� editorbin�cmdpathr# rm r� �mod�handlerra ra rb r � s�
��� � ��
�
�
��������
�� � �
�
�� ��
��
�� ��
�� �� �
��
�
�
�� ���
� �r s
debugknowns
REPO ID...c O sb t �|�}t�| ||�}|�d�st�d��|�dd� |D ��}| �dd� dd� |D �� � dS ) z�test whether node ids are known to a repo
Every ID must be a full-length hex node id string. Returns a list of 0s
and 1s indicating unknown/known.
s knowns* known() not supported by target repositoryc S r� ra r� rh ra ra rb rz / r� z debugknown.<locals>.<listcomp>r rw c S s g | ]}|rd p d�qS )� 1� 0ra �rx rk ra ra rb rz 0 r N)
r' r� r r r� r rT �knownrW rj )rY r� �idsr� rZ r� ra ra rb �
debugknown$ s
"r7 s debuglabelcompletes LABEL...c G s t | |g|�R � dS )zEbackwards compatibility with old bash completion scripts (DEPRECATED)N)�debugnamecomplete)rY rZ r[ ra ra rb �debuglabelcomplete3 s r9 s
debuglocks� Ls force-free-locks free the store lock (DANGEROUS)� Ws force-free-wlocks' free the working state lock (DANGEROUS)s set-locks set the store lock until stopped� Ss set-wlocks( set the working state lock until stoppedc sF |� d�r |j�d� |� d�r|j�d� |� d�s |� d�r"dS g }zV|� d�rDz
|�|�d�� W n tjyC t�t d���w |� d �rcz
|�|�
d�� W n tjyb t�t d
���w t |�ru�� t d �� W t
|� dS W t
|� nt
|� w t�� � d}� �fd d
�}|||jd|j
�7 }|||jd|j�7 }|S )a� show or modify state of locks
By default, this command will show which locks are held. This
includes the user and process holding the lock, the amount of time
the lock has been held, and the machine name where the process is
running if it's not local.
Locks protect the integrity of Mercurial's data, so should be
treated with care. System crashes or other interruptions may cause
locks to not be properly released, though Mercurial will usually
detect and remove such stale locks automatically.
However, detecting stale locks may not always be possible (for
instance, on a shared filesystem). Removing locks may also be
blocked by filesystem permissions.
Setting a lock will prevent other commands from changing the data.
The command will wait until an interruption (SIGINT, SIGTERM, ...) occurs.
The set locks are removed when the command exits.
Returns 0 if no locks are held.
�force_free_locks lock�force_free_wlocks wlockr � set_wlockFs wlock is already held�set_locks lock is already helds& ready to release the lock (y)? $$ &Yesc
s z|d�}W n t jy d }Y nw |r|�� nczI| �|�}� |tj }t�|j�}| � |�}d|v rU|�
d�\}} |t � � krLd|pGd| f }n d|pPd| |f }��
d|d ||f � W dS ty| }
z
|
jtjkrr� W Y d }
~
nd }
~
ww ��
d|d � d S )
NF� :s user %s, process %ss Nones user %s, process %s, host %ss %-6s %s (%ds)
r s
%-6s free
r )r �LockHeld�release�lstat�stat�ST_MTIMEr; r# �st_uid�readlockr� �socket� gethostnamer� r� �errno�ENOENT) r< r� �methodr� �st�ager� �locker�host�pidrm ��nowrY ra rb �report� s> �
� ���zdebuglocks.<locals>.report)r �svfsri r< r� r� r rB rT r r rP � promptchoicerC rg )rY rZ r� �locks�heldrU ra rS rb �
debuglocks9 s@
-
�
� �"rZ s debugmanifestfulltextcaches clears clear the caches adds) add the given manifest nodes to the caches NODEra c s� � fdd�}|� d�r*� �� � |� }|jdd� W d � dS 1 s%w Y |rs� �� �; � j}|�d�}|D ]&}z ||�|� } W n tjy\ }
z tjt |
�dd ��d}
~
ww | �
� q; W d � dS 1 snw Y |� }t |�s�| � t
d
�� dS | � t
d �t |�f � d } |D ]!} |�| �}
t |
�}| |d
7 } | � t
d�t| �t�|�f � q�|j�d�j}| � t
d�t�| �t�|�f � dS )z@show, clear or amend the contents of the manifest fulltext cachec s6 � j �d�} z| jW S ty td�}t�|��w )Nrw sO Current revlog implementation doesn't appear to have a manifest fulltext cache
)� manifestlog�
getstorage�_fulltextcache�AttributeErrorr r rT )r_ r� r ra rb �getcache� s �
�z,debugmanifestfulltextcache.<locals>.getcacher^ T)�clear_persisted_dataNrw s Check your manifest node id��hints cache empty
sF cache contains %d manifest entries, in order of most to least recent:
r � s id: %s, size %s
s manifestfulltextcaches% total cache data size %s, on-disk %s
)r r� r^ r[ r\ rS r r rT �bytesr� rP rW r �peekr r; � bytecount�_openerrE �st_size)rY rZ r� r� r_ �cacher� r� r� rB rm � totalsizer� r r� �ondiskra r rb �debugmanifestfulltextcache� s^
�
���
�
���
���rl � debugmergestatec O s
| j r.t�|�}|�� }|�� }|s|sn|s | �d� n|�||�r)| �d� n| �d� t�|�}|d s;d|d< tj� |�}| �
d|�}|� � |� d�}|�
� r�d|jd fd
|jd ffD ]*\} }
} |� � |j| d � |jt|
�d
� |jr�t|j�| kr�|j|j| d� q`|�� |� d�} |�
� �r;|D ]�}
| � � | j|
d� |j|
}| j|d d� |d tjtjfv r�| j|d d� | j|d d� | j|d d� | j|d d� | j|d d� | j|d d � | j|d d � n|d tjtjfv �r| j|d d � | j|d d � | � d!�}t|�|
�� � �D ]\}}|� � |j|d"� |j|d#� �q |�� q�| �� |� d!�}tt� |� � ��D ]-\}
}|
|v �rX�qMt� |�D ]\}}|� � |j|
d$� |j|d"� |j|d#� �q]�qM|�� |�� d%S )&zpprint merge state
Use --verbose to print out information about whether v1 or v2 merge state
was chosen.s no version 2 merge state
s! v1 and v2 states match: using v2
s$ v1 and v2 states mismatch: using v1
� templates� {if(commits, "", "no merge state found
")}{commits % "{name}{if(label, " ({label})")}: {node}
"}{files % "file: {path} (state \"{state}\")
{if(local_path, " local path: {local_path} (hash {local_key}, flags \"{local_flags}\")
ancestor path: {ancestor_path} (node {ancestor_node})
other path: {other_path} (node {other_node})
")}{if(rename_side, " rename side: {rename_side}
renamed path: {renamed_path}
")}{extras % " extra: {key} = {value}
"}"}{extras % "extra: {file} ({key} = {value})
"}rm s commitss localr r� r r^ r rZ s files)r� )r� )� local_keyrN )�
local_pathrK )�
ancestor_pathr
)�
ancestor_noder� )�
other_pathrT )�
other_node� )� local_flags)� renamed_path)� rename_sides extrasrY r� )�fileN) r6 �
mergestatemodr �_readrecordsv1�_readrecordsv2r� �
_v1v2matchr' r� r� r r� �nested�activer� r� r r �_labelsrP r� r� �MERGE_RECORD_UNRESOLVED�MERGE_RECORD_RESOLVED� MERGE_RECORD_UNRESOLVED_PATH�MERGE_RECORD_RESOLVED_PATHr� �extrasrc r � allextras)rY rZ r[ r� �ms� v1records� v2recordsr� �
fm_commitsr� r� � label_index�fm_filesrk r� � fm_extrasr� r& r� ra ra rb �debugmergestate� s�
�
� �
��
� r� s debugnamecompletes NAME...c s� t � }t�|j�D ]\}}|dkr|�|�|�� q |�dd� |�� �� D �� t � }|s0dg}|D ]� |�� fdd�|D �� q2| �d� t
|��� | �d� dS )z:complete "names" - tags, open branch names, bookmark namesry c s s � | ] \}}}}|s|V qd S r� ra )rx �tagr3 �tip�closedra ra rb r l s �
�
�z$debugnamecomplete.<locals>.<genexpr>rw c 3 s � | ]
}|� � �r|V qd S r� )r� r �r` ra rb r u s � r� N) r r' r �namesr� � listnames� branchmap� iterbranchesrW rj r� )rY rZ r[ r� r� �ns� completionsra r� rb r8 b s �
�r8 s debugnodemaps dump-news1 write a (new) persistent binary nodemap on stdouts dump-disks dump on-disk data on stdouts checks- check that the data on disk data are correct.s metadatas- display the on disk meta data for the nodemapc K s� |d r%|� � }|j}t�|jd�r|j�� }nt�|j�}| �|� dS |d rJ|� � }|j}t� |�}|durH|\}}| �|dd� � dS dS |d rl|� � }|j}t� |�}|durj|\}}t�
| |j|�S dS |d r�|� � }|j}t� |�}|dur�|\}}| �d|j � | �d|j � | �d t
|j� � | �d
|j � | �d |j � |jd |j }| �d
| � dS dS dS )z!write and inspect on disk nodemap�dump_new�nodemap_data_all� dump_diskN�checkr s uid: %s
s tip-rev: %d
s
tip-node: %s
s data-length: %d
s data-unused: %d
� Y@s data-unused: %2.3f%%
)r$ rU r; r r\ r� rG �persistent_datarW �persisted_data�
check_data�uid�tip_revr �tip_node� data_length� data_unused) rY rZ r� r8 r� r �nm_datar� � unused_percra ra rb � debugnodemapz sL
�
�
�r� r� � flagss markers flags record-parentss+ record parent information for the precursors display markers relevant to REV� exclusives0 restrict display to markers only relevant to REV� indexs display index of the marker� deletes# delete markers specified by indicess [OBSOLETED [REPLACEMENT ...]]c
s6 t �|�}�fdd��|�d�rig }|�d�D ] }z |�t|�� W q ty6 tjtd�| td�d��w �� � rBt�
td����� � � t �
�j|�}| �td�| � W d � d S 1 sbw Y d S |d u�r|d
rwt�d ��i }t�|d p�| �� �|d < t�fd
d�|D ��} �� � }
z|��d�} zjzK|�d�} | r�t�| �} nd } �|�}
d }|d r�|
��� vr�t�
d����� |
�� }tdd� |D ��}�jj| |
| |d || || d� | �� W n ty� } z t�
td�t� |� ��d }~ww W | � � n| � � w W |
� � d S |
� � w |d
�rBt � �|d
�}�fdd�|D �}t t!j"�||d d��}|j#dd � d � nt!�"��}|}d d � }|�d
��rh|�d ��rht!�"��}t$|�� � fd d �}| �%d|�}t&|�D ]"\}}||��s}�qr|�'� |�d ��r�|nd }t(j)|||d!� �qr|�*� d S )"zccreate arbitrary obsolete marker
With no arguments, displays the list of obsolescence markers.c s> zt | �}t|�� jjkrt� �|W S ty t�d��w )Ns> changeset references must be full hexadecimal node identifiers)r rP �
nodeconstants�nodelen� TypeErrorr �
InputError)ri r� r ra rb � parsenodeid� s ��z"debugobsolete.<locals>.parsenodeidr� s invalid index value: %rs use integers for indicesra s6 cannot delete obsmarkers in the middle of transaction.s deleted %i obsolescence markers
Nr� s+ cannot select revision when creating markers userc 3 s � | ]}� |�V qd S r� ra )rx �succ)r� ra rb r
rj z debugobsolete.<locals>.<genexpr>r� s dates record_parentss2 cannot used --record-parents on unknown changesetsc s r� r� r r� ra ra rb r
rj r� )rA r� r rY s bad obsmarker input: %sc r ra r r~ r ra rb rz .
r z!debugobsolete.<locals>.<listcomp>r� )r � exclusivec S s | j S r� )�_datar ra ra rb rW 4
s z debugobsolete.<locals>.<lambda>rY c S � dS )NTra �r� ra ra rb rW 9
� r� c s | � v S r� ra r� )� markersetra rb rW =
� )r\ )+r' r� r r� r} �
ValueErrorr r� r �currenttransactionrT r r) �deleteobsmarkers�obsstorerW r � fromlocalr# �tupler� rB r� r$ rA �creater rD r rC r r r� r" �
getmarkersr� r r � enumerater� r r� r� )rY rZ � precursor�
successorsr� �indicesr& r� r �succsr� �trr� �precrA r� r� r r� �
markerstoiter�
isrelevantr� ry r� �indra )r� r� rZ rb �
debugobsolete� s�
���
��
�
��
����
��
r� s
debugp1copiess revision to debugs [-r REV]c K �L t �|�}tj||�d�dd�}|�� �� D ]
\}}| �d||f � qdS )z$dump copy information compared to p1r� N�r� � %s -> %s
)r' r� r/ r- r �p1copiesrc rW �rY rZ r� r8 �dst�srcra ra rb �
debugp1copiesP
�
�r� s
debugp2copiesc K r� )z$dump copy information compared to p2r� Nr� r� )r' r� r/ r- r �p2copiesrc rW r� ra ra rb r� ^
r� s debugpathcomplete� fs fulls complete an entire paths normals show only normal filesr) s show only added filesr* s show only removed filess FILESPEC...c s� ��fdd�}d}�d r|d7 }�d r|d7 }�d r!|d 7 }�� � � |s*d
g}t� t� }}|D ]}|||p:d �\} }
|�| � |�|
� q3|�|� | �d �� �fd
d�t|�D ��� | �d � dS )a) complete part or all of a tracked path
This command supports shells that offer path name completion. It
currently completes only files already known to the dirstate.
Completion extends only to the next path segment unless
--full is specified, in which case entire paths are used.c s4 �j }tj�tj�t�� | ��}�jtj }|�jkr$|�
|�s$g g fS tj� |�r.|d7 }|t |�d � }tj dk}|rD|�
tj d�}t |�}� d }t� t� }} | j|j}
} t�|�D ]6\} }
| �
|�r�|
j|v r�|rv| �
dtj �} |r}| | � q_| �tj |�}|dkr�|
| d |� � q_| | � q_|| fS )N� /�fullr )r@ r r� r� rj r rR �rootr' �ossepr� �isdirrP �replacer r� r r� �find)r� �
acceptabler@ r �rootdir�fixpaths�speclen� fullpathsr� �dirs�adddir�addfilerk rN ri )r� rZ ra rb �complete
s8
�z#debugpathcomplete.<locals>.completerw �normals nmr2 r� r3 rq r� s nmarr� c 3 s � | ] }�� |� �V qd S r� )�pathtor� )�cwdrZ ra rb r �
ro z$debugpathcomplete.<locals>.<genexpr>N)rR r r� rW rj r� ) rY rZ �specsr� r� r� r� r� r rk r� ra )r� r� rZ rb �debugpathcompletel
s&
$r� s debugpathcopiess# hg debugpathcopies REV1 REV2 [FILE])� inferrepoc O s\ t �||�}t �||�}t �|||�}tt�|||��� �D ]
\} }
| �d|
| f � q dS )z!show copies between two revisionsr� N)r/ r- r� r� r �
pathcopiesrc rW ) rY rZ r] r^ r� r� �ctx1�ctx2r� r� r� ra ra rb �debugpathcopies�
s �r� s debugpeerc C s� ddi}| � |��S t�| i |�}z=|�� du}|�� }| �td�|�� � | �td�|r2td�ntd� � | �td�|rCtd�ntd� � W |�� n|�� w W d � dS 1 s_w Y dS ) z+establish a connection to a peer repository)s devels debug.peer-requestTNs url: %s
s
local: %s
r\ r[ s
pushable: %s
) �configoverrider r r� �canpushrW r r: r )rY r� � overridesr r� r� ra ra rb � debugpeer�
s � "�"�r� s debugpickmergetools check for files in this revision� changedeletes! emulate merging change and deletes [PATTERN]...c O sh t �|�}i }|d r |d |d< | �dt �|d � � | �|d��� tj�d�}|dur8| �dt �|� � | �dd �}|rJ| �d
t �|� � t �
||�d ��}t � |||�}|d } |� |�D ]>}
||
} | j
sr| jd
d�nt�� � t�|| |
| �� d| �� v | �\} }
W d � n1 s�w Y | �d|
| f � qcW d � dS 1 s�w Y dS )af examine which merge tool is chosen for specified file
As described in :hg:`help merge-tools`, Mercurial examines
configurations below in this order to decide which merge tool is
chosen for specified file.
1. ``--tool`` option
2. ``HGMERGE`` environment variable
3. configurations in ``merge-patterns`` section
4. configuration of ``ui.merge``
5. configurations in ``merge-tools`` section
6. ``hgmerge`` tool (for historical reason only)
7. default tool for fallback (``:merge`` or ``:prompt``)
This command writes out examination result in the style below::
FILE = MERGETOOL
By default, all files known in the first parent context of the
working directory are examined. Use file patterns and/or -I/-X
options to limit target files. -r/--rev is also useful to examine
files in another context without actual updating to it.
With --debug, this command shows warning messages while matching
against ``merge-patterns`` and so on, too. It is recommended to
use this option with explicit file patterns and/or -I/-X options,
because this option increases amount of output per file according
to configurations in hgrc.
With -v/--verbose, this command shows configurations below at
first (only if specified).
- ``--tool`` option
- ``HGMERGE`` environment variable
- configuration of ``ui.merge``
If merge tool is chosen before matching against
``merge-patterns``, this command can't show any helpful
information, even with --debug. In such case, information above is
useful to know why a merge tool is chosen.
s tool)� uis
forcemerges with --tool %r
s debugmergepatternss HGMERGENs with HGMERGE=%r
r� s merges with ui.merge=%r
r� r� T)r r� s %s = %s
)r' r� �
notenoi18nr� r� r �environr �configr/ r- r� r� r� �silentr; r1 r � _picktool�isbinaryr� rW )rY rZ r� r� r� �hgmerge�uimerger8 r� � changedeleter� �fctx�tool�toolpathra ra rb �debugpickmergetool�
sF
5 ���
� � �"�r s debugpushkeys REPO NAMESPACE [KEY OLD NEW]c
O s� t �| i |�}z_|rB|\}}}|�� �} | �d||||d���� }
W d � n1 s+w Y | �t�|
�d � |
W |�� S t t�
|� |���D ]\} } | � dt
�| �t
�| �f � qLW |�� dS |�� w )z�access the pushkey key/value protocol
With two args, list the keys in the given namespace.
With five args, set a key to new if it currently is set to old.
Reports success or failure.
s pushkey)s namespaces keyr� s newNr� s %s %s
)r r �commandexecutor� callcommand�resultr� r' r� r r� r �listkeysrW rD � escapestr)
rY r� � namespace�keyinfor� �targetr$ �old�newrm r_ r� r& ra ra rb � debugpushkey0 s6
��� �
����r s debugpvecs A Bc C s� t �||�}t �||�}t�|�}t�|�}||kr d}n||kr$d}n
||k r+d}n||B r1d}| �td�| � | �td�| � | �td�|j|jf � | �td�t|j|j �t�|j |j �|�
|�|f � d S ) N� =� >� <� |s a: %s
s b: %s
s depth(a): %d depth(b): %d
s. delta: %d hdist: %d distance: %d relation: %s
) r/ r- r& �ctxpvecrW r �_depth�abs�_hamming�_vec�distance) rY rZ r` r� �ca�cbr� �pb�relra ra rb � debugpvecU s0
���r s& debugrebuilddirstate|debugrebuildstates revision to rebuild tos minimalsE only rebuild files that are inconsistent with the working copy parentc s� t �||�}|�� �? |j� d}|�d�r6t|�� �� �}t� �}|| }|| } � fdd�| D �}
||
B }� �|� � |�� |� W d � dS 1 sLw Y dS )a� rebuild the dirstate as it would look like for the given revision
If no revision is specified the first current parent will be used.
The dirstate will be set to the files of the given revision.
The actual working directory content or existing dirstate
information such as adds or removes is not considered.
``minimal`` will only rebuild the dirstate status for files that claim to be
tracked but are not in the parent manifest, or that exist in the parent
manifest but are not in the dirstate. It will not change adds, removes, or
modified files that are in the working copy parent.
One use of this command is to make the next :hg:`status` invocation
check the actual file content.
N�minimalc s h | ]
}� � |�js|�qS ra )� get_entryr2 r4 �r@ ra rb r � r z'debugrebuilddirstate.<locals>.<setcomp>)
r/ r- r� r@ r r rB r` �rebuildr� ) rY rZ rX r� r8 � changedfiles�
manifestfiles�
dirstatefiles� manifestonly�dsonly�
dsnotaddedra r! rb �debugrebuilddirstateq s !
"�r) s debugrebuildfncaches only-datas* only look for wrong .d files (much faster)c K s" t �|�}t�| ||�d�� dS )zrebuild the fncache files only_dataN)r' r� r) �rebuildfncacher rR ra ra rb �debugrebuildfncache� s
r+ s debugrenames [-r REV] [FILE]...c
O s� t �|�}t�||�d��}t�|||�}|�|�D ]2}|| }|�� �|� � �}|�
|�} |rC| � t d�| |d t
|d �f � q| � t d�| � qdS )zdump rename informationr� s %s renamed from %s:%s
r r s %s not renamed
N)r' r� r/ r- r r� r� �filelog�renamed�filenoder� rW r r )
rY rZ r� r� r8 r� r r �or ra ra rb � debugrename� s
&�r0 s debugrequires|debugrequirementsc C s" t |j�D ] }| �d| � qdS )z#print the current repo requirementsr N)r� r+ rW )rY rZ r_ ra ra rb �debugrequirements� s �r1 � debugrevlog� d� dumps dump index datac E sJ
t �|�}t�|d||�}|�d�r�t|�}| �d� d}t� }t �|�D ]s}|� |�} | dkr2|} |�
|�}
|� |�} |� |�\} }
|�
|�}|| }|t|� |��8 }|�|� z ||�|� }W n tyn d}Y nw | �d|| |
|�|�|�|�|�| �|�|
�|�| �|�|
�|||t|�| f � q%dS |j}|j}g }d}|tj@ r�|�d� |tj@ r�d }|�d
� |s�d g}d}d}d}d}d}d}t�d d
� �}d}d} d} d} d} d} g }!g }"g }#g d�}$g d�}%g d�}&t�dd
� �}'g d�}(i })i }*dd� }+t|�}t �|�D �]?}|� |�\} }
|� |�},|dk�r)|+|�
|�|$� |
tk�r2|d7 }|�|�}-|,tk�ru|!�d� |"�|�|�� |#�|-� |-dk�r\|d7 }|d7 }n�|d7 }|d d7 < |+|-|%� |+|-|'d � n�|!�|!|, d � |"|, }.|�|�}/|"�|.� |#�|/|. |- � |-dk�r�|d7 }|d7 }ne|� |��r�|+|-|&� |d7 }|� |�}0||0 d7 < |+|-|'|0 � nA|+|-|(� |,|d k�r�|d7 }|,| k�r�| d7 } n'|,|
k�r�| d7 } n |,| k�r�| d7 } n|,|
k�r�| d7 } n |,tk�r| d7 } t � |d��r|� ||�d }1n |j!� ||�d }1|1�r-t"|1dd� �}2nd}2|2|)v�r<d|)|2< d|*|2< |)|2 d7 < |*|2 |-7 < �q
|$|%|&|(fD ]}-|-d du �rad|-d< �qT|| | | }3|| | }4|$d }5|$d | < |%d }6|dk�r�d|%d< n|%d | < |&d }7i }8|dk�r�|&d | < |'D ]}0|'|0 d |8|0< |'|0 d ||0 < �q�|(d }9|3dk�r�|(d |3 < |6|7 |9 }:t#|!�| };t$|!�}<t$|#�}=d}>|:�r�|5|: }>d� d�� fdd�}?dB�fdd � }@d d � }A| �%d | � | �%d d!�&|� � | �d"� |@|:�}B|?|:�}C| �%d#|C| � | �%d$|B|A||� � | �%d%|B|A|| |� � | �%d#|C| � | �%d&|B|A||� � | �%d'|B|A||| � � | �%d(|B|A||| � � | �%d)|B|A|| |� � t'|�D ]}0| �d*|0 |B|A||0 |� � �q�| �%d+|B|A|3|� � | �%d,|C|: � | �%d)|B|A|6|7 |:� � t'|�D ]}0| �d*|0 |B|A|8|0 |:� � �q�| �%d+|B|A|9|:� � d-d.� }D| �d"� | �%d/|C| � t'|)�D ]}2| �|D|2�� | �|B|A|)|2 |� � �q�| �%d0|C|: � t'|)�D ]}2| �|D|2�� | �|B|A|*|2 |:� � �q | �d"� |?t$|;|<|=|>��}B| �%d1|B|; � | �%d2|B|< � | �%d3|B|= � | �%d4|B|> � |dk�rx| �d"� | �%d5t(|$� � | �%d6t(|%� � | �%d7t(|&� � t'|'�D ]}0|0dk�r��q�| �%d8|0ft(|'|0 � � �q�| �%d9t(|(� � |3dk�r!| �d"� |@|3�}B|@|3d:�}C| �%d;|B|A||3� � |dk�r�| �%d<|C|A| |� � | �%d=|C|A| |� � | �%d>|C|A|4|� � |�r#| �%d?|B|A| |3� � | �%d@|B|A| |3� � | �%dA|B|A| |3� � dS dS dS )Cz'show data and statistics about a revlogr2 r4 se # rev p1rev p2rev start end deltastart base p1 p2 rawsize totalsize compression heads chainlen
r r} s: %5d %5d %5d %5d %5d %10d %4d %4d %4d %7d %9d %11d %5d %8d
Fs inlineTs generaldeltas (none)c S r� �Nr ra ra ra ra rb rW $ r� z debugrevlog.<locals>.<lambda>�Nr r c S s g d�S )Nr6 ra ra ra ra rb rW ; r� c S sH |d d u s | |d k r| |d< | |d kr| |d< |d | 7 < d S )Nr r rN ra )r� r� ra ra rb �addsize@ s
z debugrevlog.<locals>.addsizer s _getsegmentforrevs� emptyNrN s %%%dd
s %%%dd %s(%%5.2f%%%%)
c s � t t| �� S r� �rP �str)rp )� basedfmtstrra rb �dfmtstr� s z debugrevlog.<locals>.dfmtstrc s � t t| ��d| f S )Nr� r9 )rp �padding)� basepcfmtstrra rb �pcfmtstr� s z debugrevlog.<locals>.pcfmtstrc S s |r | dt | � | fS | dfS )N�d r� )r� )r� r| ra ra rb �pcfmt� s zdebugrevlog.<locals>.pcfmts format : %d
s flags : %s
r� r� s revisions : s merges : s normal : s empty : s text : s delta : s snapshot : s lvl-%-3d : s deltas : s revision size : c S s< | dkrd| S | t �tj�v rdt| �| f S dt| � S )Nr8 s
%s : s 0x%s (%s) : s 0x%s : )r' r� �string�
ascii_lettersr )� chunktypera ra rb � fmtchunktype� s
z!debugrevlog.<locals>.fmtchunktypes chunks : s chunks size : s avg chain length : s max chain length : s max chain reach : s compression ratio : s4 uncompressed data size (min/max/avg) : %d / %d / %d
s4 full revision size (min/max/avg) : %d / %d / %d
s4 inter-snapshot size (min/max/avg) : %d / %d / %d
s5 level-%-3d (min/max/avg) : %d / %d / %d
s4 delta size (min/max/avg) : %d / %d / %d
r
s deltas against prev : s where prev = p1 : s where prev = p2 : s other : s deltas against p1 : s deltas against p2 : s deltas against other : �r ))r' r� r r� r rP rW r r� � deltaparentr� r� r� �rawsizer� r� �ZeroDivisionErrorr� �_format_version�
_format_flagsr, �FLAG_INLINE_DATAr� �FLAG_GENERALDELTAr � defaultdictr r� �
issnapshot�
snapshotdepthr; r �_getsegmentforrevs�_revlogrd �sumrp r� rj r� r� )ErY rZ r� r� r_ �numrevs�tsr3 rX �dbase�cbase�clenr� r� �rsrA �formatr& r� �gdelta� nummerges�numempty� numemptytext�
numemptydelta�numfull�numsemi� numsnapdepth�numprev�nump1�nump2�numother� nump1prev� nump2prev� chainlengthsr� �
chainspans�datasize�fullsize�semisize�
snapsizedepth� deltasize�chunktypecounts�chunktypesizesr7 r� r� �baseaddr�revaddr�depth�segmentrD � numdeltas�numoprev� totalrawsize� fulltotal� semitotal� snaptotal�
deltatotalrj � avgchainlen� maxchainlen� maxchainspan� compratior< r? rA r� �fmt2rE ra )r; r> rb � debugrevlog� sF
�
����
�
�
������ ��� ��
������
����
�
�������r� � debugrevlogindex� formats
revlog formats FORMATs [-f FORMAT] -c|-m|FILEc K sd t �|�}t�|d||�}|�dd�}|dvr t�td�| ��| jr&t }nt
}d}|D ] }t ||� |���} |dkr_| j
rO| �dd�|�d �|�f � n,| �d
d�|�d �|�f � n |d kr{| j
rq| �d d�|� � n
| �d
d�|� � |D ]�}|� |�} |dkr�z|�| �}
W n ty� |j|jg}
Y nw | j
r�| �d||�|�|�|�|�|�|| �||
d �||
d �f � q}| �d||�|�|| �||
d �||
d �f � q}|d k�r/|�|�} | j
�r| �d||�|�|�|�|�|�|�|�|�|�| d | d || �f � q}| �d||�|�|�|�|�|�| d | d || �f � q}dS )z#dump the contents of a revlog indexr� r� r )r r s unknown format %dr� s* rev offset length linkrev %s %s p2
r� r+ r� r s? rev flag offset length size link p1 p2 %s
s- rev flag size link p1 p2 %s
s % 6d % 9d % 7d % 7d %s %s %s
s % 6d % 7d %s %s %s
s+ % 6d %04x % 8d % 8d % 8d % 6d % 6d % 6d %s
s! % 6d %04x % 8d % 6d % 6d % 6d %s
N)r' r� r r� r r rT r r� r r rP r� r6 r� r� �rjustrA r r� rW r� r� r� r� r� rH ) rY rZ r� r� r_ rZ r� r� ry r� r� �prra ra rb �debugrevlogindex4
s�
��������
�
���
���
��������r� s debugrevspec� optimizes/ print parsed tree after optimizing (DEPRECATED)s show-revss( print list of result revisions (default)s show-sets+ print internal representation of result sets no-optimizeds" evaluate tree without optimizations verify-optimizeds verify optimized results REVSPECc s� t �|�}��d�� ddd� fd� �fdd�fdtjfdtjfd tjfg}|d
r/|d d � }|d
r>|d
r>t�t d���dd� |D �}t
� }t
� }�j rg|d sg|� d� |�
ddg� |d rg|� d � |d rv|d rvt�t d���|d dgkr�|�
|� n|d D ]}||vr�t�t d�| ��q�|�
|d � i } d }
tj|t�|�d�} |D ]2\}} | | � | |< } ||v s�||v r�| |
kr�|d s�|dkrՈ�d| � ��t�| �d� | }
q�|d
�r�t�| d �|�}
t�| d �|�}|d �s|d d u �r �j �r ��dt�|
�d� ��dt�|�d� t|
�}
t|�}|
|k�r+d S �jd d d � �jd d!d � t�d |
|�}|�� D ]N\}}}}}|d"v �rc|
||� D ] }�jd#| d$d � �qV|d%v �r{|||� D ] }�jd&| d'd � �qn|d(k�r�|
||� D ]
}��d)| � �q��qDd*S t�| �}||�}|d �s�|d d u �r��j �r���d+t�|�d� |d, �s�d S |D ]
}��d-| � �q�d S ).a� parse and apply a revision specification
Use -p/--show-stage option to print the parsed tree at the given stages.
Use -p all to print tree at every stage.
Use --no-show-revs option with -s or -p to print only the set
representation or the parsed tree respectively.
Use --verify-optimized to compare the optimized result with the unoptimized
one. Returns 1 if the optimized result differs.
s revsetaliasrt c S � | S r� ra �r� ra ra rb rW �
r� z debugrevspec.<locals>.<lambda>s expandedc s t �| � �j�S r� )r. �
expandaliasesrD r� ��aliasesrY ra rb rW �
s s concatenatedru rv s no_optimizedNr} s verify_optimizeds1 cannot use --verify-optimized with --no-optimizedc S rw ra ra rx ra ra rb r �
r� z debugrevspec.<locals>.<setcomp>ry r� s' cannot use --optimize with --show-stager rz �rS r{ r� s show_sets * analyzed set:
s * optimized set:
r s
--- analyzed
s diff.file_arZ s +++ optimized
s diff.file_b)�deleter� s -%d
s diff.deleted)�insertr� s +%d
s
diff.inserted�equals %d
r s * set:
s show_revss %d
)r' r� rb r. �
foldconcatr� r� r rT r r r6 r� r� r� r- �lookupfnrW r� � makematcherr� rD r� r� �difflib�SequenceMatcher� get_opcodes)rY rZ r� r� r� r� r� � showchangedr� � treebystage� printedtreer� rk �arevs�brevs�smr� �alo�ahi�blo�bhir" �funcr� ra r� rb � debugrevspec�
s�
-
��
�
� �
� �
�
�r� �
debugserve� sshstdios* run an SSH server bound to process handles� logiofds$ file descriptor to log server I/O to� logiofiles file to log server I/O toc
K s� t �|�}|d st�td���d}|d r!|d r!t�td���|d rWz
t�t|d �dd�}W n0 tyV } z|j t j
krA� t�t|d �d d�}W Y d}~nd}~ww |d rct |d d
d�}t j
| ||d �}|�� dS ) z�run a server with advanced settings
This command is similar to :hg:`serve`. It exists partially as a
workaround to the fact that ``hg serve --stdio`` must have specific
arguments for security reasons.
r� s& only --sshstdio is currently supportedNr� r� s) cannot use both --logiofd and --logiofile�abr �wbs ab)�logfh)r' r� r rT r r �fdopenr} r� rK �ESPIPEr
r> � sshserver�
serve_forever)rY rZ r� r� rm ri ra ra rb �
debugserve, s&
"�� r� s debugsetparentss REV1 [REV2]c C s\ t �||��� }t �||d��� }|�� � |�||� W d � dS 1 s'w Y dS )a� manually set the parents of the current working directory (DANGEROUS)
This command is not what you are looking for and should not be used. Using
this command will most certainly results in slight corruption of the file
level histories withing your repository. DO NOT USE THIS COMMAND.
The command update the p1 and p2 field in the dirstate, and not touching
anything else. This useful for writing repository conversion tools, but
should be used with extreme care. For example, neither the working
directory nor the dirstate is updated, so file status may be incorrect
after running this command. Only used if you are one of the few people that
deeply unstand both conversion tools and file level histories. If you are
reading this help, you are not one of this people (most of them sailed west
from Mithlond anyway.
So one last time DO NOT USE THIS COMMAND.
Returns 0 on success.
s nullN)r/ r- r� r� �
setparents)rY rZ r] r^ �node1�node2ra ra rb �debugsetparents^ s
"�r� s
debugsidedatac K s& t �|�}|�d�s|�d�s|�d�r&|dur t�dtd���d|}}n |du r2t�dtd���t�|d||�}t|d|�}z
|� |�
|��}W n t yZ t� td�| ��w |r�t
|�� �}|�� | �d t|� � |D ] \}}| �d
|t|�f � | jr�| �d t�|� � qrdS dS ) zcdump the side data for a cl/manifest/file revision
Use --verbose to dump the sidedata content.r� r� r� Nr� r� rR r� s %d sidedata entries
s entry-%04o size %d
r )r' r� r r r� r r r� r rI rS r� rT r� rc r� r� rP r6 rD rN ) rY rZ r� rX r� r_ rI r$ r� ra ra rb �
debugsidedata{ s2
� ��r� � debugssls [SOURCE]c K s� t js
t�td���|s|st�td���d}t�d|| |�\}}t�|�}ddd�}|j|v rNz|j t
|j p;||j �f}W n t yM t�td���w t�td ���d
d l
m} tjt�� tjtjd d
�} zU| �|� | �d�}
| �td�|j � |j|
dd�} | s�| �td�� |�|
�s�| �td�� n | �td�� n| �td�� W | �� d S W | �� d S W | �� d S | �� w )a test a secure connection to a server
This builds the certificate chain for the server on Windows, installing the
missing intermediates and trusted root via Windows Update if necessary. It
does nothing on other platforms.
If SOURCE is omitted, the 'default' path will be used. If a URL is given,
that server is used. See :hg:`help urls` for more information.
If the update succeeds, retry the original operation. Otherwise, the cause
of the SSL error is likely another issue.
s6 certificate chain building is only possible on Windowss> there is no Mercurial repository here, and no server specifiedr~ r� i� � )s httpss sshs malformed port number in URLs, only https and ssh connections are supportedr )�win32N)� ssl_version� cert_reqs�ca_certsTs& checking the certificate chain for %s
F)�builds- certificate chain is incomplete, updating... s failed.
s done.
s$ full certificate chain is available
)r' � iswindowsr rT r rE r' r: �schemerQ r} �portr� r� r� �ssl� wrap_socketrI � PROTOCOL_TLS� CERT_NONE�connect� getpeercertr� �checkcertificatechainr ) rY rZ �sourcer� r� r: � defaultport�addrr� ri �certr� ra ra rb �debugssl� s^ ����
� �
� �r� � debugbackupbundle)rw � recoverrw s7 brings the specified changeset back into the repositorys% hg debugbackupbundle [--recover HASH]c s� t ttjjt��j�d�d ���}|jdd� dd� t �
���d�d< d �d
< t � ��� � ��fd d �}��
d
�}|rNt��|�rM| �td�| � d S n|r\td�}| j|dd� n | �td�� d S |D �]m}tj�|t�� �} tjd�| | ��
d�d�\} }
z t���| ��W n) tjy� } z td�| }td�t | j � } | j|| d� W Y d } ~ qgd } ~ ww t� ��|
��
d��\}
}|
r͇fdd�|
D �}
| � � �, zt �!| ��|
�d �d
�\�}}W n tjy� Y W d � qgw W d � n 1 �sw Y z�|�sW |� qg|�r���"� �l ��#d ��V}t��|��rk| �td �| � t�$| | �}t%�&| || �}t'|t(j)��rNt(j*�||d d | d � n |�+�d d | � W d � W d � W |� d S W d � n 1 �svw Y W d � n 1 �s�w Y nAt�,t-�.d t-�/tj�0| ����}| �d!|�1d"� � | j2�r�| �d#d �1d$�| f � nd%�d&< t �3| ��d'�}|�||� |�4� W |� qg|� w d S )(a� lists the changesets available in backup bundles
Without any arguments, this command prints a list of the changesets in each
backup bundle.
--recover takes a changeset hash and unbundles the first bundle that
contains that hash, which puts that changeset back in your repository.
--verbose will print the entire commit message and the bundle path for that
backup.
s strip-backups /*.hgc S s t j�| �S r� )r r� �getmtimer ra ra rb rW � s z#debugbackupbundle.<locals>.<lambda>T)r$ �reverserw s bundleNs forcec s� �� d�r |�� d}|D ]1}� d ur|� kr d S �fdd�| j�|�D �}�� d�r3t|�dkr3q
|d7 }|�| | � q
d S )Ns newest_firstr c s g | ] }|� j krd �qS )T)r� r� r ra rb rz s z6debugbackupbundle.<locals>.display.<locals>.<listcomp>s no_mergesrN r )r r� rU rA rP �show)r� �chlist� displayer�countr� rA )�limitr� rZ ra rb �display s
��z"debugbackupbundle.<locals>.displayr� s %s already exists in the repo
sg Recover changesets using: hg debugbackupbundle --recover <changeset hash>
Available backup changesets:s status.removedrZ s no backup changesets found
r� r� )�default_branchess"
warning: unable to open bundle %ss
(missing parent rev %s)
ra r� c s g | ]}� � |��qS ra r� )rx rX )r� ra rb rz 9 s z%debugbackupbundle.<locals>.<listcomp>s unbundles Unbundling %s
s bundle:)r� r: z%a %H:%M, %Y-%m-%ds
%s
�2 r� �
s8 {label('status.modified', node|short)} {desc|firstline}
rn F)5r� �filterr r� �isfile�globr< rj r� r' r� r �getlimitr r/ � isrevsymbolrD r r� �relpathr rR rE r' r r r r r r� r- r� r �getremotechangesr r� rm r rn r� r r� � applybundlero r� rg r� r� r� r� r6 �changesetdisplayerr )rY rZ r� r� �backupsr� � recovernoder� �backupr� r� �exrb r� �checkoutr� � cleanupfnr� rk rq �
backupdater� ra )r� r� r� rZ rb �debugbackupbundle� s� ��
��
� ���
��� �&� �� $� �� ������ ��r� s debugsubs revision to checks [-r REV] [REV]c C s\ t �||d �}t|j�� �D ] \}}| �d| � | �d|d � | �d|d � qd S )Ns path %s
s
source %s
r s
revision %s
r )r/ r- r� r� rc r� )rY rZ rX r8 r� r& ra ra rb �debugsubn s �r� s
debugshellc C s" ddl }| |d�}|j|d� dS )z�run an interactive Python interpreter
The local namespace is provided with a reference to the ui and
the repo instance (if available).
r N)rY rZ )r� )�code�interact)rY rZ r� �imported_objectsra ra rb �
debugshell{ s
�r� s debugsuccessorssetss closests# return closest successors sets onlys [REV]c O s� i }t }t}t�||�D ]I}|| }| �d||� � tj||�� |d |d�D ],} | rO| �d� | �|| d �� | dd� D ]}
| �d� | �||
�� q@| �d � q(q dS )
a} show set of successors for revision
A successors set of changeset A is a consistent group of revisions that
succeed A. It contains non-obsolete changesets only unless closests
successors set is set.
In most cases a changeset A has a single successors set containing a single
successor (changeset A replaced by A').
A changeset that is made obsolete with no successors are called "pruned".
Such changesets have no successors sets at all.
A changeset that has been "split" will have a successors set containing
more than one successor.
A changeset that has been rewritten in multiple different ways is called
"divergent". Such changesets have multiple successor sets (each of which
may also be split, i.e. have multiple successors).
Results are displayed as follows::
<rev1>
<successors-1A>
<rev2>
<successors-2A>
<successors-2B1> <successors-2B2> <successors-2B3>
Here rev2 has two possible (i.e. divergent) successors sets. The first
holds one element, whereas the second holds three (i.e. the changeset has
been split).
r �closest)r� ri s r r Nr� r� )rd r r r rW r" �successorssetsr� ) rY rZ r� r� ri �ctx2str�node2strrX r8 �succssetr� ra ra rb �debugsuccessorssets� s$ &
�
��r� s debugtagscachec C s� t �|�� �}|�d�}|D ]4}|| �� }|j|dd�}|r-t|�}|�|�s,|d7 }n |du r4d}nd}| �d|t|�|f � qdS ) z/display the contents of .hg/cache/hgtagsfnodes1s .hgtagsF)�computemissings (unknown node)Nr� s invalids %d %s %s
) �tagsmod�hgtagsfnodescacher$ ry r� �getfnoder �hasnoderW )rY rZ ri �flogr_ r� �tagsnode�tagsnodedisplayra ra rb �debugtagscache� s
��r� s
debugtemplates apply template on changesets� Ds defines define template keywords KEY=VALUEs& [-r REV]... [-D KEY=VALUE]... TEMPLATEc K s� d}|d r|du rt �td���t�||d �}i }|d D ]-}zdd� |�dd�D �\}}|r5|d kr7t�|||< W q tyL t �td
�| ��w | jrw| � d �} t
� |�}
| � t
�
|
�d � t
�|
| �} | |
krw| �d
t
�
| �d � |du r�t�| |�} tj| || d�}
| jr�|
�� \}}| �dd�t|�� � | �dd�t|�� � | �|
�|�� dS t�| ||�}| jr�|j�� \}}| �dd�t|�� � | �dd�t|�� � |D ]}|j|| fi t� |��� q�|� � dS )z�parse and apply a template
If -r/--rev is given, the template is processed as a log template and
applied to the given changesets. Otherwise, it is processed as a generic
template.
Use --verbose to print the parsed tree.
NrX rO �definec s r� r� r� rl ra ra rb r � rj z debugtemplate.<locals>.<genexpr>r r r� s malformed keyword definition: %ss
templatealiasr� s * expanded:
)� resourcess * keywords: %s
r� s * functions: %s
) r � RepoErrorr r r r� r� rT r6 rb r7 r� r� r� r� r� r �templateresources�
maketemplater�symbolsuseddefaultr� rj r� rW �
renderdefaultr> r� r' r5 r )rY rZ �tmplr� r� �propsr� r� r& r� r� �newtree�tresr> �kwds�funcsr� r_ ra ra rb �
debugtemplate� sT � �
� r s debuguigetpasss prompts prompt texts TEXTs [-p TEXT]c C s( | � |�}|du r d}| �d| � dS )z show prompt to type passwordNs <default response>�
response: %s
)�getpassr� �rY �promptr_ ra ra rb �debuguigetpass s
r s
debuguipromptc C s | � |�}| �d| � dS )zshow plain promptr N)r r� r ra ra rb �
debuguiprompt) s
r s debugupdatecachesc O st |� � �, |�� � |jtjd� W d � n1 sw Y W d � dS W d � dS 1 s3w Y dS )z'warm all known caches in the repository)�cachesN)r� r � updatecachesr? �
CACHES_ALL)rY rZ r� r� ra ra rb �debugupdatecaches7 s P�r s debugupgraderepos extra optimization to performs runs performs an upgrades backups& keep the old repository content aroundr� s select the changelog for upgrader� s select the manifest for upgrades filelogss select all filelogs for upgradec K s t j| |f|t|�|d�|��S )a0 upgrade a repository to use different features
If no arguments are specified, the repository is evaluated for upgrade
and a list of problems and potential optimizations is printed.
With ``--run``, a repository upgrade is performed. Behavior of the upgrade
can be influenced via additional arguments. More details will be provided
by the command output when run without ``--run``.
During the upgrade, the repository will be locked and no writes will be
allowed.
At the end of the upgrade, the repository may not be readable while new
repository data is swapped in. This window will be as long as it takes to
rename some directories inside the ``.hg`` directory. On most machines, this
should complete almost instantaneously and the chances of a consumer being
unable to access the repository should be low.
By default, all revlogs will be upgraded. You can restrict this using flags
such as `--manifest`:
* `--manifest`: only optimize the manifest
* `--no-manifest`: optimize all revlog but the manifest
* `--changelog`: optimize the changelog only
* `--no-changelog --no-manifest`: optimize filelogs only
* `--filelogs`: optimize the filelogs only
* `--no-changelog --no-manifest --no-filelogs`: skip all revlog optimizations
)�runr� r� )r9 � upgraderepor )rY rZ r r� r� r� ra ra rb �debugupgraderepo> s .�
��r s debugwalks [OPTION]... [FILE]...c
s� t �|�}t�� d ||�}| jr| �dt�|�d� t� d � |��}|s(dS dd� }| �
dd�r;t j dkr;d d� }d
t d d � |D ��t � fd
d �|D ��f }|D ] }|||� �
|��|�|�rddpedf } | �d| �� � qSdS )z&show how files match on given patternsNr r� c S r� r� ra r� ra ra rb rW } r� zdebugwalk.<locals>.<lambda>r� s slashr� c S s
t �| �S r� )r; r� r� ra ra rb rW �
s f %%-%ds %%-%ds %%sc S r� ra rg �rx r ra ra rb rz � r� z debugwalk.<locals>.<listcomp>c s g | ] }t � �|���qS ra )rP r� r r ra rb rz � rX s exactrw r )r' r� r/ r� r6 r� rD r� r� r� �
configboolr� rp r� �exactrW �rstrip)
rY rZ r� r� r� rc rk r� r r� ra r rb � debugwalkq s,
� ��r s debugwhyunstablec C sj t �|t�||��D ](}d}|�d�r!d�dd� |d D ��d }| �d|d ||d |d f � q
d
S ) z$explain instabilities of a changesetrw s divergentnodesr� c s s$ � | ]
}d |� � |�� f V qdS )s %s (%s)N)r �phasestr)rx r8 ra ra rb r � s
� �
�z#debugwhyunstable.<locals>.<genexpr>s %s: %s%s %s
s instabilitys reasonr� N)r" � whyunstabler/ r- r rj rW )rY rZ rX r� �dnodesra ra rb �debugwhyunstable� s
������r" s
debugwireargs))rw � threerw r# )rw � fourrw r$ )rw � fiverw r% s REPO [OPTIONS]... [ONE [TWO]]c O s� t �|�}t�| ||�}zRtjD ]}||d = qi }t �|�D ]
\}}|r)|||< q t �|�}|j|i |��} |j|i |��}
| � d| � | |
krX| �
d|
� W |� � d S W |� � d S |� � w )Nr r ) r' r� r r r �
remoteoptsr r5 �
debugwireargsrW rD r ) rY r� �valsr� rZ �optr[ r� r& �res1�res2ra ra rb r' � s&
�
�r' c c s� � d }g }d}| D ]M}|� � }|sq |�d�rq |�d�s+|r$||fV |}g }d}q |s4t�td���t|�t|�� � }||krO|rO|d |�� 7 < q |�|� |}q |r`||fV d S d S )Nr � #r� s indented line outside of blockr} )r r� r rT r rP �lstripr� )rR � activeaction�
blocklines�
lastindentr� r� ra ra rb �_parsewirelangblocks� s6 �
�r1 s debugwireproto� localsshs! start an SSH server for this repo� peers( construct a specific version of the peer� noreadstderrs% do not read from stderr of the remotes nologhandshakes, do not log I/O related to the peer handshakec * s^ t �|�}|d r|st�td���|d r'|d dvr'tjtd�td�d��|r4|d r4t�td���| �� r?| �td �� tt| j ��}d
}d
}d
}d
}d
} |d r�t
� � d |j d d
g }
t
jt �t
j|
�t
jt
jt
jdd�}|j}|j}|j}| js�|d dkr�tj| |jddd�}tj| |jddd�}tj| |jddd�}d} |d } |d dkr�| �td�� tj| | ||||d
| d�}
n�|d dkr�| �td�� d
}
n�| �td �� tj| | ||||| d�}
n~|�r^t� |�}|j d kr�t�td ���|� � \} }d d i}| j�r|� | d!dd"d#�d$�� | j �r d|d% d&< |d dk�r*d"|d'< t!j"| |fi |��} |d dk�rE| �td�� d
}
n |d �rUt�td(�|d ��t#j| || d)�}
nt�td*���d
}|D �]&\}}|d+v �r�|�s}t�td,���d-�$d.d/� |D ��}t%�&|�}|�|� |d0k�r�|�'� �qi|d1k�r�|�s�t�td2���|�'� �qi|�(d3��r�|
�s�t�td4���|�)d5d6�d6 }i }
|D ]6}|�*� �)d5d6�}t+|�d6k�r�|d }d-}n|\}}|�(d7��r�t%�,|d8d
� �}nt%�&|�}||
|< �q�|d
u�r|�-||
f� �qi| �.td9�| � d:|
v �rdt/|
d: d;��2}|
d:= |
j0||fi t �1|
���\}} | �.td<�t%�2|� � | �.td=�t%�2| � � W d
� n 1 �s]w Y �qi|
�3� �} | �4||
��5� }W d
� n 1 �s|w Y | �.td>�t%j6|dd?d@� � �qi|dAk�r�|d
u�r�t�tdB���g }�qi|dCk�r�| �.tdD�t+|� � |
d
u�s�J �t7|
�8|��D ]\} } | �.tdE�| t%�2| �f � �q�d
}�qi|�(dF��r�| �s�t�tdG���|�)d5d?�} t+| �dHk�rt�tdI���| d6d
� \� }!i }"d
}#g }$|D ]k}|�*� }t9�:dJ|�}%|%�r6t �;|%�<d6��}t �;|%�<d?��}||"|< �q|�(dK��r\t/|�)d5d6�dL�� }|�=� }#W d
� n 1 �sUw Y �q|�(dM��rtt>�?|t+dM�d
� �}&|$�-|&� �qt�tdN�| ��||! } |$�r�d-�$dOd/� |$D ��}#t!j@�At �;| �|#|"�}'� fdPdQ�|'_Bz | �/|'�}|�=� }#W n tjCjD�y� } ztE| dRdSdQ� �� W Y d
} ~ �qid
} ~ ww |jF�GdT�}(|(dUk�r�| �tdV�t%j6tH�I|#�dd?d@� � �qi|dWk�r�|
d
u�s�J �|
�J� �qi|dXk�r |�r|�st�tdY���|�J� |�=� |�=� �qi|dZk�r1|�s+t�td[���|�K� �qi|d\k�rF|�s@t�td]���|�K� �qi|�(d^��rgtL|�)d5d6�d6 �})|�s`t�td_���|�=|)� �qi|�(d`��r�tL|�)d5d6�d6 �})|�s�t�tda���|�=|)� �qit�tdb�| ��|d
u�r�t�tdc���|
�r�|
�J� |�r�|�M� d
S d
S )da� send wire protocol commands to a server
This command can be used to issue wire protocol commands to remote
peers and to debug the raw data being exchanged.
``--localssh`` will start an SSH server against the current repository
and connect to that. By default, the connection will perform a handshake
and establish an appropriate peer instance.
``--peer`` can be used to bypass the handshake protocol and construct a
peer instance using the specified class type. Valid values are ``raw``,
``ssh1``. ``raw`` instances only allow sending raw data payloads and
don't support higher-level command actions.
``--noreadstderr`` can be used to disable automatic reading from stderr
of the peer (for SSH connections only). Disabling automatic reading of
stderr is useful for making output more deterministic.
Commands are issued via a mini language which is specified via stdin.
The language consists of individual actions to perform. An action is
defined by a block. A block is defined as a line with no leading
space followed by 0 or more lines with leading space. Blocks are
effectively a high-level command with additional metadata.
Lines beginning with ``#`` are ignored.
The following sections denote available actions.
raw
---
Send raw data to the server.
The block payload contains the raw data to send as one atomic send
operation. The data may not actually be delivered in a single system
call: it depends on the abilities of the transport being used.
Each line in the block is de-indented and concatenated. Then, that
value is evaluated as a Python b'' literal. This allows the use of
backslash escaping, etc.
raw+
----
Behaves like ``raw`` except flushes output afterwards.
command <X>
-----------
Send a request to run a named command, whose name follows the ``command``
string.
Arguments to the command are defined as lines in this block. The format of
each line is ``<key> <value>``. e.g.::
command listkeys
namespace bookmarks
If the value begins with ``eval:``, it will be interpreted as a Python
literal expression. Otherwise values are interpreted as Python b'' literals.
This allows sending complex types and encoding special byte sequences via
backslash escaping.
The following arguments have special meaning:
``PUSHFILE``
When defined, the *push* mechanism of the peer will be used instead
of the static request-response mechanism and the content of the
file specified in the value of this argument will be sent as the
command payload.
This can be used to submit a local bundle file to the remote.
batchbegin
----------
Instruct the peer to begin a batched send.
All ``command`` blocks are queued for execution until the next
``batchsubmit`` block.
batchsubmit
-----------
Submit previously queued ``command`` blocks as a batch request.
This action MUST be paired with a ``batchbegin`` action.
httprequest <method> <path>
---------------------------
(HTTP peer only)
Send an HTTP request to the peer.
The HTTP request line follows the ``httprequest`` action. e.g. ``GET /foo``.
Arguments of the form ``<key>: <value>`` are interpreted as HTTP request
headers to add to the request. e.g. ``Accept: foo``.
The following arguments are special:
``BODYFILE``
The content of the file defined as the value to this argument will be
transferred verbatim as the HTTP request body.
``frame <type> <flags> <payload>``
Send a unified protocol frame as part of the request body.
All frames will be collected and sent as the body to the HTTP
request.
close
-----
Close the connection to the server.
flush
-----
Flush data written to the server.
readavailable
-------------
Close the write end of the connection and read all available data from
the server.
If the connection to the server encompasses multiple pipes, we poll both
pipes and read available data.
readline
--------
Read a line of output from the server. If there are multiple output
pipes, reads only the main pipe.
ereadline
---------
Like ``readline``, but read from the stderr pipe, if available.
read <X>
--------
``read()`` N bytes from the server's main output pipe.
eread <X>
---------
``read()`` N bytes from the server's stderr pipe, if available.
Specifying Unified Frame-Based Protocol Frames
----------------------------------------------
It is possible to emit a *Unified Frame-Based Protocol* by using special
syntax.
A frame is composed as a type, flags, and payload. These can be parsed
from a string of the form:
<request-id> <stream-id> <stream-flags> <type> <flags> <payload>
``request-id`` and ``stream-id`` are integers defining the request and
stream identifiers.
``type`` can be an integer value for the frame type or the string name
of the type. The strings are defined in ``wireprotoframing.py``. e.g.
``command-name``.
``stream-flags`` and ``flags`` are a ``|`` delimited list of flag
components. Each component (and there can be just one) can be an integer
or a flag name for stream flags or frame flags, respectively. Values are
resolved to integers and then bitwise OR'd together.
``payload`` represents the raw frame payload. If it begins with
``cbor:``, the following string is evaluated as Python code and the
resulting object is fed into a CBOR encoder. Otherwise it is interpreted
as a Python byte string literal.
r2 s --localssh requires a repositoryr3 )� raw� ssh1s invalid value for --peers! valid values are "raw" and "ssh1"ra s/ cannot specify --localssh with an explicit paths (waiting for commands on stdin)
Ns -Rr� s
--sshstdior )�stdin�stdout�stderr�bufsizer5 � iT)�logdataru r� s ssh://localserverr4 r6 s. creating ssh peer for wire protocol version 1
)�autoreadstderrs using raw connection to peer
s) creating ssh peer from handshake results
s https* only http:// paths are currently supported� useragents Mercurial debugwireprotorz F)r< � logdataapis)� loggingfh� loggingname� loggingoptsrB r? �
sendaccepts' --peer %s not supported with HTTP peers)�openers$ unsupported connection configuration)r5 � raw+s! cannot call raw/raw+ on this peerrw c s r� r� )r- r� ra ra rb r O rj z!debugwireproto.<locals>.<genexpr>rE s flushs cannot call flush on this peers commands6 cannot send commands unless peer instance is availabler� r s eval:r� s sending %s command
s PUSHFILE�rbs result: %s
s remote output: %s
r rN )�bprefixr� s
batchbegins nested batchbegin not alloweds batchsubmits# sending batch with %d sub-commands
s response #%d: %s
s httprequest s+ cannot use httprequest without an HTTP peerrK sD invalid httprequest: expected format is "httprequest <method> <path>s ^([a-zA-Z0-9_-]+): (.*)$s BODYFILE s rbs frame s# unknown argument to httprequest: %sc s rf r� )rd r4 ra ra rb r � rj c s
t �� �S r� )r' r ra �rM ra rb rW � r z debugwireproto.<locals>.<lambda>r� c S s d S r� ra ra ra ra rb rW � r� z Content-Typezapplication/mercurial-cbors cbor> %s
s closes
readavailables( readavailable not available on this peers readlines# readline not available on this peers ereadlines$ ereadline not available on this peers read s read not available on this peers eread s eread not available on this peers unknown action: %ss unclosed "batchbegin" request)Nr' r� r rT r � interactiverW r� r1 r� rC �hgcmdr� �
subprocess�Popen�rapply� tonativestr�PIPEr7 r8 r9 r6 r; �makeloggingfileobjectr2 � sshv1peer�makepeerrE r: r� �authinfor� r� rO rD r rj rD � unescapestr�flushr� r� r- rP �evalpythonliteralr� r� r
� _callpushr5 r r r r rN r� � _submitbatch�rer� �strurl�groupr� r= �makeframefromhumanstring�urlreq�request�
get_method�urlerr�urlerrorr �headersr r@ � decodeallr �readliner} �kill)*rY rZ r� r� �blocks�procr7 r8 r9 rD r[ r: r= r �urS �
openerargs�batchedcommandsr; �linesr �commandr� �fieldsr$ r� rR �resrQ rm ry �chunkr^ �httppathrb �body�framesr� �frame�req�ctr� ra rH rb �debugwireproto� s(
L � � �
�
�
�
�
�
����
�
�
��
�
�� ��
���
��� � ��
�� �
�
��
����
�
�rv )NFFFFr5 rF r� )NN)r~ )r� )ra )rw )FNT)��
__future__r r� r r r/ r� rK r� r_ r r r% rY rI r� rE rB rK rc rg �i18nr r� r r r r r' r r
r� r r r
r r r r r r r r r r r r r r r r �lockmodr r rz r r! r" r# r$ r% r& r( r) r* r+ r, r- r. r/ r0 r1 r2 r3 r4 r5 r6 r� r7 r8 r9 r: rO r; r< rQ r= r> �
interfacesr? �utilsr@ rA rB rC rD rE � revlogutilsrF r� rG rH rI rC �tabler� rl �_tablerc rl rr r� r� r� r� r r r r' r? rL rS rQ rP rv r� �debugrevlogoptsr� r� �
formatteroptsr� r� r� r& rN rP rT rp r� �
dryrunoptsr� r� r� r� r� r� r� r� r r7 r9 rZ rl � templateoptsr� r8 r� � commitopts2r� r� r� �walkoptsr� r� �
mergetooloptsr r r r) r+ r0 r1 r� r� r� r� r� r� r� �logoptsr� r� r� r� r� r r r r r r r" r' r1 rv ra ra ra rb �<module> s� � 6
����� � # )
��
��
'
�
�� <�
� 1����
$�
�
���� c��
>����� �
A������
0
G�� �
1
�$�
-
����
]��
�=
l
�����'������� � ��
<� ���� K$��� �!��� � � ` ��l����� �!d��
�$ H�� �
� �
3 �� 8����
���"��� *�����