_ƍ d Z ddlmZ ddlmZmZmZmZmZm Z m
Z
m Z m Z m
Z
mZmZmZmZmZmZmZmZmZmZmZmZmZmZm Z m Z m Z m Z m Z m!Z! ddlm"Z" ej# Z$ddg ddd d
d d d
Z%i di ddddddddddddddddddddd dd d d dd dd!dd"dd#ddd$dd%dd&dg ddd'dd(ddd)dg ddd*ddg ddd+dd,dd d-ddd.d/d0d1dddd2d3d4d5e d6 e e did7d8ed9id:ed;igdgd? ee e e e e
d@edAidBdCdDedEidFedGigddSge
dTdUdVe d6igdWedXedJdYgZ& eee dZi eee dZiedUi eee d[e d6igi eee d[e d6igiedV ee e d6 ee e d\igi eee d]i eee d]idd^ eee d_ ee e e d`e
daed_i eee db ee e e dce
dbedbi eee dS ee e e dde
ddedSi e ee
e dSiedeiedfiedgidh e e dii eee e!dj diedkiedli ee e e e e dmi ee e e e e e dni ee ee e doi ee ee e e dpigedgied=igedqedriedsigedtieduie dSig eee ddvedwidxedyigdSdIed=idHg eee dzed{ied|ied}iged~ieduig eee ddvdde
ddedied e e didg ee
e e ee ddedkidedidedigde dSig ee
e dzd]edg
Z'i Z(d Z)d Z*dS )aK
Build call-back mechanism for f2py2e.
Copyright 2000 Pearu Peterson all rights reserved,
Pearu Peterson
Permission to use, modify, and distribute this software is given under the
terms of the NumPy License.
NO WARRANTY IS EXPRESSED OR IMPLIED. USE AT YOUR OWN RISK.
$Date: 2005/07/20 11:27:58 $
Pearu Peterson
) __version__)
applyrules debugcapi
dictappenderrmessgetargshasnoteisarray iscomplexiscomplexarrayiscomplexfunction
isfunction
isintent_c
isintent_hide isintent_inisintent_inoutisintent_nothide isintent_out
isoptional
isrequiredisscalarisstringisstringfunction issubroutinel_andl_notl_oroutmessreplace
stripcomma throw_error)cfuncszPtypedef #rctype#(*#name#_typedef)(#optargs_td##args_td##strarglens_td##noargs#);a^
#begintitle#
typedef struct {
PyObject *capi;
PyTupleObject *args_capi;
int nofargs;
jmp_buf jmpbuf;
} #name#_t;
#if defined(F2PY_THREAD_LOCAL_DECL) && !defined(F2PY_USE_PYTHON_TLS)
static F2PY_THREAD_LOCAL_DECL #name#_t *_active_#name# = NULL;
static #name#_t *swap_active_#name#(#name#_t *ptr) {
#name#_t *prev = _active_#name#;
_active_#name# = ptr;
return prev;
}
static #name#_t *get_active_#name#(void) {
return _active_#name#;
}
#else
static #name#_t *swap_active_#name#(#name#_t *ptr) {
char *key = "__f2py_cb_#name#";
return (#name#_t *)F2PySwapThreadLocalCallbackPtr(key, ptr);
}
static #name#_t *get_active_#name#(void) {
char *key = "__f2py_cb_#name#";
return (#name#_t *)F2PyGetThreadLocalCallbackPtr(key);
}
#endif
/*typedef #rctype#(*#name#_typedef)(#optargs_td##args_td##strarglens_td##noargs#);*/
#static# #rctype# #callbackname# (#optargs##args##strarglens##noargs#) {
#name#_t cb_local = { NULL, NULL, 0 };
#name#_t *cb = NULL;
PyTupleObject *capi_arglist = NULL;
PyObject *capi_return = NULL;
PyObject *capi_tmp = NULL;
PyObject *capi_arglist_list = NULL;
int capi_j,capi_i = 0;
int capi_longjmp_ok = 1;
#decl#
#ifdef F2PY_REPORT_ATEXIT
f2py_cb_start_clock();
#endif
cb = get_active_#name#();
if (cb == NULL) {
capi_longjmp_ok = 0;
cb = &cb_local;
}
capi_arglist = cb->args_capi;
CFUNCSMESS("cb:Call-back function #name# (maxnofargs=#maxnofargs#(-#nofoptargs#))\n");
CFUNCSMESSPY("cb:#name#_capi=",cb->capi);
if (cb->capi==NULL) {
capi_longjmp_ok = 0;
cb->capi = PyObject_GetAttrString(#modulename#_module,"#argname#");
CFUNCSMESSPY("cb:#name#_capi=",cb->capi);
}
if (cb->capi==NULL) {
PyErr_SetString(#modulename#_error,"cb: Callback #argname# not defined (as an argument or module #modulename# attribute).\n");
goto capi_fail;
}
if (F2PyCapsule_Check(cb->capi)) {
#name#_typedef #name#_cptr;
#name#_cptr = F2PyCapsule_AsVoidPtr(cb->capi);
#returncptr#(*#name#_cptr)(#optargs_nm##args_nm##strarglens_nm#);
#return#
}
if (capi_arglist==NULL) {
capi_longjmp_ok = 0;
capi_tmp = PyObject_GetAttrString(#modulename#_module,"#argname#_extra_args");
if (capi_tmp) {
capi_arglist = (PyTupleObject *)PySequence_Tuple(capi_tmp);
Py_DECREF(capi_tmp);
if (capi_arglist==NULL) {
PyErr_SetString(#modulename#_error,"Failed to convert #modulename#.#argname#_extra_args to tuple.\n");
goto capi_fail;
}
} else {
PyErr_Clear();
capi_arglist = (PyTupleObject *)Py_BuildValue("()");
}
}
if (capi_arglist == NULL) {
PyErr_SetString(#modulename#_error,"Callback #argname# argument list is not set.\n");
goto capi_fail;
}
#setdims#
#ifdef PYPY_VERSION
#define CAPI_ARGLIST_SETITEM(idx, value) PyList_SetItem((PyObject *)capi_arglist_list, idx, value)
capi_arglist_list = PySequence_List(capi_arglist);
if (capi_arglist_list == NULL) goto capi_fail;
#else
#define CAPI_ARGLIST_SETITEM(idx, value) PyTuple_SetItem((PyObject *)capi_arglist, idx, value)
#endif
#pyobjfrom#
#undef CAPI_ARGLIST_SETITEM
#ifdef PYPY_VERSION
CFUNCSMESSPY("cb:capi_arglist=",capi_arglist_list);
#else
CFUNCSMESSPY("cb:capi_arglist=",capi_arglist);
#endif
CFUNCSMESS("cb:Call-back calling Python function #argname#.\n");
#ifdef F2PY_REPORT_ATEXIT
f2py_cb_start_call_clock();
#endif
#ifdef PYPY_VERSION
capi_return = PyObject_CallObject(cb->capi,(PyObject *)capi_arglist_list);
Py_DECREF(capi_arglist_list);
capi_arglist_list = NULL;
#else
capi_return = PyObject_CallObject(cb->capi,(PyObject *)capi_arglist);
#endif
#ifdef F2PY_REPORT_ATEXIT
f2py_cb_stop_call_clock();
#endif
CFUNCSMESSPY("cb:capi_return=",capi_return);
if (capi_return == NULL) {
fprintf(stderr,"capi_return is NULL\n");
goto capi_fail;
}
if (capi_return == Py_None) {
Py_DECREF(capi_return);
capi_return = Py_BuildValue("()");
}
else if (!PyTuple_Check(capi_return)) {
capi_return = Py_BuildValue("(N)",capi_return);
}
capi_j = PyTuple_Size(capi_return);
capi_i = 0;
#frompyobj#
CFUNCSMESS("cb:#name#:successful\n");
Py_DECREF(capi_return);
#ifdef F2PY_REPORT_ATEXIT
f2py_cb_stop_clock();
#endif
goto capi_return_pt;
capi_fail:
fprintf(stderr,"Call-back #name# failed.\n");
Py_XDECREF(capi_return);
Py_XDECREF(capi_arglist_list);
if (capi_longjmp_ok) {
longjmp(cb->jmpbuf,-1);
}
capi_return_pt:
;
#return#
}
#endtitle#
)zsetjmp.h
CFUNCSMESSF2PY_THREAD_LOCAL_DECLz #maxnofargs#z #nofoptargs#zF def #argname#(#docsignature#): return #docreturn#\n\
#docstrsigns#zc
{{}\verb@def #argname#(#latexdocsignature#): return #docreturn#@{}}
#routnote#
#latexdocstrsigns#z1def #argname#(#docsignature#): return #docreturn#)
cbtypedefsbodyneed
maxnofargs
nofoptargsdocstr latexdocstr docstrshort
separatorsfordecl
args,optargs pyobjfromfreememargs_td
optargs_tdargs_nm
optargs_nm frompyobjsetdims docstrsignsz\n"
"latexdocstrsignslatexdocstrreqlatexdocstroptlatexdocstroutlatexdocstrcbsz/*decl*/z
/*pyobjfrom*/z
/*frompyobj*/return
strarglensz /*freemem*/
strarglens_td
strarglens_nmnoargsz /*setdims*/z Required arguments:z Optional arguments:z Return objects:z Call-back functions:z \noindent Required arguments:z \noindent Optional arguments:z\noindent Return objects:z \noindent Call-back functions:z
--- #note#)r< r= docstrreq docstropt docstrout docstrcbs docreturndocsign
docsignoptr> r? r@ rA routnotez #ctype# return_value = 0;z, CFUNCSMESS("cb:Getting return_value->");a if (capi_j>capi_i) {
GETSCALARFROMPYTUPLE(capi_return,capi_i++,&return_value,#ctype#,
"#ctype#_from_pyobj failed in converting return_value of"
" call-back function #name# to C #ctype#\n");
} else {
fprintf(stderr,"Warning: call-back function #name# did not provide"
" return value (index=%d, type=#ctype#)\n",capi_i);
}z8 fprintf(stderr,"#showvalueformat#.\n",return_value);z#ctype#_from_pyobjr# GETSCALARFROMPYTUPLEz return return_value;)r. r: r' rB _checkzB fprintf(stderr,"debug-capi:cb:#name#:%d:\n",return_value_len);z)#ctype# return_value,int return_value_lenz return_value,&return_value_lenz #ctype# ,intz. CFUNCSMESS("cb:Getting return_value->\"");a if (capi_j>capi_i) {
GETSTRFROMPYTUPLE(capi_return,capi_i++,return_value,return_value_len);
} else {
fprintf(stderr,"Warning: call-back function #name# did not provide"
" return value (index=%d, type=#ctype#)\n",capi_i);
}z: fprintf(stderr,"#showvalueformat#\".\n",return_value);zstring.hGETSTRFROMPYTUPLEzreturn;)r4 r0 r8 r6 r: r' rB rP z<
#ifndef F2PY_CB_RETURNCOMPLEX
#ctype# *return_value
#endif
z3
#ifndef F2PY_CB_RETURNCOMPLEX
return_value
#endif
z0
#ifndef F2PY_CB_RETURNCOMPLEX
#ctype# *
#endif
zH
#ifdef F2PY_CB_RETURNCOMPLEX
#ctype# return_value = {0, 0};
#endif
a if (capi_j>capi_i) {
#ifdef F2PY_CB_RETURNCOMPLEX
GETSCALARFROMPYTUPLE(capi_return,capi_i++,&return_value,#ctype#,
"#ctype#_from_pyobj failed in converting return_value of call-back"
" function #name# to C #ctype#\n");
#else
GETSCALARFROMPYTUPLE(capi_return,capi_i++,return_value,#ctype#,
"#ctype#_from_pyobj failed in converting return_value of call-back"
" function #name# to C #ctype#\n");
#endif
} else {
fprintf(stderr,
"Warning: call-back function #name# did not provide"
" return value (index=%d, type=#ctype#)\n",capi_i);
}z#ifdef F2PY_CB_RETURNCOMPLEX
fprintf(stderr,"#showvalueformat#.\n",(return_value).r,(return_value).i);
#else
fprintf(stderr,"#showvalueformat#.\n",(*return_value).r,(*return_value).i);
#endif
zP
#ifdef F2PY_CB_RETURNCOMPLEX
return return_value;
#else
return;
#endif
z#ctype#)r2 r9 r7 r. r: rB r' rP z #pydocsignout#z"\item[]{{}\verb@#pydocsignout#@{}}z#rname#,)rI r@ rK rP )rP rB z #pydocsign#z \item[]{{}\verb@#pydocsign#@{}}z--- See above.z
#varname#,) rH rG rI r? r> r@ rL rM dependz#ctype# #varname_i#z #ctype# *#varname_i#_cb_capiz#ctype# *#varname_i#z #varname_i#z#varname_i#_cb_capiz #ctype# *z,int #varname_i#_cb_lenz,intz,#varname_i#_cb_len)r0 r8 r6 r' rC rD rE z/ #ctype# #varname_i#=(*#varname_i#_cb_capi);z8intent(c,out) is forbidden for callback scalar argumentsz) CFUNCSMESS("cb:Getting #varname#->");z if (capi_j>capi_i)
GETSCALARFROMPYTUPLE(capi_return,capi_i++,#varname_i#_cb_capi,#ctype#,"#ctype#_from_pyobj failed in converting argument #varname# of call-back function #name# to C #ctype#\n");z7 fprintf(stderr,"#showvalueformat#.\n",#varname_i#);z@ fprintf(stderr,"#showvalueformat#.\n",*#varname_i#_cb_capi);zK fprintf(stderr,"#showvalueformat#.\n",(#varname_i#).r,(#varname_i#).i);z] fprintf(stderr,"#showvalueformat#.\n",(*#varname_i#_cb_capi).r,(*#varname_i#_cb_capi).i);)r. errorr: r' rP z if (cb->nofargs>capi_i)
if (CAPI_ARGLIST_SETITEM(capi_i++,pyobj_from_#ctype#1(#varname_i#)))
goto capi_fail;z if (cb->nofargs>capi_i)
if (CAPI_ARGLIST_SETITEM(capi_i++,pyarr_from_p_#ctype#1(#varname_i#_cb_capi)))
goto capi_fail;zpyobj_from_#ctype#1zpyarr_from_p_#ctype#1)r4 r' rP _optionalz+ CFUNCSMESS("cb:Getting #varname#->\"");zf if (capi_j>capi_i)
GETSTRFROMPYTUPLE(capi_return,capi_i++,#varname_i#,#varname_i#_cb_len);zP fprintf(stderr,"#showvalueformat#\":%d:.\n",#varname_i#,#varname_i#_cb_len);)r: r' rP ze fprintf(stderr,"debug-capi:cb:#varname#=#showvalueformat#:%d:\n",#varname_i#,#varname_i#_cb_len);z if (cb->nofargs>capi_i)
if (CAPI_ARGLIST_SETITEM(capi_i++,pyobj_from_#ctype#1size(#varname_i#,#varname_i#_cb_len)))
goto capi_fail;z if (cb->nofargs>capi_i) {
int #varname_i#_cb_dims[] = {#varname_i#_cb_len};
if (CAPI_ARGLIST_SETITEM(capi_i++,pyarr_from_p_#ctype#1(#varname_i#,#varname_i#_cb_dims)))
goto capi_fail;
}zpyobj_from_#ctype#1sizez6 npy_intp #varname_i#_Dims[#rank#] = {#rank*[-1]#};z #cbsetdims#;)r. r; rP _dependz0 fprintf(stderr,"debug-capi:cb:#varname#\n");a if (cb->nofargs>capi_i) {
/* tmp_arr will be inserted to capi_arglist_list that will be
destroyed when leaving callback function wrapper together
with tmp_arr. */
PyArrayObject *tmp_arr = (PyArrayObject *)PyArray_New(&PyArray_Type,
#rank#,#varname_i#_Dims,#atype#,NULL,(char*)#varname_i#,#elsize#,
NPY_ARRAY_CARRAY,NULL);
a if (cb->nofargs>capi_i) {
/* tmp_arr will be inserted to capi_arglist_list that will be
destroyed when leaving callback function wrapper together
with tmp_arr. */
PyArrayObject *tmp_arr = (PyArrayObject *)PyArray_New(&PyArray_Type,
#rank#,#varname_i#_Dims,#atype#,NULL,(char*)#varname_i#,#elsize#,
NPY_ARRAY_FARRAY,NULL);
z
if (tmp_arr==NULL)
goto capi_fail;
if (CAPI_ARGLIST_SETITEM(capi_i++,(PyObject *)tmp_arr))
goto capi_fail;
})r4 rP rT z if (capi_j>capi_i) {
PyArrayObject *rv_cb_arr = NULL;
if ((capi_tmp = PyTuple_GetItem(capi_return,capi_i++))==NULL) goto capi_fail;
rv_cb_arr = array_from_pyobj(#atype#,#varname_i#_Dims,#rank#,F2PY_INTENT_INz|F2PY_INTENT_Ca8 ,capi_tmp);
if (rv_cb_arr == NULL) {
fprintf(stderr,"rv_cb_arr is NULL\n");
goto capi_fail;
}
MEMCOPY(#varname_i#,PyArray_DATA(rv_cb_arr),PyArray_NBYTES(rv_cb_arr));
if (capi_tmp != (PyObject *)rv_cb_arr) {
Py_DECREF(rv_cb_arr);
}
}z fprintf(stderr,"<-.\n");MEMCOPY)rK rP c g t | d < | d D ]J}|d dk r<|d D ]3}|rt || d t d| d z 4Kd S )Nnamer& block interfacezwarning: empty body for %s
)cb_map
buildcallbackr )mbibs g/builddir/build/BUILD/cloudlinux-venv-1.0.10/venv/lib64/python3.11/site-packages/numpy/f2py/cb_rules.pybuildcallbacksra s F1V9i J J
g;+ % %Z
J
J J!!QvY//// :ai HIIII
J J c ddl m} t d| d d|d t | \ }}||_ | d }| | | }t
i | }t | | d |d g t D ]<}d|v r |d | sd|vr!t ||| } t
|| }=i }
t | D ]\ } } | | || | }||
| < t D ]m}d
|v rd |v rt || r!d|v r |d || sd|vr-t |||| } t
|| }d |v r nn|D ]} |
| }t D ]q}d
|v rd |vsd |v rt || r%d|v r |d || sd|vr-t |||| } t
|| }d |v r nr|D ]j} |
| }t D ]X}d
|vrd |v r d|v r |d || sd|vr-t |||| } t
|| }d |v r nYkd
|v rLd|v rHt! |d t" r-|d dgz |d< |d dgz |d< |d dgz |d< t! |d t" r(t% t' dd|d i |d< t% t' dd|d i }
|
dk r)t% t' dd|d i |d< n t' d|d |
d |d< |d d d |d < |d d d |d < g |d!< g |d"< d#D ]}||v r/t! || t" r|d! || z |d!< d$|z }||v rPt! || t" r5|d" || d%d z d&gz || dd z d'gz |d"< d
|vrd|d
< d|d(< d|d)< | d
s/| d s| d* sd+|d,< t t* | } | d- t, j |d < t! | d. t0 r | d. g| d.< d.|v rFt, j D ]'}||d. v r| d. | (| d/ t, j |d d0z < | d. |d d0z | d. t, j |d < | d1 | d2 | d3 | d4 |d5 d6|j |d < t d7| d8 z d S )9Nr ) capi_mapsz( Constructing call-back function "cb_rX _in_z"
varsrP )indexrU rT _breakr0 r2 z(
#ifndef F2PY_CB_RETURNCOMPLEX
,
#endif
r9 r7 rK z #docreturn#z #docsignopt#rM r3 z #docsign#rL docsignaturez#docsign#[#docsignopt#])rL rM _z\_latexdocsignaturer1 z, r< r= )rG rH rI rJ latex z\begin{description}z\end{description}r6 r8 rC voidrF r& r' r% _typedefr( r) r* r+ argname)r( r) r* r+ rp z %s
r, ) r3 rd r r depargscb_routsign2mapr r[ append
cb_rout_rulesr enumerate cb_sign2map cb_arg_rulesr r
isinstancelistr r getcb_routine_rulesr" callbacksstrtypedefskeystypedefs_generatedneedslcb2_map)routumrd r0 rq varvrdrdrarsavevrdiar2 kts r` r\ r\ s> G
&\\\222
DMMMD' I
v,C
#
#D"
-
-C B B
2JtF|RZ0111
$ $ MMkak$ / /MXQ5F5FAsD))BB##BG$ 1##As1vQ#77
AA~~a Js1v$6$6 A
+!H+c!f"5"5
81;L;L 3A// B''q==E
aj AA~~1$$+*:*:z#a&?Q?Q*:A
+!H+c!f"5"5
81;L;L 3A// B''q==E
aj A!!a A
+!H+c!f"5"5
81;L;L 3A// B''q==E
|| R bmT * * yM . - ByM
", / 4 3 B|
", / 4 3 B|
"[/4(( D$ MKK #A B BD D; ".<0@!A# # $ $G "}} ' K)R ]!; < < > >> %%>13I 4;&( &( ) )> ! 0 8 8e D DB !4 5 = =c4 H HBB} B
A ' ' 77z"Q%..7 "= 1BqE 9B} aK 77z"Q%..7%'(:%;beAaCj%H'(&)+-a59&5%&&'B! " R6
9
9
FF6NN bffY / / 266,3G3G 8 $b ) )B#%f:FRZ "V*c"" "j\6
|| %%'' % %ABvJ6
!!!$$$9;L9IF bj: 56vJbj:-... !&zFLF 46|4D46|4D028 57
5F13I &( &(Ir&z" LB} - .///
Frb N)+__doc__r3 r auxfuncsr r r r r r r
r r r
r r r r r r r r r r r r r r r r r r r r! r" version f2py_versionr{ rt rw r[ ra r\ rb r` r s
" e[
x
A @ @
GSj j X &$ # '0" 6A4 IRTX #S *6 $S +7 &t .7
( -d
+D 3CD +D 3CD
( ;F r $,R 2>r DMm 2 $R *9" 2 $R *9" " =! " r..*/Bb::6; lEE'NNB?7 : 0
F G
H
J
& <'@BXY,%
EE*:$;$;UUCT=U=UVV% * !fg;3!
I J
K
M
& <'@ 02") .
F G
%
4 & <'@ 3Y@#q9 9t +> ,/1
y11MG
V eJ(899;PQeJ(899;PQ"$<= 5-=>>AdBI>AdBI E(EE* - - . .0N + +
E(J ' ' E(EE* - - . .0E ] m
E(J ' ' E(EE* - - . . [ i
h22I> !:;"F+"$9:1 6 z""$UV%
L# $^__a a !"MN# kl uYeeI.>.>
(K(KLLTV uYeeI.>.>z@R@R(S(STT]_ uYi(D(DEEhj uYi
9K9K(L(LMMz| !57M NO\*,' * # % & ( ! 45 "9:Y') %"233 !"PQS km /\*J8%,//
9
;
& (
89 "9:<%"233% , I% !"UV! $ uZ(( +&)4 %!144 ^3T3TUU9 < !"MNX "#34 !"AB!$ ^Y 78% ..) , " Gg T
J J J| | | | | rb