Dashboard
PHP:
8.2.30
OS:
Linux
User:
dh_nv8b2m
/
/
usr
/
share
/
dput
/
dput
/
__pycache__
📤 Upload
📝 New File
📁 New Folder
Close
Editing: dcut.cpython-310.pyc
o ��dS � @ s� d Z ddlZddlZddlZddlZddlZddlZddlZddlZddl Z ddl m Z ddl m Z dZdd� Zd d � Zd d � Zd d� Zdd� Zdd� Zdd� Zdd� ZdS )u& dcut — Debian command upload tool. � N� )�dput)� dputhelper)�rm�cancel� reschedulec C s t �d�t�tj� } | S )z& Make the program usage help message. aO Usage: %s [options] [host] command [, command] Supported options (see man page for long forms): -c file Config file to parse. -d Enable debug messages. -h Display this help message. -s Simulate the commands file creation only. -v Display version information. -m maintaineraddress Use maintainer information in "Uploader:" field. -k keyid Use this keyid for signing. -O file Write commands to file. -U file Upload specified commands file (presently no checks). -i changes Upload a commands file to remove files listed in .changes. Supported commands: mv, rm (No paths or command-line options allowed on ftp-master.) )�textwrap�dedentr � get_progname�sys�argv)�text� r � /usr/share/dput/dput/dcut.py�make_usage_message s �r c C s� d}| d r t j�d� dtjv rEtjd �d�dk r2tj�dd�}|r(|d 7 }|d tjd 7 }ntjd }| d rCt j�d | � |S d tjv r~tjd �d�dk rktj�dd�}|ra|d 7 }|d tjd 7 }ntjd }| d r|t j�d | � |S | d r�t j�d � t�t� � �}|d }|d � d�d }z t d�� � � � }W n ty� d}Y nw |s�| d r�t j�d� tjddtjd�}t�|j�}|� � � � }|r�d|||f }| d r�t j�d| � |S | d r�t j�d� |S )u5 Get the system value for the ‘uploader’ option. N�debugz3D: trying to get maintainer email from environment �DEBEMAIL�<r � DEBFULLNAME� � z<%s>zD: Uploader from env: %s �EMAILzD: Guessing uploader � �,z /etc/mailnamez2D: Guessing uploader: /etc/mailname was a failure z/bin/hostname --fqdnT)�shell�stdoutz %s <%s@%s>zD: Guessed uploader: %s zD: Couldn't guess uploader )r r �write�os�environ�find�get�pwd�getpwuid�getuid�split�open�read�strip�IOError� subprocess�Popen�PIPEr �make_text_stream)�options�uploader�pwrec�username�fullname�hostname�hostname_subprocess�hostname_stdoutr r r �get_uploader_from_system5 s~ � �+ � � � ���� ��� r5 c C s� ddd d d d dd d d d� } t �tj�}t �� }dtjdd � v s)dtjdd � v r7d| d< tj�d||f � t �tjdd � dg d ��\}}|D ]�\}}| d r[tj�d ||f � |d v rmtj�t� � t� t j � qI|d v r�tj�d ||f � t� t j � qI|dv r�d| d< qI|dv r�|| d< qI|dv r�|| d< qI|dv r�|| d< qI|dv r�d| d< qI|dv r�d| d< qI|dv r�|| d< qI|dv r�|| d < qI|d kr�|| d < qI|d v r�|| d < qItj �d!|||f � t� d� qI| d �s|�r|d t v�r|d | d < | d �rtj�d"| d � |d= | d �s t| �| d< | d �sG| d �s.| d �rGtj �d#| � tj �d$t|�d% � t� d� | |fS )&Nr ) r �simulate�config�hostr. �keyid�passive� filetocreate� filetoupload�changes�-dr �--debugr z D: %s %s zc:dDhsvm:k:PU:O:i:) zconfig=r �helpr6 �versionzhost=zmaintainteraddress=zkeyid=r: zupload=zoutput=zinput=z$D: processing arg "%s", option "%s" )z-hz--help)z-vz --versionz%s %s )r> r? )z-cz--configr7 )z-mz--maintaineraddressr. )z-kz--keyidr9 )z-sz --simulater6 )z-Pz --passiver: )z-Uz--uploadr< )z-Oz--outputr; z--hostr8 )z-iz--inputr= z2%s internal error: Option %s, argument %s unknown z'D: first argument "%s" treated as host zB%s error: command file cannot be created without maintainer email z>%s please set $DEBEMAIL, $EMAIL or use the "-m" option r )r r r r �get_distribution_versionr r �getoptr �exitr �EX_OK�stderr� validcommandsr5 �len)r- �prognamerA �opts� arguments�option�argr r r � getoptionsu s� � $ � � �� �� ����� �� rN c C sJ g }| d d � } | � d� g }| r�| d tv r8| d g}| d dkr7t| �dkr2| d dkr2| d= n_|� d� nY|sO| d dkrOtj�d| d � t�d� t| d �d dv rh|� | d dd� � d | d< | d dv r�|r�|d rtj�d d � |� � |� d � |�� g }n|� | d � | d= | s|s�tj�d � t�d� |S )Nr r r z--nosearchdirsz --searchdirsz(Error: Could not parse commands at "%s" ���)r �;r r r z$D: Successfully parsed command "%s" r z'Error: no arguments given, see dcut -h ) �appendrG rH r rF r rD �strr �join)rK r- r7 �commands�curargr r r �parse_queuecommands� sL ��� ��� rV c C sj t �tj�}|d r|d }n?td��tttd���t j t j }dt j t j }t� ||�}|d � |�} |d| tt�� �t�� f }|rNtj�||�}t|d�} | �d|d � | �d d �| � � | �� d g} | �d |d � |d r�| �d|d � | �d| � |d r�tj�d| � zt�| � W |S tjy� tj�d� t� d� Y |S w )aX Write a file of commands for the upload queue daemon. :param commands: Commands to write, as a sequence of text strings. :param options: Program configuration, as a mapping of options `{name: value}`. :param config: `ConfigParser` instance for this application. :param tempdir: Filesystem path to directory for temporary files. :return: Filesystem path of file which was written. Write the specified sequence of commands to a file, in the format required for the Debian upload queue management daemon. Once writing is finished, the file is signed using the 'debsign' command. If not specified in the configuration option 'filetocreate', a default filename is generated. In either case, the resulting filename is returned. r; r � � ________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________r. z.%s.%d.%d.commands�wz Uploader: %s zCommands: %s z �debsignz-m%sr9 z-k%sz%sr zD: calling debsign: %s zError: debsign failed. r ) r r r r rR rS �map�chr�range�string� ascii_letters�digits� maketrans� translate�int�timer �getpid�pathr% r �closerQ r r) � check_call�CalledProcessErrorrF rD ) rT r- r7 �tempdirrI �filename�translationorig�translationdest�translationmap�uploadpartforname�f�debsign_cmdliner r r �write_commands� sJ ��� �� � �rr c C s4 |� | d�dkr d}n|� | d�}|r tj�d|� dd� � |� dd�|vr8tj�d|� dd� � t�d� |rFtj�d |� | d� � |� | d�|vr_tj�d|� | d� � t�d� |� | d�sl|� dd�}n|� | d�}|�| d �r�|� | d �d kr�|� | d �} nG|�dd �r�|� dd �d kr�|� dd �} n2d tjv r�tjd } ntj�d � t � t� � �d } |r�tj�dt� � � |r�tj�d| | f � |r�tj�d| � |� | d�} |�s}|r�tj�d| � tj�d| � tj�d| � |dk�r4|� | d�} |dk�r d} | dk�r'|�r'|dk�r!tj�d� ntj�d� || || | ||| � d'S |dk�rp|�rI|� | d��rItj�d � |� | d�} d d � d d � |� | d!�� d"�D �D �} || || | ||| | � d'S || || | ||d� d'S |D ]}tj�d#|||| f � tjd$| d%d&� �qd'S )(ap Upload files to the host. :param host: Configuration host name. :param upload_methods: Mapping of {method_name: callable}. :param config: `ConfigParser` instance for this application. :param debug: If true, enable debugging output. :param simulate: If true, simulate the upload only. :param files_to_upload: Collection of file names to upload. :param ftp_passive_mode: If true, enable FTP passive mode. :return: ``None``. Upload the specified files to the host, using the method and credentials from the configuration for the host. �method�local� localhost�fqdnzD: Default Method: %s �DEFAULTzUnknown upload method: %s r zD: Host Method: %s �loginr0 �USERz+$USER not set, will use login information. r zD: User-ID: %s z4D: Neither host %s nor default login used. Using %s zD: Login to use: %s �incomingz D: FQDN: %s z D: Login: %s zD: Incoming: %s �ftp� passive_ftpzD: Using passive ftp zD: Using active ftp �scp� scp_compressz D: Setting compression for scp c S s g | ]}|r|�qS r r )�.0�yr r r � <listcomp>� s ��z0upload_stolen_from_dput_main.<locals>.<listcomp>c s s � | ]}|� � V qd S )N)r' )r �xr r r � <genexpr>� s � �z/upload_stolen_from_dput_main.<locals>.<genexpr>�ssh_config_options� z Uploading with %s: %s to %s:%s zcat %sT)r N)r r r r rF rD � has_optionr r r! r" r# � getbooleanr$ r) �call)r8 �upload_methodsr7 r r6 �files_to_upload�ftp_passive_moderv rs rx rz �ftp_moder~ r� � file_pathr r r � upload_stolen_from_dput_main. s� � �� � � � �� � ���� ���r� c C sv t � \} }| d rtj�d� t�| d | d �}| d sO|�dd�rO|�dd�| d< | d r9tj�d| d � | d sOd| d< | d rOtj�d | d � d }d }t� tj �}z�| d sj| d sjt j |d d �}| d s�| d s}tj�d� t� d� |�| d �s�tj�d| d � t� d� n$|�| d d�r�|�| d d�}n|�dd�}|s�tj�d� t� d� | d r�|r�tj�dd�|� � t� d� d }| d }|�d�s�tj�d| � n"| d r�tj}t| ||�} t| | ||�}n t|| |�}t|| ||�}| d �s$t�� t�� } t| d | || d | d |g| d � W |�r/t�|� d S d S |�r:t�|� w w )Nr z D: calling dput.read_configs r7 r8 rw �default_host_mainz'D: Using host "%s" (default_host_main) z ftp-masterz D: Using host "%s" (hardcoded) r< r; �.)�prefixz8Error: No host specified and no default found in config r zNo host %s found in config � allow_dcutz4Error: dcut is not supported for this upload queue. zLError: cannot take commands when uploading existing file, "%s" found r z .commandszXError: I'm insisting on the .commands extension, which "%s" doesnt seem to have. r= r6 r: )rN r r r r � read_configsr� r r r r �tempfile�mkdtemprD � has_sectionr� rS �endswith� parse_changes�create_commandsrr rV �import_upload_functionsr� �shutil�rmtree) r- rK r7 rj rk rI � dcut_allowedrT r� �removecommandsr� r r r �dcut� s� � ����� � � � � �� ��� �� � �r� c C s� | d }| d rt j�d| � zt|d�}W n ty- t j�d| � t �d� Y nw ||�}|j dtj� |� g}|d � � � d �D ] }|� � d }d| } | d rat j�d || f � |� | � qG|S ) u� Get the removal commands from a package changes file. Parse the specified ‘foo.changes’ file and returns commands to remove files named in it. r= r z1D: Parsing changes file (%s) for files to remove �rz Can't open changes file: %s r zrm --searchdirs �filesr� r z D: Will remove %s with '%s' ) r r r r% r( rD rg r rf �basenamer' r$ rQ ) r- r7 r� �changes_file_path� changes_filer= r� � file_specr� r r r r r� � s. �� � r� )�__doc__r r! r� r^ r) r r� r rd r r �helperr rG r r5 rN rV rr r� r� r� r r r r �<module> s* @X)8u Q
Save
Cancel