Subversion Repositories Kolibri OS

Rev

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

Rev 3618 Rev 3819
Line 738... Line 738...
738 
; 227 Entering Passive Mode (a1,a2,a3,a4,p1,p2)
 738 
; 227 Entering Passive Mode (a1,a2,a3,a4,p1,p2)
739 
; where a1.a2.a3.a4 is the IP address and p1*256+p2 is the port number.
 739 
; where a1.a2.a3.a4 is the IP address and p1*256+p2 is the port number.
740 
 
 740 
 
Line 741... Line 741...
741 
; '227 ('
 741 
; '227 Entering passive mode ('
742 
        lea     edi, [ebp + thread_data.buffer]
 742 
        lea     edi, [ebp + thread_data.buffer]
743 
        mov     eax, '227 '
 743 
        mov     ecx, str_227.length
744 
        stosd
 - 
 
745 
        mov     al, '('
 744 
        mov     esi, str_227
746 
        stosb
 745 
        rep movsb
747 
; ip
 746 
; ip
748 
        movzx   eax, byte [serverip]
 747 
        movzx   eax, byte [serverip]
749 
        call    dword_to_ascii
 748 
        call    dword_to_ascii
750 
        mov     al, ','
 749 
        mov     al, ','
751 
        stosb
 750 
        stosb
Line 769... Line 768...
769 
        movzx   eax, byte [ebp + thread_data.datasock.sin_port+1]
 768 
        movzx   eax, byte [ebp + thread_data.datasock.sin_port+1]
770 
        call    dword_to_ascii
 769 
        call    dword_to_ascii
771 
; ')', 13, 10, 0
 770 
; ')', 13, 10, 0
772 
        mov     eax, ')' + 0x000a0d00
 771 
        mov     eax, ')' + (0x000a0d shl 8)
773 
        stosd
 772 
        stosd
774 
 
 773 
 
775 
        lea     esi, [edi - thread_data.buffer]
 774 
        lea     esi, [edi - thread_data.buffer]
Line 776... Line 775...
776 
        sub     esi, ebp
 775 
        sub     esi, ebp
777 
        mov     ecx, [ebp + thread_data.socketnum]
 776 
        mov     ecx, [ebp + thread_data.socketnum]
778 
        lea     edx, [ebp + thread_data.buffer]
 777 
        lea     edx, [ebp + thread_data.buffer]
Line 781... Line 780...
781 
 
 780 
 
782 
        ret
 781 
        ret
Line 783... Line 782...
783 
 
 782 
 
Line -... Line 783...
- 
 
 783 
 
- 
 
 784 
iglobal
- 
 
 785 
        str_227 db "227 Entering passive mode ("
- 
 
 786 
        .length = $ - str_227
- 
 
 787 
endg
- 
 
 788 
 
784 
;------------------------------------------------
 789 
;------------------------------------------------
785 
; "PWD"
 790 
; "PWD"
786 
;
 791 
;
787 
; Print the current working directory.
 792 
; Print the current working directory.
788 
;
 793 
;