1/********************************************************************** 2 3 intern.h - 4 5 $Author: nagachika $ 6 created at: Thu Jun 10 14:22:17 JST 1993 7 8 Copyright (C) 1993-2007 Yukihiro Matsumoto 9 Copyright (C) 2000 Network Applied Communication Laboratory, Inc. 10 Copyright (C) 2000 Information-technology Promotion Agency, Japan 11 12**********************************************************************/ 13 14#ifndef RUBY_INTERN_H 15#define RUBY_INTERN_H 1 16 17#if defined(__cplusplus) 18extern "C" { 19#if 0 20} /* satisfy cc-mode */ 21#endif 22#endif 23 24#include "ruby/defines.h" 25#ifdef RUBY_EXTCONF_H 26#include RUBY_EXTCONF_H 27#endif 28 29#ifdef HAVE_STDARG_PROTOTYPES 30# include <stdarg.h> 31#else 32# include <varargs.h> 33#endif 34 35#if defined(HAVE_SYS_TYPES_H) 36#include <sys/types.h> 37#endif 38 39#if defined(HAVE_SYS_TIME_H) 40#include <sys/time.h> 41#endif 42 43#include "ruby/st.h" 44 45#if defined __GNUC__ && __GNUC__ >= 4 46#pragma GCC visibility push(default) 47#endif 48 49/* 50 * Functions and variables that are used by more than one source file of 51 * the kernel. 52 */ 53 54#define UNLIMITED_ARGUMENTS (-1) 55 56/* array.c */ 57void rb_mem_clear(register VALUE*, register long); 58VALUE rb_assoc_new(VALUE, VALUE); 59VALUE rb_check_array_type(VALUE); 60VALUE rb_ary_new(void); 61VALUE rb_ary_new2(long); 62VALUE rb_ary_new3(long,...); 63VALUE rb_ary_new4(long, const VALUE *); 64VALUE rb_ary_tmp_new(long); 65void rb_ary_free(VALUE); 66void rb_ary_modify(VALUE); 67VALUE rb_ary_freeze(VALUE); 68VALUE rb_ary_shared_with_p(VALUE, VALUE); 69VALUE rb_ary_aref(int, VALUE*, VALUE); 70VALUE rb_ary_subseq(VALUE, long, long); 71void rb_ary_store(VALUE, long, VALUE); 72VALUE rb_ary_dup(VALUE); 73VALUE rb_ary_resurrect(VALUE ary); 74VALUE rb_ary_to_ary(VALUE); 75VALUE rb_ary_to_s(VALUE); 76VALUE rb_ary_push(VALUE, VALUE); 77VALUE rb_ary_pop(VALUE); 78VALUE rb_ary_shift(VALUE); 79VALUE rb_ary_unshift(VALUE, VALUE); 80VALUE rb_ary_entry(VALUE, long); 81VALUE rb_ary_each(VALUE); 82VALUE rb_ary_join(VALUE, VALUE); 83VALUE rb_ary_reverse(VALUE); 84VALUE rb_ary_rotate(VALUE, long); 85VALUE rb_ary_sort(VALUE); 86VALUE rb_ary_sort_bang(VALUE); 87VALUE rb_ary_delete(VALUE, VALUE); 88VALUE rb_ary_delete_at(VALUE, long); 89VALUE rb_ary_clear(VALUE); 90VALUE rb_ary_plus(VALUE, VALUE); 91VALUE rb_ary_concat(VALUE, VALUE); 92VALUE rb_ary_assoc(VALUE, VALUE); 93VALUE rb_ary_rassoc(VALUE, VALUE); 94VALUE rb_ary_includes(VALUE, VALUE); 95VALUE rb_ary_cmp(VALUE, VALUE); 96VALUE rb_ary_replace(VALUE copy, VALUE orig); 97VALUE rb_get_values_at(VALUE, long, int, VALUE*, VALUE(*)(VALUE,long)); 98VALUE rb_ary_resize(VALUE ary, long len); 99/* bignum.c */ 100VALUE rb_big_new(long, int); 101int rb_bigzero_p(VALUE x); 102VALUE rb_big_clone(VALUE); 103void rb_big_2comp(VALUE); 104VALUE rb_big_norm(VALUE); 105void rb_big_resize(VALUE big, long len); 106VALUE rb_uint2big(VALUE); 107VALUE rb_int2big(SIGNED_VALUE); 108VALUE rb_uint2inum(VALUE); 109VALUE rb_int2inum(SIGNED_VALUE); 110VALUE rb_cstr_to_inum(const char*, int, int); 111VALUE rb_str_to_inum(VALUE, int, int); 112VALUE rb_cstr2inum(const char*, int); 113VALUE rb_str2inum(VALUE, int); 114VALUE rb_big2str(VALUE, int); 115VALUE rb_big2str0(VALUE, int, int); 116SIGNED_VALUE rb_big2long(VALUE); 117#define rb_big2int(x) rb_big2long(x) 118VALUE rb_big2ulong(VALUE); 119#define rb_big2uint(x) rb_big2ulong(x) 120VALUE rb_big2ulong_pack(VALUE x); 121#if HAVE_LONG_LONG 122VALUE rb_ll2inum(LONG_LONG); 123VALUE rb_ull2inum(unsigned LONG_LONG); 124LONG_LONG rb_big2ll(VALUE); 125unsigned LONG_LONG rb_big2ull(VALUE); 126#endif /* HAVE_LONG_LONG */ 127DEPRECATED(void rb_quad_pack(char*,VALUE)); 128DEPRECATED(VALUE rb_quad_unpack(const char*,int)); 129void rb_big_pack(VALUE val, unsigned long *buf, long num_longs); 130VALUE rb_big_unpack(unsigned long *buf, long num_longs); 131int rb_uv_to_utf8(char[6],unsigned long); 132VALUE rb_dbl2big(double); 133double rb_big2dbl(VALUE); 134VALUE rb_big_cmp(VALUE, VALUE); 135VALUE rb_big_eq(VALUE, VALUE); 136VALUE rb_big_eql(VALUE, VALUE); 137VALUE rb_big_plus(VALUE, VALUE); 138VALUE rb_big_minus(VALUE, VALUE); 139VALUE rb_big_mul(VALUE, VALUE); 140VALUE rb_big_div(VALUE, VALUE); 141VALUE rb_big_idiv(VALUE, VALUE); 142VALUE rb_big_modulo(VALUE, VALUE); 143VALUE rb_big_divmod(VALUE, VALUE); 144VALUE rb_big_pow(VALUE, VALUE); 145VALUE rb_big_and(VALUE, VALUE); 146VALUE rb_big_or(VALUE, VALUE); 147VALUE rb_big_xor(VALUE, VALUE); 148VALUE rb_big_lshift(VALUE, VALUE); 149VALUE rb_big_rshift(VALUE, VALUE); 150/* rational.c */ 151VALUE rb_rational_raw(VALUE, VALUE); 152#define rb_rational_raw1(x) rb_rational_raw((x), INT2FIX(1)) 153#define rb_rational_raw2(x,y) rb_rational_raw((x), (y)) 154VALUE rb_rational_new(VALUE, VALUE); 155#define rb_rational_new1(x) rb_rational_new((x), INT2FIX(1)) 156#define rb_rational_new2(x,y) rb_rational_new((x), (y)) 157VALUE rb_Rational(VALUE, VALUE); 158#define rb_Rational1(x) rb_Rational((x), INT2FIX(1)) 159#define rb_Rational2(x,y) rb_Rational((x), (y)) 160/* complex.c */ 161VALUE rb_complex_raw(VALUE, VALUE); 162#define rb_complex_raw1(x) rb_complex_raw((x), INT2FIX(0)) 163#define rb_complex_raw2(x,y) rb_complex_raw((x), (y)) 164VALUE rb_complex_new(VALUE, VALUE); 165#define rb_complex_new1(x) rb_complex_new((x), INT2FIX(0)) 166#define rb_complex_new2(x,y) rb_complex_new((x), (y)) 167VALUE rb_complex_polar(VALUE, VALUE); 168VALUE rb_Complex(VALUE, VALUE); 169#define rb_Complex1(x) rb_Complex((x), INT2FIX(0)) 170#define rb_Complex2(x,y) rb_Complex((x), (y)) 171/* class.c */ 172VALUE rb_class_boot(VALUE); 173VALUE rb_class_new(VALUE); 174VALUE rb_mod_init_copy(VALUE, VALUE); 175VALUE rb_singleton_class_clone(VALUE); 176void rb_singleton_class_attached(VALUE,VALUE); 177VALUE rb_make_metaclass(VALUE, VALUE); 178void rb_check_inheritable(VALUE); 179VALUE rb_class_inherited(VALUE, VALUE); 180VALUE rb_define_class_id(ID, VALUE); 181VALUE rb_define_class_id_under(VALUE, ID, VALUE); 182VALUE rb_module_new(void); 183VALUE rb_define_module_id(ID); 184VALUE rb_define_module_id_under(VALUE, ID); 185VALUE rb_include_class_new(VALUE, VALUE); 186VALUE rb_mod_included_modules(VALUE); 187VALUE rb_mod_include_p(VALUE, VALUE); 188VALUE rb_mod_ancestors(VALUE); 189VALUE rb_class_instance_methods(int, VALUE*, VALUE); 190VALUE rb_class_public_instance_methods(int, VALUE*, VALUE); 191VALUE rb_class_protected_instance_methods(int, VALUE*, VALUE); 192VALUE rb_class_private_instance_methods(int, VALUE*, VALUE); 193VALUE rb_obj_singleton_methods(int, VALUE*, VALUE); 194void rb_define_method_id(VALUE, ID, VALUE (*)(ANYARGS), int); 195void rb_frozen_class_p(VALUE); 196void rb_undef(VALUE, ID); 197void rb_define_protected_method(VALUE, const char*, VALUE (*)(ANYARGS), int); 198void rb_define_private_method(VALUE, const char*, VALUE (*)(ANYARGS), int); 199void rb_define_singleton_method(VALUE, const char*, VALUE(*)(ANYARGS), int); 200VALUE rb_singleton_class(VALUE); 201/* compar.c */ 202int rb_cmpint(VALUE, VALUE, VALUE); 203NORETURN(void rb_cmperr(VALUE, VALUE)); 204/* cont.c */ 205VALUE rb_fiber_new(VALUE (*)(ANYARGS), VALUE); 206VALUE rb_fiber_resume(VALUE fib, int argc, VALUE *args); 207VALUE rb_fiber_yield(int argc, VALUE *args); 208VALUE rb_fiber_current(void); 209VALUE rb_fiber_alive_p(VALUE); 210/* enum.c */ 211VALUE rb_enum_values_pack(int, VALUE*); 212/* enumerator.c */ 213VALUE rb_enumeratorize(VALUE, VALUE, int, VALUE *); 214VALUE rb_enumeratorize_with_size(VALUE, VALUE, int, VALUE *, VALUE (*)(ANYARGS)); 215#define RETURN_SIZED_ENUMERATOR(obj, argc, argv, size_fn) do { \ 216 if (!rb_block_given_p()) \ 217 return rb_enumeratorize_with_size((obj), ID2SYM(rb_frame_this_func()),\ 218 (argc), (argv), (size_fn)); \ 219 } while (0) 220#define RETURN_ENUMERATOR(obj, argc, argv) RETURN_SIZED_ENUMERATOR(obj, argc, argv, 0) 221/* error.c */ 222VALUE rb_exc_new(VALUE, const char*, long); 223VALUE rb_exc_new2(VALUE, const char*); 224VALUE rb_exc_new3(VALUE, VALUE); 225PRINTF_ARGS(NORETURN(void rb_loaderror(const char*, ...)), 1, 2); 226PRINTF_ARGS(NORETURN(void rb_loaderror_with_path(VALUE path, const char*, ...)), 2, 3); 227PRINTF_ARGS(NORETURN(void rb_name_error(ID, const char*, ...)), 2, 3); 228PRINTF_ARGS(NORETURN(void rb_name_error_str(VALUE, const char*, ...)), 2, 3); 229NORETURN(void rb_invalid_str(const char*, const char*)); 230PRINTF_ARGS(void rb_compile_error(const char*, int, const char*, ...), 3, 4); 231PRINTF_ARGS(void rb_compile_error_with_enc(const char*, int, void *, const char*, ...), 4, 5); 232PRINTF_ARGS(void rb_compile_error_append(const char*, ...), 1, 2); 233NORETURN(void rb_error_frozen(const char*)); 234void rb_error_untrusted(VALUE); 235void rb_check_frozen(VALUE); 236void rb_check_trusted(VALUE); 237#define rb_check_frozen_internal(obj) do { \ 238 VALUE frozen_obj = (obj); \ 239 if (OBJ_FROZEN(frozen_obj)) { \ 240 rb_error_frozen(rb_obj_classname(frozen_obj)); \ 241 } \ 242 } while (0) 243#define rb_check_trusted_internal(obj) do { \ 244 VALUE untrusted_obj = (obj); \ 245 if (!OBJ_UNTRUSTED(untrusted_obj)) { \ 246 rb_error_untrusted(untrusted_obj); \ 247 } \ 248 } while (0) 249#ifdef __GNUC__ 250#define rb_check_frozen(obj) __extension__({rb_check_frozen_internal(obj);}) 251#define rb_check_trusted(obj) __extension__({rb_check_trusted_internal(obj);}) 252#else 253static inline void 254rb_check_frozen_inline(VALUE obj) 255{ 256 rb_check_frozen_internal(obj); 257} 258#define rb_check_frozen(obj) rb_check_frozen_inline(obj) 259static inline void 260rb_check_trusted_inline(VALUE obj) 261{ 262 rb_check_trusted_internal(obj); 263} 264#define rb_check_trusted(obj) rb_check_trusted_inline(obj) 265#endif 266void rb_check_copyable(VALUE obj, VALUE orig); 267 268#define OBJ_INIT_COPY(obj, orig) \ 269 ((obj) != (orig) && (rb_obj_init_copy((obj), (orig)), 1)) 270 271/* eval.c */ 272int rb_sourceline(void); 273const char *rb_sourcefile(void); 274VALUE rb_check_funcall(VALUE, ID, int, VALUE*); 275 276NORETURN(void rb_error_arity(int, int, int)); 277#define rb_check_arity(argc, min, max) do { \ 278 if (((argc) < (min)) || ((argc) > (max) && (max) != UNLIMITED_ARGUMENTS)) \ 279 rb_error_arity(argc, min, max); \ 280 } while(0) 281 282#if defined(NFDBITS) && defined(HAVE_RB_FD_INIT) 283typedef struct { 284 int maxfd; 285 fd_set *fdset; 286} rb_fdset_t; 287 288void rb_fd_init(rb_fdset_t *); 289void rb_fd_term(rb_fdset_t *); 290void rb_fd_zero(rb_fdset_t *); 291void rb_fd_set(int, rb_fdset_t *); 292void rb_fd_clr(int, rb_fdset_t *); 293int rb_fd_isset(int, const rb_fdset_t *); 294void rb_fd_copy(rb_fdset_t *, const fd_set *, int); 295void rb_fd_dup(rb_fdset_t *dst, const rb_fdset_t *src); 296int rb_fd_select(int, rb_fdset_t *, rb_fdset_t *, rb_fdset_t *, struct timeval *); 297 298#define rb_fd_ptr(f) ((f)->fdset) 299#define rb_fd_max(f) ((f)->maxfd) 300 301#elif defined(_WIN32) 302 303typedef struct { 304 int capa; 305 fd_set *fdset; 306} rb_fdset_t; 307 308void rb_fd_init(rb_fdset_t *); 309void rb_fd_term(rb_fdset_t *); 310#define rb_fd_zero(f) ((f)->fdset->fd_count = 0) 311void rb_fd_set(int, rb_fdset_t *); 312#define rb_fd_clr(n, f) rb_w32_fdclr((n), (f)->fdset) 313#define rb_fd_isset(n, f) rb_w32_fdisset((n), (f)->fdset) 314#define rb_fd_copy(d, s, n) rb_w32_fd_copy((d), (s), (n)) 315void rb_w32_fd_copy(rb_fdset_t *, const fd_set *, int); 316#define rb_fd_dup(d, s) rb_w32_fd_dup((d), (s)) 317void rb_w32_fd_dup(rb_fdset_t *dst, const rb_fdset_t *src); 318#define rb_fd_select(n, rfds, wfds, efds, timeout) rb_w32_select((n), (rfds) ? ((rb_fdset_t*)(rfds))->fdset : NULL, (wfds) ? ((rb_fdset_t*)(wfds))->fdset : NULL, (efds) ? ((rb_fdset_t*)(efds))->fdset: NULL, (timeout)) 319#define rb_fd_resize(n, f) ((void)(f)) 320 321#define rb_fd_ptr(f) ((f)->fdset) 322#define rb_fd_max(f) ((f)->fdset->fd_count) 323 324#else 325 326typedef fd_set rb_fdset_t; 327#define rb_fd_zero(f) FD_ZERO(f) 328#define rb_fd_set(n, f) FD_SET((n), (f)) 329#define rb_fd_clr(n, f) FD_CLR((n), (f)) 330#define rb_fd_isset(n, f) FD_ISSET((n), (f)) 331#define rb_fd_copy(d, s, n) (*(d) = *(s)) 332#define rb_fd_dup(d, s) (*(d) = *(s)) 333#define rb_fd_resize(n, f) ((void)(f)) 334#define rb_fd_ptr(f) (f) 335#define rb_fd_init(f) FD_ZERO(f) 336#define rb_fd_init_copy(d, s) (*(d) = *(s)) 337#define rb_fd_term(f) ((void)(f)) 338#define rb_fd_max(f) FD_SETSIZE 339#define rb_fd_select(n, rfds, wfds, efds, timeout) select((n), (rfds), (wfds), (efds), (timeout)) 340 341#endif 342 343NORETURN(void rb_exc_raise(VALUE)); 344NORETURN(void rb_exc_fatal(VALUE)); 345VALUE rb_f_exit(int,VALUE*); 346VALUE rb_f_abort(int,VALUE*); 347void rb_remove_method(VALUE, const char*); 348void rb_remove_method_id(VALUE, ID); 349#define rb_disable_super(klass, name) ((void)0) 350#define rb_enable_super(klass, name) ((void)0) 351#define HAVE_RB_DEFINE_ALLOC_FUNC 1 352typedef VALUE (*rb_alloc_func_t)(VALUE); 353void rb_define_alloc_func(VALUE, rb_alloc_func_t); 354void rb_undef_alloc_func(VALUE); 355rb_alloc_func_t rb_get_alloc_func(VALUE); 356void rb_clear_cache(void); 357void rb_clear_cache_by_class(VALUE); 358void rb_alias(VALUE, ID, ID); 359void rb_attr(VALUE,ID,int,int,int); 360int rb_method_boundp(VALUE, ID, int); 361int rb_method_basic_definition_p(VALUE, ID); 362VALUE rb_eval_cmd(VALUE, VALUE, int); 363int rb_obj_respond_to(VALUE, ID, int); 364int rb_respond_to(VALUE, ID); 365VALUE rb_f_notimplement(int argc, VALUE *argv, VALUE obj); 366void rb_interrupt(void); 367VALUE rb_apply(VALUE, ID, VALUE); 368void rb_backtrace(void); 369ID rb_frame_this_func(void); 370VALUE rb_obj_instance_eval(int, VALUE*, VALUE); 371VALUE rb_obj_instance_exec(int, VALUE*, VALUE); 372VALUE rb_mod_module_eval(int, VALUE*, VALUE); 373VALUE rb_mod_module_exec(int, VALUE*, VALUE); 374void rb_load(VALUE, int); 375void rb_load_protect(VALUE, int, int*); 376NORETURN(void rb_jump_tag(int)); 377int rb_provided(const char*); 378int rb_feature_provided(const char *, const char **); 379void rb_provide(const char*); 380VALUE rb_f_require(VALUE, VALUE); 381VALUE rb_require_safe(VALUE, int); 382void rb_obj_call_init(VALUE, int, VALUE*); 383VALUE rb_class_new_instance(int, VALUE*, VALUE); 384VALUE rb_block_proc(void); 385DEPRECATED(VALUE rb_f_lambda(void)); 386VALUE rb_block_lambda(void); 387VALUE rb_proc_new(VALUE (*)(ANYARGS/* VALUE yieldarg[, VALUE procarg] */), VALUE); 388VALUE rb_obj_is_proc(VALUE); 389VALUE rb_proc_call(VALUE, VALUE); 390VALUE rb_proc_call_with_block(VALUE, int argc, VALUE *argv, VALUE); 391int rb_proc_arity(VALUE); 392VALUE rb_proc_lambda_p(VALUE); 393VALUE rb_binding_new(void); 394VALUE rb_obj_method(VALUE, VALUE); 395VALUE rb_obj_is_method(VALUE); 396VALUE rb_method_call(int, VALUE*, VALUE); 397VALUE rb_method_call_with_block(int, VALUE *, VALUE, VALUE); 398int rb_mod_method_arity(VALUE, ID); 399int rb_obj_method_arity(VALUE, ID); 400VALUE rb_protect(VALUE (*)(VALUE), VALUE, int*); 401void rb_set_end_proc(void (*)(VALUE), VALUE); 402void rb_exec_end_proc(void); 403void rb_thread_schedule(void); 404void rb_thread_wait_fd(int); 405int rb_thread_fd_writable(int); 406void rb_thread_fd_close(int); 407int rb_thread_alone(void); 408DEPRECATED(void rb_thread_polling(void)); 409void rb_thread_sleep(int); 410void rb_thread_sleep_forever(void); 411VALUE rb_thread_stop(void); 412VALUE rb_thread_wakeup(VALUE); 413VALUE rb_thread_wakeup_alive(VALUE); 414VALUE rb_thread_run(VALUE); 415VALUE rb_thread_kill(VALUE); 416VALUE rb_thread_create(VALUE (*)(ANYARGS), void*); 417DEPRECATED(int rb_thread_select(int, fd_set *, fd_set *, fd_set *, struct timeval *)); 418int rb_thread_fd_select(int, rb_fdset_t *, rb_fdset_t *, rb_fdset_t *, struct timeval *); 419void rb_thread_wait_for(struct timeval); 420VALUE rb_thread_current(void); 421VALUE rb_thread_main(void); 422VALUE rb_thread_local_aref(VALUE, ID); 423VALUE rb_thread_local_aset(VALUE, ID, VALUE); 424void rb_thread_atfork(void); 425void rb_thread_atfork_before_exec(void); 426VALUE rb_exec_recursive(VALUE(*)(VALUE, VALUE, int),VALUE,VALUE); 427VALUE rb_exec_recursive_paired(VALUE(*)(VALUE, VALUE, int),VALUE,VALUE,VALUE); 428VALUE rb_exec_recursive_outer(VALUE(*)(VALUE, VALUE, int),VALUE,VALUE); 429VALUE rb_exec_recursive_paired_outer(VALUE(*)(VALUE, VALUE, int),VALUE,VALUE,VALUE); 430/* dir.c */ 431VALUE rb_dir_getwd(void); 432/* file.c */ 433VALUE rb_file_s_expand_path(int, VALUE *); 434VALUE rb_file_expand_path(VALUE, VALUE); 435VALUE rb_file_s_absolute_path(int, VALUE *); 436VALUE rb_file_absolute_path(VALUE, VALUE); 437VALUE rb_file_dirname(VALUE fname); 438int rb_find_file_ext_safe(VALUE*, const char* const*, int); 439VALUE rb_find_file_safe(VALUE, int); 440int rb_find_file_ext(VALUE*, const char* const*); 441VALUE rb_find_file(VALUE); 442VALUE rb_file_directory_p(VALUE,VALUE); 443VALUE rb_str_encode_ospath(VALUE); 444int rb_is_absolute_path(const char *); 445/* gc.c */ 446NORETURN(void rb_memerror(void)); 447int rb_during_gc(void); 448void rb_gc_mark_locations(VALUE*, VALUE*); 449void rb_mark_tbl(struct st_table*); 450void rb_mark_set(struct st_table*); 451void rb_mark_hash(struct st_table*); 452void rb_gc_mark_maybe(VALUE); 453void rb_gc_mark(VALUE); 454void rb_gc_force_recycle(VALUE); 455void rb_gc(void); 456void rb_gc_copy_finalizer(VALUE,VALUE); 457void rb_gc_finalize_deferred(void); 458void rb_gc_call_finalizer_at_exit(void); 459VALUE rb_gc_enable(void); 460VALUE rb_gc_disable(void); 461VALUE rb_gc_start(void); 462void rb_gc_set_params(void); 463/* hash.c */ 464void st_foreach_safe(struct st_table *, int (*)(ANYARGS), st_data_t); 465VALUE rb_check_hash_type(VALUE); 466void rb_hash_foreach(VALUE, int (*)(ANYARGS), VALUE); 467VALUE rb_hash(VALUE); 468VALUE rb_hash_new(void); 469VALUE rb_hash_dup(VALUE); 470VALUE rb_hash_freeze(VALUE); 471VALUE rb_hash_aref(VALUE, VALUE); 472VALUE rb_hash_lookup(VALUE, VALUE); 473VALUE rb_hash_lookup2(VALUE, VALUE, VALUE); 474VALUE rb_hash_fetch(VALUE, VALUE); 475VALUE rb_hash_aset(VALUE, VALUE, VALUE); 476VALUE rb_hash_clear(VALUE); 477VALUE rb_hash_delete_if(VALUE); 478VALUE rb_hash_delete(VALUE,VALUE); 479typedef VALUE rb_hash_update_func(VALUE newkey, VALUE oldkey, VALUE value); 480VALUE rb_hash_update_by(VALUE hash1, VALUE hash2, rb_hash_update_func *func); 481struct st_table *rb_hash_tbl(VALUE); 482int rb_path_check(const char*); 483int rb_env_path_tainted(void); 484VALUE rb_env_clear(void); 485/* io.c */ 486#define rb_defout rb_stdout 487RUBY_EXTERN VALUE rb_fs; 488RUBY_EXTERN VALUE rb_output_fs; 489RUBY_EXTERN VALUE rb_rs; 490RUBY_EXTERN VALUE rb_default_rs; 491RUBY_EXTERN VALUE rb_output_rs; 492VALUE rb_io_write(VALUE, VALUE); 493VALUE rb_io_gets(VALUE); 494VALUE rb_io_getbyte(VALUE); 495VALUE rb_io_ungetc(VALUE, VALUE); 496VALUE rb_io_ungetbyte(VALUE, VALUE); 497VALUE rb_io_close(VALUE); 498VALUE rb_io_flush(VALUE); 499VALUE rb_io_eof(VALUE); 500VALUE rb_io_binmode(VALUE); 501VALUE rb_io_ascii8bit_binmode(VALUE); 502VALUE rb_io_addstr(VALUE, VALUE); 503VALUE rb_io_printf(int, VALUE*, VALUE); 504VALUE rb_io_print(int, VALUE*, VALUE); 505VALUE rb_io_puts(int, VALUE*, VALUE); 506VALUE rb_io_fdopen(int, int, const char*); 507VALUE rb_io_get_io(VALUE); 508VALUE rb_file_open(const char*, const char*); 509VALUE rb_file_open_str(VALUE, const char*); 510VALUE rb_gets(void); 511void rb_write_error(const char*); 512void rb_write_error2(const char*, long); 513void rb_close_before_exec(int lowfd, int maxhint, VALUE noclose_fds); 514int rb_pipe(int *pipes); 515int rb_reserved_fd_p(int fd); 516int rb_cloexec_open(const char *pathname, int flags, mode_t mode); 517int rb_cloexec_dup(int oldfd); 518int rb_cloexec_dup2(int oldfd, int newfd); 519int rb_cloexec_pipe(int fildes[2]); 520int rb_cloexec_fcntl_dupfd(int fd, int minfd); 521#define RB_RESERVED_FD_P(fd) rb_reserved_fd_p(fd) 522void rb_update_max_fd(int fd); 523void rb_fd_fix_cloexec(int fd); 524/* marshal.c */ 525VALUE rb_marshal_dump(VALUE, VALUE); 526VALUE rb_marshal_load(VALUE); 527void rb_marshal_define_compat(VALUE newclass, VALUE oldclass, VALUE (*dumper)(VALUE), VALUE (*loader)(VALUE, VALUE)); 528/* numeric.c */ 529NORETURN(void rb_num_zerodiv(void)); 530#define RB_NUM_COERCE_FUNCS_NEED_OPID 1 531VALUE rb_num_coerce_bin(VALUE, VALUE, ID); 532VALUE rb_num_coerce_cmp(VALUE, VALUE, ID); 533VALUE rb_num_coerce_relop(VALUE, VALUE, ID); 534VALUE rb_num_coerce_bit(VALUE, VALUE, ID); 535VALUE rb_num2fix(VALUE); 536VALUE rb_fix2str(VALUE, int); 537VALUE rb_dbl_cmp(double, double); 538/* object.c */ 539int rb_eql(VALUE, VALUE); 540VALUE rb_any_to_s(VALUE); 541VALUE rb_inspect(VALUE); 542VALUE rb_obj_is_instance_of(VALUE, VALUE); 543VALUE rb_obj_is_kind_of(VALUE, VALUE); 544VALUE rb_obj_alloc(VALUE); 545VALUE rb_obj_clone(VALUE); 546VALUE rb_obj_dup(VALUE); 547VALUE rb_obj_init_copy(VALUE,VALUE); 548VALUE rb_obj_taint(VALUE); 549VALUE rb_obj_tainted(VALUE); 550VALUE rb_obj_untaint(VALUE); 551VALUE rb_obj_untrust(VALUE); 552VALUE rb_obj_untrusted(VALUE); 553VALUE rb_obj_trust(VALUE); 554VALUE rb_obj_freeze(VALUE); 555VALUE rb_obj_frozen_p(VALUE); 556VALUE rb_obj_id(VALUE); 557VALUE rb_obj_class(VALUE); 558VALUE rb_class_real(VALUE); 559VALUE rb_class_inherited_p(VALUE, VALUE); 560VALUE rb_class_superclass(VALUE); 561VALUE rb_class_get_superclass(VALUE); 562VALUE rb_convert_type(VALUE,int,const char*,const char*); 563VALUE rb_check_convert_type(VALUE,int,const char*,const char*); 564VALUE rb_check_to_integer(VALUE, const char *); 565VALUE rb_check_to_float(VALUE); 566VALUE rb_to_int(VALUE); 567VALUE rb_check_to_int(VALUE); 568VALUE rb_Integer(VALUE); 569VALUE rb_to_float(VALUE); 570VALUE rb_Float(VALUE); 571VALUE rb_String(VALUE); 572VALUE rb_Array(VALUE); 573VALUE rb_Hash(VALUE); 574double rb_cstr_to_dbl(const char*, int); 575double rb_str_to_dbl(VALUE, int); 576/* parse.y */ 577RUBY_EXTERN int ruby_sourceline; 578RUBY_EXTERN char *ruby_sourcefile; 579ID rb_id_attrset(ID); 580int rb_is_const_id(ID); 581int rb_is_global_id(ID); 582int rb_is_instance_id(ID); 583int rb_is_attrset_id(ID); 584int rb_is_class_id(ID); 585int rb_is_local_id(ID); 586int rb_is_junk_id(ID); 587int rb_symname_p(const char*); 588int rb_sym_interned_p(VALUE); 589VALUE rb_backref_get(void); 590void rb_backref_set(VALUE); 591VALUE rb_lastline_get(void); 592void rb_lastline_set(VALUE); 593VALUE rb_sym_all_symbols(void); 594/* process.c */ 595void rb_last_status_set(int status, rb_pid_t pid); 596VALUE rb_last_status_get(void); 597struct rb_exec_arg { 598 VALUE execarg_obj; 599}; 600DEPRECATED(int rb_proc_exec_n(int, VALUE*, const char*)); 601int rb_proc_exec(const char*); 602DEPRECATED(VALUE rb_exec_arg_init(int argc, VALUE *argv, int accept_shell, struct rb_exec_arg *e)); 603DEPRECATED(int rb_exec_arg_addopt(struct rb_exec_arg *e, VALUE key, VALUE val)); 604DEPRECATED(void rb_exec_arg_fixup(struct rb_exec_arg *e)); 605DEPRECATED(int rb_run_exec_options(const struct rb_exec_arg *e, struct rb_exec_arg *s)); 606DEPRECATED(int rb_run_exec_options_err(const struct rb_exec_arg *e, struct rb_exec_arg *s, char*, size_t)); 607DEPRECATED(int rb_exec(const struct rb_exec_arg*)); 608DEPRECATED(int rb_exec_err(const struct rb_exec_arg*, char*, size_t)); 609DEPRECATED(rb_pid_t rb_fork(int*, int (*)(void*), void*, VALUE)); 610DEPRECATED(rb_pid_t rb_fork_err(int*, int (*)(void*, char*, size_t), void*, VALUE, char*, size_t)); 611VALUE rb_f_exec(int,VALUE*); 612rb_pid_t rb_waitpid(rb_pid_t pid, int *status, int flags); 613void rb_syswait(rb_pid_t pid); 614rb_pid_t rb_spawn(int, VALUE*); 615rb_pid_t rb_spawn_err(int, VALUE*, char*, size_t); 616VALUE rb_proc_times(VALUE); 617VALUE rb_detach_process(rb_pid_t pid); 618/* range.c */ 619VALUE rb_range_new(VALUE, VALUE, int); 620VALUE rb_range_beg_len(VALUE, long*, long*, long, int); 621int rb_range_values(VALUE range, VALUE *begp, VALUE *endp, int *exclp); 622/* random.c */ 623unsigned int rb_genrand_int32(void); 624double rb_genrand_real(void); 625void rb_reset_random_seed(void); 626VALUE rb_random_bytes(VALUE rnd, long n); 627VALUE rb_random_int(VALUE rnd, VALUE max); 628unsigned int rb_random_int32(VALUE rnd); 629double rb_random_real(VALUE rnd); 630unsigned long rb_random_ulong_limited(VALUE rnd, unsigned long limit); 631unsigned long rb_genrand_ulong_limited(unsigned long i); 632/* re.c */ 633#define rb_memcmp memcmp 634int rb_memcicmp(const void*,const void*,long); 635void rb_match_busy(VALUE); 636VALUE rb_reg_nth_defined(int, VALUE); 637VALUE rb_reg_nth_match(int, VALUE); 638int rb_reg_backref_number(VALUE match, VALUE backref); 639VALUE rb_reg_last_match(VALUE); 640VALUE rb_reg_match_pre(VALUE); 641VALUE rb_reg_match_post(VALUE); 642VALUE rb_reg_match_last(VALUE); 643#define HAVE_RB_REG_NEW_STR 1 644VALUE rb_reg_new_str(VALUE, int); 645VALUE rb_reg_new(const char *, long, int); 646VALUE rb_reg_alloc(void); 647VALUE rb_reg_init_str(VALUE re, VALUE s, int options); 648VALUE rb_reg_match(VALUE, VALUE); 649VALUE rb_reg_match2(VALUE); 650int rb_reg_options(VALUE); 651/* ruby.c */ 652#define rb_argv rb_get_argv() 653RUBY_EXTERN VALUE rb_argv0; 654VALUE rb_get_argv(void); 655void *rb_load_file(const char*); 656/* signal.c */ 657VALUE rb_f_kill(int, VALUE*); 658#ifdef POSIX_SIGNAL 659#define posix_signal ruby_posix_signal 660RETSIGTYPE (*posix_signal(int, RETSIGTYPE (*)(int)))(int); 661#endif 662void rb_trap_exit(void); 663void rb_trap_exec(void); 664const char *ruby_signal_name(int); 665void ruby_default_signal(int); 666/* sprintf.c */ 667VALUE rb_f_sprintf(int, const VALUE*); 668PRINTF_ARGS(VALUE rb_sprintf(const char*, ...), 1, 2); 669VALUE rb_vsprintf(const char*, va_list); 670PRINTF_ARGS(VALUE rb_str_catf(VALUE, const char*, ...), 2, 3); 671VALUE rb_str_vcatf(VALUE, const char*, va_list); 672VALUE rb_str_format(int, const VALUE *, VALUE); 673/* string.c */ 674VALUE rb_str_new(const char*, long); 675VALUE rb_str_new_cstr(const char*); 676VALUE rb_str_new2(const char*); 677VALUE rb_str_new_shared(VALUE); 678VALUE rb_str_new3(VALUE); 679VALUE rb_str_new_frozen(VALUE); 680VALUE rb_str_new4(VALUE); 681VALUE rb_str_new_with_class(VALUE, const char*, long); 682VALUE rb_str_new5(VALUE, const char*, long); 683VALUE rb_tainted_str_new_cstr(const char*); 684VALUE rb_tainted_str_new(const char*, long); 685VALUE rb_tainted_str_new2(const char*); 686VALUE rb_external_str_new(const char*, long); 687VALUE rb_external_str_new_cstr(const char*); 688VALUE rb_locale_str_new(const char*, long); 689VALUE rb_locale_str_new_cstr(const char*); 690VALUE rb_filesystem_str_new(const char*, long); 691VALUE rb_filesystem_str_new_cstr(const char*); 692VALUE rb_str_buf_new(long); 693VALUE rb_str_buf_new_cstr(const char*); 694VALUE rb_str_buf_new2(const char*); 695VALUE rb_str_tmp_new(long); 696VALUE rb_usascii_str_new(const char*, long); 697VALUE rb_usascii_str_new_cstr(const char*); 698VALUE rb_usascii_str_new2(const char*); 699void rb_str_free(VALUE); 700void rb_str_shared_replace(VALUE, VALUE); 701VALUE rb_str_buf_append(VALUE, VALUE); 702VALUE rb_str_buf_cat(VALUE, const char*, long); 703VALUE rb_str_buf_cat2(VALUE, const char*); 704VALUE rb_str_buf_cat_ascii(VALUE, const char*); 705VALUE rb_obj_as_string(VALUE); 706VALUE rb_check_string_type(VALUE); 707void rb_must_asciicompat(VALUE); 708VALUE rb_str_dup(VALUE); 709VALUE rb_str_resurrect(VALUE str); 710VALUE rb_str_locktmp(VALUE); 711VALUE rb_str_unlocktmp(VALUE); 712VALUE rb_str_dup_frozen(VALUE); 713#define rb_str_dup_frozen rb_str_new_frozen 714VALUE rb_str_plus(VALUE, VALUE); 715VALUE rb_str_times(VALUE, VALUE); 716long rb_str_sublen(VALUE, long); 717VALUE rb_str_substr(VALUE, long, long); 718VALUE rb_str_subseq(VALUE, long, long); 719void rb_str_modify(VALUE); 720void rb_str_modify_expand(VALUE, long); 721VALUE rb_str_freeze(VALUE); 722void rb_str_set_len(VALUE, long); 723VALUE rb_str_resize(VALUE, long); 724VALUE rb_str_cat(VALUE, const char*, long); 725VALUE rb_str_cat2(VALUE, const char*); 726VALUE rb_str_append(VALUE, VALUE); 727VALUE rb_str_concat(VALUE, VALUE); 728st_index_t rb_memhash(const void *ptr, long len); 729st_index_t rb_hash_start(st_index_t); 730st_index_t rb_hash_uint32(st_index_t, uint32_t); 731st_index_t rb_hash_uint(st_index_t, st_index_t); 732st_index_t rb_hash_end(st_index_t); 733#define rb_hash_uint32(h, i) st_hash_uint32((h), (i)) 734#define rb_hash_uint(h, i) st_hash_uint((h), (i)) 735#define rb_hash_end(h) st_hash_end(h) 736st_index_t rb_str_hash(VALUE); 737int rb_str_hash_cmp(VALUE,VALUE); 738int rb_str_comparable(VALUE, VALUE); 739int rb_str_cmp(VALUE, VALUE); 740VALUE rb_str_equal(VALUE str1, VALUE str2); 741VALUE rb_str_drop_bytes(VALUE, long); 742void rb_str_update(VALUE, long, long, VALUE); 743VALUE rb_str_replace(VALUE, VALUE); 744VALUE rb_str_inspect(VALUE); 745VALUE rb_str_dump(VALUE); 746VALUE rb_str_split(VALUE, const char*); 747void rb_str_associate(VALUE, VALUE); 748VALUE rb_str_associated(VALUE); 749void rb_str_setter(VALUE, ID, VALUE*); 750VALUE rb_str_intern(VALUE); 751VALUE rb_sym_to_s(VALUE); 752long rb_str_strlen(VALUE); 753VALUE rb_str_length(VALUE); 754long rb_str_offset(VALUE, long); 755size_t rb_str_capacity(VALUE); 756VALUE rb_str_ellipsize(VALUE, long); 757#if defined(__GNUC__) && !defined(__PCC__) 758#define rb_str_new_cstr(str) __extension__ ( \ 759{ \ 760 (__builtin_constant_p(str)) ? \ 761 rb_str_new((str), (long)strlen(str)) : \ 762 rb_str_new_cstr(str); \ 763}) 764#define rb_tainted_str_new_cstr(str) __extension__ ( \ 765{ \ 766 (__builtin_constant_p(str)) ? \ 767 rb_tainted_str_new((str), (long)strlen(str)) : \ 768 rb_tainted_str_new_cstr(str); \ 769}) 770#define rb_usascii_str_new_cstr(str) __extension__ ( \ 771{ \ 772 (__builtin_constant_p(str)) ? \ 773 rb_usascii_str_new((str), (long)strlen(str)) : \ 774 rb_usascii_str_new_cstr(str); \ 775}) 776#define rb_external_str_new_cstr(str) __extension__ ( \ 777{ \ 778 (__builtin_constant_p(str)) ? \ 779 rb_external_str_new((str), (long)strlen(str)) : \ 780 rb_external_str_new_cstr(str); \ 781}) 782#define rb_locale_str_new_cstr(str) __extension__ ( \ 783{ \ 784 (__builtin_constant_p(str)) ? \ 785 rb_locale_str_new((str), (long)strlen(str)) : \ 786 rb_locale_str_new_cstr(str); \ 787}) 788#define rb_str_buf_new_cstr(str) __extension__ ( \ 789{ \ 790 (__builtin_constant_p(str)) ? \ 791 rb_str_buf_cat(rb_str_buf_new((long)strlen(str)), \ 792 (str), (long)strlen(str)) : \ 793 rb_str_buf_new_cstr(str); \ 794}) 795#define rb_str_buf_cat2(str, ptr) __extension__ ( \ 796{ \ 797 (__builtin_constant_p(ptr)) ? \ 798 rb_str_buf_cat((str), (ptr), (long)strlen(ptr)) : \ 799 rb_str_buf_cat2((str), (ptr)); \ 800}) 801#define rb_str_cat2(str, ptr) __extension__ ( \ 802{ \ 803 (__builtin_constant_p(ptr)) ? \ 804 rb_str_cat((str), (ptr), (long)strlen(ptr)) : \ 805 rb_str_cat2((str), (ptr)); \ 806}) 807#define rb_exc_new2(klass, ptr) __extension__ ( \ 808{ \ 809 (__builtin_constant_p(ptr)) ? \ 810 rb_exc_new((klass), (ptr), (long)strlen(ptr)) : \ 811 rb_exc_new2((klass), (ptr)); \ 812}) 813#endif 814#define rb_str_new2 rb_str_new_cstr 815#define rb_str_new3 rb_str_new_shared 816#define rb_str_new4 rb_str_new_frozen 817#define rb_str_new5 rb_str_new_with_class 818#define rb_tainted_str_new2 rb_tainted_str_new_cstr 819#define rb_str_buf_new2 rb_str_buf_new_cstr 820#define rb_usascii_str_new2 rb_usascii_str_new_cstr 821/* struct.c */ 822VALUE rb_struct_new(VALUE, ...); 823VALUE rb_struct_define(const char*, ...); 824VALUE rb_struct_alloc(VALUE, VALUE); 825VALUE rb_struct_initialize(VALUE, VALUE); 826VALUE rb_struct_aref(VALUE, VALUE); 827VALUE rb_struct_aset(VALUE, VALUE, VALUE); 828VALUE rb_struct_getmember(VALUE, ID); 829DEPRECATED(VALUE rb_struct_iv_get(VALUE, const char*)); 830VALUE rb_struct_s_members(VALUE); 831VALUE rb_struct_members(VALUE); 832VALUE rb_struct_alloc_noinit(VALUE); 833VALUE rb_struct_define_without_accessor(const char *, VALUE, rb_alloc_func_t, ...); 834/* thread.c */ 835typedef void rb_unblock_function_t(void *); 836typedef VALUE rb_blocking_function_t(void *); 837void rb_thread_check_ints(void); 838int rb_thread_interrupted(VALUE thval); 839 840/* Use rb_thread_call_without_gvl family instead. */ 841DEPRECATED(VALUE rb_thread_blocking_region(rb_blocking_function_t *func, void *data1, 842 rb_unblock_function_t *ubf, void *data2)); 843#define RUBY_UBF_IO ((rb_unblock_function_t *)-1) 844#define RUBY_UBF_PROCESS ((rb_unblock_function_t *)-1) 845VALUE rb_mutex_new(void); 846VALUE rb_mutex_locked_p(VALUE mutex); 847VALUE rb_mutex_trylock(VALUE mutex); 848VALUE rb_mutex_lock(VALUE mutex); 849VALUE rb_mutex_unlock(VALUE mutex); 850VALUE rb_mutex_sleep(VALUE self, VALUE timeout); 851VALUE rb_mutex_synchronize(VALUE mutex, VALUE (*func)(VALUE arg), VALUE arg); 852/* time.c */ 853VALUE rb_time_new(time_t, long); 854VALUE rb_time_nano_new(time_t, long); 855VALUE rb_time_num_new(VALUE, VALUE); 856struct timeval rb_time_interval(VALUE num); 857struct timeval rb_time_timeval(VALUE time); 858struct timespec rb_time_timespec(VALUE time); 859/* variable.c */ 860VALUE rb_mod_name(VALUE); 861VALUE rb_class_path(VALUE); 862void rb_set_class_path(VALUE, VALUE, const char*); 863void rb_set_class_path_string(VALUE, VALUE, VALUE); 864VALUE rb_path_to_class(VALUE); 865VALUE rb_path2class(const char*); 866void rb_name_class(VALUE, ID); 867VALUE rb_class_name(VALUE); 868void rb_autoload(VALUE, ID, const char*); 869VALUE rb_autoload_load(VALUE, ID); 870VALUE rb_autoload_p(VALUE, ID); 871VALUE rb_f_trace_var(int, VALUE*); 872VALUE rb_f_untrace_var(int, VALUE*); 873VALUE rb_f_global_variables(void); 874void rb_alias_variable(ID, ID); 875struct st_table* rb_generic_ivar_table(VALUE); 876void rb_copy_generic_ivar(VALUE,VALUE); 877void rb_free_generic_ivar(VALUE); 878VALUE rb_ivar_get(VALUE, ID); 879VALUE rb_ivar_set(VALUE, ID, VALUE); 880VALUE rb_ivar_defined(VALUE, ID); 881void rb_ivar_foreach(VALUE, int (*)(ANYARGS), st_data_t); 882st_index_t rb_ivar_count(VALUE); 883VALUE rb_iv_set(VALUE, const char*, VALUE); 884VALUE rb_iv_get(VALUE, const char*); 885VALUE rb_attr_get(VALUE, ID); 886VALUE rb_obj_instance_variables(VALUE); 887VALUE rb_obj_remove_instance_variable(VALUE, VALUE); 888void *rb_mod_const_at(VALUE, void*); 889void *rb_mod_const_of(VALUE, void*); 890VALUE rb_const_list(void*); 891VALUE rb_mod_constants(int, VALUE *, VALUE); 892VALUE rb_mod_remove_const(VALUE, VALUE); 893int rb_const_defined(VALUE, ID); 894int rb_const_defined_at(VALUE, ID); 895int rb_const_defined_from(VALUE, ID); 896VALUE rb_const_get(VALUE, ID); 897VALUE rb_const_get_at(VALUE, ID); 898VALUE rb_const_get_from(VALUE, ID); 899void rb_const_set(VALUE, ID, VALUE); 900VALUE rb_const_remove(VALUE, ID); 901VALUE rb_mod_const_missing(VALUE,VALUE); 902VALUE rb_cvar_defined(VALUE, ID); 903void rb_cvar_set(VALUE, ID, VALUE); 904VALUE rb_cvar_get(VALUE, ID); 905void rb_cv_set(VALUE, const char*, VALUE); 906VALUE rb_cv_get(VALUE, const char*); 907void rb_define_class_variable(VALUE, const char*, VALUE); 908VALUE rb_mod_class_variables(int, VALUE*, VALUE); 909VALUE rb_mod_remove_cvar(VALUE, VALUE); 910 911ID rb_frame_callee(void); 912VALUE rb_str_succ(VALUE); 913VALUE rb_time_succ(VALUE); 914void rb_frame_pop(void); 915int rb_frame_method_id_and_class(ID *idp, VALUE *klassp); 916VALUE rb_make_backtrace(void); 917VALUE rb_make_exception(int, VALUE*); 918 919#if defined __GNUC__ && __GNUC__ >= 4 920#pragma GCC visibility pop 921#endif 922 923#if defined(__cplusplus) 924#if 0 925{ /* satisfy cc-mode */ 926#endif 927} /* extern "C" { */ 928#endif 929 930#endif /* RUBY_INTERN_H */ 931