knjrbfw 0.0.3

data/lib/knj/ironruby-gtk2/gtk2.rb

@@ -0,0 +1,148 @@
+require "gdk-sharp, Version=2.12.0.0, Culture=neutral, PublicKeyToken=35e10195dab3c99f"
+require "gtk-sharp, Version=2.12.0.0, Culture=neutral, PublicKeyToken=35e10195dab3c99f"
+require "glade-sharp, Version=2.12.0.0, Culture=neutral, PublicKeyToken=35e10195dab3c99f"
+
+
+#Hack Gtk
+RealGtk = Gtk
+RealGtk::Application.init
+
+Gtk = Module.new do
+	@all = {
+		"Gtk" => [
+			"Button", "CellRendererText", "ComboBox", "Dialog", "Entry", "Label", "ListStore", "Window", "ProgressBar",
+			"VBox", "HBox", "Image", "IconSize", "StatusIcon", "Menu", "MenuItem", "Builder", "CheckButton",
+			"FileChooserButton", "TreeView", "TreeViewColumn", "TreeSelection", "TreePath"
+		],
+		"Gdk" => [
+			"Pixbuf", "Event", "EventButton"
+		]
+	}
+	@events = {"Gtk" => {}}
+	
+	def self.all; return @all; end;
+	def self.events; return @events; end
+	
+	def self.main
+		RealGtk::Application.run
+	end
+	
+	def self.main_quit
+		RealGtk::Application.quit
+	end
+	
+	def self.takeob=(newob)
+		@takeob = newob
+	end
+	
+	def self.takeob
+		return @takeob
+	end
+end
+
+
+#Hack Gdk
+RealGdk = Module.const_get("Gdk")
+Gdk = Module.new
+module Gdk
+	#nothing here yet.
+end
+
+
+
+Gtk.all.each do |parentclass, classes|
+	classes.each do |classname|
+		Kernel.const_get(parentclass).const_set(classname, Class.new do
+				attr_reader :ob
+				attr_writer :ob
+				
+				def initialize(*paras)
+					if Gtk.takeob
+						@ob = Gtk.takeob
+						if !@ob
+							raise "Gtk.takeob was not set correctly: " + @ob.class.to_s
+						end
+						
+						print "Spawning '#{self.class.to_s}' from default takeob.\n"
+						
+						Gtk.takeob = nil
+					else
+						splitted = self.class.to_s.split("::")
+						realclass = "Real#{splitted.first}"
+						classob = Kernel.const_get(realclass).const_get(splitted.last)
+						
+						if !classob
+							raise "Class does not exist: " + realclass + "::" + splitted.last
+						end
+						
+						print "Spawning '#{self.class.to_s}' from default constructor.\n"
+						
+						@ob = classob.new(*paras)
+						
+						if !@ob
+							raise "Object was not spawned: #{self.class.to_s}, #{@ob.class.to_s}, #{realclass}::#{splitted.last}"
+						end
+					end
+				end
+				
+				def signal_connect(signal, &block)
+					classname = self.class.to_s.split("::")
+					
+					if Gtk.events[classname[0]] and Gtk.events[classname[0]][classname[1]] and Gtk.events[classname[0]][classname[1]][signal]
+						ironevent = Gtk.events[classname[0]][classname[1]][signal]
+					end
+					
+					if !ironevent
+						raise "No iron-event '#{signal}' for '#{self.class.to_s}'"
+					end
+					
+					print "Connected signal '#{signal}' to '#{self.class.to_s}'\n"
+					
+					if !@ob.respond_to?(ironevent)
+						#puts @ob.methods.sort
+						raise "RealGtk::" + classname[1] + " does not respond to: #{ironevent}."
+					end
+					
+					@ob.send(ironevent) do |*args|
+						print "Called signal '#{signal}' on '#{self.class.to_s}'\n"
+						block.call
+					end
+				end
+				
+				def method_missing(*paras)
+					newparas = []
+					first = true
+					paras.each do |para|
+						if first
+							first = false
+						else
+							splitted = para.class.to_s.split("::")
+							
+							if splitted.first == "Gtk"
+								para = para.ob
+							elsif splitted.first == "Gdk"
+								para = para.ob
+							end
+							
+							newparas << para
+						end
+					end
+					
+					#print "Respond to '#{@ob.class.to_s}' -> '#{paras[0].to_s}'\n"
+					if @ob.respond_to?(paras[0].to_s)
+						#print "Send '#{@ob.class.to_s}' -> '#{paras[0].to_s}'\n"
+						return @ob.send(paras[0], *newparas)
+					end
+					
+					#puts @ob.methods.sort
+					raise "No such method on #{self.class.name}:  #{paras[0]}"
+				end
+			end
+		)
+	end
+end
+
+files = ["gladexml", "gtk_combobox", "gtk_cellrenderertext", "window", "vbox", "stock", "label", "image", "iconsize", "entry", "dialog", "button", "gtk_builder", "gdk_pixbuf", "gdk_event", "gdk_eventbutton", "gtk_filechooserbutton", "gtk_liststore", "gtk_statusicon", "gtk_menuitem", "gtk_menu", "gtk_treeiter", "gtk_treeview", "gtk_treeviewcolumn", "gtk_treeselection", "glib"]
+files.each do |file|
+	require File.dirname(__FILE__) + "/" + file
+end

data/lib/knj/ironruby-gtk2/gtk_builder.rb

@@ -0,0 +1,31 @@
+class Gtk::Builder
+	def initialize
+		
+	end
+	
+	def add_from_file(filename)
+		cont = File.read(filename).gsub("<interface>", "<glade-interface>").gsub("</interface>", "</glade-interface>")
+		cont = cont.gsub("<object", "<widget").gsub("</object>", "</widget>")
+		cont = cont.gsub("<requires lib=\"gtk+\" version=\"2.16\"\/>", "")
+		cont = cont.gsub("<requires lib=\"gtk+\" version=\"2.14\"\/>", "")
+		cont = cont.gsub("<child type=\"label\">", "<child>")
+		cont = cont.gsub("<child type=\"tab\">", "<child>")
+		
+		@glade = GladeXML.new(cont)
+	end
+	
+	def connect_signals(&block)
+		@glade.block = block
+		@glade.auto_connect(@glade.data)
+	end
+	
+	def [](key)
+		return @glade[key]
+	end
+	
+	alias get_object []
+	
+	def objects
+		return []
+	end
+end

data/lib/knj/ironruby-gtk2/gtk_cellrenderertext.rb

@@ -0,0 +1,5 @@
+class Gtk::CellRendererText
+	def initialize(*paras)
+		@ob = RealGtk::CellRendererText.new
+	end
+end

data/lib/knj/ironruby-gtk2/gtk_combobox.rb

@@ -0,0 +1,19 @@
+class Gtk::ComboBox
+	def pack_start(widget, val)
+		@ob.pack_start(widget.ob, val)
+		@ob.add_attribute(widget.ob, "text", 0)
+	end
+	
+	def add_attribute(*paras)
+		#this should not do anything.
+	end
+	
+	def model=(newmodel)
+		@model = newmodel
+		@ob.model = newmodel.ob
+	end
+	
+	def model
+		return @model
+	end
+end

data/lib/knj/ironruby-gtk2/gtk_filechooserbutton.rb

@@ -0,0 +1,5 @@
+class Gtk::FileChooserButton
+	def filename=(newfilename)
+		@ob.set_filename(newfilename)
+	end
+end

data/lib/knj/ironruby-gtk2/gtk_liststore.rb

@@ -0,0 +1,18 @@
+class Gtk::ListStore
+	def initialize(*args)
+		args_cons = []
+		args.each do |col_name|
+			args_cons << System::String.to_clr_type
+		end
+		
+		@ob = RealGtk::ListStore.new(*args_cons)
+	end
+	
+	def append
+		Gtk.takeob = @ob.append
+		retob = Gtk::TreeIter.new
+		retob.liststore = self
+		
+		return retob
+	end
+end

data/lib/knj/ironruby-gtk2/gtk_menu.rb

@@ -0,0 +1,5 @@
+class Gtk::Menu
+	def popup(*paras)
+		@ob.popup
+	end
+end

data/lib/knj/ironruby-gtk2/gtk_menuitem.rb

@@ -0,0 +1,7 @@
+Gtk.events["Gtk"]["MenuItem"] = {
+	"activate" => "activated"
+}
+
+class Gtk::MenuItem
+	#nothing here yet.
+end

data/lib/knj/ironruby-gtk2/gtk_statusicon.rb

@@ -0,0 +1,8 @@
+Gtk.events["Gtk"]["StatusIcon"] = {
+	"activate" => "activate",
+	"popup-menu" => "popup_menu"
+}
+
+class Gtk::StatusIcon
+	#nothing here yet.
+end

data/lib/knj/ironruby-gtk2/gtk_treeiter.rb

@@ -0,0 +1,24 @@
+class Gtk::TreeIter
+	def initialize(*paras)
+		if Gtk.takeob
+			print "TreeIter from takeob.\n"
+			@ob = Gtk.takeob
+			Gtk.takeob = nil
+		else
+			print "TreeIter from constructor.\n"
+			@ob = RealGtk::TreeIter.new(*paras)
+		end
+	end
+	
+	def liststore=(newliststore)
+		@liststore = newliststore
+	end
+	
+	def []=(key, value)
+		return @liststore.ob.method(:set_value).overload(RealGtk::TreeIter, Fixnum, System::String).call(@ob, key, value)
+	end
+	
+	def [](key)
+		return @liststore.ob.get_value(@ob, key)
+	end
+end

data/lib/knj/ironruby-gtk2/gtk_treeselection.rb

@@ -0,0 +1,16 @@
+Gtk.events["Gtk"]["TreeSelection"] = {
+	"changed" => "changed"
+}
+
+class Gtk::TreeSelection
+	def selected_rows
+		ret = []
+		sel_rows = @ob.GetSelectedRows
+		sel_rows.each do |tpath|
+			Gtk.takeob = tpath
+			ret << Gtk::TreePath.new
+		end
+		
+		return ret
+	end
+end

data/lib/knj/ironruby-gtk2/gtk_treeview.rb

@@ -0,0 +1,19 @@
+class Gtk::TreeView
+	def selection
+		if !@selection
+			Gtk.takeob = @ob.selection
+			@selection = Gtk::TreeSelection.new
+		end
+		
+		return @selection
+	end
+	
+	def model=(newmodel)
+		@model = newmodel
+		@ob.model = newmodel.ob
+	end
+	
+	def model
+		return @model
+	end
+end

data/lib/knj/ironruby-gtk2/gtk_treeviewcolumn.rb

@@ -0,0 +1,32 @@
+class Gtk::TreeViewColumn
+	def initialize(title, renderer, *paras)
+		@title = title
+		@renderer = renderer
+		
+		if Gtk.takeob
+			@ob = Gtk.takeob
+			if !@ob
+				raise "Gtk.takeob was not set correctly: " + @ob.class.to_s
+			end
+			
+			Gtk.takeob = nil
+		else
+			splitted = self.class.to_s.split("::")
+			realclass = "Real#{splitted.first}"
+			classob = Kernel.const_get(realclass).const_get(splitted.last)
+			
+			if !classob
+				raise "Class does not exist: " + realclass + "::" + splitted.last
+			end
+			
+			@ob = classob.new
+			
+			if !@ob
+				raise "Object was not spawned: #{self.class.to_s}, #{@ob.class.to_s}, #{realclass}::#{splitted.last}"
+			end
+			
+			@ob.pack_start(renderer.ob, true)
+			#@ob.add_attribute(renderer.ob, "text", 0)
+		end
+	end
+end

data/lib/knj/ironruby-gtk2/iconsize.rb

@@ -0,0 +1,3 @@
+class Gtk::IconSize
+	DIALOG = RealGtk::IconSize.Dialog
+end

data/lib/knj/ironruby-gtk2/image.rb

@@ -0,0 +1,15 @@
+class Gtk::Image
+	def initialize(*paras)
+		if Gtk.takeob
+			@ob = Gtk.takeob
+			Gtk.takeob = nil
+		else
+			splitted = self.class.to_s.split("::")
+			@ob = RealGtk.const_get(splitted.last).new(*paras)
+		end
+		
+		if !@ob
+			raise "Object was not spawned: #{self.class.to_s}"
+		end
+	end
+end

data/lib/knj/ironruby-gtk2/label.rb

@@ -0,0 +1,19 @@
+class Gtk::Label
+	def initialize(title = "")
+		if Gtk.takeob
+			@ob = Gtk.takeob
+			Gtk.takeob = nil
+		else
+			splitted = self.class.to_s.split("::")
+			@ob = RealGtk.const_get(splitted.last).new(title)
+		end
+		
+		if !@ob
+			raise "Object was not spawned: #{self.class.to_s}"
+		end
+	end
+	
+	def label=(newlabel)
+		@ob.label_prop = newlabel
+	end
+end

data/lib/knj/ironruby-gtk2/stock.rb

@@ -0,0 +1,4 @@
+module Gtk::Stock
+	OK = RealGtk::Stock.Ok
+	DIALOG_WARNING = RealGtk::Stock.DialogWarning
+end

data/lib/knj/ironruby-gtk2/tests/test.glade

@@ -0,0 +1,15 @@
+<?xml version="1.0"?>
+<glade-interface>
+  <!-- interface-requires gtk+ 2.8 -->
+  <!-- interface-naming-policy project-wide -->
+  <widget class="GtkWindow" id="window">
+    <child>
+      <widget class="GtkButton" id="button1">
+        <property name="label" translatable="yes">button</property>
+        <property name="visible">True</property>
+        <property name="can_focus">True</property>
+        <property name="receives_default">True</property>
+      </widget>
+    </child>
+  </widget>
+</glade-interface>

data/lib/knj/ironruby-gtk2/tests/test_2.rb

@@ -0,0 +1,22 @@
+require "knj/autoload"
+
+class MainWindow
+	def initialize
+		button = Gtk::Button.new("Test")
+		
+		button.signal_connect("clicked") do
+			Gtk.main_quit
+		end
+		
+		win = Gtk::Window.new
+		win.add button
+		win.show_all
+	end
+
+	def on_button1_clicked(object, event)
+		print "hmm\n"
+	end
+end
+
+main_window = MainWindow.new
+Gtk.main

data/lib/knj/ironruby-gtk2/tests/test_ironruby_window.rb

@@ -0,0 +1,47 @@
+require "gtk-sharp, Version=2.12.0.0, Culture=neutral, PublicKeyToken=35e10195dab3c99f"
+require "glade-sharp, Version=2.12.0.0, Culture=neutral, PublicKeyToken=35e10195dab3c99f"
+
+RealGtk = Gtk
+RealGtk::Application.init
+
+Gtk = Class.new do
+	class Window
+		def initialize(title = "")
+			@ob = RealGtk::Window.new(title)
+		end
+		
+		def add(widget)
+			@ob.add(widget.ob)
+		end
+		
+		def show_all
+			@ob.show_all
+		end
+	end
+	
+	class Button
+		def initialize(title = nil)
+			@ob = RealGtk::Button.new(title)
+		end
+		
+		def ob
+			return @ob
+		end
+		
+		def signal_connect(signal, &block)
+			@ob.send(signal) do |sender, e|
+				block.call
+			end
+		end
+	end
+	
+	def self.main
+		RealGtk::Application.run
+	end
+	
+	def self.main_quit
+		RealGtk::Application.quit
+	end
+end
+
+require "test_2.rb"

data/lib/knj/ironruby-gtk2/vbox.rb

@@ -0,0 +1,5 @@
+class Gtk::VBox
+	def pack_start(widget, arg1 = false, arg2 = false)
+		@ob.PackStart(widget.ob)
+	end
+end

data/lib/knj/ironruby-gtk2/window.rb

@@ -0,0 +1,23 @@
+Gtk.events["Gtk"]["Window"] = {
+	"destroy" => "destroyed"
+}
+
+class Gtk::Window
+	def initialize(title = "")
+		if Gtk.takeob
+			@ob = Gtk.takeob
+			Gtk.takeob = nil
+		else
+			splitted = self.class.to_s.split("::")
+			@ob = RealGtk.const_get(splitted.last).new(title)
+		end
+		
+		if !@ob
+			raise "Object was not spawned: #{self.class.to_s}"
+		end
+	end
+	
+	def add(widget)
+		@ob.add(widget.ob)
+	end
+end

data/lib/knj/jruby-gtk2/builder/test_builder.glade

@@ -0,0 +1,43 @@
+<?xml version="1.0"?>
+<glade-interface>
+  <!-- interface-requires gtk+ 2.8 -->
+  <!-- interface-naming-policy project-wide -->
+  <widget class="GtkWindow" id="window1">
+    <signal name="destroy" handler="on_window1_destroy"/>
+    <child>
+      <widget class="GtkHBox" id="hbox1">
+        <property name="visible">True</property>
+        <child>
+          <widget class="GtkButton" id="button1">
+            <property name="label" translatable="yes">button</property>
+            <property name="visible">True</property>
+            <property name="can_focus">True</property>
+            <property name="receives_default">True</property>
+          </widget>
+          <packing>
+            <property name="position">0</property>
+          </packing>
+        </child>
+        <child>
+          <widget class="GtkLabel" id="label1">
+            <property name="visible">True</property>
+            <property name="label" translatable="yes">label</property>
+          </widget>
+          <packing>
+            <property name="position">1</property>
+          </packing>
+        </child>
+        <child>
+          <widget class="GtkEntry" id="entry1">
+            <property name="visible">True</property>
+            <property name="can_focus">True</property>
+            <property name="invisible_char">&#x25CF;</property>
+          </widget>
+          <packing>
+            <property name="position">2</property>
+          </packing>
+        </child>
+      </widget>
+    </child>
+  </widget>
+</glade-interface>

data/lib/knj/jruby-gtk2/builder/test_builder.rb

@@ -0,0 +1,19 @@
+require "knj/autoload"
+
+class TestWindow
+	def initialize
+		@gui = Gtk::Builder.new
+		@gui.add_from_file("test_builder.ui")
+		@gui.connect_signals(){|h|method(h)}
+		
+		@gui["window1"].show_all
+	end
+	
+	def on_window1_destroy
+		Gtk.main_quit
+	end
+end
+
+TestWindow.new
+
+Gtk.main

data/lib/knj/jruby-gtk2/builder/test_builder.ui

@@ -0,0 +1,43 @@
+<?xml version="1.0"?>
+<interface>
+  <!-- interface-requires gtk+ 2.8 -->
+  <!-- interface-naming-policy project-wide -->
+  <object class="GtkWindow" id="window1">
+    <signal name="destroy" handler="on_window1_destroy"/>
+    <child>
+      <object class="GtkHBox" id="hbox1">
+        <property name="visible">True</property>
+        <child>
+          <object class="GtkButton" id="button1">
+            <property name="label" translatable="yes">button</property>
+            <property name="visible">True</property>
+            <property name="can_focus">True</property>
+            <property name="receives_default">True</property>
+          </object>
+          <packing>
+            <property name="position">0</property>
+          </packing>
+        </child>
+        <child>
+          <object class="GtkLabel" id="label1">
+            <property name="visible">True</property>
+            <property name="label" translatable="yes">label</property>
+          </object>
+          <packing>
+            <property name="position">1</property>
+          </packing>
+        </child>
+        <child>
+          <object class="GtkEntry" id="entry1">
+            <property name="visible">True</property>
+            <property name="can_focus">True</property>
+            <property name="invisible_char">&#x25CF;</property>
+          </object>
+          <packing>
+            <property name="position">2</property>
+          </packing>
+        </child>
+      </object>
+    </child>
+  </object>
+</interface>

data/lib/knj/jruby-gtk2/builder.rb

@@ -0,0 +1,27 @@
+class Gtk::Builder
+	def initialize
+		
+	end
+	
+	def add_from_file(filename)
+		cont = File.read(filename).gsub("<interface>", "<glade-interface>").gsub("</interface>", "</glade-interface>")
+		cont = cont.gsub("<object", "<widget").gsub("</object>", "</widget>")
+		cont = cont.gsub("<requires lib=\"gtk+\" version=\"2.16\"\/>", "")
+		cont = cont.gsub("<requires lib=\"gtk+\" version=\"2.14\"\/>", "")
+		cont = cont.gsub("<child type=\"label\">", "<child>")
+		cont = cont.gsub("<child type=\"tab\">", "<child>")
+		
+		@glade = GladeXML.new(cont)
+	end
+	
+	def connect_signals(&block)
+		@glade.block = block
+		@glade.auto_connect(@glade.data)
+	end
+	
+	def [](key)
+		return @glade[key]
+	end
+	
+	alias get_object []
+end

data/lib/knj/jruby-gtk2/cellrenderertext.rb

@@ -0,0 +1,12 @@
+class Gtk::CellRendererText
+	def initialize
+		if Gtk.takeob
+			@ob = Gtk.takeob
+			Gtk.takeob = nil
+		end
+	end
+	
+	def init(tcol)
+		@ob = org.gnome.gtk.CellRendererText.new(tcol.ob)
+	end
+end

data/lib/knj/jruby-gtk2/checkbutton.rb

@@ -0,0 +1,3 @@
+class Gtk::CheckButton
+	#nothing here yet... once there were something here... but that was a long long time ago...
+end