sock 51 ext/net/net.c ScmSocket *sock = (ScmSocket*)obj;
sock 54 ext/net/net.c if (!(SOCKET_CLOSED(sock->fd))) {
sock 55 ext/net/net.c closeSocket(sock->fd);
sock 56 ext/net/net.c sock->fd = INVALID_SOCKET;
sock 57 ext/net/net.c sock->status = SCM_SOCKET_STATUS_CLOSED;
sock 63 ext/net/net.c ScmSocket *sock = SCM_SOCKET(obj);
sock 65 ext/net/net.c switch (sock->status) {
sock 69 ext/net/net.c Scm_Printf(port, " (bound %S)", Scm_SockAddrName(sock->address));
sock 72 ext/net/net.c Scm_Printf(port, " (listen %S)", Scm_SockAddrName(sock->address));
sock 75 ext/net/net.c Scm_Printf(port, " (connect %S)", Scm_SockAddrName(sock->address));
sock 106 ext/net/net.c int sock;
sock 107 ext/net/net.c SCM_SYSCALL(sock, socket(domain, type, protocol));
sock 108 ext/net/net.c if (SOCKET_INVALID(sock)) Scm_SysError("couldn't create socket");
sock 109 ext/net/net.c return SCM_OBJ(make_socket(sock, type));
sock 141 ext/net/net.c ScmObj Scm_SocketInputPort(ScmSocket *sock, int buffering)
sock 143 ext/net/net.c if (sock->inPort == NULL) {
sock 146 ext/net/net.c if (sock->type != SOCK_DGRAM &&
sock 147 ext/net/net.c sock->status < SCM_SOCKET_STATUS_CONNECTED) {
sock 149 ext/net/net.c SCM_OBJ(sock));
sock 152 ext/net/net.c infd = sock->fd;
sock 154 ext/net/net.c infd = _open_osfhandle(sock->fd, O_RDONLY);
sock 159 ext/net/net.c sockname = SCM_LIST2(SCM_MAKE_STR("socket input"), SCM_OBJ(sock));
sock 160 ext/net/net.c sock->inPort = SCM_PORT(Scm_MakePortWithFd(sockname, SCM_PORT_INPUT,
sock 164 ext/net/net.c return SCM_OBJ(sock->inPort);
sock 167 ext/net/net.c ScmObj Scm_SocketOutputPort(ScmSocket *sock, int buffering)
sock 169 ext/net/net.c if (sock->outPort == NULL) {
sock 172 ext/net/net.c if (sock->type != SOCK_DGRAM &&
sock 173 ext/net/net.c sock->status < SCM_SOCKET_STATUS_CONNECTED) {
sock 175 ext/net/net.c SCM_OBJ(sock));
sock 178 ext/net/net.c outfd = sock->fd;
sock 180 ext/net/net.c outfd = _open_osfhandle(sock->fd, 0);
sock 186 ext/net/net.c sockname = SCM_LIST2(SCM_MAKE_STR("socket output"), SCM_OBJ(sock));
sock 187 ext/net/net.c sock->outPort = SCM_PORT(Scm_MakePortWithFd(sockname, SCM_PORT_OUTPUT,
sock 190 ext/net/net.c return SCM_OBJ(sock->outPort);
sock 197 ext/net/net.c ScmObj Scm_SocketBind(ScmSocket *sock, ScmSockAddr *addr)
sock 202 ext/net/net.c if (SOCKET_CLOSED(sock->fd)) {
sock 203 ext/net/net.c Scm_Error("attempt to bind a closed socket: %S", sock);
sock 205 ext/net/net.c SCM_SYSCALL(r, bind(sock->fd, &addr->addr, addr->addrlen));
sock 214 ext/net/net.c SCM_SYSCALL(r, getsockname(sock->fd, &naddr->addr, &naddr->addrlen));
sock 218 ext/net/net.c sock->address = naddr;
sock 219 ext/net/net.c sock->status = SCM_SOCKET_STATUS_BOUND;
sock 220 ext/net/net.c return SCM_OBJ(sock);
sock 223 ext/net/net.c ScmObj Scm_SocketListen(ScmSocket *sock, int backlog)
sock 226 ext/net/net.c if (SOCKET_CLOSED(sock->fd)) {
sock 227 ext/net/net.c Scm_Error("attempt to listen a closed socket: %S", sock);
sock 229 ext/net/net.c SCM_SYSCALL(r, listen(sock->fd, backlog));
sock 233 ext/net/net.c sock->status = SCM_SOCKET_STATUS_LISTENING;
sock 234 ext/net/net.c return SCM_OBJ(sock);
sock 237 ext/net/net.c ScmObj Scm_SocketAccept(ScmSocket *sock)
sock 243 ext/net/net.c ScmClass *addrClass = Scm_ClassOf(SCM_OBJ(sock->address));
sock 245 ext/net/net.c if (SOCKET_CLOSED(sock->fd)) {
sock 246 ext/net/net.c Scm_Error("attempt to accept a closed socket: %S", sock);
sock 248 ext/net/net.c SCM_SYSCALL(newfd, accept(sock->fd, (struct sockaddr *)addrbuf, &addrlen));
sock 256 ext/net/net.c newsock = make_socket(newfd, sock->type);
sock 265 ext/net/net.c ScmObj Scm_SocketConnect(ScmSocket *sock, ScmSockAddr *addr)
sock 268 ext/net/net.c if (SOCKET_CLOSED(sock->fd)) {
sock 269 ext/net/net.c Scm_Error("attempt to connect a closed socket: %S", sock);
sock 271 ext/net/net.c SCM_SYSCALL(r, connect(sock->fd, &addr->addr, addr->addrlen));
sock 275 ext/net/net.c sock->address = addr;
sock 276 ext/net/net.c sock->status = SCM_SOCKET_STATUS_CONNECTED;
sock 277 ext/net/net.c return SCM_OBJ(sock);
sock 280 ext/net/net.c ScmObj Scm_SocketGetSockName(ScmSocket *sock)
sock 286 ext/net/net.c if (SOCKET_CLOSED(sock->fd)) {
sock 287 ext/net/net.c Scm_Error("attempt to get the name of a closed socket: %S", sock);
sock 289 ext/net/net.c SCM_SYSCALL(r, getsockname(sock->fd, (struct sockaddr *)addrbuf, &addrlen));
sock 296 ext/net/net.c ScmObj Scm_SocketGetPeerName(ScmSocket *sock)
sock 302 ext/net/net.c if (SOCKET_CLOSED(sock->fd)) {
sock 303 ext/net/net.c Scm_Error("attempt to get the name of a closed socket: %S", sock);
sock 305 ext/net/net.c SCM_SYSCALL(r, getpeername(sock->fd, (struct sockaddr *)addrbuf, &addrlen));
sock 312 ext/net/net.c ScmObj Scm_SocketSend(ScmSocket *sock, ScmString *msg, int flags)
sock 316 ext/net/net.c if (SOCKET_CLOSED(sock->fd)) {
sock 317 ext/net/net.c Scm_Error("attempt to send to a closed socket: %S", sock);
sock 320 ext/net/net.c SCM_SYSCALL(r, send(sock->fd, cmsg, size, flags));
sock 327 ext/net/net.c ScmObj Scm_SocketSendTo(ScmSocket *sock, ScmString *msg, ScmSockAddr *to,
sock 332 ext/net/net.c if (SOCKET_CLOSED(sock->fd)) {
sock 333 ext/net/net.c Scm_Error("attempt to send to a closed socket: %S", sock);
sock 336 ext/net/net.c SCM_SYSCALL(r, sendto(sock->fd, cmsg, size, flags,
sock 344 ext/net/net.c ScmObj Scm_SocketRecv(ScmSocket *sock, int bytes, int flags)
sock 348 ext/net/net.c if (SOCKET_CLOSED(sock->fd)) {
sock 349 ext/net/net.c Scm_Error("attempt to recv from a closed socket: %S", sock);
sock 352 ext/net/net.c SCM_SYSCALL(r, recv(sock->fd, buf, bytes, flags));
sock 359 ext/net/net.c ScmObj Scm_SocketRecvFrom(ScmSocket *sock, int bytes, int flags)
sock 365 ext/net/net.c if (SOCKET_CLOSED(sock->fd)) {
sock 366 ext/net/net.c Scm_Error("attempt to recv from a closed socket: %S", sock);
sock 369 ext/net/net.c SCM_SYSCALL(r, recvfrom(sock->fd, buf, bytes, flags, &from, &fromlen));
sock 384 ext/net/netlib.c ScmSocket* sock;
sock 388 ext/net/netlib.c sock = SCM_SOCKET(sock_scm);
sock 390 ext/net/netlib.c if (sock->address) { SCM_RETURN(SCM_OBJ(sock->address)); }
sock 413 ext/net/netlib.c ScmSocket* sock;
sock 417 ext/net/netlib.c sock = SCM_SOCKET(sock_scm);
sock 419 ext/net/netlib.c switch (sock->status) {
sock 427 ext/net/netlib.c sock);
sock 439 ext/net/netlib.c ScmSocket* sock;
sock 443 ext/net/netlib.c sock = SCM_SOCKET(sock_scm);
sock 447 ext/net/netlib.c SCM_RESULT = (sock->fd);
sock 463 ext/net/netlib.c ScmSocket* sock;
sock 472 ext/net/netlib.c sock = SCM_SOCKET(sock_scm);
sock 484 ext/net/netlib.c SCM_RETURN(Scm_SocketInputPort(sock, bufmode));
sock 494 ext/net/netlib.c ScmSocket* sock;
sock 503 ext/net/netlib.c sock = SCM_SOCKET(sock_scm);
sock 515 ext/net/netlib.c SCM_RETURN(Scm_SocketOutputPort(sock, bufmode));
sock 525 ext/net/netlib.c ScmSocket* sock;
sock 534 ext/net/netlib.c sock = SCM_SOCKET(sock_scm);
sock 545 ext/net/netlib.c SCM_RESULT = Scm_SocketShutdown(sock, how);
sock 557 ext/net/netlib.c ScmSocket* sock;
sock 561 ext/net/netlib.c sock = SCM_SOCKET(sock_scm);
sock 565 ext/net/netlib.c SCM_RESULT = Scm_SocketClose(sock);
sock 577 ext/net/netlib.c ScmSocket* sock;
sock 583 ext/net/netlib.c sock = SCM_SOCKET(sock_scm);
sock 590 ext/net/netlib.c SCM_RESULT = Scm_SocketBind(sock, addr);
sock 602 ext/net/netlib.c ScmSocket* sock;
sock 608 ext/net/netlib.c sock = SCM_SOCKET(sock_scm);
sock 615 ext/net/netlib.c SCM_RESULT = Scm_SocketListen(sock, backlog);
sock 627 ext/net/netlib.c ScmSocket* sock;
sock 631 ext/net/netlib.c sock = SCM_SOCKET(sock_scm);
sock 635 ext/net/netlib.c SCM_RESULT = Scm_SocketAccept(sock);
sock 647 ext/net/netlib.c ScmSocket* sock;
sock 653 ext/net/netlib.c sock = SCM_SOCKET(sock_scm);
sock 660 ext/net/netlib.c SCM_RESULT = Scm_SocketConnect(sock, addr);
sock 672 ext/net/netlib.c ScmSocket* sock;
sock 676 ext/net/netlib.c sock = SCM_SOCKET(sock_scm);
sock 680 ext/net/netlib.c SCM_RESULT = Scm_SocketGetSockName(sock);
sock 692 ext/net/netlib.c ScmSocket* sock;
sock 696 ext/net/netlib.c sock = SCM_SOCKET(sock_scm);
sock 700 ext/net/netlib.c SCM_RESULT = Scm_SocketGetPeerName(sock);
sock 712 ext/net/netlib.c ScmSocket* sock;
sock 723 ext/net/netlib.c sock = SCM_SOCKET(sock_scm);
sock 737 ext/net/netlib.c SCM_RESULT = Scm_SocketSend(sock, msg, flags);
sock 749 ext/net/netlib.c ScmSocket* sock;
sock 762 ext/net/netlib.c sock = SCM_SOCKET(sock_scm);
sock 779 ext/net/netlib.c SCM_RESULT = Scm_SocketSendTo(sock, msg, to, flags);
sock 791 ext/net/netlib.c ScmSocket* sock;
sock 802 ext/net/netlib.c sock = SCM_SOCKET(sock_scm);
sock 816 ext/net/netlib.c SCM_RESULT = Scm_SocketRecv(sock, bytes, flags);
sock 828 ext/net/netlib.c ScmSocket* sock;
sock 839 ext/net/netlib.c sock = SCM_SOCKET(sock_scm);
sock 853 ext/net/netlib.c SCM_RESULT = Scm_SocketRecvFrom(sock, bytes, flags);
sock 865 ext/net/netlib.c ScmSocket* sock;
sock 875 ext/net/netlib.c sock = SCM_SOCKET(sock_scm);
sock 887 ext/net/netlib.c SCM_RESULT = Scm_SocketSetOpt(sock, level, option, value);
sock 899 ext/net/netlib.c ScmSocket* sock;
sock 909 ext/net/netlib.c sock = SCM_SOCKET(sock_scm);
sock 922 ext/net/netlib.c SCM_RESULT = Scm_SocketGetOpt(sock, level, option, rsize);