class MultiTkIp
methods for construction
get target IP
get info
instance methods to treat tables
class methods to treat tables
for callback operation
pseudo-toplevel operation support
evaluate a procedure on the proper interpreter
event loop all master/slave IPs are controlled by only one event-loop
depend on TclTkIp
interp command support
- Safe Base
-
manipulating safe interpreter
Constants
- BASE_DIR
- INTERP_MUTEX
- INTERP_ROOT_CHECK
- INTERP_THREAD
- INTERP_THREAD_STATUS
- RUN_EVENTLOOP_ON_MAIN_THREAD
Ruby 1.9 !!!!!!!!!!!!!!!!!!!!!!!!!!
- WITH_ENCODING
- WITH_RUBY_VM
Attributes
cmd[R]
ip[R]
ret[RW]
target[RW]
Public Class Methods
_DEFAULT_MASTER()
click to toggle source
# File lib/remote-tk.rb, line 22 def self._DEFAULT_MASTER # work only once if @flag @flag = nil @@DEFAULT_MASTER else nil end end
_IP_TABLE()
click to toggle source
# File lib/remote-tk.rb, line 18 def self._IP_TABLE; @@IP_TABLE; end
_TK_TABLE_LIST()
click to toggle source
# File lib/remote-tk.rb, line 19 def self._TK_TABLE_LIST; @@TK_TABLE_LIST; end
__getip()
click to toggle source
# File lib/multi-tk.rb, line 1527 def self.__getip current = Thread.current if current.kind_of?(@@CALLBACK_SUBTHREAD) return current[:callback_ip] end if TclTkLib.mainloop_thread? != false && current[:callback_ip] return current[:callback_ip] end if current.group == ThreadGroup::Default @@DEFAULT_MASTER else ip = @@IP_TABLE[current.group] unless ip fail SecurityError, "cannot call Tk methods on #{Thread.current.inspect}" end ip end end
__init_ip_env__(table, script)
click to toggle source
# File lib/multi-tk.rb, line 957 def self.__init_ip_env__(table, script) ret = [] mtx = (Thread.current[:MultiTk_ip_Mutex] ||= Mutex.new) cond = (Thread.current[:MultiTk_ip_CondVar] ||= ConditionVariable.new) mtx.synchronize{ @init_ip_env_queue.enq([mtx, cond, ret, table, script]) cond.wait(mtx) } if ret[0].kind_of?(Exception) raise ret[0] else ret[0] end end
__pseudo_toplevel()
click to toggle source
# File lib/multi-tk.rb, line 846 def self.__pseudo_toplevel Thread.current.group == ThreadGroup::Default && MultiTkIp.__getip == @@DEFAULT_MASTER && self.__pseudo_toplevel_evaluable? && @pseudo_toplevel[1] end
__pseudo_toplevel=(m)
click to toggle source
# File lib/multi-tk.rb, line 852 def self.__pseudo_toplevel=(m) unless (Thread.current.group == ThreadGroup::Default && MultiTkIp.__getip == @@DEFAULT_MASTER) fail SecurityError, "no permission to manipulate" end # if m.kind_of?(Module) && m.respond_to?(:pseudo_toplevel_evaluable?) if m.respond_to?(:pseudo_toplevel_evaluable?) @pseudo_toplevel[0] = true @pseudo_toplevel[1] = m else fail ArgumentError, 'fail to set pseudo-toplevel' end self end
__pseudo_toplevel_evaluable=(mode)
click to toggle source
# File lib/multi-tk.rb, line 876 def self.__pseudo_toplevel_evaluable=(mode) unless (Thread.current.group == ThreadGroup::Default && MultiTkIp.__getip == @@DEFAULT_MASTER) fail SecurityError, "no permission to manipulate" end @pseudo_toplevel[0] = (mode)? true: false end
__pseudo_toplevel_evaluable?()
click to toggle source
# File lib/multi-tk.rb, line 868 def self.__pseudo_toplevel_evaluable? begin @pseudo_toplevel[0] && @pseudo_toplevel[1].pseudo_toplevel_evaluable? rescue Exception false end end
_conv_listelement(arg)
click to toggle source
# File lib/multi-tk.rb, line 2676 def _conv_listelement(arg) __getip._conv_listelement(arg) end
_create_console()
click to toggle source
# File lib/multi-tk.rb, line 2680 def _create_console __getip._create_console end
_eval(str)
click to toggle source
# File lib/multi-tk.rb, line 2584 def _eval(str) __getip._eval(str) end
_eval_with_enc(str)
click to toggle source
# File lib/multi-tk.rb, line 2600 def _eval_with_enc(str) __getip._eval_with_enc(str) end
_eval_without_enc(str)
click to toggle source
# File lib/multi-tk.rb, line 2592 def _eval_without_enc(str) __getip._eval_without_enc(str) end
_fromUTF8(str, encoding=nil)
click to toggle source
# File lib/multi-tk.rb, line 2612 def _fromUTF8(str, encoding=nil) __getip._fromUTF8(str, encoding) end
_get_global_var(var)
click to toggle source
# File lib/multi-tk.rb, line 2647 def _get_global_var(var) __getip._get_global_var(var) end
_get_global_var2(var, idx)
click to toggle source
# File lib/multi-tk.rb, line 2650 def _get_global_var2(var, idx) __getip._get_global_var2(var, idx) end
_get_variable(var, flag)
click to toggle source
# File lib/multi-tk.rb, line 2628 def _get_variable(var, flag) __getip._get_variable(var, flag) end
_get_variable2(var, idx, flag)
click to toggle source
# File lib/multi-tk.rb, line 2631 def _get_variable2(var, idx, flag) __getip._get_variable2(var, idx, flag) end
_invoke(*args)
click to toggle source
# File lib/multi-tk.rb, line 2588 def _invoke(*args) __getip._invoke(*args) end
_invoke_with_enc(*args)
click to toggle source
# File lib/multi-tk.rb, line 2604 def _invoke_with_enc(*args) __getip._invoke_with_enc(*args) end
_invoke_without_enc(*args)
click to toggle source
# File lib/multi-tk.rb, line 2596 def _invoke_without_enc(*args) __getip._invoke_without_enc(*args) end
_ip_id_()
click to toggle source
# File lib/multi-tk.rb, line 1519 def self._ip_id_ __getip._ip_id_ end
_merge_tklist(*args)
click to toggle source
# File lib/multi-tk.rb, line 2673 def _merge_tklist(*args) __getip._merge_tklist(*args) end
_proc_on_current_safelevel(cmd=nil, &blk)
click to toggle source
# File lib/multi-tk.rb, line 2135 def MultiTkIp._proc_on_current_safelevel(cmd=nil, &blk) MultiTkIp.__getip._proc_on_current_safelevel(cmd, &blk) end
_proc_on_safelevel(cmd=nil, &blk)
click to toggle source
# File lib/multi-tk.rb, line 2126 def MultiTkIp._proc_on_safelevel(cmd=nil, &blk) MultiTkIp.__getip._proc_on_safelevel(cmd, &blk) end
_return_value()
click to toggle source
# File lib/multi-tk.rb, line 2624 def _return_value __getip._return_value end
_set_global_var(var, value)
click to toggle source
# File lib/multi-tk.rb, line 2653 def _set_global_var(var, value) __getip._set_global_var(var, value) end
_set_global_var2(var, idx, value)
click to toggle source
# File lib/multi-tk.rb, line 2656 def _set_global_var2(var, idx, value) __getip._set_global_var2(var, idx, value) end
_set_variable(var, value, flag)
click to toggle source
# File lib/multi-tk.rb, line 2634 def _set_variable(var, value, flag) __getip._set_variable(var, value, flag) end
_set_variable2(var, idx, value, flag)
click to toggle source
# File lib/multi-tk.rb, line 2637 def _set_variable2(var, idx, value, flag) __getip._set_variable2(var, idx, value, flag) end
_split_tklist(str)
click to toggle source
# File lib/multi-tk.rb, line 2670 def _split_tklist(str) __getip._split_tklist(str) end
_thread_tkwait(mode, target)
click to toggle source
# File lib/multi-tk.rb, line 2620 def _thread_tkwait(mode, target) __getip._thread_tkwait(mode, target) end
_thread_vwait(var)
click to toggle source
# File lib/multi-tk.rb, line 2616 def _thread_vwait(var) __getip._thread_vwait(var) end
_toUTF8(str, encoding=nil)
click to toggle source
# File lib/multi-tk.rb, line 2608 def _toUTF8(str, encoding=nil) __getip._toUTF8(str, encoding) end
_unset_global_var(var)
click to toggle source
# File lib/multi-tk.rb, line 2659 def _unset_global_var(var) __getip._unset_global_var(var) end
_unset_global_var2(var, idx)
click to toggle source
# File lib/multi-tk.rb, line 2662 def _unset_global_var2(var, idx) __getip._unset_global_var2(var, idx) end
_unset_variable(var, flag)
click to toggle source
# File lib/multi-tk.rb, line 2640 def _unset_variable(var, flag) __getip._unset_variable(var, flag) end
_unset_variable2(var, idx, flag)
click to toggle source
# File lib/multi-tk.rb, line 2643 def _unset_variable2(var, idx, flag) __getip._unset_variable2(var, idx, flag) end
abort(msg = nil)
click to toggle source
# File lib/multi-tk.rb, line 2561 def abort(msg = nil) __getip.abort(msg) end
add_tk_procs(name, args=nil, body=nil)
click to toggle source
# File lib/multi-tk.rb, line 1876 def self.add_tk_procs(name, args=nil, body=nil) if name.kind_of?(Array) # => an array of [name, args, body] name.each{|param| self.add_tk_procs(*param)} else name = name.to_s @@ADD_TK_PROCS << [name, args, body] @@IP_TABLE.each{|tg, ip| ip._add_tk_procs(name, args, body) } end end
alias_delete(slave, cmd_name)
click to toggle source
# File lib/multi-tk.rb, line 3191 def self.alias_delete(slave, cmd_name) __getip.alias_delete(slave, cmd_name) self end
alias_info(slave, cmd_name)
click to toggle source
# File lib/multi-tk.rb, line 3182 def self.alias_info(slave, cmd_name) __getip.alias_info(slave, cmd_name) end
alias_target(aliascmd, slave = '')
click to toggle source
# File lib/multi-tk.rb, line 3422 def self.alias_target(aliascmd, slave = '') __getip.alias_target(aliascmd, slave) end
aliases(slave = '')
click to toggle source
# File lib/multi-tk.rb, line 3211 def self.aliases(slave = '') __getip.aliases(slave) end
alive?()
click to toggle source
# File lib/multi-tk.rb, line 1689 def self.alive? __getip.alive? end
allow_ruby_exit=(mode)
click to toggle source
# File lib/multi-tk.rb, line 2541 def allow_ruby_exit= (mode) __getip.allow_ruby_exit = mode end
allow_ruby_exit?()
click to toggle source
# File lib/multi-tk.rb, line 2537 def allow_ruby_exit? __getip.allow_ruby_exit? end
assign_receiver_and_watchdog(target)
click to toggle source
# File lib/multi-tk.rb, line 924 def self.assign_receiver_and_watchdog(target) ret = [nil] @assign_thread.raise(@assign_request.new(target, ret)) while ret[0] == nil unless @assign_thread.alive? raise RuntimeError, 'lost the thread to assign a receiver and a watchdog thread' end end if ret[0].kind_of?(Exception) raise ret[0] else ret[0] end end
bg_eval(*args, &blk)
click to toggle source
# File lib/multi-tk.rb, line 2462 def bg_eval(*args, &blk) # class ==> interp object __getip.bg_eval(*args, &blk) end
Also aliased as: background_eval
bg_eval_proc(*args, &blk)
click to toggle source
# File lib/multi-tk.rb, line 2435 def bg_eval_proc(*args, &blk) # class ==> interp object __getip.bg_eval_proc(*args, &blk) end
bg_eval_string(cmd, *eval_args)
click to toggle source
# File lib/multi-tk.rb, line 2450 def bg_eval_string(cmd, *eval_args) # class ==> interp object __getip.bg_eval_string(cmd, *eval_args) end
bgerror(cmd = Proc.new, slave = nil, &b)
click to toggle source
# File lib/multi-tk.rb, line 3364 def self.bgerror(cmd = Proc.new, slave = nil, &b) __getip.bgerror(cmd, slave, &b) end
cb_entry_class()
click to toggle source
# File lib/multi-tk.rb, line 1907 def self.cb_entry_class @@CB_ENTRY_CLASS end
cb_eval(cmd, *args)
click to toggle source
# File lib/tk.rb, line 1455 def INTERP.cb_eval(cmd, *args) TkUtil._get_eval_string(TkUtil.eval_cmd(cmd, *args)) end
create_table()
click to toggle source
# File lib/multi-tk.rb, line 1819 def self.create_table if __getip.slave? begin raise SecurityError, "slave-IP has no permission creating a new table" rescue SecurityError => e #p e.backtrace # Is called on a Ruby/Tk library? caller_info = e.backtrace[1] if caller_info =~ %r{^#{MultiTkIp::BASE_DIR}/(tk|tkextlib)/[^:]+\.rb:} # Probably, caller is a Ruby/Tk library --> allow creating else raise e end end end id = @@TK_TABLE_LIST.size obj = Object.new @@TK_TABLE_LIST << obj obj.instance_variable_set(:@id, id) obj.instance_variable_set(:@mutex, Mutex.new) obj.instance_eval{ def self.mutex @mutex end def self.method_missing(m, *args) MultiTkIp.tk_object_table(@id).__send__(m, *args) end } obj.freeze @@IP_TABLE.each{|tg, ip| ip._add_new_tables } return obj end
def_alias(slave, new_cmd, org_cmd, *args)
click to toggle source
# File lib/multi-tk.rb, line 3202 def self.def_alias(slave, new_cmd, org_cmd, *args) ret = __getip.def_alias(slave, new_cmd, org_cmd, *args) (ret == new_cmd)? self: nil end
default_encoding=(enc)
click to toggle source
# File lib/multi-tk.rb, line 3603 def default_encoding=(enc) __getip.default_encoding=(enc) end
default_master?()
click to toggle source
# File lib/multi-tk.rb, line 2473 def self.default_master? __getip == @@DEFAULT_MASTER end
delete()
click to toggle source
# File lib/multi-tk.rb, line 2545 def delete __getip.delete end
delete_cmd(slave, cmd)
click to toggle source
# File lib/multi-tk.rb, line 3241 def self.delete_cmd(slave, cmd) __getip.delete_cmd(slave, cmd) self end
delete_slaves(*args)
click to toggle source
# File lib/multi-tk.rb, line 3221 def self.delete_slaves(*args) __getip.delete_slaves(*args) self end
deleted?()
click to toggle source
# File lib/multi-tk.rb, line 2549 def deleted? __getip.deleted? end
do_one_event(flag = TclTkLib::EventFlag::ALL)
click to toggle source
# File lib/multi-tk.rb, line 2484 def do_one_event(flag = TclTkLib::EventFlag::ALL) __getip.do_one_event(flag) end
encoding=(enc)
click to toggle source
# File lib/multi-tk.rb, line 3607 def encoding=(enc) __getip.encoding=(enc) end
encoding_convertfrom(str, enc=None)
click to toggle source
# File lib/multi-tk.rb, line 3621 def encoding_convertfrom(str, enc=None) __getip.encoding_convertfrom(str, enc) end
Also aliased as: encoding_convert_from
encoding_convertto(str, enc=None)
click to toggle source
# File lib/multi-tk.rb, line 3626 def encoding_convertto(str, enc=None) __getip.encoding_convertto(str, enc) end
Also aliased as: encoding_convert_to
encoding_name()
click to toggle source
# File lib/multi-tk.rb, line 3611 def encoding_name __getip.encoding_name end
Also aliased as: encoding, default_encoding
encoding_obj()
click to toggle source
# File lib/multi-tk.rb, line 3615 def encoding_obj __getip.encoding_obj end
encoding_table()
click to toggle source
# File lib/multi-tk.rb, line 3591 def encoding_table __getip.encoding_table end
eval(*args, &blk)
click to toggle source
# File lib/multi-tk.rb, line 2458 def eval(*args, &blk) # class ==> interp object __getip.eval(*args, &blk) end
eval_proc(*args, &blk)
click to toggle source
class method
# File lib/multi-tk.rb, line 2429 def eval_proc(*args, &blk) # class ==> interp object __getip.eval_proc(*args, &blk) end
Also aliased as: call
eval_string(cmd, *eval_args)
click to toggle source
# File lib/multi-tk.rb, line 2444 def eval_string(cmd, *eval_args) # class ==> interp object __getip.eval_string(cmd, *eval_args) end
Also aliased as: eval_str
exist?(slave = '')
click to toggle source
# File lib/multi-tk.rb, line 3231 def self.exist?(slave = '') __getip.exist?(slave) end
exit(st = true)
click to toggle source
# File lib/multi-tk.rb, line 2565 def exit(st = true) __getip.exit(st) end
exit!(st = false)
click to toggle source
# File lib/multi-tk.rb, line 2569 def exit!(st = false) __getip.exit!(st) end
expose_cmd(slave, cmd, aliasname = nil)
click to toggle source
# File lib/multi-tk.rb, line 3255 def self.expose_cmd(slave, cmd, aliasname = nil) __getip.expose_cmd(slave, cmd, aliasname) self end
force_default_encoding=(mode)
click to toggle source
# File lib/multi-tk.rb, line 3595 def force_default_encoding=(mode) __getip.force_default_encoding=(mode) end
force_default_encoding?()
click to toggle source
# File lib/multi-tk.rb, line 3599 def force_default_encoding? __getip.force_default_encoding? end
get_cb_entry(cmd)
click to toggle source
# File lib/multi-tk.rb, line 1910 def self.get_cb_entry(cmd) @@CB_ENTRY_CLASS.new(__getip, cmd).freeze end
get_eventloop_tick()
click to toggle source
# File lib/multi-tk.rb, line 2498 def get_eventloop_tick __getip.get_eventloop_tick end
get_eventloop_weight()
click to toggle source
# File lib/multi-tk.rb, line 2510 def get_eventloop_weight __getip.get_eventloop_weight end
get_limit(limit_type, slave = '', slot = nil)
click to toggle source
# File lib/multi-tk.rb, line 3405 def self.get_limit(limit_type, slave = '', slot = nil) __getip.get_limit(limit_type, slave, slot) end
get_no_event_wait()
click to toggle source
# File lib/multi-tk.rb, line 2504 def get_no_event_wait __getip.get_no_event_wait end
has_mainwindow?()
click to toggle source
# File lib/multi-tk.rb, line 2553 def has_mainwindow? __getip.has_mainwindow? end
hide_cmd(slave, cmd, aliasname = nil)
click to toggle source
# File lib/multi-tk.rb, line 3269 def self.hide_cmd(slave, cmd, aliasname = nil) __getip.hide_cmd(slave, cmd, aliasname) self end
inherited(subclass)
click to toggle source
# File lib/multi-tk.rb, line 983 def self.inherited(subclass) # trust if on ThreadGroup::Default or @@DEFAULT_MASTER's ThreadGroup if @@IP_TABLE[Thread.current.group] == @@DEFAULT_MASTER begin class << subclass self.methods.each{|m| name = m.to_s begin unless name == '__id__' || name == '__send__' || name == 'freeze' undef_method(m) end rescue Exception # ignore all exceptions end } end ensure subclass.freeze fail SecurityError, "cannot create subclass of MultiTkIp on a untrusted ThreadGroup" end end end
init_ip_env(script = Proc.new)
click to toggle source
# File lib/multi-tk.rb, line 1853 def self.init_ip_env(script = Proc.new) @@INIT_IP_ENV << script if __getip.slave? begin raise SecurityError, "slave-IP has no permission initializing IP env" rescue SecurityError => e #p e.backtrace # Is called on a Ruby/Tk library? caller_info = e.backtrace[1] if caller_info =~ %r{^#{MultiTkIp::BASE_DIR}/(tk|tkextlib)/[^:]+\.rb:} # Probably, caller is a Ruby/Tk library --> allow creating else raise e end end end # @@IP_TABLE.each{|tg, ip| # ip._init_ip_env(script) # } @@DEFAULT_MASTER.__init_ip_env__(@@IP_TABLE, script) end
init_ip_internal()
click to toggle source
# File lib/multi-tk.rb, line 1900 def self.init_ip_internal __getip._init_ip_internal(@@INIT_IP_ENV, @@ADD_TK_PROCS) end
invalid_namespace?()
click to toggle source
# File lib/multi-tk.rb, line 2557 def invalid_namespace? __getip.invalid_namespace? end
ip_name()
click to toggle source
# File lib/multi-tk.rb, line 1702 def self.ip_name __getip.ip_name end
mainloop(check_root = true)
click to toggle source
# File lib/multi-tk.rb, line 800 def self.mainloop(check_root = true) begin TclTkLib.set_eventloop_window_mode(true) @interp_thread.value ensure TclTkLib.set_eventloop_window_mode(false) end end
mainloop_abort_on_exception()
click to toggle source
# File lib/multi-tk.rb, line 2487 def mainloop_abort_on_exception # __getip.mainloop_abort_on_exception TclTkLib.mainloop_abort_on_exception end
mainloop_abort_on_exception=(mode)
click to toggle source
# File lib/multi-tk.rb, line 2491 def mainloop_abort_on_exception=(mode) # __getip.mainloop_abort_on_exception=(mode) TclTkLib.mainloop_abort_on_exception=(mode) end
mainloop_watchdog(check_root = true)
click to toggle source
# File lib/multi-tk.rb, line 2481 def mainloop_watchdog(check_root = true) __getip.mainloop_watchdog(check_root) end
make_safe()
click to toggle source
# File lib/multi-tk.rb, line 2521 def make_safe __getip.make_safe end
manipulable?()
click to toggle source
# File lib/multi-tk.rb, line 1733 def self.manipulable? true end
mark_trusted(slave = '')
click to toggle source
# File lib/multi-tk.rb, line 3346 def self.mark_trusted(slave = '') __getip.mark_trusted(slave) self end
master?()
click to toggle source
# File lib/multi-tk.rb, line 1667 def self.master? __getip.master? end
method_missing(m, *args)
click to toggle source
# File lib/multi-tk.rb, line 1844 def self.method_missing(m, *args) MultiTkIp.tk_object_table(@id).__send__(m, *args) end
mutex()
click to toggle source
# File lib/multi-tk.rb, line 1841 def self.mutex @mutex end
new(ip, cmd)
click to toggle source
# File lib/multi-tk.rb, line 188 def initialize(ip, cmd) @ip = ip @safe = safe = $SAFE # @cmd = cmd cmd = MultiTkIp._proc_on_safelevel(&cmd) @cmd = proc{|*args| cmd.call(safe, *args)} self.freeze end
Also aliased as: __new
new(target, ret)
click to toggle source
Calls superclass method
# File lib/multi-tk.rb, line 888 def self.new(target, ret) obj = super() obj.target = target obj.ret = ret obj end
new_master(safe=nil, keys={}, &blk)
click to toggle source
# File lib/multi-tk.rb, line 1554 def new_master(safe=nil, keys={}, &blk) if MultiTkIp::WITH_RUBY_VM #### TODO !!!!!! fail RuntimeError, 'sorry, still not support multiple master-interpreters on RubyVM' end if safe.kind_of?(Hash) keys = safe elsif safe.kind_of?(Integer) raise ArgumentError, "unexpected argument(s)" unless keys.kind_of?(Hash) if !keys.key?(:safe) && !keys.key?('safe') keys[:safe] = safe end elsif safe == nil # do nothing else raise ArgumentError, "unexpected argument(s)" end ip = __new(__getip, nil, keys) #ip.eval_proc(proc{$SAFE=ip.safe_level; Proc.new}.call) if block_given? if block_given? #Thread.new{ip.eval_proc(proc{$SAFE=ip.safe_level; Proc.new}.call)} #Thread.new{ip.eval_proc(proc{$SAFE=ip.safe_level; yield}.call)} ip._proc_on_safelevel(&blk).call(ip.safe_level) end ip end
Also aliased as: new
new_safe_slave(safe=1, keys={}, &blk)
click to toggle source
# File lib/multi-tk.rb, line 1611 def new_safe_slave(safe=1, keys={}, &blk) if safe.kind_of?(Hash) keys = safe elsif safe.kind_of?(Integer) raise ArgumentError, "unexpected argument(s)" unless keys.kind_of?(Hash) if !keys.key?(:safe) && !keys.key?('safe') keys[:safe] = safe end else raise ArgumentError, "unexpected argument(s)" end ip = __new(__getip, true, keys) # ip.eval_proc(proc{$SAFE=ip.safe_level; Proc.new}.call) if block_given? if block_given? #Thread.new{ip.eval_proc(proc{$SAFE=ip.safe_level; Proc.new}.call)} #Thread.new{ip.eval_proc(proc{$SAFE=ip.safe_level; yield}.call)} ip._proc_on_safelevel(&blk).call(ip.safe_level) end ip end
Also aliased as: new_safeTk
new_slave(safe=nil, keys={}, &blk)
click to toggle source
# File lib/multi-tk.rb, line 1586 def new_slave(safe=nil, keys={}, &blk) if safe.kind_of?(Hash) keys = safe elsif safe.kind_of?(Integer) raise ArgumentError, "unexpected argument(s)" unless keys.kind_of?(Hash) if !keys.key?(:safe) && !keys.key?('safe') keys[:safe] = safe end elsif safe == nil # do nothing else raise ArgumentError, "unexpected argument(s)" end ip = __new(__getip, false, keys) # ip.eval_proc(proc{$SAFE=ip.safe_level; Proc.new}.call) if block_given? if block_given? #Thread.new{ip.eval_proc(proc{$SAFE=ip.safe_level; Proc.new}.call)} #Thread.new{ip.eval_proc(proc{$SAFE=ip.safe_level; yield}.call)} ip._proc_on_safelevel(&blk).call(ip.safe_level) end ip end
Also aliased as: new_trusted_slave
path()
click to toggle source
# File lib/multi-tk.rb, line 1696 def self.path __getip.path end
recursion_limit(slave = '', limit = None)
click to toggle source
# File lib/multi-tk.rb, line 3414 def self.recursion_limit(slave = '', limit = None) __getip.recursion_limit(slave) end
remove_tk_procs(*names)
click to toggle source
# File lib/multi-tk.rb, line 1888 def self.remove_tk_procs(*names) names.each{|name| name = name.to_s @@ADD_TK_PROCS.delete_if{|elem| elem.kind_of?(Array) && elem[0].to_s == name } } @@IP_TABLE.each{|tg, ip| ip._remove_tk_procs(*names) } end
restart(app_name = nil, keys = {})
click to toggle source
# File lib/multi-tk.rb, line 2573 def restart(app_name = nil, keys = {}) init_ip_internal __getip._invoke('set', 'argv0', app_name) if app_name if keys.kind_of?(Hash) __getip._invoke('set', 'argv', _keys2opts(keys)) end __getip.restart end
safe?()
click to toggle source
# File lib/multi-tk.rb, line 2525 def safe? __getip.safe? end
safe_base?()
click to toggle source
# File lib/multi-tk.rb, line 2529 def safe_base? begin __getip.safe_base? rescue false end end
safe_level()
click to toggle source
# File lib/multi-tk.rb, line 336 def self.safe_level __getip.safe_level end
safe_level=(safe)
click to toggle source
# File lib/multi-tk.rb, line 330 def self.safe_level=(safe) self.set_safe_level(safe) end
set_eventloop_tick(tick)
click to toggle source
# File lib/multi-tk.rb, line 2495 def set_eventloop_tick(tick) __getip.set_eventloop_tick(tick) end
set_eventloop_weight(loop_max, no_event_tick)
click to toggle source
# File lib/multi-tk.rb, line 2507 def set_eventloop_weight(loop_max, no_event_tick) __getip.set_eventloop_weight(loop_max, no_event_tick) end
set_limit(limit_type, slave = '', opts = {})
click to toggle source
# File lib/multi-tk.rb, line 3380 def self.set_limit(limit_type, slave = '', opts = {}) __getip.set_limit(limit_type, slave, opts) end
set_no_event_wait(tick)
click to toggle source
# File lib/multi-tk.rb, line 2501 def set_no_event_wait(tick) __getip.set_no_event_wait(tick) end
set_safe_level(safe)
click to toggle source
# File lib/multi-tk.rb, line 327 def self.set_safe_level(safe) __getip.set_safe_level(safe) end
slave?()
click to toggle source
# File lib/multi-tk.rb, line 1674 def self.slave? not self.master? end
slaves(all = false)
click to toggle source
# File lib/multi-tk.rb, line 1724 def self.slaves(all = false) __getip.slaves(all) end
table()
click to toggle source
# File lib/multi-tk.rb, line 1514 def self.table @table end
tk_cmd_tbl()
click to toggle source
# File lib/multi-tk.rb, line 1810 def self.tk_cmd_tbl @@TK_CMD_TBL end
tk_object_table(id)
click to toggle source
# File lib/multi-tk.rb, line 1816 def self.tk_object_table(id) __getip._tk_table_list[id] end
tk_windows()
click to toggle source
# File lib/multi-tk.rb, line 1813 def self.tk_windows __getip._tk_windows end
to_eval()
click to toggle source
# File lib/multi-tk.rb, line 1708 def self.to_eval __getip.to_eval end
transfer_stderr(dist, src = '')
click to toggle source
# File lib/multi-tk.rb, line 3481 def self.transfer_stderr(dist, src = '') __getip.transfer_stderr(dist, src) self end
transfer_stdin(dist, src = '')
click to toggle source
# File lib/multi-tk.rb, line 3461 def self.transfer_stdin(dist, src = '') __getip.transfer_stdin(dist, src) self end
transfer_stdio(dist, src = '')
click to toggle source
# File lib/multi-tk.rb, line 3505 def self.transfer_stdio(dist, src = '') __getip.transfer_stdio(dist, src) self end
transfer_stdout(dist, src = '')
click to toggle source
# File lib/multi-tk.rb, line 3471 def self.transfer_stdout(dist, src = '') __getip.transfer_stdout(dist, src) self end
Public Instance Methods
__create_safe_slave_obj(safe_opts, app_name, tk_opts)
click to toggle source
# File lib/multi-tk.rb, line 1190 def __create_safe_slave_obj(safe_opts, app_name, tk_opts) raise SecurityError, "no permission to manipulate" unless self.manipulable? # safe interpreter ip_name = _create_slave_ip_name slave_ip = @interp.create_slave(ip_name, true) slave_ip.instance_eval{ @force_default_encoding ||= TkUtil.untrust([false]) @encoding ||= TkUtil.untrust([nil]) def @encoding.to_s; self.join(nil); end } @slave_ip_tbl[ip_name] = slave_ip def slave_ip.safe_base? true end @interp._eval("::safe::interpInit #{ip_name}") slave_ip._invoke('set', 'argv0', app_name) if app_name.kind_of?(String) if tk_opts tk_opts = __check_safetk_optkeys(tk_opts) if tk_opts.key?('use') @slave_ip_top[ip_name] = '' else tk_opts, top_path = __create_safetk_frame(slave_ip, ip_name, app_name, tk_opts) @slave_ip_top[ip_name] = top_path end @interp._eval("::safe::loadTk #{ip_name} #{_keys2opts(tk_opts)}") @interp._invoke('__replace_slave_tk_commands__', ip_name) else @slave_ip_top[ip_name] = nil end if safe_opts.key?('deleteHook') || safe_opts.key?(:deleteHook) @interp._eval("::safe::interpConfigure #{ip_name} " + _keys2opts(safe_opts)) else @interp._eval("::safe::interpConfigure #{ip_name} " + _keys2opts(safe_opts) + '-deleteHook {' + TkComm._get_eval_string(proc{|slave| self._default_delete_hook(slave) }) + '}') end [slave_ip, ip_name] end
__create_trusted_slave_obj(name, keys)
click to toggle source
# File lib/multi-tk.rb, line 1239 def __create_trusted_slave_obj(name, keys) raise SecurityError, "no permission to manipulate" unless self.manipulable? ip_name = _create_slave_ip_name slave_ip = @interp.create_slave(ip_name, false) slave_ip.instance_eval{ @force_default_encoding ||= TkUtil.untrust([false]) @encoding ||= TkUtil.untrust([nil]) def @encoding.to_s; self.join(nil); end } slave_ip._invoke('set', 'argv0', name) if name.kind_of?(String) slave_ip._invoke('set', 'argv', _keys2opts(keys)) @interp._invoke('load', '', 'Tk', ip_name) @interp._invoke('__replace_slave_tk_commands__', ip_name) @slave_ip_tbl[ip_name] = slave_ip [slave_ip, ip_name] end
__eval(str)
click to toggle source
# File lib/multi-tk.rb, line 2998 def __eval(str) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp.__eval(str) end
__invoke(*args)
click to toggle source
# File lib/multi-tk.rb, line 3003 def __invoke(*args) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp.__invoke(*args) end
__pseudo_toplevel()
click to toggle source
instance method
# File lib/multi-tk.rb, line 1995 def __pseudo_toplevel ip = MultiTkIp.__getip (ip == @@DEFAULT_MASTER || ip == self) && self.__pseudo_toplevel_evaluable? && @pseudo_toplevel[1] end
__pseudo_toplevel=(m)
click to toggle source
# File lib/multi-tk.rb, line 2001 def __pseudo_toplevel=(m) unless (Thread.current.group == ThreadGroup::Default && MultiTkIp.__getip == @@DEFAULT_MASTER) fail SecurityError, "no permission to manipulate" end # if m.kind_of?(Module) && m.respond_to?(:pseudo_toplevel_evaluable?) if m.respond_to?(:pseudo_toplevel_evaluable?) @pseudo_toplevel[0] = true @pseudo_toplevel[1] = m else fail ArgumentError, 'fail to set pseudo-toplevel' end self end
__pseudo_toplevel_evaluable=(mode)
click to toggle source
# File lib/multi-tk.rb, line 2025 def __pseudo_toplevel_evaluable=(mode) unless (Thread.current.group == ThreadGroup::Default && MultiTkIp.__getip == @@DEFAULT_MASTER) fail SecurityError, "no permission to manipulate" end @pseudo_toplevel[0] = (mode)? true: false end
__pseudo_toplevel_evaluable?()
click to toggle source
# File lib/multi-tk.rb, line 2017 def __pseudo_toplevel_evaluable? begin @pseudo_toplevel[0] && @pseudo_toplevel[1].pseudo_toplevel_evaluable? rescue Exception false end end
_add_new_tables()
click to toggle source
# File lib/multi-tk.rb, line 1760 def _add_new_tables (@@TK_TABLE_LIST.size - @tk_table_list.size).times{ @tk_table_list << TkUtil.untrust({}) } end
_add_tk_procs(name, args, body)
click to toggle source
# File lib/multi-tk.rb, line 1770 def _add_tk_procs(name, args, body) return if slave? @interp._invoke('proc', name, args, body) if args && body @interp._invoke('interp', 'slaves').split.each{|slave| @interp._invoke('interp', 'alias', slave, name, '', name) } end
_conv_listelement(arg)
click to toggle source
# File lib/multi-tk.rb, line 3126 def _conv_listelement(arg) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._conv_listelement(arg) end
_create_slave_object(keys={})
click to toggle source
# File lib/multi-tk.rb, line 1259 def _create_slave_object(keys={}) raise SecurityError, "no permission to manipulate" unless self.manipulable? ip = MultiTkIp.new_slave(self, keys={}) @slave_ip_tbl[ip.name] = ip end
_default_delete_hook(slave)
click to toggle source
# File lib/multi-tk.rb, line 1476 def _default_delete_hook(slave) raise SecurityError, "no permission to manipulate" unless self.manipulable? @slave_ip_tbl.delete(slave) top = @slave_ip_top.delete(slave) if top.kind_of?(String) # call default hook of safetk.tcl (ignore exceptions) if top == '' begin @interp._eval("::safe::disallowTk #{slave}") rescue warn("Warning: fail to call '::safe::disallowTk'") if $DEBUG end else # toplevel path begin @interp._eval("::safe::tkDelete {} #{top} #{slave}") rescue warn("Warning: fail to call '::safe::tkDelete'") if $DEBUG begin @interp._eval("destroy #{top}") rescue warn("Warning: fail to destroy toplevel") if $DEBUG end end end end end
_destroy_slaves_of_slaveIP(ip)
click to toggle source
# File lib/multi-tk.rb, line 351 def _destroy_slaves_of_slaveIP(ip) unless ip.deleted? # ip._split_tklist(ip._invoke('interp', 'slaves')).each{|name| ip._split_tklist(ip._invoke_without_enc('interp', 'slaves')).each{|name| name = _fromUTF8(name) begin # ip._eval_without_enc("#{name} eval {foreach i [after info] {after cancel $i}}") after_ids = ip._eval_without_enc("#{name} eval {after info}") ip._eval_without_enc("#{name} eval {foreach i {#{after_ids}} {after cancel $i}}") rescue Exception end begin # ip._invoke('interp', 'eval', name, 'destroy', '.') ip._invoke(name, 'eval', 'destroy', '.') rescue Exception end # safe_base? if ip._eval_without_enc("catch {::safe::interpConfigure #{name}}") == '0' begin ip._eval_without_enc("::safe::interpDelete #{name}") rescue Exception end end =begin if ip._invoke('interp', 'exists', name) == '1' begin ip._invoke(name, 'eval', 'exit') rescue Exception end end =end unless ip.deleted? if ip._invoke('interp', 'exists', name) == '1' begin ip._invoke('interp', 'delete', name) rescue Exception end end end } end end
_eval(str)
click to toggle source
# File lib/multi-tk.rb, line 3008 def _eval(str) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._eval(str) end
_eval_with_enc(str)
click to toggle source
# File lib/multi-tk.rb, line 3028 def _eval_with_enc(str) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._eval_with_enc(str) end
_eval_without_enc(str)
click to toggle source
# File lib/multi-tk.rb, line 3018 def _eval_without_enc(str) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._eval_without_enc(str) end
_fromUTF8(str, encoding=nil)
click to toggle source
# File lib/multi-tk.rb, line 3043 def _fromUTF8(str, encoding=nil) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._fromUTF8(str, encoding) end
_get_global_var(var)
click to toggle source
# File lib/multi-tk.rb, line 3088 def _get_global_var(var) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._get_global_var(var) end
_get_global_var2(var, idx)
click to toggle source
# File lib/multi-tk.rb, line 3092 def _get_global_var2(var, idx) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._get_global_var2(var, idx) end
_get_variable(var, flag)
click to toggle source
# File lib/multi-tk.rb, line 3063 def _get_variable(var, flag) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._get_variable(var, flag) end
_get_variable2(var, idx, flag)
click to toggle source
# File lib/multi-tk.rb, line 3067 def _get_variable2(var, idx, flag) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._get_variable2(var, idx, flag) end
_init_ip_env(script)
click to toggle source
# File lib/multi-tk.rb, line 1766 def _init_ip_env(script) self.eval_proc{script.call(self)} end
_init_ip_internal(init_ip_env, add_tk_procs)
click to toggle source
# File lib/multi-tk.rb, line 1794 def _init_ip_internal(init_ip_env, add_tk_procs) #init_ip_env.each{|script| self.eval_proc{script.call(self)}} init_ip_env.each{|script| self._init_ip_env(script)} add_tk_procs.each{|name, args, body| if master? @interp._invoke('proc', name, args, body) if args && body else @set_alias_proc.call(name) end } end
_invoke(*args)
click to toggle source
# File lib/multi-tk.rb, line 3013 def _invoke(*args) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._invoke(*args) end
_invoke_with_enc(*args)
click to toggle source
# File lib/multi-tk.rb, line 3033 def _invoke_with_enc(*args) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._invoke_with_enc(*args) end
_invoke_without_enc(*args)
click to toggle source
# File lib/multi-tk.rb, line 3023 def _invoke_without_enc(*args) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._invoke_without_enc(*args) end
_ip_id_()
click to toggle source
# File lib/multi-tk.rb, line 1522 def _ip_id_ # for RemoteTkIp '' end
_merge_tklist(*args)
click to toggle source
# File lib/multi-tk.rb, line 3122 def _merge_tklist(*args) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._merge_tklist(*args) end
_proc_on_current_safelevel(cmd=nil, &blk)
click to toggle source
# File lib/multi-tk.rb, line 2130 def _proc_on_current_safelevel(cmd=nil, &blk) # require a block for eval safe = $SAFE cmd = _proc_on_safelevel(cmd, &blk) Proc.new{|*args| cmd.call(safe, *args)} end
_proc_on_safelevel(cmd=nil) { |*args| ... }
click to toggle source
instance & class method
# File lib/multi-tk.rb, line 2099 def _proc_on_safelevel(cmd=nil) # require a block for eval if cmd if cmd.kind_of?(Method) _proc_on_safelevel{|*args| cmd.call(*args)} else _proc_on_safelevel(&cmd) end else #Proc.new{|safe, *args| $SAFE=safe if $SAFE < safe; yield(*args)} Proc.new{|safe, *args| # avoid security error on Exception objects untrust_proc = proc{|err| begin err.untrust if err.respond_to?(:untrust) rescue SecurityError end err } $SAFE=safe if $SAFE < safe; begin yield(*args) rescue Exception => e fail untrust_proc.call(e) end } end end
_receiver_mainloop(check_root)
click to toggle source
# File lib/multi-tk.rb, line 601 def _receiver_mainloop(check_root) if @evloop_thread[0] && @evloop_thread[0].alive? @evloop_thread[0] else @evloop_thread[0] = Thread.new{ while !@interp.deleted? #if check_root # inf = @interp._invoke_without_enc('info', 'command', '.') # break if !inf.kind_of?(String) || inf != '.' #end break if check_root && !@interp.has_mainwindow? sleep 0.5 end } @evloop_thread[0] end end
_remove_tk_procs(*names)
click to toggle source
# File lib/multi-tk.rb, line 1778 def _remove_tk_procs(*names) return if slave? names.each{|name| name = name.to_s return if @interp.deleted? @interp._invoke('rename', name, '') return if @interp.deleted? @interp._invoke('interp', 'slaves').split.each{|slave| return if @interp.deleted? @interp._invoke('interp', 'alias', slave, name, '') rescue nil } } end
_return_value()
click to toggle source
# File lib/multi-tk.rb, line 3058 def _return_value raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._return_value end
_set_global_var(var, value)
click to toggle source
# File lib/multi-tk.rb, line 3096 def _set_global_var(var, value) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._set_global_var(var, value) end
_set_global_var2(var, idx, value)
click to toggle source
# File lib/multi-tk.rb, line 3100 def _set_global_var2(var, idx, value) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._set_global_var2(var, idx, value) end
_set_variable(var, value, flag)
click to toggle source
# File lib/multi-tk.rb, line 3071 def _set_variable(var, value, flag) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._set_variable(var, value, flag) end
_set_variable2(var, idx, value, flag)
click to toggle source
# File lib/multi-tk.rb, line 3075 def _set_variable2(var, idx, value, flag) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._set_variable2(var, idx, value, flag) end
_split_tklist(str)
click to toggle source
# File lib/multi-tk.rb, line 3118 def _split_tklist(str) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._split_tklist(str) end
_thread_tkwait(mode, target)
click to toggle source
# File lib/multi-tk.rb, line 3053 def _thread_tkwait(mode, target) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._thread_tkwait(mode, target) end
_thread_vwait(var)
click to toggle source
# File lib/multi-tk.rb, line 3048 def _thread_vwait(var) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._thread_vwait(var) end
_tk_cmd_tbl()
click to toggle source
# File lib/multi-tk.rb, line 1746 def _tk_cmd_tbl tbl = {} MultiTkIp.tk_cmd_tbl.each{|id, ent| tbl[id] = ent if ent.ip == self } tbl end
_tk_table_list()
click to toggle source
# File lib/multi-tk.rb, line 1756 def _tk_table_list @tk_table_list end
_tk_windows()
click to toggle source
# File lib/multi-tk.rb, line 1752 def _tk_windows @tk_windows end
_toUTF8(str, encoding=nil)
click to toggle source
# File lib/multi-tk.rb, line 3038 def _toUTF8(str, encoding=nil) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._toUTF8(str, encoding) end
_unset_global_var(var)
click to toggle source
# File lib/multi-tk.rb, line 3104 def _unset_global_var(var) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._unset_global_var(var) end
_unset_global_var2(var, idx)
click to toggle source
# File lib/multi-tk.rb, line 3108 def _unset_global_var2(var, idx) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._unset_global_var2(var, idx) end
_unset_variable(var, flag)
click to toggle source
# File lib/multi-tk.rb, line 3079 def _unset_variable(var, flag) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._unset_variable(var, flag) end
_unset_variable2(var, idx, flag)
click to toggle source
# File lib/multi-tk.rb, line 3083 def _unset_variable2(var, idx, flag) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._unset_variable2(var, idx, flag) end
abort(msg = nil)
click to toggle source
# File lib/multi-tk.rb, line 2950 def abort(msg = nil) raise SecurityError, "no permission to manipulate" unless self.manipulable? if master? && !safe? && allow_ruby_exit? if msg Kernel.abort(msg) else Kernel.abort end else # ignore msg delete 1 end end
alias_delete(slave, cmd_name)
click to toggle source
# File lib/multi-tk.rb, line 3186 def alias_delete(slave, cmd_name) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._invoke('interp', 'alias', _slavearg(slave), cmd_name, '') self end
alias_info(slave, cmd_name)
click to toggle source
# File lib/multi-tk.rb, line 3178 def alias_info(slave, cmd_name) raise SecurityError, "no permission to manipulate" unless self.manipulable? _lst2ary(@interp._invoke('interp', 'alias', _slavearg(slave), cmd_name)) end
alias_target(aliascmd, slave = '')
click to toggle source
# File lib/multi-tk.rb, line 3418 def alias_target(aliascmd, slave = '') raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._invoke('interp', 'target', _slavearg(slave), aliascmd) end
aliases(slave = '')
click to toggle source
# File lib/multi-tk.rb, line 3207 def aliases(slave = '') raise SecurityError, "no permission to manipulate" unless self.manipulable? _lst2ary(@interp._invoke('interp', 'aliases', _slavearg(slave))) end
alive?()
click to toggle source
# File lib/multi-tk.rb, line 1678 def alive? raise SecurityError, "no permission to manipulate" unless self.manipulable? begin return false unless @cmd_receiver.alive? return false if @interp.deleted? return false if @interp._invoke('interp', 'exists', '') == '0' rescue Exception return false end true end
allow_ruby_exit=(mode)
click to toggle source
# File lib/multi-tk.rb, line 2867 def allow_ruby_exit= (mode) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp.allow_ruby_exit = mode end
allow_ruby_exit?()
click to toggle source
# File lib/multi-tk.rb, line 2862 def allow_ruby_exit? raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp.allow_ruby_exit? end
bg_eval(*args, &blk)
click to toggle source
# File lib/multi-tk.rb, line 2411 def bg_eval(*args, &blk) if block_given? bg_eval_proc(*args, &blk) elsif args[0] if args[0].respond_to?(:call) bg_eval_proc(*args) else bg_eval_string(*args) end else fail ArgumentError, "no argument to eval" end end
Also aliased as: background_eval
bg_eval_proc(*args)
click to toggle source
# File lib/multi-tk.rb, line 2341 def bg_eval_proc(*args) if block_given? cmd = Proc.new else unless (cmd = args.shift) fail ArgumentError, "A Proc or Method object is expected for 1st argument" end end Thread.new{ eval_proc(cmd, *args) =begin eval_proc_core(false, proc{|safe, *params| $SAFE=safe if $SAFE < safe Thread.new(*params, &cmd).value }, safe_level, *args) =end } end
bg_eval_string(cmd, *eval_args)
click to toggle source
# File lib/multi-tk.rb, line 2380 def bg_eval_string(cmd, *eval_args) # cmd string ==> proc unless cmd.kind_of?(String) raise RuntimeError, "A String object is expected for the 'cmd' argument" end Thread.new{ eval_proc_core(true, proc{|safe| Kernel.eval("$SAFE=#{safe} if $SAFE < #{safe};" << cmd, *eval_args) }) } end
call(*args)
click to toggle source
def eval_proc
(*args)
# The scope of the eval-block of 'eval_proc' method is different from # the external. If you want to pass local values to the eval-block, # use arguments of eval_proc method. They are passed to block-arguments. if block_given? cmd = Proc.new else unless (cmd = args.shift) fail ArgumentError, "A Proc or Method object is expected for 1st argument" end end if TclTkLib.mainloop_thread? == true # call from eventloop current = Thread.current backup_ip = current[:callback_ip] current[:callback_ip] = self begin eval_proc_core(false, proc{|safe, *params| $SAFE=safe if $SAFE < safe cmd.call(*params) }, *args) ensure current[:callback_ip] = backup_ip end else eval_proc_core(true, proc{|safe, *params| $SAFE=safe if $SAFE < safe Thread.new(*params, &cmd).value }, *args) end
end
# File lib/multi-tk.rb, line 200 def call(*args) unless @ip.deleted? current = Thread.current backup_ip = current[:callback_ip] current[:callback_ip] = @ip begin ret = @ip.cb_eval(@cmd, *args) fail ret if ret.kind_of?(Exception) ret rescue TkCallbackBreak, TkCallbackContinue => e fail e rescue SecurityError => e # in 'exit', 'exit!', and 'abort' : security error --> delete IP if e.backtrace[0] =~ /^(.+?):(\d+):in `(exit|exit!|abort)'/ @ip.delete elsif @ip.safe? if @ip.respond_to?(:cb_error) @ip.cb_error(e) else nil # ignore end else fail e end rescue Exception => e fail e if e.message =~ /^TkCallback/ if @ip.safe? if @ip.respond_to?(:cb_error) @ip.cb_error(e) else nil # ignore end else fail e end ensure current[:callback_ip] = backup_ip end end end
cb_error(e)
click to toggle source
# File lib/multi-tk.rb, line 309 def cb_error(e) if @cb_error_proc[0].respond_to?(:call) @cb_error_proc[0].call(e) end end
cb_eval(cmd, *args)
click to toggle source
def cb_eval
(cmd, *args)
#self.eval_callback{ TkComm._get_eval_string(TkUtil.eval_cmd(cmd, *args)) } #ret = self.eval_callback{ TkComm._get_eval_string(TkUtil.eval_cmd(cmd, *args)) } ret = self.eval_callback(*args){|safe, *params| $SAFE=safe if $SAFE < safe TkComm._get_eval_string(TkUtil.eval_cmd(cmd, *params)) } if ret.kind_of?(Exception) raise ret end ret
end
# File lib/multi-tk.rb, line 1928 def cb_eval(cmd, *args) self.eval_callback(*args, &_proc_on_safelevel{|*params| TkComm._get_eval_string(TkUtil.eval_cmd(cmd, *params)) }) end
def_alias(slave, new_cmd, org_cmd, *args)
click to toggle source
# File lib/multi-tk.rb, line 3196 def def_alias(slave, new_cmd, org_cmd, *args) raise SecurityError, "no permission to manipulate" unless self.manipulable? ret = @interp._invoke('interp', 'alias', _slavearg(slave), new_cmd, '', org_cmd, *args) (ret == new_cmd)? self: nil end
default_encoding=(enc)
click to toggle source
# File lib/multi-tk.rb, line 3645 def default_encoding=(enc) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp.default_encoding = enc end
delete()
click to toggle source
# File lib/multi-tk.rb, line 2872 def delete raise SecurityError, "no permission to manipulate" unless self.manipulable? @slave_ip_tbl.each{|name, subip| _destroy_slaves_of_slaveIP(subip) =begin begin subip._invoke('destroy', '.') unless subip.deleted? rescue Exception end =end begin # subip._eval_without_enc("foreach i [after info] {after cancel $i}") unless subip.deleted? after_ids = subip._eval_without_enc("after info") subip._eval_without_enc("foreach i {#{after_ids}} {after cancel $i}") end rescue Exception end # safe_base? if @interp._eval_without_enc("catch {::safe::interpConfigure #{name}}") == '0' begin @interp._eval_without_enc("::safe::interpDelete #{name}") rescue Exception else next if subip.deleted? end end if subip.respond_to?(:safe_base?) && subip.safe_base? && !subip.deleted? # do 'exit' to call the delete_hook procedure begin subip._eval_without_enc('exit') rescue Exception end else begin subip.delete unless subip.deleted? rescue Exception end end } begin # @interp._eval_without_enc("foreach i [after info] {after cancel $i}") after_ids = @interp._eval_without_enc("after info") @interp._eval_without_enc("foreach i {#{after_ids}} {after cancel $i}") rescue Exception end begin @interp._invoke('destroy', '.') unless @interp.deleted? rescue Exception end if @safe_base && !@interp.deleted? # do 'exit' to call the delete_hook procedure @interp._eval_without_enc('exit') end @interp.delete self end
delete_cmd(slave, cmd)
click to toggle source
# File lib/multi-tk.rb, line 3235 def delete_cmd(slave, cmd) raise SecurityError, "no permission to manipulate" unless self.manipulable? slave_invoke = @interp._invoke('list', 'rename', cmd, '') @interp._invoke('interp', 'eval', _slavearg(slave), slave_invoke) self end
delete_slaves(*args)
click to toggle source
# File lib/multi-tk.rb, line 3215 def delete_slaves(*args) raise SecurityError, "no permission to manipulate" unless self.manipulable? slaves = args.collect{|s| _slavearg(s)} @interp._invoke('interp', 'delete', *slaves) if slaves.size > 0 self end
deleted?()
click to toggle source
# File lib/multi-tk.rb, line 2935 def deleted? raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp.deleted? end
encoding=(enc)
click to toggle source
# File lib/multi-tk.rb, line 3650 def encoding=(enc) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp.encoding = enc end
encoding_convertfrom(str, enc=None)
click to toggle source
# File lib/multi-tk.rb, line 3665 def encoding_convertfrom(str, enc=None) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp.encoding_convertfrom(str, enc) end
Also aliased as: encoding_convert_from
encoding_convertto(str, enc=None)
click to toggle source
# File lib/multi-tk.rb, line 3671 def encoding_convertto(str, enc=None) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp.encoding_convertto(str, enc) end
Also aliased as: encoding_convert_to
encoding_name()
click to toggle source
# File lib/multi-tk.rb, line 3654 def encoding_name raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp.encoding_name end
Also aliased as: encoding, default_encoding
encoding_obj()
click to toggle source
# File lib/multi-tk.rb, line 3658 def encoding_obj raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp.encoding_obj end
encoding_table()
click to toggle source
# File lib/multi-tk.rb, line 3632 def encoding_table @interp.encoding_table end
eval(*args, &blk)
click to toggle source
# File lib/multi-tk.rb, line 2397 def eval(*args, &blk) if block_given? eval_proc(*args, &blk) elsif args[0] if args[0].respond_to?(:call) eval_proc(*args) else eval_string(*args) end else fail ArgumentError, "no argument to eval" end end
eval_callback(*args)
click to toggle source
Not stable, so disable this feature
# File lib/multi-tk.rb, line 2235 def eval_callback(*args) if block_given? cmd = Proc.new else cmd = args.shift end begin if @@CALLBACK_SUBTHREAD.table[self].index(Thread.current) last_th = nil else last_th = @@CALLBACK_SUBTHREAD.table[self][-1] end @@CALLBACK_SUBTHREAD.new(self){ @@CALLBACK_SUBTHREAD.table[self] << Thread.current begin last_th.join if last_th eval_proc_core(false, cmd, *args) rescue Exception=>e e ensure @@CALLBACK_SUBTHREAD.table[self].delete(Thread.current) end } end end
eval_proc(*args, &blk)
click to toggle source
# File lib/multi-tk.rb, line 2276 def eval_proc(*args, &blk) if block_given? cmd = _proc_on_safelevel(&blk) else unless (cmd = args.shift) fail ArgumentError, "A Proc or Method object is expected for 1st argument" end cmd = _proc_on_safelevel(&cmd) end if TclTkLib.mainloop_thread? == true # call from eventloop current = Thread.current backup_ip = current[:callback_ip] current[:callback_ip] = self begin eval_proc_core(false, cmd, *args) ensure current[:callback_ip] = backup_ip end else eval_proc_core(true, proc{|safe, *params| Thread.new{cmd.call(safe, *params)}.value }, *args) end end
Also aliased as: call
eval_string(cmd, *eval_args)
click to toggle source
# File lib/multi-tk.rb, line 2366 def eval_string(cmd, *eval_args) # cmd string ==> proc unless cmd.kind_of?(String) raise RuntimeError, "A String object is expected for the 'cmd' argument" end eval_proc_core(true, proc{|safe| Kernel.eval("$SAFE=#{safe} if $SAFE < #{safe};" << cmd, *eval_args) }) end
Also aliased as: eval_str
exist?(slave = '')
click to toggle source
# File lib/multi-tk.rb, line 3226 def exist?(slave = '') raise SecurityError, "no permission to manipulate" unless self.manipulable? ret = @interp._invoke('interp', 'exists', _slavearg(slave)) (ret == '1')? true: false end
exit(st = true)
click to toggle source
# File lib/multi-tk.rb, line 2965 def exit(st = true) raise SecurityError, "no permission to manipulate" unless self.manipulable? if master? && !safe? && allow_ruby_exit? Kernel.exit(st) else delete st end end
exit!(st = false)
click to toggle source
# File lib/multi-tk.rb, line 2975 def exit!(st = false) raise SecurityError, "no permission to manipulate" unless self.manipulable? if master? && !safe? && allow_ruby_exit? Kernel.exit!(st) else delete st end end
expose_cmd(slave, cmd, aliasname = nil)
click to toggle source
# File lib/multi-tk.rb, line 3246 def expose_cmd(slave, cmd, aliasname = nil) raise SecurityError, "no permission to manipulate" unless self.manipulable? if aliasname @interp._invoke('interp', 'expose', _slavearg(slave), cmd, aliasname) else @interp._invoke('interp', 'expose', _slavearg(slave), cmd) end self end
force_default_encoding=(mode)
click to toggle source
# File lib/multi-tk.rb, line 3636 def force_default_encoding=(mode) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp.force_default_encoding = mode end
force_default_encoding?()
click to toggle source
# File lib/multi-tk.rb, line 3640 def force_default_encoding? raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp.force_default_encoding? end
get_bgerror_handler(slave = '')
click to toggle source
# File lib/multi-tk.rb, line 3368 def get_bgerror_handler(slave = '') raise SecurityError, "no permission to manipulate" unless self.manipulable? procedure(@interp._invoke('interp', 'bgerror', _slavearg(slave))) end
get_limit(limit_type, slave = '', slot = nil)
click to toggle source
# File lib/multi-tk.rb, line 3384 def get_limit(limit_type, slave = '', slot = nil) raise SecurityError, "no permission to manipulate" unless self.manipulable? if slot num_or_str(@interp._invoke('interp', 'limit', _slavearg(slave), limit_type, slot)) else l = @interp._split_tklist(@interp._invoke_without_enc('interp', 'limit', _slavearg(slave), limit_type)) l.map!{|s| _fromUTF8(s)} r = {} until l.empty? key = l.shift[1..-1] val = l.shift val = num_or_str(val) if val r[key] = val end r end end
has_mainwindow?()
click to toggle source
# File lib/multi-tk.rb, line 2940 def has_mainwindow? raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp.has_mainwindow? end
hide_cmd(slave, cmd, aliasname = nil)
click to toggle source
# File lib/multi-tk.rb, line 3260 def hide_cmd(slave, cmd, aliasname = nil) raise SecurityError, "no permission to manipulate" unless self.manipulable? if aliasname @interp._invoke('interp', 'hide', _slavearg(slave), cmd, aliasname) else @interp._invoke('interp', 'hide', _slavearg(slave), cmd) end self end
inspect()
click to toggle source
# File lib/multi-tk.rb, line 197 def inspect cmd.inspect end
invalid_namespace?()
click to toggle source
# File lib/multi-tk.rb, line 2945 def invalid_namespace? raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp.invalid_namespace? end
ip_name()
click to toggle source
# File lib/multi-tk.rb, line 1699 def ip_name @ip_name || '' end
mainloop(check_root = true, restart_on_dead = false)
click to toggle source
def mainloop(check_root = true, restart_on_dead = true)
# File lib/multi-tk.rb, line 2737 def mainloop(check_root = true, restart_on_dead = false) raise SecurityError, "no permission to manipulate" unless self.manipulable? if WITH_RUBY_VM ### Ruby 1.9 !!!!!!!!!!! return @interp_thread.value if @interp_thread end #return self if self.slave? #return self if self != @@DEFAULT_MASTER if self != @@DEFAULT_MASTER if @wait_on_mainloop[0] begin @wait_on_mainloop[1] += 1 @cmd_queue.enq([@system, 'call_mainloop', Thread.current, check_root]) Thread.stop rescue MultiTkIp_OK => ret # return value if ret.value.kind_of?(Thread) return ret.value.value else return ret.value end rescue SystemExit => e # exit IP warn("Warning: " + e.inspect + " on " + self.inspect) if $DEBUG begin self._eval_without_enc('exit') rescue Exception end self.delete rescue StandardError => e if $DEBUG warn("Warning: " + e.class.inspect + ((e.message.length > 0)? ' "' + e.message + '"': '') + " on " + self.inspect) end return e rescue Exception => e return e ensure @wait_on_mainloop[1] -= 1 end end return end unless restart_on_dead @wait_on_mainloop[1] += 1 =begin begin @interp.mainloop(check_root) rescue StandardError => e if $DEBUG warn("Warning: " + e.class.inspect + ((e.message.length > 0)? ' "' + e.message + '"': '') + " on " + self.inspect) end end =end begin @interp.mainloop(check_root) ensure @wait_on_mainloop[1] -= 1 end else loop do break unless self.alive? if check_root begin break if TclTkLib.num_of_mainwindows == 0 rescue StandardError break end end break if @interp.deleted? begin @wait_on_mainloop[1] += 1 @interp.mainloop(check_root) rescue StandardError => e if TclTkLib.mainloop_abort_on_exception != nil #STDERR.print("Warning: Tk mainloop receives ", $!.class.inspect, # " exception (ignore) : ", $!.message, "\n"); if $DEBUG warn("Warning: Tk mainloop receives " << e.class.inspect << " exception (ignore) : " << e.message); end end #raise e rescue Exception => e =begin if TclTkLib.mainloop_abort_on_exception != nil #STDERR.print("Warning: Tk mainloop receives ", $!.class.inspect, # " exception (ignore) : ", $!.message, "\n"); if $DEBUG warn("Warning: Tk mainloop receives " << e.class.inspect << " exception (ignore) : " << e.message); end end =end raise e ensure @wait_on_mainloop[1] -= 1 Thread.pass # avoid eventloop conflict end end end self end
make_safe()
click to toggle source
# File lib/multi-tk.rb, line 2847 def make_safe raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp.make_safe end
manipulable?()
click to toggle source
# File lib/multi-tk.rb, line 1728 def manipulable? return true if (Thread.current.group == ThreadGroup::Default) ip = MultiTkIp.__getip (ip == self) || ip._is_master_of?(@interp) end
mark_trusted(slave = '')
click to toggle source
# File lib/multi-tk.rb, line 3341 def mark_trusted(slave = '') raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._invoke('interp', 'marktrusted', _slavearg(slave)) self end
master?()
click to toggle source
# File lib/multi-tk.rb, line 1660 def master? if @ip_name false else true end end
mutex()
click to toggle source
# File lib/multi-tk.rb, line 93 def mutex; @mutex; end
path()
click to toggle source
# File lib/multi-tk.rb, line 1693 def path @ip_name || '' end
recursion_limit(slave = '', limit = None)
click to toggle source
# File lib/multi-tk.rb, line 3409 def recursion_limit(slave = '', limit = None) raise SecurityError, "no permission to manipulate" unless self.manipulable? number(@interp._invoke('interp', 'recursionlimit', _slavearg(slave), limit)) end
restart(app_name = nil, keys = {})
click to toggle source
# File lib/multi-tk.rb, line 2985 def restart(app_name = nil, keys = {}) raise SecurityError, "no permission to manipulate" unless self.manipulable? _init_ip_internal(@@INIT_IP_ENV, @@ADD_TK_PROCS) @interp._invoke('set', 'argv0', app_name) if app_name if keys.kind_of?(Hash) @interp._invoke('set', 'argv', _keys2opts(keys)) end @interp.restart end
running_mainloop?()
click to toggle source
# File lib/multi-tk.rb, line 347 def running_mainloop? @wait_on_mainloop[1] > 0 end
safe?()
click to toggle source
# File lib/multi-tk.rb, line 2852 def safe? raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp.safe? end
safe_base?()
click to toggle source
# File lib/multi-tk.rb, line 2857 def safe_base? raise SecurityError, "no permission to manipulate" unless self.manipulable? @safe_base end
safe_level()
click to toggle source
# File lib/multi-tk.rb, line 333 def safe_level @safe_level[0] end
safe_level=(safe)
click to toggle source
# File lib/multi-tk.rb, line 324 def safe_level=(safe) set_safe_level(safe) end
safeip_add_to_access_path(dir)
click to toggle source
# File lib/multi-tk.rb, line 3572 def safeip_add_to_access_path(dir) ip = MultiTkIp.__getip ip._eval("::safe::interpAddToAccessPath #{@ip_name} #{dir}") end
safeip_configinfo(slot = nil)
click to toggle source
# File lib/multi-tk.rb, line 3527 def safeip_configinfo(slot = nil) ip = MultiTkIp.__getip ret = {} if slot conf = _lst2ary(ip._eval("::safe::interpConfigure " + @ip_name + " -#{slot}")) if conf[0] == '-deleteHook' =begin if conf[1] =~ /^rb_out\S* (c(_\d+_)?\d+)/ ret[conf[0][1..-1]] = MultiTkIp._tk_cmd_tbl[$1] =end if conf[1] =~ /rb_out\S*(?:\s+(::\S*|[{](::.*)[}]|["](::.*)["]))? (c(_\d+_)?(\d+))/ ret[conf[0][1..-1]] = MultiTkIp._tk_cmd_tbl[$4] else ret[conf[0][1..-1]] = conf[1] end else ret[conf[0][1..-1]] = conf[1] end else Hash[*_lst2ary(ip._eval("::safe::interpConfigure " + @ip_name))].each{|k, v| if k == '-deleteHook' =begin if v =~ /^rb_out\S* (c(_\d+_)?\d+)/ ret[k[1..-1]] = MultiTkIp._tk_cmd_tbl[$1] =end if v =~ /rb_out\S*(?:\s+(::\S*|[{](::.*)[}]|["](::.*)["]))? (c(_\d+_)?(\d+))/ ret[k[1..-1]] = MultiTkIp._tk_cmd_tbl[$4] else ret[k[1..-1]] = v end else ret[k[1..-1]] = v end } end ret end
safeip_configure(slot, value=None)
click to toggle source
# File lib/multi-tk.rb, line 3514 def safeip_configure(slot, value=None) # use for '-noStatics' option ==> {statics=>false} # for '-nestedLoadOk' option ==> {nested=>true} if slot.kind_of?(Hash) ip = MultiTkIp.__getip ip._eval('::safe::interpConfigure ' + @ip_name + ' ' + _keys2opts(slot)) else ip._eval('::safe::interpConfigure ' + @ip_name + ' ' + "-#{slot} #{_get_eval_string(value)}") end self end
safeip_delete()
click to toggle source
# File lib/multi-tk.rb, line 3567 def safeip_delete ip = MultiTkIp.__getip ip._eval("::safe::interpDelete " + @ip_name) end
safeip_find_in_access_path(dir)
click to toggle source
# File lib/multi-tk.rb, line 3577 def safeip_find_in_access_path(dir) ip = MultiTkIp.__getip ip._eval("::safe::interpFindInAccessPath #{@ip_name} #{dir}") end
safeip_set_log_cmd(cmd = Proc.new)
click to toggle source
# File lib/multi-tk.rb, line 3582 def safeip_set_log_cmd(cmd = Proc.new) ip = MultiTkIp.__getip ip._eval("::safe::setLogCmd #{@ip_name} #{_get_eval_string(cmd)}") end
set_bgerror_handler(cmd = Proc.new, slave = nil, &b)
click to toggle source
# File lib/multi-tk.rb, line 3351 def set_bgerror_handler(cmd = Proc.new, slave = nil, &b) raise SecurityError, "no permission to manipulate" unless self.manipulable? unless TkComm._callback_entry?(cmd) if !slave && b slave = cmd cmd = Proc.new(&b) end end slave = '' unless slave @interp._invoke('interp', 'bgerror', _slavearg(slave), cmd) end
set_cb_error(cmd = Proc.new)
click to toggle source
# File lib/multi-tk.rb, line 305 def set_cb_error(cmd = Proc.new) @cb_error_proc[0] = cmd end
set_limit(limit_type, slave = '', opts = {})
click to toggle source
# File lib/multi-tk.rb, line 3376 def set_limit(limit_type, slave = '', opts = {}) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._invoke('interp', 'limit', _slavearg(slave), limit_type, opts) end
set_safe_level(safe)
click to toggle source
# File lib/multi-tk.rb, line 317 def set_safe_level(safe) if safe > @safe_level[0] @safe_level[0] = safe @cmd_queue.enq([@system, 'set_safe_level', safe]) end @safe_level[0] end
slave?()
click to toggle source
# File lib/multi-tk.rb, line 1671 def slave? not master? end
slaves(all = false)
click to toggle source
# File lib/multi-tk.rb, line 1712 def slaves(all = false) raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._invoke('interp','slaves').split.map!{|name| if @slave_ip_tbl.key?(name) @slave_ip_tbl[name] elsif all name else nil end }.compact! end
to_eval()
click to toggle source
# File lib/multi-tk.rb, line 1705 def to_eval @ip_name || '' end
transfer_stderr(dist, src = '')
click to toggle source
# File lib/multi-tk.rb, line 3476 def transfer_stderr(dist, src = '') raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._invoke('interp', 'transfer', src, 'stderr', dist) self end
transfer_stdin(dist, src = '')
click to toggle source
# File lib/multi-tk.rb, line 3456 def transfer_stdin(dist, src = '') raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._invoke('interp', 'transfer', src, 'stdin', dist) self end
transfer_stdio(dist, src = '')
click to toggle source
# File lib/multi-tk.rb, line 3498 def transfer_stdio(dist, src = '') raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._invoke('interp', 'transfer', src, 'stdin', dist) @interp._invoke('interp', 'transfer', src, 'stdout', dist) @interp._invoke('interp', 'transfer', src, 'stderr', dist) self end
transfer_stdout(dist, src = '')
click to toggle source
# File lib/multi-tk.rb, line 3466 def transfer_stdout(dist, src = '') raise SecurityError, "no permission to manipulate" unless self.manipulable? @interp._invoke('interp', 'transfer', src, 'stdout', dist) self end
wait_on_mainloop=(bool)
click to toggle source
# File lib/multi-tk.rb, line 343 def wait_on_mainloop=(bool) @wait_on_mainloop[0] = bool end
wait_on_mainloop?()
click to toggle source
# File lib/multi-tk.rb, line 340 def wait_on_mainloop? @wait_on_mainloop[0] end
Protected Instance Methods
_is_master_of?(tcltkip_obj)
click to toggle source
# File lib/multi-tk.rb, line 1737 def _is_master_of?(tcltkip_obj) tcltkip_obj.slave_of?(@interp) end