Sindbad~EG File Manager
a
��g�: � @ s4 d Z ddlZddlZddlZddlZddlmZmZ ddl m
Z
m Z m Z m
Z
mZmZ ddlmZmZmZmZmZ ddl mZ ddlmZ ddlmZ G d d
� d
e
�ZG d d � d e�Z G d
d� de�Z G dd� de�Z G dd� de�Z G dd� de�Z e!dk�r0ddl"m#Z# e#dddd� ddl$m%Z% e%ee e � dS ) a|
Dialogs that query users and verify the answer before accepting.
Query is the generic base class for a popup dialog.
The user must either enter a valid answer or close the dialog.
Entries are validated when <Return> is entered or [Ok] is clicked.
Entries are ignored when [Cancel] or [X] are clicked.
The 'return value' is .result set to either a valid answer or None.
Subclass SectionName gets a name for a new config file section.
Configdialog uses it for new highlight theme and keybinding set names.
Subclass ModuleName gets a name for File => Open Module.
Subclass HelpSource gets menu item and path for additions to Help menu.
� N)�
executable�platform)�Toplevel� StringVar�
BooleanVar�W�E�S)�Frame�Button�Entry�Label� Checkbutton)�
filedialog)�Font)�
_setup_dialogc sl e Zd ZdZdi ddd�dd�Zddd �Zd
d � Zdd
d�Zdd� Zddd�Z ddd�Z
� fdd�Z � Z S )�QueryzoBase class for getting verified answer from a user.
For this base class, accept any non-blank string.
� F��text0�
used_names�_htest�_utestc C s8 || _ || _|| _|| _t�| |� | �� | �|� | �|� |sL| � � t
| � | j dkrl| � d| j
� | � d| j
� | �d| j
� | � d| j� | � d| j� | �� | �� | �d|�� |�� d | �� d |�� |s�|�� d | �� d nd f � | jd
d
d � |�s4| �� | j� � | � � d S )
a� Create modal popup, return when destroyed.
Additional subclass init must be done before this unless
_utest=True is passed to suppress wait_window().
title - string, title of popup dialog
message - string, informational message to display
text0 - initial value for entry
used_names - names already in use
_htest - bool, change box location when running htest
_utest - bool, leave window hidden and not modal
Zaquaz <Command-.>z <Key-Escape>ZWM_DELETE_WINDOWz <Key-Return>z
<KP_Enter>z+%d+%d� � F)Zheight�widthN) �parent�messager r r �__init__Zwithdraw�titleZ transientZgrab_setr Z_windowingsystem�bind�cancel�protocol�ok�create_widgetsZupdate_idletasksZgeometryZ winfo_rootxZ winfo_widthZwinfo_reqwidthZ winfo_rootyZ winfo_heightZwinfo_reqheightZ resizableZ deiconify�entry� focus_setZ wait_window)�selfr r r r r r r � r( �)/usr/local/lib/python3.9/idlelib/query.pyr & sH
�����
zQuery.__init__�OKc C s, t | dd� | _}|jdddd� |jddd� t|dd | jd
�}t| | j�| _t |d | jd �| _
t d
d| j d�| _
t|dd| j
d�| _|jddddtd� | j
jddddtt ddgd� | jjddddtt d� | �� t||d| jd�| _t|d| jd�| _| jjdd dd � | jjdd dd � d S ) z�Create entry (rows, extras, buttons.
Entry stuff on rows 0-2, spanning cols 0-2.
Buttons on row 99, cols 1, 2.
�
)Zpaddingr �news)�column�row�sticky� )Zweight�w�left��anchorZjustify�text� )r � textvariableZ
TkCaptionFontT)�name�exists�root� �red�r5 Z
foregroundZfont� � �r- r. �
columnspan�padxr/ �r- r. rA rB r/ �padyr Zactive)r5 �default�commandZCancel)r5 rF �c )r- r. rB N)r
�frame�gridZgrid_columnconfigurer
r r r Zentryvarr r% r r �
error_font� entry_errorr r � create_extrar r# Z button_okr! Z
button_cancel)r' Zok_textrH Z
entrylabelr( r( r) r$ Y s< �����
��zQuery.create_widgetsc C s d S �Nr( �r' r( r( r) rL } � zQuery.create_extraNc C s d| |p| j d< d S )NzERROR: r5 )rK )r' r Zwidgetr( r( r) � showerror s zQuery.showerrorc C s$ | j �� �� }|s | �d� dS |S )z Return non-blank entry or None.z blank line.N)r% �get�striprP )r' r% r( r( r) �entry_ok� s
zQuery.entry_okc C s8 d| j d< | �� }|dur*|| _| �� n
| j�� dS )z�If entry is valid, bind it to 'result' and destroy tk widget.
Otherwise leave dialog open for user to correct entry or cancel.
r r5 N)rK rS �result�destroyr% r& )r' �eventr% r( r( r) r# � s
zQuery.okc C s d| _ | �� dS )z0Set dialog result to None and destroy tk widget.N)rT rU )r' rV r( r( r) r! � s z Query.cancelc s | � � t� �� d S rM )Z grab_release�superrU rN �� __class__r( r) rU � s z
Query.destroy)r* )N)N)N)
�__name__�
__module__� __qualname__�__doc__r r$ rL rP rS r# r! rU �
__classcell__r( r( rX r) r ! s � 3
$
r c s0 e Zd ZdZddd�� fdd�
Zdd� Z� ZS )� SectionNamez*Get a name for a config file section name.F�r r c s t � j||||||d� d S )N)r r r �rW r )r' r r r r r r rX r( r) r � s �zSectionName.__init__c C sV | j �� �� }|s | �d� dS t|�dkr:| �d� dS || jv rR| �d� dS |S )z2Return sensible ConfigParser section name or None.�no name specified.Nr6 z"name is longer than 30 characters.zname is already in use.)r% rQ rR rP �lenr )r' r8 r( r( r) rS � s
zSectionName.entry_ok�rZ r[ r\ r] r rS r^ r( r( rX r) r_ � s �r_ c s0 e Zd ZdZddd�� fdd�
Zdd� Z� ZS )�
ModuleNamez-Get a module name for Open Module menu entry.Fr` c s t � j||||||d� d S )N�r r r ra )r' r r r r r r rX r( r) r � s �zModuleName.__init__c C s | j �� �� }|s | �d� dS ztj�|�}W n8 ttfyh } z | �t |�� W Y d}~dS d}~0 0 |du r�| �d� dS t
|j tj j
�s�| �d� dS z|j �|�}W nb ty� | �d� Y dS t�y z|j �� }W n" t�y
| �d� Y Y dS 0 Y n0 |S )z0Return entered module name as file path or None.rb Nzmodule not found.znot a source-based module.z%loader does not support get_filename.z loader failed to get filename.)r% rQ rR rP � importlib�util� find_spec�
ValueError� ImportError�str�
isinstance�loader�abc� SourceLoader� get_filename�AttributeError� TypeError)r' r8 �spec�msgZ file_pathr( r( r) rS � s6
zModuleName.entry_okrd r( r( rX r) re � s �re c @ s e Zd ZdZdd� ZdS )�Gotoz1Get a positive line number for editor Go To Line.c C sL zt | j�� �}W n ty0 | �d� Y d S 0 |dkrH| �d� d S |S )Nznot a base 10 integer.r znot a positive integer.)�intr% rQ rj rP )r' �linenor( r( r) rS � s
z
Goto.entry_okN)rZ r[ r\ r] rS r( r( r( r) rv � s rv c s\ e Zd ZdZddi ddd�� fdd�
Zdd� Zd d
� Zd d � Zej Z
d
d� Z dd� Z � Z S )�
HelpSourcez,Get menu name and help source for Help menu.r F)�menuitem�filepathr r r c s( || _ d}t� j|||||||d� dS )z�Get menu entry and url/local file for Additional Help.
User enters a name for the Help resource and a web url or file
name. The user can browse for the file.
zName for item on Help menu:r N)r{ rW r ) r' r r rz r{ r r r r rX r( r) r � s �zHelpSource.__init__c C s� | j }t|dddd�}t| | j�| _t|| jdd�| _t|dd| jd �}t|d
d | j d �| _
|j d
ddddd
gt d� | jj d
dddt t
dd
gd� |j dddt t d� | j
j d
dddt t
d� dS )z Add path widjets to rows 10-12.r1 r2 z,Help File Path: Enter URL or browse for filer3 �( )r7 r ZBrowse� )r5 r rF r; r< r= r r+ r> r? )r- r. rA rB rD r/ � r rC )r- r. rB r/ � r@ N)rH r
r r{ �pathvarr �pathr � browse_filerJ �
path_errorrI r r r )r' rH Z pathlabelZbrowser( r( r) rL s, ������zHelpSource.create_extrac C s t j| |d�j||d�S )N)r � filetypes)Z
initialdirZ initialfile)r ZOpenZshow)r' r� ZinitdirZinitfiler( r( r) � askfilename s �zHelpSource.askfilenamec C s� g d�}| j �� }|r(tj�|�\}}nHd }td d� dkrhtj�tj�t�d�}tj� |�spt�
� }nt�
� }| � |||�}|r�| j � |� d S )N))z
HTML Filesz *.htm *.html�TEXT)z PDF Filesz*.pdfr� )zWindows Help Filesz*.chm)z
Text Filesz*.txtr� )z All Files�*r> �winZDoc)
r� rQ �osr� �splitr �join�dirnamer �isdir�getcwdr� �set)r' r� r� �dir�base�filer( r( r) r� ! s
zHelpSource.browse_filec C s| | j �� �� }|s$| �d| j� dS |�d�sx|dd� dkrJ|dd� }tj �|�sh| �d| j� dS tdkrxd| }|S ) z(Simple validity check for menu file pathz no help file path specified.N)zwww.�httpr? zfile:z help file path does not exist.�darwinzfile://) r� rQ rR rP r� �
startswithr� r9 r )r' r� r( r( r) �path_ok9 s
�zHelpSource.path_okc C s6 d| j d< | �� }| �� }|du s*|du r.dS ||fS )z,Return apparently valid (name, path) or Noner r5 N)r� �item_okr� )r' r8 r� r( r( r) rS J s
zHelpSource.entry_ok)
rZ r[ r\ r] r rL r� r� r_ rS r� r� r^ r( r( rX r) ry � s �
ry c sB e Zd ZdZg ddd�� fdd�
Zdd� Zdd � Zd
d � Z� ZS ) � CustomRunz�Get settings for custom run of module.
1. Command line arguments to extend sys.argv.
2. Whether to restart Shell or not.
F)�cli_argsr r c s d}t � j||||||d� dS )z�cli_args is a list of strings.
The list is assigned to the default Entry StringVar.
The strings are displayed joined by ' ' for display.
z$Command Line Arguments for sys.argv:rf Nra )r' r r r� r r r rX r( r) r Y s
�zCustomRun.__init__c C sj | j }t| dd�| _t|| jdddd�}t|dd| jd�| _|jd d
d d d
d� | jjd dd d dd� dS )zAdd run mode on rows 10-12.T)�valueFz
Restart shell)�variableZonvalueZoffvaluer5 r; r< r= r r+ r> r? r1 r@ r ZweN)rH r �
restartvarr r
rJ Z
args_errorrI )r' rH �restartr( r( r) rL e s
���zCustomRun.create_extrac
C sZ | j �� �� }ztj|dd�}W n4 tyT } z | �t|�� W Y d}~dS d}~0 0 |S )z6Validity check and parsing for command line arguments.T)�posixN)r% rQ rR �shlexr� rj rP rl )r' Z
cli_stringr� �errr( r( r) � cli_args_okr s zCustomRun.cli_args_okc C s& | � � }| j�� }|du r dS ||fS )z4Return apparently valid (cli_args, restart) or None.N)r� r� rQ )r' r� r� r( r( r) rS | s
zCustomRun.entry_ok) rZ r[ r\ r] r rL r� rS r^ r( r( rX r) r� Q s �
r� �__main__)�mainz idlelib.idle_test.test_queryr F)� verbosity�exit)�run)&r] �importlib.utilrg �
importlib.abcr� r� �sysr r �tkinterr r r r r r Z tkinter.ttkr
r r r
r r Z tkinter.fontr Ztkinter.simpledialogr r r_ re rv ry r� rZ Zunittestr� Zidlelib.idle_test.htestr� r( r( r( r) �<module> s* *\2
Sindbad File Manager Version 1.0, Coded By Sindbad EG ~ The Terrorists