CORBA-JAVA

 view release on metacpan or  search on metacpan

javaxml/PYXInputStreamImpl.java  view on Meta::CPAN

			throw new org.omg.CORBA.MARSHAL ("Close Tag expected");
		}
		if (!curr.substring (1).equals (tag))
		{
			error ("Bad Close Tag");
			throw new org.omg.CORBA.MARSHAL ("Bad Close Tag");
		}
		curr = _get_line();
	}

	public java.lang.String read_pcdata ()
	{
		if (curr == null)
		{
			error ("EOF");
			return "";
		}
		while (curr.charAt (0) == '(')	// Extensibility
		{
			_eat_balanced_tag ();
		}

javaxml/PYXInputStreamImpl.java  view on Meta::CPAN

				return;
			default:
				return;
			}
		}
	}

	public boolean read_boolean (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		if (str.equals ("true"))
		{
			return true;
		}
		if (!str.equals ("false"))
		{
			throw new org.omg.CORBA.MARSHAL ("Bad value for 'boolean'");
		}
		return false;
	}

	public char read_char (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		if (str.length () != 1)
		{
			throw new org.omg.CORBA.MARSHAL ("Bad length for 'char'");
		}
		return str.charAt (0);
	}

	public char read_wchar (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		if (str.length () != 1)
		{
			throw new org.omg.CORBA.MARSHAL ("Bad length for 'char'");
		}
		return str.charAt (0);
	}

	public byte read_octet (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		try {
			int val = Integer.parseInt (str.trim ());
			if (val < Byte.MIN_VALUE && val > Byte.MAX_VALUE)
			{
				throw new org.omg.CORBA.MARSHAL ("Out of range for 'octet'");
			}
			return (byte)val;
		} catch (NumberFormatException ex) {
			throw new org.omg.CORBA.MARSHAL (ex.getMessage ());
		}
	}

	public short read_short (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		try {
			int val = Integer.parseInt (str.trim ());
			if (val < Short.MIN_VALUE && val > Short.MAX_VALUE)
			{
				throw new org.omg.CORBA.MARSHAL ("Out of range for 'short'");
			}
			return (short)val;
		} catch (NumberFormatException ex) {
			throw new org.omg.CORBA.MARSHAL (ex.getMessage ());

javaxml/PYXInputStreamImpl.java  view on Meta::CPAN

	}

	public short read_ushort (java.lang.String tag)
	{
		return read_short (tag);
	}

	public int read_long (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		try {
			int val = Integer.parseInt (str.trim ());
			return val;
		} catch (NumberFormatException ex) {
			throw new org.omg.CORBA.MARSHAL (ex.getMessage ());
		}
	}

	public int read_ulong (java.lang.String tag)
	{
		return read_long (tag);
	}

	public long read_longlong (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		try {
			long val = Long.parseLong (str.trim ());
			return val;
		} catch (NumberFormatException ex) {
			throw new org.omg.CORBA.MARSHAL (ex.getMessage ());
		}
	}

	public long read_ulonglong (java.lang.String tag)
	{
		return read_longlong (tag);
	}

	public float read_float (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		try {
			float val = Float.parseFloat (str.trim ());
			return val;
		} catch (NumberFormatException ex) {
			throw new org.omg.CORBA.MARSHAL (ex.getMessage ());
		}
	}

	public double read_double (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		try {
			double val = Double.parseDouble (str.trim ());
			return val;
		} catch (NumberFormatException ex) {
			throw new org.omg.CORBA.MARSHAL (ex.getMessage ());
		}
	}

	public java.lang.String read_string (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		return str;
	}

	public java.lang.String read_wstring (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		return str;
	}

	public java.math.BigDecimal read_fixed (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		try {
			return new java.math.BigDecimal (str.trim ());
		} catch (NumberFormatException ex) {
			throw new org.omg.CORBA.MARSHAL (ex.getMessage ());
		}
	}

	public org.omg.CORBA.Object read_Object (java.lang.String tag)
	{

javaxml/PYXOutputStreamImpl.java  view on Meta::CPAN

		try {
			bw.write (')');
			escaped_write (tag);
			bw.write ('\n');
		}
		catch (IOException e) {
			throw new org.omg.CORBA.INTERNAL (e.getMessage ());
		}
	}

	public void write_pcdata (java.lang.String data)
	{
		try {
			bw.write ('-');
			escaped_write (data);
			bw.write ('\n');
		}
		catch (IOException e) {
			throw new org.omg.CORBA.INTERNAL (e.getMessage ());
		}
	}

javaxml/PYXOutputStreamImpl.java  view on Meta::CPAN

	public void write_any (org.omg.CORBA.Any value, java.lang.String tag)
	{
		throw new org.omg.CORBA.NO_IMPLEMENT ();
	}


	public void write_boolean (boolean value, java.lang.String tag)
	{
		write_open_tag (tag);
		write_pcdata (value ? "true" : "false");
		write_close_tag (tag);
	}


	public void write_char (char value, java.lang.String tag)
	{
		Character obj = new Character (value);
		write_open_tag (tag);
		write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_double (double value, java.lang.String tag)
	{
		Double obj = new Double (value);
		write_open_tag (tag);
		write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_float (float value, java.lang.String tag)
	{
		Float obj = new Float (value);
		write_open_tag (tag);
		write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_long (int value, java.lang.String tag)
	{
		Long obj = new Long (value);
		write_open_tag (tag);
		write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_longlong (long value, java.lang.String tag)
	{
		Long obj = new Long (value);
		write_open_tag (tag);
		write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_Object (org.omg.CORBA.Object value, java.lang.String tag)
	{
		throw new org.omg.CORBA.NO_IMPLEMENT ();
	}


	public void write_octet (byte value, java.lang.String tag)
	{
		Byte obj = new Byte (value);
		write_open_tag (tag);
		write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_short (short value, java.lang.String tag)
	{
		Short obj = new Short (value);
		write_open_tag (tag);
		write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_string (String value, java.lang.String tag)
	{
		write_open_tag (tag);
		write_pcdata (value);
		write_close_tag (tag);
	}


	public void write_TypeCode (org.omg.CORBA.TypeCode value, java.lang.String tag)
	{
		throw new org.omg.CORBA.NO_IMPLEMENT ();
	}


	public void write_ulong (int value, java.lang.String tag)
	{
		Long obj = new Long (value);
		write_open_tag (tag);
		write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_ulonglong (long value, java.lang.String tag)
	{
		Long obj = new Long (value);
		write_open_tag (tag);
		write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_ushort (short value, java.lang.String tag)
	{
		Short obj = new Short (value);
		write_open_tag (tag);
		write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


//	public void write_Value (Serializable value)
//	{
//		throw new org.omg.CORBA.NO_IMPLEMENT ();
//	}


	public void write_wchar (char value, java.lang.String tag)
	{
		Character obj = new Character (value);
		write_open_tag (tag);
		write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_wstring (String value, java.lang.String tag)
	{
		write_open_tag (tag);
		write_pcdata (value);
		write_close_tag (tag);
	}

	public void write_fixed (java.math.BigDecimal value, java.lang.String tag)
	{
		write_open_tag (tag);
		write_pcdata (value.toString ());
		write_close_tag (tag);
	}

}

javaxml/XMLInputStream.java  view on Meta::CPAN

 * unmarshal IDL types as well as to extract IDL types out of Anys.
 */

public abstract class XMLInputStream extends java.io.InputStream
{

    public abstract void read_open_tag (java.lang.String tag);

    public abstract void read_close_tag (java.lang.String tag);

    public abstract java.lang.String read_pcdata ();

    /**
     * Reads a boolean value from this input stream.
     *
     * @return the <code>boolean</code> value read from this input stream
     */
    public abstract boolean read_boolean (java.lang.String tag);
    /**
     * Reads a char value from this input stream.
     *

javaxml/XMLInputStreamImpl.java  view on Meta::CPAN

	public void close () throws IOException
	{
		reader.close ();
		cleanupVariables ();
		super.close ();
	}

	public boolean read_boolean (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		if (str.equals ("true"))
		{
			return true;
		}
		if (!str.equals ("false"))
		{
			throw new org.omg.CORBA.MARSHAL ("Bad value for 'boolean'");
		}
		return false;
	}

	public char read_char (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		if (str.length () != 1)
		{
			throw new org.omg.CORBA.MARSHAL ("Bad length for 'char'");
		}
		return str.charAt (0);
	}

	public char read_wchar (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		if (str.length () != 1)
		{
			throw new org.omg.CORBA.MARSHAL ("Bad length for 'char'");
		}
		return str.charAt (0);
	}

	public byte read_octet (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		try {
			int val = Integer.parseInt (str.trim ());
			if (val < Byte.MIN_VALUE && val > Byte.MAX_VALUE)
			{
				throw new org.omg.CORBA.MARSHAL ("Out of range for 'octet'");
			}
			return (byte)val;
		} catch (NumberFormatException ex) {
			throw new org.omg.CORBA.MARSHAL (ex.getMessage ());
		}
	}

	public short read_short (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		try {
			int val = Integer.parseInt (str.trim ());
			if (val < Short.MIN_VALUE && val > Short.MAX_VALUE)
			{
				throw new org.omg.CORBA.MARSHAL ("Out of range for 'short'");
			}
			return (short)val;
		} catch (NumberFormatException ex) {
			throw new org.omg.CORBA.MARSHAL (ex.getMessage ());

javaxml/XMLInputStreamImpl.java  view on Meta::CPAN

	}

	public short read_ushort (java.lang.String tag)
	{
		return read_short (tag);
	}

	public int read_long (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		try {
			int val = Integer.parseInt (str.trim ());
			return val;
		} catch (NumberFormatException ex) {
			throw new org.omg.CORBA.MARSHAL (ex.getMessage ());
		}
	}

	public int read_ulong (java.lang.String tag)
	{
		return read_long (tag);
	}

	public long read_longlong (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		try {
			long val = Long.parseLong (str.trim ());
			return val;
		} catch (NumberFormatException ex) {
			throw new org.omg.CORBA.MARSHAL (ex.getMessage ());
		}
	}

	public long read_ulonglong (java.lang.String tag)
	{
		return read_longlong (tag);
	}

	public float read_float (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		try {
			float val = Float.parseFloat (str.trim ());
			return val;
		} catch (NumberFormatException ex) {
			throw new org.omg.CORBA.MARSHAL (ex.getMessage ());
		}
	}

	public double read_double (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		try {
			double val = Double.parseDouble (str.trim ());
			return val;
		} catch (NumberFormatException ex) {
			throw new org.omg.CORBA.MARSHAL (ex.getMessage ());
		}
	}

	public java.lang.String read_string (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		return str;
	}

	public java.lang.String read_wstring (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		return str;
	}

	public java.math.BigDecimal read_fixed (java.lang.String tag)
	{
		read_open_tag (tag);
		String str = read_pcdata();
		read_close_tag (tag);
		try {
			return new java.math.BigDecimal (str.trim ());
		} catch (NumberFormatException ex) {
			throw new org.omg.CORBA.MARSHAL (ex.getMessage ());
		}
	}

	public org.omg.CORBA.Object read_Object (java.lang.String tag)
	{

javaxml/XMLInputStreamImpl.java  view on Meta::CPAN

    }

    /**
     * Parse the content of an element.
     * <pre>
     * [43] content ::= (element | CharData | Reference
     *		| CDSect | PI | Comment)*
     * [67] Reference ::= EntityRef | CharRef
     * </pre>
     */
    public java.lang.String read_pcdata ()
    {
        if (emptyElement) {
            return "";
        }

        StringBuffer data = new StringBuffer();
        boolean ETag = false;
        char c;

        try {

javaxml/XMLOutputStream.java  view on Meta::CPAN

 * marshal IDL types as well as to insert IDL types into Anys.
 */


public abstract class XMLOutputStream extends java.io.OutputStream
{
    public abstract void write_open_tag (java.lang.String tag);

    public abstract void write_close_tag (java.lang.String tag);

    public abstract void write_pcdata (java.lang.String data);

    /**
     * Returns an input stream with the same buffer.
     *@return an input stream with the same buffer.
     */
    public abstract XMLInputStream create_input_stream();

    /**
     * Writes a boolean value to this stream.
     * @param value the value to be written.

javaxml/XMLOutputStreamImpl.java  view on Meta::CPAN

		try {
			bw.write ("</");
			bw.write (tag);
			bw.write (">");
		}
		catch (IOException e) {
			throw new org.omg.CORBA.INTERNAL (e.getMessage ());
		}
	}

	public void write_pcdata (java.lang.String data)
	{
		try {
			escaped_write (data);
		}
		catch (IOException e) {
			throw new org.omg.CORBA.INTERNAL (e.getMessage ());
		}
	}


	private void _write_pcdata (java.lang.String data)
	{
		try {
			bw.write (data);
		}
		catch (IOException e) {
			throw new org.omg.CORBA.INTERNAL (e.getMessage ());
		}
	}

javaxml/XMLOutputStreamImpl.java  view on Meta::CPAN

	public void write_any (org.omg.CORBA.Any value, java.lang.String tag)
	{
		throw new org.omg.CORBA.NO_IMPLEMENT ();
	}


	public void write_boolean (boolean value, java.lang.String tag)
	{
		write_open_tag (tag);
		_write_pcdata (value ? "true" : "false");
		write_close_tag (tag);
	}


	public void write_char (char value, java.lang.String tag)
	{
		Character obj = new Character (value);
		write_open_tag (tag);
		write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_double (double value, java.lang.String tag)
	{
		Double obj = new Double (value);
		write_open_tag (tag);
		_write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_float (float value, java.lang.String tag)
	{
		Float obj = new Float (value);
		write_open_tag (tag);
		_write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_long (int value, java.lang.String tag)
	{
		Long obj = new Long (value);
		write_open_tag (tag);
		_write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_longlong (long value, java.lang.String tag)
	{
		Long obj = new Long (value);
		write_open_tag (tag);
		_write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_Object (org.omg.CORBA.Object value, java.lang.String tag)
	{
		throw new org.omg.CORBA.NO_IMPLEMENT ();
	}


	public void write_octet (byte value, java.lang.String tag)
	{
		Byte obj = new Byte (value);
		write_open_tag (tag);
		_write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_short (short value, java.lang.String tag)
	{
		Short obj = new Short (value);
		write_open_tag (tag);
		_write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_string (String value, java.lang.String tag)
	{
		write_open_tag (tag);
		write_pcdata (value);
		write_close_tag (tag);
	}


	public void write_TypeCode (org.omg.CORBA.TypeCode value, java.lang.String tag)
	{
		throw new org.omg.CORBA.NO_IMPLEMENT ();
	}


	public void write_ulong (int value, java.lang.String tag)
	{
		Long obj = new Long (value);
		write_open_tag (tag);
		_write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_ulonglong (long value, java.lang.String tag)
	{
		Long obj = new Long (value);
		write_open_tag (tag);
		_write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_ushort (short value, java.lang.String tag)
	{
		Short obj = new Short (value);
		write_open_tag (tag);
		_write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


//	public void write_Value (Serializable value)
//	{
//		throw new org.omg.CORBA.NO_IMPLEMENT ();
//	}


	public void write_wchar (char value, java.lang.String tag)
	{
		Character obj = new Character (value);
		write_open_tag (tag);
		write_pcdata (obj.toString ());
		write_close_tag (tag);
	}


	public void write_wstring (String value, java.lang.String tag)
	{
		write_open_tag (tag);
		write_pcdata (value);
		write_close_tag (tag);
	}

	public void write_fixed (java.math.BigDecimal value, java.lang.String tag)
	{
		write_open_tag (tag);
		_write_pcdata (value.toString ());
		write_close_tag (tag);
	}

}

lib/CORBA/JAVA/ClassXmlVisitor.pm  view on Meta::CPAN

    print $FH "{\n";
    print $FH "\n";
    print $FH "  public static ",$node->{java_Name}," read (",$self->{xml_pkg},"InputStream \$is)\n";
    print $FH "  {\n";
    print $FH "    return read (\$is, \"",$node->{xsd_name},"\");\n";
    print $FH "  }\n";
    print $FH "\n";
    print $FH "  public static ",$node->{java_Name}," read (",$self->{xml_pkg},"InputStream \$is, java.lang.String tag)\n";
    print $FH "  {\n";
    print $FH "    \$is.read_open_tag (tag);\n";
    print $FH "    java.lang.String str = \$is.read_pcdata ();\n";
    print $FH "    \$is.read_close_tag (tag);\n";
    foreach (@{$node->{list_expr}}) {
        print $FH "    if (str.equals (\"",$_->{java_name},"\"))\n";
        print $FH "      return ",$_->{java_Name},";\n";
    }
    print $FH "    throw new org.omg.CORBA.BAD_PARAM ();\n";
    print $FH "  }\n";
    print $FH "\n";
    print $FH "  public static void write (",$self->{xml_pkg},"OutputStream \$os, ",$node->{java_Name}," value)\n";
    print $FH "  {\n";
    print $FH "    write (\$os, value, \"",$node->{xsd_name},"\");\n";
    print $FH "  }\n";
    print $FH "\n";
    print $FH "  public static void write (",$self->{xml_pkg},"OutputStream \$os, ",$node->{java_Name}," value, java.lang.String tag)\n";
    print $FH "  {\n";
    print $FH "    \$os.write_open_tag (tag);\n";
    print $FH "    \$os.write_pcdata (value.toString ());\n";
    print $FH "    \$os.write_close_tag (tag);\n";
    print $FH "  }\n";
    print $FH "\n";
    print $FH "}\n";
    close $FH;
}

#
#   3.12    Exception Declaration
#