Sat, 01 Dec 2007 00:00:00 +0000
Initial load
duke@435 | 1 | /* |
duke@435 | 2 | * Copyright 1998-2007 Sun Microsystems, Inc. All Rights Reserved. |
duke@435 | 3 | * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
duke@435 | 4 | * |
duke@435 | 5 | * This code is free software; you can redistribute it and/or modify it |
duke@435 | 6 | * under the terms of the GNU General Public License version 2 only, as |
duke@435 | 7 | * published by the Free Software Foundation. |
duke@435 | 8 | * |
duke@435 | 9 | * This code is distributed in the hope that it will be useful, but WITHOUT |
duke@435 | 10 | * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
duke@435 | 11 | * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
duke@435 | 12 | * version 2 for more details (a copy is included in the LICENSE file that |
duke@435 | 13 | * accompanied this code). |
duke@435 | 14 | * |
duke@435 | 15 | * You should have received a copy of the GNU General Public License version |
duke@435 | 16 | * 2 along with this work; if not, write to the Free Software Foundation, |
duke@435 | 17 | * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. |
duke@435 | 18 | * |
duke@435 | 19 | * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara, |
duke@435 | 20 | * CA 95054 USA or visit www.sun.com if you need additional information or |
duke@435 | 21 | * have any questions. |
duke@435 | 22 | * |
duke@435 | 23 | */ |
duke@435 | 24 | |
duke@435 | 25 | // |
duke@435 | 26 | // Parts of the HPI interface for which the HotSparc does not use the |
duke@435 | 27 | // HPI (because the interruptible IO mechanims used are different). |
duke@435 | 28 | // |
duke@435 | 29 | |
duke@435 | 30 | #include <sys/socket.h> |
duke@435 | 31 | #include <sys/poll.h> |
duke@435 | 32 | #include <sys/filio.h> |
duke@435 | 33 | #include <unistd.h> |
duke@435 | 34 | #include <netdb.h> |
duke@435 | 35 | #include <setjmp.h> |
duke@435 | 36 | |
duke@435 | 37 | // HPI_FileInterface |
duke@435 | 38 | |
duke@435 | 39 | // Many system calls can be interrupted by signals and must be restarted. |
duke@435 | 40 | // Restart support was added without disturbing the extent of thread |
duke@435 | 41 | // interruption support. |
duke@435 | 42 | |
duke@435 | 43 | inline int hpi::close(int fd) { |
duke@435 | 44 | RESTARTABLE_RETURN_INT(::close(fd)); |
duke@435 | 45 | } |
duke@435 | 46 | |
duke@435 | 47 | inline size_t hpi::read(int fd, void *buf, unsigned int nBytes) { |
duke@435 | 48 | INTERRUPTIBLE_RETURN_INT(::read(fd, buf, nBytes), os::Solaris::clear_interrupted); |
duke@435 | 49 | } |
duke@435 | 50 | |
duke@435 | 51 | inline size_t hpi::write(int fd, const void *buf, unsigned int nBytes) { |
duke@435 | 52 | INTERRUPTIBLE_RETURN_INT(::write(fd, buf, nBytes), os::Solaris::clear_interrupted); |
duke@435 | 53 | } |
duke@435 | 54 | |
duke@435 | 55 | |
duke@435 | 56 | // HPI_SocketInterface |
duke@435 | 57 | |
duke@435 | 58 | inline int hpi::socket_close(int fd) { |
duke@435 | 59 | RESTARTABLE_RETURN_INT(::close(fd)); |
duke@435 | 60 | } |
duke@435 | 61 | |
duke@435 | 62 | inline int hpi::socket(int domain, int type, int protocol) { |
duke@435 | 63 | return ::socket(domain, type, protocol); |
duke@435 | 64 | } |
duke@435 | 65 | |
duke@435 | 66 | inline int hpi::recv(int fd, char *buf, int nBytes, int flags) { |
duke@435 | 67 | INTERRUPTIBLE_RETURN_INT(::recv(fd, buf, nBytes, flags), os::Solaris::clear_interrupted); |
duke@435 | 68 | } |
duke@435 | 69 | |
duke@435 | 70 | inline int hpi::send(int fd, char *buf, int nBytes, int flags) { |
duke@435 | 71 | INTERRUPTIBLE_RETURN_INT(::send(fd, buf, nBytes, flags), os::Solaris::clear_interrupted); |
duke@435 | 72 | } |
duke@435 | 73 | |
duke@435 | 74 | // As both poll and select can be interrupted by signals, we have to be |
duke@435 | 75 | // prepared to restart the system call after updating the timeout, unless |
duke@435 | 76 | // a poll() is done with timeout == -1, in which case we repeat with this |
duke@435 | 77 | // "wait forever" value. |
duke@435 | 78 | |
duke@435 | 79 | inline int hpi::timeout(int fd, long timeout) { |
duke@435 | 80 | int res; |
duke@435 | 81 | struct timeval t; |
duke@435 | 82 | julong prevtime, newtime; |
duke@435 | 83 | static const char* aNull = 0; |
duke@435 | 84 | |
duke@435 | 85 | struct pollfd pfd; |
duke@435 | 86 | pfd.fd = fd; |
duke@435 | 87 | pfd.events = POLLIN; |
duke@435 | 88 | |
duke@435 | 89 | gettimeofday(&t, &aNull); |
duke@435 | 90 | prevtime = ((julong)t.tv_sec * 1000) + t.tv_usec / 1000; |
duke@435 | 91 | |
duke@435 | 92 | for(;;) { |
duke@435 | 93 | INTERRUPTIBLE_NORESTART(::poll(&pfd, 1, timeout), res, os::Solaris::clear_interrupted); |
duke@435 | 94 | if(res == OS_ERR && errno == EINTR) { |
duke@435 | 95 | if(timeout != -1) { |
duke@435 | 96 | gettimeofday(&t, &aNull); |
duke@435 | 97 | newtime = ((julong)t.tv_sec * 1000) + t.tv_usec /1000; |
duke@435 | 98 | timeout -= newtime - prevtime; |
duke@435 | 99 | if(timeout <= 0) |
duke@435 | 100 | return OS_OK; |
duke@435 | 101 | prevtime = newtime; |
duke@435 | 102 | } |
duke@435 | 103 | } else |
duke@435 | 104 | return res; |
duke@435 | 105 | } |
duke@435 | 106 | } |
duke@435 | 107 | |
duke@435 | 108 | inline int hpi::listen(int fd, int count) { |
duke@435 | 109 | if (fd < 0) |
duke@435 | 110 | return OS_ERR; |
duke@435 | 111 | |
duke@435 | 112 | return ::listen(fd, count); |
duke@435 | 113 | } |
duke@435 | 114 | |
duke@435 | 115 | inline int |
duke@435 | 116 | hpi::connect(int fd, struct sockaddr *him, int len) { |
duke@435 | 117 | do { |
duke@435 | 118 | int _result; |
duke@435 | 119 | INTERRUPTIBLE_NORESTART(::connect(fd, him, len), _result, |
duke@435 | 120 | os::Solaris::clear_interrupted); |
duke@435 | 121 | |
duke@435 | 122 | // Depending on when thread interruption is reset, _result could be |
duke@435 | 123 | // one of two values when errno == EINTR |
duke@435 | 124 | |
duke@435 | 125 | if (((_result == OS_INTRPT) || (_result == OS_ERR)) && (errno == EINTR)) { |
duke@435 | 126 | /* restarting a connect() changes its errno semantics */ |
duke@435 | 127 | INTERRUPTIBLE(::connect(fd, him, len), _result, |
duke@435 | 128 | os::Solaris::clear_interrupted); |
duke@435 | 129 | /* undo these changes */ |
duke@435 | 130 | if (_result == OS_ERR) { |
duke@435 | 131 | if (errno == EALREADY) errno = EINPROGRESS; /* fall through */ |
duke@435 | 132 | else if (errno == EISCONN) { errno = 0; return OS_OK; } |
duke@435 | 133 | } |
duke@435 | 134 | } |
duke@435 | 135 | return _result; |
duke@435 | 136 | } while(false); |
duke@435 | 137 | } |
duke@435 | 138 | |
duke@435 | 139 | inline int hpi::accept(int fd, struct sockaddr *him, int *len) { |
duke@435 | 140 | if (fd < 0) |
duke@435 | 141 | return OS_ERR; |
duke@435 | 142 | INTERRUPTIBLE_RETURN_INT((int)::accept(fd, him, (socklen_t*) len), os::Solaris::clear_interrupted); |
duke@435 | 143 | } |
duke@435 | 144 | |
duke@435 | 145 | inline int hpi::recvfrom(int fd, char *buf, int nBytes, int flags, |
duke@435 | 146 | sockaddr *from, int *fromlen) { |
duke@435 | 147 | //%%note jvm_r11 |
duke@435 | 148 | INTERRUPTIBLE_RETURN_INT((int)::recvfrom(fd, buf, nBytes, (unsigned int) flags, from, (socklen_t *)fromlen), os::Solaris::clear_interrupted); |
duke@435 | 149 | } |
duke@435 | 150 | |
duke@435 | 151 | inline int hpi::sendto(int fd, char *buf, int len, int flags, |
duke@435 | 152 | struct sockaddr *to, int tolen) { |
duke@435 | 153 | //%%note jvm_r11 |
duke@435 | 154 | INTERRUPTIBLE_RETURN_INT((int)::sendto(fd, buf, len, (unsigned int) flags, to, tolen),os::Solaris::clear_interrupted); |
duke@435 | 155 | } |
duke@435 | 156 | |
duke@435 | 157 | inline int hpi::socket_available(int fd, jint *pbytes) { |
duke@435 | 158 | if (fd < 0) |
duke@435 | 159 | return OS_OK; |
duke@435 | 160 | |
duke@435 | 161 | int ret; |
duke@435 | 162 | |
duke@435 | 163 | RESTARTABLE(::ioctl(fd, FIONREAD, pbytes), ret); |
duke@435 | 164 | |
duke@435 | 165 | //%% note ioctl can return 0 when successful, JVM_SocketAvailable |
duke@435 | 166 | // is expected to return 0 on failure and 1 on success to the jdk. |
duke@435 | 167 | |
duke@435 | 168 | return (ret == OS_ERR) ? 0 : 1; |
duke@435 | 169 | } |
duke@435 | 170 | |
duke@435 | 171 | |
duke@435 | 172 | /* |
duke@435 | 173 | HPIDECL(socket_shutdown, "socket_shutdown", _socket, SocketShutdown, |
duke@435 | 174 | int, "%d", |
duke@435 | 175 | (int fd, int howto), |
duke@435 | 176 | ("fd = %d, howto = %d", fd, howto), |
duke@435 | 177 | (fd, howto)); |
duke@435 | 178 | */ |
duke@435 | 179 | inline int hpi::socket_shutdown(int fd, int howto){ |
duke@435 | 180 | return ::shutdown(fd, howto); |
duke@435 | 181 | } |
duke@435 | 182 | |
duke@435 | 183 | /* |
duke@435 | 184 | HPIDECL(bind, "bind", _socket, Bind, |
duke@435 | 185 | int, "%d", |
duke@435 | 186 | (int fd, struct sockaddr *him, int len), |
duke@435 | 187 | ("fd = %d, him = %p, len = %d", |
duke@435 | 188 | fd, him, len), |
duke@435 | 189 | (fd, him, len)); |
duke@435 | 190 | */ |
duke@435 | 191 | inline int hpi::bind(int fd, struct sockaddr *him, int len){ |
duke@435 | 192 | INTERRUPTIBLE_RETURN_INT_NORESTART(::bind(fd, him, len),os::Solaris::clear_interrupted); |
duke@435 | 193 | } |
duke@435 | 194 | |
duke@435 | 195 | /* |
duke@435 | 196 | HPIDECL(get_sock_name, "get_sock_name", _socket, GetSocketName, |
duke@435 | 197 | int, "%d", |
duke@435 | 198 | (int fd, struct sockaddr *him, int *len), |
duke@435 | 199 | ("fd = %d, him = %p, len = %p", |
duke@435 | 200 | fd, him, len), |
duke@435 | 201 | (fd, him, len)); |
duke@435 | 202 | */ |
duke@435 | 203 | inline int hpi::get_sock_name(int fd, struct sockaddr *him, int *len){ |
duke@435 | 204 | return ::getsockname(fd, him, (socklen_t*) len); |
duke@435 | 205 | } |
duke@435 | 206 | |
duke@435 | 207 | /* |
duke@435 | 208 | HPIDECL(get_host_name, "get_host_name", _socket, GetHostName, int, "%d", |
duke@435 | 209 | (char *hostname, int namelen), |
duke@435 | 210 | ("hostname = %p, namelen = %d", |
duke@435 | 211 | hostname, namelen), |
duke@435 | 212 | (hostname, namelen)); |
duke@435 | 213 | */ |
duke@435 | 214 | inline int hpi::get_host_name(char* name, int namelen){ |
duke@435 | 215 | return ::gethostname(name, namelen); |
duke@435 | 216 | } |
duke@435 | 217 | |
duke@435 | 218 | /* |
duke@435 | 219 | HPIDECL(get_sock_opt, "get_sock_opt", _socket, SocketGetOption, int, "%d", |
duke@435 | 220 | (int fd, int level, int optname, char *optval, int* optlen), |
duke@435 | 221 | ("fd = %d, level = %d, optname = %d, optval = %p, optlen = %p", |
duke@435 | 222 | fd, level, optname, optval, optlen), |
duke@435 | 223 | (fd, level, optname, optval, optlen)); |
duke@435 | 224 | */ |
duke@435 | 225 | inline int hpi::get_sock_opt(int fd, int level, int optname, |
duke@435 | 226 | char *optval, int* optlen){ |
duke@435 | 227 | return ::getsockopt(fd, level, optname, optval, (socklen_t*) optlen); |
duke@435 | 228 | } |
duke@435 | 229 | |
duke@435 | 230 | /* |
duke@435 | 231 | HPIDECL(set_sock_opt, "set_sock_opt", _socket, SocketSetOption, int, "%d", |
duke@435 | 232 | (int fd, int level, int optname, const char *optval, int optlen), |
duke@435 | 233 | ("fd = %d, level = %d, optname = %d, optval = %p, optlen = %d", |
duke@435 | 234 | fd, level, optname, optval, optlen), |
duke@435 | 235 | (fd, level, optname, optval, optlen)); |
duke@435 | 236 | */ |
duke@435 | 237 | inline int hpi::set_sock_opt(int fd, int level, int optname, |
duke@435 | 238 | const char *optval, int optlen){ |
duke@435 | 239 | return ::setsockopt(fd, level, optname, optval, optlen); |
duke@435 | 240 | } |
duke@435 | 241 | |
duke@435 | 242 | //Reconciliation History |
duke@435 | 243 | // 1.3 98/10/21 18:17:14 hpi_win32.hpp |
duke@435 | 244 | // 1.6 99/06/28 11:01:36 hpi_win32.hpp |
duke@435 | 245 | //End |