Mercurial > pidgin.yaz
annotate plugins/ciphertest.c @ 11559:5909ea4e7746
[gaim-migrate @ 13823]
When a login error (wants_to_die) occurs, informs the user with gaim_notify_error
and disables the account. This way, it won't try reconnecting over and over again
with the wrong password while the user doesn't know what's happening.
committer: Tailor Script <tailor@pidgin.im>
author | Sean Egan <seanegan@gmail.com> |
---|---|
date | Tue, 20 Sep 2005 23:28:23 +0000 |
parents | bb0d7b719af2 |
children | cfc808463763 |
rev | line source |
---|---|
10684 | 1 /* |
2 * A plugin to test the ciphers that ship with gaim | |
3 * | |
4 * Copyright (C) 2004, Gary Kramlich <amc_grim@users.sf.net> | |
5 * | |
6 * This program is free software; you can redistribute it and/or | |
7 * modify it under the terms of the GNU General Public License as | |
8 * published by the Free Software Foundation; either version 2 of the | |
9 * License, or (at your option) any later version. | |
10 * | |
11 * This program is distributed in the hope that it will be useful, but | |
12 * WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
14 * General Public License for more details. | |
15 * | |
16 * You should have received a copy of the GNU General Public License | |
17 * along with this program; if not, write to the Free Software | |
18 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA | |
19 * 02111-1307, USA. | |
20 */ | |
21 | |
22 #ifdef HAVE_CONFIG_H | |
23 #include <config.h> | |
24 #endif | |
25 | |
26 #ifndef GAIM_PLUGINS | |
27 #define GAIM_PLUGINS | |
28 #endif | |
29 | |
30 #include "internal.h" | |
31 | |
32 #include <glib.h> | |
33 #include <string.h> | |
34 | |
35 #include "cipher.h" | |
36 #include "debug.h" | |
37 #include "plugin.h" | |
38 #include "version.h" | |
39 | |
40 struct test { | |
11183 | 41 const guchar *question; |
42 const guchar *answer; | |
10684 | 43 }; |
44 | |
45 /************************************************************************** | |
46 * MD5 Stuff | |
47 **************************************************************************/ | |
48 struct test md5_tests[8] = { | |
49 { "", "d41d8cd98f00b204e9800998ecf8427e"}, | |
50 { "a", "0cc175b9c0f1b6a831c399e269772661"}, | |
51 { "abc", "900150983cd24fb0d6963f7d28e17f72"}, | |
52 { "message digest", "f96b697d7cb7938d525a2f31aaf161d0"}, | |
53 { "abcdefghijklmnopqrstuvwxyz", "c3fcd3d76192e4007dfb496cca67e13b"}, | |
54 { "ABCDEFGHIJKLMNOPQRSTUVWXYZ" | |
55 "abcdefghijklmnopqrstuvwxyz" | |
56 "0123456789", "d174ab98d277d9f5a5611c2c9f419d9f"}, | |
57 {"123456789012345678901234567" | |
58 "890123456789012345678901234" | |
59 "56789012345678901234567890", "57edf4a22be3c955ac49da2e2107b67a"}, | |
60 { NULL, NULL } | |
61 }; | |
62 | |
63 static void | |
64 cipher_test_md5() { | |
65 GaimCipher *cipher; | |
66 GaimCipherContext *context; | |
67 gchar digest[32]; | |
10687
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
68 gboolean ret; |
10684 | 69 gint i = 0; |
70 | |
71 cipher = gaim_ciphers_find_cipher("md5"); | |
72 if(!cipher) { | |
73 gaim_debug_info("cipher-test", | |
74 "could not find md5 cipher, not testing\n"); | |
75 return; | |
76 } | |
77 | |
78 gaim_debug_info("cipher-test", "Running md5 tests\n"); | |
79 | |
80 context = gaim_cipher_context_new(cipher, NULL); | |
81 | |
82 while(md5_tests[i].answer) { | |
83 gaim_debug_info("cipher-test", "Test %02d:\n", i); | |
84 gaim_debug_info("cipher-test", "Testing '%s'\n", md5_tests[i].question); | |
85 | |
86 gaim_cipher_context_append(context, md5_tests[i].question, | |
87 strlen(md5_tests[i].question)); | |
88 | |
10687
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
89 ret = gaim_cipher_context_digest_to_str(context, sizeof(digest), |
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
90 digest, NULL); |
10684 | 91 |
10687
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
92 if(!ret) { |
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
93 gaim_debug_info("cipher-test", "failed\n"); |
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
94 } else { |
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
95 gaim_debug_info("cipher-test", "\tGot: %s\n", digest); |
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
96 gaim_debug_info("cipher-test", "\tWanted: %s\n", |
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
97 md5_tests[i].answer); |
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
98 } |
10684 | 99 |
100 gaim_cipher_context_reset(context, NULL); | |
101 i++; | |
102 } | |
103 | |
104 gaim_cipher_context_destroy(context); | |
105 | |
106 gaim_debug_info("cipher-test", "md5 tests completed\n\n"); | |
107 } | |
108 | |
109 /************************************************************************** | |
110 * SHA-1 stuff | |
111 **************************************************************************/ | |
112 struct test sha1_tests[5] = { | |
113 {"a", "86f7e437faa5a7fce15d1ddcb9eaeaea377667b8"}, | |
114 {"abc", "a9993e364706816aba3e25717850c26c9cd0d89d"} , | |
115 {"abcdbcdecdefdefgefghfghighijhijkijkljklmklmnlmnomnopnopq", "84983e441c3bd26ebaae4aa1f95129e5e54670f1"} , | |
116 {NULL, "34aa973cd4c4daa4f61eeb2bdbad27316534016f"}, | |
117 {NULL, NULL} | |
118 }; | |
119 | |
120 static void | |
121 cipher_test_sha1() { | |
122 GaimCipher *cipher; | |
123 GaimCipherContext *context; | |
124 gchar digest[40]; | |
125 gint i = 0; | |
10687
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
126 gboolean ret; |
10684 | 127 |
128 cipher = gaim_ciphers_find_cipher("sha1"); | |
129 if(!cipher) { | |
130 gaim_debug_info("cipher-test", | |
131 "could not find sha1 cipher, not testing\n"); | |
132 return; | |
133 } | |
134 | |
135 gaim_debug_info("cipher-test", "Running sha1 tests\n"); | |
136 | |
137 context = gaim_cipher_context_new(cipher, NULL); | |
138 | |
139 while(sha1_tests[i].answer) { | |
140 gaim_debug_info("cipher-test", "Test %02d:\n", i); | |
141 gaim_debug_info("cipher-test", "Testing '%s'\n", | |
142 (sha1_tests[i].question != NULL) ? | |
143 sha1_tests[i].question : "'a'x1000, 1000 times"); | |
144 | |
145 if(sha1_tests[i].question) { | |
146 gaim_cipher_context_append(context, sha1_tests[i].question, | |
147 strlen(sha1_tests[i].question)); | |
148 } else { | |
149 gint j; | |
11183 | 150 guchar buff[1000]; |
10684 | 151 |
152 memset(buff, 'a', 1000); | |
153 | |
154 for(j = 0; j < 1000; j++) | |
155 gaim_cipher_context_append(context, buff, 1000); | |
156 } | |
157 | |
10687
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
158 ret = gaim_cipher_context_digest_to_str(context, sizeof(digest), |
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
159 digest, NULL); |
10684 | 160 |
10687
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
161 if(!ret) { |
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
162 gaim_debug_info("cipher-test", "failed\n"); |
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
163 } else { |
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
164 gaim_debug_info("cipher-test", "\tGot: %s\n", digest); |
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
165 gaim_debug_info("cipher-test", "\tWanted: %s\n", |
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
166 sha1_tests[i].answer); |
b256ce6b85b8
[gaim-migrate @ 12235]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10684
diff
changeset
|
167 } |
10684 | 168 |
169 gaim_cipher_context_reset(context, NULL); | |
170 i++; | |
171 } | |
172 | |
173 gaim_cipher_context_destroy(context); | |
174 | |
175 gaim_debug_info("cipher-test", "sha1 tests completed\n\n"); | |
176 } | |
177 /************************************************************************** | |
178 * Plugin stuff | |
179 **************************************************************************/ | |
180 static gboolean | |
181 plugin_load(GaimPlugin *plugin) { | |
182 cipher_test_md5(); | |
183 cipher_test_sha1(); | |
184 | |
185 return TRUE; | |
186 } | |
187 | |
11033
50224ac8184d
[gaim-migrate @ 12919]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10687
diff
changeset
|
188 static gboolean |
50224ac8184d
[gaim-migrate @ 12919]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10687
diff
changeset
|
189 plugin_unload(GaimPlugin *plugin) { |
50224ac8184d
[gaim-migrate @ 12919]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10687
diff
changeset
|
190 return TRUE; |
50224ac8184d
[gaim-migrate @ 12919]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10687
diff
changeset
|
191 } |
50224ac8184d
[gaim-migrate @ 12919]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10687
diff
changeset
|
192 |
10684 | 193 static GaimPluginInfo info = |
194 { | |
195 GAIM_PLUGIN_MAGIC, | |
196 GAIM_MAJOR_VERSION, | |
197 GAIM_MINOR_VERSION, | |
198 GAIM_PLUGIN_STANDARD, /**< type */ | |
199 NULL, /**< ui_requirement */ | |
200 0, /**< flags */ | |
201 NULL, /**< dependencies */ | |
202 GAIM_PRIORITY_DEFAULT, /**< priority */ | |
203 | |
204 "core-cipher-test", /**< id */ | |
205 N_("Cipher Test"), /**< name */ | |
206 VERSION, /**< version */ | |
207 /** summary */ | |
208 N_("Tests the ciphers that ship with gaim."), | |
209 /** description */ | |
210 N_("Tests the ciphers that ship with gaim."), | |
211 "Gary Kramlich <amc_grim@users.sf.net>", /**< author */ | |
212 GAIM_WEBSITE, /**< homepage */ | |
213 | |
214 plugin_load, /**< load */ | |
11033
50224ac8184d
[gaim-migrate @ 12919]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10687
diff
changeset
|
215 plugin_unload, /**< unload */ |
10684 | 216 NULL, /**< destroy */ |
217 | |
218 NULL, /**< ui_info */ | |
219 NULL, /**< extra_info */ | |
220 NULL, | |
221 NULL | |
222 }; | |
223 | |
224 static void | |
225 init_plugin(GaimPlugin *plugin) { | |
226 } | |
227 | |
228 GAIM_INIT_PLUGIN(ciper_test, init_plugin, info) |