HEX
Server: Apache
System: Linux scp1.abinfocom.com 5.4.0-216-generic #236-Ubuntu SMP Fri Apr 11 19:53:21 UTC 2025 x86_64
User: confeduphaar (1010)
PHP: 8.1.33
Disabled: exec,passthru,shell_exec,system
$ 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-38.pyc
U

s�@g$o�@s�dZddlmZmZddlZddlZddlZddlZddlm	Z	e	d�Z
e	d�Ze
dk	r�edk	r�dZddl
mZmZmZmZddlmZdd	lmZdd
lmZddlmZnDe
dkr�dZnedkr�d
ZGdd�d�ZGdd�d�ZGdd�d�ZddlmZmZmZmZmZddl m!Z"ddl#m$Z$ddl%m&Z&ddl'm(Z(ddl)m*Z*ddl+m,Z,ddl-m.Z.m/Z0ddl
m1Z1m2Z2m3Z3ddl4m5Z5ddl6m7Z7Gdd �d ej8�Z9Gd!d"�d"e:�Z;Gd#d$�d$�Z<Gd%d&�d&e2j=�Z>Gd'd(�d(ej?�Z@Gd)d*�d*e@�ZAGd+d,�d,e@�ZBGd-d.�d.e$jC�ZDGd/d0�d0�ZEGd1d2�d2�ZFGd3d4�d4�ZGGd5d6�d6�ZHGd7d8�d8eHeD�ZIGd9d:�d:eH�ZJGd;d<�d<eJeEeD�ZKGd=d>�d>eJeFeD�ZLGd?d@�d@eJeGeD�ZMGdAdB�dB�ZNGdCdD�dDeN�ZOGdEdF�dFeOeD�ZPGdGdH�dHeO�ZQGdIdJ�dJeQeEeD�ZRGdKdL�dLeQeFeD�ZSGdMdN�dNeN�ZTGdOdP�dPeTeD�ZUGdQdR�dReT�ZVGdSdT�dTeVeEeD�ZWGdUdV�dVeVeFeD�ZXGdWdX�dXe$jC�ZYGdYdZ�dZe$jC�ZZGd[d\�d\e$jC�Z[Gd]d^�d^e$jC�Z\dS)_z5
Tests for ssh/transport.py and the classes therein.
�)�absolute_import�divisionN)�
requireModule�pyasn1�cryptography)�common�	transport�keys�factory)�keydata)�default_backend)�ec)�UnsupportedAlgorithmzCannot run without PyASN1zcan't run without cryptographyc@s6eZdZGdd�d�ZGdd�d�ZGdd�d�ZdS)rc@seZdZdS)ztransport.SSHTransportBaseN��__name__�
__module__�__qualname__�rr�C/usr/lib/python3/dist-packages/twisted/conch/test/test_transport.py�SSHTransportBase#src@seZdZdS)ztransport.SSHServerTransportNrrrrr�SSHServerTransport$src@seZdZdS)ztransport.SSHClientTransportNrrrrr�SSHClientTransport%srN)rrrrrrrrrrr"src@seZdZGdd�d�ZdS)r
c@seZdZdS)zfactory.SSHFactoryNrrrrr�
SSHFactory)srN)rrrrrrrrr
(sr
c@seZdZedd��ZdS)rcCsdS)N�r)�self�argrrr�NS-sz	common.NSN)rrr�classmethodrrrrrr,sr)�md5�sha1�sha256�sha384�sha512)�__version__)�unittest)�defer)�loopback)�	randbytes��insecureRandom)�	iterbytes�	_bytesChr)�address�service�_kex)�
proto_helpers)�
ConchErrorc@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)rr�connectionMade�errors�unimplementeds�debugs�ignoreds�gotUnsupportedVersion�rrrrr2Isz MockTransportBase.connectionMadecCs||_tj�||�S)zZ
        Intercept unsupported version call.

        @type remoteVersion: L{str}
        )r7rr�_unsupportedVersionReceived)rZ
remoteVersionrrrr9Us
�z-MockTransportBase._unsupportedVersionReceivedcCs|j�||f�dS)zp
        Store any errors received.

        @type reasonCode: L{int}
        @type description: L{str}
        N�r3�append)rZ
reasonCodeZdescriptionrrr�receiveError`szMockTransportBase.receiveErrorcCs|j�|�dS)zX
        Store any unimplemented packet messages.

        @type seqnum: L{int}
        N)r4r;)r�seqnumrrr�receiveUnimplementedjsz&MockTransportBase.receiveUnimplementedcCs|j�|||f�dS)z�
        Store any debug messages.

        @type alwaysDisplay: L{bool}
        @type message: L{str}
        @type lang: L{str}
        N)r5r;)rZ
alwaysDisplay�messageZlangrrr�receiveDebugsszMockTransportBase.receiveDebugcCs|j�|�dS)zG
        Store any ignored data.

        @type packet: L{str}
        N)r6r;�r�packetrrr�
ssh_IGNORE~szMockTransportBase.ssh_IGNOREN)
rrr�__doc__r2r9r<r>r@rCrrrrr1>s

	r1c@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)NrrrHrcCs>d|_t|�|jdkr:tdt|�|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�r�xrrr�encrypt�s�zMockCipher.encryptcCs>d|_t|�|jdkr:tdt|�|jt|�|jf��|S)z~
        Called to decrypt the packet.  Simply record that decryption was used
        and return the data unchanged.
        TrrI)�usedDecryptrKrLrM�decBlockSizerNrrr�decrypt�s�zMockCipher.decryptcCst|�S)zs
        Make a Message Authentication Code by sending the character value of
        the outgoing packet.
        ��chr)r�outgoingPacketSequence�payloadrrr�makeMAC�szMockCipher.makeMACcCst|�|kS)zy
        Verify the Message Authentication Code by checking that the packet
        sequence number is the same.
        rT)r�incomingPacketSequencerBZmacDatarrr�verify�szMockCipher.verifycCs||||||f|_dS)z"
        Record the keys.
        N)r	)rZivOutZkeyOutZivInZkeyInZmacInZmacOutrrr�setKeys�szMockCipher.setKeysN)rrrrD�
outCipTyperL�	inCipTyperR�	inMACType�
outMACType�verifyDigestSizerJrQ�outMACZinMACr	rPrSrXrZr[rrrrrE�s$rEc@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�rrWrrr�compress�szMockCompression.compresscCs|dd�ddd�Srcrrerrr�
decompress�szMockCompression.decompresscCsdS)N�fr�r�kindrrr�flush�szMockCompression.flushN)rrrrDrfrgrkrrrrrb�srbc@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.
    �MockServiceFZMSG_TESTZMSG_fiction)��GcCsdS)Nrlrr8rrr�	logPrefix�szMockService.logPrefixcCs
d|_dS)z6
        Record that the service was started.
        TN)�startedr8rrr�serviceStarted�szMockService.serviceStartedcCs
d|_dS)z6
        Record that the service was stopped.
        TN)�stoppedr8rrr�serviceStopped�szMockService.serviceStoppedcCs|j�d|�dS)z:
        A message that this service responds to.
        rnN)r�
sendPacketrArrr�ssh_TEST�szMockService.ssh_TESTN)rrrrD�namerqrsZprotocolMessagesrprrrtrvrrrrrl�s
rlc@s0eZdZdZdeiZdd�Zdd�Zdd�Zd	S)
�MockFactoryzL
    A mocked-up factory based on twisted.conch.ssh.factory.SSHFactory.
    �ssh-userauthcCstj�tj�tj�tj�d�S)zG
        Return the public keys that authenticate this server.
        ��ssh-rsasssh-dsa)r	�Key�
fromStringr�publicRSA_opensshZpublicDSA_opensshr8rrr�
getPublicKeyss�zMockFactory.getPublicKeyscCstj�tj�tj�tj�d�S)zH
        Return the private keys that authenticate this server.
        rz)r	r|r}r�privateRSA_opensshZprivateDSA_opensshr8rrr�getPrivateKeyss�zMockFactory.getPrivateKeyscCsdt�d�dffdd�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-sha1rH))��)�i)r.�getDHGeneratorAndPrimer8rrr�	getPrimess���zMockFactory.getPrimesN)	rrrrDrl�servicesrr�r�rrrrrxs�		rxc@seZdZdZdd�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)rxr�items�blob�rr	rw�keyrrrr8s
z&MockOldFactoryPublicKeys.getPublicKeysN)rrrrDrrrrrr�2sr�c@seZdZdZdd�ZdS)�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)rxr�r�Z	keyObjectr�rrrr�Is
z(MockOldFactoryPrivateKeys.getPrivateKeysN)rrrrDr�rrrrr�Csr�c@s4eZdZdZdZereZdd�Zdd�Zdd�Z	dS)	�TransportTestCasez.
    Base class for transport test cases.
    NcsVt���_����_g�_dd�}��td|��fdd�}�j��j�|�j_	dS)NcSsd|S)z;
            Return a consistent entropy value
            ��r)rKrrr�secureRandombsz-TransportTestCase.setUp.<locals>.secureRandomr�cs�j�||f�dS�N)�packetsr;)�messageTyperWr8rr�stubSendPackethsz/TransportTestCase.setUp.<locals>.stubSendPacket)
r/�StringTransportr�klass�protor�Zpatchr'�makeConnectionru)rr�r�rr8r�setUp^s

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�	_keySetupZ_KEY_EXCHANGE_NONE�_keyExchangeState�rr�rrr�finishKeyExchangeos
�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�Z_KEY_EXCHANGE_REQUESTEDr�Z_blockedByKeyExchanger�)r�sharedSecret�exchangeHashrrr�simulateKeyExchange�sz%TransportTestCase.simulateKeyExchange)
rrrrDr��dependencySkip�skipr�r�r�rrrrr�Tsr�c@seZdZdZdZeZdS)�DHGroupExchangeSHA1Mixinz=
    Mixin for diffie-hellman-group-exchange-sha1 tests.
    �"diffie-hellman-group-exchange-sha1N)rrrrD�kexAlgorithmr�
hashProcessorrrrrr��sr�c@seZdZdZdZeZdS)�DHGroupExchangeSHA256Mixinz?
    Mixin for diffie-hellman-group-exchange-sha256 tests.
    �$diffie-hellman-group-exchange-sha256N�rrrrDr�r r�rrrrr��sr�c@seZdZdZdZeZdS)�	ECDHMixinz8
    Mixin for elliptic curve diffie-hellman tests.
    �ecdh-sha2-nistp256Nr�rrrrr��sr�c@seZdZdZeZdS)�BaseSSHTransportBaseCasez,
    Base case for TransportBase tests.
    N)rrrrDr1r�rrrrr��sr�c@s�eZdZdZereZde�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[S)\�BaseSSHTransportTestszs
    Test TransportBase. It implements the non-server/client specific
    parts of the SSH transport protocol.
    �����������������r�r{�
aes256-ctr�	hmac-sha1�noner��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.
        �
rHrsSSH-2.0-Twisted_�asciizSSH-2.0-Nz^(�|css(|] }|dkr|��st�|�VqdS)�-N)�isspace�re�escape��.0�crrr�	<genexpr>�s�z9BaseSSHTransportTests.test_sendVersion.<locals>.<genexpr>z)*$)r�value�split�assertEqual�twisted_version�encode�decoderK�join�stringZ	printableZassertRegex)r�versionZsoftwareVersionZsoftwareVersionRegexrrr�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)	r1r�rr��assertFalseZ
disconnecting�
assertTrueZassertInr��rZsutrrr�'test_dataReceiveVersionNotSentMemoryDOS�s



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)	r1r�rr��clear�ordrur�r�)rr�r?rWr�rrr�test_sendPacketPlain�s



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)
r1r�rr�rE�currentEncryptionsr�r�rur�rJr�r��rr��
testCipherr?rWr�rrr�test_sendPacketEncrypteds


�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)r1r�rr�rb�outgoingCompressionr�rur�r�r�)rr�r�rrr�test_sendPacketCompressed+s


�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)r1r�rr�rEr�rbr�r�r�rur�rJr�r�r�rrr�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)r1r�rr�r�rur�r��bufr��	getPacketr�rrr�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.
        cSsdSr�rrrrr�<lambda>prz?BaseSSHTransportTests.test_getPacketEncrypted.<locals>.<lambda>r��BCDNs	A�ABCDr)r1�sendKexInitr�rr�rEr�rur�r�rRr��assertIsNoner�r�rQr��first)rr�r�r�rrr�test_getPacketEncryptedjs


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)r1r�rr�r�rbr��incomingCompressionrur�r�r�r�r�r�rrr�test_getPacketCompresseds

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.
        cSsdSr�rrrrrr��rz:BaseSSHTransportTests.test_getPacketBoth.<locals>.<lambda>r�r�sABCDEFGN)r1r�r�rr�rEr�rbr�r�rur�r�r�r�r�r�rrr�test_getPacketBoth�s

z(BaseSSHTransportTests.test_getPacketBothcCs>t�dddd�}d}}|jjD]}|�|�|||��q dS)z?
        Test that all the supportedCiphers are valid.
        �Ar��C�D�N)r�
SSHCiphersr��supportedCiphersr��
_getCipher)r�ciphers�ivr��cipNamerrr�test_ciphersAreValid�sz*BaseSSHTransportTests.test_ciphersAreValidcCsl|j���dd�d}||j_|j��}|�|dd�ttj��|�|dd�d�t	�
|dd�d�\}}}}}}}	}
}}}
|�|d�|jj��|�|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�rHr�s����������������N�
�,s)rr�r�r�r�r�r�rUr�rZgetNSr��supportedKeyExchanges�supportedPublicKeysr��
supportedMACs�supportedCompressions�supportedLanguages)rr�rBZkeyExchangesZpubkeysZciphers1Zciphers2Zmacs1Zmacs2Z
compressions1Z
compressions2Z
languages1Z
languages2r�rrr�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)rr�r�r�r�r�r�r�r8rrr�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.
        NrHr)	r�r�r�r�rr�r�r�rKr8rrr�test_sendKEXINITReply�s�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)�assertRaisesrMr�r�r8rrr�test_sendKexInitTwiceFails�sz0BaseSSHTransportTests.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�r�N)
r�MSG_SERVICE_REQUESTr�r�r�rur�r�r�rE�nextEncryptionsZ_newKeys�count)rZdisallowedMessageTypesr�rrr�test_sendKexInitBlocksOthers�s�


z2BaseSSHTransportTests.test_sendKexInitBlocksOtherscCs*|j�ddd�|�|jtjdfg�dS)z�
        Test that debug messages are sent correctly.  Payload::
            bool always display
            string debug message
            string language
        rFT�en�testenN)r�Z	sendDebugr�r�r�	MSG_DEBUGr8rrr�test_sendDebugs��z$BaseSSHTransportTests.test_sendDebugcCs8|j�tjd�|j�tjd�|�|jjddg�dS)zW
        Test that debug messages are received correctly.  See test_sendDebug.
        r
ssilenten)TrFr)FssilentrN)r�r�rrr�r5r8rrr�test_receiveDebug)s���z'BaseSSHTransportTests.test_receiveDebugcCs&|j�d�|�|jtjdfg�dS)zk
        Test that ignored messages are sent correctly.  Payload::
            string ignored data
        rFstestN)r��
sendIgnorer�r�r�
MSG_IGNOREr8rrr�test_sendIgnore8s��z%BaseSSHTransportTests.test_sendIgnorecCs&|j�tjd�|�|jjdg�dS)zb
        Test that ignored messages are received correctly.  See
        test_sendIgnore.
        rFN)r�r�rrr�r6r8rrr�test_receiveIgnoreCsz(BaseSSHTransportTests.test_receiveIgnorecCs$|j��|�|jtjdfg�dS)zt
        Test that unimplemented messages are sent correctly.  Payload::
            uint32 sequence number
        r�N)r�ZsendUnimplementedr�r�r�MSG_UNIMPLEMENTEDr8rrr�test_sendUnimplementedLs
��z,BaseSSHTransportTests.test_sendUnimplementedcCs&|j�tjd�|�|jjdg�dS)zo
        Test that unimplemented messages are received correctly.  See
        test_sendUnimplemented.
        s�rnN)r�r�rrr�r4r8rrr�test_receiveUnimplementedWs
�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
        Fcsd�d<dS�NTrrr�Zdisconnectedrr�stubLoseConnectioniszEBaseSSHTransportTests.test_sendDisconnect.<locals>.stubLoseConnectionrnrFs�testrN)r�loseConnectionr�ZsendDisconnectr�r��MSG_DISCONNECTr��rrrrr�test_sendDisconnectas��z)BaseSSHTransportTests.test_sendDisconnectcsNdg��fdd�}||j_|j�tjd�|�|jjdg�|��d�dS)zl
        Test that disconnection messages are received correctly.  See
        test_sendDisconnect.
        Fcsd�d<dSrrrrrrrzszHBaseSSHTransportTests.test_receiveDisconnect.<locals>.stubLoseConnections�test�rnrFrN)rrr�r�rr�r3r�rrrr�test_receiveDisconnectts
�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.
        Fcsd�d<dSrr)rB�ZkexInitrr�stubKEXINIT�sz<BaseSSHTransportTests.test_dataReceived.<locals>.stubKEXINITrN)
r��ssh_KEXINITr�rr�r��
gotVersionr��ourVersionString�otherVersionString)rr"rr!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.
        rnrFrN)rlr��
setServicer�r-r�rqr�r�rs�connectionLost)rr-Zservice2rrr�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.
        Fcsd�d<dSrrrrrr�logout�sz1BaseSSHTransportTests.test_avatar.<locals>.logoutTNr)r�ZlogoutFunctionZavatarr)r�)rr+rrr�test_avatar�sz!BaseSSHTransportTests.test_avatarcCs�|�|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��isEncryptedrEr�r�rr�r�	TypeErrorr8rrr�test_isEncrypted�s
�z&BaseSSHTransportTests.test_isEncryptedcCs�|�|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)zR
        Test that the transport accurately reflects its verified status.
        r-r.r/r�r0N)
r�r��
isVerifiedrEr�r�rr�rr2r8rrr�test_isVerified�s
�z%BaseSSHTransportTests.test_isVerifiedcsddg��fdd�}||j_|j��|�|jddtj�|�|jdddd�ttj��dS)	zh
        Test that loseConnection sends a disconnect message and closes the
        connection.
        Fcsd�d<dSrrrrrrr�szEBaseSSHTransportTests.test_loseConnection.<locals>.stubLoseConnectionrrHr��N)rrr�r�r�rrU�DISCONNECT_CONNECTION_LOSTrrrr�test_loseConnection�s
�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�|�q4���d����jddtj	����jdddd�t
tj��dS)	NFcsd�d<dSrrrrrrr�szRBaseSSHTransportTests.test_badVersion.<locals>.testBad.<locals>.stubLoseConnectionr�rrHr�r6)r�r�r$rrr*r�r�r�rrUZ)DISCONNECT_PROTOCOL_VERSION_NOT_SUPPORTED)r�rr�r8rr�testBad�s�z6BaseSSHTransportTests.test_badVersion.<locals>.testBadsSSH-1.5-OpenSSHsSSH-3.0-TwistedsGET / HTTP/1.1Nr)rr9rr8r�test_badVersion�s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�rr�
<listcomp>
sz@BaseSSHTransportTests.test_dataBeforeVersion.<locals>.<listcomp>N)
r1r�r/r�r%r*r�r$r�r&�r�datarr;r�test_dataBeforeVersions��z,BaseSSHTransportTests.test_dataBeforeVersioncCs<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�	r1r�r/r�r�r�r$r�r&r�rrr�test_compatabilityVersions

z/BaseSSHTransportTests.test_compatabilityVersioncCs<t�}|�t���|�d�|�|j�|�|jd�dS)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�rrr�&test_dataReceivedSSHVersionUnixNewlines��z<BaseSSHTransportTests.test_dataReceivedSSHVersionUnixNewlinecCs<t�}|�t���|�d�|�|j�|�|jd�dS)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�rrr�)test_dataReceivedSSHVersionTrailingSpaces2s
��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)r1�supportedVersionsr�r/r�r�r�r7r�rrr� test_supportedVersionsAreAllowedJs

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.0rErDN)r1rFr�r/r�r�r�r7r�rrr�6test_unsupportedVersionsCallUnsupportedVersionReceivedVs

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.
        csng�_|�j_���j�����t�j�d����jddtj����jdddd�t	|��dS)NrHrr�r6)
r�r�r�r�r�r�rKrrrU)rB�errorr8rrr9gsz6BaseSSHTransportTests.test_badPackets.<locals>.testBads��������s	BCDEs
AB123456cSs|dd�Srcr)rOrrrr�urz7BaseSSHTransportTests.test_badPackets.<locals>.<lambda>sBCDEFGHIJKcSstd��dS)Nzbad compression)�	Exception)rWrrr�stubDecompressysz=BaseSSHTransportTests.test_badPackets.<locals>.stubDecompresss	BCDEN)r�DISCONNECT_PROTOCOL_ERRORr�r�rEZDISCONNECT_MAC_ERRORrSrbr�rgZDISCONNECT_COMPRESSION_ERRORZflushLoggedErrors)rr9ZoldEncryptionsrKrr8r�test_badPacketsbs$
�

�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.
        csN���jddtj����jdddd�t|��g�j_|d7}dS)NrrHr�r6)r�r�rrrUr�)r=r8rr�checkUnimplemented�s�"zKBaseSSHTransportTests.test_unimplementedPackets.<locals>.checkUnimplemented�(rsMSG_fiction�)�<�FroN)r�rYr�rZmessagesr(rl)rr=rNrr8r�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.
        rN)r�r�rr�rEr�rbr�r�r(rlr1r�r/r�rZassertNotEqualr$rVrYr-)rr��proto2rrr�test_multipleClasses�s*
���z*BaseSSHTransportTests.test_multipleClassesN)1rrrrDr�r�rrr�r�r�r�r�r�r�r�r�r�r�r�rrrrrrrrrrrrr r'r*r,r3r5r8r:r?rArBrCrGrHrMrSrUrrrrr��s���������	�
����
)
%	
r�c@seZdZdZdd�ZdS)�'BaseSSHTransportDHGroupExchangeBaseCasez@
    Diffie-Hellman group exchange tests for TransportBase.
    cCsZ|j|j_d|j_|�d|jj���}|�d|���}|�|j�ddd�||�dS)z?
        Test that _getKey generates the correct keys.
        �EFsABCDKr��K�AB�CDN)r�r��kexAlg�	sessionIDr��digestr��_getKey)rZk1Zk2rrr�test_getKey�s

�z3BaseSSHTransportDHGroupExchangeBaseCase.test_getKeyN)rrrrDr_rrrrrV�srVc@seZdZdZdS)�(BaseSSHTransportDHGroupExchangeSHA1TestszE
    diffie-hellman-group-exchange-sha1 tests for TransportBase.
    N�rrrrDrrrrr`�sr`c@seZdZdZdS)�*BaseSSHTransportDHGroupExchangeSHA256TestszG
    diffie-hellman-group-exchange-sha256 tests for TransportBase.
    Nrarrrrrb�srbc@seZdZdZdS)�"BaseSSHTransportEllipticCurveTestsz4
    ecdh-sha2-nistp256 tests for TransportBase
    Nrarrrrrc�srcc@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.
    NcCsL|dkrtj}|�|jddtj�|�|jdddd�t|��dS)zI
        Helper function to check if the transport disconnected.
        NrdrrHr�r6)rrLr�r�rrUrirrr�checkDisconnected�sz5ServerAndClientSSHTransportBaseCase.checkDisconnectedcCsP|dkrtj}|��}||�|�t���|j�|j���|rL|�	|�|S)zy
        Helper function to connect a modified protocol to the test protocol
        and test for disconnection.
        N)
r�DISCONNECT_KEY_EXCHANGE_FAILEDr�r�r/r�r�r�r�re)rZprotoModificationrjrTrrr�connectModifiedProtocol�s
z;ServerAndClientSSHTransportBaseCase.connectModifiedProtocolcCsdd�}|�|�dS)z`
        Test that the transport disconnects if it can't match the key
        exchange
        cSs
g|_dSr��r��rTrrr�blankKeyExchangessz\ServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchKex.<locals>.blankKeyExchangesN�rg)rrjrrr�test_disconnectIfCantMatchKexszAServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchKexcCsdd�}|�|�dS)zP
        Like test_disconnectIfCantMatchKex, but for the key algorithm.
        cSs
g|_dSr�)r�rirrr�blankPublicKeyssz]ServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchKeyAlg.<locals>.blankPublicKeysNrk)rrmrrr� test_disconnectIfCantMatchKeyAlg
szDServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchKeyAlgcCsdd�}|�|�dS)zN
        Like test_disconnectIfCantMatchKex, but for the compression.
        cSs
g|_dSr��rrirrr�blankCompressionsszdServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchCompression.<locals>.blankCompressionsNrk)rrprrr�%test_disconnectIfCantMatchCompressionszIServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchCompressioncCsdd�}|�|�dS)zM
        Like test_disconnectIfCantMatchKex, but for the encryption.
        cSs
g|_dSr��r�rirrr�blankCiphers#szZServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchCipher.<locals>.blankCiphersNrk)rrsrrr� test_disconnectIfCantMatchCipherszDServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchCiphercCsdd�}|�|�dS)zF
        Like test_disconnectIfCantMatchKex, but for the MAC.
        cSs
g|_dSr��r�rirrr�	blankMACs,szTServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchMAC.<locals>.blankMACsNrk)rrvrrr�test_disconnectIfCantMatchMAC(szAServerAndClientSSHTransportBaseCase.test_disconnectIfCantMatchMACcCs$|�|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)r�r�ZgetPeerr,�SSHTransportAddressrr8rrr�test_getPeer1s

��z0ServerAndClientSSHTransportBaseCase.test_getPeercCs$|�|j��t�|jj����dS)z�
        Test that the transport's L{getHost} method returns an
        L{SSHTransportAddress} with the L{IAddress} of the host.
        N)r�r�ZgetHostr,rxrr8rrr�test_getHost;s

��z0ServerAndClientSSHTransportBaseCase.test_getHost)N)N)
rrrrDrergrlrnrqrtrwryrzrrrrrd�s
�

				
rdc@s&eZdZdZejZdd�Zdd�ZdS)�ServerSSHTransportBaseCasez1
    Base case for SSHServerTransport tests.
    cCs$t�|�t�|j_|jj��dSr�)r�r�rxr�r
�startFactoryr8rrrr�Ns

z ServerSSHTransportBaseCase.setUpcCs t�|�|jj��|j`dSr�)r��tearDownr�r
ZstopFactoryr8rrrr}Ts
z#ServerSSHTransportBaseCase.tearDownN)	rrrrDrrr�r�r}rrrrr{Fsr{c@sxeZdZdZdd�Zdd�Zdd�Zdd	�Zd
d�Zdd
�Z	dd�Z
dd�Zdd�Zdd�Z
dd�Zdd�Zdd�ZdS)�ServerSSHTransportTestsz'
    Tests for SSHServerTransport.
    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 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�r�r[�keyAlg�outgoingCompressionType�incomingCompressionTyper	r\r]r_r^�r�nerrr�test_KEXINITMultipleAlgorithms`s(�
�
�
�
�z6ServerSSHTransportTests.test_KEXINITMultipleAlgorithmscCs�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.
        r�rcSsg|]}t�|��qSr�rr�r�rOrrrr<�szEServerSSHTransportTests.test_ignoreGuessPacketKex.<locals>.<listcomp>cSsg|]}d�|��qS�r��r��r��yrrrr<�sNrd���
test�T��r�r�r�r�r�r�rrr#r�ZignoreNextPacketZ	ssh_DEBUG�ssh_KEX_DH_GEX_REQUEST_OLDr�r�r��ssh_KEX_DH_GEX_REQUEST�rZ
kexInitPacketrrr�test_ignoreGuessPacketKex�s<
����
�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.
        r�rcSsg|]}t�|��qSrr�r�rrrr<�szEServerSSHTransportTests.test_ignoreGuessPacketKey.<locals>.<listcomp>cSsg|]}d�|��qSr�r�r�rrrr<�sNrdr�r�r�Tr�r�r�rrr�test_ignoreGuessPacketKey�s<
����
�z1ServerSSHTransportTests.test_ignoreGuessPacketKeycCs`|g|j_dg|j_|j�|j���t�|�\}}t|d|�}|j�	t
�|��t
�d�d}t
�
|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�sD@����������������������������������������������������������������rrrN)r�r�r�r�rr�r.r��powr�r�MP�getMP�_MPpow�g�pr�updaterr%�ourKexInitPayloadr
�
publicKeysr�r]�privateKeys�signr�r�ZMSG_KEXDH_REPLY�MSG_NEWKEYS)rr�r�r��er��fr��hr��	signaturerrr�assertKexDHInitResponse�s@



������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[r�rrZ_ssh_KEX_ECDH_INITrrr8rrr�%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.
        r�r�r{r�r�r�rr�r�N)rrr�r#r�AttributeErrorr)r�kexmsgrrr� test_checkBad_KEX_INIT_CurveNames:��������	�
����
z8ServerSSHTransportTests.test_checkBad_KEX_INIT_CurveNamecCs|�d�dS)z�
        KEXDH_INIT messages are processed when the
        diffie-hellman-group14-sha1 key exchange algorithm is requested.
        r�N)r�r8rrr�test_KEXDH_INIT_GROUP14sz/ServerSSHTransportTests.test_KEXDH_INIT_GROUP14c
s�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�rYrZrWrdrcsg|]}�j�|dd��qS�rYrW�r�r^r�r8rrr<,s�z9ServerSSHTransportTests.test_keySetup.<locals>.<listcomp>�ABCDEFrHr�rrr�r6N�r�r[rEr	r�r�r\r�rr�r*r	�rZnewKeysrr8r�
test_keySetup!s 

���z%ServerSSHTransportTests.test_keySetupc
s�d�j_t��j_��dd����jjd���dd����jjd����jdtj	df��fdd�t
d	�D�}���jjj|d
|d|d|d
|d|df�dS)r�r�rYrZrWrdrcsg|]}�j�|dd��qSr�r�r�r8rrr<?s�z>ServerSSHTransportTests.test_ECDH_keySetup.<locals>.<listcomp>r�rHr�rrr�r6Nr�r�rr8r�test_ECDH_keySetup4s 

���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�r�zlibrYrZrWN)r�rr�r�r	�ssh_NEWKEYS�assertIsr�r�r�r�r�r��assertIsNotNoner�r8rrr�test_NEWKEYSGs&�
�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.
        ryrmN)
r��ssh_SERVICE_REQUESTrrr�r�rZMSG_SERVICE_ACCEPTr-rwr8rrr�test_SERVICE_REQUEST_s
�z,ServerSSHTransportTests.test_SERVICE_REQUESTcCs|j�d�|��dS�zD
        Test that NEWKEYS disconnects if it receives data.
        s
bad packetN�r�r�rer8rrr�test_disconnectNEWKEYSDatajsz2ServerSSHTransportTests.test_disconnectNEWKEYSDatacCs"|j�t�d��|�tj�dS)zd
        Test that SERVICE_REQUESTS disconnects if an unknown service is
        requested.
        s
no serviceN)r�r�rrrerZ DISCONNECT_SERVICE_NOT_AVAILABLEr8rrr�(test_disconnectSERVICE_REQUESTBadServicersz@ServerSSHTransportTests.test_disconnectSERVICE_REQUESTBadServiceN)rrrrDr�r�r�r�r�r�r�r�r�r�r�r�r�rrrrr~[s&%"(r~c@s8eZdZdZdd�Zdd�Zdd�Zdd	�Zd
d�ZdS)
�)ServerSSHTransportDHGroupExchangeBaseCasezE
    Diffie-Hellman group exchange tests for SSHServerTransport.
    cCs�|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�r�N)r�r�r�r�r�rr�r�r
r��getr�r��MSG_KEX_DH_GEX_GROUPrr�r�r��rZdhGeneratorZdhPrimerrr�test_KEX_DH_GEX_REQUEST_OLD�s
��zEServerSSHTransportDHGroupExchangeBaseCase.test_KEX_DH_GEX_REQUEST_OLDcCsd|j_|�t|jjd�dS)r�N)r�r[rr0r�r8rrr�%test_KEX_DH_GEX_REQUEST_OLD_badKexAlg�s�zOServerSSHTransportDHGroupExchangeBaseCase.test_KEX_DH_GEX_REQUEST_OLD_badKexAlgcCs�|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 message causes the server to reply
        with a KEX_DH_GEX_GROUP message with the correct Diffie-Hellman
        group.
        r{�r�rr�r�N)r�r�r�r�r�rr�r�r
r�r�r�r�r�rr�r�r�r�rrr�test_KEX_DH_GEX_REQUEST�s
��zAServerSSHTransportDHGroupExchangeBaseCase.test_KEX_DH_GEX_REQUESTc
Cst|��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�|��|�|jdd�tjt�
|jj
jd���|t�
|jj
jd�|��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������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������rrr{r�rHNr)r�r�r�r�r�rr�r�r�r�rr%r�r
r�r�r�r]�ssh_KEX_DH_GEX_INITr�r�r�MSG_KEX_DH_GEX_REPLYr�r�r��rr�r�r�r�r�r�rrr�&test_KEX_DH_GEX_INIT_after_REQUEST_OLD�s>


������zPServerSSHTransportDHGroupExchangeBaseCase.test_KEX_DH_GEX_INIT_after_REQUEST_OLDc
Csf|��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�r�rrr{r�rHN)r�r�r�r�r�rr�r�r�r�rr%r�r
r�r�r�r]r�r�r�rr�r�r�r�rrr�"test_KEX_DH_GEX_INIT_after_REQUEST�s:


�����zLServerSSHTransportDHGroupExchangeBaseCase.test_KEX_DH_GEX_INIT_after_REQUESTN)	rrrrDr�r�r�r�r�rrrrr�|s
 r�c@seZdZdZdS)�*ServerSSHTransportDHGroupExchangeSHA1TestszJ
    diffie-hellman-group-exchange-sha1 tests for SSHServerTransport.
    Nrarrrrr��sr�c@seZdZdZdS)�,ServerSSHTransportDHGroupExchangeSHA256TestszL
    diffie-hellman-group-exchange-sha256 tests for SSHServerTransport.
    Nrarrrrr��sr�c@s&eZdZdZejZdd�Zdd�ZdS)�ClientSSHTransportBaseCasez1
    Base case for SSHClientTransport tests.
    cCs@d|_|�||j�|�|�dd�t�t|�����t�	d�S)zC
        Mock version of SSHClientTransport.verifyHostKey.
        T�:r)
�calledVerifyHostKeyr�r��replace�binascii�hexlifyrr]r%�succeed)rZpubKeyZfingerprintrrr�
verifyHostKeys�z(ClientSSHTransportBaseCase.verifyHostKeycCsBt�|�tj�tj���|_tj�tj�|_	d|_
|j|j_dS)NF)
r�r�r	r|r}rr~r�r��privObjr�r�r�r8rrrr�s

z ClientSSHTransportBaseCase.setUpN)	rrrrDrrr�r�r�rrrrr�sr�c@s�eZdZdZdd�Zdd�Zdd�Zdd	�Zd
d�Zdd
�Z	dd�Z
dd�Zdd�Zdd�Z
dd�Zdd�Zdd�Zdd�Zdd�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�r�r�Nr�r�rrrr�'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�)Ztrap�NotImplementedError)r�rrr�_checkRaisesTszNClientSSHTransportTests.test_notImplementedClientMethods.<locals>._checkRaisesN)rr�r��connectionSecurer��addCallbackZfailZ
addErrback)rr��drrr� test_notImplementedClientMethodsMsz8ClientSSHTransportTests.test_notImplementedClientMethodscCsX|g|j_|j�|j���|�t�|jj�dd�d�|�|j	tj
|jjfg�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�Ns@����������������������������������������������������������������)r�r�r�rr�r�rr�rOr�ZMSG_KEXDH_INITr�)rr�rrr�assertKexInitResponseForDHZs
�z2ClientSSHTransportTests.assertKexInitResponseForDHcCs|�d�dS)zq
        KEXINIT messages requesting diffie-hellman-group14-sha1 result in
        KEXDH_INIT responses.
        r�N)r�r8rrr�test_KEXINIT_group14psz,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�r�rr�r�rr0r�r=rrr�test_KEXINIT_badKexAlgxs
z.ClientSSHTransportTests.test_KEXINIT_badKexAlgcs����t��jj�jj�jj�}t�}|�t�	�jj
�d�|�t�	�jj�d�|�t�	�j��|��jj
�|�d�|�|�|�����fdd�}�j���}�j�t�	�j�dt�	|��}|�|�|S)zH
        Test that the KEXDH_REPLY message verifies the server.
        rscs*��|����j����jj��dSr��r�r�r�r�r�r\�r��r�rrr�_cbTestKEXDH_REPLY�s
zDClientSSHTransportTests.test_KEXDH_REPLY.<locals>._cbTestKEXDH_REPLY)r�rr�r�r�rOr�rr�rr%r�r�r�r]r�r��ssh_KEX_DH_GEX_GROUPr�)rr�r�r�r�r�rr�r�test_KEXDH_REPLY�s*�

��
z(ClientSSHTransportTests.test_KEXDH_REPLYc
s�d�j_t��j_��dd����jjd���dd����jjd����jdtj	df��fdd�t
d	�D�}���jjj|d
|d|d|d
|d|df�dS)r�r�rYrZrWrdrcsg|]}�j�|dd��qSr�r�r�r8rrr<�s�z9ClientSSHTransportTests.test_keySetup.<locals>.<listcomp>r�rrrHr�r6r�Nr�r�rr8rr��s 

���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.
        Fcsd�d<dSrrr�Zsecurerr�stubConnectionSecure�szBClientSSHTransportTests.test_NEWKEYS.<locals>.stubConnectionSecurer�rYrZrrr�sGHsIJN)r�r�r�rr�r	r�ZassertIsNotr�rEr�r�r�r�r�r�r�r�r�)rr�rr�rr��s<�
�

�z$ClientSSHTransportTests.test_NEWKEYScCs*t�|j_|j�d�|�|jjj�dS)zS
        Test that the SERVICE_ACCEPT packet starts the requested service.
        �MockServiceN)rlr��instance�ssh_SERVICE_ACCEPTr�rqr8rrr�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�ZrequestServicerlr�r�rrr8rrr�test_requestService�s�z+ClientSSHTransportTests.test_requestServicecCs,|��|j�d|jdd�|�tj�dS)zL
        Test that KEXDH_REPLY disconnects if the signature is bad.
        Nr��
bad signature)r�r�Z_continueKEXDH_REPLYr�rerrfr8rrr�&test_disconnectKEXDH_REPLYBadSignature�sz>ClientSSHTransportTests.test_disconnectKEXDH_REPLYBadSignaturecCs,dt�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��|j_d|j_|j�t�t���d���t�|�t�d��|�tj�dS�
zO
        Test that KEX_ECDH_REPLY disconnects if the signature is bad.
        r�r�r{r�r�r�rr�r�sSSH-2.0-OpenSSH
s
bad-signatureN�rrr�r#r�r
Zgenerate_private_keyZ	SECP256R1rZecPrivZ
public_keyZecPubZpublic_numbersZencode_pointZcurver[Z_ssh_KEX_ECDH_REPLYrxrr�rerrf�rr�ZthisPrivZthisPubZencPubrrr�)test_disconnectKEX_ECDH_REPLYBadSignature�sZ��������	�
����
����zAClientSSHTransportTests.test_disconnectKEX_ECDH_REPLYBadSignaturecCs|j�d�|��dSr�r�r8rrrr�sz2ClientSSHTransportTests.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)rlr�r�r�rer8rrr�test_disconnectSERVICE_ACCEPT$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.
        rrN)	rlr�r�r�r�rqr�rKr�r8rrr�test_noPayloadSERVICE_ACCEPT.s
z4ClientSSHTransportTests.test_noPayloadSERVICE_ACCEPTN)rrrrDr�r�r�r�r�r�r�r�r�r�r�r�r�r�r�rrrrr�"s &
 "			*
r�c@s8eZdZdZdd�Zdd�Zdd�Zdd	�Zd
d�ZdS)
�)ClientSSHTransportDHGroupExchangeBaseCasezE
    Diffie-Hellman group exchange tests for SSHClientTransport.
    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�r�r�rr�r�r�ZMSG_KEX_DH_GEX_REQUESTr8rrr�test_KEXINIT_groupexchange@s�zDClientSSHTransportDHGroupExchangeBaseCase.test_KEXINIT_groupexchangec	Cs�|��|j�d�|�|jjd�|�|jjd�|�t�|jj�dd�d�|�|jj	t�t
d|jjd���|�|jdd�tj
|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.
        �
�rr�Ns(����������������������������������������rH)r�r�r�r�r�r�rr�rOr�r�r�rZMSG_KEX_DH_GEX_INITr8rrr�test_KEX_DH_GEX_GROUPMs�
��z?ClientSSHTransportDHGroupExchangeBaseCase.test_KEX_DH_GEX_GROUPcs����t�d�jj�jj�}���}|�t��jj	�d�|�t��jj
�d�|�t��j��|�d�|�d�|��jj�|�d�|�|�|�
����fdd�}�j���}�j�t��j�dt�|��}|�|�|S)z^
        Test that the KEX_DH_GEX_REPLY message results in a verified
        server.
        r�rr�r�r�cs*��|����j����jj��dSr�r�r�r�rr�_cbTestKEX_DH_GEX_REPLYqs
z`ClientSSHTransportDHGroupExchangeBaseCase.test_KEX_DH_GEX_REPLY.<locals>._cbTestKEX_DH_GEX_REPLY)rrr�r�rOr�r�r�rr%r�r�r�r]r�r�Zssh_KEX_DH_GEX_REPLYr�)rr�r�rr�r�rr�r�test_KEX_DH_GEX_REPLY^s.




���
z?ClientSSHTransportDHGroupExchangeBaseCase.test_KEX_DH_GEX_REPLYcCs,|��|j�d|jdd�|�tj�dS)zQ
        Test that KEX_DH_GEX_REPLY disconnects if the signature is bad.
        Nr�r�)rr�Z_continueGEX_REPLYr�rerrfr8rrr�$test_disconnectGEX_REPLYBadSignature�szNClientSSHTransportDHGroupExchangeBaseCase.test_disconnectGEX_REPLYBadSignaturecCs,dt�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��|j_d|j_|j�t�t���d���t�|�t�d��|�tj�dSr�r�r�rrrr��sZ��������	�
����
����zSClientSSHTransportDHGroupExchangeBaseCase.test_disconnectKEX_ECDH_REPLYBadSignatureN)	rrrrDr�rrrr�rrrrr�;s
"	r�c@seZdZdZdS)�*ClientSSHTransportDHGroupExchangeSHA1TestszJ
    diffie-hellman-group-exchange-sha1 tests for SSHClientTransport.
    Nrarrrrr�src@seZdZdZdS)�,ClientSSHTransportDHGroupExchangeSHA256TestszL
    diffie-hellman-group-exchange-sha256 tests for SSHClientTransport.
    Nrarrrrr�src@s`eZdZdZereZdd�Zdd�Zdd�Zdd	�Z	d
d�Z
dd
�Zdd�Zdd�Z
dd�ZdS)�GetMACTestsz*
    Tests for L{SSHCiphers._getMAC}.
    cCst�dddd�|_dS)Nr�r�r�r�)rr�r�r8rrrr��szGetMACTests.setUpcCstd�S)z�
        Generate a new shared secret to be used with the tests.

        @return: A new secret.
        @rtype: L{bytes}
        �@r(r8rrr�getSharedSecret�szGetMACTests.getSharedSecretc
Cs�|��}|j�||�}|d|�d|}d�dd�t|�D��}d�dd�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�rcss|]}tt|�dA�VqdS)�6N�rUr��r��brrrr��sz+GetMACTests.assertGetMAC.<locals>.<genexpr>css|]}tt|�dA�VqdS)�\Nr
rrrrr��s)rr��_getMACr�r*r�r�)
rZhmacNamer��
digestSize�blockPadSizeZsecret�paramsr�ZinnerPadZouterPadrrr�assertGetMAC�s
�zGetMACTests.assertGetMACcCs|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)rr"r8rrr�test_hmacsha2512�s�zGetMACTests.test_hmacsha2512cCs|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)rr!r8rrr�test_hmacsha2384	s�zGetMACTests.test_hmacsha2384cCs|jdtddd�dS)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)rr r8rrr�test_hmacsha2256	s�zGetMACTests.test_hmacsha2256cCs|jdtddd�dS)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)rrr8rrr�
test_hmacsha1	szGetMACTests.test_hmacsha1cCs|jdtddd�dS)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.
        r�rrN)rrr8rrr�test_hmacmd5'	szGetMACTests.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�)NrrrN)rr�rr�)rr�rrrr�	test_none1	szGetMACTests.test_noneN)rrrrDr�r�r�rrrrrrrrrrrrr�s
 

rc@s@eZdZdZereZdd�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.
        r�r�r�r�N)rr�r�r\r]r_r^)rr�rrr�	test_initF	s
zSSHCiphersTests.test_initc	Csjt�dddd�}d}}|j��D]B\}\}}}|�|||�}|dkrV|�|tj�q"|�|j|�q"dS)zM
        Test that the _getCipher method returns the correct cipher.
        r�r�r�r�r�r�N)rr��	cipherMapr�r�ZassertIsInstanceZ_DummyCipher�	algorithm)	rr�r�r�r�ZalgClass�keySize�counter�ciprrr�test_getCipherQ	szSSHCiphersTests.test_getCipherc
	Cs<d}tjjD�](}tjj|\}}}t�|ddd�}t�d|dd�}|�|||�}|jjd}	|�||dddd�|�dd||dd�|�	|j
|	�|�	|j|	�|��}
|
�
|d|	��}|
�
|d|	��}|�	|�|d|	��|�|�	|�|d|	��|�|�	|�|�|d|	��|�	|�|�|d|	��qdS)z8
        Test that setKeys sets up the ciphers.
        �@r��rN)rrr�r�r"r�r#Z
block_sizer[r�rLrR�	encryptorr�rPrS)
rr�r�ZmodNamer$r%Z	encCipherZ	decCipherr&Zbsr*�encZenc2rrr�test_setKeysCiphers_	s,
�
�z#SSHCiphersTests.test_setKeysCiphersc
	Cs�d}tjj��D]�\}}t�dd|d�}t�ddd|�}|�dddd|d�|�ddddd|�|rn|�j}nd}|�|j|�|r�|�||�\}}}}d}	|}
d|}|r�|||||��	���	�}nd}|�|�
|	|
�|�|�|�|	|
|��qdS)z5
        Test that setKeys sets up the MACs.
        r(r�rrr�N)
rr�ZmacMapr�r[Zdigest_sizer�r`rr]rXr�rZ)
rr�ZmacName�modZoutMacZinMacZds�i�o�seqidr>rB�macrrr�test_setKeysMACsy	s(
z SSHCiphersTests.test_setKeysMACsc
Cs�dddg}|D]n\}}}t�dddd�}|�d|�|_t�d|dd��\}|dd�}|�|t�|�	||��d	||f�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)r�s2��������������������������������������������������s 56be34521d144c88dbb8c733f0e8b3f6r�rz>LNr6z'Failed HMAC test vector; key=%r data=%r)
rr�rra�structZunpackr�r�r�rX)rZvectorsr�r>r1rar0Z	shortenedrrr�test_makeMAC�	s �	
�
�zSSHCiphersTests.test_makeMACN)rrrrDr�r�r!r'r,r2r4rrrrr >	sr c@s@eZdZdZereZdd�Zdd�Zdd�Zdd	�Z	d
d�Z
dS)
�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}
        cs�j�||f�Sr�r:��codeZdesc)�serverrrr��	s�z9TransportLoopbackTests._runClientServer.<locals>.<lambda>cSs
t�d�Sr�)r%r�)rOr�rrrr��	rcs�j�||f�Sr�r:r6��clientrrr��	s�cs���Sr�)rrr9rrr��	rcs�t|jd|jd|jd|jdg�}��|jg���|jtjdfg�|jddkr|��	|�
�|���	|�
�|�n ��|�
�|���|�
�|�|jddkr̈�	|��|���	|��|�n ��|��|���|��|�dS)Nrsuser closed connectionr�)
�reprr�r�r�rr�r3rr7r�r1r�r4)Zignoredr8r:rwr8rr�check�	s(
��z6TransportLoopbackTests._runClientServer.<locals>.check)rxrrr
r|r3r<rr�r��listrr	r�r&Z
loopbackAsyncr�)rr-r
r<r�r)r:rr8r�_runClientServer�	s(	
�z'TransportLoopbackTests._runClientServercsBg}tjjdgD] ��fdd�}|�|�|��qtj|dd�S)z{
        Test that the client and server play nicely together, in all
        the various combinations of ciphers.
        r�cs�g|_|Sr�rrr;�Zcipherrr�	setCipher�	sz6TransportLoopbackTests.test_ciphers.<locals>.setCipherT�ZfireOnOneErrback)rrr�r;r>r%�DeferredList)r�	deferredsr@rr?r�test_ciphers�	s
z#TransportLoopbackTests.test_cipherscsBg}tjjdgD] ��fdd�}|�|�|��qtj|dd�S)z>
        Like test_ciphers, but for the various MACs.
        r�cs�g|_|Sr�rur;�r1rr�setMAC
sz0TransportLoopbackTests.test_macs.<locals>.setMACTrA)rrr�r;r>r%rB)rrCrFrrEr�	test_macs�	s
z TransportLoopbackTests.test_macscs<g}tjjD] ��fdd�}|�|�|��qtj|dd�S)zG
        Like test_ciphers, but for the various key exchanges.
        cs�g|_|Sr�rhr;�r�rr�setKeyExchange
sz@TransportLoopbackTests.test_keyexchanges.<locals>.setKeyExchangeTrA)rrr�r;r>r%rB)rrCrIrrHr�test_keyexchanges
s
z(TransportLoopbackTests.test_keyexchangescs<g}tjjD] ��fdd�}|�|�|��qtj|dd�S)zF
        Like test_ciphers, but for the various compressions.
        cs�g|_|Sr�ror;�Zcompressionrr�setCompression
sz@TransportLoopbackTests.test_compressions.<locals>.setCompressionTrA)rrrr;r>r%rB)rrCrLrrKr�test_compressions
s
z(TransportLoopbackTests.test_compressionsN)rrrrDr�r�r>rDrGrJrMrrrrr5�	s5

r5c@s8eZdZdZereZdd�Zdd�Zdd�Zdd	�Z	d
S)�RandomNumberTestszp
    Tests for the random number generator L{_getRandomNumber} and private
    key generator L{_generateX}.
    cCs dd�}|�t�|d�d�dS)z�
        L{_getRandomNumber} returns an integer constructed directly from the
        bytes returned by the random byte generator passed to it.
        cSst|�|Sr�rT�r>rrr�random1
szARandomNumberTests.test_usesSuppliedRandomFunction.<locals>.randomriN)r�r�_getRandomNumber�rrPrrr�test_usesSuppliedRandomFunction,
s

�z1RandomNumberTests.test_usesSuppliedRandomFunctioncCs|�ttjdd�dS)z�
        L{_getRandomNumber} raises L{ValueError} if the number of bits
        passed to L{_getRandomNumber} is not a multiple of 8.
        N�	)r�
ValueErrorrrQr8rrr�test_rejectsNonByteMultiples:
s�z.RandomNumberTests.test_rejectsNonByteMultiplescs:td�td�td�g��fdd�}|�t�|d�d�dS)z�
        If the random byte generator passed to L{_generateX} produces bytes
        which would result in 0 or 1 being returned, these bytes are
        discarded and another attempt is made to produce a larger value.
        rrH�cs��d�|S�Nr��poprO�ZresultsrrrPK
sz4RandomNumberTests.test_excludesSmall.<locals>.randomr)N�rUr�rZ
_generateXrRrr[r�test_excludesSmallD
s
�z$RandomNumberTests.test_excludesSmallcs4td�td�g��fdd�}|�t�|d�d�dS)z�
        If the random byte generator passed to L{_generateX} produces bytes
        which would result in C{(2 ** bits) - 1} being returned, these bytes
        are discarded and another attempt is made to produce a smaller
        value.
        rnrcs��d�|SrXrYrOr[rrrPZ
sz4RandomNumberTests.test_excludesLarge.<locals>.randomr)Nr\rRrr[r�test_excludesLargeR
s
�z$RandomNumberTests.test_excludesLargeN)
rrrrDr�r�rSrVr]r^rrrrrN#
s
rN)]rDZ
__future__rrr�r�r�r3Ztwisted.python.reflectrrrr�Ztwisted.conch.sshrrr	r
Ztwisted.conch.testrZcryptography.hazmat.backendsrZ)cryptography.hazmat.primitives.asymmetricr
Zcryptography.exceptionsrZhashlibrrr r!r"Ztwistedr#r�Z
twisted.trialr$Ztwisted.internetr%Ztwisted.protocolsr&Ztwisted.pythonr'Ztwisted.python.randbytesr)Ztwisted.python.compatr*r+rUr,r-r.Ztwisted.testr/Ztwisted.conch.errorr0rr1�objectrErbZ
SSHServicerlrrxr�r�ZTestCaser�r�r�r�r�r�rVr`rbrcrdr{r~r�r�r�r�r�r�rrrr r5rNrrrr�<module>s�JB'.:


	
�	
�	
�	c#x
�	
�	y
�	
�	xrs
@ Telegram