1 /* 2 * Copyright (c) 2001, 2013, Oracle and/or its affiliates. All rights reserved. 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 4 * 5 * This code is free software; you can redistribute it and/or modify it 6 * under the terms of the GNU General Public License version 2 only, as 7 * published by the Free Software Foundation. Oracle designates this 8 * particular file as subject to the "Classpath" exception as provided 9 * by Oracle in the LICENSE file that accompanied this code. 10 * 11 * This code is distributed in the hope that it will be useful, but WITHOUT 12 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 13 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 14 * version 2 for more details (a copy is included in the LICENSE file that 15 * accompanied this code). 16 * 17 * You should have received a copy of the GNU General Public License version 18 * 2 along with this work; if not, write to the Free Software Foundation, 19 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. 20 * 21 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA 22 * or visit www.oracle.com if you need additional information or have any 23 * questions. 24 */ 25 26 #include "jni.h" 27 #include "jni_util.h" 28 #include "jvm.h" 29 #include "io_util.h" 30 #include "io_util_md.h" 31 #include <string.h> 32 #include <unistd.h> 33 34 #ifdef __solaris__ 35 #include <sys/filio.h> 36 #endif 37 38 #if defined(__linux__) || defined(_ALLBSD_SOURCE) 39 #include <sys/ioctl.h> 40 #endif 41 42 #ifdef MACOSX 43 44 #include <CoreFoundation/CoreFoundation.h> 45 46 __private_extern__ 47 jstring newStringPlatform(JNIEnv *env, const char* str) 48 { 49 jstring rv = NULL; 50 CFMutableStringRef csref = CFStringCreateMutable(NULL, 0); 51 if (csref == NULL) { 52 JNU_ThrowOutOfMemoryError(env, "native heap"); 53 } else { 54 CFStringAppendCString(csref, str, kCFStringEncodingUTF8); 55 CFStringNormalize(csref, kCFStringNormalizationFormC); 56 int clen = CFStringGetLength(csref); 57 int ulen = (clen + 1) * 2; // utf16 + zero padding 58 char* chars = malloc(ulen); 59 if (chars == NULL) { 60 CFRelease(csref); 61 JNU_ThrowOutOfMemoryError(env, "native heap"); 62 } else { 63 if (CFStringGetCString(csref, chars, ulen, kCFStringEncodingUTF16)) { 64 rv = (*env)->NewString(env, (jchar*)chars, clen); 65 } 66 free(chars); 67 CFRelease(csref); 68 } 69 } 70 return rv; 71 } 72 #endif 73 74 FD 75 handleOpen(const char *path, int oflag, int mode) { 76 FD fd; 77 RESTARTABLE(open64(path, oflag, mode), fd); 78 if (fd != -1) { 79 struct stat64 buf64; 80 int result; 81 RESTARTABLE(fstat64(fd, &buf64), result); 82 if (result != -1) { 83 if (S_ISDIR(buf64.st_mode)) { 84 close(fd); 85 errno = EISDIR; 86 fd = -1; 87 } 88 } else { 89 close(fd); 90 fd = -1; 91 } 92 } 93 return fd; 94 } 95 96 void 97 fileOpen(JNIEnv *env, jobject this, jstring path, jfieldID fid, int flags) 98 { 99 WITH_PLATFORM_STRING(env, path, ps) { 100 FD fd; 101 102 #if defined(__linux__) || defined(_ALLBSD_SOURCE) 103 /* Remove trailing slashes, since the kernel won't */ 104 char *p = (char *)ps + strlen(ps) - 1; 105 while ((p > ps) && (*p == '/')) 106 *p-- = '\0'; 107 #endif 108 fd = handleOpen(ps, flags, 0666); 109 if (fd != -1) { 110 SET_FD(this, fd, fid); 111 } else { 112 throwFileNotFoundException(env, path); 113 } 114 } END_PLATFORM_STRING(env, ps); 115 } 116 117 void 118 fileClose(JNIEnv *env, jobject this, jfieldID fid) 119 { 120 FD fd = GET_FD(this, fid); 121 if (fd == -1) { 122 return; 123 } 124 125 /* Set the fd to -1 before closing it so that the timing window 126 * of other threads using the wrong fd (closed but recycled fd, 127 * that gets re-opened with some other filename) is reduced. 128 * Practically the chance of its occurance is low, however, we are 129 * taking extra precaution over here. 130 */ 131 SET_FD(this, -1, fid); 132 133 /* 134 * Don't close file descriptors 0, 1, or 2. If we close these stream 135 * then a subsequent file open or socket will use them. Instead we 136 * just redirect these file descriptors to /dev/null. 137 */ 138 if (fd >= STDIN_FILENO && fd <= STDERR_FILENO) { 139 int devnull = open("/dev/null", O_WRONLY); 140 if (devnull < 0) { 141 SET_FD(this, fd, fid); // restore fd 142 JNU_ThrowIOExceptionWithLastError(env, "open /dev/null failed"); 143 } else { 144 dup2(devnull, fd); 145 close(devnull); 146 } 147 } else if (close(fd) == -1) { 148 JNU_ThrowIOExceptionWithLastError(env, "close failed"); 149 } 150 } 151 152 ssize_t 153 handleRead(FD fd, void *buf, jint len) 154 { 155 ssize_t result; 156 RESTARTABLE(read(fd, buf, len), result); 157 return result; 158 } 159 160 ssize_t 161 handleWrite(FD fd, const void *buf, jint len) 162 { 163 ssize_t result; 164 RESTARTABLE(write(fd, buf, len), result); 165 return result; 166 } 167 168 ssize_t 169 handleAppend(FD fd, const void *buf, jint len) 170 { 171 // Check whether the file is opened with O_APPEND flag 172 int flags; 173 RESTARTABLE(fcntl(fd, F_GETFL), flags); 174 if (flags == -1) 175 return -1; 176 177 if ((flags & O_APPEND) != O_APPEND) 178 return -1; 179 180 ssize_t result; 181 RESTARTABLE(write(fd, buf, len), result); 182 return result; 183 } 184 185 jint 186 handleAvailable(FD fd, jlong *pbytes) 187 { 188 int mode; 189 struct stat64 buf64; 190 jlong size = -1, current = -1; 191 192 int result; 193 RESTARTABLE(fstat64(fd, &buf64), result); 194 if (result != -1) { 195 mode = buf64.st_mode; 196 if (S_ISCHR(mode) || S_ISFIFO(mode) || S_ISSOCK(mode)) { 197 int n; 198 int result; 199 RESTARTABLE(ioctl(fd, FIONREAD, &n), result); 200 if (result >= 0) { 201 *pbytes = n; 202 return 1; 203 } 204 } else if (S_ISREG(mode)) { 205 size = buf64.st_size; 206 } 207 } 208 209 if ((current = lseek64(fd, 0, SEEK_CUR)) == -1) { 210 return 0; 211 } 212 213 if (size < current) { 214 if ((size = lseek64(fd, 0, SEEK_END)) == -1) 215 return 0; 216 else if (lseek64(fd, current, SEEK_SET) == -1) 217 return 0; 218 } 219 220 if (size >= current) { 221 *pbytes = size - current; 222 return 1; 223 } else { 224 return 0; 225 } 226 } 227 228 jint 229 handleSetLength(FD fd, jlong length) 230 { 231 int result; 232 RESTARTABLE(ftruncate64(fd, length), result); 233 return result; 234 } 235 236 size_t 237 getLastErrorString(char *buf, size_t len) 238 { 239 if (errno == 0 || len < 1) return 0; 240 241 const char *err = strerror(errno); 242 size_t n = strlen(err); 243 if (n >= len) 244 n = len - 1; 245 246 strncpy(buf, err, n); 247 buf[n] = '\0'; 248 return n; 249 }