static VALUE
rg_operator_flags_not(VALUE self, G_GNUC_UNUSED VALUE rhs)
{
flags_holder* p = flags_get_holder(self);
return rbgobj_make_flags((~ p->value) & p->gclass->mask,
G_TYPE_FROM_CLASS(p->gclass));
}
void
rg_flags_add_constants(VALUE mod, GType flags_type, const gchar *strip_prefix)
{
GFlagsClass *gclass;
guint i;
int prefix_len = strlen(strip_prefix);
gclass = G_FLAGS_CLASS(g_type_class_ref(flags_type));
for (i = 0; i < gclass->n_values; i++) {
const GFlagsValue* value = &gclass->values[i];
if (strncmp(value->value_name, strip_prefix, prefix_len)) {
g_warning("\"%s\" doesn't have prefix \"%s\"",
value->value_name, strip_prefix);
} else {
const char* name = value->value_name + prefix_len;
rbgobj_define_const(mod, name,
rbgobj_make_flags(value->value, flags_type));
}
}
g_type_class_unref(gclass);
}
static VALUE
rg_operator_flags_minus(VALUE self, VALUE rhs)
{
flags_holder* p = flags_get_holder(self);
GType gtype = G_TYPE_FROM_CLASS(p->gclass);
return rbgobj_make_flags(p->value & ~rbgobj_get_flags(rhs, gtype),
gtype);
}
static VALUE
rg_coerce(VALUE self, VALUE other)
{
flags_holder *holder;
GType gtype;
if (rb_obj_is_kind_of(other, rb_cInteger))
rb_raise(rb_eTypeError, "can't coerce");
holder = flags_get_holder(self);
gtype = G_TYPE_FROM_CLASS(holder->gclass);
other = rbgobj_make_flags(NUM2UINT(other), gtype);
return rb_ary_new3(2, other, self);
}
VALUE
rbgobj_gvalue_to_rvalue(const GValue* value)
{
GType type, fundamental_type;
VALUE rvalue;
if (!value)
return Qnil;
type = G_VALUE_TYPE(value);
if (rbgobj_convert_gvalue2rvalue(type, value, &rvalue))
return rvalue;
fundamental_type = G_TYPE_FUNDAMENTAL(type);
switch (fundamental_type) {
case G_TYPE_NONE:
return Qnil;
case G_TYPE_CHAR:
return CHR2FIX(g_value_get_char(value));
case G_TYPE_UCHAR:
return INT2FIX(g_value_get_uchar(value));
case G_TYPE_BOOLEAN:
return CBOOL2RVAL(g_value_get_boolean(value));
case G_TYPE_INT:
return INT2NUM(g_value_get_int(value));
case G_TYPE_UINT:
return UINT2NUM(g_value_get_uint(value));
case G_TYPE_LONG:
return LONG2NUM(g_value_get_long(value));
case G_TYPE_ULONG:
return ULONG2NUM(g_value_get_ulong(value));
case G_TYPE_INT64:
return rbglib_int64_to_num(g_value_get_int64(value));
case G_TYPE_UINT64:
return rbglib_uint64_to_num(g_value_get_uint64(value));
case G_TYPE_FLOAT:
return rb_float_new(g_value_get_float(value));
case G_TYPE_DOUBLE:
return rb_float_new(g_value_get_double(value));
case G_TYPE_STRING:
return CSTR2RVAL(g_value_get_string(value));
case G_TYPE_ENUM:
return rbgobj_make_enum(g_value_get_enum(value), type);
case G_TYPE_FLAGS:
return rbgobj_make_flags(g_value_get_flags(value), type);
case G_TYPE_OBJECT:
case G_TYPE_INTERFACE:
{
GObject* gobj = g_value_get_object(value);
return gobj ? GOBJ2RVAL(gobj) : Qnil;
}
case G_TYPE_PARAM:
{
GParamSpec* pspec = g_value_get_param(value);
return pspec ? rbgobj_ruby_object_from_instance(pspec) : Qnil;
}
case G_TYPE_POINTER:
{
gpointer ptr = g_value_get_pointer(value);
if (!ptr)
return Qnil;
else
return rbgobj_ptr_new(type, ptr);
}
case G_TYPE_BOXED:
{
GType gtype;
for (gtype = type;
gtype != G_TYPE_INVALID;
gtype = g_type_parent(gtype))
{
GValueToRValueFunc func =
g_type_get_qdata(gtype, qGValueToRValueFunc);
if (!func)
continue;
return func(value);
}
}
default:
if (!rbgobj_convert_gvalue2rvalue(fundamental_type, value, &rvalue)) {
GValueToRValueFunc func;
func = g_type_get_qdata(type, qGValueToRValueFunc);
if (!func) {
g_warning("rbgobj_gvalue_to_rvalue: unsupported type: %s\n",
g_type_name(type));
} else {
rvalue = func(value);
}
}
return rvalue;
}
}
