glimmer-dsl-libui 0.0.2 → 0.0.6

data/lib/glimmer/libui/control_proxy.rb

@@ -21,17 +21,19 @@
 
 module Glimmer
   module LibUI
-    # Proxy for LibUI Control objects
+    # Proxy for LibUI control objects
     #
     # Follows the Proxy Design Pattern
     class ControlProxy
       class << self
         def control_exists?(keyword)
-          ::LibUI.respond_to?("new_#{keyword}") || ::LibUI.respond_to?(keyword)
+          ::LibUI.respond_to?("new_#{keyword}") ||
+            ::LibUI.respond_to?(keyword) ||
+            Glimmer::LibUI.constants.include?("#{keyword.camelcase(:upper)}Proxy".to_sym)
         end
         
         def create(keyword, parent, args, &block)
-          widget_proxy_class(keyword).new(keyword, parent, args, &block)
+          widget_proxy_class(keyword).new(keyword, parent, args, &block).tap {|c| all_controls << c}
         end
         
         def widget_proxy_class(keyword)
@@ -42,6 +44,12 @@ module Glimmer
             Glimmer::LibUI::ControlProxy
           end
         end
+        
+        # autosave all controls in this array to avoid garbage collection
+        def all_controls
+          @@all_controls = [] unless defined?(@@all_controls)
+          @@all_controls
+        end
       end
       
       # libui returns the contained LibUI object
@@ -52,6 +60,7 @@ module Glimmer
         @parent_proxy = parent
         @args = args
         @block = block
+        @enabled = 1
         build_control
         if @parent_proxy.class.constants.include?(:APPEND_PROPERTIES)
           @parent_proxy.class::APPEND_PROPERTIES
@@ -70,28 +79,30 @@ module Glimmer
       end
 
       def can_handle_listener?(listener_name)
-        ::LibUI.respond_to?("control_#{listener_name}") || ::LibUI.respond_to?("#{@keyword}_#{listener_name}")
+        ::LibUI.respond_to?("#{libui_api_keyword}_#{listener_name}") ||
+          ::LibUI.respond_to?("control_#{listener_name}")
       end
       
       def handle_listener(listener_name, &listener)
-        if ::LibUI.respond_to?("control_#{listener_name}")
-          ::LibUI.send("control_#{listener_name}", @libui, &listener)
-        elsif ::LibUI.respond_to?("#{@keyword}_#{listener_name}")
-          ::LibUI.send("#{@keyword}_#{listener_name}", @libui, &listener)
+        safe_listener = Proc.new { listener.call(self) }
+        if ::LibUI.respond_to?("#{libui_api_keyword}_#{listener_name}")
+          ::LibUI.send("#{libui_api_keyword}_#{listener_name}", @libui, &safe_listener)
+        elsif ::LibUI.respond_to?("control_#{listener_name}")
+          ::LibUI.send("control_#{listener_name}", @libui, &safe_listener)
         end
       end
       
       def respond_to?(method_name, *args, &block)
         respond_to_libui?(method_name, *args, &block) ||
           (append_properties.include?(method_name.to_s) || append_properties.include?(method_name.to_s.sub(/=$/, ''))) ||
-          super
+          super(method_name, true)
       end
       
       def respond_to_libui?(method_name, *args, &block)
         ::LibUI.respond_to?("control_#{method_name}") ||
-          ::LibUI.respond_to?("#{@keyword}_#{method_name}") ||
-          ::LibUI.respond_to?("#{@keyword}_set_#{method_name}") ||
-          ::LibUI.respond_to?("#{@keyword}_set_#{method_name.to_s.sub(/=$/, '')}")
+          ::LibUI.respond_to?("#{libui_api_keyword}_#{method_name}") ||
+          ::LibUI.respond_to?("#{libui_api_keyword}_set_#{method_name}") ||
+          ::LibUI.respond_to?("#{libui_api_keyword}_set_#{method_name.to_s.sub(/=$/, '')}")
       end
       
       def method_missing(method_name, *args, &block)
@@ -105,16 +116,18 @@ module Glimmer
       end
       
       def send_to_libui(method_name, *args, &block)
-        if ::LibUI.respond_to?("control_#{method_name}")
+        if ::LibUI.respond_to?("#{libui_api_keyword}_#{method_name}") && args.empty?
+          ::LibUI.send("#{libui_api_keyword}_#{method_name}", @libui, *args)
+        elsif ::LibUI.respond_to?("#{libui_api_keyword}_set_#{method_name}") && !args.empty?
+          ::LibUI.send("#{libui_api_keyword}_set_#{method_name}", @libui, *args)
+        elsif ::LibUI.respond_to?("#{libui_api_keyword}_set_#{method_name.to_s.sub(/=$/, '')}") && !args.empty?
+          ::LibUI.send("#{libui_api_keyword}_set_#{method_name.to_s.sub(/=$/, '')}", @libui, *args)
+        elsif ::LibUI.respond_to?("#{libui_api_keyword}_#{method_name}") && method_name.start_with?('set_') && !args.empty?
+          ::LibUI.send("#{libui_api_keyword}_#{method_name}", @libui, *args)
+        elsif ::LibUI.respond_to?("#{libui_api_keyword}_#{method_name}") && !args.empty?
+          ::LibUI.send("#{libui_api_keyword}_#{method_name}", @libui, *args)
+        elsif ::LibUI.respond_to?("control_#{method_name}")
           ::LibUI.send("control_#{method_name}", @libui, *args)
-        elsif ::LibUI.respond_to?("#{@keyword}_#{method_name}") && args.empty?
-          ::LibUI.send("#{@keyword}_#{method_name}", @libui, *args)
-        elsif ::LibUI.respond_to?("#{@keyword}_set_#{method_name}") && !args.empty?
-          ::LibUI.send("#{@keyword}_set_#{method_name}", @libui, *args)
-        elsif ::LibUI.respond_to?("#{@keyword}_set_#{method_name.to_s.sub(/=$/, '')}") && !args.empty?
-          ::LibUI.send("#{@keyword}_set_#{method_name.to_s.sub(/=$/, '')}", @libui, *args)
-        elsif ::LibUI.respond_to?("#{@keyword}_#{method_name}") && method_name.start_with?('set_') && !args.empty?
-          ::LibUI.send("#{@keyword}_#{method_name}", @libui, *args)
         end
       end
       
@@ -132,10 +145,50 @@ module Glimmer
         end
       end
       
+      def libui_api_keyword
+        @keyword
+      end
+      
+      def enabled(value = nil)
+        if value.nil?
+          @enabled
+        elsif value != @enabled
+          if value == 1
+            send_to_libui('enable')
+          else
+            send_to_libui('disable')
+          end
+        end
+      end
+      alias enabled? enabled
+      alias set_enabled enabled
+      alias enabled= enabled
+      
+      def visible(value = nil)
+        current_value = send_to_libui('visible')
+        if value.nil?
+          current_value
+        elsif value != current_value
+          if value == 1
+            send_to_libui('show')
+          else
+            send_to_libui('hide')
+          end
+        end
+      end
+      alias visible? visible
+      alias set_visible visible
+      alias visible= visible
+      
+      def destroy
+        send_to_libui('destroy')
+        self.class.all_controls.delete(self)
+      end
+      
       private
       
       def build_control
-        @libui ||= if ::LibUI.respond_to?("new_#{keyword}")
+        @libui = if ::LibUI.respond_to?("new_#{keyword}")
           ::LibUI.send("new_#{@keyword}", *@args)
         elsif ::LibUI.respond_to?(keyword)
           @args[0] = @args.first.libui if @args.first.is_a?(ControlProxy)

data/lib/glimmer/libui/editable_combobox_proxy.rb

@@ -0,0 +1,43 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# 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 'glimmer/libui/control_proxy'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI editable combobox objects
+    #
+    # Follows the Proxy Design Pattern
+    class EditableComboboxProxy < ControlProxy
+      def items(*values)
+        values = values.first if values.first.is_a?(Array)
+        if values.empty?
+          @values
+        else
+          @values = values
+          @values.each { |value| append value }
+        end
+      end
+      alias set_items items
+      alias items= items
+    end
+  end
+end

data/lib/glimmer/libui/group_proxy.rb

@@ -0,0 +1,35 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# 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 'glimmer/libui/control_proxy'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI group objects
+    #
+    # Follows the Proxy Design Pattern
+    class GroupProxy < ControlProxy
+      def post_initialize_child(child)
+        ::LibUI.group_set_child(@libui, child.libui)
+      end
+    end
+  end
+end

data/lib/glimmer/libui/horizontal_box_proxy.rb

@@ -24,7 +24,7 @@ require 'glimmer/libui/box'
 
 module Glimmer
   module LibUI
-    # Proxy for LibUI Window objects
+    # Proxy for LibUI horizontal box objects
     #
     # Follows the Proxy Design Pattern
     class HorizontalBoxProxy < ControlProxy

data/lib/glimmer/libui/menu_item_proxy.rb

@@ -0,0 +1,41 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# 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 'glimmer/libui/control_proxy'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI menu item objects
+    #
+    # Follows the Proxy Design Pattern
+    class MenuItemProxy < ControlProxy
+      def libui_api_keyword
+        'menu_item'
+      end
+    
+      private
+      
+      def build_control
+        @libui = @parent_proxy.append_item(*@args)
+      end
+    end
+  end
+end

data/lib/glimmer/libui/multiline_entry_proxy.rb

@@ -0,0 +1,35 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# 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 'glimmer/libui/control_proxy'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI multiline entry objects
+    #
+    # Follows the Proxy Design Pattern
+    class MultilineEntryProxy < ControlProxy
+      def libui_api_keyword
+        'multiline_entry'
+      end
+    end
+  end
+end

data/lib/glimmer/libui/non_wrapping_multiline_entry_proxy.rb

@@ -0,0 +1,32 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# 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 'glimmer/libui/multiline_entry_proxy'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI non wrapping multiline entry objects
+    #
+    # Follows the Proxy Design Pattern
+    class NonWrappingMultilineEntryProxy < MultilineEntryProxy
+    end
+  end
+end

data/lib/glimmer/libui/preferences_menu_item_proxy.rb

@@ -0,0 +1,37 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# 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 'glimmer/libui/menu_item_proxy'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI preferences menu item object
+    #
+    # Follows the Proxy Design Pattern
+    class PreferencesMenuItemProxy < MenuItemProxy
+      private
+      
+      def build_control
+        @libui = @parent_proxy.append_preferences_item(*@args)
+      end
+    end
+  end
+end

data/lib/glimmer/libui/quit_menu_item_proxy.rb

@@ -0,0 +1,62 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# 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 'glimmer/libui/menu_item_proxy'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI quit menu item object
+    #
+    # Follows the Proxy Design Pattern
+    class QuitMenuItemProxy < MenuItemProxy
+      def can_handle_listener?(listener_name)
+        listener_name == 'on_clicked' || super
+      end
+    
+      def handle_listener(listener_name, &listener)
+        if listener_name == 'on_clicked'
+          @default_behavior_listener = Proc.new do
+            return_value = listener.call(self)
+            if return_value.is_a?(Numeric)
+              return_value
+            else
+              destroy
+              ::LibUI.quit
+              0
+            end
+          end
+          ::LibUI.on_should_quit(&@default_behavior_listener)
+        end
+      end
+    
+      private
+      
+      def build_control
+        @libui = @parent_proxy.append_quit_item(*@args)
+        handle_listener('on_clicked') do
+          destroy
+          ::LibUI.quit
+          0
+        end
+      end
+    end
+  end
+end

data/lib/glimmer/libui/radio_buttons_proxy.rb

@@ -0,0 +1,43 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# 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 'glimmer/libui/control_proxy'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI radio buttons objects
+    #
+    # Follows the Proxy Design Pattern
+    class RadioButtonsProxy < ControlProxy
+      def items(*values)
+        values = values.first if values.first.is_a?(Array)
+        if values.empty?
+          @values
+        else
+          @values = values
+          @values.each { |value| append value }
+        end
+      end
+      alias set_items items
+      alias items= items
+    end
+  end
+end

data/lib/glimmer/libui/separator_menu_item_proxy.rb

@@ -0,0 +1,37 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# 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 'glimmer/libui/menu_item_proxy'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI separator menu item object
+    #
+    # Follows the Proxy Design Pattern
+    class SeparatorMenuItemProxy < MenuItemProxy
+      private
+      
+      def build_control
+        @libui = @parent_proxy.append_separator(*@args)
+      end
+    end
+  end
+end

data/lib/glimmer/libui/tab_item_proxy.rb

@@ -0,0 +1,66 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# 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 'glimmer/libui/control_proxy'
+require 'glimmer/libui/horizontal_box_proxy'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI tab item objects
+    #
+    # Follows the Proxy Design Pattern
+    class TabItemProxy < ControlProxy
+      attr_reader :index
+      
+      def initialize(keyword, parent, args, &block)
+        @keyword = keyword
+        @parent_proxy = parent
+        @args = args
+        @block = block
+        @enabled = 1
+        @index = @parent_proxy.num_pages
+        @content = @block&.call
+        build_control
+      end
+      
+      def name
+        @args.first
+      end
+      
+      def margined(value = nil)
+        if value.nil?
+          @parent_proxy.margined(@index)
+        else
+          @parent_proxy.margined(@index, value)
+        end
+      end
+      alias set_margined margined
+      alias margined= margined
+          
+      private
+      
+      def build_control
+        @content = HorizontalBoxProxy.new('horizontal_box', @libui, []) if @content.nil?
+        @libui = @parent_proxy.append(name, @content.libui)
+      end
+    end
+  end
+end

data/lib/glimmer/libui/vertical_box_proxy.rb

@@ -24,7 +24,7 @@ require 'glimmer/libui/box'
 
 module Glimmer
   module LibUI
-    # Proxy for LibUI Window objects
+    # Proxy for LibUI vertical box objects
     #
     # Follows the Proxy Design Pattern
     class VerticalBoxProxy < ControlProxy

data/lib/glimmer/libui/window_proxy.rb

@@ -23,7 +23,7 @@ require 'glimmer/libui/control_proxy'
 
 module Glimmer
   module LibUI
-    # Proxy for LibUI Window objects
+    # Proxy for LibUI window objects
     #
     # Follows the Proxy Design Pattern
     class WindowProxy < ControlProxy
@@ -36,13 +36,14 @@ module Glimmer
         unless @shown_at_least_once
           @shown_at_least_once = true
           ::LibUI.main
+          ::LibUI.quit
         end
       end
       
       def handle_listener(listener_name, &listener)
         if listener_name == 'on_closing'
           default_behavior_listener = Proc.new do
-            return_value = listener.call
+            return_value = listener.call(self)
             if return_value.is_a?(Numeric)
               return_value
             else
@@ -58,7 +59,6 @@ module Glimmer
       private
       
       def build_control
-        ::LibUI.init
         super.tap do
           handle_listener('on_closing') do
             destroy

data/lib/glimmer-dsl-libui.rb

@@ -38,3 +38,5 @@ Glimmer::Config.excluded_keyword_checkers << lambda do |method_symbol, *args|
   result = false
   result ||= method == 'load_iseq'
 end
+
+::LibUI.init