view release on metacpan or  search on metacpan

ARIA.xs  view on Meta::CPAN

        RETVAL


void
_setup_enc_key( mk, keybits )
        const Byte * mk
        int keybits
    PREINIT:
        int round;
        Byte rkey[16*17];
    PPCODE:
        round = EncKeySetup(mk, rkey, keybits);
        XPUSHs( sv_2mortal(newSVnv(round)) );
        XPUSHs( sv_2mortal(newSVpvn((const char *)rkey, 16*17*sizeof(Byte))) );

void
_setup_dec_key( mk, keybits )
        const Byte * mk
        int keybits
    PREINIT:
        int round;
        Byte rkey[16*17];
    PPCODE:
        round = DecKeySetup(mk, rkey, keybits);
        XPUSHs( sv_2mortal(newSVnv(round)) );
        XPUSHs( sv_2mortal(newSVpvn((const char *)rkey, 16*17*sizeof(Byte))) );