HEX
Server: Apache/2.4.52 (Ubuntu)
System: Linux spn-python 5.15.0-89-generic #99-Ubuntu SMP Mon Oct 30 20:42:41 UTC 2023 x86_64
User: arjun (1000)
PHP: 8.1.2-1ubuntu2.20
Disabled: NONE
$ pwd: /usr/lib/python3/dist-packages/twisted/conch/test/__pycache__/
Upload Files
File: //usr/lib/python3/dist-packages/twisted/conch/test/__pycache__/test_transport.cpython-310.pyc
o

^h�b��@svUdZddlZddlZddlZddlZddlZddlmZmZm	Z	m
Z
mZddlm
Z
mZddlmZddlmZddlmZmZmZddlmZdd	lmZdd
lmZddlmZddl m!Z!dd
l"m#Z#ddl$m%Z%ddl&m'Z'e#d�Z(e#d�Z)e
e*e+d<e(r�e)r�dZ,ddl-m.Z.ddl/m0Z0ddl1m2Z2ddl3m4Z4m5Z5ddlm6Z6m7Z7m8Z8m9Z9ddl:m;Z;e0��<�Z=n e(s�dZ,ne)s�dZ,dZ=Gdd�d�Z9Gdd�d�Z7Gd d!�d!�Z6d"d#�Z>d$d%�Z?Gd&d'�d'e9j@�ZAGd(d)�d)�ZBGd*d+�d+�ZCGd,d-�d-ejD�ZEGd.d/�d/e7jF�ZGGd0d1�d1eG�ZHGd2d3�d3eG�ZId4d5�ZJGd6d7�d7e'�ZKGd8d9�d9�ZLGd:d;�d;�ZMGd<d=�d=�ZNGd>d?�d?�ZOGd@dA�dA�ZPGdBdC�dCePeK�ZQGdDdE�dEeP�ZRGdFdG�dGeReLeK�ZSGdHdI�dIeReMeK�ZTGdJdK�dKeReNeK�ZUe>GdLdM�dMeReOeK��ZVGdNdO�dO�ZWGdPdQ�dQeW�ZXGdRdS�dSeXeK�ZYGdTdU�dUeX�ZZGdVdW�dWeZeLeK�Z[GdXdY�dYeZeMeK�Z\GdZd[�d[eX�Z]Gd\d]�d]e]eNeK�Z^e>Gd^d_�d_e]eOeK��Z_Gd`da�daeW�Z`Gdbdc�dce`eK�ZaGddde�dee`�ZbGdfdg�dgebeLeK�ZcGdhdi�diebeMeK�ZdGdjdk�dke`�ZeGdldm�dmeeeNeK�Zfe>Gdndo�doeeeOeK��ZgGdpdq�dqe'�ZhGdrds�dse'�ZiGdtdu�due'�ZjdS)vz5
Tests for ssh/transport.py and the classes therein.
�N)�md5�sha1�sha256�sha384�sha512)�Optional�Type)�__version__)�
ConchError)�_kex�address�service)�defer)�loopback)�	randbytes)�	iterbytes��insecureRandom)�
requireModule)�
proto_helpers)�TestCase�pyasn1�cryptography�dependencySkip)�UnsupportedAlgorithm)�default_backend)�
serialization)�dh�ec)�common�factory�keys�	transport)�keydatazCannot run without PyASN1zcan't run without cryptographyFc@s6eZdZGdd�d�ZGdd�d�ZGdd�d�ZdS)r"c@�eZdZdS)ztransport.SSHTransportBaseN��__name__�
__module__�__qualname__�r)r)�C/usr/lib/python3/dist-packages/twisted/conch/test/test_transport.py�SSHTransportBase5�r+c@r$)ztransport.SSHServerTransportNr%r)r)r)r*�SSHServerTransport8r,r-c@r$)ztransport.SSHClientTransportNr%r)r)r)r*�SSHClientTransport;r,r.N)r&r'r(r+r-r.r)r)r)r*r"4sr"c@seZdZGdd�d�ZdS)r c@r$)zfactory.SSHFactoryNr%r)r)r)r*�
SSHFactory?r,r/N)r&r'r(r/r)r)r)r*r >sr c@seZdZedd��ZdS)rcC�dS)N�r))�self�argr)r)r*�NSCsz	common.NSN)r&r'r(�classmethodr4r)r)r)r*rBsrcCstsd|_|S)Nz#x25519 not supported on this system)�X25519_SUPPORTED�skip��fr)r)r*�skipWithoutX25519Hsr:cCst�t|||��S)z3
    Return the MP version of C{(x ** y) % z}.
    )r�MP�pow)�x�y�zr)r)r*�_MPpowN�r@c@s@eZdZdZdd�Zdd�Zdd�Zdd	�Zd
d�Zdd
�Z	dS)�MockTransportBasean
    A base class for the client and server protocols.  Stores the messages
    it receives instead of ignoring them.

    @ivar errors: a list of tuples: (reasonCode, description)
    @ivar unimplementeds: a list of integers: sequence number
    @ivar debugs: a list of tuples: (alwaysDisplay, message, lang)
    @ivar ignoreds: a list of strings: ignored data
    cCs.tj�|�g|_g|_g|_g|_d|_dS)z,
        Set up instance variables.
        N)r"r+�connectionMade�errors�unimplementeds�debugs�ignoreds�gotUnsupportedVersion�r2r)r)r*rC`s
z MockTransportBase.connectionMadecCs||_tj�||�S)zZ
        Intercept unsupported version call.

        @type remoteVersion: L{str}
        )rHr"r+�_unsupportedVersionReceived)r2�
remoteVersionr)r)r*rJks�z-MockTransportBase._unsupportedVersionReceivedcCs|j�||f�dS)zp
        Store any errors received.

        @type reasonCode: L{int}
        @type description: L{str}
        N�rD�append)r2�
reasonCode�descriptionr)r)r*�receiveErrorv�zMockTransportBase.receiveErrorcC�|j�|�dS)zX
        Store any unimplemented packet messages.

        @type seqnum: L{int}
        N)rErM)r2�seqnumr)r)r*�receiveUnimplemented�z&MockTransportBase.receiveUnimplementedcCs|j�|||f�dS)z�
        Store any debug messages.

        @type alwaysDisplay: L{bool}
        @type message: L{str}
        @type lang: L{str}
        N)rFrM)r2�
alwaysDisplay�message�langr)r)r*�receiveDebug�szMockTransportBase.receiveDebugcCrR)zG
        Store any ignored data.

        @type packet: L{str}
        N)rGrM�r2�packetr)r)r*�
ssh_IGNORE�rUzMockTransportBase.ssh_IGNOREN)
r&r'r(�__doc__rCrJrPrTrYr\r)r)r)r*rBUs
	
rBc@sheZdZdZdZdZdZdZdZdZ	dZ
dZdZdZ
dZdZdd	�Zd
d�Zdd
�Zdd�Zdd�ZdS)�
MockCipherzH
    A mocked-up version of twisted.conch.ssh.transport.SSHCiphers.
    �test��F)Nr1r1rar)cCs>d|_t|�|jdkrtdt|�|jt|�|jf��|S)z~
        Called to encrypt the packet.  Simply record that encryption was used
        and return the data unchanged.
        Tr�*length %i modulo blocksize %i is not 0: %i)�usedEncrypt�len�encBlockSize�RuntimeError�r2r=r)r)r*�encrypt����zMockCipher.encryptcCs>d|_t|�|jdkrtdt|�|jt|�|jf��|S)z~
        Called to decrypt the packet.  Simply record that decryption was used
        and return the data unchanged.
        Trrb)�usedDecryptrdrerf�decBlockSizergr)r)r*�decrypt�rizMockCipher.decryptcCs
t|f�S)zs
        Make a Message Authentication Code by sending the character value of
        the outgoing packet.
        ��bytes)r2�outgoingPacketSequence�payloadr)r)r*�makeMAC�s
zMockCipher.makeMACcCst|f�|kS)zy
        Verify the Message Authentication Code by checking that the packet
        sequence number is the same.
        rm)r2�incomingPacketSequencer[�macDatar)r)r*�verify�szMockCipher.verifycCs||||||f|_dS)z"
        Record the keys.
        N)r!)r2�ivOut�keyOut�ivIn�keyIn�macIn�macOutr)r)r*�setKeys�szMockCipher.setKeysN)r&r'r(r]�
outCipTypere�	inCipTyperk�	inMACType�
outMACType�verifyDigestSizercrj�outMAC�inMACr!rhrlrqrtr{r)r)r)r*r^�s&

r^c@s(eZdZdZdd�Zdd�Zdd�ZdS)	�MockCompressionz�
    A mocked-up compression, based on the zlib interface.  Instead of
    compressing, it reverses the data and adds a 0x66 byte to the end.
    cCs|ddd�S�N���r)�r2rpr)r)r*�compress��zMockCompression.compresscCs|dd�ddd�Sr�r)r�r)r)r*�
decompress��zMockCompression.decompresscCr0)N�fr)�r2�kindr)r)r*�flush��zMockCompression.flushN)r&r'r(r]r�r�r�r)r)r)r*r��s
r�c@sFeZdZdZdZdZdZddd�Zdd�Zd	d
�Z	dd�Z
d
d�ZdS)�MockServicez�
    A mocked-up service, based on twisted.conch.ssh.service.SSHService.

    @ivar started: True if this service has been started.
    @ivar stopped: True if this service has been stopped.
    �MockServiceF�MSG_TEST�MSG_fiction)��GcCr0)Nr�r)rIr)r)r*�	logPrefix�r�zMockService.logPrefixcC�
d|_dS)z6
        Record that the service was started.
        TN)�startedrIr)r)r*�serviceStarted��
zMockService.serviceStartedcCr�)z6
        Record that the service was stopped.
        TN)�stoppedrIr)r)r*�serviceStoppedr�zMockService.serviceStoppedcCs|j�d|�dS)z:
        A message that this service responds to.
        r�N)r"�
sendPacketrZr)r)r*�ssh_TESTrAzMockService.ssh_TESTN)r&r'r(r]�namer�r��protocolMessagesr�r�r�r�r)r)r)r*r��s
r�c@s0eZdZdZdeiZdd�Zdd�Zdd�Zd	S)
�MockFactoryzL
    A mocked-up factory based on twisted.conch.ssh.factory.SSHFactory.
    �ssh-userauthcC�tj�tj�tj�tj�d�S)zG
        Return the public keys that authenticate this server.
        ��ssh-rsasssh-dsa)r!�Key�
fromStringr#�publicRSA_openssh�publicDSA_opensshrIr)r)r*�
getPublicKeys��zMockFactory.getPublicKeyscCr�)zH
        Return the private keys that authenticate this server.
        r�)r!r�r�r#�privateRSA_openssh�privateDSA_opensshrIr)r)r*�getPrivateKeysr�zMockFactory.getPrivateKeyscCst�d�}|fdd�S)a/
        Diffie-Hellman primes that can be used for key exchange algorithms
        that use group exchange to establish a prime / generator group.

        @return: The primes and generators.
        @rtype: L{dict} mapping the key size to a C{list} of
            C{(generator, prime)} tuple.
        �diffie-hellman-group14-sha1))��)�i)r�getDHGeneratorAndPrime)r2�group14r)r)r*�	getPrimes's
zMockFactory.getPrimesN)	r&r'r(r]r��servicesr�r�r�r)r)r)r*r�s		r�c@�eZdZdZdd�ZdS)�MockOldFactoryPublicKeysz�
    The old SSHFactory returned mappings from key names to strings from
    getPublicKeys().  We return those here for testing.
    cCs4t�|�}|��dd�D]
\}}|��||<q
|S)zJ
        We used to map key types to public key blobs as strings.
        N)r�r��items�blob�r2r!r��keyr)r)r*r�?s
z&MockOldFactoryPublicKeys.getPublicKeysN)r&r'r(r]r�r)r)r)r*r�9�r�c@r�)�MockOldFactoryPrivateKeysz�
    The old SSHFactory returned mappings from key names to cryptography key
    objects from getPrivateKeys().  We return those here for testing.
    cCs2t�|�}|��dd�D]	\}}|j||<q
|S)zG
        We used to map key types to cryptography key objects.
        N)r�r�r��	keyObjectr�r)r)r*r�Os
z(MockOldFactoryPrivateKeys.getPrivateKeysN)r&r'r(r]r�r)r)r)r*r�Ir�r�cCs�|j}|j}|��}tdd�td|dd�D��}t|||�}zt�|t�|t�	||����
t��|_Wnt
yJtd|�d|�d|�d	���wt�|j����j�|_dS)
Ncss�|]}d|>VqdS)�	Nr)��.0r=r)r)r*�	<genexpr>]s�z)generatePredictableKey.<locals>.<genexpr>r��z
p=z
g=z
x=�
)�p�g�
bit_length�sum�ranger<r�DHPrivateNumbers�DHPublicNumbers�DHParameterNumbers�private_keyr�dhSecretKey�
ValueError�printrr;�
public_key�public_numbersr>�dhSecretKeyPublicMP)r"r�r��bitsr=r>r)r)r*�generatePredictableKeyYs$���
�r�c@sHeZdZUdZdZeeeje	d<e
re
Zdd�Zdd�Z
dd	�ZdS)
�TransportTestCasez.
    Base class for transport test cases.
    N�klasscsht���_����_g�_dd�}��td|�t�	t
�j��j_�fdd�}�j��j�|�j_
dS)NcSsd|S)z;
            Return a consistent entropy value
            ��r))rdr)r)r*�secureRandom|sz-TransportTestCase.setUp.<locals>.secureRandomr�cs�j�||f�dS�N)�packetsrM)�messageTyperprIr)r*�stubSendPacket�sz/TransportTestCase.setUp.<locals>.stubSendPacket)r�StringTransportr"r��protor��patchr�types�
MethodTyper��_startEphemeralDH�makeConnectionr�)r2r�r�r)rIr*�setUpws

�zTransportTestCase.setUpcCs2|�d�|�tj|j�|�dd�|j|_dS)z�
        Deliver enough additional messages to C{proto} so that the key exchange
        which is started in L{SSHTransportBase.connectionMade} completes and
        non-key exchange messages can be sent and received.
        sSSH-2.0-BogoClient-1.2i
�foosbarN)�dataReceived�dispatchMessager"�MSG_KEXINIT�_A_KEXINIT_MESSAGE�	_keySetup�_KEY_EXCHANGE_NONE�_keyExchangeState�r2r�r)r)r*�finishKeyExchange�s
z#TransportTestCase.finishKeyExchangecCs&|jj|j_g|j_|j�||�dS)z�
        Finish a key exchange by calling C{_keySetup} with the given arguments.
        Also do extra whitebox stuff to satisfy that method's assumption that
        some kind of key exchange has actually taken place.
        N)r��_KEY_EXCHANGE_REQUESTEDr��_blockedByKeyExchanger�)r2�sharedSecret�exchangeHashr)r)r*�simulateKeyExchange�sz%TransportTestCase.simulateKeyExchange)r&r'r(r]r�rrr"r+�__annotations__rr7r�r�r�r)r)r)r*r�ms
r�c@�eZdZdZdZeZdS)�DHGroupExchangeSHA1Mixinz=
    Mixin for diffie-hellman-group-exchange-sha1 tests.
    �"diffie-hellman-group-exchange-sha1N)r&r'r(r]�kexAlgorithmr�
hashProcessorr)r)r)r*r���r�c@r�)�DHGroupExchangeSHA256Mixinz?
    Mixin for diffie-hellman-group-exchange-sha256 tests.
    �$diffie-hellman-group-exchange-sha256N�r&r'r(r]r�rr�r)r)r)r*r��r�r�c@r�)�	ECDHMixinz8
    Mixin for elliptic curve diffie-hellman tests.
    �ecdh-sha2-nistp256Nrr)r)r)r*r�r�rc@r�)�Curve25519SHA256Mixinz,
    Mixin for curve25519-sha256 tests.
    scurve25519-sha256Nrr)r)r)r*r�r�rc@s(eZdZUdZeZeeej	e
d<dS)�BaseSSHTransportBaseCasez,
    Base case for TransportBase tests.
    r�N)r&r'r(r]rBr�rrr"r+r�r)r)r)r*r�s
rc@s�eZdZdZer
eZde�d�e�d�e�d�e�d�e�d�e�d�e�d�e�d�e�d�e�d�d	d
Zdd�Z	d
d�Z
dd�Zdd�Zdd�Z
dd�Zdd�Zdd�Zdd�Zdd�Zdd �Zd!d"�Zd#d$�Zd%d&�Zd'd(�Zd)d*�Zd+d,�Zd-d.�Zd/d0�Zd1d2�Zd3d4�Zd5d6�Zd7d8�Zd9d:�Z d;d<�Z!d=d>�Z"d?d@�Z#dAdB�Z$dCdD�Z%dEdF�Z&dGdH�Z'dIdJ�Z(dKdL�Z)dMdN�Z*dOdP�Z+dQdR�Z,dSdT�Z-dUdV�Z.dWdX�Z/dYdZ�Z0d[d\�Z1d]d^�Z2d_d`�Z3daS)b�BaseSSHTransportTestszs
    Test TransportBase. It implements the non-server/client specific
    parts of the SSH transport protocol.
    �����������������r�r��
aes256-ctr�	hmac-sha1�noner1��cCsp|j���dd�d}|�|dt�d��|�d�td�d�}dd	�d
d�t	j
D��d}|�||�dS)
a
        Test that the first thing sent over the connection is the version
        string.  The 'softwareversion' part must consist of printable
        US-ASCII characters, with the exception of whitespace characters and
        the minus sign.

        RFC 4253, section 4.2.
        �
rarsSSH-2.0-Twisted_�asciizSSH-2.0-Nz^(�|css*�|]}|dkr|��st�|�VqdS)�-N)�isspace�re�escape�r��cr)r)r*r��s� �z9BaseSSHTransportTests.test_sendVersion.<locals>.<genexpr>z)*$)r"�value�split�assertEqual�twisted_version�encode�decoderd�join�string�	printable�assertRegex)r2�version�softwareVersion�softwareVersionRegexr)r)r*�test_sendVersion�s

����z&BaseSSHTransportTests.test_sendVersioncCslt�}|�|j�|�d�|�d�|�d�|�|jj�|�d�|�|jj�|�d|j���dS)z�
        When the peer is not sending its SSH version but keeps sending data,
        the connection is disconnected after 4KB to prevent buffering too
        much and running our of memory.
        sSSH-2-Server-Identifiers�1234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890s1235678s1234567s%Preventing a denial of service attackN)	rBr�r"r��assertFalse�
disconnecting�
assertTrue�assertInr�r2�sutr)r)r*�'test_dataReceiveVersionNotSentMemoryDOSs



z=BaseSSHTransportTests.test_dataReceiveVersionNotSentMemoryDOScCsXt�}|�|j�|�|�|j��td�}d}|�||�|j��}|�|d�dS)a@
        Test that plain (unencrypted, uncompressed) packets are sent
        correctly.  The format is::
            uint32 length (including type and padding length)
            byte padding length
            byte type
            bytes[length-padding length-2] data
            bytes[padding length] padding
        �A�BCDEFGsABCDEFG����N)	rBr�r"r��clear�ordr�rr)r2r�rWrprr)r)r*�test_sendPacketPlains



z*BaseSSHTransportTests.test_sendPacketPlaincCspt�}|�|j�|�|�t�|_}td�}d}|j��|�||�|�	|j
�|j��}|�|d�dS)z�
        Test that packets sent while encryption is enabled are sent
        correctly.  The whole packet should be encrypted.
        r*�BCs
ABC����N)
rBr�r"r�r^�currentEncryptionsr-r,r�r%rcrr�r2r��
testCipherrWrprr)r)r*�test_sendPacketEncrypted0s


�z.BaseSSHTransportTests.test_sendPacketEncryptedcCsXt�}|�|j�|�|�t�|_|j��|�td�d�|j�	�}|�
|d�dS)z�
        Test that packets sent while compression is enabled are sent
        correctly.  The packet type and data should be encrypted.
        r*�BsBAf��������N)rBr�r"r�r��outgoingCompressionr,r�r-rr)r2r�rr)r)r*�test_sendPacketCompressedMs


�z/BaseSSHTransportTests.test_sendPacketCompressedcCsxt�}|�|j�|�|�t�|_}t�|_td�}d}|j�	�|�
||�|�|j�|j�
�}|�|d�dS)z�
        Test that packets sent while compression and encryption are
        enabled are sent correctly.  The packet type and data should be
        compressed and then the whole packet should be encrypted.
        r*r/s	CBAf���������N)rBr�r"r�r^r0r�r5r-r,r�r%rcrrr1r)r)r*�test_sendPacketBoth]s


�z)BaseSSHTransportTests.test_sendPacketBothcCsht�}|�|j�|�|�|j��|�td�d�|j��d|_|�	|�
�d�|�	|jd�dS)zt
        Test that packets are retrieved correctly out of the buffer when
        no encryption is enabled.
        r*r/sextrasABCN)rBr�r"r�r,r�r-r�bufr�	getPacketr�r)r)r*�test_getPacketPlain|s

z)BaseSSHTransportTests.test_getPacketPlaincCs�t�}dd�|_|�|j�|j��t�|_}|�td�d�|j�	�}|dtj
�|_|�|�
��|�|j�|�|jd�|j|tj
d�7_|�|�
�d�|�|jd�dS)	zl
        Test that encrypted packets are retrieved correctly.
        See test_sendPacketEncrypted.
        cS�dSr�r)r)r)r)r*�<lambda>��z?BaseSSHTransportTests.test_getPacketEncrypted.<locals>.<lambda>r*�BCDNs	A�ABCDr1)rB�sendKexInitr�r"r,r^r0r�r-rrkr8�assertIsNoner9r%rjr�first)r2r�r2rr)r)r*�test_getPacketEncrypted�s


z-BaseSSHTransportTests.test_getPacketEncryptedcCsft�}|�|j�|�|�|j��t�|_|j|_|�t	d�d�|j�
�|_|�|�
�d�dS)zo
        Test that compressed packets are retrieved correctly.  See
        test_sendPacketCompressed.
        r*r>r?N)rBr�r"r�r,r�r5�incomingCompressionr�r-rr8rr9r�r)r)r*�test_getPacketCompressed�s

z.BaseSSHTransportTests.test_getPacketCompressedcCsnt�}dd�|_|�|j�|j��t�|_t�|_|j|_	|�
td�d�|j��|_
|�|��d�dS)zv
        Test that compressed and encrypted packets are retrieved correctly.
        See test_sendPacketBoth.
        cSr;r�r)r)r)r)r*r<�r=z:BaseSSHTransportTests.test_getPacketBoth.<locals>.<lambda>r*r+sABCDEFGN)rBr@r�r"r,r^r0r�r5rDr�r-rr8rr9r�r)r)r*�test_getPacketBoth�s

z(BaseSSHTransportTests.test_getPacketBothcCs>t�dddd�}d}}|jjD]}|�|�|||��qdS)z?
        Test that all the supportedCiphers are valid.
        �Ar4�C�D�N)r"�
SSHCiphersr��supportedCiphersr%�
_getCipher)r2�ciphers�ivr��cipNamer)r)r*�test_ciphersAreValid�s
�z*BaseSSHTransportTests.test_ciphersAreValidcCst|j���dd�d}||j_|j��}|�|dd�ttjf��|�|dd�d�t	�
|dd�d�\}}}}}}}	}
}}}
|�|d�|jjd	g��|�|d�|jj
��|�|d�|jj��|�|d�|jj��|�|d�|jj��|�|d�|jj��|�|	d�|jj��|�|
d�|jj��|�|d�|jj��|�|d�|jj��|�|
d
�dS)a�
        Test that the KEXINIT (key exchange initiation) message is sent
        correctly.  Payload::
            bytes[16] cookie
            string key exchange algorithms
            string public key algorithms
            string outgoing ciphers
            string incoming ciphers
            string outgoing MACs
            string incoming MACs
            string outgoing compressions
            string incoming compressions
            bool first packet follows
            uint32 0
        rrar�s����������������N�
�,s
ext-info-ss)r"rrr�r8r9rrnr�r�getNSr�supportedKeyExchanges�supportedPublicKeysrL�
supportedMACs�supportedCompressions�supportedLanguages)r2rr[�keyExchanges�pubkeys�ciphers1�ciphers2�macs1�macs2�
compressions1�
compressions2�
languages1�
languages2r8r)r)r*�test_sendKexInit�s>

��z&BaseSSHTransportTests.test_sendKexInitcCs.|j��|j�tj|j�|�|jg�dS)zy
        Immediately after connecting, the transport expects a KEXINIT message
        and does not reply to it.
        N)r"r,r�r�r�r�rr�rIr)r)r*�test_receiveKEXINITReply�s
z.BaseSSHTransportTests.test_receiveKEXINITReplycCsX|�|j�|jdd�=|j�tj|j�|�t|j�d�|�|jddtj�dS)z�
        When a KEXINIT message is received which is not a reply to an earlier
        KEXINIT message which was sent, a KEXINIT reply is sent.
        Nrar)	r�r�r�r�r"r�r�rrdrIr)r)r*�test_sendKEXINITReplys
z+BaseSSHTransportTests.test_sendKEXINITReplycCs|�t|jj�dS)a(
        A new key exchange cannot be started while a key exchange is already in
        progress.  If an attempt is made to send a I{KEXINIT} message using
        L{SSHTransportBase.sendKexInit} while a key exchange is in progress
        causes that method to raise a L{RuntimeError}.
        N)�assertRaisesrfr�r@rIr)r)r*�test_sendKexInitTwiceFailsrQz0BaseSSHTransportTests.test_sendKexInitTwiceFailscCs�tjtjg}|j��|j`|D]}|j�|d�|�|j��d�q|�|j�t	�|j_
|j��|�|j���d�d�dS)z�
        After L{SSHTransportBase.sendKexInit} has been called, messages types
        other than the following are queued and not sent until after I{NEWKEYS}
        is sent by L{SSHTransportBase._keySetup}.

        RFC 4253, section 7.1.
        r�r1�N)
r"�MSG_SERVICE_REQUESTr�r,r�r�rrr�r^�nextEncryptions�_newKeys�count)r2�disallowedMessageTypesr�r)r)r*�test_sendKexInitBlocksOtherss�


z2BaseSSHTransportTests.test_sendKexInitBlocksOtherscCsZd|j_|j�ddg�|�|jtjdt�d�t�d�t�d�t�d�fg�d	S)
ze
        Test that EXT_INFO messages are sent correctly.  See RFC 8308,
        section 2.3.
        T��server-sig-algs�ssh-rsa,rsa-sha2-256)�	elevation�d�rrrsrtruN)	r��_peerSupportsExtensions�sendExtInforr�r"�MSG_EXT_INFOrr4rIr)r)r*�test_sendExtInfo9s*���������z&BaseSSHTransportTests.test_sendExtInfocCs |j�dg�|�|jg�dS)z�
        If the peer has not advertised support for extension negotiation, no
        EXT_INFO message is sent, since RFC 8308 only guarantees that the
        peer will be prepared to accept it if it has advertised support.
        rqN)r�rxrr�rIr)r)r*�test_sendExtInfoUnsupportedSsz1BaseSSHTransportTests.test_sendExtInfoUnsupportedcCsR|j�tjdt�d�t�d�t�d�t�d��|�|jjddd��dS)z�
        When an EXT_INFO message is received, the transport stores a mapping
        of the peer's advertised extensions.  See RFC 8308, section 2.3.
        rvrr�!ssh-rsa,rsa-sha2-256,rsa-sha2-512�no-flow-control�s)rrr}N)r�r�r"ryrr4r�peerExtensionsrIr)r)r*�
test_EXT_INFO\s$�������z#BaseSSHTransportTests.test_EXT_INFOcCs*|j�ddd�|�|jtjdfg�dS)z�
        Test that debug messages are sent correctly.  Payload::
            bool always display
            string debug message
            string language
        r_T�en�testenN)r��	sendDebugrr�r"�	MSG_DEBUGrIr)r)r*�test_sendDebugqs

�z$BaseSSHTransportTests.test_sendDebugcCs8|j�tjd�|j�tjd�|�|jjddg�dS)zW
        Test that debug messages are received correctly.  See test_sendDebug.
        r�ssilenten)Tr_r�)Fssilentr�N)r�r�r"r�rrFrIr)r)r*�test_receiveDebug~s���z'BaseSSHTransportTests.test_receiveDebugcCs&|j�d�|�|jtjdfg�dS)zk
        Test that ignored messages are sent correctly.  Payload::
            string ignored data
        r_stestN)r��
sendIgnorerr�r"�
MSG_IGNORErIr)r)r*�test_sendIgnore�s�z%BaseSSHTransportTests.test_sendIgnorecCs&|j�tjd�|�|jjdg�dS)zb
        Test that ignored messages are received correctly.  See
        test_sendIgnore.
        r_N)r�r�r"r�rrGrIr)r)r*�test_receiveIgnore��z(BaseSSHTransportTests.test_receiveIgnorecCs$|j��|�|jtjdfg�dS)zt
        Test that unimplemented messages are sent correctly.  Payload::
            uint32 sequence number
        rN)r��sendUnimplementedrr�r"�MSG_UNIMPLEMENTEDrIr)r)r*�test_sendUnimplemented�s
�z,BaseSSHTransportTests.test_sendUnimplementedcCs&|j�tjd�|�|jjdg�dS)zo
        Test that unimplemented messages are received correctly.  See
        test_sendUnimplemented.
        s�r�N)r�r�r"r�rrErIr)r)r*�test_receiveUnimplemented�r�z/BaseSSHTransportTests.test_receiveUnimplementedcsPdg��fdd�}||j_|j�dd�|�|jtjdfg�|��d�dS)	z�
        Test that disconnection messages are sent correctly.  Payload::
            uint32 reason code
            string reason description
            string language
        Fc�d�d<dS�NTrr)r)��disconnectedr)r*�stubLoseConnection��zEBaseSSHTransportTests.test_sendDisconnect.<locals>.stubLoseConnectionr�r_s�testrN)r"�loseConnectionr��sendDisconnectrr��MSG_DISCONNECTr%�r2r�r)r�r*�test_sendDisconnect�s���	z)BaseSSHTransportTests.test_sendDisconnectcsNdg��fdd�}||j_|j�tjd�|�|jjdg�|��d�dS)zl
        Test that disconnection messages are received correctly.  See
        test_sendDisconnect.
        Fcr�r�r)r)r�r)r*r��r�zHBaseSSHTransportTests.test_receiveDisconnect.<locals>.stubLoseConnections�test�r�r_rN)r"r�r�r�r�rrDr%r�r)r�r*�test_receiveDisconnect�s�z,BaseSSHTransportTests.test_receiveDisconnectcs`dg��fdd�}||j_|j�|j���|�|jj�|�|jj|jj	�|��d�dS)ze
        Test that dataReceived parses packets and dispatches them to
        ssh_* methods.
        Fcr�r�r))r[��kexInitr)r*�stubKEXINIT�r�z<BaseSSHTransportTests.test_dataReceived.<locals>.stubKEXINITrN)
r��ssh_KEXINITr�r"rr%�
gotVersionr�ourVersionString�otherVersionString)r2r�r)r�r*�test_dataReceived�sz'BaseSSHTransportTests.test_dataReceivedcCs�t�}|j�|�|�|jj|�|�|j�|j�dd�|�|jdg�t�}|j�|�|�|j�|�|j	�|j�
d�|�|j	�dS)z�
        Test that the transport can set the running service and dispatches
        packets to the service's packetReceived method.
        r�r_r�N)r�r��
setServicerr
r%r�r�r�r��connectionLost)r2r
�service2r)r)r*�test_service�sz"BaseSSHTransportTests.test_servicecs@dg��fdd�}||j_d|j_|j�d�|��d�dS)zP
        Test that the transport notifies the avatar of disconnections.
        Fcr�r�r)r)r�r)r*�logoutr�z1BaseSSHTransportTests.test_avatar.<locals>.logoutTNr)r��logoutFunction�avatarr�r%)r2r�r)r�r*�test_avatar�sz!BaseSSHTransportTests.test_avatarcC��|�|j�d��|�|j�d��|�|j�d��t�|j_|�|j�d��|�|j�d��|�|j�d��t�dddd�|j_|�|j�d��|�|j�d��|�|j�d��|�t	|jjd�dS)zS
        Test that the transport accurately reflects its encrypted status.
        �in�out�bothr	�badN)
r#r��isEncryptedr^r0r%r"rKrh�	TypeErrorrIr)r)r*�test_isEncrypted
�
�z&BaseSSHTransportTests.test_isEncryptedcCr�)zR
        Test that the transport accurately reflects its verified status.
        r�r�r�r	r�N)
r#r��
isVerifiedr^r0r%r"rKrhr�rIr)r)r*�test_isVerified!r�z%BaseSSHTransportTests.test_isVerifiedcsfdg��fdd�}||j_|j��|�|jddtj�|�|jdddd�ttjf��dS)	zh
        Test that loseConnection sends a disconnect message and closes the
        connection.
        Fcr�r�r)r)r�r)r*r�<r�zEBaseSSHTransportTests.test_loseConnection.<locals>.stubLoseConnectionrrar�r�N)r"r�r�rr�r�rn�DISCONNECT_CONNECTION_LOSTr�r)r�r*�test_loseConnection5s
�z)BaseSSHTransportTests.test_loseConnectioncs(�fdd�}|d�|d�|d�dS)zU
        Test that the transport disconnects when it receives a bad version.
        cs�g�_d�j_dg��fdd�}|�j_t|d�D]}�j�|�q���d����jddtj	����jdddd�t
tjf��dS)	NFcr�r�r)r)r�r)r*r�Pr�zRBaseSSHTransportTests.test_badVersion.<locals>.testBad.<locals>.stubLoseConnectionrrrar�r�)r�r�r�r"r�rr�r%rr�rn�)DISCONNECT_PROTOCOL_VERSION_NOT_SUPPORTED)rr�rrIr�r*�testBadKs
�z6BaseSSHTransportTests.test_badVersion.<locals>.testBadsSSH-1.5-OpenSSHsSSH-3.0-TwistedsGET / HTTP/1.1Nr))r2r�r)rIr*�test_badVersionFsz%BaseSSHTransportTests.test_badVersioncsXt����t���d�jd}�fdd�t|�D�|��j�|��j	�j�dS)zV
        Test that the transport ignores data sent before the version string.
        s5here's some stuff beforehand
here's some other stuff
rcsg|]}��|��qSr))r�r�r�r)r*�
<listcomp>nsz@BaseSSHTransportTests.test_dataBeforeVersion.<locals>.<listcomp>N)
rBr�rr�r�rr%r�rr��r2�datar)r�r*�test_dataBeforeVersionas���z,BaseSSHTransportTests.test_dataBeforeVersioncC�<t�}|�t���|�d�|�|j�|�|jd�dS)zw
        Test that the transport treats the compatibility version (1.99)
        as equivalent to version 2.0.
        sSSH-1.99-OpenSSH
sSSH-1.99-OpenSSHN�	rBr�rr�r�r%r�rr�r�r)r)r*�test_compatabilityVersionrs

z/BaseSSHTransportTests.test_compatabilityVersioncCr�)z�
        It can parse the SSH version string even when it ends only in
        Unix newlines (CR) and does not follows the RFC 4253 to use
        network newlines (CR LF).
        s,SSH-2.0-PoorSSHD Some-comment here
more-datas"SSH-2.0-PoorSSHD Some-comment hereNr�r'r)r)r*�&test_dataReceivedSSHVersionUnixNewline}s

z<BaseSSHTransportTests.test_dataReceivedSSHVersionUnixNewlinecCr�)a9
        The trailing spaces from SSH version comment are not removed.

        The SSH version string needs to be kept as received
        (without CR LF end of line) as they are used in the host
        authentication process.

        This can happen with a Bitvise SSH server which hides its version.
        s>SSH-2.0-9.99 FlowSsh: Bitvise SSH Server (WinSSHD) 
more-datas3SSH-2.0-9.99 FlowSsh: Bitvise SSH Server (WinSSHD) Nr�r'r)r)r*�)test_dataReceivedSSHVersionTrailingSpaces�s
��z?BaseSSHTransportTests.test_dataReceivedSSHVersionTrailingSpacescCs4t�}d|_|�t���|�d�|�|j�dS)z�
        If an unusual SSH version is received and is included in
        C{supportedVersions}, an unsupported version error is not emitted.
        )�9.99�SSH-9.99-OpenSSH
N)rB�supportedVersionsr�rr�r�r#rHr�r)r)r*� test_supportedVersionsAreAllowed�s

z6BaseSSHTransportTests.test_supportedVersionsAreAllowedcCs6t�}d|_|�t���|�d�|�d|j�dS)z�
        If an unusual SSH version is received and is not included in
        C{supportedVersions}, an unsupported version error is emitted.
        )s2.0r�r�N)rBr�r�rr�r�rrHr�r)r)r*�6test_unsupportedVersionsCallUnsupportedVersionReceived�s

zLBaseSSHTransportTests.test_unsupportedVersionsCallUnsupportedVersionReceivedcs�tjf�fdd�	}|d�|d��jj}t��j_|dtj�dd��jj_|d�|�j_t��j_d	d
�}|�jj_	|dtj
����dS)
zi
        Test that the transport disconnects with an error when it receives
        bad packets.
        cspg�_|�j_���j�����t�j�d����jddtj����jdddd�t	|f��dS)Nrarr�r�)
r�r�r8rAr9rrdr"r�rn)r[�errorrIr)r*r��s(z6BaseSSHTransportTests.test_badPackets.<locals>.testBads��������s	BCDEs
AB123456cSs|dd�Sr�r))r=r)r)r*r<��z7BaseSSHTransportTests.test_badPackets.<locals>.<lambda>sBCDEFGHIJKcSstd��)Nzbad compression)�	Exception)rpr)r)r*�stubDecompress�sz=BaseSSHTransportTests.test_badPackets.<locals>.stubDecompresss	BCDEN)r"�DISCONNECT_PROTOCOL_ERRORr�r0r^�DISCONNECT_MAC_ERRORrlr�rDr��DISCONNECT_COMPRESSION_ERROR�flushLoggedErrors)r2r��oldEncryptionsr�r)rIr*�test_badPackets�s&
�

�z%BaseSSHTransportTests.test_badPacketscs��jj}|f�fdd�	}�j�dd�|�dtjd<�j�dd�|��j�dd�|��j�t���j�dd�|��j�d	d�|�d
S)zj
        Test that unimplemented packet types cause MSG_UNIMPLEMENTED packets
        to be sent.
        csP���jddtj����jdddd�t|f��g�j_|d7}dS)Nrrar�r�)rr�r"r�rnr�)rSrIr)r*�checkUnimplemented�s$zKBaseSSHTransportTests.test_unimplementedPackets.<locals>.checkUnimplemented�(r1sMSG_fiction�)�<�Fr�N)r�rrr�r"�messagesr�r�)r2rSr�r)rIr*�test_unimplementedPackets�s

z/BaseSSHTransportTests.test_unimplementedPacketscCs�|j}|�|j���t�|_t�|_t�|_|�	t
��t�}|�t
���|�d�|�|j|j�|�|j|j�|�|j|j�|�|j|j�|�|j|j�|�|j|j�dS)zD
        Test that multiple instances have distinct states.
        r1N)r�r�r"rr^r0r�r5rDr�r�rBr�rr�r��assertNotEqualr�rorrr
)r2r��proto2r)r)r*�test_multipleClasses�s
z*BaseSSHTransportTests.test_multipleClassesN)4r&r'r(r]rr7rr4r�r"r)r.r3r6r7r:rCrErFrQrerfrgrirprzr{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)r*r�s���������	�
����	1		$	


$rc@r�)�'BaseSSHTransportDHGroupExchangeBaseCasez@
    Diffie-Hellman group exchange tests for TransportBase.
    cCs�|j|j_d|j_|�d|jj���}|�d|���}|�d||���}|�d|||���}|�|j�ddd�||||�dS)z?
        Test that _getKey generates the correct keys.
        �EFsABCDKr?�K�AB�CDN)r�r��kexAlg�	sessionIDr��digestr�_getKey)r2�k1�k2�k3�k4r)r)r*�test_getKeys
(z3BaseSSHTransportDHGroupExchangeBaseCase.test_getKeyN)r&r'r(r]r�r)r)r)r*r��r�c@�eZdZdZdS)�(BaseSSHTransportDHGroupExchangeSHA1TestszE
    diffie-hellman-group-exchange-sha1 tests for TransportBase.
    N�r&r'r(r]r)r)r)r*r��r�c@r�)�*BaseSSHTransportDHGroupExchangeSHA256TestszG
    diffie-hellman-group-exchange-sha256 tests for TransportBase.
    Nr�r)r)r)r*r�&�r�c@r�)�"BaseSSHTransportEllipticCurveTestsz4
    ecdh-sha2-nistp256 tests for TransportBase
    Nr�r)r)r)r*r�0r�r�c@r�)�%BaseSSHTransportCurve25519SHA256Testsz3
    curve25519-sha256 tests for TransportBase
    Nr�r)r)r)r*r�8�r�c@s\eZdZdZddd�Zddd�Zdd�Zd	d
�Zdd�Zd
d�Z	dd�Z
dd�Zdd�ZdS)�#ServerAndClientSSHTransportBaseCasezF
    Tests that need to be run on both the server and the client.
    NcCsN|durtj}|�|jddtj�|�|jdddd�t|f��dS)zI
        Helper function to check if the transport disconnected.
        Nr�rrar�r�)r"r�rr�r�rnr�r)r)r*�checkDisconnectedFs(z5ServerAndClientSSHTransportBaseCase.checkDisconnectedcCsP|durtj}|��}||�|�t���|j�|j���|r&|�	|�|S)zy
        Helper function to connect a modified protocol to the test protocol
        and test for disconnection.
        N)
r"�DISCONNECT_KEY_EXCHANGE_FAILEDr�r�rr�r�r�rr�)r2�protoModificationr�r�r)r)r*�connectModifiedProtocolOs
z;ServerAndClientSSHTransportBaseCase.connectModifiedProtocolcC�dd�}|�|�dS)z`
        Test that the transport disconnects if it can't match the key
        exchange
        cS�
g|_dSr��rV�r�r)r)r*�blankKeyExchangesd�
z\ServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchKex.<locals>.blankKeyExchangesN�r�)r2rr)r)r*�test_disconnectIfCantMatchKex^szAServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchKexcCr�)zP
        Like test_disconnectIfCantMatchKex, but for the key algorithm.
        cSr�r�)rWrr)r)r*�blankPublicKeysnrz]ServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchKeyAlg.<locals>.blankPublicKeysNr)r2rr)r)r*� test_disconnectIfCantMatchKeyAlgi�zDServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchKeyAlgcCr�)zN
        Like test_disconnectIfCantMatchKex, but for the compression.
        cSr�r��rYrr)r)r*�blankCompressionsxrzdServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchCompression.<locals>.blankCompressionsNr)r2r	r)r)r*�%test_disconnectIfCantMatchCompressionsrzIServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchCompressioncCr�)zM
        Like test_disconnectIfCantMatchKex, but for the encryption.
        cSr�r��rLrr)r)r*�blankCiphers�rzZServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchCipher.<locals>.blankCiphersNr)r2rr)r)r*� test_disconnectIfCantMatchCipher}rzDServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchCiphercCr�)zF
        Like test_disconnectIfCantMatchKex, but for the MAC.
        cSr�r��rXrr)r)r*�	blankMACs�rzTServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchMAC.<locals>.blankMACsNr)r2rr)r)r*�test_disconnectIfCantMatchMAC�rzAServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchMACcC�$|�|j��t�|jj����dS)z�
        Test that the transport's L{getPeer} method returns an
        L{SSHTransportAddress} with the L{IAddress} of the peer.
        N)rr��getPeerr�SSHTransportAddressr"rIr)r)r*�test_getPeer���z0ServerAndClientSSHTransportBaseCase.test_getPeercCr)z�
        Test that the transport's L{getHost} method returns an
        L{SSHTransportAddress} with the L{IAddress} of the host.
        N)rr��getHostrrr"rIr)r)r*�test_getHost�rz0ServerAndClientSSHTransportBaseCase.test_getHostr�)
r&r'r(r]r�r�rrr
r
rrrr)r)r)r*r�As

	




r�c@�:eZdZUdZejZeeej	e
d<dd�Zdd�ZdS)�ServerSSHTransportBaseCasez1
    Base case for SSHServerTransport tests.
    r�cCs$t�|�t�|j_|jj��dSr�)r�r�r�r�r �startFactoryrIr)r)r*r��s

z ServerSSHTransportBaseCase.setUpcCs t�|�|jj��|j`dSr�)r��tearDownr�r �stopFactoryrIr)r)r*r�s

z#ServerSSHTransportBaseCase.tearDownN)
r&r'r(r]r"r-r�rrr+r�r�rr)r)r)r*r�s

rc@s�eZdZdZdd�Zdd�Zdd�Zdd	�Zd
d�Zdd
�Z	dd�Z
dd�Zdd�Zdd�Z
dd�Zdd�Zdd�Zdd�Zdd�Zd S)!�ServerSSHTransportTestsz'
    Tests for SSHServerTransport.
    cCs�|j�d�|�|jjd�|�|jjd�|�|jjd�|�|jjd�|�|jj�|jj	}|�|j
d�|�|jd�|�|jd�|�|j
d�dS)z�
        Receiving a KEXINIT packet listing multiple supported algorithms will
        set up the first common algorithm found in the client's preference
        list.
        s	SSH-2.0-Twisted
�����������������bdiffie-hellman-group1-sha1,diffie-hellman-group-exchange-sha1,diffie-hellman-group-exchange-sha256ssh-dss,ssh-rsa�aes128-ctr,aes128-cbc,aes192-ctr,aes192-cbc,aes256-ctr,aes256-cbc,cast128-ctr,cast128-cbc,blowfish-ctr,blowfish-cbc,3des-ctr,3des-cbc�aes128-ctr,aes128-cbc,aes192-ctr,aes192-cbc,aes256-ctr,aes256-cbc,cast128-ctr,cast128-cbc,blowfish-ctr,blowfish-cbc,3des-ctr,3des-cbchmac-md5,hmac-sha1hmac-md5,hmac-sha1	none,zlib	none,zlib����r�sssh-dssr	s
aes128-ctr�hmac-md5N)r�r�rr��keyAlg�outgoingCompressionType�incomingCompressionTyper#rwrlr|r}rr~�r2�ner)r)r*�test_KEXINITMultipleAlgorithms�s�z6ServerSSHTransportTests.test_KEXINITMultipleAlgorithmscCs�dt�d�t�d�t�d�t�d�t�d�t�d�t�d�t�d�t�d�t�d�dd	}|j�|�|�|jjd
�|�|jj�dS)z�
        If the client sends "ext-info-c" in its key exchange algorithms,
        then the server notes that the client supports extension
        negotiation.  See RFC 8308, section 2.1.
        rJs/diffie-hellman-group-exchange-sha256,ext-info-cr�rrr	r1r
rr�N)rr4r�r�rr�r%rw�r2�
kexInitPacketr)r)r*� test_KEXINITExtensionNegotiation�s:��������	�
����z8ServerSSHTransportTests.test_KEXINITExtensionNegotiationcCs�dd�dd�dd�|jjddd�|jj|jj|jj|jj|jj|jj|jj|jj|jjf
D�D��d}|j�|�|�	|jj
�|j�d	�|�	|jj
�|j�d
�|�
|jj
�|�|jg�d|j_
|j�d�|�
|jj
�|�|jg�dS)
a<
        The client is allowed to send a guessed key exchange packet
        after it sends the KEXINIT packet.  However, if the key exchanges
        do not match, that guess packet must be ignored.  This tests that
        the packet is ignored in the case of the key exchange method not
        matching.
        rJr1cS�g|]}t�|��qSr)�rr4r�r)r)r*r����zEServerSSHTransportTests.test_ignoreGuessPacketKex.<locals>.<listcomp>cS�g|]}d�|��qS�rT�r�r�r>r)r)r*r�r*Nr����
test�T��rr�rVrWrLrXrYrZr�r%�ignoreNextPacket�	ssh_DEBUG�ssh_KEX_DH_GEX_REQUEST_OLDr#rr��ssh_KEX_DH_GEX_REQUESTr%r)r)r*�test_ignoreGuessPacketKex�sB	�������z1ServerSSHTransportTests.test_ignoreGuessPacketKexcCs�dd�dd�dd�|jj|jjddd�|jj|jj|jj|jj|jj|jj|jj|jjf
D�D��d}|j�|�|�	|jj
�|j�d	�|�	|jj
�|j�d
�|�
|jj
�|�|jg�d|j_
|j�d�|�
|jj
�|�|jg�dS)
zk
        Like test_ignoreGuessPacketKex, but for an incorrectly guessed
        public key format.
        rJr1cSr(r)r)r�r)r)r*r�2r*zEServerSSHTransportTests.test_ignoreGuessPacketKey.<locals>.<listcomp>cSr+r,r-r.r)r)r*r�4r*Nr�r/r0r1Tr2r3r%r)r)r*�test_ignoreGuessPacketKey)sB�������z1ServerSSHTransportTests.test_ignoreGuessPacketKeycCsz|g|j_dg|j_|j�|j���t�|�\}}t|d|�}|j�	t
�|��t
�t
�
d|d��d}t|jj||jj�}|�|jj|�t|||jj�}t�}	|	�t
�
|jj�d�|	�t
�
|jj�d�|	�t
�
|jjjd����|	�t
�|��|	�|�|	�|�|	��}
|jjjd�|
�}|�|jtjt
�
|jjjd���|t
�
|�ftjdfg�dS)	z�
        Test that the KEXDH_INIT packet causes the server to send a
        KEXDH_REPLY with the server's public key and a signature.

        @param kexAlgorithm: The key exchange algorithm to use.
        @type kexAlgorithm: L{str}
        r�i�r��rrjr1N) r�rVrWr�r"rrr�r<r6rr;�getMPr4r@r�r�rr�r�updater��ourKexInitPayloadr �
publicKeysr�r��privateKeys�signr��MSG_KEXDH_REPLY�MSG_NEWKEYS)r2r�r�r�r��er>r9r��hr��	signaturer)r)r*�assertKexDHInitResponseVs>



�����z/ServerSSHTransportTests.assertKexDHInitResponsecCs,d|j_d|j_|�t|jjt�d��dS)��
        Test that if the server receives a KEX_DH_GEX_REQUEST_OLD message
        and the key exchange algorithm is not set, we raise a ConchError.
        s	bad-curver�s
unused-keyN)r�r�rrhr�_ssh_KEX_ECDH_INITrr4rIr)r)r*�%test_checkBad_KEX_ECDH_INIT_CurveName�s�z=ServerSSHTransportTests.test_checkBad_KEX_ECDH_INIT_CurveNamecCs�dt�d�t�d�t�d�t�d�t�d�t�d�t�d�t�d�t�d�t�d�dd	}|j�|�|�t�|�t�d
S)zy
        Test that if the server received a bad name for a curve
        we raise an UnsupportedAlgorithm error.
        rrr�rrr	r1r
rN)rr4r�r�rh�AttributeErrorr)r2�kexmsgr)r)r*� test_checkBad_KEX_INIT_CurveName�s:��������	�
����
z8ServerSSHTransportTests.test_checkBad_KEX_INIT_CurveNamecC�|�dd�dS)z�
        KEXDH_INIT messages are processed when the
        diffie-hellman-group14-sha1 key exchange algorithm is requested.
        r�r�N)rFrIr)r)r*�test_KEXDH_INIT_GROUP14��z/ServerSSHTransportTests.test_KEXDH_INIT_GROUP14c
�d�j_t��j_��dd����jjd���dd����jjd����jdtj	df��fdd�t
d	�D�}���jjj|d
|d|d|d
|d|df�dS)�G
        Test that _keySetup sets up the next encryption keys.
        r�r�r�r�r�r1c�g|]
}�j�|dd��qS�r�r��r�r�rrIr)r*r���z9ServerSSHTransportTests.test_keySetup.<locals>.<listcomp>�ABCDEFrar�rrjr�r�N�r�r�r^rlr�rr�r�r"rBrr!�r2�newKeysr)rIr*�
test_keySetup��
&�z%ServerSSHTransportTests.test_keySetupcCs�gd�|j_d|j_t�|j_d|j_|�dd�|�|jdt	j
df�|�|jdt	jd	t�
d
�t�
d�f�|�dd�|�|jdt	j
df�d
S)a
        If the client advertised support for extension negotiation, then
        _keySetup sends SSH_MSG_EXT_INFO with the "server-sig-algs"
        extension as the next packet following the server's first
        SSH_MSG_NEWKEYS.  See RFC 8308, sections 2.4 and 3.1.
        )r�srsa-sha2-256srsa-sha2-512r�Tr�r����r1r�srrr|r�N)r�rWr�r^rlrwr�rr�r"rBryrr4rIr)r)r*�test_keySetupWithExtInfo�s$
����	z0ServerSSHTransportTests.test_keySetupWithExtInfoc
rP)rQrr�r�r�r�r1crRrSrTrrIr)r*r��rUz>ServerSSHTransportTests.test_ECDH_keySetup.<locals>.<listcomp>rVrar�rrjr�r�NrWrXr)rIr*�test_ECDH_keySetup�r[z*ServerSSHTransportTests.test_ECDH_keySetupcCs�|��t�dddd�|j_|j�d�|�|jj|jj�|�|jj	�|�|jj
�d|j_|�dd�|j�d�|�
|jj	�d|j_|�dd�|j�d�|�
|jj
�dS)zj
        Test that NEWKEYS transitions the keys in nextEncryptions to
        currentEncryptions.
        r	r1�zlibr�r�r�N)r$r"rKr�rl�ssh_NEWKEYS�assertIsr0rAr5rDr r��assertIsNotNoner!rIr)r)r*�test_NEWKEYS�s �z$ServerSSHTransportTests.test_NEWKEYScCsD|j�t�d��|�|jtjt�d�fg�|�|jjj	d�dS)z^
        Test that the SERVICE_REQUEST message requests and starts a
        service.
        r�r�N)
r��ssh_SERVICE_REQUESTrr4rr�r"�MSG_SERVICE_ACCEPTr
r�rIr)r)r*�test_SERVICE_REQUESTs
�z,ServerSSHTransportTests.test_SERVICE_REQUESTcC�|j�d�|��dS�zD
        Test that NEWKEYS disconnects if it receives data.
        s
bad packetN�r�r`r�rIr)r)r*�test_disconnectNEWKEYSData
�z2ServerSSHTransportTests.test_disconnectNEWKEYSDatacCs"|j�t�d��|�tj�dS)zd
        Test that SERVICE_REQUESTS disconnects if an unknown service is
        requested.
        s
no serviceN)r�rdrr4r�r"� DISCONNECT_SERVICE_NOT_AVAILABLErIr)r)r*�(test_disconnectSERVICE_REQUESTBadServicesz@ServerSSHTransportTests.test_disconnectSERVICE_REQUESTBadServiceN)r&r'r(r]r$r'r8r9rFrIrLrNrZr]r^rcrfrjrmr)r)r)r*r�s"#0--
rc@s8eZdZdZdd�Zdd�Zdd�Zdd	�Zd
d�ZdS)
�)ServerSSHTransportDHGroupExchangeBaseCasezE
    Diffie-Hellman group exchange tests for SSHServerTransport.
    cC�|jg|j_dg|j_|j�|j���|j�d�|jj�	��
d�d\}}|�|jtj
t�|�dfg�|�|jjd�|�|jj|�dS)z�
        Test that the KEX_DH_GEX_REQUEST_OLD message causes the server
        to reply with a KEX_DH_GEX_GROUP message with the correct
        Diffie-Hellman group.
        r��r�r�rjN)r�r�rVrWr�r"rr6r r��getrr��MSG_KEX_DH_GEX_GROUPrr;r�r��r2�dhGenerator�dhPrimer)r)r*�test_KEX_DH_GEX_REQUEST_OLD"s
���	zEServerSSHTransportDHGroupExchangeBaseCase.test_KEX_DH_GEX_REQUEST_OLDcCsd|j_|�t|jjd�dS)rGN)r�r�rhr
r6rIr)r)r*�%test_KEX_DH_GEX_REQUEST_OLD_badKexAlg9szOServerSSHTransportDHGroupExchangeBaseCase.test_KEX_DH_GEX_REQUEST_OLD_badKexAlgcCro)z�
        Test that the KEX_DH_GEX_REQUEST message causes the server to reply
        with a KEX_DH_GEX_GROUP message with the correct Diffie-Hellman
        group.
        r��r�rrqrjN)r�r�rVrWr�r"rr7r r�rrrr�rsrr;r�r�rtr)r)r*�test_KEX_DH_GEX_REQUESTAs 
����	zAServerSSHTransportDHGroupExchangeBaseCase.test_KEX_DH_GEX_REQUESTc
Cs�|��t|jjd|jj�}t�d�d}|�|jj�	�j
|�t|jj||jj�}|�|jj|�t|||jj�}|�
�}|�t�|jj�d�|�t�|jj�d�|�t�|jjjd����|�d�|�t�|jj��|�t�|jj��|�t�|��|�|�|�|�|��}|j�t�|��|�|jdd�tjt�|jjjd���|t�|jjjd�|��ftjd	fg�dS)
z�
        Test that the KEX_DH_GEX_INIT message after the client sends
        KEX_DH_GEX_REQUEST_OLD causes the server to send a KEX_DH_GEX_INIT
        message with a public key and signature.
        r�s��������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������rrjr�rpraNr1)rwr<r�r�r�rr;rr��private_numbersr=r@r�r�r<r4r�r=r r>r�r;r��ssh_KEX_DH_GEX_INITr�r"�MSG_KEX_DH_GEX_REPLYr?r@rB�r2rCr>r9r�rDr�r)r)r*�&test_KEX_DH_GEX_INIT_after_REQUEST_OLDZsB


������zPServerSSHTransportDHGroupExchangeBaseCase.test_KEX_DH_GEX_INIT_after_REQUEST_OLDc
Csb|��t|jjd|jj�}t�d�d}t|jj||jj�}t|||jj�}|��}|�	t�
|jj�d�|�	t�
|jj�d�|�	t�
|jj
jd����|�	d�|�	t�|jj��|�	t�|jj��|�	t�|��|�	|�|�	|�|��}|j�t�|��|�|jdtjt�
|jj
jd���|t�
|jj
jd�|��f�dS)	z�
        Test that the KEX_DH_GEX_INIT message after the client sends
        KEX_DH_GEX_REQUEST causes the server to send a KEX_DH_GEX_INIT message
        with a public key and signature.
        r�s����������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������rrjr�ryraN)rzr<r�r�r�rr;r@r�r<r4r�r=r r>r�r;r�r|rr�r"r}r?r@r~r)r)r*�"test_KEX_DH_GEX_INIT_after_REQUEST�s:


�����zLServerSSHTransportDHGroupExchangeBaseCase.test_KEX_DH_GEX_INIT_after_REQUESTN)	r&r'r(r]rwrxrzrr�r)r)r)r*rns(rnc@r�)�*ServerSSHTransportDHGroupExchangeSHA1TestszJ
    diffie-hellman-group-exchange-sha1 tests for SSHServerTransport.
    Nr�r)r)r)r*r��r�r�c@r�)�,ServerSSHTransportDHGroupExchangeSHA256TestszL
    diffie-hellman-group-exchange-sha256 tests for SSHServerTransport.
    Nr�r)r)r)r*r��r�r�c@r�)�ServerSSHTransportECDHBaseCasezE
    Elliptic Curve Diffie-Hellman tests for SSHServerTransport.
    c

Cs�|jg|j_dg|j_|j�|j���|jjjd}|jjj	d}|j�
�}|��}|j�|�}|j�
t�|��|j�||j�|jj��}|��}|�t�|jj��|�t�|jj��|�t�|jj��|�t�|jj��|�t�|����|�t�|��|�t�|j�|jj���|�|�|��}|�|�}	|�|jtjt�|���t�|j�|jj��t�|	�ftjdfg�dS)z�
        Test that the KEXDH_INIT message causes the server to send a
        KEXDH_REPLY with the server's public key and a signature.
        r�r1N)r�r�rVrWr�r"rr r?r>�_generateECPrivateKeyr��_encodeECPublicKeyr6rr4�_generateECSharedSecret�ecPubr�r<r�r��otherKexInitPayloadr=r�r�r@rr�rArB�
r2�privKey�pubKey�ecPrivr��encPubr�rDr�rEr)r)r*�test_KEX_ECDH_INIT�sF

�

�����z1ServerSSHTransportECDHBaseCase.test_KEX_ECDH_INITN)r&r'r(r]r�r)r)r)r*r��r�r�c@r�)�ServerSSHTransportECDHTestsz:
    ecdh-sha2-nistp256 tests for SSHServerTransport.
    Nr�r)r)r)r*r��r�r�c@r�)�'ServerSSHTransportCurve25519SHA256Testsz9
    curve25519-sha256 tests for SSHServerTransport.
    Nr�r)r)r)r*r��r�r�c@r)�ClientSSHTransportBaseCasez1
    Base case for SSHClientTransport tests.
    r�cCs@d|_|�||j�|�|�dd�t�t|�����t�	d�S)zC
        Mock version of SSHClientTransport.verifyHostKey.
        T�:r1)
�calledVerifyHostKeyrr��replace�binascii�hexlifyrr�r�succeed)r2r��fingerprintr)r)r*�
verifyHostKey	s�
z(ClientSSHTransportBaseCase.verifyHostKeycCsBt�|�tj�tj���|_tj�tj�|_	d|_
|j|j_dS)NF)
r�r�r!r�r�r#r�r�r��privObjr�r�r�rIr)r)r*r�s

z ClientSSHTransportBaseCase.setUpN)
r&r'r(r]r"r.r�rrr+r�r�r�r)r)r)r*r�s

r�c@s�eZdZdZdd�Zdd�Zdd�Zdd	�Zd
d�Zdd
�Z	dd�Z
dd�Zdd�Zdd�Z
dd�Zdd�Zdd�Zdd�Zdd�Zd d!�Zd"d#�Zd$S)%�ClientSSHTransportTestsz'
    Tests for SSHClientTransport.
    cCs�|j�d�|�|jjd�|�|jjd�|�|jjd�|�|jjd�|jj}|�|jd�|�|j	d�|�|j
d�|�|jd�dS)z�
        Receiving a KEXINIT packet listing multiple supported
        algorithms will set up the first common algorithm, ordered after our
        preference.
        s	SSH-2.0-Twisted
�����������������bdiffie-hellman-group1-sha1,diffie-hellman-group-exchange-sha1,diffie-hellman-group-exchange-sha256ssh-dss,ssh-rsa�aes128-ctr,aes128-cbc,aes192-ctr,aes192-cbc,aes256-ctr,aes256-cbc,cast128-ctr,cast128-cbc,blowfish-ctr,blowfish-cbc,3des-ctr,3des-cbc�aes128-ctr,aes128-cbc,aes192-ctr,aes192-cbc,aes256-ctr,aes256-cbc,cast128-ctr,cast128-cbc,blowfish-ctr,blowfish-cbc,3des-ctr,3des-cbchmac-md5,hmac-sha1hmac-md5,hmac-sha1	zlib,none	zlib,none����r�r�r	rrN)r�r�rr�rr r!rlr|r}rr~r"r)r)r*r$!s�z6ClientSSHTransportTests.test_KEXINITMultipleAlgorithmscCs<|�t|��j�dd�}|���dd�}|�|j��|�S)z�
        verifyHostKey() should return a Deferred which fails with a
        NotImplementedError exception.  connectionSecure() should raise
        NotImplementedError().
        cSs|�t�dSr�)�trap�NotImplementedErrorr8r)r)r*�_checkRaisesKr�zNClientSSHTransportTests.test_notImplementedClientMethods.<locals>._checkRaisesN)rhr�r��connectionSecurer��addCallback�fail�
addErrback)r2r��dr)r)r*� test_notImplementedClientMethodsCsz8ClientSSHTransportTests.test_notImplementedClientMethodscCsj|g|j_|j�|j���|jj��j}|�t	�
|�dd�d|d�|�|jtj|jj
fg�dS)z�
        Test that a KEXINIT packet with a group1 or group14 key exchange
        results in a correct KEXDH_INIT response.

        @param kexAlgorithm: The key exchange algorithm to use
        @type kexAlgorithm: L{str}
        r�Nr�r:)r�rVr�r"rr�r{r=rrr;r��MSG_KEXDH_INITr�)r2r�r�r=r)r)r*�assertKexInitResponseForDHQs
"�z2ClientSSHTransportTests.assertKexInitResponseForDHcCrM)zq
        KEXINIT messages requesting diffie-hellman-group14-sha1 result in
        KEXDH_INIT responses.
        r�r�N)r�rIr)r)r*�test_KEXINIT_group14hrOz,ClientSSHTransportTests.test_KEXINIT_group14cCs2dg|j_|j���dd�}|�t|jj|�dS)z�
        Test that the client raises a ConchError if it receives a
        KEXINIT message but doesn't have a key exchange algorithm that we
        understand.
        sdiffie-hellman-group24-sha1sgroup14sgroup24N)r�rVr"rr�rhr
r�r�r)r)r*�test_KEXINIT_badKexAlgos
z.ClientSSHTransportTests.test_KEXINIT_badKexAlgcCs�dt�d�t�d�t�d�t�d�t�d�t�d�t�d�t�d�t�d�t�d�dd	}|j�|�|�|jj�d
S)z�
        If the server sends "ext-info-s" in its key exchange algorithms,
        then the client notes that the server supports extension
        negotiation.  See RFC 8308, section 2.1.
        rJs/diffie-hellman-group-exchange-sha256,ext-info-sr�rrr	r1r
rN)rr4r�r�r%rwr%r)r)r*r'ys8��������	�
����z8ClientSSHTransportTests.test_KEXINITExtensionNegotiationc	Cs�|��d}t�|�}|jj��j}|jj}t|||�}t	�}|�
t�|jj�d�|�
t�|jj
�d�|�
t�|j��|�
|jj�|�
|�|�
|�|��}|j�|�}||t�|j�|fS)a
        Utility for test_KEXDH_REPLY and
        test_disconnectKEXDH_REPLYBadSignature.

        Begins a Diffie-Hellman key exchange in the named group
        Group-14 and computes information needed to return either a
        correct or incorrect signature.

        rj)r�rr;r�r�r{r=r�r@rr<r4r�r=r�r�r�r�r@)	r2r9�fMPr=r�r�rDr�rEr)r)r*�begin_KEXDH_REPLY�s 



z)ClientSSHTransportTests.begin_KEXDH_REPLYc�@���\�}}��fdd�}�j�|t�|��}|�|�|S)zH
        Test that the KEXDH_REPLY message verifies the server.
        c�*��|����j����jj��dSr��rAr%r�rr�r��r�r�r2r)r*�_cbTestKEXDH_REPLY��
zDClientSSHTransportTests.test_KEXDH_REPLY.<locals>._cbTestKEXDH_REPLY�r�r��ssh_KEX_DH_GEX_GROUPrr4r��r2rE�packetStartr�r�r)r�r*�test_KEXDH_REPLY�s

z(ClientSSHTransportTests.test_KEXDH_REPLYc
rP)rQr�r�r�r�r�r1crRrSrTrrIr)r*r��rUz9ClientSSHTransportTests.test_keySetup.<locals>.<listcomp>rVrrjrar�r�r�NrWrXr)rIr*rZ�r[z%ClientSSHTransportTests.test_keySetupcs
|��dg��fdd�}||j_t�dddd�|j_|�dd�|�|jj|jj�t	�|j_|j�
d�|�|jj�|�|jj
�|�|jj|jj�|��d�d	|j_|�dd
�|j�
d�|�|jj�d	|j_|�dd�|j�
d�|�|jj
�dS)
zl
        Test that NEWKEYS transitions the keys from nextEncryptions to
        currentEncryptions.
        Fcr�r�r)r)��securer)r*�stubConnectionSecure�r�zBClientSSHTransportTests.test_NEWKEYS.<locals>.stubConnectionSecurer	r�r�r1rr_sGHsIJN)r$r�r�r"rKrlr��assertIsNotr0r^r`rAr5rDrar%r rbr!)r2r�r)r�r*rc�s.�
z$ClientSSHTransportTests.test_NEWKEYScCs*t�|j_|j�d�|�|jjj�dS)zS
        Test that the SERVICE_ACCEPT packet starts the requested service.
        �MockServiceN)r�r��instance�ssh_SERVICE_ACCEPTr%r�rIr)r)r*�test_SERVICE_ACCEPT�s
z+ClientSSHTransportTests.test_SERVICE_ACCEPTcCs(|j�t��|�|jtjdfg�dS)zP
        Test that requesting a service sends a SERVICE_REQUEST packet.
        r�N)r��requestServicer�rr�r"rkrIr)r)r*�test_requestService�s

�z+ClientSSHTransportTests.test_requestServicec�6���\}}}�j�|t�d��}|��fdd��S)zL
        Test that KEXDH_REPLY disconnects if the signature is bad.
        �
bad signaturec���tj�Sr��r�r"r���_rIr)r*r<	r�zPClientSSHTransportTests.test_disconnectKEXDH_REPLYBadSignature.<locals>.<lambda>r��r2r�rEr�r�r)rIr*�&test_disconnectKEXDH_REPLYBadSignature	�

�z>ClientSSHTransportTests.test_disconnectKEXDH_REPLYBadSignaturecC�4dt�d�t�d�t�d�t�d�t�d�t�d�t�d�t�d�t�d�t�d�dd	}|j�|�|j�d
�t�t��t��|j_	|jj	�
�|j_t�t��t��}|�
�}|�t
jjt
jj�}t��|j_d|j_|j�t�t���d���t�|�t�d��|�tj�dS�
�O
        Test that KEX_ECDH_REPLY disconnects if the signature is bad.
        rrr�rrr	r1r
rsSSH-2.0-OpenSSH
s
bad-signatureN�rr4r�r�r�r�generate_private_key�	SECP256R1rr�r�r��public_bytesr�Encoding�X962�PublicFormat�UncompressedPoint�curver��_ssh_KEX_ECDH_REPLYr�r�r�r�r"r��r2rK�thisPriv�thisPubr�r)r)r*�)test_disconnectKEX_ECDH_REPLYBadSignature	�Z��������	�
��������zAClientSSHTransportTests.test_disconnectKEX_ECDH_REPLYBadSignaturecCrgrhrirIr)r)r*rj=	rkz2ClientSSHTransportTests.test_disconnectNEWKEYSDatacCs"t�|j_|j�d�|��dS)z�
        Test that SERVICE_ACCEPT disconnects if the accepted protocol is
        differet from the asked-for protocol.
        sbadN)r�r�r�r�r�rIr)r)r*�test_disconnectSERVICE_ACCEPTD	s
z5ClientSSHTransportTests.test_disconnectSERVICE_ACCEPTcCs<t�|j_|j�d�|�|jjj�|�t|j�d�dS)z�
        Some commercial SSH servers don't send a payload with the
        SERVICE_ACCEPT message.  Conch pretends that it got the correct
        name of the service.
        r1rN)	r�r�r�r�r%r�rrdr�rIr)r)r*�test_noPayloadSERVICE_ACCEPTM	s
z4ClientSSHTransportTests.test_noPayloadSERVICE_ACCEPTN)r&r'r(r]r$r�r�r�r�r'r�r�rZrcr�r�r�r�rjr�r�r)r)r)r*r�s&"
"
.	r�c@sLeZdZdZ	edd�Zdd�Zdd�Zdd	�Zd
d�Z	dd
�Z
dd�ZdS)�)ClientSSHTransportDHGroupExchangeBaseCasezE
    Diffie-Hellman group exchange tests for SSHClientTransport.
    ��FFFFFFFFFFFFFFFFC90FDAA22168C234C4C6628B80DC1CD129024E088A67CC74020BBEA63B139B22514A08798E3404DDEF9519B3CD3A431B302B0A6DF25F14374FE1356D6D51C245E485B576625E7EC6F44C42E9A637ED6B0BFF5CB6F406B7EDEE386BFB5A899FA5AE9F24117C4B1FE649286651ECE45B3DC2007CB8A163BF0598DA48361C55D39A69163FA8FD24CF5F83655D23DCA3AD961C62F356208552BB9ED529077096966D670C354E4ABC9804F1746C08CA237327FFFFFFFFFFFFFFFF�cCs8|jg|j_|j�|j���|�|jtjdfg�dS)zt
        KEXINIT packet with a group-exchange key exchange results
        in a KEX_DH_GEX_REQUEST message.
        � N)	r�r�rVr�r"rrr��MSG_KEX_DH_GEX_REQUESTrIr)r)r*�test_KEXINIT_groupexchangem	s���zDClientSSHTransportDHGroupExchangeBaseCase.test_KEXINIT_groupexchangec	Cs�|��|j�t�|j�t�d��|�|jj|j�|�|jjd�|jj	�
�j}|�t�|�dd�d�|�|jjt�t
d||j���|�|jdd�tj|jjfg�dS)z�
        Test that the KEX_DH_GEX_GROUP message results in a
        KEX_DH_GEX_INIT message with the client's Diffie-Hellman public key.
        rjr�Ns�������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������ra)r�r�r�rr;�P1536rr�r�r�r{r=r�r<r�r"�MSG_KEX_DH_GEX_INITrgr)r)r*�test_KEX_DH_GEX_GROUP	s��z?ClientSSHTransportDHGroupExchangeBaseCase.test_KEX_DH_GEX_GROUPcCs�|��|jj}d}t�|�}t||jj��j|�}|�	�}|�
t�|jj�d�|�
t�|jj
�d�|�
t�|j��|�
d�|�
t�|j�t�d��|�
|jj�|�
|�|�
|�|��}|j�|�}||t�|j�|fS)a
        Utility for test_KEX_DH_GEX_REPLY and
        test_disconnectGEX_REPLYBadSignature.

        Begins a Diffie-Hellman key exchange in an unnamed
        (server-specified) group and computes information needed to
        return either a correct or incorrect signature.
        r�rjr�)r�r�r�rr;r@r�r{r=r�r<r4r�r=r�r�r�r�r�r@)r2r�r9r�r�rDr�rEr)r)r*�begin_KEX_DH_GEX_REPLY�	s"	



z@ClientSSHTransportDHGroupExchangeBaseCase.begin_KEX_DH_GEX_REPLYcr�)z^
        Test that the KEX_DH_GEX_REPLY message results in a verified
        server.
        cr�r�r�r�r�r)r*�_cbTestKEX_DH_GEX_REPLY�	r�z`ClientSSHTransportDHGroupExchangeBaseCase.test_KEX_DH_GEX_REPLY.<locals>._cbTestKEX_DH_GEX_REPLY�r�r��ssh_KEX_DH_GEX_REPLYrr4r�)r2rEr�r�r�r)r�r*�test_KEX_DH_GEX_REPLY�	s

z?ClientSSHTransportDHGroupExchangeBaseCase.test_KEX_DH_GEX_REPLYcr�)zQ
        Test that KEX_DH_GEX_REPLY disconnects if the signature is bad.
        r�cr�r�r�r�rIr)r*r<�	r�z`ClientSSHTransportDHGroupExchangeBaseCase.test_disconnectGEX_REPLYBadSignature.<locals>.<lambda>r�r�r)rIr*�$test_disconnectGEX_REPLYBadSignature�	r�zNClientSSHTransportDHGroupExchangeBaseCase.test_disconnectGEX_REPLYBadSignaturecCr�r�r�r�r)r)r*r��	r�zSClientSSHTransportDHGroupExchangeBaseCase.test_disconnectKEX_ECDH_REPLYBadSignatureN)r&r'r(r]�intr�r�r�r�r�r�r�r)r)r)r*r�Y	s�r�c@r�)�*ClientSSHTransportDHGroupExchangeSHA1TestszJ
    diffie-hellman-group-exchange-sha1 tests for SSHClientTransport.
    Nr�r)r)r)r*r��	r�r�c@r�)�,ClientSSHTransportDHGroupExchangeSHA256TestszL
    diffie-hellman-group-exchange-sha256 tests for SSHClientTransport.
    Nr�r)r)r)r*r�
r�r�c@s0eZdZdZdd�Zdd�Zdd�Zdd	�Zd
S)�ClientSSHTransportECDHBaseCasezE
    Elliptic Curve Diffie-Hellman tests for SSHClientTransport.
    c	CsJ|jg|j_|j�|j���|�|jtjt	�
|j�|jj��fg�dS)zm
        KEXINIT packet with an elliptic curve key exchange results
        in a KEXDH_INIT message.
        N)
r�r�rVr�r"rrr�r�rr4r�r�rIr)r)r*�test_KEXINIT
s���z+ClientSSHTransportECDHBaseCase.test_KEXINITc
Cs.|��t���d}t���d}|j��}|��}|j�|�}|j�||j�|jj	��}|�
�}|�t�
|jj��|�t�
|jj��|�t�
|jj��|�t�
|jj��|�t�
|����|�t�
|j�|jj	���|�t�
|��|�|�|��}|�|�}	||	t�
|���t�
|�fS)a
        Utility for test_KEXDH_REPLY and
        test_disconnectKEXDH_REPLYBadSignature.

        Begins an Elliptic Curve Diffie-Hellman key exchange and computes
        information needed to return either a correct or incorrect
        signature.
        r�)r�r�r�r�r�r�r�r�r�r�r�r<rr4r�r�r=r�r�r�r@r�r)r)r*r�&
s*	
�

z0ClientSSHTransportECDHBaseCase.begin_KEXDH_REPLYcr�)zO
        Test that the KEXDH_REPLY message completes the key exchange.
        cr�r�r�r�r�r)r*r�P
r�zKClientSSHTransportECDHBaseCase.test_KEXDH_REPLY.<locals>._cbTestKEXDH_REPLYr�r�r)r�r*r�J
s

z/ClientSSHTransportECDHBaseCase.test_KEXDH_REPLYcr�)r�r�cr�r�r�r�rIr)r*r<a
r�zWClientSSHTransportECDHBaseCase.test_disconnectKEXDH_REPLYBadSignature.<locals>.<lambda>r�r�r)rIr*r�Y
r�zEClientSSHTransportECDHBaseCase.test_disconnectKEXDH_REPLYBadSignatureN)r&r'r(r]r�r�r�r�r)r)r)r*r�
s$r�c@r�)�ClientSSHTransportECDHTestsz:
    ecdh-sha2-nistp256 tests for SSHClientTransport.
    Nr�r)r)r)r*r�e
r�r�c@r�)�'ClientSSHTransportCurve25519SHA256Testsz9
    curve25519-sha256 tests for SSHClientTransport.
    Nr�r)r)r)r*r�m
r�r�c@s`eZdZdZer
eZdd�Zdd�Zdd�Zdd	�Z	d
d�Z
dd
�Zdd�Zdd�Z
dd�ZdS)�GetMACTestsz*
    Tests for L{SSHCiphers._getMAC}.
    cCst�dddd�|_dS)NrGr4rHrI)r"rKrNrIr)r)r*r�~
r�zGetMACTests.setUpcCstd�S)z�
        Generate a new shared secret to be used with the tests.

        @return: A new secret.
        @rtype: L{bytes}
        �@rrIr)r)r*�getSharedSecret�
szGetMACTests.getSharedSecretc
Cs||��}|j�||�}|d|�d|}tdd�t|�D��}tdd�t|�D��}	|�|||	|f|�|�||j�dS)a�
        Check that when L{SSHCiphers._getMAC} is called with a supportd HMAC
        algorithm name it returns a tuple of
        (digest object, inner pad, outer pad, digest size) with a C{key}
        attribute set to the value of the key supplied.

        @param hmacName: Identifier of HMAC algorithm.
        @type hmacName: L{bytes}

        @param hashProcessor: Callable for the hash algorithm.
        @type hashProcessor: C{callable}

        @param digestSize: Size of the digest for algorithm.
        @type digestSize: L{int}

        @param blockPadSize: Size of padding applied to the shared secret to
            match the block size.
        @type blockPadSize: L{int}
        Nr
cs��|]	}t|�dAVqdS)�6N�r-�r��br)r)r*r��
��z+GetMACTests.assertGetMAC.<locals>.<genexpr>csr�)�\Nr�r�r)r)r*r��
r�)r�rN�_getMACrnrrr�)
r2�hmacNamer��
digestSize�blockPadSize�secret�paramsr��innerPad�outerPadr)r)r*�assertGetMAC�
szGetMACTests.assertGetMACcC�|jdtddd�dS)a
        When L{SSHCiphers._getMAC} is called with the C{b"hmac-sha2-512"} MAC
        algorithm name it returns a tuple of (sha512 digest object, inner pad,
        outer pad, sha512 digest size) with a C{key} attribute set to the
        value of the key supplied.
        s
hmac-sha2-512r��rrN)rrrIr)r)r*�test_hmacsha2512�
�zGetMACTests.test_hmacsha2512cC�|jdtddd�dS)a
        When L{SSHCiphers._getMAC} is called with the C{b"hmac-sha2-384"} MAC
        algorithm name it returns a tuple of (sha384 digest object, inner pad,
        outer pad, sha384 digest size) with a C{key} attribute set to the
        value of the key supplied.
        s
hmac-sha2-384�0�PrN)rrrIr)r)r*�test_hmacsha2384�
r
zGetMACTests.test_hmacsha2384cCr)a
        When L{SSHCiphers._getMAC} is called with the C{b"hmac-sha2-256"} MAC
        algorithm name it returns a tuple of (sha256 digest object, inner pad,
        outer pad, sha256 digest size) with a C{key} attribute set to the
        value of the key supplied.
        s
hmac-sha2-256� rN)rrrIr)r)r*�test_hmacsha2256�
r
zGetMACTests.test_hmacsha2256cCr)a
        When L{SSHCiphers._getMAC} is called with the C{b"hmac-sha1"} MAC
        algorithm name it returns a tuple of (sha1 digest object, inner pad,
        outer pad, sha1 digest size) with a C{key} attribute set to the value
        of the key supplied.
        r��,rN)rrrIr)r)r*�
test_hmacsha1�
r
zGetMACTests.test_hmacsha1cCr)a
        When L{SSHCiphers._getMAC} is called with the C{b"hmac-md5"} MAC
        algorithm name it returns a tuple of (md5 digest object, inner pad,
        outer pad, md5 digest size) with a C{key} attribute set to the value of
        the key supplied.
        rr�rrN)rrrIr)r)r*�test_hmacmd5�
r
zGetMACTests.test_hmacmd5cCs&|��}|j�d|�}|�d|�dS)z�
        When L{SSHCiphers._getMAC} is called with the C{b"none"} MAC algorithm
        name it returns a tuple of (None, "", "", 0).
        r	)Nr1r1rN)r�rNr�r)r2r�rr)r)r*�	test_none�
szGetMACTests.test_noneN)r&r'r(r]rr7r�r�rr	rrrrrr)r)r)r*r�v
s						r�c@�@eZdZdZer
eZdd�Zdd�Zdd�Zdd	�Z	d
d�Z
dS)
�SSHCiphersTestsz0
    Tests for the SSHCiphers helper class.
    cCsLt�dddd�}|�|jd�|�|jd�|�|jd�|�|jd�dS)zJ
        Test that the initializer sets up the SSHCiphers object.
        rGr4rHrIN)r"rKrr|r}rr~)r2rNr)r)r*�	test_init�
s
zSSHCiphersTests.test_initc	Csjt�dddd�}d}}|j��D]!\}\}}}|�|||�}|dkr+|�|tj�q|�|j|�qdS)zM
        Test that the _getCipher method returns the correct cipher.
        rGr4rHrIrJr	N)r"rK�	cipherMapr�rM�assertIsInstance�_DummyCipher�	algorithm)	r2rNrOr�rP�algClass�keySize�counter�cipr)r)r*�test_getCipher�
s�zSSHCiphersTests.test_getCipherc
	Cs:d}tjjD]�}tjj|\}}}t�|ddd�}t�d|dd�}|�|||�}|jjd}	|�||dddd�|�dd||dd�|�	|j
|	�|�	|j|	�|��}
|
�
|d|	��}|
�
|d|	��}|�	|�|d|	��|�|�	|�|d|	��|�|�	|�|�|d|	��|�	|�|�|d|	��qdS)z8
        Test that setKeys sets up the ciphers.
        �@r	r:r1N)r"r+rLrKrrMr�
block_sizer{rrerk�	encryptorr<rhrl)
r2r�rP�modNamerr�	encCipher�	decCipherr �bsr$�enc�enc2r)r)r*�test_setKeysCipherss&�z#SSHCiphersTests.test_setKeysCiphersc
	Cs�d}tjj��D]s\}}t�dd|d�}t�ddd|�}|�dddd|d�|�ddddd|�|r7|�j}nd}|�|j|�|rL|�||�\}}}}d}	|}
d|}|re|||||��	���	�}nd}|�|�
|	|
�|�|�|�|	|
|��qdS)z5
        Test that setKeys sets up the MACs.
        r"r	r1rrN)
r"rK�macMapr�r{�digest_sizerr�r�r�rqr%rt)
r2r��macName�mod�outMac�inMac�ds�i�o�seqidr�r[�macr)r)r*�test_setKeysMACss*
�z SSHCiphersTests.test_setKeysMACsc
Cs�gd�}|D]9\}}}t�dddd�}|�d|�|_t�d|dd��\}|dd�}|�|t�|�	||��d|�d|���qdS)	z�
        L{SSHCiphers.makeMAC} computes the HMAC of an outgoing SSH message with
        a particular sequence id and content data.
        ))ssHi Theres 9294727a3638bb1c13f48ef8158bfc9d)sJefeswhat do ya want for nothing?s 750c783e6ab0b503eaa86e310a5db738)rs2��������������������������������������������������s 56be34521d144c88dbb8c733f0e8b3f6r	rz>LNr�zFailed HMAC test vector; key=z data=)
r"rKr�r��struct�unpackrr�r�rq)r2�vectorsr�r�r6r�r5�	shortenedr)r)r*�test_makeMAC2s
��zSSHCiphersTests.test_makeMACN)r&r'r(r]rr7rr!r+r7r<r)r)r)r*r�
s

rc@r)
�TransportLoopbackTestszL
    Test the server transport and client transport against each other,
    cs�t�}t���|�_|��g�_�fdd��_t���dd��_g�_�fdd��_�fdd��_	t
�j������_
|���|����fdd�}t����}|�|���|S)z�
        Run an async client and server, modifying each using the mod function
        provided.  Returns a Deferred called back when both Protocols have
        disconnected.

        @type mod: C{func}
        @rtype: C{defer.Deferred}
        c��j�||f�Sr�rL��code�desc)�serverr)r*r<d�z9TransportLoopbackTests._runClientServer.<locals>.<lambda>cSs
t�d�Sr�)rr�)r=r>r)r)r*r<fs
cr>r�rLr?��clientr)r*r<hrCcs���Sr�)r�r)rDr)r*r<iscs�t|jd|jd|jd|jdg�}��|jg���|jtjdfg�|jddkr>��	|�
�|���	|�
�|�n��|�
�|���|�
�|�|jddkrg��	|��|���	|��|�dS��|��|���|��|�dS)Nrsuser closed connectionr	)
�reprrLrXrVrYrrDr"r�r#r�r%r�)�ignoredrBrEr�rIr)r*�checkns,��
�z6TransportLoopbackTests._runClientServer.<locals>.check)r�r"r-r rrDrPr.r�r��listr�r!rWr�
loopbackAsyncr�)r2r/r rHr�r))rEr2rBr*�_runClientServerVs$	
z'TransportLoopbackTests._runClientServerc�Bg}tjjdgD]��fdd�}|�|�|��q	tj|dd�S)z{
        Test that the client and server play nicely together, in all
        the various combinations of ciphers.
        r	c��g|_|Sr�rr���cipherr)r*�	setCipher��z6TransportLoopbackTests.test_ciphers.<locals>.setCipherT��fireOnOneErrback)r"r+rLrMrKr�DeferredList)r2�	deferredsrPr)rNr*�test_ciphers�s
z#TransportLoopbackTests.test_cipherscrL)z>
        Like test_ciphers, but for the various MACs.
        r	crMr�rr��r6r)r*�setMAC�rQz0TransportLoopbackTests.test_macs.<locals>.setMACTrR)r"r+rXrMrKrrT)r2rUrXr)rWr*�	test_macs�s
z TransportLoopbackTests.test_macsc�<g}tjjD]��fdd�}|�|�|��qtj|dd�S)zG
        Like test_ciphers, but for the various key exchanges.
        crMr�r�r��r�r)r*�setKeyExchange�rQz@TransportLoopbackTests.test_keyexchanges.<locals>.setKeyExchangeTrR)r"r+rVrMrKrrT)r2rUr\r)r[r*�test_keyexchanges��
z(TransportLoopbackTests.test_keyexchangescrZ)zF
        Like test_ciphers, but for the various compressions.
        crMr�rr���compressionr)r*�setCompression�rQz@TransportLoopbackTests.test_compressions.<locals>.setCompressionTrR)r"r+rYrMrKrrT)r2rUrar)r_r*�test_compressions�r^z(TransportLoopbackTests.test_compressionsN)r&r'r(r]rr7rKrVrYr]rbr)r)r)r*r=Ns7r=)kr]r�rrr8r��hashlibrrrrr�typingrr�twistedr	r�twisted.conch.errorr
�twisted.conch.sshrrr
�twisted.internetr�twisted.protocolsr�twisted.pythonr�twisted.python.compatr�twisted.python.randbytesr�twisted.python.reflectr�twisted.testr�twisted.trial.unittestrrr�strr�r�cryptography.exceptionsr�cryptography.hazmat.backendsr�cryptography.hazmat.primitivesr�)cryptography.hazmat.primitives.asymmetricrrrr r!r"�twisted.conch.testr#�x25519_supportedr6r:r@r+rBr^r��
SSHServicer�r/r�r�r�r�r�r�r�rrrrr�r�r�r�r�r�rrrnr�r�r�r�r�r�r�r�r�r�r�r�r�r�rr=r)r)r)r*�<module>s
EA#+=				;
�
�

�
�eg
�

�

5�
�?
#�

�

V�
�km
@ Telegram