Subversion Repositories Kolibri OS

Rev

Rev 3793 | Rev 3800 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
3701 hidnplayr 1
cmd_list:
2
 
3
        call    open_dataconnection
4
 
5
        mov     dword[s], "LIST"
3789 hidnplayr 6
        mov     byte[s+4], 0x0a
3794 hidnplayr 7
        mcall   send, [socketnum], s, 5, 0
3701 hidnplayr 8
 
3789 hidnplayr 9
        jmp     wait_for_servercommand
3701 hidnplayr 10
 
11
 
12
cmd_help:
13
 
14
        push    str_help
15
        call    [con_write_asciiz]
16
 
3790 hidnplayr 17
        jmp     wait_for_usercommand
18
 
3794 hidnplayr 19
cmd_pwd:
20
 
21
        mov     dword[s], "PWD" + 10 shl 24
22
        mcall   send, [socketnum], s, 4, 0
23
 
24
        jmp     wait_for_servercommand
25
 
3790 hidnplayr 26
cmd_cwd:
27
 
28
        mov     dword[s], "CWD "
29
 
30
        mov     ecx, 256
31
        xor     al, al
32
        mov     edi, s
33
        repne scasb
34
        lea     esi, [edi - s - 1]
35
 
36
        mcall   send, [socketnum], s, , 0
37
 
3793 hidnplayr 38
        jmp     wait_for_servercommand
39
 
40
 
41
cmd_retr:
42
 
43
        call    open_dataconnection
44
 
45
        mov     dword[s], "RETR"
46
        mov     byte[s+4], " "
47
 
48
        mov     ecx, 256
49
        xor     al, al
50
        mov     edi, s
51
        repne scasb
52
        lea     esi, [edi - s - 1]
53
 
54
        mcall   send, [socketnum], s, , 0
55
 
56
        jmp     wait_for_servercommand
57
 
58
 
59
cmd_stor:
60
 
61
        call    open_dataconnection
62
 
63
        mov     dword[s], "STOR"
64
        mov     byte[s+4], " "
65
 
66
        mov     ecx, 256
67
        xor     al, al
68
        mov     edi, s
69
        repne scasb
70
        lea     esi, [edi - s - 1]
71
 
72
        mcall   send, [socketnum], s, , 0
73
 
3790 hidnplayr 74
        jmp     wait_for_servercommand