Result:
found more than 1151 distributions - search limited to the first 2001 files matching your query
( run in 4.020 )
Filesys-DfPortable
view release on metacpan or search on metacpan
void
_dfportable(dir)
char *dir
PREINIT:
Statfs st;
PPCODE:
EXTEND(sp, 7);
#ifdef DFPORTABLE_SOLARIS
if(statfs(dir, &st, 0, 0) == 0) {
#else
if(statfs(dir, &st) == 0) {
Filesys-Fuse3
view release on metacpan or search on metacpan
OUTPUT:
RETVAL
void
fuse_version()
PPCODE:
int gimme = GIMME_V;
if (gimme == G_SCALAR)
XPUSHs(sv_2mortal(newSVpvf("%d.%d", FUSE_MAJOR_VERSION, FUSE_MINOR_VERSION)));
else if (gimme == G_ARRAY) {
#ifdef FUSE_FOUND_MICRO_VER
Filesys-SamFS
view release on metacpan or search on metacpan
char *path
PREINIT:
struct sam_stat statbuf;
int retval;
int i;
PPCODE:
retval = sam_stat(path, &statbuf, sizeof statbuf);
if (retval == 0) {
EXTEND(SP, 22+MAX_ARCHIVE);
/* 0 */ PUSHs(sv_2mortal(newSViv(statbuf.st_dev)));
/* 1 */ PUSHs(sv_2mortal(newSViv(statbuf.st_ino)));
char *path
PREINIT:
struct sam_stat statbuf;
int retval;
int i;
PPCODE:
retval = sam_lstat(path, &statbuf, sizeof statbuf);
if (retval == 0) {
EXTEND(SP, 22+MAX_ARCHIVE);
/* 0 */ PUSHs(sv_2mortal(newSViv(statbuf.st_dev)));
/* 1 */ PUSHs(sv_2mortal(newSViv(statbuf.st_ino)));
PREINIT:
struct sam_stat statbuf;
int retval;
int i;
AV *copies;
PPCODE:
retval = sam_stat(path, &statbuf, sizeof statbuf);
if (retval == 0) {
EXTEND(SP, 29);
/* 0 */ PUSHs(sv_2mortal(newSViv(statbuf.st_dev)));
/* 1 */ PUSHs(sv_2mortal(newSViv(statbuf.st_ino)));
PREINIT:
struct sam_stat statbuf;
int retval;
int i;
AV *copies;
PPCODE:
retval = sam_lstat(path, &statbuf, sizeof statbuf);
if (retval == 0) {
EXTEND(SP, 29);
/* 0 */ PUSHs(sv_2mortal(newSViv(statbuf.st_dev)));
/* 1 */ PUSHs(sv_2mortal(newSViv(statbuf.st_ino)));
#define CAST
#endif
struct sam_vsn_stat statbuf;
int retval;
int i;
PPCODE:
retval = sam_vsn_stat(path, copy, CAST &statbuf, sizeof statbuf);
if (retval == 0) {
EXTEND(SP, MAX_VSNS);
for (i=0; i<MAX_VSNS; i++) {
AV *av = newAV();
int copy
PREINIT:
struct sam_section statbuf;
int retval;
int i;
PPCODE:
retval = sam_vsn_stat(path, copy, &statbuf, sizeof statbuf);
if (retval == 0) {
EXTEND(SP, 1);
AV *av = newAV();
av_extend(av, 4);
int segment_index
PREINIT:
struct sam_section statbuf;
int retval;
int i;
PPCODE:
retval = sam_segment_vsn_stat(path, copy, segment_index, &statbuf, sizeof statbuf);
if (retval == 0) {
EXTEND(SP, 1);
AV *av = newAV();
av_extend(av, 4);
struct sam_stat file_info;
struct sam_stat *data_seg_info_ptr;
int number_of_data_segments;
int retval;
int i;
PPCODE:
retval = sam_stat(path, &file_info, sizeof file_info);
if (retval == 0) {
if (SS_ISSEGMENT_F(file_info.attr)) {
number_of_data_segments = NUM_SEGS(&file_info);
Newxz(data_seg_info_ptr, number_of_data_segments,
struct sam_stat file_info;
struct sam_stat *data_seg_info_ptr;
int number_of_data_segments;
int retval;
int i;
PPCODE:
retval = sam_lstat(path, &file_info, sizeof file_info);
if (retval == 0) {
if (SS_ISSEGMENT_F(file_info.attr)) {
number_of_data_segments = NUM_SEGS(&file_info);
Newxz(data_seg_info_ptr, number_of_data_segments,
sam_devstat(eq)
int eq
PREINIT:
struct sam_devstat statbuf;
int retval;
PPCODE:
retval = sam_devstat(eq, &statbuf, sizeof statbuf);
if (retval == 0) {
EXTEND(SP, 7);
/* 0 */ PUSHs(sv_2mortal(newSViv(statbuf.type)));
/* 1 */ PUSHs(sv_2mortal(newSVpv(statbuf.name, 0)));
sam_ndevstat(eq)
int eq
PREINIT:
struct sam_ndevstat statbuf;
int retval;
PPCODE:
retval = sam_ndevstat(eq, &statbuf, sizeof statbuf);
if (retval == 0) {
EXTEND(SP, 7);
/* 0 */ PUSHs(sv_2mortal(newSViv(statbuf.type)));
/* 1 */ PUSHs(sv_2mortal(newSVpv(statbuf.name, 0)));
sam_opencat(path)
char * path
PREINIT:
struct sam_cat_tbl catbuf;
int retval;
PPCODE:
retval = sam_opencat(path, &catbuf, sizeof catbuf);
if (retval >= 0) {
EXTEND(SP, 4);
/* 0 */ PUSHs(sv_2mortal(newSViv(retval)));
/* 1 */ PUSHs(sv_2mortal(newSViv(catbuf.audit_time)));
int cat_handle
int slot
PREINIT:
struct sam_cat_ent catbuf;
int retval;
PPCODE:
retval = sam_getcatalog(cat_handle, slot, slot, &catbuf, sizeof catbuf);
if (retval >= 0) {
EXTEND(SP, 11);
/* 0 */ PUSHs(sv_2mortal(newSViv(catbuf.type)));
/* 1 */ PUSHs(sv_2mortal(newSViv(catbuf.status)));
Filesys-SmbClient
view release on metacpan or search on metacpan
SmbClient.xs view on Meta::CPAN
/*
* Read file descriptor for directory fd and return file type, name and comment
*
*/
struct smbc_dirent * dirp;
PPCODE:
#ifdef VERBOSE
fprintf(stderr, "! Filesys::SmbClient : _readdir: %d\n", fd);
#endif
// Fix for rt#12221 : macro "readdir" passed 2 arguments, but takes just 1
// Seems only work on linux, not solaris
SmbClient.xs view on Meta::CPAN
* _stat(fname) : Get information about a file or directory.
*
*/
int i;
struct stat buf;
PPCODE:
i = context->stat(context, fname, &buf);
if (i == 0) {
XPUSHs(sv_2mortal(newSVnv(buf.st_dev)));
XPUSHs(sv_2mortal(newSVnv(buf.st_ino)));
XPUSHs(sv_2mortal(newSVnv(buf.st_mode)));
SmbClient.xs view on Meta::CPAN
* Get information about a file or directory via a file descriptor.
*
*/
int i;
struct stat buf;
PPCODE:
i = context->fstat(context, fd, &buf);
if (i == 0) {
XPUSHs(sv_2mortal(newSVnv(buf.st_dev)));
XPUSHs(sv_2mortal(newSVnv(buf.st_ino)));
XPUSHs(sv_2mortal(newSVnv(buf.st_mode)));
Filesys-Statvfs
view release on metacpan or search on metacpan
void
statvfs(dir)
char *dir
PREINIT:
Statvfs st;
PPCODE:
EXTEND(sp, 10);
if(statvfs(dir, &st) == 0) {
/* Push values as doubles because we don't know size */
PUSHs(sv_2mortal(newSVnv((double)st.f_bsize)));
PUSHs(sv_2mortal(newSVnv((double)st.f_frsize)));
void
fstatvfs(fd)
int fd;
PREINIT:
Statvfs st;
PPCODE:
EXTEND(sp, 10);
if(fstatvfs(fd, &st) == 0) {
/* Push values as doubles because we don't know size */
PUSHs(sv_2mortal(newSVnv((double)st.f_bsize)));
PUSHs(sv_2mortal(newSVnv((double)st.f_frsize)));
Filter-Crypto
view release on metacpan or search on metacpan
CryptFile/CryptFile.xs view on Meta::CPAN
void
_debug_mode();
PROTOTYPE:
PPCODE:
{
#ifdef FILTER_CRYPTO_DEBUG_MODE
XSRETURN_YES;
#else
XSRETURN_EMPTY;
CryptFile/CryptFile.xs view on Meta::CPAN
INPUT:
InOutStream fh;
FILTER_CRYPTO_MODE_EX crypt_mode_ex
SV* num_bytes
PPCODE:
{
if (FilterCrypto_CryptFh(aTHX_ fh, (PerlIO *)NULL, crypt_mode_ex,
num_bytes))
XSRETURN_YES;
else
CryptFile/CryptFile.xs view on Meta::CPAN
InputStream in_fh;
OutputStream out_fh;
FILTER_CRYPTO_MODE_EX crypt_mode_ex;
SV* num_bytes;
PPCODE:
{
if (FilterCrypto_CryptFh(aTHX_ in_fh, out_fh, crypt_mode_ex, num_bytes))
XSRETURN_YES;
else
XSRETURN_EMPTY;
Filter-Rijndael
view release on metacpan or search on metacpan
Rijndael.xs view on Meta::CPAN
void
import(module)
SV * module
PPCODE:
{
SV * sv = newSV(BLOCKSIZE) ;
/* make sure the Perl debugger isn't enabled */
Rijndael.xs view on Meta::CPAN
}
void
unimport(...)
PPCODE:
/* filter_del(filter_decrypt); */
Filter
view release on metacpan or search on metacpan
Call/Call.xs view on Meta::CPAN
void
real_import(object, perlmodule, coderef)
SV * object
char * perlmodule
IV coderef
PPCODE:
{
SV * sv = newSV(1) ;
(void)SvPOK_only(sv) ;
filter_add(filter_call, sv) ;
Call/Call.xs view on Meta::CPAN
void
unimport(package="$Package", ...)
const char *package
PPCODE:
PERL_UNUSED_VAR(package);
filter_del(filter_call);
BOOT:
Font-FreeType
view release on metacpan or search on metacpan
FreeType.xs view on Meta::CPAN
void
qefft2_import (const char *target_pkg)
PREINIT:
HV *stash;
size_t i;
PPCODE:
stash = gv_stashpv(target_pkg, 0);
if (!stash)
croak("the package I'm importing into doesn't seem to exist");
for (i = 0; i < sizeof(qefft2_uv_const) / sizeof(QefFT2_Uv_Const); ++i) {
const char* name = qefft2_uv_const[i].name;
FreeType.xs view on Meta::CPAN
void
qefft2_library_version (Font_FreeType library)
PREINIT:
FT_Int major, minor, patch;
PPCODE:
major = minor = patch = -1;
FT_Library_Version(library, &major, &minor, &patch);
assert(major != -1);
assert(minor != -1);
assert(patch != -1);
FreeType.xs view on Meta::CPAN
PREINIT:
int i;
FT_Bitmap_Size *size;
HV *hash;
double pt = 0.0, ppem;
PPCODE:
if (GIMME_V != G_ARRAY) {
PUSHs(sv_2mortal(newSViv((int) face->num_fixed_sizes)));
}
else {
EXTEND(SP, face->num_fixed_sizes);
FreeType.xs view on Meta::CPAN
void
qefft2_face_kerning (Font_FreeType_Face face, FT_UInt left_glyph_idx, FT_UInt right_glyph_idx, UV kern_mode = FT_KERNING_DEFAULT)
PREINIT:
FT_Vector kerning;
PPCODE:
errchk(FT_Get_Kerning(face, left_glyph_idx, right_glyph_idx, kern_mode,
&kerning),
"getting kerning from freetype face");
if (GIMME_V != G_ARRAY) {
PUSHs(sv_2mortal(newSVnv((double) kerning.x / 64.0)));
FreeType.xs view on Meta::CPAN
PREINIT:
FT_Face face;
QefFT2_Face_Extra *extra;
FT_OutlineGlyph outline_glyph;
FT_BBox bbox;
PPCODE:
face = (FT_Face) SvIV(glyph->face_sv);
if (!ensure_outline_loaded(face, glyph))
croak("glyph %lu does not have an outline",
(unsigned long) glyph->char_code);
extra = face->generic.data;
FreeType.xs view on Meta::CPAN
unsigned char *buf;
int i, j;
int bits = 0;
AV *rows;
unsigned char *row_buf;
PPCODE:
face = (FT_Face) SvIV(glyph->face_sv);
/* XXX: For some reason I can't work out how to load the bitmap and
* then load the outline later, but it works the other way round.
* To ensure that a glyph object can be used for both, in either order,
* I load the outline first even if it's not needed. There's probably
Forks-Super
view release on metacpan or search on metacpan
bundle/Sys-CpuLoadX/contrib/CpuLoad.xs view on Meta::CPAN
void
xs_getbsdload()
PREINIT:
double loadavg[3];
PPCODE:
#if defined(__FreeBSD__) || defined(__OpenBSD__)
getloadavg(loadavg, 3);
#endif
EXTEND(SP, 3);
PUSHs(sv_2mortal(newSVnv(loadavg[0])));
FreeWRL
view release on metacpan or search on metacpan
OpenGL/OpenGL.xs view on Meta::CPAN
RETVAL
void
glpXNextEvent(d=dpy)
void * d
PPCODE:
{
XEvent event;
char buf[10];
KeySym ks;
XNextEvent(d,&event);
OpenGL/OpenGL.xs view on Meta::CPAN
void
glpXQueryPointer(d=dpy,w=win)
void * d
GLXDrawable w
PPCODE:
{
int x,y,rx,ry;
Window r,c;
unsigned int m;
XQueryPointer(d,w,&r,&c,&rx,&ry,&x,&y,&m);
OpenGL/OpenGL.xs view on Meta::CPAN
}
void
glpGetClipPlane(plane)
GLenum plane
PPCODE:
{
GLdouble equation[4];
glGetClipPlane(plane,equation);
EXTEND(sp,4);
PUSHs(sv_2mortal(newSVnv(equation[0])));
Fuse
view release on metacpan or search on metacpan
OUTPUT:
RETVAL
void
fuse_version()
PPCODE:
int gimme = GIMME_V;
if (gimme == G_SCALAR)
XPUSHs(sv_2mortal(newSVpvf("%d.%d", FUSE_MAJOR_VERSION, FUSE_MINOR_VERSION)));
else if (gimme == G_ARRAY) {
#ifdef FUSE_FOUND_MICRO_VER
Future-XS
view release on metacpan or search on metacpan
lib/Future/XS.xs view on Meta::CPAN
void
result(SV *self)
ALIAS:
result = FALSE
get = TRUE
PPCODE:
CHECK_INSTANCE(self);
/* This PUTBACK + SPAGAIN pair is required in case future_get_result_av()
* causes the arguments stack to be reällocated. It works fine on perls
* 5.24+ but causes older perls to crash. For now we just depend on 5.24
* https://rt.cpan.org/Ticket/Display.html?id=145597
lib/Future/XS.xs view on Meta::CPAN
OUTPUT:
RETVAL
void
failure(SV *self)
PPCODE:
CHECK_INSTANCE(self);
PUTBACK;
AV *failure = future_get_failure_av(self);
SPAGAIN;
if(!failure)
lib/Future/XS.xs view on Meta::CPAN
pending_futures = FUTURE_SUBS_PENDING
ready_futures = FUTURE_SUBS_READY
done_futures = FUTURE_SUBS_DONE
failed_futures = FUTURE_SUBS_FAILED
cancelled_futures = FUTURE_SUBS_CANCELLED
PPCODE:
CHECK_INSTANCE(self);
PUTBACK;
Size_t count = future_mPUSH_subs(self, ix);
SPAGAIN;
XSRETURN(count);
GBrowse
view release on metacpan or search on metacpan
lib/Bio/Graphics/Browser2/CAlign.xs view on Meta::CPAN
HV* optionh;
SV **value;
int score,i;
AlignmentPtr alignment;
AV* palign;
PPCODE:
{
/* copy defaults from standardMatrix */
initMatrix(&matrix);
if (options != NULL) {
GCCJIT
view release on metacpan or search on metacpan
fallback/const-xs.inc view on Meta::CPAN
/* NV nv; Uncomment this if you need to return NVs */
/* const char *pv; Uncomment this if you need to return PVs */
INPUT:
SV * sv;
const char * s = SvPV(sv, len);
PPCODE:
/* Change this to constant(aTHX_ s, len, &iv, &nv);
if you need to return both NVs and IVs */
type = constant(aTHX_ s, len, &iv);
/* Return 1 or 2 items. First is error message, or undef if no error.
Second, if present, is found value */
GD
view release on metacpan or search on metacpan
INCLUDE: const-xs.inc
void
VERSION_STRING()
PPCODE:
mXPUSHp(GD_VERSION_STRING,sizeof(GD_VERSION_STRING)-1);
void
LIBGD_VERSION()
PPCODE:
mXPUSHn(GD_VERSION/10000.0);
#if GD_VERSION >= 20101
bool
void
gdgetBounds(image)
GD::Image image
PROTOTYPE: $
PPCODE:
mXPUSHi(gdImageSX(image));
mXPUSHi(gdImageSY(image));
int
gdisTrueColor(image)
void
gdrgb(image,color)
GD::Image image
int color
PROTOTYPE: $$
PPCODE:
mXPUSHi(gdImageRed(image,color));
mXPUSHi(gdImageGreen(image,color));
mXPUSHi(gdImageBlue(image,color));
void
gdalpha(image,color)
GD::Image image
int color
PROTOTYPE: $$
PPCODE:
mXPUSHi(gdImageAlpha(image,color));
int
gdboundsSafe(image,x,y)
GD::Image image
SV** value;
int i;
int hdpi;
int vdpi;
gdFTStringExtra strex;
PPCODE:
{
#ifndef HAVE_FT
errormsg = perl_get_sv("@",0);
sv_setpv(errormsg,"libgd was not built with FreeType font support\n");
XSRETURN_EMPTY;
GD::Image image
PROTOTYPE: $;$$$$
PREINIT:
int coords[4];
int i;
PPCODE:
if (items == 5) {
for (i=0; i<4; i++)
coords[i] = (int)SvIV(ST(i+1));
gdImageSetClip(image,coords[0],coords[1],coords[2],coords[3]);
}
GH
view release on metacpan or search on metacpan
GH/Align/Align.xs view on Meta::CPAN
void
globalMinDifferences(s1, s2)
char *s1
char *s2
PPCODE:
SV *rv = NULL;
rv = globalMinDifferences_helper(s1, s2);
if (rv) {
XPUSHs(sv_2mortal(rv));
GH/Align/Align.xs view on Meta::CPAN
void
boundedGlobalMinDifferences(s1, s2, bound)
char *s1
char *s2
int bound
PPCODE:
SV *rv = NULL;
rv = boundedGlobalMinDifferences_helper(s1, s2, bound);
if (rv) {
XPUSHs(sv_2mortal(rv));
GH/Align/Align.xs view on Meta::CPAN
void
boundedHirschbergGlobalMinDiffs(s1, s2, bound)
char *s1
char *s2
int bound
PPCODE:
SV *rv = NULL;
rv = boundedHirschbergGlobalMinDiffs_helper(s1, s2, bound);
if (rv) {
XPUSHs(sv_2mortal(rv));
GPS-Magellan
view release on metacpan or search on metacpan
Magellan.xs view on Meta::CPAN
magellan_get_linked_list(List)
MWpt *List
PREINIT:
MWpt *Cur;
SV *sv_coord;
PPCODE:
if(List == NULL){
croak("magellan_get_linked_list(): got NULL.\n");
XSRETURN_UNDEF;
}
GSAPI
view release on metacpan or search on metacpan
void
revision()
PROTOTYPE:
PREINIT:
gsapi_revision_t rev;
PPCODE:
gsapi_revision(&rev, sizeof(rev));
EXTEND(SP, 4);
PUSHs(sv_2mortal(newSVpv(rev.product,0)));
PUSHs(sv_2mortal(newSVpv(rev.copyright, 0)));
PUSHs(sv_2mortal(newSViv(rev.revision)));
GSM-Gnokii
view release on metacpan or search on metacpan
void
_Initialize (self)
HV *self;
PPCODE:
opt_v = SvIV (*hv_fetch (self, "verbose", 7, 0));
if (opt_v) warn ("initialize ({ ... })\n");
unless (gn_lib_init () == GN_ERR_NONE)
void
_Connect (self)
HV *self;
PPCODE:
gn_error err;
if (opt_v) warn ("connect ()\n");
err = gn_lib_phoneprofile_load_from_file (configfile, configmodel, &state);
void
disconnect (self)
HvObject *self;
PPCODE:
if (opt_v) warn ("disconnect ()\n");
if (hv_exists (self, "connected", 9)) {
(void)hv_del (self, "connected");
busterminate ();
HvObject *self;
char *memtype;
int start;
int end;
PPCODE:
gn_phonebook_entry entry;
int mt, i, j;
AV *pb;
if (opt_v) warn ("GetPhonebook (%s, %d, %d)\n", memtype, start, end);
void
WritePhonebookEntry (self, pbh)
HvObject *self;
HV *pbh;
PPCODE:
gn_error err;
gn_phonebook_entry entry;
int mt, i;
SV **value;
char *str;
void
GetSpeedDial (self, location)
HvObject *self;
int location;
PPCODE:
gn_speed_dial *speeddial;
if (opt_v) warn ("Get Speed Dial %d\n", location);
if (location < 0)
HvObject *self;
char *memtype;
int location;
int number;
PPCODE:
/* TODO: This funtion is untested */
gn_error err;
gn_speed_dial entry;
clear_data ();
void
GetDateTime (self)
HvObject *self;
PPCODE:
gn_timestamp date_time;
if (opt_v) warn ("GetDateTime ()\n");
clear_data ();
void
SetDateTime (self, timestamp)
HvObject *self;
time_t timestamp;
PPCODE:
gn_error err;
gn_timestamp date;
/* TODO: This funtion is untested */
if (opt_v) warn ("SetDateTime (%ld)\n", (long)timestamp);
void
GetAlarm (self)
HvObject *self;
PPCODE:
gn_calnote_alarm alrm;
if (opt_v) warn ("GetAlarm ()\n");
clear_data ();
SetAlarm (self, hour, minute)
HvObject *self;
int hour;
int minute;
PPCODE:
gn_calnote_alarm at;
int err;
clear_data ();
if (hour < 0 || hour > 23) {
GetCalendarNotes (self, start, end)
HvObject *self;
int start;
int end;
PPCODE:
gn_calnote_list calendarnoteslist;
gn_calnote calendarnote;
int i, err;
AV *cnl = newAV ();
void
WriteCalendarNote (self, calhash)
HvObject *self;
HV *calhash;
PPCODE:
gn_calnote calnote;
char *buf;
time_t t1, *t2;
gn_timestamp *timestamp;
int err;
GetTodo (self, start, end)
HvObject *self;
int start;
int end;
PPCODE:
gn_todo_list todolist;
gn_todo todo;
int i, err;
AV *tdl = newAV ();
void
WriteTodo (self, todohash)
HvObject *self;
HV *todohash;
PPCODE:
gn_todo todo;
char *buf;
int err;
clear_data ();
void
DeleteAllTodos (self)
HvObject *self;
PPCODE:
int err;
clear_data ();
err = gn_sm_functions (GN_OP_DeleteAllToDos, data, state);
set_errori (err);
void
Ping (self)
HvObject *self;
PPCODE:
gn_error err;
if (opt_v) warn ("Ping ()\n");
unless (can_ping)
void
GetDisplayStatus (self)
HvObject *self;
PPCODE:
int status = 0;
if (opt_v) warn ("GetDisplayStatus ()\n");
clear_data ();
void
GetIMEI (self)
HvObject *self;
PPCODE:
char imei[64], model[64], rev[64], manufacturer[64];
if (opt_v) warn ("GetIMEI ()\n");
clear_data ();
void
GetPowerStatus (self)
HvObject *self;
PPCODE:
gn_power_source powersource = -1;
float batterylevel = -1;
gn_battery_unit batt_units = GN_BU_Arbitrary;
HV *ps = newHV ();
void
GetMemoryStatus (self)
HvObject *self;
PPCODE:
HV *ms = newHV ();
if (opt_v) warn ("GetMemoryStatus ()\n");
clear_data ();
GetProfiles (self, start, end)
HvObject *self;
int start;
int end;
PPCODE:
gn_profile profile;
gn_ringtone_list rtl;
char model[64] = "";
int i, max_profiles = 7;
HV *p;
void
GetSecurity (self)
HvObject *self;
PPCODE:
gn_security_code sc;
if (opt_v) warn ("GetSecurity ()\n");
clear_data ();
void
GetLogo (self, logodata)
HvObject *self;
HV *logodata;
PPCODE:
gn_bmp bitmap;
char *type;
if (opt_v) warn ("GetLogo ({ type => ... })\n");
void
GetRingtoneList (self)
HV *self;
PPCODE:
gn_ringtone_list ringtone_list;
if (opt_v) warn ("GetRingtoneList ()\n");
clear_data ();
void
GetRingtone (self, location)
HvObject *self;
int location;
PPCODE:
gn_ringtone ringtone;
gn_raw_data rawdata;
unsigned char buff[512];
if (opt_v) warn ("GetRingtone (%d)\n", location);
GetDirTree (self, memorytype, depth)
HvObject *self;
char *memorytype;
int depth;
PPCODE:
char *mt;
gn_file_list fl;
HV *dt;
if (opt_v) warn ("GetDirTree (%s, %d)\n", memorytype, depth);
HvObject *self;
char *memorytype;
char *path;
int depth;
PPCODE:
char *mt;
gn_file_list fl;
HV *dt;
if (opt_v) warn ("GetDir (%s, %s, %d)\n", memorytype, path, depth);
void
GetFile (self, path)
HvObject *self;
char *path;
PPCODE:
gn_file fi;
HV *dt;
if (opt_v) warn ("GetFile (%s)\n", path);
GetSMSCenter (self, start, end)
HvObject *self;
int start;
int end;
PPCODE:
gn_sms_message_center messagecenter;
int i, err;
AV *scl = newAV ();
if (opt_v) warn ("GetSMSCenter (%d, %d)\n", start, end);
void
GetSMSFolderList (self)
HvObject *self;
PPCODE:
gn_sms_folder_list folderlist;
AV *fl;
int i;
if (opt_v) warn ("GetSMSFolderList ()\n");
void
CreateSMSFolder (self, name)
HvObject *self;
char *name;
PPCODE:
gn_sms_folder folder;
int err;
if (strlen (name) >= GN_SMS_FOLDER_NAME_MAX_LENGTH) {
set_errors ("Folder name too long");
void
DeleteSMSFolder (self, location)
HvObject *self;
int location;
PPCODE:
gn_sms_folder folder;
int err;
if (location <= 0 || location > GN_SMS_FOLDER_MAX_NUMBER) {
set_errori (GN_ERR_INVALIDLOCATION);
void
GetSMSStatus (self)
HvObject *self;
PPCODE:
gn_sms_status SMSStatus;
if (opt_v) warn ("GetSMSStatus ()\n");
clear_data ();
GetSMS (self, memtype, location)
HvObject *self;
char *memtype;
int location;
PPCODE:
gn_sms message;
gn_sms_folder folder;
gn_sms_folder_list folderlist;
int i;
DeleteSMS (self, memtype, location)
HvObject *self;
char *memtype;
int location;
PPCODE:
gn_error err;
gn_sms message;
gn_sms_folder folder;
gn_sms_folder_list folderlist;
void
SendSMS (self, smshash)
HvObject *self;
HV *smshash;
PPCODE:
gn_sms sms;
SV **value;
char *str;
STRLEN l;
int err = GN_ERR_NONE;
void
GetRF (self)
HvObject *self;
PPCODE:
float rflevel = -1;
gn_rf_unit rfunit = GN_RF_Arbitrary;
HV *rf = newHV ();;
if (opt_v) warn ("GetRF ()\n");
void
GetNetworkInfo (self)
HvObject *self;
PPCODE:
gn_network_info NetworkInfo;
char buffer[10];
if (opt_v) warn ("GetNetworkInfo ()\n");
void
GetWapSettings (self, location)
HvObject *self;
int location;
PPCODE:
gn_wap_setting entry;
HV *ws;
if (opt_v) warn ("GetWapSettings (%d)\n", location);
void
WriteWapSetting (self, wh)
HvObject *self;
HV *wh;
PPCODE:
gn_error err;
gn_wap_setting entry;
char *buf;
STRLEN l;
void
ActivateWapSetting (self, location)
HvObject *self;
int location;
PPCODE:
gn_error err;
gn_wap_setting entry;
clear_data ();
Zero (&entry, 1, entry);
void
GetWapBookmark (self, location)
HvObject *self;
int location;
PPCODE:
gn_wap_bookmark entry;
if (opt_v) warn ("GetWapBookmark (%d)\n", location);
clear_data ();
void
WriteWapBookmark (self, wh)
HvObject *self;
HV *wh;
PPCODE:
gn_wap_bookmark entry;
clear_data ();
Zero (&entry, 1, entry);
hv_geti (wh, "location", entry.location);
void
DeleteWapBookmark (self, location)
HvObject *self;
int location;
PPCODE:
gn_error err;
gn_wap_bookmark entry;
clear_data ();
Zero (&entry, 1, entry);
GSSAPI
view release on metacpan or search on metacpan
void
DESTROY(oid)
GSSAPI::OID oid
PREINIT:
OM_uint32 minor;
PPCODE:
#if !defined(HEIMDAL)
if (oid != NULL &&
oid != __KRB5_MECHTYPE_OID &&
oid != __KRB5_OLD_MECHTYPE_OID &&
oid != __GSS_KRB5_NT_USER_NAME &&
GStreamer-Interfaces
view release on metacpan or search on metacpan
xs/GstPropertyProbe.xs view on Meta::CPAN
void
gst_property_probe_get_probe_properties (probe)
GstPropertyProbe *probe
PREINIT:
const GList *result, *i;
PPCODE:
result = gst_property_probe_get_properties (probe);
for (i = result; i; i = i->next)
XPUSHs (sv_2mortal (newSVGParamSpec (i->data)));
# const GParamSpec * gst_property_probe_get_property (GstPropertyProbe *probe, const gchar *name);
xs/GstPropertyProbe.xs view on Meta::CPAN
ALIAS:
GStreamer::PropertyProbe::probe_and_get_probe_values = 1
PREINIT:
GValueArray *array;
int i;
PPCODE:
switch (ix) {
case 0:
array = gst_property_probe_get_values (probe, (const GParamSpec *) pspec);
break;
case 1:
xs/GstPropertyProbe.xs view on Meta::CPAN
ALIAS:
GStreamer::PropertyProbe::probe_and_get_probe_values_name = 1
PREINIT:
GValueArray *array;
int i;
PPCODE:
switch (ix) {
case 0:
array = gst_property_probe_get_values_name (probe, name);
break;
case 1:
GStreamer
view release on metacpan or search on metacpan
=for apidoc __hide__
=cut
void
GET_VERSION_INFO (class)
PPCODE:
EXTEND (SP, 3);
/* 0.10.17 provides these macros, but with a different name. */
#if GST_CHECK_VERSION (0, 10, 17)
PUSHs (sv_2mortal (newSViv (GST_VERSION_MAJOR)));
PUSHs (sv_2mortal (newSViv (GST_VERSION_MINOR)));
# void gst_version (guint *major, guint *minor, guint *micro, guint *nano);
void
gst_version (class)
PREINIT:
guint major, minor, micro, nano;
PPCODE:
PERL_UNUSED_VAR (ax);
gst_version (&major, &minor, µ, &nano);
EXTEND (sp, 3);
PUSHs (sv_2mortal (newSVuv (major)));
PUSHs (sv_2mortal (newSVuv (minor)));
GTop
view release on metacpan or search on metacpan
PREINIT:
GTop__Mountlist RETVAL;
GTop__Mountentry entry;
SV *svl, *sve;
PPCODE:
RETVAL = (glibtop_mountlist *)safemalloc(sizeof(*RETVAL));
trace_malloc(RETVAL);
entry = glibtop_get_mountlist(RETVAL, all_fs);
svl = sv_newmortal();
GTop__Proclist RETVAL;
unsigned *ptr;
SV *svl;
AV *av;
PPCODE:
RETVAL = (glibtop_proclist *)safemalloc(sizeof(*RETVAL));
trace_malloc(RETVAL);
ptr = glibtop_get_proclist(RETVAL, which, arg);
svl = sv_newmortal();
PREINIT:
GTop__ProcArgs RETVAL;
char *pargs;
SV *svl;
PPCODE:
RETVAL = (glibtop_proc_args *)safemalloc(sizeof(*RETVAL));
trace_malloc(RETVAL);
pargs = glibtop_get_proc_args(RETVAL, pid, arg);
svl = sv_newmortal();
PREINIT:
GTop__ProcMap RETVAL;
GTop__MapEntry entry;
SV *svl, *sve;
PPCODE:
RETVAL = (glibtop_proc_map *)safemalloc(sizeof(*RETVAL));
trace_malloc(RETVAL);
entry = glibtop_get_proc_map(RETVAL, pid);
svl = sv_newmortal();
Game-RaycastFOV
view release on metacpan or search on metacpan
lib/Game/RaycastFOV.xs view on Meta::CPAN
SV *callback;
PREINIT:
int answer, i;
SV *x, *y;
PROTOTYPE: &@
PPCODE:
if (!(items & 1)) croak("uneven number of arguments");
dSP;
for (i = 1; i < items; i += 2) {
x = ST(i);
y = ST(i + 1);
lib/Game/RaycastFOV.xs view on Meta::CPAN
SV *callback;
PREINIT:
int i;
SV *x, *y;
PROTOTYPE: &@
PPCODE:
if (!(items & 1)) croak("uneven number of arguments");
dSP;
for (i = 1; i < items; i += 2) {
x = ST(i);
y = ST(i + 1);
lib/Game/RaycastFOV.xs view on Meta::CPAN
char *key;
int f, ddF_x, ddF_y, x, y;
HV* seen;
STRLEN len;
PROTOTYPE: &$$$
PPCODE:
dSP;
ENTER;
SAVETMPS;
sv_2mortal((SV *)(seen = newHV()));
f = 1 - radius;
lib/Game/RaycastFOV.xs view on Meta::CPAN
line (callback, int x0, int y0, int x1, int y1)
SV *callback;
PREINIT:
int answer, dx, dy, err, e2, sx, sy;
PROTOTYPE: &$$$$
PPCODE:
dSP;
dx = abs(x1 - x0);
dy = abs(y1 - y0);
sx = x0 < x1 ? 1 : -1;
sy = y0 < y1 ? 1 : -1;
lib/Game/RaycastFOV.xs view on Meta::CPAN
char *key;
long newx, newy;
HV* seen;
STRLEN len;
PROTOTYPE: &$$$$$$
PPCODE:
dSP;
sv_2mortal((SV *)(seen = newHV()));
while (angle < max_angle) {
newx = x0 + lrint(radius * cos(angle));
newy = y0 + lrint(radius * sin(angle));
Game-Xomb
view release on metacpan or search on metacpan
lib/Game/Xomb.xs view on Meta::CPAN
bypair (callback, ...)
SV *callback;
PREINIT:
int i;
SV *x, *y;
PPCODE:
if (!(items & 1)) croak("uneven number of arguments");
dSP;
for (i = 1; i < items; i += 2) {
x = ST(i);
y = ST(i + 1);
lib/Game/Xomb.xs view on Meta::CPAN
# init_jsf - setup the RNG (see src/jsf.*)
void
init_jsf (seed)
UV seed
PPCODE:
raninit(seed);
UV
irand (uint32_t max)
CODE:
lib/Game/Xomb.xs view on Meta::CPAN
void
linecb (callback, int x0, int y0, int x1, int y1)
SV *callback;
PREINIT:
int answer, dx, dy, err, e2, sx, sy, online, iters;
PPCODE:
dSP;
dx = abs(x1 - x0);
dy = abs(y1 - y0);
sx = x0 < x1 ? 1 : -1;
sy = y0 < y1 ? 1 : -1;
lib/Game/Xomb.xs view on Meta::CPAN
void
walkcb (callback, int x0, int y0, int x1, int y1)
SV *callback;
PREINIT:
int answer, dx, dy, err, e2, sx, sy, online, iters;
PPCODE:
dSP;
dx = abs(x1 - x0);
dy = abs(y1 - y0);
sx = x0 < x1 ? 1 : -1;
sy = y0 < y1 ? 1 : -1;
Games-Chipmunk
view release on metacpan or search on metacpan
fallback/const-xs.inc view on Meta::CPAN
/* NV nv; Uncomment this if you need to return NVs */
/* const char *pv; Uncomment this if you need to return PVs */
INPUT:
SV * sv;
const char * s = SvPV(sv, len);
PPCODE:
/* Change this to constant(aTHX_ s, len, &iv, &nv);
if you need to return both NVs and IVs */
type = constant(aTHX_ s, len, &iv);
/* Return 1 or 2 items. First is error message, or undef if no error.
Second, if present, is found value */
Gazelle
view release on metacpan or search on metacpan
lib/Plack/Handler/Gazelle.xs view on Meta::CPAN
HV * env;
int flag = 1;
ssize_t rv = 0;
ssize_t buf_len;
ssize_t reqlen;
PPCODE:
{
/* if ( my ($conn, $buf, $env) = accept_buffer(fileno($server),timeout,tcp,host,port) */
len = sizeof(cliaddr);
fd = _accept(fileno, (struct sockaddr *)&cliaddr, len);
Gearman-XS
view release on metacpan or search on metacpan
gearman_return_t ret;
const char *w;
size_t w_size;
void *result;
size_t result_size;
PPCODE:
if (items > 3)
unique= SvPV_nolen(ST(3));
w= SvPV(workload, w_size);
result= gearman_client_do(self->client, function_name, unique, w, w_size,
&result_size, &ret);
gearman_return_t ret;
const char *w;
size_t w_size;
void *result;
size_t result_size;
PPCODE:
if (items > 3)
unique= SvPV_nolen(ST(3));
w= SvPV(workload, w_size);
result= gearman_client_do_high(self->client, function_name, unique, w,
w_size, &result_size, &ret);
gearman_return_t ret;
const char *w;
size_t w_size;
void *result;
size_t result_size;
PPCODE:
if (items > 3)
unique= SvPV_nolen(ST(3));
w= SvPV(workload, w_size);
result= gearman_client_do_low(self->client, function_name, unique, w,
w_size, &result_size, &ret);
char *job_handle;
char *unique= NULL;
const char *w;
size_t w_size;
gearman_return_t ret;
PPCODE:
if (items > 3)
unique= SvPV_nolen(ST(3));
Newxz(job_handle, GEARMAN_JOB_HANDLE_SIZE, char);
w= SvPV(workload, w_size);
ret= gearman_client_do_background(self->client, function_name, unique, w,
char *job_handle;
char *unique= NULL;
const char *w;
size_t w_size;
gearman_return_t ret;
PPCODE:
if (items > 3)
unique= SvPV_nolen(ST(3));
Newxz(job_handle, GEARMAN_JOB_HANDLE_SIZE, char);
w= SvPV(workload, w_size);
ret= gearman_client_do_high_background(self->client, function_name, unique,
char *job_handle;
char *unique= NULL;
const char *w;
size_t w_size;
gearman_return_t ret;
PPCODE:
if (items > 3)
unique= SvPV_nolen(ST(3));
Newxz(job_handle, GEARMAN_JOB_HANDLE_SIZE, char);
w= SvPV(workload, w_size);
ret= gearman_client_do_low_background(self->client, function_name, unique,
char *unique= NULL;
gearman_return_t ret;
gearman_task_context_st *context;
const void *w;
size_t w_size;
PPCODE:
if (items > 3)
unique= SvPV_nolen(ST(3));
w= _get_string(workload, &w_size);
Newxz(context, 1, gearman_task_context_st);
context->client= self->client;
char *unique= NULL;
gearman_return_t ret;
gearman_task_context_st *context;
const void *w;
size_t w_size;
PPCODE:
if (items > 3)
unique= SvPV_nolen(ST(3));
w= _get_string(workload, &w_size);
Newxz(context, 1, gearman_task_context_st);
context->client= self->client;
char *unique= NULL;
gearman_return_t ret;
gearman_task_context_st *context;
const void *w;
size_t w_size;
PPCODE:
if (items > 3)
unique= SvPV_nolen(ST(3));
w= _get_string(workload, &w_size);
Newxz(context, 1, gearman_task_context_st);
context->client= self->client;
char *unique= NULL;
gearman_return_t ret;
gearman_task_context_st *context;
const void *w;
size_t w_size;
PPCODE:
if (items > 3)
unique= SvPV_nolen(ST(3));
w= _get_string(workload, &w_size);
Newxz(context, 1, gearman_task_context_st);
context->client= self->client;
char *unique= NULL;
gearman_return_t ret;
gearman_task_context_st *context;
const void *w;
size_t w_size;
PPCODE:
if (items > 3)
unique= SvPV_nolen(ST(3));
w= _get_string(workload, &w_size);
Newxz(context, 1, gearman_task_context_st);
context->client= self->client;
char *unique= NULL;
gearman_return_t ret;
gearman_task_context_st *context;
const void *w;
size_t w_size;
PPCODE:
if (items > 3)
unique= SvPV_nolen(ST(3));
w= _get_string(workload, &w_size);
Newxz(context, 1, gearman_task_context_st);
context->client= self->client;
do_status(self)
gearman_xs_client *self
PREINIT:
uint32_t numerator;
uint32_t denominator;
PPCODE:
gearman_client_do_status(self->client, &numerator, &denominator);
XPUSHs(sv_2mortal(newSVuv(numerator)));
XPUSHs(sv_2mortal(newSVuv(denominator)));
void
gearman_return_t ret;
bool is_known;
bool is_running;
uint32_t numerator;
uint32_t denominator;
PPCODE:
ret= gearman_client_job_status(self->client, job_handle, &is_known, &is_running,
&numerator, &denominator);
XPUSHs(sv_2mortal(newSViv(ret)));
XPUSHs(sv_2mortal(newSViv(is_known)));
XPUSHs(sv_2mortal(newSViv(is_running)));
const char *job_handle
PREINIT:
gearman_task_st *task;
gearman_return_t ret;
gearman_task_context_st *context;
PPCODE:
Newxz(context, 1, gearman_task_context_st);
context->client= self->client;
task= gearman_client_add_task_status(self->client, NULL, context, job_handle, &ret);
XPUSHs(sv_2mortal(newSViv(ret)));
XPUSHs(sv_2mortal(_bless("Gearman::XS::Task", task)));
Geo-Address-Mail-Standardizer-USPS-AMS
view release on metacpan or search on metacpan
#define newSVpvn_nolen_undef(s) newSVpvn(s, s ? strlen(s) : 0)
MODULE = Geo::Address::Mail::Standardizer::USPS::AMS PACKAGE = Geo::Address::Mail::Standardizer::USPS::AMS PREFIX = ams_
void ams_init(SV * self)
PPCODE:
Z4OPEN_PARM z4cfg;
int status;
char * statedir;
char * datadir;
char * path_comm;
( run in 4.020 seconds using v1.01-cache-2.11-cpan-92ad3014f07 )