class complex_chunk
{
public long size;
public double[] data;
public complex_chunk(int size)
{
this.size = size;
this.data = new double[size];
for (int l = 0; l < size; ++l) {
this.data[l] = l;
}
print();
}
public void print()
{
System.out.println("Chunk size = "+size);
for (int l = 0; l < size; ++l) {
System.out.println("Chunk element ["+l+"] = "+data[l]);
}
}
}

/**
A more complex correlator Java plugin with multiple methods, arrays and chunks.
*/
public class complex_plugin
{
/// Prints the arguments and returns a string
public static String test1(long l, double f, boolean b, String s)
{
System.out.println("integer value = "+l);
System.out.println("float value = "+f);
System.out.println("boolean value = "+b);
System.out.println("string value = "+s);
return "Hello, World";
}
/// Prints the (array) arguments and returns a string
public static double test2(long[] ls, double[] fs,
boolean[] bs, String[] ss)
{
System.out.println("sequence size = "+ls.length);
for (int i = 0; i < ls.length; ++i) {
System.out.print("sequence element["+i+"]: ");
System.out.println("integer value = "+ls[i]);
}
System.out.println("sequence size = "+fs.length);
for (int i = 0; i < fs.length; ++i) {
System.out.print("sequence element["+i+"]: ");
System.out.println("float value = "+fs[i]);
}
System.out.println("sequence size = "+bs.length);
for (int i = 0; i < bs.length; ++i) {
System.out.print("sequence element["+i+"]: ");
System.out.println("boolean value = "+bs[i]);
}
System.out.println("sequence size = "+ss.length);
for (int i = 0; i < ss.length; ++i) {
System.out.print("sequence element["+i+"]: ");
System.out.println("string value = "+ss[i]);
}
return 2.71828;
}
/// returns a chunk containing an array of 'l' doubles
public static Object test3(int l)
{
return new complex_chunk(l);
}
/// Takes a chunk from test3, mutates it and prints it
public static void test4(Object o)
{
complex_chunk cc = (complex_chunk) o;
for (int i = 0; i < cc.size; ++i) {
cc.data[i] = Math.sqrt(cc.data[i]);
}
cc.print();
}
}

<application-classes>
<plugin>
<plugin-name>complex_plugin</plugin-name>
<plugin-class>complex_plugin</plugin-class>
<description>A test plugin</description>
</plugin>
</application-classes>

monitor ComplexPluginTest {

// Load the plugin
import "complex_plugin" as complex;

// To hold the return values
string str1;
string ret1;
float ret2;

// Opaque chunk value
chunk myChunk;

// Loop counter
integer i;

// Sequences for test2
sequence<integer> intSeq;
sequence<float> floatSeq;
sequence<boolean> boolSeq;
sequence<string> stringSeq;

action onload {
// Call test1 function
str1 := "Hello, Complex Plugin";
ret1 := complex.test1(42, 3.14159, true, str1);
log "complex.test1 = " + ret1 at INFO;
log "str1 = " + str1 at INFO;

// Initialise sequences
intSeq.setSize(10);
floatSeq.setSize(10);
boolSeq.setSize(10);
stringSeq.setSize(10);
i := 0;
while (i < 10) {
intSeq[i] := i;
floatSeq[i] := i.toFloat();
boolSeq[i] := true;
stringSeq[i] := "How long is a piece of string?";
i := i + 1;
}

// Call test2 function
ret2 := complex.test2(intSeq, floatSeq, boolSeq, stringSeq);
log "complex.test2 = " + ret2.toString() at INFO;
i := 0;
while (i < 10) {
log "intSeq[" + i.toString() + "] = " + intSeq[i].toString()
at INFO;
log "floatSeq[" + i.toString() + "] = " + floatSeq[i].toString()
at INFO;
log "boolSeq[" + i.toString() + "] = " + boolSeq[i].toString()
at INFO;
log "stringSeq[" + i.toString() + "] = " + stringSeq[i].toString()
at INFO;
i:= i + 1;
}

// Generate a new chunk
myChunk := complex.test3(20);

// Do some computation on the chunk
complex.test4(myChunk);
}
}