Return to netlib.pri CVS log

Up to [gforth] / gforth / netlib

Annotation of gforth/netlib/netlib.pri, revision 1.1

1.1     ! jwilke      1: 
        !             2: net-gethostbyname      c_addr u -- a_addr      new     ghbn
        !             3: a_addr=(UCell *) gethostbyname(cstr(c_addr,u,1));
        !             4: 
        !             5: net-gethostbyaddr      c_addr u1 u2 -- a_addr  new     ghba
        !             6: a_addr=(UCell *) gethostbyaddr(c_addr,u1,u2);
        !             7: 
        !             8: net-sendto     c_addr1 u1 c_addr2 u2 u5 u3 -- u4       new     net_sendto
        !             9: u4 = sendto(u3, c_addr1, u1, u5, (struct sockaddr *) c_addr2, u2);
        !            10: 
        !            11: net-send       c_addr1 u1 u5 u3 --u4   new     net_send
        !            12: u4 = send(u3, c_addr1, u1,u5);
        !            13: 
        !            14: net-recvfrom   c_addr1 u1 c_addr2 u2 u5 u3 -- u4       new     net_recvfrom
        !            15: UCell len;
        !            16: len=u2;
        !            17: u4 = recvfrom(u3, c_addr1, u1, u5, (struct sockaddr *) c_addr2, &len);
        !            18: 
        !            19: net-recv       c_addr1 u1 u5 u3 -- u4  new     net_recv
        !            20: u4 = recv(u3, c_addr1, u1, u5);
        !            21: 
        !            22: net-connect    c_addr1 u1 u2 -- n1     new     net_connect
        !            23: n1=connect(u2,(struct sockaddr *) c_addr1,u1);
        !            24: 
        !            25: net-bind       c_addr1 u1 n1 -- n2     new     net_bind
        !            26: n2=bind(n1,(struct sockaddr *) c_addr1, u1);
        !            27: 
        !            28: net-close      n1 -- n2        new     net_close
        !            29: n2=close(n1);
        !            30: 
        !            31: net-accept     c_addr1 u1 n2 -- n3     new     net_accept
        !            32: UCell len;
        !            33: len=u1;
        !            34: n3=accept(n2,(struct sockaddr *) c_addr1, &len);
        !            35: 
        !            36: net-listen     n2 n1 -- n3     new     net_listen
        !            37: n3=listen(n1,n2);
        !            38: 
        !            39: net-socket     u1 u2 u3 -- n1  new     net_socket
        !            40: n1=socket(u1,u2,u3);
        !            41: 
        !            42: net-setsockopt u2 u3 c_addr u5 u1 -- n1        mew     net_setsockopt
        !            43: n1=setsockopt(u1,u2,u3,c_addr,u5);
        !            44: