|
Server : LiteSpeed System : Linux premium217.web-hosting.com 4.18.0-553.54.1.lve.el8.x86_64 #1 SMP Wed Jun 4 13:01:13 UTC 2025 x86_64 User : alloknri ( 880) PHP Version : 8.1.34 Disable Function : NONE Directory : /opt/alt/python39/lib64/python3.9/__pycache__/ |
a
XC?h�� � @ sL d Z ddlZddlZddlmZ g d�ZdZdZdZG dd � d e�Z G d
d � d e �Z
G d d
� d
e �Z G dd� de �Z G dd� de �Z
e eefZdZdZG dd� d�Zz ddlZW n ey� dZY n00 ejZG dd� de�Ze�d� e eeejfZdadd� Z da dd� Z d d � Z d d � Z d d!� Z!d)d$d%�Z"d&d'� Z#e$d(k�rHe#� dS )*aS An FTP client class and some helper functions.
Based on RFC 959: File Transfer Protocol (FTP), by J. Postel and J. Reynolds
Example:
>>> from ftplib import FTP
>>> ftp = FTP('ftp.python.org') # connect to host, default port
>>> ftp.login() # default, i.e.: user anonymous, passwd anonymous@
'230 Guest login ok, access restrictions apply.'
>>> ftp.retrlines('LIST') # list directory contents
total 9
drwxr-xr-x 8 root wheel 1024 Jan 3 1994 .
drwxr-xr-x 8 root wheel 1024 Jan 3 1994 ..
drwxr-xr-x 2 root wheel 1024 Jan 3 1994 bin
drwxr-xr-x 2 root wheel 1024 Jan 3 1994 etc
d-wxrwxr-x 2 ftp wheel 1024 Sep 5 13:43 incoming
drwxr-xr-x 2 root wheel 1024 Nov 17 1993 lib
drwxr-xr-x 6 1094 wheel 1024 Sep 13 19:07 pub
drwxr-xr-x 3 root wheel 1024 Jan 3 1994 usr
-rw-r--r-- 1 root root 312 Aug 1 1994 welcome.msg
'226 Transfer complete.'
>>> ftp.quit()
'221 Goodbye.'
>>>
A nice test that reveals some of the network dialogue would be:
python ftplib.py -d localhost -l -p -l
� N)�_GLOBAL_DEFAULT_TIMEOUT)�FTP� error_reply�
error_temp�
error_perm� error_proto�
all_errors� � � c @ s e Zd ZdS )�ErrorN��__name__�
__module__� __qualname__� r r �+/opt/alt/python39/lib64/python3.9/ftplib.pyr 9 � r c @ s e Zd ZdS )r Nr
r r r r r : r r c @ s e Zd ZdS )r Nr
r r r r r ; r r c @ s e Zd ZdS )r Nr
r r r r r < r r c @ s e Zd ZdS )r Nr
r r r r r = r r �
s
c @ s� e Zd ZdZdZdZeZeZ dZ
dZ dZ dZ
dZddddedfdd�d d
�Zd d � Zd
d� Zd]dd�Zdd� Zdd� ZeZdd� Zdd� Zdd� Zd d � Zd d � Zd d!� Z d"d#� Z d$d%� Z d&d'� Z d(d)� Z d*d+� Z!d,d-� Z"d.d/� Z#d0d1� Z$d2d3� Z%d^d4d5�Z&d_d6d7�Z'd`d8d9�Z(dad;d<�Z)dbd=d>�Z*dcd?d@�Z+dddAdB�Z,dCdD� Z-dEdF� Z.dGdH� Z/dg fdIdJ�Z0dKdL� Z1dMdN� Z2dOdP� Z3dQdR� Z4dSdT� Z5dUdV� Z6dWdX� Z7dYdZ� Z8d[d\� Z9dS )er u� An FTP client class.
To create a connection, call the class using these arguments:
host, user, passwd, acct, timeout, source_address, encoding
The first four arguments are all strings, and have default value ''.
The parameter ´timeout´ must be numeric and defaults to None if not
passed, meaning that no timeout will be set on any ftp socket(s).
If a timeout is passed, then this is now the default timeout for all ftp
socket operations for this instance.
The last parameter is the encoding of filenames, which defaults to utf-8.
Then use self.connect() with optional host and port argument.
To download a file, use ftp.retrlines('RETR ' + filename),
or ftp.retrbinary() with slightly different arguments.
To upload a file, use ftp.storlines() or ftp.storbinary(),
which have an open file as argument (see their definitions
below for details).
The download/upload functions first issue appropriate TYPE
and PORT or PASV commands.
r � NTF�utf-8��encodingc C s6 || _ || _|| _|r2| �|� |r2| �|||� dS )z�Initialization method (called by class instantiation).
Initialize host to localhost, port to standard ftp port.
Optional arguments are host (for connect()),
and user, passwd, acct (for login()).
N)r �source_address�timeout�connect�login)�self�host�user�passwd�acctr r r r r r �__init__m s
z FTP.__init__c C s | S �Nr �r r r r � __enter__} s z
FTP.__enter__c G s^ | j d urZz:z | �� W n ttfy. Y n0 W | j d urZ| �� n| j d urX| �� 0 d S r# )�sock�quit�OSError�EOFError�close)r �argsr r r �__exit__� s
�
z FTP.__exit__����c C s� |dkr|| _ |dkr || _|dkr*|| _| jdurB| jsBtd��|durP|| _t�d| | j | j� tj| j | jf| j| jd�| _ | j j
| _ | j j d| j
d �| _| �� | _| jS )
aw Connect to host. Arguments are:
- host: hostname to connect to (string, default previous host)
- port: port to connect to (integer, default previous port)
- timeout: the timeout to set against the ftp socket(s)
- source_address: a 2-tuple (host, port) for the socket to bind
to as its source address before connecting.
r r r- Nz0Non-blocking socket (timeout=0) is not supportedzftplib.connect�r �rr )r �portr �
ValueErrorr �sys�audit�socket�create_connectionr& �family�af�makefiler �file�getresp�welcome)r r r0 r r r r r r � s$ �
z FTP.connectc C s | j rtd| �| j�� | jS )z`Get the welcome message from the server.
(this is read and squirreled away by connect())z *welcome*)� debugging�print�sanitizer; r$ r r r �
getwelcome� s zFTP.getwelcomec C s
|| _ dS )z�Set the debugging level.
The required argument level means:
0: no debugging output (default)
1: print commands and responses but not body text etc.
2: also print raw lines read and sent before stripping CR/LFN)r< )r �levelr r r �set_debuglevel� s zFTP.set_debuglevelc C s
|| _ dS )z�Use passive or active mode for data transfers.
With a false argument, use the normal PORT mode,
With a true argument, use the PASV command.N)�
passiveserver)r �valr r r �set_pasv� s z FTP.set_pasvc C sJ |d d� dv rBt |�d��}|d d� d|d ||d � }t|�S )N� > �PASS zpass r �*)�len�rstrip�repr)r �s�ir r r r> � s $z FTP.sanitizec C s` d|v sd|v rt d��t�d| |� |t }| jdkrHtd| �|�� | j�|� | j
�� d S )N�
�
z4an illegal newline character should not be containedzftplib.sendcmdr z*put*) r1 r2 r3 �CRLFr< r= r> r& �sendall�encoder �r �liner r r �putline� s
z FTP.putlinec C s$ | j rtd| �|�� | �|� d S )Nz*cmd*)r< r= r> rT rR r r r �putcmd� s z
FTP.putcmdc C s� | j �| jd �}t|�| jkr.td| j ��| jdkrHtd| �|�� |sPt�|dd � t krn|d d� }n |dd � t v r�|d d� }|S )Nr �got more than %d bytesz*get*������)
r9 �readline�maxlinerH r r< r= r> r) rO rR r r r �getline� s
z FTP.getlinec C s` | � � }|dd� dkr\|d d� }| � � }|d| }|d d� |kr$|dd� dkr$q\q$|S )N� � �-rN )r[ )r rS �codeZnextliner r r � getmultiline� s �zFTP.getmultilinec C sp | � � }| jr td| �|�� |d d� | _|d d� }|dv rD|S |dkrTt|��|dkrdt|��t|��d S )Nz*resp*r\ r > �2�1�3�4�5)r` r< r= r> Zlastrespr r r )r �resp�cr r r r: � s z FTP.getrespc C s$ | � � }|dd� dkr t|��|S )z%Expect a response beginning with '2'.Nr ra )r: r �r rf r r r �voidresp s z FTP.voidrespc C sT dt }| jdkr"td| �|�� | j�|t� | �� }|dd� dvrPt|��|S )z�Abort a file transfer. Uses out-of-band data.
This does not follow the procedure from the RFC to send Telnet
IP and Synch; that doesn't seem to work with the servers I've
tried. Instead, just send the ABOR command as OOB data.� ABORr z *put urgent*Nr\ � Z226Z426Z225) �B_CRLFr< r= r> r& rP �MSG_OOBr` r �r rS rf r r r �abort s
z FTP.abortc C s | � |� | �� S )z'Send a command and return the response.)rU r: �r �cmdr r r �sendcmd s
z FTP.sendcmdc C s | � |� | �� S )z8Send a command and expect a response beginning with '2'.)rU ri rp r r r �voidcmd s
z FTP.voidcmdc C sB |� d�}t|d �t|d �g}|| }dd�|� }| �|�S )zUSend a PORT command with the current host and the given
port number.
�.� zPORT �,)�splitrJ �joinrs )r r r0 ZhbytesZpbytes�bytesrq r r r �sendport s
z FTP.sendportc C sb d}| j tjkrd}| j tjkr$d}|dkr4td��dt|�|t|�dg}dd�|� }| �|�S )zESend an EPRT command with the current host and the given port number.r r � zunsupported address familyr zEPRT �|)r7 r4 �AF_INETZAF_INET6r rJ rx rs )r r r0 r7 �fieldsrq r r r �sendeprt* s z FTP.sendeprtc C sl t jd| jdd�}|�� d }| j�� d }| jt jkrF| �||�}n | �||�}| jt urh|�
| j� |S )z3Create a new socket and send a PORT command for it.)r r r )r6 Zbacklogr ) r4 Z
create_serverr7 Z getsocknamer& r} rz r r r �
settimeout)r r& r0 r rf r r r �makeport7 s
z FTP.makeportc C s\ | j tjkr:t| �d��\}}| jr*|}qT| j�� d }nt| �d�| j�� �\}}||fS )z<Internal: Does the PASV or EPSV handshake -> (address, port)�PASVr ZEPSV) r7 r4 r} �parse227rr � trust_server_pasv_ipv4_addressr& Z getpeername�parse229)r Zuntrusted_hostr0 r r r r �makepasvD s z FTP.makepasvc
C sL d}| j r�| �� \}}tj||f| j| jd�}zL|durF| �d| � | �|�}|d dkrd| �� }|d dkrxt|��W n |� � � Y n0 n�| �
� �|}|dur�| �d| � | �|�}|d dkr�| �� }|d dkr�t|��|� � \}} | jt u�r
|�
| j� W d � n1 �s 0 Y |dd� dk�rDt|�}||fS ) a� Initiate a transfer over the data connection.
If the transfer is active, send a port command and the
transfer command, and accept the connection. If the server is
passive, send a pasv command, connect to it, and start the
transfer command. Either way, return the socket for the
connection and the expected size of the transfer. The
expected size may be None if it could not be determined.
Optional `rest' argument can be a string that is sent as the
argument to a REST command. This is essentially a server
marker used to tell the server to skip over any data up to the
given marker.
Nr. zREST %sr ra rb r\ �150)rB r� r4 r5 r r rr r: r r* r� Zacceptr r� �parse150)
r rq �rest�sizer r0 �connrf r& Zsockaddrr r r � ntransfercmdP s> �
,zFTP.ntransfercmdc C s | � ||�d S )z0Like ntransfercmd() but returns only the socket.r )r� )r rq r� r r r � transfercmd� s zFTP.transfercmdc C s� |sd}|sd}|sd}|dkr0|dv r0|d }| � d| �}|d dkrX| � d| �}|d dkrr| � d | �}|d d
kr�t|��|S ) zLogin, default anonymous.Z anonymousr > r r^ z
anonymous@zUSER r rc rF �ACCT ra �rr r )r r r r! rf r r r r � s z FTP.loginr c C sr | � d� | �||��D}|�|�}|s(q2||� qtdurLt|t�rL|�� W d � n1 s`0 Y | �� S )a� Retrieve data in binary mode. A new port is created for you.
Args:
cmd: A RETR command.
callback: A single parameter callable to be called on each
block of data read.
blocksize: The maximum number of bytes to read from the
socket at one time. [default: 8192]
rest: Passed to transfercmd(). [default: None]
Returns:
The response code.
�TYPE IN)rs r� Zrecv�
_SSLSocket�
isinstance�unwrapri )r rq �callback� blocksizer� r� �datar r r �
retrbinary� s
&zFTP.retrbinaryc C s" |du r t }| �d�}| �|���}|jd| jd���}|�| jd �}t|�| jkr`td| j ��| j dkrxt
dt |�� |s~q�|d d� t kr�|dd � }n |d
d� d kr�|dd
� }||� q4t
dur�t|t
�r�|�� W d � n1 s�0 Y W d � n1 �s0 Y | �� S ) ah Retrieve data in line mode. A new port is created for you.
Args:
cmd: A RETR, LIST, or NLST command.
callback: An optional single parameter callable that is called
for each line with the trailing CRLF stripped.
[default: print_line()]
Returns:
The response code.
N�TYPE Ar/ r r rV r{ z*retr*rW rX rN )�
print_linerr r� r8 r rY rZ rH r r< r= rJ rO r� r� r� ri )r rq r� rf r� �fprS r r r � retrlines� s,
�
Fz
FTP.retrlinesc C s� | � d� | �||��R}|�|�}|s(q@|�|� |r||� qtdurZt|t�rZ|�� W d � n1 sn0 Y | �� S )a9 Store a file in binary mode. A new port is created for you.
Args:
cmd: A STOR command.
fp: A file-like object with a read(num_bytes) method.
blocksize: The maximum data size to read from fp and send over
the connection at once. [default: 8192]
callback: An optional single parameter callable that is called on
each block of data after it is sent. [default: None]
rest: Passed to transfercmd(). [default: None]
Returns:
The response code.
r� N)rs r� �readrP r� r� r� ri )r rq r� r� r� r� r� �bufr r r �
storbinary� s
&zFTP.storbinaryc C s� | � d� | �|���}|�| jd �}t|�| jkrBtd| j ��|sHq�|dd� tkrx|d tv rp|dd� }|t }|�|� |r||� qtdur�t |t�r�|�
� W d � n1 s�0 Y | � � S )ah Store a file in line mode. A new port is created for you.
Args:
cmd: A STOR command.
fp: A file-like object with a readline() method.
callback: An optional single parameter callable that is called on
each line after it is sent. [default: None]
Returns:
The response code.
r� r rV rW NrX ) rs r� rY rZ rH r rl rP r� r� r� ri )r rq r� r� r� r� r r r � storlines� s
&z
FTP.storlinesc C s d| }| � |�S )zSend new account name.r� �rs )r Zpasswordrq r r r r! s zFTP.acctc G s0 d}|D ]}|d| }qg }| � ||j� |S )zBReturn a list of files in a given directory (default the current).ZNLST� )r� �append)r r+ rq �arg�filesr r r �nlst# s zFTP.nlstc G sh d}d}|dd� r>t |d �t d�kr>|dd� |d }}|D ]}|rB|d| }qB| �||� dS )a List a directory in long form.
By default list current directory to stdout.
Optional last argument is callback function; all
non-empty arguments before it are concatenated to the
LIST command. (This *should* only be used for a pathname.)ZLISTNrX r r� )�typer� )r r+ rq �funcr� r r r �dir, s zFTP.dirc
c s� |r | � dd�|� d � |r*d| }nd}g }| �||j� |D ]\}|�t��d�\}}}i } |dd� �d�D ] }
|
�d�\} }} | | | �� < qt|| fV qDdS ) a< List a directory in a standardized format by using MLSD
command (RFC-3659). If path is omitted the current directory
is assumed. "facts" is a list of strings representing the type
of information desired (e.g. ["type", "size", "perm"]).
Return a generator object yielding a tuple of two elements
for every file found in path.
First element is the file name, the second one is a dictionary
including a variable number of "facts" depending on the server
and whether "facts" argument has been provided.
z
OPTS MLST �;zMLSD %sZMLSDr� NrX �=) rr rx r� r� rI rO � partitionrw �lower)
r �pathZfactsrq �linesrS Z facts_found�_�name�entryZfact�key�valuer r r �mlsd; s
zFTP.mlsdc C s0 | � d| �}|d dkr"t|��| �d| �S )zRename a file.zRNFR r rc zRNTO )rr r rs )r ZfromnameZtonamerf r r r �renameW s z
FTP.renamec C s. | � d| �}|dd� dv r"|S t|��dS )zDelete a file.zDELE Nr\ > Z200Z250r� )r �filenamerf r r r �delete^ s z
FTP.deletec
C sr |dkrTz | � d�W S tyP } z$|jd dd� dkr<� W Y d}~q`d}~0 0 n |dkr`d}d | }| � |�S )
zChange to a directory.z..ZCDUPr Nr\ �500r rt zCWD )rs r r+ )r �dirname�msgrq r r r �cwdf s zFTP.cwdc C s: | � d| �}|dd� dkr6|dd� �� }t|�S dS )z Retrieve the size of a file.zSIZE Nr\ Z213)rr �strip�int)r r� rf rK r r r r� s s zFTP.sizec C s$ | � d| �}|�d�s dS t|�S )z+Make a directory, return its full pathname.zMKD �257r �rs �
startswith�parse257)r r� rf r r r �mkd{ s
zFTP.mkdc C s | � d| �S )zRemove a directory.zRMD r� )r r� r r r �rmd� s zFTP.rmdc C s | � d�}|�d�sdS t|�S )z!Return current working directory.ZPWDr� r r� rh r r r �pwd� s
zFTP.pwdc C s | � d�}| �� |S )z Quit, and close the connection.ZQUIT)rs r* rh r r r r' � s
zFTP.quitc C s` z<| j }d| _ |dur |�� W | j}d| _|dur\|�� n | j}d| _|durZ|�� 0 dS )z8Close the connection without assuming anything about it.N)r9 r* r& )r r9 r& r r r r* � s
�z FTP.close)r r r- N)N)N)r r r )r N)N)r NN)N):r r r �__doc__r< r �FTP_PORTr0 �MAXLINErZ r& r9 r; rB r� r r" r% r, r r? rA �debugrD r> rT rU r[ r` r: ri ro rr rs rz 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 J sp ��
7
#
r c s� e Zd ZdZejZdddddddedf dd�� fdd� Zd� fd d
� Z d d � Z
d
d� Z dd� Z dd� Z
d� fdd� Zdd� Z� ZS )�FTP_TLSa� A FTP subclass which adds TLS support to FTP as described
in RFC-4217.
Connect as usual to port 21 implicitly securing the FTP control
connection before authenticating.
Securing the data connection requires user to explicitly ask
for it by calling prot_p() method.
Usage example:
>>> from ftplib import FTP_TLS
>>> ftps = FTP_TLS('ftp.python.org')
>>> ftps.login() # login anonymously previously securing control channel
'230 Guest login ok, access restrictions apply.'
>>> ftps.prot_p() # switch to secure data connection
'200 Protection level set to P'
>>> ftps.retrlines('LIST') # list directory content securely
total 9
drwxr-xr-x 8 root wheel 1024 Jan 3 1994 .
drwxr-xr-x 8 root wheel 1024 Jan 3 1994 ..
drwxr-xr-x 2 root wheel 1024 Jan 3 1994 bin
drwxr-xr-x 2 root wheel 1024 Jan 3 1994 etc
d-wxrwxr-x 2 ftp wheel 1024 Sep 5 13:43 incoming
drwxr-xr-x 2 root wheel 1024 Nov 17 1993 lib
drwxr-xr-x 6 1094 wheel 1024 Sep 13 19:07 pub
drwxr-xr-x 3 root wheel 1024 Jan 3 1994 usr
-rw-r--r-- 1 root root 312 Aug 1 1994 welcome.msg
'226 Transfer complete.'
>>> ftps.quit()
'221 Goodbye.'
>>>
r Nr r c
s� |d ur|d urt d��|d ur0|d ur0t d��|d us@|d urVdd l} | �dtd� || _|| _|d u r|tj| j||d�}|| _ d| _
t � j |||||| |
d� d S ) Nz4context and keyfile arguments are mutually exclusivez5context and certfile arguments are mutually exclusiver zAkeyfile and certfile are deprecated, use a custom context insteadr{ )�certfile�keyfileFr )
r1 �warnings�warn�DeprecationWarningr� r� �sslZ_create_stdlib_context� ssl_version�context�_prot_p�superr" ) r r r r r! r� r� r� r r r r� �� __class__r r r" � s* ���zFTP_TLS.__init__Tc s* |rt | jtj�s| �� t� �|||�S r# )r� r& r� � SSLSocket�authr� r )r r r r! Zsecurer� r r r � s z
FTP_TLS.loginc C sf t | jtj�rtd��| jtjkr.| �d�}n
| �d�}| jj | j| j
d�| _| jj d| j d�| _
|S )z2Set up secure control connection by using TLS/SSL.zAlready using TLSzAUTH TLSzAUTH SSL�Zserver_hostnamer/ )�moder )r� r& r� r� r1 r� Z PROTOCOL_TLSrs r� � wrap_socketr r8 r r9 rh r r r r� � s
z FTP_TLS.authc C s0 t | jtj�std��| �d�}| j�� | _|S )z/Switch back to a clear-text control connection.z
not using TLSZCCC)r� r& r� r� r1 rs r� rh r r r �ccc� s
z FTP_TLS.cccc C s | � d� | � d�}d| _|S )z Set up secure data connection.zPBSZ 0zPROT PT�rs r� rh r r r �prot_p s
zFTP_TLS.prot_pc C s | � d�}d| _|S )z"Set up clear text data connection.zPROT CFr� rh r r r �prot_c s
zFTP_TLS.prot_cc s2 t � �||�\}}| jr*| jj|| jd�}||fS )Nr� )r� r� r� r� r� r )r rq r� r� r� r� r r r� s �zFTP_TLS.ntransfercmdc C s8 dt }| j�|� | �� }|d d� dvr4t|��|S )Nrj r\ rk )rl r& rP r` r rn r r r ro s z
FTP_TLS.abort)r r r T)N)r r r r� r� ZPROTOCOL_TLS_CLIENTr� r r" r r� r� r� r� r� ro �
__classcell__r r r� r r� � s �� r� c C s\ | dd� dkrt | ��tdu r<ddl}|�d|j|jB �at�| �}|sNdS t|�d��S )z�Parse the '150' response for a RETR request.
Returns the expected transfer size or None; size is not guaranteed to
be present in the 150 message.
Nr\ r� r z150 .* \((\d+) bytes\)r ) r �_150_re�re�compile�
IGNORECASE�ASCII�matchr� �group)rf r� �mr r r r� . s �
r� c C s� | dd� dkrt | ��tdu r6ddl}|�d|j�at�| �}|sLt| ��|�� }d�|dd� �}t |d �d> t |d � }||fS )
z�Parse the '227' response for a PASV request.
Raises error_proto if it does not contain '(h1,h2,h3,h4,p1,p2)'
Return ('host.addr.as.numbers', port#) tuple.Nr\ Z227r z#(\d+),(\d+),(\d+),(\d+),(\d+),(\d+)rt r] � rE )
r �_227_rer� r� r� �searchr �groupsrx r� )rf r� r� Znumbersr r0 r r r r� B s
r� c C s� | dd� dkrt | ��| �d�}|dk r2t| ��| �d|d �}|dk rRt| ��| |d | |d krrt| ��| |d |� �| |d �}t|�dkr�t| ��|d }t|d �}||fS ) z�Parse the '229' response for an EPSV request.
Raises error_proto if it does not contain '(|||port|)'
Return ('host.addr.as.numbers', port#) tuple.Nr\ Z229�(r �)r rE )r �findr rw rH r� )rf Zpeer�left�right�partsr r0 r r r r� U s
r� c C s� | dd� dkrt | ��| dd� dkr,dS d}d}t| �}||k r�| | }|d }|dkrz||ks�| | dkrrq�|d }|| }q<|S ) z�Parse the '257' response for a MKD or PWD request.
This is a response to a MKD or PWD request: a directory name.
Returns the directoryname in the 257 reply.Nr\ r� rE z "r r �")r rH )rf r� rL �nrg r r r r� j s
r� c C s t | � dS )z+Default retrlines callback to print a line.N)r= )rS r r r r� � s r� r �Ic C s� |s|}d| }| � |� |� |� t| �d��\}}|�||� |�d| �}|dd� dvrdt�| �d| �}|dd� dvr�t�| �� |�� dS )z+Copy file from one FTP-instance to another.zTYPE r� zSTOR Nr\ > r� Z125�RETR )rs r� rr rz r ri ) �sourceZ
sourcename�targetZ
targetnamer� Z
sourcehostZ
sourceportZtreplyZsreplyr r r �ftpcp� s
r� c C s� t tj�dk r"ttj� t�d� ddl} d}d}tjd dkrR|d }tjd= q2tjd dd� dkr�tjd dd� }tjd= tjd }t|�}|� |� d } }}z| �|�}W n& t
y� |dur�tj � d� Y n80 z|�
|�\}}}W n t�y tj � d � Y n0 |�|||� tjdd� D ]�} | dd� d
k�r\|�| dd� � nt| dd� dk�r�d }
| dd� �r�|
d | dd� }
|�|
�} n0| d
k�r�|�|j � n|�d| tjj d� �q2|�� dS )z�Test program.
Usage: ftp [-d] [-r[file]] host [-l[dir]] [-d[dir]] [-p] [file] ...
-d dir
-l list
-p password
r{ r Nr z-dz-rr z5Could not open account file -- using anonymous login.z$No account -- using anonymous login.z-lZCWDr� z-pr� i )rH r2 �argvr= �testr� �exit�netrcr rA r( �stderr�writeZauthenticators�KeyErrorr r� rr rD rB r� �stdoutr' ) r� r< Zrcfiler ZftpZuseridr r! Znetrcobjr9 rq rf r r r r� � sR
�
"
�r� �__main__)r r� )%r� r2 r4 r �__all__rm r� r� � Exceptionr r r r r r( r) r rO rl r r� � ImportErrorr� r� r� r� ZSSLErrorr� r� r� r� r� r� r� r� r� r r r r r �<module> sN &
^
}
9