8 #define WrapPKCS12(klass, obj, p12) do { \ 9 if(!(p12)) ossl_raise(rb_eRuntimeError, "PKCS12 wasn't initialized."); \ 10 (obj) = Data_Wrap_Struct((klass), 0, PKCS12_free, (p12)); \ 13 #define GetPKCS12(obj, p12) do { \ 14 Data_Get_Struct((obj), PKCS12, (p12)); \ 15 if(!(p12)) ossl_raise(rb_eRuntimeError, "PKCS12 wasn't initialized."); \ 18 #define SafeGetPKCS12(obj, p12) do { \ 19 OSSL_Check_Kind((obj), cPKCS12); \ 20 GetPKCS12((obj), (p12)); \ 23 #define ossl_pkcs12_set_key(o,v) rb_iv_set((o), "@key", (v)) 24 #define ossl_pkcs12_set_cert(o,v) rb_iv_set((o), "@certificate", (v)) 25 #define ossl_pkcs12_set_ca_certs(o,v) rb_iv_set((o), "@ca_certs", (v)) 26 #define ossl_pkcs12_get_key(o) rb_iv_get((o), "@key") 27 #define ossl_pkcs12_get_cert(o) rb_iv_get((o), "@certificate") 28 #define ossl_pkcs12_get_ca_certs(o) rb_iv_get((o), "@ca_certs") 76 VALUE pass,
name, pkey, cert, ca, key_nid, cert_nid, key_iter, mac_iter, keytype;
78 char *passphrase, *friendlyname;
82 int nkey = 0, ncert = 0, kiter = 0, miter = 0, ktype = 0;
85 rb_scan_args(
argc,
argv,
"46", &pass, &
name, &pkey, &cert, &ca, &key_nid, &cert_nid, &key_iter, &mac_iter, &keytype);
90 x509s =
NIL_P(ca) ?
NULL : ossl_x509_ary2sk(ca);
92 if (!
NIL_P(key_nid)) {
96 if (!
NIL_P(cert_nid)) {
100 if (!
NIL_P(key_iter))
102 if (!
NIL_P(mac_iter))
107 p12 = PKCS12_create(passphrase, friendlyname,
key, x509, x509s,
108 nkey, ncert, kiter, miter, ktype);
109 sk_X509_pop_free(x509s, X509_free);
134 VALUE arg, pass, pkey, cert, ca;
145 d2i_PKCS12_bio(in, &pkcs);
149 pkey = cert = ca =
Qnil;
150 if(!PKCS12_parse(pkcs, passphrase, &
key, &x509, &x509s))
165 sk_X509_pop_free(x509s, X509_free);
183 if((len = i2d_PKCS12(p12,
NULL)) <= 0)
187 if(i2d_PKCS12(p12, &p) <= 0)
void rb_define_singleton_method(VALUE obj, const char *name, VALUE(*func)(ANYARGS), int argc)
Defines a singleton method for obj.
#define ossl_str_adjust(str, p)
static VALUE ossl_pkcs12_initialize(int argc, VALUE *argv, VALUE self)
VALUE rb_protect(VALUE(*proc)(VALUE), VALUE data, int *state)
VALUE rb_define_class_under(VALUE outer, const char *name, VALUE super)
Defines a class under the namespace of outer.
void rb_define_alloc_func(VALUE, rb_alloc_func_t)
STACK_OF(X509) *ossl_x509_ary2sk0(VALUE)
VALUE ossl_pkey_new(EVP_PKEY *pkey)
X509 * GetX509CertPtr(VALUE)
RUBY_EXTERN VALUE rb_cObject
void rb_attr(VALUE, ID, int, int, int)
#define GetPKCS12(obj, p12)
VALUE ossl_x509_new(X509 *)
#define ossl_pkcs12_set_cert(o, v)
#define WrapPKCS12(klass, obj, p12)
static VALUE ossl_pkcs12_s_allocate(VALUE klass)
#define ossl_pkcs12_set_key(o, v)
BIO * ossl_obj2bio(VALUE obj)
#define ossl_pkcs12_set_ca_certs(o, v)
int rb_scan_args(int argc, const VALUE *argv, const char *fmt,...)
void rb_jump_tag(int tag)
static VALUE ossl_pkcs12_s_create(int argc, VALUE *argv, VALUE self)
static VALUE ossl_pkcs12_to_der(VALUE self)
int *VALUE ossl_x509_sk2ary(STACK_OF(X509) *certs)
void ossl_raise(VALUE exc, const char *fmt,...)
EVP_PKEY * GetPKeyPtr(VALUE obj)
#define StringValuePtr(v)
void rb_define_method(VALUE klass, const char *name, VALUE(*func)(ANYARGS), int argc)
VALUE rb_str_new(const char *, long)