WebSVN – Kolibri OS – Diff – /programs/network/ftpc/ftpc.asm

         mov     [size], ecx
         jmp     .go_cmd
   .no_more_data:
         mov     [offset], 0
   .go_cmd:
+        lea     ecx, [edi - s]                  ; length of command
         xor     al, al
         stosb
         invoke  con_set_flags, 0x03             ; change color
         mov     word[s+4], 0x0a0d
         mcall   send, [socketnum], s, 6, 0
         ret
+  .fail:
+        invoke  con_get_flags
+        push    eax
-  .fail:
+        invoke  con_set_flags, 0x0c                     ; print errors in red
+        invoke  con_write_asciiz, str_err_socket
-        invoke  con_write_asciiz, str_err_socket
+        invoke  con_set_flags                           ; reset color
         ret
 error_socket:
+        invoke  con_set_flags, 0x0c                     ; print errors in red
-error_socket:
+        invoke  con_write_asciiz, str_err_socket
-        invoke  con_write_asciiz, str_err_socket
+        jmp     wait_for_keypress
-        jmp     wait_for_keypress
+error_resolve:
         invoke  con_set_flags, 0x0c                     ; print errors in red
+        invoke  con_write_asciiz, str_err_resolve
 error_resolve:
-        invoke  con_write_asciiz, str_err_resolve
+wait_for_keypress:
         invoke  con_set_flags, 0x07                     ; reset color to grey
 ; data
 str_title       db 'FTP client',0
-str_welcome     db 'FTP client for KolibriOS v0.08',10
+str_welcome     db 'FTP client for KolibriOS v0.09',10
                 db 10

Subversion Repositories Kolibri OS