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 |