File: //usr/local/lib/python3.10/idlelib/__pycache__/config_key.cpython-310.opt-1.pyc
o
�i~; � @ 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 G dd� de�Z e dkr�ddl m!Z! e!dddd� ddl"m#Z# e#e$� dS 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 i dd�dd�dd�dd�d d
�d d �d
d�dd�dd�dd�dd�dd�dd�dd �d d �d d �d!d"�i d#d$�d%d&�d'd(�d)d*�d+d,�d-d.�d/d0�d1d2�d3d4�d5d6�d7d8�d9d:�d;d<�d=d>�d?d@�dAdB�dCdD��dEdEi�}|� | | �} dF|v r�| tjv r�| �� } dG| � �S )Hz3Translate from keycap symbol to the Tkinter keysym.r �space�~Z
asciitilde�!Zexclam�@Zat�#Z
numbersign�%�percent�^Z asciicircum�&Z ampersand�*Zasterisk�(Z parenleft�)Z
parenright�_Z
underscore�-Zminus�+Zplus�=Zequal�{Z braceleft�}Z
braceright�[Z bracketleft�]Z bracketright�|Zbar�;Z semicolon�:�colon�,Zcomma�.Zperiod�<Zless�>Zgreater�/Zslash�?Zquestionr ZPriorr ZNextr ZLeftr ZRightr ZUpr ZDownr �ShiftzKey-)�get�string�ascii_lowercase�upper)�key� modifiers�mapping� r< �//usr/local/lib/python3.10/idlelib/config_key.py�
translate_key s� ��������������������������� � �
�
� � � �
r> c sz e Zd ZdZ� fdd�Zdd� Zdd� Zdd � Zd
d � Zdd
d�Z dd� Z
dd� Z dd� Z dd� Z
dd� Zdd� Z� ZS ) � GetKeysFramezKey Sequence Errorc s� t � �|� d| d< d| d< || _|| _|| _d| _t| �| _| j�d� | � � g | _
| j D ]}t| �}|�d� | j
� |� q/d| _
| �� dS )a
parent - parent of this dialog
action - the name of the virtual event these keys will be
mapped to
current_key_sequences - a list of all key sequence lists
currently mapped to virtual events, for overlap checking
� � borderwidthZsunken�relief� FN)�super�__init__�parent�action�current_key_sequences�resultr �
key_string�set�set_modifiers_for_platform�
modifier_varsr: �append�advanced�create_widgets)�selfrF rG rH �modifier�variable�� __class__r< r= rE 1 s"
zGetKeysFrame.__init__c O s t j|i |�� d S �N)r � showerror)rQ �args�kwargsr< r< r= rW L s zGetKeysFrame.showerrorc C s� t | dd�| _| jjdddddd� t| jd| j� d�d �}|jd
d � t| jd | jd
dd�}|jdddd� t | �| _| jjddddd� i | _d}t | j
| j �D ])\}}| j �
||�}t| j| j|||dd�}|jd|dd
d� || j|< |d7 }qRt| jd dd�}|jddddd
d� t| jdd d d �| _| jjd gt�R � | j�d | j� | jjdddd!d"� t| jd#| jjd$�} | jj| jd%� | jdddd!d"� t| jd&| jd'�| _ | j jdddd(� t | d)d�| _ | j jdddddd� t| j d d*| j� d+�d, d�}
|
jd
d � t | j | jd-�| _ | j jdd.� t | �| _ | j jddddd� t| j d d/d�} | jdddd0� t| | j!d1d2�| _"| j"jddd3ddd4� | �!� d S )5NZ keyseq_basic)�namer Znsew� )�row�column�sticky�padx�padyzNew keys for 'z' :��text�w)�anchor�leftZgroover@ )�justify� textvariablerB rA �x)ZipadxZipady�fill� )r\ r] r^ r_ rC )�commandrb rS ZonvalueZoffvalue)r\ r] r_ r^ 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.))rf rb � )r\ r] �
columnspanr_ r^ � �
Zsingle)�width�heightZ
selectmode�endz<ButtonRelease-1>�ns)r\ r] Zrowspanr^ Zvertical)Zorientrk )Zyscrollcommandz
Clear Keys)rb rk )r\ r] rm Zkeyseq_advancedzEnter new binding(s) for 'z' :
z2(These bindings will not be checked for validity!))rg )ri 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>.)r\ r] r^ �<< Basic Key Binding Entry)rk rb Zew)r\ r] Zstickr_ r` )#r �frame_keyseq_basic�gridr
rG �packrJ �frame_controls_basicZmodifier_checkbuttons�zipr: rM �modifier_labelr5 r �build_key_stringr �list_keys_final�insert�AVAILABLE_KEYS�bind�final_key_selectedr �yview�configrK r �
clear_key_seqZ button_clear�frame_keyseq_advancedr �
advanced_keys�frame_help_advanced� toggle_level� button_level) rQ Z basic_titleZ
basic_keysr] rR rS Zlabel�checkZ
help_basicZscroll_keys_finalZadvanced_titleZ
help_advancedr< r< r= rP P s� � � �
�
���� � �� �
�
� zGetKeysFrame.create_widgetsc C s. t jdkr g d�| _ng d�| _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.
�darwin)r4 �ControlZOptionZCommand)r� ZAltr4 r� ZCtrlN)�sys�platformr: rz �rQ r< r< r= rL � s
z'GetKeysFrame.set_modifiers_for_platformc C s� | j �d��d�r(| �� | j jdd� | j�� | j�� | j� � d| _
dS | �� | j jdd� | j �� | j �� d| _
dS ) z'Toggle between basic and advanced keys.rb ZAdvancedrt ra Tz Advanced Key Binding Entry >>FN)
r� Zcget�
startswithr� r� r� Zliftr� r� Z focus_setrO ru rx r� r< r< r= r� � s
zGetKeysFrame.toggle_levelNc C s | � � dS )z3Handler for clicking on key in basic settings list.N)r{ �rQ �eventr< r< r= r� � � z GetKeysFrame.final_key_selectedc C sN | � � }}| j�d�}|rt||�}|�|� | j�dd�|�� d�� dS )z2Create formatted string of modifiers plus the key.rd r0 r# r1 N)�
get_modifiersr| r5 r> rN rJ rK �join)rQ �keylistr: � final_keyr< r< r= r{ � s
z GetKeysFrame.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 r< )r5 )�.0rS r< r< r= �
<listcomp>� � z.GetKeysFrame.get_modifiers.<locals>.<listcomp>c S s g | ]}|r|�qS r< r< )r� �modr< r< r= r� � r� )rM )rQ Zmod_listr< r< r= r� � s zGetKeysFrame.get_modifiersc C sB | j �dd� | j �dd� | jD ]}|�d� q| j�d� dS )z#Clear modifiers and keys selection.r rr Zmovetoz0.0rC N)r| Z select_clearr� rM rK rJ )rQ rS r< r< r= r� � s
zGetKeysFrame.clear_key_seqc C sR d| _ | j�� �� }|s| j| j| dd� d S | js | �|�r'| �|�r'|| _ d S )NrC zNo key specified.��titlerF �message) rI rJ r5 �striprW �keyerror_titlerO �keys_ok�bind_ok)rQ �keysr< r< r= �ok� s
�zGetKeysFrame.okc C s� | j �d�}| �� }| j}dd� | jD �}|�d�s$| j|| dd� dS |s6|tt vr6| j|| dd� dS |d gkrO|tt d
vrOd }| j|| |d� dS ||v r_d }| j|| |d� dS d
S )z�Validity check on user's 'basic' keybinding selection.
Doesn't check the string produced by the advanced dialog because
'modifiers' isn't set.
rd c S s g | ] }|D ]}|�qqS r< r< )r� r� r9 r< r< r= r� � s
�
�z(GetKeysFrame.keys_ok.<locals>.<listcomp>r1 zMissing the final Key)rF r� z No modifier key(s) specified.r� r4 )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| r5 r� r� rH �endswithrW �
FUNCTION_KEYS� MOVE_KEYS)rQ r� r� r: r� Z
key_sequences�msgr< r< r= r� � s6
�� �
�
���zGetKeysFrame.keys_okc
C sd z
| � |dd� �}W n ty) } z| j| j| d|� �d� W Y d}~dS d}~ww | �||� dS )z:Return True if Tcl accepts the new keys else show message.c S s d S rV r< r< r< r< r= �<lambda> s z&GetKeysFrame.bind_ok.<locals>.<lambda>z2The entered key sequence is not accepted.
Error: r� NFT)r r rW r� Zunbind)rQ r� Zbinding�errr< r< r= r� s ���� zGetKeysFrame.bind_okrV )�__name__�
__module__� __qualname__r� rE rW rP rL r� r� r{ r� r� r� r� r� �
__classcell__r< r< rT r= r? , s Y
r? c sR e Zd Zddd�� fdd�
Zedd� �Zejdd� �Zd
d d
�Zd
d d �Z� Z S )�
GetKeysWindowF)�_htest�_utestc sf t � �|� | �� d| d< | jddd� | �� |�� |�� d | �� d }|�� |s:|� � d | �
� d nd }| � d|� d|� �� | � |� t
| ||� | _} | �d| j� t| �}
t|
d d
| jd �| _t|
d d
| jd �| _| jjd
d
ddd� | jjd
dddd� | jdddd� |
jddd� | �|� t| � | �� |s�| �� | � � dS dS )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
r[ rA F)rq rp r@ � r$ ZWM_DELETE_WINDOWZOK� )rb rp rk ZCancelr )r\ r] r_ r` rj �topTZboth)�side�expandri Zbottomrh )r� ri N) rD rE ZwithdrawZ resizableZupdate_idletasksZ winfo_rootxZ winfo_widthZwinfo_reqwidthZ winfo_rootyZ winfo_heightZwinfo_reqheightZgeometryr� r? �frame�protocol�cancelr r r� Z button_okZ
button_cancelrv rw Z transientr
Zgrab_setZ deiconifyZ wait_window) rQ rF r� rG rH r� r� rh �yr� Z
frame_buttonsrT r< r= rE sF ���
��
�zGetKeysWindow.__init__c C s | j jS rV �r� rI r� r< r< r= rI J s zGetKeysWindow.resultc C s || j _d S rV r� )rQ �valuer< r< r= rI N r� Nc C s | j �� | �� | �� d S rV )r� r� � grab_release�destroyr� r< r< r= r� R s
zGetKeysWindow.okc C s d| _ | �� | �� d S )NrC )rI r� r� r� r< r< r= r� W s zGetKeysWindow.cancelrV )
r� r� r� rE �propertyrI �setterr� r� r� r< r< rT r= r� s �.
r� �__main__)�mainz!idlelib.idle_test.test_config_keyr@ F)� verbosity�exit)�run)%�__doc__�tkinterr r r r Z tkinter.ttkr r r r r
r r Ztkinter.simpledialogr
r6 r� r� �tupler7 �digitsZ
ALPHANUM_KEYSZPUNCTUATION_KEYSZWHITESPACE_KEYSZ EDIT_KEYSr� r~ r> r? r� r� Zunittestr� Zidlelib.idle_test.htestr� Z
GetKeysDialogr< r< r< r= �<module> s<
��� oC �