o

�]Lb7-�@s�dd
lm
Z

ddlZddlZddlmZ
ddlmZmZ
hd�
Z	dd�Z
dd
d�
ZGdd
�d
e�Z
Gdd�de
�ZGdd�de
�ZGdd�de
�ZGdd�de
�Zdd�Zddd�
ZdS)�)
�absolute_importN�
)
�
_)�error�pycompat>�help�version�noninteractivecCs�|�d
�
r1|�
d�
\}}}|dd�|vr|t|�
|dfS|dd�d|vr/|t|�
|dfSdS|�d�
rg|dkrg|�d�
sg|dd�|dd�}}|
�|d	d��
}|d
krg|t|�
||
�d|d	�fSdS)
a�Check if the given arg is a valid unabbreviated option

    Returns (flag_str, has_embedded_value?, embedded_value, takes_value?)

    >>> def opt(arg):
    ...     return _earlyoptarg(arg, b'R:q', [b'cwd=', b'debugger'])

    long form:

    >>> opt(b'--cwd')
    ('--cwd', False, '', True)
    >>> opt(b'--cwd=')
    ('--cwd', True, '', True)
    >>> opt(b'--cwd=foo')
    ('--cwd', True, 'foo', True)
    >>> opt(b'--debugger')
    ('--debugger', False, '', False)
    >>> opt(b'--debugger=')  # invalid but parsable
    ('--debugger', True, '', False)

    short form:

    >>> opt(b'-R')
    ('-R', False, '', True)
    >>> opt(b'-Rfoo')
    ('-R', True, 'foo', True)
    >>> opt(b'-q')
    ('-q', False, '', False)
    >>> opt(b'-qfoo')  # invalid but parsable
    ('-q', True, 'foo', False)

    unknown or invalid:

    >>> opt(b'--unknown')
    ('', False, '', False)
    >>> opt(b'-u')
    ('', False, '', False)
    >>> opt(b'-ufoo')
    ('', False, '', False)
    >>> opt(b'--')
    ('', False, '', False)
    >>> opt(b'-')
    ('', False, '', False)
    >>> opt(b'-:')
    ('', False, '', False)
    >>> opt(b'-:foo')
    ('', False, '', False)
    �--�
=�NFT�
-s-:rr
�
:)�FrF)�
startswith�	partition�bool�find)�arg�	shortlist�namelist�flag�eq�val�
i�r�5/usr/lib/python3/dist-packages/mercurial/fancyopts.py�_earlyoptargs
1




�




rFc
Cs�g}g}d
}|t|�
kri||}|dkr||7}nOt
||
|�\}	}
}}|
s1|r1|dt|�
kr1n8|	r7|
rD|sD|rC|�|�

|d7}n n%|
|krT|�|	|f�

|d7}n|�|	||df�

|d7}|t|�
ks|�||d��

||fS)as
Parse options like getopt, but ignores unknown options and abbreviated
    forms

    If gnu=False, this stops processing options as soon as a non/unknown-option
    argument is encountered. Otherwise, option and non-option arguments may be
    intermixed, and unknown-option arguments are taken as non-option.

    If keepsep=True, '--' won't be removed from the list of arguments left.
    This is useful for stripping early options from a full command arguments.

    >>> def get(args, gnu=False, keepsep=False):
    ...     return earlygetopt(args, b'R:q', [b'cwd=', b'debugger'],
    ...                        gnu=gnu, keepsep=keepsep)

    default parsing rules for early options:

    >>> get([b'x', b'--cwd', b'foo', b'-Rbar', b'-q', b'y'], gnu=True)
    ([('--cwd', 'foo'), ('-R', 'bar'), ('-q', '')], ['x', 'y'])
    >>> get([b'x', b'--cwd=foo', b'y', b'-R', b'bar', b'--debugger'], gnu=True)
    ([('--cwd', 'foo'), ('-R', 'bar'), ('--debugger', '')], ['x', 'y'])
    >>> get([b'--unknown', b'--cwd=foo', b'--', '--debugger'], gnu=True)
    ([('--cwd', 'foo')], ['--unknown', '--debugger'])

    restricted parsing rules (early options must come first):

    >>> get([b'--cwd', b'foo', b'-Rbar', b'x', b'-q', b'y'], gnu=False)
    ([('--cwd', 'foo'), ('-R', 'bar')], ['x', '-q', 'y'])
    >>> get([b'--cwd=foo', b'x', b'y', b'-R', b'bar', b'--debugger'], gnu=False)
    ([('--cwd', 'foo')], ['x', 'y', '-R', 'bar', '--debugger'])
    >>> get([b'--unknown', b'--cwd=foo', b'--', '--debugger'], gnu=False)
    ([], ['--unknown', '--cwd=foo', '--', '--debugger'])

    stripping early options (without loosing '--'):

    >>> get([b'x', b'-Rbar', b'--', '--debugger'], gnu=True, keepsep=True)[1]
    ['x', '--', '--debugger']

    last argument:

    >>> get([b'--cwd'])
    ([], ['--cwd'])
    >>> get([b'--cwd=foo'])
    ([('--cwd', 'foo')], [])
    >>> get([b'-R'])
    ([], ['-R'])
    >>> get([b'-Rbar'])
    ([('-R', 'bar')], [])
    >>> get([b'-q'])
    ([('-q', '')], [])
    >>> get([b'-q', b'--'])
    ([('-q', '')], [])

    '--' may be a value:

    >>> get([b'-R', b'--', b'x'])
    ([('-R', '--')], ['x'])
    >>> get([b'--cwd', b'--', b'x'])
    ([('--cwd', '--')], ['x'])

    value passed to bool options:

    >>> get([b'--debugger=foo', b'x'])
    ([], ['--debugger=foo', 'x'])
    >>> get([b'-qfoo', b'x'])
    ([], ['-qfoo', 'x'])

    short option isn't separated with '=':

    >>> get([b'-R=bar'])
    ([('-R', '=bar')], [])

    ':' may be in shortlist, but shouldn't be taken as an option letter:

    >>> get([b'-:', b'y'])
    ([], ['-:', 'y'])

    '-' is a valid non-option argument:

    >>> get([b'-', b'y'])
    ([], ['-', 'y'])
    r
r
rrN)�lenr�append�extend)
�argsrr�gnu�keepsep�
parsedopts�
parsedargs�posrr�hasvalr�takevalrrr�earlygetopt^s0R


















�
r)c@s<eZ
dZd
ZejZdd�Zdd�Zdd�Z	ej
dd	��
Zd
S)�	customoptz2Manage defaults and mutations for any type of opt.cCs
|
|_dS�
N�
�
_defaultvalue)�self�defaultvaluerrr�__init__��

zcustomopt.__init__c


C�d
S)NFr�
r.rrr�
_isboolopt��
zcustomopt._isbooloptc


Cs|jS)
z�Returns the default value for this opt.

        Subclasses should override this to return a new value if the value type
        is mutable.r,r3rrr�getdefaultvalue�szcustomopt.getdefaultvaluec
Cr2)zzAdds newparam to oldstate and returns the new state.

        On failure, abort can be called with a string error message.Nr�r.�oldstate�newparam�abortrrr�newstate�szcustomopt.newstateN)�__name__�
__module__�__qualname__�__doc__�abc�ABCMeta�
__metaclass__r0r4r6�abstractmethodr;rrrrr*�s

r*c@�eZ
dZd
d�Zdd�ZdS)�
_simpleoptc

Cst|j
ttd�
f�Sr+)�
isinstancer-r�typer3rrrr4�s
z_simpleopt._isbooloptc
Cs|Sr+rr7rrrr;�r5z_simpleopt.newstateN)r<r=r>r4r;rrrrrE��
rEcs$eZ
dZ�f
d
d�Zdd�Z�ZS)�_callableoptcs|
|_t
t|��d�

dSr+)�
callablefn�superrIr0)r.rJ�
�	__class__rrr0�s

z_callableopt.__init__cCs
|�|�
Sr+)
rJr7rrrr;�r1z_callableopt.newstate)r<r=r>r0r;�
__classcell__rrrLrrI�s
rIc@rD)�_listoptc

Cs|jdd�Sr+r,r3rrrr6�s
z_listopt.getdefaultvaluecCs|
�|�

|
Sr+)
rr7rrrr;�s


z_listopt.newstateN)r<r=r>r6r;rrrrrO�rHrOc@seZ
dZd
d�ZdS)�_intoptcCs,zt|�
WSt
y


|td
�
�

YdSw)Nsexpected int)�int�
ValueErrorrr7rrrr;
s





�z_intopt.newstateN)r<r=r>r;rrrrrP
s
rPc

CsXt|t
�r|St|�
rt|�
St|t�rt|d
d
��
St|�
td�
ur(t|�
St|�
S)z<Returns a default opt implementation, given a default value.Nr)	rFr*�callablerI�listrOrGrPrE)
�defaultrrr�_defaultopt
s








rVcs|d
uri}g}d}i}i}	i}
dd�|
D�
}|
D]�}t|�
dkr)|\}
}}}}n|\}
}}}|g
}|�
|�|g��

|�dd�}||d|
<|D]}||d|<qIt|�
|	|<|	|��||<|	|��st|
rl|
d	7}
d
d�|D�
}n2|tv
r�|D]+}|�d�
r�|d
d
�}nd|}||v
r�d||
v
s�J�
d||
d|<|�	|�

qz|
r�||
7}|r�|�
|�

q|r�t
jt|d�}n	|r�t
j}nt
j}||||�\}}|D]7\��
d}|
��d�}|r�|�d}|�}|	|}|��r�|||<qч�
fdd�}|	|�||�
|�||<q�|S)ar
    read args, parse options, and store options in state

    each option is a tuple of:

      short option or ''
      long option
      default value
      description
      option value label(optional)

    option types include:

      boolean or none - option sets variable in state to true
      string - parameter string is stored in state
      list - parameter string is added to a list
      integer - parameter strings is stored as int
      function - call function with parameter
      customopt - subclass of 'customopt'

    optaliases is a mapping from a canonical option name to a list of
    additional long options. This exists for preserving backward compatibility
    of early options. If we want to use it extensively, please consider moving
    the functionality to the options table (e.g separate long options by '|'.)

    non-option args are returned
    Nrc
Ssh|]}
|
d�qS)
rr)�.0�
orrr�	<setcomp>=
�zfancyopts.<locals>.<setcomp>�r
�
_r
rc
Ssg|]}
|
d�qS)
rr)rW�
nrrr�
<listcomp>U
rZzfancyopts.<locals>.<listcomp>sno-�)
r"TFc

st�
td
�
t��
�
�|f�
�
)Ns"invalid value %r for option %s, %s)r�
InputErrorrr�maybebytestr)
�
s��optrrrr:~
s



��zfancyopts.<locals>.abort)rr �get�replacerVr6r4�nevernegaterr�	functools�partialr)r�
gnugetoptb�getoptbr;)r!�options�stater"�early�
optaliasesrr�argmap�defmap�	negations�alllong�option�short�namerU�comment�dummy�onamesr]�insert�parse�opts�boolval�negation�objr:rrcr�	fancyopts
st

























�




�













r�)FF)FFN)�
__future__rr@rh�i18nr�rrrgrr)�objectr*rErIrOrPrVr�rrrr�<module>
s


?r