1 /*
   2  * Copyright (c) 2001, 2010, 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 
  33 #ifdef MACOSX
  34 
  35 #include <CoreFoundation/CoreFoundation.h>
  36 
  37 __private_extern__
  38 jstring newStringPlatform(JNIEnv *env, const char* str)
  39 {
  40     jstring rv = NULL;
  41     CFMutableStringRef csref = CFStringCreateMutable(NULL, 0);
  42     if (csref == NULL) {
  43         JNU_ThrowOutOfMemoryError(env, "native heap");
  44     } else {
  45         CFStringAppendCString(csref, str, kCFStringEncodingUTF8);
  46         CFStringNormalize(csref, kCFStringNormalizationFormC);
  47         int clen = CFStringGetLength(csref);
  48         int ulen = (clen + 1) * 2;        // utf16 + zero padding
  49         char* chars = malloc(ulen);
  50         if (chars == NULL) {
  51             CFRelease(csref);
  52             JNU_ThrowOutOfMemoryError(env, "native heap");
  53         } else {
  54             if (CFStringGetCString(csref, chars, ulen, kCFStringEncodingUTF16)) {
  55                 rv = (*env)->NewString(env, (jchar*)chars, clen);
  56             }
  57             free(chars);
  58             CFRelease(csref);
  59         }
  60     }
  61     return rv;
  62 }
  63 #endif
  64 
  65 void
  66 fileOpen(JNIEnv *env, jobject this, jstring path, jfieldID fid, int flags)
  67 {
  68     WITH_PLATFORM_STRING(env, path, ps) {
  69         FD fd;
  70 
  71 #if defined(__linux__) || defined(_ALLBSD_SOURCE)
  72         /* Remove trailing slashes, since the kernel won't */
  73         char *p = (char *)ps + strlen(ps) - 1;
  74         while ((p > ps) && (*p == '/'))
  75             *p-- = '\0';
  76 #endif
  77         fd = JVM_Open(ps, flags, 0666);
  78         if (fd >= 0) {
  79             SET_FD(this, fd, fid);
  80         } else {
  81             throwFileNotFoundException(env, path);
  82         }
  83     } END_PLATFORM_STRING(env, ps);
  84 }
  85 
  86 
  87 void
  88 fileClose(JNIEnv *env, jobject this, jfieldID fid)
  89 {
  90     FD fd = GET_FD(this, fid);
  91     if (fd == -1) {
  92         return;
  93     }
  94 
  95     /* Set the fd to -1 before closing it so that the timing window
  96      * of other threads using the wrong fd (closed but recycled fd,
  97      * that gets re-opened with some other filename) is reduced.
  98      * Practically the chance of its occurance is low, however, we are
  99      * taking extra precaution over here.
 100      */
 101     SET_FD(this, -1, fid);
 102 
 103     /*
 104      * Don't close file descriptors 0, 1, or 2. If we close these stream
 105      * then a subsequent file open or socket will use them. Instead we
 106      * just redirect these file descriptors to /dev/null.
 107      */
 108     if (fd >= STDIN_FILENO && fd <= STDERR_FILENO) {
 109         int devnull = open("/dev/null", O_WRONLY);
 110         if (devnull < 0) {
 111             SET_FD(this, fd, fid); // restore fd
 112             JNU_ThrowIOExceptionWithLastError(env, "open /dev/null failed");
 113         } else {
 114             dup2(devnull, fd);
 115             close(devnull);
 116         }
 117     } else if (JVM_Close(fd) == -1) {
 118         JNU_ThrowIOExceptionWithLastError(env, "close failed");
 119     }
 120 }