Subversion Repositories Kolibri OS

Rev

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

Rev 9917 Rev 9976
Line 13... Line 13...
13
;;         GNU GENERAL PUBLIC LICENSE                              ;;
13
;;         GNU GENERAL PUBLIC LICENSE                              ;;
14
;;          Version 2, June 1991                                   ;;
14
;;          Version 2, June 1991                                   ;;
15
;;                                                                 ;;
15
;;                                                                 ;;
16
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
16
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Line 17... Line 17...
17
 
17
 
Line 18... Line 18...
18
$Revision: 9917 $
18
$Revision: 9976 $
Line 19... Line 19...
19
 
19
 
20
struct  SOCKET
20
struct  SOCKET
Line 755... Line 755...
755
 
755
 
756
        cmp     [eax + SOCKET.Domain], AF_INET4
756
        cmp     [eax + SOCKET.Domain], AF_INET4
Line 757... Line 757...
757
        jne     .free
757
        jne     .free
758
 
758
 
759
        cmp     [eax + SOCKET.Protocol], IP_PROTO_TCP
-
 
760
        je      .tcp
-
 
761
 
-
 
762
  .free:
-
 
763
        call    socket_free
-
 
764
        ret
-
 
765
 
759
        cmp     [eax + SOCKET.Protocol], IP_PROTO_TCP
766
  .tcp:
760
        jne     .free
767
        test    [eax + SOCKET.state], SS_ISCONNECTED
761
        test    [eax + SOCKET.state], SS_ISCONNECTED
768
        jz      @f
762
        jz      .free
769
        test    [eax + SOCKET.state], SS_ISDISCONNECTING
763
        test    [eax + SOCKET.state], SS_ISDISCONNECTING
770
        jnz     @f
764
        jnz     .free
771
        call    tcp_disconnect
765
        call    tcp_disconnect
772
  @@:
766
        test    eax, eax
773
; TODO:
767
        jz      .end
-
 
768
  .free:
774
; ...
769
        call    socket_free
Line 775... Line 770...
775
;       call    socket_free
770
  .end:
776
        ret
771
        ret