profligacy 0.4-jruby → 0.4.1-jruby

data/Rakefile

@@ -8,14 +8,14 @@ require 'fileutils'
 include FileUtils
 
 setup_tests
-setup_clean ["pkg", "lib/*.bundle", "lib/profligacy/*.class", "*.gem", ".config", "lib/profligacy/*.jar"]
+setup_clean ["pkg", "lib/*.bundle", "lib/profligacy/*.class", "*.gem", ".config", "lib/profligacy/parser.jar"]
 
 setup_rdoc ['README', 'LICENSE', 'COPYING', 'lib/**/*.rb', 'doc/**/*.rdoc']
 
 desc "Does a full compile, test run"
 task :default => [:ragel, :test]
 
-version="0.4"
+version="0.4.1"
 name="profligacy"
 
 setup_gem(name, version) do |spec|
@@ -32,7 +32,7 @@ end
 
 task :ragel do
   sh %{/usr/local/bin/ragel -J lib/profligacy/LELParser.rl | /usr/local/bin/rlgen-java -o lib/profligacy/LELParser.java}
-  sh %{javac lib/profligacy/LELParser.java}
+  sh %{javac -target 1.5 lib/profligacy/LELParser.java}
   Dir.chdir("lib") do 
     sh %{jar -cf profligacy/parser.jar profligacy/*.class}
   end

data/examples/utu_main.rb

@@ -0,0 +1,113 @@
+# Prototype for a GUI for a chat client.  Just tries out different
+# layouts and ideas.
+
+require 'rubygems'
+require 'profligacy/swing'
+require 'profligacy/lel'
+
+
+class ChatInterface
+  include_package 'javax.swing'
+  include_package 'java.awt'
+
+  include Profligacy
+
+  def initialize
+    @styles = { 
+      :left => "[*people|(400,300)*chat][buttons|message]",
+      :right => "[(400,300)*chat|*people][message|buttons]",
+      :hidden => "[(400,300)*chat][message]"
+    }
+
+    @ui = Swing::Build.new JFrame, :tabs do |c,i|
+      c.tabs = JTabbedPane.new
+
+      [:right, :left, :hidden].each do |s|
+        c.tabs.add("Tab #{s}", create_chat(s))
+      end
+    end
+
+    @frame = @ui.build("Utu Chat Prototype") do |f|
+      f.jmenu_bar = create_menubar
+      f.add(create_toolbar, BorderLayout::NORTH)
+    end
+
+    @frame.resizable = false
+  end
+
+  def create_chat(style=:right)
+    chat = Swing::LEL.new(JPanel,@styles[style]) do |c,i|
+      people = JList.new((["Zed","Frank","Joe","Alex"]*20).to_java)
+      c.people = JScrollPane.new(people) if style != :hidden
+      c.message = JTextField.new 
+
+      chat = JTextArea.new
+      chat.editable = false
+      chat.text = "Mary had a little lamb that you should seriously check out 'cause it's sick\n" * 300
+
+      c.chat  = JScrollPane.new(chat)
+      c.buttons = create_buttons if style != :hidden
+    end
+
+    chat.build
+  end
+
+  def create_buttons
+    buttons = Swing::LEL.new(JPanel, "[info|hate|block]") do |c,i|
+      c.info    = JButton.new "Info"
+      c.hate    = JButton.new "Hate"
+      c.block   = JButton.new "Block"
+    end
+
+    buttons.build(:auto_create_container_gaps => false)
+  end
+
+  def create_menubar
+    file = Swing::Build.new JMenu, :connect, :rooms, :people, :quit do |c,i|
+      c.connect = JMenuItem.new "Connect..."
+      c.rooms = JMenuItem.new "Rooms..."
+      c.people = JMenuItem.new "People..."
+      c.quit = JMenuItem.new "Quit"
+    end.build("File")
+
+    room = Swing::Build.new JMenu, :who, :search, :join, :sep1, :leave do |c,i|
+      c.who = JMenuItem.new "Who..."
+      c.search = JMenuItem.new "Search..."
+      c.join = JMenuItem.new "Join..."
+      c.sep1 = JSeparator.new
+      c.leave = JMenuItem.new "Leave"
+    end.build("Room")
+
+    help = Swing::Build.new JMenu, :about, :manual, :site do |c,i|
+      c.about = JMenuItem.new "About..."
+      c.manual = JMenuItem.new "Manual..."
+      c.site = JMenuItem.new "Site"
+    end.build("Help")
+
+    @menu_bar = Swing::Build.new JMenuBar, :menus do |c,i|
+      c.menus = [file, room, help]
+    end
+
+    @menu_bar.build
+  end
+
+  def create_toolbar
+    @toolbar = Swing::Build.new(
+      JToolBar,
+      :join, :leave, :hide_show, :who, :info, :sep, :block, :hate
+    ) do |c,i|
+      c.join = JButton.new "Join"
+      c.hide_show = JToggleButton.new "Hide"
+      c.who = JButton.new "Who"
+      c.info = JButton.new "Info"
+      c.block = JButton.new "Block"
+      c.hate = JButton.new "Hate"
+      c.leave = JButton.new "Leave"
+      c.sep = JSeparator.new
+    end
+
+    @toolbar.build
+  end
+end
+
+ChatInterface.new

data/lib/profligacy/lel.rb

@@ -1,4 +1,5 @@
 require 'profligacy/parser'
+require 'profligacy/swing-layout'
 
 module Profligacy
   include_package 'profligacy'
@@ -23,8 +24,7 @@ module Profligacy
   class LELGroupLayout 
     include Profligacy::LELParser::LELEventListener
 
-    include_class 'javax.swing.GroupLayout'
-    include_class 'javax.swing.JPanel'
+    include_package 'org.jdesktop.layout'
     include_class 'java.lang.Short'
 
     def initialize(layout, components)
@@ -47,13 +47,13 @@ module Profligacy
 
     def ltab
       horizontals_reset
-      @vertical = @layout.createParallelGroup
+      @vertical = @layout.createBaselineGroup(true, false)
     end
 
     def valign(dir)
       case dir
-      when "^" then @valign = GroupLayout::Alignment::LEADING
-      when "." then @valign = GroupLayout::Alignment::TRAILING
+      when "^" then @valign = GroupLayout::LEADING
+      when "." then @valign = GroupLayout::TRAILING
       else
         raise "Invalid Vertical Alignment: #{dir}"
       end
@@ -64,23 +64,22 @@ module Profligacy
       component = @components[name]
 
       if component
-        # add it in
-        @vertical.addComponent(component, @valign, GroupLayout::DEFAULT_SIZE, @height, @max)
-        h.addComponent(component, @halign, GroupLayout::DEFAULT_SIZE, @width, @max)
+        @vertical.add(@valign, component, GroupLayout::DEFAULT_SIZE, @height, @max)
+        h.add(@halign, component, GroupLayout::DEFAULT_SIZE, @width, @max)
       elsif name != "_"
         raise "Cell named '#{name}' does not have a component set during build."
       end
     end
 
     def row
-      @vgroup.addGroup(@vertical);
+      @vgroup.add(@vertical);
       alignments_reset ; widths_reset ; heights_reset
     end
 
     def align(direction)
       case direction
-      when "<" then @halign = GroupLayout::Alignment::LEADING
-      when ">" then @halign = GroupLayout::Alignment::TRAILING
+      when "<" then @halign = GroupLayout::LEADING
+      when ">" then @halign = GroupLayout::TRAILING
       else
         raise "Invalid Horizontal Alignment: #{direction}"
       end
@@ -108,8 +107,8 @@ module Profligacy
     private
 
     def alignments_reset
-      @valign = GroupLayout::Alignment::CENTER
-      @halign = GroupLayout::Alignment::CENTER
+      @valign = GroupLayout::CENTER
+      @halign = GroupLayout::CENTER
     end
 
     def widths_reset
@@ -131,8 +130,8 @@ module Profligacy
 
     def horizontals_cur
       if !@horizontals[@htop]
-        @horizontals[@htop] = @layout.createParallelGroup(@valign)
-        @hgroup.addGroup(@horizontals[@htop])
+        @horizontals[@htop] = @layout.createParallelGroup()
+        @hgroup.add(@horizontals[@htop])
       end
 
       @horizontals[@htop]
@@ -143,7 +142,7 @@ module Profligacy
 
   module Swing
     class LEL < Build
-      include_class 'javax.swing.GroupLayout'
+      include_package 'org.jdesktop.layout'
       attr_reader :prefs
 
       def initialize(type, expr)
@@ -172,8 +171,8 @@ module Profligacy
         pane = @container.respond_to?(:content_pane) ? @container.content_pane : @container
         layout = GroupLayout.new pane
         @container.layout = layout
-        layout.auto_create_gaps = prefs[:auto_create_gaps] 
-        layout.auto_create_container_gaps = prefs[:auto_create_container_gaps] 
+        layout.autocreate_gaps = prefs[:auto_create_gaps] 
+        layout.autocreate_container_gaps = prefs[:auto_create_container_gaps] 
         layout.honors_visibility = prefs[:honors_visibility]
 
         parse(LELGroupLayout.new(layout, @contents))

metadata

@@ -25,65 +25,6 @@ files:
 - LICENSE
 - README
 - Rakefile
-- doc/rdoc/classes
-- doc/rdoc/created.rid
-- doc/rdoc/files
-- doc/rdoc/fr_class_index.html
-- doc/rdoc/fr_file_index.html
-- doc/rdoc/fr_method_index.html
-- doc/rdoc/index.html
-- doc/rdoc/rdoc-style.css
-- doc/rdoc/classes/Proc.html
-- doc/rdoc/classes/Proc.src
-- doc/rdoc/classes/Profligacy
-- doc/rdoc/classes/Profligacy.html
-- doc/rdoc/classes/Proc.src/M000001.html
-- doc/rdoc/classes/Proc.src/M000002.html
-- doc/rdoc/classes/Profligacy/LELGroupLayout.html
-- doc/rdoc/classes/Profligacy/LELGroupLayout.src
-- doc/rdoc/classes/Profligacy/LELNameScanner.html
-- doc/rdoc/classes/Profligacy/LELNameScanner.src
-- doc/rdoc/classes/Profligacy/Swing
-- doc/rdoc/classes/Profligacy/Swing.html
-- doc/rdoc/classes/Profligacy/LELGroupLayout.src/M000014.html
-- doc/rdoc/classes/Profligacy/LELGroupLayout.src/M000015.html
-- doc/rdoc/classes/Profligacy/LELGroupLayout.src/M000016.html
-- doc/rdoc/classes/Profligacy/LELGroupLayout.src/M000017.html
-- doc/rdoc/classes/Profligacy/LELGroupLayout.src/M000018.html
-- doc/rdoc/classes/Profligacy/LELGroupLayout.src/M000019.html
-- doc/rdoc/classes/Profligacy/LELGroupLayout.src/M000020.html
-- doc/rdoc/classes/Profligacy/LELGroupLayout.src/M000021.html
-- doc/rdoc/classes/Profligacy/LELGroupLayout.src/M000022.html
-- doc/rdoc/classes/Profligacy/LELGroupLayout.src/M000023.html
-- doc/rdoc/classes/Profligacy/LELGroupLayout.src/M000024.html
-- doc/rdoc/classes/Profligacy/LELNameScanner.src/M000025.html
-- doc/rdoc/classes/Profligacy/LELNameScanner.src/M000026.html
-- doc/rdoc/classes/Profligacy/LELNameScanner.src/M000027.html
-- doc/rdoc/classes/Profligacy/Swing/Build.html
-- doc/rdoc/classes/Profligacy/Swing/Build.src
-- doc/rdoc/classes/Profligacy/Swing/LEL.html
-- doc/rdoc/classes/Profligacy/Swing/LEL.src
-- doc/rdoc/classes/Profligacy/Swing/Listeners.html
-- doc/rdoc/classes/Profligacy/Swing/RunnableProc.html
-- doc/rdoc/classes/Profligacy/Swing/RunnableProc.src
-- doc/rdoc/classes/Profligacy/Swing/Build.src/M000005.html
-- doc/rdoc/classes/Profligacy/Swing/Build.src/M000006.html
-- doc/rdoc/classes/Profligacy/Swing/Build.src/M000007.html
-- doc/rdoc/classes/Profligacy/Swing/Build.src/M000008.html
-- doc/rdoc/classes/Profligacy/Swing/Build.src/M000009.html
-- doc/rdoc/classes/Profligacy/Swing/Build.src/M000010.html
-- doc/rdoc/classes/Profligacy/Swing/Build.src/M000011.html
-- doc/rdoc/classes/Profligacy/Swing/LEL.src/M000012.html
-- doc/rdoc/classes/Profligacy/Swing/LEL.src/M000013.html
-- doc/rdoc/classes/Profligacy/Swing/RunnableProc.src/M000003.html
-- doc/rdoc/classes/Profligacy/Swing/RunnableProc.src/M000004.html
-- doc/rdoc/files/COPYING.html
-- doc/rdoc/files/LICENSE.html
-- doc/rdoc/files/README.html
-- doc/rdoc/files/lib
-- doc/rdoc/files/lib/profligacy
-- doc/rdoc/files/lib/profligacy/lel_rb.html
-- doc/rdoc/files/lib/profligacy/swing_rb.html
 - examples/layout_test.rb
 - examples/prefuse_sample.rb
 - examples/swing1.rb
@@ -95,6 +36,7 @@ files:
 - examples/swing7.rb
 - examples/swing8.rb
 - examples/swing8_lel.rb
+- examples/utu_main.rb
 - tools/rakehelp.rb
 - lib/profligacy/lel.rb
 - lib/profligacy/swing.rb
@@ -103,6 +45,7 @@ files:
 - lib/profligacy/LELParser$LELEventListener.class
 - lib/profligacy/LELParser.class
 - lib/profligacy/parser.jar
+- lib/profligacy/swing-layout.jar
 specification_version: 1
 extensions: []
 rubygems_version: 0.9.4
@@ -110,11 +53,11 @@ requirements: []
 authors: 
 - Zed A. Shaw
 platform: jruby
-date: 2007-07-07 04:00:00 +00:00
+date: 2007-07-09 04:00:00 +00:00
 require_paths: 
 - lib
 version: !ruby/object:Gem::Version
-  version: !str 0.4
+  version: 0.4.1
 test_files: []
 bindir: bin
 dependencies: []

data/doc/rdoc/classes/Proc.html

@@ -1,152 +0,0 @@
-<?xml version="1.0" encoding="iso-8859-1"?>
-<!DOCTYPE html 
-     PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
-     "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
-
-<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
-<head>
-  <title>Class: Proc</title>
-  <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
-  <meta http-equiv="Content-Script-Type" content="text/javascript" />
-  <link rel="stylesheet" href=".././rdoc-style.css" type="text/css" media="screen" />
-  <script type="text/javascript">
-  // <![CDATA[
-
-  function popupCode( url ) {
-    window.open(url, "Code", "resizable=yes,scrollbars=yes,toolbar=no,status=no,height=150,width=400")
-  }
-
-  function toggleCode( id ) {
-    if ( document.getElementById )
-      elem = document.getElementById( id );
-    else if ( document.all )
-      elem = eval( "document.all." + id );
-    else
-      return false;
-
-    elemStyle = elem.style;
-    
-    if ( elemStyle.display != "block" ) {
-      elemStyle.display = "block"
-    } else {
-      elemStyle.display = "none"
-    }
-
-    return true;
-  }
-  
-  // Make codeblocks hidden by default
-  document.writeln( "<style type=\"text/css\">div.method-source-code { display: none }</style>" )
-  
-  // ]]>
-  </script>
-
-</head>
-<body>
-
-
-
-    <div id="classHeader">
-        <table class="header-table">
-        <tr class="top-aligned-row">
-          <td><strong>Class</strong></td>
-          <td class="class-name-in-header">Proc</td>
-        </tr>
-        <tr class="top-aligned-row">
-            <td><strong>In:</strong></td>
-            <td>
-                <a href="../files/lib/profligacy/swing_rb.html">
-                lib/profligacy/swing.rb
-                </a>
-        <br />
-            </td>
-        </tr>
-
-        <tr class="top-aligned-row">
-            <td><strong>Parent:</strong></td>
-            <td>
-                Object
-            </td>
-        </tr>
-        </table>
-    </div>
-  <!-- banner header -->
-
-  <div id="bodyContent">
-
-
-
-  <div id="contextContent">
-
-
-
-   </div>
-
-    <div id="method-list">
-      <h3 class="section-bar">Methods</h3>
-
-      <div class="name-list">
-      <a href="#M000001">to_listener</a>&nbsp;&nbsp;
-      <a href="#M000002">to_runnable</a>&nbsp;&nbsp;
-      </div>
-    </div>
-
-  </div>
-
-
-    <!-- if includes -->
-
-    <div id="section">
-
-
-
-
-
-      
-
-
-    <!-- if method_list -->
-    <div id="methods">
-      <h3 class="section-bar">Public Instance methods</h3>
-
-      <div id="method-M000001" class="method-detail">
-        <a name="M000001"></a>
-
-        <div class="method-heading">
-          <a href="Proc.src/M000001.html" target="Code" class="method-signature"
-            onclick="popupCode('Proc.src/M000001.html');return false;">
-          <span class="method-name">to_listener</span><span class="method-args">(action)</span>
-          </a>
-        </div>
-      
-        <div class="method-description">
-        </div>
-      </div>
-
-      <div id="method-M000002" class="method-detail">
-        <a name="M000002"></a>
-
-        <div class="method-heading">
-          <a href="Proc.src/M000002.html" target="Code" class="method-signature"
-            onclick="popupCode('Proc.src/M000002.html');return false;">
-          <span class="method-name">to_runnable</span><span class="method-args">()</span>
-          </a>
-        </div>
-      
-        <div class="method-description">
-        </div>
-      </div>
-
-
-    </div>
-
-
-  </div>
-
-
-<div id="validator-badges">
-  <p><small><a href="http://validator.w3.org/check/referer">[Validate]</a></small></p>
-</div>
-
-</body>
-</html>