| perlapi - autogenerated documentation for the perl public API |
xsubpp and xsubpp internal functions
perlapi - autogenerated documentation for the perl public API
This file contains the documentation of the perl public API 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 extensions.
Note that all Perl API global variables must be referenced with the PL_
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.
GIMME_V which can only return
G_SCALAR or G_ARRAY; in a void context, it returns G_SCALAR.
Deprecated. Use GIMME_V instead.
U32 GIMME
wantarray. Returns G_VOID,
G_SCALAR or G_ARRAY for void, scalar or list context,
respectively.
U32 GIMME_V
GIMME_V, GIMME and
the perlcall manpage.
eval wrapper around a callback. See
the perlcall manpage.
GIMME_V, GIMME, and
the perlcall manpage.
GIMME_V and the perlcall manpage.
av_len(). Deprecated, use av_len() instead.
int AvFILL(AV* av)
void av_clear(AV* ar)
key from the array. Returns the
deleted element. flags is currently ignored.
SV* av_delete(AV* ar, I32 key, I32 flags)
key has been initialized.
This relies on the fact that uninitialized array elements are set to
&PL_sv_undef.
bool av_exists(AV* ar, I32 key)
key is the index to which the array should be
extended.
void av_extend(AV* ar, I32 key)
key is the
index. If lval is set then the fetch will be part of a store. Check
that the return value is non-null before dereferencing it to a SV*.
See Understanding the Magic of Tied Hashes and Arrays in the perlguts manpage for more information on how to use this function on tied arrays.
SV** av_fetch(AV* ar, I32 key, I32 lval)
$#array = $fill;.
void av_fill(AV* ar, I32 fill)
I32 av_len(AV* ar)
AV* av_make(I32 size, SV** svp)
&PL_sv_undef if the array
is empty.
SV* av_pop(AV* ar)
void av_push(AV* ar, SV* val)
SV* av_shift(AV* ar)
key. The
return value will be NULL 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 SV*. Note
that the caller is responsible for suitably incrementing the reference
count of val before the call, and decrementing it if the function
returned NULL.
See Understanding the Magic of Tied Hashes and Arrays in the perlguts manpage for more information on how to use this function on tied arrays.
SV** av_store(AV* ar, I32 key, SV* val)
void av_undef(AV* ar)
undef values onto the beginning of the
array. The array will grow automatically to accommodate the addition. You
must then use av_store to assign values to these new elements.
void av_unshift(AV* ar, I32 num)
create is set and the
Perl variable does not exist then it will be created. If create is not
set and the variable does not exist then NULL is returned.
NOTE: the perl_ form of this function is deprecated.
AV* get_av(const char* name, I32 create)
AV* newAV()
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)
NOTE: the perl_ form of this function is deprecated.
I32 call_argv(const char* sub_name, I32 flags, char** argv)
NOTE: the perl_ form of this function is deprecated.
I32 call_method(const char* methname, I32 flags)
NOTE: the perl_ form of this function is deprecated.
I32 call_pv(const char* sub_name, I32 flags)
NOTE: the perl_ form of this function is deprecated.
I32 call_sv(SV* sv, I32 flags)
LEAVE and the perlcall manpage.
ENTER;
eval the given string and return an SV* result.
NOTE: the perl_ form of this function is deprecated.
SV* eval_pv(const char* p, I32 croak_on_error)
eval the string in the SV.
NOTE: the perl_ form of this function is deprecated.
I32 eval_sv(SV* sv, I32 flags)
SAVETMPS and
the perlcall manpage.
FREETMPS;
ENTER and the perlcall manpage.
LEAVE;
FREETMPS and
the perlcall manpage.
SAVETMPS;
char is an ASCII alphanumeric
character (including underscore) or digit.
bool isALNUM(char ch)
char is an ASCII alphabetic
character.
bool isALPHA(char ch)
char is an ASCII
digit.
bool isDIGIT(char ch)
char is a lowercase
character.
bool isLOWER(char ch)
char is whitespace.
bool isSPACE(char ch)
char is an uppercase
character.
bool isUPPER(char ch)
char toLOWER(char ch)
char toUPPER(char ch)
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 COPY_STACKS while the threads->new doesn't.
CLONEf_KEEP_PTR_TABLE
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 KEEP_PTR_TABLE is not set then perl_clone will kill
the ptr_table using the function
ptr_table_free(PL_ptr_table); PL_ptr_table = NULL;,
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
CLONEf_CLONE_HOST 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)
HV* CvSTASH(CV* cv)
create is set and
the Perl subroutine does not exist then it will be declared (which has the
same effect as saying sub name;). If create is not set and the
subroutine does not exist then NULL is returned.
NOTE: the perl_ form of this function is deprecated.
CV* get_cv(const char* name, I32 create)
undef &foo, 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.
void cv_undef(CV* cv)
use Foo::Bar VERSION. The optional trailing SV*
arguments can be used to specify arguments to the module's import()
method, similar to use Foo::Bar VERSION LIST.
void load_module(U32 flags, SV* name, SV* ver, ...)
int nothreadhook()
PerlInterpreter* perl_alloc()
void perl_construct(PerlInterpreter* interp)
int perl_destruct(PerlInterpreter* interp)
void perl_free(PerlInterpreter* interp)
int perl_parse(PerlInterpreter* interp, XSINIT_t xsinit, int argc, char** argv, char** env)
int perl_run(PerlInterpreter* interp)
require the file named by the string argument. It is
analogous to the Perl code eval "require '$file'". It's even
implemented that way; consider using load_module instead.
NOTE: the perl_ form of this function is deprecated.
void require_pv(const char* pv)
pack() Perl function.
void packlist(SV *cat, char *pat, char *patend, SV **beglist, SV **endlist)
pack() 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)
unpack() Perl function. unpackstring puts the
extracted list items on the stack and returns the number of elements.
Issue PUTBACK before and SPAGAIN after the call to this function.
I32 unpackstring(char *pat, char *patend, char *s, char *strend, U32 flags)
unpack() 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)
PL_modglobal is a general purpose, interpreter global HV 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.
HV* PL_modglobal
SvPV 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
SvPV_nolen macro.
STRLEN PL_na
false SV. See PL_sv_yes. Always refer to this as
&PL_sv_no.
SV PL_sv_no
undef SV. Always refer to this as &PL_sv_undef.
SV PL_sv_undef
true SV. See PL_sv_no. Always refer to this as
&PL_sv_yes.
SV PL_sv_yes
SV* GvSV(GV* gv)
name and a defined subroutine or
NULL. The glob lives in the given stash, or in the stashes
accessible via @ISA and UNIVERSAL::.
The argument level should be either 0 or -1. If level==0, as a
side-effect creates a glob with the given name in the given stash
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 "SUPER" token as a postfix of the stash name. The
GV returned from gv_fetchmeth may be a method cache entry, which is not
visible to Perl code. So when calling call_sv, you should not use
the GV directly; instead, you should use the method's CV, which can be
obtained from the GV with the GvCV macro.
GV* gv_fetchmeth(HV* stash, const char* name, STRLEN len, I32 level)
GV* gv_fetchmethod(HV* stash, const char* name)
stash. In fact in the presence of autoloading this may be the
glob for ``AUTOLOAD''. In this case the corresponding variable $AUTOLOAD is
already setup.
The third parameter of gv_fetchmethod_autoload determines whether
AUTOLOAD lookup is performed if the given method is not present: non-zero
means yes, look for AUTOLOAD; zero means no, don't look for AUTOLOAD.
Calling gv_fetchmethod is equivalent to calling gv_fetchmethod_autoload
with a non-zero autoload parameter.
These functions grant "SUPER" 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 ``AUTOLOAD'', since at the later time the call may load a
different subroutine due to $AUTOLOAD changing its value. Use the glob
created via a side effect to do this.
These functions have the same side-effects and as gv_fetchmeth with
level==0. name should be writable if contains ':' or '
''. The warning against passing the GV returned by gv_fetchmeth to
call_sv apply equally to these functions.
GV* gv_fetchmethod_autoload(HV* stash, const char* name, I32 autoload)
For an autoloaded subroutine without a GV, will create a GV even
if level < 0. For an autoloaded subroutine without a stub, GvCV()
of the result may be zero.
GV* gv_fetchmeth_autoload(HV* stash, const char* name, STRLEN len, I32 level)
name should
be a valid UTF-8 string. If create is set then the package will be
created if it does not already exist. If create is not set and the
package does not exist then NULL is returned.
HV* gv_stashpv(const char* name, I32 create)
gv_stashpv.
HV* gv_stashsv(SV* sv, I32 create)
create is set and the
Perl variable does not exist then it will be created. If create is not
set and the variable does not exist then NULL is returned.
NOTE: the perl_ form of this function is deprecated.
HV* get_hv(const char* name, I32 create)
SV* pointer where a char* pointer
is to be expected. (For information only--not to be used).
U32 HeHASH(HE* he)
char* or SV*, depending on the value of
HeKLEN(). Can be assigned to. The HePV() or HeSVKEY() macros are
usually preferable for finding the value of a key.
void* HeKEY(HE* he)
HEf_SVKEY, it indicates the entry
holds an SV* key. Otherwise, holds the actual length of the key. Can
be assigned to. The HePV() macro is usually preferable for finding key
lengths.
STRLEN HeKLEN(HE* he)
char* value, doing any
necessary dereferencing of possibly SV* keys. The length of the string
is placed in len (this is a macro, so do not use &len). If you do
not care about what the length of the key is, you may use the global
variable PL_na, 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 strlen() or similar is not a good way to find
the length of hash keys. This is very similar to the SvPV() macro
described elsewhere in this document.
char* HePV(HE* he, STRLEN len)
SV*, or Nullsv if the hash entry does not
contain an SV* key.
SV* HeSVKEY(HE* he)
SV*. Will create and return a temporary mortal
SV* if the hash entry contains only a char* key.
SV* HeSVKEY_force(HE* he)
SV*, taking care to set the appropriate flags to
indicate the presence of an SV* key, and returns the same
SV*.
SV* HeSVKEY_set(HE* he, SV* sv)
SV*) stored in the hash entry.
SV* HeVAL(HE* he)
SvSTASH, CvSTASH.
char* HvNAME(HV* stash)
void hv_clear(HV* tb)
void hv_clear_placeholders(HV* hb)
klen is the length of the key.
The flags value will normally be zero; if set to G_DISCARD then NULL
will be returned.
SV* hv_delete(HV* tb, const char* key, I32 klen, I32 flags)
flags value will normally be zero;
if set to G_DISCARD then NULL will be returned. hash 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)
klen is the length of the key.
bool hv_exists(HV* tb, const char* key, I32 klen)
hash
can be a valid precomputed hash value, or 0 to ask for it to be
computed.
bool hv_exists_ent(HV* tb, SV* key, U32 hash)
klen is the length of the key. If lval is set then the fetch will be
part of a store. Check that the return value is non-null before
dereferencing it to an SV*.
See Understanding the Magic of Tied Hashes and Arrays in the perlguts manpage for more information on how to use this function on tied hashes.
SV** hv_fetch(HV* tb, const char* key, I32 klen, I32 lval)
hash must be a valid precomputed hash number for the given key, or 0
if you want the function to compute it. IF lval 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 tb 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
store it somewhere.
See Understanding the Magic of Tied Hashes and Arrays in the perlguts manpage for more information on how to use this function on tied hashes.
HE* hv_fetch_ent(HV* tb, SV* key, I32 lval, U32 hash)
HvKEYS(tb)). The return value is
currently only meaningful for hashes without tie magic.
NOTE: Before version 5.004_65, hv_iterinit 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 HvFILL(tb).
I32 hv_iterinit(HV* tb)
hv_iterinit.
char* hv_iterkey(HE* entry, I32* retlen)
SV* from the current position of the hash
iterator. The return value will always be a mortal copy of the key. Also
see hv_iterinit.
SV* hv_iterkeysv(HE* entry)
hv_iterinit.
You may call hv_delete or hv_delete_ent 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 hv_iternext, so you must not discard
your iterator immediately else the entry will leak - call hv_iternext to
trigger the resource deallocation.
HE* hv_iternext(HV* tb)
hv_iternext, hv_iterkey, and hv_iterval in one
operation.
SV* hv_iternextsv(HV* hv, char** key, I32* retlen)
hv_iterinit and hv_iternext.
The flags value will normally be zero; if HV_ITERNEXT_WANTPLACEHOLDERS 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
&Perl_sv_placeholder. Note that the implementation of placeholders and
restricted hashes may change, and the implementation currently is
insufficiently abstracted for any change to be tidy.
NOTE: this function is experimental and may change or be removed without notice.
HE* hv_iternext_flags(HV* tb, I32 flags)
hv_iterkey.
SV* hv_iterval(HV* tb, HE* entry)
sv_magic.
void hv_magic(HV* hv, GV* gv, int how)
SV* hv_scalar(HV* hv)
key and klen is
the length of the key. The hash parameter is the precomputed hash
value; if it is zero then Perl will compute it. The return value will be
NULL 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 SV*. Note that the caller is
responsible for suitably incrementing the reference count of val before
the call, and decrementing it if the function returned NULL. Effectively
a successful hv_store takes ownership of one reference to val. This is
usually what you want; a newly created SV 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 SV, 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 SV for the key, so if your
key data is not already in SV form then use hv_store in preference to
hv_store_ent.
See Understanding the Magic of Tied Hashes and Arrays in the perlguts manpage 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)
val in a hash. The hash key is specified as key. The hash
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
NULL 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 He? macros
described here. Note that the caller is responsible for suitably
incrementing the reference count of val before the call, and
decrementing it if the function returned NULL. Effectively a successful
hv_store_ent takes ownership of one reference to val. This is
usually what you want; a newly created SV 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 SV, and your code doesn't need to do
anything further to tidy up. Note that hv_store_ent only reads the key;
unlike val it does not take ownership of it, so maintaining the correct
reference count on key is entirely the caller's responsibility. hv_store
is not implemented as a call to hv_store_ent, and does not create a temporary
SV for the key, so if your key data is not already in SV form then use
hv_store in preference to hv_store_ent.
See Understanding the Magic of Tied Hashes and Arrays in the perlguts manpage for more information on how to use this function on tied hashes.
HE* hv_store_ent(HV* tb, SV* key, SV* val, U32 hash)
void hv_undef(HV* tb)
HV* newHV()
sv_magic.
int mg_clear(SV* sv)
sv_magic.
int mg_copy(SV* sv, SV* nsv, const char* key, I32 klen)
sv_magic.
MAGIC* mg_find(SV* sv, int type)
sv_magic.
int mg_free(SV* sv)
sv_magic.
int mg_get(SV* sv)
sv_magic.
U32 mg_length(SV* sv)
sv_magic.
void mg_magical(SV* sv)
sv_magic.
int mg_set(SV* sv)
mg_get on an SV if it has 'get' magic. This macro evaluates its
argument more than once.
void SvGETMAGIC(SV* sv)
void SvLOCK(SV* sv)
mg_set on an SV if it has 'set' magic. This macro evaluates its
argument more than once.
void SvSETMAGIC(SV* sv)
SvSetSV, but does any set magic required afterwards.
void SvSetMagicSV(SV* dsb, SV* ssv)
SvSetMagicSV, but does any set magic required afterwards.
void SvSetMagicSV_nosteal(SV* dsv, SV* ssv)
sv_setsv if dsv is not the same as ssv. May evaluate arguments
more than once.
void SvSetSV(SV* dsb, SV* ssv)
sv_setsv if dsv is not the same as
ssv. May evaluate arguments more than once.
void SvSetSV_nosteal(SV* dsv, SV* ssv)
void SvSHARE(SV* sv)
void SvUNLOCK(SV* sv)
memcpy function. The src is the
source, dest is the destination, nitems is the number of items, and type is
the type. May fail on overlapping copies. See also Move.
void Copy(void* src, void* dest, int nitems, type)
memmove function. The src is the
source, dest is the destination, nitems is the number of items, and type is
the type. Can do overlapping moves. See also Copy.
void Move(void* src, void* dest, int nitems, type)
malloc function.
void New(int id, void* ptr, int nitems, type)
malloc function, with
cast.
void Newc(int id, void* ptr, int nitems, type, cast)
malloc function. The allocated
memory is zeroed with memzero.
void Newz(int id, void* ptr, int nitems, type)
void Poison(void* dest, int nitems, type)
realloc function.
void Renew(void* ptr, int nitems, type)
realloc function, with
cast.
void Renewc(void* ptr, int nitems, type, cast)
free function.
void Safefree(void* ptr)
strdup(). Returns a pointer to a newly allocated
string which is a duplicate of pv. The size of the string is
determined by strlen(). The memory allocated for the new string can
be freed with the Safefree() function.
char* savepv(const char* pv)
strndup() would be if it existed. Returns a
pointer to a newly allocated string which is a duplicate of the first
len bytes from pv. The memory allocated for the new string can be
freed with the Safefree() function.
char* savepvn(const char* pv, I32 len)
savepv() which allocates the duplicate string in memory
which is shared between threads.
char* savesharedpv(const char* pv)
void StructCopy(type src, type dest, type)
memzero function. The dest is the
destination, nitems is the number of items, and type is the type.
void Zero(void* dest, int nitems, type)
fbm_instr()
-- the Boyer-Moore algorithm.
void fbm_compile(SV* sv, U32 flags)
str and
strend. It returns Nullch if the string can't be found. The sv
does not have to be fbm_compiled, but the search will not be as fast
then.
char* fbm_instr(unsigned char* big, unsigned char* bigend, SV* littlesv, U32 flags)
(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 are done).
char* form(const char* pat, ...)
int getcwd_sv(SV* sv)
bool strEQ(char* s1, char* s2)
s1, is greater than or equal to
the second, s2. Returns true or false.
bool strGE(char* s1, char* s2)
s1, is greater than the second,
s2. Returns true or false.
bool strGT(char* s1, char* s2)
s1, is less than or equal to the
second, s2. Returns true or false.
bool strLE(char* s1, char* s2)
s1, is less than the second,
s2. Returns true or false.
bool strLT(char* s1, char* s2)
bool strNE(char* s1, char* s2)
len parameter indicates
the number of bytes to compare. Returns true or false. (A wrapper for
strncmp).
bool strnEQ(char* s1, char* s2, STRLEN len)
len parameter
indicates the number of bytes to compare. Returns true or false. (A
wrapper for strncmp).
bool strnNE(char* s1, char* s2, STRLEN len)
void sv_nolocking(SV *)
void sv_nosharing(SV *)
void sv_nounlocking(SV *)
On entry start and *len give the string to scan, *flags gives conversion flags, and result should be NULL or a pointer to an NV. The scan stops at the end of the string, or the first invalid character. On return *len is set to the length scanned string, and *flags gives output flags.
If the value is <= UV_MAX it is returned as a UV, the output flags are clear,
and nothing is written to *result. If the value is > UV_MAX grok_bin
returns UV_MAX, sets PERL_SCAN_GREATER_THAN_UV_MAX in the output flags,
and writes the value to *result (or the value is discarded if result
is NULL).
The hex number may optionally be prefixed with ``0b'' or ``b'' unless
PERL_SCAN_DISALLOW_PREFIX is set in *flags on entry. If
PERL_SCAN_ALLOW_UNDERSCORES is set in *flags then the binary
number may use '_' characters to separate digits.
UV grok_bin(char* start, STRLEN* len, I32* flags, NV *result)
On entry start and *len give the string to scan, *flags gives conversion flags, and result should be NULL or a pointer to an NV. The scan stops at the end of the string, or the first non-hex-digit character. On return *len is set to the length scanned string, and *flags gives output flags.
If the value is <= UV_MAX it is returned as a UV, the output flags are clear,
and nothing is written to *result. If the value is > UV_MAX grok_hex
returns UV_MAX, sets PERL_SCAN_GREATER_THAN_UV_MAX in the output flags,
and writes the value to *result (or the value is discarded if result
is NULL).
The hex number may optionally be prefixed with ``0x'' or ``x'' unless
PERL_SCAN_DISALLOW_PREFIX is set in *flags on entry. If
PERL_SCAN_ALLOW_UNDERSCORES is set in *flags then the hex
number may use '_' characters to separate digits.
UV grok_hex(char* start, STRLEN* len, I32* flags, NV *result)
If the value of the number can fit an in UV, it is returned in the *valuep IS_NUMBER_IN_UV will be set to indicate that *valuep is valid, IS_NUMBER_IN_UV will never be set unless *valuep is valid, but *valuep may have been assigned to during processing even though IS_NUMBER_IN_UV is not set on return. If valuep is NULL, IS_NUMBER_IN_UV will be set for the same cases as when valuep is non-NULL, but no actual assignment (or SEGV) will occur.
IS_NUMBER_NOT_INT will be set with IS_NUMBER_IN_UV if trailing decimals were seen (in which case *valuep gives the true value truncated to an integer), and IS_NUMBER_NEG if the number is negative (in which case *valuep holds the absolute value). IS_NUMBER_IN_UV is not set if e notation was used or the number is larger than a UV.
int grok_number(const char *pv, STRLEN len, UV *valuep)
bool grok_numeric_radix(const char **sp, const char *send)
UV grok_oct(char* start, STRLEN* len, I32* flags, NV *result)
grok_bin instead.
NV scan_bin(char* start, STRLEN len, STRLEN* retlen)
grok_hex instead.
NV scan_hex(char* start, STRLEN len, STRLEN* retlen)
grok_oct instead.
NV scan_oct(char* start, STRLEN len, STRLEN* retlen)
cv is a constant sub eligible for inlining. returns the constant
value returned by the sub. Otherwise, returns NULL.
Constant subs can be created with newCONSTSUB or as described in
Constant Functions in the perlsub manpage.
SV* cv_const_sv(CV* cv)
sub FOO () { 123 } which is
eligible for inlining at compile-time.
CV* newCONSTSUB(HV* stash, char* name, SV* sv)
xsubpp to hook up XSUBs as Perl subs.
SV* pad_sv(PADOFFSET po)
mark, for the XSUB. See MARK and
dORIGMARK.
dMARK;
ORIGMARK.
dORIGMARK;
SP macro. See SP.
dSP;
nitems to be pushed
onto the stack.
void EXTEND(SP, int nitems)
dMARK.
TARG. See also PUSHi, mXPUSHi
and XPUSHi.
void mPUSHi(IV iv)
TARG. See also PUSHn, mXPUSHn
and XPUSHn.
void mPUSHn(NV nv)
len indicates the length of the string. Handles 'set' magic. Does
not use TARG. See also PUSHp, mXPUSHp and XPUSHp.
void mPUSHp(char* str, STRLEN len)
TARG. See also PUSHu,
mXPUSHu and XPUSHu.
void mPUSHu(UV uv)
TARG. See also XPUSHi, mPUSHi and
PUSHi.
void mXPUSHi(IV iv)
TARG. See also XPUSHn, mPUSHn and
PUSHn.
void mXPUSHn(NV nv)
len
indicates the length of the string. Handles 'set' magic. Does not use
TARG. See also XPUSHp, mPUSHp and PUSHp.
void mXPUSHp(char* str, STRLEN len)
TARG. See also XPUSHu, mPUSHu
and PUSHu.
void mXPUSHu(UV uv)
dORIGMARK.
IV POPi
long POPl
NV POPn
char* POPp
char* POPpbytex
char* POPpx
SV* POPs
TARG, so dTARGET or dXSTARG should be
called to declare it. Do not call multiple TARG-oriented macros to
return lists from XSUB's - see mPUSHi instead. See also XPUSHi and
mXPUSHi.
void PUSHi(IV iv)
PUTBACK and
the perlcall manpage.
void PUSHMARK(SP)
TARG. See also
PUSHs, XPUSHmortal and XPUSHs.
void PUSHmortal()
TARG, so dTARGET or dXSTARG should be
called to declare it. Do not call multiple TARG-oriented macros to
return lists from XSUB's - see mPUSHn instead. See also XPUSHn and
mXPUSHn.
void PUSHn(NV nv)
len indicates the length of the string. Handles 'set' magic. Uses
TARG, so dTARGET or dXSTARG should be called to declare it. Do not
call multiple TARG-oriented macros to return lists from XSUB's - see
mPUSHp instead. See also XPUSHp and mXPUSHp.
void PUSHp(char* str, STRLEN len)
TARG. See also PUSHmortal,
XPUSHs and XPUSHmortal.
void PUSHs(SV* sv)
TARG, so dTARGET or dXSTARG
should be called to declare it. Do not call multiple TARG-oriented
macros to return lists from XSUB's - see mPUSHu instead. See also
XPUSHu and mXPUSHu.
void PUSHu(UV uv)
xsubpp.
See PUSHMARK and the perlcall manpage for other uses.
PUTBACK;
xsubpp. See dSP and
SPAGAIN.
SPAGAIN;
TARG, so dTARGET or dXSTARG should be called to
declare it. Do not call multiple TARG-oriented macros to return lists
from XSUB's - see mXPUSHi instead. See also PUSHi and mPUSHi.
void XPUSHi(IV iv)
TARG. See also XPUSHs,
PUSHmortal and PUSHs.
void XPUSHmortal()
TARG, so dTARGET or dXSTARG should be called to
declare it. Do not call multiple TARG-oriented macros to return lists
from XSUB's - see mXPUSHn instead. See also PUSHn and mPUSHn.
void XPUSHn(NV nv)
len
indicates the length of the string. Handles 'set' magic. Uses TARG, so
dTARGET or dXSTARG should be called to declare it. Do not call
multiple TARG-oriented macros to return lists from XSUB's - see
mXPUSHp instead. See also PUSHp and mPUSHp.
void XPUSHp(char* str, STRLEN len)
TARG. See also XPUSHmortal,
PUSHs and PUSHmortal.
void XPUSHs(SV* sv)
TARG, so dTARGET or dXSTARG should be
called to declare it. Do not call multiple TARG-oriented macros to
return lists from XSUB's - see mXPUSHu instead. See also PUSHu and
mPUSHu.
void XPUSHu(UV uv)
xsubpp.
void XSRETURN(int nitems)
XSRETURN_EMPTY;
XST_mIV.
void XSRETURN_IV(IV iv)
&PL_sv_no from an XSUB immediately. Uses XST_mNO.
XSRETURN_NO;
XST_mNV.
void XSRETURN_NV(NV nv)
XST_mPV.
void XSRETURN_PV(char* str)
&PL_sv_undef from an XSUB immediately. Uses XST_mUNDEF.
XSRETURN_UNDEF;
XST_mUV.
void XSRETURN_UV(IV uv)
&PL_sv_yes from an XSUB immediately. Uses XST_mYES.
XSRETURN_YES;
pos on the stack. The
value is stored in a new mortal SV.
void XST_mIV(int pos, IV iv)
&PL_sv_no into the specified position pos on the
stack.
void XST_mNO(int pos)
pos on the stack. The value
is stored in a new mortal SV.
void XST_mNV(int pos, NV nv)
pos on the stack.
The value is stored in a new mortal SV.
void XST_mPV(int pos, char* str)
&PL_sv_undef into the specified position pos on the
stack.
void XST_mUNDEF(int pos)
&PL_sv_yes into the specified position pos on the
stack.
void XST_mYES(int pos)
svtype enum. Test these flags with the SvTYPE macro.
svtype.
svtype.
svtype.
svtype.
svtype.
svtype.
svtype.
create is set and the
Perl variable does not exist then it will be created. If create is not
set and the variable does not exist then NULL is returned.
NOTE: the perl_ form of this function is deprecated.
SV* get_sv(const char* name, I32 create)
Inf and Infinity are treated as numbers (so will not issue a
non-numeric warning), even if your atof() doesn't grok them.
I32 looks_like_number(SV* sv)
SV* newRV_inc(SV* sv)
SV* newRV_noinc(SV *sv)
len parameter indicates the number of
bytes of preallocated string space the SV should have. An extra byte for a
tailing NUL is also reserved. (SvPOK is not set for the SV even if string
space is allocated.) The reference count for the new SV is set to 1.
id is an integer id between 0 and 1299 (used to identify leaks).
SV* NEWSV(int id, STRLEN len)
NEWSV
macro.
SV* newSV(STRLEN len)
SV* newSViv(IV i)
SV* newSVnv(NV n)
len is zero, Perl will compute the length using
strlen(). For efficiency, consider using newSVpvn instead.
SV* newSVpv(const char* s, STRLEN len)
sprintf.
SV* newSVpvf(const char* pat, ...)
len is zero, Perl will create a zero length
string. You are responsible for ensuring that the source string is at least
len bytes long. If the s argument is NULL the new SV will be undefined.
SV* newSVpvn(const char* s, STRLEN len)
hash 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 == HeKEY and
hash lookup will avoid string compare.
SV* newSVpvn_share(const char* s, I32 len, U32 hash)
rv, to point to. If rv is not an RV then
it will be upgraded to one. If classname is non-null then the new SV will
be blessed in the specified package. The new SV is returned and its
reference count is 1.
SV* newSVrv(SV* rv, const char* classname)
sv_setsv).
SV* newSVsv(SV* old)
SV* newSVuv(UV u)
SvLEN.
STRLEN SvCUR(SV* sv)
SvCUR.
void SvCUR_set(SV* sv, STRLEN len)
SvCUR. Access the character as *(SvEND(sv)).
char* SvEND(SV* sv)
sv_grow to perform the expansion if necessary.
Returns a pointer to the character buffer.
char * SvGROW(SV* sv, STRLEN len)
bool SvIOK(SV* sv)
SvIOK.
bool SvIOKp(SV* sv)
bool SvIOK_notUV(SV* sv)
void SvIOK_off(SV* sv)
void SvIOK_on(SV* sv)
void SvIOK_only(SV* sv)
void SvIOK_only_UV(SV* sv)
bool SvIOK_UV(SV* sv)
bool SvIsCOW(SV* sv)
bool SvIsCOW_shared_hash(SV* sv)
SvIVx for a
version which guarantees to evaluate sv only once.
IV SvIV(SV* sv)
SvIV otherwise.
IV SvIVx(SV* sv)
SvIV().
IV SvIVX(SV* sv)
SvOOK. See SvCUR.
STRLEN SvLEN(SV* sv)
bool SvNIOK(SV* sv)
SvNIOK.
bool SvNIOKp(SV* sv)
void SvNIOK_off(SV* sv)
bool SvNOK(SV* sv)
SvNOK.
bool SvNOKp(SV* sv)
void SvNOK_off(SV* sv)
void SvNOK_on(SV* sv)
void SvNOK_only(SV* sv)
SvNVx for a version
which guarantees to evaluate sv only once.
NV SvNV(SV* sv)
SvNV otherwise.
NV SvNVx(SV* sv)
SvNV().
NV SvNVX(SV* sv)
bool SvOK(SV* sv)
bool SvOOK(SV* sv)
bool SvPOK(SV* sv)
SvPOK.
bool SvPOKp(SV* sv)
void SvPOK_off(SV* sv)
void SvPOK_on(SV* sv)
void SvPOK_only(SV* sv)
void SvPOK_only_UTF8(SV* sv)
SvPOK. Handles 'get' magic. See also
SvPVx for a version which guarantees to evaluate sv only once.
char* SvPV(SV* sv, STRLEN len)
SvPV, but converts sv to byte representation first if necessary.
char* SvPVbyte(SV* sv, STRLEN len)
SvPV, but converts sv to byte representation first if necessary.
Guarantees to evaluate sv only once; use the more efficient SvPVbyte
otherwise.
char* SvPVbytex(SV* sv, STRLEN len)
SvPV_force, but converts sv to byte representation first if necessary.
Guarantees to evaluate sv only once; use the more efficient SvPVbyte_force
otherwise.
char* SvPVbytex_force(SV* sv, STRLEN len)
SvPV_force, but converts sv to byte representation first if necessary.
char* SvPVbyte_force(SV* sv, STRLEN len)
SvPV_nolen, but converts sv to byte representation first if necessary.
char* SvPVbyte_nolen(SV* sv)
SvPV, but converts sv to utf8 first if necessary.
char* SvPVutf8(SV* sv, STRLEN len)
SvPV, but converts sv to utf8 first if necessary.
Guarantees to evaluate sv only once; use the more efficient SvPVutf8
otherwise.
char* SvPVutf8x(SV* sv, STRLEN len)
SvPV_force, but converts sv to utf8 first if necessary.
Guarantees to evaluate sv only once; use the more efficient SvPVutf8_force
otherwise.
char* SvPVutf8x_force(SV* sv, STRLEN len)
SvPV_force, but converts sv to utf8 first if necessary.
char* SvPVutf8_force(SV* sv, STRLEN len)
SvPV_nolen, but converts sv to utf8 first if necessary.
char* SvPVutf8_nolen(SV* sv)
char* SvPVX(SV* sv)
SvPV which guarantees to evaluate sv only once.
char* SvPVx(SV* sv, STRLEN len)
SvPV but will force the SV into containing just a string
(SvPOK_only). You want force if you are going to update the SvPVX
directly.
char* SvPV_force(SV* sv, STRLEN len)
SvPV but will force the SV into containing just a string
(SvPOK_only). You want force if you are going to update the SvPVX
directly. Doesn't process magic.
char* SvPV_force_nomg(SV* sv, STRLEN len)
SvPOK. Handles 'get' magic.
char* SvPV_nolen(SV* sv)
U32 SvREFCNT(SV* sv)
void SvREFCNT_dec(SV* sv)
SV* SvREFCNT_inc(SV* sv)
bool SvROK(SV* sv)
void SvROK_off(SV* sv)
void SvROK_on(SV* sv)
SV* SvRV(SV* sv)
HV* SvSTASH(SV* sv)
void SvTAINT(SV* sv)
bool SvTAINTED(SV* sv)
void SvTAINTED_off(SV* sv)
void SvTAINTED_on(SV* sv)
bool SvTRUE(SV* sv)
svtype.
svtype SvTYPE(SV* sv)
void SvUOK(SV* sv)
sv_upgrade to
perform the upgrade if necessary. See svtype.
void SvUPGRADE(SV* sv, svtype type)
bool SvUTF8(SV* sv)
void SvUTF8_off(SV *sv)
void SvUTF8_on(SV *sv)
SvUVx
for a version which guarantees to evaluate sv only once.
UV SvUV(SV* sv)
SvUV otherwise.
UV SvUVx(SV* sv)
SvUV().
UV SvUVX(SV* sv)
sv_true() or its macro equivalent.
bool sv_2bool(SV* sv)
*st and *gvp to the stash and GV associated with it.
CV* sv_2cv(SV* sv, HV** st, GV** gvp, I32 lref)
IO* sv_2io(SV* sv)
SvIV(sv) and SvIVx(sv) macros.
IV sv_2iv(SV* sv)
sv_newmortal and sv_mortalcopy.
SV* sv_2mortal(SV* sv)
SvNV(sv) and SvNVx(sv)
macros.
NV sv_2nv(SV* sv)
Usually accessed via the SvPVbyte macro.
char* sv_2pvbyte(SV* sv, STRLEN* lp)
Usually accessed via the SvPVbyte_nolen macro.
char* sv_2pvbyte_nolen(SV* sv)
Usually accessed via the SvPVutf8 macro.
char* sv_2pvutf8(SV* sv, STRLEN* lp)
Usually accessed via the SvPVutf8_nolen macro.
char* sv_2pvutf8_nolen(SV* sv)
mg_get() first. Coerces sv to a string
if necessary.
Normally invoked via the SvPV_flags macro. sv_2pv() and sv_2pv_nomg
usually end up here too.
char* sv_2pv_flags(SV* sv, STRLEN* lp, I32 flags)
sv_2pv(), but doesn't return the length too. You should usually
use the macro wrapper SvPV_nolen(sv) instead.
char* sv_2pv_nolen(SV* sv)
SvUV(sv) and SvUVx(sv)
macros.
UV sv_2uv(SV* sv)
SvOOK_off macro
wrapper instead.
int sv_backoff(SV* sv)
gv_stashpv()). The reference count
of the SV is unaffected.
SV* sv_bless(SV* sv, HV* stash)
sv_catpv_mg.
void sv_catpv(SV* sv, const char* ptr)
sprintf and appends the formatted
output to an SV. If the appended data contains ``wide'' characters
(including, but not limited to, SVs with a UTF-8 PV formatted with %s,
and characters >255 formatted with %c), the original SV might get
upgraded to UTF-8. Handles 'get' magic, but not 'set' magic.
SvSETMAGIC() must typically be called after calling this function
to handle 'set' magic.
void sv_catpvf(SV* sv, const char* pat, ...)
sv_catpvf, but also handles 'set' magic.
void sv_catpvf_mg(SV *sv, const char* pat, ...)
len indicates number of bytes to copy. If the SV has the UTF-8
status set, then the bytes appended should be valid UTF-8.
Handles 'get' magic, but not 'set' magic. See sv_catpvn_mg.
void sv_catpvn(SV* sv, const char* ptr, STRLEN len)
len indicates number of bytes to copy. If the SV has the UTF-8
status set, then the bytes appended should be valid UTF-8.
If flags has SV_GMAGIC bit set, will mg_get on dsv if
appropriate, else not. sv_catpvn and sv_catpvn_nomg are implemented
in terms of this function.
void sv_catpvn_flags(SV* sv, const char* ptr, STRLEN len, I32 flags)
sv_catpvn, but also handles 'set' magic.
void sv_catpvn_mg(SV *sv, const char *ptr, STRLEN len)
sv_catpv, but also handles 'set' magic.
void sv_catpv_mg(SV *sv, const char *ptr)
ssv onto the end of the string in
SV dsv. Modifies dsv but not ssv. Handles 'get' magic, but
not 'set' magic. See sv_catsv_mg.
void sv_catsv(SV* dsv, SV* ssv)
ssv onto the end of the string in
SV dsv. Modifies dsv but not ssv. If flags has SV_GMAGIC
bit set, will mg_get on the SVs if appropriate, else not. sv_catsv
and sv_catsv_nomg are implemented in terms of this function.
void sv_catsv_flags(SV* dsv, SV* ssv, I32 flags)
sv_catsv, but also handles 'set' magic.
void sv_catsv_mg(SV *dstr, SV *sstr)
SvPOK(sv) must be true and the ptr must be a pointer to somewhere inside
the string buffer. The ptr becomes the first character of the adjusted
string. Uses the ``OOK hack''.
Beware: after this function returns, ptr and SvPVX(sv) may no longer
refer to the same chunk of data.
void sv_chop(SV* sv, char* ptr)
sv_free() (or its macro wrapper SvREFCNT_dec)
instead.
void sv_clear(SV* sv)
sv1 is less than, equal to, or greater than the string in
sv2. Is UTF-8 and 'use bytes' aware, handles get magic, and will
coerce its args to strings if necessary. See also sv_cmp_locale.
I32 sv_cmp(SV* sv1, SV* sv2)
sv_cmp_locale. See also sv_cmp.
I32 sv_cmp_locale(SV* sv1, SV* sv2)
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 settings.
char* sv_collxfrm(SV* sv, STRLEN* nxp)
void sv_copypv(SV* dsv, SV* ssv)
void sv_dec(SV* sv)
UNIVERSAL::isa. It works
for class names as well as for objects.
bool sv_derived_from(SV* sv, const char* name)
I32 sv_eq(SV* sv1, SV* sv2)
sv_force_normal_flags.
void sv_force_normal(SV *sv)
flags parameter gets passed to sv_unref_flags()
when unrefing. sv_force_normal calls this function with flags set to 0.
void sv_force_normal_flags(SV *sv, U32 flags)
sv_clear to invoke destructors and free up any memory used by
the body; finally, deallocate the SV's head itself.
Normally called via a wrapper macro SvREFCNT_dec.
void sv_free(SV* sv)
char* sv_gets(SV* sv, PerlIO* fp, I32 append)
sv_unref and
upgrades the SV to SVt_PV. Returns a pointer to the character buffer.
Use the SvGROW wrapper instead.
char* sv_grow(SV* sv, STRLEN newlen)
void sv_inc(SV* sv)
substr() function.
void sv_insert(SV* bigsv, STRLEN offset, STRLEN len, char* little, STRLEN littlelen)
sv_derived_from to verify
an inheritance relationship.
int sv_isa(SV* sv, const char* name)
int sv_isobject(SV* sv)
SvIVx macro for compilers which can't
cope with complex macro expressions. Always use the macro instead.
IV sv_iv(SV* sv)
SvCUR, which gives raw access to the xpv_cur slot.
STRLEN sv_len(SV* sv)
STRLEN sv_len_utf8(SV* sv)
sv to type SVt_PVMG if necessary,
then adds a new magic item of type how to the head of the magic list.
void sv_magic(SV* sv, SV* obj, int how, const char* name, I32 namlen)
Note that sv_magicext will allow things that sv_magic will not. In particular you can add magic to SvREADONLY SVs and and more than one instance of the same 'how'
I namelen is greater then zero then a savepvn() copy of name is stored,
if namelen is zero then name is stored as-is and - as another special
case - if (name && namelen == HEf_SVKEY) then name is assumed to contain
an SV* and has its REFCNT incremented
(This is now used as a subroutine by sv_magic.)
MAGIC * sv_magicext(SV* sv, SV* obj, int how, MGVTBL *vtbl, const char* name, I32 namlen )
sv_setsv).
The new SV is marked as mortal. It will be destroyed ``soon'', either by an
explicit call to FREETMPS, or by an implicit call at places such as
statement boundaries. See also sv_newmortal and sv_2mortal.
SV* sv_mortalcopy(SV* oldsv)
sv_mortalcopy and sv_2mortal.
SV* sv_newmortal()
SvREFCNT_inc() wrapper
instead.
SV* sv_newref(SV* sv)
SvNVx macro for compilers which can't
cope with complex macro expressions. Always use the macro instead.
NV sv_nv(SV* sv)
void sv_pos_b2u(SV* sv, I32* offsetp)
void sv_pos_u2b(SV* sv, I32* offsetp, I32* lenp)
SvPV_nolen macro instead
char* sv_pv(SV *sv)
SvPVbyte_nolen instead.
char* sv_pvbyte(SV *sv)
SvPVbyte macro for compilers
which can't cope with complex macro expressions. Always use the macro
instead.
char* sv_pvbyten(SV *sv, STRLEN *len)
SvPVbytex_force macro for compilers
which can't cope with complex macro expressions. Always use the macro
instead.
char* sv_pvbyten_force(SV* sv, STRLEN* lp)
SvPV macro for compilers which can't
cope with complex macro expressions. Always use the macro instead.
char* sv_pvn(SV *sv, STRLEN *len)
SvPV_force macro for compilers which
can't cope with complex macro expressions. Always use the macro instead.
char* sv_pvn_force(SV* sv, STRLEN* lp)
flags has SV_GMAGIC bit set, will mg_get on sv if
appropriate, else not. sv_pvn_force and sv_pvn_force_nomg are
implemented in terms of this function.
You normally want to use the various wrapper macros instead: see
SvPV_force and SvPV_force_nomg
char* sv_pvn_force_flags(SV* sv, STRLEN* lp, I32 flags)
SvPVutf8_nolen macro instead
char* sv_pvutf8(SV *sv)
SvPVutf8 macro for compilers
which can't cope with complex macro expressions. Always use the macro
instead.
char* sv_pvutf8n(SV *sv, STRLEN *len)
SvPVutf8_force macro for compilers
which can't cope with complex macro expressions. Always use the macro
instead.
char* sv_pvutf8n_force(SV* sv, STRLEN* lp)
char* sv_reftype(SV* sv, int ob)
sv_setsv or one of its many macro front-ends.
void sv_replace(SV* sv, SV* nsv)
void sv_report_used()
reset Perl function.
Note that the perl-level function is vaguely deprecated.
void sv_reset(char* s, HV* stash)
SvWEAKREF flag on this RV; give the
referred-to SV PERL_MAGIC_backref magic if it hasn't already; and
push a back-reference to this RV onto the array of backreferences
associated with that magic.
SV* sv_rvweaken(SV *sv)
sv_setiv_mg.
void sv_setiv(SV* sv, IV num)
sv_setiv, but also handles 'set' magic.
void sv_setiv_mg(SV *sv, IV i)
sv_setnv_mg.
void sv_setnv(SV* sv, NV num)
sv_setnv, but also handles 'set' magic.
void sv_setnv_mg(SV *sv, NV num)
sv_setpv_mg.
void sv_setpv(SV* sv, const char* ptr)
sprintf and sets an SV to the formatted
output. Does not handle 'set' magic. See sv_setpvf_mg.
void sv_setpvf(SV* sv, const char* pat, ...)
sv_setpvf, but also handles 'set' magic.
void sv_setpvf_mg(SV *sv, const char* pat, ...)
sv_setpviv_mg.
void sv_setpviv(SV* sv, IV num)
sv_setpviv, but also handles 'set' magic.
void sv_setpviv_mg(SV *sv, IV iv)
len parameter indicates the number of
bytes to be copied. If the ptr argument is NULL the SV will become
undefined. Does not handle 'set' magic. See sv_setpvn_mg.
void sv_setpvn(SV* sv, const char* ptr, STRLEN len)
sv_setpvn, but also handles 'set' magic.
void sv_setpvn_mg(SV *sv, const char *ptr, STRLEN len)
sv_setpv, but also handles 'set' magic.
void sv_setpv_mg(SV *sv, const char *ptr)
rv
argument will be upgraded to an RV. That RV will be modified to point to
the new SV. The classname argument indicates the package for the
blessing. Set classname to Nullch to avoid the blessing. The new SV
will have a reference count of 1, and the RV will be returned.
SV* sv_setref_iv(SV* rv, const char* classname, IV iv)
rv
argument will be upgraded to an RV. That RV will be modified to point to
the new SV. The classname argument indicates the package for the
blessing. Set classname to Nullch to avoid the blessing. The new SV
will have a reference count of 1, and the RV will be returned.
SV* sv_setref_nv(SV* rv, const char* classname, NV nv)
rv
argument will be upgraded to an RV. That RV will be modified to point to
the new SV. If the pv argument is NULL then PL_sv_undef will be placed
into the SV. The classname argument indicates the package for the
blessing. Set classname to Nullch to avoid the blessing. The new SV
will have a reference count of 1, and the RV will be returned.
Do not use with other Perl types such as HV, AV, SV, CV, because those objects will become corrupted by the pointer copy process.
Note that sv_setref_pvn copies the string while this copies the pointer.
SV* sv_setref_pv(SV* rv, const char* classname, void* pv)
n. The rv argument will be upgraded to
an RV. That RV will be modified to point to the new SV. The classname
argument indicates the package for the blessing. Set classname to
Nullch to avoid the blessing. The new SV will have a reference count
of 1, and the RV will be returned.
Note that sv_setref_pv copies the pointer while this copies the string.
SV* sv_setref_pvn(SV* rv, const char* classname, char* pv, STRLEN n)
rv
argument will be upgraded to an RV. That RV will be modified to point to
the new SV. The classname argument indicates the package for the
blessing. Set classname to Nullch to avoid the blessing. The new SV
will have a reference count of 1, and the RV will be returned.
SV* sv_setref_uv(SV* rv, const char* classname, UV uv)
ssv into the destination SV
dsv. The source SV may be destroyed if it is mortal, so don't use this
function if the source SV 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
SvSetSV, SvSetSV_nosteal, SvSetMagicSV and
SvSetMagicSV_nosteal.
void sv_setsv(SV* dsv, SV* ssv)
ssv into the destination SV
dsv. The source SV may be destroyed if it is mortal, so don't use this
function if the source SV 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 flags parameter has the SV_GMAGIC bit set, will mg_get on
ssv if appropriate, else not. sv_setsv and sv_setsv_nomg are
implemented in terms of this function.
You probably want to use one of the assortment of wrappers, such as
SvSetSV, SvSetSV_nosteal, SvSetMagicSV and
SvSetMagicSV_nosteal.
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)
sv_setsv, but also handles 'set' magic.
void sv_setsv_mg(SV *dstr, SV *sstr)
sv_setuv_mg.
void sv_setuv(SV* sv, UV num)
sv_setuv, but also handles 'set' magic.
void sv_setuv_mg(SV *sv, UV u)
Taint an SV. Use SvTAINTED_on instead.
| ||
| void | sv_taint(SV* sv) |
Test an SV for taintedness. Use SvTAINTED instead.
| ||
| bool | sv_tainted(SV* sv) |
SvTRUE macro instead, which may call sv_true() or may
instead use an in-line version.
I32 sv_true(SV *sv)
type from an SV.
int sv_unmagic(SV* sv, int type)
newSVrv. This is sv_unref_flags with the flag
being zero. See SvROK_off.
void sv_unref(SV* sv)
newSVrv. The cflags argument can contain
SV_IMMEDIATE_UNREF 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 SV).
See SvROK_off.
void sv_unref_flags(SV* sv, U32 flags)
Untaint an SV. Use SvTAINTED_off instead.
| ||
| void | sv_untaint(SV* sv) |
SvUPGRADE macro wrapper. See also svtype.
bool sv_upgrade(SV* sv, U32 mt)
ptr to find its string value. Normally the string is
stored inside the SV but sv_usepvn allows the SV to use an outside string.
The ptr should point to memory that was allocated by malloc. The
string length, len, must be supplied. This function will realloc the
memory pointed to by ptr, so that pointer should not be freed or used by
the programmer after giving it to sv_usepvn. Does not handle 'set' magic.
See sv_usepvn_mg.
void sv_usepvn(SV* sv, char* ptr, STRLEN len)
sv_usepvn, but also handles 'set' magic.
void sv_usepvn_mg(SV *sv, char *ptr, STRLEN len)
SvUTF8 flag is turned on
so that it looks like a character. If the PV contains only single-byte
characters, the SvUTF8 flag stays being off.
Scans PV for validity and returns false if the PV is invalid UTF-8.
NOTE: this function is experimental and may change or be removed without notice.
bool sv_utf8_decode(SV *sv)
fail_ok is not
true, croaks.
This is not as a general purpose Unicode to byte encoding interface: use the Encode extension for that.
NOTE: this function is experimental and may change or be removed without notice.
bool sv_utf8_downgrade(SV *sv, bool fail_ok)
SvUTF8
flag off so that it looks like octets again.
void sv_utf8_encode(SV *sv)
This is not as a general purpose byte encoding to Unicode interface: use the Encode extension for that.
STRLEN sv_utf8_upgrade(SV *sv)
flags has SV_GMAGIC bit set,
will mg_get on sv if appropriate, else not. sv_utf8_upgrade and
sv_utf8_upgrade_nomg 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)
SvUVx macro for compilers which can't
cope with complex macro expressions. Always use the macro instead.
UV sv_uv(SV* sv)
vsprintf and appends the formatted output
to an SV. Uses an array of SVs if the C style variable argument list is
missing (NULL). When running with taint checks enabled, indicates via
maybe_tainted if results are untrustworthy (often due to the use of
locales).
Usually used via one of its frontends sv_catpvf and sv_catpvf_mg.
void sv_vcatpvfn(SV* sv, const char* pat, STRLEN patlen, va_list* args, SV** svargs, I32 svmax, bool *maybe_tainted)
vcatpvfn but copies the text into the SV instead of
appending it.
Usually used via one of its frontends sv_setpvf and sv_setpvf_mg.
void sv_vsetpvfn(SV* sv, const char* pat, STRLEN patlen, va_list* args, SV** svargs, I32 svmax, bool *maybe_tainted)
s of length len from UTF-8 into byte encoding.
Unlike <utf8_to_bytes> but like bytes_to_utf8, returns a pointer to
the newly-created string, and updates len to contain the new
length. Returns the original string if no conversion occurs, len
is unchanged. Do nothing if is_utf8 points to 0. Sets is_utf8 to
0 if s is converted or contains all 7bit characters.
NOTE: this function is experimental and may change or be removed without notice.
U8* bytes_from_utf8(U8 *s, STRLEN *len, bool *is_utf8)
s of length len from ASCII into UTF-8 encoding.
Returns a pointer to the newly-created string, and sets len to
reflect the new length.
If you want to convert to UTF-8 from other encodings than ASCII, see sv_recode_to_utf8().
NOTE: this function is experimental and may change or be removed without notice.
U8* bytes_to_utf8(U8 *s, STRLEN *len)
If the pe1 and pe2 are non-NULL, the scanning pointers will be copied in there (they will point at the beginning of the next character). If the pointers behind pe1 or pe2 are non-NULL, they are the end pointers beyond which scanning will not continue under any circustances. 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 a match to succeed).
For case-insensitiveness, the ``casefolding'' 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)
STRLEN is_utf8_char(U8 *p)
len bytes of the given string form a valid
UTF-8 string, false otherwise. Note that 'a valid UTF-8 string' does
not mean 'a string that contains code points above 0x7F encoded in UTF-8'
because a valid ASCII string is a valid UTF-8 string.
bool is_utf8_string(U8 *s, STRLEN len)
bool is_utf8_string_loc(U8 *s, STRLEN len, U8 **p)
The flags argument can have UNI_DISPLAY_ISPRINT set to display isPRINT()able characters as themselves, UNI_DISPLAY_BACKSLASH to display the \\[nrfta\\] as the backslashed versions (like '\n') (UNI_DISPLAY_BACKSLASH is preferred over UNI_DISPLAY_ISPRINT for \\). UNI_DISPLAY_QQ (and its alias UNI_DISPLAY_REGEX) have both UNI_DISPLAY_BACKSLASH and UNI_DISPLAY_ISPRINT turned on.
The pointer to the PV of the dsv is returned.
char* pv_uni_display(SV *dsv, U8 *spv, STRLEN len, STRLEN pvlim, UV flags)
Returns TRUE if the terminator was found, else returns FALSE.
bool sv_cat_decode(SV* dsv, SV *encoding, SV *ssv, int *offset, char* tstr, int tlen)
If the sv already is UTF-8 (or if it is not POK), or if the encoding
is not a reference, nothing is done to the sv. If the encoding is not
an Encode::XS Encoding object, bad things will happen.
(See lib/encoding.pm and the Encode manpage).
The PV of the sv is returned.
char* sv_recode_to_utf8(SV* sv, SV *encoding)
The flags argument is as in pv_uni_display().
The pointer to the PV of the dsv is returned.
char* sv_uni_display(SV *dsv, SV *ssv, STRLEN pvlim, UV flags)
The ``ustrp'' is a pointer to the character buffer to put the conversion result to. The ``lenp'' is a pointer to the length of the result.
The ``swashp'' is a pointer to the swash to use.
Both the special and normal mappings are stored lib/unicore/To/Foo.pl, and loaded by SWASHGET, using lib/utf8_heavy.pl. The special (usually, but not always, a multicharacter mapping), is tried first.
The ``special'' is a string like ``utf8::ToSpecLower'', which means the hash %utf8::ToSpecLower. The access to the hash is through Perl_to_utf8_case().
The ``normal'' is a string like ``ToLower'' which means the swash %utf8::ToLower.
UV to_utf8_case(U8 *p, U8* ustrp, STRLEN *lenp, SV **swash, char *normal, char *special)
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)
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)
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)
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)
s
which is assumed to be in UTF-8 encoding; retlen 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)
s
which is assumed to be in UTF-8 encoding and no longer than curlen;
retlen will be set to the length, in bytes, of that character.
If s does not point to a well-formed UTF-8 character, the behaviour
is dependent on the value of flags: if it contains UTF8_CHECK_ONLY,
it is assumed that the caller will raise a warning, and this function
will silently just set retlen to -1 and return zero. If the
flags does not contain UTF8_CHECK_ONLY, warnings about
malformations will be given, retlen will be set to the expected
length of the UTF-8 character in bytes, and zero will be returned.
The flags can also contain various flags to allow deviations from
the strict UTF-8 encoding (see utf8.h).
Most code should use utf8_to_uvchr() rather than call this directly.
UV utf8n_to_uvuni(U8 *s, STRLEN curlen, STRLEN* retlen, U32 flags)
a
and b.
WARNING: use only if you *know* that the pointers point inside the same UTF-8 buffer.
IV utf8_distance(U8 *a, U8 *b)
s displaced by off characters, either
forward or backward.
WARNING: do not use the following unless you *know* off is within
the UTF-8 data pointed to by s *and* that on entry s is aligned
on the first byte of character or just after the last byte of a character.
U8* utf8_hop(U8 *s, I32 off)
s in characters.
Stops at e (inclusive). If e < s or if the scan would end
up past e, croaks.
STRLEN utf8_length(U8* s, U8 *e)
s of length len from UTF-8 into byte encoding.
Unlike bytes_to_utf8, this over-writes the original string, and
updates len to contain the new length.
Returns zero on failure, setting len to -1.
NOTE: this function is experimental and may change or be removed without notice.
U8* utf8_to_bytes(U8 *s, STRLEN *len)
s
which is assumed to be in UTF-8 encoding; retlen will be set to the
length, in bytes, of that character.
If s does not point to a well-formed UTF-8 character, zero is
returned and retlen is set, if possible, to -1.
UV utf8_to_uvchr(U8 *s, STRLEN* retlen)
s
which is assumed to be in UTF-8 encoding; retlen will be set to the
length, in bytes, of that character.
This function should only be used when returned UV is considered an index into the Unicode semantic tables (e.g. swashes).
If s does not point to a well-formed UTF-8 character, zero is
returned and retlen is set, if possible, to -1.
UV utf8_to_uvuni(U8 *s, STRLEN* retlen)
uv to the end
of the string d; d should be have at least UTF8_MAXLEN+1 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
*(d++) = uv;
U8* uvchr_to_utf8(U8 *d, UV uv)
uv to the end
of the string d; d should be have at least UTF8_MAXLEN+1 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);
or, in most cases,
d = uvuni_to_utf8(d, uv);
(which is equivalent to)
d = uvuni_to_utf8_flags(d, uv, 0);
is the recommended Unicode-aware way of saying
*(d++) = uv;
U8* uvuni_to_utf8_flags(U8 *d, UV uv, UV flags)
xsubpp and xsubpp internal functionsxsubpp to indicate the stack base offset,
used by the ST, XSprePUSH and XSRETURN macros. The dMARK macro
must be called prior to setup the MARK variable.
I32 ax
xsubpp to indicate the
class name for a C++ XS constructor. This is always a char*. See THIS.
char* CLASS
ax variable.
This is usually handled automatically by xsubpp by calling dXSARGS.
dAX;
items variable.
This is usually handled automatically by xsubpp by calling dXSARGS.
dITEMS;
ax and items variables by calling dAX and dITEMS.
This is usually handled automatically by xsubpp.
dXSARGS;
ix variable for an XSUB which has aliases. This is usually
handled automatically by xsubpp.
dXSI32;
xsubpp to indicate the number of
items on the stack. See Variable-length Parameter Lists in the perlxs manpage.
I32 items
xsubpp to indicate which of an
XSUB's aliases was used to invoke it. See The ALIAS: Keyword in the perlxs manpage.
I32 ix
xsubpp to hook up XSUBs as Perl subs. Adds Perl prototypes to
the subs.
xsubpp to hold the return value for an
XSUB. This is always the proper type for the XSUB. See
The RETVAL Variable in the perlxs manpage.
(whatever) RETVAL
SV* ST(int ix)
xsubpp to designate the object in a C++
XSUB. This is always the proper type for the C++ object. See CLASS and
Using XS With C++ in the perlxs manpage.
(whatever) THIS
xsubpp.
ExtUtils::MakeMaker. See XS_VERSION_BOOTCHECK.
XS_VERSION variable. This is usually handled automatically by
xsubpp. See The VERSIONCHECK: Keyword in the perlxs manpage.
XS_VERSION_BOOTCHECK;
die function.
Normally call this function the same way you call the C printf
function. Calling croak returns control directly to Perl,
sidestepping the normal C order of execution. See warn.
If you want to throw an exception object, assign the object to
$@ and then pass Nullch to croak():
errsv = get_sv("@", TRUE);
sv_setsv(errsv, exception_object);
croak(Nullch);
void croak(const char* pat, ...)
warn function. Call this
function the same way you call the C printf function. See croak.
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.
API Listing originally by Dean Roehrich <roehrich@cray.com>.
Updated to be autogenerated from comments in the source by Benjamin Stuhl.
perlguts(1), perlxs(1), perlxstut(1), perlintern(1)
| perlapi - autogenerated documentation for the perl public API |