Your IP : 216.73.216.85
U
i�f�8 � @ s� d Z ddlmZmZmZmZ ddlmZmZm Z m
Z
m Z m Z ddlm
Z
ddlmZ ddlZddlZdZeejej �Zed�Zd Zd
Zd Zee e e e e Zd d
� Z G dd� de�Z e 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)�
messagebox)�
_setup_dialogN) 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
numbersignZpercentZ 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 �7/opt/alt/python38/lib64/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 sJ t �| |� | �� | jdd� | jddd� | �|� | �|� t| � | �� | � d| j
� || _ || _ || _
d| _t| �| _| j�d� | �� g | _| jD ]"}t| �}|�d� | j�|� q�d| _| �� | �� | �d|�� |�� d | � � d |� � |�s$|� � d | � � d nd f � |�sF| � � | �!� 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 transientr
Zgrab_setZprotocol�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) �selfrI rG rJ rK r= r> �modifier�variabler9 r9 r: rF 1 sN
�� ���zGetKeysDialog.__init__c O s t j||� d S �N)r � showerror)rT �args�kwargsr9 r9 r: rX b 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)rd re �stickyrf rg zNew keys for 'z' :�rb �w)�anchor�leftZgroove)�justify� textvariabler[ r@ )ZipadxZipadyr_ )rd re rj rf rC )rc rb rV ZonvalueZoffvalue)rd re rf rj 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.))ro rb � )rd re �
columnspanrf rj � �
Zsingle)rB rA Z
selectmode�endz<ButtonRelease-1>�ns)rd re Zrowspanrj Zvertical)Zorientrc )Zyscrollcommandz
Clear Keys)rb rc )rd re rr Zkeyseq_advancedzEnter new binding(s) for 'z' :
z2(These bindings will not be checked for validity!))rp )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>.)rd re rj �<< Basic Key Binding Entry)rc rb Zew)rd re Zstickrf rg )ru )(r �frameZpackr �okZ button_okZgridrH Z
button_cancel�frame_keyseq_basicr
rJ rM �frame_controls_basicZmodifier_checkbuttons�zipr7 rP �modifier_labelr2 r �build_key_stringr �list_keys_final�insert�AVAILABLE_KEYS�bind�final_key_selectedr �yview�configrN �
clear_key_seqZ button_clear�frame_keyseq_advancedr �
advanced_keys�frame_help_advanced� toggle_level� button_level)rT rx Z
frame_buttonsZ basic_titleZ
basic_keysre rU rV ZlabelZcheckZ
help_basicZscroll_keys_finalZadvanced_titleZ
help_advancedr9 r9 r: rS f 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} �rT r9 r9 r: rO � 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.rb ZAdvancedrw rk Tz Advanced Key Binding Entry >>FN)
r� Zcget�
startswithr� r� r� Zliftr� r� Z focus_setrR rz r{ r� r9 r9 r: r� � s
zGetKeysDialog.toggle_levelNc C s | � � dS )z3Handler for clicking on key in basic settings list.N)r~ �rT �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.rm r- r! r. N)�
get_modifiersr r2 r; rQ rM rN �join)rT �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 )�.0rV 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 )rP )rT 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 ru Zmovetoz0.0rC N)r Z select_clearr� rP rN rM )rT rV 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 rI �message) rM r2 �striprX �keyerror_titlerR �keys_ok�bind_okrL � grab_release�destroy)rT r� �keysr9 r9 r: ry s
�zGetKeysDialog.okc C s d| _ | �� | �� d S )NrC )rL r� r� r� r9 r9 r: rH 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.
rm 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)rI 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� rK �endswithrX �
FUNCTION_KEYS� MOVE_KEYS)rT 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 rW r9 r9 r9 r9 r: �<lambda>6 � z'GetKeysDialog.bind_ok.<locals>.<lambda>z2The entered key sequence is not accepted.
Error: r� FNT)r� r rX r� Zunbind)rT r� Zbinding�errr9 r9 r: r� 3 s � zGetKeysDialog.bind_ok)N)N)N)�__name__�
__module__� __qualname__r� rF rX rS rO r� r� r~ r� r� ry rH r� r� r9 r9 r9 r: r< , s � 1f
r< �__main__)�mainz!idlelib.idle_test.test_config_keyrD F)� verbosity�exit)�run)#�__doc__Ztkinterr r r r Z tkinter.ttkr r r r r
r r Ztkinter.simpledialogr
r3 r� r� �tupler4 ZdigitsZ
ALPHANUM_KEYSZPUNCTUATION_KEYSZWHITESPACE_KEYSZ EDIT_KEYSr� r� r; r< r� Zunittestr� Zidlelib.idle_test.htestr� r9 r9 r9 r: �<module> s8
���