Subversion Repositories Kolibri OS

Rev

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

Rev 593 Rev 738
Line 27... Line 27...
27 
;;   22.09.2003 - [Mike Hibbett] : mikeh@oceanfree.net          ;;
 27 
;;   22.09.2003 - [Mike Hibbett] : mikeh@oceanfree.net          ;;
28 
;;   11.11.2006 - [Johnny_B] and [smb]                          ;;
 28 
;;   11.11.2006 - [Johnny_B] and [smb]                          ;;
29 
;;                                                              ;;
 29 
;;                                                              ;;
30 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 30 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Line 31... Line 31...
31 
 
 31 
 
Line 32... Line 32...
32 
$Revision: 593 $
 32 
$Revision: 738 $
33 
 
 33 
 
34 
 
 34 
 
Line 341... Line 341...
341 
;       socket # in ebx
 341 
;       socket # in ebx
342 
;       returns 0 for ok, -1 for socket not open (fail)
 342 
;       returns 0 for ok, -1 for socket not open (fail)
343 
;
 343 
;
344 
;***************************************************************************
 344 
;***************************************************************************
345 
socket_close:
 345 
socket_close:
346 
    Index2RealAddr ebx
 - 
 
347 
    mov     eax, 0xFFFFFFFF	    ; assume this operation will fail..
 346 
    mov     eax, 0xFFFFFFFF	    ; assume this operation will fail..
- 
 
 347 
    cmp     ebx, NUM_SOCKETS
- 
 
 348 
    jae     sc_exit
- 
 
 349 
    Index2RealAddr ebx
348 
    cmp     [ebx + SOCKET.Status], dword SOCK_EMPTY
 350 
    cmp     [ebx + SOCKET.Status], dword SOCK_EMPTY
349 
    jz	    sc_exit
 351 
    jz	    sc_exit
Line 350... Line 352...
350 
 
 352 
 
351 
    ; Clear the socket varaibles
 353 
    ; Clear the socket varaibles