Cthulhu is no longer a fork. Now it is a screen reader written in Golang.

internal/app/combo_presentation_test.go

@@ -0,0 +1,60 @@
+// Copyright (c) 2026 Storm Dragon
+// Authors: Storm Dragon, Angus Kola
+// SPDX-License-Identifier: GPL-3.0-or-later
+
+package app
+
+import (
+	"context"
+	"log/slog"
+	"reflect"
+	"testing"
+
+	"git.stormux.org/storm/cthulhu/internal/atspi"
+	"git.stormux.org/storm/cthulhu/internal/presentation"
+	"git.stormux.org/storm/cthulhu/internal/sound"
+)
+
+func TestComboSelectionSpeaksValueWithoutRepeatingRoleSound(t *testing.T) {
+	for _, kind := range []string{atspi.FocusEvent, atspi.FocusedStateEvent, atspi.AccessibleNameEvent, atspi.AccessibleValueEvent, atspi.ValueChangedEvent} {
+		t.Run(kind, func(t *testing.T) {
+			queue := &modeSoundQueue{speech: &fakeSpeechQueue{spoken: make(chan string, 16)}, sounds: make(chan sound.Cue, 16)}
+			adapter := &fakeAdapter{events: make(chan atspi.Event, 16)}
+			combo := atspi.Snapshot{BusName: ":1.70", Path: "/combo", Role: "combo box", Focused: true, ValueText: "bacon"}
+			focus := atspi.NewEvent(atspi.FocusEvent, combo)
+			adapter.events <- focus
+			adapter.events <- focus // Providers can repeat focus while the combo stays active.
+			for _, value := range []string{"hamburger", "steak", "hamburger", "bacon"} {
+				combo.ValueText = value
+				changed := atspi.NewEvent(kind, combo)
+				changed.Detail1 = 1
+				changed.OriginPath = combo.Path
+				adapter.events <- changed
+			}
+			adapter.events <- atspi.NewEvent(atspi.FocusEvent, atspi.Snapshot{BusName: combo.BusName, Path: "/other", Role: "entry", Name: "Other", Focused: true})
+			adapter.events <- focus
+			close(adapter.events)
+			options := presentation.DefaultOptions()
+			options.EnableSound, options.PlaySoundForRole = true, true
+			options.RoleSoundPresentation = "sound_only"
+			processEventsWithInput(context.Background(), slog.New(slog.DiscardHandler), queue, adapter, nil, nil, 0, nil, nil, nil, nil, options)
+			close(queue.speech.spoken)
+			var got []string
+			for text := range queue.speech.spoken {
+				got = append(got, text)
+			}
+			want := []string{"bacon", "hamburger", "steak", "hamburger", "bacon", "Other, entry", "bacon"}
+			if !reflect.DeepEqual(got, want) {
+				t.Fatalf("speech = %q, want %q", got, want)
+			}
+			if len(queue.sounds) != 2 {
+				t.Fatalf("got %d sounds, want only initial and returning focus", len(queue.sounds))
+			}
+			for range 2 {
+				if cue := <-queue.sounds; cue.Name != "combobox" {
+					t.Fatalf("cue = %+v", cue)
+				}
+			}
+		})
+	}
+}