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 }