Subversion Repositories Kolibri OS

Rev

Rev 9106 | Rev 9113 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 9106 Rev 9112
Line 140... Line 140...
140
        call    create_seed
140
        call    create_seed
141
        call    init_random
141
        call    init_random
Line 142... Line 142...
142
 
142
 
143
        DEBUGF  2, "SSH: Init Console\n"
143
        DEBUGF  2, "SSH: Init Console\n"
144
        invoke  con_start, 1
144
        invoke  con_start, 1
Line 145... Line 145...
145
        invoke  con_init, 80, 25, 800, 250, title
145
        invoke  con_init, 80, 25, 80, 250, title
146
 
146
 
Line 147... Line 147...
147
        cmp     byte[params], 0
147
        cmp     byte[params], 0
Line 386... Line 386...
386
 
386
 
387
  .mismatch:
387
  .mismatch:
388
        invoke  con_write_asciiz, str23
388
        invoke  con_write_asciiz, str23
389
;        jmp     .ask
389
;        jmp     .ask
-
 
390
  .ask:
390
  .ask:
391
        invoke  con_write_asciiz, str24a
391
  ;;; TODO: print hostkey
392
        invoke  con_write_asciiz, [hostkey_sz]
392
        invoke  con_write_asciiz, str24
393
        invoke  con_write_asciiz, str24b
393
  .getansw:
394
  .getansw:
394
        invoke  con_getch2
395
        invoke  con_getch2
395
        or      al, 0x20        ; convert to lowercase
396
        or      al, 0x20        ; convert to lowercase
396
        cmp     al, 'a'
397
        cmp     al, 'a'
Line 469... Line 470...
469
        db "There is no guarantee to the servers identity !",10, 0
470
        db "There is no guarantee to the servers identity !",10, 0
Line 470... Line 471...
470
 
471
 
471
str23   db "The host key provided by the host does not match the cached one.", 10
472
str23   db "The host key provided by the host does not match the cached one.", 10
Line -... Line 473...
-
 
473
        db "This may indicate that the remote server has been compromised!", 10, 0
472
        db "This may indicate that the remote server has been compromised!", 10, 0
474
 
473
 
475
str24a  db 10, "The remote host key is: ", 10, 0
474
str24   db 10, "If you trust this host, press A to accept and store the (new) key.", 10
476
str24b  db 10, 10, "If you trust this host, press A to accept and store the (new) key.", 10
Line 475... Line 477...
475
        db "Press C to connect to the host but don't store the (new) key.", 10
477
        db "Press C to connect to the host but don't store the (new) key.", 10
476
        db "Press X to abort.", 10, 0
478
        db "Press X to abort.", 10, 0
477
 
479
 
478
 
480
 
479
ssh_ident_ha:
481
ssh_ident_ha:
Line 480... Line 482...
480
        dd_n (ssh_msg_ident.length-2)
482
        dd_n (ssh_msg_ident.length-2)
481
ssh_msg_ident:
483
ssh_msg_ident:
Line 590... Line 592...
590
align 4
592
align 4
591
@IMPORT:
593
@IMPORT:
Line 592... Line 594...
592
 
594
 
593
library network, 'network.obj', \
595
library network, 'network.obj', \
594
        console, 'console.obj', \
596
        console, 'console.obj', \
-
 
597
        libcrash, 'libcrash.obj', \
Line 595... Line 598...
595
        libcrash, 'libcrash.obj'
598
        libini, 'libini.obj'
596
 
599
 
597
import  network, \
600
import  network, \
598
        getaddrinfo, 'getaddrinfo', \
601
        getaddrinfo, 'getaddrinfo', \
Line 620... Line 623...
620
        sha1_final, 'sha1_final', \
623
        sha1_final, 'sha1_final', \
621
        md5_init, 'md5_init', \
624
        md5_init, 'md5_init', \
622
        md5_update, 'md5_update', \
625
        md5_update, 'md5_update', \
623
        md5_final, 'md5_final'
626
        md5_final, 'md5_final'
Line -... Line 627...
-
 
627
 
-
 
628
import  libini, \
-
 
629
        ini_get_str, 'ini_get_str', \
-
 
630
        ini_set_str, 'ini_set_str'
624
 
631
 
Line 625... Line 632...
625
IncludeIGlobals
632
IncludeIGlobals
Line 626... Line 633...
626
 
633