Файловый менеджер - Редактировать - /opt/imh-python/lib/python3.9/site-packages/numpy/f2py/tests/__pycache__/test_crackfortran.cpython-39.pyc
Ðазад
a e�h�4 � @ sj d dl Z d dlZd dlZd dlZd dlZd dlZd dlmZm Z ddl m Z d dl m Z d dlZd dlZd dlZG dd� de j�ZG dd � d �ZG d d � d �ZG d d � d e j�ZG dd� de j�ZG dd� d�ZG dd� de j�ZG dd� d�ZG dd� de j�ZG dd� de j�ZG dd� de j�Z G d d � d �Z G d d � d e j�Z G d d!� d!e j�Z G d"d#� d#�Z dS )$� N)�markinnerspaces�nameargspattern� )�util)� crackfortranc @ s& e Zd Ze�dddd�gZdd� ZdS )� TestNoSpace�tests�srcr z gh15035.fc C s� t jg d�t jd�}t jg d�t jd�}| j�|� t �||d �sHJ �| j�||g� t �||d �slJ �| j�d�dks�J �d S )N)r � � )Zdtyper Z23� 2)�np�arrayZfloat64�moduleZsubbZallcloseZsubc�t0)�self�k�w� r ��/root/rpmbuild/BUILDROOT/imh-python39-modules-3.9.7-92.el8.x86_64/opt/imh-python/lib/python3.9/site-packages/numpy/f2py/tests/test_crackfortran.py� test_module s zTestNoSpace.test_moduleN)�__name__� __module__� __qualname__r �getpath�sourcesr r r r r r s r c @ s, e Zd Zdd� Zdd� Zdd� Zdd� Zd S ) �TestPublicPrivatec C s� t �dddd�}t�t|�g�}t|�dks0J �|d }d|d d d v sPJ �d |d d d vshJ �d|d d d v s�J �d |d d d vs�J �d|d d d vs�J �d |d d d v s�J �d S )Nr r r zprivatemod.f90r r �private�vars�a�attrspec�public�b�seta�r r r �str�len)r �fpath�modr r r �test_defaultPrivate s z%TestPublicPrivate.test_defaultPrivatec C s� t �dddd�}t�t|�g�}t|�dks0J �|d }d|d d d v sPJ �d |d d d vshJ �d|d d d vs�J �d |d d d v s�J �d S ) Nr r r z publicmod.f90r r r r r r r! r# r$ �r �tmp_pathr' r( r r r �test_defaultPublic+ s z$TestPublicPrivate.test_defaultPublicc C s� t �dddd�}t�t|�g�}t|�dks0J �|d d }t|d d �d d hksXJ �t|d d �d d hkstJ �t|d d �d hks�J �d S )Nr r r zaccesstype.f90r r r r r r zbind(c)Zb_r! �c)r r r r% r& �set)r r+ r' r( �ttr r r �test_access_type5 s z"TestPublicPrivate.test_access_typec C sJ t �dddd�}t�t|�g�}t|�dks0J �t�|�}d|vsFJ �d S )Nr r r z gh23879.f90r �bar)r r r r% r& Z crack2fortran)r r+ r' r( Zpyfr r r � test_nowrap_private_proceedures> s z1TestPublicPrivate.test_nowrap_private_proceeduresN)r r r r) r, r0 r2 r r r r r s r c @ s e Zd Zdd� Zdd� ZdS )�TestModuleProcedurec C s2 t �dddd�}t�t|�g�}t|�dks0J �|d }d|v rPt|d �dksTJ �|d d d d kslJ �d |d d v s�J �|d d d d d gks�J �|d d d dks�J �d |d d v s�J �|d d d dgks�J �|d d d dks�J �d |d d v �sJ �|d d d ddgk�s.J �d S )Nr r r z operators.f90r r �body� �namezoperator(.item.)Z implementedbyZitem_intZ item_realr z operator(==)Zitems_are_equalr z assignment(=)Zget_intZget_realr$ r* r r r �test_moduleOperatorsF s$ ��z(TestModuleProcedure.test_moduleOperatorsc C s� t �dddd�}t�t|�g�}t|�dks0J �|d }|d d d d gksRJ �|d d d d gkslJ �|d d d d gks�J �d S )Nr r r zpubprivmod.f90r r r r r r r" r! r# r$ r* r r r �test_notPublicPrivateX s z)TestModuleProcedure.test_notPublicPrivateN)r r r r7 r8 r r r r r3 E s r3 c @ s. e Zd Ze�dddd�gZdd� Zdd� Zd S ) � TestExternalr r r z gh17859.fc C s$ dd� }| j �|�}|dks J �d S )Nc S s | d S �N�{ r ��xr r r �incrg s z5TestExternal.test_external_as_statement.<locals>.incrr; )r Zexternal_as_statement�r r> �rr r r �test_external_as_statementf s z'TestExternal.test_external_as_statementc C s$ dd� }| j �|�}|dks J �d S )Nc S s | d S r: r r< r r r r> n s z5TestExternal.test_external_as_attribute.<locals>.incrr; )r Zexternal_as_attributer? r r r �test_external_as_attributem s z'TestExternal.test_external_as_attributeN)r r r r r r rA rB r r r r r9 b s r9 c @ s& e Zd Ze�dddd�gZdd� ZdS )�TestCrackFortranr r r z gh2848.f90c C s | j �dd�}|dksJ �d S )Nr r )r r )r Zgh2848)r r@ r r r � test_gh2848y s z TestCrackFortran.test_gh2848N)r r r r r r rD r r r r rC u s rC c @ s, e Zd Zdd� Zdd� Zdd� Zdd� Zd S ) �TestMarkinnerspacesc C s& g d�}|D ]}t |�|ks J �q d S )N)za z aza b cz 'abcdefghij'�r )r Z test_list�ir r r � test_do_not_touch_normal_spaces� s z3TestMarkinnerspaces.test_do_not_touch_normal_spacesc C s$ t d�dksJ �t d�dks J �d S )Nz a 'b c' \' \'za 'b@_@c' \' \'z a "b c" \" \"za "b@_@c" \" \"rF �r r r r �test_one_relevant_space� s z+TestMarkinnerspaces.test_one_relevant_spacec C s$ t d�dksJ �t d�dks J �d S )Nza 'b c" " d' eza 'b@_@c"@_@"@_@d' eza "b c' ' d" eza "b@_@c'@_@'@_@d" erF rI r r r �test_ignore_inner_quotes� s z,TestMarkinnerspaces.test_ignore_inner_quotesc C s$ t d�dksJ �t d�dks J �d S )Nz a 'b c' 'd e'za 'b@_@c' 'd@_@e'z a "b c" "d e"za "b@_@c" "d@_@e"rF rI r r r � test_multiple_relevant_spaces� s z1TestMarkinnerspaces.test_multiple_relevant_spacesN)r r r rH rJ rK rL r r r r rE ~ s rE c @ s� e Zd ZdZdZe�d�Zg d�ZdgZ ee Z dZ e e �D ]6\Z Zdd� e�d �D �Ze eje ed �e�d �7 Z q<ej�d e �d d� �Zej�d e �dd� �ZdS )� TestDimSpeca� This test suite tests various expressions that are used as dimension specifications. There exists two usage cases where analyzing dimensions specifications are important. In the first case, the size of output arrays must be defined based on the inputs to a Fortran function. Because Fortran supports arbitrary bases for indexing, for instance, `arr(lower:upper)`, f2py has to evaluate an expression `upper - lower + 1` where `lower` and `upper` are arbitrary expressions of input parameters. The evaluation is performed in C, so f2py has to translate Fortran expressions to valid C expressions (an alternative approach is that a developer specifies the corresponding C expressions in a .pyf file). In the second case, when user provides an input array with a given size but some hidden parameters used in dimensions specifications need to be determined based on the input array size. This is a harder problem because f2py has to solve the inverse problem: find a parameter `p` such that `upper(p) - lower(p) + 1` equals to the size of input array. In the case when this equation cannot be solved (e.g. because the input array size is wrong), raise an error before calling the Fortran function (that otherwise would likely crash Python process when the size of input arrays is wrong). f2py currently supports this case only when the equation is linear with respect to unknown parameter. z.f90a� function get_arr_size_{count}(a, n) result (length) integer, intent(in) :: n integer, dimension({dimspec}), intent(out) :: a integer length length = size(a) end function subroutine get_inv_arr_size_{count}(a, n) integer :: n ! the value of n is computed in f2py wrapper !f2py intent(out) n integer, dimension({dimspec}), intent(in) :: a end subroutine )�nz2*nz2:nzn/2z5 - n/2z3*n:20zn*(n+1):n*(n+5)z2*n, nz 2*n:3*n*n+2*n� c C s& g | ] }d |v r |� d �d nd�qS )�:r �1)�split)�.0�dr r r � <listcomp>� � zTestDimSpec.<listcomp>�,z, )�count�dimspec�firstrY c C sF | j �|�}t| jd|� ��}dD ] }||�\}}|j|ks"J �q"d S )N� get_arr_size_�r r r � � )� all_dimspecs�index�getattrr �size)r rY rX � get_arr_sizerN �szr r r r �test_array_size� s zTestDimSpec.test_array_sizec C s� | j �|�}t| jd|� ��}t| jd|� ��}dD ]R}||�\}}|| jv rZ|||�}n||�}||�\} } || ks4J |||| f��q4d S )Nr[ Zget_inv_arr_size_r\ )r_ r` ra r �nonlinear_dimspecs) r rY rX rc Zget_inv_arr_sizerN rd r Zn1Zsz1�_r r r �test_inv_array_size� s z TestDimSpec.test_inv_array_sizeN)r r r �__doc__�suffix�textwrap�dedentZ code_templateZlinear_dimspecsrf r_ �code� enumeraterX rY rR �lst�format�join�pytest�mark� parametrizere rh r r r r rM � s$ � rM c @ s e Zd Zdd� ZdS )�TestModuleDeclarationc C sP t �dddd�}t�t|�g�}t|�dks0J �|d d d d d ksLJ �d S ) Nr r r z foo_deps.f90r r r Zabar�=z bar('abar')r$ r* r r r �test_dependencies� s z'TestModuleDeclaration.test_dependenciesN)r r r rw r r r r ru � s ru c @ s e Zd Zdd� ZdS )�TestEvalc C sZ t j}|di �dksJ �|di �dks*J �|dtddd��dksDJ �|d i �d ksVJ �d S ) NZ123z12 + 3Z15za + br r )r r" �3z"123"z'123')r Z _eval_scalar�dict)r Z eval_scalarr r r �test_eval_scalar� s zTestEval.test_eval_scalarN)r r r r{ r r r r rx � s rx c @ s& e Zd Zej�dg d��dd� �ZdS )�TestFortranReader�encoding)�asciizutf-8zutf-16zutf-32c C sp |d|� d� }|j d|d��}|�d� W d � n1 s>0 Y t�t|�g�}|d d dkslJ �d S ) NZ input_with_z _encoding.f90r )r} zd subroutine foo() end subroutine foo r r6 �foo)�open�writer r% )r r+ r} Zf_path�ffr( r r r �test_input_encoding s (z%TestFortranReader.test_input_encodingN)r r r rr rs rt r� r r r r r| s �r| c @ sB e Zd Ze�dddd�gZejje j� d�du dd�d d � �Z dS ) �TestUnicodeCommentr r r zunicode_comment.f90Zcharset_normalizerNz7test requires charset_normalizer which is not installed)�reasonc C s | j �d� d S )Nr )r r rI r r r �test_encoding_comment s z(TestUnicodeComment.test_encoding_comment) r r r r r r rr rs Zskipif� importlib� find_specr� r r r r r� s �r� c @ s( e Zd Zej�dgg d��dd� �ZdS )� TestNameArgsPatternBacktracking� adversary))z @)@bind@(@)z#@)@bind @(@)z@)@bind foo bar baz@(@c C s� d}d}d\}}t ||�D ]�}|| }t |�D ]L}g } t |�D ](}t�� } t�|�} | �t�� | � q>t�| �dk s.J �q.| r�J �|d } t�| �sJ �qdS )zPaddress ReDOS vulnerability: https://github.com/numpy/numpy/issues/23338� r] )� � g�������?z@)@N)�range�time� perf_counterr �search�appendr Zmedian) r r� Ztrials_per_batchZbatches_per_regexZ start_repsZend_reps�iiZrepeated_adversaryrg �timesr ZmtchZgood_version_of_adversaryr r r �!test_nameargspattern_backtracking# s zATestNameArgsPatternBacktracking.test_nameargspattern_backtrackingN)r r r rr rs rt r� r r r r r� " s �r� c @ s& e Zd Ze�dddd�gZdd� ZdS )�TestFunctionReturnr r r z gh23598.f90c C s | j �dd�dksJ �d S )Nr r] r� )r Z intproductrI r r r �test_function_rettypeJ s z(TestFunctionReturn.test_function_rettypeN)r r r r r r r� r r r r r� G s r� c @ s e Zd Zdd� ZdS )�TestFortranGroupCountersc C s` t �dddd�}zt�t|�g� W n6 tyZ } z dsFJ d|� ���W Y d }~n d }~0 0 d S )Nr r r z gh23533.fFz0'crackfortran.crackfortran' raised an exception )r r r r% � Exception)r r' �excr r r �test_end_if_commentP s z,TestFortranGroupCounters.test_end_if_commentN)r r r r� r r r r r� O s r� c @ s e Zd Zdd� ZdS )�TestF77CommonBlockReaderc C sb t �dddd�}t�t�� �� }t�t|�g�}W d � n1 sD0 Y d|�� vs^J �d S )Nr r r z gh22648.pyfZMismatch) r r � contextlib�redirect_stdout�io�StringIOr r% �getvalue)r r+ r' Z stdout_f2pyr( r r r � test_gh22648Z s .z%TestF77CommonBlockReader.test_gh22648N)r r r r� r r r r r� Y s r� )!r� �codecsr� � unicodedatarr �numpyr Znumpy.f2py.crackfortranr r rO r Z numpy.f2pyr rk r� r� ZF2PyTestr r r3 r9 rC rE rM ru rx r| r� r� r� r� r� r r r r �<module> s4 ' c %
| ver. 1.1 | |
.
| PHP 8.3.30 | Ð“ÐµÐ½ÐµÑ€Ð°Ñ†Ð¸Ñ Ñтраницы: 0.02 |
proxy
|
phpinfo
|
ÐаÑтройка