glimmer-dsl-swt 0.6.1 → 0.6.6

data/samples/elaborate/login.rb

@@ -0,0 +1,108 @@
+require "java"
+require "observer"
+
+#Presents login screen data
+class LoginPresenter
+
+  attr_accessor :user_name
+  attr_accessor :password
+  attr_accessor :status
+
+  def initialize
+    @user_name = ""
+    @password = ""
+    @status = "Logged Out"
+  end
+
+  def status=(status)
+    @status = status
+
+    #TODO add feature to bind dependent properties to master property (2017-07-25 nested data binding)
+    notify_observers("logged_in")
+    notify_observers("logged_out")
+  end
+  
+  def valid?
+    !@user_name.to_s.strip.empty? && !@password.to_s.strip.empty?
+  end
+
+  def logged_in
+    self.status == "Logged In"
+  end
+
+  def logged_out
+    !self.logged_in
+  end
+
+  def login
+    return unless valid?
+    self.status = "Logged In"
+  end
+
+  def logout
+    self.user_name = ""
+    self.password = ""
+    self.status = "Logged Out"
+  end
+
+end
+
+#Login screen
+class Login
+  include Glimmer
+
+  def launch
+    presenter = LoginPresenter.new
+    @shell = shell {
+      text "Login"
+      composite {
+        grid_layout 2, false #two columns with differing widths
+
+        label { text "Username:" } # goes in column 1
+        @user_name_text = text {                     # goes in column 2
+          text bind(presenter, :user_name)
+          enabled bind(presenter, :logged_out)
+          on_key_pressed { |event| 
+            @password_text.set_focus if event.keyCode == swt(:cr)
+          }
+        }
+
+        label { text "Password:" }
+        @password_text = text(:password, :border) {
+          text bind(presenter, :password)
+          enabled bind(presenter, :logged_out)
+          on_key_pressed { |event| 
+            presenter.login if event.keyCode == swt(:cr)
+          }
+        }
+
+        label { text "Status:" }
+        label { text bind(presenter, :status) }
+
+        button {
+          text "Login"
+          enabled bind(presenter, :logged_out)
+          on_widget_selected { presenter.login }
+          on_key_pressed { |event| 
+            presenter.login if event.keyCode == swt(:cr)
+          }          
+        }
+
+        button {
+          text "Logout"
+          enabled bind(presenter, :logged_in)
+          on_widget_selected { presenter.logout }
+          on_key_pressed { |event| 
+            if event.keyCode == swt(:cr)
+              presenter.logout
+              @user_name_text.set_focus
+            end
+          }          
+        }
+      }
+    }
+    @shell.open
+  end
+end
+
+Login.new.launch

data/samples/elaborate/tic_tac_toe.rb

@@ -0,0 +1,55 @@
+require_relative "tic_tac_toe/board"
+
+class TicTacToe
+  include Glimmer
+
+  def initialize
+    @tic_tac_toe_board = Board.new
+    @shell = shell {
+      text "Tic-Tac-Toe"
+      minimum_size 150, 178
+      composite {
+        grid_layout 3, true
+        (1..3).each { |row|
+          (1..3).each { |column|
+            button {
+              layout_data :fill, :fill, true, true
+              text        bind(@tic_tac_toe_board[row, column], :sign)
+              enabled     bind(@tic_tac_toe_board[row, column], :empty)
+              font        style: :bold, height: 20
+              on_widget_selected {
+                @tic_tac_toe_board.mark(row, column)
+              }
+            }
+          }
+        }
+      }
+    }
+    observe(@tic_tac_toe_board, :game_status) { |game_status|
+      display_win_message if game_status == Board::WIN
+      display_draw_message if game_status == Board::DRAW
+    }
+  end
+
+  def display_win_message
+    display_game_over_message("Player #{@tic_tac_toe_board.winning_sign} has won!")
+  end
+
+  def display_draw_message
+    display_game_over_message("Draw!")
+  end
+
+  def display_game_over_message(message_text)
+    message_box(@shell) {
+      text 'Game Over'
+      message message_text
+    }.open
+    @tic_tac_toe_board.reset
+  end
+
+  def open
+    @shell.open
+  end
+end
+
+TicTacToe.new.open

data/samples/elaborate/tic_tac_toe/board.rb

@@ -0,0 +1,124 @@
+require_relative 'cell'
+
+class TicTacToe
+  class Board
+    DRAW = :draw
+    IN_PROGRESS = :in_progress
+    WIN = :win
+    attr :winning_sign
+    attr_accessor :game_status
+  
+    def initialize
+      @sign_state_machine = {nil => "X", "X" => "O", "O" => "X"}
+      build_grid
+      @winning_sign = Cell::EMPTY
+      @game_status = IN_PROGRESS
+    end
+  
+    #row and column numbers are 1-based
+    def mark(row, column)
+      self[row, column].mark(current_sign)
+      game_over? #updates winning sign
+    end
+  
+    def current_sign
+      @current_sign = @sign_state_machine[@current_sign]
+    end
+  
+    def [](row, column)
+      @grid[row-1][column-1]
+    end
+  
+    def game_over?
+       win? or draw?
+    end
+  
+    def win?
+      win = (row_win? or column_win? or diagonal_win?)
+      self.game_status=WIN if win
+      win
+    end
+  
+    def reset
+      (1..3).each do |row|
+        (1..3).each do |column|
+          self[row, column].reset
+        end
+      end
+      @winning_sign = Cell::EMPTY
+      @current_sign = nil
+      self.game_status=IN_PROGRESS
+    end
+  
+    private
+  
+    def build_grid
+      @grid = []
+      3.times do |row_index| #0-based
+        @grid << []
+        3.times { @grid[row_index] << Cell.new }
+      end
+    end
+  
+    def row_win?
+      (1..3).each do |row|
+        if row_has_same_sign(row)
+          @winning_sign = self[row, 1].sign
+          return true
+        end
+      end
+      false
+    end
+  
+    def column_win?
+      (1..3).each do |column|
+        if column_has_same_sign(column)
+          @winning_sign = self[1, column].sign
+          return true
+        end
+      end
+      false
+    end
+  
+    #needs refactoring if we ever decide to make the board size dynamic
+    def diagonal_win?
+      if (self[1, 1].sign == self[2, 2].sign) and (self[2, 2].sign == self[3, 3].sign) and self[1, 1].marked
+        @winning_sign = self[1, 1].sign
+        return true
+      end
+      if (self[3, 1].sign == self[2, 2].sign) and (self[2, 2].sign == self[1, 3].sign) and self[3, 1].marked
+        @winning_sign = self[3, 1].sign
+        return true
+      end
+      false
+    end
+  
+    def draw?
+      @board_full = true
+      3.times do |x|
+        3.times do |y|
+          @board_full = false if self[x, y].empty
+        end
+      end
+      self.game_status = DRAW if @board_full
+      @board_full
+    end
+  
+    def row_has_same_sign(number)
+      row_sign = self[number, 1].sign
+      [2, 3].each do |column|
+        return false unless row_sign == (self[number, column].sign)
+      end
+      true if self[number, 1].marked
+    end
+  
+    def column_has_same_sign(number)
+      column_sign = self[1, number].sign
+      [2, 3].each do |row|
+        return false unless column_sign == (self[row, number].sign)
+      end
+      true if self[1, number].marked
+    end
+  
+  end
+end

data/samples/elaborate/tic_tac_toe/cell.rb

@@ -0,0 +1,27 @@
+class TicTacToe
+  class Cell
+    EMPTY = ""
+    attr_accessor :sign, :empty
+  
+    def initialize
+      reset
+    end
+  
+    def mark(sign)
+      self.sign = sign
+    end
+  
+    def reset
+      self.sign = EMPTY
+    end
+  
+    def sign=(sign_symbol)
+      @sign = sign_symbol
+      self.empty = sign == EMPTY
+    end
+  
+    def marked
+      !empty
+    end
+  end
+end

data/samples/elaborate/user_profile.rb

@@ -0,0 +1,55 @@
+include Glimmer
+
+shell {
+  text "User Profile"
+
+  composite {
+    grid_layout 2, false
+
+    group {
+      text "Name"
+      grid_layout 2, false
+      layout_data :fill, :fill, true, true
+      label {text "First"}; text {text "Bullet"}
+      label {text "Last"}; text {text "Tooth"}  
+    }
+
+    group {
+      layout_data :fill, :fill, true, true
+      text "Gender"
+      radio {text "Male"; selection true}
+      radio {text "Female"}  
+    }
+
+    group {
+      layout_data :fill, :fill, true, true
+      text "Role"
+      check {text "Student"; selection true}
+      check {text "Employee"; selection true}  
+    }
+
+    group {
+      text "Experience"
+      row_layout
+      layout_data :fill, :fill, true, true
+      spinner {selection 5}; label {text "years"}
+    }
+
+    button {
+      text "save"
+      layout_data :right, :center, true, true
+      on_widget_selected { 
+        message_box {
+          text 'Profile Saved!'
+          message 'User profile has been saved!'
+        }.open 
+      }
+    }
+
+    button {
+      text "close"
+      layout_data :left, :center, true, true
+      on_widget_selected { exit(0) }
+    }
+  }
+}.open

data/samples/hello/hello_browser.rb

@@ -0,0 +1,8 @@
+include Glimmer
+
+shell {
+  minimum_size 1024, 860
+  browser {
+    url 'http://brightonresort.com/about'
+  }
+}.open

data/samples/hello/hello_combo.rb

@@ -0,0 +1,38 @@
+class Person
+  attr_accessor :country, :country_options
+
+  def initialize
+    self.country_options=["", "Canada", "US", "Mexico"]
+    self.country = "Canada"
+  end
+
+  def reset_country
+    self.country = "Canada"
+  end
+end
+
+class HelloCombo
+  include Glimmer
+  def launch
+    person = Person.new
+    
+    shell {
+      fill_layout :vertical
+      text 'Hello, Combo!'
+      
+      combo(:read_only) {
+        selection bind(person, :country)
+      }
+      
+      button {
+        text "Reset Selection"
+        
+        on_widget_selected do
+          person.reset_country
+        end
+      }
+    }.open
+  end
+end
+
+HelloCombo.new.launch

data/samples/hello/hello_computed.rb

@@ -0,0 +1,69 @@
+require_relative 'hello_computed/contact'
+
+class HelloComputed
+  include Glimmer
+
+  def initialize
+    @contact = Contact.new(
+      first_name: 'Barry',
+      last_name: 'McKibbin',
+      year_of_birth: 1985
+    )
+  end
+
+  def launch
+    shell {
+      text 'Hello, Computed!'
+      composite {
+        grid_layout {
+          num_columns 2
+          make_columns_equal_width true
+          horizontal_spacing 20
+          vertical_spacing 10
+        }
+        label {text 'First &Name: '}
+        text {
+          text bind(@contact, :first_name)
+          layout_data {
+            horizontal_alignment :fill
+            grab_excess_horizontal_space true
+          }
+        }
+        label {text '&Last Name: '}
+        text {
+          text bind(@contact, :last_name)
+          layout_data {
+            horizontal_alignment :fill
+            grab_excess_horizontal_space true
+          }
+        }
+        label {text '&Year of Birth: '}
+        text {
+          text bind(@contact, :year_of_birth)
+          layout_data {
+            horizontal_alignment :fill
+            grab_excess_horizontal_space true
+          }
+        }
+        label {text 'Name: '}
+        label {
+          text bind(@contact, :name, computed_by: [:first_name, :last_name])
+          layout_data {
+            horizontal_alignment :fill
+            grab_excess_horizontal_space true
+          }
+        }
+        label {text 'Age: '}
+        label {
+          text bind(@contact, :age, on_write: :to_i, computed_by: [:year_of_birth])
+          layout_data {
+            horizontal_alignment :fill
+            grab_excess_horizontal_space true
+          }
+        }
+      }
+    }.open
+  end
+end
+
+HelloComputed.new.launch