Wiki copymirror

This is a mirror of the wiki at pascal.chat. Editing, history and sign-in are there.

pas2jni

Overview

The pas2jni utility generates a JNI (Java Native Interface) bridge for a Pascal code. Then the Pascal code (including classes and other advanced features) can be easily used in Java programs on various platforms, including Android.

For example you can do the following in Java:

java
import pas.classes.*;

...

TStringList sl = TStringList.Create();
sl.Add("Hello.");
String s = sl.getStrings(0);
sl.Free();

...

The following Pascal features are supported by pas2jni:

USUPPORTED features:

Shared libraries, generated by pas2jni were tested with Java on Windows and Android. It should work on other systems as well.

How to use

pas2jni uses the PPUDump utility included with Free Pascal Compiler to read unit interfaces. Therefore your Pascal code must be first compiled with FPC. When your units are compiled, you can run pas2jni. You need to specify a list of main units and units search path. When you specify a main unit, all its interface declarations will be available in Java. For linked units only used declarations will be available. You can fine tune included/excluded declaration using -I and -E command line options.

The basic invocation of pas2jni:

text
pas2jni myunit -U/path/to/my/units;/path/to/FPC/units/*

Here you specify myunit as the main unit and provide path to your compiled units and FPC compiled units.

After successfull run of pas2jni you will get the following output files:

Note: You need to use ppudump of the same version as the FPC compiler. Use the -D switch to specify correct ppudump if it is not in PATH.

Custom handlers

It is possible to define the following custom handlers in your Pascal code.

procedure JNI_OnException;

Custom handlers must be public and defined in one of the main units specified when calling pas2jni.

Coding tips

Setting handlers (method pointers) in a Java code.

For example there is the following class and event handler in your Pascal code:

pascal
type TMyClass = class
//...
  property OnChange: TNotifyEvent;
//...
end;

In Java code, you add the event handler in a usual Java way:

java
// Create an instance of TMyClass
TMyClass myClass = TMyClass.Create();

// Set the event handler
myClass.setOnChange(
    new TNotifyEvent() {
      protected void Execute(TObject Sender) {
        // The handler code
      }
    }
  );

// Work with myClass
// ...
// ...

// Remove the handler to avoid memory leak
myClass.setOnChange(null);
// Free the object
myClass.Free();

NOTE: If you are setting handlers (method pointers) for short living objects, it is needed to explicitly remove the handlers before the object destruction by setting the null handler. Otherwise you will reach the active handlers limit (10000 handlers) and your application will crash.

Type casting

In some cases type casting for generated Java classes does not work as expected. For example, the following code will not compile:

java
contnrs.TObjectList objList = contnrs.TObjectList.Create();
classes.TList list = objList;

Though TObjectList is inherited from TList and similar code works in Pascal, the generated Java classes use a bit different class hierarchy in this case. An intermediate class __TList is used and TList is not ancestor for TObjectList anymore. The __TList class is needed to handle method reintroducing, which is allowed in Pascal, but not allowed in Java.

You need to use the following type casting trick in such case:

java
classes.TList list = new classes.TList(objList);

The same type casting method is used to cast a pointer to an object:

java
// Create a list
classes.TList list = classes.TList.Create();
// Get a pointer to the list
long pList = system.Pointer(list);
// Type cast the pointer to the new TObject variable
system.TObject list2 = new system.TObject(pList);

Passing Java objects to Pascal code

In some cases it is needed to pass native Java objects to your Pascal code and handle them directly using JNI functions. For example, you can pass a Java array to your Pascal code to perform some quick processing of the array's data.

To do that you need to use a specially defined type TJavaObject. Use this type for function parameters to indicate that this parameter expect a Java object without any special processing.

Also it is needed a pointer to the JNI environment in order to call JNI functions. Just add a parameter of type PJNIEnv to access the JNI environment using this parameter.

Here an example:

pascal
// Define a special type TJavaObject. The declaration must be exactly as shown here
type
  TJavaObject = type jobject;

// Define your procedure
procedure HandleJavaObject(env: PJNIEnv; obj: TJavaObject; myParam: longint);
begin
  // Work with native Java object 'obj' using JNI functions accessible via 'env'.
  // ...
end;

You will get the following generated declaration in Java for this procedure:

java
public native static void HandleJavaObject(Object obj, int myParam);

Command line options

pascal
Usage: pas2jni [options] <unit> [<unit2> <unit3> ...]
pascal
Options:
  -U<path> - Unit search path, semicolon delimited. Wildcards are allowed.
  -L<name> - Set output library name.
  -P<name> - Set Java package name.
  -O<path> - Set output path for Pascal files.
  -J<path> - Set output path for Java files.
  -D<prog> - Set full path to the "ppudump" program.
  -I<list> - Include the list of specified objects in the output. The list is
             semicolon delimited. To read the list from a file use -I@<file>
  -E<list> - Exclude the list of specified objects from the output. The list is
             semicolon delimited. To read the list from a file use -E@<file>
  -?       - Show this help information.

From the Free Pascal wiki, page "pas2jni", as it stood on 2020-01-29 after a change by Yurysidorov, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's Licensing page. If you have concerns about this material, message the admin.

Revision 2, last changed by WikiArchive .