File: //proc/self/root/opt/python38/lib/python3.8/idlelib/__pycache__/config_key.cpython-38.opt-1.pyc
U
�i�_�8 � @ s� d Z ddlmZmZmZmZ ddlmZmZm Z m
Z
m Z m Z ddlm
Z
ddlZddlZdZeejej �Zed�ZdZd Zd
Zee e e e e Zd d � ZG d
d� de�Ze dkr�ddl m Z e dddd� ddl m Z e e� dS )z6
Dialog for building Tkinter accelerator key bindings
� )�Toplevel�Listbox� StringVar�TclError)�Frame�Button� Checkbutton�Entry�Label� Scrollbar)�
messageboxN) ZF1ZF2ZF3ZF4ZF5ZF6ZF7ZF8ZF9ZF10ZF11ZF12z~!@#%^&*()_-+={}[]|;:,.<>/?)�Tab�SpaceZReturn)Z BackSpaceZDeleteZInsert)ZHomeZEnd�Page Up� Page Down�
Left Arrow� Right Arrow�Up Arrow�
Down Arrowc $ C s| ddddddddd d
d d d
ddddddddddddddd d d d d d!d"d#d$�#}|� | | �} d%|krr| tjkrr| �� } d&| � �S )'z3Translate from keycap symbol to the Tkinter keysym.ZspaceZ
asciitildeZexclamZatZ
numbersign�percentZ asciicircumZ ampersandZasteriskZ parenleftZ
parenrightZ
underscoreZminusZplusZequalZ braceleftZ
bracerightZ bracketleftZ bracketrightZbarZ semicolonZcolonZcommaZperiodZlessZgreaterZslashZquestionZPriorZNextZLeftZRightZUpZDownr
)#r �~�!�@�#�%�^�&�*�(�)�_�-�+�=�{�}�[�]�|�;�:�,�.�<�>�/�?r r r r r r r
�ShiftzKey-)�get�string�ascii_lowercase�upper)�key� modifiers�mapping� r9 �1/opt/python38/lib/python3.8/idlelib/config_key.py�
translate_key sP � r; c @ s� e Zd ZdZddd�dd�Zdd� Zdd � Zd
d � Zd d
� Zd dd�Z dd� Z
dd� Z dd� Z d dd�Z
d!dd�Zdd � Zd d � ZdS )"�
GetKeysDialogzKey Sequence ErrorF)�_htest�_utestc C sB t �| |� | �� | jdd� | jddd� | �|� | �|� | �� | �d| j � || _
|| _ || _ d| _
t| �| _| j�d� | �� g | _| jD ]"}t| �}|�d� | j�|� q�d| _| �� | �� | �d|�� |�� d | �� d |� � |�s |� � d | � � d nd f � |�s>| � � | � � d
S ) a�
parent - parent of this dialog
title - string which is the title of the popup dialog
action - string, the name of the virtual event these keys will be
mapped to
current_key_sequences - list, a list of all key sequence lists
currently mapped to virtual events, for overlap checking
_htest - bool, change box location when running htest
_utest - bool, do not wait when running unittest
� )� borderwidthF)�height�widthZWM_DELETE_WINDOW� z+%d+%d� � N)!r �__init__ZwithdrawZ configureZ resizable�titleZ transientZgrab_set�protocol�cancel�parent�action�current_key_sequences�resultr �
key_string�set�set_modifiers_for_platform�
modifier_varsr7 �append�advanced�create_widgetsZupdate_idletasksZgeometryZ winfo_rootxZ winfo_widthZwinfo_reqwidthZ winfo_rootyZ winfo_heightZwinfo_reqheightZ deiconifyZ wait_window) �selfrJ rG rK rL r= r> �modifier�variabler9 r9 r: rF 0 sL
�� ���zGetKeysDialog.__init__c O s t j||� d S �N)r � showerror)rU �args�kwargsr9 r9 r: rY ` s zGetKeysDialog.showerrorc C s, t | ddd� | _}|jdddd� t | �}|jdd d
� t|d d | jd
�| _| jjddddd� t|dd | jd
�| _| jjddddd� t |dd�| _ | j jdddddd� t
| j d| j � d�d�}|jdd� t
| j d | j d dd �}|jddd d � t |�| _
| j
jddddd � i | _d}t| j| j�D ]T\}}| j�||�}t| j
| j|||d!d"�} | jd|ddd#� | | j|< |d7 }�q.t
| j
d d$d%�}
|
jddd&ddd'� t| j
d(d)d*d+�| _| jjdBt�� | j�d-| j� | jjdd&d&d.d/� t | j
d0| jj d1�} | jj | j d2� | jddd&d.d/� t| j
d3| j d4�| _!| j!jddd&d5� t |d6d�| _"| j"jdddddd� t
| j"d d7| j � d8�d9 d%�} | jdd� t#| j"| j d:�| _$| j$jd d;� t |�| _%| j%jddddd � t
| j%d d<d%�}
|
jdddd=� t|| j&d>d?�| _'| j'jddd@dddA� | �&� d S )CNrD Zsunken)r@ �relief�topTZboth)�side�expand�fillZbottom�x)r^ r` ZOK� )�textrB �commandr r? )�row�column�padx�padyZCancel� Z keyseq_basic)�nameZnsew)re rf �stickyrg rh zNew keys for 'z' :�rc �w)�anchor�leftZgroove)�justify� textvariabler\ r@ )ZipadxZipadyr` )re rf rk rg rC )rd rc rW ZonvalueZoffvalue)re rf rg rk z�Select the desired modifier keys
above, and the final key from the
list on the right.
Use upper case Symbols when using
the Shift modifier. (Letters will be
converted automatically.))rp rc � )re rf �
columnspanrg rk � �
Zsingle)rB rA Z
selectmode�endz<ButtonRelease-1>�ns)re rf Zrowspanrk Zvertical)Zorientrd )Zyscrollcommandz
Clear Keys)rc rd )re rf rs Zkeyseq_advancedzEnter new binding(s) for 'z' :
z2(These bindings will not be checked for validity!))rq )r` a� Key bindings are specified using Tkinter keysyms as
in these samples: <Control-f>, <Shift-F2>, <F12>,
<Control-space>, <Meta-less>, <Control-Alt-Shift-X>.
Upper case is used when the Shift modifier is present!
'Emacs style' multi-keystroke bindings are specified as
follows: <Control-x><Control-y>, where the first key
is the 'do-nothing' keybinding.
Multiple separate bindings for one action should be
separated by a space, eg., <Alt-v> <Meta-v>.)re rf rk �<< Basic Key Binding Entry)rd rc Zew)re rf Zstickrg rh )rv )(r �frame�packr �okZ button_okZgridrI Z
button_cancel�frame_keyseq_basicr
rK rN �frame_controls_basicZmodifier_checkbuttons�zipr7 rQ �modifier_labelr2 r �build_key_stringr �list_keys_final�insert�AVAILABLE_KEYS�bind�final_key_selectedr �yview�configrO �
clear_key_seqZ button_clear�frame_keyseq_advancedr �
advanced_keys�frame_help_advanced� toggle_level� button_level)rU ry Z
frame_buttonsZ basic_titleZ
basic_keysrf rV rW Zlabel�checkZ
help_basicZscroll_keys_finalZadvanced_titleZ
help_advancedr9 r9 r: rT d s� � � � � �
�
� ��� � �� �
�
�z GetKeysDialog.create_widgetsc C s4 t jdkrddddg| _n dddg| _ddi| _dS ) aV Determine list of names of key modifiers for this platform.
The names are used to build Tk bindings -- it doesn't matter if the
keyboard has these keys; it matters if Tk understands them. The
order is also important: key binding equality depends on it, so
config-keys.def must use the same ordering.
�darwinr1 ZControlZOptionZCommandZAltZCtrlN)�sys�platformr7 r �rU r9 r9 r: rP � s
z(GetKeysDialog.set_modifiers_for_platformc C s� | j �d��d�rN| �� | j jdd� | j�� | j�� | j� � d| _
n0| �� | j jdd� | j �� | j �� d| _
dS ) z'Toggle between basic and advanced keys.rc ZAdvancedrx rl Tz Advanced Key Binding Entry >>FN)
r� Zcget�
startswithr� r� r� Zliftr� r� Z focus_setrS r| r} r� r9 r9 r: r� � s
zGetKeysDialog.toggle_levelNc C s | � � dS )z3Handler for clicking on key in basic settings list.N)r� �rU �eventr9 r9 r: r� � s z GetKeysDialog.final_key_selectedc C sN | � � }}| j�d�}|r0t||�}|�|� | j�dd�|�� d�� dS )z2Create formatted string of modifiers plus the key.rn r- r! r. N)�
get_modifiersr� r2 r; rR rN rO �join)rU �keylistr7 � final_keyr9 r9 r: r� � s
z GetKeysDialog.build_key_stringc C s dd� | j D �}dd� |D �S )z9Return ordered list of modifiers that have been selected.c S s g | ] }|� � �qS r9 )r2 )�.0rW r9 r9 r: �
<listcomp>� s z/GetKeysDialog.get_modifiers.<locals>.<listcomp>c S s g | ] }|r|�qS r9 r9 )r� �modr9 r9 r: r� � s )rQ )rU Zmod_listr9 r9 r: r� � s zGetKeysDialog.get_modifiersc C sB | j �dd� | j �dd� | jD ]}|�d� q"| j�d� dS )z#Clear modifiers and keys selection.r rv Zmovetoz0.0rC N)r� Z select_clearr� rQ rO rN )rU rW r9 r9 r: r� � s
zGetKeysDialog.clear_key_seqc C s\ | j �� �� }|s(| j| j| dd� d S | js8| �|�rH| �|�rH|| _| � � | �
� d S )NzNo key specified.�rG rJ �message) rN r2 �striprY �keyerror_titlerS �keys_ok�bind_okrM � grab_release�destroy)rU r� �keysr9 r9 r: r{ s
�zGetKeysDialog.okc C s d| _ | �� | �� d S )NrC )rM r� r� r� r9 r9 r: rI
s zGetKeysDialog.cancelc C s� | j �d�}| �� }| j}dd� | jD �}|�d�sF| j|| dd� nt|sh|tt krh| j|| dd� nR|d gkr�|tt d
kr�d }| j|| |d� n"||kr�d }| j|| |d� nd
S dS )z�Validity check on user's 'basic' keybinding selection.
Doesn't check the string produced by the advanced dialog because
'modifiers' isn't set.
rn c S s g | ]}|D ]}|�q qS r9 r9 )r� r� r6 r9 r9 r: r� s �z)GetKeysDialog.keys_ok.<locals>.<listcomp>r. zMissing the final Key)rJ r� z No modifier key(s) specified.r� r1 )r
r zBThe shift modifier by itself may not be used with this key symbol.z'This key combination is already in use.TF) r� r2 r� r� rL �endswithrY �
FUNCTION_KEYS� MOVE_KEYS)rU r� r� r7 rG Z
key_sequences�msgr9 r9 r: r� s4
�
��
��zGetKeysDialog.keys_okc
C sj z| � |dd� �}W n@ tk
rT } z"| j| j| d|� �d� W Y �dS d}~X Y nX | �||� dS dS )z:Return True if Tcl accepts the new keys else show message.c S s d S rX r9 r9 r9 r9 r: �<lambda>4 � z'GetKeysDialog.bind_ok.<locals>.<lambda>z2The entered key sequence is not accepted.
Error: r� FNT)r� r rY r� Zunbind)rU r� Zbinding�errr9 r9 r: r� 1 s � zGetKeysDialog.bind_ok)N)N)N)�__name__�
__module__� __qualname__r� rF rY rT rP r� r� r� r� r� r{ rI r� r� r9 r9 r9 r: r< + s � 0f
r< �__main__)�mainz!idlelib.idle_test.test_config_keyrD F)� verbosity�exit)�run)!�__doc__�tkinterr r r r Z tkinter.ttkr r r r r
r r r3 r� r� �tupler4 �digitsZ
ALPHANUM_KEYSZPUNCTUATION_KEYSZWHITESPACE_KEYSZ EDIT_KEYSr� r� r; r< r� Zunittestr� Zidlelib.idle_test.htestr� r9 r9 r9 r: �<module> s6
���