WebSVN – Kolibri OS – Diff – /programs/network/ssh/ssh.asm

 ;    along with this program.  If not, see .
 format binary as ""
 __DEBUG__       = 1
-__DEBUG_LEVEL__ = 1
+__DEBUG_LEVEL__ = 2             ; 1: Extreme debugging, 2: Debugging, 3: Errors only
         dd      1               ; header version
         dd      start           ; entry point
         dd      i_end           ; initialized size
         dd      mem+4096        ; required memory
         dd      mem+4096        ; stack pointer
-        dd      hostname        ; parameters
+        dd      params          ; parameters
         dd      0               ; path
+include '../../macros.inc'
-include '../../macros.inc'
+;include '../../struct.inc'
 purge mov,add,sub
 include '../../proc32.inc'
 include '../../dll.inc'
 include '../../debug-fdo.inc'
 include '../../network.inc'
-;include '../../develop/libraries/libcrash/trunk/libcrash.inc'
+include '../../develop/libraries/libcrash/trunk/libcrash.inc'
 include 'mcodes.inc'
 include 'ssh_transport.inc'
 include 'dh_gex.inc'
 include 'mpint.inc'
 include 'random.inc'
 include 'aes256.inc'
 include 'aes256-ctr.inc'
 include 'aes256-cbc.inc'
-include '../../fs/kfar/trunk/kfar_arc/sha256.inc'
+include 'hmac_sha256.inc'
 macro dw_n op {
    dw 0 or (((op) and 0FF00h) shr 8) or \
            (((op) and 000FFh) shl 8)
+}
+proc dump_hex _ptr, _length
+if __DEBUG_LEVEL__ <= 1
+        pushad
+        mov     esi, [_ptr]
+        mov     ecx, [_length]
+  .next_dword:
+        lodsd
+        bswap   eax
+        DEBUGF  1,'%x',eax
+        loop    .next_dword
+        DEBUGF  1,'\n'
+        popad
+        ret
+end if
+endp
+struct  ssh_connection
+; Connection
+        hostname                rb 1024
+        socketnum               dd ?
+        sockaddr                dw ?            ; Address family
+        port                    dw ?
+        ip                      dd ?
+                                rb 10
+; Encryption/Decryption
+        rx_crypt_proc           dd ?
+        tx_crypt_proc           dd ?
+        rx_crypt_ctx_ptr        dd ?
+        tx_crypt_ctx_ptr        dd ?
+        rx_crypt_blocksize      dd ?
+        tx_crypt_blocksize      dd ?
+; Message authentication
+        rx_mac_proc             dd ?
+        tx_mac_proc             dd ?
+        rx_mac_ctx              hmac_sha256_context
+        tx_mac_ctx              hmac_sha256_context
+        rx_mac_length           dd ?
+        tx_mac_length           dd ?
+; Buffers
+        rx_seq                  dd ?            ; Packet sequence number for MAC
+        rx_buffer               ssh_packet_header
+                                rb BUFFERSIZE-sizeof.ssh_packet_header
+        tx_seq                  dd ?            ; Packet sequence number for MAC
+        tx_buffer               ssh_packet_header
+                                rb BUFFERSIZE-sizeof.ssh_packet_header
+        send_data               dw ?
+; Output from key exchange
+        dh_K                    dd ?            ; Shared Secret (Big endian)
+                                rb MAX_BITS/8
+        dh_K_length             dd ?            ; Length in little endian
+        dh_H                    rb 32           ; Exchange Hash
+        session_id_prefix       db ?
+        session_id              rb 32
+        rx_iv                   rb 32           ; Rx initialisation vector
+        tx_iv                   rb 32           ; Tx initialisation vector
+        rx_enc_key              rb 32           ; Rx encryption key
+        tx_enc_key              rb 32           ; Tx encryption key
+        rx_int_key              rb 32           ; Rx integrity key
+        tx_int_key              rb 32           ; Tx integrity key
+; Diffie Hellman
+        dh_p                    dd ?
+                                rb MAX_BITS/8
+        dh_g                    dd ?
+                                rb MAX_BITS/8
+        dh_x                    dd ?
+                                rb MAX_BITS/8
+        dh_e                    dd ?
+                                rb MAX_BITS/8
+        dh_f                    dd ?
+                                rb MAX_BITS/8
+        dh_signature            dd ?
+                                rb MAX_BITS/8
+        temp_ctx                ctx_sha224256
+        k_h_ctx                 ctx_sha224256
+ends
 start:
         mcall   68, 11          ; Init heap
-        DEBUGF  1, "SSH: Loading libraries\n"
+        DEBUGF  2, "SSH: Loading libraries\n"
         stdcall dll.Load, @IMPORT
         test    eax, eax
         jnz     exit
-        DEBUGF  1, "SSH: Init PRNG\n"
+        DEBUGF  2, "SSH: Init PRNG\n"
         call    init_random
-        DEBUGF  1, "SSH: Init Console\n"
+        DEBUGF  2, "SSH: Init Console\n"
         invoke  con_start, 1
         invoke  con_init, 80, 25, 80, 25, title
-; Check for parameters
+; Check for parameters TODO
-        cmp     byte[hostname], 0
+;        cmp     byte[params], 0
-        jne     resolve
+;        jne     resolve
 main:
         invoke  con_cls
 ; Welcome user
         invoke  con_write_asciiz, str1
 prompt:
 ; write prompt
         invoke  con_write_asciiz, str2
 ; read string
-        mov     esi, hostname
+        mov     esi, con.hostname
+        invoke  con_gets, esi, 256
-        invoke  con_gets, esi, 256
+; check for exit
-; check for exit
+        test    eax, eax
-        test    eax, eax
+        jz      done
-        jz      done
+        cmp     byte[esi], 10
-        cmp     byte[esi], 10
+        jz      done
         jz      done
 resolve:
-resolve:
+        mov     [con.sockaddr], AF_INET4
         add     ebx, eax
         jmp     .portloop
   .port_done:
         xchg    bl, bh
-        mov     [sockaddr1.port], bx
+        mov     [con.port], bx
   .done:
 ; resolve name
         push    esp     ; reserve stack place
         push    esp
-        invoke  getaddrinfo, hostname, 0, 0
+        invoke  getaddrinfo, con.hostname, 0, 0
         pop     esi
 ; test for error
         test    eax, eax
         jnz     dns_error
         invoke  con_cls
         invoke  con_write_asciiz, str3
-        invoke  con_write_asciiz, hostname
+        invoke  con_write_asciiz, con.hostname
 ; write results
         invoke  con_write_asciiz, str8
 ; convert IP address to decimal notation
         mov     eax, [esi+addrinfo.ai_addr]
         mov     eax, [eax+sockaddr_in.sin_addr]
 ; Create socket
         mcall   socket, AF_INET4, SOCK_STREAM, 0
         cmp     eax, -1
         jz      socket_err
-        mov     [socketnum], eax
+        mov     [con.socketnum], eax
+; Connect
-; Connect
+        DEBUGF  2, "Connecting to server\n"
-        mcall   connect, [socketnum], sockaddr1, 18
+        mcall   connect, [con.socketnum], con.sockaddr, 18
         test    eax, eax
         jnz     socket_err
-; Start calculating hash meanwhile
-        call    sha256_init
+; Start calculating hash
-; HASH: string  V_C, the client's version string (CR and NL excluded)
-        mov     esi, ssh_ident_ha
+        invoke  sha256_init, con.temp_ctx
-        mov     edx, ssh_ident.length+4-2
+; HASH: string  V_C, the client's version string (CR and NL excluded)
-        call    sha256_update
+        invoke  sha256_update, con.temp_ctx, ssh_ident_ha, ssh_ident.length+4-2
-; Send our identification string
+; >> Send our identification string
-        DEBUGF  1, "Sending ID string\n"
+        DEBUGF  2, "Sending ID string\n"
-        mcall   send, [socketnum], ssh_ident, ssh_ident.length, 0
+        mcall   send, [con.socketnum], ssh_ident, ssh_ident.length, 0
         cmp     eax, -1
         je      socket_err
-; Check protocol version of server
+; << Check protocol version of server
-        mcall   recv, [socketnum], rx_buffer, BUFFERSIZE, 0
+        mcall   recv, [con.socketnum], con.rx_buffer, BUFFERSIZE, 0
         cmp     eax, -1
         je      socket_err
-        DEBUGF  1, "Received ID string\n"
+        DEBUGF  2, "Received ID string\n"
-        cmp     dword[rx_buffer], "SSH-"
+        cmp     dword[con.rx_buffer], "SSH-"
         jne     proto_err
-        cmp     dword[rx_buffer+4], "2.0-"
+        cmp     dword[con.rx_buffer+4], "2.0-"
+        jne     proto_err
+; HASH: string  V_S, the server's version string (CR and NL excluded)
-        jne     proto_err
+        lea     edx, [eax+2]
+        sub     eax, 2
+        bswap   eax
+        mov     dword[con.rx_buffer-4], eax
+        invoke  sha256_update, con.temp_ctx, con.rx_buffer-4, edx
+; >> Key Exchange init
+        mov     [con.rx_seq], 0
+        mov     [con.tx_seq], 0
+        mov     [con.rx_crypt_blocksize], 4             ; minimum blocksize
-; HASH: string  V_S, the server's version string (CR and NL excluded)
-        lea     edx, [eax+2]
+        mov     [con.tx_crypt_blocksize], 4
-        sub     eax, 2
+        mov     [con.rx_crypt_proc], 0
-        bswap   eax
+        mov     [con.tx_crypt_proc], 0
-        mov     [rx_buffer-4], eax
+        mov     [con.rx_mac_proc], 0
-        mov     esi, rx_buffer-4
+        mov     [con.tx_mac_proc], 0
-        call    sha256_update
+        mov     [con.rx_mac_length], 0
         mov     [con.tx_mac_length], 0
 ; Key Exchange init
-        DEBUGF  1, "Sending KEX init\n"
+        DEBUGF  2, "Sending KEX init\n"
         mov     edi, ssh_kex.cookie
         call    MBRandom
         stosd
         call    MBRandom
         stosd
         call    MBRandom
         stosd
         call    MBRandom
         stosd
-        stdcall ssh_send_packet, [socketnum], ssh_kex, ssh_kex.length, 0
+        stdcall ssh_send_packet, con, ssh_kex, ssh_kex.length, 0
         cmp     eax, -1
         je      socket_err
 ; HASH: string  I_C, the payload of the client's SSH_MSG_KEXINIT
-        mov     eax, [tx_buffer+ssh_header.length]
-        bswap   eax
+        mov     eax, dword[con.tx_buffer+ssh_packet_header.packet_length]
-        movzx   ebx, [tx_buffer+ssh_header.padding]
+        bswap   eax
-        sub     eax, ebx
+        movzx   ebx, [con.tx_buffer+ssh_packet_header.padding_length]
-        dec     eax
+        sub     eax, ebx
-        lea     edx, [eax+4]
+        dec     eax
-        bswap   eax
+        lea     edx, [eax+4]
-        mov     [tx_buffer+1], eax
+        bswap   eax
-        mov     esi, tx_buffer+1
+        mov     dword[con.tx_buffer+1], eax
-        call    sha256_update
+        invoke  sha256_update, con.temp_ctx, con.tx_buffer+1, edx
-; Check key exchange init of server
+; << Check key exchange init of server
-        stdcall ssh_recv_packet, [socketnum], rx_buffer, BUFFERSIZE, 0
+        stdcall ssh_recv_packet, con, 0
         cmp     eax, -1
         DEBUGF  1, "languages_server_to_client: %s\n", esi
         add     esi, eax
         lodsb
         DEBUGF  1, "KEX First Packet Follows: %u\n", al
-        ; TODO
+        ; TODO: parse this structure and init procedures accordingly
 ; HASH: string I_S, the payload of the servers's SSH_MSG_KEXINIT
-        mov     eax, [rx_buffer+ssh_header.length]
+        mov     eax, dword[con.rx_buffer+ssh_packet_header.packet_length]
-        movzx   ebx, [rx_buffer+ssh_header.padding]
+        movzx   ebx, [con.rx_buffer+ssh_packet_header.padding_length]
         sub     eax, ebx
         dec     eax
         lea     edx, [eax+4]
         bswap   eax
-        mov     [rx_buffer+sizeof.ssh_header-5], eax
-        mov     esi, rx_buffer+sizeof.ssh_header-5
+        mov     dword[con.rx_buffer+sizeof.ssh_packet_header-5], eax
+        invoke  sha256_update, con.temp_ctx, con.rx_buffer+sizeof.ssh_packet_header-5, edx
         call    sha256_update
 ; Exchange keys with the server
 ; Exchange keys with the server
         stdcall dh_gex
+        test    eax, eax
-        test    eax, eax
+        jnz     exit
-        jnz     exit
+; Set keys
+        DEBUGF  2, "SSH: Setting encryption keys\n"
-; Set keys
-        DEBUGF  1, "SSH: Init encryption\n"
+        stdcall aes256_cbc_init, con.rx_iv
-        stdcall aes256_cbc_init, rx_iv
+        mov     [con.rx_crypt_ctx_ptr], eax
-        mov     [rx_context], eax
-        stdcall aes256_set_encrypt_key, [rx_context], rx_enc_key
-        mov     [decrypt_proc], aes256_cbc_decrypt
+        stdcall aes256_set_decrypt_key, eax, con.rx_enc_key
-        mov     [rx_blocksize], 32
+        mov     [con.rx_crypt_proc], aes256_cbc_decrypt
+        mov     [con.rx_crypt_blocksize], AES256_BLOCKSIZE
-        DEBUGF  1, "SSH: Init decryption\n"
+        stdcall aes256_cbc_init, con.tx_iv
-        stdcall aes256_cbc_init, tx_iv
+        mov     [con.tx_crypt_ctx_ptr], eax
+        stdcall aes256_set_encrypt_key, eax, con.tx_enc_key
+        mov     [con.tx_crypt_proc], aes256_cbc_encrypt
+        mov     [con.tx_crypt_blocksize], AES256_BLOCKSIZE
+        stdcall hmac_sha256_setkey, con.rx_mac_ctx, con.rx_int_key, SHA256_HASH_SIZE
+        mov     [con.rx_mac_proc], hmac_sha256
+        mov     [con.rx_mac_length], SHA256_HASH_SIZE
+        stdcall hmac_sha256_setkey, con.tx_mac_ctx, con.tx_int_key, SHA256_HASH_SIZE
+        mov     [con.tx_mac_proc], hmac_sha256
+        mov     [con.tx_mac_length], SHA256_HASH_SIZE
+; TODO: erase all keys from memory and free the memory
+; >> Request service (user-auth)
+        DEBUGF  2, "SSH: Requesting service\n"
+        stdcall ssh_send_packet, con, ssh_request_service, ssh_request_service.length, 0
+        cmp     eax, -1
+        je      socket_err
+; << Check for service acceptance
+        stdcall ssh_recv_packet, con, 0
+        cmp     eax, -1
+        je      socket_err
+        cmp     [con.rx_buffer.message_code], SSH_MSG_SERVICE_ACCEPT
+        jne     proto_err
+; >> Request user authentication
+; TODO: Request username from the user
+;        invoke  con_write_asciiz, str12
+;        invoke  con_gets, username, 256
+;        test    eax, eax
+;        jz      done
+; TODO: implement password authentication
+        DEBUGF  2, "SSH: User authentication\n"
+        stdcall ssh_send_packet, con, ssh_request_userauth, ssh_request_userauth.length, 0
+        cmp     eax, -1
+        je      socket_err
+; << Check for userauth acceptance
+        stdcall ssh_recv_packet, con, 0
+        cmp     eax, -1
+        je      socket_err
+        cmp     [con.rx_buffer.message_code], SSH_MSG_USERAUTH_SUCCESS
+        jne     proto_err
+; >> Open channel
+        DEBUGF  2, "SSH: Open channel\n"
+        stdcall ssh_send_packet, con, ssh_channel_open, ssh_channel_open.length, 0
+        cmp     eax, -1
+        je      socket_err
+; << Check for channel open confirmation
+        stdcall ssh_recv_packet, con, 0
+        cmp     eax, -1
+        je      socket_err
+        cmp     [con.rx_buffer.message_code], SSH_MSG_CHANNEL_OPEN_CONFIRMATION
+        jne     proto_err
+; >> Channel request: pty
+        DEBUGF  2, "SSH: Request pty\n"
+        stdcall ssh_send_packet, con, ssh_channel_request, ssh_channel_request.length, 0
+        cmp     eax, -1
+        je      socket_err
+; << Check for channel request confirmation
+        stdcall ssh_recv_packet, con, 0
+        cmp     eax, -1
+        je      socket_err
+        cmp     [con.rx_buffer.message_code], SSH_MSG_CHANNEL_SUCCESS
+        jne     proto_err
+; >> Channel request: shell
+        DEBUGF  2, "SSH: Request shell\n"
+        stdcall ssh_send_packet, con, ssh_shell_request, ssh_shell_request.length, 0
+        cmp     eax, -1
+        je      socket_err
+; << Check for channel request confirmation (FIXME: this may not be first packet!)
+;        stdcall ssh_recv_packet, con, 0
+;        cmp     eax, -1
-        mov     [tx_context], eax
+;        je      socket_err
         stdcall aes256_set_decrypt_key, [tx_context], tx_enc_key
-        mov     [encrypt_proc], aes256_cbc_encrypt
+;        cmp     [con.rx_buffer.message_code], SSH_MSG_CHANNEL_SUCCESS
-        mov     [tx_blocksize], 32
+;        jne     proto_err
 mainloop:
         call    [con_get_flags]
         test    eax, 0x200                      ; con window closed?
         jnz     exit
-        stdcall ssh_recv_packet, [socketnum], rx_buffer, BUFFERSIZE, 0
+        stdcall ssh_recv_packet, con, 0
-        cmp     eax, -1
+        cmp     eax, 0
+        jbe     closed
+        cmp     [con.rx_buffer.message_code], SSH_MSG_CHANNEL_DATA
+        jne     .dump
-        je      closed
+        mov     eax, dword[con.rx_buffer.message_code+5]
+        bswap   eax
+        DEBUGF  1, 'SSH: got %u bytes of data !\n', eax
+        lea     esi, [con.rx_buffer.message_code+5+4]
+        mov     ecx, eax
+        lea     edi, [esi + eax]
+        mov     byte [edi], 0
+        invoke  con_write_asciiz, esi
+        jmp     mainloop
         DEBUGF  1, 'SSH: got %u bytes of data !\n', eax
   .dump:
-        mov     esi, rx_buffer
+        lea     esi, [con.rx_buffer]
         mov     ecx, eax
         pusha
 @@:
         lodsb
         DEBUGF  1, "%x ", eax:2
-        dec     ecx
-        jnz     @r
+        dec     ecx
-        popa
-        lea     edi, [esi + eax]
+        jnz     @r
+        popa
-        mov     byte [edi], 0
+        DEBUGF  1, "\n"
-        invoke  con_write_asciiz, esi
+        jmp     mainloop
         jmp     mainloop
 proto_err:
-        DEBUGF  1, "SSH: protocol error\n"
+        DEBUGF  3, "SSH: protocol error\n"
         invoke  con_write_asciiz, str7
         jmp     prompt
 socket_err:
-        DEBUGF  1, "SSH: socket error %d\n", ebx
+        DEBUGF  3, "SSH: socket error %d\n", ebx
         invoke  con_write_asciiz, str6
         jmp     prompt
         jmp     prompt
 done:
         invoke  con_exit, 1
 exit:
-        DEBUGF  1, "SSH: Exiting\n"
+        DEBUGF  3, "SSH: Exiting\n"
-        mcall   close, [socketnum]
+        mcall   close, [con.socketnum]
         mcall   -1
 thread:
         mcall   40, 0
-  .loop:
-        invoke  con_getch2
-        mov     [send_data], ax
-        xor     esi, esi
-        inc     esi
-        test    al, al
-        jnz     @f
+  .loop:
-        inc     esi
+        invoke  con_getch2
-  @@:
+        mov     [ssh_channel_data+9], al
-        stdcall ssh_send_packet, [socketnum], send_data, 0
+        stdcall ssh_send_packet, con, ssh_channel_data, ssh_channel_data.length, 0
 str7    db      'A protocol error occured.',10,10,0
 str8    db      ' (',0
 str9    db      ')',10,0
 str10   db      'Invalid hostname.',10,10,0
 str11   db      10,'Remote host closed the connection.',10,10,0
-sockaddr1:
-        dw AF_INET4
+str12   db      'Enter username: ',0
-  .port dw 0
-  .ip   dd 0
-        rb 10
 ssh_ident_ha:
         dd_n (ssh_ident.length-2)
 ssh_ident:
-        db "SSH-2.0-KolibriOS_SSH_0.01",13,10
+        db "SSH-2.0-KolibriOS_SSH_0.02",13,10
   .length = $ - ssh_ident
 ssh_kex:
 ssh_new_keys:
         db SSH_MSG_NEWKEYS
   .length = $ - ssh_new_keys
+ssh_request_service:
+        db SSH_MSG_SERVICE_REQUEST
+        dd_n 12                         ; String length
+        db "ssh-userauth"               ; Service name
+  .length = $ - ssh_request_service
+ssh_request_userauth:
+        db SSH_MSG_USERAUTH_REQUEST
+        dd_n 12
+        dd_n 8
+        db "username"                   ; user name in ISO-10646 UTF-8 encoding [RFC3629]
+        dd_n 14
+        db "ssh-connection"             ; service name in US-ASCII
+        dd_n 4
+        db "none"                       ; method name in US-ASCII
+; Other options: publickey, password, hostbased
+  .length = $ - ssh_request_userauth
+ssh_channel_open:
+        db SSH_MSG_CHANNEL_OPEN
+        dd_n 7
+        db "session"
+        dd_n 0                          ; Sender channel
+        dd_n 1024                       ; Initial window size
+        dd_n 1024                       ; maximum packet size
+  .length = $ - ssh_channel_open
+ssh_channel_request:
+        db SSH_MSG_CHANNEL_REQUEST
+        dd_n 0                          ; Recipient channel
+        dd_n 7
+        db "pty-req"
+        db 1                            ; Bool: want reply
+        dd_n 5
+        db "xterm"
+        dd_n 80                         ; terminal width (rows)
+        dd_n 25                         ; terminal height (rows)
+        dd_n 0                          ; terminal width (pixels)
+        dd_n 0                          ; terminal height (pixels)
+        dd_n 0                          ; list of supported opcodes
+  .length = $ - ssh_channel_request
+ssh_shell_request:
+        db SSH_MSG_CHANNEL_REQUEST
+        dd_n 0                          ; Recipient channel
+        dd_n 5
+        db "shell"
+        db 1                            ; Bool: want reply
+  .length = $ - ssh_shell_request
+ssh_channel_data:
+        db SSH_MSG_CHANNEL_DATA
+        dd_n 0                          ; Sender channel
+        dd_n 1
+        db ?
+  .length = $ - ssh_channel_data
 include_debug_strings
 include_debug_strings
-; import
 align 4
 @IMPORT:
 library network, 'network.obj', \
-        console, 'console.obj';, \
+        console, 'console.obj', \
         con_getch2, 'con_getch2', \
         con_set_cursor_pos, 'con_set_cursor_pos', \
         con_write_string, 'con_write_string', \
         con_get_flags,  'con_get_flags'
+import  libcrash, \
+        sha256_init, 'sha256_init', \
-;import  libcrash, \
+        sha256_update, 'sha256_update', \
-;        crash.hash, 'crash_hash'
+        sha256_final, 'sha256_final'
-IncludeIGlobals
-i_end:
-decrypt_proc    dd dummy_encrypt
-encrypt_proc    dd dummy_encrypt
-rx_blocksize    dd 4
-tx_blocksize    dd 4
+IncludeIGlobals
-rx_context      dd ?
-tx_context      dd ?
-IncludeUGlobals
-socketnum       dd ?
-rx_packet_length dd ?   ;;;;;
-rx_buffer:      rb BUFFERSIZE+1
-tx_buffer:      rb BUFFERSIZE+1
-send_data       dw ?
-hostname        rb 1024
-; Diffie Hellman variables
-dh_p            dd ?
-                rb MAX_BITS/8
-dh_g            dd ?
-                rb MAX_BITS/8
-dh_x            dd ?
-                rb MAX_BITS/8
-dh_e            dd ?
-                rb MAX_BITS/8
-dh_f            dd ?
-                rb MAX_BITS/8
-dh_signature    dd ?
-                rb MAX_BITS/8
-; Output from key exchange
-dh_K            dd ?            ; Shared Secret (Big endian)
-                rb MAX_BITS/8
-  .length       dd ?            ; Length in little endian
+i_end:
-dh_H            rb 32           ; Exchange Hash
-session_id      rb 32
-rx_iv           rb 32           ; Rx initialisation vector
-tx_iv           rb 32           ; Tx initialisation vector
+IncludeUGlobals
-rx_enc_key      rb 32           ; Rx encryption key
+params          rb 1024

Subversion Repositories Kolibri OS

(root)/programs/network/ssh/ssh.asm – Rev 6419 → 6469