Index: third_party/protobuf/ruby/ext/google/protobuf_c/map.c |
diff --git a/third_party/protobuf/ruby/ext/google/protobuf_c/map.c b/third_party/protobuf/ruby/ext/google/protobuf_c/map.c |
new file mode 100644 |
index 0000000000000000000000000000000000000000..92fc728666e933793a76cbe1a1437528dfe475a5 |
--- /dev/null |
+++ b/third_party/protobuf/ruby/ext/google/protobuf_c/map.c |
@@ -0,0 +1,808 @@ |
+// Protocol Buffers - Google's data interchange format |
+// Copyright 2014 Google Inc. All rights reserved. |
+// https://developers.google.com/protocol-buffers/ |
+// |
+// Redistribution and use in source and binary forms, with or without |
+// modification, are permitted provided that the following conditions are |
+// met: |
+// |
+// * Redistributions of source code must retain the above copyright |
+// notice, this list of conditions and the following disclaimer. |
+// * Redistributions in binary form must reproduce the above |
+// copyright notice, this list of conditions and the following disclaimer |
+// in the documentation and/or other materials provided with the |
+// distribution. |
+// * Neither the name of Google Inc. nor the names of its |
+// contributors may be used to endorse or promote products derived from |
+// this software without specific prior written permission. |
+// |
+// THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS |
+// "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT |
+// LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR |
+// A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT |
+// OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, |
+// SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT |
+// LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
+// DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
+// THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
+// (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE |
+// OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
+ |
+#include "protobuf.h" |
+ |
+// ----------------------------------------------------------------------------- |
+// Basic map operations on top of upb's strtable. |
+// |
+// Note that we roll our own `Map` container here because, as for |
+// `RepeatedField`, we want a strongly-typed container. This is so that any user |
+// errors due to incorrect map key or value types are raised as close as |
+// possible to the error site, rather than at some deferred point (e.g., |
+// serialization). |
+// |
+// We build our `Map` on top of upb_strtable so that we're able to take |
+// advantage of the native_slot storage abstraction, as RepeatedField does. |
+// (This is not quite a perfect mapping -- see the key conversions below -- but |
+// gives us full support and error-checking for all value types for free.) |
+// ----------------------------------------------------------------------------- |
+ |
+// Map values are stored using the native_slot abstraction (as with repeated |
+// field values), but keys are a bit special. Since we use a strtable, we need |
+// to store keys as sequences of bytes such that equality of those bytes maps |
+// one-to-one to equality of keys. We store strings directly (i.e., they map to |
+// their own bytes) and integers as native integers (using the native_slot |
+// abstraction). |
+ |
+// Note that there is another tradeoff here in keeping string keys as native |
+// strings rather than Ruby strings: traversing the Map requires conversion to |
+// Ruby string values on every traversal, potentially creating more garbage. We |
+// should consider ways to cache a Ruby version of the key if this becomes an |
+// issue later. |
+ |
+// Forms a key to use with the underlying strtable from a Ruby key value. |buf| |
+// must point to TABLE_KEY_BUF_LENGTH bytes of temporary space, used to |
+// construct a key byte sequence if needed. |out_key| and |out_length| provide |
+// the resulting key data/length. |
+#define TABLE_KEY_BUF_LENGTH 8 // sizeof(uint64_t) |
+static void table_key(Map* self, VALUE key, |
+ char* buf, |
+ const char** out_key, |
+ size_t* out_length) { |
+ switch (self->key_type) { |
+ case UPB_TYPE_BYTES: |
+ case UPB_TYPE_STRING: |
+ // Strings: use string content directly. |
+ Check_Type(key, T_STRING); |
+ native_slot_validate_string_encoding(self->key_type, key); |
+ *out_key = RSTRING_PTR(key); |
+ *out_length = RSTRING_LEN(key); |
+ break; |
+ |
+ case UPB_TYPE_BOOL: |
+ case UPB_TYPE_INT32: |
+ case UPB_TYPE_INT64: |
+ case UPB_TYPE_UINT32: |
+ case UPB_TYPE_UINT64: |
+ native_slot_set(self->key_type, Qnil, buf, key); |
+ *out_key = buf; |
+ *out_length = native_slot_size(self->key_type); |
+ break; |
+ |
+ default: |
+ // Map constructor should not allow a Map with another key type to be |
+ // constructed. |
+ assert(false); |
+ break; |
+ } |
+} |
+ |
+static VALUE table_key_to_ruby(Map* self, const char* buf, size_t length) { |
+ switch (self->key_type) { |
+ case UPB_TYPE_BYTES: |
+ case UPB_TYPE_STRING: { |
+ VALUE ret = rb_str_new(buf, length); |
+ rb_enc_associate(ret, |
+ (self->key_type == UPB_TYPE_BYTES) ? |
+ kRubyString8bitEncoding : kRubyStringUtf8Encoding); |
+ return ret; |
+ } |
+ |
+ case UPB_TYPE_BOOL: |
+ case UPB_TYPE_INT32: |
+ case UPB_TYPE_INT64: |
+ case UPB_TYPE_UINT32: |
+ case UPB_TYPE_UINT64: |
+ return native_slot_get(self->key_type, Qnil, buf); |
+ |
+ default: |
+ assert(false); |
+ return Qnil; |
+ } |
+} |
+ |
+static void* value_memory(upb_value* v) { |
+ return (void*)(&v->val); |
+} |
+ |
+// ----------------------------------------------------------------------------- |
+// Map container type. |
+// ----------------------------------------------------------------------------- |
+ |
+const rb_data_type_t Map_type = { |
+ "Google::Protobuf::Map", |
+ { Map_mark, Map_free, NULL }, |
+}; |
+ |
+VALUE cMap; |
+ |
+Map* ruby_to_Map(VALUE _self) { |
+ Map* self; |
+ TypedData_Get_Struct(_self, Map, &Map_type, self); |
+ return self; |
+} |
+ |
+void Map_mark(void* _self) { |
+ Map* self = _self; |
+ |
+ rb_gc_mark(self->value_type_class); |
+ |
+ if (self->value_type == UPB_TYPE_STRING || |
+ self->value_type == UPB_TYPE_BYTES || |
+ self->value_type == UPB_TYPE_MESSAGE) { |
+ upb_strtable_iter it; |
+ for (upb_strtable_begin(&it, &self->table); |
+ !upb_strtable_done(&it); |
+ upb_strtable_next(&it)) { |
+ upb_value v = upb_strtable_iter_value(&it); |
+ void* mem = value_memory(&v); |
+ native_slot_mark(self->value_type, mem); |
+ } |
+ } |
+} |
+ |
+void Map_free(void* _self) { |
+ Map* self = _self; |
+ upb_strtable_uninit(&self->table); |
+ xfree(self); |
+} |
+ |
+VALUE Map_alloc(VALUE klass) { |
+ Map* self = ALLOC(Map); |
+ memset(self, 0, sizeof(Map)); |
+ self->value_type_class = Qnil; |
+ return TypedData_Wrap_Struct(klass, &Map_type, self); |
+} |
+ |
+static bool needs_typeclass(upb_fieldtype_t type) { |
+ switch (type) { |
+ case UPB_TYPE_MESSAGE: |
+ case UPB_TYPE_ENUM: |
+ return true; |
+ default: |
+ return false; |
+ } |
+} |
+ |
+/* |
+ * call-seq: |
+ * Map.new(key_type, value_type, value_typeclass = nil, init_hashmap = {}) |
+ * => new map |
+ * |
+ * Allocates a new Map container. This constructor may be called with 2, 3, or 4 |
+ * arguments. The first two arguments are always present and are symbols (taking |
+ * on the same values as field-type symbols in message descriptors) that |
+ * indicate the type of the map key and value fields. |
+ * |
+ * The supported key types are: :int32, :int64, :uint32, :uint64, :bool, |
+ * :string, :bytes. |
+ * |
+ * The supported value types are: :int32, :int64, :uint32, :uint64, :bool, |
+ * :string, :bytes, :enum, :message. |
+ * |
+ * The third argument, value_typeclass, must be present if value_type is :enum |
+ * or :message. As in RepeatedField#new, this argument must be a message class |
+ * (for :message) or enum module (for :enum). |
+ * |
+ * The last argument, if present, provides initial content for map. Note that |
+ * this may be an ordinary Ruby hashmap or another Map instance with identical |
+ * key and value types. Also note that this argument may be present whether or |
+ * not value_typeclass is present (and it is unambiguously separate from |
+ * value_typeclass because value_typeclass's presence is strictly determined by |
+ * value_type). The contents of this initial hashmap or Map instance are |
+ * shallow-copied into the new Map: the original map is unmodified, but |
+ * references to underlying objects will be shared if the value type is a |
+ * message type. |
+ */ |
+VALUE Map_init(int argc, VALUE* argv, VALUE _self) { |
+ Map* self = ruby_to_Map(_self); |
+ int init_value_arg; |
+ |
+ // We take either two args (:key_type, :value_type), three args (:key_type, |
+ // :value_type, "ValueMessageType"), or four args (the above plus an initial |
+ // hashmap). |
+ if (argc < 2 || argc > 4) { |
+ rb_raise(rb_eArgError, "Map constructor expects 2, 3 or 4 arguments."); |
+ } |
+ |
+ self->key_type = ruby_to_fieldtype(argv[0]); |
+ self->value_type = ruby_to_fieldtype(argv[1]); |
+ |
+ // Check that the key type is an allowed type. |
+ switch (self->key_type) { |
+ case UPB_TYPE_INT32: |
+ case UPB_TYPE_INT64: |
+ case UPB_TYPE_UINT32: |
+ case UPB_TYPE_UINT64: |
+ case UPB_TYPE_BOOL: |
+ case UPB_TYPE_STRING: |
+ case UPB_TYPE_BYTES: |
+ // These are OK. |
+ break; |
+ default: |
+ rb_raise(rb_eArgError, "Invalid key type for map."); |
+ } |
+ |
+ init_value_arg = 2; |
+ if (needs_typeclass(self->value_type) && argc > 2) { |
+ self->value_type_class = argv[2]; |
+ validate_type_class(self->value_type, self->value_type_class); |
+ init_value_arg = 3; |
+ } |
+ |
+ // Table value type is always UINT64: this ensures enough space to store the |
+ // native_slot value. |
+ if (!upb_strtable_init(&self->table, UPB_CTYPE_UINT64)) { |
+ rb_raise(rb_eRuntimeError, "Could not allocate table."); |
+ } |
+ |
+ if (argc > init_value_arg) { |
+ Map_merge_into_self(_self, argv[init_value_arg]); |
+ } |
+ |
+ return Qnil; |
+} |
+ |
+/* |
+ * call-seq: |
+ * Map.each(&block) |
+ * |
+ * Invokes &block on each |key, value| pair in the map, in unspecified order. |
+ * Note that Map also includes Enumerable; map thus acts like a normal Ruby |
+ * sequence. |
+ */ |
+VALUE Map_each(VALUE _self) { |
+ Map* self = ruby_to_Map(_self); |
+ |
+ upb_strtable_iter it; |
+ for (upb_strtable_begin(&it, &self->table); |
+ !upb_strtable_done(&it); |
+ upb_strtable_next(&it)) { |
+ |
+ VALUE key = table_key_to_ruby( |
+ self, upb_strtable_iter_key(&it), upb_strtable_iter_keylength(&it)); |
+ |
+ upb_value v = upb_strtable_iter_value(&it); |
+ void* mem = value_memory(&v); |
+ VALUE value = native_slot_get(self->value_type, |
+ self->value_type_class, |
+ mem); |
+ |
+ rb_yield_values(2, key, value); |
+ } |
+ |
+ return Qnil; |
+} |
+ |
+/* |
+ * call-seq: |
+ * Map.keys => [list_of_keys] |
+ * |
+ * Returns the list of keys contained in the map, in unspecified order. |
+ */ |
+VALUE Map_keys(VALUE _self) { |
+ Map* self = ruby_to_Map(_self); |
+ |
+ VALUE ret = rb_ary_new(); |
+ upb_strtable_iter it; |
+ for (upb_strtable_begin(&it, &self->table); |
+ !upb_strtable_done(&it); |
+ upb_strtable_next(&it)) { |
+ |
+ VALUE key = table_key_to_ruby( |
+ self, upb_strtable_iter_key(&it), upb_strtable_iter_keylength(&it)); |
+ |
+ rb_ary_push(ret, key); |
+ } |
+ |
+ return ret; |
+} |
+ |
+/* |
+ * call-seq: |
+ * Map.values => [list_of_values] |
+ * |
+ * Returns the list of values contained in the map, in unspecified order. |
+ */ |
+VALUE Map_values(VALUE _self) { |
+ Map* self = ruby_to_Map(_self); |
+ |
+ VALUE ret = rb_ary_new(); |
+ upb_strtable_iter it; |
+ for (upb_strtable_begin(&it, &self->table); |
+ !upb_strtable_done(&it); |
+ upb_strtable_next(&it)) { |
+ |
+ upb_value v = upb_strtable_iter_value(&it); |
+ void* mem = value_memory(&v); |
+ VALUE value = native_slot_get(self->value_type, |
+ self->value_type_class, |
+ mem); |
+ |
+ rb_ary_push(ret, value); |
+ } |
+ |
+ return ret; |
+} |
+ |
+/* |
+ * call-seq: |
+ * Map.[](key) => value |
+ * |
+ * Accesses the element at the given key. Throws an exception if the key type is |
+ * incorrect. Returns nil when the key is not present in the map. |
+ */ |
+VALUE Map_index(VALUE _self, VALUE key) { |
+ Map* self = ruby_to_Map(_self); |
+ |
+ char keybuf[TABLE_KEY_BUF_LENGTH]; |
+ const char* keyval = NULL; |
+ size_t length = 0; |
+ upb_value v; |
+ table_key(self, key, keybuf, &keyval, &length); |
+ |
+ if (upb_strtable_lookup2(&self->table, keyval, length, &v)) { |
+ void* mem = value_memory(&v); |
+ return native_slot_get(self->value_type, self->value_type_class, mem); |
+ } else { |
+ return Qnil; |
+ } |
+} |
+ |
+/* |
+ * call-seq: |
+ * Map.[]=(key, value) => value |
+ * |
+ * Inserts or overwrites the value at the given key with the given new value. |
+ * Throws an exception if the key type is incorrect. Returns the new value that |
+ * was just inserted. |
+ */ |
+VALUE Map_index_set(VALUE _self, VALUE key, VALUE value) { |
+ Map* self = ruby_to_Map(_self); |
+ |
+ char keybuf[TABLE_KEY_BUF_LENGTH]; |
+ const char* keyval = NULL; |
+ size_t length = 0; |
+ upb_value v; |
+ void* mem; |
+ table_key(self, key, keybuf, &keyval, &length); |
+ |
+ mem = value_memory(&v); |
+ native_slot_set(self->value_type, self->value_type_class, mem, value); |
+ |
+ // Replace any existing value by issuing a 'remove' operation first. |
+ upb_strtable_remove2(&self->table, keyval, length, NULL); |
+ if (!upb_strtable_insert2(&self->table, keyval, length, v)) { |
+ rb_raise(rb_eRuntimeError, "Could not insert into table"); |
+ } |
+ |
+ // Ruby hashmap's :[]= method also returns the inserted value. |
+ return value; |
+} |
+ |
+/* |
+ * call-seq: |
+ * Map.has_key?(key) => bool |
+ * |
+ * Returns true if the given key is present in the map. Throws an exception if |
+ * the key has the wrong type. |
+ */ |
+VALUE Map_has_key(VALUE _self, VALUE key) { |
+ Map* self = ruby_to_Map(_self); |
+ |
+ char keybuf[TABLE_KEY_BUF_LENGTH]; |
+ const char* keyval = NULL; |
+ size_t length = 0; |
+ table_key(self, key, keybuf, &keyval, &length); |
+ |
+ if (upb_strtable_lookup2(&self->table, keyval, length, NULL)) { |
+ return Qtrue; |
+ } else { |
+ return Qfalse; |
+ } |
+} |
+ |
+/* |
+ * call-seq: |
+ * Map.delete(key) => old_value |
+ * |
+ * Deletes the value at the given key, if any, returning either the old value or |
+ * nil if none was present. Throws an exception if the key is of the wrong type. |
+ */ |
+VALUE Map_delete(VALUE _self, VALUE key) { |
+ Map* self = ruby_to_Map(_self); |
+ |
+ char keybuf[TABLE_KEY_BUF_LENGTH]; |
+ const char* keyval = NULL; |
+ size_t length = 0; |
+ upb_value v; |
+ table_key(self, key, keybuf, &keyval, &length); |
+ |
+ if (upb_strtable_remove2(&self->table, keyval, length, &v)) { |
+ void* mem = value_memory(&v); |
+ return native_slot_get(self->value_type, self->value_type_class, mem); |
+ } else { |
+ return Qnil; |
+ } |
+} |
+ |
+/* |
+ * call-seq: |
+ * Map.clear |
+ * |
+ * Removes all entries from the map. |
+ */ |
+VALUE Map_clear(VALUE _self) { |
+ Map* self = ruby_to_Map(_self); |
+ |
+ // Uninit and reinit the table -- this is faster than iterating and doing a |
+ // delete-lookup on each key. |
+ upb_strtable_uninit(&self->table); |
+ if (!upb_strtable_init(&self->table, UPB_CTYPE_INT64)) { |
+ rb_raise(rb_eRuntimeError, "Unable to re-initialize table"); |
+ } |
+ return Qnil; |
+} |
+ |
+/* |
+ * call-seq: |
+ * Map.length |
+ * |
+ * Returns the number of entries (key-value pairs) in the map. |
+ */ |
+VALUE Map_length(VALUE _self) { |
+ Map* self = ruby_to_Map(_self); |
+ return ULL2NUM(upb_strtable_count(&self->table)); |
+} |
+ |
+static VALUE Map_new_this_type(VALUE _self) { |
+ Map* self = ruby_to_Map(_self); |
+ VALUE new_map = Qnil; |
+ VALUE key_type = fieldtype_to_ruby(self->key_type); |
+ VALUE value_type = fieldtype_to_ruby(self->value_type); |
+ if (self->value_type_class != Qnil) { |
+ new_map = rb_funcall(CLASS_OF(_self), rb_intern("new"), 3, |
+ key_type, value_type, self->value_type_class); |
+ } else { |
+ new_map = rb_funcall(CLASS_OF(_self), rb_intern("new"), 2, |
+ key_type, value_type); |
+ } |
+ return new_map; |
+} |
+ |
+/* |
+ * call-seq: |
+ * Map.dup => new_map |
+ * |
+ * Duplicates this map with a shallow copy. References to all non-primitive |
+ * element objects (e.g., submessages) are shared. |
+ */ |
+VALUE Map_dup(VALUE _self) { |
+ Map* self = ruby_to_Map(_self); |
+ VALUE new_map = Map_new_this_type(_self); |
+ Map* new_self = ruby_to_Map(new_map); |
+ |
+ upb_strtable_iter it; |
+ for (upb_strtable_begin(&it, &self->table); |
+ !upb_strtable_done(&it); |
+ upb_strtable_next(&it)) { |
+ |
+ upb_value v = upb_strtable_iter_value(&it); |
+ void* mem = value_memory(&v); |
+ upb_value dup; |
+ void* dup_mem = value_memory(&dup); |
+ native_slot_dup(self->value_type, dup_mem, mem); |
+ |
+ if (!upb_strtable_insert2(&new_self->table, |
+ upb_strtable_iter_key(&it), |
+ upb_strtable_iter_keylength(&it), |
+ dup)) { |
+ rb_raise(rb_eRuntimeError, "Error inserting value into new table"); |
+ } |
+ } |
+ |
+ return new_map; |
+} |
+ |
+// Used by Google::Protobuf.deep_copy but not exposed directly. |
+VALUE Map_deep_copy(VALUE _self) { |
+ Map* self = ruby_to_Map(_self); |
+ VALUE new_map = Map_new_this_type(_self); |
+ Map* new_self = ruby_to_Map(new_map); |
+ |
+ upb_strtable_iter it; |
+ for (upb_strtable_begin(&it, &self->table); |
+ !upb_strtable_done(&it); |
+ upb_strtable_next(&it)) { |
+ |
+ upb_value v = upb_strtable_iter_value(&it); |
+ void* mem = value_memory(&v); |
+ upb_value dup; |
+ void* dup_mem = value_memory(&dup); |
+ native_slot_deep_copy(self->value_type, dup_mem, mem); |
+ |
+ if (!upb_strtable_insert2(&new_self->table, |
+ upb_strtable_iter_key(&it), |
+ upb_strtable_iter_keylength(&it), |
+ dup)) { |
+ rb_raise(rb_eRuntimeError, "Error inserting value into new table"); |
+ } |
+ } |
+ |
+ return new_map; |
+} |
+ |
+/* |
+ * call-seq: |
+ * Map.==(other) => boolean |
+ * |
+ * Compares this map to another. Maps are equal if they have identical key sets, |
+ * and for each key, the values in both maps compare equal. Elements are |
+ * compared as per normal Ruby semantics, by calling their :== methods (or |
+ * performing a more efficient comparison for primitive types). |
+ * |
+ * Maps with dissimilar key types or value types/typeclasses are never equal, |
+ * even if value comparison (for example, between integers and floats) would |
+ * have otherwise indicated that every element has equal value. |
+ */ |
+VALUE Map_eq(VALUE _self, VALUE _other) { |
+ Map* self = ruby_to_Map(_self); |
+ Map* other; |
+ upb_strtable_iter it; |
+ |
+ // Allow comparisons to Ruby hashmaps by converting to a temporary Map |
+ // instance. Slow, but workable. |
+ if (TYPE(_other) == T_HASH) { |
+ VALUE other_map = Map_new_this_type(_self); |
+ Map_merge_into_self(other_map, _other); |
+ _other = other_map; |
+ } |
+ |
+ other = ruby_to_Map(_other); |
+ |
+ if (self == other) { |
+ return Qtrue; |
+ } |
+ if (self->key_type != other->key_type || |
+ self->value_type != other->value_type || |
+ self->value_type_class != other->value_type_class) { |
+ return Qfalse; |
+ } |
+ if (upb_strtable_count(&self->table) != upb_strtable_count(&other->table)) { |
+ return Qfalse; |
+ } |
+ |
+ // For each member of self, check that an equal member exists at the same key |
+ // in other. |
+ for (upb_strtable_begin(&it, &self->table); |
+ !upb_strtable_done(&it); |
+ upb_strtable_next(&it)) { |
+ |
+ upb_value v = upb_strtable_iter_value(&it); |
+ void* mem = value_memory(&v); |
+ upb_value other_v; |
+ void* other_mem = value_memory(&other_v); |
+ |
+ if (!upb_strtable_lookup2(&other->table, |
+ upb_strtable_iter_key(&it), |
+ upb_strtable_iter_keylength(&it), |
+ &other_v)) { |
+ // Not present in other map. |
+ return Qfalse; |
+ } |
+ |
+ if (!native_slot_eq(self->value_type, mem, other_mem)) { |
+ // Present, but value not equal. |
+ return Qfalse; |
+ } |
+ } |
+ |
+ return Qtrue; |
+} |
+ |
+/* |
+ * call-seq: |
+ * Map.hash => hash_value |
+ * |
+ * Returns a hash value based on this map's contents. |
+ */ |
+VALUE Map_hash(VALUE _self) { |
+ Map* self = ruby_to_Map(_self); |
+ |
+ st_index_t h = rb_hash_start(0); |
+ VALUE hash_sym = rb_intern("hash"); |
+ |
+ upb_strtable_iter it; |
+ for (upb_strtable_begin(&it, &self->table); |
+ !upb_strtable_done(&it); |
+ upb_strtable_next(&it)) { |
+ VALUE key = table_key_to_ruby( |
+ self, upb_strtable_iter_key(&it), upb_strtable_iter_keylength(&it)); |
+ |
+ upb_value v = upb_strtable_iter_value(&it); |
+ void* mem = value_memory(&v); |
+ VALUE value = native_slot_get(self->value_type, |
+ self->value_type_class, |
+ mem); |
+ |
+ h = rb_hash_uint(h, NUM2LONG(rb_funcall(key, hash_sym, 0))); |
+ h = rb_hash_uint(h, NUM2LONG(rb_funcall(value, hash_sym, 0))); |
+ } |
+ |
+ return INT2FIX(h); |
+} |
+ |
+/* |
+ * call-seq: |
+ * Map.inspect => string |
+ * |
+ * Returns a string representing this map's elements. It will be formatted as |
+ * "{key => value, key => value, ...}", with each key and value string |
+ * representation computed by its own #inspect method. |
+ */ |
+VALUE Map_inspect(VALUE _self) { |
+ Map* self = ruby_to_Map(_self); |
+ |
+ VALUE str = rb_str_new2("{"); |
+ |
+ bool first = true; |
+ VALUE inspect_sym = rb_intern("inspect"); |
+ |
+ upb_strtable_iter it; |
+ for (upb_strtable_begin(&it, &self->table); |
+ !upb_strtable_done(&it); |
+ upb_strtable_next(&it)) { |
+ VALUE key = table_key_to_ruby( |
+ self, upb_strtable_iter_key(&it), upb_strtable_iter_keylength(&it)); |
+ |
+ upb_value v = upb_strtable_iter_value(&it); |
+ void* mem = value_memory(&v); |
+ VALUE value = native_slot_get(self->value_type, |
+ self->value_type_class, |
+ mem); |
+ |
+ if (!first) { |
+ str = rb_str_cat2(str, ", "); |
+ } else { |
+ first = false; |
+ } |
+ str = rb_str_append(str, rb_funcall(key, inspect_sym, 0)); |
+ str = rb_str_cat2(str, "=>"); |
+ str = rb_str_append(str, rb_funcall(value, inspect_sym, 0)); |
+ } |
+ |
+ str = rb_str_cat2(str, "}"); |
+ return str; |
+} |
+ |
+/* |
+ * call-seq: |
+ * Map.merge(other_map) => map |
+ * |
+ * Copies key/value pairs from other_map into a copy of this map. If a key is |
+ * set in other_map and this map, the value from other_map overwrites the value |
+ * in the new copy of this map. Returns the new copy of this map with merged |
+ * contents. |
+ */ |
+VALUE Map_merge(VALUE _self, VALUE hashmap) { |
+ VALUE dupped = Map_dup(_self); |
+ return Map_merge_into_self(dupped, hashmap); |
+} |
+ |
+static int merge_into_self_callback(VALUE key, VALUE value, VALUE self) { |
+ Map_index_set(self, key, value); |
+ return ST_CONTINUE; |
+} |
+ |
+// Used only internally -- shared by #merge and #initialize. |
+VALUE Map_merge_into_self(VALUE _self, VALUE hashmap) { |
+ if (TYPE(hashmap) == T_HASH) { |
+ rb_hash_foreach(hashmap, merge_into_self_callback, _self); |
+ } else if (RB_TYPE_P(hashmap, T_DATA) && RTYPEDDATA_P(hashmap) && |
+ RTYPEDDATA_TYPE(hashmap) == &Map_type) { |
+ |
+ Map* self = ruby_to_Map(_self); |
+ Map* other = ruby_to_Map(hashmap); |
+ upb_strtable_iter it; |
+ |
+ if (self->key_type != other->key_type || |
+ self->value_type != other->value_type || |
+ self->value_type_class != other->value_type_class) { |
+ rb_raise(rb_eArgError, "Attempt to merge Map with mismatching types"); |
+ } |
+ |
+ for (upb_strtable_begin(&it, &other->table); |
+ !upb_strtable_done(&it); |
+ upb_strtable_next(&it)) { |
+ |
+ // Replace any existing value by issuing a 'remove' operation first. |
+ upb_value v; |
+ upb_value oldv; |
+ upb_strtable_remove2(&self->table, |
+ upb_strtable_iter_key(&it), |
+ upb_strtable_iter_keylength(&it), |
+ &oldv); |
+ |
+ v = upb_strtable_iter_value(&it); |
+ upb_strtable_insert2(&self->table, |
+ upb_strtable_iter_key(&it), |
+ upb_strtable_iter_keylength(&it), |
+ v); |
+ } |
+ } else { |
+ rb_raise(rb_eArgError, "Unknown type merging into Map"); |
+ } |
+ return _self; |
+} |
+ |
+// Internal method: map iterator initialization (used for serialization). |
+void Map_begin(VALUE _self, Map_iter* iter) { |
+ Map* self = ruby_to_Map(_self); |
+ iter->self = self; |
+ upb_strtable_begin(&iter->it, &self->table); |
+} |
+ |
+void Map_next(Map_iter* iter) { |
+ upb_strtable_next(&iter->it); |
+} |
+ |
+bool Map_done(Map_iter* iter) { |
+ return upb_strtable_done(&iter->it); |
+} |
+ |
+VALUE Map_iter_key(Map_iter* iter) { |
+ return table_key_to_ruby( |
+ iter->self, |
+ upb_strtable_iter_key(&iter->it), |
+ upb_strtable_iter_keylength(&iter->it)); |
+} |
+ |
+VALUE Map_iter_value(Map_iter* iter) { |
+ upb_value v = upb_strtable_iter_value(&iter->it); |
+ void* mem = value_memory(&v); |
+ return native_slot_get(iter->self->value_type, |
+ iter->self->value_type_class, |
+ mem); |
+} |
+ |
+void Map_register(VALUE module) { |
+ VALUE klass = rb_define_class_under(module, "Map", rb_cObject); |
+ rb_define_alloc_func(klass, Map_alloc); |
+ cMap = klass; |
+ rb_gc_register_address(&cMap); |
+ |
+ rb_define_method(klass, "initialize", Map_init, -1); |
+ rb_define_method(klass, "each", Map_each, 0); |
+ rb_define_method(klass, "keys", Map_keys, 0); |
+ rb_define_method(klass, "values", Map_values, 0); |
+ rb_define_method(klass, "[]", Map_index, 1); |
+ rb_define_method(klass, "[]=", Map_index_set, 2); |
+ rb_define_method(klass, "has_key?", Map_has_key, 1); |
+ rb_define_method(klass, "delete", Map_delete, 1); |
+ rb_define_method(klass, "clear", Map_clear, 0); |
+ rb_define_method(klass, "length", Map_length, 0); |
+ rb_define_method(klass, "dup", Map_dup, 0); |
+ rb_define_method(klass, "==", Map_eq, 1); |
+ rb_define_method(klass, "hash", Map_hash, 0); |
+ rb_define_method(klass, "inspect", Map_inspect, 0); |
+ rb_define_method(klass, "merge", Map_merge, 1); |
+ rb_include_module(klass, rb_mEnumerable); |
+} |