Mercurial > hg > truffle
diff src/os/solaris/vm/hpi_solaris.hpp @ 0:a61af66fc99e jdk7-b24
Initial load
author | duke |
---|---|
date | Sat, 01 Dec 2007 00:00:00 +0000 |
parents | |
children | 2a1a77d3458f |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/src/os/solaris/vm/hpi_solaris.hpp Sat Dec 01 00:00:00 2007 +0000 @@ -0,0 +1,245 @@ +/* + * Copyright 1998-2007 Sun Microsystems, Inc. All Rights Reserved. + * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. + * + * This code is free software; you can redistribute it and/or modify it + * under the terms of the GNU General Public License version 2 only, as + * published by the Free Software Foundation. + * + * This code is distributed in the hope that it will be useful, but WITHOUT + * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or + * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License + * version 2 for more details (a copy is included in the LICENSE file that + * accompanied this code). + * + * You should have received a copy of the GNU General Public License version + * 2 along with this work; if not, write to the Free Software Foundation, + * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. + * + * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara, + * CA 95054 USA or visit www.sun.com if you need additional information or + * have any questions. + * + */ + +// +// Parts of the HPI interface for which the HotSparc does not use the +// HPI (because the interruptible IO mechanims used are different). +// + +#include <sys/socket.h> +#include <sys/poll.h> +#include <sys/filio.h> +#include <unistd.h> +#include <netdb.h> +#include <setjmp.h> + +// HPI_FileInterface + +// Many system calls can be interrupted by signals and must be restarted. +// Restart support was added without disturbing the extent of thread +// interruption support. + +inline int hpi::close(int fd) { + RESTARTABLE_RETURN_INT(::close(fd)); +} + +inline size_t hpi::read(int fd, void *buf, unsigned int nBytes) { + INTERRUPTIBLE_RETURN_INT(::read(fd, buf, nBytes), os::Solaris::clear_interrupted); +} + +inline size_t hpi::write(int fd, const void *buf, unsigned int nBytes) { + INTERRUPTIBLE_RETURN_INT(::write(fd, buf, nBytes), os::Solaris::clear_interrupted); +} + + +// HPI_SocketInterface + +inline int hpi::socket_close(int fd) { + RESTARTABLE_RETURN_INT(::close(fd)); +} + +inline int hpi::socket(int domain, int type, int protocol) { + return ::socket(domain, type, protocol); +} + +inline int hpi::recv(int fd, char *buf, int nBytes, int flags) { + INTERRUPTIBLE_RETURN_INT(::recv(fd, buf, nBytes, flags), os::Solaris::clear_interrupted); +} + +inline int hpi::send(int fd, char *buf, int nBytes, int flags) { + INTERRUPTIBLE_RETURN_INT(::send(fd, buf, nBytes, flags), os::Solaris::clear_interrupted); +} + +// As both poll and select can be interrupted by signals, we have to be +// prepared to restart the system call after updating the timeout, unless +// a poll() is done with timeout == -1, in which case we repeat with this +// "wait forever" value. + +inline int hpi::timeout(int fd, long timeout) { + int res; + struct timeval t; + julong prevtime, newtime; + static const char* aNull = 0; + + struct pollfd pfd; + pfd.fd = fd; + pfd.events = POLLIN; + + gettimeofday(&t, &aNull); + prevtime = ((julong)t.tv_sec * 1000) + t.tv_usec / 1000; + + for(;;) { + INTERRUPTIBLE_NORESTART(::poll(&pfd, 1, timeout), res, os::Solaris::clear_interrupted); + if(res == OS_ERR && errno == EINTR) { + if(timeout != -1) { + gettimeofday(&t, &aNull); + newtime = ((julong)t.tv_sec * 1000) + t.tv_usec /1000; + timeout -= newtime - prevtime; + if(timeout <= 0) + return OS_OK; + prevtime = newtime; + } + } else + return res; + } +} + +inline int hpi::listen(int fd, int count) { + if (fd < 0) + return OS_ERR; + + return ::listen(fd, count); +} + +inline int +hpi::connect(int fd, struct sockaddr *him, int len) { + do { + int _result; + INTERRUPTIBLE_NORESTART(::connect(fd, him, len), _result, + os::Solaris::clear_interrupted); + + // Depending on when thread interruption is reset, _result could be + // one of two values when errno == EINTR + + if (((_result == OS_INTRPT) || (_result == OS_ERR)) && (errno == EINTR)) { + /* restarting a connect() changes its errno semantics */ + INTERRUPTIBLE(::connect(fd, him, len), _result, + os::Solaris::clear_interrupted); + /* undo these changes */ + if (_result == OS_ERR) { + if (errno == EALREADY) errno = EINPROGRESS; /* fall through */ + else if (errno == EISCONN) { errno = 0; return OS_OK; } + } + } + return _result; + } while(false); +} + +inline int hpi::accept(int fd, struct sockaddr *him, int *len) { + if (fd < 0) + return OS_ERR; + INTERRUPTIBLE_RETURN_INT((int)::accept(fd, him, (socklen_t*) len), os::Solaris::clear_interrupted); +} + +inline int hpi::recvfrom(int fd, char *buf, int nBytes, int flags, + sockaddr *from, int *fromlen) { + //%%note jvm_r11 + INTERRUPTIBLE_RETURN_INT((int)::recvfrom(fd, buf, nBytes, (unsigned int) flags, from, (socklen_t *)fromlen), os::Solaris::clear_interrupted); +} + +inline int hpi::sendto(int fd, char *buf, int len, int flags, + struct sockaddr *to, int tolen) { + //%%note jvm_r11 + INTERRUPTIBLE_RETURN_INT((int)::sendto(fd, buf, len, (unsigned int) flags, to, tolen),os::Solaris::clear_interrupted); +} + +inline int hpi::socket_available(int fd, jint *pbytes) { + if (fd < 0) + return OS_OK; + + int ret; + + RESTARTABLE(::ioctl(fd, FIONREAD, pbytes), ret); + + //%% note ioctl can return 0 when successful, JVM_SocketAvailable + // is expected to return 0 on failure and 1 on success to the jdk. + + return (ret == OS_ERR) ? 0 : 1; +} + + +/* +HPIDECL(socket_shutdown, "socket_shutdown", _socket, SocketShutdown, + int, "%d", + (int fd, int howto), + ("fd = %d, howto = %d", fd, howto), + (fd, howto)); + */ +inline int hpi::socket_shutdown(int fd, int howto){ + return ::shutdown(fd, howto); +} + +/* +HPIDECL(bind, "bind", _socket, Bind, + int, "%d", + (int fd, struct sockaddr *him, int len), + ("fd = %d, him = %p, len = %d", + fd, him, len), + (fd, him, len)); +*/ +inline int hpi::bind(int fd, struct sockaddr *him, int len){ + INTERRUPTIBLE_RETURN_INT_NORESTART(::bind(fd, him, len),os::Solaris::clear_interrupted); +} + +/* +HPIDECL(get_sock_name, "get_sock_name", _socket, GetSocketName, + int, "%d", + (int fd, struct sockaddr *him, int *len), + ("fd = %d, him = %p, len = %p", + fd, him, len), + (fd, him, len)); + */ +inline int hpi::get_sock_name(int fd, struct sockaddr *him, int *len){ + return ::getsockname(fd, him, (socklen_t*) len); +} + +/* +HPIDECL(get_host_name, "get_host_name", _socket, GetHostName, int, "%d", + (char *hostname, int namelen), + ("hostname = %p, namelen = %d", + hostname, namelen), + (hostname, namelen)); + */ +inline int hpi::get_host_name(char* name, int namelen){ + return ::gethostname(name, namelen); +} + +/* +HPIDECL(get_sock_opt, "get_sock_opt", _socket, SocketGetOption, int, "%d", + (int fd, int level, int optname, char *optval, int* optlen), + ("fd = %d, level = %d, optname = %d, optval = %p, optlen = %p", + fd, level, optname, optval, optlen), + (fd, level, optname, optval, optlen)); + */ +inline int hpi::get_sock_opt(int fd, int level, int optname, + char *optval, int* optlen){ + return ::getsockopt(fd, level, optname, optval, (socklen_t*) optlen); +} + +/* +HPIDECL(set_sock_opt, "set_sock_opt", _socket, SocketSetOption, int, "%d", + (int fd, int level, int optname, const char *optval, int optlen), + ("fd = %d, level = %d, optname = %d, optval = %p, optlen = %d", + fd, level, optname, optval, optlen), + (fd, level, optname, optval, optlen)); + */ +inline int hpi::set_sock_opt(int fd, int level, int optname, + const char *optval, int optlen){ + return ::setsockopt(fd, level, optname, optval, optlen); +} + +//Reconciliation History +// 1.3 98/10/21 18:17:14 hpi_win32.hpp +// 1.6 99/06/28 11:01:36 hpi_win32.hpp +//End