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 getErrorString(errno, buf, len);
220 return strlen(buf);
221 }