cheri 0.0.2

data/lib/cheri/builder/swing/main.rb

@@ -0,0 +1,446 @@
+#--
+# 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
+# TODO: module comments
+
+module Swing
+VERSION = Cheri::VERSION
+
+CJava = Cheri::Java #:nodoc:
+CBuilder = Cheri::Builder #:nodoc:
+JBuilder = Cheri::Java::Builder #:nodoc:
+AWT = Cheri::AWT #:nodoc:
+AWTFrame = Cheri::AWT::AWTFrame #:nodoc:
+AWTProxy = Cheri::AWT::AWTProxy #:nodoc:
+JComp = javax.swing.JComponent #:nodoc:
+RPC = javax.swing.RootPaneContainer #:nodoc:
+# types checked by cherify/cheri_yield logic
+# TODO: more
+SwingTypes = [
+  javax.swing.Action,
+  javax.swing.JComponent,
+  javax.swing.RootPaneContainer,
+  javax.swing.border.Border
+]
+SwingPkg = 'javax.swing.'
+
+class << self
+  def append_features(clazz)
+    CBuilder.module_included(Cheri::AWT,clazz)
+    CBuilder.module_included(JBuilder,clazz)
+    CBuilder.module_included(self,clazz)
+    super
+  end
+  private :append_features
+  
+  def factory
+    SwingFactory  
+  end
+  
+  def connecter
+    SwingConnecter  
+  end
+  
+  def consumer
+    SwingConsumer
+  end
+
+  def resolver
+    SwingResolver  
+  end
+    
+  # a bit expensive, but only used by cherify/cheri_yield
+  def swing?(obj)
+    obj.respond_to?(:java_class) &&
+      (obj.java_class.name.rindex(SwingPkg,0) ||
+       !(obj.class.ancestors & SwingTypes).empty?)
+  end
+end #self
+
+  # call-seq:
+  #   awt([*args] [, &block]) -> AWTProxy if no block given, else result of block
+  #
+  #--
+  # Duplicating this here rather than including Cheri::AWT. (See note re: performance)
+  #++
+  def awt(*r,&k)
+    if (ctx = __cheri_ctx)
+      if k
+        AWTFrame.new(ctx,*r,&k).run
+      else
+        ctx[:awt_proxy] ||= AWTProxy.new(ctx,*r)
+      end
+    end
+  end
+  private :awt
+
+  # call-seq:
+  #   swing([*args] [, &block]) -> SwingProxy if no block given, else result of block
+  #   
+  def swing(*r,&k)
+    if (ctx = __cheri_ctx)
+      if k
+        if ctx.empty? && (c = ctx.client).kind_of?(RPC) || c.kind_of?(JComp)
+          ctx.fsend(CheriYieldFactory,:cheri_yield,c,&k)
+        else
+          SwingFrame.new(ctx,*r,&k).run
+        end
+      else
+        ctx[:swing_proxy] ||= SwingProxy.new(ctx,*r)
+      end
+    end
+  end
+  private :swing
+
+AnyTypes = {
+  javax.swing.ButtonGroup => true
+}
+
+class BaseBuilder < Cheri::Java::Builder::BaseBuilder
+  JF = CJava.get_class('javax.swing.JFrame')
+
+  def mod
+    Cheri::Swing
+  end
+
+  def any?
+    @any  
+  end
+
+private
+  def post
+    @obj.icon_image ||= CJava.cheri_icon.image if @obj.kind_of?(JF)
+    if AnyTypes[@clazz]
+      @any = true
+      @not_parent = true
+      @not_child = true
+    end
+  end
+end #BaseBuilder
+
+class ClassBuilder < BaseBuilder
+  def initialize(ctx,sym,clazz,*args,&block)
+    super(ctx,sym,*args,&block)
+    @clazz = clazz
+    @resolve = true
+  end
+private
+  def create
+    @obj = @clazz.new(*@args)
+  end
+end #ClassBuilder
+
+class ProcBuilder < BaseBuilder
+  def initialize(ctx,sym,proc,*args,&block)
+    super(ctx,sym,*args,&block)
+    @proc = proc
+  end
+private
+  def create
+    @obj = @proc.call(*@args)
+    @clazz = @obj.class
+    @resolve = true
+  end
+end #ProcBuilder
+
+class CherifyBuilder < BaseBuilder
+  def initialize(ctx,sym,obj,*args,&block)
+    super(ctx,sym,*args,&block)
+    @obj = obj
+    @clazz = obj.class
+    @no_create = true
+    @resolve = true
+  end
+end #CherifyBuilder
+
+class CheriYieldBuilder < BaseBuilder
+  def initialize(ctx,sym,obj,*args,&block)
+    super(ctx,sym,*args,&block)
+    @obj = obj
+    @clazz = obj.class
+    @no_create = true
+    @not_child = true
+    @resolve = true
+  end
+end #CheriYieldBuilder
+
+# TODO: comments
+module CherifyFactory
+  S = ::Cheri::Swing #:nodoc:
+  def self.builder(ctx,sym,*args,&block)
+    return nil unless sym == :cherify && !args.empty? && S.swing?(args[0])
+    raise Cheri.argument_error(args.length,1..2) unless args.length == 1 || args.length == 2
+    CherifyBuilder.new(ctx,sym,*args,&block)
+  end
+end #CherifyFactory
+
+# TODO: comments
+module CheriYieldFactory # < Cheri::AbstractFactory
+  S = ::Cheri::Swing #:nodoc:
+  def self.builder(ctx,sym,*args,&block)
+    return nil unless sym == :cheri_yield && !args.empty? && S.swing?(args[0])
+    raise Cheri.argument_error(args.length,1) unless args.length == 1
+    CheriYieldBuilder.new(ctx,sym,*args,&block)
+  end
+end #CheriYieldFactory
+
+# TODO: comments
+module StandardFactory
+  def self.builder(ctx,sym,*args,&block)
+    clazz = Types.get_class(sym)
+    clazz ? ClassBuilder.new(ctx,sym,clazz,*args,&block) : nil
+  end
+end #StandardFactory
+
+module BoxComponentFactory
+CJava = Cheri::Java
+X_AXIS = 0
+Y_AXIS = 1
+LINE_AXIS = 2
+PAGE_AXIS = 3
+RPC = javax.swing.RootPaneContainer
+@box = nil
+@box_layout = nil
+@panel = nil
+@dimension = nil
+@procs = {}
+class << self
+  def builder(ctx,sym,*args,&block)
+    proc = @procs[sym]
+    proc ? ProcBuilder.new(ctx,sym,proc,*args,&block) : nil
+  end
+  def box
+    @box ||= CJava.get_class('javax.swing.Box')
+  end
+  def box_layout
+    @box_layout ||= CJava.get_class('javax.swing.BoxLayout')
+  end
+  def panel
+    @panel ||= CJava.get_class('javax.swing.JPanel')
+  end
+  def dimension
+    @dimension ||= CJava.get_class('java.awt.Dimension')
+  end
+  def names
+    @names ||= @procs.keys
+  end  
+end #self
+
+@procs[:box_layout] =
+  Proc.new do |obj,axis|
+    iaxis = case axis
+      when :X_AXIS : X_AXIS
+      when :Y_AXIS : Y_AXIS
+      when :LINE_AXIS : LINE_AXIS
+      when :PAGE_AXIS : PAGE_AXIS
+      else axis    
+    end
+    box_layout.new(obj.kind_of?(RPC) ? obj.content_pane : obj,iaxis) 
+  end
+@procs[:x_box] = @procs[:h_box] = @procs[:horizontal_box] = Proc.new { box.new(X_AXIS) }
+@procs[:y_box] = @procs[:v_box] = @procs[:vertical_box] = Proc.new { box.new(Y_AXIS) }
+@procs[:line_box] = Proc.new { box.new(LINE_AXIS) }
+@procs[:page_box] = Proc.new { box.new(PAGE_AXIS) }
+@procs[:x_panel] = @procs[:h_panel] = @procs[:horizontal_panel] =
+  Proc.new do |*args|
+    p = panel.new(*args)
+    p.setLayout(box_layout.new(p,X_AXIS))
+    p
+  end
+@procs[:y_panel] = @procs[:v_panel] = @procs[:vertical_panel] =
+  Proc.new do |*args|
+    p = panel.new(*args)
+    p.setLayout(box_layout.new(p,Y_AXIS))
+    p
+  end
+@procs[:line_panel] = 
+  Proc.new do |*args|
+    p = panel.new(*args)
+    p.setLayout(box_layout.new(p,LINE_AXIS))
+    p
+  end
+@procs[:page_panel] = 
+  Proc.new do |*args|
+    p = panel.new(*args)
+    p.setLayout(box_layout.new(p,PAGE_AXIS))
+    p
+  end
+@procs[:glue] = Proc.new { box.createGlue }
+@procs[:x_glue] = @procs[:h_glue] = @procs[:horizontal_glue] = Proc.new { box.createHorizontalGlue }
+@procs[:y_glue] = @procs[:v_glue] = @procs[:vertical_glue] =  Proc.new { box.createVerticalGlue }
+@procs[:x_strut] = @procs[:h_strut] = @procs[:horizontal_strut] =
+  Proc.new do |*args|
+    box.createHorizontalStrut(*args)
+  end
+@procs[:y_strut] = @procs[:v_strut] = @procs[:vertical_strut] = 
+  Proc.new do |*args|
+    box.createVerticalStrut(*args)
+  end
+@procs[:rigid_area] = @procs[:spacer] = 
+  Proc.new do |*args|
+    box.createRigidArea(dimension.new(*args))
+  end
+@procs[:x_spacer] = @procs[:h_spacer] = @procs[:horizontal_spacer] =
+  Proc.new do |*args|
+    box.createRigidArea(dimension.new(args[0],0))
+  end
+@procs[:y_spacer] = @procs[:v_spacer] = @procs[:vertical_spacer] =
+  Proc.new do |*args|
+    box.createRigidArea(dimension.new(0,args[0]))
+  end
+@procs[:filler] =
+  Proc.new do |*args| 
+    box::Filler.new(dimension.new(args[0],args[1]),
+                    dimension.new(args[2],args[3]),
+                    dimension.new(args[4],args[5]))
+  end
+end #BoxComponentFactory
+
+
+# TODO: more factories
+
+module DialogComponentFactory
+CJava = Cheri::Java
+  
+end #DialogComponentFactory
+
+
+SwingFactory = Cheri::Builder::SuperFactory.new do |f|
+  f << StandardFactory
+  f << BoxComponentFactory
+  f << Cheri::AWT::StandardFactory
+  f << CheriYieldFactory
+  f << CherifyFactory
+  f << Cheri::Java::Builder::CheriYieldFactory
+  f << Cheri::Java::Builder::CherifyFactory
+  f << Cheri::Builder::CheriYieldFactory
+  f << Cheri::Builder::CherifyFactory
+end
+
+class SwingProxy < Cheri::AWT::AWTProxy
+
+  impl(Types.names)
+  impl(BoxComponentFactory.names)
+
+  def initialize(ctx,*r)
+    super
+    if Hash === r.last
+      @ctx.auto!(mod) if r.last[:auto]
+    end  
+  end
+
+  def mod
+    Cheri::Swing  
+  end
+  private :mod
+
+  def [](opts)
+    raise Cheri.type_error(opts,Hash,Symbol) unless Hash === opts || Symbol === opts
+    if opts == :auto || (Hash === opts && opts[:auto])
+      @ctx.ictx.auto!(mod)
+      @ctx.auto!(mod)
+#      if (c = @ctx.client).kind_of?(RPC) || c.kind_of?(JComp)
+#        @ctx.push(b = CheriYieldBuilder.new(@ctx,:cheri_yield,c))
+#        b.run
+#      else
+#        @ctx.push(SwingFrame.new(@ctx))
+#      end
+    end
+    nil
+  end
+end #SwingProxy
+
+class SwingFrame
+  include Cheri::Builder::Frame
+  def initialize(ctx,*r,&k)
+    super
+    @obj = ctx[:swing_proxy] ||= SwingProxy.new(ctx,*r)  
+  end
+
+  def mod
+    Cheri::Swing
+  end
+end #SwingFrame
+
+SwingResolver = Cheri::Java::Builder::ConstantResolver.new do |r|
+  r << Cheri::AWT::Constants
+  r << Constants
+end
+
+module AlignMethodConsumer
+  BOTTOM = 1.0
+  CENTER = 0.5
+  LEFT = 0.0
+  RIGHT = 1.0
+  TOP = 0.0
+  JComp = javax.swing.JComponent
+
+  def self.consume(ctx,bld,sym,*args,&k)
+    return false,nil unless sym == :align && (obj = bld.object).kind_of?(JComp)
+    argc = args.length
+    raise Cheri.new_argument_error(argc,1..2) unless argc == 1 || argc == 2
+    x_val = nil
+    y_val = nil
+    0.upto(argc-1) do |i|
+      arg = args[i]
+      if arg.kind_of?(Numeric)
+        unless argc == 2
+          raise ArgumentError,"align can't evaluate numeric value with only one argument -- specify both x and y"
+        end
+        i == 0 ? x_val = arg : y_val = arg
+      else
+        raise ArgumentError,"invalid argument for align: #{arg}" unless arg.instance_of?(Symbol)
+        case arg
+          when :TOP : y_val = TOP
+          when :BOTTOM : y_val = BOTTOM
+          when :LEFT : x_val = LEFT
+          when :RIGHT : x_val = RIGHT
+          when :CENTER :
+            if argc ==2
+              i == 0 ? x_val = CENTER : y_val = CENTER
+            else
+              x_val = y_val = CENTER
+            end
+          else raise ArgumentError,"invalid argument for align: #{arg}"
+        end
+      end
+    end
+    obj.alignment_x = x_val if x_val
+    obj.alignment_y = y_val if y_val
+    return true,nil
+  end
+end #AlignMethodConsumer
+
+SwingConsumer = Cheri::Builder::SuperConsumer.new do |c|
+  c << AlignMethodConsumer
+  c << Cheri::AWT::SizeMethodConsumer
+  c << Cheri::Java::Builder::EventMethodConsumer
+  c << Cheri::Java::Builder::GenericConsumer
+  c << Cheri::Builder::DefaultConsumer
+end
+
+end #Swing
+end #Cheri

data/lib/cheri/builder/swing/types.rb

@@ -0,0 +1,270 @@
+#--
+# 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 Swing
+module Types
+CJava = Cheri::Java #:nodoc:
+JS = 'javax.swing.'.freeze #:nodoc:
+class << self
+  def get_class(sym)
+    # TODO: threadsafe support?
+    cls = @classes[sym]
+    if cls
+      if cls.instance_of?(String)
+        cls = CJava.get_class(JS + cls)
+        @classes[sym] = cls if cls
+      end
+      cls
+    else
+      nil
+    end
+  end
+  def names
+    @names ||= @classes.keys
+  end
+end #self
+# TODO: review included classes; some of these would
+# never be called in a builder context
+@classes = {
+  :action_map => 'ActionMap',
+  :border_factory => 'BorderFactory',
+  :box => 'Box',
+  # handling box_layout in BoxComponentFactory to simplify syntax
+  #  :box_layout => 'BoxLayout',
+  :button_group => 'ButtonGroup',
+  :cell_renderer_pane => 'CellRendererPane',
+  :component_input_map => 'ComponentInputMap',
+  :default_bounded_range_model => 'DefaultBoundedRangeModel',
+  :default_button_model => 'DefaultButtonModel',
+  :default_cell_editor => 'DefaultCellEditor',
+  :default_combo_box_model => 'DefaultComboBoxModel',
+  :default_desktop_manager => 'DefaultDesktopManager',
+  :default_focus_manager => 'DefaultFocusManager',
+  :default_list_cell_renderer => 'DefaultListCellRenderer',
+  :default_list_cell_renderer_ui_resource => 'DefaultListCellRenderer::UIResource',
+  :default_list_model => 'DefaultListModel',
+  :default_list_selection_model => 'DefaultListSelectionModel',
+  :default_row_sorter => 'DefaultRowSorter',
+  :default_row_sorter_model_wrapper => 'DefaultRowSorter::ModelWrapper',
+  :default_single_selection_model => 'DefaultSingleSelectionModel',
+  :focus_manager => 'FocusManager',
+  :gray_filter => 'GrayFilter',
+  :group_layout => 'GroupLayout',
+  :image_icon => 'ImageIcon',
+  :input_map => 'InputMap',
+  :input_verifier => 'InputVerifier',
+  :internal_frame_focus_traversal_policy => 'InternalFrameFocusTraversalPolicy',
+  :j_applet => 'JApplet',
+  :applet => 'JApplet',
+  :j_button => 'JButton',
+  :button => 'JButton',
+  :j_check_box => 'JCheckBox',
+  :check_box => 'JCheckBox',
+  :j_check_box_menu_item => 'JCheckBoxMenuItem',
+  :check_box_menu_item => 'JCheckBoxMenuItem',
+  :j_color_chooser => 'JColorChooser',
+  :color_chooser => 'JColorChooser',
+  :j_combo_box => 'JComboBox',
+  :combo_box => 'JComboBox',
+  :j_component => 'JComponent',
+  :component => 'JComponent',
+  :j_desktop_pane => 'JDesktopPane',
+  :desktop_pane => 'JDesktopPane',
+  :j_dialog => 'JDialog',
+  :dialog => 'JDialog',
+  :j_editor_pane => 'JEditorPane',
+  :editor_pane => 'JEditorPane',
+  :j_file_chooser => 'JFileChooser',
+  :file_chooser => 'JFileChooser',
+  :j_formatted_text_field => 'JFormattedTextField',
+  :formatted_text_field => 'JFormattedTextField',
+  :j_frame => 'JFrame',
+  :frame => 'JFrame',
+  :j_internal_frame => 'JInternalFrame',
+  :internal_frame => 'JInternalFrame',
+  :j_internal_frame_desktop_icon => 'JInternalFrame::JDesktopIcon',
+  :internal_frame_desktop_icon => 'JInternalFrame::JDesktopIcon',
+  :j_label => 'JLabel',
+  :label => 'JLabel',
+  :j_layered_pane => 'JLayeredPane',
+  :layered_pane => 'JLayeredPane',
+  :j_list => 'JList',
+  :list => 'JList',
+  :j_list_drop_location => 'JList::DropLocation',
+  :list_drop_location => 'JList::DropLocation',
+  :j_menu => 'JMenu',
+  :menu => 'JMenu',
+  :j_menu_bar => 'JMenuBar',
+  :menu_bar => 'JMenuBar',
+  :j_menu_item => 'JMenuItem',
+  :menu_item => 'JMenuItem',
+  :j_option_pane => 'JOptionPane',
+  :option_pane => 'JOptionPane',
+  :j_panel => 'JPanel',
+  :panel => 'JPanel',
+  :j_password_field => 'JPasswordField',
+  :password_field => 'JPasswordField',
+  :j_popup_menu => 'JPopupMenu',
+  :popup_menu => 'JPopupMenu',
+  :j_popup_menu_separator => 'JPopupMenu::Separator',
+  :popup_menu_separator => 'JPopupMenu::Separator',
+  :j_progress_bar => 'JProgressBar',
+  :progress_bar => 'JProgressBar',
+  :j_radio_button => 'JRadioButton',
+  :radio_button => 'JRadioButton',
+  :j_radio_button_menu_item => 'JRadioButtonMenuItem',
+  :radio_button_menu_item => 'JRadioButtonMenuItem',
+  :j_root_pane => 'JRootPane',
+  :root_pane => 'JRootPane',
+  :j_scroll_bar => 'JScrollBar',
+  :scroll_bar => 'JScrollBar',
+  :j_scroll_pane => 'JScrollPane',
+  :scroll_pane => 'JScrollPane',
+  :j_separator => 'JSeparator',
+  :separator => 'JSeparator',
+  :j_slider => 'JSlider',
+  :slider => 'JSlider',
+  :j_spinner => 'JSpinner',
+  :spinner => 'JSpinner',
+  :j_spinner_date_editor => 'JSpinner::DateEditor',
+  :spinner_date_editor => 'JSpinner::DateEditor',
+  :j_spinner_default_editor => 'JSpinner::DefaultEditor',
+  :spinner_default_editor => 'JSpinner::DefaultEditor',
+  :j_spinner_list_editor => 'JSpinner::ListEditor',
+  :spinner_list_editor => 'JSpinner::ListEditor',
+  :j_spinner_number_editor => 'JSpinner::NumberEditor',
+  :spinner_number_editor => 'JSpinner::NumberEditor',
+  :j_split_pane => 'JSplitPane',
+  :split_pane => 'JSplitPane',
+  :j_tabbed_pane => 'JTabbedPane',
+  :tabbed_pane => 'JTabbedPane',
+  :j_table => 'JTable',
+  :table => 'JTable',
+  :j_table_drop_location => 'JTable::DropLocation',
+  :table_drop_location => 'JTable::DropLocation',
+  :j_text_area => 'JTextArea',
+  :text_area => 'JTextArea',
+  :j_text_field => 'JTextField',
+  :text_field => 'JTextField',
+  :j_text_pane => 'JTextPane',
+  :text_pane => 'JTextPane',
+  :j_toggle_button => 'JToggleButton',
+  :toggle_button => 'JToggleButton',
+  :j_toggle_button_toggle_button_model => 'JToggleButton::ToggleButtonModel',
+  :toggle_button_toggle_button_model => 'JToggleButton::ToggleButtonModel',
+  :toggle_button_model => 'JToggleButton::ToggleButtonModel',
+  :j_tool_bar => 'JToolBar',
+  :tool_bar => 'JToolBar',
+  :j_tool_bar_separator => 'JToolBar::Separator',
+  :tool_bar_separator => 'JToolBar::Separator',
+  :j_tool_tip => 'JToolTip',
+  :tool_tip => 'JToolTip',
+  :j_tree => 'JTree',
+  :tree => 'JTree',
+  :j_tree_drop_location => 'JTree::DropLocation',
+  :tree_drop_location => 'JTree::DropLocation',
+  :j_tree_dynamic_util_tree_node => 'JTree::DynamicUtilTreeNode',
+  :tree_dynamic_util_tree_node => 'JTree::DynamicUtilTreeNode',
+  :dynamic_util_tree_node => 'JTree::DynamicUtilTreeNode',
+  :j_tree_empty_selection_model => 'JTree::EmptySelectionModel',
+  :tree_empty_selection_model => 'JTree::EmptySelectionModel',
+  :j_viewport => 'JViewport',
+  :viewport => 'JViewport',
+  :j_window => 'JWindow',
+  :window => 'JWindow',
+  :key_stroke => 'KeyStroke',
+  :layout_focus_traversal_policy => 'LayoutFocusTraversalPolicy',
+  :layout_style => 'LayoutStyle',
+  :look_and_feel => 'LookAndFeel',
+  :menu_selection_manager => 'MenuSelectionManager',
+  :overlay_layout => 'OverlayLayout',
+  :popup => 'Popup',
+  :popup_factory => 'PopupFactory',
+  :progress_monitor => 'ProgressMonitor',
+  :progress_monitor_input_stream => 'ProgressMonitorInputStream',
+  :repaint_manager => 'RepaintManager',
+  :row_filter => 'RowFilter',
+  :row_filter_entry => 'RowFilter::Entry ',
+  :row_sorter => 'RowSorter',
+  :row_sorter_sort_key => 'RowSorter::SortKey',
+  :scroll_pane_layout => 'ScrollPaneLayout',
+  :scroll_pane_layout_ui_resource => 'ScrollPaneLayout::UIResource',
+  :size_requirements => 'SizeRequirements',
+  :size_sequence => 'SizeSequence',
+  :sorting_focus_traversal_policy => 'SortingFocusTraversalPolicy',
+  :spinner_date_model => 'SpinnerDateModel',
+  :spinner_list_model => 'SpinnerListModel',
+  :spinner_number_model => 'SpinnerNumberModel',
+  :spring => 'Spring',
+  :spring_layout => 'SpringLayout',
+  :spring_layout_constraints => 'SpringLayout::Constraints',
+  :swing_utilities => 'SwingUtilities',
+  :swing_worker => 'SwingWorker',
+  :timer => 'Timer',
+  :tool_tip_manager => 'ToolTipManager',
+  :transfer_handler => 'TransferHandler',
+  :transfer_handler_drop_location => 'TransferHandler::DropLocation',
+  :transfer_handler_transfer_support => 'TransferHandler::TransferSupport',
+  :ui_defaults => 'UIDefaults',
+  :ui_defaults_lazy_input_map => 'UIDefaults::LazyInputMap',
+  :ui_defaults_proxy_lazy_value => 'UIDefaults::ProxyLazyValue',
+  :ui_manager => 'UIManager',
+  :ui_manager_look_and_feel_info => 'UIManager::LookAndFeelInfo',
+  :viewport_layout => 'ViewportLayout',
+  :bevel_border => 'border.BevelBorder',
+  :compound_border => 'border.CompoundBorder',
+  :empty_border => 'border.EmptyBorder',
+  :etched_border => 'border.EtchedBorder',
+  :line_border => 'border.LineBorder',
+  :matte_border => 'border.MatteBorder',
+  :soft_bevel_border => 'border.SoftBevelBorder',
+  :titled_border => 'border.TitledBorder',
+  :color_chooser_component_factory => 'colorchooser.ColorChooserComponentFactory',
+  :default_color_selection_model => 'colorchooser.DefaultColorSelectionModel',
+  :file_name_extension_filter => 'filechooser.FileNameExtensionFilter',
+  :default_table_cell_renderer => 'table.DefaultTableCellRenderer',
+  :default_table_cell_renderer_ui_resource => 'table.DefaultTableCellRenderer::UIResource',
+  :default_table_column_model => 'table.DefaultTableColumnModel',
+  :default_table_model => 'table.DefaultTableModel',
+  :j_table_header => 'table.JTableHeader',
+  :table_header => 'table.JTableHeader',
+  :table_column => 'table.TableColumn',
+  :table_row_sorter => 'table.TableRowSorter',
+  :default_mutable_tree_node => 'tree.DefaultMutableTreeNode',
+  :default_tree_cell_editor => 'tree.DefaultTreeCellEditor',
+  :default_tree_cell_renderer => 'tree.DefaultTreeCellRenderer',
+  :default_tree_model => 'tree.DefaultTreeModel',
+  :default_tree_selection_model => 'tree.DefaultTreeSelectionModel',
+  :fixed_height_layout_cache => 'tree.FixedHeightLayoutCache',
+  :tree_path => 'tree.TreePath',
+  :variable_height_layout_cache => 'tree.VariableHeightLayoutCache'
+}
+
+end #StandardTypes
+end #Swing
+end #Cheri
+
+#cls = Cheri::Swing::StandardTypes.get_class(:frame)
+#puts cls.java_class.name