Your IP : 216.73.217.32
a
XC?h�O � @ s� d dl Z d dlZd dlmZmZmZmZmZmZ d dl Z
dZ e� dk rJe Z e
Ze� dd� dkrdeZe� ZG dd� de�ZG dd � d �ZG d
d � d �ZG d d
� d
�Zdd� Zdd� ZdS )� N)�AbstractTkTest� tcl_version� requires_tcl�get_tk_patchlevel� pixels_conv�
tcl_obj_eqF)� � � � c @ s� e Zd Zee�ZdZdZedd� �Z dd� Z
de j fdd�Z
eddd �d
d �Zd0d d
�dd�Zdd� Zdd� Zed�dd�Zdd� Zdd�dd�Zd d � Zd d � Zdd �d!d"�Zdd d#�d$d%�Zd&d'� Zd(d)� Z d*d+� Z d,d-� Z d.d/� Z dS )1�AbstractWidgetTestNFc C s: z| j W S ty4 t| j�dd��| _ | j Y S 0 d S )N�tk�scaling)Z_scaling�AttributeError�float�root�call)�self� r �>/opt/alt/python39/lib64/python3.9/tkinter/test/widget_tests.pyr s
zAbstractWidgetTest.scalingc C s< | j s| jrtdkr|S t|t�r4d�t| j|��S t|�S )N�r � � ) �
_stringify� wantobjectsr �
isinstance�tuple�join�map�_str�str)r �valuer r r r $ s
zAbstractWidgetTest._strc C s |||�rd S | � |||� d S �N)� assertEqual)r Zactual�expected�msg�eqr r r � assertEqual2+ s
z AbstractWidgetTest.assertEqual2)r$ �convr& c C s� |||< |t u r|}|r ||�}| js,| jsJt|t�rBt�|�}nt|�}|d u rVt}| j || ||d� | j |�
|�||d� |� |�}| � t
|�d� | j |d ||d� d S )N)r& r � )� _sentinelr r r r �tkinterZ_joinr r r' Zcget� configurer# �len)r �widget�namer! r$ r( r& �tr r r �
checkParam0 s
z AbstractWidgetTest.checkParamT)� keep_origc C s� || }|d ur|� |�}| �tj��}|||< W d � n1 sD0 Y |d urh| �t|j�|� |r~| �|| |� n|||< | �tj�� }|�||i� W d � n1 s�0 Y |d ur�| �t|j�|� |r�| �|| |� n|||< d S r" )�formatZ assertRaisesr+ ZTclErrorr# r Z exceptionr, )r r. r/ r! �errmsgr2 Zorig�cmr r r �checkInvalidParamD s"
&,z$AbstractWidgetTest.checkInvalidParamc O s$ |D ]}| j |||fi |�� qd S r" )r1 )r r. r/ �values�kwargsr! r r r � checkParamsZ s z AbstractWidgetTest.checkParamsc O sT | j ||g|�R i |�� | j||ddd� | j||ddd� | j||ddd� d S )N� zexpected integer but got ""�r4 �10pz expected integer but got "10p"g������ @z expected integer but got "3.2"�r9 r6 )r r. r/ r7 r8 r r r �checkIntegerParam^ s
�
�
�z$AbstractWidgetTest.checkIntegerParam�r( c O sL |D ] }| j |||fd|i|�� q| j||ddd� | j||ddd� d S )Nr( r: z)expected floating-point number but got ""r; �spamz-expected floating-point number but got "spam"�r1 r6 )r r. r/ r( r7 r8 r! r r r �checkFloatParamg s
�
�z"AbstractWidgetTest.checkFloatParamc C s` dD ]}| j |||dd� qdD ]}| j |||dd� q | j||ddd� | j||d d
d� d S ) N)Fr ZfalseZnoZoffr )r$ )T� �trueZyesZonrC r: z!expected boolean value but got ""r; r@ z%expected boolean value but got "spam"rA )r r. r/ r! r r r �checkBooleanParamo s
�
�z$AbstractWidgetTest.checkBooleanParam)� allow_emptyc
K s> | j ||ddddddddd d
f i |�� | j||d d d
� d S )Nz#ff0000z#00ff00z#0000ffz#123456ZredZgreenZblueZwhiteZblackZgreyr@ zunknown color name "spam"r; r= )r r. r/ rF r8 r r r �checkColorParamy s ��
�z"AbstractWidgetTest.checkColorParamc K sH | j ||ddddfi |�� tdkr2| �||d� | j||ddd � d S )
NZarrowZwatchZcrossr: )r r �noner@ zbad cursor spec "spam"r; )r9 r r1 r6 )r r. r/ r8 r r r �checkCursorParam� s
�z#AbstractWidgetTest.checkCursorParamc C s0 dd� }|||< | � || � | �||d� d S )Nc W s d S r" r )�argsr r r �command� s z5AbstractWidgetTest.checkCommandParam.<locals>.commandr: )Z
assertTruer9 )r r. r/ rK r r r �checkCommandParam� s z$AbstractWidgetTest.checkCommandParamr; c O s� | j ||g|�R i |�� |d u rrd|d�|d d� �t|�dkrFdnd|d f }| j||dd| d� d | }| j||d
|d� d S ) Nz %s "{}": must be %s%s or %sz, ���� �,r: Z ambiguousr; Zbadr@ )r9 r r- r6 )r r. r/ r4 r7 r8 Zerrmsg2r r r �checkEnumParam� s �
�z!AbstractWidgetTest.checkEnumParam)r( r2 c
O s� |d u r| j }|D ]P}t}|} t|t�rF| rF| turFt|�| j }t} | j|||f|| d�|�� q| j||dd|d� | j||dd|d� d S )N�r$ r( Z6xzbad screen distance "6x")r4 r2 r@ zbad screen distance "spam") � _conv_pixelsr* r r r r �roundr1 r6 )
r r. r/ r( r2 r7 r8 r! r$ Zconv1r r r �checkPixelsParam� s(
��
�
�z#AbstractWidgetTest.checkPixelsParamc
C s> | � ||dddddd� d}tdk r(d }| j||d |d
� d S ) NZflatZgrooveZraisedZridgeZsolidZsunkenzHbad relief "spam": must be flat, groove, raised, ridge, solid, or sunkenr r@ r; )r9 r r6 )r r. r/ r4 r r r �checkReliefParam� s �
�z#AbstractWidgetTest.checkReliefParamc C s@ t j| jdd�}| j|||td� | j||ddd� d||< d S )NZimage1)Zmasterr/ r? r@ zimage "spam" doesn't existr; r: )r+ Z
PhotoImager r1 r r6 )r r. r/ �imager r r �checkImageParam� s
�z"AbstractWidgetTest.checkImageParamc C s | j |||td� d S )Nr? )r1 r )r r. r/ �varr r r �checkVariableParam� s z%AbstractWidgetTest.checkVariableParamc C s^ | � |� | �|t� t|�dkr2| �d|f � |D ]"}t|t�s6| �d|f � qZq6d S )Nr) zInvalid bounding box: %r)ZassertIsNotNoneZassertIsInstancer r- Zfailr �int)r Zbbox�itemr r r �assertIsBoundingBox� s
z&AbstractWidgetTest.assertIsBoundingBoxc C s� | � � }|�� }| �t|�t|�� �� |D ] }|| q,tjjr�dddddd�}t|�}t| j �}t|| �D ]8}||v r�|| |v r�|| |v spt
d| j j |f � qpd S )N� borderwidth�
background�
foregroundZinvalidcommandZvalidatecommand)�bd�bg�fgZinvcmdZvcmdz %s.OPTIONS doesn't contain "%s")
�create�keysr# �sortedr, �test�support�verbose�set�OPTIONS�print� __class__�__name__)r r. rd �k�aliasesr$ r r r � test_keys� s.
�
�
�
�z AbstractWidgetTest.test_keys)N) rm �
__module__� __qualname__� staticmethod� pixels_roundrR �_conv_pad_pixelsr �propertyr r �object�__eq__r' r* r1 r6 r9 r> r rB rE rG rI rL rP rT rU rW rY r\ rp r r r r r s8
� �
�
r c @ s� e Zd ZdZdd� Zdd� Zdd� Zdd � Zd
d � Zd d
� Z dd� Z
dd� Z dd� Z dd� Z
dd� Zdd� Zdd� Zd d � Zd d � Zd d!� Zd"d#� Zd$d%� Zd&d'� Zd(d)� Zd*d+� Zd,d-� Zd.d/� Zd0d1� Zd2d3� Z d4d5� Z d6d7� Z d8d9� Z d:d;� Z d<d=� Z!d>d?� Z"d@dA� Z#dBdC� Z$dDdE� Z%dFdG� Z&dHdI� Z'dJdK� Z(dLdM� Z)dNdO� Z*dPdQ� Z+dRdS� Z,dTdU� Z-dVdW� Z.dXdY� Z/dZd[� Z0d\d]� Z1d^d_� Z2d`da� Z3dbdc� Z4e5ddde�dfdg� �Z6e5ddde�dhdi� �Z7djdk� Z8dlS )m�StandardOptionsTests)*�activebackground�activeborderwidth�activeforeground�anchorr^ �bitmapr] �compound�cursor�disabledforeground�exportselection�fontr_ �highlightbackground�highlightcolor�highlightthicknessrV �insertbackground�insertborderwidth�
insertofftime� insertontime� insertwidth�jump�justify�orient�padx�pady�relief� repeatdelay�repeatinterval�selectbackground�selectborderwidth�selectforeground�setgrid� takefocus�text� textvariable� troughcolor� underline�
wraplength�xscrollcommand�yscrollcommandc C s | � � }| �|d� d S )Nrz �rc rG �r r. r r r � test_configure_activebackground� s z4StandardOptionsTests.test_configure_activebackgroundc
C s$ | � � }| �|ddddddd� d S )Nr{ r ��������?g333333@r ���r< �rc rT r� r r r � test_configure_activeborderwidth� s �z5StandardOptionsTests.test_configure_activeborderwidthc C s | � � }| �|d� d S )Nr| r� r� r r r � test_configure_activeforeground� s z4StandardOptionsTests.test_configure_activeforegroundc
C s* | � � }| �|ddddddddd d
� d S ) Nr} �n�ne�eZse�s�sw�wZnw�center�rc rP r� r r r �test_configure_anchor s �z*StandardOptionsTests.test_configure_anchorc C s. | � � }| �|d� d| jv r*| �|d� d S )Nr^ ra �rc rG rj r� r r r �test_configure_background s
z.StandardOptionsTests.test_configure_backgroundc C s~ | � � }| �|dd� | �|dd� tjjddd�}| �|dd| � d| jj�d d
�v rhd | j�� v sz| j |dd d
d� d S )Nr~ Z questheadZgray50z
python.xbmZ
imghdrdata)Zsubdir�@Zaquar
ZwindowingsystemZAppKitr@ zbitmap "spam" not definedr; )
rc r1 rf rg Zfindfiler r
r Z winfo_serverr6 )r r. �filenamer r r �test_configure_bitmap
s �
�z*StandardOptionsTests.test_configure_bitmapc
C sF | � � }| �|ddddddd� d| jv rB| �|ddddddd� d S ) Nr] r r� �������@r r� r< r` )rc rT rj r� r r r �test_configure_borderwidth s �
z/StandardOptionsTests.test_configure_borderwidthc
C s$ | � � }| �|ddddddd� d S )Nr Zbottomr� �leftrH �right�topr� r� r r r �test_configure_compound! s �z,StandardOptionsTests.test_configure_compoundc C s | � � }| �|d� d S )Nr� )rc rI r� r r r �test_configure_cursor& s z*StandardOptionsTests.test_configure_cursorc C s | � � }| �|d� d S )Nr� r� r� r r r �!test_configure_disabledforeground* s z6StandardOptionsTests.test_configure_disabledforegroundc C s | � � }| �|d� d S )Nr� �rc rE r� r r r � test_configure_exportselection. s z3StandardOptionsTests.test_configure_exportselectionc C s, | � � }| �|dd� | j|dddd� d S )Nr� z3-Adobe-Helvetica-Medium-R-Normal--*-120-*-*-*-*-*-*r: zfont "" doesn't existr; )rc r1 r6 r� r r r �test_configure_font2 s �
�z(StandardOptionsTests.test_configure_fontc C s. | � � }| �|d� d| jv r*| �|d� d S )Nr_ rb r� r� r r r �test_configure_foreground9 s
z.StandardOptionsTests.test_configure_foregroundc C s | � � }| �|d� d S )Nr� r� r� r r r �"test_configure_highlightbackground? s z7StandardOptionsTests.test_configure_highlightbackgroundc C s | � � }| �|d� d S )Nr� r� r� r r r � test_configure_highlightcolorC s z2StandardOptionsTests.test_configure_highlightcolorc C s8 | � � }| �|dddddd� | j|ddd| jd� d S ) Nr� r r� r� r r< r� rQ )rc rT r1 rR r� r r r �!test_configure_highlightthicknessG s
� �z6StandardOptionsTests.test_configure_highlightthicknessc C s | � � }| �|d� d S )NrV �rc rW r� r r r �test_configure_imageN s z)StandardOptionsTests.test_configure_imagec C s | � � }| �|d� d S )Nr� r� r� r r r � test_configure_insertbackgroundR s z4StandardOptionsTests.test_configure_insertbackgroundc
C s$ | � � }| �|ddddddd� d S )Nr� r r� r� r r� r< r� r� r r r � test_configure_insertborderwidthV s �z5StandardOptionsTests.test_configure_insertborderwidthc C s | � � }| �|dd� d S )Nr� �d �rc r> r� r r r � test_configure_insertofftime[ s z1StandardOptionsTests.test_configure_insertofftimec C s | � � }| �|dd� d S )Nr� r� r� r� r r r �test_configure_insertontime_ s z0StandardOptionsTests.test_configure_insertontimec C s | � � }| �|ddddd� d S )Nr� r� r� r� r< r� r� r r r �test_configure_insertwidthc s z/StandardOptionsTests.test_configure_insertwidthc C s | � � }| �|d� d S )Nr� r� r� r r r �test_configure_jumpg s z(StandardOptionsTests.test_configure_jumpc C s4 | � � }| j|dddddd� | j|dddd� d S ) Nr� r� r� r� z6bad justification "{}": must be left, right, or centerr; r: z:ambiguous justification "": must be left, right, or center)rc rP r6 r� r r r �test_configure_justifyk s �
�z+StandardOptionsTests.test_configure_justifyc C s2 | � � }| �t|d �| j� | �|ddd� d S )Nr� Z
horizontalZvertical)rc r# r Zdefault_orientrP r� r r r �test_configure_orientt s z*StandardOptionsTests.test_configure_orientc
C s( | � � }| j|dddddd| jd� d S )Nr� r 皙����@�ffffff@r� �12mr? �rc rT ru r� r r r �test_configure_padxy s �z(StandardOptionsTests.test_configure_padxc
C s( | � � }| j|dddddd| jd� d S )Nr� r r� r� r� r� r? r� r� r r r �test_configure_pady~ s �z(StandardOptionsTests.test_configure_padyc C s | � � }| �|d� d S )Nr� �rc rU r� r r r �test_configure_relief� s z*StandardOptionsTests.test_configure_reliefc C s | � � }| �|ddd� d S )Nr� � ����� r� r� r r r �test_configure_repeatdelay� s z/StandardOptionsTests.test_configure_repeatdelayc C s | � � }| �|ddd� d S )Nr� r� r� r� r� r r r � test_configure_repeatinterval� s z2StandardOptionsTests.test_configure_repeatintervalc C s | � � }| �|d� d S )Nr� r� r� r r r � test_configure_selectbackground� s z4StandardOptionsTests.test_configure_selectbackgroundc C s | � � }| �|ddddd� d S )Nr� r� r� r� r< r� r� r r r � test_configure_selectborderwidth� s z5StandardOptionsTests.test_configure_selectborderwidthc C s | � � }| �|d� d S )Nr� r� r� r r r � test_configure_selectforeground� s z4StandardOptionsTests.test_configure_selectforegroundc C s | � � }| �|d� d S )Nr� r� r� r r r �test_configure_setgrid� s z+StandardOptionsTests.test_configure_setgridc C s | � � }| �|dddd� d S )N�stateZactiveZdisabledZnormalr� r� r r r �test_configure_state� s z)StandardOptionsTests.test_configure_statec C s | � � }| �|dddd� d S )Nr� �0�1r: �rc r9 r� r r r �test_configure_takefocus� s z-StandardOptionsTests.test_configure_takefocusc C s | � � }| �|ddd� d S )Nr� r: z
any stringr� r� r r r �test_configure_text� s z(StandardOptionsTests.test_configure_textc C s& | � � }t�| j�}| �|d|� d S )Nr� )rc r+ Z StringVarr rY �r r. rX r r r �test_configure_textvariable� s z0StandardOptionsTests.test_configure_textvariablec C s | � � }| �|d� d S )Nr� r� r� r r r �test_configure_troughcolor� s z/StandardOptionsTests.test_configure_troughcolorc C s | � � }| �|dddd� d S )Nr� r rC �
r� r� r r r �test_configure_underline� s z-StandardOptionsTests.test_configure_underlinec C s | � � }| �|dd� d S )Nr� r� r� r� r r r �test_configure_wraplength� s z.StandardOptionsTests.test_configure_wraplengthc C s | � � }| �|d� d S )Nr� �rc rL r� r r r � test_configure_xscrollcommand� s z2StandardOptionsTests.test_configure_xscrollcommandc C s | � � }| �|d� d S )Nr� r� r� r r r � test_configure_yscrollcommand� s z2StandardOptionsTests.test_configure_yscrollcommandc C s | � � }| �|d� d S )NrK r� r� r r r �test_configure_command� s z+StandardOptionsTests.test_configure_commandc C s | � � }| �|d� d S )NZ indicatoronr� r� r r r �test_configure_indicatoron� s z/StandardOptionsTests.test_configure_indicatoronc C s | � � }| �|d� d S )NZ offreliefr� r� r r r �test_configure_offrelief� s z-StandardOptionsTests.test_configure_offreliefc C s | � � }| �|d� d S )NZ
overreliefr� r� r r r �test_configure_overrelief� s z.StandardOptionsTests.test_configure_overreliefc C s | � � }| �|d� d S )NZ selectcolorr� r� r r r �test_configure_selectcolor� s z/StandardOptionsTests.test_configure_selectcolorc C s | � � }| �|d� d S )NZ selectimager� r� r r r �test_configure_selectimage� s z/StandardOptionsTests.test_configure_selectimager r c C s | � � }| �|d� d S )NZ
tristateimager� r� r r r � test_configure_tristateimage� s z1StandardOptionsTests.test_configure_tristateimagec C s | � � }| �|dd� d S )NZ
tristatevalueZ
unknowable)rc r1 r� r r r � test_configure_tristatevalue� s z1StandardOptionsTests.test_configure_tristatevaluec C s& | � � }t�| j�}| �|d|� d S )NZvariable)rc r+ Z DoubleVarr rY r� r r r �test_configure_variable� s z,StandardOptionsTests.test_configure_variableN)9rm rq rr ZSTANDARD_OPTIONSr� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r r� r� r� r r r r ry � sn
ry c @ s e Zd Zdd� Zdd� ZdS )�IntegerSizeTestsc C s | � � }| �|dddd� d S )N�heightr� ���r r� r� r r r �test_configure_height� s z&IntegerSizeTests.test_configure_heightc C s | � � }| �|dddd� d S )N�width� �n���r r� r� r r r �test_configure_width� s z%IntegerSizeTests.test_configure_widthN�rm rq rr r� r r r r r r� � s r� c @ s e Zd Zdd� Zdd� ZdS )�PixelSizeTestsc
C s$ | � � }| �|ddddddd� d S )Nr� r� g�����LY@gfffff�Y@r� r Z3cr� r� r r r r� � s z$PixelSizeTests.test_configure_heightc
C s$ | � � }| �|ddddddd� d S )Nr� r� gfffff6y@g�����Iy@r r Z5ir� r� r r r r � s z#PixelSizeTests.test_configure_widthNr r r r r r � s r c s � fdd�}|S )Nc sn � j D ]b}d| }t� |�s�D ]$}t||�r t� |t||�� qq |f� fdd� }||_t� ||� q� S )NZtest_configure_c s& | � � }|| td|� jf ��d S )Nz Option "%s" is not tested in %s)rc �AssertionErrorrm )r �optionr. ��clsr r rf s
�z5add_standard_options.<locals>.decorator.<locals>.test)rj �hasattr�setattr�getattrrm )r r Z
methodnameZ source_classrf ��source_classesr r � decorator s
�z'add_standard_options.<locals>.decoratorr )r r
r r r �add_standard_options s r c C s& t jjr"t�� } td| �dd�� d S )Nz patchlevel =�infoZ
patchlevel)rf rg rh r+ ZTclrk r )Ztclr r r � setUpModule s r )Zunittestr+ Ztkinter.test.supportr r r r r r Z test.supportrf Znoconvr rS rt rZ rw r* r ry r� r r r r r r r �<module> s&
P