File: t-gtkplug.rb

package info (click to toggle)
ruby-gnome2 2.2.0-5
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 11,360 kB
  • ctags: 14,222
  • sloc: ansic: 85,875; ruby: 38,232; sh: 80; xml: 41; makefile: 22
file content (58 lines) | stat: -rw-r--r-- 1,492 bytes parent folder | download | duplicates (6)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
#!/usr/bin/env ruby

=begin
  Sample script using Gtk::Socket and Gtk::Plug.

  $ ruby t-gtksocket.rb

  Written by Alex Boussinet <mailto:dbug@wanadoo.fr> for testing purpose only.

  Copyright (c) 2003-2006 Ruby-GNOME2 Project Team
  This program is licenced under the same licence as Ruby-GNOME2.

  $Id: t-gtkplug.rb,v 1.5 2006/06/17 13:18:12 mutoh Exp $
=end

require 'gtk3'

class MyGtkPlug
  def initialize(xid, plug)
    plug = "Button" if plug.nil?
    if xid.nil?
      @window = Gtk::Window.new("Gtk::Plug Test")
      @window.set_default_size(250, 50)
    else
      @window = Gtk::Plug.new(xid.to_i)
    end
    @window.window_position = Gtk::Window::Position::CENTER
    @window.signal_connect("delete_event"){Gtk.main_quit}
    @vbox = Gtk::Box.new(:vertical, 5)
    @window.add(@vbox)
    @button1 = Gtk::Button.new(:label => plug)
    @button1.signal_connect("clicked"){ $stderr.puts plug}
    @button2 = Gtk::Button.new(:label => "Exit")
    @button2.signal_connect("clicked"){Gtk.main_quit}
    # Exit button to test an unexpected end of child process by Gtk::Socket
    @vbox.pack_start(@button1, true, true)
    @vbox.pack_start(@button2, true, true)
    @window.show_all
  end
end

xid = nil
ARGV.each_index { |i|
  arg = ARGV.at(i)
  if arg == "-x"
    if arg.length > 2
      xid = arg[2..-1]
    else
      xid = ARGV.at(i + 1)
      ARGV.delete_at(i + 1)
    end
    xid = nil if xid.to_i <= 0
    ARGV.delete_at(i)
  end 
}

MyGtkPlug.new(xid, ARGV.shift)
Gtk.main