view release on metacpan or  search on metacpan

Checkpass.xs  view on Meta::CPAN

	CODE:
		RETVAL = crypt_checkpass(password, hash);
	OUTPUT:
		RETVAL

SV *
_newhash(const char *password)
	INIT:
		int rv;
		char buf[_PASSWORD_LEN];
	PPCODE:
		rv = crypt_newhash(password, "bcrypt,a", buf, sizeof(buf));
		if (rv == 0) {
			XPUSHs(sv_2mortal(newSVpv(buf, 0)));
		} else {
			XPUSHs(sv_newmortal());
		}