Outdated egg!

This is an egg for CHICKEN 4, the unsupported old release. You're almost certainly looking for the CHICKEN 5 version of this egg, if it exists.

If it does not exist, there may be equivalent functionality provided by another egg; have a look at the egg index. Otherwise, please consider porting this egg to the current version of CHICKEN.

jni

Author

bevuta IT GmbH (Patrick Brauer)

Requirements

Description

JNI Bindings for Chicken Scheme. For more information check: Java Native Interface Specification

API

[parameter] java-vm
[parameter] jni-env

jvm-init

[syntax] (jvm-init [CLASS-PATH "."])

Initialize jni when chicken is expected to launch the jvm.

jni-init

[syntax] (jni-init)

Initialize jni when the jvm launchs chicken.

jvm-get-default-init-args

[procedure] (jvm-get-default-init-args JVM-INIT-ARGS)

Get default init args for the jvm.

jvm-create

[procedure] (jvm-create JAVA-VM JNI-ENV JVM-INIT-ARGS)

Creates a jvm.

jvm-destroy

[procedure] (jvm-destroy JAVA-VM)

Destroy a jvm.

jvm-env

[procedure] (jvm-env JAVA-VM JNI-ENV)

Set output argument JNI-ENV to the current jvm env.

jvm-attach-current-thread

[procedure] (jvm-attach-current-thread JAVA-VM JNI-ENV)

Attaches the current thread to a Java VM. Returns a JNI interface pointer.

jvm-detach-current-thread

[procedure] (jvm-detach-current-thread JAVA-VM)

Detaches the current thread from a Java VM. All Java monitors held by this thread are released. All Java threads waiting for this thread to die are notified. Returns JNI\_OK on success; returns a suitable JNI error code (a negative number) on failure.

jimport

[syntax] (jimport CLASS-NAME [(IMPORT ...)])

Defines a module with the content of the class and use the import specifiers to import it. The content of the class contains: class methods and fields and a special procedure called "new" to invoke the constructor. The import specifier syntax is the same as the normal import macro. To avoid repeating the module name, you can use <> as a placeholder.

   (jimport java.lang.String)
   (valueOf 1)
   
   (jimport java.lang.String (prefix (only <> valueOf) String-))
   (String-valueOf 1)
   (String-new)

jlambda

[syntax] (jlambda CLASS [METHOD/FIELD])

jlambda-constant

[syntax] (jlambda-constant TYPE CLASS FIELD) => lambda

Returns a static java constant getter procedure. This macro doesn't requiere a jni-env available until getter invokation. Also, the result is cached so the value is retrieved from java just once.

   (define FLOAT_MAX_VALUE (jlambda-constant float java.lang.Float MAX_VALUE))

jlambda-field

[syntax] (jlambda-field MODIFIERS TYPE CLASS FIELD) 
   (let ((user-lastname (jlambda-field () java.lang.String com.testapp.User lastname))) 
     (print (user-lastname user))
     (set! (user-lastname user) "Perez"))

jlambda-method

[syntax] (jlambda-method MODIFIERS RETURN-TYPE CLASS METHOD-NAME ARGS...) -> lambda

Returns a lambda associated to the java method. Modifiers could by a list of modifiers or #f

   (jlambda-method #f boolean java.lang.String contains java.lang.CharSequence)

jlambda-methods

[procedure] (jlambda-methods CLASS-NAME METHOD-NAME ((MODIFIER RETURN-TYPE (ARGS..)) ...)) -> lambda

This procedure will create jlambda-method variants for each signature. When the procedure is invoked will try to resolve the overloaded methods as java will do. If there is not enough information for that, type hints information should be added to help the identification.

   (let ((ov1 (jlambda-methods 'com.chicken_mobile.jni.test.Bar 'bar
                        '((#f int . (int)) 
                          (#f int . (short))
                          (#f int . (java.lang.String))))))
   (ov1 bar 1 "hola")
   (ov1 bar 2 )
   (ov1 bar (type: short 1)))

jlambda-constructor

[syntax] (jlambda-constructor CLASS ARGS...) -> lambda

Returns a lambda associated to the class constructor.

   (jlambda-constructor java.lang.Integer int))

import-java-ns

[syntax] (import-java-ns ((PACKAGE-FROM IMPORT) ...))

IMPORT could be:

   (import-java-ns ((java.lang *)
                    (java.lang (System String))
                    (com.bevuta.testapp Foo)))
	(class String)
	(class System)
	(class Foo))

class

[syntax] (class CLASS-SYMBOL) -> jclass

Returns the associated jclass. Raise error if the class is not found.

   (class java.lang.String)

super-class

[procedure] (super-class JCLASS) -> jclass

Returns the jclass corresponding to the argument super class.

get-object-class

[procedure] (get-object-class JOBJECT) -> jclass

Returns the jclass corresponding to the argument object.

instance-of?

[procedure] (instance-of? JOBJECT JCLASS)

Check if the object is instance of the class.

same-object?

[procedure] (same-object? JOBJECT JOBJECT)

Check if two objects are the same one.

assignable-from?

[procedure] (assignable-from? JCLASS JCLASS)

Check if a class is assignable from another.

define-method

[syntax] (define-method (METHOD_NAME THIS) RETURN-TYPE BODY..)

Implements a native declared method.

   (define-method (com.bevuta.androidChickenTest.Backend.main backend) void
      ...)

References

[procedure] (new-local-ref JOBJECT)
[procedure] (delete-local-ref JOBJECT)
[procedure] (new-global-ref JOBJECT)
[procedure] (delete-global-ref JOBJECT)

Exceptions

Java exceptions are mapped to conditions of the kind '(exn java exception-class)

java-exception-message

[procedure] (java-exception-message JAVA-CONDITION)

Get java exception message as string.

java-exception-trace

[procedure] (java-exception-trace JAVA-CONDITION)

Get java exception trace as string.

java-exception-type

[procedure] (java-exception-type JAVA-CONDITION) -> EXCEPTION-CLASS-SYMBOL

Get java exception class as symbol.

Other
monitor-enter
[procedure] (monitor-enter jobject)

Enters the monitor associated with the underlying Java object referred to by obj argument.

monitor-exit
[procedure] (monitor-exit jobject)

Exit the monitor associated with the underlying Java object referred to by obj argument.

License

BSD License

Version history