view release on metacpan or  search on metacpan

Jail.xs  view on Meta::CPAN

	return NULL;	/* No matching jails found */
}


MODULE = BSD::Jail		PACKAGE = BSD::Jail		

void
get_jids()
	INIT:
		int jids[MAX_JAILS_RETURNED], jcount, i;
	PPCODE:
		jcount = _get_jids(&jids[0]);
		for (i = 0; i < jcount; i++) {
			XPUSHs(sv_2mortal(newSVnv(jids[i])));
		}

void
get_xprison(jid)
		int	jid
	INIT:
		struct xprison *xp;
		struct in_addr in;
	PPCODE:
		if ((xp = _get_xp(jid)) != NULL) {
			in.s_addr = ntohl(xp->pr_ip);
			XPUSHs(sv_2mortal(newSViv(xp->pr_version)));
			XPUSHs(sv_2mortal(newSViv(xp->pr_id)));
			XPUSHs(sv_2mortal(newSVpvf(xp->pr_path)));
			XPUSHs(sv_2mortal(newSVpvf(xp->pr_host)));
			XPUSHs(sv_2mortal(newSVpvf(inet_ntoa(in))));
			Safefree(xp);
		}