diff options
author | Björn Gustavsson <[email protected]> | 2010-08-27 11:44:26 +0200 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2010-08-27 11:44:26 +0200 |
commit | 087b863947f6689ea9d47300b24528015e579dc0 (patch) | |
tree | 76929165cffdb975dd95e78a2b1752751a5d9bce /lib/jinterface/test/jinterface_SUITE_data/GetNames.java | |
parent | 6c00708e21bccffff84595f714cf9c1003cc8916 (diff) | |
parent | 76e841903e439067d55cdbebb814e7ce86034826 (diff) | |
download | otp-087b863947f6689ea9d47300b24528015e579dc0.tar.gz otp-087b863947f6689ea9d47300b24528015e579dc0.tar.bz2 otp-087b863947f6689ea9d47300b24528015e579dc0.zip |
Merge branch 'bjorn/jinterface-test-suite' into maint-r13
* bjorn/jinterface-test-suite:
Add test suite for jinterface
Diffstat (limited to 'lib/jinterface/test/jinterface_SUITE_data/GetNames.java')
-rw-r--r-- | lib/jinterface/test/jinterface_SUITE_data/GetNames.java | 68 |
1 files changed, 68 insertions, 0 deletions
diff --git a/lib/jinterface/test/jinterface_SUITE_data/GetNames.java b/lib/jinterface/test/jinterface_SUITE_data/GetNames.java new file mode 100644 index 0000000000..3d2bc4ac84 --- /dev/null +++ b/lib/jinterface/test/jinterface_SUITE_data/GetNames.java @@ -0,0 +1,68 @@ +/* + * %CopyrightBegin% + * + * Copyright Ericsson AB 2004-2010. All Rights Reserved. + * + * The contents of this file are subject to the Erlang Public License, + * Version 1.1, (the "License"); you may not use this file except in + * compliance with the License. You should have received a copy of the + * Erlang Public License along with this software. If not, it can be + * retrieved online at http://www.erlang.org/. + * + * Software distributed under the License is distributed on an "AS IS" + * basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See + * the License for the specific language governing rights and limitations + * under the License. + * + * %CopyrightEnd% + */ + +import java.util.ArrayList; +import com.ericsson.otp.erlang.*; + +class GetNames { + + /* + Implements test case jinterface_SUITE:get_names/1 + + */ + + public static void main(String argv[]) { + + try { + OtpNode node = new OtpNode("javanode"); + OtpMbox mbox1 = node.createMbox(); + mbox1.registerName("mbox1"); + node.createMbox("mbox2"); + OtpMbox mbox3 = node.createMbox(); + node.registerName("mbox3",mbox3); + + ArrayList existing_names = new ArrayList(); + existing_names.add("mbox3"); + existing_names.add("mbox2"); + existing_names.add("mbox1"); + + String[] names = node.getNames(); + if (names.length != existing_names.size()) fail(1); + + for(int i=0; i<names.length; i++) { + System.out.println("" + names[i]); + existing_names.remove(names[i]); + } + + if (!existing_names.isEmpty()) fail(2); + } + catch (Exception e) { + fail("" + e, 3); + } + } + + private static void fail(int reason) { + System.exit(reason); + } + + private static void fail(String str, int reason) { + System.out.println(str); + System.exit(reason); + } +} |