public static long TransformToNativeModel(this RubyFixnum self) { return(self.Value); }
/// <summary> /// static VALUE r_object0(struct load_arg *arg, int *ivp, VALUE extmod) /// </summary> /// <param name="hasivp"></param> /// <param name="ivp"></param> /// <param name="extmod"></param> /// <returns></returns> public object ReadObject0(bool hasivp, ref bool ivp, List <RubyModule> extmod) { object v = null; var type = ReadByte(); switch (type) { case RubyMarshal.Types.LINK: var id = ReadLong(); object link; if (!_m_objects.TryGetValue(id, out link)) { throw new InvalidDataException("dump format error (unlinked)"); } v = link; if (_m_proc != null) { v = _m_proc(v); } break; case RubyMarshal.Types.INSTANCE_VARIABLE: { var ivar = true; v = ReadObject0(ref ivar, extmod); var hasenc = false; if (ivar) { ReadInstanceVariable(v, ref hasenc); } } break; case RubyMarshal.Types.EXTENDED: { var m = RubyModule.GetModule(ReadUnique()); if (extmod == null) { extmod = new List <RubyModule>(); } extmod.Add(m); v = ReadObject0(extmod); if (v is RubyObject fobj) { fobj.ExtendModules.AddRange(extmod); } } break; case RubyMarshal.Types.USER_CLASS: { var c = RubyClass.GetClass(ReadUnique()); v = ReadObject0(extmod); if (v is RubyObject) { (v as RubyObject).ClassName = c.Symbol; } } break; case RubyMarshal.Types.NIL: v = RubyNil.Instance; v = Leave(v); break; case RubyMarshal.Types.TRUE: v = RubyBool.True; v = Leave(v); break; case RubyMarshal.Types.FALSE: v = RubyBool.False; v = Leave(v); break; case RubyMarshal.Types.FIXNUM: v = ReadLong(); v = new RubyFixnum(Convert.ToInt64(v)); v = Leave(v); break; case RubyMarshal.Types.FLOAT: { double d; var fstr = ReadString(); var str = fstr.Text; switch (str) { case "inf": d = double.PositiveInfinity; break; case "-inf": d = double.NegativeInfinity; break; case "nan": d = double.NaN; break; default: if (str.Contains("\0")) { str = str.Remove(str.IndexOf("\0", StringComparison.Ordinal)); } d = Convert.ToDouble(str); break; } v = new RubyFloat(d); v = Entry(v); v = Leave(v); } break; case RubyMarshal.Types.BIGNUM: { var sign = 0; switch (ReadByte()) { case 0x2b: sign = 1; break; case 0x2d: sign = -1; break; default: sign = 0; break; } var num3 = ReadLong(); var index = num3 / 2; var num5 = (num3 + 1) / 2; var data = new uint[num5]; for (var i = 0; i < index; i++) { data[i] = _m_reader.ReadUInt32(); } if (index != num5) { data[index] = _m_reader.ReadUInt16(); } v = new RubyBignum(sign, data); v = Entry(v); v = Leave(v); } break; case RubyMarshal.Types.STRING: v = Entry(ReadString()); v = Leave(v); break; case RubyMarshal.Types.REGEXP: { var str = ReadString(); var options = ReadByte(); var has_encoding = false; var idx = Prepare(); if (hasivp) { ReadInstanceVariable(str, ref has_encoding); ivp = false; } if (!has_encoding) { // TODO: 1.8 compatibility; remove escapes undefined in 1.8 /* * char *ptr = RSTRING_PTR(str), *dst = ptr, *src = ptr; * long len = RSTRING_LEN(str); * long bs = 0; * for (; len-- > 0; *dst++ = *src++) { * switch (*src) { * case '\\': bs++; break; * case 'g': case 'h': case 'i': case 'j': case 'k': case 'l': * case 'm': case 'o': case 'p': case 'q': case 'u': case 'y': * case 'E': case 'F': case 'H': case 'I': case 'J': case 'K': * case 'L': case 'N': case 'O': case 'P': case 'Q': case 'R': * case 'S': case 'T': case 'U': case 'V': case 'X': case 'Y': * if (bs & 1) --dst; * default: bs = 0; break; * } * } * rb_str_set_len(str, dst - ptr); */ } v = Entry0(new RubyRegexp(str, (RubyRegexpOptions)options), idx); v = Leave(v); } break; case RubyMarshal.Types.ARRAY: { var len = ReadLong(); var ary = new RubyArray(); v = ary; v = Entry(v); while (len-- > 0) { ary.Push(ReadObject()); } v = Leave(v); } break; case RubyMarshal.Types.HASH: case RubyMarshal.Types.HASH_WITH_DEFAULT: { var len = ReadLong(); var hash = new RubyHash(); v = hash; v = Entry(v); while (len-- > 0) { var key = ReadObject(); var value = ReadObject(); hash.Add(key, value); } if (type == RubyMarshal.Types.HASH_WITH_DEFAULT) { hash.DefaultValue = ReadObject(); } v = Leave(v); } break; case RubyMarshal.Types.STRUCT: { var idx = Prepare(); var obj = new RubyStruct(); var klass = ReadUnique(); obj.ClassName = klass; var len = ReadLong(); v = obj; v = Entry0(v, idx); while (len-- > 0) { var key = ReadSymbol(); var value = ReadObject(); obj.InstanceVariable[key] = value; } v = Leave(v); } break; case RubyMarshal.Types.USER_DEFINED: { var klass = ReadUnique(); var obj = RubyUserDefinedObject.TryGetUserDefinedObject(klass.Name); if (obj == null) { var data = ReadString(); if (hasivp) { ReadInstanceVariable(data); ivp = false; } obj = new DefaultRubyUserDefinedDumpObject { Raw = data.Raw }; } else { obj.Read(_m_reader); } obj.ClassName = klass; v = obj; v = Entry(v); v = Leave(v); } break; case RubyMarshal.Types.USER_MARSHAL: { var klass = ReadUnique(); var obj = new DefaultRubyUserDefinedMarshalDumpObject(); v = obj; if (extmod != null) { AppendExtendedModule(obj, extmod); } v = Entry(v); var data = ReadObject(); obj.ClassName = klass; obj.DumpedObject = data; v = Leave(v); extmod?.Clear(); } break; case RubyMarshal.Types.OBJECT: { var idx = Prepare(); var obj = new RubyObject(); var klass = ReadUnique(); obj.ClassName = klass; v = obj; v = Entry0(v, idx); ReadInstanceVariable(v); v = Leave(v); } break; case RubyMarshal.Types.CLASS: { var str = ReadString(); v = RubyClass.GetClass(RubySymbol.GetSymbol(str)); v = Entry(v); v = Leave(v); } break; case RubyMarshal.Types.MODULE: { var str = ReadString(); v = RubyModule.GetModule(RubySymbol.GetSymbol(str)); v = Entry(v); v = Leave(v); } break; case RubyMarshal.Types.SYMBOL: if (hasivp) { v = ReadSymbolReal(ivp); ivp = false; } else { v = ReadSymbolReal(false); } v = Leave(v); break; case RubyMarshal.Types.SYMBOL_LINK: v = ReadSymbolLink(); break; case RubyMarshal.Types.DATA: /* TODO: Data Support * { * VALUE klass = path2class(r_unique(arg)); * VALUE oldclass = 0; * * v = obj_alloc_by_klass(klass, arg, &oldclass); * if (!RB_TYPE_P(v, T_DATA)) { * rb_raise(rb_eArgError, "dump format error"); * } * v = r_entry(v, arg); * if (!rb_respond_to(v, s_load_data)) { * rb_raise(rb_eTypeError, "class %s needs to have instance method `_load_data'", rb_class2name(klass)); * } * rb_funcall(v, s_load_data, 1, r_object0(arg, 0, extmod)); * check_load_arg(arg, s_load_data); * v = r_leave(v, arg); * } */ case RubyMarshal.Types.MODULE_OLD: /* * TODO: ModuleOld Support * { * volatile VALUE str = r_bytes(arg); * v = rb_path_to_class(str); * v = r_entry(v, arg); * v = r_leave(v, arg); * } */ default: throw new InvalidDataException($"dump format error(0x{type:X2})"); } return(v); }