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) || defined(AIX) 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 jint 169 handleAvailable(FD fd, jlong *pbytes) 170 { 171 int mode; 172 struct stat64 buf64; 173 jlong size = -1, current = -1; 174 175 int result; 176 RESTARTABLE(fstat64(fd, &buf64), result); 177 if (result != -1) { 178 mode = buf64.st_mode; 179 if (S_ISCHR(mode) || S_ISFIFO(mode) || S_ISSOCK(mode)) { 180 int n; 181 int result; 182 RESTARTABLE(ioctl(fd, FIONREAD, &n), result); 183 if (result >= 0) { 184 *pbytes = n; 185 return 1; 186 } 187 } else if (S_ISREG(mode)) { 188 size = buf64.st_size; 189 } 190 } 191 192 if ((current = lseek64(fd, 0, SEEK_CUR)) == -1) { 193 return 0; 194 } 195 196 if (size < current) { 197 if ((size = lseek64(fd, 0, SEEK_END)) == -1) 198 return 0; 199 else if (lseek64(fd, current, SEEK_SET) == -1) 200 return 0; 201 } 202 203 *pbytes = size - current; 204 return 1; 205 } 206 207 jint 208 handleSetLength(FD fd, jlong length) 209 { 210 int result; 211 RESTARTABLE(ftruncate64(fd, length), result); 212 return result; 213 } 214 215 size_t 216 getLastErrorString(char *buf, size_t len) 217 { 218 if (errno == 0 || len < 1) return 0; 219 220 const char *err = strerror(errno); 221 size_t n = strlen(err); 222 if (n >= len) 223 n = len - 1; 224 225 strncpy(buf, err, n); 226 buf[n] = '\0'; 227 return n; 228 }