a
    p=ic                     @   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rd d	lmZ ed
 eedd  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xlfZxlf90z-qfixedZxlf95arz-crranlib)Zversion_cmdZcompiler_f77Zcompiler_fixZcompiler_f90	linker_soarchiverr
   c           
   	      s  t j| g|R i |}|d u rtjdrtd}td}tj|rtj|rzt	
|ddg}W n tt	jfy   Y n0 td|}|r|d}d |d u rtj rtt }|   fd	d
|D }|rddlm}	 |	|d  | _}|S )Naixlslppr   z-LcZ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Zxlf_dir n/home/droni/.local/share/virtualenvs/DPS-5Je3_V2c/lib/python3.9/site-packages/numpy/distutils/fcompiler/ibm.py
<listcomp>5       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reverseZdistutils.versionr   r   )
selfargskwdsr   r   r   omlr   r   r   r   r      s(    zIBMFCompiler.get_versionc                 C   s   dgS )Nz	-qextnamer   r,   r   r   r   	get_flags;   s    zIBMFCompiler.get_flagsc                 C   s   dgS )Nz-gr   r2   r   r   r   get_flags_debug>   s    zIBMFCompiler.get_flags_debugc           
      C   s   g }t jdkr|d n
|d | jddgd}|d urt jdrNd}nd	| }td
d\}}td|  t|dR}t	
dj}|D ]0}||}	|	r|d|	d  q|| qW d    n1 s0    Y  |  |d|  |S )Ndarwinz/-Wl,-bundle,-flat_namespace,-undefined,suppressz-bsharedr   (   )Z	ok_statusr   z/etc/xlf.cfgz/etc/opt/ibmcmp/xlf/%s/xlf.cfgz_xlf.cfg)suffixz	Creating rz \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)
r,   optr   Zxlf_cfgfoZnew_cfgfiZ
crt1_matchliner0   r   r   r   get_flags_linker_soA   s*    

*z IBMFCompiler.get_flags_linker_soc                 C   s   dgS )Nz-O3r   r2   r   r   r   get_flags_opt[   s    zIBMFCompiler.get_flags_optN)__name__
__module____qualname__compiler_typedescriptionZversion_patternZexecutablesr   r3   r4   rD   rE   r   r   r   r   r      s    
__main__)customized_fcompiler   r   )compiler)r   r%   r   r!   Znumpy.distutils.fcompilerr   Znumpy.distutils.exec_commandr   Znumpy.distutils.misc_utilr   	distutilsr   Z	compilersr   rF   Znumpy.distutilsrL   set_verbosityprintr   r   r   r   r   <module>   s   Q
