zeroc-ice 3.7.9.1 → 3.8.0

data/dist/IceRuby/Proxy.cpp

@@ -0,0 +1,926 @@
+// Copyright (c) ZeroC, Inc.
+
+#include "Proxy.h"
+#include "Communicator.h"
+#include "Connection.h"
+#include "Endpoint.h"
+#include "Ice/DisableWarnings.h"
+#include "Ice/LocalExceptions.h"
+#include "Ice/Locator.h"
+#include "Ice/Proxy.h"
+#include "Ice/Router.h"
+#include "Types.h"
+#include "Util.h"
+
+using namespace std;
+using namespace IceRuby;
+
+static VALUE _proxyClass;
+
+// ObjectPrx
+
+extern "C" void
+IceRuby_ObjectPrx_mark(void* p)
+{
+    // We need to mark the communicator associated with this proxy.
+    auto proxy = static_cast<Ice::ObjectPrx*>(p);
+    volatile VALUE communicator = lookupCommunicator((*proxy)->ice_getCommunicator());
+    assert(!NIL_P(communicator));
+    rb_gc_mark(communicator);
+}
+
+extern "C" void
+IceRuby_ObjectPrx_free(void* p)
+{
+    delete static_cast<Ice::ObjectPrx*>(p);
+}
+
+static const rb_data_type_t IceRuby_ObjectPrxType = {
+    .wrap_struct_name = "Ice::ObjectPrx",
+    .function =
+        {
+            .dmark = IceRuby_ObjectPrx_mark,
+            .dfree = IceRuby_ObjectPrx_free,
+        },
+    .flags = RUBY_TYPED_FREE_IMMEDIATELY,
+};
+
+extern "C" VALUE
+IceRuby_ObjectPrx_hash(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        return INT2FIX(std::hash<Ice::ObjectPrx>{}(p));
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_getCommunicator(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        Ice::CommunicatorPtr communicator = p->ice_getCommunicator();
+        return lookupCommunicator(communicator);
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_toString(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        string s = p->ice_toString();
+        return createString(s);
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_getIdentity(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        return createIdentity(p->ice_getIdentity());
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_identity(VALUE self, VALUE args)
+{
+    ICE_RUBY_TRY
+    {
+        VALUE cls = Qnil;
+        long len = RARRAY_LEN(args);
+        if (len > 2 || len == 0)
+        {
+            throw RubyException(rb_eArgError, "ice_identity requires one or two arguments");
+        }
+        if (len == 2)
+        {
+            cls = rb_ary_entry(args, 1);
+        }
+
+        Ice::ObjectPrx p = getProxy(self);
+        Ice::Identity ident = getIdentity(rb_ary_entry(args, 0));
+        return createProxy(p->ice_identity(ident), cls);
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_getContext(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        return contextToHash(p->ice_getContext());
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_context(VALUE self, VALUE ctx)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+
+        Ice::Context context;
+        if (!NIL_P(ctx) && !hashToContext(ctx, context))
+        {
+            throw RubyException(rb_eTypeError, "argument is not a context hash");
+        }
+        return createProxy(p->ice_context(context), rb_class_of(self));
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_getFacet(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        string facet = p->ice_getFacet();
+        return createString(facet);
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_facet(VALUE self, VALUE args)
+{
+    ICE_RUBY_TRY
+    {
+        VALUE cls = Qnil;
+        long len = RARRAY_LEN(args);
+        if (len > 2 || len == 0)
+        {
+            throw RubyException(rb_eArgError, "ice_facet requires one or two arguments");
+        }
+        if (len == 2)
+        {
+            cls = rb_ary_entry(args, 1);
+        }
+
+        Ice::ObjectPrx p = getProxy(self);
+        string f = getString(rb_ary_entry(args, 0));
+        return createProxy(p->ice_facet(f), cls);
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_getAdapterId(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        string id = p->ice_getAdapterId();
+        return createString(id);
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_adapterId(VALUE self, VALUE id)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        string idstr = getString(id);
+        return createProxy(p->ice_adapterId(idstr), rb_class_of(self));
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_getEndpoints(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+
+        Ice::EndpointSeq seq = p->ice_getEndpoints();
+        volatile VALUE result = createArray(static_cast<long>(seq.size()));
+        long i = 0;
+        for (Ice::EndpointSeq::iterator q = seq.begin(); q != seq.end(); ++q, ++i)
+        {
+            RARRAY_ASET(result, i, createEndpoint(*q));
+        }
+        return result;
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_endpoints(VALUE self, VALUE seq)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+
+        if (!NIL_P(seq) && !isArray(seq))
+        {
+            throw RubyException(rb_eTypeError, "ice_endpoints requires an array of endpoints");
+        }
+
+        Ice::EndpointSeq endpoints;
+        if (!NIL_P(seq))
+        {
+            volatile VALUE arr = callRuby(rb_check_array_type, seq);
+            if (NIL_P(seq))
+            {
+                throw RubyException(rb_eTypeError, "unable to convert value to an array of endpoints");
+            }
+            for (long i = 0; i < RARRAY_LEN(arr); ++i)
+            {
+                if (!checkEndpoint(RARRAY_AREF(arr, i)))
+                {
+                    throw RubyException(rb_eTypeError, "array element is not an Ice::Endpoint");
+                }
+                Ice::EndpointPtr* e = reinterpret_cast<Ice::EndpointPtr*>(DATA_PTR(RARRAY_AREF(arr, i)));
+                assert(e);
+                endpoints.push_back(*e);
+            }
+        }
+        return createProxy(p->ice_endpoints(endpoints), rb_class_of(self));
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_getLocatorCacheTimeout(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        chrono::seconds timeout = chrono::duration_cast<chrono::seconds>(p->ice_getLocatorCacheTimeout());
+        return INT2FIX(static_cast<int32_t>(timeout.count()));
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_getInvocationTimeout(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        chrono::milliseconds timeout = p->ice_getInvocationTimeout();
+        return INT2FIX(static_cast<int32_t>(timeout.count()));
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_getConnectionId(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        string connectionId = p->ice_getConnectionId();
+        return createString(connectionId);
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_locatorCacheTimeout(VALUE self, VALUE timeout)
+{
+    ICE_RUBY_TRY
+    {
+        try
+        {
+            Ice::ObjectPrx p = getProxy(self);
+            long t = getInteger(timeout);
+            return createProxy(p->ice_locatorCacheTimeout(static_cast<int32_t>(t)), rb_class_of(self));
+        }
+        catch (const invalid_argument& ex)
+        {
+            throw RubyException(rb_eArgError, ex.what());
+        }
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_invocationTimeout(VALUE self, VALUE timeout)
+{
+    ICE_RUBY_TRY
+    {
+        try
+        {
+            Ice::ObjectPrx p = getProxy(self);
+            long t = getInteger(timeout);
+            return createProxy(p->ice_invocationTimeout(static_cast<int32_t>(t)), rb_class_of(self));
+        }
+        catch (const invalid_argument& ex)
+        {
+            throw RubyException(rb_eArgError, ex.what());
+        }
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_isConnectionCached(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        return p->ice_isConnectionCached() ? Qtrue : Qfalse;
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_connectionCached(VALUE self, VALUE b)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        return createProxy(p->ice_connectionCached(RTEST(b)), rb_class_of(self));
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_getEndpointSelection(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+
+        Ice::EndpointSelectionType type = p->ice_getEndpointSelection();
+        volatile VALUE cls = callRuby(rb_path2class, "Ice::EndpointSelectionType");
+        assert(!NIL_P(cls));
+        return callRuby(rb_funcall, cls, rb_intern("from_int"), 1, INT2NUM(static_cast<int>(type)));
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_endpointSelection(VALUE self, VALUE type)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+
+        volatile VALUE cls = callRuby(rb_path2class, "Ice::EndpointSelectionType");
+        assert(!NIL_P(cls));
+        if (callRuby(rb_obj_is_instance_of, type, cls) == Qfalse)
+        {
+            throw RubyException(rb_eTypeError, "argument must be an Ice::EndpointSelectionType enumerator");
+        }
+
+        volatile VALUE val = callRuby(rb_funcall, type, rb_intern("to_i"), 0);
+        Ice::EndpointSelectionType t = static_cast<Ice::EndpointSelectionType>(getInteger(val));
+        return createProxy(p->ice_endpointSelection(t), rb_class_of(self));
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_getEncodingVersion(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        return createEncodingVersion(p->ice_getEncodingVersion());
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_encodingVersion(VALUE self, VALUE v)
+{
+    Ice::EncodingVersion val;
+    if (getEncodingVersion(v, val))
+    {
+        ICE_RUBY_TRY
+        {
+            Ice::ObjectPrx p = getProxy(self);
+            return createProxy(p->ice_encodingVersion(val), rb_class_of(self));
+        }
+        ICE_RUBY_CATCH
+    }
+
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_getRouter(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+
+        optional<Ice::RouterPrx> router = p->ice_getRouter();
+        if (router)
+        {
+            volatile VALUE cls = callRuby(rb_path2class, "Ice::RouterPrx");
+            assert(!NIL_P(cls));
+            return createProxy(router.value(), cls);
+        }
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_router(VALUE self, VALUE router)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+
+        optional<Ice::RouterPrx> proxy;
+        if (!NIL_P(router))
+        {
+            if (!checkProxy(router))
+            {
+                throw RubyException(rb_eTypeError, "argument must be a proxy");
+            }
+            proxy = Ice::uncheckedCast<Ice::RouterPrx>(getProxy(router));
+        }
+        return createProxy(p->ice_router(proxy), rb_class_of(self));
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_getLocator(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+
+        optional<Ice::LocatorPrx> locator = p->ice_getLocator();
+        if (locator)
+        {
+            volatile VALUE cls = callRuby(rb_path2class, "Ice::LocatorPrx");
+            assert(!NIL_P(cls));
+            return createProxy(locator.value(), cls);
+        }
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_locator(VALUE self, VALUE locator)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+
+        optional<Ice::LocatorPrx> proxy;
+        if (!NIL_P(locator))
+        {
+            if (!checkProxy(locator))
+            {
+                throw RubyException(rb_eTypeError, "argument must be a proxy");
+            }
+            proxy = Ice::uncheckedCast<Ice::LocatorPrx>(getProxy(locator));
+        }
+        return createProxy(p->ice_locator(proxy), rb_class_of(self));
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_twoway(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        return createProxy(p->ice_twoway(), rb_class_of(self));
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_isTwoway(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        return p->ice_isTwoway() ? Qtrue : Qfalse;
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_oneway(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        return createProxy(p->ice_oneway(), rb_class_of(self));
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_isOneway(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        return p->ice_isOneway() ? Qtrue : Qfalse;
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_batchOneway(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        return createProxy(p->ice_batchOneway(), rb_class_of(self));
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_isBatchOneway(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        return p->ice_isBatchOneway() ? Qtrue : Qfalse;
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_datagram(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        return createProxy(p->ice_datagram(), rb_class_of(self));
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_isDatagram(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        return p->ice_isDatagram() ? Qtrue : Qfalse;
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_batchDatagram(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        return createProxy(p->ice_batchDatagram(), rb_class_of(self));
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_isBatchDatagram(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        return p->ice_isBatchDatagram() ? Qtrue : Qfalse;
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_compress(VALUE self, VALUE b)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        return createProxy(p->ice_compress(RTEST(b)), rb_class_of(self));
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_getCompress(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        optional<bool> c = p->ice_getCompress();
+        if (c)
+        {
+            return *c ? Qtrue : Qfalse;
+        }
+        else
+        {
+            return Qnil;
+        }
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_connectionId(VALUE self, VALUE id)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        string idstr = getString(id);
+        return createProxy(p->ice_connectionId(idstr), rb_class_of(self));
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_fixed(VALUE self, VALUE con)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+
+        Ice::ConnectionPtr connection;
+        if (!NIL_P(con))
+        {
+            if (!checkConnection(con))
+            {
+                throw RubyException(rb_eTypeError, "argument must be an Ice.Connection");
+            }
+            connection = getConnection(con);
+        }
+        return createProxy(p->ice_fixed(connection), rb_class_of(self));
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_isFixed(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        return p->ice_isFixed() ? Qtrue : Qfalse;
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_getConnection(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        Ice::ConnectionPtr conn = p->ice_getConnection();
+        return createConnection(conn);
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_getCachedConnection(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        Ice::ConnectionPtr conn = p->ice_getCachedConnection();
+        if (conn)
+        {
+            return createConnection(conn);
+        }
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_ice_flushBatchRequests(VALUE self)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx p = getProxy(self);
+        p->ice_flushBatchRequests();
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_cmp(VALUE self, VALUE other)
+{
+    ICE_RUBY_TRY
+    {
+        if (NIL_P(other))
+        {
+            return INT2NUM(1);
+        }
+        if (!checkProxy(other))
+        {
+            throw RubyException(rb_eTypeError, "argument must be a proxy");
+        }
+        Ice::ObjectPrx p1 = getProxy(self);
+        Ice::ObjectPrx p2 = getProxy(other);
+        if (p1 < p2)
+        {
+            return INT2NUM(-1);
+        }
+        else if (p1 == p2)
+        {
+            return INT2NUM(0);
+        }
+        else
+        {
+            return INT2NUM(1);
+        }
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_equals(VALUE self, VALUE other)
+{
+    return IceRuby_ObjectPrx_cmp(self, other) == INT2NUM(0) ? Qtrue : Qfalse;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_new(VALUE self, VALUE communicator, VALUE proxyString)
+{
+    ICE_RUBY_TRY
+    {
+        Ice::ObjectPrx proxy{getCommunicator(communicator), getString(proxyString)};
+        return createProxy(proxy, self);
+    }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+extern "C" VALUE
+IceRuby_ObjectPrx_create(VALUE self, VALUE proxy)
+{
+    ICE_RUBY_TRY { return createProxy(getProxy(proxy), self); }
+    ICE_RUBY_CATCH
+    return Qnil;
+}
+
+void
+IceRuby::initProxy(VALUE iceModule)
+{
+    //
+    // ObjectPrx.
+    //
+    _proxyClass = rb_define_class_under(iceModule, "ObjectPrx", rb_cObject);
+    rb_undef_alloc_func(_proxyClass);
+
+    //
+    // Instance methods.
+    //
+    rb_define_method(_proxyClass, "ice_getCommunicator", CAST_METHOD(IceRuby_ObjectPrx_ice_getCommunicator), 0);
+    rb_define_method(_proxyClass, "ice_toString", CAST_METHOD(IceRuby_ObjectPrx_ice_toString), 0);
+    rb_define_method(_proxyClass, "ice_getIdentity", CAST_METHOD(IceRuby_ObjectPrx_ice_getIdentity), 0);
+    rb_define_method(_proxyClass, "ice_identity", CAST_METHOD(IceRuby_ObjectPrx_ice_identity), -2);
+    rb_define_method(_proxyClass, "ice_getContext", CAST_METHOD(IceRuby_ObjectPrx_ice_getContext), 0);
+    rb_define_method(_proxyClass, "ice_context", CAST_METHOD(IceRuby_ObjectPrx_ice_context), 1);
+    rb_define_method(_proxyClass, "ice_getFacet", CAST_METHOD(IceRuby_ObjectPrx_ice_getFacet), 0);
+    rb_define_method(_proxyClass, "ice_facet", CAST_METHOD(IceRuby_ObjectPrx_ice_facet), -2);
+    rb_define_method(_proxyClass, "ice_getAdapterId", CAST_METHOD(IceRuby_ObjectPrx_ice_getAdapterId), 0);
+    rb_define_method(_proxyClass, "ice_adapterId", CAST_METHOD(IceRuby_ObjectPrx_ice_adapterId), 1);
+    rb_define_method(_proxyClass, "ice_getEndpoints", CAST_METHOD(IceRuby_ObjectPrx_ice_getEndpoints), 0);
+    rb_define_method(_proxyClass, "ice_endpoints", CAST_METHOD(IceRuby_ObjectPrx_ice_endpoints), 1);
+    rb_define_method(
+        _proxyClass,
+        "ice_getLocatorCacheTimeout",
+        CAST_METHOD(IceRuby_ObjectPrx_ice_getLocatorCacheTimeout),
+        0);
+    rb_define_method(
+        _proxyClass,
+        "ice_getInvocationTimeout",
+        CAST_METHOD(IceRuby_ObjectPrx_ice_getInvocationTimeout),
+        0);
+    rb_define_method(_proxyClass, "ice_getConnectionId", CAST_METHOD(IceRuby_ObjectPrx_ice_getConnectionId), 0);
+    rb_define_method(_proxyClass, "ice_locatorCacheTimeout", CAST_METHOD(IceRuby_ObjectPrx_ice_locatorCacheTimeout), 1);
+    rb_define_method(_proxyClass, "ice_invocationTimeout", CAST_METHOD(IceRuby_ObjectPrx_ice_invocationTimeout), 1);
+    rb_define_method(_proxyClass, "ice_isConnectionCached", CAST_METHOD(IceRuby_ObjectPrx_ice_isConnectionCached), 0);
+    rb_define_method(_proxyClass, "ice_connectionCached", CAST_METHOD(IceRuby_ObjectPrx_ice_connectionCached), 1);
+    rb_define_method(
+        _proxyClass,
+        "ice_getEndpointSelection",
+        CAST_METHOD(IceRuby_ObjectPrx_ice_getEndpointSelection),
+        0);
+    rb_define_method(_proxyClass, "ice_endpointSelection", CAST_METHOD(IceRuby_ObjectPrx_ice_endpointSelection), 1);
+    rb_define_method(_proxyClass, "ice_getEncodingVersion", CAST_METHOD(IceRuby_ObjectPrx_ice_getEncodingVersion), 0);
+    rb_define_method(_proxyClass, "ice_encodingVersion", CAST_METHOD(IceRuby_ObjectPrx_ice_encodingVersion), 1);
+    rb_define_method(_proxyClass, "ice_getRouter", CAST_METHOD(IceRuby_ObjectPrx_ice_getRouter), 0);
+    rb_define_method(_proxyClass, "ice_router", CAST_METHOD(IceRuby_ObjectPrx_ice_router), 1);
+    rb_define_method(_proxyClass, "ice_getLocator", CAST_METHOD(IceRuby_ObjectPrx_ice_getLocator), 0);
+    rb_define_method(_proxyClass, "ice_locator", CAST_METHOD(IceRuby_ObjectPrx_ice_locator), 1);
+    rb_define_method(_proxyClass, "ice_twoway", CAST_METHOD(IceRuby_ObjectPrx_ice_twoway), 0);
+    rb_define_method(_proxyClass, "ice_isTwoway", CAST_METHOD(IceRuby_ObjectPrx_ice_isTwoway), 0);
+    rb_define_method(_proxyClass, "ice_oneway", CAST_METHOD(IceRuby_ObjectPrx_ice_oneway), 0);
+    rb_define_method(_proxyClass, "ice_isOneway", CAST_METHOD(IceRuby_ObjectPrx_ice_isOneway), 0);
+    rb_define_method(_proxyClass, "ice_batchOneway", CAST_METHOD(IceRuby_ObjectPrx_ice_batchOneway), 0);
+    rb_define_method(_proxyClass, "ice_isBatchOneway", CAST_METHOD(IceRuby_ObjectPrx_ice_isBatchOneway), 0);
+    rb_define_method(_proxyClass, "ice_datagram", CAST_METHOD(IceRuby_ObjectPrx_ice_datagram), 0);
+    rb_define_method(_proxyClass, "ice_isDatagram", CAST_METHOD(IceRuby_ObjectPrx_ice_isDatagram), 0);
+    rb_define_method(_proxyClass, "ice_batchDatagram", CAST_METHOD(IceRuby_ObjectPrx_ice_batchDatagram), 0);
+    rb_define_method(_proxyClass, "ice_isBatchDatagram", CAST_METHOD(IceRuby_ObjectPrx_ice_isBatchDatagram), 0);
+    rb_define_method(_proxyClass, "ice_compress", CAST_METHOD(IceRuby_ObjectPrx_ice_compress), 1);
+    rb_define_method(_proxyClass, "ice_getCompress", CAST_METHOD(IceRuby_ObjectPrx_ice_getCompress), 0);
+    rb_define_method(_proxyClass, "ice_connectionId", CAST_METHOD(IceRuby_ObjectPrx_ice_connectionId), 1);
+    rb_define_method(_proxyClass, "ice_fixed", CAST_METHOD(IceRuby_ObjectPrx_ice_fixed), 1);
+    rb_define_method(_proxyClass, "ice_isFixed", CAST_METHOD(IceRuby_ObjectPrx_ice_isFixed), 0);
+    rb_define_method(_proxyClass, "ice_getConnection", CAST_METHOD(IceRuby_ObjectPrx_ice_getConnection), 0);
+    rb_define_method(_proxyClass, "ice_getCachedConnection", CAST_METHOD(IceRuby_ObjectPrx_ice_getCachedConnection), 0);
+    rb_define_method(_proxyClass, "ice_flushBatchRequests", CAST_METHOD(IceRuby_ObjectPrx_ice_flushBatchRequests), 0);
+
+    rb_define_method(_proxyClass, "hash", CAST_METHOD(IceRuby_ObjectPrx_hash), 0);
+    rb_define_method(_proxyClass, "to_s", CAST_METHOD(IceRuby_ObjectPrx_ice_toString), 0);
+    rb_define_method(_proxyClass, "inspect", CAST_METHOD(IceRuby_ObjectPrx_ice_toString), 0);
+    rb_define_method(_proxyClass, "<=>", CAST_METHOD(IceRuby_ObjectPrx_cmp), 1);
+    rb_define_method(_proxyClass, "==", CAST_METHOD(IceRuby_ObjectPrx_equals), 1);
+    rb_define_method(_proxyClass, "eql?", CAST_METHOD(IceRuby_ObjectPrx_equals), 1);
+
+    //
+    // Static methods.
+    //
+    rb_define_singleton_method(_proxyClass, "new", CAST_METHOD(IceRuby_ObjectPrx_new), 2);
+    rb_define_singleton_method(_proxyClass, "create", CAST_METHOD(IceRuby_ObjectPrx_create), 1);
+}
+
+VALUE
+IceRuby::createProxy(Ice::ObjectPrx p, VALUE cls)
+{
+    // If cls is nil then the proxy has the base type Ice::ObjectPrx.
+    return TypedData_Wrap_Struct(
+        NIL_P(cls) ? _proxyClass : cls,
+        &IceRuby_ObjectPrxType,
+        new Ice::ObjectPrx(std::move(p)));
+}
+
+Ice::ObjectPrx
+IceRuby::getProxy(VALUE v)
+{
+    return *static_cast<Ice::ObjectPrx*>(DATA_PTR(v));
+}
+
+bool
+IceRuby::checkProxy(VALUE v)
+{
+    return callRuby(rb_obj_is_kind_of, v, _proxyClass) == Qtrue;
+}