aboutsummaryrefslogtreecommitdiffstats
path: root/lib/orber/doc/src/Orber
diff options
context:
space:
mode:
Diffstat (limited to 'lib/orber/doc/src/Orber')
-rw-r--r--lib/orber/doc/src/Orber/InitialReference.java130
-rw-r--r--lib/orber/doc/src/Orber/Makefile70
-rw-r--r--lib/orber/doc/src/Orber/ignore_config_record.inf1
3 files changed, 201 insertions, 0 deletions
diff --git a/lib/orber/doc/src/Orber/InitialReference.java b/lib/orber/doc/src/Orber/InitialReference.java
new file mode 100644
index 0000000000..300de59139
--- /dev/null
+++ b/lib/orber/doc/src/Orber/InitialReference.java
@@ -0,0 +1,130 @@
+/*
+ * %CopyrightBegin%
+ *
+ * Copyright Ericsson AB 1997-2009. 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%
+ *
+ */
+/**
+ * InitialReference is a class which generates the INIT reference
+ * which can be used by the InitialReferences interface.
+ */
+package Orber;
+
+public class InitialReference
+{
+
+ /**
+ * Constructor.
+ */
+ public InitialReference(){;}
+
+ /**
+ * Returns the stringified objectreference to the initial reference server
+ */
+ public String stringified_ior(String host, int port)
+ {
+ String iorByteString;
+ String profileData;
+ String iorString;
+
+ // byte_order followed by ' {"", [{0, '
+ // char iorBytesFirstPart[] = {0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0};
+ char iorBytesFirstPart[] = {0,0,0,0,0,0,0,32,73,68,76,58,79,114,98,101,114,47,73,110,105,116,105,97,108,82,101,102,101,114,101,110,99,101,115,58,49,46,48,0,0,0,0,1,0,0,0,0};
+ // the objectkey "INIT
+ char iorBytesLastPart[] = {0,0,0,4,73,78,73,84};
+
+ // Fix the ProfileData struct.
+ char pdPrefix[] = {0,1,0,0};
+ char nullbyte[] = {0};
+ profileData = new String(pdPrefix) + enc_ulong(host.length() + 1) + host + new String(nullbyte);
+ profileData = align(profileData, 2);
+ profileData += enc_ushort(port);
+ profileData = align(profileData, 4);
+ profileData += new String(iorBytesLastPart);
+ // Fix the whole IOR
+ iorByteString = new String(iorBytesFirstPart) + enc_ulong(profileData.length()) +
+ profileData;
+
+ // System.out.print("Start[" + profileData.length() + "]");
+ // System.out.print("[");
+ // for(int x = 0; x < iorByteString.length(); x++)
+ // {
+ // System.out.print((int) iorByteString.charAt(x) + ",");
+ // }
+ // System.out.println("]");
+
+ iorString = createIOR(iorByteString);
+ // System.out.println(iorString);
+ return iorString;
+ }
+
+
+ private String enc_ushort(int s)
+ {
+ char byteArray[] = {(char) ((s >>> 8) & 0xFF),
+ (char) ((s >>> 0) & 0xFF)};
+
+ return new String(byteArray);
+ }
+
+ private String enc_ulong(int l)
+ {
+ char byteArray[] = {(char) ((l >>> 24) & 0xFF),
+ (char) ((l >>> 16) & 0xFF),
+ (char) ((l >>> 8) & 0xFF),
+ (char) ((l >>> 0) & 0xFF)};
+
+ return new String(byteArray);
+
+ }
+
+ private String createIOR(String bytes)
+ {
+ int i;
+ StringBuffer sb = new StringBuffer("IOR:");
+
+ for(i = 0; i < bytes.length(); i++)
+ {
+ int b = bytes.charAt(i);
+ if(b<0) b+= 256;
+ int n1 = b / 16;
+ int n2 = b % 16;
+ int c1 = (n1 < 10) ? ('0' + n1) : ('a' + (n1 - 10));
+ int c2 = (n2 < 10) ? ('0' + n2) : ('a' + (n2 - 10));
+ sb.append((char)c1);
+ sb.append((char)c2);
+ }
+
+ return sb.toString();
+ }
+
+ private String align(String buffer, int alignment)
+ {
+ String s = buffer;
+ char nullbyte[] = {0};
+
+ int remainder = alignment - (buffer.length() % alignment);
+ if (remainder == alignment) return s;
+
+ for (int i = 0; i < remainder; i++)
+ {
+ s += new String(nullbyte);
+ }
+ return s;
+ }
+
+
+}
diff --git a/lib/orber/doc/src/Orber/Makefile b/lib/orber/doc/src/Orber/Makefile
new file mode 100644
index 0000000000..49da975a8b
--- /dev/null
+++ b/lib/orber/doc/src/Orber/Makefile
@@ -0,0 +1,70 @@
+#
+# %CopyrightBegin%
+#
+# Copyright Ericsson AB 1997-2009. 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%
+#
+#
+include $(ERL_TOP)/make/target.mk
+
+include $(ERL_TOP)/make/$(TARGET)/otp.mk
+
+# ----------------------------------------------------
+# Application version
+# ----------------------------------------------------
+include ../../vsn.mk
+VSN=$(ORBER_VSN)
+
+# ----------------------------------------------------
+# Release directory specification
+# ----------------------------------------------------
+RELSYSDIR = $(RELEASE_PATH)/lib/orber-$(VSN)
+
+#
+# JAVA macros
+#
+JAVA_CLASSES = \
+ InitialReference
+
+JAVA_FILES= $(JAVA_CLASSES:%=%.java)
+
+CLASSPATH = ../..
+
+# ----------------------------------------------------
+# Flags
+# ----------------------------------------------------
+JAVA_OPTIONS =
+
+# ----------------------------------------------------
+# Make Rules
+# ----------------------------------------------------
+
+debug opt:
+
+clean:
+
+docs:
+
+# ----------------------------------------------------
+# Release Targets
+# ----------------------------------------------------
+include $(ERL_TOP)/make/otp_release_targets.mk
+
+release_spec: opt
+ $(INSTALL_DIR) $(RELSYSDIR)/java_src/Orber
+ $(INSTALL_DATA) $(JAVA_FILES) $(RELSYSDIR)/java_src/Orber
+
+release_docs_spec:
+
diff --git a/lib/orber/doc/src/Orber/ignore_config_record.inf b/lib/orber/doc/src/Orber/ignore_config_record.inf
new file mode 100644
index 0000000000..0a5053eba3
--- /dev/null
+++ b/lib/orber/doc/src/Orber/ignore_config_record.inf
@@ -0,0 +1 @@
+This file makes clearmake use the -T switch for this subdirectory