Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 3790 → Rev 3792

/programs/network/ftpc/ftpc.asm
51,7 → 51,7
jnz exit
; initialize console
invoke con_start, 1
invoke con_init, 80, 25, 80, 25, title
invoke con_init, 80, 25, 80, 250, title
 
; Check for parameters
cmp byte [s], 0
278,7 → 278,7
 
; data
title db 'FTP client',0
str1 db 'FTP client for KolibriOS v0.02',10,10,'Please enter ftp server address.',10,0
str1 db 'FTP client for KolibriOS v0.03',10,10,'Please enter ftp server address.',10,0
str2 db '> ',0
str3 db 'Resolving ',0
str4 db 10,0
/programs/network/ftpc/servercommands.inc
90,15 → 90,15
 
data_ok:
 
mcall recv, [datasocket], buffer_ptr2, BUFFERSIZE, MSG_DONTWAIT
inc eax
jz .fail
dec eax
jz .fail
mcall recv, [datasocket], buffer_ptr2, BUFFERSIZE, 0
test ebx, ebx
jnz .fail
mov byte[buffer_ptr2 + eax], 0
 
invoke con_write_asciiz, buffer_ptr2
 
jmp data_ok
 
.fail:
mcall close, [datasocket]
jmp wait_for_servercommand