zaniah 0.2.0 → 0.3.0

data/lib/zaniah/layout/style.rb

@@ -8,12 +8,27 @@ module Zaniah
         flex_grow: 0, flex_shrink: 1, flex_basis: :auto, width: :auto, height: :auto,
         min_width: 0, min_height: 0, max_width: Float::INFINITY, max_height: Float::INFINITY,
         padding: 0, margin: 0, border: 0, gap: 0, position: :relative,
-        overflow: :visible}.freeze
+        direction: :ltr, padding_start: nil, padding_end: nil,
+        margin_start: nil, margin_end: nil, border_start: nil, border_end: nil,
+        overflow: :visible, aspect_ratio: nil, grid_template_columns: nil,
+        grid_template_rows: nil, grid_column: nil, grid_row: nil, row_gap: nil,
+        column_gap: nil, z_index: 0, opacity: 1.0, transform: nil,
+        background: nil, border_widths: nil, border_style: :solid,
+        border_color: nil, corner_radii: nil, shadows: nil, cursor: nil,
+        ring: nil, text_color: nil, font_size: nil, font_family: nil,
+        line_height: nil, letter_spacing: nil, text_align: :start,
+        text_wrap: :wrap, text_overflow: :clip}.freeze
+      INHERITED = %i[text_color font_size font_family line_height letter_spacing].freeze
 
       def initialize(**properties) = @values = DEFAULTS.merge(properties).freeze
       def [](name) = @values[name]
       def merge(**properties) = Style.new(**@values.merge(properties))
       def to_h = @values
+
+      def inherit(parent)
+        inherited = INHERITED.to_h { |name| [name, self[name] || parent[name]] }
+        merge(**inherited)
+      end
     end
   end
 end

data/lib/zaniah/layout.rb

@@ -3,6 +3,7 @@
 require_relative "layout/available_space"
 require_relative "layout/style"
 require_relative "layout/node"
+require_relative "layout/grid"
 require_relative "layout/engine"
 require_relative "layout/tree"
 

data/lib/zaniah/length.rb

@@ -1,12 +1,15 @@
 # frozen_string_literal: true
 
 module Zaniah
+  MinMax = Data.define(:min, :max)
+
   Length = Data.define(:value, :unit) do
     def resolve(available, rem: 16)
       case unit
       when :px then value
       when :percent then available * value / 100.0
       when :rem then rem * value
+      when :fr then raise ArgumentError, "fr lengths are only valid in grid tracks"
       else raise ArgumentError, "unknown length unit #{unit}"
       end
     end

data/lib/zaniah/length_units.rb

@@ -5,5 +5,12 @@ module Zaniah
     def px(value) = Length.new(value, :px)
     def rems(value) = Length.new(value, :rem)
     def percent(value) = Length.new(value, :percent)
+    def fr(value) = Length.new(value, :fr)
+    def minmax(min, max) = MinMax.new(min, max)
+
+    def repeat(count, track)
+      raise ArgumentError, "repeat count must be a positive integer" unless count.is_a?(Integer) && count.positive?
+      Array.new(count, track)
+    end
   end
 end

data/lib/zaniah/list.rb

@@ -4,32 +4,37 @@ module Zaniah
   # A variable-height, viewport-only list. Unknown rows use estimated_height;
   # measuring visible rows refines the prefix sums without moving the anchor.
   class List < Element
-    attr_reader :scroll_y, :visible_range, :heights
+    attr_reader :visible_range, :heights, :scroll_state
 
     def initialize(count:, estimated_height: 24, overscan: 2, &render_item)
       super()
       raise ArgumentError, "a row renderer is required" unless render_item
       raise ArgumentError, "overscan must be a nonnegative integer" unless overscan.is_a?(Integer) && overscan >= 0
       @heights, @overscan, @render_item = HeightIndex.new(count, estimated_height), overscan, render_item
-      @scroll_y, @viewport, @visible_range = 0.0, 0.0, 0...0
+      @scroll_state = ScrollState.new(axis: :vertical)
+      @scroll_state.update(content_size: Size.new(0, @heights.total), viewport_size: Size.new(0, 0))
+      @viewport, @visible_range = 0.0, 0...0
       style(overflow: :hidden)
       on_scroll_wheel do |event, cx|
-        self.scroll_y = @scroll_y + event.delta.y
+        @scroll_state.glide_by(event.delta.y, animator: cx.animator, key: [:scroll, object_id],
+          duration: cx.theme.motion.reduced? ? 0 : cx.theme.motion.duration_slow)
         cx.window.request_frame
       end
     end
 
     def total_height = @heights.total
+    def scroll_y = @scroll_state.offset.y
 
     def scroll_y=(value)
-      raise ArgumentError, "scroll offset must be finite" unless value.is_a?(Numeric) && value.finite?
-      @scroll_y = value.to_f.clamp(0, [total_height - @viewport, 0].max)
+      @scroll_state.scroll_to(value)
+      value
     end
 
     def update_height(index, height)
-      anchor = @heights.index_at(@scroll_y)
+      anchor = @heights.index_at(scroll_y)
       delta = @heights.update(index, height)
-      self.scroll_y = @scroll_y + (index < anchor ? delta : 0)
+      @scroll_state.update(content_size: Size.new(@scroll_state.content_size.width, total_height), viewport_size: @scroll_state.viewport_size)
+      @scroll_state.preserve_anchor(delta) if index < anchor
       self
     end
 
@@ -40,7 +45,7 @@ module Zaniah
       when :center then top - (@viewport - height) / 2
       when :end then top + height - @viewport
       when :nearest
-        top < @scroll_y ? top : (top + height > @scroll_y + @viewport ? top + height - @viewport : @scroll_y)
+        top < scroll_y ? top : (top + height > scroll_y + @viewport ? top + height - @viewport : scroll_y)
       else raise ArgumentError, "unknown alignment #{align.inspect}"
       end
       self.scroll_y = offset
@@ -49,11 +54,16 @@ module Zaniah
 
     def request_layout(cx)
       @state = cx.state(@key, &@state_initializer) if @key && @state_initializer
+      if cx.respond_to?(:animator)
+        @scroll_state.animation(animator: cx.animator, key: [:scroll, object_id],
+          duration: cx.theme.motion.reduced? ? 0 : cx.theme.motion.duration_slow)
+      end
+      @scroll_state.sample_glide
       @viewport = dimension(:height, cx.window.content_size.height)
       width = dimension(:width, cx.window.content_size.width)
-      self.scroll_y = @scroll_y
-      anchor = @heights.index_at(@scroll_y)
-      within = @scroll_y - @heights.prefix(anchor)
+      @scroll_state.update(content_size: Size.new(width, total_height), viewport_size: Size.new(width, @viewport))
+      anchor = @heights.index_at(scroll_y)
+      within = scroll_y - @heights.prefix(anchor)
       measured, engine = {}, Layout::Engine.new
       loop do
         @visible_range = viewport_range
@@ -61,19 +71,21 @@ module Zaniah
         break if missing.empty?
         missing.each do |index|
           element = @render_item.call(index)
-          raise TypeError, "row renderer must return an Element" unless element.is_a?(Element)
+          raise TypeError, "row renderer must return a renderable element" unless element.respond_to?(:request_layout) && element.respond_to?(:prepaint) && element.respond_to?(:paint)
           node = element.request_layout(cx)
           _natural_width, height = engine.measure(node, width: width, height: @viewport)
           @heights.update(index, [height, 1.0].max)
           measured[index] = [element, node]
         end
+        @scroll_state.update(content_size: Size.new(width, total_height), viewport_size: Size.new(width, @viewport))
         self.scroll_y = @heights.prefix(anchor) + [within, anchor < @heights.count ? @heights[anchor] : 0].min
       end
       @children = @visible_range.map { |index| measured.fetch(index).first }
+      @children.each { |child| child.send(:parent=, self) }
       nodes = @visible_range.map do |index|
         node = measured.fetch(index).last
         node.style = node.style.merge(position: :absolute, left: 0, right: 0,
-                                     top: @heights.prefix(index) - @scroll_y, height: @heights[index])
+                                     top: @heights.prefix(index) - scroll_y, height: @heights[index])
         node
       end
       @layout_node = Layout::Node.new(style: @style, children: nodes,
@@ -90,8 +102,8 @@ module Zaniah
 
     def viewport_range
       return 0...0 if @heights.count.zero? || @viewport.zero?
-      first = [@heights.index_at(@scroll_y) - @overscan, 0].max
-      last = [@heights.index_at(@scroll_y + @viewport) + 1 + @overscan, @heights.count].min
+      first = [@heights.index_at(scroll_y) - @overscan, 0].max
+      last = [@heights.index_at(scroll_y + @viewport) + 1 + @overscan, @heights.count].min
       first...last
     end
   end

data/lib/zaniah/platform/appearance.rb

@@ -0,0 +1,11 @@
+# frozen_string_literal: true
+
+module Zaniah
+  module Platform
+    module Appearance
+      def appearance = :dark
+      def reduced_motion? = false
+      def on_appearance(&block) = @on_appearance = block
+    end
+  end
+end

data/lib/zaniah/platform/headless/window.rb

@@ -6,20 +6,24 @@ module Zaniah
       Popup = Data.define(:labels, :enabled, :selected_index, :bounds)
 
       class Window
+        include Appearance
         DEFAULT_CLEAR = "#181b20"
 
-        attr_reader :content_size, :scene, :device, :dispatcher, :scale_factor, :text_runs
-        attr_accessor :text_system, :ime_state, :title
+        attr_reader :content_size, :scene, :device, :dispatcher, :scale_factor, :text_runs, :pointer_position, :cursor_style, :animator, :clock, :accessibility_tree, :accessibility_revision, :frame_stats
+        attr_accessor :text_system, :ime_state, :title, :app, :devtools
 
         def initialize(width: 800, height: 600, title: "Zaniah UI", scale_factor: 1,
                        keymap: nil, clock: MONOTONIC_CLOCK)
           @content_size, @scale_factor, @title = Size.new(width, height), scale_factor, title
           @scene = Scene.new
           @device = GPU::Software.new(width, height)
-          @dispatcher = Input::Dispatcher.new(keymap: keymap || Input::Keymap.new(clock: clock))
+          @dispatcher = Input::Dispatcher.new(keymap: keymap || Input::Keymap.default_ui(clock: clock))
           @clock = clock
+          @animator = Animator.new(clock: clock)
+          @accessibility_tree, @accessibility_revision = Accessibility::Tree.new, 0
+          @frame_stats = {fps: 0.0, frame_ms: 0.0, layout_ms: 0.0, prepaint_ms: 0.0, paint_ms: 0.0, command_count: 0}.freeze
           @state, @used_state, @text_runs = {}, {}, []
-          @dirty, @closed = true, false
+          @dirty, @closed, @pointer_down, @cursor_style = true, false, false, :arrow
         end
 
         def on_input(&block) = @on_input = block
@@ -31,10 +35,25 @@ module Zaniah
         def draw(&block) = @draw = block
         def request_frame = @dirty = true
         def dirty? = @dirty
+        def animation_active? = !!@animator&.active?
         def closed? = @closed
+        def pointer_down? = @pointer_down
+        def set_cursor(style)
+          raise ArgumentError, "unknown cursor #{style}" unless %i[arrow text pointer crosshair resize_horizontal resize_vertical].include?(style)
+          return style if @cursor_style == style
+          self.cursor_style = style
+          @cursor_style = style
+        end
+        def cursor_style=(style)
+          @cursor_style = style
+        end
         def displays = [Display.new(0, "Headless", Bounds.new(0, 0, @content_size.width, @content_size.height), @scale_factor, true)]
 
         def popup
+          if @popup_component.respond_to?(:popup_data)
+            data = @popup_component.popup_data
+            return Popup.new(labels: data[:labels], enabled: data[:enabled], selected_index: data[:selected_index], bounds: data[:bounds])
+          end
           return unless @menu
 
           Popup.new(labels: @menu[:items].map { |label, _| label.dup.freeze }.freeze,
@@ -51,13 +70,19 @@ module Zaniah
 
         def input(event)
           return if popup_input(event)
+          @pointer_position = event.position if event.respond_to?(:position)
+          @pointer_down = true if event.is_a?(Input::MouseDown)
+          @pointer_down = false if event.is_a?(Input::MouseUp)
           @tooltip_offered = false if event.is_a?(Input::MouseMove)
           @tooltip = nil if event.is_a?(Input::MouseDown) || event.is_a?(Input::KeyDown)
           @on_input&.call(event)
+          @devtools&.handle_input(event)
           if event.respond_to?(:position)
             @dispatcher.mouse(event)
           elsif event.is_a?(Input::KeyDown)
             @dispatcher.key(event.keystroke)
+          else
+            @dispatcher.input(event)
           end
           @tooltip = nil if event.is_a?(Input::MouseMove) && !@tooltip_offered
           request_frame
@@ -71,6 +96,13 @@ module Zaniah
 
         def context_menu(items, position: Point.new(0, 0))
           raise ArgumentError, "menu items must be label/callback pairs" unless items.is_a?(Array) && items.all? { |item| item.is_a?(Array) && item.length == 2 && item.first.is_a?(String) && (item.last.nil? || item.last.respond_to?(:call)) }
+          if defined?(Zaniah::UI::ContextMenu)
+            @popup_component = Zaniah::UI::ContextMenu.new(items, anchor: position)
+            @menu = nil
+            @tooltip = nil
+            request_frame
+            return @popup_component
+          end
           @menu = {items: items.map(&:dup), position: position, index: items.index { |_, callback| callback } || 0}
           @tooltip = nil
           request_frame
@@ -91,14 +123,20 @@ module Zaniah
             @tooltip[:shown] = true
             request_frame
           end
+          request_frame if @animator&.active?
           return unless @dirty && !@closed
           @dirty = false
           result = @draw&.call(self)
-          render(result) if result.is_a?(Element)
-          @device.render(result) if result.is_a?(Scene)
+          if result.respond_to?(:request_layout) && result.respond_to?(:prepaint) && result.respond_to?(:paint)
+            render(result)
+          elsif result.is_a?(Scene)
+            @device.render(result)
+          end
+          request_frame if @animator&.active?
         end
 
         def render(element, clear: DEFAULT_CLEAR, present: true)
+          frame_started = MONOTONIC_CLOCK.call
           @text_system.scale_factor = @scale_factor if @text_system.respond_to?(:scale_factor=)
           @scene.clear
           @text_runs.clear
@@ -106,12 +144,31 @@ module Zaniah
           @used_state.clear
           @dispatcher.clear_hits
           cx = FrameContext.new(self)
+          @animator.reduced_motion = cx.theme.motion.reduced?
+          layout_started = MONOTONIC_CLOCK.call
           root = element.request_layout(cx)
           Layout::Engine.new.compute(root, width: @content_size.width, height: @content_size.height)
+          layout_finished = MONOTONIC_CLOCK.call
+          @animator.sample(@clock.call)
           element.prepaint(root.bounds, nil, cx)
+          cx.interactivity.resolve(@dispatcher, @pointer_position, @pointer_down)
+          prepaint_finished = MONOTONIC_CLOCK.call
+          set_cursor(:arrow)
           element.paint(root.bounds, nil, nil, cx)
           paint_popups
+          paint_finished = MONOTONIC_CLOCK.call
+          overlays = [@popup_component].compact
+          accessibility_changed(@accessibility_tree.root, @accessibility_tree.changes) if @accessibility_tree.update(element, cx, overlays: overlays)
           @state.delete_if { |key, _| !@used_state[key] }
+          elapsed = frame_started - (@last_frame_at || frame_started)
+          fps = elapsed.positive? ? 1.0 / elapsed : 0.0
+          @smoothed_fps = @smoothed_fps ? @smoothed_fps * 0.9 + fps * 0.1 : fps
+          @last_frame_at = frame_started
+          @frame_stats = {fps: @smoothed_fps, frame_ms: (paint_finished - frame_started) * 1000,
+            layout_ms: (layout_finished - layout_started) * 1000,
+            prepaint_ms: (prepaint_finished - layout_finished) * 1000,
+            paint_ms: (paint_finished - prepaint_finished) * 1000,
+            command_count: @scene.commands.length / 4}.freeze
           @on_frame&.call(element, clear)
           @device.render(@scene, clear: clear) if present
           @text_system.end_frame if @text_system.respond_to?(:end_frame)
@@ -123,11 +180,34 @@ module Zaniah
           @state[key] = yield
         end
 
+        def accessibility_changed(root, changes)
+          @accessibility_revision += 1
+          Accessibility.publish(self, root, changes)
+        end
+
         def write_png(path) = @device.write_png(path)
 
         private
 
         def popup_input(event)
+          if @popup_component
+            unless @popup_component.open?
+              @popup_component = nil
+              return false
+            end
+            @pointer_position = event.position if event.respond_to?(:position)
+            @pointer_down = true if event.is_a?(Input::MouseDown)
+            @pointer_down = false if event.is_a?(Input::MouseUp)
+            if event.respond_to?(:position)
+              @dispatcher.mouse(event)
+            elsif event.is_a?(Input::KeyDown)
+              @dispatcher.key(event.keystroke)
+            else
+              @dispatcher.input(event)
+            end
+            request_frame
+            return true
+          end
           return false unless @menu
           if event.is_a?(Input::KeyDown)
             key = Input::Keystroke.normalize(event.keystroke)
@@ -174,9 +254,11 @@ module Zaniah
         end
 
         def paint_popups
-          if @menu
+          if @popup_component
+            paint_popup_component(@popup_component)
+          elsif @menu
             box = popup_bounds(@menu)
-            @scene.layer(1_000_000) do
+            @scene.layer(Scene::LAYER_POPUP) do
               @scene.quad(box.x, box.y, box.width, box.height, color: "#202936", radius: 4, border_width: 1, border_color: "#526176")
               @scene.clip(box) do
                 @menu[:items].each_with_index do |(label, callback), index|
@@ -186,17 +268,27 @@ module Zaniah
                 end
               end
             end
+          elsif @tooltip && @tooltip[:shown] && defined?(Zaniah::UI::Tooltip)
+            paint_popup_component(Zaniah::UI::Tooltip.new(@tooltip[:text], anchor: @tooltip[:position]))
           elsif @tooltip && @tooltip[:shown]
             text = @tooltip[:text]
             position = @tooltip[:position]
             width = [text.length * 8 + 20, @content_size.width].min
             x, y = position.x.clamp(0, @content_size.width - width), (position.y + 20).clamp(0, [@content_size.height - 30, 0].max)
-            @scene.layer(1_000_000) do
+            @scene.layer(Scene::LAYER_TOOLTIP) do
               @scene.quad(x, y, width, 28, color: "#202936", radius: 4, border_width: 1, border_color: "#526176")
               @scene.clip(Bounds.new(x, y, width, 28)) { popup_text(text, x + 10, y + 5, "#edf2f7") }
             end
           end
         end
+
+        def paint_popup_component(component)
+          cx = FrameContext.new(self)
+          root = component.request_layout(cx)
+          Layout::Engine.new.compute(root, width: @content_size.width, height: @content_size.height)
+          component.prepaint(root.bounds, nil, cx)
+          component.paint(root.bounds, nil, nil, cx)
+        end
       end
     end
   end

data/lib/zaniah/platform/linux/appearance_aware.rb

@@ -17,6 +17,14 @@ module Zaniah
           ENV.fetch("GTK_THEME", "").downcase.include?("dark") ? :dark : :light
         end
 
+        def reduced_motion?
+          return @reduced_motion if instance_variable_defined?(:@reduced_motion)
+          output, status = Open3.capture2e("gsettings", "get", "org.gnome.desktop.interface", "enable-animations")
+          @reduced_motion = status.success? && output.strip == "false"
+        rescue Errno::ENOENT
+          @reduced_motion = false
+        end
+
         def on_appearance(&block)
           @on_appearance = block
           close_appearance

data/lib/zaniah/platform/linux/wayland_window.rb

@@ -130,6 +130,7 @@ module Zaniah
           return if closed?
           @connection.poll
           poll_appearance
+          Accessibility.poll(self)
           return close if @close_requested
           finish_drop if @pending_drop
           if @repeat_key && Process.clock_gettime(Process::CLOCK_MONOTONIC) >= @repeat_at
@@ -140,7 +141,7 @@ module Zaniah
         end
         def run
           until closed?
-            @connection.poll(timeout: dirty? ? 0 : 0.05)
+            @connection.poll(timeout: dirty? || animation_active? ? 0 : 0.05)
             tick
           end
         end
@@ -345,6 +346,7 @@ module Zaniah
         end
         def close
           return false unless super
+          Accessibility.close(self)
           close_appearance
           cleanup_native
           true

data/lib/zaniah/platform/linux/window.rb

@@ -108,6 +108,7 @@ module Zaniah
         def tick
           poll_events unless closed?
           poll_appearance unless closed?
+          Accessibility.poll(self) unless closed?
           raise @native_error if @native_error
           super
         end
@@ -116,7 +117,7 @@ module Zaniah
           io = IO.for_fd(fd, autoclose: false)
           until closed?
             tick
-            IO.select([io], nil, nil, 0.05) unless dirty? || closed?
+            IO.select([io], nil, nil, 0.05) unless dirty? || animation_active? || closed?
           end
         end
         def poll_events
@@ -285,7 +286,7 @@ module Zaniah
             next if line.start_with?("#")
             uri = URI.parse(line.strip) rescue nil
             next unless uri&.scheme == "file" && [nil, "", "localhost"].include?(uri.host)
-            path = URI::DEFAULT_PARSER.unescape(uri.path).force_encoding("UTF-8")
+            path = URI::RFC2396_PARSER.unescape(uri.path).force_encoding("UTF-8")
             path if path.start_with?("/") && !path.include?("\0") && path.valid_encoding?
           end
         end
@@ -402,6 +403,7 @@ module Zaniah
         end
         def close
           return false unless super
+          Accessibility.close(self)
           close_appearance
           x(:XDestroyIC, [P], V, @ic) if @ic
           x(:XCloseIM, [P], I, @im) if @im && !@im.null?

data/lib/zaniah/platform/mac/app.rb

@@ -57,7 +57,7 @@ module Zaniah
         def run
           yield self if block_given?
           until WINDOWS.values.uniq.all?(&:closed?)
-            poll(wait: WINDOWS.values.any?(&:dirty?) ? 0 : 0.05)
+            poll(wait: WINDOWS.values.any? { |window| window.dirty? || window.animation_active? } ? 0 : 0.05)
             WINDOWS.values.uniq.each { |window| window.tick(poll_events: false) }
           end
         end

data/lib/zaniah/platform/mac/core_text.rb

@@ -7,6 +7,9 @@ module Zaniah
     module Mac
       class CoreText
         P, L, D, V = Fiddle::TYPE_VOIDP, Fiddle::TYPE_LONG, Fiddle::TYPE_DOUBLE, Fiddle::TYPE_VOID
+        # Initializing CoreText first can leave AppKit's later NSFont cache invalid.
+        APPKIT = FFI::Library.new("/System/Library/Frameworks/AppKit.framework/AppKit")
+
         def initialize
           require "alhena"
           @cf = FFI::Library.new("/System/Library/Frameworks/CoreFoundation.framework/CoreFoundation")

data/lib/zaniah/platform/mac/window.rb

@@ -124,12 +124,13 @@ module Zaniah
         end
         def run
           until closed?
-            App.instance.poll(wait: dirty? ? 0 : 0.05)
+            App.instance.poll(wait: dirty? || animation_active? ? 0 : 0.05)
             tick(poll_events: false)
           end
         end
         def close
           return false unless super
+          Accessibility.close(self)
           WINDOWS.delete_if { |_, window| window.equal?(self) }
           O.send(@handle, "setDelegate:", 0, args: [:pointer], result: :void)
           O.send(@handle, "close", result: :void)
@@ -244,6 +245,12 @@ module Zaniah
           name = O.text(O.send(O.send(@view, "effectiveAppearance"), "name"))
           name.include?("Dark") ? :dark : :light
         end
+        def reduced_motion?
+          workspace = O.send(O.klass("NSWorkspace"), "sharedWorkspace")
+          selector = O.selector("accessibilityDisplayShouldReduceMotion")
+          return false if O.send(workspace, "respondsToSelector:", selector, args: [:pointer], result: :bool).zero?
+          O.send(workspace, "accessibilityDisplayShouldReduceMotion", result: :bool) != 0
+        end
         def on_appearance(&block) = @on_appearance = block
         def appearance_changed
           @on_appearance&.call(appearance)
@@ -254,6 +261,7 @@ module Zaniah
         end
         def context_action(index) = @context_actions&.fetch(index)&.call
         def context_menu(items, position: Point.new(0, 0))
+          return super if defined?(Zaniah::UI::ContextMenu)
           menu = O.new("NSMenu")
           O.send(menu, "setAutoenablesItems:", 0, args: [:bool], result: :void)
           @context_actions = []

data/lib/zaniah/platform/tui/window.rb

@@ -23,7 +23,7 @@ module Zaniah
             @input.raw do
               until closed?
                 tick
-                if IO.select([@input], nil, nil, 0.05)
+                if IO.select([@input], nil, nil, animation_active? ? 0 : 0.05)
                   data = @input.readpartial(4096)
                   feed_input(data)
                 else

data/lib/zaniah/platform/windows/window.rb

@@ -9,7 +9,7 @@ module Zaniah
     module Windows
       def self.displays
         user, scale = FFI::Library.new("user32.dll"), FFI::Library.new("shcore.dll")
-        ptype, int, uint = Fiddle::TYPE_VOIDP, Fiddle::TYPE_INT, Fiddle::TYPE_UINT
+        ptype, int = Fiddle::TYPE_VOIDP, Fiddle::TYPE_INT
         result, error = [], nil
         callback = Fiddle::Closure::BlockCaller.new(int, [ptype, ptype, ptype, Fiddle::TYPE_INTPTR_T]) do |monitor, _dc, _rect, _data|
           begin
@@ -128,7 +128,7 @@ module Zaniah
         def run
           until closed?
             tick
-            @user.fn(:MsgWaitForMultipleObjectsEx, [U, P, U, U, U], U).call(0, 0, 50, 0x04FF, 4) unless dirty? || closed?
+            @user.fn(:MsgWaitForMultipleObjectsEx, [U, P, U, U, U], U).call(0, 0, 50, 0x04FF, 4) unless dirty? || animation_active? || closed?
           end
         end
         def native_callback
@@ -146,6 +146,9 @@ module Zaniah
         def message(message, wparam, lparam)
           case message
           when 0x0010 then close; return 0
+          when 0x003d
+            result = Accessibility::Windows.provider_result(self, wparam, lparam)
+            return result if result
           when 0x0233
             dropped_files(wparam)
             return 0
@@ -327,8 +330,14 @@ module Zaniah
             wide("Software\\Microsoft\\Windows\\CurrentVersion\\Themes\\Personalize"), wide("AppsUseLightTheme"), 0x10, 0, value, size)
           result.zero? && value.unpack1("I").zero? ? :dark : :light
         end
+        def reduced_motion?
+          enabled = [1].pack("I")
+          result = @user.fn(:SystemParametersInfoW, [U, U, P, U], I).call(0x1042, 0, enabled, 0)
+          !result.zero? && enabled.unpack1("I").zero?
+        end
         def on_appearance(&block) = @on_appearance = block
         def context_menu(items, position: nil)
+          return super(items, position: position || Point.new(0, 0)) if defined?(Zaniah::UI::ContextMenu)
           menu = @user.fn(:CreatePopupMenu, [], P).call
           raise Error, "CreatePopupMenu failed" if menu.null?
           items.each_with_index do |(label, action), index|
@@ -393,6 +402,7 @@ module Zaniah
         end
         def close
           return false unless super
+          Accessibility.close(self)
           @gl.fn(:wglMakeCurrent, [P, P], I).call(0, 0)
           @gl.fn(:wglDeleteContext, [P], I).call(@context)
           @user.fn(:ReleaseDC, [P, P], I).call(@handle, @dc)

data/lib/zaniah/platform.rb

@@ -1,6 +1,7 @@
 # frozen_string_literal: true
 
 require_relative "platform/display"
+require_relative "platform/appearance"
 require_relative "platform/headless/window"
 require_relative "platform/tui/window"