javanns_kernelinterface.c

著名的神经网络工具箱

/*
 * Class:     javanns_KernelInterface
 * Method:    setFirstSite
 * Signature: ()Z
 */
JNIEXPORT jboolean JNICALL
Java_javanns_KernelInterface_setFirstSite(JNIEnv *jEnv, jobject jObj) {
  return krui_setFirstSite();
}

/*
 * Class:     javanns_KernelInterface
 * Method:    setNextSite
 * Signature: ()Z
 */
JNIEXPORT jboolean JNICALL
Java_javanns_KernelInterface_setNextSite(JNIEnv *jEnv, jobject jObj) {
  return krui_setNextSite();
}

/*
 * Class:     javanns_KernelInterface
 * Method:    setSite
 * Signature: (Ljava/lang/String;)Z
 */
JNIEXPORT jboolean JNICALL
Java_javanns_KernelInterface_setSite(JNIEnv *jEnv, jobject jObj, jstring jSiteName) {
  const char *name = (*jEnv)->GetStringUTFChars(jEnv, jSiteName, 0);
  bool b = krui_setSite( (char *)name);
  (*jEnv)->ReleaseStringUTFChars(jEnv, jSiteName, name);
  return b;
}

/*
 * Class:     javanns_KernelInterface
 * Method:    getSiteValue
 * Signature: ()D
 */
JNIEXPORT jdouble JNICALL
Java_javanns_KernelInterface_getSiteValue(JNIEnv *jEnv, jobject jObj) {
  return krui_getSiteValue();
}

/*
 * Class:     javanns_KernelInterface
 * Method:    getSiteFuncName
 * Signature: ()Ljava/lang/String;
 */
JNIEXPORT jstring JNICALL
Java_javanns_KernelInterface_getSiteFuncName(JNIEnv *jEnv, jobject jObj) {
  char *p = krui_getSiteFuncName();
  if(p) return (*jEnv)->NewStringUTF(jEnv, p );
  else return (*jEnv)->NewStringUTF(jEnv, "" );
}

/*
 * Class:     javanns_KernelInterface
 * Method:    getSiteName
 * Signature: ()Ljava/lang/String;
 */
JNIEXPORT jstring JNICALL
Java_javanns_KernelInterface_getSiteName(JNIEnv *jEnv, jobject jObj) {
  char *p = krui_getSiteName();
  if(p) return (*jEnv)->NewStringUTF(jEnv, p );
  else return (*jEnv)->NewStringUTF(jEnv, "" );
}

/*
 * Class:     javanns_KernelInterface
 * Method:    setSiteName
 * Signature: (Ljava/lang/String;)V
 */
JNIEXPORT void JNICALL
Java_javanns_KernelInterface_setSiteName(JNIEnv *jEnv, jobject jObj, jstring jSiteName) {
  const char *name = (*jEnv)->GetStringUTFChars(jEnv, jSiteName, 0);
  int i = krui_setSiteName( (char *)name);
  (*jEnv)->ReleaseStringUTFChars(jEnv, jSiteName, name);
  isOK(jEnv, i);
}

/*
 * Class:     javanns_KernelInterface
 * Method:    addSite
 * Signature: (Ljava/lang/String;)V
 */
JNIEXPORT void JNICALL
Java_javanns_KernelInterface_addSite(JNIEnv *jEnv, jobject jObj, jstring jSiteName) {
  const char *name = (*jEnv)->GetStringUTFChars(jEnv, jSiteName, 0);
  int i = krui_addSite( (char *)name);
  (*jEnv)->ReleaseStringUTFChars(jEnv, jSiteName, name);
  isOK(jEnv, i);
}

/*
 * Class:     javanns_KernelInterface
 * Method:    deleteSite
 * Signature: ()Z
 */
JNIEXPORT jboolean JNICALL
Java_javanns_KernelInterface_deleteSite(JNIEnv *jEnv, jobject jObj) {
  return krui_deleteSite();
}

/*
 * Class:     javanns_KernelInterface
 * Method:    getFirstPredUnit
 * Signature: ()I
 */
JNIEXPORT jint JNICALL
Java_javanns_KernelInterface_getFirstPredUnit(JNIEnv *jEnv, jobject jObj) {
  jclass cls = (*jEnv)->GetObjectClass(jEnv, jObj);
  jfieldID fid;
  FlintType weight;
  int i =  krui_getFirstPredUnit( &weight );
  isOK(jEnv,i);

  fid = (*jEnv)->GetFieldID(jEnv, cls, "link_weight", "D");
  if(fid) (*jEnv)->SetDoubleField(jEnv, jObj, fid, weight);

  return i;
}

/*
 * Class:     javanns_KernelInterface
 * Method:    getNextPredUnit
 * Signature: ()I
 */
JNIEXPORT jint JNICALL
Java_javanns_KernelInterface_getNextPredUnit(JNIEnv *jEnv, jobject jObj) {
  jclass cls = (*jEnv)->GetObjectClass(jEnv, jObj);
  jfieldID fid;
  FlintType weight;
  int i =  krui_getNextPredUnit( &weight );
  isOK(jEnv,i);

  fid = (*jEnv)->GetFieldID(jEnv, cls, "link_weight", "D");
  if(fid) (*jEnv)->SetDoubleField(jEnv, jObj, fid, weight);

  return i;
}

/*
 * Class:     javanns_KernelInterface
 * Method:    getCurrentPredUnit
 * Signature: ()I
 */
JNIEXPORT jint JNICALL
Java_javanns_KernelInterface_getCurrentPredUnit(JNIEnv *jEnv, jobject jObj) {
  jclass cls = (*jEnv)->GetObjectClass(jEnv, jObj);
  jfieldID fid;
  FlintType weight;
  int i =  krui_getCurrentPredUnit( &weight );
  isOK(jEnv,i);

  fid = (*jEnv)->GetFieldID(jEnv, cls, "link_weight", "D");
  if(fid) (*jEnv)->SetDoubleField(jEnv, jObj, fid, weight);

  return i;
}

/*
 * Class:     javanns_KernelInterface
 * Method:    getFirstSuccUnit
 * Signature: ()I
 */
JNIEXPORT jint JNICALL
Java_javanns_KernelInterface_getFirstSuccUnit(JNIEnv *jEnv, jobject jObj, jint unitNo) {
  jclass cls = (*jEnv)->GetObjectClass(jEnv, jObj);
  jfieldID fid;
  FlintType weight;
  int i =  krui_getFirstSuccUnit(unitNo, &weight);
  isOK(jEnv,i);

  fid = (*jEnv)->GetFieldID(jEnv, cls, "link_weight", "D");
  if(fid) (*jEnv)->SetDoubleField(jEnv, jObj, fid, weight);

  return i;
}

/*
 * Class:     javanns_KernelInterface
 * Method:    getNextSuccUnit
 * Signature: ()I
 */
JNIEXPORT jint JNICALL
Java_javanns_KernelInterface_getNextSuccUnit(JNIEnv *jEnv, jobject jObj) {
  jclass cls = (*jEnv)->GetObjectClass(jEnv, jObj);
  jfieldID fid;
  FlintType weight;
  int i =  krui_getNextSuccUnit( &weight );
  isOK(jEnv,i);

  fid = (*jEnv)->GetFieldID(jEnv, cls, "link_weight", "D");
  if(fid) (*jEnv)->SetDoubleField(jEnv, jObj, fid, weight);

  return i;
}

/*
 * Class:     javanns_KernelInterface
 * Method:    isConnected
 * Signature: (I)Z
 */
JNIEXPORT jboolean JNICALL
Java_javanns_KernelInterface_isConnected(JNIEnv *jEnv, jobject jObj, jint sourceUnitNo) {
  return krui_isConnected(sourceUnitNo);
}

/*
 * Class:     javanns_KernelInterface
 * Method:    areConnected
 * Signature: (II)Z
 */
JNIEXPORT jboolean JNICALL
Java_javanns_KernelInterface_areConnected(JNIEnv *jEnv, jobject jObj,
                                  jint sourceUnitNo,
                                  jint targetUnitNo) {
  return krui_areConnected(sourceUnitNo, targetUnitNo);
}

/*
 * Class:     javanns_KernelInterface
 * Method:    areConnectedWeight
 * Signature: (II)Z
 */
JNIEXPORT jboolean JNICALL
Java_javanns_KernelInterface_areConnectedWeight(JNIEnv *jEnv, jobject jObj,
                                        jint sourceUnitNo,
                                        jint targetUnitNo) {
  jclass cls = (*jEnv)->GetObjectClass(jEnv, jObj);
  jfieldID fid;
  FlintType weight;
  bool b = krui_areConnectedWeight(sourceUnitNo, targetUnitNo, &weight );

  fid = (*jEnv)->GetFieldID(jEnv, cls, "link_weight", "D");
  if(fid) (*jEnv)->SetDoubleField(jEnv, jObj, fid, weight);

  return b;
}

/*
 * Class:     javanns_KernelInterface
 * Method:    getLinkWeight
 * Signature: ()D
 */
JNIEXPORT jdouble JNICALL
Java_javanns_KernelInterface_getLinkWeight(JNIEnv *jEnv, jobject jObj) {
  return krui_getLinkWeight();
}

/*
 * Class:     javanns_KernelInterface
 * Method:    setLinkWeight
 * Signature: (D)V
 */
JNIEXPORT void JNICALL
Java_javanns_KernelInterface_setLinkWeight(JNIEnv *jEnv, jobject jObj, jdouble weight) {
  krui_setLinkWeight(weight);
}

/*
 * Class:     javanns_KernelInterface
 * Method:    createLink
 * Signature: (ID)V
 */
JNIEXPORT void JNICALL
Java_javanns_KernelInterface_createLink(JNIEnv *jEnv, jobject jObj,
                                jint sourceUnitNo,
                                jdouble weight) {
  krui_createLink(sourceUnitNo, weight);
}

/*
 * Class:     javanns_KernelInterface
 * Method:    deleteLink
 * Signature: ()V
 */
JNIEXPORT void JNICALL
Java_javanns_KernelInterface_deleteLink(JNIEnv *jEnv, jobject jObj) {
  isOK(jEnv, krui_deleteLink() );
}

/*
 * Class:     javanns_KernelInterface
 * Method:    deleteAllInputLinks
 * Signature: ()V
 */
JNIEXPORT void JNICALL
Java_javanns_KernelInterface_deleteAllInputLinks(JNIEnv *jEnv, jobject jObj) {
  isOK(jEnv, krui_deleteAllInputLinks() );
}

/*
 * Class:     javanns_KernelInterface
 * Method:    deleteAllOutputLinks
 * Signature: ()V
 */
JNIEXPORT void JNICALL
Java_javanns_KernelInterface_deleteAllOutputLinks(JNIEnv *jEnv, jobject jObj) {
  isOK(jEnv, krui_deleteAllOutputLinks() );
}

/*
 * Class:     javanns_KernelInterface
 * Method:    jogWeights
 * Signature: (DD)V
 */
JNIEXPORT void JNICALL
Java_javanns_KernelInterface_jogWeights(JNIEnv *jEnv, jobject jObj,
                                jdouble minus,
                                jdouble plus) {
  krui_jogWeights(minus, plus);
}

/*
 * Class:     javanns_KernelInterface
 * Method:    jogCorrWeights
 * Signature: (DDD)V
 */
JNIEXPORT void JNICALL
Java_javanns_KernelInterface_jogCorrWeights(JNIEnv *jEnv, jobject jObj,
                                    jdouble minus,
                                    jdouble plus,
                                    jdouble mincorr) {
  krui_jogCorrWeights(minus, plus, mincorr);
}

/*
 * Class:     javanns_KernelInterface
 * Method:    setFirstFTypeEntry
 * Signature: ()Z
 */
JNIEXPORT jboolean JNICALL
Java_javanns_KernelInterface_setFirstFTypeEntry(JNIEnv *jEnv, jobject jObj) {
  return krui_setFirstFTypeEntry();
}

/*
 * Class:     javanns_KernelInterface
 * Method:    setNextFTypeEntry
 * Signature: ()Z
 */
JNIEXPORT jboolean JNICALL
Java_javanns_KernelInterface_setNextFTypeEntry(JNIEnv *jEnv, jobject jObj) {
  return krui_setNextFTypeEntry();
}

/*
 * Class:     javanns_KernelInterface
 * Method:    setFTypeEntry
 * Signature: (Ljava/lang/String;)Z
 */
JNIEXPORT jboolean JNICALL
Java_javanns_KernelInterface_setFTypeEntry(JNIEnv *jEnv, jobject jObj, jstring jName) {
  const char *name = (*jEnv)->GetStringUTFChars(jEnv, jName, 0);
  bool b = krui_setFTypeEntry( (char *) name);
  (*jEnv)->ReleaseStringUTFChars(jEnv, jName, name);
  return b;
}

/*
 * Class:     javanns_KernelInterface
 * Method:    getFTypeName
 * Signature: ()Ljava/lang/String;
 */
JNIEXPORT jstring JNICALL
Java_javanns_KernelInterface_getFTypeName(JNIEnv *jEnv, jobject jObj) {
  char *p = krui_getFTypeName();
  if(p) return (*jEnv)->NewStringUTF(jEnv, p );
  else return (*jEnv)->NewStringUTF(jEnv, "" );
}

/*
 * Class:     javanns_KernelInterface
 * Method:    setFTypeName
 * Signature: (Ljava/lang/String;)V
 */
JNIEXPORT void JNICALL
Java_javanns_KernelInterface_setFTypeName(JNIEnv *jEnv, jobject jObj, jstring jName) {
  const char *name = (*jEnv)->GetStringUTFChars(jEnv, jName, 0);
  int i = krui_setFTypeName( (char *)name);
  (*jEnv)->ReleaseStringUTFChars(jEnv, jName, name);
  isOK(jEnv, i);
}

/*
 * Class:     javanns_KernelInterface
 * Method:    getFTypeActFuncName
 * Signature: ()Ljava/lang/String;
 */
JNIEXPORT jstring JNICALL
Java_javanns_KernelInterface_getFTypeActFuncName(JNIEnv *jEnv, jobject jObj) {
  char *p = krui_getFTypeActFuncName();
  if(p) return (*jEnv)->NewStringUTF(jEnv, p );
  else return (*jEnv)->NewStringUTF(jEnv, "" );
}

/*
 * Class:     javanns_KernelInterface
 * Method:    setFTypeActFunc
 * Signature: (Ljava/lang/String;)V
 */
JNIEXPORT void JNICALL
Java_javanns_KernelInterface_setFTypeActFunc(JNIEnv *jEnv, jobject jObj, jstring jName) {
  const char *name = (*jEnv)->GetStringUTFChars(jEnv, jName, 0);
  int i = krui_setFTypeActFunc( (char *)name);
  (*jEnv)->ReleaseStringUTFChars(jEnv, jName, name);
  isOK(jEnv, i);
}

/*
 * Class:     javanns_KernelInterface
 * Method:    getFTypeOutFuncName
 * Signature: ()Ljava/lang/String;