cheri 0.0.2

data/MIT-LICENSE

@@ -0,0 +1,20 @@
+Copyright (C) 2007 William N Dortch <bill.dortch@gmail.com>
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README

@@ -0,0 +1,98 @@
+= Cheri -- A Builder Framework
+
+Cheri is a framework for creating builder applications (those that create
+hierarchical, tree-like, structures).  It includes a number of builders
+based on the framework, as well as a builder-builder tool for easily creating
+simple builders.  Cheri also comes with a demo application, Cheri::JRuby::Explorer,
+that is built using two of the supplied builders (Cheri::Swing and Cheri::Html).
+
+This version (0.0.2) is an early beta release. Some features are not yet fully
+developed, in particular the HTML/XML components.  On the other hand, Cheri::Swing,
+which is the successor to JRBuilder (http://www2.webng.com/bdortch/jrbuilder), is
+relatively mature, in an adolescent sort of way, though many features could be added.
+
+But do expect some bugs, especially in Cheri::JRuby::Explorer (CJX), which is very
+much a work in progress.  I note some known problems in the section below.
+
+Documentation will be forthcoming over the next couple of days (from this writing,
+8 June 2007), so watch the Cheri websites at RubyForge for updates:
+
+  http://cheri.rubyforge.org/
+  http://rubyforge.org/projects/cheri
+  
+In the meantime, here is a very brief summary of CJX.
+
+== Cheri::JRuby::Explorer (CJX)
+
+CJX is a Swing application written entirely in (J)Ruby using the Cheri::Swing and
+Cheri::Html builders.  It enables you to easily browse classes/modules,
+configuration/environment settings, and, if ObjectSpace is enabled, any objects
+in a JRuby instance.  A small DRb server component can be installed in other JRuby
+instances, enabling you to browse them as well. (Note that I have been trying to get
+the DRb server component working in C/MRI Ruby as well, but have run up against
+threading/IO conflicts. Suggestions welcome!)
+
+The CJX client requires JRuby 1.0.0RC3 or later. To run it (after installing the
+Cheri gem):
+
+  require 'rubygems'
+  require 'cheri/jruby/explorer'
+  
+  Cheri::JRuby::Explorer.run
+  
+This will take several seconds to load and start -- performance will be one area
+of improvement for versions 0.0.3 and beyond.  Once it loads, it should be fairly
+clear what to do.
+
+Some known issues:
+
+* Browsing the class hierarchy is very slow right now -- this actually slowed down
+  in the past couple of days when I switched from HTML to straight Swing layout, the
+  opposite of what I expected to happen.
+  
+* ObjectSpace searches that return large numbers of objects sometimes result in a
+  NullPointerException (JList seems to get overwhelmed), requiring a restart of
+  CJX. I had a fix in that did a GC on the target instance before each search,
+  which seemed to help, but also seemed a little extreme. This will be a search
+  option in 0.0.3.
+  
+* There are lots of layout issues; neither HTML (JEditorPane) nor BoxLayout provide 
+  exactly what I'm looking for. Will probably have to bite the bullet and go to
+  GridBagLayout.  Ugh.
+  
+* Close buttons on tabs aren't available pre-Java 1.6.  There are alternatives for
+  the top tabs, but currently not for the bottom (search result) tabs.  Will resolve
+  in 0.0.3.
+  
+* Speaking of tabs, tab management (and navigation in general) is not yet quite right.
+  Will have history/back buttons and better tab management in 0.0.3.
+  
+* Global variables are currently shown, um, globally, when many of them should be shown
+  per thread.  This will be fixed in 0.0.3, which will include a Thread section with
+  other goodies as well (thread-local vars, status, etc.).
+  
+To install the CJX DRb server component in an instance (assuming the Cheri gem is
+installed):
+
+  require 'rubygems'
+  require 'cheri/explorer'
+  
+  Cheri::Explorer.start nnnn #=> where nnnn is a port number
+  
+Note that for the server, you require 'cheri/explorer', _not_ 'cheri/jruby/explorer'.
+Also note that the above actually _does_ work in C/MRI Ruby, but requests to the
+server then hang in CJX, unless you join the thread:
+
+  Cheri::Explorer.thread.join
+  
+After that, you can browse just fine in CJX, but you can't do anything more in the
+C-Ruby instance, so it's kind of pointless. Again, if anyone with some DRb experience
+(of which I have none) can offer any suggestions, I'd appreciate it.
+
+== The Rest
+
+Please visit the Cheri site for more documentation, I'll be continually adding to it
+in the coming days.
+
+Bill Dortch <cheri.project@gmail.com>
+8 June 2007

data/Rakefile

@@ -0,0 +1,121 @@
+require 'rubygems'
+require 'rake'
+require 'rake/testtask'
+require 'rake/rdoctask'
+require 'rake/packagetask'
+require 'rake/gempackagetask'
+require 'rake/contrib/rubyforgepublisher'
+require 'fileutils'
+require File.join(File.dirname(__FILE__), 'lib', 'cheri', 'cheri')
+
+PKG_BUILD     = ENV['PKG_BUILD'] ? '.' + ENV['PKG_BUILD'] : ''
+PKG_NAME      = 'cheri'
+PKG_VERSION   = Cheri::VERSION::STRING + PKG_BUILD
+PKG_FILE_NAME   = "#{PKG_NAME}-#{PKG_VERSION}"
+PKG_DESTINATION = "../#{PKG_NAME}"
+
+RELEASE_NAME  = "REL #{PKG_VERSION}"
+
+RUBY_FORGE_PROJECT = "cheri"
+RUBY_FORGE_USER    = "bill_dortch"
+
+desc "Default Task"
+#task :default => [ :test ]
+task :default => [ :gem ]
+
+
+# Run the unit tests
+Rake::TestTask.new { |t|
+  t.libs << "test"
+  t.test_files = Dir['test/*_test.rb']
+  t.verbose = true
+}
+
+# Generate the RDoc documentation
+Rake::RDocTask.new { |rdoc|
+  rdoc.rdoc_dir = 'doc'
+  rdoc.title    = "Cheri Builder Platform"
+  #rdoc.options << '--all'
+  #rdoc.options << '--line-numbers' << '--inline-source'
+  rdoc.template = "#{ENV['template']}.rb" if ENV['template']
+  rdoc.rdoc_files.include('README')
+  #rdoc.rdoc_files.include('CHANGELOG')
+  rdoc.rdoc_files.include("lib/**/*.rb")
+}
+
+
+# Create compressed packages
+spec = Gem::Specification.new do |s|
+  s.platform = Gem::Platform::RUBY
+  s.name = PKG_NAME
+  s.summary = "Cheri Builder Platform"
+  s.description = %q{The Cheri Builder Platform.}
+  s.version = PKG_VERSION
+
+  s.author = "Bill Dortch"
+  s.email = "cheri.project@gmail.com"
+  s.rubyforge_project = "cheri"
+  s.homepage = "http://cheri.rubyforge.org"
+
+  s.has_rdoc = true
+  s.requirements << 'none'
+  s.require_path = 'lib'
+
+  s.files = [ "Rakefile", "README", "MIT-LICENSE" ]
+  s.files = s.files + Dir.glob( "examples/**/*" ).delete_if { |item| item.include?( "\.svn" ) }
+  s.files = s.files + Dir.glob( "lib/**/*" ).delete_if { |item| item.include?( "\.svn" ) }
+  s.files = s.files + Dir.glob( "test/**/*" ).delete_if { |item| item.include?( "\.svn" ) }
+end
+Rake::GemPackageTask.new(spec) do |p|
+  p.gem_spec = spec
+  p.need_tar = true
+  p.need_zip = true
+end
+
+
+def each_source_file(*args)
+	prefix, includes, excludes, open_file = args
+	prefix ||= File.dirname(__FILE__)
+	open_file = true if open_file.nil?
+	includes ||= %w[lib\/cheri\.rb$ lib\/cheri\/.*\.rb$]
+	Find.find(prefix) do |file_name|
+		next if file_name =~ /\.svn/
+		file_name.gsub!(/^\.\//, '')
+		continue = false
+		includes.each do |inc|
+			if file_name.match(/#{inc}/)
+				continue = true
+				break
+			end
+		end
+		next unless continue
+		if open_file
+			File.open(file_name) do |f|
+				yield file_name, f
+			end
+		else
+			yield file_name
+		end
+	end
+end
+
+desc "Count lines of the Cheri source code"
+task :lines do
+  total_lines = total_loc = 0
+  puts "Per File:"
+	each_source_file do |file_name, f|
+    file_lines = file_loc = 0
+    while line = f.gets
+      file_lines += 1
+      next if line =~ /^\s*$/
+      next if line =~ /^\s*#/
+      file_loc += 1
+    end
+    puts "  #{file_name}: Lines #{file_lines}, LOC #{file_loc}"
+    total_lines += file_lines
+    total_loc += file_loc
+  end
+  puts "Total:"
+  puts "  Lines #{total_lines}, LOC #{total_loc}"
+end
+

data/examples/hello_world_1.rb

@@ -0,0 +1,28 @@
+require 'rubygems'
+require 'cheri/swing'
+
+include Cheri::Swing
+
+frame = swing {
+
+  frame('Hello World Demo 1') { |obj| size 320, 240
+    box_layout obj,:Y_AXIS
+    content_pane { background :RED }
+    on_window_closing { frame.dispose }
+    menu_bar { 
+      menu('File') {  mnemonic :VK_F; background :WHITE
+        menu_item('Exit') { mnemonic :VK_X; background :WHITE
+          on_click { frame.dispose }
+        }
+      }
+    }
+    y_glue
+    x_panel { background :WHITE 
+      label('Hello, World!') {  foreground :BLUE }
+    }
+    y_glue
+  }
+}
+
+frame.show
+

data/examples/table_1.rb

@@ -0,0 +1,44 @@
+require 'rubygems'
+require 'cheri/swing'
+
+include Cheri::Swing
+
+frame = swing {
+
+  bgcolor = color(240,238,220)
+  
+  column_headings = ['SKU','Product Name','Quantity','Unit Price','Total Price'].to_java
+  data = [
+    ['123-456-789','Foo',3,2.75,3*2.75],
+    ['123-456-790','Foo Plus',5,3.75,5*3.75],
+    ['555-867-5309','Super Foo',2,9.27,2*9.27],
+    ['987-654-321','Foo for Bars',4,7.99,4*7.99]
+  ].to_java
+
+  frame('Table Demo 1') { |frm| size 500, 375
+    content_pane { background  bgcolor; box_layout frm, :Y_AXIS
+      bevel_border :RAISED }
+    on_window_closing { frame.dispose }
+    menu_bar { background bgcolor
+      menu("File") {  mnemonic :VK_F; background :WHITE
+        menu_item("Exit") { mnemonic :VK_X; background :WHITE
+          on_click { frame.dispose }
+        }
+    } }
+    y_panel { background bgcolor
+      compound_border(titled_border('Current Order Items') {
+        etched_border :LOWERED }, empty_border( 7,7,7,7) )
+      scroll_pane(
+        @my_table = table(data,column_headings) {
+          get_table_header {
+            background :BLUE; foreground :WHITE;
+            font('Dialog',:BOLD,12)
+          }
+      }) {
+        get_viewport { background :WHITE }
+      }
+    }
+  }
+}
+
+frame.show  

data/lib/cheri/awt.rb

@@ -0,0 +1,41 @@
+#--
+# Copyright (C) 2007 William N Dortch <bill.dortch@gmail.com>
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+#++
+#
+
+if (defined?JRUBY_VERSION) && 0 == (JRUBY_VERSION =~ /(\d+\.\d+\.\d+)([-\.A-Z0-9]*)/) &&
+    (($1 == '1.0.0' && ($2.empty? || $2 >= 'RC3')) || $1 > '1.0.0')
+
+  require 'cheri/java/builder'
+  require 'cheri/builder/awt/types'
+  require 'cheri/builder/awt/connecter'
+  require 'cheri/builder/awt/constants'
+  require 'cheri/builder/awt/main'
+
+else
+STDERR.puts %{
+ Cheri::AWT requires JRuby (1.0.0RC3 or later)
+    Download the latest version of JRuby at:
+           http://www.jruby.org/
+}
+
+end

data/lib/cheri/builder.rb

@@ -0,0 +1,31 @@
+#--
+# Copyright (C) 2007 William N Dortch <bill.dortch@gmail.com>
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+#++
+#
+
+require 'cheri/cheri'
+require 'cheri/builder/base'
+require 'cheri/builder/config'
+require 'cheri/builder/connecter'
+require 'cheri/builder/context'
+require 'cheri/builder/generator'
+require 'cheri/builder/main'

data/lib/cheri/builder/awt/connecter.rb

@@ -0,0 +1,63 @@
+#--
+# Copyright (C) 2007 William N Dortch <bill.dortch@gmail.com>
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+#++
+#
+
+module Cheri
+module AWT
+
+AWTConnecter = Cheri::Builder::TypeConnecter.new(Cheri::Java::Builder::DefaultConnecter) do
+
+  type java.awt.Component do
+    connect java.awt.Font, :setFont
+  end
+
+  type java.awt.Container do
+    connect java.awt.LayoutManager, :setLayout
+
+    connect java.awt.Component do |par,obj,sym,props|
+      if props
+        cs = props[:constraints]
+        ix = props[:index]
+        n = props[:name]
+        if cs && Fixnum === ix
+          par.add(obj,cs,ix)
+        elsif cs
+          par.add(obj,cs)
+        elsif Fixnum === ix
+          par.add(obj,ix)
+        elsif String === n
+          par.add(n,obj)
+        else
+          par.add(obj)
+        end
+      else
+        par.add(obj)
+      end
+    end
+
+  end #java.awt.Container
+
+end #AWTConnecter
+
+end #AWT
+end #Cheri