.\" Automatically generated by Pod::Man v1.37, Pod::Parser v1.32
.\" ========================================================================
.de Sh \" Subsection heading
.de Sp \" Vertical space (when we can't use .PP)
.de Vb \" Begin verbatim text
.de Ve \" End verbatim text
.\" Set up some character translations and predefined strings. \*(-- will
.\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left
.\" double quote, and \*(R" will give a right double quote. | will give a
.\" real vertical bar. \*(C+ will give a nicer C++. Capital omega is used to
.\" do unbreakable dashes and therefore won't be available. \*(C` and \*(C'
.\" expand to `' in nroff, nothing in troff, for use with C<>.
.ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p'
. if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch
. if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\" diablo 12 pitch
.\" If the F register is turned on, we'll generate index entries on stderr for
.\" titles (.TH), headers (.SH), subsections (.Sh), items (.Ip), and index
.\" entries marked with X<> in POD. Of course, you'll have to process the
.\" output yourself in some meaningful fashion.
. tm Index:\\$1\t\\n%\t"\\$2"
.\" For nroff, turn off justification. Always turn off hyphenation; it makes
.\" way too many mistakes in technical documents.
.\" Accent mark definitions (@(#)ms.acc 1.5 88/02/08 SMI; from UCB 4.2).
.\" Fear. Run. Save yourself. No user-serviceable parts.
. \" fudge factors for nroff and troff
. ds #H ((1u-(\\\\n(.fu%2u))*.13m)
. \" simple accents for nroff and troff
. ds ' \\k:\h'-(\\n(.wu*8/10-\*(#H)'\'\h"|\\n:u"
. ds ` \\k:\h'-(\\n(.wu*8/10-\*(#H)'\`\h'|\\n:u'
. ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'^\h'|\\n:u'
. ds , \\k:\h'-(\\n(.wu*8/10)',\h'|\\n:u'
. ds ~ \\k:\h'-(\\n(.wu-\*(#H-.1m)'~\h'|\\n:u'
. ds / \\k:\h'-(\\n(.wu*8/10-\*(#H)'\z\(sl\h'|\\n:u'
. \" troff and (daisy-wheel) nroff accents
.ds : \\k:\h'-(\\n(.wu*8/10-\*(#H+.1m+\*(#F)'\v'-\*(#V'\z.\h'.2m+\*(#F'.\h'|\\n:u'\v'\*(#V'
.ds 8 \h'\*(#H'\(*b\h'-\*(#H'
.ds o \\k:\h'-(\\n(.wu+\w'\(de'u-\*(#H)/2u'\v'-.3n'\*(#[\z\(de\v'.3n'\h'|\\n:u'\*(#]
.ds d- \h'\*(#H'\(pd\h'-\w'~'u'\v'-.25m'\f2\(hy\fP\v'.25m'\h'-\*(#H'
.ds D- D\\k:\h'-\w'D'u'\v'-.11m'\z\(hy\v'.11m'\h'|\\n:u'
.ds th \*(#[\v'.3m'\s+1I\s-1\v'-.3m'\h'-(\w'I'u*2/3)'\s-1o\s+1\*(#]
.ds Th \*(#[\s+2I\s-2\h'-\w'I'u*3/5'\v'-.3m'o\v'.3m'\*(#]
.ds ae a\h'-(\w'a'u*4/10)'e
.ds Ae A\h'-(\w'A'u*4/10)'E
. \" corrections for vroff
.if v .ds ~ \\k:\h'-(\\n(.wu*9/10-\*(#H)'\s-2\u~\d\s+2\h'|\\n:u'
.if v .ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'\v'-.4m'^\v'.4m'\h'|\\n:u'
. \" for low resolution devices (crt and lpr)
.if \n(.H>23 .if \n(.V>19 \
.\" ========================================================================
.TH PERLAPI 1 "2006-01-07" "perl v5.8.8" "Perl Programmers Reference Guide"
perlapi \- autogenerated documentation for the perl public API
.IX Xref "Perl API API api"
This file contains the documentation of the perl public \s-1API\s0 generated by
embed.pl, specifically a listing of functions, macros, flags, and variables
that may be used by extension writers. The interfaces of any functions that
are not listed here are subject to change without notice. For this reason,
blindly using functions listed in proto.h is to be avoided when writing
Note that all Perl \s-1API\s0 global variables must be referenced with the \f(CW\*(C`PL_\*(C'\fR
prefix. Some macros are provided for compatibility with the older,
unadorned names, but this support may be disabled in a future release.
The listing is alphabetical, case insensitive.
.ie n .SH """Gimme"" Values"
.el .SH "``Gimme'' Values"
.IX Header "Gimme Values"
A backward-compatible version of \f(CW\*(C`GIMME_V\*(C'\fR which can only return
\&\f(CW\*(C`G_SCALAR\*(C'\fR or \f(CW\*(C`G_ARRAY\*(C'\fR; in a void context, it returns \f(CW\*(C`G_SCALAR\*(C'\fR.
Deprecated. Use \f(CW\*(C`GIMME_V\*(C'\fR instead.
The XSUB\-writer's equivalent to Perl's \f(CW\*(C`wantarray\*(C'\fR. Returns \f(CW\*(C`G_VOID\*(C'\fR,
\&\f(CW\*(C`G_SCALAR\*(C'\fR or \f(CW\*(C`G_ARRAY\*(C'\fR for void, scalar or list context,
Used to indicate list context. See \f(CW\*(C`GIMME_V\*(C'\fR, \f(CW\*(C`GIMME\*(C'\fR and
Indicates that arguments returned from a callback should be discarded. See
Used to force a Perl \f(CW\*(C`eval\*(C'\fR wrapper around a callback. See
Indicates that no arguments are being sent to a callback. See
Used to indicate scalar context. See \f(CW\*(C`GIMME_V\*(C'\fR, \f(CW\*(C`GIMME\*(C'\fR, and
Used to indicate void context. See \f(CW\*(C`GIMME_V\*(C'\fR and perlcall.
.SH "Array Manipulation Functions"
.IX Header "Array Manipulation Functions"
Same as \f(CW\*(C`av_len()\*(C'\fR. Deprecated, use \f(CW\*(C`av_len()\*(C'\fR instead.
Clears an array, making it empty. Does not free the memory used by the
Deletes the element indexed by \f(CW\*(C`key\*(C'\fR from the array. Returns the
deleted element. If \f(CW\*(C`flags\*(C'\fR equals \f(CW\*(C`G_DISCARD\*(C'\fR, the element is freed
\& SV* av_delete(AV* ar, I32 key, I32 flags)
Returns true if the element indexed by \f(CW\*(C`key\*(C'\fR has been initialized.
This relies on the fact that uninitialized array elements are set to
\& bool av_exists(AV* ar, I32 key)
Pre-extend an array. The \f(CW\*(C`key\*(C'\fR is the index to which the array should be
\& void av_extend(AV* ar, I32 key)
Returns the \s-1SV\s0 at the specified index in the array. The \f(CW\*(C`key\*(C'\fR is the
index. If \f(CW\*(C`lval\*(C'\fR is set then the fetch will be part of a store. Check
that the return value is non-null before dereferencing it to a \f(CW\*(C`SV*\*(C'\fR.
See \*(L"Understanding the Magic of Tied Hashes and Arrays\*(R" in perlguts for
more information on how to use this function on tied arrays.
\& SV** av_fetch(AV* ar, I32 key, I32 lval)
Ensure than an array has a given number of elements, equivalent to
Perl's \f(CW\*(C`$#array = $fill;\*(C'\fR.
\& void av_fill(AV* ar, I32 fill)
Returns the highest index in the array. Returns \-1 if the array is
Creates a new \s-1AV\s0 and populates it with a list of SVs. The SVs are copied
into the array, so they may be freed after the call to av_make. The new \s-1AV\s0
will have a reference count of 1.
\& AV* av_make(I32 size, SV** svp)
Pops an \s-1SV\s0 off the end of the array. Returns \f(CW&PL_sv_undef\fR if the array
Pushes an \s-1SV\s0 onto the end of the array. The array will grow automatically
to accommodate the addition.
\& void av_push(AV* ar, SV* val)
Shifts an \s-1SV\s0 off the beginning of the array.
Stores an \s-1SV\s0 in an array. The array index is specified as \f(CW\*(C`key\*(C'\fR. The
return value will be \s-1NULL\s0 if the operation failed or if the value did not
need to be actually stored within the array (as in the case of tied
arrays). Otherwise it can be dereferenced to get the original \f(CW\*(C`SV*\*(C'\fR. Note
that the caller is responsible for suitably incrementing the reference
count of \f(CW\*(C`val\*(C'\fR before the call, and decrementing it if the function
See \*(L"Understanding the Magic of Tied Hashes and Arrays\*(R" in perlguts for
more information on how to use this function on tied arrays.
\& SV** av_store(AV* ar, I32 key, SV* val)
Undefines the array. Frees the memory used by the array itself.
Unshift the given number of \f(CW\*(C`undef\*(C'\fR values onto the beginning of the
array. The array will grow automatically to accommodate the addition. You
must then use \f(CW\*(C`av_store\*(C'\fR to assign values to these new elements.
\& void av_unshift(AV* ar, I32 num)
Returns the \s-1AV\s0 of the specified Perl array. If \f(CW\*(C`create\*(C'\fR is set and the
Perl variable does not exist then it will be created. If \f(CW\*(C`create\*(C'\fR is not
set and the variable does not exist then \s-1NULL\s0 is returned.
\&\s-1NOTE:\s0 the perl_ form of this function is deprecated.
\& AV* get_av(const char* name, I32 create)
Creates a new \s-1AV\s0. The reference count is set to 1.
Sort an array. Here is an example:
\& sortsv(AvARRAY(av), av_len(av)+1, Perl_sv_cmp_locale);
See lib/sort.pm for details about controlling the sorting algorithm.
\& void sortsv(SV** array, size_t num_elts, SVCOMPARE_t cmp)
.IX Header "Callback Functions"
Performs a callback to the specified Perl sub. See perlcall.
\&\s-1NOTE:\s0 the perl_ form of this function is deprecated.
\& I32 call_argv(const char* sub_name, I32 flags, char** argv)
Performs a callback to the specified Perl method. The blessed object must
be on the stack. See perlcall.
\&\s-1NOTE:\s0 the perl_ form of this function is deprecated.
\& I32 call_method(const char* methname, I32 flags)
Performs a callback to the specified Perl sub. See perlcall.
\&\s-1NOTE:\s0 the perl_ form of this function is deprecated.
\& I32 call_pv(const char* sub_name, I32 flags)
Performs a callback to the Perl sub whose name is in the \s-1SV\s0. See
\&\s-1NOTE:\s0 the perl_ form of this function is deprecated.
\& I32 call_sv(SV* sv, I32 flags)
Opening bracket on a callback. See \f(CW\*(C`LEAVE\*(C'\fR and perlcall.
Tells Perl to \f(CW\*(C`eval\*(C'\fR the given string and return an SV* result.
\&\s-1NOTE:\s0 the perl_ form of this function is deprecated.
\& SV* eval_pv(const char* p, I32 croak_on_error)
Tells Perl to \f(CW\*(C`eval\*(C'\fR the string in the \s-1SV\s0.
\&\s-1NOTE:\s0 the perl_ form of this function is deprecated.
\& I32 eval_sv(SV* sv, I32 flags)
Closing bracket for temporaries on a callback. See \f(CW\*(C`SAVETMPS\*(C'\fR and
Closing bracket on a callback. See \f(CW\*(C`ENTER\*(C'\fR and perlcall.
Opening bracket for temporaries on a callback. See \f(CW\*(C`FREETMPS\*(C'\fR and
.IX Header "Character classes"
Returns a boolean indicating whether the C \f(CW\*(C`char\*(C'\fR is an \s-1ASCII\s0 alphanumeric
character (including underscore) or digit.
Returns a boolean indicating whether the C \f(CW\*(C`char\*(C'\fR is an \s-1ASCII\s0 alphabetic
Returns a boolean indicating whether the C \f(CW\*(C`char\*(C'\fR is an \s-1ASCII\s0
Returns a boolean indicating whether the C \f(CW\*(C`char\*(C'\fR is a lowercase
Returns a boolean indicating whether the C \f(CW\*(C`char\*(C'\fR is whitespace.
Returns a boolean indicating whether the C \f(CW\*(C`char\*(C'\fR is an uppercase
Converts the specified character to lowercase.
Converts the specified character to uppercase.
.SH "Cloning an interpreter"
.IX Header "Cloning an interpreter"
Create and return a new interpreter by cloning the current one.
perl_clone takes these flags as parameters:
CLONEf_COPY_STACKS \- is used to, well, copy the stacks also,
without it we only clone the data and zero the stacks,
with it we copy the stacks and the new perl interpreter is
ready to run at the exact same point as the previous one.
The pseudo-fork code uses \s-1COPY_STACKS\s0 while the
perl_clone keeps a ptr_table with the pointer of the old
variable as a key and the new variable as a value,
this allows it to check if something has been cloned and not
clone it again but rather just use the value and increase the
refcount. If \s-1KEEP_PTR_TABLE\s0 is not set then perl_clone will kill
the ptr_table using the function
\&\f(CW\*(C`ptr_table_free(PL_ptr_table); PL_ptr_table = NULL;\*(C'\fR,
reason to keep it around is if you want to dup some of your own
variable who are outside the graph perl scans, example of this
code is in threads.xs create
This is a win32 thing, it is ignored on unix, it tells perls
win32host code (which is c++) to clone itself, this is needed on
win32 if you want to run two threads at the same time,
if you just want to do some stuff in a separate perl interpreter
and then throw it away and return to the original one,
you don't need to do anything.
\& PerlInterpreter* perl_clone(PerlInterpreter* interp, UV flags)
.SH "CV Manipulation Functions"
.IX Header "CV Manipulation Functions"
Returns the stash of the \s-1CV\s0.
Returns the \s-1CV\s0 of the specified Perl subroutine. If \f(CW\*(C`create\*(C'\fR is set and
the Perl subroutine does not exist then it will be declared (which has the
same effect as saying \f(CW\*(C`sub name;\*(C'\fR). If \f(CW\*(C`create\*(C'\fR is not set and the
subroutine does not exist then \s-1NULL\s0 is returned.
\&\s-1NOTE:\s0 the perl_ form of this function is deprecated.
\& CV* get_cv(const char* name, I32 create)
.SH "Embedding Functions"
.IX Header "Embedding Functions"
Clear out all the active components of a \s-1CV\s0. This can happen either
by an explicit \f(CW\*(C`undef &foo\*(C'\fR, or by the reference count going to zero.
In the former case, we keep the CvOUTSIDE pointer, so that any anonymous
children can still follow the full lexical scope chain.
Loads the module whose name is pointed to by the string part of name.
Note that the actual module name, not its filename, should be given.
Eg, \*(L"Foo::Bar\*(R" instead of \*(L"Foo/Bar.pm\*(R". flags can be any of
\&\s-1PERL_LOADMOD_DENY\s0, \s-1PERL_LOADMOD_NOIMPORT\s0, or \s-1PERL_LOADMOD_IMPORT_OPS\s0
(or 0 for no flags). ver, if specified, provides version semantics
similar to \f(CW\*(C`use Foo::Bar VERSION\*(C'\fR. The optional trailing SV*
arguments can be used to specify arguments to the module's \fIimport()\fR
method, similar to \f(CW\*(C`use Foo::Bar VERSION LIST\*(C'\fR.
\& void load_module(U32 flags, SV* name, SV* ver, ...)
Stub that provides thread hook for perl_destruct when there are
Allocates a new Perl interpreter. See perlembed.
\& PerlInterpreter* perl_alloc()
.IX Xref "perl_construct"
.IX Item "perl_construct"
Initializes a new Perl interpreter. See perlembed.
\& void perl_construct(PerlInterpreter* interp)
Shuts down a Perl interpreter. See perlembed.
\& int perl_destruct(PerlInterpreter* interp)
Releases a Perl interpreter. See perlembed.
\& void perl_free(PerlInterpreter* interp)
Tells a Perl interpreter to parse a Perl script. See perlembed.
\& int perl_parse(PerlInterpreter* interp, XSINIT_t xsinit, int argc, char** argv, char** env)
Tells a Perl interpreter to run. See perlembed.
\& int perl_run(PerlInterpreter* interp)
Tells Perl to \f(CW\*(C`require\*(C'\fR the file named by the string argument. It is
analogous to the Perl code \f(CW\*(C`eval "require '$file'"\*(C'\fR. It's even
implemented that way; consider using load_module instead.
\&\s-1NOTE:\s0 the perl_ form of this function is deprecated.
\& void require_pv(const char* pv)
.SH "Functions in file pp_pack.c"
.IX Header "Functions in file pp_pack.c"
The engine implementing \fIpack()\fR Perl function.
\& void packlist(SV *cat, char *pat, char *patend, SV **beglist, SV **endlist)
The engine implementing \fIpack()\fR Perl function. Note: parameters next_in_list and
flags are not used. This call should not be used; use packlist instead.
\& void pack_cat(SV *cat, char *pat, char *patend, SV **beglist, SV **endlist, SV ***next_in_list, U32 flags)
The engine implementing \fIunpack()\fR Perl function. \f(CW\*(C`unpackstring\*(C'\fR puts the
extracted list items on the stack and returns the number of elements.
Issue \f(CW\*(C`PUTBACK\*(C'\fR before and \f(CW\*(C`SPAGAIN\*(C'\fR after the call to this function.
\& I32 unpackstring(char *pat, char *patend, char *s, char *strend, U32 flags)
The engine implementing \fIunpack()\fR Perl function. Note: parameters strbeg, new_s
and ocnt are not used. This call should not be used, use unpackstring instead.
\& I32 unpack_str(char *pat, char *patend, char *s, char *strbeg, char *strend, char **new_s, I32 ocnt, U32 flags)
.IX Header "Global Variables"
\&\f(CW\*(C`PL_modglobal\*(C'\fR is a general purpose, interpreter global \s-1HV\s0 for use by
extensions that need to keep information on a per-interpreter basis.
In a pinch, it can also be used as a symbol table for extensions
to share data among each other. It is a good idea to use keys
prefixed by the package name of the extension that owns the data.
A convenience variable which is typically used with \f(CW\*(C`SvPV\*(C'\fR when one
doesn't care about the length of the string. It is usually more efficient
to either declare a local variable and use that instead or to use the
\&\f(CW\*(C`SvPV_nolen\*(C'\fR macro.
This is the \f(CW\*(C`false\*(C'\fR \s-1SV\s0. See \f(CW\*(C`PL_sv_yes\*(C'\fR. Always refer to this as
This is the \f(CW\*(C`undef\*(C'\fR \s-1SV\s0. Always refer to this as \f(CW&PL_sv_undef\fR.
This is the \f(CW\*(C`true\*(C'\fR \s-1SV\s0. See \f(CW\*(C`PL_sv_no\*(C'\fR. Always refer to this as
.IX Header "GV Functions"
Return the \s-1SV\s0 from the \s-1GV\s0.
Returns the glob with the given \f(CW\*(C`name\*(C'\fR and a defined subroutine or
\&\f(CW\*(C`NULL\*(C'\fR. The glob lives in the given \f(CW\*(C`stash\*(C'\fR, or in the stashes
accessible via \f(CW@ISA\fR and \s-1UNIVERSAL::\s0.
The argument \f(CW\*(C`level\*(C'\fR should be either 0 or \-1. If \f(CW\*(C`level==0\*(C'\fR, as a
side-effect creates a glob with the given \f(CW\*(C`name\*(C'\fR in the given \f(CW\*(C`stash\*(C'\fR
which in the case of success contains an alias for the subroutine, and sets
up caching info for this glob. Similarly for all the searched stashes.
This function grants \f(CW"SUPER"\fR token as a postfix of the stash name. The
\&\s-1GV\s0 returned from \f(CW\*(C`gv_fetchmeth\*(C'\fR may be a method cache entry, which is not
visible to Perl code. So when calling \f(CW\*(C`call_sv\*(C'\fR, you should not use
the \s-1GV\s0 directly; instead, you should use the method's \s-1CV\s0, which can be
obtained from the \s-1GV\s0 with the \f(CW\*(C`GvCV\*(C'\fR macro.
\& GV* gv_fetchmeth(HV* stash, const char* name, STRLEN len, I32 level)
.IX Xref "gv_fetchmethod"
.IX Item "gv_fetchmethod"
See gv_fetchmethod_autoload.
\& GV* gv_fetchmethod(HV* stash, const char* name)
.IP "gv_fetchmethod_autoload" 8
.IX Xref "gv_fetchmethod_autoload"
.IX Item "gv_fetchmethod_autoload"
Returns the glob which contains the subroutine to call to invoke the method
on the \f(CW\*(C`stash\*(C'\fR. In fact in the presence of autoloading this may be the
glob for \*(L"\s-1AUTOLOAD\s0\*(R". In this case the corresponding variable \f(CW$AUTOLOAD\fR is
The third parameter of \f(CW\*(C`gv_fetchmethod_autoload\*(C'\fR determines whether
\&\s-1AUTOLOAD\s0 lookup is performed if the given method is not present: non-zero
means yes, look for \s-1AUTOLOAD\s0; zero means no, don't look for \s-1AUTOLOAD\s0.
Calling \f(CW\*(C`gv_fetchmethod\*(C'\fR is equivalent to calling \f(CW\*(C`gv_fetchmethod_autoload\*(C'\fR
with a non-zero \f(CW\*(C`autoload\*(C'\fR parameter.
These functions grant \f(CW"SUPER"\fR token as a prefix of the method name. Note
that if you want to keep the returned glob for a long time, you need to
check for it being \*(L"\s-1AUTOLOAD\s0\*(R", since at the later time the call may load a
different subroutine due to \f(CW$AUTOLOAD\fR changing its value. Use the glob
created via a side effect to do this.
These functions have the same side-effects and as \f(CW\*(C`gv_fetchmeth\*(C'\fR with
\&\f(CW\*(C`level==0\*(C'\fR. \f(CW\*(C`name\*(C'\fR should be writable if contains \f(CW':'\fR or \f(CW\*(C`'
\&''\*(C'\fR. The warning against passing the \s-1GV\s0 returned by \f(CW\*(C`gv_fetchmeth\*(C'\fR to
\&\f(CW\*(C`call_sv\*(C'\fR apply equally to these functions.
\& GV* gv_fetchmethod_autoload(HV* stash, const char* name, I32 autoload)
.IP "gv_fetchmeth_autoload" 8
.IX Xref "gv_fetchmeth_autoload"
.IX Item "gv_fetchmeth_autoload"
Same as \fIgv_fetchmeth()\fR, but looks for autoloaded subroutines too.
Returns a glob for the subroutine.
For an autoloaded subroutine without a \s-1GV\s0, will create a \s-1GV\s0 even
if \f(CW\*(C`level < 0\*(C'\fR. For an autoloaded subroutine without a stub, \fIGvCV()\fR
of the result may be zero.
\& GV* gv_fetchmeth_autoload(HV* stash, const char* name, STRLEN len, I32 level)
Returns a pointer to the stash for a specified package. \f(CW\*(C`name\*(C'\fR should
be a valid \s-1UTF\-8\s0 string and must be null\-terminated. If \f(CW\*(C`create\*(C'\fR is set
then the package will be created if it does not already exist. If \f(CW\*(C`create\*(C'\fR
is not set and the package does not exist then \s-1NULL\s0 is returned.
\& HV* gv_stashpv(const char* name, I32 create)
Returns a pointer to the stash for a specified package. \f(CW\*(C`name\*(C'\fR should
be a valid \s-1UTF\-8\s0 string. The \f(CW\*(C`namelen\*(C'\fR parameter indicates the length of
the \f(CW\*(C`name\*(C'\fR, in bytes. If \f(CW\*(C`create\*(C'\fR is set then the package will be
created if it does not already exist. If \f(CW\*(C`create\*(C'\fR is not set and the
package does not exist then \s-1NULL\s0 is returned.
\& HV* gv_stashpvn(const char* name, U32 namelen, I32 create)
Returns a pointer to the stash for a specified package, which must be a
valid \s-1UTF\-8\s0 string. See \f(CW\*(C`gv_stashpv\*(C'\fR.
\& HV* gv_stashsv(SV* sv, I32 create)
.IX Header "Handy Values"
.SH "Hash Manipulation Functions"
.IX Header "Hash Manipulation Functions"
Returns the \s-1HV\s0 of the specified Perl hash. If \f(CW\*(C`create\*(C'\fR is set and the
Perl variable does not exist then it will be created. If \f(CW\*(C`create\*(C'\fR is not
set and the variable does not exist then \s-1NULL\s0 is returned.
\&\s-1NOTE:\s0 the perl_ form of this function is deprecated.
\& HV* get_hv(const char* name, I32 create)
This flag, used in the length slot of hash entries and magic structures,
specifies the structure contains an \f(CW\*(C`SV*\*(C'\fR pointer where a \f(CW\*(C`char*\*(C'\fR pointer
is to be expected. (For information only\*(--not to be used).
Returns the computed hash stored in the hash entry.
Returns the actual pointer stored in the key slot of the hash entry. The
pointer may be either \f(CW\*(C`char*\*(C'\fR or \f(CW\*(C`SV*\*(C'\fR, depending on the value of
\&\f(CW\*(C`HeKLEN()\*(C'\fR. Can be assigned to. The \f(CW\*(C`HePV()\*(C'\fR or \f(CW\*(C`HeSVKEY()\*(C'\fR macros are
usually preferable for finding the value of a key.
If this is negative, and amounts to \f(CW\*(C`HEf_SVKEY\*(C'\fR, it indicates the entry
holds an \f(CW\*(C`SV*\*(C'\fR key. Otherwise, holds the actual length of the key. Can
be assigned to. The \f(CW\*(C`HePV()\*(C'\fR macro is usually preferable for finding key
Returns the key slot of the hash entry as a \f(CW\*(C`char*\*(C'\fR value, doing any
necessary dereferencing of possibly \f(CW\*(C`SV*\*(C'\fR keys. The length of the string
is placed in \f(CW\*(C`len\*(C'\fR (this is a macro, so do \fInot\fR use \f(CW&len\fR). If you do
not care about what the length of the key is, you may use the global
variable \f(CW\*(C`PL_na\*(C'\fR, though this is rather less efficient than using a local
variable. Remember though, that hash keys in perl are free to contain
embedded nulls, so using \f(CW\*(C`strlen()\*(C'\fR or similar is not a good way to find
the length of hash keys. This is very similar to the \f(CW\*(C`SvPV()\*(C'\fR macro
described elsewhere in this document.
\& char* HePV(HE* he, STRLEN len)
Returns the key as an \f(CW\*(C`SV*\*(C'\fR, or \f(CW\*(C`Nullsv\*(C'\fR if the hash entry does not
contain an \f(CW\*(C`SV*\*(C'\fR key.
Returns the key as an \f(CW\*(C`SV*\*(C'\fR. Will create and return a temporary mortal
\&\f(CW\*(C`SV*\*(C'\fR if the hash entry contains only a \f(CW\*(C`char*\*(C'\fR key.
\& SV* HeSVKEY_force(HE* he)
Sets the key to a given \f(CW\*(C`SV*\*(C'\fR, taking care to set the appropriate flags to
indicate the presence of an \f(CW\*(C`SV*\*(C'\fR key, and returns the same
\& SV* HeSVKEY_set(HE* he, SV* sv)
Returns the value slot (type \f(CW\*(C`SV*\*(C'\fR) stored in the hash entry.
Returns the package name of a stash. See \f(CW\*(C`SvSTASH\*(C'\fR, \f(CW\*(C`CvSTASH\*(C'\fR.
\& char* HvNAME(HV* stash)
Clears a hash, making it empty.
.IP "hv_clear_placeholders" 8
.IX Xref "hv_clear_placeholders"
.IX Item "hv_clear_placeholders"
Clears any placeholders from a hash. If a restricted hash has any of its keys
marked as readonly and the key is subsequently deleted, the key is not actually
deleted but is marked by assigning it a value of &PL_sv_placeholder. This tags
it so it will be ignored by future operations such as iterating over the hash,
but will still allow the hash to have a value reassigned to the key at some
future point. This function clears any such placeholder keys from the hash.
See \fIHash::Util::lock_keys()\fR for an example of its use.
\& void hv_clear_placeholders(HV* hb)
Deletes a key/value pair in the hash. The value \s-1SV\s0 is removed from the
hash and returned to the caller. The \f(CW\*(C`klen\*(C'\fR is the length of the key.
The \f(CW\*(C`flags\*(C'\fR value will normally be zero; if set to G_DISCARD then \s-1NULL\s0
\& SV* hv_delete(HV* tb, const char* key, I32 klen, I32 flags)
Deletes a key/value pair in the hash. The value \s-1SV\s0 is removed from the
hash and returned to the caller. The \f(CW\*(C`flags\*(C'\fR value will normally be zero;
if set to G_DISCARD then \s-1NULL\s0 will be returned. \f(CW\*(C`hash\*(C'\fR can be a valid
precomputed hash value, or 0 to ask for it to be computed.
\& SV* hv_delete_ent(HV* tb, SV* key, I32 flags, U32 hash)
Returns a boolean indicating whether the specified hash key exists. The
\&\f(CW\*(C`klen\*(C'\fR is the length of the key.
\& bool hv_exists(HV* tb, const char* key, I32 klen)
Returns a boolean indicating whether the specified hash key exists. \f(CW\*(C`hash\*(C'\fR
can be a valid precomputed hash value, or 0 to ask for it to be
\& bool hv_exists_ent(HV* tb, SV* key, U32 hash)
Returns the \s-1SV\s0 which corresponds to the specified key in the hash. The
\&\f(CW\*(C`klen\*(C'\fR is the length of the key. If \f(CW\*(C`lval\*(C'\fR is set then the fetch will be
part of a store. Check that the return value is non-null before
dereferencing it to an \f(CW\*(C`SV*\*(C'\fR.
See \*(L"Understanding the Magic of Tied Hashes and Arrays\*(R" in perlguts for more
information on how to use this function on tied hashes.
\& SV** hv_fetch(HV* tb, const char* key, I32 klen, I32 lval)
Returns the hash entry which corresponds to the specified key in the hash.
\&\f(CW\*(C`hash\*(C'\fR must be a valid precomputed hash number for the given \f(CW\*(C`key\*(C'\fR, or 0
if you want the function to compute it. \s-1IF\s0 \f(CW\*(C`lval\*(C'\fR is set then the fetch
will be part of a store. Make sure the return value is non-null before
accessing it. The return value when \f(CW\*(C`tb\*(C'\fR is a tied hash is a pointer to a
static location, so be sure to make a copy of the structure if you need to
See \*(L"Understanding the Magic of Tied Hashes and Arrays\*(R" in perlguts for more
information on how to use this function on tied hashes.
\& HE* hv_fetch_ent(HV* tb, SV* key, I32 lval, U32 hash)
Prepares a starting point to traverse a hash table. Returns the number of
keys in the hash (i.e. the same as \f(CW\*(C`HvKEYS(tb)\*(C'\fR). The return value is
currently only meaningful for hashes without tie magic.
\&\s-1NOTE:\s0 Before version 5.004_65, \f(CW\*(C`hv_iterinit\*(C'\fR used to return the number of
hash buckets that happen to be in use. If you still need that esoteric
value, you can get it through the macro \f(CW\*(C`HvFILL(tb)\*(C'\fR.
\& I32 hv_iterinit(HV* tb)
Returns the key from the current position of the hash iterator. See
\&\f(CW\*(C`hv_iterinit\*(C'\fR.
\& char* hv_iterkey(HE* entry, I32* retlen)
Returns the key as an \f(CW\*(C`SV*\*(C'\fR from the current position of the hash
iterator. The return value will always be a mortal copy of the key. Also
see \f(CW\*(C`hv_iterinit\*(C'\fR.
\& SV* hv_iterkeysv(HE* entry)
Returns entries from a hash iterator. See \f(CW\*(C`hv_iterinit\*(C'\fR.
You may call \f(CW\*(C`hv_delete\*(C'\fR or \f(CW\*(C`hv_delete_ent\*(C'\fR on the hash entry that the
iterator currently points to, without losing your place or invalidating your
iterator. Note that in this case the current entry is deleted from the hash
with your iterator holding the last reference to it. Your iterator is flagged
to free the entry on the next call to \f(CW\*(C`hv_iternext\*(C'\fR, so you must not discard
your iterator immediately else the entry will leak \- call \f(CW\*(C`hv_iternext\*(C'\fR to
trigger the resource deallocation.
\& HE* hv_iternext(HV* tb)
Performs an \f(CW\*(C`hv_iternext\*(C'\fR, \f(CW\*(C`hv_iterkey\*(C'\fR, and \f(CW\*(C`hv_iterval\*(C'\fR in one
\& SV* hv_iternextsv(HV* hv, char** key, I32* retlen)
.IP "hv_iternext_flags" 8
.IX Xref "hv_iternext_flags"
.IX Item "hv_iternext_flags"
Returns entries from a hash iterator. See \f(CW\*(C`hv_iterinit\*(C'\fR and \f(CW\*(C`hv_iternext\*(C'\fR.
The \f(CW\*(C`flags\*(C'\fR value will normally be zero; if \s-1HV_ITERNEXT_WANTPLACEHOLDERS\s0 is
set the placeholders keys (for restricted hashes) will be returned in addition
to normal keys. By default placeholders are automatically skipped over.
Currently a placeholder is implemented with a value that is
\&\f(CW&Perl_sv_placeholder\fR. Note that the implementation of placeholders and
restricted hashes may change, and the implementation currently is
insufficiently abstracted for any change to be tidy.
\&\s-1NOTE:\s0 this function is experimental and may change or be
\& HE* hv_iternext_flags(HV* tb, I32 flags)
Returns the value from the current position of the hash iterator. See
\&\f(CW\*(C`hv_iterkey\*(C'\fR.
\& SV* hv_iterval(HV* tb, HE* entry)
Adds magic to a hash. See \f(CW\*(C`sv_magic\*(C'\fR.
\& void hv_magic(HV* hv, GV* gv, int how)
Evaluates the hash in scalar context and returns the result. Handles magic when the hash is tied.
Stores an \s-1SV\s0 in a hash. The hash key is specified as \f(CW\*(C`key\*(C'\fR and \f(CW\*(C`klen\*(C'\fR is
the length of the key. The \f(CW\*(C`hash\*(C'\fR parameter is the precomputed hash
value; if it is zero then Perl will compute it. The return value will be
\&\s-1NULL\s0 if the operation failed or if the value did not need to be actually
stored within the hash (as in the case of tied hashes). Otherwise it can
be dereferenced to get the original \f(CW\*(C`SV*\*(C'\fR. Note that the caller is
responsible for suitably incrementing the reference count of \f(CW\*(C`val\*(C'\fR before
the call, and decrementing it if the function returned \s-1NULL\s0. Effectively
a successful hv_store takes ownership of one reference to \f(CW\*(C`val\*(C'\fR. This is
usually what you want; a newly created \s-1SV\s0 has a reference count of one, so
if all your code does is create SVs then store them in a hash, hv_store
will own the only reference to the new \s-1SV\s0, and your code doesn't need to do
anything further to tidy up. hv_store is not implemented as a call to
hv_store_ent, and does not create a temporary \s-1SV\s0 for the key, so if your
key data is not already in \s-1SV\s0 form then use hv_store in preference to
See \*(L"Understanding the Magic of Tied Hashes and Arrays\*(R" in perlguts for more
information on how to use this function on tied hashes.
\& SV** hv_store(HV* tb, const char* key, I32 klen, SV* val, U32 hash)
Stores \f(CW\*(C`val\*(C'\fR in a hash. The hash key is specified as \f(CW\*(C`key\*(C'\fR. The \f(CW\*(C`hash\*(C'\fR
parameter is the precomputed hash value; if it is zero then Perl will
compute it. The return value is the new hash entry so created. It will be
\&\s-1NULL\s0 if the operation failed or if the value did not need to be actually
stored within the hash (as in the case of tied hashes). Otherwise the
contents of the return value can be accessed using the \f(CW\*(C`He?\*(C'\fR macros
described here. Note that the caller is responsible for suitably
incrementing the reference count of \f(CW\*(C`val\*(C'\fR before the call, and
decrementing it if the function returned \s-1NULL\s0. Effectively a successful
hv_store_ent takes ownership of one reference to \f(CW\*(C`val\*(C'\fR. This is
usually what you want; a newly created \s-1SV\s0 has a reference count of one, so
if all your code does is create SVs then store them in a hash, hv_store
will own the only reference to the new \s-1SV\s0, and your code doesn't need to do
anything further to tidy up. Note that hv_store_ent only reads the \f(CW\*(C`key\*(C'\fR;
unlike \f(CW\*(C`val\*(C'\fR it does not take ownership of it, so maintaining the correct
reference count on \f(CW\*(C`key\*(C'\fR is entirely the caller's responsibility. hv_store
is not implemented as a call to hv_store_ent, and does not create a temporary
\&\s-1SV\s0 for the key, so if your key data is not already in \s-1SV\s0 form then use
hv_store in preference to hv_store_ent.
See \*(L"Understanding the Magic of Tied Hashes and Arrays\*(R" in perlguts for more
information on how to use this function on tied hashes.
\& HE* hv_store_ent(HV* tb, SV* key, SV* val, U32 hash)
Creates a new \s-1HV\s0. The reference count is set to 1.
.IX Header "Magical Functions"
Clear something magical that the \s-1SV\s0 represents. See \f(CW\*(C`sv_magic\*(C'\fR.
Copies the magic from one \s-1SV\s0 to another. See \f(CW\*(C`sv_magic\*(C'\fR.
\& int mg_copy(SV* sv, SV* nsv, const char* key, I32 klen)
Finds the magic pointer for type matching the \s-1SV\s0. See \f(CW\*(C`sv_magic\*(C'\fR.
\& MAGIC* mg_find(SV* sv, int type)
Free any magic storage used by the \s-1SV\s0. See \f(CW\*(C`sv_magic\*(C'\fR.
Do magic after a value is retrieved from the \s-1SV\s0. See \f(CW\*(C`sv_magic\*(C'\fR.
Report on the \s-1SV\s0's length. See \f(CW\*(C`sv_magic\*(C'\fR.
Turns on the magical status of an \s-1SV\s0. See \f(CW\*(C`sv_magic\*(C'\fR.
\& void mg_magical(SV* sv)
Do magic after a value is assigned to the \s-1SV\s0. See \f(CW\*(C`sv_magic\*(C'\fR.
Invokes \f(CW\*(C`mg_get\*(C'\fR on an \s-1SV\s0 if it has 'get' magic. This macro evaluates its
\& void SvGETMAGIC(SV* sv)
Arranges for a mutual exclusion lock to be obtained on sv if a suitable module
Invokes \f(CW\*(C`mg_set\*(C'\fR on an \s-1SV\s0 if it has 'set' magic. This macro evaluates its
\& void SvSETMAGIC(SV* sv)
Like \f(CW\*(C`SvSetSV\*(C'\fR, but does any set magic required afterwards.
\& void SvSetMagicSV(SV* dsb, SV* ssv)
.IP "SvSetMagicSV_nosteal" 8
.IX Xref "SvSetMagicSV_nosteal"
.IX Item "SvSetMagicSV_nosteal"
Like \f(CW\*(C`SvSetSV_nosteal\*(C'\fR, but does any set magic required afterwards.
\& void SvSetMagicSV_nosteal(SV* dsv, SV* ssv)
Calls \f(CW\*(C`sv_setsv\*(C'\fR if dsv is not the same as ssv. May evaluate arguments
\& void SvSetSV(SV* dsb, SV* ssv)
.IX Xref "SvSetSV_nosteal"
.IX Item "SvSetSV_nosteal"
Calls a non-destructive version of \f(CW\*(C`sv_setsv\*(C'\fR if dsv is not the same as
ssv. May evaluate arguments more than once.
\& void SvSetSV_nosteal(SV* dsv, SV* ssv)
Arranges for sv to be shared between threads if a suitable module
Releases a mutual exclusion lock on sv if a suitable module
.IX Header "Memory Management"
The XSUB\-writer's interface to the C \f(CW\*(C`memcpy\*(C'\fR function. The \f(CW\*(C`src\*(C'\fR is the
source, \f(CW\*(C`dest\*(C'\fR is the destination, \f(CW\*(C`nitems\*(C'\fR is the number of items, and \f(CW\*(C`type\*(C'\fR is
the type. May fail on overlapping copies. See also \f(CW\*(C`Move\*(C'\fR.
\& void Copy(void* src, void* dest, int nitems, type)
Like \f(CW\*(C`Copy\*(C'\fR but returns dest. Useful for encouraging compilers to tail-call
\& void * CopyD(void* src, void* dest, int nitems, type)
The XSUB\-writer's interface to the C \f(CW\*(C`memmove\*(C'\fR function. The \f(CW\*(C`src\*(C'\fR is the
source, \f(CW\*(C`dest\*(C'\fR is the destination, \f(CW\*(C`nitems\*(C'\fR is the number of items, and \f(CW\*(C`type\*(C'\fR is
the type. Can do overlapping moves. See also \f(CW\*(C`Copy\*(C'\fR.
\& void Move(void* src, void* dest, int nitems, type)
Like \f(CW\*(C`Move\*(C'\fR but returns dest. Useful for encouraging compilers to tail-call
\& void * MoveD(void* src, void* dest, int nitems, type)
The XSUB\-writer's interface to the C \f(CW\*(C`malloc\*(C'\fR function.
\& void Newx(void* ptr, int nitems, type)
The XSUB\-writer's interface to the C \f(CW\*(C`malloc\*(C'\fR function, with
\& void Newxc(void* ptr, int nitems, type, cast)
The XSUB\-writer's interface to the C \f(CW\*(C`malloc\*(C'\fR function. The allocated
memory is zeroed with \f(CW\*(C`memzero\*(C'\fR.
In 5.9.3, we removed the 1st parameter, a debug aid, from the api. It
was used to uniquely identify each usage of these allocation
functions, but was deemed unnecessary with the availability of better
memory tracking tools, valgrind for example.
\& void Newxz(void* ptr, int nitems, type)
Fill up memory with a pattern (byte 0xAB over and over again) that
hopefully catches attempts to access uninitialized memory.
\& void Poison(void* dest, int nitems, type)
The XSUB\-writer's interface to the C \f(CW\*(C`realloc\*(C'\fR function.
\& void Renew(void* ptr, int nitems, type)
The XSUB\-writer's interface to the C \f(CW\*(C`realloc\*(C'\fR function, with
\& void Renewc(void* ptr, int nitems, type, cast)
The XSUB\-writer's interface to the C \f(CW\*(C`free\*(C'\fR function.
\& void Safefree(void* ptr)
Perl's version of \f(CW\*(C`strdup()\*(C'\fR. Returns a pointer to a newly allocated
string which is a duplicate of \f(CW\*(C`pv\*(C'\fR. The size of the string is
determined by \f(CW\*(C`strlen()\*(C'\fR. The memory allocated for the new string can
be freed with the \f(CW\*(C`Safefree()\*(C'\fR function.
\& char* savepv(const char* pv)
Perl's version of what \f(CW\*(C`strndup()\*(C'\fR would be if it existed. Returns a
pointer to a newly allocated string which is a duplicate of the first
\&\f(CW\*(C`len\*(C'\fR bytes from \f(CW\*(C`pv\*(C'\fR. The memory allocated for the new string can be
freed with the \f(CW\*(C`Safefree()\*(C'\fR function.
\& char* savepvn(const char* pv, I32 len)
A version of \f(CW\*(C`savepv()\*(C'\fR which allocates the duplicate string in memory
which is shared between threads.
\& char* savesharedpv(const char* pv)
A version of \f(CW\*(C`savepv()\*(C'\fR/\f(CW\*(C`savepvn()\*(C'\fR which gets the string to duplicate from
the passed in \s-1SV\s0 using \f(CW\*(C`SvPV()\*(C'\fR
\& char* savesvpv(SV* sv)
This is an architecture-independent macro to copy one structure to another.
\& void StructCopy(type src, type dest, type)
The XSUB\-writer's interface to the C \f(CW\*(C`memzero\*(C'\fR function. The \f(CW\*(C`dest\*(C'\fR is the
destination, \f(CW\*(C`nitems\*(C'\fR is the number of items, and \f(CW\*(C`type\*(C'\fR is the type.
\& void Zero(void* dest, int nitems, type)
Like \f(CW\*(C`Zero\*(C'\fR but returns dest. Useful for encouraging compilers to tail-call
\& void * ZeroD(void* dest, int nitems, type)
.SH "Miscellaneous Functions"
.IX Header "Miscellaneous Functions"
Analyses the string in order to make fast searches on it using \fIfbm_instr()\fR
\&\*(-- the Boyer-Moore algorithm.
\& void fbm_compile(SV* sv, U32 flags)
Returns the location of the \s-1SV\s0 in the string delimited by \f(CW\*(C`str\*(C'\fR and
\&\f(CW\*(C`strend\*(C'\fR. It returns \f(CW\*(C`Nullch\*(C'\fR if the string can't be found. The \f(CW\*(C`sv\*(C'\fR
does not have to be fbm_compiled, but the search will not be as fast
\& char* fbm_instr(unsigned char* big, unsigned char* bigend, SV* littlesv, U32 flags)
Takes a sprintf-style format pattern and conventional
(non\-SV) arguments and returns the formatted string.
\& (char *) Perl_form(pTHX_ const char* pat, ...)
can be used any place a string (char *) is required:
\& char * s = Perl_form("%d.%d",major,minor);
Uses a single private buffer so if you want to format several strings you
must explicitly copy the earlier strings away (and free the copies when you
\& char* form(const char* pat, ...)
Fill the sv with current working directory
Test two strings to see if they are equal. Returns true or false.
\& bool strEQ(char* s1, char* s2)
Test two strings to see if the first, \f(CW\*(C`s1\*(C'\fR, is greater than or equal to
the second, \f(CW\*(C`s2\*(C'\fR. Returns true or false.
\& bool strGE(char* s1, char* s2)
Test two strings to see if the first, \f(CW\*(C`s1\*(C'\fR, is greater than the second,
\&\f(CW\*(C`s2\*(C'\fR. Returns true or false.
\& bool strGT(char* s1, char* s2)
Test two strings to see if the first, \f(CW\*(C`s1\*(C'\fR, is less than or equal to the
second, \f(CW\*(C`s2\*(C'\fR. Returns true or false.
\& bool strLE(char* s1, char* s2)
Test two strings to see if the first, \f(CW\*(C`s1\*(C'\fR, is less than the second,
\&\f(CW\*(C`s2\*(C'\fR. Returns true or false.
\& bool strLT(char* s1, char* s2)
Test two strings to see if they are different. Returns true or
\& bool strNE(char* s1, char* s2)
Test two strings to see if they are equal. The \f(CW\*(C`len\*(C'\fR parameter indicates
the number of bytes to compare. Returns true or false. (A wrapper for
\&\f(CW\*(C`strncmp\*(C'\fR).
\& bool strnEQ(char* s1, char* s2, STRLEN len)
Test two strings to see if they are different. The \f(CW\*(C`len\*(C'\fR parameter
indicates the number of bytes to compare. Returns true or false. (A
wrapper for \f(CW\*(C`strncmp\*(C'\fR).
\& bool strnNE(char* s1, char* s2, STRLEN len)
Dummy routine which \*(L"locks\*(R" an \s-1SV\s0 when there is no locking module present.
Exists to avoid test for a \s-1NULL\s0 function pointer and because it could potentially warn under
some level of strict\-ness.
\& void sv_nolocking(SV *)
Dummy routine which \*(L"shares\*(R" an \s-1SV\s0 when there is no sharing module present.
Exists to avoid test for a \s-1NULL\s0 function pointer and because it could potentially warn under
some level of strict\-ness.
\& void sv_nosharing(SV *)
.IX Xref "sv_nounlocking"
.IX Item "sv_nounlocking"
Dummy routine which \*(L"unlocks\*(R" an \s-1SV\s0 when there is no locking module present.
Exists to avoid test for a \s-1NULL\s0 function pointer and because it could potentially warn under
some level of strict\-ness.
\& void sv_nounlocking(SV *)
.IX Header "Numeric functions"
converts a string representing a binary number to numeric form.
On entry \fIstart\fR and \fI*len\fR give the string to scan, \fI*flags\fR gives
conversion flags, and \fIresult\fR should be \s-1NULL\s0 or a pointer to an \s-1NV\s0.
The scan stops at the end of the string, or the first invalid character.
Unless \f(CW\*(C`PERL_SCAN_SILENT_ILLDIGIT\*(C'\fR is set in \fI*flags\fR, encountering an
invalid character will also trigger a warning.
On return \fI*len\fR is set to the length of the scanned string,
and \fI*flags\fR gives output flags.
If the value is <= \f(CW\*(C`UV_MAX\*(C'\fR it is returned as a \s-1UV\s0, the output flags are clear,
and nothing is written to \fI*result\fR. If the value is > \s-1UV_MAX\s0 \f(CW\*(C`grok_bin\*(C'\fR
returns \s-1UV_MAX\s0, sets \f(CW\*(C`PERL_SCAN_GREATER_THAN_UV_MAX\*(C'\fR in the output flags,
and writes the value to \fI*result\fR (or the value is discarded if \fIresult\fR
The binary number may optionally be prefixed with \*(L"0b\*(R" or \*(L"b\*(R" unless
\&\f(CW\*(C`PERL_SCAN_DISALLOW_PREFIX\*(C'\fR is set in \fI*flags\fR on entry. If
\&\f(CW\*(C`PERL_SCAN_ALLOW_UNDERSCORES\*(C'\fR is set in \fI*flags\fR then the binary
number may use '_' characters to separate digits.
\& UV grok_bin(char* start, STRLEN* len, I32* flags, NV *result)
converts a string representing a hex number to numeric form.
On entry \fIstart\fR and \fI*len\fR give the string to scan, \fI*flags\fR gives
conversion flags, and \fIresult\fR should be \s-1NULL\s0 or a pointer to an \s-1NV\s0.
The scan stops at the end of the string, or the first invalid character.
Unless \f(CW\*(C`PERL_SCAN_SILENT_ILLDIGIT\*(C'\fR is set in \fI*flags\fR, encountering an
invalid character will also trigger a warning.
On return \fI*len\fR is set to the length of the scanned string,
and \fI*flags\fR gives output flags.
If the value is <= \s-1UV_MAX\s0 it is returned as a \s-1UV\s0, the output flags are clear,
and nothing is written to \fI*result\fR. If the value is > \s-1UV_MAX\s0 \f(CW\*(C`grok_hex\*(C'\fR
returns \s-1UV_MAX\s0, sets \f(CW\*(C`PERL_SCAN_GREATER_THAN_UV_MAX\*(C'\fR in the output flags,
and writes the value to \fI*result\fR (or the value is discarded if \fIresult\fR
The hex number may optionally be prefixed with \*(L"0x\*(R" or \*(L"x\*(R" unless
\&\f(CW\*(C`PERL_SCAN_DISALLOW_PREFIX\*(C'\fR is set in \fI*flags\fR on entry. If
\&\f(CW\*(C`PERL_SCAN_ALLOW_UNDERSCORES\*(C'\fR is set in \fI*flags\fR then the hex
number may use '_' characters to separate digits.
\& UV grok_hex(char* start, STRLEN* len, I32* flags, NV *result)
Recognise (or not) a number. The type of the number is returned
(0 if unrecognised), otherwise it is a bit-ORed combination of
\&\s-1IS_NUMBER_IN_UV\s0, \s-1IS_NUMBER_GREATER_THAN_UV_MAX\s0, \s-1IS_NUMBER_NOT_INT\s0,
\&\s-1IS_NUMBER_NEG\s0, \s-1IS_NUMBER_INFINITY\s0, \s-1IS_NUMBER_NAN\s0 (defined in perl.h).
If the value of the number can fit an in \s-1UV\s0, it is returned in the *valuep
\&\s-1IS_NUMBER_IN_UV\s0 will be set to indicate that *valuep is valid, \s-1IS_NUMBER_IN_UV\s0
will never be set unless *valuep is valid, but *valuep may have been assigned
to during processing even though \s-1IS_NUMBER_IN_UV\s0 is not set on return.
If valuep is \s-1NULL\s0, \s-1IS_NUMBER_IN_UV\s0 will be set for the same cases as when
valuep is non\-NULL, but no actual assignment (or \s-1SEGV\s0) will occur.
\&\s-1IS_NUMBER_NOT_INT\s0 will be set with \s-1IS_NUMBER_IN_UV\s0 if trailing decimals were
seen (in which case *valuep gives the true value truncated to an integer), and
\&\s-1IS_NUMBER_NEG\s0 if the number is negative (in which case *valuep holds the
absolute value). \s-1IS_NUMBER_IN_UV\s0 is not set if e notation was used or the
number is larger than a \s-1UV\s0.
\& int grok_number(const char *pv, STRLEN len, UV *valuep)
.IP "grok_numeric_radix" 8
.IX Xref "grok_numeric_radix"
.IX Item "grok_numeric_radix"
Scan and skip for a numeric decimal separator (radix).
\& bool grok_numeric_radix(const char **sp, const char *send)
converts a string representing an octal number to numeric form.
On entry \fIstart\fR and \fI*len\fR give the string to scan, \fI*flags\fR gives
conversion flags, and \fIresult\fR should be \s-1NULL\s0 or a pointer to an \s-1NV\s0.
The scan stops at the end of the string, or the first invalid character.
Unless \f(CW\*(C`PERL_SCAN_SILENT_ILLDIGIT\*(C'\fR is set in \fI*flags\fR, encountering an
invalid character will also trigger a warning.
On return \fI*len\fR is set to the length of the scanned string,
and \fI*flags\fR gives output flags.
If the value is <= \s-1UV_MAX\s0 it is returned as a \s-1UV\s0, the output flags are clear,
and nothing is written to \fI*result\fR. If the value is > \s-1UV_MAX\s0 \f(CW\*(C`grok_oct\*(C'\fR
returns \s-1UV_MAX\s0, sets \f(CW\*(C`PERL_SCAN_GREATER_THAN_UV_MAX\*(C'\fR in the output flags,
and writes the value to \fI*result\fR (or the value is discarded if \fIresult\fR
If \f(CW\*(C`PERL_SCAN_ALLOW_UNDERSCORES\*(C'\fR is set in \fI*flags\fR then the octal
number may use '_' characters to separate digits.
\& UV grok_oct(char* start, STRLEN* len_p, I32* flags, NV *result)
For backwards compatibility. Use \f(CW\*(C`grok_bin\*(C'\fR instead.
\& NV scan_bin(char* start, STRLEN len, STRLEN* retlen)
For backwards compatibility. Use \f(CW\*(C`grok_hex\*(C'\fR instead.
\& NV scan_hex(char* start, STRLEN len, STRLEN* retlen)
For backwards compatibility. Use \f(CW\*(C`grok_oct\*(C'\fR instead.
\& NV scan_oct(char* start, STRLEN len, STRLEN* retlen)
.SH "Optree Manipulation Functions"
.IX Header "Optree Manipulation Functions"
If \f(CW\*(C`cv\*(C'\fR is a constant sub eligible for inlining. returns the constant
value returned by the sub. Otherwise, returns \s-1NULL\s0.
Constant subs can be created with \f(CW\*(C`newCONSTSUB\*(C'\fR or as described in
\&\*(L"Constant Functions\*(R" in perlsub.
\& SV* cv_const_sv(CV* cv)
Creates a constant sub equivalent to Perl \f(CW\*(C`sub FOO () { 123 }\*(C'\fR which is
eligible for inlining at compile\-time.
\& CV* newCONSTSUB(HV* stash, char* name, SV* sv)
Used by \f(CW\*(C`xsubpp\*(C'\fR to hook up XSUBs as Perl subs.
.SH "Pad Data Structures"
.IX Header "Pad Data Structures"
Get the value at offset po in the current pad.
Use macro \s-1PAD_SV\s0 instead of calling this function directly.
\& SV* pad_sv(PADOFFSET po)
.SH "Stack Manipulation Macros"
.IX Header "Stack Manipulation Macros"
Declare a stack marker variable, \f(CW\*(C`mark\*(C'\fR, for the \s-1XSUB\s0. See \f(CW\*(C`MARK\*(C'\fR and
\&\f(CW\*(C`dORIGMARK\*(C'\fR.
Saves the original stack mark for the \s-1XSUB\s0. See \f(CW\*(C`ORIGMARK\*(C'\fR.
Declares a local copy of perl's stack pointer for the \s-1XSUB\s0, available via
the \f(CW\*(C`SP\*(C'\fR macro. See \f(CW\*(C`SP\*(C'\fR.
Used to extend the argument stack for an \s-1XSUB\s0's return values. Once
used, guarantees that there is room for at least \f(CW\*(C`nitems\*(C'\fR to be pushed
\& void EXTEND(SP, int nitems)
Stack marker variable for the \s-1XSUB\s0. See \f(CW\*(C`dMARK\*(C'\fR.
Push an integer onto the stack. The stack must have room for this element.
Handles 'set' magic. Does not use \f(CW\*(C`TARG\*(C'\fR. See also \f(CW\*(C`PUSHi\*(C'\fR, \f(CW\*(C`mXPUSHi\*(C'\fR
and \f(CW\*(C`XPUSHi\*(C'\fR.
Push a double onto the stack. The stack must have room for this element.
Handles 'set' magic. Does not use \f(CW\*(C`TARG\*(C'\fR. See also \f(CW\*(C`PUSHn\*(C'\fR, \f(CW\*(C`mXPUSHn\*(C'\fR
and \f(CW\*(C`XPUSHn\*(C'\fR.
Push a string onto the stack. The stack must have room for this element.
The \f(CW\*(C`len\*(C'\fR indicates the length of the string. Handles 'set' magic. Does
not use \f(CW\*(C`TARG\*(C'\fR. See also \f(CW\*(C`PUSHp\*(C'\fR, \f(CW\*(C`mXPUSHp\*(C'\fR and \f(CW\*(C`XPUSHp\*(C'\fR.
\& void mPUSHp(char* str, STRLEN len)
Push an unsigned integer onto the stack. The stack must have room for this
element. Handles 'set' magic. Does not use \f(CW\*(C`TARG\*(C'\fR. See also \f(CW\*(C`PUSHu\*(C'\fR,
\&\f(CW\*(C`mXPUSHu\*(C'\fR and \f(CW\*(C`XPUSHu\*(C'\fR.
Push an integer onto the stack, extending the stack if necessary. Handles
\&'set' magic. Does not use \f(CW\*(C`TARG\*(C'\fR. See also \f(CW\*(C`XPUSHi\*(C'\fR, \f(CW\*(C`mPUSHi\*(C'\fR and
\&\f(CW\*(C`PUSHi\*(C'\fR.
Push a double onto the stack, extending the stack if necessary. Handles
\&'set' magic. Does not use \f(CW\*(C`TARG\*(C'\fR. See also \f(CW\*(C`XPUSHn\*(C'\fR, \f(CW\*(C`mPUSHn\*(C'\fR and
\&\f(CW\*(C`PUSHn\*(C'\fR.
Push a string onto the stack, extending the stack if necessary. The \f(CW\*(C`len\*(C'\fR
indicates the length of the string. Handles 'set' magic. Does not use
\&\f(CW\*(C`TARG\*(C'\fR. See also \f(CW\*(C`XPUSHp\*(C'\fR, \f(CW\*(C`mPUSHp\*(C'\fR and \f(CW\*(C`PUSHp\*(C'\fR.
\& void mXPUSHp(char* str, STRLEN len)
Push an unsigned integer onto the stack, extending the stack if necessary.
Handles 'set' magic. Does not use \f(CW\*(C`TARG\*(C'\fR. See also \f(CW\*(C`XPUSHu\*(C'\fR, \f(CW\*(C`mPUSHu\*(C'\fR
and \f(CW\*(C`PUSHu\*(C'\fR.
The original stack mark for the \s-1XSUB\s0. See \f(CW\*(C`dORIGMARK\*(C'\fR.
Pops an integer off the stack.
Pops a long off the stack.
Pops a double off the stack.
Pops a string off the stack. Deprecated. New code should use POPpx.
Pops a string off the stack which must consist of bytes i.e. characters < 256.
Pops a string off the stack.
Pops an \s-1SV\s0 off the stack.
Push an integer onto the stack. The stack must have room for this element.
Handles 'set' magic. Uses \f(CW\*(C`TARG\*(C'\fR, so \f(CW\*(C`dTARGET\*(C'\fR or \f(CW\*(C`dXSTARG\*(C'\fR should be
called to declare it. Do not call multiple \f(CW\*(C`TARG\*(C'\fR\-oriented macros to
return lists from \s-1XSUB\s0's \- see \f(CW\*(C`mPUSHi\*(C'\fR instead. See also \f(CW\*(C`XPUSHi\*(C'\fR and
\&\f(CW\*(C`mXPUSHi\*(C'\fR.
Opening bracket for arguments on a callback. See \f(CW\*(C`PUTBACK\*(C'\fR and
Push a new mortal \s-1SV\s0 onto the stack. The stack must have room for this
element. Does not handle 'set' magic. Does not use \f(CW\*(C`TARG\*(C'\fR. See also
\&\f(CW\*(C`PUSHs\*(C'\fR, \f(CW\*(C`XPUSHmortal\*(C'\fR and \f(CW\*(C`XPUSHs\*(C'\fR.
Push a double onto the stack. The stack must have room for this element.
Handles 'set' magic. Uses \f(CW\*(C`TARG\*(C'\fR, so \f(CW\*(C`dTARGET\*(C'\fR or \f(CW\*(C`dXSTARG\*(C'\fR should be
called to declare it. Do not call multiple \f(CW\*(C`TARG\*(C'\fR\-oriented macros to
return lists from \s-1XSUB\s0's \- see \f(CW\*(C`mPUSHn\*(C'\fR instead. See also \f(CW\*(C`XPUSHn\*(C'\fR and
\&\f(CW\*(C`mXPUSHn\*(C'\fR.
Push a string onto the stack. The stack must have room for this element.
The \f(CW\*(C`len\*(C'\fR indicates the length of the string. Handles 'set' magic. Uses
\&\f(CW\*(C`TARG\*(C'\fR, so \f(CW\*(C`dTARGET\*(C'\fR or \f(CW\*(C`dXSTARG\*(C'\fR should be called to declare it. Do not
call multiple \f(CW\*(C`TARG\*(C'\fR\-oriented macros to return lists from \s-1XSUB\s0's \- see
\&\f(CW\*(C`mPUSHp\*(C'\fR instead. See also \f(CW\*(C`XPUSHp\*(C'\fR and \f(CW\*(C`mXPUSHp\*(C'\fR.
\& void PUSHp(char* str, STRLEN len)
Push an \s-1SV\s0 onto the stack. The stack must have room for this element.
Does not handle 'set' magic. Does not use \f(CW\*(C`TARG\*(C'\fR. See also \f(CW\*(C`PUSHmortal\*(C'\fR,
\&\f(CW\*(C`XPUSHs\*(C'\fR and \f(CW\*(C`XPUSHmortal\*(C'\fR.
Push an unsigned integer onto the stack. The stack must have room for this
element. Handles 'set' magic. Uses \f(CW\*(C`TARG\*(C'\fR, so \f(CW\*(C`dTARGET\*(C'\fR or \f(CW\*(C`dXSTARG\*(C'\fR
should be called to declare it. Do not call multiple \f(CW\*(C`TARG\*(C'\fR\-oriented
macros to return lists from \s-1XSUB\s0's \- see \f(CW\*(C`mPUSHu\*(C'\fR instead. See also
\&\f(CW\*(C`XPUSHu\*(C'\fR and \f(CW\*(C`mXPUSHu\*(C'\fR.
Closing bracket for \s-1XSUB\s0 arguments. This is usually handled by \f(CW\*(C`xsubpp\*(C'\fR.
See \f(CW\*(C`PUSHMARK\*(C'\fR and perlcall for other uses.
Stack pointer. This is usually handled by \f(CW\*(C`xsubpp\*(C'\fR. See \f(CW\*(C`dSP\*(C'\fR and
\&\f(CW\*(C`SPAGAIN\*(C'\fR.
Refetch the stack pointer. Used after a callback. See perlcall.
Push an integer onto the stack, extending the stack if necessary. Handles
\&'set' magic. Uses \f(CW\*(C`TARG\*(C'\fR, so \f(CW\*(C`dTARGET\*(C'\fR or \f(CW\*(C`dXSTARG\*(C'\fR should be called to
declare it. Do not call multiple \f(CW\*(C`TARG\*(C'\fR\-oriented macros to return lists
from \s-1XSUB\s0's \- see \f(CW\*(C`mXPUSHi\*(C'\fR instead. See also \f(CW\*(C`PUSHi\*(C'\fR and \f(CW\*(C`mPUSHi\*(C'\fR.
Push a new mortal \s-1SV\s0 onto the stack, extending the stack if necessary. Does
not handle 'set' magic. Does not use \f(CW\*(C`TARG\*(C'\fR. See also \f(CW\*(C`XPUSHs\*(C'\fR,
\&\f(CW\*(C`PUSHmortal\*(C'\fR and \f(CW\*(C`PUSHs\*(C'\fR.
Push a double onto the stack, extending the stack if necessary. Handles
\&'set' magic. Uses \f(CW\*(C`TARG\*(C'\fR, so \f(CW\*(C`dTARGET\*(C'\fR or \f(CW\*(C`dXSTARG\*(C'\fR should be called to
declare it. Do not call multiple \f(CW\*(C`TARG\*(C'\fR\-oriented macros to return lists
from \s-1XSUB\s0's \- see \f(CW\*(C`mXPUSHn\*(C'\fR instead. See also \f(CW\*(C`PUSHn\*(C'\fR and \f(CW\*(C`mPUSHn\*(C'\fR.
Push a string onto the stack, extending the stack if necessary. The \f(CW\*(C`len\*(C'\fR
indicates the length of the string. Handles 'set' magic. Uses \f(CW\*(C`TARG\*(C'\fR, so
\&\f(CW\*(C`dTARGET\*(C'\fR or \f(CW\*(C`dXSTARG\*(C'\fR should be called to declare it. Do not call
multiple \f(CW\*(C`TARG\*(C'\fR\-oriented macros to return lists from \s-1XSUB\s0's \- see
\&\f(CW\*(C`mXPUSHp\*(C'\fR instead. See also \f(CW\*(C`PUSHp\*(C'\fR and \f(CW\*(C`mPUSHp\*(C'\fR.
\& void XPUSHp(char* str, STRLEN len)
Push an \s-1SV\s0 onto the stack, extending the stack if necessary. Does not
handle 'set' magic. Does not use \f(CW\*(C`TARG\*(C'\fR. See also \f(CW\*(C`XPUSHmortal\*(C'\fR,
\&\f(CW\*(C`PUSHs\*(C'\fR and \f(CW\*(C`PUSHmortal\*(C'\fR.
Push an unsigned integer onto the stack, extending the stack if necessary.
Handles 'set' magic. Uses \f(CW\*(C`TARG\*(C'\fR, so \f(CW\*(C`dTARGET\*(C'\fR or \f(CW\*(C`dXSTARG\*(C'\fR should be
called to declare it. Do not call multiple \f(CW\*(C`TARG\*(C'\fR\-oriented macros to
return lists from \s-1XSUB\s0's \- see \f(CW\*(C`mXPUSHu\*(C'\fR instead. See also \f(CW\*(C`PUSHu\*(C'\fR and
\&\f(CW\*(C`mPUSHu\*(C'\fR.
Return from \s-1XSUB\s0, indicating number of items on the stack. This is usually
handled by \f(CW\*(C`xsubpp\*(C'\fR.
\& void XSRETURN(int nitems)
.IP "\s-1XSRETURN_EMPTY\s0" 8
.IX Xref "XSRETURN_EMPTY"
.IX Item "XSRETURN_EMPTY"
Return an empty list from an \s-1XSUB\s0 immediately.
.IP "\s-1XSRETURN_IV\s0" 8
Return an integer from an \s-1XSUB\s0 immediately. Uses \f(CW\*(C`XST_mIV\*(C'\fR.
\& void XSRETURN_IV(IV iv)
.IP "\s-1XSRETURN_NO\s0" 8
Return \f(CW&PL_sv_no\fR from an \s-1XSUB\s0 immediately. Uses \f(CW\*(C`XST_mNO\*(C'\fR.
.IP "\s-1XSRETURN_NV\s0" 8
Return a double from an \s-1XSUB\s0 immediately. Uses \f(CW\*(C`XST_mNV\*(C'\fR.
\& void XSRETURN_NV(NV nv)
.IP "\s-1XSRETURN_PV\s0" 8
Return a copy of a string from an \s-1XSUB\s0 immediately. Uses \f(CW\*(C`XST_mPV\*(C'\fR.
\& void XSRETURN_PV(char* str)
.IP "\s-1XSRETURN_UNDEF\s0" 8
.IX Xref "XSRETURN_UNDEF"
.IX Item "XSRETURN_UNDEF"
Return \f(CW&PL_sv_undef\fR from an \s-1XSUB\s0 immediately. Uses \f(CW\*(C`XST_mUNDEF\*(C'\fR.
.IP "\s-1XSRETURN_UV\s0" 8
Return an integer from an \s-1XSUB\s0 immediately. Uses \f(CW\*(C`XST_mUV\*(C'\fR.
\& void XSRETURN_UV(IV uv)
.IP "\s-1XSRETURN_YES\s0" 8
Return \f(CW&PL_sv_yes\fR from an \s-1XSUB\s0 immediately. Uses \f(CW\*(C`XST_mYES\*(C'\fR.
Place an integer into the specified position \f(CW\*(C`pos\*(C'\fR on the stack. The
value is stored in a new mortal \s-1SV\s0.
\& void XST_mIV(int pos, IV iv)
Place \f(CW&PL_sv_no\fR into the specified position \f(CW\*(C`pos\*(C'\fR on the
Place a double into the specified position \f(CW\*(C`pos\*(C'\fR on the stack. The value
is stored in a new mortal \s-1SV\s0.
\& void XST_mNV(int pos, NV nv)
Place a copy of a string into the specified position \f(CW\*(C`pos\*(C'\fR on the stack.
The value is stored in a new mortal \s-1SV\s0.
\& void XST_mPV(int pos, char* str)
Place \f(CW&PL_sv_undef\fR into the specified position \f(CW\*(C`pos\*(C'\fR on the
\& void XST_mUNDEF(int pos)
Place \f(CW&PL_sv_yes\fR into the specified position \f(CW\*(C`pos\*(C'\fR on the
\& void XST_mYES(int pos)
An enum of flags for Perl types. These are found in the file \fBsv.h\fR
in the \f(CW\*(C`svtype\*(C'\fR enum. Test these flags with the \f(CW\*(C`SvTYPE\*(C'\fR macro.
Integer type flag for scalars. See \f(CW\*(C`svtype\*(C'\fR.
Double type flag for scalars. See \f(CW\*(C`svtype\*(C'\fR.
Pointer type flag for scalars. See \f(CW\*(C`svtype\*(C'\fR.
Type flag for arrays. See \f(CW\*(C`svtype\*(C'\fR.
Type flag for code refs. See \f(CW\*(C`svtype\*(C'\fR.
Type flag for hashes. See \f(CW\*(C`svtype\*(C'\fR.
Type flag for blessed scalars. See \f(CW\*(C`svtype\*(C'\fR.
.SH "SV Manipulation Functions"
.IX Header "SV Manipulation Functions"
Returns the \s-1SV\s0 of the specified Perl scalar. If \f(CW\*(C`create\*(C'\fR is set and the
Perl variable does not exist then it will be created. If \f(CW\*(C`create\*(C'\fR is not
set and the variable does not exist then \s-1NULL\s0 is returned.
\&\s-1NOTE:\s0 the perl_ form of this function is deprecated.
\& SV* get_sv(const char* name, I32 create)
.IP "looks_like_number" 8
.IX Xref "looks_like_number"
.IX Item "looks_like_number"
Test if the content of an \s-1SV\s0 looks like a number (or is a number).
\&\f(CW\*(C`Inf\*(C'\fR and \f(CW\*(C`Infinity\*(C'\fR are treated as numbers (so will not issue a
non-numeric warning), even if your \fIatof()\fR doesn't grok them.
\& I32 looks_like_number(SV* sv)
Creates an \s-1RV\s0 wrapper for an \s-1SV\s0. The reference count for the original \s-1SV\s0 is
Creates an \s-1RV\s0 wrapper for an \s-1SV\s0. The reference count for the original
\&\s-1SV\s0 is \fBnot\fR incremented.
\& SV* newRV_noinc(SV *sv)
Creates a new \s-1SV\s0. A non-zero \f(CW\*(C`len\*(C'\fR parameter indicates the number of
bytes of preallocated string space the \s-1SV\s0 should have. An extra byte for a
tailing \s-1NUL\s0 is also reserved. (SvPOK is not set for the \s-1SV\s0 even if string
space is allocated.) The reference count for the new \s-1SV\s0 is set to 1.
\&\f(CW\*(C`id\*(C'\fR is an integer id between 0 and 1299 (used to identify leaks).
\& SV* NEWSV(int id, STRLEN len)
Create a new null \s-1SV\s0, or if len > 0, create a new empty SVt_PV type \s-1SV\s0
with an initial \s-1PV\s0 allocation of len+1. Normally accessed via the \f(CW\*(C`NEWSV\*(C'\fR
Creates a new \s-1SV\s0 from the hash key structure. It will generate scalars that
point to the shared string table where possible. Returns a new (undefined)
\&\s-1SV\s0 if the hek is \s-1NULL\s0.
\& SV* newSVhek(const HEK *hek)
Creates a new \s-1SV\s0 and copies an integer into it. The reference count for the
Creates a new \s-1SV\s0 and copies a floating point value into it.
The reference count for the \s-1SV\s0 is set to 1.
Creates a new \s-1SV\s0 and copies a string into it. The reference count for the
\&\s-1SV\s0 is set to 1. If \f(CW\*(C`len\*(C'\fR is zero, Perl will compute the length using
\&\fIstrlen()\fR. For efficiency, consider using \f(CW\*(C`newSVpvn\*(C'\fR instead.
\& SV* newSVpv(const char* s, STRLEN len)
Creates a new \s-1SV\s0 and initializes it with the string formatted like
\&\f(CW\*(C`sprintf\*(C'\fR.
\& SV* newSVpvf(const char* pat, ...)
Creates a new \s-1SV\s0 and copies a string into it. The reference count for the
\&\s-1SV\s0 is set to 1. Note that if \f(CW\*(C`len\*(C'\fR is zero, Perl will create a zero length
string. You are responsible for ensuring that the source string is at least
\&\f(CW\*(C`len\*(C'\fR bytes long. If the \f(CW\*(C`s\*(C'\fR argument is \s-1NULL\s0 the new \s-1SV\s0 will be undefined.
\& SV* newSVpvn(const char* s, STRLEN len)
.IX Xref "newSVpvn_share"
.IX Item "newSVpvn_share"
Creates a new \s-1SV\s0 with its SvPVX_const pointing to a shared string in the string
table. If the string does not already exist in the table, it is created
first. Turns on \s-1READONLY\s0 and \s-1FAKE\s0. The string's hash is stored in the \s-1UV\s0
slot of the \s-1SV\s0; if the \f(CW\*(C`hash\*(C'\fR parameter is non\-zero, that value is used;
otherwise the hash is computed. The idea here is that as the string table
is used for shared hash keys these strings will have SvPVX_const == HeKEY and
hash lookup will avoid string compare.
\& SV* newSVpvn_share(const char* s, I32 len, U32 hash)
Creates a new \s-1SV\s0 for the \s-1RV\s0, \f(CW\*(C`rv\*(C'\fR, to point to. If \f(CW\*(C`rv\*(C'\fR is not an \s-1RV\s0 then
it will be upgraded to one. If \f(CW\*(C`classname\*(C'\fR is non-null then the new \s-1SV\s0 will
be blessed in the specified package. The new \s-1SV\s0 is returned and its
\& SV* newSVrv(SV* rv, const char* classname)
Creates a new \s-1SV\s0 which is an exact duplicate of the original \s-1SV\s0.
(Uses \f(CW\*(C`sv_setsv\*(C'\fR).
Creates a new \s-1SV\s0 and copies an unsigned integer into it.
The reference count for the \s-1SV\s0 is set to 1.
Returns the length of the string which is in the \s-1SV\s0. See \f(CW\*(C`SvLEN\*(C'\fR.
Set the current length of the string which is in the \s-1SV\s0. See \f(CW\*(C`SvCUR\*(C'\fR
and \f(CW\*(C`SvIV_set\*(C'\fR.
\& void SvCUR_set(SV* sv, STRLEN len)
Returns a pointer to the last character in the string which is in the \s-1SV\s0.
See \f(CW\*(C`SvCUR\*(C'\fR. Access the character as *(SvEND(sv)).
Expands the character buffer in the \s-1SV\s0 so that it has room for the
indicated number of bytes (remember to reserve space for an extra trailing
\&\s-1NUL\s0 character). Calls \f(CW\*(C`sv_grow\*(C'\fR to perform the expansion if necessary.
Returns a pointer to the character buffer.
\& char * SvGROW(SV* sv, STRLEN len)
Returns a boolean indicating whether the \s-1SV\s0 contains an integer.
Returns a boolean indicating whether the \s-1SV\s0 contains an integer. Checks
the \fBprivate\fR setting. Use \f(CW\*(C`SvIOK\*(C'\fR.
Returns a boolean indicating whether the \s-1SV\s0 contains a signed integer.
\& bool SvIOK_notUV(SV* sv)
Unsets the \s-1IV\s0 status of an \s-1SV\s0.
\& void SvIOK_off(SV* sv)
Tells an \s-1SV\s0 that it is an integer.
Tells an \s-1SV\s0 that it is an integer and disables all other \s-1OK\s0 bits.
\& void SvIOK_only(SV* sv)
Tells and \s-1SV\s0 that it is an unsigned integer and disables all other \s-1OK\s0 bits.
\& void SvIOK_only_UV(SV* sv)
Returns a boolean indicating whether the \s-1SV\s0 contains an unsigned integer.
Returns a boolean indicating whether the \s-1SV\s0 is Copy\-On\-Write. (either shared
hash key scalars, or full Copy On Write scalars if 5.9.0 is configured for
.IP "SvIsCOW_shared_hash" 8
.IX Xref "SvIsCOW_shared_hash"
.IX Item "SvIsCOW_shared_hash"
Returns a boolean indicating whether the \s-1SV\s0 is Copy-On-Write shared hash key
\& bool SvIsCOW_shared_hash(SV* sv)
Coerces the given \s-1SV\s0 to an integer and returns it. See \f(CW\*(C`SvIVx\*(C'\fR for a
version which guarantees to evaluate sv only once.
Returns the raw value in the \s-1SV\s0's \s-1IV\s0 slot, without checks or conversions.
Only use when you are sure SvIOK is true. See also \f(CW\*(C`SvIV()\*(C'\fR.
Coerces the given \s-1SV\s0 to an integer and returns it. Guarantees to evaluate
sv only once. Use the more efficient \f(CW\*(C`SvIV\*(C'\fR otherwise.
Set the value of the \s-1IV\s0 pointer in sv to val. It is possible to perform
the same function of this macro with an lvalue assignment to \f(CW\*(C`SvIVX\*(C'\fR.
With future Perls, however, it will be more efficient to use
\&\f(CW\*(C`SvIV_set\*(C'\fR instead of the lvalue assignment to \f(CW\*(C`SvIVX\*(C'\fR.
\& void SvIV_set(SV* sv, IV val)
Returns the size of the string buffer in the \s-1SV\s0, not including any part
attributable to \f(CW\*(C`SvOOK\*(C'\fR. See \f(CW\*(C`SvCUR\*(C'\fR.
Set the actual length of the string which is in the \s-1SV\s0. See \f(CW\*(C`SvIV_set\*(C'\fR.
\& void SvLEN_set(SV* sv, STRLEN len)
Set the value of the \s-1MAGIC\s0 pointer in sv to val. See \f(CW\*(C`SvIV_set\*(C'\fR.
\& void SvMAGIC_set(SV* sv, MAGIC* val)
Returns a boolean indicating whether the \s-1SV\s0 contains a number, integer or
Returns a boolean indicating whether the \s-1SV\s0 contains a number, integer or
double. Checks the \fBprivate\fR setting. Use \f(CW\*(C`SvNIOK\*(C'\fR.
Unsets the \s-1NV/IV\s0 status of an \s-1SV\s0.
\& void SvNIOK_off(SV* sv)
Returns a boolean indicating whether the \s-1SV\s0 contains a double.
Returns a boolean indicating whether the \s-1SV\s0 contains a double. Checks the
\&\fBprivate\fR setting. Use \f(CW\*(C`SvNOK\*(C'\fR.
Unsets the \s-1NV\s0 status of an \s-1SV\s0.
\& void SvNOK_off(SV* sv)
Tells an \s-1SV\s0 that it is a double.
Tells an \s-1SV\s0 that it is a double and disables all other \s-1OK\s0 bits.
\& void SvNOK_only(SV* sv)
Coerce the given \s-1SV\s0 to a double and return it. See \f(CW\*(C`SvNVx\*(C'\fR for a version
which guarantees to evaluate sv only once.
Returns the raw value in the \s-1SV\s0's \s-1NV\s0 slot, without checks or conversions.
Only use when you are sure SvNOK is true. See also \f(CW\*(C`SvNV()\*(C'\fR.
Coerces the given \s-1SV\s0 to a double and returns it. Guarantees to evaluate
sv only once. Use the more efficient \f(CW\*(C`SvNV\*(C'\fR otherwise.
Set the value of the \s-1NV\s0 pointer in sv to val. See \f(CW\*(C`SvIV_set\*(C'\fR.
\& void SvNV_set(SV* sv, NV val)
Returns a boolean indicating whether the value is an \s-1SV\s0. It also tells
whether the value is defined or not.
Returns a boolean indicating whether the SvIVX is a valid offset value for
the SvPVX. This hack is used internally to speed up removal of characters
from the beginning of a SvPV. When SvOOK is true, then the start of the
allocated string buffer is really (SvPVX \- SvIVX).
Returns a boolean indicating whether the \s-1SV\s0 contains a character
Returns a boolean indicating whether the \s-1SV\s0 contains a character string.
Checks the \fBprivate\fR setting. Use \f(CW\*(C`SvPOK\*(C'\fR.
Unsets the \s-1PV\s0 status of an \s-1SV\s0.
\& void SvPOK_off(SV* sv)
Tells an \s-1SV\s0 that it is a string.
Tells an \s-1SV\s0 that it is a string and disables all other \s-1OK\s0 bits.
Will also turn off the \s-1UTF\-8\s0 status.
\& void SvPOK_only(SV* sv)
.IX Xref "SvPOK_only_UTF8"
.IX Item "SvPOK_only_UTF8"
Tells an \s-1SV\s0 that it is a string and disables all other \s-1OK\s0 bits,
and leaves the \s-1UTF\-8\s0 status as it was.
\& void SvPOK_only_UTF8(SV* sv)
Returns a pointer to the string in the \s-1SV\s0, or a stringified form of
the \s-1SV\s0 if the \s-1SV\s0 does not contain a string. The \s-1SV\s0 may cache the
stringified version becoming \f(CW\*(C`SvPOK\*(C'\fR. Handles 'get' magic. See also
\&\f(CW\*(C`SvPVx\*(C'\fR for a version which guarantees to evaluate sv only once.
\& char* SvPV(SV* sv, STRLEN len)
Like \f(CW\*(C`SvPV\*(C'\fR, but converts sv to byte representation first if necessary.
\& char* SvPVbyte(SV* sv, STRLEN len)
Like \f(CW\*(C`SvPV\*(C'\fR, but converts sv to byte representation first if necessary.
Guarantees to evaluate sv only once; use the more efficient \f(CW\*(C`SvPVbyte\*(C'\fR
\& char* SvPVbytex(SV* sv, STRLEN len)
.IX Xref "SvPVbytex_force"
.IX Item "SvPVbytex_force"
Like \f(CW\*(C`SvPV_force\*(C'\fR, but converts sv to byte representation first if necessary.
Guarantees to evaluate sv only once; use the more efficient \f(CW\*(C`SvPVbyte_force\*(C'\fR
\& char* SvPVbytex_force(SV* sv, STRLEN len)
.IX Xref "SvPVbyte_force"
.IX Item "SvPVbyte_force"
Like \f(CW\*(C`SvPV_force\*(C'\fR, but converts sv to byte representation first if necessary.
\& char* SvPVbyte_force(SV* sv, STRLEN len)
.IX Xref "SvPVbyte_nolen"
.IX Item "SvPVbyte_nolen"
Like \f(CW\*(C`SvPV_nolen\*(C'\fR, but converts sv to byte representation first if necessary.
\& char* SvPVbyte_nolen(SV* sv)
Like \f(CW\*(C`SvPV\*(C'\fR, but converts sv to utf8 first if necessary.
\& char* SvPVutf8(SV* sv, STRLEN len)
Like \f(CW\*(C`SvPV\*(C'\fR, but converts sv to utf8 first if necessary.
Guarantees to evaluate sv only once; use the more efficient \f(CW\*(C`SvPVutf8\*(C'\fR
\& char* SvPVutf8x(SV* sv, STRLEN len)
.IX Xref "SvPVutf8x_force"
.IX Item "SvPVutf8x_force"
Like \f(CW\*(C`SvPV_force\*(C'\fR, but converts sv to utf8 first if necessary.
Guarantees to evaluate sv only once; use the more efficient \f(CW\*(C`SvPVutf8_force\*(C'\fR
\& char* SvPVutf8x_force(SV* sv, STRLEN len)
.IX Xref "SvPVutf8_force"
.IX Item "SvPVutf8_force"
Like \f(CW\*(C`SvPV_force\*(C'\fR, but converts sv to utf8 first if necessary.
\& char* SvPVutf8_force(SV* sv, STRLEN len)
.IX Xref "SvPVutf8_nolen"
.IX Item "SvPVutf8_nolen"
Like \f(CW\*(C`SvPV_nolen\*(C'\fR, but converts sv to utf8 first if necessary.
\& char* SvPVutf8_nolen(SV* sv)
Returns a pointer to the physical string in the \s-1SV\s0. The \s-1SV\s0 must contain a
A version of \f(CW\*(C`SvPV\*(C'\fR which guarantees to evaluate sv only once.
\& char* SvPVx(SV* sv, STRLEN len)
Like \f(CW\*(C`SvPV\*(C'\fR but will force the \s-1SV\s0 into containing just a string
(\f(CW\*(C`SvPOK_only\*(C'\fR). You want force if you are going to update the \f(CW\*(C`SvPVX\*(C'\fR
\& char* SvPV_force(SV* sv, STRLEN len)
.IX Xref "SvPV_force_nomg"
.IX Item "SvPV_force_nomg"
Like \f(CW\*(C`SvPV\*(C'\fR but will force the \s-1SV\s0 into containing just a string
(\f(CW\*(C`SvPOK_only\*(C'\fR). You want force if you are going to update the \f(CW\*(C`SvPVX\*(C'\fR
directly. Doesn't process magic.
\& char* SvPV_force_nomg(SV* sv, STRLEN len)
Returns a pointer to the string in the \s-1SV\s0, or a stringified form of
the \s-1SV\s0 if the \s-1SV\s0 does not contain a string. The \s-1SV\s0 may cache the
stringified form becoming \f(CW\*(C`SvPOK\*(C'\fR. Handles 'get' magic.
\& char* SvPV_nolen(SV* sv)
Set the value of the \s-1PV\s0 pointer in sv to val. See \f(CW\*(C`SvIV_set\*(C'\fR.
\& void SvPV_set(SV* sv, char* val)
Returns the value of the object's reference count.
Decrements the reference count of the given \s-1SV\s0.
\& void SvREFCNT_dec(SV* sv)
Increments the reference count of the given \s-1SV\s0.
\& SV* SvREFCNT_inc(SV* sv)
Tests if the \s-1SV\s0 is an \s-1RV\s0.
Unsets the \s-1RV\s0 status of an \s-1SV\s0.
\& void SvROK_off(SV* sv)
Tells an \s-1SV\s0 that it is an \s-1RV\s0.
Dereferences an \s-1RV\s0 to return the \s-1SV\s0.
Set the value of the \s-1RV\s0 pointer in sv to val. See \f(CW\*(C`SvIV_set\*(C'\fR.
\& void SvRV_set(SV* sv, SV* val)
Returns the stash of the \s-1SV\s0.
Set the value of the \s-1STASH\s0 pointer in sv to val. See \f(CW\*(C`SvIV_set\*(C'\fR.
\& void SvSTASH_set(SV* sv, STASH* val)
Taints an \s-1SV\s0 if tainting is enabled.
Checks to see if an \s-1SV\s0 is tainted. Returns \s-1TRUE\s0 if it is, \s-1FALSE\s0 if
\& bool SvTAINTED(SV* sv)
Untaints an \s-1SV\s0. Be \fIvery\fR careful with this routine, as it short-circuits
some of Perl's fundamental security features. \s-1XS\s0 module authors should not
use this function unless they fully understand all the implications of
unconditionally untainting the value. Untainting should be done in the
standard perl fashion, via a carefully crafted regexp, rather than directly
\& void SvTAINTED_off(SV* sv)
Marks an \s-1SV\s0 as tainted if tainting is enabled.
\& void SvTAINTED_on(SV* sv)
Returns a boolean indicating whether Perl would evaluate the \s-1SV\s0 as true or
false, defined or undefined. Does not handle 'get' magic.
Returns the type of the \s-1SV\s0. See \f(CW\*(C`svtype\*(C'\fR.
Returns a boolean indicating whether the \s-1SV\s0 contains an unsigned integer.
Used to upgrade an \s-1SV\s0 to a more complex form. Uses \f(CW\*(C`sv_upgrade\*(C'\fR to
perform the upgrade if necessary. See \f(CW\*(C`svtype\*(C'\fR.
\& void SvUPGRADE(SV* sv, svtype type)
Returns a boolean indicating whether the \s-1SV\s0 contains \s-1UTF\-8\s0 encoded data.
Unsets the \s-1UTF\-8\s0 status of an \s-1SV\s0.
\& void SvUTF8_off(SV *sv)
Turn on the \s-1UTF\-8\s0 status of an \s-1SV\s0 (the data is not changed, just the flag).
\& void SvUTF8_on(SV *sv)
Coerces the given \s-1SV\s0 to an unsigned integer and returns it. See \f(CW\*(C`SvUVx\*(C'\fR
for a version which guarantees to evaluate sv only once.
Returns the raw value in the \s-1SV\s0's \s-1UV\s0 slot, without checks or conversions.
Only use when you are sure SvIOK is true. See also \f(CW\*(C`SvUV()\*(C'\fR.
Coerces the given \s-1SV\s0 to an unsigned integer and returns it. Guarantees to
evaluate sv only once. Use the more efficient \f(CW\*(C`SvUV\*(C'\fR otherwise.
Set the value of the \s-1UV\s0 pointer in sv to val. See \f(CW\*(C`SvIV_set\*(C'\fR.
\& void SvUV_set(SV* sv, UV val)
This function is only called on magical items, and is only used by
\&\fIsv_true()\fR or its macro equivalent.
Using various gambits, try to get a \s-1CV\s0 from an \s-1SV\s0; in addition, try if
possible to set \f(CW*st\fR and \f(CW*gvp\fR to the stash and \s-1GV\s0 associated with it.
\& CV* sv_2cv(SV* sv, HV** st, GV** gvp, I32 lref)
Using various gambits, try to get an \s-1IO\s0 from an \s-1SV:\s0 the \s-1IO\s0 slot if its a
\&\s-1GV\s0; or the recursive result if we're an \s-1RV\s0; or the \s-1IO\s0 slot of the symbol
named after the \s-1PV\s0 if we're a string.
Return the integer value of an \s-1SV\s0, doing any necessary string conversion,
magic etc. Normally used via the \f(CW\*(C`SvIV(sv)\*(C'\fR and \f(CW\*(C`SvIVx(sv)\*(C'\fR macros.
Marks an existing \s-1SV\s0 as mortal. The \s-1SV\s0 will be destroyed \*(L"soon\*(R", either
by an explicit call to \s-1FREETMPS\s0, or by an implicit call at places such as
statement boundaries. \fISvTEMP()\fR is turned on which means that the \s-1SV\s0's
string buffer can be \*(L"stolen\*(R" if this \s-1SV\s0 is copied. See also \f(CW\*(C`sv_newmortal\*(C'\fR
and \f(CW\*(C`sv_mortalcopy\*(C'\fR.
\& SV* sv_2mortal(SV* sv)
Return the num value of an \s-1SV\s0, doing any necessary string or integer
conversion, magic etc. Normally used via the \f(CW\*(C`SvNV(sv)\*(C'\fR and \f(CW\*(C`SvNVx(sv)\*(C'\fR
Return a pointer to the byte-encoded representation of the \s-1SV\s0, and set *lp
to its length. May cause the \s-1SV\s0 to be downgraded from \s-1UTF\-8\s0 as a
Usually accessed via the \f(CW\*(C`SvPVbyte\*(C'\fR macro.
\& char* sv_2pvbyte(SV* sv, STRLEN* lp)
.IX Xref "sv_2pvbyte_nolen"
.IX Item "sv_2pvbyte_nolen"
Return a pointer to the byte-encoded representation of the \s-1SV\s0.
May cause the \s-1SV\s0 to be downgraded from \s-1UTF\-8\s0 as a side\-effect.
Usually accessed via the \f(CW\*(C`SvPVbyte_nolen\*(C'\fR macro.
\& char* sv_2pvbyte_nolen(SV* sv)
Return a pointer to the UTF\-8\-encoded representation of the \s-1SV\s0, and set *lp
to its length. May cause the \s-1SV\s0 to be upgraded to \s-1UTF\-8\s0 as a side\-effect.
Usually accessed via the \f(CW\*(C`SvPVutf8\*(C'\fR macro.
\& char* sv_2pvutf8(SV* sv, STRLEN* lp)
.IX Xref "sv_2pvutf8_nolen"
.IX Item "sv_2pvutf8_nolen"
Return a pointer to the UTF\-8\-encoded representation of the \s-1SV\s0.
May cause the \s-1SV\s0 to be upgraded to \s-1UTF\-8\s0 as a side\-effect.
Usually accessed via the \f(CW\*(C`SvPVutf8_nolen\*(C'\fR macro.
\& char* sv_2pvutf8_nolen(SV* sv)
Returns a pointer to the string value of an \s-1SV\s0, and sets *lp to its length.
If flags includes \s-1SV_GMAGIC\s0, does an \fImg_get()\fR first. Coerces sv to a string
Normally invoked via the \f(CW\*(C`SvPV_flags\*(C'\fR macro. \f(CW\*(C`sv_2pv()\*(C'\fR and \f(CW\*(C`sv_2pv_nomg\*(C'\fR
\& char* sv_2pv_flags(SV* sv, STRLEN* lp, I32 flags)
Like \f(CW\*(C`sv_2pv()\*(C'\fR, but doesn't return the length too. You should usually
use the macro wrapper \f(CW\*(C`SvPV_nolen(sv)\*(C'\fR instead.
char* sv_2pv_nolen(SV* sv)
Return the unsigned integer value of an \s-1SV\s0, doing any necessary string
conversion, magic etc. Normally used via the \f(CW\*(C`SvUV(sv)\*(C'\fR and \f(CW\*(C`SvUVx(sv)\*(C'\fR
Remove any string offset. You should normally use the \f(CW\*(C`SvOOK_off\*(C'\fR macro
\& int sv_backoff(SV* sv)
Blesses an \s-1SV\s0 into a specified package. The \s-1SV\s0 must be an \s-1RV\s0. The package
must be designated by its stash (see \f(CW\*(C`gv_stashpv()\*(C'\fR). The reference count
of the \s-1SV\s0 is unaffected.
\& SV* sv_bless(SV* sv, HV* stash)
Concatenates the string onto the end of the string which is in the \s-1SV\s0.
If the \s-1SV\s0 has the \s-1UTF\-8\s0 status set, then the bytes appended should be
valid \s-1UTF\-8\s0. Handles 'get' magic, but not 'set' magic. See \f(CW\*(C`sv_catpv_mg\*(C'\fR.
\& void sv_catpv(SV* sv, const char* ptr)
Processes its arguments like \f(CW\*(C`sprintf\*(C'\fR and appends the formatted
output to an \s-1SV\s0. If the appended data contains \*(L"wide\*(R" characters
(including, but not limited to, SVs with a \s-1UTF\-8\s0 \s-1PV\s0 formatted with \f(CW%s\fR,
and characters >255 formatted with \f(CW%c\fR), the original \s-1SV\s0 might get
upgraded to \s-1UTF\-8\s0. Handles 'get' magic, but not 'set' magic. See
\&\f(CW\*(C`sv_catpvf_mg\*(C'\fR. If the original \s-1SV\s0 was \s-1UTF\-8\s0, the pattern should be
valid \s-1UTF\-8\s0; if the original \s-1SV\s0 was bytes, the pattern should be too.
\& void sv_catpvf(SV* sv, const char* pat, ...)
Like \f(CW\*(C`sv_catpvf\*(C'\fR, but also handles 'set' magic.
\& void sv_catpvf_mg(SV *sv, const char* pat, ...)
Concatenates the string onto the end of the string which is in the \s-1SV\s0. The
\&\f(CW\*(C`len\*(C'\fR indicates number of bytes to copy. If the \s-1SV\s0 has the \s-1UTF\-8\s0
status set, then the bytes appended should be valid \s-1UTF\-8\s0.
Handles 'get' magic, but not 'set' magic. See \f(CW\*(C`sv_catpvn_mg\*(C'\fR.
\& void sv_catpvn(SV* sv, const char* ptr, STRLEN len)
.IX Xref "sv_catpvn_flags"
.IX Item "sv_catpvn_flags"
Concatenates the string onto the end of the string which is in the \s-1SV\s0. The
\&\f(CW\*(C`len\*(C'\fR indicates number of bytes to copy. If the \s-1SV\s0 has the \s-1UTF\-8\s0
status set, then the bytes appended should be valid \s-1UTF\-8\s0.
If \f(CW\*(C`flags\*(C'\fR has \f(CW\*(C`SV_GMAGIC\*(C'\fR bit set, will \f(CW\*(C`mg_get\*(C'\fR on \f(CW\*(C`dsv\*(C'\fR if
appropriate, else not. \f(CW\*(C`sv_catpvn\*(C'\fR and \f(CW\*(C`sv_catpvn_nomg\*(C'\fR are implemented
in terms of this function.
\& void sv_catpvn_flags(SV* sv, const char* ptr, STRLEN len, I32 flags)
Like \f(CW\*(C`sv_catpvn\*(C'\fR, but also handles 'set' magic.
\& void sv_catpvn_mg(SV *sv, const char *ptr, STRLEN len)
.IX Xref "sv_catpvn_nomg"
.IX Item "sv_catpvn_nomg"
Like \f(CW\*(C`sv_catpvn\*(C'\fR but doesn't process magic.
\& void sv_catpvn_nomg(SV* sv, const char* ptr, STRLEN len)
Like \f(CW\*(C`sv_catpv\*(C'\fR, but also handles 'set' magic.
\& void sv_catpv_mg(SV *sv, const char *ptr)
Concatenates the string from \s-1SV\s0 \f(CW\*(C`ssv\*(C'\fR onto the end of the string in
\&\s-1SV\s0 \f(CW\*(C`dsv\*(C'\fR. Modifies \f(CW\*(C`dsv\*(C'\fR but not \f(CW\*(C`ssv\*(C'\fR. Handles 'get' magic, but
not 'set' magic. See \f(CW\*(C`sv_catsv_mg\*(C'\fR.
\& void sv_catsv(SV* dsv, SV* ssv)
.IX Xref "sv_catsv_flags"
.IX Item "sv_catsv_flags"
Concatenates the string from \s-1SV\s0 \f(CW\*(C`ssv\*(C'\fR onto the end of the string in
\&\s-1SV\s0 \f(CW\*(C`dsv\*(C'\fR. Modifies \f(CW\*(C`dsv\*(C'\fR but not \f(CW\*(C`ssv\*(C'\fR. If \f(CW\*(C`flags\*(C'\fR has \f(CW\*(C`SV_GMAGIC\*(C'\fR
bit set, will \f(CW\*(C`mg_get\*(C'\fR on the SVs if appropriate, else not. \f(CW\*(C`sv_catsv\*(C'\fR
and \f(CW\*(C`sv_catsv_nomg\*(C'\fR are implemented in terms of this function.
\& void sv_catsv_flags(SV* dsv, SV* ssv, I32 flags)
Like \f(CW\*(C`sv_catsv\*(C'\fR, but also handles 'set' magic.
\& void sv_catsv_mg(SV *dstr, SV *sstr)
Like \f(CW\*(C`sv_catsv\*(C'\fR but doesn't process magic.
\& void sv_catsv_nomg(SV* dsv, SV* ssv)
Efficient removal of characters from the beginning of the string buffer.
SvPOK(sv) must be true and the \f(CW\*(C`ptr\*(C'\fR must be a pointer to somewhere inside
the string buffer. The \f(CW\*(C`ptr\*(C'\fR becomes the first character of the adjusted
string. Uses the \*(L"\s-1OOK\s0 hack\*(R".
Beware: after this function returns, \f(CW\*(C`ptr\*(C'\fR and SvPVX_const(sv) may no longer
refer to the same chunk of data.
\& void sv_chop(SV* sv, char* ptr)
Clear an \s-1SV:\s0 call any destructors, free up any memory used by the body,
and free the body itself. The \s-1SV\s0's head is \fInot\fR freed, although
its type is set to all 1's so that it won't inadvertently be assumed
to be live during global destruction etc.
This function should only be called when \s-1REFCNT\s0 is zero. Most of the time
you'll want to call \f(CW\*(C`sv_free()\*(C'\fR (or its macro wrapper \f(CW\*(C`SvREFCNT_dec\*(C'\fR)
Compares the strings in two SVs. Returns \-1, 0, or 1 indicating whether the
string in \f(CW\*(C`sv1\*(C'\fR is less than, equal to, or greater than the string in
\&\f(CW\*(C`sv2\*(C'\fR. Is \s-1UTF\-8\s0 and 'use bytes' aware, handles get magic, and will
coerce its args to strings if necessary. See also \f(CW\*(C`sv_cmp_locale\*(C'\fR.
\& I32 sv_cmp(SV* sv1, SV* sv2)
Compares the strings in two SVs in a locale-aware manner. Is \s-1UTF\-8\s0 and
\&'use bytes' aware, handles get magic, and will coerce its args to strings
if necessary. See also \f(CW\*(C`sv_cmp_locale\*(C'\fR. See also \f(CW\*(C`sv_cmp\*(C'\fR.
\& I32 sv_cmp_locale(SV* sv1, SV* sv2)
Add Collate Transform magic to an \s-1SV\s0 if it doesn't already have it.
Any scalar variable may carry PERL_MAGIC_collxfrm magic that contains the
scalar data of the variable, but transformed to such a format that a normal
memory comparison can be used to compare the data according to the locale
\& char* sv_collxfrm(SV* sv, STRLEN* nxp)
Copies a stringified representation of the source \s-1SV\s0 into the
destination \s-1SV\s0. Automatically performs any necessary mg_get and
coercion of numeric values into strings. Guaranteed to preserve
\&\s-1UTF\-8\s0 flag even from overloaded objects. Similar in nature to
sv_2pv[_flags] but operates directly on an \s-1SV\s0 instead of just the
string. Mostly uses sv_2pv_flags to do its work, except when that
would lose the \s-1UTF\-8\s0'ness of the \s-1PV\s0.
\& void sv_copypv(SV* dsv, SV* ssv)
Auto-decrement of the value in the \s-1SV\s0, doing string to numeric conversion
if necessary. Handles 'get' magic.
.IX Xref "sv_derived_from"
.IX Item "sv_derived_from"
Returns a boolean indicating whether the \s-1SV\s0 is derived from the specified
class. This is the function that implements \f(CW\*(C`UNIVERSAL::isa\*(C'\fR. It works
for class names as well as for objects.
\& bool sv_derived_from(SV* sv, const char* name)
Returns a boolean indicating whether the strings in the two SVs are
identical. Is \s-1UTF\-8\s0 and 'use bytes' aware, handles get magic, and will
coerce its args to strings if necessary.
\& I32 sv_eq(SV* sv1, SV* sv2)
.IX Xref "sv_force_normal"
.IX Item "sv_force_normal"
Undo various types of fakery on an \s-1SV:\s0 if the \s-1PV\s0 is a shared string, make
a private copy; if we're a ref, stop refing; if we're a glob, downgrade to
an xpvmg. See also \f(CW\*(C`sv_force_normal_flags\*(C'\fR.
\& void sv_force_normal(SV *sv)
.IP "sv_force_normal_flags" 8
.IX Xref "sv_force_normal_flags"
.IX Item "sv_force_normal_flags"
Undo various types of fakery on an \s-1SV:\s0 if the \s-1PV\s0 is a shared string, make
a private copy; if we're a ref, stop refing; if we're a glob, downgrade to
an xpvmg. The \f(CW\*(C`flags\*(C'\fR parameter gets passed to \f(CW\*(C`sv_unref_flags()\*(C'\fR
when unrefing. \f(CW\*(C`sv_force_normal\*(C'\fR calls this function with flags set to 0.
\& void sv_force_normal_flags(SV *sv, U32 flags)
Decrement an \s-1SV\s0's reference count, and if it drops to zero, call
\&\f(CW\*(C`sv_clear\*(C'\fR to invoke destructors and free up any memory used by
the body; finally, deallocate the \s-1SV\s0's head itself.
Normally called via a wrapper macro \f(CW\*(C`SvREFCNT_dec\*(C'\fR.
Get a line from the filehandle and store it into the \s-1SV\s0, optionally
appending to the currently-stored string.
\& char* sv_gets(SV* sv, PerlIO* fp, I32 append)
Expands the character buffer in the \s-1SV\s0. If necessary, uses \f(CW\*(C`sv_unref\*(C'\fR and
upgrades the \s-1SV\s0 to \f(CW\*(C`SVt_PV\*(C'\fR. Returns a pointer to the character buffer.
Use the \f(CW\*(C`SvGROW\*(C'\fR wrapper instead.
\& char* sv_grow(SV* sv, STRLEN newlen)
Auto-increment of the value in the \s-1SV\s0, doing string to numeric conversion
if necessary. Handles 'get' magic.
Inserts a string at the specified offset/length within the \s-1SV\s0. Similar to
the Perl \fIsubstr()\fR function.
\& void sv_insert(SV* bigsv, STRLEN offset, STRLEN len, char* little, STRLEN littlelen)
Returns a boolean indicating whether the \s-1SV\s0 is blessed into the specified
class. This does not check for subtypes; use \f(CW\*(C`sv_derived_from\*(C'\fR to verify
an inheritance relationship.
\& int sv_isa(SV* sv, const char* name)
Returns a boolean indicating whether the \s-1SV\s0 is an \s-1RV\s0 pointing to a blessed
object. If the \s-1SV\s0 is not an \s-1RV\s0, or if the object is not blessed, then this
\& int sv_isobject(SV* sv)
A private implementation of the \f(CW\*(C`SvIVx\*(C'\fR macro for compilers which can't
cope with complex macro expressions. Always use the macro instead.
Returns the length of the string in the \s-1SV\s0. Handles magic and type
coercion. See also \f(CW\*(C`SvCUR\*(C'\fR, which gives raw access to the xpv_cur slot.
Returns the number of characters in the string in an \s-1SV\s0, counting wide
\&\s-1UTF\-8\s0 bytes as a single character. Handles magic and type coercion.
\& STRLEN sv_len_utf8(SV* sv)
Adds magic to an \s-1SV\s0. First upgrades \f(CW\*(C`sv\*(C'\fR to type \f(CW\*(C`SVt_PVMG\*(C'\fR if necessary,
then adds a new magic item of type \f(CW\*(C`how\*(C'\fR to the head of the magic list.
See \f(CW\*(C`sv_magicext\*(C'\fR (which \f(CW\*(C`sv_magic\*(C'\fR now calls) for a description of the
handling of the \f(CW\*(C`name\*(C'\fR and \f(CW\*(C`namlen\*(C'\fR arguments.
You need to use \f(CW\*(C`sv_magicext\*(C'\fR to add magic to SvREADONLY SVs and also
to add more than one instance of the same 'how'.
\& void sv_magic(SV* sv, SV* obj, int how, const char* name, I32 namlen)
Adds magic to an \s-1SV\s0, upgrading it if necessary. Applies the
supplied vtable and returns a pointer to the magic added.
Note that \f(CW\*(C`sv_magicext\*(C'\fR will allow things that \f(CW\*(C`sv_magic\*(C'\fR will not.
In particular, you can add magic to SvREADONLY SVs, and add more than
one instance of the same 'how'.
If \f(CW\*(C`namlen\*(C'\fR is greater than zero then a \f(CW\*(C`savepvn\*(C'\fR \fIcopy\fR of \f(CW\*(C`name\*(C'\fR is
stored, if \f(CW\*(C`namlen\*(C'\fR is zero then \f(CW\*(C`name\*(C'\fR is stored as-is and \- as another
special case \- if \f(CW\*(C`(name && namlen == HEf_SVKEY)\*(C'\fR then \f(CW\*(C`name\*(C'\fR is assumed
to contain an \f(CW\*(C`SV*\*(C'\fR and is stored as-is with its \s-1REFCNT\s0 incremented.
(This is now used as a subroutine by \f(CW\*(C`sv_magic\*(C'\fR.)
\& MAGIC * sv_magicext(SV* sv, SV* obj, int how, MGVTBL *vtbl, const char* name, I32 namlen)
Creates a new \s-1SV\s0 which is a copy of the original \s-1SV\s0 (using \f(CW\*(C`sv_setsv\*(C'\fR).
The new \s-1SV\s0 is marked as mortal. It will be destroyed \*(L"soon\*(R", either by an
explicit call to \s-1FREETMPS\s0, or by an implicit call at places such as
statement boundaries. See also \f(CW\*(C`sv_newmortal\*(C'\fR and \f(CW\*(C`sv_2mortal\*(C'\fR.
\& SV* sv_mortalcopy(SV* oldsv)
Creates a new null \s-1SV\s0 which is mortal. The reference count of the \s-1SV\s0 is
set to 1. It will be destroyed \*(L"soon\*(R", either by an explicit call to
\&\s-1FREETMPS\s0, or by an implicit call at places such as statement boundaries.
See also \f(CW\*(C`sv_mortalcopy\*(C'\fR and \f(CW\*(C`sv_2mortal\*(C'\fR.
Increment an \s-1SV\s0's reference count. Use the \f(CW\*(C`SvREFCNT_inc()\*(C'\fR wrapper
A private implementation of the \f(CW\*(C`SvNVx\*(C'\fR macro for compilers which can't
cope with complex macro expressions. Always use the macro instead.
Converts the value pointed to by offsetp from a count of bytes from the
start of the string, to a count of the equivalent number of \s-1UTF\-8\s0 chars.
Handles magic and type coercion.
\& void sv_pos_b2u(SV* sv, I32* offsetp)
Converts the value pointed to by offsetp from a count of \s-1UTF\-8\s0 chars from
the start of the string, to a count of the equivalent number of bytes; if
lenp is non\-zero, it does the same to lenp, but this time starting from
the offset, rather than from the start of the string. Handles magic and
\& void sv_pos_u2b(SV* sv, I32* offsetp, I32* lenp)
Use the \f(CW\*(C`SvPV_nolen\*(C'\fR macro instead
Use \f(CW\*(C`SvPVbyte_nolen\*(C'\fR instead.
\& char* sv_pvbyte(SV *sv)
A private implementation of the \f(CW\*(C`SvPVbyte\*(C'\fR macro for compilers
which can't cope with complex macro expressions. Always use the macro
\& char* sv_pvbyten(SV *sv, STRLEN *len)
.IX Xref "sv_pvbyten_force"
.IX Item "sv_pvbyten_force"
A private implementation of the \f(CW\*(C`SvPVbytex_force\*(C'\fR macro for compilers
which can't cope with complex macro expressions. Always use the macro
\& char* sv_pvbyten_force(SV* sv, STRLEN* lp)
A private implementation of the \f(CW\*(C`SvPV\*(C'\fR macro for compilers which can't
cope with complex macro expressions. Always use the macro instead.
\& char* sv_pvn(SV *sv, STRLEN *len)
Get a sensible string out of the \s-1SV\s0 somehow.
A private implementation of the \f(CW\*(C`SvPV_force\*(C'\fR macro for compilers which
can't cope with complex macro expressions. Always use the macro instead.
\& char* sv_pvn_force(SV* sv, STRLEN* lp)
.IP "sv_pvn_force_flags" 8
.IX Xref "sv_pvn_force_flags"
.IX Item "sv_pvn_force_flags"
Get a sensible string out of the \s-1SV\s0 somehow.
If \f(CW\*(C`flags\*(C'\fR has \f(CW\*(C`SV_GMAGIC\*(C'\fR bit set, will \f(CW\*(C`mg_get\*(C'\fR on \f(CW\*(C`sv\*(C'\fR if
appropriate, else not. \f(CW\*(C`sv_pvn_force\*(C'\fR and \f(CW\*(C`sv_pvn_force_nomg\*(C'\fR are
implemented in terms of this function.
You normally want to use the various wrapper macros instead: see
\&\f(CW\*(C`SvPV_force\*(C'\fR and \f(CW\*(C`SvPV_force_nomg\*(C'\fR
\& char* sv_pvn_force_flags(SV* sv, STRLEN* lp, I32 flags)
Use the \f(CW\*(C`SvPVutf8_nolen\*(C'\fR macro instead
\& char* sv_pvutf8(SV *sv)
A private implementation of the \f(CW\*(C`SvPVutf8\*(C'\fR macro for compilers
which can't cope with complex macro expressions. Always use the macro
\& char* sv_pvutf8n(SV *sv, STRLEN *len)
.IX Xref "sv_pvutf8n_force"
.IX Item "sv_pvutf8n_force"
A private implementation of the \f(CW\*(C`SvPVutf8_force\*(C'\fR macro for compilers
which can't cope with complex macro expressions. Always use the macro
\& char* sv_pvutf8n_force(SV* sv, STRLEN* lp)
Returns a string describing what the \s-1SV\s0 is a reference to.
\& char* sv_reftype(SV* sv, int ob)
Make the first argument a copy of the second, then delete the original.
The target \s-1SV\s0 physically takes over ownership of the body of the source \s-1SV\s0
and inherits its flags; however, the target keeps any magic it owns,
and any magic in the source is discarded.
Note that this is a rather specialist \s-1SV\s0 copying operation; most of the
time you'll want to use \f(CW\*(C`sv_setsv\*(C'\fR or one of its many macro front\-ends.
\& void sv_replace(SV* sv, SV* nsv)
.IX Xref "sv_report_used"
.IX Item "sv_report_used"
Dump the contents of all SVs not yet freed. (Debugging aid).
Underlying implementation for the \f(CW\*(C`reset\*(C'\fR Perl function.
Note that the perl-level function is vaguely deprecated.
\& void sv_reset(char* s, HV* stash)
Weaken a reference: set the \f(CW\*(C`SvWEAKREF\*(C'\fR flag on this \s-1RV\s0; give the
referred-to \s-1SV\s0 \f(CW\*(C`PERL_MAGIC_backref\*(C'\fR magic if it hasn't already; and
push a back-reference to this \s-1RV\s0 onto the array of backreferences
associated with that magic.
\& SV* sv_rvweaken(SV *sv)
Copies an integer into the given \s-1SV\s0, upgrading first if necessary.
Does not handle 'set' magic. See also \f(CW\*(C`sv_setiv_mg\*(C'\fR.
\& void sv_setiv(SV* sv, IV num)
Like \f(CW\*(C`sv_setiv\*(C'\fR, but also handles 'set' magic.
\& void sv_setiv_mg(SV *sv, IV i)
Copies a double into the given \s-1SV\s0, upgrading first if necessary.
Does not handle 'set' magic. See also \f(CW\*(C`sv_setnv_mg\*(C'\fR.
\& void sv_setnv(SV* sv, NV num)
Like \f(CW\*(C`sv_setnv\*(C'\fR, but also handles 'set' magic.
\& void sv_setnv_mg(SV *sv, NV num)
Copies a string into an \s-1SV\s0. The string must be null\-terminated. Does not
handle 'set' magic. See \f(CW\*(C`sv_setpv_mg\*(C'\fR.
\& void sv_setpv(SV* sv, const char* ptr)
Works like \f(CW\*(C`sv_catpvf\*(C'\fR but copies the text into the \s-1SV\s0 instead of
appending it. Does not handle 'set' magic. See \f(CW\*(C`sv_setpvf_mg\*(C'\fR.
\& void sv_setpvf(SV* sv, const char* pat, ...)
Like \f(CW\*(C`sv_setpvf\*(C'\fR, but also handles 'set' magic.
\& void sv_setpvf_mg(SV *sv, const char* pat, ...)
Copies an integer into the given \s-1SV\s0, also updating its string value.
Does not handle 'set' magic. See \f(CW\*(C`sv_setpviv_mg\*(C'\fR.
\& void sv_setpviv(SV* sv, IV num)
Like \f(CW\*(C`sv_setpviv\*(C'\fR, but also handles 'set' magic.
\& void sv_setpviv_mg(SV *sv, IV iv)
Copies a string into an \s-1SV\s0. The \f(CW\*(C`len\*(C'\fR parameter indicates the number of
bytes to be copied. If the \f(CW\*(C`ptr\*(C'\fR argument is \s-1NULL\s0 the \s-1SV\s0 will become
undefined. Does not handle 'set' magic. See \f(CW\*(C`sv_setpvn_mg\*(C'\fR.
\& void sv_setpvn(SV* sv, const char* ptr, STRLEN len)
Like \f(CW\*(C`sv_setpvn\*(C'\fR, but also handles 'set' magic.
\& void sv_setpvn_mg(SV *sv, const char *ptr, STRLEN len)
Like \f(CW\*(C`sv_setpv\*(C'\fR, but also handles 'set' magic.
\& void sv_setpv_mg(SV *sv, const char *ptr)
Copies an integer into a new \s-1SV\s0, optionally blessing the \s-1SV\s0. The \f(CW\*(C`rv\*(C'\fR
argument will be upgraded to an \s-1RV\s0. That \s-1RV\s0 will be modified to point to
the new \s-1SV\s0. The \f(CW\*(C`classname\*(C'\fR argument indicates the package for the
blessing. Set \f(CW\*(C`classname\*(C'\fR to \f(CW\*(C`Nullch\*(C'\fR to avoid the blessing. The new \s-1SV\s0
will have a reference count of 1, and the \s-1RV\s0 will be returned.
\& SV* sv_setref_iv(SV* rv, const char* classname, IV iv)
Copies a double into a new \s-1SV\s0, optionally blessing the \s-1SV\s0. The \f(CW\*(C`rv\*(C'\fR
argument will be upgraded to an \s-1RV\s0. That \s-1RV\s0 will be modified to point to
the new \s-1SV\s0. The \f(CW\*(C`classname\*(C'\fR argument indicates the package for the
blessing. Set \f(CW\*(C`classname\*(C'\fR to \f(CW\*(C`Nullch\*(C'\fR to avoid the blessing. The new \s-1SV\s0
will have a reference count of 1, and the \s-1RV\s0 will be returned.
\& SV* sv_setref_nv(SV* rv, const char* classname, NV nv)
Copies a pointer into a new \s-1SV\s0, optionally blessing the \s-1SV\s0. The \f(CW\*(C`rv\*(C'\fR
argument will be upgraded to an \s-1RV\s0. That \s-1RV\s0 will be modified to point to
the new \s-1SV\s0. If the \f(CW\*(C`pv\*(C'\fR argument is \s-1NULL\s0 then \f(CW\*(C`PL_sv_undef\*(C'\fR will be placed
into the \s-1SV\s0. The \f(CW\*(C`classname\*(C'\fR argument indicates the package for the
blessing. Set \f(CW\*(C`classname\*(C'\fR to \f(CW\*(C`Nullch\*(C'\fR to avoid the blessing. The new \s-1SV\s0
will have a reference count of 1, and the \s-1RV\s0 will be returned.
Do not use with other Perl types such as \s-1HV\s0, \s-1AV\s0, \s-1SV\s0, \s-1CV\s0, because those
objects will become corrupted by the pointer copy process.
Note that \f(CW\*(C`sv_setref_pvn\*(C'\fR copies the string while this copies the pointer.
\& SV* sv_setref_pv(SV* rv, const char* classname, void* pv)
Copies a string into a new \s-1SV\s0, optionally blessing the \s-1SV\s0. The length of the
string must be specified with \f(CW\*(C`n\*(C'\fR. The \f(CW\*(C`rv\*(C'\fR argument will be upgraded to
an \s-1RV\s0. That \s-1RV\s0 will be modified to point to the new \s-1SV\s0. The \f(CW\*(C`classname\*(C'\fR
argument indicates the package for the blessing. Set \f(CW\*(C`classname\*(C'\fR to
\&\f(CW\*(C`Nullch\*(C'\fR to avoid the blessing. The new \s-1SV\s0 will have a reference count
of 1, and the \s-1RV\s0 will be returned.
Note that \f(CW\*(C`sv_setref_pv\*(C'\fR copies the pointer while this copies the string.
\& SV* sv_setref_pvn(SV* rv, const char* classname, char* pv, STRLEN n)
Copies an unsigned integer into a new \s-1SV\s0, optionally blessing the \s-1SV\s0. The \f(CW\*(C`rv\*(C'\fR
argument will be upgraded to an \s-1RV\s0. That \s-1RV\s0 will be modified to point to
the new \s-1SV\s0. The \f(CW\*(C`classname\*(C'\fR argument indicates the package for the
blessing. Set \f(CW\*(C`classname\*(C'\fR to \f(CW\*(C`Nullch\*(C'\fR to avoid the blessing. The new \s-1SV\s0
will have a reference count of 1, and the \s-1RV\s0 will be returned.
\& SV* sv_setref_uv(SV* rv, const char* classname, UV uv)
Copies the contents of the source \s-1SV\s0 \f(CW\*(C`ssv\*(C'\fR into the destination \s-1SV\s0
\&\f(CW\*(C`dsv\*(C'\fR. The source \s-1SV\s0 may be destroyed if it is mortal, so don't use this
function if the source \s-1SV\s0 needs to be reused. Does not handle 'set' magic.
Loosely speaking, it performs a copy\-by\-value, obliterating any previous
content of the destination.
You probably want to use one of the assortment of wrappers, such as
\&\f(CW\*(C`SvSetSV\*(C'\fR, \f(CW\*(C`SvSetSV_nosteal\*(C'\fR, \f(CW\*(C`SvSetMagicSV\*(C'\fR and
\&\f(CW\*(C`SvSetMagicSV_nosteal\*(C'\fR.
\& void sv_setsv(SV* dsv, SV* ssv)
.IX Xref "sv_setsv_flags"
.IX Item "sv_setsv_flags"
Copies the contents of the source \s-1SV\s0 \f(CW\*(C`ssv\*(C'\fR into the destination \s-1SV\s0
\&\f(CW\*(C`dsv\*(C'\fR. The source \s-1SV\s0 may be destroyed if it is mortal, so don't use this
function if the source \s-1SV\s0 needs to be reused. Does not handle 'set' magic.
Loosely speaking, it performs a copy\-by\-value, obliterating any previous
content of the destination.
If the \f(CW\*(C`flags\*(C'\fR parameter has the \f(CW\*(C`SV_GMAGIC\*(C'\fR bit set, will \f(CW\*(C`mg_get\*(C'\fR on
\&\f(CW\*(C`ssv\*(C'\fR if appropriate, else not. If the \f(CW\*(C`flags\*(C'\fR parameter has the
\&\f(CW\*(C`NOSTEAL\*(C'\fR bit set then the buffers of temps will not be stolen. <sv_setsv>
and \f(CW\*(C`sv_setsv_nomg\*(C'\fR are implemented in terms of this function.
You probably want to use one of the assortment of wrappers, such as
\&\f(CW\*(C`SvSetSV\*(C'\fR, \f(CW\*(C`SvSetSV_nosteal\*(C'\fR, \f(CW\*(C`SvSetMagicSV\*(C'\fR and
\&\f(CW\*(C`SvSetMagicSV_nosteal\*(C'\fR.
This is the primary function for copying scalars, and most other
copy-ish functions and macros use this underneath.
\& void sv_setsv_flags(SV* dsv, SV* ssv, I32 flags)
Like \f(CW\*(C`sv_setsv\*(C'\fR, but also handles 'set' magic.
\& void sv_setsv_mg(SV *dstr, SV *sstr)
Like \f(CW\*(C`sv_setsv\*(C'\fR but doesn't process magic.
\& void sv_setsv_nomg(SV* dsv, SV* ssv)
Copies an unsigned integer into the given \s-1SV\s0, upgrading first if necessary.
Does not handle 'set' magic. See also \f(CW\*(C`sv_setuv_mg\*(C'\fR.
\& void sv_setuv(SV* sv, UV num)
Like \f(CW\*(C`sv_setuv\*(C'\fR, but also handles 'set' magic.
\& void sv_setuv_mg(SV *sv, UV u)
Taint an \s-1SV\s0. Use \f(CW\*(C`SvTAINTED_on\*(C'\fR instead.
Test an \s-1SV\s0 for taintedness. Use \f(CW\*(C`SvTAINTED\*(C'\fR instead.
Returns true if the \s-1SV\s0 has a true value by Perl's rules.
Use the \f(CW\*(C`SvTRUE\*(C'\fR macro instead, which may call \f(CW\*(C`sv_true()\*(C'\fR or may
instead use an in-line version.
Removes all magic of type \f(CW\*(C`type\*(C'\fR from an \s-1SV\s0.
\& int sv_unmagic(SV* sv, int type)
Unsets the \s-1RV\s0 status of the \s-1SV\s0, and decrements the reference count of
whatever was being referenced by the \s-1RV\s0. This can almost be thought of
as a reversal of \f(CW\*(C`newSVrv\*(C'\fR. This is \f(CW\*(C`sv_unref_flags\*(C'\fR with the \f(CW\*(C`flag\*(C'\fR
being zero. See \f(CW\*(C`SvROK_off\*(C'\fR.
.IX Xref "sv_unref_flags"
.IX Item "sv_unref_flags"
Unsets the \s-1RV\s0 status of the \s-1SV\s0, and decrements the reference count of
whatever was being referenced by the \s-1RV\s0. This can almost be thought of
as a reversal of \f(CW\*(C`newSVrv\*(C'\fR. The \f(CW\*(C`cflags\*(C'\fR argument can contain
\&\f(CW\*(C`SV_IMMEDIATE_UNREF\*(C'\fR to force the reference count to be decremented
(otherwise the decrementing is conditional on the reference count being
different from one or the reference being a readonly \s-1SV\s0).
See \f(CW\*(C`SvROK_off\*(C'\fR.
\& void sv_unref_flags(SV* sv, U32 flags)
Untaint an \s-1SV\s0. Use \f(CW\*(C`SvTAINTED_off\*(C'\fR instead.
Upgrade an \s-1SV\s0 to a more complex form. Generally adds a new body type to the
\&\s-1SV\s0, then copies across as much information as possible from the old body.
You generally want to use the \f(CW\*(C`SvUPGRADE\*(C'\fR macro wrapper. See also \f(CW\*(C`svtype\*(C'\fR.
\& bool sv_upgrade(SV* sv, U32 mt)
Tells an \s-1SV\s0 to use \f(CW\*(C`ptr\*(C'\fR to find its string value. Normally the string is
stored inside the \s-1SV\s0 but sv_usepvn allows the \s-1SV\s0 to use an outside string.
The \f(CW\*(C`ptr\*(C'\fR should point to memory that was allocated by \f(CW\*(C`malloc\*(C'\fR. The
string length, \f(CW\*(C`len\*(C'\fR, must be supplied. This function will realloc the
memory pointed to by \f(CW\*(C`ptr\*(C'\fR, so that pointer should not be freed or used by
the programmer after giving it to sv_usepvn. Does not handle 'set' magic.
See \f(CW\*(C`sv_usepvn_mg\*(C'\fR.
\& void sv_usepvn(SV* sv, char* ptr, STRLEN len)
Like \f(CW\*(C`sv_usepvn\*(C'\fR, but also handles 'set' magic.
\& void sv_usepvn_mg(SV *sv, char *ptr, STRLEN len)
.IX Xref "sv_utf8_decode"
.IX Item "sv_utf8_decode"
If the \s-1PV\s0 of the \s-1SV\s0 is an octet sequence in \s-1UTF\-8\s0
and contains a multiple-byte character, the \f(CW\*(C`SvUTF8\*(C'\fR flag is turned on
so that it looks like a character. If the \s-1PV\s0 contains only single-byte
characters, the \f(CW\*(C`SvUTF8\*(C'\fR flag stays being off.
Scans \s-1PV\s0 for validity and returns false if the \s-1PV\s0 is invalid \s-1UTF\-8\s0.
\&\s-1NOTE:\s0 this function is experimental and may change or be
\& bool sv_utf8_decode(SV *sv)
.IP "sv_utf8_downgrade" 8
.IX Xref "sv_utf8_downgrade"
.IX Item "sv_utf8_downgrade"
Attempts to convert the \s-1PV\s0 of an \s-1SV\s0 from characters to bytes.
If the \s-1PV\s0 contains a character beyond byte, this conversion will fail;
in this case, either returns false or, if \f(CW\*(C`fail_ok\*(C'\fR is not
This is not as a general purpose Unicode to byte encoding interface:
use the Encode extension for that.
\&\s-1NOTE:\s0 this function is experimental and may change or be
\& bool sv_utf8_downgrade(SV *sv, bool fail_ok)
.IX Xref "sv_utf8_encode"
.IX Item "sv_utf8_encode"
Converts the \s-1PV\s0 of an \s-1SV\s0 to \s-1UTF\-8\s0, but then turns the \f(CW\*(C`SvUTF8\*(C'\fR
flag off so that it looks like octets again.
\& void sv_utf8_encode(SV *sv)
.IX Xref "sv_utf8_upgrade"
.IX Item "sv_utf8_upgrade"
Converts the \s-1PV\s0 of an \s-1SV\s0 to its UTF\-8\-encoded form.
Forces the \s-1SV\s0 to string form if it is not already.
Always sets the SvUTF8 flag to avoid future validity checks even
if all the bytes have hibit clear.
This is not as a general purpose byte encoding to Unicode interface:
use the Encode extension for that.
\& STRLEN sv_utf8_upgrade(SV *sv)
.IP "sv_utf8_upgrade_flags" 8
.IX Xref "sv_utf8_upgrade_flags"
.IX Item "sv_utf8_upgrade_flags"
Converts the \s-1PV\s0 of an \s-1SV\s0 to its UTF\-8\-encoded form.
Forces the \s-1SV\s0 to string form if it is not already.
Always sets the SvUTF8 flag to avoid future validity checks even
if all the bytes have hibit clear. If \f(CW\*(C`flags\*(C'\fR has \f(CW\*(C`SV_GMAGIC\*(C'\fR bit set,
will \f(CW\*(C`mg_get\*(C'\fR on \f(CW\*(C`sv\*(C'\fR if appropriate, else not. \f(CW\*(C`sv_utf8_upgrade\*(C'\fR and
\&\f(CW\*(C`sv_utf8_upgrade_nomg\*(C'\fR are implemented in terms of this function.
This is not as a general purpose byte encoding to Unicode interface:
use the Encode extension for that.
\& STRLEN sv_utf8_upgrade_flags(SV *sv, I32 flags)
A private implementation of the \f(CW\*(C`SvUVx\*(C'\fR macro for compilers which can't
cope with complex macro expressions. Always use the macro instead.
Processes its arguments like \f(CW\*(C`vsprintf\*(C'\fR and appends the formatted output
to an \s-1SV\s0. Does not handle 'set' magic. See \f(CW\*(C`sv_vcatpvf_mg\*(C'\fR.
Usually used via its frontend \f(CW\*(C`sv_catpvf\*(C'\fR.
\& void sv_vcatpvf(SV* sv, const char* pat, va_list* args)
Processes its arguments like \f(CW\*(C`vsprintf\*(C'\fR and appends the formatted output
to an \s-1SV\s0. Uses an array of SVs if the C style variable argument list is
missing (\s-1NULL\s0). When running with taint checks enabled, indicates via
\&\f(CW\*(C`maybe_tainted\*(C'\fR if results are untrustworthy (often due to the use of
\&\s-1XXX\s0 Except that it maybe_tainted is never assigned to.
Usually used via one of its frontends \f(CW\*(C`sv_vcatpvf\*(C'\fR and \f(CW\*(C`sv_vcatpvf_mg\*(C'\fR.
\& void sv_vcatpvfn(SV* sv, const char* pat, STRLEN patlen, va_list* args, SV** svargs, I32 svmax, bool *maybe_tainted)
Like \f(CW\*(C`sv_vcatpvf\*(C'\fR, but also handles 'set' magic.
Usually used via its frontend \f(CW\*(C`sv_catpvf_mg\*(C'\fR.
\& void sv_vcatpvf_mg(SV* sv, const char* pat, va_list* args)
Works like \f(CW\*(C`sv_vcatpvf\*(C'\fR but copies the text into the \s-1SV\s0 instead of
appending it. Does not handle 'set' magic. See \f(CW\*(C`sv_vsetpvf_mg\*(C'\fR.
Usually used via its frontend \f(CW\*(C`sv_setpvf\*(C'\fR.
\& void sv_vsetpvf(SV* sv, const char* pat, va_list* args)
Works like \f(CW\*(C`sv_vcatpvfn\*(C'\fR but copies the text into the \s-1SV\s0 instead of
Usually used via one of its frontends \f(CW\*(C`sv_vsetpvf\*(C'\fR and \f(CW\*(C`sv_vsetpvf_mg\*(C'\fR.
\& void sv_vsetpvfn(SV* sv, const char* pat, STRLEN patlen, va_list* args, SV** svargs, I32 svmax, bool *maybe_tainted)
Like \f(CW\*(C`sv_vsetpvf\*(C'\fR, but also handles 'set' magic.
Usually used via its frontend \f(CW\*(C`sv_setpvf_mg\*(C'\fR.
\& void sv_vsetpvf_mg(SV* sv, const char* pat, va_list* args)
.IX Header "Unicode Support"
.IX Xref "bytes_from_utf8"
.IX Item "bytes_from_utf8"
Converts a string \f(CW\*(C`s\*(C'\fR of length \f(CW\*(C`len\*(C'\fR from \s-1UTF\-8\s0 into byte encoding.
Unlike \f(CW\*(C`utf8_to_bytes\*(C'\fR but like \f(CW\*(C`bytes_to_utf8\*(C'\fR, returns a pointer to
the newly-created string, and updates \f(CW\*(C`len\*(C'\fR to contain the new
length. Returns the original string if no conversion occurs, \f(CW\*(C`len\*(C'\fR
is unchanged. Do nothing if \f(CW\*(C`is_utf8\*(C'\fR points to 0. Sets \f(CW\*(C`is_utf8\*(C'\fR to
0 if \f(CW\*(C`s\*(C'\fR is converted or contains all 7bit characters.
\&\s-1NOTE:\s0 this function is experimental and may change or be
\& U8* bytes_from_utf8(U8 *s, STRLEN *len, bool *is_utf8)
Converts a string \f(CW\*(C`s\*(C'\fR of length \f(CW\*(C`len\*(C'\fR from \s-1ASCII\s0 into \s-1UTF\-8\s0 encoding.
Returns a pointer to the newly-created string, and sets \f(CW\*(C`len\*(C'\fR to
If you want to convert to \s-1UTF\-8\s0 from other encodings than \s-1ASCII\s0,
see \fIsv_recode_to_utf8()\fR.
\&\s-1NOTE:\s0 this function is experimental and may change or be
\& U8* bytes_to_utf8(U8 *s, STRLEN *len)
Return true if the strings s1 and s2 differ case\-insensitively, false
if not (if they are equal case\-insensitively). If u1 is true, the
string s1 is assumed to be in UTF\-8\-encoded Unicode. If u2 is true,
the string s2 is assumed to be in UTF\-8\-encoded Unicode. If u1 or u2
are false, the respective string is assumed to be in native 8\-bit
If the pe1 and pe2 are non\-NULL, the scanning pointers will be copied
in there (they will point at the beginning of the \fInext\fR character).
If the pointers behind pe1 or pe2 are non\-NULL, they are the end
pointers beyond which scanning will not continue under any
circumstances. If the byte lengths l1 and l2 are non\-zero, s1+l1 and
s2+l2 will be used as goal end pointers that will also stop the scan,
and which qualify towards defining a successful match: all the scans
that define an explicit length must reach their goal pointers for
For case\-insensitiveness, the \*(L"casefolding\*(R" of Unicode is used
instead of upper/lowercasing both the characters, see
http://www.unicode.org/unicode/reports/tr21/ (Case Mappings).
\& I32 ibcmp_utf8(const char* a, char **pe1, UV l1, bool u1, const char* b, char **pe2, UV l2, bool u2)
Tests if some arbitrary number of bytes begins in a valid \s-1UTF\-8\s0
character. Note that an \s-1INVARIANT\s0 (i.e. \s-1ASCII\s0) character is a valid
\&\s-1UTF\-8\s0 character. The actual number of bytes in the \s-1UTF\-8\s0 character
will be returned if it is valid, otherwise 0.
\& STRLEN is_utf8_char(U8 *p)
.IX Xref "is_utf8_string"
.IX Item "is_utf8_string"
Returns true if first \f(CW\*(C`len\*(C'\fR bytes of the given string form a valid
\&\s-1UTF\-8\s0 string, false otherwise. Note that 'a valid \s-1UTF\-8\s0 string' does
not mean 'a string that contains code points above 0x7F encoded in \s-1UTF\-8\s0'
because a valid \s-1ASCII\s0 string is a valid \s-1UTF\-8\s0 string.
See also \fIis_utf8_string_loclen()\fR and \fIis_utf8_string_loc()\fR.
\& bool is_utf8_string(U8 *s, STRLEN len)
.IP "is_utf8_string_loc" 8
.IX Xref "is_utf8_string_loc"
.IX Item "is_utf8_string_loc"
Like \fIis_utf8_string()\fR but stores the location of the failure (in the
case of \*(L"utf8ness failure\*(R") or the location s+len (in the case of
\&\*(L"utf8ness success\*(R") in the \f(CW\*(C`ep\*(C'\fR.
See also \fIis_utf8_string_loclen()\fR and \fIis_utf8_string()\fR.
\& bool is_utf8_string_loc(U8 *s, STRLEN len, U8 **p)
.IP "is_utf8_string_loclen" 8
.IX Xref "is_utf8_string_loclen"
.IX Item "is_utf8_string_loclen"
Like \fIis_utf8_string()\fR but stores the location of the failure (in the
case of \*(L"utf8ness failure\*(R") or the location s+len (in the case of
\&\*(L"utf8ness success\*(R") in the \f(CW\*(C`ep\*(C'\fR, and the number of \s-1UTF\-8\s0
encoded characters in the \f(CW\*(C`el\*(C'\fR.
See also \fIis_utf8_string_loc()\fR and \fIis_utf8_string()\fR.
\& bool is_utf8_string_loclen(const U8 *s, STRLEN len, const U8 **ep, STRLEN *el)
.IX Xref "pv_uni_display"
.IX Item "pv_uni_display"
Build to the scalar dsv a displayable version of the string spv,
length len, the displayable version being at most pvlim bytes long
(if longer, the rest is truncated and \*(L"...\*(R" will be appended).
The flags argument can have \s-1UNI_DISPLAY_ISPRINT\s0 set to display
\&\fIisPRINT()\fRable characters as themselves, \s-1UNI_DISPLAY_BACKSLASH\s0
to display the \e\e[nrfta\e\e] as the backslashed versions (like '\en')
(\s-1UNI_DISPLAY_BACKSLASH\s0 is preferred over \s-1UNI_DISPLAY_ISPRINT\s0 for \e\e).
\&\s-1UNI_DISPLAY_QQ\s0 (and its alias \s-1UNI_DISPLAY_REGEX\s0) have both
\&\s-1UNI_DISPLAY_BACKSLASH\s0 and \s-1UNI_DISPLAY_ISPRINT\s0 turned on.
The pointer to the \s-1PV\s0 of the dsv is returned.
\& char* pv_uni_display(SV *dsv, U8 *spv, STRLEN len, STRLEN pvlim, UV flags)
The encoding is assumed to be an Encode object, the \s-1PV\s0 of the ssv is
assumed to be octets in that encoding and decoding the input starts
from the position which (\s-1PV\s0 + *offset) pointed to. The dsv will be
concatenated the decoded \s-1UTF\-8\s0 string from ssv. Decoding will terminate
when the string tstr appears in decoding output or the input ends on
the \s-1PV\s0 of the ssv. The value which the offset points will be modified
to the last input position on the ssv.
Returns \s-1TRUE\s0 if the terminator was found, else returns \s-1FALSE\s0.
\& bool sv_cat_decode(SV* dsv, SV *encoding, SV *ssv, int *offset, char* tstr, int tlen)
.IP "sv_recode_to_utf8" 8
.IX Xref "sv_recode_to_utf8"
.IX Item "sv_recode_to_utf8"
The encoding is assumed to be an Encode object, on entry the \s-1PV\s0
of the sv is assumed to be octets in that encoding, and the sv
will be converted into Unicode (and \s-1UTF\-8\s0).
If the sv already is \s-1UTF\-8\s0 (or if it is not \s-1POK\s0), or if the encoding
is not a reference, nothing is done to the sv. If the encoding is not
an \f(CW\*(C`Encode::XS\*(C'\fR Encoding object, bad things will happen.
(See \fIlib/encoding.pm\fR and Encode).
The \s-1PV\s0 of the sv is returned.
\& char* sv_recode_to_utf8(SV* sv, SV *encoding)
.IX Xref "sv_uni_display"
.IX Item "sv_uni_display"
Build to the scalar dsv a displayable version of the scalar sv,
the displayable version being at most pvlim bytes long
(if longer, the rest is truncated and \*(L"...\*(R" will be appended).
The flags argument is as in \fIpv_uni_display()\fR.
The pointer to the \s-1PV\s0 of the dsv is returned.
\& char* sv_uni_display(SV *dsv, SV *ssv, STRLEN pvlim, UV flags)
The \*(L"p\*(R" contains the pointer to the \s-1UTF\-8\s0 string encoding
the character that is being converted.
The \*(L"ustrp\*(R" is a pointer to the character buffer to put the
conversion result to. The \*(L"lenp\*(R" is a pointer to the length
The \*(L"swashp\*(R" is a pointer to the swash to use.
Both the special and normal mappings are stored lib/unicore/To/Foo.pl,
and loaded by \s-1SWASHGET\s0, using lib/utf8_heavy.pl. The special (usually,
but not always, a multicharacter mapping), is tried first.
The \*(L"special\*(R" is a string like \*(L"utf8::ToSpecLower\*(R", which means the
hash \f(CW%utf8::ToSpecLower\fR. The access to the hash is through
\&\fIPerl_to_utf8_case()\fR.
The \*(L"normal\*(R" is a string like \*(L"ToLower\*(R" which means the swash
\&\f(CW%utf8::ToLower\fR.
\& UV to_utf8_case(U8 *p, U8* ustrp, STRLEN *lenp, SV **swashp, char *normal, char *special)
Convert the \s-1UTF\-8\s0 encoded character at p to its foldcase version and
store that in \s-1UTF\-8\s0 in ustrp and its length in bytes in lenp. Note
that the ustrp needs to be at least \s-1UTF8_MAXBYTES_CASE+1\s0 bytes since the
foldcase version may be longer than the original character (up to
The first character of the foldcased version is returned
(but note, as explained above, that there may be more.)
\& UV to_utf8_fold(U8 *p, U8* ustrp, STRLEN *lenp)
Convert the \s-1UTF\-8\s0 encoded character at p to its lowercase version and
store that in \s-1UTF\-8\s0 in ustrp and its length in bytes in lenp. Note
that the ustrp needs to be at least \s-1UTF8_MAXBYTES_CASE+1\s0 bytes since the
lowercase version may be longer than the original character.
The first character of the lowercased version is returned
(but note, as explained above, that there may be more.)
\& UV to_utf8_lower(U8 *p, U8* ustrp, STRLEN *lenp)
Convert the \s-1UTF\-8\s0 encoded character at p to its titlecase version and
store that in \s-1UTF\-8\s0 in ustrp and its length in bytes in lenp. Note
that the ustrp needs to be at least \s-1UTF8_MAXBYTES_CASE+1\s0 bytes since the
titlecase version may be longer than the original character.
The first character of the titlecased version is returned
(but note, as explained above, that there may be more.)
\& UV to_utf8_title(U8 *p, U8* ustrp, STRLEN *lenp)
Convert the \s-1UTF\-8\s0 encoded character at p to its uppercase version and
store that in \s-1UTF\-8\s0 in ustrp and its length in bytes in lenp. Note
that the ustrp needs to be at least \s-1UTF8_MAXBYTES_CASE+1\s0 bytes since
the uppercase version may be longer than the original character.
The first character of the uppercased version is returned
(but note, as explained above, that there may be more.)
\& UV to_utf8_upper(U8 *p, U8* ustrp, STRLEN *lenp)
.IX Xref "utf8n_to_uvchr"
.IX Item "utf8n_to_uvchr"
Returns the native character value of the first character in the string \f(CW\*(C`s\*(C'\fR
which is assumed to be in \s-1UTF\-8\s0 encoding; \f(CW\*(C`retlen\*(C'\fR will be set to the
length, in bytes, of that character.
Allows length and flags to be passed to low level routine.
\& UV utf8n_to_uvchr(U8 *s, STRLEN curlen, STRLEN *retlen, U32 flags)
.IX Xref "utf8n_to_uvuni"
.IX Item "utf8n_to_uvuni"
Bottom level \s-1UTF\-8\s0 decode routine.
Returns the unicode code point value of the first character in the string \f(CW\*(C`s\*(C'\fR
which is assumed to be in \s-1UTF\-8\s0 encoding and no longer than \f(CW\*(C`curlen\*(C'\fR;
\&\f(CW\*(C`retlen\*(C'\fR will be set to the length, in bytes, of that character.
If \f(CW\*(C`s\*(C'\fR does not point to a well-formed \s-1UTF\-8\s0 character, the behaviour
is dependent on the value of \f(CW\*(C`flags\*(C'\fR: if it contains \s-1UTF8_CHECK_ONLY\s0,
it is assumed that the caller will raise a warning, and this function
will silently just set \f(CW\*(C`retlen\*(C'\fR to \f(CW\*(C`\-1\*(C'\fR and return zero. If the
\&\f(CW\*(C`flags\*(C'\fR does not contain \s-1UTF8_CHECK_ONLY\s0, warnings about
malformations will be given, \f(CW\*(C`retlen\*(C'\fR will be set to the expected
length of the \s-1UTF\-8\s0 character in bytes, and zero will be returned.
The \f(CW\*(C`flags\*(C'\fR can also contain various flags to allow deviations from
the strict \s-1UTF\-8\s0 encoding (see \fIutf8.h\fR).
Most code should use \fIutf8_to_uvchr()\fR rather than call this directly.
\& UV utf8n_to_uvuni(U8 *s, STRLEN curlen, STRLEN *retlen, U32 flags)
Returns the number of \s-1UTF\-8\s0 characters between the \s-1UTF\-8\s0 pointers \f(CW\*(C`a\*(C'\fR
\&\s-1WARNING:\s0 use only if you *know* that the pointers point inside the
same \s-1UTF\-8\s0 buffer.
\& IV utf8_distance(U8 *a, U8 *b)
Return the \s-1UTF\-8\s0 pointer \f(CW\*(C`s\*(C'\fR displaced by \f(CW\*(C`off\*(C'\fR characters, either
\&\s-1WARNING:\s0 do not use the following unless you *know* \f(CW\*(C`off\*(C'\fR is within
the \s-1UTF\-8\s0 data pointed to by \f(CW\*(C`s\*(C'\fR *and* that on entry \f(CW\*(C`s\*(C'\fR is aligned
on the first byte of character or just after the last byte of a character.
\& U8* utf8_hop(U8 *s, I32 off)
Return the length of the \s-1UTF\-8\s0 char encoded string \f(CW\*(C`s\*(C'\fR in characters.
Stops at \f(CW\*(C`e\*(C'\fR (inclusive). If \f(CW\*(C`e < s\*(C'\fR or if the scan would end
up past \f(CW\*(C`e\*(C'\fR, croaks.
\& STRLEN utf8_length(U8* s, U8 *e)
Converts a string \f(CW\*(C`s\*(C'\fR of length \f(CW\*(C`len\*(C'\fR from \s-1UTF\-8\s0 into byte encoding.
Unlike \f(CW\*(C`bytes_to_utf8\*(C'\fR, this over-writes the original string, and
updates len to contain the new length.
Returns zero on failure, setting \f(CW\*(C`len\*(C'\fR to \-1.
\&\s-1NOTE:\s0 this function is experimental and may change or be
\& U8* utf8_to_bytes(U8 *s, STRLEN *len)
Returns the native character value of the first character in the string \f(CW\*(C`s\*(C'\fR
which is assumed to be in \s-1UTF\-8\s0 encoding; \f(CW\*(C`retlen\*(C'\fR will be set to the
length, in bytes, of that character.
If \f(CW\*(C`s\*(C'\fR does not point to a well-formed \s-1UTF\-8\s0 character, zero is
returned and retlen is set, if possible, to \-1.
\& UV utf8_to_uvchr(U8 *s, STRLEN *retlen)
Returns the Unicode code point of the first character in the string \f(CW\*(C`s\*(C'\fR
which is assumed to be in \s-1UTF\-8\s0 encoding; \f(CW\*(C`retlen\*(C'\fR will be set to the
length, in bytes, of that character.
This function should only be used when returned \s-1UV\s0 is considered
an index into the Unicode semantic tables (e.g. swashes).
If \f(CW\*(C`s\*(C'\fR does not point to a well-formed \s-1UTF\-8\s0 character, zero is
returned and retlen is set, if possible, to \-1.
\& UV utf8_to_uvuni(U8 *s, STRLEN *retlen)
Adds the \s-1UTF\-8\s0 representation of the Native codepoint \f(CW\*(C`uv\*(C'\fR to the end
of the string \f(CW\*(C`d\*(C'\fR; \f(CW\*(C`d\*(C'\fR should be have at least \f(CW\*(C`UTF8_MAXBYTES+1\*(C'\fR free
bytes available. The return value is the pointer to the byte after the
end of the new character. In other words,
\& d = uvchr_to_utf8(d, uv);
is the recommended wide native character-aware way of saying
\& U8* uvchr_to_utf8(U8 *d, UV uv)
.IP "uvuni_to_utf8_flags" 8
.IX Xref "uvuni_to_utf8_flags"
.IX Item "uvuni_to_utf8_flags"
Adds the \s-1UTF\-8\s0 representation of the Unicode codepoint \f(CW\*(C`uv\*(C'\fR to the end
of the string \f(CW\*(C`d\*(C'\fR; \f(CW\*(C`d\*(C'\fR should be have at least \f(CW\*(C`UTF8_MAXBYTES+1\*(C'\fR free
bytes available. The return value is the pointer to the byte after the
end of the new character. In other words,
\& d = uvuni_to_utf8_flags(d, uv, flags);
\& d = uvuni_to_utf8(d, uv);
\& d = uvuni_to_utf8_flags(d, uv, 0);
is the recommended Unicode-aware way of saying
\& U8* uvuni_to_utf8_flags(U8 *d, UV uv, UV flags)
.ie n .SH "Variables created by ""xsubpp""\fP and \f(CW""xsubpp"" internal functions"
.el .SH "Variables created by \f(CWxsubpp\fP and \f(CWxsubpp\fP internal functions"
.IX Header "Variables created by xsubpp and xsubpp internal functions"
Variable which is setup by \f(CW\*(C`xsubpp\*(C'\fR to indicate the stack base offset,
used by the \f(CW\*(C`ST\*(C'\fR, \f(CW\*(C`XSprePUSH\*(C'\fR and \f(CW\*(C`XSRETURN\*(C'\fR macros. The \f(CW\*(C`dMARK\*(C'\fR macro
must be called prior to setup the \f(CW\*(C`MARK\*(C'\fR variable.
Variable which is setup by \f(CW\*(C`xsubpp\*(C'\fR to indicate the
class name for a \*(C+ \s-1XS\s0 constructor. This is always a \f(CW\*(C`char*\*(C'\fR. See \f(CW\*(C`THIS\*(C'\fR.
Sets up the \f(CW\*(C`ax\*(C'\fR variable.
This is usually handled automatically by \f(CW\*(C`xsubpp\*(C'\fR by calling \f(CW\*(C`dXSARGS\*(C'\fR.
Sets up the \f(CW\*(C`ax\*(C'\fR variable and stack marker variable \f(CW\*(C`mark\*(C'\fR.
This is usually handled automatically by \f(CW\*(C`xsubpp\*(C'\fR by calling \f(CW\*(C`dXSARGS\*(C'\fR.
Sets up the \f(CW\*(C`items\*(C'\fR variable.
This is usually handled automatically by \f(CW\*(C`xsubpp\*(C'\fR by calling \f(CW\*(C`dXSARGS\*(C'\fR.
Sets up stack and mark pointers for an \s-1XSUB\s0, calling dSP and dMARK.
Sets up the \f(CW\*(C`ax\*(C'\fR and \f(CW\*(C`items\*(C'\fR variables by calling \f(CW\*(C`dAX\*(C'\fR and \f(CW\*(C`dITEMS\*(C'\fR.
This is usually handled automatically by \f(CW\*(C`xsubpp\*(C'\fR.
Sets up the \f(CW\*(C`ix\*(C'\fR variable for an \s-1XSUB\s0 which has aliases. This is usually
handled automatically by \f(CW\*(C`xsubpp\*(C'\fR.
Variable which is setup by \f(CW\*(C`xsubpp\*(C'\fR to indicate the number of
items on the stack. See \*(L"Variable\-length Parameter Lists\*(R" in perlxs.
Variable which is setup by \f(CW\*(C`xsubpp\*(C'\fR to indicate which of an
\&\s-1XSUB\s0's aliases was used to invoke it. See \*(L"The \s-1ALIAS:\s0 Keyword\*(R" in perlxs.
Used by \f(CW\*(C`xsubpp\*(C'\fR to hook up XSUBs as Perl subs. Adds Perl prototypes to
Variable which is setup by \f(CW\*(C`xsubpp\*(C'\fR to hold the return value for an
\&\s-1XSUB\s0. This is always the proper type for the \s-1XSUB\s0. See
\&\*(L"The \s-1RETVAL\s0 Variable\*(R" in perlxs.
Used to access elements on the \s-1XSUB\s0's stack.
Variable which is setup by \f(CW\*(C`xsubpp\*(C'\fR to designate the object in a \*(C+
\&\s-1XSUB\s0. This is always the proper type for the \*(C+ object. See \f(CW\*(C`CLASS\*(C'\fR and
\&\*(L"Using \s-1XS\s0 With \*(C+\*(R" in perlxs.
Macro to declare an \s-1XSUB\s0 and its C parameter list. This is handled by
\&\f(CW\*(C`xsubpp\*(C'\fR.
.IP "\s-1XS_VERSION\s0" 8
The version identifier for an \s-1XS\s0 module. This is usually
handled automatically by \f(CW\*(C`ExtUtils::MakeMaker\*(C'\fR. See \f(CW\*(C`XS_VERSION_BOOTCHECK\*(C'\fR.
.IP "\s-1XS_VERSION_BOOTCHECK\s0" 8
.IX Xref "XS_VERSION_BOOTCHECK"
.IX Item "XS_VERSION_BOOTCHECK"
Macro to verify that a \s-1PM\s0 module's \f(CW$VERSION\fR variable matches the \s-1XS\s0
module's \f(CW\*(C`XS_VERSION\*(C'\fR variable. This is usually handled automatically by
\&\f(CW\*(C`xsubpp\*(C'\fR. See \*(L"The \s-1VERSIONCHECK:\s0 Keyword\*(R" in perlxs.
.IX Header "Warning and Dieing"
This is the XSUB\-writer's interface to Perl's \f(CW\*(C`die\*(C'\fR function.
Normally call this function the same way you call the C \f(CW\*(C`printf\*(C'\fR
function. Calling \f(CW\*(C`croak\*(C'\fR returns control directly to Perl,
sidestepping the normal C order of execution. See \f(CW\*(C`warn\*(C'\fR.
If you want to throw an exception object, assign the object to
\&\f(CW$@\fR and then pass \f(CW\*(C`Nullch\*(C'\fR to \fIcroak()\fR:
\& errsv = get_sv("@", TRUE);
\& sv_setsv(errsv, exception_object);
\& void croak(const char* pat, ...)
This is the XSUB\-writer's interface to Perl's \f(CW\*(C`warn\*(C'\fR function. Call this
function the same way you call the C \f(CW\*(C`printf\*(C'\fR function. See \f(CW\*(C`croak\*(C'\fR.
\& void warn(const char* pat, ...)
Until May 1997, this document was maintained by Jeff Okamoto
<okamoto@corp.hp.com>. It is now maintained as part of Perl itself.
With lots of help and suggestions from Dean Roehrich, Malcolm Beattie,
Andreas Koenig, Paul Hudson, Ilya Zakharevich, Paul Marquess, Neil
Bowers, Matthew Green, Tim Bunce, Spider Boardman, Ulrich Pfeifer,
Stephen McCamant, and Gurusamy Sarathy.
\&\s-1API\s0 Listing originally by Dean Roehrich <roehrich@cray.com>.
Updated to be autogenerated from comments in the source by Benjamin Stuhl.
\&\fIperlguts\fR\|(1), \fIperlxs\fR\|(1), \fIperlxstut\fR\|(1), \fIperlintern\fR\|(1)
projects / OpenSPARC-T2-SAM / blob