FTPc: added retr command (just print to console for now).

git-svn-id: svn://kolibrios.org@3793 a494cfbc-eb01-0410-851d-a64ba20cac60
2013-07-09 21:31:47 +00:00
parent 6dfcbb3d54
commit 1531cabb38
2 changed files with 42 additions and 0 deletions
--- a/programs/network/ftpc/usercommands.inc
+++ b/programs/network/ftpc/usercommands.inc
@@ -28,4 +28,40 @@ cmd_cwd:

        mcall   send, [socketnum], s, , 0

+        jmp     wait_for_servercommand
+
+
+cmd_retr:
+
+        call    open_dataconnection
+
+        mov     dword[s], "RETR"
+        mov     byte[s+4], " "
+
+        mov     ecx, 256
+        xor     al, al
+        mov     edi, s
+        repne scasb
+        lea     esi, [edi - s - 1]
+
+        mcall   send, [socketnum], s, , 0
+
+        jmp     wait_for_servercommand
+
+
+cmd_stor:
+
+        call    open_dataconnection
+
+        mov     dword[s], "STOR"
+        mov     byte[s+4], " "
+
+        mov     ecx, 256
+        xor     al, al
+        mov     edi, s
+        repne scasb
+        lea     esi, [edi - s - 1]
+
+        mcall   send, [socketnum], s, , 0
+
        jmp     wait_for_servercommand