Dashboard
PHP:
8.2.30
OS:
Linux
User:
dh_nv8b2m
/
/
usr
/
lib
/
python3
/
dist-packages
/
numpy
/
distutils
/
fcompiler
/
__pycache__
📤 Upload
📝 New File
📁 New Folder
Close
Editing: gnu.cpython-310.pyc
o 6��aO � @ sF d dl Z d dlZd dlZd dlZd dlZd dlZd dlZd dlZd dlZd dlm Z m Z m Z d dl m Z d dlmZ d dlmZ ddgZe �d�Zd d � ZG d d� de�ZG d d� de�Zd d� Zedkr�d dlmZ d dl m Z e� d� e e d�� � � z e e d�� � � W dS e!y� Z" z e e"� W Y dZ"["dS dZ"["ww dS )� N)�Popen�PIPE�STDOUT)� filepath_from_subprocess_output)� FCompiler)� LooseVersion� GnuFCompiler�Gnu95FCompilerzTarget: ([a-zA-Z0-9_\-]*)c C s t jdko t�� d dkS )N�win32r �64bit)�sys�platform� architecture� r r �?/usr/lib/python3/dist-packages/numpy/distutils/fcompiler/gnu.py�is_win64 s r c @ s� e Zd ZdZdZdZdd� Zdd� Zdd gZd d gg d �d d g d �ddgdgg d �d�Z d Z d Z e j dkr=ejdkr=dgZejdkrNdD ] Ze e �d� qDdZdZdd� Zd d � Zd d � Zd d!� Zd"d#� Zd$d%� Zd&d'� Zd(d)� Z d*d+� Z d,d-� Z d S ).r �gnu)�g77zGNU Fortran 77 compilerc C s� |� d�r||�d�d d� �� }|� d�st|�dkr?t�d|�}|r>|� d�r1d|�d�fS |�� d kr>d |�d�fS n3t�d |�}|rNd |�d�fS t�d |�}|rr|�d�}|� d �sj|� d�sj|� d�rnd|fS d |fS d}t|| ��)z6Handle the different versions of GNU fortran compilerszgfortran: warning� � N� z ([0-9.]+)z GNU Fortranr r �gfortranz GNU Fortran\s+95.*?([0-9-.]+)z%GNU Fortran.*?\-?([0-9-.]+\.[0-9-.]+)�0�2�3z6A valid Fortran version was not found in this string: ) � startswith�find�strip�len�re�search�group�start� ValueError)�self�version_string�m�v�errr r r �gnu_version_match s2 � � � � z GnuFCompiler.gnu_version_matchc C s& | � |�}|r |d dkrd S |d S )Nr r r )r) )r$ r% r' r r r � version_matchL s zGnuFCompiler.version_matchr �f77N� -dumpversion)N�-g�-Wall�-fno-second-underscore)Nr- r. �ar�-cr�ranlib�� version_cmd� compiler_f77� compiler_f90� compiler_fix� linker_so�archiverr2 � linker_exe�nt�cygwinz-fPICr )r4 r5 r8 r: � -mno-cygwin�g2c�gnu95c C s� | j dd � }tjdkr=tj�dd �}|s5dd l}|�d�}|s.d}d|� �}tj |dd� t |�tjd< |� g d �� n|� d � tj� d �rM|� d � |S ) Nr �darwin�MACOSX_DEPLOYMENT_TARGETr z10.9z.Env. variable MACOSX_DEPLOYMENT_TARGET set to � )� stacklevel)z -undefined�dynamic_lookupz-bundlez-shared�sunosz -mimpure-text)r8 r r �os�environ�get� sysconfig�get_config_var�warnings�warn�str�extend�appendr )r$ �opt�targetrI �sr r r �get_flags_linker_som s z GnuFCompiler.get_flags_linker_soc C sF z t �| jdg �}W n tt jfy Y d S w t|�}tj�|�S )Nz-print-libgcc-file-name) � subprocess� check_outputr5 �OSError�CalledProcessErrorr rF �path�dirname)r$ �outputr r r �get_libgcc_dir� s �� zGnuFCompiler.get_libgcc_dirc C s� t jd d� dkr d}n t jdkrd}nd }d }|rBd�|�g}z t�| j| �}W n ttjfy7 Y |S w t|�}t j � |�}|S )N� �linuxzlibgfortran.sor@ zlibgfortran.dylibz-print-file-name={0}) r r �formatrT rU r5 rV rW r rF rX rY )r$ �libgfortran_name�libgfortran_dir� find_lib_argrZ r r r �get_libgfortran_dir� s& �� z GnuFCompiler.get_libgfortran_dirc C s� g }t jd d� dkrd| �� }|rdt jdkr_|�d�s_tj�|�}tj�|d| j �}tj� |�s_tjj|gtj fd �R � }tj� tj�|d��}tj�|d| j �}tj� |�r_|� |� |� |� | � � }|ro|� |� |S )Nr\ r] r z/usr/libzlib%s.a� �lib)r r r[ r rF rX �normpath�joinr> �exists�pardir�abspathrO rb )r$ rP �drX �root�d2�lib_gfortran_dirr r r �get_library_dirs� s$ z GnuFCompiler.get_library_dirsc C s� g }| � � }|d ur&| jd }| j|| jf }tj�tj�||��s%| j}n| j}|d ur2|�|� | j }t j dkrF|rF|j dkrF|�d� t j dkrP|�d� |S )Nz-picr �msvc�gccr@ � cc_dynamic) r[ r> �static_lib_format�static_lib_extensionrF rX �isfilerf rO � c_compilerr r � compiler_type)r$ rP rj r> �fru r r r � get_libraries� s$ � zGnuFCompiler.get_librariesc C s dgS )Nr- r �r$ r r r �get_flags_debug� s z GnuFCompiler.get_flags_debugc C s0 | � � }|r|dkrdg}ndg}|�d� |S )Nz3.3.3z-O2z-O3z-funroll-loops)� get_versionrO )r$ r' rP r r r � get_flags_opt� s zGnuFCompiler.get_flags_optc C s^ ddl }z|�� d }W n ty g Y S w t�d�}g }|�|�D ]}|d|g7 }q$|S )z( Return detected arch flags from CFLAGS r N�CFLAGSz -arch\s+(\w+)�-arch)rI �get_config_vars�KeyErrorr �compile�findall)r$ rI �cflags�arch_re� arch_flags�archr r r � _c_arch_flags� s � zGnuFCompiler._c_arch_flagsc C s g S )Nr ry r r r �get_flags_arch� s zGnuFCompiler.get_flags_archc C sT t jdkrt�d|vs J �t jdkrd|� �S t jd d� dkr%d|� �S d|� �S ) Nr �,r@ z -Wl,-rpath,� �aixz-Wl,-blibpath:z -Wl,-rpath=)r r �NotImplementedError)r$ �dirr r r �runtime_library_dir_option� s z'GnuFCompiler.runtime_library_dir_option) �__name__� __module__� __qualname__rv �compiler_aliases� descriptionr) r* �possible_executables� executables�module_dir_switch�module_include_switchrF �namer r � pic_flags�keyrO r> �suggested_f90_compilerrS r[ rb rn rx rz r| r� r� r� r r r r r sF -� # c @ s e Zd ZdZdZdZdd� ZddgZdd gg d �g d �g d �g d �d dgdgddgd�ZdZ dZ e j dd� dkrXed � d� e �� d dd� dkrXd D ] Zee � d � qNdZd d � Zd d!� Zd"d#� Zd$d%� Zd&d'� Zd(d)� Zd*d+� Zd,d-� Zd.d/� Zd0d1� ZdS )2r r? )r zGNU Fortran 95 compilerc C s` | � |�}|r |d dkrd S |d }t|�dkr |S tjdkr.dD ] }| j| �d� q#|S )Nr r r �4r )r4 r5 r6 r7 r8 r: r= )r) r r r r� rO )r$ r% r' r� r r r r* s �z Gnu95FCompiler.version_matchr �f95�<F90>r, )Nr. r- z -ffixed-formr/ )Nr. r- r/ )r� r. r- r0 r1 r2 Nr. r3 z-Jz-Ir� r� r8 z -lpthreadr rB �64)r5 r6 r7 r8 r: z-maix64c C s^ t jdksg S g }| �� }d|v rd||�d�< dD ]}t||�r,||v r,|�d|g� q|S )z>Return a list of -arch flags for every supported architecture.r@ �i386�i686)�ppcr� �x86_64�ppc64r~ )r r r� �index� _can_targetrN )r$ �cmdr� �c_archsr� r r r �_universal_flags< s �z Gnu95FCompiler._universal_flagsc C �* t �| �}| �| j�}|r||d d�< |S �Nr )r � get_flagsr� r6 �r$ �flagsr� r r r r� L � zGnu95FCompiler.get_flagsc C r� r� )r rS r� r8 r� r r r rS S r� z"Gnu95FCompiler.get_flags_linker_soc C s� t �| �}tjdkrM| j}|rM|jdkrM| �� }|rMtj� | � � �}tjj |gtj fd �R � }tj� |d�}tj� |�}tj� tj� |d��rM|�|� | �� }|rX|�|� |S )Nr ro rc rd z libmingwex.a)r rn r r ru rv � get_targetrF rX re r[ rf rh rg rO rb ) r$ rP ru rQ rj rk rX �mingwdirrm r r r rn Z s z Gnu95FCompiler.get_library_dirsc C s� t �| �}tjdkr|�d� tjdkrD| j}|r7|jdkr7d|v r7|�d�}|�|d d� |�|d d� | j}|rC|jdkrCg S |S ) Nr@ rq r ro rp r �mingwex�mingw32) r rx r r �removeru rv r� �insert)r$ rP ru �ir r r rx m s z Gnu95FCompiler.get_librariesc C sV z t �| jdg �}W n tt jfy Y dS w t|�}t�|�}|r)|�d�S dS )Nz-vr � ) rT rU r5 rV rW r �TARGET_Rr r! )r$ rZ r& r r r r� s � zGnu95FCompiler.get_targetc C s| t �� }|D ]&}t|d��} |�d�}|sn|�|� qW d � n1 s'w Y qt�|�� �}|�d�}|� d�S )N�rbTi �ascii�=) �hashlib�sha1�open�read�update�base64� b32encode�digest�decode�rstrip)r$ � filenames�h�fnrw �block�textr r r � _hash_files� s � �� zGnu95FCompiler._hash_filesc C s\ | j }|jdkr td��| �t|�t|� �}t� r d}nd}dtj�tj� |d ��d dd� } | d | d | } | d } | d } | d } tj� || �}tj� || �}tj� || �}tj� |�rh||fS |rtdgt|� dg }| j || |t|�dd| ddddg d� t� r�d}nd}d| d| |g}|j s�|�� |�|jg| � ||fS )zeCreate a wrapper shared library for the given objects Return an MSVC-compatible lib ro z This method only supports MSVC� win_amd64r rd r N� �.z .gfortran-z.dllz.defz.libz-Wl,--whole-archivez-Wl,--no-whole-archivez -Wl,--allow-multiple-definitionz-Wl,--output-def,z-Wl,--export-all-symbolsz-Wl,--enable-auto-importz-staticz-mlong-double-64)� output_dir�extra_postargsz /MACHINE:X64z /MACHINE:X86z/def:z/OUT:)ru rv r# r� �listr rF rX �splitext�basenamerf rt �link_shared_object� initialized� initialize�spawnrd )r$ �objectsr� � extra_dll_dir� chained_dlls� is_archiveru � object_hash�tagr� � root_name�dll_name�def_name�lib_name�dll_path�def_path�lib_path� specifier�lib_argsr r r �_link_wrapper_lib� s` ��� ���z Gnu95FCompiler._link_wrapper_libc C s |j dvS )N)ro )rv )r$ �compilerr r r �can_ccompiler_link� s z!Gnu95FCompiler.can_ccompiler_linkc C s� | j jdkr]g }g }|D ]}|�� �d�r|�|� q |�|� q g }g }|ddd� D ]} | j| g|||dd�\} } |�d| � |�d| � q,|sL|S | j||||dd�\} } | g| S td ��) z� Convert a set of object files that are not compatible with the default linker, to a file that is compatible. ro z.aN���T)r� r� r FzUnsupported C compiler)ru rv �lower�endswithrO r� r� r# ) r$ r� r� r� �archives� plain_objects�obj� chained_libsr� �archiverd �dllr r r �wrap_unlinkable_objects� s< � � z&Gnu95FCompiler.wrap_unlinkable_objects)r� r� r� rv r� r� r* r� r� r� r� r r rO r r� r> r� r� rS rn rx r� r� r� r� r� r r r r r sB � > c C s� | dd� }t jdd�\}}t�|� zQtj�|�}tj�|�d d }z3|�d|d|g� t|t t |d�}|� � |j dkW tj� |�rQt�|� W t�|� S W t�|� S tj� |�rdt�|� w w t�|� w ) z7Return true if the architecture supports the -arch flagNz.f)�suffixr z.or~ z-c)�stderr�stdout�cwd)�tempfile�mkstemprF �closerX rY r� rN r r r � communicate� returncoderg r� )r� r� �newcmd�fid�filenamerj rZ �pr r r r� s( � � � r� �__main__)�log)�customized_fcompilerrB r �g95)#r rF r rK r r� r� r� rT r r r � numpy.distutils.exec_commandr �numpy.distutils.fcompilerr �distutils.versionr � compilersr� r� r r r r� r� � distutilsr �numpy.distutilsr � set_verbosity�printr{ � Exception�er r r r �<module> sB q ���
Save
Cancel