class.h

00001 /*
00002 ** mruby/class.h - Class class
00003 **
00004 ** See Copyright Notice in mruby.h
00005 */
00006 
00007 #ifndef MRUBY_CLASS_H
00008 #define MRUBY_CLASS_H
00009 
00010 #if defined(__cplusplus)
00011 extern "C" {
00012 #endif
00013 
00014 struct RClass {
00015   MRB_OBJECT_HEADER;
00016   struct iv_tbl *iv;
00017   struct kh_mt *mt;
00018   struct RClass *super;
00019 };
00020 
00021 #define mrb_class_ptr(v)    ((struct RClass*)(mrb_ptr(v)))
00022 #define RCLASS_SUPER(v)     (((struct RClass*)(mrb_ptr(v)))->super)
00023 #define RCLASS_IV_TBL(v)    (((struct RClass*)(mrb_ptr(v)))->iv)
00024 #define RCLASS_M_TBL(v)     (((struct RClass*)(mrb_ptr(v)))->mt)
00025 
00026 static inline struct RClass*
00027 mrb_class(mrb_state *mrb, mrb_value v)
00028 {
00029   switch (mrb_type(v)) {
00030   case MRB_TT_FALSE:
00031     if (mrb_fixnum(v))
00032       return mrb->false_class;
00033     return mrb->nil_class;
00034   case MRB_TT_TRUE:
00035     return mrb->true_class;
00036   case MRB_TT_SYMBOL:
00037     return mrb->symbol_class;
00038   case MRB_TT_FIXNUM:
00039     return mrb->fixnum_class;
00040   case MRB_TT_FLOAT:
00041     return mrb->float_class;
00042   case MRB_TT_CPTR:
00043     return mrb->object_class;
00044   case MRB_TT_ENV:
00045     return NULL;
00046   default:
00047     return mrb_obj_ptr(v)->c;
00048   }
00049 }
00050 
00051 #define MRB_SET_INSTANCE_TT(c, tt) c->flags = ((c->flags & ~0xff) | (char)tt)
00052 #define MRB_INSTANCE_TT(c) (enum mrb_vtype)(c->flags & 0xff)
00053 
00054 MRB_API struct RClass* mrb_define_class_id(mrb_state*, mrb_sym, struct RClass*);
00055 MRB_API struct RClass* mrb_define_module_id(mrb_state*, mrb_sym);
00056 MRB_API struct RClass *mrb_vm_define_class(mrb_state*, mrb_value, mrb_value, mrb_sym);
00057 MRB_API struct RClass *mrb_vm_define_module(mrb_state*, mrb_value, mrb_sym);
00058 MRB_API void mrb_define_method_vm(mrb_state*, struct RClass*, mrb_sym, mrb_value);
00059 MRB_API void mrb_define_method_raw(mrb_state*, struct RClass*, mrb_sym, struct RProc *);
00060 MRB_API void mrb_define_method_id(mrb_state *mrb, struct RClass *c, mrb_sym mid, mrb_func_t func, mrb_aspec aspec);
00061 MRB_API void mrb_alias_method(mrb_state *mrb, struct RClass *c, mrb_sym a, mrb_sym b);
00062 
00063 MRB_API struct RClass *mrb_class_outer_module(mrb_state*, struct RClass *);
00064 MRB_API struct RProc *mrb_method_search_vm(mrb_state*, struct RClass**, mrb_sym);
00065 MRB_API struct RProc *mrb_method_search(mrb_state*, struct RClass*, mrb_sym);
00066 
00067 MRB_API struct RClass* mrb_class_real(struct RClass* cl);
00068 
00069 void mrb_gc_mark_mt(mrb_state*, struct RClass*);
00070 size_t mrb_gc_mark_mt_size(mrb_state*, struct RClass*);
00071 void mrb_gc_free_mt(mrb_state*, struct RClass*);
00072 
00073 #if defined(__cplusplus)
00074 }  /* extern "C" { */
00075 #endif
00076 
00077 #endif  /* MRUBY_CLASS_H */
00078