File: Nodename.java

package info (click to toggle)
erlang 1%3A15.b.1-dfsg-4%2Bdeb7u1
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 210,320 kB
  • sloc: erlang: 1,325,533; xml: 338,134; ansic: 283,913; cpp: 48,667; makefile: 23,010; sh: 12,077; java: 10,102; lisp: 7,918; python: 5,298; pascal: 3,263; asm: 2,774; perl: 2,718; tcl: 245; sed: 48
file content (54 lines) | stat: -rw-r--r-- 1,399 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
/*
 * %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 com.ericsson.otp.erlang.*;

class Nodename {

    /*
      Implements test case jinterface_SUITE:nodename/1

    */

    public static void main(String argv[]) {

	String host = argv[0];

	try {
	    OtpNode node = new OtpNode("javanode");
	    System.out.println("Given host: " + host +
			       " Host: " + node.host() +
			       " Alive: " + node.alive() +
			       " Node: " + node.node());

	    if (!node.host().equals(host)) fail(1);
	    if (!node.alive().equals("javanode")) fail(2);
	    if (!node.node().equals("javanode@" + host)) fail(3);
	}
	catch (Exception e) {
	    System.out.println("" + e);
	    fail(4);
	}
    }

    private static void fail(int reason) {
	System.exit(reason);
    }

}