Mercurial > pidgin
annotate libpurple/plugins/perl/common/Certificate.xs @ 32727:089acf3a8aa1
Remove purple_certificate_display_x509 from Perl wrappers.
author | Elliott Sales de Andrade <qulogic@pidgin.im> |
---|---|
date | Tue, 28 Feb 2012 07:10:15 +0000 |
parents | 1bcedeb32bb4 |
children |
rev | line source |
---|---|
23658
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
1 #include "module.h" |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
2 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
3 struct cb_data { |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
4 SV *cb; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
5 SV *user_data; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
6 }; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
7 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
8 static void cb_cert_verify(PurpleCertificateVerificationStatus st, struct cb_data *d) { |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
9 dSP; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
10 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
11 ENTER; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
12 SAVETMPS; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
13 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
14 PUSHMARK(SP); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
15 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
16 XPUSHs(sv_2mortal(newSViv(st))); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
17 XPUSHs(d->user_data); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
18 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
19 PUTBACK; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
20 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
21 call_sv(d->cb, G_VOID | G_EVAL); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
22 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
23 if(SvTRUE(ERRSV)) { |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
24 STRLEN l_a; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
25 purple_debug_warning("perl", "Failed to run 'certificate verify' callback: %s\n", SvPV(ERRSV, l_a)); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
26 } |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
27 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
28 FREETMPS; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
29 LEAVE; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
30 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
31 SvREFCNT_dec(d->cb); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
32 SvREFCNT_dec(d->user_data); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
33 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
34 g_free(d); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
35 } |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
36 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
37 MODULE = Purple::Certificate PACKAGE = Purple::Certificate PREFIX = purple_certificate_ |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
38 PROTOTYPES: ENABLE |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
39 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
40 BOOT: |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
41 { |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
42 HV *stash = gv_stashpv("Purple::Certificate", 1); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
43 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
44 static const constiv *civ, const_iv[] = { |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
45 #define const_iv(name) {#name, (IV)PURPLE_CERTIFICATE_##name} |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
46 const_iv(INVALID), |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
47 const_iv(VALID), |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
48 }; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
49 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
50 for (civ = const_iv + sizeof(const_iv) / sizeof(const_iv[0]); civ-- > const_iv; ) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
51 newCONSTSUB(stash, (char *)civ->name, newSViv(civ->iv)); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
52 } |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
53 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
54 void |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
55 purple_certificate_add_ca_search_path(path) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
56 const char* path |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
57 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
58 gboolean |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
59 purple_certificate_check_subject_name(crt, name) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
60 Purple::Certificate crt |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
61 const gchar* name |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
62 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
63 Purple::Certificate |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
64 purple_certificate_copy(crt) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
65 Purple::Certificate crt |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
66 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
67 void |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
68 purple_certificate_destroy(crt) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
69 Purple::Certificate crt |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
70 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
71 ## changed order of arguments, so that $cert->export($file) could be used |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
72 gboolean |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
73 purple_certificate_export(crt, filename) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
74 const gchar* filename |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
75 Purple::Certificate crt |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
76 C_ARGS: |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
77 filename, crt |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
78 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
79 Purple::Certificate::Pool |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
80 purple_certificate_find_pool(scheme_name, pool_name) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
81 const gchar* scheme_name |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
82 const gchar* pool_name |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
83 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
84 Purple::Certificate::Scheme |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
85 purple_certificate_find_scheme(name) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
86 const gchar* name |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
87 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
88 Purple::Certificate::Verifier |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
89 purple_certificate_find_verifier(scheme_name, ver_name) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
90 const gchar* scheme_name |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
91 const gchar* ver_name |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
92 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
93 Purple::Handle |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
94 purple_certificate_get_handle() |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
95 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
96 gchar_own* |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
97 purple_certificate_get_issuer_unique_id(crt) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
98 Purple::Certificate crt |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
99 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
100 gchar_own* |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
101 purple_certificate_get_subject_name(crt) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
102 Purple::Certificate crt |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
103 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
104 gchar_own* |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
105 purple_certificate_get_unique_id(crt) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
106 Purple::Certificate crt |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
107 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
108 Purple::Certificate |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
109 purple_certificate_import(scheme, filename) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
110 Purple::Certificate::Scheme scheme |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
111 const gchar* filename |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
112 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
113 gboolean |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
114 purple_certificate_register_pool(pool) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
115 Purple::Certificate::Pool pool |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
116 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
117 gboolean |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
118 purple_certificate_register_scheme(scheme) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
119 Purple::Certificate::Scheme scheme |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
120 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
121 gboolean |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
122 purple_certificate_register_verifier(vr) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
123 Purple::Certificate::Verifier vr |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
124 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
125 gboolean |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
126 purple_certificate_signed_by(crt, issuer) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
127 Purple::Certificate crt |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
128 Purple::Certificate issuer |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
129 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
130 gboolean |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
131 purple_certificate_unregister_pool(pool) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
132 Purple::Certificate::Pool pool |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
133 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
134 gboolean |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
135 purple_certificate_unregister_scheme(scheme) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
136 Purple::Certificate::Scheme scheme |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
137 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
138 gboolean |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
139 purple_certificate_unregister_verifier(vr) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
140 Purple::Certificate::Verifier vr |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
141 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
142 void |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
143 purple_certificate_verify_complete(vrq, st) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
144 Purple::Certificate::VerificationRequest vrq |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
145 Purple::Certificate::VerificationStatus st |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
146 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
147 gboolean |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
148 purple_certificate_get_times(crt, OUTLIST time_t activation, OUTLIST time_t expiration) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
149 Purple::Certificate crt |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
150 PROTOTYPE: $ |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
151 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
152 void |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
153 purple_certificate_destroy_list(...) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
154 PREINIT: |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
155 GList* l = NULL; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
156 int i = 0; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
157 CODE: |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
158 for(i = 0; i < items; i++) { /* PurpleCertificate */ |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
159 l = g_list_prepend(l, purple_perl_ref_object(ST(i))); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
160 } |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
161 purple_certificate_destroy_list(l); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
162 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
163 void |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
164 purple_certificate_get_pools() |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
165 PREINIT: |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
166 GList *l; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
167 PPCODE: |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
168 for(l = purple_certificate_get_pools(); l; l = l->next) { |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
169 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::Certificate::Pool"))); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
170 } |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
171 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
172 void |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
173 purple_certificate_get_schemes() |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
174 PREINIT: |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
175 GList *l; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
176 PPCODE: |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
177 for(l = purple_certificate_get_schemes(); l; l = l->next) { |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
178 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::Certificate::Scheme"))); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
179 } |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
180 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
181 void |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
182 purple_certificate_get_verifiers() |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
183 PREINIT: |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
184 GList *l; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
185 PPCODE: |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
186 for(l = purple_certificate_get_verifiers(); l; l = l->next) { |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
187 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::Certificate::Verifier"))); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
188 } |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
189 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
190 void |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
191 purple_certificate_check_signature_chain(...) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
192 PREINIT: |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
193 GList *l = NULL; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
194 gboolean ret; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
195 int i; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
196 PPCODE: |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
197 for(i = 0; i < items; i++) { /* PurpleCertificate */ |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
198 l = g_list_prepend(l, purple_perl_ref_object(ST(i))); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
199 } |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
200 l = g_list_reverse(l); |
32212
1bcedeb32bb4
Remove the old deprecated purple_certificate_check_signature_chain.
andrew.victor@mxit.com
parents:
26935
diff
changeset
|
201 ret = purple_certificate_check_signature_chain(l, NULL); |
23658
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
202 g_list_free(l); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
203 if(ret) XSRETURN_YES; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
204 XSRETURN_NO; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
205 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
206 SV* |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
207 purple_certificate_get_fingerprint_sha1(crt) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
208 Purple::Certificate crt |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
209 PREINIT: |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
210 GByteArray *gba = NULL; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
211 CODE: |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
212 gba = purple_certificate_get_fingerprint_sha1(crt); |
26935
31f65046b92d
Various perl warning fixes as well as real fixes to gconstpointer functions
Paul Aurich <paul@darkrain42.org>
parents:
24700
diff
changeset
|
213 RETVAL = newSVpv((gchar *)gba->data, gba->len); |
23658
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
214 g_byte_array_free(gba, TRUE); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
215 OUTPUT: |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
216 RETVAL |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
217 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
218 void |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
219 purple_certificate_verify(verifier, subject_name, cert_chain, cb, cb_data) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
220 Purple::Certificate::Verifier verifier |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
221 const gchar* subject_name |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
222 AV* cert_chain |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
223 CV *cb |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
224 SV *cb_data |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
225 PREINIT: |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
226 GList *l = NULL; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
227 int len = 0, i = 0; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
228 struct cb_data *d = NULL; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
229 PPCODE: |
24700
bf2ca2c5ac40
Use av_len in the same manner as everywhere else, for consistency.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
23658
diff
changeset
|
230 len = av_len(cert_chain); |
bf2ca2c5ac40
Use av_len in the same manner as everywhere else, for consistency.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
23658
diff
changeset
|
231 for(i = 0; i <= len; i++) { |
23658
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
232 SV **sv = av_fetch(cert_chain, i, 0); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
233 if(!sv || !purple_perl_is_ref_object(*sv)) { |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
234 g_list_free(l); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
235 warn("Purple::Certificate::verify: cert_chain: non-purple object in array..."); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
236 XSRETURN_UNDEF; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
237 } |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
238 l = g_list_prepend(l, purple_perl_ref_object(*sv)); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
239 } |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
240 l = g_list_reverse(l); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
241 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
242 d = g_new0(struct cb_data, 1); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
243 d->cb = newSVsv(ST(3)); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
244 d->user_data = newSVsv(cb_data); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
245 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
246 purple_certificate_verify(verifier, subject_name, l, (PurpleCertificateVerifiedCallback) cb_cert_verify, d); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
247 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
248 g_list_free(l); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
249 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
250 MODULE = Purple::Certificate PACKAGE = Purple::Certificate::Pool PREFIX = purple_certificate_pool_ |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
251 PROTOTYPES: ENABLE |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
252 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
253 void |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
254 purple_certificate_pool_get_idlist(pool) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
255 Purple::Certificate::Pool pool |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
256 PREINIT: |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
257 GList *l, *b; |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
258 PPCODE: |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
259 b = purple_certificate_pool_get_idlist(pool); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
260 for(l = b; l; l = l->next) { |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
261 XPUSHs(sv_2mortal(newSVpv(l->data, 0))); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
262 } |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
263 purple_certificate_pool_destroy_idlist(b); |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
264 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
265 gboolean |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
266 purple_certificate_pool_contains(pool, id) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
267 Purple::Certificate::Pool pool |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
268 const gchar* id |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
269 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
270 gboolean |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
271 purple_certificate_pool_delete(pool, id) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
272 Purple::Certificate::Pool pool |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
273 const gchar* id |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
274 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
275 Purple::Certificate::Scheme |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
276 purple_certificate_pool_get_scheme(pool) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
277 Purple::Certificate::Pool pool |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
278 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
279 gchar_own* |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
280 purple_certificate_pool_mkpath(pool, id) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
281 Purple::Certificate::Pool pool |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
282 const gchar* id |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
283 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
284 Purple::Certificate |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
285 purple_certificate_pool_retrieve(pool, id) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
286 Purple::Certificate::Pool pool |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
287 const gchar* id |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
288 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
289 gboolean |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
290 purple_certificate_pool_store(pool, id, crt) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
291 Purple::Certificate::Pool pool |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
292 const gchar* id |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
293 Purple::Certificate crt |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
294 |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
295 gboolean |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
296 purple_certificate_pool_usable(pool) |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
297 Purple::Certificate::Pool pool |
9d7ebd28d339
Another Perl patch from Zsombor Welker to add more functions.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
diff
changeset
|
298 |