vasilito
ff4ff35918
Red Bear OS is a full fork. All sources must be available from git clone with zero network access. Removed gitignore rules that excluded fetched source trees under recipes/*/source/, local/recipes/kde/*/source/, local/recipes/qt/*/source/, and vendor source trees. Build artifacts (target/, build/, source.tar, *.o, *.so) remain excluded. 127291 files added — kernel, relibc, base, bootloader, pkgar, all KDE/Qt frameworks, mesa, wayland, DRM drivers, and every other recipe source.
77 lines
2.2 KiB
C
77 lines
2.2 KiB
C
/**
|
|
** @file mruby/data.h - Data class
|
|
**
|
|
** See Copyright Notice in mruby.h
|
|
*/
|
|
|
|
#ifndef MRUBY_DATA_H
|
|
#define MRUBY_DATA_H
|
|
|
|
#include "common.h"
|
|
|
|
/**
|
|
* Custom C wrapped data.
|
|
*
|
|
* Defining Ruby wrappers around native objects.
|
|
*/
|
|
MRB_BEGIN_DECL
|
|
|
|
/**
|
|
* Custom data type description.
|
|
*/
|
|
typedef struct mrb_data_type {
|
|
/** data type name */
|
|
const char *struct_name;
|
|
|
|
/** data type release function pointer */
|
|
void (*dfree)(mrb_state *mrb, void*);
|
|
} mrb_data_type;
|
|
|
|
struct RData {
|
|
MRB_OBJECT_HEADER;
|
|
struct iv_tbl *iv;
|
|
const mrb_data_type *type;
|
|
void *data;
|
|
};
|
|
|
|
MRB_API struct RData *mrb_data_object_alloc(mrb_state *mrb, struct RClass* klass, void *datap, const mrb_data_type *type);
|
|
|
|
#define Data_Wrap_Struct(mrb,klass,type,ptr)\
|
|
mrb_data_object_alloc(mrb,klass,ptr,type)
|
|
|
|
#define Data_Make_Struct(mrb,klass,strct,type,sval,data_obj) do { \
|
|
(data_obj) = Data_Wrap_Struct(mrb,klass,type,NULL);\
|
|
(sval) = (strct*)mrb_malloc(mrb, sizeof(strct)); \
|
|
{ static const strct zero = { 0 }; *(sval) = zero; };\
|
|
(data_obj)->data = (sval);\
|
|
} while (0)
|
|
|
|
#define RDATA(obj) ((struct RData*)(mrb_ptr(obj)))
|
|
#define DATA_PTR(d) (RDATA(d)->data)
|
|
#define DATA_TYPE(d) (RDATA(d)->type)
|
|
MRB_API void mrb_data_check_type(mrb_state *mrb, mrb_value, const mrb_data_type*);
|
|
MRB_API void *mrb_data_get_ptr(mrb_state *mrb, mrb_value, const mrb_data_type*);
|
|
#define DATA_GET_PTR(mrb,obj,dtype,type) (type*)mrb_data_get_ptr(mrb,obj,dtype)
|
|
MRB_API void *mrb_data_check_get_ptr(mrb_state *mrb, mrb_value, const mrb_data_type*);
|
|
#define DATA_CHECK_GET_PTR(mrb,obj,dtype,type) (type*)mrb_data_check_get_ptr(mrb,obj,dtype)
|
|
|
|
/* obsolete functions and macros */
|
|
#define mrb_data_check_and_get(mrb,obj,dtype) mrb_data_get_ptr(mrb,obj,dtype)
|
|
#define mrb_get_datatype(mrb,val,type) mrb_data_get_ptr(mrb, val, type)
|
|
#define mrb_check_datatype(mrb,val,type) mrb_data_get_ptr(mrb, val, type)
|
|
#define Data_Get_Struct(mrb,obj,type,sval) do {\
|
|
*(void**)&sval = mrb_data_get_ptr(mrb, obj, type); \
|
|
} while (0)
|
|
|
|
MRB_INLINE void
|
|
mrb_data_init(mrb_value v, void *ptr, const mrb_data_type *type)
|
|
{
|
|
mrb_assert(mrb_data_p(v));
|
|
DATA_PTR(v) = ptr;
|
|
DATA_TYPE(v) = type;
|
|
}
|
|
|
|
MRB_END_DECL
|
|
|
|
#endif /* MRUBY_DATA_H */
|