Mercurial > ~mikael > mcabber > hg
annotate mcabber/mcabber/otr.c @ 1909:9c14153e2580
Do not display unhandled IQ result messages to the log window
We display the message only in the debug log file, because these messages
are usually ignored anyway (ideally we would create a handler explicitly
when sending the initial IQ request).
Thanks to VarLog for the report!
| author | Mikael Berthe <mikael@lilotux.net> |
|---|---|
| date | Sun, 18 Apr 2010 14:14:05 +0200 |
| parents | e6d355e50d7a |
| children | 9fb1ccf291cc |
| rev | line source |
|---|---|
| 1299 | 1 /* |
|
1303
b6fdbfa6b219
Minor whitespace change
Mikael Berthe <mikael@lilotux.net>
parents:
1301
diff
changeset
|
2 * otr.c -- Off-The-Record Messaging for mcabber |
| 1299 | 3 * |
| 1599 | 4 * Copyright (C) 2007-2009 Frank Zschockelt <mcabber_otr@freakysoft.de> |
| 1299 | 5 * |
| 6 * This program is free software; you can redistribute it and/or modify | |
| 7 * it under the terms of the GNU General Public License as published by | |
| 8 * the Free Software Foundation; either version 2 of the License, or (at | |
| 9 * your option) any later version. | |
| 10 * | |
| 11 * This program is distributed in the hope that it will be useful, but | |
| 12 * WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
| 14 * General Public License for more details. | |
| 15 * | |
| 16 * You should have received a copy of the GNU General Public License | |
| 17 * along with this program; if not, write to the Free Software | |
| 18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 | |
| 19 * USA | |
| 20 */ | |
| 21 | |
| 22 #include <config.h> | |
|
1470
a8b924b5474c
The OTR protocol expects (X)HTML messsages
Mikael Berthe <mikael@lilotux.net>
parents:
1420
diff
changeset
|
23 #include <glib.h> |
| 1299 | 24 |
| 25 #ifdef HAVE_LIBOTR | |
| 26 | |
| 1598 | 27 #include "hbuf.h" |
| 1299 | 28 #include "logprint.h" |
| 1598 | 29 #include "nohtml.h" |
| 30 #include "otr.h" | |
| 1299 | 31 #include "roster.h" |
|
1301
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
32 #include "screen.h" |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
33 #include "settings.h" |
| 1598 | 34 #include "utils.h" |
| 35 #include "xmpp.h" | |
| 1299 | 36 |
|
1577
e1a642472f4e
Use otr context where possible, saves one mc_strtolower() per received message
franky
parents:
1501
diff
changeset
|
37 #define OTR_PROTOCOL_NAME "jabber" |
| 1299 | 38 |
| 39 static OtrlUserState userstate = NULL; | |
| 1598 | 40 static char *account = NULL; |
| 41 static char *keyfile = NULL; | |
| 42 static char *fprfile = NULL; | |
| 1299 | 43 |
|
1347
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
44 static int otr_is_enabled = FALSE; |
| 1299 | 45 |
| 46 static OtrlPolicy cb_policy (void *opdata, ConnContext *ctx); | |
| 47 static void cb_create_privkey (void *opdata, | |
| 48 const char *accountname, | |
| 49 const char *protocol); | |
| 50 static int cb_is_logged_in (void *opdata, | |
| 51 const char *accountname, | |
| 52 const char *protocol, | |
| 53 const char *recipient); | |
| 54 static void cb_inject_message (void *opdata, | |
| 55 const char *accountname, | |
| 56 const char *protocol, | |
| 57 const char *recipient, | |
| 58 const char *message); | |
| 59 static void cb_notify (void *opdata, | |
| 60 OtrlNotifyLevel level, | |
| 61 const char *accountname, | |
| 62 const char *protocol, | |
| 63 const char *username, | |
| 64 const char *title, | |
| 65 const char *primary, | |
| 66 const char *secondary); | |
| 67 static int cb_display_otr_message(void *opdata, | |
| 68 const char *accountname, | |
| 69 const char *protocol, | |
| 70 const char *username, | |
| 71 const char *msg); | |
| 72 static void cb_update_context_list(void *opdata); | |
| 73 static const char *cb_protocol_name (void *opdata, const char *protocol); | |
| 74 static void cb_protocol_name_free (void *opdata, | |
| 75 const char *protocol_name); | |
| 76 static void cb_new_fingerprint (void *opdata, OtrlUserState us, | |
| 77 const char *accountname, | |
| 78 const char *protocol, | |
| 79 const char *username, | |
| 80 unsigned char fingerprint[20]); | |
| 81 static void cb_write_fingerprints (void *opdata); | |
| 82 static void cb_gone_secure (void *opdata, ConnContext *context); | |
| 83 static void cb_gone_insecure (void *opdata, ConnContext *context); | |
| 84 static void cb_still_secure (void *opdata, ConnContext *context, | |
| 85 int is_reply); | |
| 86 static void cb_log_message (void *opdata, const char *message); | |
| 87 static int cb_max_message_size (void *opdata, ConnContext *context); | |
| 88 | |
| 89 static OtrlMessageAppOps ops = | |
| 90 { | |
|
1301
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
91 cb_policy, |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
92 cb_create_privkey, |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
93 cb_is_logged_in, |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
94 cb_inject_message, |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
95 cb_notify, |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
96 cb_display_otr_message, |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
97 cb_update_context_list, |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
98 cb_protocol_name, |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
99 cb_protocol_name_free, |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
100 cb_new_fingerprint, |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
101 cb_write_fingerprints, |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
102 cb_gone_secure, |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
103 cb_gone_insecure, |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
104 cb_still_secure, |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
105 cb_log_message, |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
106 cb_max_message_size, |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
107 NULL, /*account_name*/ |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
108 NULL /*account_name_free*/ |
| 1299 | 109 }; |
| 110 | |
| 111 static void otr_message_disconnect(ConnContext *ctx); | |
| 1598 | 112 static ConnContext *otr_get_context(const char *buddy); |
| 113 static void otr_startstop(const char *buddy, int start); | |
| 114 static void otr_handle_smp_tlvs(OtrlTLV *tlvs, ConnContext *ctx); | |
| 1299 | 115 |
| 1598 | 116 static char *otr_get_dir(void); |
| 1299 | 117 |
|
1420
08f641e91f94
Do not use "jid" as a variable name
Mikael Berthe <mikael@lilotux.net>
parents:
1347
diff
changeset
|
118 void otr_init(const char *fjid) |
| 1299 | 119 { |
|
1347
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
120 char *root; |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
121 |
|
1729
e6e89b1d7831
Minor style and header updates
Mikael Berthe <mikael@lilotux.net>
parents:
1668
diff
changeset
|
122 if (userstate) // already initialised |
| 1501 | 123 return; |
| 124 | |
|
1347
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
125 otr_is_enabled = !!settings_opt_get_int("otr"); |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
126 |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
127 if (!otr_is_enabled) |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
128 return; |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
129 |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
130 OTRL_INIT; |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
131 |
|
1577
e1a642472f4e
Use otr context where possible, saves one mc_strtolower() per received message
franky
parents:
1501
diff
changeset
|
132 userstate = otrl_userstate_create(); |
|
1347
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
133 |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
134 root = otr_get_dir(); |
|
1420
08f641e91f94
Do not use "jid" as a variable name
Mikael Berthe <mikael@lilotux.net>
parents:
1347
diff
changeset
|
135 account = jidtodisp(fjid); |
| 1299 | 136 keyfile = g_strdup_printf("%s%s.key", root, account); |
| 137 fprfile = g_strdup_printf("%s%s.fpr", root, account); | |
| 138 g_free(root); | |
| 139 | |
| 140 if (otrl_privkey_read(userstate, keyfile)){ | |
| 141 scr_LogPrint(LPRINT_LOGNORM, "Could not read OTR key from %s", keyfile); | |
|
1577
e1a642472f4e
Use otr context where possible, saves one mc_strtolower() per received message
franky
parents:
1501
diff
changeset
|
142 cb_create_privkey(NULL, account, OTR_PROTOCOL_NAME); |
| 1299 | 143 } |
| 144 if (otrl_privkey_read_fingerprints(userstate, fprfile, NULL, NULL)){ | |
| 145 scr_LogPrint(LPRINT_LOGNORM, "Could not read OTR fingerprints from %s", | |
| 146 fprfile); | |
| 147 } | |
| 148 } | |
| 149 | |
| 150 void otr_terminate(void) | |
| 151 { | |
| 1598 | 152 ConnContext *ctx; |
| 1299 | 153 |
|
1347
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
154 if (!otr_is_enabled) |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
155 return; |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
156 |
| 1320 | 157 for (ctx = userstate->context_root; ctx; ctx = ctx->next) |
| 1299 | 158 if (ctx->msgstate == OTRL_MSGSTATE_ENCRYPTED) |
| 159 otr_message_disconnect(ctx); | |
| 160 | |
| 161 g_free(account); | |
| 162 account = NULL; | |
|
1307
6c116207ab2e
Work around segfault in otrl_userstate_free()
Mikael Berthe <mikael@lilotux.net>
parents:
1306
diff
changeset
|
163 |
|
6c116207ab2e
Work around segfault in otrl_userstate_free()
Mikael Berthe <mikael@lilotux.net>
parents:
1306
diff
changeset
|
164 /* XXX This #ifdef is a quick workaround: when mcabber |
|
6c116207ab2e
Work around segfault in otrl_userstate_free()
Mikael Berthe <mikael@lilotux.net>
parents:
1306
diff
changeset
|
165 * is linked to both gnutls and libotr, libgcrypt will |
|
6c116207ab2e
Work around segfault in otrl_userstate_free()
Mikael Berthe <mikael@lilotux.net>
parents:
1306
diff
changeset
|
166 * segfault when we call otrl_userstate_free(). |
|
6c116207ab2e
Work around segfault in otrl_userstate_free()
Mikael Berthe <mikael@lilotux.net>
parents:
1306
diff
changeset
|
167 * This is reported to be a bug in libgcrypt :-/ |
|
6c116207ab2e
Work around segfault in otrl_userstate_free()
Mikael Berthe <mikael@lilotux.net>
parents:
1306
diff
changeset
|
168 * Mikael |
|
6c116207ab2e
Work around segfault in otrl_userstate_free()
Mikael Berthe <mikael@lilotux.net>
parents:
1306
diff
changeset
|
169 */ |
|
1729
e6e89b1d7831
Minor style and header updates
Mikael Berthe <mikael@lilotux.net>
parents:
1668
diff
changeset
|
170 #if defined(HAVE_GNUTLS) && !defined(HAVE_OPENSSL) // TODO: broken now |
|
1307
6c116207ab2e
Work around segfault in otrl_userstate_free()
Mikael Berthe <mikael@lilotux.net>
parents:
1306
diff
changeset
|
171 if (!settings_opt_get_int("ssl")) |
|
6c116207ab2e
Work around segfault in otrl_userstate_free()
Mikael Berthe <mikael@lilotux.net>
parents:
1306
diff
changeset
|
172 #endif |
| 1299 | 173 otrl_userstate_free(userstate); |
|
1307
6c116207ab2e
Work around segfault in otrl_userstate_free()
Mikael Berthe <mikael@lilotux.net>
parents:
1306
diff
changeset
|
174 |
| 1299 | 175 userstate = NULL; |
| 176 g_free(keyfile); | |
| 177 keyfile = NULL; | |
| 178 } | |
| 179 | |
| 1598 | 180 static char *otr_get_dir(void) |
| 1320 | 181 { |
| 1346 | 182 const char *configured_dir = settings_opt_get("otr_dir"); |
| 1320 | 183 |
|
1335
ab1b7f7a682e
Make sure the otr_dir is always slash-terminated
Mikael Berthe <mikael@lilotux.net>
parents:
1320
diff
changeset
|
184 if (configured_dir && *configured_dir) { |
|
ab1b7f7a682e
Make sure the otr_dir is always slash-terminated
Mikael Berthe <mikael@lilotux.net>
parents:
1320
diff
changeset
|
185 char *xp_conf_dir; |
|
ab1b7f7a682e
Make sure the otr_dir is always slash-terminated
Mikael Berthe <mikael@lilotux.net>
parents:
1320
diff
changeset
|
186 int l; |
|
ab1b7f7a682e
Make sure the otr_dir is always slash-terminated
Mikael Berthe <mikael@lilotux.net>
parents:
1320
diff
changeset
|
187 xp_conf_dir = expand_filename(configured_dir); |
|
ab1b7f7a682e
Make sure the otr_dir is always slash-terminated
Mikael Berthe <mikael@lilotux.net>
parents:
1320
diff
changeset
|
188 // The path must be slash-terminated |
|
ab1b7f7a682e
Make sure the otr_dir is always slash-terminated
Mikael Berthe <mikael@lilotux.net>
parents:
1320
diff
changeset
|
189 l = strlen(xp_conf_dir); |
|
ab1b7f7a682e
Make sure the otr_dir is always slash-terminated
Mikael Berthe <mikael@lilotux.net>
parents:
1320
diff
changeset
|
190 if (xp_conf_dir[l-1] != '/') { |
|
ab1b7f7a682e
Make sure the otr_dir is always slash-terminated
Mikael Berthe <mikael@lilotux.net>
parents:
1320
diff
changeset
|
191 char *xp_conf_dir_tmp = xp_conf_dir; |
|
ab1b7f7a682e
Make sure the otr_dir is always slash-terminated
Mikael Berthe <mikael@lilotux.net>
parents:
1320
diff
changeset
|
192 xp_conf_dir = g_strdup_printf("%s/", xp_conf_dir_tmp); |
|
ab1b7f7a682e
Make sure the otr_dir is always slash-terminated
Mikael Berthe <mikael@lilotux.net>
parents:
1320
diff
changeset
|
193 g_free(xp_conf_dir_tmp); |
|
ab1b7f7a682e
Make sure the otr_dir is always slash-terminated
Mikael Berthe <mikael@lilotux.net>
parents:
1320
diff
changeset
|
194 } |
|
ab1b7f7a682e
Make sure the otr_dir is always slash-terminated
Mikael Berthe <mikael@lilotux.net>
parents:
1320
diff
changeset
|
195 return xp_conf_dir; |
|
ab1b7f7a682e
Make sure the otr_dir is always slash-terminated
Mikael Berthe <mikael@lilotux.net>
parents:
1320
diff
changeset
|
196 } else { |
| 1320 | 197 return expand_filename("~/.mcabber/otr/"); |
|
1335
ab1b7f7a682e
Make sure the otr_dir is always slash-terminated
Mikael Berthe <mikael@lilotux.net>
parents:
1320
diff
changeset
|
198 } |
| 1320 | 199 } |
| 200 | |
| 1598 | 201 static ConnContext *otr_get_context(const char *buddy) |
| 1299 | 202 { |
| 203 int null = 0; | |
| 1598 | 204 ConnContext *ctx; |
| 205 char *lowcasebuddy = g_strdup(buddy); | |
|
1495
6f5754f86fbb
Fix JID case issue with OTR, v2 (franky)
Mikael Berthe <mikael@lilotux.net>
parents:
1470
diff
changeset
|
206 |
|
6f5754f86fbb
Fix JID case issue with OTR, v2 (franky)
Mikael Berthe <mikael@lilotux.net>
parents:
1470
diff
changeset
|
207 mc_strtolower(lowcasebuddy); |
|
1577
e1a642472f4e
Use otr context where possible, saves one mc_strtolower() per received message
franky
parents:
1501
diff
changeset
|
208 ctx = otrl_context_find(userstate, lowcasebuddy, account, OTR_PROTOCOL_NAME, |
|
e1a642472f4e
Use otr context where possible, saves one mc_strtolower() per received message
franky
parents:
1501
diff
changeset
|
209 1, &null, NULL, NULL); |
|
1495
6f5754f86fbb
Fix JID case issue with OTR, v2 (franky)
Mikael Berthe <mikael@lilotux.net>
parents:
1470
diff
changeset
|
210 g_free(lowcasebuddy); |
|
6f5754f86fbb
Fix JID case issue with OTR, v2 (franky)
Mikael Berthe <mikael@lilotux.net>
parents:
1470
diff
changeset
|
211 return ctx; |
| 1299 | 212 } |
| 213 | |
| 214 static void otr_message_disconnect(ConnContext *ctx) | |
| 215 { | |
| 216 if (ctx->msgstate == OTRL_MSGSTATE_ENCRYPTED) | |
| 217 cb_gone_insecure(NULL, ctx); | |
| 218 otrl_message_disconnect(userstate, &ops, NULL, ctx->accountname, | |
| 219 ctx->protocol, ctx->username); | |
| 220 } | |
| 221 | |
| 1598 | 222 static void otr_startstop(const char *buddy, int start) |
| 1299 | 223 { |
| 1598 | 224 char *msg = NULL; |
| 1299 | 225 ConnContext *ctx = otr_get_context(buddy); |
| 226 | |
| 227 if (!userstate || !ctx) | |
| 228 return; | |
| 229 | |
| 230 if (start && ctx->msgstate == OTRL_MSGSTATE_ENCRYPTED) | |
| 231 otr_message_disconnect(ctx); | |
| 232 | |
| 233 if (start) { | |
| 234 OtrlPolicy policy = cb_policy(NULL, ctx); | |
|
1308
b17754d9221b
Show a warning for /otr start|stop, if policy == plain
franky@veqlargh.fs
parents:
1307
diff
changeset
|
235 if (policy == plain) { |
|
b17754d9221b
Show a warning for /otr start|stop, if policy == plain
franky@veqlargh.fs
parents:
1307
diff
changeset
|
236 scr_LogPrint(LPRINT_LOGNORM, "The OTR policy for this user is set to" |
|
b17754d9221b
Show a warning for /otr start|stop, if policy == plain
franky@veqlargh.fs
parents:
1307
diff
changeset
|
237 " plain. You have to change it first."); |
|
b17754d9221b
Show a warning for /otr start|stop, if policy == plain
franky@veqlargh.fs
parents:
1307
diff
changeset
|
238 return; |
|
b17754d9221b
Show a warning for /otr start|stop, if policy == plain
franky@veqlargh.fs
parents:
1307
diff
changeset
|
239 } |
| 1299 | 240 msg = otrl_proto_default_query_msg(ctx->accountname, policy); |
| 241 cb_inject_message(NULL, ctx->accountname, ctx->protocol, ctx->username, | |
| 242 msg); | |
| 243 free (msg); | |
| 244 } | |
| 245 else | |
| 246 otr_message_disconnect(ctx); | |
| 247 } | |
| 248 | |
| 249 void otr_establish(const char *buddy) | |
| 250 { | |
| 251 otr_startstop(buddy, 1); | |
| 252 } | |
| 253 | |
| 1598 | 254 void otr_disconnect(const char *buddy) |
| 1299 | 255 { |
| 256 otr_startstop(buddy, 0); | |
| 257 } | |
| 258 | |
| 1598 | 259 void otr_fingerprint(const char *buddy, const char *trust) |
| 1299 | 260 { |
| 261 char fpr[45], *tr; | |
| 262 ConnContext *ctx = otr_get_context(buddy); | |
| 263 if (!userstate || !ctx) | |
| 264 return; | |
| 265 | |
| 266 if (!ctx->active_fingerprint || !ctx->active_fingerprint->fingerprint) { | |
| 267 scr_LogPrint(LPRINT_LOGNORM, | |
| 268 "No active fingerprint - start OTR for this buddy first."); | |
| 269 return; | |
| 270 } | |
| 271 | |
| 272 otrl_privkey_hash_to_human(fpr, ctx->active_fingerprint->fingerprint); | |
| 273 if (trust) { | |
| 274 if (strcmp(fpr, trust) == 0) | |
| 275 otrl_context_set_trust(ctx->active_fingerprint, "trust"); | |
| 276 else | |
| 277 otrl_context_set_trust(ctx->active_fingerprint, NULL); | |
| 278 } | |
| 279 | |
| 280 tr = ctx->active_fingerprint->trust; | |
| 281 scr_LogPrint(LPRINT_LOGNORM, "%s [%44s]: %s", ctx->username, fpr, | |
| 282 tr && *tr ? "trusted" : "untrusted"); | |
| 283 cb_write_fingerprints(NULL); | |
| 284 } | |
| 285 | |
| 1598 | 286 static void otr_handle_smp_tlvs(OtrlTLV *tlvs, ConnContext *ctx) |
| 1299 | 287 { |
| 288 OtrlTLV *tlv = NULL; | |
| 289 char *sbuf = NULL; | |
| 290 NextExpectedSMP nextMsg = ctx->smstate->nextExpected; | |
| 291 | |
| 292 tlv = otrl_tlv_find(tlvs, OTRL_TLV_SMP1); | |
| 293 if (tlv) { | |
| 294 if (nextMsg != OTRL_SMP_EXPECT1) | |
| 295 otr_smp_abort(ctx->username); | |
| 296 else { | |
| 297 sbuf = g_strdup_printf("OTR: Received SMP Initiation. " | |
| 298 "Answer with /otr smpr %s $secret", | |
| 299 ctx->username); | |
| 300 } | |
| 301 } | |
| 302 tlv = otrl_tlv_find(tlvs, OTRL_TLV_SMP2); | |
| 303 if (tlv) { | |
| 304 if (nextMsg != OTRL_SMP_EXPECT2) | |
| 305 otr_smp_abort(ctx->username); | |
| 306 else { | |
| 307 sbuf = g_strdup("OTR: Received SMP Response."); | |
| 308 /* If we received TLV2, we will send TLV3 and expect TLV4 */ | |
| 309 ctx->smstate->nextExpected = OTRL_SMP_EXPECT4; | |
| 310 } | |
| 311 } | |
| 312 tlv = otrl_tlv_find(tlvs, OTRL_TLV_SMP3); | |
| 313 if (tlv) { | |
| 314 if (nextMsg != OTRL_SMP_EXPECT3) | |
| 315 otr_smp_abort(ctx->username); | |
| 316 else { | |
| 317 /* If we received TLV3, we will send TLV4 | |
| 318 * We will not expect more messages, so prepare for next SMP */ | |
| 319 ctx->smstate->nextExpected = OTRL_SMP_EXPECT1; | |
| 320 /* Report result to user */ | |
| 321 if (ctx->active_fingerprint && ctx->active_fingerprint->trust && | |
| 322 *ctx->active_fingerprint->trust != '\0') | |
| 323 sbuf = g_strdup("OTR: SMP succeeded"); | |
| 324 else | |
| 325 sbuf = g_strdup("OTR: SMP failed"); | |
| 326 } | |
| 327 } | |
| 328 tlv = otrl_tlv_find(tlvs, OTRL_TLV_SMP4); | |
| 329 if (tlv) { | |
| 330 if (nextMsg != OTRL_SMP_EXPECT4) | |
| 331 otr_smp_abort(ctx->username); | |
| 332 else { | |
| 333 /* We will not expect more messages, so prepare for next SMP */ | |
| 334 ctx->smstate->nextExpected = OTRL_SMP_EXPECT1; | |
| 335 /* Report result to user */ | |
| 336 if (ctx->active_fingerprint && ctx->active_fingerprint->trust && | |
| 337 *ctx->active_fingerprint->trust != '\0') | |
| 338 sbuf = g_strdup("OTR: SMP succeeded"); | |
| 339 else | |
| 340 sbuf = g_strdup("OTR: SMP failed"); | |
| 341 } | |
| 342 } | |
| 343 tlv = otrl_tlv_find(tlvs, OTRL_TLV_SMP_ABORT); | |
| 344 if (tlv) { | |
| 345 /* The message we are waiting for will not arrive, so reset | |
| 346 * and prepare for the next SMP */ | |
| 347 sbuf = g_strdup("OTR: SMP aborted by your buddy"); | |
| 348 ctx->smstate->nextExpected = OTRL_SMP_EXPECT1; | |
| 349 } | |
| 350 | |
| 351 if (sbuf) { | |
|
1301
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
352 scr_WriteIncomingMessage(ctx->username, sbuf, 0, HBB_PREFIX_INFO, 0); |
| 1299 | 353 g_free(sbuf); |
| 354 } | |
| 355 } | |
| 356 | |
| 357 /* | |
| 358 * returns whether a otr_message was received | |
| 359 * sets *otr_data to NULL, when it was an internal otr message | |
| 360 */ | |
| 1598 | 361 int otr_receive(char **otr_data, const char *buddy, int *free_msg) |
| 1299 | 362 { |
| 363 int ignore_message; | |
| 364 char *newmessage = NULL; | |
| 365 OtrlTLV *tlvs = NULL; | |
| 366 OtrlTLV *tlv = NULL; | |
| 1598 | 367 ConnContext *ctx; |
| 1299 | 368 |
|
1577
e1a642472f4e
Use otr context where possible, saves one mc_strtolower() per received message
franky
parents:
1501
diff
changeset
|
369 ctx = otr_get_context(buddy); |
| 1299 | 370 *free_msg = 0; |
|
1577
e1a642472f4e
Use otr context where possible, saves one mc_strtolower() per received message
franky
parents:
1501
diff
changeset
|
371 ignore_message = otrl_message_receiving(userstate, &ops, NULL, |
|
e1a642472f4e
Use otr context where possible, saves one mc_strtolower() per received message
franky
parents:
1501
diff
changeset
|
372 ctx->accountname, ctx->protocol, |
|
e1a642472f4e
Use otr context where possible, saves one mc_strtolower() per received message
franky
parents:
1501
diff
changeset
|
373 ctx->username, *otr_data, |
|
e1a642472f4e
Use otr context where possible, saves one mc_strtolower() per received message
franky
parents:
1501
diff
changeset
|
374 &newmessage, &tlvs,NULL, NULL); |
| 1299 | 375 |
| 376 | |
| 377 tlv = otrl_tlv_find(tlvs, OTRL_TLV_DISCONNECTED); | |
| 378 if (tlv) { | |
| 379 /* Notify the user that the other side disconnected. */ | |
| 380 if (ctx) { | |
| 381 cb_gone_insecure(NULL, ctx); | |
|
1577
e1a642472f4e
Use otr context where possible, saves one mc_strtolower() per received message
franky
parents:
1501
diff
changeset
|
382 otr_disconnect(ctx->username); |
| 1299 | 383 } |
| 384 } | |
| 385 | |
| 386 otr_handle_smp_tlvs(tlvs, ctx); | |
| 387 | |
| 388 if (tlvs != NULL) | |
| 389 otrl_tlv_free(tlvs); | |
| 390 | |
| 391 if (ignore_message) | |
| 392 *otr_data = NULL; | |
| 393 | |
| 394 if (!ignore_message && newmessage) { | |
| 395 *free_msg = 1; | |
|
1470
a8b924b5474c
The OTR protocol expects (X)HTML messsages
Mikael Berthe <mikael@lilotux.net>
parents:
1420
diff
changeset
|
396 *otr_data = html_strip(newmessage); |
| 1299 | 397 otrl_message_free(newmessage); |
| 398 if (ctx->msgstate == OTRL_MSGSTATE_ENCRYPTED) | |
| 399 return 1; | |
| 400 } | |
| 401 return 0; | |
| 402 } | |
| 403 | |
| 404 int otr_send(char **msg, const char *buddy) | |
| 405 { | |
| 406 gcry_error_t err; | |
| 407 char *newmessage = NULL; | |
|
1470
a8b924b5474c
The OTR protocol expects (X)HTML messsages
Mikael Berthe <mikael@lilotux.net>
parents:
1420
diff
changeset
|
408 char *htmlmsg; |
| 1598 | 409 ConnContext *ctx = otr_get_context(buddy); |
| 1299 | 410 |
|
1580
c8be6c2243d6
Only html escape messages when otr session is established
franky
parents:
1577
diff
changeset
|
411 if (ctx->msgstate == OTRL_MSGSTATE_PLAINTEXT) |
|
c8be6c2243d6
Only html escape messages when otr session is established
franky
parents:
1577
diff
changeset
|
412 err = otrl_message_sending(userstate, &ops, NULL, ctx->accountname, |
|
c8be6c2243d6
Only html escape messages when otr session is established
franky
parents:
1577
diff
changeset
|
413 ctx->protocol, ctx->username, *msg, NULL, |
|
c8be6c2243d6
Only html escape messages when otr session is established
franky
parents:
1577
diff
changeset
|
414 &newmessage, NULL, NULL); |
|
c8be6c2243d6
Only html escape messages when otr session is established
franky
parents:
1577
diff
changeset
|
415 else { |
|
c8be6c2243d6
Only html escape messages when otr session is established
franky
parents:
1577
diff
changeset
|
416 htmlmsg = html_escape(*msg); |
|
c8be6c2243d6
Only html escape messages when otr session is established
franky
parents:
1577
diff
changeset
|
417 err = otrl_message_sending(userstate, &ops, NULL, ctx->accountname, |
|
c8be6c2243d6
Only html escape messages when otr session is established
franky
parents:
1577
diff
changeset
|
418 ctx->protocol, ctx->username, htmlmsg, NULL, |
|
c8be6c2243d6
Only html escape messages when otr session is established
franky
parents:
1577
diff
changeset
|
419 &newmessage, NULL, NULL); |
|
c8be6c2243d6
Only html escape messages when otr session is established
franky
parents:
1577
diff
changeset
|
420 g_free(htmlmsg); |
|
c8be6c2243d6
Only html escape messages when otr session is established
franky
parents:
1577
diff
changeset
|
421 } |
| 1299 | 422 |
| 423 if (err) | |
| 424 *msg = NULL; /*something went wrong, don't send the plain-message! */ | |
| 425 | |
| 426 if (!err && newmessage) { | |
| 427 *msg = g_strdup(newmessage); | |
| 428 otrl_message_free(newmessage); | |
| 429 if (cb_policy(NULL, ctx) & OTRL_POLICY_REQUIRE_ENCRYPTION || | |
| 430 ctx->msgstate == OTRL_MSGSTATE_ENCRYPTED) | |
| 431 return 1; | |
| 432 } | |
| 433 return 0; | |
| 434 } | |
| 435 | |
| 436 /* Prints OTR connection state */ | |
| 1598 | 437 void otr_print_info(const char *buddy) |
| 1299 | 438 { |
| 439 const char *state, *auth, *policy; | |
| 1598 | 440 ConnContext *ctx = otr_get_context(buddy); |
|
1577
e1a642472f4e
Use otr context where possible, saves one mc_strtolower() per received message
franky
parents:
1501
diff
changeset
|
441 OtrlPolicy p = cb_policy(ctx->app_data, ctx); |
| 1299 | 442 |
| 443 if (!userstate || !ctx) | |
| 444 return; | |
| 445 | |
| 446 switch (ctx->msgstate) { | |
| 447 case OTRL_MSGSTATE_PLAINTEXT: state = "plaintext"; break; | |
| 448 case OTRL_MSGSTATE_ENCRYPTED: | |
| 449 switch (ctx->protocol_version) { | |
| 450 case 1: state = "encrypted V1"; break; | |
| 451 case 2: state = "encrypted V2"; break; | |
| 452 default:state = "encrypted"; | |
| 453 }; | |
| 454 break; | |
| 455 case OTRL_MSGSTATE_FINISHED: state = "finished"; break; | |
| 456 default: state = "unknown state"; | |
| 457 } | |
| 458 switch (ctx->auth.authstate) { | |
| 459 case OTRL_AUTHSTATE_NONE: | |
| 460 switch (ctx->otr_offer) { | |
| 461 case OFFER_NOT: auth = "no offer sent"; break; | |
| 462 case OFFER_SENT: auth = "offer sent"; break; | |
| 463 case OFFER_ACCEPTED: auth = "offer accepted"; break; | |
| 464 case OFFER_REJECTED: auth = "offer rejected"; break; | |
| 465 default: auth = "unknown auth"; | |
| 466 } | |
| 467 break; | |
| 468 case OTRL_AUTHSTATE_AWAITING_DHKEY: | |
| 469 auth = "awaiting D-H key"; break; | |
| 470 case OTRL_AUTHSTATE_AWAITING_REVEALSIG: | |
| 471 auth = "awaiting reveal signature"; break; | |
| 472 case OTRL_AUTHSTATE_AWAITING_SIG: | |
| 473 auth = "awaiting signature"; break; | |
| 474 case OTRL_AUTHSTATE_V1_SETUP: | |
| 475 auth = "v1 setup"; break; | |
| 476 default: | |
| 477 auth = "unknown auth"; | |
| 478 } | |
| 479 if (p == OTRL_POLICY_NEVER) | |
| 480 policy = "plain"; | |
|
1301
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
481 else if (p == (OTRL_POLICY_OPPORTUNISTIC & ~OTRL_POLICY_ALLOW_V1)) |
| 1299 | 482 policy = "opportunistic"; |
|
1301
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
483 else if (p == (OTRL_POLICY_MANUAL & ~OTRL_POLICY_ALLOW_V1)) |
| 1299 | 484 policy = "manual"; |
| 485 else if (p == (OTRL_POLICY_ALWAYS & ~OTRL_POLICY_ALLOW_V1)) | |
| 486 policy = "always"; | |
| 487 else | |
| 488 policy = "unknown"; | |
| 489 | |
| 490 scr_LogPrint(LPRINT_LOGNORM, "%s: %s (%s) [%s]", | |
| 491 ctx->username, state, auth, policy); | |
| 492 } | |
| 493 | |
| 1598 | 494 static ConnContext *otr_context_encrypted(const char *buddy) |
| 1299 | 495 { |
| 1598 | 496 ConnContext *ctx = otr_get_context(buddy); |
| 1299 | 497 |
| 498 if (!userstate || !ctx || ctx->msgstate != OTRL_MSGSTATE_ENCRYPTED){ | |
| 499 scr_LogPrint(LPRINT_LOGNORM, | |
| 500 "You have to start an OTR channel with %s before you can " | |
| 501 "use SMP.", buddy); | |
| 502 return NULL; | |
| 503 } | |
| 504 | |
| 505 return ctx; | |
| 506 } | |
| 507 | |
| 1598 | 508 void otr_smp_query(const char *buddy, const char *secret) |
| 1299 | 509 { |
| 1598 | 510 ConnContext *ctx = otr_context_encrypted(buddy); |
| 1299 | 511 |
| 512 if (!secret) { | |
| 513 scr_LogPrint(LPRINT_LOGNORM, | |
| 514 "Using SMP without a secret isn't a good idea."); | |
| 515 return; | |
| 516 } | |
| 517 | |
| 518 if (ctx) { | |
|
1301
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
519 otrl_message_initiate_smp(userstate, &ops, NULL, ctx, |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
520 (const unsigned char *)secret, |
| 1299 | 521 strlen(secret)); |
| 522 scr_WriteIncomingMessage(ctx->username, | |
| 523 "OTR: Socialist Millionaires' Protocol " | |
|
1301
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
524 "initiated.", 0, HBB_PREFIX_INFO, 0); |
| 1299 | 525 } |
| 526 } | |
| 527 | |
| 1598 | 528 void otr_smp_respond(const char *buddy, const char *secret) |
| 1299 | 529 { |
| 1598 | 530 ConnContext *ctx = otr_context_encrypted(buddy); |
| 1299 | 531 |
| 532 if (!secret) { | |
| 533 scr_LogPrint(LPRINT_LOGNORM, | |
| 534 "Using SMP without a secret isn't a good idea."); | |
| 535 return; | |
| 536 } | |
| 537 | |
| 538 if (ctx) { | |
| 539 if (!ctx->smstate->secret) { | |
| 540 scr_LogPrint(LPRINT_LOGNORM, | |
|
1584
18069a9dca4a
Fix typo in OTR messages (Anne)
Mikael Berthe <mikael@lilotux.net>
parents:
1580
diff
changeset
|
541 "Don't call smpr until you have received an SMP " |
| 1299 | 542 "Initiation!"); |
| 543 return; | |
| 544 } | |
|
1301
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
545 otrl_message_respond_smp(userstate, &ops, NULL, ctx, |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
546 (const unsigned char *)secret, |
| 1299 | 547 strlen(secret)); |
| 548 scr_WriteIncomingMessage(ctx->username, | |
| 549 "OTR: Socialist Millionaires' Protocol: " | |
|
1301
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
550 "response sent", 0, HBB_PREFIX_INFO, 0); |
| 1299 | 551 } |
| 552 } | |
| 553 | |
| 1598 | 554 void otr_smp_abort(const char *buddy) |
| 1299 | 555 { |
| 1598 | 556 ConnContext *ctx = otr_context_encrypted(buddy); |
| 1299 | 557 |
| 558 if (ctx) { | |
| 559 otrl_message_abort_smp(userstate, &ops, NULL, ctx); | |
| 560 scr_WriteIncomingMessage(ctx->username, | |
| 561 "OTR: Socialist Millionaires' Protocol aborted.", | |
|
1301
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
562 0, HBB_PREFIX_INFO, 0); |
| 1299 | 563 } |
| 564 } | |
| 565 | |
| 566 void otr_key(void) | |
| 567 { | |
| 1598 | 568 OtrlPrivKey *key; |
| 1299 | 569 char readable[45] = ""; |
| 570 | |
| 571 if(!userstate) | |
| 572 return; | |
| 573 for (key = userstate->privkey_root; key; key = key->next) { | |
| 574 otrl_privkey_fingerprint(userstate, readable, key->accountname, | |
| 575 key->protocol); | |
| 576 scr_LogPrint(LPRINT_LOGNORM, "%s: %s", key->accountname, readable); | |
| 577 } | |
| 578 } | |
| 579 | |
| 580 /* Return the OTR policy for the given context. */ | |
| 581 static OtrlPolicy cb_policy(void *opdata, ConnContext *ctx) | |
| 582 { | |
| 583 enum otr_policy p = settings_otr_getpolicy(NULL); | |
| 584 | |
| 585 if(ctx) | |
| 586 if(settings_otr_getpolicy(ctx->username)) | |
| 587 p = settings_otr_getpolicy(ctx->username); | |
| 588 | |
| 589 switch (p) { | |
| 590 case plain: | |
| 591 return OTRL_POLICY_NEVER; | |
| 592 case opportunistic: | |
| 593 return OTRL_POLICY_OPPORTUNISTIC & ~OTRL_POLICY_ALLOW_V1; | |
| 594 case manual: | |
| 595 return OTRL_POLICY_MANUAL & ~OTRL_POLICY_ALLOW_V1; | |
| 596 case always: | |
| 597 return OTRL_POLICY_ALWAYS & ~OTRL_POLICY_ALLOW_V1; | |
| 598 } | |
|
1301
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
599 |
|
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
600 return OTRL_POLICY_MANUAL & ~OTRL_POLICY_ALLOW_V1; |
| 1299 | 601 } |
| 602 | |
| 603 /* Create a private key for the given accountname/protocol if | |
| 604 * desired. */ | |
| 605 static void cb_create_privkey(void *opdata, const char *accountname, | |
| 606 const char *protocol) | |
| 607 { | |
| 608 gcry_error_t e; | |
| 1598 | 609 char *root; |
| 1299 | 610 |
| 611 scr_LogPrint(LPRINT_LOGNORM, | |
| 612 "Generating new OTR key for %s. This may take a while...", | |
| 613 accountname); | |
|
1780
e4378fbab5d7
Major API cleanup - bump API to 4
Mikael Berthe <mikael@lilotux.net>
parents:
1729
diff
changeset
|
614 scr_do_update(); |
| 1299 | 615 |
| 616 e = otrl_privkey_generate(userstate, keyfile, accountname, protocol); | |
| 617 | |
| 1320 | 618 if (e) { |
| 619 root = otr_get_dir(); | |
| 620 scr_LogPrint(LPRINT_LOGNORM, "OTR key generation failed! Please mkdir " | |
| 621 "%s if you want to use otr encryption.", root); | |
| 622 g_free(root); | |
| 623 } | |
| 1299 | 624 else |
| 625 scr_LogPrint(LPRINT_LOGNORM, "OTR key generated."); | |
| 626 } | |
| 627 | |
| 628 /* Report whether you think the given user is online. Return 1 if | |
| 629 * you think he is, 0 if you think he isn't, -1 if you're not sure. | |
| 630 * If you return 1, messages such as heartbeats or other | |
| 631 * notifications may be sent to the user, which could result in "not | |
| 632 * logged in" errors if you're wrong. */ | |
| 633 static int cb_is_logged_in(void *opdata, const char *accountname, | |
| 634 const char *protocol, const char *recipient) | |
| 635 { | |
| 1346 | 636 int ret = (roster_getstatus(recipient, NULL) != offline); |
| 1299 | 637 return ret; |
| 638 } | |
| 639 | |
| 640 /* Send the given IM to the given recipient from the given | |
| 641 * accountname/protocol. */ | |
| 642 static void cb_inject_message(void *opdata, const char *accountname, | |
| 643 const char *protocol, const char *recipient, | |
| 644 const char *message) | |
| 645 { | |
| 1343 | 646 if (roster_gettype(recipient) == ROSTER_TYPE_USER) |
| 1598 | 647 xmpp_send_msg(recipient, message, ROSTER_TYPE_USER, "", TRUE, NULL, |
| 1602 | 648 LM_MESSAGE_SUB_TYPE_NOT_SET, NULL); |
| 1299 | 649 } |
| 650 | |
| 651 /* Display a notification message for a particular | |
| 652 * accountname / protocol / username conversation. */ | |
| 653 static void cb_notify(void *opdata, OtrlNotifyLevel level, | |
| 654 const char *accountname, const char *protocol, | |
| 655 const char *username, const char *title, | |
| 656 const char *primary, const char *secondary) | |
| 657 { | |
| 1598 | 658 char *type; |
| 1299 | 659 char *sbuf = NULL; |
| 660 switch (level) { | |
| 661 case OTRL_NOTIFY_ERROR: type = "error"; break; | |
| 662 case OTRL_NOTIFY_WARNING: type = "warning"; break; | |
| 663 case OTRL_NOTIFY_INFO: type = "info"; break; | |
|
1301
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
664 default: type = "unknown"; |
| 1299 | 665 } |
| 666 sbuf = g_strdup_printf("OTR %s:%s\n%s\n%s",type,title, primary, secondary); | |
|
1301
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
667 scr_WriteIncomingMessage(username, sbuf, 0, HBB_PREFIX_INFO, 0); |
| 1299 | 668 g_free(sbuf); |
| 669 } | |
| 670 | |
| 671 /* Display an OTR control message for a particular | |
| 672 * accountname / protocol / username conversation. Return 0 if you are able | |
| 673 * to successfully display it. If you return non-0 (or if this | |
| 674 * function is NULL), the control message will be displayed inline, | |
| 675 * as a received message, or else by using the above notify() | |
| 676 * callback. */ | |
| 677 static int cb_display_otr_message(void *opdata, const char *accountname, | |
| 678 const char *protocol, const char *username, | |
| 679 const char *msg) | |
| 680 { | |
|
1470
a8b924b5474c
The OTR protocol expects (X)HTML messsages
Mikael Berthe <mikael@lilotux.net>
parents:
1420
diff
changeset
|
681 char *strippedmsg = html_strip(msg); |
|
a8b924b5474c
The OTR protocol expects (X)HTML messsages
Mikael Berthe <mikael@lilotux.net>
parents:
1420
diff
changeset
|
682 scr_WriteIncomingMessage(username, strippedmsg, 0, HBB_PREFIX_INFO, 0); |
|
a8b924b5474c
The OTR protocol expects (X)HTML messsages
Mikael Berthe <mikael@lilotux.net>
parents:
1420
diff
changeset
|
683 g_free(strippedmsg); |
| 1299 | 684 return 0; |
| 685 } | |
| 686 | |
| 687 /* When the list of ConnContexts changes (including a change in | |
| 688 * state), this is called so the UI can be updated. */ | |
| 689 static void cb_update_context_list(void *opdata) | |
| 690 { | |
| 691 /*maybe introduce new status characters for mcabber, | |
| 692 * then use this function (?!)*/ | |
| 693 } | |
| 694 | |
| 695 /* Return a newly allocated string containing a human-friendly name | |
| 696 * for the given protocol id */ | |
| 697 static const char *cb_protocol_name(void *opdata, const char *protocol) | |
| 698 { | |
| 699 return protocol; | |
| 700 } | |
| 701 | |
| 702 /* Deallocate a string allocated by protocol_name */ | |
| 703 static void cb_protocol_name_free (void *opdata, const char *protocol_name) | |
| 704 { | |
| 705 /* We didn't allocated memory, so we don't have to free anything :p */ | |
| 706 } | |
| 707 | |
| 708 /* A new fingerprint for the given user has been received. */ | |
| 709 static void cb_new_fingerprint(void *opdata, OtrlUserState us, | |
| 710 const char *accountname, const char *protocol, | |
| 711 const char *username, | |
| 712 unsigned char fingerprint[20]) | |
| 713 { | |
| 714 char *sbuf = NULL; | |
| 715 char readable[45]; | |
| 716 | |
| 717 otrl_privkey_hash_to_human(readable, fingerprint); | |
| 718 sbuf = g_strdup_printf("OTR: new fingerprint: %s", readable); | |
|
1301
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
719 scr_WriteIncomingMessage(username, sbuf, 0, HBB_PREFIX_INFO, 0); |
| 1299 | 720 g_free(sbuf); |
| 721 } | |
| 722 | |
| 723 /* The list of known fingerprints has changed. Write them to disk. */ | |
| 724 static void cb_write_fingerprints(void *opdata) | |
| 725 { | |
| 726 otrl_privkey_write_fingerprints(userstate, fprfile); | |
| 727 } | |
| 728 | |
| 729 /* A ConnContext has entered a secure state. */ | |
| 730 static void cb_gone_secure(void *opdata, ConnContext *context) | |
| 731 { | |
| 732 scr_WriteIncomingMessage(context->username, "OTR: channel established", 0, | |
|
1301
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
733 HBB_PREFIX_INFO, 0); |
| 1299 | 734 } |
| 735 | |
| 736 /* A ConnContext has left a secure state. */ | |
| 737 static void cb_gone_insecure(void *opdata, ConnContext *context) | |
| 738 { | |
| 739 scr_WriteIncomingMessage(context->username, "OTR: channel closed", 0, | |
|
1301
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
740 HBB_PREFIX_INFO, 0); |
| 1299 | 741 } |
| 742 | |
| 743 /* We have completed an authentication, using the D-H keys we | |
| 744 * already knew. is_reply indicates whether we initiated the AKE. */ | |
| 745 static void cb_still_secure(void *opdata, ConnContext *context, int is_reply) | |
| 746 { | |
| 747 scr_WriteIncomingMessage(context->username, "OTR: channel reestablished", 0, | |
|
1301
37b41ed9ed35
Fixed compiler warnings
Frank Zschockelt <mcabber_otr[at]freakysoft.de>
parents:
1299
diff
changeset
|
748 HBB_PREFIX_INFO, 0); |
| 1299 | 749 } |
| 750 | |
| 751 /* Log a message. The passed message will end in "\n". */ | |
| 752 static void cb_log_message(void *opdata, const char *message) | |
| 753 { | |
| 754 scr_LogPrint(LPRINT_DEBUG, "OTR: %s", message); | |
| 755 } | |
| 756 | |
| 757 /* Find the maximum message size supported by this protocol. */ | |
| 758 static int cb_max_message_size(void *opdata, ConnContext *context) | |
| 759 { | |
| 760 return 8192; | |
| 761 } | |
| 762 | |
|
1347
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
763 int otr_enabled(void) |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
764 { |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
765 return otr_is_enabled; |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
766 } |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
767 |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
768 #else /* !HAVE_LIBOTR */ |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
769 |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
770 int otr_enabled(void) |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
771 { |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
772 return FALSE; |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
773 } |
|
07816313073b
Add an option 'otr' to enable OTR support in the configuration file
Mikael Berthe <mikael@lilotux.net>
parents:
1346
diff
changeset
|
774 |
| 1299 | 775 #endif /* HAVE_LIBOTR */ |
| 1599 | 776 |
| 1811 | 777 /* vim: set et cindent cinoptions=>2\:2(0 ts=2 sw=2: For Vim users... */ |