o
    "g                     @   s   d dl Z d dlZd dlZd dlZd dlmZ d dlmZ d dlm	Z	 d dl
mZ dgZG dd deZedkrMd d	lmZ ed
 eedd  dS dS )    N)	FCompiler)find_executable)make_temp_file)logIBMFCompilerc                   @   sh   e Zd ZdZdZdZddgdgddgdgd	gd
dgdgdZdd Zdd Zdd Z	dd Z
dd ZdS )r   ibmzIBM XL Fortran Compilerzo(xlf\(1\)\s*|)IBM XL Fortran ((Advanced Edition |)Version |Enterprise Edition V|for AIX, V)(?P<version>[^\s*]*)z<F77>z	-qversionxlfxlf90z-qfixedxlf95arz-crranlib)version_cmdcompiler_f77compiler_fixcompiler_f90	linker_soarchiverr   c           
   	      s  t j| g|R i |}|d u rNtjdrNtd}td}tj|rNtj|rNz
t	
|ddg}W n tt	jfy@   Y nw td|}|rN|d}d |d u rtj rtt }|   fd	d
|D }|rddlm}	 |	|d  | _}|S )Naixlslppr   z-Lcxlfcmpz xlfcmp:(?P<version>\d+([.]\d+)+)versionz/etc/opt/ibmcmp/xlfc              	      s(   g | ]}t jt j |d r|qS )zxlf.cfg)ospathisfilejoin).0dxlf_dir _/var/www/html/ecg_monitoring/venv/lib/python3.10/site-packages/numpy/distutils/fcompiler/ibm.py
<listcomp>5   s   ( z,IBMFCompiler.get_version.<locals>.<listcomp>r   )LooseVersion)r   get_versionsysplatform
startswithr   r   r   exists
subprocesscheck_outputOSErrorCalledProcessErrorresearchgroupisdirsortedlistdirreversedistutils.versionr"   r   )
selfargskwdsr   r   r   omlr"   r   r   r    r#      s*   zIBMFCompiler.get_versionc                 C      dgS )Nz	-qextnamer   r4   r   r   r    	get_flags;      zIBMFCompiler.get_flagsc                 C   r:   )Nz-gr   r;   r   r   r    get_flags_debug>   r=   zIBMFCompiler.get_flags_debugc           
      C   s   g }t jdkr|d n|d | jddgd}|d uryt jdr'd}nd	| }td
d\}}td|  t|)}t	
dj}|D ]}||}	|	rY|d|	d  qF|| qFW d    n1 siw   Y  |  |d|  |S )Ndarwinz/-Wl,-bundle,-flat_namespace,-undefined,suppressz-bsharedr   (   )	ok_statusr   z/etc/xlf.cfgz/etc/opt/ibmcmp/xlf/%s/xlf.cfgz_xlf.cfg)suffixz	Creating z \s*crt\s*=\s*(?P<path>.*)/crt1.ozcrt = %s/bundle1.o
r   z-F)r$   r%   appendr#   r&   r   r   infoopenr,   compilematchwriter.   close)
r4   optr   xlf_cfgfonew_cfgfi
crt1_matchliner8   r   r   r    get_flags_linker_soA   s.   


z IBMFCompiler.get_flags_linker_soc                 C   r:   )Nz-O3r   r;   r   r   r    get_flags_opt[   r=   zIBMFCompiler.get_flags_optN)__name__
__module____qualname__compiler_typedescriptionversion_patternexecutablesr#   r<   r>   rQ   rR   r   r   r   r    r      s"    
__main__)customized_fcompiler   r   )compiler)r   r,   r$   r(   numpy.distutils.fcompilerr   numpy.distutils.exec_commandr   numpy.distutils.misc_utilr   	distutilsr   	compilersr   rS   numpy.distutilsr[   set_verbosityprintr#   r   r   r   r    <module>   s    Q
