122 lines
3.5 KiB
OpenEdge ABL
122 lines
3.5 KiB
OpenEdge ABL
/* -----------------------------------------------------------------------------
|
|
* std_string.i
|
|
*
|
|
* SWIG typemaps for std::string types
|
|
* ----------------------------------------------------------------------------- */
|
|
|
|
%{
|
|
#include <string>
|
|
%}
|
|
|
|
/* std::string and const std::string& are converted to/from PHP string
|
|
* automatically.
|
|
*
|
|
* A C++ std::string& parameter is wrapped as a pass-by-reference PHP
|
|
* string parameter by default, but the INPUT/INOUT/OUTPUT typemaps
|
|
* below provide other options (see below).
|
|
*
|
|
* std::string* is not wrapped by default, but INPUT/INOUT/OUTPUT typemaps
|
|
* are provided (see below).
|
|
*/
|
|
|
|
namespace std {
|
|
|
|
%naturalvar string;
|
|
|
|
class string;
|
|
|
|
%typemap(typecheck,precedence=SWIG_TYPECHECK_STRING) string, const string& %{
|
|
$1 = (Z_TYPE($input) == IS_STRING) ? 1 : 0;
|
|
%}
|
|
|
|
%typemap(in, phptype="string") string %{
|
|
convert_to_string(&$input);
|
|
$1.assign(Z_STRVAL($input), Z_STRLEN($input));
|
|
%}
|
|
|
|
%typemap(directorout) string %{
|
|
convert_to_string($input);
|
|
$result.assign(Z_STRVAL_P($input), Z_STRLEN_P($input));
|
|
%}
|
|
|
|
%typemap(out, phptype="string") string %{
|
|
ZVAL_STRINGL($result, $1.data(), $1.size());
|
|
%}
|
|
|
|
%typemap(directorin) string, const string& %{
|
|
ZVAL_STRINGL($input, $1.data(), $1.size());
|
|
%}
|
|
|
|
%typemap(out, phptype="string") const string& %{
|
|
ZVAL_STRINGL($result, $1->data(), $1->size());
|
|
%}
|
|
|
|
%typemap(throws) string, const string& %{
|
|
zend_throw_exception(NULL, $1.c_str(), 0);
|
|
goto fail;
|
|
%}
|
|
|
|
%typemap(throws) string*, const string* %{
|
|
zend_throw_exception(NULL, $1->c_str(), 0);
|
|
goto fail;
|
|
%}
|
|
|
|
%typemap(in, phptype="string") const string& ($*1_ltype temp) %{
|
|
convert_to_string(&$input);
|
|
temp.assign(Z_STRVAL($input), Z_STRLEN($input));
|
|
$1 = &temp;
|
|
%}
|
|
|
|
/*************************************************************************/
|
|
|
|
/* These next four typemaps handle a function which takes a non-const
|
|
* reference to a std::string and modifies the string. */
|
|
%typemap(in,byref=1, phptype="string") string& ($*1_ltype temp) %{
|
|
{
|
|
zval * p = Z_ISREF($input) ? Z_REFVAL($input) : &$input;
|
|
convert_to_string(p);
|
|
temp.assign(Z_STRVAL_P(p), Z_STRLEN_P(p));
|
|
$1 = &temp;
|
|
}
|
|
%}
|
|
|
|
%typemap(directorout) string& ($*1_ltype *temp) %{
|
|
convert_to_string($input);
|
|
temp = new $*1_ltype(Z_STRVAL_P($input), Z_STRLEN_P($input));
|
|
swig_acquire_ownership(temp);
|
|
$result = temp;
|
|
%}
|
|
|
|
%typemap(argout) string& %{
|
|
if (Z_ISREF($input)) {
|
|
ZVAL_STRINGL(Z_REFVAL($input), $1->data(), $1->size());
|
|
}
|
|
%}
|
|
|
|
/* SWIG will apply the non-const typemap above to const string& without
|
|
* this more specific typemap. */
|
|
%typemap(argout) const string& ""
|
|
|
|
/*************************************************************************/
|
|
|
|
/* Alternative ways to handle string& - you can specify how to wrap based
|
|
* on the parameter name, e.g. this handles parameters named `str` as
|
|
* INOUT:
|
|
*
|
|
* %apply (std::string& INOUT) (std::string& str);
|
|
*/
|
|
|
|
%typemap(in) string& INPUT = const string&;
|
|
%typemap(in, numinputs=0) string& OUTPUT ($*1_ltype temp)
|
|
%{ $1 = &temp; %}
|
|
%typemap(argout) string& OUTPUT
|
|
{
|
|
zval o;
|
|
ZVAL_STRINGL(&o, $1->data(), $1->size());
|
|
SWIG_AppendOutput($result, &o);
|
|
}
|
|
%typemap(in) string& INOUT = const string&;
|
|
%typemap(argout) string& INOUT = string& OUTPUT;
|
|
|
|
}
|