2024-12-18 10:05:44 -05:00
|
|
|
#!/usr/bin/env python3
|
|
|
|
#
|
|
|
|
# Copyright (c) 2024 Stormux
|
|
|
|
# Copyright (c) 2010-2012 The Orca Team
|
|
|
|
# Copyright (c) 2012 Igalia, S.L.
|
|
|
|
# Copyright (c) 2005-2010 Sun Microsystems Inc.
|
|
|
|
#
|
|
|
|
# This library is free software; you can redistribute it and/or
|
|
|
|
# modify it under the terms of the GNU Lesser General Public
|
|
|
|
# License as published by the Free Software Foundation; either
|
|
|
|
# version 2.1 of the License, or (at your option) any later version.
|
|
|
|
#
|
|
|
|
# This library is distributed in the hope that it will be useful,
|
|
|
|
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
|
|
# Lesser General Public License for more details.
|
|
|
|
#
|
|
|
|
# You should have received a copy of the GNU Lesser General Public
|
|
|
|
# License along with this library; if not, write to the
|
|
|
|
# Free Software Foundation, Inc., Franklin Street, Fifth Floor,
|
|
|
|
# Boston MA 02110-1301 USA.
|
|
|
|
#
|
|
|
|
# Fork of Orca Screen Reader (GNOME)
|
|
|
|
# Original source: https://gitlab.gnome.org/GNOME/orca
|
2024-10-17 16:33:13 -04:00
|
|
|
|
|
|
|
from macaroon.playback import *
|
|
|
|
import utils
|
|
|
|
|
|
|
|
sequence = MacroSequence()
|
|
|
|
|
|
|
|
sequence.append(PauseAction(3000))
|
|
|
|
sequence.append(TypeAction("man cthulhu"))
|
|
|
|
sequence.append(PauseAction(3000))
|
|
|
|
|
|
|
|
sequence.append(utils.StartRecordingAction())
|
|
|
|
sequence.append(KeyComboAction("Return"))
|
|
|
|
sequence.append(PauseAction(3000))
|
|
|
|
sequence.append(utils.AssertPresentationAction(
|
|
|
|
"1. Return",
|
|
|
|
["BRAILLE LINE: ''",
|
|
|
|
" VISIBLE: '', cursor=1",
|
|
|
|
"BRAILLE LINE: ''",
|
|
|
|
" VISIBLE: '', cursor=1",
|
|
|
|
"BRAILLE LINE: ' Manual page cthulhu(1) line 1 (press h for help or q to quit)'",
|
|
|
|
" VISIBLE: '(press h for help or q to quit)', cursor=32",
|
|
|
|
"BRAILLE LINE: ' Manual page cthulhu(1) line 1 (press h for help or q to quit)'",
|
|
|
|
" VISIBLE: '(press h for help or q to quit)', cursor=32",
|
|
|
|
"SPEECH OUTPUT: 'cthulhu(1) General Commands Manual cthulhu(1)",
|
|
|
|
"",
|
|
|
|
"NAME",
|
|
|
|
" cthulhu - a scriptable screen reader",
|
|
|
|
"",
|
|
|
|
"SYNOPSIS",
|
|
|
|
" cthulhu [option...]",
|
|
|
|
"",
|
|
|
|
"DESCRIPTION",
|
|
|
|
" cthulhu is a screen reader for people with visual impairments, it provides",
|
|
|
|
" alternative access to the desktop by using speech synthesis and",
|
|
|
|
" braille.",
|
|
|
|
"",
|
|
|
|
" cthulhu works with applications and toolkits that support the Assistive",
|
|
|
|
" Technology Service Provider Interface (AT-SPI), which is the primary",
|
|
|
|
" assistive technology infrastructure for Linux and Solaris. Applications",
|
|
|
|
" and toolkits supporting the AT-SPI include the GNOME Gtk+ toolkit, the",
|
|
|
|
" Java platform's Swing toolkit, LibreOffice, Gecko, and WebKitGtk. AT-",
|
|
|
|
" SPI support for the KDE Qt toolkit is being pursued.",
|
|
|
|
"",
|
|
|
|
"OPTIONS",
|
|
|
|
" -s, --setup",
|
|
|
|
" When starting cthulhu, initiate the GUI-based configuration.",
|
|
|
|
" Manual page cthulhu(1) line 1 (press h for help or q to quit)'"]))
|
|
|
|
|
|
|
|
sequence.append(utils.StartRecordingAction())
|
|
|
|
sequence.append(KeyComboAction("space"))
|
|
|
|
sequence.append(utils.AssertPresentationAction(
|
|
|
|
"2. Space",
|
|
|
|
["BRAILLE LINE: ' Manual page cthulhu(1) line 24 (press h for help or q to quit)'",
|
|
|
|
" VISIBLE: '(press h for help or q to quit)', cursor=32",
|
|
|
|
"SPEECH OUTPUT: ' When starting cthulhu, use dirname as an alternate directory for",
|
|
|
|
" the user preferences.",
|
|
|
|
"",
|
|
|
|
" -e, --enable=speech|braille|braille-monitor",
|
|
|
|
" When starting cthulhu, force the enabling of the supplied options.",
|
|
|
|
"",
|
|
|
|
" -d, --disable=speech|braille|braille-monitor",
|
|
|
|
" When starting cthulhu, force the disabling of the supplied options.",
|
|
|
|
"",
|
|
|
|
" -l, --list-apps",
|
|
|
|
" Prints the names of all the currently running applications.",
|
|
|
|
" This is used primarily for debugging purposes to see if cthulhu can",
|
|
|
|
" talk to the accessibility infrastructure. Note that if cthulhu is",
|
|
|
|
" already running, this will not kill the other cthulhu process. It",
|
|
|
|
" will just list the currently running applications, and you will",
|
|
|
|
" see cthulhu listed twice: once for the existing cthulhu and once for",
|
|
|
|
" this instance.",
|
|
|
|
"",
|
|
|
|
" --debug",
|
|
|
|
" Enables debug output for cthulhu and sends all debug output to a",
|
|
|
|
" file with a name of the form 'debug-YYYY-MM-DD-HH:MM:SS.out' in",
|
|
|
|
" Manual page cthulhu(1) line 24 (press h for help or q to quit)'"]))
|
|
|
|
|
|
|
|
sequence.append(utils.StartRecordingAction())
|
|
|
|
sequence.append(KeyComboAction("<Control>b"))
|
|
|
|
sequence.append(utils.AssertPresentationAction(
|
|
|
|
"3. Ctrl+b",
|
|
|
|
["BRAILLE LINE: ' Manual page cthulhu(1) line 1 (press h for help or q to quit)'",
|
|
|
|
" VISIBLE: '(press h for help or q to quit)', cursor=32",
|
|
|
|
"SPEECH OUTPUT: 'cthulhu(1) General Commands Manual cthulhu(1)",
|
|
|
|
"",
|
|
|
|
"NAME",
|
|
|
|
" cthulhu - a scriptable screen reader",
|
|
|
|
"",
|
|
|
|
"SYNOPSIS",
|
|
|
|
" cthulhu [option...]",
|
|
|
|
"",
|
|
|
|
"DESCRIPTION",
|
|
|
|
" cthulhu is a screen reader for people with visual impairments, it provides",
|
|
|
|
" alternative access to the desktop by using speech synthesis and",
|
|
|
|
" braille.",
|
|
|
|
"",
|
|
|
|
" cthulhu works with applications and toolkits that support the Assistive",
|
|
|
|
" Technology Service Provider Interface (AT-SPI), which is the primary",
|
|
|
|
" assistive technology infrastructure for Linux and Solaris. Applications",
|
|
|
|
" and toolkits supporting the AT-SPI include the GNOME Gtk+ toolkit, the",
|
|
|
|
" Java platform's Swing toolkit, LibreOffice, Gecko, and WebKitGtk. AT-",
|
|
|
|
" SPI support for the KDE Qt toolkit is being pursued.",
|
|
|
|
"",
|
|
|
|
"OPTIONS",
|
|
|
|
" -s, --setup",
|
|
|
|
" When starting cthulhu, initiate the GUI-based configuration.",
|
|
|
|
" Manual page cthulhu(1) line 1 (press h for help or q to quit)'"]))
|
|
|
|
|
|
|
|
sequence.append(utils.StartRecordingAction())
|
|
|
|
sequence.append(KeyComboAction("<Control>f"))
|
|
|
|
sequence.append(utils.AssertPresentationAction(
|
|
|
|
"4. Ctrl+f",
|
|
|
|
["BRAILLE LINE: ' Manual page cthulhu(1) line 24 (press h for help or q to quit)'",
|
|
|
|
" VISIBLE: '(press h for help or q to quit)', cursor=32",
|
|
|
|
"BRAILLE LINE: ' Manual page cthulhu(1) line 24 (press h for help or q to quit)'",
|
|
|
|
" VISIBLE: '(press h for help or q to quit)', cursor=32",
|
|
|
|
"SPEECH OUTPUT: ' When starting cthulhu, use dirname as an alternate directory for",
|
|
|
|
" the user preferences.",
|
|
|
|
"",
|
|
|
|
" -e, --enable=speech|braille|braille-monitor",
|
|
|
|
" When starting cthulhu, force the enabling of the supplied options.",
|
|
|
|
"",
|
|
|
|
" -d, --disable=speech|braille|braille-monitor",
|
|
|
|
" When starting cthulhu, force the disabling of the supplied options.",
|
|
|
|
"",
|
|
|
|
" -l, --list-apps",
|
|
|
|
" Prints the names of all the currently running applications.",
|
|
|
|
" This is used primarily for debugging purposes to see if cthulhu can",
|
|
|
|
" talk to the accessibility infrastructure. Note that if cthulhu is",
|
|
|
|
" already running, this will not kill the other cthulhu process. It",
|
|
|
|
" will just list the currently running applications, and you will",
|
|
|
|
" see cthulhu listed twice: once for the existing cthulhu and once for",
|
|
|
|
" this instance.",
|
|
|
|
"",
|
|
|
|
" --debug",
|
|
|
|
" Enables debug output for cthulhu and sends all debug output to a",
|
|
|
|
" file with a name of the form 'debug-YYYY-MM-DD-HH:MM:SS.out' in",
|
|
|
|
" Manual page cthulhu(1) line 24 (press h for help or q to quit)'"]))
|
|
|
|
|
|
|
|
sequence.append(utils.StartRecordingAction())
|
|
|
|
sequence.append(KeyComboAction("b"))
|
|
|
|
sequence.append(utils.AssertPresentationAction(
|
|
|
|
"5. b",
|
|
|
|
["BRAILLE LINE: ' Manual page cthulhu(1) line 1 (press h for help or q to quit)'",
|
|
|
|
" VISIBLE: '(press h for help or q to quit)', cursor=32",
|
|
|
|
"SPEECH OUTPUT: 'cthulhu(1) General Commands Manual cthulhu(1)",
|
|
|
|
"",
|
|
|
|
"NAME",
|
|
|
|
" cthulhu - a scriptable screen reader",
|
|
|
|
"",
|
|
|
|
"SYNOPSIS",
|
|
|
|
" cthulhu [option...]",
|
|
|
|
"",
|
|
|
|
"DESCRIPTION",
|
|
|
|
" cthulhu is a screen reader for people with visual impairments, it provides",
|
|
|
|
" alternative access to the desktop by using speech synthesis and",
|
|
|
|
" braille.",
|
|
|
|
"",
|
|
|
|
" cthulhu works with applications and toolkits that support the Assistive",
|
|
|
|
" Technology Service Provider Interface (AT-SPI), which is the primary",
|
|
|
|
" assistive technology infrastructure for Linux and Solaris. Applications",
|
|
|
|
" and toolkits supporting the AT-SPI include the GNOME Gtk+ toolkit, the",
|
|
|
|
" Java platform's Swing toolkit, LibreOffice, Gecko, and WebKitGtk. AT-",
|
|
|
|
" SPI support for the KDE Qt toolkit is being pursued.",
|
|
|
|
"",
|
|
|
|
"OPTIONS",
|
|
|
|
" -s, --setup",
|
|
|
|
" When starting cthulhu, initiate the GUI-based configuration.",
|
|
|
|
" Manual page cthulhu(1) line 1 (press h for help or q to quit)'"]))
|
|
|
|
|
|
|
|
sequence.append(utils.StartRecordingAction())
|
|
|
|
sequence.append(KeyComboAction("f"))
|
|
|
|
sequence.append(utils.AssertPresentationAction(
|
|
|
|
"6. f",
|
|
|
|
["BRAILLE LINE: ' Manual page cthulhu(1) line 24 (press h for help or q to quit)'",
|
|
|
|
" VISIBLE: '(press h for help or q to quit)', cursor=32",
|
|
|
|
"SPEECH OUTPUT: ' When starting cthulhu, use dirname as an alternate directory for",
|
|
|
|
" the user preferences.",
|
|
|
|
"",
|
|
|
|
" -e, --enable=speech|braille|braille-monitor",
|
|
|
|
" When starting cthulhu, force the enabling of the supplied options.",
|
|
|
|
"",
|
|
|
|
" -d, --disable=speech|braille|braille-monitor",
|
|
|
|
" When starting cthulhu, force the disabling of the supplied options.",
|
|
|
|
"",
|
|
|
|
" -l, --list-apps",
|
|
|
|
" Prints the names of all the currently running applications.",
|
|
|
|
" This is used primarily for debugging purposes to see if cthulhu can",
|
|
|
|
" talk to the accessibility infrastructure. Note that if cthulhu is",
|
|
|
|
" already running, this will not kill the other cthulhu process. It",
|
|
|
|
" will just list the currently running applications, and you will",
|
|
|
|
" see cthulhu listed twice: once for the existing cthulhu and once for",
|
|
|
|
" this instance.",
|
|
|
|
"",
|
|
|
|
" --debug",
|
|
|
|
" Enables debug output for cthulhu and sends all debug output to a",
|
|
|
|
" file with a name of the form 'debug-YYYY-MM-DD-HH:MM:SS.out' in",
|
|
|
|
" Manual page cthulhu(1) line 24 (press h for help or q to quit)'"]))
|
|
|
|
|
|
|
|
sequence.append(utils.StartRecordingAction())
|
|
|
|
sequence.append(KeyComboAction("g"))
|
|
|
|
sequence.append(utils.AssertPresentationAction(
|
|
|
|
"7. g",
|
|
|
|
["BRAILLE LINE: ' Manual page cthulhu(1) line 1 (press h for help or q to quit)'",
|
|
|
|
" VISIBLE: '(press h for help or q to quit)', cursor=32",
|
|
|
|
"SPEECH OUTPUT: 'cthulhu(1) General Commands Manual cthulhu(1)",
|
|
|
|
"",
|
|
|
|
"NAME",
|
|
|
|
" cthulhu - a scriptable screen reader",
|
|
|
|
"",
|
|
|
|
"SYNOPSIS",
|
|
|
|
" cthulhu [option...]",
|
|
|
|
"",
|
|
|
|
"DESCRIPTION",
|
|
|
|
" cthulhu is a screen reader for people with visual impairments, it provides",
|
|
|
|
" alternative access to the desktop by using speech synthesis and",
|
|
|
|
" braille.",
|
|
|
|
"",
|
|
|
|
" cthulhu works with applications and toolkits that support the Assistive",
|
|
|
|
" Technology Service Provider Interface (AT-SPI), which is the primary",
|
|
|
|
" assistive technology infrastructure for Linux and Solaris. Applications",
|
|
|
|
" and toolkits supporting the AT-SPI include the GNOME Gtk+ toolkit, the",
|
|
|
|
" Java platform's Swing toolkit, LibreOffice, Gecko, and WebKitGtk. AT-",
|
|
|
|
" SPI support for the KDE Qt toolkit is being pursued.",
|
|
|
|
"",
|
|
|
|
"OPTIONS",
|
|
|
|
" -s, --setup",
|
|
|
|
" When starting cthulhu, initiate the GUI-based configuration.",
|
|
|
|
" Manual page cthulhu(1) line 1 (press h for help or q to quit)'"]))
|
|
|
|
|
|
|
|
sequence.append(utils.StartRecordingAction())
|
|
|
|
sequence.append(KeyComboAction("<Shift>g"))
|
|
|
|
sequence.append(utils.AssertPresentationAction(
|
|
|
|
"8. Shift+g",
|
|
|
|
["BRAILLE LINE: ' Manual page cthulhu(1) line 240/262 (END) (press h for help or q to quit)'",
|
|
|
|
" VISIBLE: 'or q to quit\)', cursor=14",
|
|
|
|
"SPEECH OUTPUT: ' ~/.local/share/cthulhu/cthulhu-scripts",
|
|
|
|
" Cthulhu user cthulhu scripts directory",
|
|
|
|
"",
|
|
|
|
" ~/.local/share/cthulhu/bookmarks",
|
|
|
|
" Cthulhu user bookmarks directory",
|
|
|
|
"",
|
|
|
|
" ~/.local/share/cthulhu/app-settings",
|
|
|
|
" Cthulhu user application specific settings directory",
|
|
|
|
"",
|
|
|
|
"AUTHOR",
|
|
|
|
" Cthulhu originated as a community effort led by the Sun Microsystems Inc.",
|
|
|
|
" Accessibility Program Office and with contributions from many community",
|
|
|
|
" members.",
|
|
|
|
"",
|
|
|
|
"SEE ALSO",
|
|
|
|
" For more information please visit cthulhu wiki at",
|
|
|
|
" <http://live.gnome.org/Cthulhu> <http://live.gnome.org/Cthulhu>",
|
|
|
|
"",
|
|
|
|
" The cthulhu mailing list <http://mail.gnome.org/mailman/listinfo/cthulhu-",
|
|
|
|
" list> To post a message to all cthulhu list, send a email to cthulhu-",
|
|
|
|
" list@gnome.org",
|
|
|
|
"",
|
|
|
|
"GNOME 20 September 2013 cthulhu(1)",
|
|
|
|
" Manual page cthulhu(1) line 240/262 (END) (press h for help or q to quit)'"]))
|
|
|
|
|
|
|
|
sequence.append(utils.AssertionSummaryAction())
|
|
|
|
sequence.start()
|