Mini Shell
3
�2[�5 � @ sr d Z dZdZdZdZdZddlmZ ddlmZ dd lm Z dd
lm
Z
dd lm Z dd lm Z G d
d� d�Z
dS )z3Provides an Orca-controlled caret for text content.z$Id$z
$Revision$z$Date$z$Copyright (c) 2013-2015 Igalia, S.L.ZLGPL� )�cmdnames)�debug)� input_event)� keybindings)�messages)�settings_managerc @ s� e Zd ZdZdd� Zdd� Zdd� Zdd � Zd
d � Zd d
� Z e
dd� �Z e
dd� �Z e
dd� �Z
e
dd� �Ze
dd� �Ze
dd� �Ze
dd� �Ze
d d � �Ze
d d � �Ze
d d!� �Ze
d"d#� �Zd$S )%�CaretNavigationz=Implements the caret navigation support available to scripts.c C s: |o|j s d}tjtj|� || _| j� | _| j� | _d S )Nz1INFO: Caret navigation requires a script and app.) �appr �println�
LEVEL_INFO�_script�_setup_handlers� _handlers�_setup_bindings� _bindings)�self�script�msg� r �&/usr/lib/python3.6/caret_navigation.py�__init__( s
zCaretNavigation.__init__c C s& || j j� krdS |j| jkr"dS dS )z0Returns True if handler is a navigation command.FT)r �valuesZfunction�_toggle_enabled)r Zhandlerr r r �handles_navigation1 s
z"CaretNavigation.handles_navigationc C s | j S )z)Returns the caret-navigation keybindings.)r )r r r r � get_bindings< s z CaretNavigation.get_bindingsc C s | j S )z&Returns the caret-navigation handlers.)r )r r r r � get_handlersA s z CaretNavigation.get_handlersc C s� i }| j o| j js|S tj| jtj�|d< tj| jtj�|d< tj| j tj
�|d< tj| j tj �|d< tj| j
tj�|d< tj| jtj�|d< tj| jtj�|d< tj| jtj�|d< tj| jtj�|d < tj| jtj�|d
< tj| jtj�|d < |S ) z>Sets up and returns the caret-navigation input event handlers.�toggle_enabled�next_character�previous_character� next_word�
previous_word� next_line�
previous_line�
start_of_file� end_of_file�
start_of_line� end_of_line)r r r ZInputEventHandlerr r ZCARET_NAVIGATION_TOGGLE�_next_characterZCARET_NAVIGATION_NEXT_CHAR�_previous_characterZCARET_NAVIGATION_PREV_CHAR�
_next_wordZCARET_NAVIGATION_NEXT_WORD�_previous_wordZCARET_NAVIGATION_PREV_WORD�
_next_lineZCARET_NAVIGATION_NEXT_LINE�_previous_lineZCARET_NAVIGATION_PREV_LINE�_start_of_fileZCARET_NAVIGATION_FILE_START� _end_of_fileZCARET_NAVIGATION_FILE_END�_start_of_lineZCARET_NAVIGATION_LINE_START� _end_of_lineZCARET_NAVIGATION_LINE_END)r Zhandlersr r r r
F sJ z CaretNavigation._setup_handlersc C s� t j� }| jo| jjs|S |jt jdt jt j| jj d��� |jt jdt jt j
| jj d��� |jt jdt jt j
| jj d��� |jt jdt jt j | jj d��� |jt jdt jt j | jj d��� |jt jd t jt j
| jj d
��� |jt jd t jt j
| jj d ��� |jt jd
t jt j
| jj d��� |jt jdt jt j
| jj d��� |jt jd
t jt j | jj d��� |jt jdt jt j | jj d��� |S )z6Sets up and returns the caret-navigation key bindings.ZF12r ZRightr ZLeftr r r ZDownr! ZUpr" ZEndr& ZHomer% r$ r# ) r Z KeyBindingsr r �addZ
KeyBindingZdefaultModifierMaskZORCA_MODIFIER_MASKr �getZNO_MODIFIER_MASKZCTRL_MODIFIER_MASK)r Zbindingsr r r r � s� z CaretNavigation._setup_bindingsc C sH |sdS t j� }|jd� }|r(tj}ntj}| j|� |jd|� dS )zToggles caret navigation.FZcaretNavigationEnabledT)r �
getManager�
getSettingr ZCARET_CONTROL_ORCAZCARET_CONTROL_APPZpresentMessageZ
setSetting)r �event�_settings_managerZenabled�stringr r r r � s
z CaretNavigation._toggle_enabledc C sD |sdS | j j� \}}|s dS | j j||� | j|� | j|� dS )z Moves to the next character.FT)� utilities� nextContext�setCaretPosition�
updateBraille� sayCharacter)r r5 �obj�offsetr r r r' � s
z CaretNavigation._next_characterc C sD |sdS | j j� \}}|s dS | j j||� | j|� | j|� dS )z Moves to the previous character.FT)r8 �previousContextr: r; r< )r r5 r= r> r r r r( s
z#CaretNavigation._previous_characterc C s� |sdS | j jdd�\}}| j j||�}|s0dS |d d |d d |d
d }}}|rr|d j� rr|d8 }| j j||� | j|� | j|� dS ) zMoves to the next word.FT)� skipSpacer � � � ���rD rD rD )r8 r9 �getWordContentsAtOffset�isalnumr: r; �sayWord)r r5 r= r> �contents�endr7 r r r r) s (
zCaretNavigation._next_wordc C sp |sdS | j jdd�\}}| j j||�}|s0dS |d d |d d }}| j j||� | j|� | j|� dS )zMoves to the previous word.FT)r@ rA r )r8 r? rE r: r; rG )r r5 r= r> rH �startr r r r* % s
z CaretNavigation._previous_wordc C s� |sdS | j � r8tj� }|jd�r8d}tjtj|� dS | jj� }|sJdS |d d |d d }}| jj ||� | j
|� | j |� dS )zMoves to the next line.F� rewindAndFastForwardInSayAllz:INFO: inSayAll and rewindAndFastforwardInSayAll is enabledTrA r ) �inSayAllr r3 r4 r r
r r8 ZgetNextLineContentsr: �
speakContents�displayContents)r r5 r6 r rH r= rJ r r r r+ 7 s
zCaretNavigation._next_linec C s� |sdS | j � r8tj� }|jd�r8d}tjtj|� dS | jj� }|sJdS |d d |d d }}| jj ||� | j
|� | j |� dS )zMoves to the previous line.FrK z:INFO: inSayAll and rewindAndFastforwardInSayAll is enabledTrA r ) rL r r3 r4 r r
r r8 ZgetPreviousLineContentsr: rM rN )r r5 r6 r rH r= rJ r r r r, O s
z CaretNavigation._previous_linec C st |sdS | j j� \}}| j j||�}|o.|d s4dS |d d |d d }}| j j||� | j|� | j|� dS )z Moves to the start of the line.FrA r T)r8 �getCaretContext�getLineContentsAtOffsetr: r< rN )r r5 r= r> �linerJ r r r r/ h s
z CaretNavigation._start_of_linec C s� |sdS | j j� \}}| j j||�}|o.|d s4dS |d d |d d |d d }}}|j� rx|d
j� rx|d8 }| j j||� | j|� | j|� dS ) z Moves to the end of the line.FrA r rB rC TrD rD rD rD )r8 rO rP �strip�isspacer: r< rN )r r5 r= r> rQ rI r7 r r r r0 z s (
z CaretNavigation._end_of_linec C sz |sdS | j j� }| j j|d�\}}| j j||�}|s:dS |d d |d d }}| j j||� | j|� | j|� dS )z Moves to the start of the file.FrA r T)r8 �
documentFrameZfindFirstCaretContextrP r: rM rN )r r5 �documentr= r> rH r r r r- � s
z CaretNavigation._start_of_filec C s� |sdS | j j� }| j j|�}d}| j j|�}|r<|jd }x*|rf| j j||�\}}|sZP || }}q>W | j j||�}|s~dS |d d |d d }}| j j||� | j|� | j |� dS )z Moves to the end of the file.FrA r rB TrD rD )
r8 rT ZgetLastObjectInDocumentZqueryNonEmptyTextZcharacterCountr9 rP r: rM rN ) r r5 rU r= r> �textZlastobjZ
lastoffsetrH r r r r. � s*
z CaretNavigation._end_of_fileN)�__name__�
__module__� __qualname__�__doc__r r r r r
r � staticmethodr r' r( r) r* r+ r, r/ r0 r- r. r r r r r % s$ AW r N)rZ Z__id__� __version__Z__date__Z
__copyright__Z __license__� r r r r r r r r r r r �<module> s