Class: RemoteTkIp

Inherits:
MultiTkIp show all
Defined in:
lib/remote-tk.rb,
lib/remote-tk.rb,
lib/remote-tk.rb,
lib/remote-tk.rb

Constant Summary collapse

@@IP_TABLE =
MultiTkIp._IP_TABLE
@@TK_TABLE_LIST =
MultiTkIp._TK_TABLE_LIST

Constants inherited from MultiTkIp

MultiTkIp::BASE_DIR, MultiTkIp::INTERP_MUTEX, MultiTkIp::INTERP_ROOT_CHECK, MultiTkIp::INTERP_THREAD, MultiTkIp::INTERP_THREAD_STATUS, MultiTkIp::RUN_EVENTLOOP_ON_MAIN_THREAD, MultiTkIp::WITH_ENCODING, MultiTkIp::WITH_RUBY_VM

Class Method Summary collapse

Instance Method Summary collapse

Methods inherited from MultiTkIp

_DEFAULT_MASTER, _IP_TABLE, _TK_TABLE_LIST, #__create_safe_slave_obj, #__create_trusted_slave_obj, __getip, #__pseudo_toplevel, #__pseudo_toplevel=, #__pseudo_toplevel_evaluable=, #__pseudo_toplevel_evaluable?, #_add_new_tables, #_add_tk_procs, _conv_listelement, _create_console, #_create_slave_object, #_default_delete_hook, #_destroy_slaves_of_slaveIP, _eval, _eval_with_enc, _eval_without_enc, _fromUTF8, _get_global_var, _get_global_var2, _get_variable, _get_variable2, #_init_ip_env, #_init_ip_internal, _invoke, _invoke_with_enc, _invoke_without_enc, _ip_id_, #_make_menu_embeddable, _make_menu_embeddable, _merge_tklist, #_proc_on_current_safelevel, _proc_on_current_safelevel, _proc_on_safelevel, #_proc_on_safelevel, #_receiver_mainloop, #_remove_tk_procs, _return_value, _set_global_var, _set_global_var2, _set_variable, _set_variable2, _split_tklist, _thread_tkwait, _thread_vwait, #_tk_cmd_tbl, #_tk_table_list, #_tk_windows, _toUTF8, _unset_global_var, _unset_global_var2, _unset_variable, _unset_variable2, #abort, abort, add_tk_procs, #alias_delete, alias_delete, #alias_info, alias_info, #alias_target, alias_target, aliases, #aliases, #alive?, alive?, allow_ruby_exit=, allow_ruby_exit?, #background_call, #background_eval, #background_eval_proc, #background_eval_str, #background_eval_string, #bg_call, bg_eval, #bg_eval, bg_eval_proc, #bg_eval_proc, #bg_eval_str, bg_eval_string, #bg_eval_string, bgerror, #call, cb_entry_class, #cb_error, #cb_eval, create_table, #def_alias, def_alias, default_encoding, #default_encoding=, default_encoding=, default_master?, delete, #delete_cmd, delete_cmd, #delete_slaves, delete_slaves, deleted?, encoding, #encoding=, encoding=, encoding_convert_from, encoding_convert_to, #encoding_convertfrom, encoding_convertfrom, #encoding_convertto, encoding_convertto, #encoding_name, encoding_name, #encoding_obj, encoding_obj, #encoding_table, encoding_table, eval, #eval, #eval_callback, eval_proc, #eval_proc, #eval_str, eval_string, #eval_string, exist?, #exist?, exit, #exit, exit!, #exit!, #expose_cmd, expose_cmd, force_default_encoding=, #force_default_encoding=, #force_default_encoding?, force_default_encoding?, #get_bgerror_handler, get_cb_entry, get_limit, #get_limit, has_mainwindow?, #hidden_cmds, hidden_cmds, hide_cmd, #hide_cmd, inherited, init_ip_env, init_ip_internal, #inspect, invalid_namespace?, #invoke_hidden, invoke_hidden, invoke_hidden_on_global, #invoke_hidden_on_global, #invoke_hidden_on_namespace, invoke_hidden_on_namespace, #ip_name, ip_name, make_safe, #mark_trusted, mark_trusted, master?, #master?, method_missing, new_master, new_safe_slave, new_slave, path, #path, #recursion_limit, recursion_limit, remove_tk_procs, restart, #running_mainloop?, safe?, safe_base?, #safe_level, safe_level, safe_level=, #safe_level=, #safeip_add_to_access_path, #safeip_configinfo, #safeip_configure, #safeip_delete, #safeip_find_in_access_path, #safeip_set_log_cmd, #set_bgerror_handler, #set_cb_error, #set_limit, set_limit, #set_safe_level, set_safe_level, #share_stderr, share_stderr, #share_stdin, share_stdin, share_stdio, #share_stdio, #share_stdout, share_stdout, #slave?, slave?, slaves, #slaves, #thread_eval_proc, tk_cmd_tbl, tk_object_table, tk_windows, to_eval, #to_eval, transfer_stderr, #transfer_stderr, #transfer_stdin, transfer_stdin, transfer_stdio, #transfer_stdio, transfer_stdout, #transfer_stdout, #wait_on_mainloop=, #wait_on_mainloop?

Constructor Details

#initialize(remote_ip, displayof = nil, timeout = 5) ⇒ RemoteTkIp

Returns a new instance of RemoteTkIp.



66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
# File 'lib/remote-tk.rb', line 66

def initialize(remote_ip, displayof=nil, timeout=5)
  @interp = MultiTkIp.__getip
  if @interp.safe?
    fail SecurityError, "safe-IP cannot create RemoteTkIp"
  end


  @interp.allow_ruby_exit = false
  @appname = @interp._invoke('tk', 'appname')
  @remote = remote_ip.to_s.dup.freeze
  if displayof.kind_of?(TkWindow)
    @displayof = displayof.path.dup.freeze
  else
    @displayof = nil
  end
  if self.deleted?
    fail RuntimeError, "no Tk application named \"#{@remote}\""
  end

  @tk_windows = {}
  @tk_table_list = []
  @slave_ip_tbl = {}
  @slave_ip_top = {}

  @force_default_encoding ||= [false]
  @encoding ||= [nil]
  def @encoding.to_s; self.join(nil); end

  @system = Object.new

  @threadgroup  = ThreadGroup.new

  @safe_level = [0]

  @wait_on_mainloop = [true, 0]

  @cmd_queue = Queue.new

  @@DEFAULT_MASTER.assign_receiver_and_watchdog(self)

  @@IP_TABLE[@threadgroup] = self
  @@TK_TABLE_LIST.size.times{
    @tk_table_list << {}
  }

  @ret_val = TkVariable.new
  if timeout > 0 && ! _available_check(timeout)
    fail RuntimeError, "cannot create connection"
  end
  @ip_id = _create_connection

  class << self
    undef :instance_eval
  end

  self.freeze  # defend against modification
end

Class Method Details

.do_one_event(flag = nil) ⇒ Object



483
484
485
# File 'lib/remote-tk.rb', line 483

def do_one_event(flag = nil)
  fail RuntimeError, 'not support "do_one_event" on the remote interpreter'
end

.get_eventloop_tickObject



495
496
497
# File 'lib/remote-tk.rb', line 495

def get_eventloop_tick
  fail RuntimeError, 'not support "get_eventloop_tick" on the remote interpreter'
end

.get_eventloop_weightObject



507
508
509
# File 'lib/remote-tk.rb', line 507

def get_eventloop_weight
  fail RuntimeError, 'not support "get_eventloop_weight" on the remote interpreter'
end

.get_no_event_waitObject



501
502
503
# File 'lib/remote-tk.rb', line 501

def get_no_event_wait
  fail RuntimeError, 'not support "get_no_event_wait" on the remote interpreter'
end

.mainloop(*args) ⇒ Object



477
478
479
# File 'lib/remote-tk.rb', line 477

def mainloop(*args)
  fail RuntimeError, 'not support "mainloop" on the remote interpreter'
end

.mainloop_abort_on_exceptionObject



486
487
488
# File 'lib/remote-tk.rb', line 486

def mainloop_abort_on_exception
  fail RuntimeError, 'not support "mainloop_abort_on_exception" on the remote interpreter'
end

.mainloop_abort_on_exception=(mode) ⇒ Object



489
490
491
# File 'lib/remote-tk.rb', line 489

def mainloop_abort_on_exception=(mode)
  fail RuntimeError, 'not support "mainloop_abort_on_exception=" on the remote interpreter'
end

.mainloop_watchdog(*args) ⇒ Object



480
481
482
# File 'lib/remote-tk.rb', line 480

def mainloop_watchdog(*args)
  fail RuntimeError, 'not support "mainloop_watchdog" on the remote interpreter'
end

.manipulable?Boolean

Returns:

  • (Boolean)


128
129
130
# File 'lib/remote-tk.rb', line 128

def self.manipulable?
  true
end

.new(*args, &b) ⇒ Object



58
59
60
61
62
# File 'lib/remote-tk.rb', line 58

def new(*args, &b)
  ip = __new(*args)
  ip.eval_proc(&b) if b
  ip
end

.set_eventloop_tick(*args) ⇒ Object



492
493
494
# File 'lib/remote-tk.rb', line 492

def set_eventloop_tick(*args)
  fail RuntimeError, 'not support "set_eventloop_tick" on the remote interpreter'
end

.set_eventloop_weight(*args) ⇒ Object



504
505
506
# File 'lib/remote-tk.rb', line 504

def set_eventloop_weight(*args)
  fail RuntimeError, 'not support "set_eventloop_weight" on the remote interpreter'
end

.set_no_event_wait(*args) ⇒ Object



498
499
500
# File 'lib/remote-tk.rb', line 498

def set_no_event_wait(*args)
  fail RuntimeError, 'not support "set_no_event_wait" on the remote interpreter'
end

.to_sObject



92
# File 'lib/remote-tk.rb', line 92

def @encoding.to_s; self.join(nil); end

Instance Method Details

#__eval(str) ⇒ Object



321
322
323
# File 'lib/remote-tk.rb', line 321

def __eval(str)
  _appsend(false, false, str)
end

#__invoke(*args) ⇒ Object



338
339
340
# File 'lib/remote-tk.rb', line 338

def __invoke(*args)
  _appsend(false, false, *args)
end

#_conv_listelement(str) ⇒ Object

Raises:

  • (SecurityError)


432
433
434
435
# File 'lib/remote-tk.rb', line 432

def _conv_listelement(str)
  raise SecurityError, "no permission to manipulate" unless self.manipulable?
  @interp._conv_listelement(str)
end

#_create_consoleObject



437
438
439
# File 'lib/remote-tk.rb', line 437

def _create_console
  fail RuntimeError, 'not support "_create_console" on the remote interpreter'
end

#_eval(str) ⇒ Object



324
325
326
# File 'lib/remote-tk.rb', line 324

def _eval(str)
  _appsend(nil, false, str)
end

#_eval_with_enc(str) ⇒ Object



330
331
332
# File 'lib/remote-tk.rb', line 330

def _eval_with_enc(str)
  _appsend(true, false, str)
end

#_eval_without_enc(str) ⇒ Object



327
328
329
# File 'lib/remote-tk.rb', line 327

def _eval_without_enc(str)
  _appsend(false, false, str)
end

#_fromUTF8(str, encoding = nil) ⇒ Object

Raises:

  • (SecurityError)


356
357
358
359
# File 'lib/remote-tk.rb', line 356

def _fromUTF8(str, encoding=nil)
  raise SecurityError, "no permission to manipulate" unless self.manipulable?
  @interp._fromUTF8(str, encoding)
end

#_get_global_var(var_name) ⇒ Object



401
402
403
# File 'lib/remote-tk.rb', line 401

def _get_global_var(var_name)
  _appsend(false, 'set', TkComm::_get_eval_string(var_name))
end

#_get_global_var2(var_name, index_name) ⇒ Object



404
405
406
# File 'lib/remote-tk.rb', line 404

def _get_global_var2(var_name, index_name)
  _appsend(false, 'set', "#{TkComm::_get_eval_string(var_name)}(#{TkComm::_get_eval_string(index_name)})")
end

#_get_variable(var_name, flag) ⇒ Object



374
375
376
377
# File 'lib/remote-tk.rb', line 374

def _get_variable(var_name, flag)
  # ignore flag
  _appsend(false, 'set', TkComm::_get_eval_string(var_name))
end

#_get_variable2(var_name, index_name, flag) ⇒ Object



378
379
380
381
# File 'lib/remote-tk.rb', line 378

def _get_variable2(var_name, index_name, flag)
  # ignore flag
  _appsend(false, 'set', "#{TkComm::_get_eval_string(var_name)}(#{TkComm::_get_eval_string(index_name)})")
end

#_invoke(*args) ⇒ Object



334
335
336
# File 'lib/remote-tk.rb', line 334

def _invoke(*args)
  _appsend(nil, false, *args)
end

#_invoke_with_enc(*args) ⇒ Object



347
348
349
# File 'lib/remote-tk.rb', line 347

def _invoke_with_enc(*args)
  _appsend(true, false, *args)
end

#_invoke_without_enc(*args) ⇒ Object



344
345
346
# File 'lib/remote-tk.rb', line 344

def _invoke_without_enc(*args)
  _appsend(false, false, *args)
end

#_ip_id_Object



137
138
139
# File 'lib/remote-tk.rb', line 137

def _ip_id_
  @ip_id
end

#_merge_tklist(*args) ⇒ Object

Raises:

  • (SecurityError)


427
428
429
430
# File 'lib/remote-tk.rb', line 427

def _merge_tklist(*args)
  raise SecurityError, "no permission to manipulate" unless self.manipulable?
  @interp._merge_tklist(*args)
end

#_return_valueObject

Raises:

  • (SecurityError)


369
370
371
372
# File 'lib/remote-tk.rb', line 369

def _return_value
  raise SecurityError, "no permission to manipulate" unless self.manipulable?
  @interp._return_value
end

#_set_global_var(var_name, value) ⇒ Object



408
409
410
# File 'lib/remote-tk.rb', line 408

def _set_global_var(var_name, value)
  _appsend(false, 'set', TkComm::_get_eval_string(var_name), TkComm::_get_eval_string(value))
end

#_set_global_var2(var_name, index_name, value) ⇒ Object



411
412
413
# File 'lib/remote-tk.rb', line 411

def _set_global_var2(var_name, index_name, value)
  _appsend(false, 'set', "#{TkComm::_get_eval_string(var_name)}(#{TkComm::_get_eval_string(index_name)})", TkComm::_get_eval_string(value))
end

#_set_variable(var_name, value, flag) ⇒ Object



383
384
385
386
# File 'lib/remote-tk.rb', line 383

def _set_variable(var_name, value, flag)
  # ignore flag
  _appsend(false, 'set', TkComm::_get_eval_string(var_name), TkComm::_get_eval_string(value))
end

#_set_variable2(var_name, index_name, value, flag) ⇒ Object



387
388
389
390
# File 'lib/remote-tk.rb', line 387

def _set_variable2(var_name, index_name, value, flag)
  # ignore flag
  _appsend(false, 'set', "#{TkComm::_get_eval_string(var_name)}(#{TkComm::_get_eval_string(index_name)})", TkComm::_get_eval_string(value))
end

#_split_tklist(str) ⇒ Object

Raises:

  • (SecurityError)


422
423
424
425
# File 'lib/remote-tk.rb', line 422

def _split_tklist(str)
  raise SecurityError, "no permission to manipulate" unless self.manipulable?
  @interp._split_tklist(str)
end

#_thread_tkwait(mode, target) ⇒ Object



365
366
367
# File 'lib/remote-tk.rb', line 365

def _thread_tkwait(mode, target)
  _appsend(false, 'thread_tkwait', mode, target)
end

#_thread_vwait(var_name) ⇒ Object



361
362
363
# File 'lib/remote-tk.rb', line 361

def _thread_vwait(var_name)
  _appsend(false, 'thread_vwait', var_name)
end

#_toUTF8(str, encoding = nil) ⇒ Object

Raises:

  • (SecurityError)


351
352
353
354
# File 'lib/remote-tk.rb', line 351

def _toUTF8(str, encoding=nil)
  raise SecurityError, "no permission to manipulate" unless self.manipulable?
  @interp._toUTF8(str, encoding)
end

#_unset_global_var(var_name) ⇒ Object



415
416
417
# File 'lib/remote-tk.rb', line 415

def _unset_global_var(var_name)
  _appsend(false, 'unset', TkComm::_get_eval_string(var_name))
end

#_unset_global_var2(var_name, index_name) ⇒ Object



418
419
420
# File 'lib/remote-tk.rb', line 418

def _unset_global_var2(var_name, index_name)
  _appsend(false, 'unset', "#{var_name}(#{index_name})")
end

#_unset_variable(var_name, flag) ⇒ Object



392
393
394
395
# File 'lib/remote-tk.rb', line 392

def _unset_variable(var_name, flag)
  # ignore flag
  _appsend(false, 'unset', TkComm::_get_eval_string(var_name))
end

#_unset_variable2(var_name, index_name, flag) ⇒ Object



396
397
398
399
# File 'lib/remote-tk.rb', line 396

def _unset_variable2(var_name, index_name, flag)
  # ignore flag
  _appsend(false, 'unset', "#{var_name}(#{index_name})")
end

#allow_ruby_exit=(mode) ⇒ Object



273
274
275
# File 'lib/remote-tk.rb', line 273

def allow_ruby_exit=(mode)
  fail RuntimeError, 'cannot change mode of the remote interpreter'
end

#allow_ruby_exit?Boolean

Returns:

  • (Boolean)


269
270
271
# File 'lib/remote-tk.rb', line 269

def allow_ruby_exit?
  false
end

#appsend(async, *args) ⇒ Object

Raises:

  • (SecurityError)


220
221
222
223
224
225
226
227
228
229
230
231
232
# File 'lib/remote-tk.rb', line 220

def appsend(async, *args)
  raise SecurityError, "no permission to manipulate" unless self.manipulable?

  if async != true && async != false && async != nil
    args.unshift(async)
    async = false
  end
  if @displayof
    Tk.appsend_displayof(@remote, @displayof, async, *args)
  else
    Tk.appsend(@remote, async, *args)
  end
end

#create_slave(name, safe = false) ⇒ Object



248
249
250
251
252
253
254
255
# File 'lib/remote-tk.rb', line 248

def create_slave(name, safe=false)
  if safe
    safe_opt = ''
  else
    safe_opt = '-safe'
  end
  _appsend(false, false, "interp create #{safe_opt} -- #{name}")
end

#deleteObject



277
278
279
# File 'lib/remote-tk.rb', line 277

def delete
  _appsend(false, true, 'exit')
end

#deleted?Boolean

Returns:

  • (Boolean)

Raises:

  • (SecurityError)


281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
# File 'lib/remote-tk.rb', line 281

def deleted?
  raise SecurityError, "no permission to manipulate" unless self.manipulable?

  if @displayof
    lst = @interp._invoke_without_enc('winfo', 'interps',
                                      '-displayof', @displayof)
  else
    lst = @interp._invoke_without_enc('winfo', 'interps')
  end
  # unless @interp._split_tklist(lst).index(@remote)
  unless @interp._split_tklist(lst).index(_toUTF8(@remote))
    true
  else
    false
  end
end

#do_one_event(flag = nil) ⇒ Object



447
448
449
# File 'lib/remote-tk.rb', line 447

def do_one_event(flag = nil)
  fail RuntimeError, 'not support "do_one_event" on the remote interpreter'
end

#get_eventloop_tickObject



459
460
461
# File 'lib/remote-tk.rb', line 459

def get_eventloop_tick
  fail RuntimeError, 'not support "get_eventloop_tick" on the remote interpreter'
end

#get_eventloop_weightObject



471
472
473
# File 'lib/remote-tk.rb', line 471

def get_eventloop_weight
  fail RuntimeError, 'not support "get_eventloop_weight" on the remote interpreter'
end

#get_no_event_waitObject



465
466
467
# File 'lib/remote-tk.rb', line 465

def get_no_event_wait
  fail RuntimeError, 'not support "get_no_event_wait" on the remote interpreter'
end

#has_mainwindow?Boolean

Returns:

  • (Boolean)

Raises:

  • (SecurityError)


298
299
300
301
302
303
304
305
306
307
308
309
310
311
# File 'lib/remote-tk.rb', line 298

def has_mainwindow?
  raise SecurityError, "no permission to manipulate" unless self.manipulable?

  begin
    inf = @interp._invoke_without_enc('info', 'command', '.')
  rescue Exception
    return nil
  end
  if !inf.kind_of?(String) || inf != '.'
    false
  else
    true
  end
end

#invalid_namespace?Boolean

Returns:

  • (Boolean)


313
314
315
# File 'lib/remote-tk.rb', line 313

def invalid_namespace?
  false
end

#is_rubytk?Boolean

Returns:

  • (Boolean)


214
215
216
217
218
# File 'lib/remote-tk.rb', line 214

def is_rubytk?
  return false if _appsend(false, false, 'info', 'command', 'ruby') == ""
  [ _appsend(false, false, 'ruby', 'RUBY_VERSION'),
    _appsend(false, false, 'set', 'tk_patchLevel') ]
end

#mainloopObject



441
442
443
# File 'lib/remote-tk.rb', line 441

def mainloop
  fail RuntimeError, 'not support "mainloop" on the remote interpreter'
end

#mainloop_abort_on_exceptionObject



450
451
452
# File 'lib/remote-tk.rb', line 450

def mainloop_abort_on_exception
  fail RuntimeError, 'not support "mainloop_abort_on_exception" on the remote interpreter'
end

#mainloop_abort_on_exception=(mode) ⇒ Object



453
454
455
# File 'lib/remote-tk.rb', line 453

def mainloop_abort_on_exception=(mode)
  fail RuntimeError, 'not support "mainloop_abort_on_exception=" on the remote interpreter'
end

#mainloop_watchdogObject



444
445
446
# File 'lib/remote-tk.rb', line 444

def mainloop_watchdog
  fail RuntimeError, 'not support "mainloop_watchdog" on the remote interpreter'
end

#make_safeObject



257
258
259
# File 'lib/remote-tk.rb', line 257

def make_safe
  fail RuntimeError, 'cannot change safe mode of the remote interpreter'
end

#manipulable?Boolean

Returns:

  • (Boolean)


124
125
126
127
# File 'lib/remote-tk.rb', line 124

def manipulable?
  return true if (Thread.current.group == ThreadGroup::Default)
  MultiTkIp.__getip == @interp && ! @interp.safe?
end

#rb_appsend(async, *args) ⇒ Object

Raises:

  • (SecurityError)


234
235
236
237
238
239
240
241
242
243
244
245
246
# File 'lib/remote-tk.rb', line 234

def rb_appsend(async, *args)
  raise SecurityError, "no permission to manipulate" unless self.manipulable?

  if async != true && async != false && async != nil
    args.unshift(async)
    async = false
  end
  if @displayof
    Tk.rb_appsend_displayof(@remote, @displayof, async, *args)
  else
    Tk.rb_appsend(@remote, async, *args)
  end
end

#ready?(timeout = 5) ⇒ Boolean

Returns:

  • (Boolean)


207
208
209
210
211
212
# File 'lib/remote-tk.rb', line 207

def ready?(timeout=5)
  if timeout < 0
    fail ArgumentError, "timeout must be positive number"
  end
  _available_check(timeout)
end

#restartObject



317
318
319
# File 'lib/remote-tk.rb', line 317

def restart
  fail RuntimeError, 'cannot restart the remote interpreter'
end

#safe?Boolean

Returns:

  • (Boolean)


261
262
263
# File 'lib/remote-tk.rb', line 261

def safe?
  _appsend(false, false, 'interp issafe')
end

#safe_base?Boolean

Returns:

  • (Boolean)


265
266
267
# File 'lib/remote-tk.rb', line 265

def safe_base?
  false
end

#set_eventloop_tick(*args) ⇒ Object



456
457
458
# File 'lib/remote-tk.rb', line 456

def set_eventloop_tick(*args)
  fail RuntimeError, 'not support "set_eventloop_tick" on the remote interpreter'
end

#set_eventloop_weight(*args) ⇒ Object



468
469
470
# File 'lib/remote-tk.rb', line 468

def set_eventloop_weight(*args)
  fail RuntimeError, 'not support "set_eventloop_weight" on the remote interpreter'
end

#set_no_event_wait(*args) ⇒ Object



462
463
464
# File 'lib/remote-tk.rb', line 462

def set_no_event_wait(*args)
  fail RuntimeError, 'not support "set_no_event_wait" on the remote interpreter'
end