U
    ¸mœd  ã                   @   s¢   d dl Z d dlZd dlZd dlZ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 G dd„ dejƒZG dd„ deƒZG d	d
„ d
ejƒZG dd„ dejƒZdS )é    N)ÚIS_PYPYé   )Úutilc                   @   s¦   e Zd Ze dddd¡gZej dd 	d¡¡dd	„ ƒZ
ejjed
d�dd„ ƒZdd„ Zejjejdkdd�dd„ ƒZejjejdkdd�dd„ ƒZdd„ Zdd„ ZdS )ÚTestF77CallbackÚtestsÚsrcÚcallbackzfoo.fÚnamezt,t2ú,c                 C   s   |   |¡ d S ©N)Úcheck_function)Úselfr	   © r   úW/home/sam/Atlas/atlas_env/lib/python3.8/site-packages/numpy/f2py/tests/test_callback.pyÚtest_all   s    zTestF77Callback.test_allz,PyPy cannot modify tp_doc after PyType_Ready)Úreasonc                 C   s    t  d¡}| jjj|kst‚d S )NaË          a = t(fun,[fun_extra_args])

        Wrapper for ``t``.

        Parameters
        ----------
        fun : call-back function

        Other Parameters
        ----------------
        fun_extra_args : input tuple, optional
            Default: ()

        Returns
        -------
        a : int

        Notes
        -----
        Call-back functions::

            def fun(): return a
            Return objects:
                a : int
        )ÚtextwrapÚdedentÚmoduleÚtÚ__doc__ÚAssertionError)r   Úexpectedr   r   r   Útest_docstring   s    
zTestF77Callback.test_docstringc                 C   sL  t | j|ƒ}|dd„ ƒ}|dks$t‚|dd„ dd�}|dks@t‚|dd„ dd�}|d	ks\t‚|d
d„ dd�}|dksxt‚|dd„ tjfd�}|dks˜t‚|tjtjfd�}|dks¶t‚|| jjdd�}|dksÒt‚|| jjƒ}|dksêt‚|| jjjƒ}|dk�st‚G dd„ dƒ}|ƒ }||ƒ}|dk�s0t‚||j	ƒ}|dk�sHt‚d S )Nc                   S   s   dS )Né   r   r   r   r   r   Ú<lambda>6   ó    z0TestF77Callback.check_function.<locals>.<lambda>r   c                 S   s   dS ©Né   r   ©Úar   r   r   r   8   r   )é   )Zfun_extra_argsr   c                 S   s   | S r   r   r   r   r   r   r   :   r   r!   c                 S   s   d|  S r   r   r   r   r   r   r   <   r   )é   é   c                 S   s
   t  | ¡S r   )ÚmathÚdegreesr   r   r   r   r   >   r   é´   é   é   c                   @   s   e Zd Zdd„ Zdd„ ZdS )z)TestF77Callback.check_function.<locals>.Ac                 S   s   dS )Nr"   r   ©r   r   r   r   Ú__call__K   s    z2TestF77Callback.check_function.<locals>.A.__call__c                 S   s   dS )Né	   r   r)   r   r   r   ÚmthN   s    z-TestF77Callback.check_function.<locals>.A.mthN)Ú__name__Ú
__module__Ú__qualname__r*   r,   r   r   r   r   ÚAJ   s   r0   r"   r+   )
Úgetattrr   r   r$   Úpir%   ÚfuncZfunc0Z	_cpointerr,   )r   r	   r   Úrr0   r    r   r   r   r   4   s2    
zTestF77Callback.check_functionÚwin32z)Fails with MinGW64 Gfortran (Issue #9673)c                 C   s,   dd„ }t | jdƒ}||ƒ}|dks(t‚d S )Nc                 S   s   | dkrdS dS d S )Nr4   r   r   r   )Úcoder   r   r   r   Z   s    z6TestF77Callback.test_string_callback.<locals>.callbackZstring_callbackr   )r1   r   r   )r   r   Úfr4   r   r   r   Útest_string_callbackW   s    z$TestF77Callback.test_string_callbackc                 C   sh   t  dd¡}t  dd¡}t  dgd¡}dd„ }t| jdƒ}|||fD ]}||||jƒ}|d	ksDt‚qDd S )
N)r   ÚS8)r   é   ÚcÚ c                 S   s4   | j |fkrdS | jdkrdS t | dk¡s0dS dS )Nr   r9   é   r   é   r   )ÚshapeÚdtypeÚnpÚall)ÚcuZlencur   r   r   r   l   s    
z<TestF77Callback.test_string_callback_array.<locals>.callbackZstring_callback_arrayr   )rA   ZzerosÚarrayr1   r   Úsizer   )r   Zcu1Zcu2Zcu3r   r7   rC   Úresr   r   r   Útest_string_callback_arrayd   s    	z*TestF77Callback.test_string_callback_arrayc                    sp   g ‰‡fdd„‰ ‡ ‡‡fdd„‰‡fdd„dD ƒ}|D ]}|  ¡  q6|D ]}| ¡  qHd ˆ¡‰ˆrltˆƒ‚d S )	Nc                     s*   t  d¡ ˆ j dd„ ¡} | dks&t‚dS )Ngü©ñÒMbP?c                   S   s   dS ©Né{   r   r   r   r   r   r   …   r   z?TestF77Callback.test_threadsafety.<locals>.cb.<locals>.<lambda>rI   é*   )ÚtimeÚsleepr   r   r   )r4   r)   r   r   Úcb   s    
z-TestF77Callback.test_threadsafety.<locals>.cbc                    s\   z4t dƒD ]&}ˆj ˆ ¡}|dks&t‚ˆ | ¡ q
W n" tk
rV   ˆ t ¡ ¡ Y nX d S )Né2   rJ   )	Úranger   r   r   r   Ú	ExceptionÚappendÚ	tracebackÚ
format_exc)r	   Újr4   )rM   Úerrorsr   r   r   ÚrunnerŠ   s    z1TestF77Callback.test_threadsafety.<locals>.runnerc                    s*   g | ]"}t d ƒD ]}tjˆ |fd�‘qqS )é   )ÚtargetÚargs)rO   Ú	threadingÚThread)Ú.0ÚargÚn)rV   r   r   Ú
<listcomp>“   s    
 ÿz5TestF77Callback.test_threadsafety.<locals>.<listcomp>)r   Út2z

)ÚstartÚjoinr   )r   Úthreadsr   r   )rM   rU   rV   r   r   Útest_threadsafetyz   s    	
þ


z!TestF77Callback.test_threadsafetyc              
   C   sj  z| j  d¡ W n4 tk
rD } zt|ƒ d¡s4t‚W 5 d }~X Y nX z| j  d¡ W n4 tk
rŠ } zt|ƒ d¡szt‚W 5 d }~X Y nX dd„ | j _| j  d¡}|dks°t‚dd„ | j _| j  d¡}|dksÔt‚| j `z| j  d¡ W n8 tk
�r" } zt|ƒ d¡�st‚W 5 d }~X Y nX dd
d„| j _| j  d¡}|dk�sLt‚| j  d¡}|dk�sft‚d S )Nr=   zCallback global_f not definedz!cb: Callback global_f not definedc                 S   s   | d S )Nr   r   ©Úxr   r   r   r   ­   r   z6TestF77Callback.test_hidden_callback.<locals>.<lambda>r>   c                 S   s   | d S )Nr=   r   re   r   r   r   r   ±   r   r   r   c                 S   s   | d S )Nr>   r   re   r   r   r   r   »   r   r   )r   )r   Zhidden_callbackrP   ÚstrÚ
startswithr   Zhidden_callback2Zglobal_f)r   Úmsgr4   r   r   r   Útest_hidden_callback¢   s0    $$&z$TestF77Callback.test_hidden_callbackN)r-   r.   r/   r   ÚgetpathÚsourcesÚpytestÚmarkZparametrizeÚsplitr   Zxfailr   r   r   ZskipifÚsysÚplatformr8   rG   rd   rj   r   r   r   r   r      s$   
ÿ
#ÿ
ÿ
(r   c                   @   s   e Zd ZdZdgZdS )ÚTestF77CallbackPythonTLSz[
    Callback tests using Python thread-local storage instead of
    compiler-provided
    z-DF2PY_USE_PYTHON_TLSN)r-   r.   r/   r   Úoptionsr   r   r   r   rr   Ä   s   rr   c                   @   s&   e Zd Ze dddd¡gZdd„ ZdS )ÚTestF90Callbackr   r   r   zgh17797.f90c                 C   s<   dd„ }t jdddgt jd�}| j ||¡}|dks8t‚d S )Nc                 S   s   | d S rH   r   re   r   r   r   ÚincrÑ   s    z*TestF90Callback.test_gh17797.<locals>.incrr   r=   r>   )r@   é�   )rA   rD   Zint64r   Zgh17797r   )r   ru   Úyr4   r   r   r   Útest_gh17797Ð   s    zTestF90Callback.test_gh17797N)r-   r.   r/   r   rk   rl   rx   r   r   r   r   rt   Í   s   rt   c                   @   s*   e Zd ZdZe dddd¡gZdd„ ZdS )	ÚTestGH18335zäThe reproduction of the reported issue requires specific input that
    extensions may break the issue conditions, so the reproducer is
    implemented as a separate test class. Do not extend this test with
    other tests!
    r   r   r   zgh18335.f90c                 C   s$   dd„ }| j  |¡}|dks t‚d S )Nc                 S   s   | d  d7  < d S )Nr   r   r   re   r   r   r   Úfooâ   s    z%TestGH18335.test_gh18335.<locals>.fooé|   )r   Zgh18335r   )r   rz   r4   r   r   r   Útest_gh18335á   s    zTestGH18335.test_gh18335N)r-   r.   r/   r   r   rk   rl   r|   r   r   r   r   ry   Ù   s   ry   )r$   r   rp   rm   rZ   rR   rK   ÚnumpyrA   Znumpy.testingr   r<   r   ZF2PyTestr   rr   rt   ry   r   r   r   r   Ú<module>   s    7	