Mercurial > pidgin.yaz
annotate libpurple/protocols/oscar/clientlogin.c @ 29871:6d2ba42595fe
oscar: Fix a race condition that leads to a crash.
With SSL enabled, if we start connecting and something calls
purple_account_disconnect between when an SSL flap connection is started
and when the connection is actually established, it isn't properly
cleaned up (and we try to close the flap), which leads to free-after-use.
You can simulate this by adding a timeout-triggered disconnect to the
end of oscar_connect_to_bos.
[02/22/10 17:11:51] <libpurple/oscar> Destroying oscar connection of type 0x0002. Disconnect reason is 0
[02/22/10 17:11:51] <libpurple/oscar> Disconnected. Code is 0x0000 and msg is
(hiicq:17126): GLib-WARNING **: giounix.c:400Error while getting flags for FD: Bad file descriptor (9)
[02/22/10 17:11:51] <libpurple/oscar> Scheduling destruction of FLAP connection of type 0x0002
[02/22/10 17:11:51] <libpurple/oscar> Signed off.
...
[02/22/10 17:11:51] <libpurple/oscar> Destroying oscar connection of type 0x7261. Disconnect reason is 1668179315
author | Paul Aurich <paul@darkrain42.org> |
---|---|
date | Mon, 22 Feb 2010 17:53:38 +0000 |
parents | fa8a25b46252 |
children | 519905ba5f75 |
rev | line source |
---|---|
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
1 /* |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
2 * Purple's oscar protocol plugin |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
3 * This file is the legal property of its developers. |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
4 * Please see the AUTHORS file distributed alongside this file. |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
5 * |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
6 * This library is free software; you can redistribute it and/or |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
7 * modify it under the terms of the GNU Lesser General Public |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
8 * License as published by the Free Software Foundation; either |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
9 * version 2 of the License, or (at your option) any later version. |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
10 * |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
11 * This library is distributed in the hope that it will be useful, |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
14 * Lesser General Public License for more details. |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
15 * |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
16 * You should have received a copy of the GNU Lesser General Public |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
17 * License along with this library; if not, write to the Free Software |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
18 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02111-1301 USA |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
19 */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
20 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
21 /** |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
22 * This file implements AIM's clientLogin procedure for authenticating |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
23 * users. This replaces the older MD5-based and XOR-based |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
24 * authentication methods that use SNAC family 0x0017. |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
25 * |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
26 * This doesn't use SNACs or FLAPs at all. It makes http and https |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
27 * POSTs to AOL to validate the user based on the password they |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
28 * provided to us. Upon successful authentication we request a |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
29 * connection to the BOS server by calling startOSCARsession. The |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
30 * AOL server gives us the hostname and port number to use, as well |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
31 * as the cookie to use to authenticate to the BOS server. And then |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
32 * everything else is the same as with BUCP. |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
33 * |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
34 * For details, see: |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
35 * http://dev.aol.com/aim/oscar/#AUTH |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
36 * http://dev.aol.com/authentication_for_clients |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
37 */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
38 |
29152
259bbfb423d4
Fix all the remaining files for which internal.h doesn't end up being the first include.
Paul Aurich <paul@darkrain42.org>
parents:
29146
diff
changeset
|
39 #include "oscar.h" |
259bbfb423d4
Fix all the remaining files for which internal.h doesn't end up being the first include.
Paul Aurich <paul@darkrain42.org>
parents:
29146
diff
changeset
|
40 #include "oscarcommon.h" |
259bbfb423d4
Fix all the remaining files for which internal.h doesn't end up being the first include.
Paul Aurich <paul@darkrain42.org>
parents:
29146
diff
changeset
|
41 |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
42 #include "cipher.h" |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
43 #include "core.h" |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
44 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
45 #define URL_CLIENT_LOGIN "https://api.screenname.aol.com/auth/clientLogin" |
29796
d932f43cde86
Change clientLogin to use HTTPS, since the hash calculation appears fixed now.
Paul Aurich <paul@darkrain42.org>
parents:
29386
diff
changeset
|
46 #define URL_START_OSCAR_SESSION "https://api.oscar.aol.com/aim/startOSCARSession" |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
47 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
48 /* |
27502
4813810ea7d4
Allow UIs to specify their own AOL client key
Mark Doliner <mark@kingant.net>
parents:
27463
diff
changeset
|
49 * Using clientLogin requires a developer ID. This key is for libpurple. |
4813810ea7d4
Allow UIs to specify their own AOL client key
Mark Doliner <mark@kingant.net>
parents:
27463
diff
changeset
|
50 * It is the default key for all libpurple-based clients. AOL encourages |
4813810ea7d4
Allow UIs to specify their own AOL client key
Mark Doliner <mark@kingant.net>
parents:
27463
diff
changeset
|
51 * UIs (especially ones with lots of users) to override this with their |
4813810ea7d4
Allow UIs to specify their own AOL client key
Mark Doliner <mark@kingant.net>
parents:
27463
diff
changeset
|
52 * own key. This key is owned by the AIM account "markdoliner" |
4813810ea7d4
Allow UIs to specify their own AOL client key
Mark Doliner <mark@kingant.net>
parents:
27463
diff
changeset
|
53 * |
4813810ea7d4
Allow UIs to specify their own AOL client key
Mark Doliner <mark@kingant.net>
parents:
27463
diff
changeset
|
54 * Keys can be managed at http://developer.aim.com/manageKeys.jsp |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
55 */ |
27502
4813810ea7d4
Allow UIs to specify their own AOL client key
Mark Doliner <mark@kingant.net>
parents:
27463
diff
changeset
|
56 #define DEFAULT_CLIENT_KEY "ma15d7JTxbmVG-RP" |
4813810ea7d4
Allow UIs to specify their own AOL client key
Mark Doliner <mark@kingant.net>
parents:
27463
diff
changeset
|
57 |
4813810ea7d4
Allow UIs to specify their own AOL client key
Mark Doliner <mark@kingant.net>
parents:
27463
diff
changeset
|
58 static const char *get_client_key(OscarData *od) |
4813810ea7d4
Allow UIs to specify their own AOL client key
Mark Doliner <mark@kingant.net>
parents:
27463
diff
changeset
|
59 { |
27504
4f24d5da4cb3
Create a oscar_get_ui_info_string() function that looks up a value in the
Mark Doliner <mark@kingant.net>
parents:
27502
diff
changeset
|
60 return oscar_get_ui_info_string( |
4f24d5da4cb3
Create a oscar_get_ui_info_string() function that looks up a value in the
Mark Doliner <mark@kingant.net>
parents:
27502
diff
changeset
|
61 od->icq ? "prpl-icq-clientkey" : "prpl-aim-clientkey", |
4f24d5da4cb3
Create a oscar_get_ui_info_string() function that looks up a value in the
Mark Doliner <mark@kingant.net>
parents:
27502
diff
changeset
|
62 DEFAULT_CLIENT_KEY); |
27502
4813810ea7d4
Allow UIs to specify their own AOL client key
Mark Doliner <mark@kingant.net>
parents:
27463
diff
changeset
|
63 } |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
64 |
29300
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
65 static gchar *generate_error_message(xmlnode *resp, const char *url) |
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
66 { |
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
67 xmlnode *text; |
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
68 gchar *err = NULL; |
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
69 gchar *details = NULL; |
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
70 |
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
71 if (resp && (text = xmlnode_get_child(resp, "statusText"))) { |
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
72 details = xmlnode_get_data(text); |
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
73 } |
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
74 |
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
75 if (details && *details) { |
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
76 err = g_strdup_printf(_("Received unexpected response from %s: %s"), url, details); |
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
77 } else { |
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
78 err = g_strdup_printf(_("Received unexpected response from %s"), url); |
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
79 } |
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
80 |
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
81 g_free(details); |
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
82 return err; |
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
83 } |
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
84 |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
85 /** |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
86 * @return A null-terminated base64 encoded version of the HMAC |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
87 * calculated using the given key and data. |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
88 */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
89 static gchar *hmac_sha256(const char *key, const char *message) |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
90 { |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
91 PurpleCipherContext *context; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
92 guchar digest[32]; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
93 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
94 context = purple_cipher_context_new_by_name("hmac", NULL); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
95 purple_cipher_context_set_option(context, "hash", "sha256"); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
96 purple_cipher_context_set_key(context, (guchar *)key); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
97 purple_cipher_context_append(context, (guchar *)message, strlen(message)); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
98 purple_cipher_context_digest(context, sizeof(digest), digest, NULL); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
99 purple_cipher_context_destroy(context); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
100 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
101 return purple_base64_encode(digest, sizeof(digest)); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
102 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
103 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
104 /** |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
105 * @return A base-64 encoded HMAC-SHA256 signature created using the |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
106 * technique documented at |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
107 * http://dev.aol.com/authentication_for_clients#signing |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
108 */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
109 static gchar *generate_signature(const char *method, const char *url, const char *parameters, const char *session_key) |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
110 { |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
111 char *encoded_url, *signature_base_string, *signature; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
112 const char *encoded_parameters; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
113 |
28619
79c14adf9669
Change purple_url_encode() to not encode . _ - ~ because it's not
Mark Doliner <mark@kingant.net>
parents:
28339
diff
changeset
|
114 encoded_url = g_strdup(purple_url_encode(url)); |
79c14adf9669
Change purple_url_encode() to not encode . _ - ~ because it's not
Mark Doliner <mark@kingant.net>
parents:
28339
diff
changeset
|
115 encoded_parameters = purple_url_encode(parameters); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
116 signature_base_string = g_strdup_printf("%s&%s&%s", |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
117 method, encoded_url, encoded_parameters); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
118 g_free(encoded_url); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
119 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
120 signature = hmac_sha256(session_key, signature_base_string); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
121 g_free(signature_base_string); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
122 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
123 return signature; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
124 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
125 |
28884
17617d892bc4
oscar: Properly support TLS when using clientLogin.
Paul Aurich <paul@darkrain42.org>
parents:
28619
diff
changeset
|
126 static gboolean parse_start_oscar_session_response(PurpleConnection *gc, const gchar *response, gsize response_len, char **host, unsigned short *port, char **cookie, char **tls_certname) |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
127 { |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
128 xmlnode *response_node, *tmp_node, *data_node; |
28884
17617d892bc4
oscar: Properly support TLS when using clientLogin.
Paul Aurich <paul@darkrain42.org>
parents:
28619
diff
changeset
|
129 xmlnode *host_node = NULL, *port_node = NULL, *cookie_node = NULL, *tls_node = NULL; |
17617d892bc4
oscar: Properly support TLS when using clientLogin.
Paul Aurich <paul@darkrain42.org>
parents:
28619
diff
changeset
|
130 gboolean use_tls; |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
131 char *tmp; |
28897
546dcce6f780
oscar: According to the online docs, statusCode 607 is rate limit (confirmed
Paul Aurich <paul@darkrain42.org>
parents:
28885
diff
changeset
|
132 guint code; |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
133 |
28884
17617d892bc4
oscar: Properly support TLS when using clientLogin.
Paul Aurich <paul@darkrain42.org>
parents:
28619
diff
changeset
|
134 use_tls = purple_account_get_bool(purple_connection_get_account(gc), "use_ssl", OSCAR_DEFAULT_USE_SSL); |
17617d892bc4
oscar: Properly support TLS when using clientLogin.
Paul Aurich <paul@darkrain42.org>
parents:
28619
diff
changeset
|
135 |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
136 /* Parse the response as XML */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
137 response_node = xmlnode_from_str(response, response_len); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
138 if (response_node == NULL) |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
139 { |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
140 char *msg; |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
141 purple_debug_error("oscar", "startOSCARSession could not parse " |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
142 "response as XML: %s\n", response); |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
143 /* Note to translators: %s in this string is a URL */ |
29300
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
144 msg = generate_error_message(response_node, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
145 URL_START_OSCAR_SESSION); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
146 purple_connection_error_reason(gc, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
147 PURPLE_CONNECTION_ERROR_NETWORK_ERROR, msg); |
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
148 g_free(msg); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
149 return FALSE; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
150 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
151 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
152 /* Grab the necessary XML nodes */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
153 tmp_node = xmlnode_get_child(response_node, "statusCode"); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
154 data_node = xmlnode_get_child(response_node, "data"); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
155 if (data_node != NULL) { |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
156 host_node = xmlnode_get_child(data_node, "host"); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
157 port_node = xmlnode_get_child(data_node, "port"); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
158 cookie_node = xmlnode_get_child(data_node, "cookie"); |
28884
17617d892bc4
oscar: Properly support TLS when using clientLogin.
Paul Aurich <paul@darkrain42.org>
parents:
28619
diff
changeset
|
159 tls_node = xmlnode_get_child(data_node, "tlsCertName"); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
160 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
161 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
162 /* Make sure we have a status code */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
163 if (tmp_node == NULL || (tmp = xmlnode_get_data_unescaped(tmp_node)) == NULL) { |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
164 char *msg; |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
165 purple_debug_error("oscar", "startOSCARSession response was " |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
166 "missing statusCode: %s\n", response); |
29300
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
167 msg = generate_error_message(response_node, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
168 URL_START_OSCAR_SESSION); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
169 purple_connection_error_reason(gc, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
170 PURPLE_CONNECTION_ERROR_NETWORK_ERROR, msg); |
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
171 g_free(msg); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
172 xmlnode_free(response_node); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
173 return FALSE; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
174 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
175 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
176 /* Make sure the status code was 200 */ |
28897
546dcce6f780
oscar: According to the online docs, statusCode 607 is rate limit (confirmed
Paul Aurich <paul@darkrain42.org>
parents:
28885
diff
changeset
|
177 code = atoi(tmp); |
546dcce6f780
oscar: According to the online docs, statusCode 607 is rate limit (confirmed
Paul Aurich <paul@darkrain42.org>
parents:
28885
diff
changeset
|
178 if (code != 200) |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
179 { |
29800
fa8a25b46252
401/1014 is a bad signature (it's what I've been getting while testing startOSCARSession over https).
Paul Aurich <paul@darkrain42.org>
parents:
29797
diff
changeset
|
180 xmlnode *status_detail_node; |
fa8a25b46252
401/1014 is a bad signature (it's what I've been getting while testing startOSCARSession over https).
Paul Aurich <paul@darkrain42.org>
parents:
29797
diff
changeset
|
181 guint status_detail = 0; |
fa8a25b46252
401/1014 is a bad signature (it's what I've been getting while testing startOSCARSession over https).
Paul Aurich <paul@darkrain42.org>
parents:
29797
diff
changeset
|
182 |
fa8a25b46252
401/1014 is a bad signature (it's what I've been getting while testing startOSCARSession over https).
Paul Aurich <paul@darkrain42.org>
parents:
29797
diff
changeset
|
183 status_detail_node = xmlnode_get_child(response_node, |
fa8a25b46252
401/1014 is a bad signature (it's what I've been getting while testing startOSCARSession over https).
Paul Aurich <paul@darkrain42.org>
parents:
29797
diff
changeset
|
184 "statusDetailCode"); |
fa8a25b46252
401/1014 is a bad signature (it's what I've been getting while testing startOSCARSession over https).
Paul Aurich <paul@darkrain42.org>
parents:
29797
diff
changeset
|
185 if (status_detail_node) { |
fa8a25b46252
401/1014 is a bad signature (it's what I've been getting while testing startOSCARSession over https).
Paul Aurich <paul@darkrain42.org>
parents:
29797
diff
changeset
|
186 gchar *data = xmlnode_get_data(status_detail_node); |
fa8a25b46252
401/1014 is a bad signature (it's what I've been getting while testing startOSCARSession over https).
Paul Aurich <paul@darkrain42.org>
parents:
29797
diff
changeset
|
187 if (data) { |
fa8a25b46252
401/1014 is a bad signature (it's what I've been getting while testing startOSCARSession over https).
Paul Aurich <paul@darkrain42.org>
parents:
29797
diff
changeset
|
188 status_detail = atoi(data); |
fa8a25b46252
401/1014 is a bad signature (it's what I've been getting while testing startOSCARSession over https).
Paul Aurich <paul@darkrain42.org>
parents:
29797
diff
changeset
|
189 g_free(data); |
fa8a25b46252
401/1014 is a bad signature (it's what I've been getting while testing startOSCARSession over https).
Paul Aurich <paul@darkrain42.org>
parents:
29797
diff
changeset
|
190 } |
fa8a25b46252
401/1014 is a bad signature (it's what I've been getting while testing startOSCARSession over https).
Paul Aurich <paul@darkrain42.org>
parents:
29797
diff
changeset
|
191 } |
fa8a25b46252
401/1014 is a bad signature (it's what I've been getting while testing startOSCARSession over https).
Paul Aurich <paul@darkrain42.org>
parents:
29797
diff
changeset
|
192 |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
193 purple_debug_error("oscar", "startOSCARSession response statusCode " |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
194 "was %s: %s\n", tmp, response); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
195 |
29800
fa8a25b46252
401/1014 is a bad signature (it's what I've been getting while testing startOSCARSession over https).
Paul Aurich <paul@darkrain42.org>
parents:
29797
diff
changeset
|
196 if ((code == 401 && status_detail != 1014) || code == 607) |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
197 purple_connection_error_reason(gc, |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
198 PURPLE_CONNECTION_ERROR_OTHER_ERROR, |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
199 _("You have been connecting and disconnecting too " |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
200 "frequently. Wait ten minutes and try again. If " |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
201 "you continue to try, you will need to wait even " |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
202 "longer.")); |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
203 else { |
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
204 char *msg; |
29300
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
205 msg = generate_error_message(response_node, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
206 URL_START_OSCAR_SESSION); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
207 purple_connection_error_reason(gc, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
208 PURPLE_CONNECTION_ERROR_OTHER_ERROR, msg); |
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
209 g_free(msg); |
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
210 } |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
211 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
212 g_free(tmp); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
213 xmlnode_free(response_node); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
214 return FALSE; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
215 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
216 g_free(tmp); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
217 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
218 /* Make sure we have everything else */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
219 if (data_node == NULL || host_node == NULL || |
28884
17617d892bc4
oscar: Properly support TLS when using clientLogin.
Paul Aurich <paul@darkrain42.org>
parents:
28619
diff
changeset
|
220 port_node == NULL || cookie_node == NULL || |
17617d892bc4
oscar: Properly support TLS when using clientLogin.
Paul Aurich <paul@darkrain42.org>
parents:
28619
diff
changeset
|
221 (use_tls && tls_node == NULL)) |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
222 { |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
223 char *msg; |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
224 purple_debug_error("oscar", "startOSCARSession response was missing " |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
225 "something: %s\n", response); |
29300
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
226 msg = generate_error_message(response_node, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
227 URL_START_OSCAR_SESSION); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
228 purple_connection_error_reason(gc, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
229 PURPLE_CONNECTION_ERROR_NETWORK_ERROR, msg); |
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
230 g_free(msg); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
231 xmlnode_free(response_node); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
232 return FALSE; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
233 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
234 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
235 /* Extract data from the XML */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
236 *host = xmlnode_get_data_unescaped(host_node); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
237 tmp = xmlnode_get_data_unescaped(port_node); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
238 *cookie = xmlnode_get_data_unescaped(cookie_node); |
28884
17617d892bc4
oscar: Properly support TLS when using clientLogin.
Paul Aurich <paul@darkrain42.org>
parents:
28619
diff
changeset
|
239 |
17617d892bc4
oscar: Properly support TLS when using clientLogin.
Paul Aurich <paul@darkrain42.org>
parents:
28619
diff
changeset
|
240 if (use_tls) |
17617d892bc4
oscar: Properly support TLS when using clientLogin.
Paul Aurich <paul@darkrain42.org>
parents:
28619
diff
changeset
|
241 *tls_certname = xmlnode_get_data_unescaped(tls_node); |
17617d892bc4
oscar: Properly support TLS when using clientLogin.
Paul Aurich <paul@darkrain42.org>
parents:
28619
diff
changeset
|
242 |
28885
7963477c2019
oscar: Pretty sure this was a typo; cookie is a char ** (passed in as arg).
Paul Aurich <paul@darkrain42.org>
parents:
28884
diff
changeset
|
243 if (*host == NULL || **host == '\0' || tmp == NULL || *tmp == '\0' || *cookie == NULL || **cookie == '\0' || |
28884
17617d892bc4
oscar: Properly support TLS when using clientLogin.
Paul Aurich <paul@darkrain42.org>
parents:
28619
diff
changeset
|
244 (use_tls && (*tls_certname == NULL || **tls_certname == '\0'))) |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
245 { |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
246 char *msg; |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
247 purple_debug_error("oscar", "startOSCARSession response was missing " |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
248 "something: %s\n", response); |
29300
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
249 msg = generate_error_message(response_node, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
250 URL_START_OSCAR_SESSION); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
251 purple_connection_error_reason(gc, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
252 PURPLE_CONNECTION_ERROR_NETWORK_ERROR, msg); |
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
253 g_free(msg); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
254 g_free(*host); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
255 g_free(tmp); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
256 g_free(*cookie); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
257 xmlnode_free(response_node); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
258 return FALSE; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
259 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
260 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
261 *port = atoi(tmp); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
262 g_free(tmp); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
263 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
264 return TRUE; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
265 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
266 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
267 static void start_oscar_session_cb(PurpleUtilFetchUrlData *url_data, gpointer user_data, const gchar *url_text, gsize len, const gchar *error_message) |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
268 { |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
269 OscarData *od; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
270 PurpleConnection *gc; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
271 char *host, *cookie; |
28884
17617d892bc4
oscar: Properly support TLS when using clientLogin.
Paul Aurich <paul@darkrain42.org>
parents:
28619
diff
changeset
|
272 char *tls_certname = NULL; |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
273 unsigned short port; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
274 guint8 *cookiedata; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
275 gsize cookiedata_len; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
276 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
277 od = user_data; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
278 gc = od->gc; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
279 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
280 od->url_data = NULL; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
281 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
282 if (error_message != NULL || len == 0) { |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
283 gchar *tmp; |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
284 /* Note to translators: The first %s is a URL, the second is an |
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
285 error message. */ |
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
286 tmp = g_strdup_printf(_("Error requesting %s: %s"), |
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
287 URL_START_OSCAR_SESSION, error_message); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
288 purple_connection_error_reason(gc, |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
289 PURPLE_CONNECTION_ERROR_NETWORK_ERROR, tmp); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
290 g_free(tmp); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
291 return; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
292 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
293 |
28884
17617d892bc4
oscar: Properly support TLS when using clientLogin.
Paul Aurich <paul@darkrain42.org>
parents:
28619
diff
changeset
|
294 if (!parse_start_oscar_session_response(gc, url_text, len, &host, &port, &cookie, &tls_certname)) |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
295 return; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
296 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
297 cookiedata = purple_base64_decode(cookie, &cookiedata_len); |
28884
17617d892bc4
oscar: Properly support TLS when using clientLogin.
Paul Aurich <paul@darkrain42.org>
parents:
28619
diff
changeset
|
298 oscar_connect_to_bos(gc, od, host, port, cookiedata, cookiedata_len, tls_certname); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
299 g_free(cookiedata); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
300 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
301 g_free(host); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
302 g_free(cookie); |
28884
17617d892bc4
oscar: Properly support TLS when using clientLogin.
Paul Aurich <paul@darkrain42.org>
parents:
28619
diff
changeset
|
303 g_free(tls_certname); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
304 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
305 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
306 static void send_start_oscar_session(OscarData *od, const char *token, const char *session_key, time_t hosttime) |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
307 { |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
308 char *query_string, *signature, *url; |
29797
66a15a093e61
Allow clientLogin POST/GETs to use a configured proxy.
Paul Aurich <paul@darkrain42.org>
parents:
29796
diff
changeset
|
309 PurpleAccount *account; |
66a15a093e61
Allow clientLogin POST/GETs to use a configured proxy.
Paul Aurich <paul@darkrain42.org>
parents:
29796
diff
changeset
|
310 gboolean use_tls; |
66a15a093e61
Allow clientLogin POST/GETs to use a configured proxy.
Paul Aurich <paul@darkrain42.org>
parents:
29796
diff
changeset
|
311 |
66a15a093e61
Allow clientLogin POST/GETs to use a configured proxy.
Paul Aurich <paul@darkrain42.org>
parents:
29796
diff
changeset
|
312 account = purple_connection_get_account(od->gc); |
66a15a093e61
Allow clientLogin POST/GETs to use a configured proxy.
Paul Aurich <paul@darkrain42.org>
parents:
29796
diff
changeset
|
313 use_tls = purple_account_get_bool(account, "use_ssl", OSCAR_DEFAULT_USE_SSL); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
314 |
29123
5e11c572d730
This magic number is documented in oscar.h, but it makes sense to
Mark Doliner <mark@kingant.net>
parents:
29122
diff
changeset
|
315 /* |
5e11c572d730
This magic number is documented in oscar.h, but it makes sense to
Mark Doliner <mark@kingant.net>
parents:
29122
diff
changeset
|
316 * Construct the GET parameters. 0x00000611 is the distid given to |
5e11c572d730
This magic number is documented in oscar.h, but it makes sense to
Mark Doliner <mark@kingant.net>
parents:
29122
diff
changeset
|
317 * us by AOL for use as the default libpurple distid. |
5e11c572d730
This magic number is documented in oscar.h, but it makes sense to
Mark Doliner <mark@kingant.net>
parents:
29122
diff
changeset
|
318 */ |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
319 query_string = g_strdup_printf("a=%s" |
29122
41656cf6af7a
Send our distid when calling startOSCARSession, as request by AOL
Mark Doliner <mark@kingant.net>
parents:
28897
diff
changeset
|
320 "&distId=%d" |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
321 "&f=xml" |
27502
4813810ea7d4
Allow UIs to specify their own AOL client key
Mark Doliner <mark@kingant.net>
parents:
27463
diff
changeset
|
322 "&k=%s" |
27522
036d94041e09
Fix this compiler warning:
Stu Tomlinson <stu@nosnilmot.com>
parents:
27504
diff
changeset
|
323 "&ts=%" PURPLE_TIME_T_MODIFIER |
28884
17617d892bc4
oscar: Properly support TLS when using clientLogin.
Paul Aurich <paul@darkrain42.org>
parents:
28619
diff
changeset
|
324 "&useTLS=%d", |
29122
41656cf6af7a
Send our distid when calling startOSCARSession, as request by AOL
Mark Doliner <mark@kingant.net>
parents:
28897
diff
changeset
|
325 purple_url_encode(token), |
41656cf6af7a
Send our distid when calling startOSCARSession, as request by AOL
Mark Doliner <mark@kingant.net>
parents:
28897
diff
changeset
|
326 oscar_get_ui_info_int(od->icq ? "prpl-icq-distid" |
41656cf6af7a
Send our distid when calling startOSCARSession, as request by AOL
Mark Doliner <mark@kingant.net>
parents:
28897
diff
changeset
|
327 : "prpl-aim-distid", 0x00000611), |
41656cf6af7a
Send our distid when calling startOSCARSession, as request by AOL
Mark Doliner <mark@kingant.net>
parents:
28897
diff
changeset
|
328 get_client_key(od), hosttime, use_tls); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
329 signature = generate_signature("GET", URL_START_OSCAR_SESSION, |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
330 query_string, session_key); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
331 url = g_strdup_printf(URL_START_OSCAR_SESSION "?%s&sig_sha256=%s", |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
332 query_string, signature); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
333 g_free(query_string); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
334 g_free(signature); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
335 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
336 /* Make the request */ |
29797
66a15a093e61
Allow clientLogin POST/GETs to use a configured proxy.
Paul Aurich <paul@darkrain42.org>
parents:
29796
diff
changeset
|
337 od->url_data = purple_util_fetch_url_request_len_with_account(account, |
66a15a093e61
Allow clientLogin POST/GETs to use a configured proxy.
Paul Aurich <paul@darkrain42.org>
parents:
29796
diff
changeset
|
338 url, TRUE, NULL, FALSE, NULL, FALSE, -1, |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
339 start_oscar_session_cb, od); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
340 g_free(url); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
341 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
342 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
343 /** |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
344 * This function parses the given response from a clientLogin request |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
345 * and extracts the useful information. |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
346 * |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
347 * @param gc The PurpleConnection. If the response data does |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
348 * not indicate then purple_connection_error_reason() |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
349 * will be called to close this connection. |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
350 * @param response The response data from the clientLogin request. |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
351 * @param response_len The length of the above response, or -1 if |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
352 * @response is NUL terminated. |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
353 * @param token If parsing was successful then this will be set to |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
354 * a newly allocated string containing the token. The |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
355 * caller should g_free this string when it is finished |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
356 * with it. On failure this value will be untouched. |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
357 * @param secret If parsing was successful then this will be set to |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
358 * a newly allocated string containing the secret. The |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
359 * caller should g_free this string when it is finished |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
360 * with it. On failure this value will be untouched. |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
361 * @param hosttime If parsing was successful then this will be set to |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
362 * the time on the OpenAuth Server in seconds since the |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
363 * Unix epoch. On failure this value will be untouched. |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
364 * |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
365 * @return TRUE if the request was successful and we were able to |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
366 * extract all info we need. Otherwise FALSE. |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
367 */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
368 static gboolean parse_client_login_response(PurpleConnection *gc, const gchar *response, gsize response_len, char **token, char **secret, time_t *hosttime) |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
369 { |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
370 xmlnode *response_node, *tmp_node, *data_node; |
27282
a2508ac2e536
Silence some warnings from gcc on OS X. None of these were actually valid.
Paul Aurich <paul@darkrain42.org>
parents:
27272
diff
changeset
|
371 xmlnode *secret_node = NULL, *hosttime_node = NULL, *token_node = NULL, *tokena_node = NULL; |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
372 char *tmp; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
373 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
374 /* Parse the response as XML */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
375 response_node = xmlnode_from_str(response, response_len); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
376 if (response_node == NULL) |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
377 { |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
378 char *msg; |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
379 purple_debug_error("oscar", "clientLogin could not parse " |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
380 "response as XML: %s\n", response); |
29300
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
381 msg = generate_error_message(response_node, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
382 URL_CLIENT_LOGIN); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
383 purple_connection_error_reason(gc, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
384 PURPLE_CONNECTION_ERROR_NETWORK_ERROR, msg); |
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
385 g_free(msg); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
386 return FALSE; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
387 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
388 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
389 /* Grab the necessary XML nodes */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
390 tmp_node = xmlnode_get_child(response_node, "statusCode"); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
391 data_node = xmlnode_get_child(response_node, "data"); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
392 if (data_node != NULL) { |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
393 secret_node = xmlnode_get_child(data_node, "sessionSecret"); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
394 hosttime_node = xmlnode_get_child(data_node, "hostTime"); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
395 token_node = xmlnode_get_child(data_node, "token"); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
396 if (token_node != NULL) |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
397 tokena_node = xmlnode_get_child(token_node, "a"); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
398 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
399 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
400 /* Make sure we have a status code */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
401 if (tmp_node == NULL || (tmp = xmlnode_get_data_unescaped(tmp_node)) == NULL) { |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
402 char *msg; |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
403 purple_debug_error("oscar", "clientLogin response was " |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
404 "missing statusCode: %s\n", response); |
29300
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
405 msg = generate_error_message(response_node, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
406 URL_CLIENT_LOGIN); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
407 purple_connection_error_reason(gc, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
408 PURPLE_CONNECTION_ERROR_NETWORK_ERROR, msg); |
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
409 g_free(msg); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
410 xmlnode_free(response_node); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
411 return FALSE; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
412 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
413 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
414 /* Make sure the status code was 200 */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
415 if (strcmp(tmp, "200") != 0) |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
416 { |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
417 int status_code, status_detail_code = 0; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
418 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
419 status_code = atoi(tmp); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
420 g_free(tmp); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
421 tmp_node = xmlnode_get_child(response_node, "statusDetailCode"); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
422 if (tmp_node != NULL && (tmp = xmlnode_get_data_unescaped(tmp_node)) != NULL) { |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
423 status_detail_code = atoi(tmp); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
424 g_free(tmp); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
425 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
426 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
427 purple_debug_error("oscar", "clientLogin response statusCode " |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
428 "was %d (%d): %s\n", status_code, status_detail_code, response); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
429 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
430 if (status_code == 330 && status_detail_code == 3011) { |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
431 purple_connection_error_reason(gc, |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
432 PURPLE_CONNECTION_ERROR_AUTHENTICATION_FAILED, |
27463
f541583e31bd
More uniformity among disconnect error messages
Mark Doliner <mark@kingant.net>
parents:
27282
diff
changeset
|
433 _("Incorrect password")); |
29386
e1dd357fc494
Add back Paul's error message from revision 219b3128f3d96b126a9ed9aff2d2f3277e69dbd4
Mark Doliner <mark@kingant.net>
parents:
29300
diff
changeset
|
434 } else if (status_code == 330 && status_detail_code == 3015) { |
e1dd357fc494
Add back Paul's error message from revision 219b3128f3d96b126a9ed9aff2d2f3277e69dbd4
Mark Doliner <mark@kingant.net>
parents:
29300
diff
changeset
|
435 purple_connection_error_reason(gc, |
e1dd357fc494
Add back Paul's error message from revision 219b3128f3d96b126a9ed9aff2d2f3277e69dbd4
Mark Doliner <mark@kingant.net>
parents:
29300
diff
changeset
|
436 PURPLE_CONNECTION_ERROR_AUTHENTICATION_FAILED, |
e1dd357fc494
Add back Paul's error message from revision 219b3128f3d96b126a9ed9aff2d2f3277e69dbd4
Mark Doliner <mark@kingant.net>
parents:
29300
diff
changeset
|
437 _("Server requested that you fill out a CAPTCHA in order to " |
e1dd357fc494
Add back Paul's error message from revision 219b3128f3d96b126a9ed9aff2d2f3277e69dbd4
Mark Doliner <mark@kingant.net>
parents:
29300
diff
changeset
|
438 "sign in, but this client does not currently support CAPTCHAs.")); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
439 } else if (status_code == 401 && status_detail_code == 3019) { |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
440 purple_connection_error_reason(gc, |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
441 PURPLE_CONNECTION_ERROR_OTHER_ERROR, |
27463
f541583e31bd
More uniformity among disconnect error messages
Mark Doliner <mark@kingant.net>
parents:
27282
diff
changeset
|
442 _("AOL does not allow your screen name to authenticate here")); |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
443 } else { |
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
444 char *msg; |
29300
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
445 msg = generate_error_message(response_node, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
446 URL_CLIENT_LOGIN); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
447 purple_connection_error_reason(gc, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
448 PURPLE_CONNECTION_ERROR_OTHER_ERROR, msg); |
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
449 g_free(msg); |
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
450 } |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
451 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
452 xmlnode_free(response_node); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
453 return FALSE; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
454 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
455 g_free(tmp); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
456 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
457 /* Make sure we have everything else */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
458 if (data_node == NULL || secret_node == NULL || |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
459 token_node == NULL || tokena_node == NULL) |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
460 { |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
461 char *msg; |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
462 purple_debug_error("oscar", "clientLogin response was missing " |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
463 "something: %s\n", response); |
29300
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
464 msg = generate_error_message(response_node, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
465 URL_CLIENT_LOGIN); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
466 purple_connection_error_reason(gc, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
467 PURPLE_CONNECTION_ERROR_NETWORK_ERROR, msg); |
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
468 g_free(msg); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
469 xmlnode_free(response_node); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
470 return FALSE; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
471 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
472 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
473 /* Extract data from the XML */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
474 *token = xmlnode_get_data_unescaped(tokena_node); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
475 *secret = xmlnode_get_data_unescaped(secret_node); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
476 tmp = xmlnode_get_data_unescaped(hosttime_node); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
477 if (*token == NULL || **token == '\0' || *secret == NULL || **secret == '\0' || tmp == NULL || *tmp == '\0') |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
478 { |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
479 char *msg; |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
480 purple_debug_error("oscar", "clientLogin response was missing " |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
481 "something: %s\n", response); |
29300
c833ae72599b
oscar: Try to make the error message more verbose.
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
29152
diff
changeset
|
482 msg = generate_error_message(response_node, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
483 URL_CLIENT_LOGIN); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
484 purple_connection_error_reason(gc, |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
485 PURPLE_CONNECTION_ERROR_NETWORK_ERROR, msg); |
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
486 g_free(msg); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
487 g_free(*token); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
488 g_free(*secret); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
489 g_free(tmp); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
490 xmlnode_free(response_node); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
491 return FALSE; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
492 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
493 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
494 *hosttime = strtol(tmp, NULL, 10); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
495 g_free(tmp); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
496 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
497 xmlnode_free(response_node); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
498 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
499 return TRUE; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
500 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
501 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
502 static void client_login_cb(PurpleUtilFetchUrlData *url_data, gpointer user_data, const gchar *url_text, gsize len, const gchar *error_message) |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
503 { |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
504 OscarData *od; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
505 PurpleConnection *gc; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
506 char *token, *secret, *session_key; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
507 time_t hosttime; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
508 int password_len; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
509 char *password; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
510 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
511 od = user_data; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
512 gc = od->gc; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
513 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
514 od->url_data = NULL; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
515 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
516 if (error_message != NULL || len == 0) { |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
517 gchar *tmp; |
28339
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
518 tmp = g_strdup_printf(_("Error requesting %s: %s"), |
2987756bc600
Make the strings in this file more localizable
Mark Doliner <mark@kingant.net>
parents:
27522
diff
changeset
|
519 URL_CLIENT_LOGIN, error_message); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
520 purple_connection_error_reason(gc, |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
521 PURPLE_CONNECTION_ERROR_NETWORK_ERROR, tmp); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
522 g_free(tmp); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
523 return; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
524 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
525 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
526 if (!parse_client_login_response(gc, url_text, len, &token, &secret, &hosttime)) |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
527 return; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
528 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
529 password_len = strlen(purple_connection_get_password(gc)); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
530 password = g_strdup_printf("%.*s", |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
531 od->icq ? MIN(password_len, MAXICQPASSLEN) : password_len, |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
532 purple_connection_get_password(gc)); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
533 session_key = hmac_sha256(password, secret); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
534 g_free(password); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
535 g_free(secret); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
536 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
537 send_start_oscar_session(od, token, session_key, hosttime); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
538 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
539 g_free(token); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
540 g_free(session_key); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
541 } |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
542 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
543 /** |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
544 * This function sends a request to |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
545 * https://api.screenname.aol.com/auth/clientLogin with the user's |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
546 * username and password and receives the user's session key, which is |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
547 * used to request a connection to the BOSS server. |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
548 */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
549 void send_client_login(OscarData *od, const char *username) |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
550 { |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
551 PurpleConnection *gc; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
552 GString *request, *body; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
553 const char *tmp; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
554 char *password; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
555 int password_len; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
556 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
557 gc = od->gc; |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
558 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
559 /* |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
560 * We truncate ICQ passwords to 8 characters. There is probably a |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
561 * limit for AIM passwords, too, but we really only need to do |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
562 * this for ICQ because older ICQ clients let you enter a password |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
563 * as long as you wanted and then they truncated it silently. |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
564 * |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
565 * And we can truncate based on the number of bytes and not the |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
566 * number of characters because passwords for AIM and ICQ are |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
567 * supposed to be plain ASCII (I don't know if this has always been |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
568 * the case, though). |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
569 */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
570 tmp = purple_connection_get_password(gc); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
571 password_len = strlen(tmp); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
572 password = g_strndup(tmp, od->icq ? MIN(password_len, MAXICQPASSLEN) : password_len); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
573 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
574 /* Construct the body of the HTTP POST request */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
575 body = g_string_new(""); |
27502
4813810ea7d4
Allow UIs to specify their own AOL client key
Mark Doliner <mark@kingant.net>
parents:
27463
diff
changeset
|
576 g_string_append_printf(body, "devId=%s", get_client_key(od)); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
577 g_string_append_printf(body, "&f=xml"); |
28619
79c14adf9669
Change purple_url_encode() to not encode . _ - ~ because it's not
Mark Doliner <mark@kingant.net>
parents:
28339
diff
changeset
|
578 g_string_append_printf(body, "&pwd=%s", purple_url_encode(password)); |
79c14adf9669
Change purple_url_encode() to not encode . _ - ~ because it's not
Mark Doliner <mark@kingant.net>
parents:
28339
diff
changeset
|
579 g_string_append_printf(body, "&s=%s", purple_url_encode(username)); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
580 g_free(password); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
581 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
582 /* Construct an HTTP POST request */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
583 request = g_string_new("POST /auth/clientLogin HTTP/1.0\r\n" |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
584 "Connection: close\r\n" |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
585 "Accept: */*\r\n"); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
586 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
587 /* Tack on the body */ |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
588 g_string_append_printf(request, "Content-Type: application/x-www-form-urlencoded; charset=UTF-8\r\n"); |
27272
1a255e11c02b
Dear Compiler, Shut up!
Sadrul Habib Chowdhury <imadil@gmail.com>
parents:
27243
diff
changeset
|
589 g_string_append_printf(request, "Content-Length: %" G_GSIZE_FORMAT "\r\n\r\n", body->len); |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
590 g_string_append_len(request, body->str, body->len); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
591 g_string_free(body, TRUE); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
592 |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
593 /* Send the POST request */ |
29797
66a15a093e61
Allow clientLogin POST/GETs to use a configured proxy.
Paul Aurich <paul@darkrain42.org>
parents:
29796
diff
changeset
|
594 od->url_data = purple_util_fetch_url_request_len_with_account( |
66a15a093e61
Allow clientLogin POST/GETs to use a configured proxy.
Paul Aurich <paul@darkrain42.org>
parents:
29796
diff
changeset
|
595 purple_connection_get_account(gc), URL_CLIENT_LOGIN, |
66a15a093e61
Allow clientLogin POST/GETs to use a configured proxy.
Paul Aurich <paul@darkrain42.org>
parents:
29796
diff
changeset
|
596 TRUE, NULL, FALSE, request->str, FALSE, -1, |
27243
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
597 client_login_cb, od); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
598 g_string_free(request, TRUE); |
7054f810b0f9
Check in code that connects to oscar using clientLogin. This is the
Mark Doliner <mark@kingant.net>
parents:
diff
changeset
|
599 } |