Ruby  1.9.3p551(2014-11-13revision48407)
Macros | Functions | Variables
tkutil.c File Reference
#include "ruby.h"
#include "rubysig.h"
#include "st.h"

Go to the source code of this file.

Macros

#define TKUTIL_RELEASE_DATE   "2010-03-26"
 
#define RHASH_TBL(h)   (RHASH(h)->tbl)
 
#define RSTRING_PTR(s)   (RSTRING(s)->ptr)
 
#define RSTRING_LEN(s)   (RSTRING(s)->len)
 
#define RARRAY_PTR(s)   (RARRAY(s)->ptr)
 
#define RARRAY_LEN(s)   (RARRAY(s)->len)
 
#define CBSUBST_TBL_MAX   (256)
 

Functions

 if (rb_block_given_p())
 
 rb_scan_args (argc, argv,"1*",&cmd,&rest)
 
return rb_eval_cmd (cmd, rest, 0)
 
 rb_hash_aset (CALLBACK_TABLE, id_num, cmd)
 
return rb_str_append (rb_str_new2(cmd_id_head), id_num)
 
 if (argc==0)
 
return tk_install_cmd_core (cmd)
 
 StringValue (cmd_id)
 
 if (strncmp(cmd_id_head, RSTRING_PTR(cmd_id), head_len)!=0)
 
 if (strncmp(cmd_id_prefix, RSTRING_PTR(cmd_id)+head_len, prefix_len)!=0)
 
return rb_hash_delete (CALLBACK_TABLE, rb_str_new2(RSTRING_PTR(cmd_id)+head_len))
 
return tk_toUTF8 (1, argv, self)
 
 rb_hash_aset (hash, rb_funcall(key, ID_to_s, 0, 0), value)
 
if NIL_P (keys=rb_convert_type(keys)
 
if NIL_P (sys_enc)
 
if NIL_P (enc_flag)
 
else if (TYPE(enc_flag)==T_TRUE||TYPE(enc_flag)==T_FALSE)
 
 for (idx=0;idx< RARRAY_LEN(ary);idx++)
 
 if (RTEST(dst_enc)&&!NIL_P(sys_enc))
 
 if (NIL_P(ary))
 
 if (key==Qundef)
 
 switch (argc)
 
 switch (TYPE(hash))
 
 if (rb_scan_args(argc, argv,"11",&obj,&enc_flag)==1)
 
return get_eval_string_core (obj, enc_flag, self)
 
 if (argc< 2)
 
 for (size=0, idx=2;idx< argc;idx++)
 
 if (old_gc==Qfalse)
 
 if (RSTRING_PTR(value)==(char *) NULL)
 
 if (len > 1 &&*ptr== '{'&&*(ptr+len-1)== '}')
 
 if (RSTRING_LEN(value)==0)
 
 rb_gc_mark (ptr->aliases)
 
 if (ptr)
 
static VALUE allocate_cbsubst_info (struct cbsubst_info **inf_ptr)
 
static void cbsubst_init ()
 
 Data_Get_Struct (rb_const_get(rb_obj_class(self), ID_SUBST_INFO), struct cbsubst_info, inf)
 
 switch (TYPE(value))
 
 rb_alias (klass, key_id, value_id)
 
 if (TYPE(tbl)!=T_HASH)
 
 Data_Get_Struct (rb_const_get(self, ID_SUBST_INFO), struct cbsubst_info, inf)
 
 rb_hash_foreach (tbl, each_attr_def, self)
 
return rb_funcall (inf->aliases, rb_intern("update"), 1, tbl)
 
 if (TYPE(sym)!=T_SYMBOL)
 
 if (idx >=CBSUBST_TBL_MAX) return sym
 
 if (len=inf->keylen[idx])
 
 xfree (buf)
 
 xfree (keys_buf)
 
 if (rb_scan_args(argc, argv,"21",&key_inf,&longkey_inf,&proc_inf)==2)
 
 if (RARRAY_LEN(longkey_inf) > 125)
 
 rb_const_set (self, ID_SUBST_INFO, cbsubst_obj)
 
void Init_tkutil ()
 

Variables

static VALUE cMethod
 
static VALUE cTclTkLib
 
static VALUE cTkObject
 
static VALUE cTkCallbackEntry
 
static VALUE TK_None
 
static VALUE cCB_SUBST
 
static VALUE cSUBST_INFO
 
static VALUE ENCODING_NAME_UTF8
 
static ID ID_split_tklist
 
static ID ID_toUTF8
 
static ID ID_fromUTF8
 
static ID ID_path
 
static ID ID_at_path
 
static ID ID_at_enc
 
static ID ID_to_eval
 
static ID ID_to_s
 
static ID ID_source
 
static ID ID_downcase
 
static ID ID_install_cmd
 
static ID ID_merge_tklist
 
static ID ID_encoding
 
static ID ID_encoding_system
 
static ID ID_call
 
static ID ID_SUBST_INFO
 
static VALUE CALLBACK_TABLE
 
static unsigned long CALLBACK_ID_NUM = 0
 
static VALUE int argc
 
VALUEargv = str
 
VALUE klass
 
return obj
 
static VALUE VALUE self
 
static const char cmd_id_head [] = "ruby_cmd TkUtil callback "
 
static const char cmd_id_prefix [] = "cmd"
 
static VALUE VALUE cmd
 
 id_num = ULONG2NUM(CALLBACK_ID_NUM++)
 
 else
 
VALUE cmd_id
 
int prefix_len = strlen(cmd_id_prefix)
 
static VALUE VALUE str
 
static int VALUE key
 
VALUE value
 
VALUE hash
 
return ST_CHECK
 
VALUE keys
 
static VALUE VALUE ary = RARRAY_PTR(args)[0]
 
VALUE enc_flag = Qnil
 
volatile VALUE val
 
volatile VALUE str_val
 
volatile VALUE dst = rb_ary_new2(size)
 
volatile VALUE sys_enc = rb_funcall(cTclTkLib, ID_encoding, 0, 0)
 
volatile VALUE dst_enc
 
volatile VALUE str_enc
 
 req_chk_flag = 0
 
 size = RARRAY_LEN(ary)
 
static VALUE VALUE assoc
 
volatile VALUE pair
 
 len = RARRAY_LEN(assoc)
 
VALUE args
 
int thr_crit_bup = rb_thread_critical
 
VALUE old_gc = rb_gc_disable()
 
 rb_thread_critical = Qtrue
 
return Qnil
 
 ptr = RSTRING_PTR(value)
 
int idx
 
int iv_idx
 
return ST_CONTINUE
 
VALUE tbl
 
VALUE sym
 
char * buf
 
ID id = rb_intern(RSTRING_PTR(rb_str_cat2(rb_str_new2("@"), str)))
 
volatile VALUE ret = rb_str_new2(buf)
 
int i
 
volatile VALUE arg_sym
 
volatile VALUE list
 
VALUE keyval
 
int keylen = RSTRING_LEN(arg_key)
 
char * keys_buf
 
char * keys_ptr = keys_buf = ALLOC_N(char, CBSUBST_TBL_MAX + 1)
 
volatile VALUE key_inf
 
volatile VALUE longkey_inf
 
volatile VALUE proc_inf
 
VALUE inf
 
struct cbsubst_info * subst_inf
 
unsigned char chr
 
 cbsubst_obj = allocate_cbsubst_info(&subst_inf)
 
VALUE arg_key
 
VALUE val_ary
 
unsigned char * keyptr = (unsigned char*)RSTRING_PTR(arg_key)
 
int vallen = RARRAY_LEN(val_ary)
 
unsigned char type_chr
 
volatile VALUE proc
 
const char tkutil_release_date [] = TKUTIL_RELEASE_DATE
 

Macro Definition Documentation

#define CBSUBST_TBL_MAX   (256)

Referenced by allocate_cbsubst_info(), and if().

#define RARRAY_LEN (   s)    (RARRAY(s)->len)

Definition at line 35 of file tkutil.c.

Referenced by if(), and NIL_P().

#define RARRAY_PTR (   s)    (RARRAY(s)->ptr)

Definition at line 34 of file tkutil.c.

#define RHASH_TBL (   h)    (RHASH(h)->tbl)
#define RSTRING_LEN (   s)    (RSTRING(s)->len)

Definition at line 31 of file tkutil.c.

#define RSTRING_PTR (   s)    (RSTRING(s)->ptr)

Definition at line 30 of file tkutil.c.

Referenced by switch().

#define TKUTIL_RELEASE_DATE   "2010-03-26"

Definition at line 10 of file tkutil.c.

Function Documentation

static VALUE allocate_cbsubst_info ( struct cbsubst_info **  inf_ptr)
static

Definition at line 1171 of file tkutil.c.

References ALLOC, CBSUBST_TBL_MAX, cSUBST_INFO, Data_Wrap_Struct(), idx, inf, NULL, proc, and rb_hash_new().

Referenced by cbsubst_init().

static void cbsubst_init ( )
static

Definition at line 1200 of file tkutil.c.

References allocate_cbsubst_info(), cCB_SUBST, ID_SUBST_INFO, NULL, and rb_const_set().

Referenced by Init_tkutil().

Data_Get_Struct ( rb_const_get(rb_obj_class(self), ID_SUBST_INFO ,
struct cbsubst_info  ,
inf   
)
Data_Get_Struct ( rb_const_get(self, ID_SUBST_INFO ,
struct cbsubst_info  ,
inf   
)
for ( )

Definition at line 478 of file tkutil.c.

for ( size  = 0)

Definition at line 951 of file tkutil.c.

References RHASH_SIZE, T_HASH, and TYPE.

return get_eval_string_core ( obj  ,
enc_flag  ,
self   
)

Referenced by NIL_P().

if ( rb_block_given_p()  )

Definition at line 90 of file tkutil.c.

References rb_obj_instance_eval(), and rb_obj_instance_exec().

if ( argc  = = 0)

Definition at line 192 of file tkutil.c.

References rb_block_proc().

if ( strncmp(cmd_id_head, RSTRING_PTR(cmd_id), head_len)!  = 0)

Definition at line 209 of file tkutil.c.

References Qnil.

if ( strncmp(cmd_id_prefix, RSTRING_PTR(cmd_id)+head_len, prefix_len)!  = 0)

Definition at line 212 of file tkutil.c.

References Qnil.

else if ( TYPE(enc_flag = T_TRUE || TYPE(enc_flag) == T_FALSE)

Definition at line 468 of file tkutil.c.

if ( RTEST(dst_enc)&&!NIL_P(sys_enc )
if ( NIL_P(ary )

Definition at line 589 of file tkutil.c.

References dst.

if ( key  = Qundef)
Initial value:
{
ID key_id, value_id
unsigned long ID
Definition: ruby.h:89

Definition at line 654 of file tkutil.c.

if ( rb_scan_args(argc, argv,"11",&obj,&enc_flag = = 1)

Definition at line 913 of file tkutil.c.

References Qnil.

if ( )

Definition at line 943 of file tkutil.c.

References rb_eArgError, and rb_raise().

if ( old_gc  = Qfalse)

Definition at line 972 of file tkutil.c.

if ( RSTRING_PTR(value = = (char*)NULL)
Initial value:
{
void rb_check_type(VALUE x, int t)
Definition: error.c:374
volatile VALUE value
Definition: tcltklib.c:9429
#define T_STRING
Definition: ruby.h:418

Definition at line 1062 of file tkutil.c.

if ( len  ,
1 &&*  ptr = = '{' && *(ptr + len - 1) == '}' 
)

Definition at line 1087 of file tkutil.c.

References rb_str_new().

if ( RSTRING_LEN(value = = 0)

Definition at line 1126 of file tkutil.c.

if ( ptr  )

Definition at line 1159 of file tkutil.c.

References CBSUBST_TBL_MAX, free, i, NULL, and xfree.

if ( TYPE(tbl)!  = T_HASH)

Definition at line 1283 of file tkutil.c.

References rb_eArgError, and rb_raise().

if ( TYPE(sym)!  = T_SYMBOL)

Definition at line 1307 of file tkutil.c.

if ( idx >=  CBSUBST_TBL_MAX)
if ( len  = inf->keylen[idx])

Definition at line 1329 of file tkutil.c.

References len.

if ( rb_scan_args(argc, argv,"21",&key_inf,&longkey_inf,&proc_inf = = 2)

Definition at line 1532 of file tkutil.c.

References longkey_inf, and rb_ary_new().

if ( RARRAY_LEN(longkey_inf ,
125   
)

Definition at line 1538 of file tkutil.c.

References rb_eArgError, and rb_raise().

void Init_tkutil ( )
if NIL_P ( keys = rb_convert_type keys)
if NIL_P ( sys_enc  )

Definition at line 460 of file tkutil.c.

References cTclTkLib, ID_encoding_system, ID_to_s, and rb_funcall().

if NIL_P ( enc_flag  )

Definition at line 465 of file tkutil.c.

References sys_enc.

rb_alias ( klass  ,
key_id  ,
value_id   
)
rb_const_set ( self  ,
ID_SUBST_INFO  ,
cbsubst_obj   
)
return rb_eval_cmd ( cmd  ,
rest  ,
 
)
return rb_funcall ( inf->  aliases,
rb_intern("update")  ,
,
tbl   
)
rb_gc_mark ( ptr->  aliases)
rb_hash_aset ( CALLBACK_TABLE  ,
id_num  ,
cmd   
)
rb_hash_aset ( hash  ,
rb_funcall(key, ID_to_s, 0, 0)  ,
value   
)
return rb_hash_delete ( CALLBACK_TABLE  ,
rb_str_new2(RSTRING_PTR(cmd_id)+head_len)   
)

Referenced by Init_Hash(), and recursive_pop().

rb_hash_foreach ( tbl  ,
each_attr_def  ,
self   
)
rb_scan_args ( argc  ,
argv  ,
"1*"  ,
cmd,
rest 
)
return rb_str_append ( rb_str_new2(cmd_id_head ,
id_num   
)
StringValue ( cmd_id  )
switch ( argc  )

Definition at line 758 of file tkutil.c.

References rb_eArgError, and rb_raise().

switch ( TYPE(hash )

Definition at line 772 of file tkutil.c.

References ary, NIL_P, rb_ary_new(), rb_eArgError, rb_raise(), RTEST, T_ARRAY, T_HASH, T_NIL, and TK_None.

switch ( TYPE(value )

Definition at line 1259 of file tkutil.c.

References rb_eArgError, rb_intern, rb_raise(), RSTRING_PTR, SYM2ID, T_STRING, and T_SYMBOL.

return tk_install_cmd_core ( cmd  )
return tk_toUTF8 ( ,
argv  ,
self   
)

Referenced by Init_tkutil().

xfree ( buf  )
xfree ( keys_buf  )

Variable Documentation

VALUE arg_key

Definition at line 1645 of file tkutil.c.

volatile VALUE arg_sym

Definition at line 1359 of file tkutil.c.

VALUE int argc
static
Initial value:
{
return obj
static VALUE VALUE obj
Definition: tcltklib.c:3147

Definition at line 84 of file tkutil.c.

VALUE args

Definition at line 648 of file tkutil.c.

VALUE* argv = str

Definition at line 85 of file tkutil.c.

ary = RARRAY_PTR(args)[0]
static

Definition at line 450 of file tkutil.c.

static VALUE VALUE assoc
static
Initial value:
{
static ID ID_to_s
Definition: tkutil.c:63
return rb_str_append(rb_str_new2(cmd_id_head), id_num)
static int VALUE key
Definition: tkutil.c:265
return rb_funcall(q->proc, ID_call, 0)
VALUE rb_str_new2(const char *)

Definition at line 544 of file tkutil.c.

Referenced by fdbm_select(), fgdbm_select(), fsdbm_select(), pty_open(), rb_str_associate(), and rb_str_new_frozen().

char* buf
Initial value:
{
struct cbsubst_info *inf
struct invoke_info inf
Definition: tcltklib.c:8561

Definition at line 1302 of file tkutil.c.

unsigned long CALLBACK_ID_NUM = 0
static

Definition at line 75 of file tkutil.c.

VALUE CALLBACK_TABLE
static

Definition at line 74 of file tkutil.c.

Referenced by Init_tkutil().

Definition at line 1543 of file tkutil.c.

VALUE cCB_SUBST
static

Definition at line 51 of file tkutil.c.

Referenced by cbsubst_init(), and Init_tkutil().

unsigned char chr

Definition at line 1529 of file tkutil.c.

VALUE VALUE cmd
static

Definition at line 167 of file tkutil.c.

VALUE cmd_id

Definition at line 203 of file tkutil.c.

const char cmd_id_head[] = "ruby_cmd TkUtil callback "
static

Definition at line 162 of file tkutil.c.

const char cmd_id_prefix[] = "cmd"
static

Definition at line 163 of file tkutil.c.

VALUE cMethod
static

Definition at line 42 of file tkutil.c.

Referenced by Init_tkutil().

VALUE cSUBST_INFO
static

Definition at line 52 of file tkutil.c.

Referenced by allocate_cbsubst_info(), and Init_tkutil().

VALUE cTclTkLib
static

Definition at line 44 of file tkutil.c.

Referenced by if(), Init_tkutil(), and NIL_P().

VALUE cTkCallbackEntry
static

Definition at line 47 of file tkutil.c.

Referenced by Init_tkutil().

VALUE cTkObject
static

Definition at line 46 of file tkutil.c.

Referenced by Init_tkutil().

volatile VALUE dst = rb_ary_new2(size)

Definition at line 456 of file tkutil.c.

volatile VALUE dst_enc

Definition at line 457 of file tkutil.c.

Referenced by NIL_P().

else
Initial value:
{
cmd = argv[0]
VALUE * argv
Definition: tcltklib.c:1962
const char * cmd
Definition: tcltklib.c:274

Definition at line 194 of file tkutil.c.

VALUE enc_flag = Qnil

Definition at line 451 of file tkutil.c.

Referenced by NIL_P().

VALUE ENCODING_NAME_UTF8
static

Definition at line 54 of file tkutil.c.

Referenced by if(), Init_tkutil(), and NIL_P().

static VALUE VALUE hash
Initial value:
{
return ary2list2(hash2kv(hash, Qnil, self), Qfalse, self)
#define Qnil
Definition: ruby.h:367
VALUE hash
Definition: tkutil.c:267
return Qfalse
Definition: tcltklib.c:6768

Definition at line 267 of file tkutil.c.

Referenced by ary_add_hash(), ary_add_hash_by(), ary_make_hash(), ary_make_hash_by(), ary_tmp_hash_new(), BigDecimal_hash(), count_nodes(), count_objects(), count_objects_size(), count_tdata_objects(), cto_i(), date__httpdate(), date__iso8601(), date__jisx0301(), date__parse(), date__rfc2822(), date__rfc3339(), date__strptime(), date__xmlschema(), date_s__parse_internal(), date_s__strptime_internal(), date_s_httpdate(), date_s_iso8601(), date_s_jisx0301(), date_s_parse(), date_s_rfc2822(), date_s_rfc3339(), date_s_strptime(), date_s_xmlschema(), datetime_s_httpdate(), datetime_s_iso8601(), datetime_s_jisx0301(), datetime_s_parse(), datetime_s_rfc2822(), datetime_s_rfc3339(), datetime_s_strptime(), datetime_s_xmlschema(), debug_lines(), enum_group_by(), env_to_hash(), fdbm_invert(), fdbm_to_hash(), fgdbm_invert(), fgdbm_to_hash(), flo_hash(), fsdbm_invert(), fsdbm_to_hash(), gc_stat(), get_hash(), hash_alloc(), id_hash_new(), if(), Init_ossl_x509name(), iseq_data_to_ary(), match(), method_hash(), ossl_dh_get_params(), ossl_dsa_get_params(), ossl_rsa_get_params(), ossl_sslctx_get_session_cache_stats(), ossl_x509name_hash(), proc_hash(), rb_ary_and(), rb_ary_diff(), rb_ary_or(), rb_ary_uniq(), rb_ary_uniq_bang(), rb_big_hash(), rb_exec_getargs(), rb_hash_clear(), rb_hash_compare_by_id(), rb_hash_delete_if(), rb_hash_each_key(), rb_hash_each_pair(), rb_hash_each_value(), rb_hash_foreach(), rb_hash_initialize(), rb_hash_keep_if(), rb_hash_rehash(), rb_hash_reject_bang(), rb_hash_replace(), rb_hash_s_create(), rb_hash_select_bang(), rb_hash_to_hash(), rb_reg_named_captures(), rb_scan_args(), rb_str_format(), rb_str_sub_bang(), recursive_hash(), recursive_list_access(), reg_named_captures_iter(), rt_complete_frags(), rt_rewrite_frags(), sdbm_store(), set_zero(), set_zero_i(), str_gsub(), subs(), switch(), and tr_trans().

int i

Definition at line 1357 of file tkutil.c.

Definition at line 1304 of file tkutil.c.

ID ID_at_enc
static

Definition at line 61 of file tkutil.c.

Referenced by if(), Init_tkutil(), and NIL_P().

ID ID_at_path
static

Definition at line 60 of file tkutil.c.

Referenced by Init_tkutil().

ID ID_call
static

Definition at line 70 of file tkutil.c.

Referenced by Init_tkutil().

ID ID_downcase
static

Definition at line 65 of file tkutil.c.

Referenced by Init_tkutil().

ID ID_encoding
static

Definition at line 68 of file tkutil.c.

Referenced by Init_tkutil(), and NIL_P().

ID ID_encoding_system
static

Definition at line 69 of file tkutil.c.

Referenced by Init_tkutil(), and NIL_P().

ID ID_fromUTF8
static

Definition at line 58 of file tkutil.c.

Referenced by if(), Init_tkutil(), and NIL_P().

ID ID_install_cmd
static

Definition at line 66 of file tkutil.c.

Referenced by Init_tkutil().

ID ID_merge_tklist
static

Definition at line 67 of file tkutil.c.

Referenced by if(), Init_tkutil(), and NIL_P().

Definition at line 171 of file tkutil.c.

ID ID_path
static

Definition at line 59 of file tkutil.c.

Referenced by Init_tkutil().

ID ID_source
static

Definition at line 64 of file tkutil.c.

Referenced by Init_tkutil().

ID ID_split_tklist
static

Definition at line 56 of file tkutil.c.

Referenced by Init_tkutil().

ID ID_SUBST_INFO
static

Definition at line 72 of file tkutil.c.

Referenced by cbsubst_init(), and Init_tkutil().

ID ID_to_eval
static

Definition at line 62 of file tkutil.c.

Referenced by Init_tkutil().

ID ID_to_s
static

Definition at line 63 of file tkutil.c.

Referenced by Init_tkutil(), and NIL_P().

ID ID_toUTF8
static

Definition at line 57 of file tkutil.c.

Referenced by if(), Init_tkutil(), and NIL_P().

int idx
Initial value:
{
struct cbsubst_info *inf
struct invoke_info inf
Definition: tcltklib.c:8561

Definition at line 1211 of file tkutil.c.

VALUE inf

Definition at line 1525 of file tkutil.c.

int iv_idx

Definition at line 1211 of file tkutil.c.

char * key
static
Initial value:
{
return val
parser parser_yylval val
Definition: ripper.c:14289

Definition at line 265 of file tkutil.c.

Referenced by check_deadlock_i(), check_exec_env_i(), check_exec_options_i(), cto_i(), env_fetch(), env_shift(), fc_i(), fdbm_clear(), fdbm_delete(), fdbm_delete_if(), fdbm_each_key(), fdbm_each_pair(), fdbm_each_value(), fdbm_empty_p(), fdbm_fetch(), fdbm_has_key(), fdbm_has_value(), fdbm_invert(), fdbm_key(), fdbm_keys(), fdbm_length(), fdbm_select(), fdbm_shift(), fdbm_store(), fdbm_to_a(), fdbm_to_hash(), fdbm_values(), fgdbm_clear(), fgdbm_empty_p(), fgdbm_has_key(), fgdbm_length(), fgdbm_store(), fgdbm_values(), force_chain_object(), fsdbm_clear(), fsdbm_delete(), fsdbm_delete_if(), fsdbm_each_key(), fsdbm_each_pair(), fsdbm_each_value(), fsdbm_empty_p(), fsdbm_fetch(), fsdbm_has_key(), fsdbm_has_value(), fsdbm_invert(), fsdbm_key(), fsdbm_keys(), fsdbm_length(), fsdbm_select(), fsdbm_shift(), fsdbm_store(), fsdbm_to_a(), fsdbm_to_hash(), fsdbm_values(), generate_json_object(), generic_ivar_remove(), getnext(), getnkey(), hash2named_arg(), hash2ptr_dispparams(), hash_foreach_iter(), if(), iseq_compile_each(), key_i(), load_unlock(), map_charset(), obj_ivar_each(), oletypelib_path(), onig_st_insert_strend(), onig_st_lookup_strend(), ossl_call_client_cert_cb(), ossl_cipher_init(), ossl_cipher_initialize(), ossl_cipher_pkcs5_keyivgen(), ossl_cipher_set_key(), ossl_pkcs12_initialize(), ossl_pkcs12_s_create(), ossl_pkcs7_decrypt(), ossl_pkcs7_s_sign(), ossl_spki_set_public_key(), ossl_sslctx_setup(), ossl_x509_set_public_key(), ossl_x509req_set_public_key(), parse_exp(), r_leave(), r_object0(), rb_enc_aliases_enc_i(), rb_free_generic_ivar(), rb_gdbm_delete(), rb_gdbm_fetch2(), rb_gdbm_firstkey(), rb_gdbm_nextkey(), rb_hash_default(), rb_hash_fetch_m(), rb_hash_s_create(), rb_run_exec_options_err(), rb_w32_close(), remove_method(), run_final(), set_threads_event_flags_i(), shift_i_safe(), splpage(), st_foreach(), st_insert2(), syck_map_add(), syck_map_initialize(), syck_map_value_set(), terminate_atfork_before_exec_i(), terminate_atfork_i(), terminate_i(), tr_setup_table(), and update_char_offset().

volatile VALUE key_inf
Initial value:
{
volatile VALUE cbsubst_obj
unsigned long VALUE
Definition: ruby.h:88
cbsubst_obj
Definition: tkutil.c:1543

Definition at line 1520 of file tkutil.c.

int keylen = RSTRING_LEN(arg_key)

Definition at line 1425 of file tkutil.c.

unsigned char* keyptr = (unsigned char*)RSTRING_PTR(arg_key)

Definition at line 1650 of file tkutil.c.

VALUE keys
char* keys_buf

Definition at line 1475 of file tkutil.c.

* keys_ptr = keys_buf = ALLOC_N(char, CBSUBST_TBL_MAX + 1)

Definition at line 1475 of file tkutil.c.

VALUE keyval

Definition at line 1424 of file tkutil.c.

int VALUE klass

Definition at line 86 of file tkutil.c.

len = RARRAY_LEN(assoc)

Definition at line 559 of file tkutil.c.

list
Initial value:
{
struct cbsubst_info *inf
struct invoke_info inf
Definition: tcltklib.c:8561

Definition at line 1420 of file tkutil.c.

volatile VALUE longkey_inf

Definition at line 1523 of file tkutil.c.

Referenced by if().

return obj

Definition at line 97 of file tkutil.c.

old_gc = rb_gc_disable()

Definition at line 941 of file tkutil.c.

volatile VALUE pair
Initial value:
{
int i, j, len
register unsigned int len
Definition: name2ctype.h:22210
ssize_t i
Definition: bigdecimal.c:5519

Definition at line 553 of file tkutil.c.

Referenced by addrinfo_mload(), decorate_convpath(), pipe_open(), rb_econv_init_by_convpath(), rb_run_exec_options_err(), and rb_w32_socketpair().

int prefix_len = strlen(cmd_id_prefix)

Definition at line 206 of file tkutil.c.

volatile VALUE proc

Definition at line 1655 of file tkutil.c.

volatile VALUE proc_inf

Definition at line 1524 of file tkutil.c.

* ptr = RSTRING_PTR(value)

Definition at line 1084 of file tkutil.c.

return Qnil
Initial value:
{
"invalid value for Number: '%s'", RSTRING_PTR(value))
void rb_raise(VALUE exc, const char *fmt,...)
Definition: error.c:1574
volatile VALUE value
Definition: tcltklib.c:9429
#define RSTRING_PTR(s)
Definition: tkutil.c:30
VALUE rb_eArgError
Definition: error.c:468

Definition at line 1041 of file tkutil.c.

rb_thread_critical = Qtrue

Definition at line 948 of file tkutil.c.

req_chk_flag = 0

Definition at line 473 of file tkutil.c.

Referenced by NIL_P().

Definition at line 1305 of file tkutil.c.

static VALUE VALUE self
static
Initial value:
{
return rb_str_new2("")
VALUE rb_str_new2(const char *)

Definition at line 104 of file tkutil.c.

size = RARRAY_LEN(ary)

Definition at line 476 of file tkutil.c.

return ST_CHECK

Definition at line 271 of file tkutil.c.

Referenced by foreach_safe_i(), hash_foreach_iter(), numhash_i(), and st_foreach().

return ST_CONTINUE

Definition at line 1273 of file tkutil.c.

Referenced by asciicompat_encoding_i(), assoc_i(), cdhash_each(), check_deadlock_i(), check_exec_env_i(), clear_coverage_i(), clear_trace_func_i(), clone_const(), clone_method(), coverage_result_i(), cv_i(), delete_if_i(), each_key_i(), each_pair_i(), each_value_i(), enc_names_i(), env_replace_i(), env_update_i(), eql_i(), fc_i(), force_chain_object(), foreach_safe_i(), free_const_entry_i(), free_method_entry_i(), givar_i(), givar_mark_i(), gvar_i(), hash_each(), hash_foreach_iter(), hash_i(), i_names(), i_renumber_name(), ins_methods_push(), inspect_i(), ivar_i(), keep_if_i(), key_i(), keys_i(), list_i(), loaded_feature_path_i(), mark_const_entry_i(), mark_entry(), mark_global_entry(), mark_key(), mark_keyvalue(), mark_marshal_compat_i(), mark_method_entry_i(), match_i(), method_entry_i(), numhash_i(), obj_ivar_i(), push_value(), rassoc_i(), rb_enc_aliases_enc_i(), rb_enc_name_list_i(), rb_exec_arg_addopt(), rb_hash_invert_i(), rb_hash_rehash_i(), rb_hash_search_value(), rb_hash_update_block_i(), rb_hash_update_func_i(), rb_hash_update_i(), reg_named_capture_assign_iter(), replace_i(), running_vm_event_hooks(), select_i(), set_threads_event_flags_i(), set_zero(), set_zero_i(), shift_i_safe(), st_foreach(), sv_i(), syck_st_free_anchors(), syck_st_free_nodes(), syck_st_free_syms(), syck_st_mark_nodes(), symbols_i(), terminate_atfork_before_exec_i(), terminate_atfork_i(), terminate_i(), thgroup_list_i(), thread_fd_close_i(), thread_keys_i(), thread_list_i(), to_a_i(), transcode_search_path_i(), validate_label(), values_i(), vm_mark_each_thread_func(), and w_obj_each().

VALUE str
static
Initial value:
{
static ID ID_fromUTF8
Definition: tkutil.c:58
VALUE * argv
Definition: tcltklib.c:1962
VALUE rb_funcall2(VALUE, ID, int, const VALUE *)
Calls a method.
Definition: vm_eval.c:669
int argc
Definition: tcltklib.c:1961
static VALUE cTclTkLib
Definition: tkutil.c:44

Definition at line 235 of file tkutil.c.

volatile VALUE str_enc

Definition at line 457 of file tkutil.c.

Referenced by NIL_P(), rb_enc_cr_str_buf_cat(), rb_reg_regsub(), rb_str_sub_bang(), and str_gsub().

volatile VALUE str_val

Definition at line 453 of file tkutil.c.

Referenced by if(), and NIL_P().

struct cbsubst_info* subst_inf

Definition at line 1527 of file tkutil.c.

VALUE sym
sys_enc = rb_funcall(cTclTkLib, ID_encoding, 0, 0)

Definition at line 457 of file tkutil.c.

Referenced by NIL_P().

VALUE tbl
int thr_crit_bup = rb_thread_critical

Definition at line 940 of file tkutil.c.

VALUE TK_None
static

Definition at line 49 of file tkutil.c.

Referenced by Init_tkutil(), NIL_P(), and switch().

const char tkutil_release_date[] = TKUTIL_RELEASE_DATE

Definition at line 1729 of file tkutil.c.

unsigned char type_chr

Definition at line 1653 of file tkutil.c.

VALUE val
Initial value:
{
int idx
Definition: tcltklib.c:9703
req_chk_flag
Definition: tkutil.c:473
int size
Definition: encoding.c:51

Definition at line 453 of file tkutil.c.

VALUE val_ary

Definition at line 1646 of file tkutil.c.

int vallen = RARRAY_LEN(val_ary)

Definition at line 1652 of file tkutil.c.

int VALUE value
Initial value:
{
volatile VALUE value
Definition: tcltklib.c:9429
#define RSTRING_PTR(s)
Definition: tkutil.c:30
VALUE rb_cstr_to_inum(const char *str, int base, int badcheck)
Definition: bignum.c:567

Definition at line 266 of file tkutil.c.