1 /* 2 * Copyright (c) 2003, 2004, 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 <stdlib.h> 27 #include <string.h> 28 #include "jni.h" 29 #include "jni_util.h" 30 31 #ifdef __APPLE__ 32 #include <crt_externs.h> 33 #define environ (*_NSGetEnviron()) 34 #endif 35 36 JNIEXPORT jobjectArray JNICALL 37 Java_java_lang_ProcessEnvironment_environ(JNIEnv *env, jclass ign) 38 { 39 /* This is one of the rare times it's more portable to declare an 40 * external symbol explicitly, rather than via a system header. 41 * The declaration is standardized as part of UNIX98, but there is 42 * no standard (not even de-facto) header file where the 43 * declaration is to be found. See: 44 * http://www.opengroup.org/onlinepubs/007908799/xbd/envvar.html */ 45 #ifndef __APPLE__ 46 extern char ** environ; /* environ[i] looks like: VAR=VALUE\0 */ 47 #endif 48 49 jsize count = 0; 50 jsize i, j; 51 jobjectArray result; 52 jclass byteArrCls = (*env)->FindClass(env, "[B"); 53 54 for (i = 0; environ[i]; i++) { 55 /* Ignore corrupted environment variables */ 56 if (strchr(environ[i], '=') != NULL) 57 count++; 58 } 59 60 result = (*env)->NewObjectArray(env, 2*count, byteArrCls, 0); 61 if (result == NULL) return NULL; 62 63 for (i = 0, j = 0; environ[i]; i++) { 64 const char * varEnd = strchr(environ[i], '='); 65 /* Ignore corrupted environment variables */ 66 if (varEnd != NULL) { 67 jbyteArray var, val; 68 const char * valBeg = varEnd + 1; 69 jsize varLength = varEnd - environ[i]; 70 jsize valLength = strlen(valBeg); 71 var = (*env)->NewByteArray(env, varLength); 72 if (var == NULL) return NULL; 73 val = (*env)->NewByteArray(env, valLength); 74 if (val == NULL) return NULL; 75 (*env)->SetByteArrayRegion(env, var, 0, varLength, 76 (jbyte*) environ[i]); 77 (*env)->SetByteArrayRegion(env, val, 0, valLength, 78 (jbyte*) valBeg); 79 (*env)->SetObjectArrayElement(env, result, 2*j , var); 80 (*env)->SetObjectArrayElement(env, result, 2*j+1, val); 81 (*env)->DeleteLocalRef(env, var); 82 (*env)->DeleteLocalRef(env, val); 83 j++; 84 } 85 } 86 87 return result; 88 }