|
| 1 | + |
| 2 | +#include "jni_helper.h" |
| 3 | + |
| 4 | +BEGIN_EXTERN_C |
| 5 | + |
| 6 | +#define STATISTICS_FUNC(FUNC) AF_MANGLE(Statistics, FUNC) |
| 7 | + |
| 8 | +JNIEXPORT jlong JNICALL STATISTICS_FUNC(afMean)(JNIEnv *env, jclass clazz, |
| 9 | + jlong ref, jint dim) { |
| 10 | + af_array ret = 0; |
| 11 | + AF_CHECK(af_mean(&ret, ARRAY(ref), dim)); |
| 12 | + return JLONG(ret); |
| 13 | +} |
| 14 | + |
| 15 | +JNIEXPORT jlong JNICALL STATISTICS_FUNC(afMeanWeighted)(JNIEnv *env, jclass clazz, |
| 16 | + jlong ref, jlong weightsRef, |
| 17 | + jint dim) { |
| 18 | + af_array ret = 0; |
| 19 | + AF_CHECK(af_mean_weighted(&ret, ARRAY(ref), ARRAY(weightsRef), dim)); |
| 20 | + return JLONG(ret); |
| 21 | +} |
| 22 | + |
| 23 | +JNIEXPORT jdouble JNICALL STATISTICS_FUNC(afMeanAll)(JNIEnv *env, |
| 24 | + jclass clazz, jlong ref, |
| 25 | + jintArray dims) { |
| 26 | + double ret = 0; |
| 27 | + jint *dimptr = env->GetIntArrayElements(dims, 0); |
| 28 | + dim_t tdims[4] = {dimptr[0], dimptr[1], dimptr[2], dimptr[3]}; |
| 29 | + AF_CHECK(af_mean_all(&ret, NULL, ARRAY(ref))); |
| 30 | + env->ReleaseIntArrayElements(dims, dimptr, 0); |
| 31 | + return (jdouble)ret; |
| 32 | +} |
| 33 | + |
| 34 | +#define INSTANTIATE_MEAN(jtype, param) \ |
| 35 | + JNIEXPORT jobject JNICALL STATISTICS_FUNC(afMeanAll##jtype)(JNIEnv *env, jclass clazz, \ |
| 36 | + jlong ref, \ |
| 37 | + jintArray dims) { \ |
| 38 | + double real = 0, img = 0; \ |
| 39 | + jint *dimptr = env->GetIntArrayElements(dims, 0); \ |
| 40 | + dim_t tdims[4] = {dimptr[0], dimptr[1], dimptr[2], dimptr[3]}; \ |
| 41 | + AF_CHECK(af_mean_all(&real, &img, ARRAY(ref))); \ |
| 42 | + env->ReleaseIntArrayElements(dims, dimptr, 0); \ |
| 43 | + jclass cls = env->FindClass("com/arrayfire/"#jtype); \ |
| 44 | + jmethodID id = env->GetMethodID(cls, "<init>", "("#param")V"); \ |
| 45 | + jobject obj = env->NewObject(cls, id, real, img); \ |
| 46 | + return obj; \ |
| 47 | +} |
| 48 | + |
| 49 | +INSTANTIATE_MEAN(FloatComplex, FF) |
| 50 | +INSTANTIATE_MEAN(DoubleComplex, DD) |
| 51 | + |
| 52 | +END_EXTERN_C |
| 53 | + |
| 54 | + |
0 commit comments