Mercurial > pidgin
annotate src/protocols/zephyr/zephyr.c @ 9740:2bb5e2cd64bd
[gaim-migrate @ 10605]
" A few days back, someone on #gaim was wondering how to
block IM's from IRC, which isn't supported by gaim, as
this isn't supported at a protocol level. I decided to
implement gaim's privacy options (permit lists, deny
lists, block all users, and permit people on buddy
list) at a local level for IRC and
Zephyr. Jabber, SILC, and Trepia don't seem to support
deny or permit lists in Gaim, but I don't use the
latter two protocols and wasn't sure about how to
implemnt in in Jabber.
When implementing it, I noticed that changes in privacy
settings didn't automatically cause blist.xml to get
scheduled
for writing (even on exit). To fix this, I needed to
make schedule_blist_save in blist.c non-static and call
it from serv_set_permit_deny() in server.c, and
gaim_privacy_{permit,deny}_{add,remove} in privacy.c ." --Arun A Tharuvai
committer: Tailor Script <tailor@pidgin.im>
author | Luke Schierer <lschiere@pidgin.im> |
---|---|
date | Wed, 11 Aug 2004 23:52:48 +0000 |
parents | db62420a53a2 |
children | b10d4c6ac7eb |
rev | line source |
---|---|
2086 | 1 /* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 8 -*- */ |
2 /* | |
3 * gaim | |
4 * | |
5 * Copyright (C) 1998-2001, Mark Spencer <markster@marko.net> | |
6 * Some code borrowed from GtkZephyr, by | |
7084
0909ebf6fb28
[gaim-migrate @ 7649]
Christian Hammond <chipx86@chipx86.com>
parents:
7070
diff
changeset
|
7 * Jag/Sean Dilda <agrajag@linuxpower.org>/<smdilda@unity.ncsu.edu> |
0909ebf6fb28
[gaim-migrate @ 7649]
Christian Hammond <chipx86@chipx86.com>
parents:
7070
diff
changeset
|
8 * http://gtkzephyr.linuxpower.org/ |
2086 | 9 * |
10 * This program is free software; you can redistribute it and/or modify | |
11 * it under the terms of the GNU General Public License as published by | |
12 * the Free Software Foundation; either version 2 of the License, or | |
13 * (at your option) any later version. | |
14 * | |
15 * This program is distributed in the hope that it will be useful, | |
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
18 * GNU General Public License for more details. | |
19 * | |
20 * You should have received a copy of the GNU General Public License | |
21 * along with this program; if not, write to the Free Software | |
22 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA | |
23 * | |
24 */ | |
5872
059d95c67cda
[gaim-migrate @ 6304]
Christian Hammond <chipx86@chipx86.com>
parents:
5717
diff
changeset
|
25 /* XXX eww */ |
059d95c67cda
[gaim-migrate @ 6304]
Christian Hammond <chipx86@chipx86.com>
parents:
5717
diff
changeset
|
26 #include "src/internal.h" |
2086 | 27 |
8212 | 28 #include "accountopt.h" |
5872
059d95c67cda
[gaim-migrate @ 6304]
Christian Hammond <chipx86@chipx86.com>
parents:
5717
diff
changeset
|
29 #include "debug.h" |
059d95c67cda
[gaim-migrate @ 6304]
Christian Hammond <chipx86@chipx86.com>
parents:
5717
diff
changeset
|
30 #include "notify.h" |
059d95c67cda
[gaim-migrate @ 6304]
Christian Hammond <chipx86@chipx86.com>
parents:
5717
diff
changeset
|
31 #include "prpl.h" |
059d95c67cda
[gaim-migrate @ 6304]
Christian Hammond <chipx86@chipx86.com>
parents:
5717
diff
changeset
|
32 #include "server.h" |
059d95c67cda
[gaim-migrate @ 6304]
Christian Hammond <chipx86@chipx86.com>
parents:
5717
diff
changeset
|
33 #include "util.h" |
9434 | 34 #include "cmds.h" |
9740 | 35 #include "privacy.h" |
5872
059d95c67cda
[gaim-migrate @ 6304]
Christian Hammond <chipx86@chipx86.com>
parents:
5717
diff
changeset
|
36 |
059d95c67cda
[gaim-migrate @ 6304]
Christian Hammond <chipx86@chipx86.com>
parents:
5717
diff
changeset
|
37 #include "zephyr/zephyr.h" |
9478 | 38 #include "internal.h" |
5872
059d95c67cda
[gaim-migrate @ 6304]
Christian Hammond <chipx86@chipx86.com>
parents:
5717
diff
changeset
|
39 |
8386 | 40 #include <strings.h> |
41 | |
8560 | 42 #define ZEPHYR_FALLBACK_CHARSET "ISO-8859-1" |
43 | |
9478 | 44 /* these are deliberately high, since most people don't send multiple "PING"s */ |
45 #define ZEPHYR_TYPING_SEND_TIMEOUT 15 | |
46 #define ZEPHYR_TYPING_RECV_TIMEOUT 10 | |
47 | |
2086 | 48 extern Code_t ZGetLocations(ZLocations_t *, int *); |
49 extern Code_t ZSetLocation(char *); | |
50 extern Code_t ZUnsetLocation(); | |
9478 | 51 extern Code_t ZGetSubscriptions(ZSubscription_t *, int*); |
2086 | 52 |
53 typedef struct _zframe zframe; | |
54 typedef struct _zephyr_triple zephyr_triple; | |
9610 | 55 typedef struct _zephyr_account zephyr_account; |
2086 | 56 |
9610 | 57 |
58 struct _zephyr_account { | |
59 GaimAccount* account; | |
60 char *username; | |
61 char* realm; | |
62 char* galaxy; | |
63 char* krbtkfile; | |
64 guint32 nottimer; | |
65 guint32 loctimer; | |
66 GList *pending_zloc_names; | |
67 GSList *subscrips; | |
68 int last_id; | |
69 unsigned short port; | |
70 char ourhost[MAXHOSTNAMELEN]; | |
71 char ourhostcanon[MAXHOSTNAMELEN]; | |
72 }; | |
9478 | 73 |
2086 | 74 /* struct I need for zephyr_to_html */ |
75 struct _zframe { | |
76 /* true for everything but @color, since inside the parens of that one is | |
8644 | 77 * the color. */ |
2086 | 78 gboolean has_closer; |
79 /* </i>, </font>, </b>, etc. */ | |
80 char *closing; | |
81 /* text including the opening html thingie. */ | |
82 GString *text; | |
83 struct _zframe *enclosing; | |
84 }; | |
85 | |
86 struct _zephyr_triple { | |
87 char *class; | |
88 char *instance; | |
89 char *recipient; | |
90 char *name; | |
91 gboolean open; | |
92 int id; | |
93 }; | |
94 | |
95 #define z_call(func) if (func != ZERR_NONE)\ | |
96 return; | |
97 #define z_call_r(func) if (func != ZERR_NONE)\ | |
98 return TRUE; | |
99 #define z_call_s(func, err) if (func != ZERR_NONE) {\ | |
9610 | 100 gaim_connection_error(gc, err);\ |
2086 | 101 return;\ |
102 } | |
103 | |
9328 | 104 char *local_zephyr_normalize(const char *); |
7322 | 105 static const char *zephyr_normalize(const GaimAccount *, const char *); |
9328 | 106 static const char *gaim_zephyr_get_realm(); |
9434 | 107 static void zephyr_chat_set_topic(GaimConnection * gc, int id, const char *topic); |
9328 | 108 |
109 char *zephyr_strip_foreign_realm(const char* user){ | |
110 /* | |
111 Takes in a username of the form username or username@realm | |
112 and returns: | |
113 username, if there is no realm, or the realm is the local realm | |
114 or: | |
115 username@realm if there is a realm and it is foreign | |
116 */ | |
117 char *tmp = g_strdup(user); | |
118 char *at = strchr(tmp,'@'); | |
119 if (at && !g_ascii_strcasecmp(at+1,gaim_zephyr_get_realm())) { | |
120 /* We're passed in a username of the form user@users-realm */ | |
121 char* tmp2; | |
122 *at = '\0'; | |
123 tmp2 = g_strdup(tmp); | |
124 g_free(tmp); | |
125 return tmp2; | |
126 } | |
127 else { | |
128 /* We're passed in a username of the form user or user@foreign-realm */ | |
129 return tmp; | |
130 } | |
131 } | |
2086 | 132 |
133 /* this is so bad, and if Zephyr weren't so fucked up to begin with I | |
134 * wouldn't do this. but it is so i will. */ | |
9610 | 135 |
9328 | 136 /* just for debugging */ |
2086 | 137 static void handle_unknown(ZNotice_t notice) |
138 { | |
9328 | 139 gaim_debug(GAIM_DEBUG_MISC, "zephyr","z_packet: %s\n", notice.z_packet); |
140 gaim_debug(GAIM_DEBUG_MISC, "zephyr","z_version: %s\n", notice.z_version); | |
141 gaim_debug(GAIM_DEBUG_MISC, "zephyr","z_kind: %d\n", (int)(notice.z_kind)); | |
142 gaim_debug(GAIM_DEBUG_MISC, "zephyr","z_class: %s\n", notice.z_class); | |
143 gaim_debug(GAIM_DEBUG_MISC, "zephyr","z_class_inst: %s\n", notice.z_class_inst); | |
144 gaim_debug(GAIM_DEBUG_MISC, "zephyr","z_opcode: %s\n", notice.z_opcode); | |
145 gaim_debug(GAIM_DEBUG_MISC, "zephyr","z_sender: %s\n", notice.z_sender); | |
146 gaim_debug(GAIM_DEBUG_MISC, "zephyr","z_recipient: %s\n", notice.z_recipient); | |
147 gaim_debug(GAIM_DEBUG_MISC, "zephyr","z_message: %s\n", notice.z_message); | |
148 gaim_debug(GAIM_DEBUG_MISC, "zephyr","z_message_len: %d\n", notice.z_message_len); | |
2086 | 149 } |
9328 | 150 |
2086 | 151 |
9610 | 152 static zephyr_triple *new_triple(zephyr_account *zephyr,const char *c, const char *i, const char *r) |
2086 | 153 { |
154 zephyr_triple *zt; | |
8644 | 155 |
2086 | 156 zt = g_new0(zephyr_triple, 1); |
157 zt->class = g_strdup(c); | |
158 zt->instance = g_strdup(i); | |
159 zt->recipient = g_strdup(r); | |
9610 | 160 zt->name = g_strdup_printf("%s,%s,%s", c, i?i:"", r?r:""); |
161 zt->id = ++(zephyr->last_id); | |
2086 | 162 zt->open = FALSE; |
163 return zt; | |
164 } | |
165 | |
8644 | 166 static void free_triple(zephyr_triple * zt) |
2086 | 167 { |
168 g_free(zt->class); | |
169 g_free(zt->instance); | |
170 g_free(zt->recipient); | |
171 g_free(zt->name); | |
172 g_free(zt); | |
173 } | |
174 | |
9478 | 175 static gchar *gaim_zephyr_get_sender() |
8644 | 176 { |
8568 | 177 /* will be useful once this plugin can use a backend other |
178 than libzephyr */ | |
9478 | 179 /* XXX add zephyr error reporting */ |
180 gchar *sender; | |
181 sender = ZGetSender(); | |
182 if (!sender || !g_ascii_strcasecmp(sender,"")) { | |
183 sender = ""; | |
184 } | |
185 return sender; | |
8354 | 186 } |
187 | |
8644 | 188 static const char *gaim_zephyr_get_realm() |
189 { | |
8568 | 190 /* will be useful once this plugin can use a backend other |
191 than libzephyr */ | |
9478 | 192 gchar *realm=NULL; |
193 /* XXX add zephyr error reporting */ | |
194 realm= ZGetRealm(); | |
195 return realm; | |
8354 | 196 } |
197 | |
9328 | 198 /* returns true if zt1 is a subset of zt2. This function is used to |
199 determine whether a zephyr sent to zt1 should be placed in the chat | |
200 with triple zt2 | |
201 | |
202 zt1 is a subset of zt2 | |
203 iff. the classnames are identical ignoring case | |
204 AND. the instance names are identical (ignoring case), or zt2->instance is *. | |
205 AND. the recipient names are identical | |
206 */ | |
207 | |
8644 | 208 static gboolean triple_subset(zephyr_triple * zt1, zephyr_triple * zt2) |
2086 | 209 { |
9328 | 210 if (g_ascii_strcasecmp(zt2->class, zt1->class)) { |
2086 | 211 return FALSE; |
212 } | |
8644 | 213 if (g_ascii_strcasecmp(zt2->instance, zt1->instance) && g_ascii_strcasecmp(zt2->instance, "*")) { |
2086 | 214 return FALSE; |
215 } | |
9328 | 216 if (g_ascii_strcasecmp(zt2->recipient, zt1->recipient)) { |
2086 | 217 return FALSE; |
218 } | |
219 return TRUE; | |
220 } | |
221 | |
9610 | 222 static zephyr_triple *find_sub_by_triple(zephyr_account *zephyr,zephyr_triple * zt) |
2086 | 223 { |
224 zephyr_triple *curr_t; | |
9610 | 225 GSList *curr = zephyr->subscrips; |
8644 | 226 |
2086 | 227 while (curr) { |
228 curr_t = curr->data; | |
229 if (triple_subset(zt, curr_t)) | |
230 return curr_t; | |
231 curr = curr->next; | |
232 } | |
233 return NULL; | |
234 } | |
235 | |
9610 | 236 static zephyr_triple *find_sub_by_id(zephyr_account *zephyr,int id) |
2086 | 237 { |
238 zephyr_triple *zt; | |
9610 | 239 GSList *curr = zephyr->subscrips; |
8644 | 240 |
2086 | 241 while (curr) { |
242 zt = curr->data; | |
243 if (zt->id == id) | |
244 return zt; | |
245 curr = curr->next; | |
246 } | |
247 return NULL; | |
248 } | |
249 | |
9328 | 250 /* |
9434 | 251 Converts strings to utf-8 if necessary using user specified encoding |
9328 | 252 */ |
253 | |
9610 | 254 static gchar *zephyr_recv_convert(GaimConnection *gc,gchar *string, int len) |
8560 | 255 { |
256 gchar *utf8; | |
257 GError *err = NULL; | |
8644 | 258 |
259 if (g_utf8_validate(string, len, NULL)) { | |
8568 | 260 return g_strdup(string); |
261 } else { | |
9610 | 262 utf8 = g_convert(string, len, "UTF-8", gaim_account_get_string(gc->account, "encoding", ZEPHYR_FALLBACK_CHARSET), NULL, NULL, &err); |
8568 | 263 if (err) { |
264 gaim_debug(GAIM_DEBUG_ERROR, "zephyr", "recv conversion error: %s\n", err->message); | |
265 utf8 = g_strdup(_("(There was an error converting this message. Check the 'Encoding' option in the Account Editor)")); | |
8954 | 266 g_error_free(err); |
8568 | 267 } |
268 | |
269 return utf8; | |
270 } | |
8560 | 271 } |
272 | |
2086 | 273 /* utility macros that are useful for zephyr_to_html */ |
274 | |
275 #define IS_OPENER(c) ((c == '{') || (c == '[') || (c == '(') || (c == '<')) | |
276 #define IS_CLOSER(c) ((c == '}') || (c == ']') || (c == ')') || (c == '>')) | |
277 | |
8451 | 278 /* This parses HTML formatting (put out by one of the gtkimhtml widgets |
279 And converts it to zephyr formatting. | |
280 It currently deals properly with <b>, <br>, <i>, <font face=...>, <font color=...>, | |
281 It ignores <font back=...> | |
282 It does | |
283 <font size = "1 or 2" -> @small | |
284 3 or 4 @medium() | |
285 5,6, or 7 @large() | |
286 <a href is dealt with by ignoring the description and outputting the link | |
287 */ | |
288 | |
289 static char *html_to_zephyr(const char *message) | |
290 { | |
8644 | 291 int len, cnt, retcount; |
292 char *ret; | |
293 | |
294 len = strlen(message); | |
9478 | 295 if (!len) |
296 return g_strdup(""); | |
297 | |
8644 | 298 ret = g_new0(char, len * 3); |
299 | |
300 bzero(ret, len * 3); | |
301 retcount = 0; | |
302 cnt = 0; | |
303 while (cnt <= len) { | |
304 if (message[cnt] == '<') { | |
305 if (!g_ascii_strncasecmp(message + cnt + 1, "i>", 2)) { | |
306 strncpy(ret + retcount, "@i(", 3); | |
307 cnt += 3; | |
308 retcount += 3; | |
309 } else if (!g_ascii_strncasecmp(message + cnt + 1, "b>", 2)) { | |
310 strncpy(ret + retcount, "@b(", 3); | |
311 cnt += 3; | |
312 retcount += 3; | |
313 } else if (!g_ascii_strncasecmp(message + cnt + 1, "br>", 3)) { | |
314 strncpy(ret + retcount, "\n", 1); | |
315 cnt += 4; | |
316 retcount += 1; | |
317 } else if (!g_ascii_strncasecmp(message + cnt + 1, "a href=\"", 8)) { | |
318 cnt += 9; | |
319 while (g_ascii_strncasecmp(message + cnt, "\">", 2) != 0) { | |
320 ret[retcount] = message[cnt]; | |
321 retcount++; | |
322 cnt++; | |
323 } | |
324 cnt += 2; | |
325 /* ignore descriptive string */ | |
326 while (g_ascii_strncasecmp(message + cnt, "</a>", 4) != 0) { | |
327 cnt++; | |
328 } | |
329 cnt += 4; | |
330 } else if (!g_ascii_strncasecmp(message + cnt + 1, "font", 4)) { | |
331 cnt += 5; | |
332 while (!g_ascii_strncasecmp(message + cnt, " ", 1)) | |
333 cnt++; | |
334 if (!g_ascii_strncasecmp(message + cnt, "color=\"", 7)) { | |
335 cnt += 7; | |
336 strncpy(ret + retcount, "@color(", 7); | |
337 retcount += 7; | |
338 while (g_ascii_strncasecmp(message + cnt, "\">", 2) != 0) { | |
339 ret[retcount] = message[cnt]; | |
340 retcount++; | |
341 cnt++; | |
342 } | |
343 ret[retcount] = ')'; | |
344 retcount++; | |
345 cnt += 2; | |
346 } else if (!g_ascii_strncasecmp(message + cnt, "face=\"", 6)) { | |
347 cnt += 6; | |
348 strncpy(ret + retcount, "@font(", 6); | |
349 retcount += 6; | |
350 while (g_ascii_strncasecmp(message + cnt, "\">", 2) != 0) { | |
351 ret[retcount] = message[cnt]; | |
352 retcount++; | |
353 cnt++; | |
354 } | |
355 ret[retcount] = ')'; | |
356 retcount++; | |
357 cnt += 2; | |
358 } else if (!g_ascii_strncasecmp(message + cnt, "size=\"", 6)) { | |
359 cnt += 6; | |
360 if ((message[cnt] == '1') || (message[cnt] == '2')) { | |
361 strncpy(ret + retcount, "@small(", 7); | |
362 retcount += 7; | |
363 } else if ((message[cnt] == '3') | |
364 || (message[cnt] == '4')) { | |
365 strncpy(ret + retcount, "@medium(", 8); | |
366 retcount += 8; | |
367 } else if ((message[cnt] == '5') | |
368 || (message[cnt] == '6') | |
369 || (message[cnt] == '7')) { | |
370 strncpy(ret + retcount, "@large(", 7); | |
371 retcount += 7; | |
372 } | |
373 cnt += 3; | |
374 } else { | |
375 /* Drop all unrecognized/misparsed font tags */ | |
376 while (g_ascii_strncasecmp(message + cnt, "\">", 2) != 0) { | |
377 cnt++; | |
378 } | |
379 cnt += 2; | |
380 } | |
381 } else if (!g_ascii_strncasecmp(message + cnt + 1, "/i>", 3) | |
382 || !g_ascii_strncasecmp(message + cnt + 1, "/b>", 3)) { | |
383 cnt += 4; | |
384 ret[retcount] = ')'; | |
385 retcount++; | |
386 } else if (!g_ascii_strncasecmp(message + cnt + 1, "/font>", 6)) { | |
387 cnt += 7; | |
388 strncpy(ret + retcount, "@font(fixed)", 12); | |
389 retcount += 12; | |
390 } else { | |
391 /* Catch all for all unrecognized/misparsed <foo> tage */ | |
392 while (g_ascii_strncasecmp(message + cnt, ">", 1) != 0) { | |
393 ret[retcount] = message[cnt]; | |
394 retcount++; | |
395 cnt++; | |
396 } | |
397 } | |
398 } else { | |
399 /* Duh */ | |
400 ret[retcount] = message[cnt]; | |
401 retcount++; | |
402 cnt++; | |
403 } | |
404 } | |
405 return ret; | |
8451 | 406 } |
407 | |
2086 | 408 /* this parses zephyr formatting and converts it to html. For example, if |
409 * you pass in "@{@color(blue)@i(hello)}" you should get out | |
410 * "<font color=blue><i>hello</i></font>". */ | |
411 static char *zephyr_to_html(char *message) | |
412 { | |
413 int len, cnt; | |
414 zframe *frames, *curr; | |
415 char *ret; | |
416 | |
417 frames = g_new(zframe, 1); | |
418 frames->text = g_string_new(""); | |
419 frames->enclosing = NULL; | |
420 frames->closing = ""; | |
421 frames->has_closer = FALSE; | |
422 | |
423 len = strlen(message); | |
424 cnt = 0; | |
425 while (cnt <= len) { | |
426 if (message[cnt] == '@') { | |
427 zframe *new_f; | |
428 char *buf; | |
429 int end; | |
8644 | 430 |
431 for (end = 1; (cnt + end) <= len && !IS_OPENER(message[cnt + end]) | |
432 && !IS_CLOSER(message[cnt + end]); end++); | |
2086 | 433 buf = g_new0(char, end); |
8644 | 434 |
2086 | 435 if (end) { |
8644 | 436 g_snprintf(buf, end, "%s", message + cnt + 1); |
2086 | 437 } |
8644 | 438 if (!g_ascii_strcasecmp(buf, "italic") || !g_ascii_strcasecmp(buf, "i")) { |
2086 | 439 new_f = g_new(zframe, 1); |
440 new_f->enclosing = frames; | |
441 new_f->text = g_string_new("<i>"); | |
442 new_f->closing = "</i>"; | |
443 new_f->has_closer = TRUE; | |
444 frames = new_f; | |
8644 | 445 cnt += end + 1; /* cnt points to char after opener */ |
446 } else if (!g_ascii_strcasecmp(buf, "small")) { | |
447 new_f = g_new(zframe, 1); | |
448 new_f->enclosing = frames; | |
449 new_f->text = g_string_new("<font size=\"1\">"); | |
450 new_f->closing = "</font>"; | |
451 frames = new_f; | |
452 cnt += end + 1; | |
453 } else if (!g_ascii_strcasecmp(buf, "medium")) { | |
454 new_f = g_new(zframe, 1); | |
455 new_f->enclosing = frames; | |
456 new_f->text = g_string_new("<font size=\"3\">"); | |
457 new_f->closing = "</font>"; | |
458 frames = new_f; | |
459 cnt += end + 1; | |
460 } else if (!g_ascii_strcasecmp(buf, "large")) { | |
461 new_f = g_new(zframe, 1); | |
462 new_f->enclosing = frames; | |
463 new_f->text = g_string_new("<font size=\"7\">"); | |
464 new_f->closing = "</font>"; | |
465 frames = new_f; | |
466 cnt += end + 1; | |
467 } else if (!g_ascii_strcasecmp(buf, "bold") | |
468 || !g_ascii_strcasecmp(buf, "b")) { | |
2086 | 469 new_f = g_new(zframe, 1); |
470 new_f->enclosing = frames; | |
471 new_f->text = g_string_new("<b>"); | |
472 new_f->closing = "</b>"; | |
473 new_f->has_closer = TRUE; | |
474 frames = new_f; | |
8644 | 475 cnt += end + 1; |
476 } else if (!g_ascii_strcasecmp(buf, "font")) { | |
477 cnt += end + 1; | |
8451 | 478 new_f = g_new(zframe, 1); |
479 new_f->enclosing = frames; | |
480 new_f->text = g_string_new("<font face="); | |
481 for (; (cnt <= len) && !IS_CLOSER(message[cnt]); cnt++) { | |
482 g_string_append_c(new_f->text, message[cnt]); | |
483 } | |
8644 | 484 cnt++; /* point to char after closer */ |
8451 | 485 g_string_append_c(new_f->text, '>'); |
486 new_f->closing = "</font>"; | |
487 new_f->has_closer = FALSE; | |
488 frames = new_f; | |
8568 | 489 } else if (!g_ascii_strcasecmp(buf, "color")) { |
8644 | 490 cnt += end + 1; |
2086 | 491 new_f = g_new(zframe, 1); |
492 new_f->enclosing = frames; | |
493 new_f->text = g_string_new("<font color="); | |
494 for (; (cnt <= len) && !IS_CLOSER(message[cnt]); cnt++) { | |
495 g_string_append_c(new_f->text, message[cnt]); | |
496 } | |
8644 | 497 cnt++; /* point to char after closer */ |
2086 | 498 g_string_append_c(new_f->text, '>'); |
499 new_f->closing = "</font>"; | |
500 new_f->has_closer = FALSE; | |
501 frames = new_f; | |
4793 | 502 } else if (!g_ascii_strcasecmp(buf, "")) { |
2086 | 503 new_f = g_new(zframe, 1); |
504 new_f->enclosing = frames; | |
505 new_f->text = g_string_new(""); | |
506 new_f->closing = ""; | |
507 new_f->has_closer = TRUE; | |
508 frames = new_f; | |
8644 | 509 cnt += end + 1; /* cnt points to char after opener */ |
2086 | 510 } else { |
8644 | 511 if ((cnt + end) > len) { |
2086 | 512 g_string_append_c(frames->text, '@'); |
513 cnt++; | |
8644 | 514 } else if (IS_CLOSER(message[cnt + end])) { |
515 /* We have @chars..closer . This is | |
516 merely a sequence of chars that isn't a formatting tag | |
517 */ | |
518 int tmp = cnt; | |
519 | |
520 while (tmp <= cnt + end) { | |
521 g_string_append_c(frames->text, message[tmp]); | |
522 tmp++; | |
523 } | |
524 cnt += end + 1; | |
525 } else { | |
2086 | 526 /* unrecognized thingie. act like it's not there, but we |
527 * still need to take care of the corresponding closer, | |
528 * make a frame that does nothing. */ | |
529 new_f = g_new(zframe, 1); | |
530 new_f->enclosing = frames; | |
531 new_f->text = g_string_new(""); | |
532 new_f->closing = ""; | |
533 new_f->has_closer = TRUE; | |
534 frames = new_f; | |
8644 | 535 cnt += end + 1; /* cnt points to char after opener */ |
2086 | 536 } |
537 } | |
538 } else if (IS_CLOSER(message[cnt])) { | |
539 zframe *popped; | |
540 gboolean last_had_closer; | |
8644 | 541 |
2086 | 542 if (frames->enclosing) { |
543 do { | |
544 popped = frames; | |
545 frames = frames->enclosing; | |
546 g_string_append(frames->text, popped->text->str); | |
547 g_string_append(frames->text, popped->closing); | |
548 g_string_free(popped->text, TRUE); | |
549 last_had_closer = popped->has_closer; | |
550 g_free(popped); | |
551 } while (frames && frames->enclosing && !last_had_closer); | |
552 } else { | |
553 g_string_append_c(frames->text, message[cnt]); | |
554 } | |
555 cnt++; | |
556 } else if (message[cnt] == '\n') { | |
557 g_string_append(frames->text, "<br>"); | |
558 cnt++; | |
559 } else { | |
560 g_string_append_c(frames->text, message[cnt++]); | |
561 } | |
562 } | |
563 /* go through all the stuff that they didn't close */ | |
564 while (frames->enclosing) { | |
565 curr = frames; | |
566 g_string_append(frames->enclosing->text, frames->text->str); | |
567 g_string_append(frames->enclosing->text, frames->closing); | |
568 g_string_free(frames->text, TRUE); | |
569 frames = frames->enclosing; | |
570 g_free(curr); | |
571 } | |
572 ret = frames->text->str; | |
573 g_string_free(frames->text, FALSE); | |
574 g_free(frames); | |
575 return ret; | |
576 } | |
577 | |
9610 | 578 static gboolean pending_zloc(zephyr_account *zephyr,char *who) |
2086 | 579 { |
580 GList *curr; | |
8644 | 581 |
9610 | 582 for (curr = zephyr->pending_zloc_names; curr != NULL; curr = curr->next) { |
9328 | 583 char* normalized_who = local_zephyr_normalize(who); |
584 if (!g_ascii_strcasecmp(normalized_who, (char *)curr->data)) { | |
8644 | 585 g_free((char *)curr->data); |
9610 | 586 zephyr->pending_zloc_names = g_list_remove(zephyr->pending_zloc_names, curr->data); |
2086 | 587 return TRUE; |
588 } | |
589 } | |
590 return FALSE; | |
591 } | |
592 | |
9328 | 593 /* Called when the server notifies us a message couldn't get sent */ |
594 | |
9610 | 595 static void message_failed(GaimConnection *gc, ZNotice_t notice, struct sockaddr_in from) |
8559 | 596 { |
8644 | 597 if (g_ascii_strcasecmp(notice.z_class, "message")) { |
9328 | 598 gchar* chat_failed = g_strdup_printf(_("Unable send to chat %s,%s,%s"),notice.z_class,notice.z_class_inst,notice.z_recipient); |
9610 | 599 gaim_notify_error(gc,"",chat_failed,NULL); |
9328 | 600 g_free(chat_failed); |
8644 | 601 } else { |
9610 | 602 gaim_notify_error(gc, notice.z_recipient, _("User is offline"), NULL); |
8644 | 603 } |
8559 | 604 } |
605 | |
9610 | 606 static void handle_message(GaimConnection *gc,ZNotice_t notice, struct sockaddr_in from) |
2086 | 607 { |
4793 | 608 if (!g_ascii_strcasecmp(notice.z_class, LOGIN_CLASS)) { |
3277 | 609 /* well, we'll be updating in 20 seconds anyway, might as well ignore this. */ |
4793 | 610 } else if (!g_ascii_strcasecmp(notice.z_class, LOCATE_CLASS)) { |
611 if (!g_ascii_strcasecmp(notice.z_opcode, LOCATE_LOCATE)) { | |
2086 | 612 int nlocs; |
613 char *user; | |
6695 | 614 GaimBuddy *b; |
2086 | 615 |
9478 | 616 /* XXX add real error reporting */ |
2086 | 617 if (ZParseLocations(¬ice, NULL, &nlocs, &user) != ZERR_NONE) |
618 return; | |
8435 | 619 |
9610 | 620 if ((b = gaim_find_buddy(gc->account, user)) == NULL) { |
2086 | 621 char *e = strchr(user, '@'); |
8644 | 622 |
623 if (e && !g_ascii_strcasecmp(e + 1, gaim_zephyr_get_realm())) { | |
624 *e = '\0'; | |
625 } | |
9610 | 626 b = gaim_find_buddy(gc->account, user); |
8644 | 627 } |
9610 | 628 if ((b && pending_zloc(gc->proto_data,b->name)) || pending_zloc(gc->proto_data,user)) { |
2086 | 629 ZLocations_t locs; |
630 int one = 1; | |
631 GString *str = g_string_new(""); | |
8644 | 632 |
633 g_string_append_printf(str, _("<b>User:</b> %s<br>"), b ? b->name : user); | |
8435 | 634 if (b && b->alias) |
5132 | 635 g_string_append_printf(str, _("<b>Alias:</b> %s<br>"), b->alias); |
2086 | 636 if (!nlocs) { |
5132 | 637 g_string_append_printf(str, _("<br>Hidden or not logged-in")); |
2086 | 638 } |
639 for (; nlocs > 0; nlocs--) { | |
9478 | 640 /* XXX add real error reporting */ |
2086 | 641 ZGetLocations(&locs, &one); |
8644 | 642 g_string_append_printf(str, _("<br>At %s since %s"), locs.host, locs.time); |
2086 | 643 } |
9610 | 644 gaim_notify_formatted(gc, NULL, _("Buddy Information"), NULL, str->str, NULL, NULL); |
2086 | 645 g_string_free(str, TRUE); |
646 } else | |
9610 | 647 serv_got_update(gc, b->name, nlocs, 0, 0, 0, 0); |
2086 | 648 |
9434 | 649 g_free(user); |
2086 | 650 } |
651 } else { | |
8560 | 652 char *buf, *buf2, *buf3; |
2804
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
653 char *send_inst; |
8644 | 654 GaimConversation *gconv1; |
655 GaimConvChat *gcc; | |
2086 | 656 char *ptr = notice.z_message + strlen(notice.z_message) + 1; |
9478 | 657 int len; |
8644 | 658 char *sendertmp = g_strdup_printf("%s", gaim_zephyr_get_sender()); |
9478 | 659 int signature_length = strlen(notice.z_message); |
660 int message_has_no_body = 0; | |
7118
bf630f7dfdcd
[gaim-migrate @ 7685]
Christian Hammond <chipx86@chipx86.com>
parents:
7084
diff
changeset
|
661 GaimConvImFlags flags = 0; |
8644 | 662 gchar *tmpescape; |
8560 | 663 |
9478 | 664 /* Need to deal with 0 length messages to handle typing notification (OPCODE) ping messages */ |
665 /* One field zephyrs would have caused gaim to crash */ | |
666 if ( (notice.z_message_len == 0) || (signature_length >= notice.z_message_len - 1)) { | |
667 message_has_no_body = 1; | |
668 len = 0; | |
669 gaim_debug_info("zephyr","message_size %d %d %d\n",len,notice.z_message_len,signature_length); | |
670 buf3 = g_strdup(""); | |
671 | |
672 } else { | |
673 len = notice.z_message_len - ( signature_length +1); | |
674 gaim_debug_info("zephyr","message_size %d %d %d\n",len,notice.z_message_len,signature_length); | |
8644 | 675 buf = g_malloc(len + 1); |
676 g_snprintf(buf, len + 1, "%s", ptr); | |
677 g_strchomp(buf); | |
678 tmpescape = gaim_escape_html(buf); | |
9478 | 679 g_free(buf); |
8644 | 680 buf2 = zephyr_to_html(tmpescape); |
9610 | 681 buf3 = zephyr_recv_convert(gc,buf2, strlen(buf2)); |
8644 | 682 g_free(buf2); |
683 g_free(tmpescape); | |
9478 | 684 } |
8644 | 685 |
9328 | 686 if (!g_ascii_strcasecmp(notice.z_class, "MESSAGE") && !g_ascii_strcasecmp(notice.z_class_inst, "PERSONAL") |
687 && !g_ascii_strcasecmp(notice.z_recipient,gaim_zephyr_get_sender())) { | |
688 gchar* stripped_sender; | |
4793 | 689 if (!g_ascii_strcasecmp(notice.z_message, "Automated reply:")) |
7118
bf630f7dfdcd
[gaim-migrate @ 7685]
Christian Hammond <chipx86@chipx86.com>
parents:
7084
diff
changeset
|
690 flags |= GAIM_CONV_IM_AUTO_RESP; |
9328 | 691 stripped_sender = zephyr_strip_foreign_realm(notice.z_sender); |
9478 | 692 |
693 if (!g_ascii_strcasecmp(notice.z_opcode,"PING")) | |
9610 | 694 serv_got_typing(gc,stripped_sender,ZEPHYR_TYPING_RECV_TIMEOUT, GAIM_TYPING); |
9740 | 695 else { |
696 GSList* l; | |
697 gboolean in_deny; | |
698 | |
699 switch (gc->account->perm_deny) { | |
700 case GAIM_PRIVACY_ALLOW_ALL: | |
701 in_deny = 0; break; | |
702 case GAIM_PRIVACY_DENY_ALL: | |
703 in_deny = 1; break; | |
704 case GAIM_PRIVACY_ALLOW_USERS: /* See if stripped_sender is in gc->account->permit and allow appropriately */ | |
705 in_deny = 1; | |
706 for(l=gc->account->permit;l!=NULL;l=l->next) { | |
707 if (!gaim_utf8_strcasecmp(stripped_sender, gaim_normalize(gc->account, (char *)l->data))) { | |
708 fprintf(stderr,"stripped sender %s l->data %sf\n",stripped_sender, (char *)l->data); | |
709 in_deny=0; | |
710 break; | |
711 } | |
712 } | |
713 break; | |
714 case GAIM_PRIVACY_DENY_USERS: /* See if stripped_sender is in gc->account->deny and deny if so */ | |
715 in_deny = 0; | |
716 for(l=gc->account->deny;l!=NULL;l=l->next) { | |
717 if (!gaim_utf8_strcasecmp(stripped_sender, gaim_normalize(gc->account, (char *)l->data))) { | |
718 fprintf(stderr,"stripped sender %s l->data %sf\n",stripped_sender, (char *)l->data); | |
719 in_deny=1; | |
720 break; | |
721 } | |
722 } | |
723 break; | |
724 case GAIM_PRIVACY_ALLOW_BUDDYLIST: | |
725 in_deny = 1; | |
726 if (gaim_find_buddy(gc->account,stripped_sender)!=NULL) { | |
727 in_deny = 0; | |
728 } | |
729 break; | |
730 default: | |
731 in_deny=0; break; | |
732 } | |
9478 | 733 |
9740 | 734 if (!in_deny) { |
735 serv_got_im(gc, stripped_sender, buf3, flags, time(NULL)); | |
736 } | |
737 } | |
9328 | 738 g_free(stripped_sender); |
9740 | 739 |
2086 | 740 } else { |
741 zephyr_triple *zt1, *zt2; | |
9437 | 742 gchar *send_inst_utf8; |
9610 | 743 zephyr_account *zephyr = gc->proto_data; |
744 zt1 = new_triple(gc->proto_data,notice.z_class, notice.z_class_inst, notice.z_recipient); | |
745 zt2 = find_sub_by_triple(gc->proto_data,zt1); | |
2086 | 746 if (!zt2) { |
9434 | 747 /* This is a server supplied subscription */ |
9610 | 748 zephyr->subscrips = g_slist_append(zephyr->subscrips, zt1); |
749 zt2 = find_sub_by_triple(gc->proto_data,zt1); | |
9434 | 750 } |
751 | |
9437 | 752 if (!zt2->open) { |
753 zt2->open = TRUE; | |
9610 | 754 serv_got_joined_chat(gc, zt2->id, zt2->name); |
755 zephyr_chat_set_topic(gc,zt2->id,notice.z_class_inst); | |
9437 | 756 } |
757 g_free(sendertmp); /* fix memory leak? */ | |
758 /* If the person is in the default Realm, then strip the | |
759 Realm from the sender field */ | |
760 sendertmp = zephyr_strip_foreign_realm(notice.z_sender); | |
761 send_inst = g_strdup_printf("%s %s",sendertmp,notice.z_class_inst); | |
9610 | 762 send_inst_utf8 = zephyr_recv_convert(gc,send_inst, strlen(send_inst)); |
9437 | 763 if (!send_inst_utf8) { |
764 gaim_debug(GAIM_DEBUG_ERROR, "zephyr","send_inst %s became null\n", send_inst); | |
765 send_inst_utf8 = "malformed instance"; | |
766 } | |
767 | |
9610 | 768 serv_got_chat_in(gc, zt2->id, send_inst_utf8, 0, buf3, time(NULL)); |
9437 | 769 g_free(send_inst); |
9610 | 770 gconv1 = gaim_find_conversation_with_account(zt2->name, gc->account); |
9437 | 771 gcc = gaim_conversation_get_chat_data(gconv1); |
772 | |
9554 | 773 if (!gaim_conv_chat_find_user(gcc, sendertmp)) { |
9437 | 774 /* force interpretation in network byte order */ |
775 unsigned char *addrs = (unsigned char *)&(notice.z_sender_addr.s_addr); | |
776 gchar* ipaddr = g_strdup_printf("%hhd.%hhd.%hhd.%hhd", (unsigned char)addrs[0], | |
777 (unsigned char)addrs[1], (unsigned char)addrs[2], | |
778 (unsigned char) addrs[3]); | |
779 | |
9554 | 780 gaim_conv_chat_add_user(gcc, sendertmp, ipaddr, GAIM_CBFLAGS_NONE); |
9437 | 781 g_free(ipaddr); /* fix memory leak? */ |
782 | |
783 } | |
784 g_free(sendertmp); | |
785 g_free(send_inst_utf8); | |
786 | |
2086 | 787 free_triple(zt1); |
788 } | |
8560 | 789 g_free(buf3); |
9478 | 790 |
2086 | 791 } |
792 } | |
793 | |
794 static gint check_notify(gpointer data) | |
795 { | |
9478 | 796 /* XXX add real error reporting */ |
9610 | 797 GaimConnection *gc = (GaimConnection*) data; |
2086 | 798 while (ZPending()) { |
799 ZNotice_t notice; | |
800 struct sockaddr_in from; | |
9478 | 801 /* XXX add real error reporting */ |
8644 | 802 |
2086 | 803 z_call_r(ZReceiveNotice(¬ice, &from)); |
804 | |
805 switch (notice.z_kind) { | |
806 case UNSAFE: | |
807 case UNACKED: | |
808 case ACKED: | |
9610 | 809 handle_message(gc,notice, from); |
2086 | 810 break; |
8644 | 811 case SERVACK: |
812 if (!(g_ascii_strcasecmp(notice.z_message, ZSRVACK_NOTSENT))) { | |
9610 | 813 message_failed(gc,notice, from); |
8644 | 814 } |
815 break; | |
9328 | 816 case CLIENTACK: |
9478 | 817 gaim_debug_error("zephyr", "Client ack received\n"); |
2086 | 818 default: |
819 /* we'll just ignore things for now */ | |
9328 | 820 handle_unknown(notice); |
9478 | 821 gaim_debug_error("zephyr", "Unhandled notice.\n"); |
2086 | 822 break; |
823 } | |
9478 | 824 /* XXX add real error reporting */ |
2086 | 825 ZFreeNotice(¬ice); |
826 } | |
827 | |
828 return TRUE; | |
829 } | |
830 | |
831 static gint check_loc(gpointer data) | |
832 { | |
6695 | 833 GaimBlistNode *gnode, *cnode, *bnode; |
2086 | 834 ZAsyncLocateData_t ald; |
9610 | 835 GaimConnection *gc = (GaimConnection*)data; |
2086 | 836 |
837 ald.user = NULL; | |
838 memset(&(ald.uid), 0, sizeof(ZUnique_Id_t)); | |
839 ald.version = NULL; | |
840 | |
8644 | 841 for (gnode = gaim_get_blist()->root; gnode; gnode = gnode->next) { |
842 if (!GAIM_BLIST_NODE_IS_GROUP(gnode)) | |
4785 | 843 continue; |
8644 | 844 for (cnode = gnode->child; cnode; cnode = cnode->next) { |
845 if (!GAIM_BLIST_NODE_IS_CONTACT(cnode)) | |
4785 | 846 continue; |
8644 | 847 for (bnode = cnode->child; bnode; bnode = bnode->next) { |
848 GaimBuddy *b = (GaimBuddy *) bnode; | |
849 | |
850 if (!GAIM_BLIST_NODE_IS_BUDDY(bnode)) | |
6695 | 851 continue; |
9610 | 852 if (b->account->gc == gc) { |
7261 | 853 const char *chk; |
8644 | 854 |
8354 | 855 chk = local_zephyr_normalize(b->name); |
9478 | 856 /* XXX add real error reporting */ |
6695 | 857 /* doesn't matter if this fails or not; we'll just move on to the next one */ |
858 ZRequestLocations(chk, &ald, UNACKED, ZAUTH); | |
9434 | 859 g_free(ald.user); |
860 g_free(ald.version); | |
6695 | 861 } |
4349 | 862 } |
2086 | 863 } |
864 } | |
865 | |
866 return TRUE; | |
867 } | |
868 | |
869 static char *get_exposure_level() | |
870 { | |
9478 | 871 /* XXX add real error reporting */ |
2086 | 872 char *exposure = ZGetVariable("exposure"); |
873 | |
874 if (!exposure) | |
875 return EXPOSE_REALMVIS; | |
4793 | 876 if (!g_ascii_strcasecmp(exposure, EXPOSE_NONE)) |
2086 | 877 return EXPOSE_NONE; |
4793 | 878 if (!g_ascii_strcasecmp(exposure, EXPOSE_OPSTAFF)) |
2086 | 879 return EXPOSE_OPSTAFF; |
4793 | 880 if (!g_ascii_strcasecmp(exposure, EXPOSE_REALMANN)) |
2086 | 881 return EXPOSE_REALMANN; |
4793 | 882 if (!g_ascii_strcasecmp(exposure, EXPOSE_NETVIS)) |
2086 | 883 return EXPOSE_NETVIS; |
4793 | 884 if (!g_ascii_strcasecmp(exposure, EXPOSE_NETANN)) |
2086 | 885 return EXPOSE_NETANN; |
886 return EXPOSE_REALMVIS; | |
887 } | |
888 | |
889 static void strip_comments(char *str) | |
890 { | |
891 char *tmp = strchr(str, '#'); | |
8644 | 892 |
2086 | 893 if (tmp) |
894 *tmp = '\0'; | |
895 g_strchug(str); | |
896 g_strchomp(str); | |
897 } | |
898 | |
9610 | 899 static void zephyr_inithosts(zephyr_account* zephyr) |
9478 | 900 { |
901 /* XXX This code may not be Win32 clean */ | |
902 struct hostent *hent; | |
903 | |
9610 | 904 if (gethostname(zephyr->ourhost, sizeof(zephyr->ourhost)-1) == -1) { |
9478 | 905 gaim_debug(GAIM_DEBUG_ERROR, "zephyr", "unable to retrieve hostname, %%host%% and %%canon%% will be wrong in subscriptions and have been set to unknown\n"); |
9610 | 906 g_stpcpy(zephyr->ourhost,"unknown"); |
907 g_stpcpy(zephyr->ourhostcanon,"unknown"); | |
9478 | 908 return; |
909 } | |
910 | |
9610 | 911 if (!(hent = gethostbyname(zephyr->ourhost))) { |
912 gaim_debug(GAIM_DEBUG_ERROR,"zephyr", "unable to resolve hostname, %%canon%% will be wrong in subscriptions.and has been set to the value of %%host%%, %s\n",zephyr->ourhost); | |
913 g_stpcpy(zephyr->ourhostcanon,zephyr->ourhost); | |
9478 | 914 return; |
915 } | |
9610 | 916 g_stpcpy(zephyr->ourhostcanon,hent->h_name); |
9478 | 917 return; |
918 } | |
919 | |
9610 | 920 static void process_zsubs(zephyr_account *zephyr) |
2086 | 921 { |
9434 | 922 /* Loads zephyr chats "(subscriptions) from ~/.zephyr.subs, and |
923 registers (subscribes to) them on the server */ | |
924 | |
925 /* XXX deal with unsubscriptions */ | |
926 /* XXX deal with punts */ | |
927 | |
2086 | 928 FILE *f; |
929 gchar *fname; | |
930 gchar buff[BUFSIZ]; | |
8644 | 931 |
9610 | 932 zephyr_inithosts(zephyr); |
3630 | 933 fname = g_strdup_printf("%s/.zephyr.subs", gaim_home_dir()); |
2086 | 934 f = fopen(fname, "r"); |
935 if (f) { | |
936 char **triple; | |
937 ZSubscription_t sub; | |
938 char *recip; | |
9478 | 939 char *z_class; |
940 char *z_instance; | |
8644 | 941 |
2086 | 942 while (fgets(buff, BUFSIZ, f)) { |
943 strip_comments(buff); | |
944 if (buff[0]) { | |
945 triple = g_strsplit(buff, ",", 3); | |
8644 | 946 if (triple[0] && triple[1]) { |
947 char *tmp = g_strdup_printf("%s", gaim_zephyr_get_sender()); | |
2804
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
948 char *atptr; |
8644 | 949 |
2086 | 950 sub.zsub_class = triple[0]; |
951 sub.zsub_classinst = triple[1]; | |
8644 | 952 if (triple[2] == NULL) { |
3277 | 953 recip = g_malloc0(1); |
4793 | 954 } else if (!g_ascii_strcasecmp(triple[2], "%me%")) { |
8644 | 955 recip = g_strdup_printf("%s", gaim_zephyr_get_sender()); |
4793 | 956 } else if (!g_ascii_strcasecmp(triple[2], "*")) { |
2804
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
957 /* wildcard |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
958 * form of class,instance,* */ |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
959 recip = g_malloc0(1); |
4793 | 960 } else if (!g_ascii_strcasecmp(triple[2], tmp)) { |
2804
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
961 /* form of class,instance,aatharuv@ATHENA.MIT.EDU */ |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
962 recip = g_strdup(triple[2]); |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
963 } else if ((atptr = strchr(triple[2], '@')) != NULL) { |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
964 /* form of class,instance,*@ANDREW.CMU.EDU |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
965 * class,instance,@ANDREW.CMU.EDU |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
966 * If realm is local realm, blank recipient, else |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
967 * @REALM-NAME |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
968 */ |
8644 | 969 char *realmat = g_strdup_printf("@%s", |
970 gaim_zephyr_get_realm()); | |
971 | |
4793 | 972 if (!g_ascii_strcasecmp(atptr, realmat)) |
2804
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
973 recip = g_malloc0(1); |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
974 else |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
975 recip = g_strdup(atptr); |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
976 g_free(realmat); |
2086 | 977 } else { |
978 recip = g_strdup(triple[2]); | |
979 } | |
2804
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
980 g_free(tmp); |
2086 | 981 sub.zsub_recipient = recip; |
9478 | 982 |
983 if (!g_ascii_strcasecmp(triple[0],"%host%")) { | |
9610 | 984 z_class = g_strdup(zephyr->ourhost); |
9478 | 985 } else if (!g_ascii_strcasecmp(triple[0],"%canon%")) { |
9610 | 986 z_class = g_strdup(zephyr->ourhostcanon); |
9478 | 987 } else { |
988 z_class = g_strdup(triple[0]); | |
989 } | |
990 sub.zsub_class = z_class; | |
991 | |
992 if (!g_ascii_strcasecmp(triple[1],"%host%")) { | |
9610 | 993 z_instance = g_strdup(zephyr->ourhost); |
9478 | 994 } else if (!g_ascii_strcasecmp(triple[1],"%canon%")) { |
9610 | 995 z_instance = g_strdup(zephyr->ourhostcanon); |
9478 | 996 } else { |
997 z_instance = g_strdup(triple[1]); | |
998 } | |
999 sub.zsub_classinst = z_instance; | |
1000 | |
1001 /* There should be some sort of error report listing classes that couldn't be subbed to. | |
1002 Not important right now though */ | |
1003 | |
2086 | 1004 if (ZSubscribeTo(&sub, 1, 0) != ZERR_NONE) { |
9478 | 1005 |
8644 | 1006 gaim_debug(GAIM_DEBUG_ERROR, "zephyr", "Couldn't subscribe to %s, %s, %s\n", sub.zsub_class, sub.zsub_classinst, sub.zsub_recipient); |
2086 | 1007 } |
9478 | 1008 |
9610 | 1009 zephyr->subscrips = g_slist_append(zephyr->subscrips, new_triple(zephyr,sub.zsub_class,sub.zsub_classinst,sub.zsub_recipient)); |
9478 | 1010 /* g_hash_table_destroy(sub_hash_table); */ |
1011 g_free(z_instance); | |
1012 g_free(z_class); | |
2086 | 1013 g_free(recip); |
1014 } | |
1015 g_strfreev(triple); | |
1016 } | |
1017 } | |
1018 } | |
1019 } | |
1020 | |
9610 | 1021 static void process_anyone(GaimConnection *gc) |
2086 | 1022 { |
1023 FILE *fd; | |
1024 gchar buff[BUFSIZ], *filename; | |
6695 | 1025 GaimGroup *g; |
1026 GaimBuddy *b; | |
4775 | 1027 |
1028 if (!(g = gaim_find_group(_("Anyone")))) { | |
1029 g = gaim_group_new(_("Anyone")); | |
1030 gaim_blist_add_group(g, NULL); | |
1031 } | |
6695 | 1032 |
3630 | 1033 filename = g_strconcat(gaim_home_dir(), "/.anyone", NULL); |
2086 | 1034 if ((fd = fopen(filename, "r")) != NULL) { |
1035 while (fgets(buff, BUFSIZ, fd)) { | |
1036 strip_comments(buff); | |
4687 | 1037 if (buff[0]) { |
9610 | 1038 if (!(b = gaim_find_buddy(gc->account, buff))) { |
1039 b = gaim_buddy_new(gc->account, buff, NULL); | |
8644 | 1040 gaim_blist_add_buddy(b, NULL, g, NULL); |
1041 } | |
1042 } | |
2086 | 1043 } |
1044 fclose(fd); | |
1045 } | |
1046 g_free(filename); | |
1047 } | |
1048 | |
8644 | 1049 static void zephyr_login(GaimAccount * account) |
2086 | 1050 { |
1051 ZSubscription_t sub; | |
9610 | 1052 GaimConnection *gc; |
1053 zephyr_account *zephyr; | |
9427 | 1054 |
9610 | 1055 gc = gaim_account_get_connection(account); |
1056 gc->flags |= GAIM_CONNECTION_HTML | GAIM_CONNECTION_NO_BGCOLOR | GAIM_CONNECTION_NO_URLDESC; | |
1057 gc->proto_data = zephyr=g_new0(zephyr_account,1); | |
2086 | 1058 |
9610 | 1059 gaim_connection_update_progress(gc, _("Connecting"), 0, 8); |
9478 | 1060 |
1061 /* XXX z_call_s should actually try to report the com_err determined error */ | |
8645 | 1062 |
2086 | 1063 z_call_s(ZInitialize(), "Couldn't initialize zephyr"); |
9610 | 1064 z_call_s(ZOpenPort(&(zephyr->port)), "Couldn't open port"); |
8644 | 1065 z_call_s(ZSetLocation((char *) |
9610 | 1066 gaim_account_get_string(gc->account, "exposure_level", EXPOSE_REALMVIS)), "Couldn't set location"); |
2086 | 1067 |
1068 sub.zsub_class = "MESSAGE"; | |
1069 sub.zsub_classinst = "PERSONAL"; | |
8354 | 1070 sub.zsub_recipient = (char *)gaim_zephyr_get_sender(); |
9427 | 1071 |
2086 | 1072 if (ZSubscribeTo(&sub, 1, 0) != ZERR_NONE) { |
9478 | 1073 /* XXX don't translate this yet. It could be written better */ |
1074 /* XXX error messages could be handled with more detail */ | |
1075 gaim_notify_error(account->gc, NULL, | |
1076 "Unable to subscribe to messages", "Unable to subscribe to initial messages"); | |
1077 return; | |
2086 | 1078 } |
1079 | |
9610 | 1080 gaim_connection_set_state(gc, GAIM_CONNECTED); |
1081 serv_finish_login(gc); | |
2086 | 1082 |
9610 | 1083 process_anyone(gc); |
1084 process_zsubs(gc->proto_data); | |
2086 | 1085 |
9610 | 1086 zephyr->nottimer = gaim_timeout_add(100, check_notify, gc); |
1087 zephyr->loctimer = gaim_timeout_add(20000, check_loc, gc); | |
2086 | 1088 } |
1089 | |
9610 | 1090 static void write_zsubs(zephyr_account *zephyr) |
2086 | 1091 { |
9434 | 1092 /* Exports subscription (chat) list back to |
1093 * .zephyr.subs | |
1094 * XXX deal with %host%, %canon%, unsubscriptions, and negative subscriptions (punts?) | |
1095 */ | |
1096 | |
9610 | 1097 GSList *s = zephyr->subscrips; |
2086 | 1098 zephyr_triple *zt; |
1099 FILE *fd; | |
1100 char *fname; | |
1101 | |
8644 | 1102 char **triple; |
1103 | |
3630 | 1104 fname = g_strdup_printf("%s/.zephyr.subs", gaim_home_dir()); |
2086 | 1105 fd = fopen(fname, "w"); |
8644 | 1106 |
2086 | 1107 if (!fd) { |
1108 g_free(fname); | |
1109 return; | |
1110 } | |
8644 | 1111 |
2086 | 1112 while (s) { |
9478 | 1113 char *zclass, *zinst, *zrecip; |
2086 | 1114 zt = s->data; |
8644 | 1115 triple = g_strsplit(zt->name, ",", 3); |
9478 | 1116 |
1117 /* deal with classes */ | |
9610 | 1118 if (!g_ascii_strcasecmp(triple[0],zephyr->ourhost)) { |
9478 | 1119 zclass = g_strdup("%host%");; |
9610 | 1120 } else if (!g_ascii_strcasecmp(triple[0],zephyr->ourhostcanon)) { |
9478 | 1121 zclass = g_strdup("%canon%");; |
1122 } else { | |
1123 zclass = g_strdup(triple[0]); | |
1124 } | |
1125 | |
1126 /* deal with instances */ | |
1127 | |
9610 | 1128 if (!g_ascii_strcasecmp(triple[1],zephyr->ourhost)) { |
9478 | 1129 zinst = g_strdup("%host%");; |
9610 | 1130 } else if (!g_ascii_strcasecmp(triple[1],zephyr->ourhostcanon)) { |
9478 | 1131 zinst = g_strdup("%canon%");; |
3277 | 1132 } else { |
9478 | 1133 zinst = g_strdup(triple[1]); |
3277 | 1134 } |
9478 | 1135 |
1136 /* deal with recipients */ | |
1137 if (triple[2] == NULL) { | |
1138 zrecip = g_strdup("*"); | |
1139 } else if (!g_ascii_strcasecmp(triple[2],"")){ | |
1140 zrecip = g_strdup("*"); | |
1141 } else if (!g_ascii_strcasecmp(triple[2], gaim_zephyr_get_sender())) { | |
1142 zrecip = g_strdup("%me%"); | |
3277 | 1143 } else { |
9478 | 1144 zrecip = g_strdup(triple[2]); |
3277 | 1145 } |
9478 | 1146 |
1147 fprintf(fd, "%s,%s,%s\n",zclass,zinst,zrecip); | |
1148 | |
1149 g_free(zclass); | |
1150 g_free(zinst); | |
1151 g_free(zrecip); | |
3277 | 1152 g_free(triple); |
2086 | 1153 s = s->next; |
1154 } | |
1155 g_free(fname); | |
1156 fclose(fd); | |
1157 } | |
1158 | |
9610 | 1159 static void write_anyone(GaimConnection *gc) |
2086 | 1160 { |
6695 | 1161 GaimBlistNode *gnode, *cnode, *bnode; |
1162 GaimBuddy *b; | |
3277 | 1163 char *ptr, *fname, *ptr2; |
2086 | 1164 FILE *fd; |
1165 | |
3630 | 1166 fname = g_strdup_printf("%s/.anyone", gaim_home_dir()); |
2086 | 1167 fd = fopen(fname, "w"); |
1168 if (!fd) { | |
1169 g_free(fname); | |
1170 return; | |
1171 } | |
1172 | |
8644 | 1173 for (gnode = gaim_get_blist()->root; gnode; gnode = gnode->next) { |
1174 if (!GAIM_BLIST_NODE_IS_GROUP(gnode)) | |
4785 | 1175 continue; |
8644 | 1176 for (cnode = gnode->child; cnode; cnode = cnode->next) { |
1177 if (!GAIM_BLIST_NODE_IS_CONTACT(cnode)) | |
4785 | 1178 continue; |
8644 | 1179 for (bnode = cnode->child; bnode; bnode = bnode->next) { |
1180 if (!GAIM_BLIST_NODE_IS_BUDDY(bnode)) | |
6695 | 1181 continue; |
8644 | 1182 b = (GaimBuddy *) bnode; |
9610 | 1183 if (b->account == gc->account) { |
6695 | 1184 if ((ptr = strchr(b->name, '@')) != NULL) { |
1185 ptr2 = ptr + 1; | |
1186 /* We should only strip the realm name if the principal | |
1187 is in the user's realm | |
8644 | 1188 */ |
1189 if (!g_ascii_strcasecmp(ptr2, gaim_zephyr_get_realm())) { | |
6695 | 1190 *ptr = '\0'; |
1191 } | |
4349 | 1192 } |
6695 | 1193 fprintf(fd, "%s\n", b->name); |
1194 if (ptr) | |
1195 *ptr = '@'; | |
3277 | 1196 } |
1197 } | |
2086 | 1198 } |
1199 } | |
1200 | |
1201 fclose(fd); | |
1202 g_free(fname); | |
1203 } | |
1204 | |
8644 | 1205 static void zephyr_close(GaimConnection * gc) |
2086 | 1206 { |
1207 GList *l; | |
1208 GSList *s; | |
9610 | 1209 zephyr_account *zephyr = gc->proto_data; |
8644 | 1210 |
9610 | 1211 l = zephyr->pending_zloc_names; |
2086 | 1212 while (l) { |
8644 | 1213 g_free((char *)l->data); |
2086 | 1214 l = l->next; |
1215 } | |
9610 | 1216 g_list_free(zephyr->pending_zloc_names); |
8644 | 1217 |
9610 | 1218 if (gaim_account_get_bool(gc->account, "write_anyone", FALSE)) |
1219 write_anyone(gc); | |
8644 | 1220 |
9610 | 1221 if (gaim_account_get_bool(gc->account, "write_zsubs", FALSE)) |
1222 write_zsubs(gc->proto_data); | |
8644 | 1223 |
9610 | 1224 s = zephyr->subscrips; |
2086 | 1225 while (s) { |
8644 | 1226 free_triple((zephyr_triple *) s->data); |
2086 | 1227 s = s->next; |
1228 } | |
9610 | 1229 g_slist_free(zephyr->subscrips); |
8644 | 1230 |
9610 | 1231 if (zephyr->nottimer) |
1232 gaim_timeout_remove(zephyr->nottimer); | |
1233 zephyr->nottimer = 0; | |
1234 if (zephyr->loctimer) | |
1235 gaim_timeout_remove(zephyr->loctimer); | |
1236 zephyr->loctimer = 0; | |
1237 gc = NULL; | |
2086 | 1238 z_call(ZCancelSubscriptions(0)); |
1239 z_call(ZUnsetLocation()); | |
1240 z_call(ZClosePort()); | |
1241 } | |
1242 | |
9434 | 1243 static int zephyr_send_message(char* zclass, char* instance, char* recipient, const char *im, |
9478 | 1244 const char *sig, char *opcode) ; |
9434 | 1245 |
1246 const char * zephyr_get_signature() | |
1247 { | |
9478 | 1248 /* XXX add zephyr error reporting */ |
1249 const char * sig =ZGetVariable("zwrite-signature"); | |
9434 | 1250 if (!sig) { |
1251 sig = g_get_real_name(); | |
1252 } | |
1253 return sig; | |
1254 } | |
1255 | |
8644 | 1256 static int zephyr_chat_send(GaimConnection * gc, int id, const char *im) |
2086 | 1257 { |
1258 zephyr_triple *zt; | |
1259 const char *sig; | |
8644 | 1260 GaimConversation *gconv1; |
1261 GaimConvChat *gcc; | |
1262 char *inst; | |
9434 | 1263 char *recipient; |
2086 | 1264 |
9610 | 1265 zt = find_sub_by_id(gc->proto_data,id); |
2086 | 1266 if (!zt) |
1267 /* this should never happen. */ | |
2167
edf8c5a70e5b
[gaim-migrate @ 2177]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2162
diff
changeset
|
1268 return -EINVAL; |
8644 | 1269 |
9434 | 1270 sig = zephyr_get_signature(); |
2086 | 1271 |
9610 | 1272 gconv1 = gaim_find_conversation_with_account(zt->name, gc->account); |
8644 | 1273 gcc = gaim_conversation_get_chat_data(gconv1); |
8212 | 1274 |
8644 | 1275 if (!(inst = (char *)gaim_conv_chat_get_topic(gcc))) |
9434 | 1276 inst = g_strdup("PERSONAL"); |
8644 | 1277 |
4793 | 1278 if (!g_ascii_strcasecmp(zt->recipient, "*")) |
9434 | 1279 recipient = local_zephyr_normalize(""); |
2086 | 1280 else |
9434 | 1281 recipient = local_zephyr_normalize(zt->recipient); |
8451 | 1282 |
9478 | 1283 zephyr_send_message(zt->class,inst,recipient,im,sig,""); |
9434 | 1284 /* g_free(inst); */ |
1285 /* g_free(recipient); */ | |
2167
edf8c5a70e5b
[gaim-migrate @ 2177]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2162
diff
changeset
|
1286 return 0; |
2086 | 1287 } |
1288 | |
9434 | 1289 |
8644 | 1290 static int zephyr_send_im(GaimConnection * gc, const char *who, const char *im, GaimConvImFlags flags) |
1291 { | |
2086 | 1292 const char *sig; |
8644 | 1293 |
7118
bf630f7dfdcd
[gaim-migrate @ 7685]
Christian Hammond <chipx86@chipx86.com>
parents:
7084
diff
changeset
|
1294 if (flags & GAIM_CONV_IM_AUTO_RESP) |
2086 | 1295 sig = "Automated reply:"; |
1296 else { | |
9434 | 1297 sig = zephyr_get_signature(); |
2086 | 1298 } |
9478 | 1299 zephyr_send_message("MESSAGE","PERSONAL",local_zephyr_normalize(who),im,sig,""); |
9434 | 1300 |
1301 return 1; | |
1302 } | |
2086 | 1303 |
9434 | 1304 static int zephyr_send_message(char* zclass, char* instance, char* recipient, const char *im, |
9478 | 1305 const char *sig, char *opcode) |
9434 | 1306 { |
1307 char *html_buf; | |
1308 char *html_buf2; | |
1309 char *buf; | |
1310 ZNotice_t notice; | |
8451 | 1311 |
9434 | 1312 html_buf = html_to_zephyr(im); |
1313 html_buf2 = gaim_unescape_html(html_buf); | |
1314 | |
1315 buf = g_strdup_printf("%s%c%s", sig, '\0', html_buf2); | |
2086 | 1316 bzero((char *)¬ice, sizeof(notice)); |
9434 | 1317 |
2086 | 1318 notice.z_kind = ACKED; |
1319 notice.z_port = 0; | |
1320 notice.z_opcode = ""; | |
9434 | 1321 notice.z_class = zclass; |
1322 notice.z_class_inst = instance; | |
1323 notice.z_recipient = recipient; | |
1324 notice.z_sender = 0; | |
1325 notice.z_default_format = "Class $class, Instance $instance:\n" "To: @bold($recipient) at $time $date\n" "From: @bold($1) <$sender>\n\n$2"; | |
8451 | 1326 notice.z_message_len = strlen(html_buf2) + strlen(sig) + 2; |
2086 | 1327 notice.z_message = buf; |
9478 | 1328 notice.z_opcode = g_strdup(opcode); |
1329 gaim_debug_info("zephyr","About to send notice"); | |
1330 if (! ZSendNotice(¬ice, ZAUTH) == ZERR_NONE) { | |
1331 /* XXX handle errors here */ | |
1332 return 0; | |
1333 } | |
1334 gaim_debug_info("zephyr","notice sent"); | |
1335 g_free(buf); | |
1336 | |
8644 | 1337 g_free(html_buf2); |
1338 g_free(html_buf); | |
8451 | 1339 |
9434 | 1340 return 1; |
2086 | 1341 } |
1342 | |
8644 | 1343 static const char *zephyr_normalize(const GaimAccount * account, const char *orig) |
2086 | 1344 { |
9328 | 1345 /* returns the string you gave it. Maybe this function shouldn't be here */ |
2086 | 1346 static char buf[80]; |
8644 | 1347 |
7126 | 1348 if (!g_ascii_strcasecmp(orig, "")) { |
1349 buf[0] = '\0'; | |
1350 return buf; | |
8354 | 1351 } else { |
8644 | 1352 g_snprintf(buf, 80, "%s", orig); |
1353 } | |
1354 return buf; | |
8354 | 1355 } |
1356 | |
1357 | |
9328 | 1358 char *local_zephyr_normalize(const char *orig) |
8354 | 1359 { |
9328 | 1360 /* |
1361 Basically the inverse of zephyr_strip_foreign_realm | |
1362 */ | |
8644 | 1363 static char buf[80]; |
1364 | |
8354 | 1365 if (!g_ascii_strcasecmp(orig, "")) { |
1366 buf[0] = '\0'; | |
1367 return buf; | |
7126 | 1368 } |
8644 | 1369 |
2086 | 1370 if (strchr(orig, '@')) { |
1371 g_snprintf(buf, 80, "%s", orig); | |
1372 } else { | |
8644 | 1373 g_snprintf(buf, 80, "%s@%s", orig, gaim_zephyr_get_realm()); |
2086 | 1374 } |
1375 return buf; | |
1376 } | |
1377 | |
9030 | 1378 static void zephyr_zloc(GaimConnection *gc, const char *who) |
2086 | 1379 { |
1380 ZAsyncLocateData_t ald; | |
9328 | 1381 gchar* normalized_who = local_zephyr_normalize(who); |
9610 | 1382 zephyr_account *zephyr = gc->proto_data; |
7261 | 1383 |
9328 | 1384 if (ZRequestLocations(normalized_who, &ald, UNACKED, ZAUTH) == ZERR_NONE) { |
9610 | 1385 zephyr->pending_zloc_names = g_list_append(zephyr->pending_zloc_names, |
9328 | 1386 g_strdup(normalized_who)); |
9478 | 1387 } else { |
1388 /* XXX deal with errors somehow */ | |
2086 | 1389 } |
1390 } | |
1391 | |
8644 | 1392 static void zephyr_set_away(GaimConnection * gc, const char *state, const char *msg) |
2086 | 1393 { |
4111
ee884f1d7ae3
[gaim-migrate @ 4326]
Christian Hammond <chipx86@chipx86.com>
parents:
3867
diff
changeset
|
1394 if (gc->away) { |
2086 | 1395 g_free(gc->away); |
4111
ee884f1d7ae3
[gaim-migrate @ 4326]
Christian Hammond <chipx86@chipx86.com>
parents:
3867
diff
changeset
|
1396 gc->away = NULL; |
ee884f1d7ae3
[gaim-migrate @ 4326]
Christian Hammond <chipx86@chipx86.com>
parents:
3867
diff
changeset
|
1397 } |
ee884f1d7ae3
[gaim-migrate @ 4326]
Christian Hammond <chipx86@chipx86.com>
parents:
3867
diff
changeset
|
1398 |
5132 | 1399 if (!g_ascii_strcasecmp(state, _("Hidden"))) { |
9478 | 1400 /* XXX handle errors */ |
2086 | 1401 ZSetLocation(EXPOSE_OPSTAFF); |
4111
ee884f1d7ae3
[gaim-migrate @ 4326]
Christian Hammond <chipx86@chipx86.com>
parents:
3867
diff
changeset
|
1402 gc->away = g_strdup(""); |
9478 | 1403 } |
1404 else if (!g_ascii_strcasecmp(state, _("Online"))) { | |
1405 /* XXX handle errors */ | |
2086 | 1406 ZSetLocation(get_exposure_level()); |
9478 | 1407 } |
2086 | 1408 else /* state is GAIM_AWAY_CUSTOM */ if (msg) |
1409 gc->away = g_strdup(msg); | |
1410 } | |
1411 | |
8644 | 1412 static GList *zephyr_away_states(GaimConnection * gc) |
2086 | 1413 { |
1414 GList *m = NULL; | |
1415 | |
5132 | 1416 m = g_list_append(m, _("Online")); |
2086 | 1417 m = g_list_append(m, GAIM_AWAY_CUSTOM); |
5132 | 1418 m = g_list_append(m, _("Hidden")); |
2086 | 1419 |
1420 return m; | |
1421 } | |
1422 | |
8644 | 1423 static GList *zephyr_chat_info(GaimConnection * gc) |
1424 { | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1425 GList *m = NULL; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1426 struct proto_chat_entry *pce; |
2086 | 1427 |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1428 pce = g_new0(struct proto_chat_entry, 1); |
8644 | 1429 |
7841 | 1430 pce->label = _("_Class:"); |
5234 | 1431 pce->identifier = "class"; |
3158 | 1432 m = g_list_append(m, pce); |
2086 | 1433 |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1434 pce = g_new0(struct proto_chat_entry, 1); |
8644 | 1435 |
7841 | 1436 pce->label = _("_Instance:"); |
5234 | 1437 pce->identifier = "instance"; |
3158 | 1438 m = g_list_append(m, pce); |
2086 | 1439 |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1440 pce = g_new0(struct proto_chat_entry, 1); |
8644 | 1441 |
7841 | 1442 pce->label = _("_Recipient:"); |
5234 | 1443 pce->identifier = "recipient"; |
3158 | 1444 m = g_list_append(m, pce); |
2086 | 1445 |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1446 return m; |
2086 | 1447 } |
1448 | |
9478 | 1449 /* Called when the server notifies us a message couldn't get sent */ |
1450 | |
9610 | 1451 static void zephyr_subscribe_failed(GaimConnection *gc,ZSubscription_t *sub) |
9478 | 1452 { |
1453 gchar* subscribe_failed = g_strdup_printf(_("Attempt to subscribe to %s,%s,%s failed"), sub->zsub_class, sub->zsub_classinst,sub->zsub_recipient); | |
9610 | 1454 gaim_notify_error(gc,"", subscribe_failed, NULL); |
9478 | 1455 g_free(subscribe_failed); |
1456 } | |
1457 | |
8644 | 1458 static void zephyr_join_chat(GaimConnection * gc, GHashTable * data) |
2086 | 1459 { |
1460 ZSubscription_t sub; | |
1461 zephyr_triple *zt1, *zt2; | |
1462 const char *classname; | |
1463 const char *instname; | |
1464 const char *recip; | |
9610 | 1465 zephyr_account *zephyr=gc->proto_data; |
5234 | 1466 classname = g_hash_table_lookup(data, "class"); |
1467 instname = g_hash_table_lookup(data, "instance"); | |
1468 recip = g_hash_table_lookup(data, "recipient"); | |
1469 | |
9478 | 1470 |
9328 | 1471 if (!classname) |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1472 return; |
9478 | 1473 |
1474 if (!g_ascii_strcasecmp(classname,"%host%")) | |
9610 | 1475 classname = g_strdup(zephyr->ourhost); |
9478 | 1476 if (!g_ascii_strcasecmp(classname,"%canon%")) |
9610 | 1477 classname = g_strdup(zephyr->ourhostcanon); |
9478 | 1478 |
9328 | 1479 if (!instname || !strlen(instname)) |
1480 instname = "*"; | |
9478 | 1481 |
1482 if (!g_ascii_strcasecmp(instname,"%host%")) | |
9610 | 1483 instname = g_strdup(zephyr->ourhost); |
9478 | 1484 if (!g_ascii_strcasecmp(instname,"%canon%")) |
9610 | 1485 instname = g_strdup(zephyr->ourhostcanon); |
9478 | 1486 |
9328 | 1487 if (!recip || (*recip == '*')) |
1488 recip = ""; | |
4793 | 1489 if (!g_ascii_strcasecmp(recip, "%me%")) |
8354 | 1490 recip = gaim_zephyr_get_sender(); |
2086 | 1491 |
9610 | 1492 zt1 = new_triple(gc->proto_data,classname, instname, recip); |
1493 zt2 = find_sub_by_triple(gc->proto_data,zt1); | |
2086 | 1494 if (zt2) { |
1495 free_triple(zt1); | |
9328 | 1496 if (!zt2->open) { |
1497 if (!g_ascii_strcasecmp(instname,"*")) | |
1498 instname = "PERSONAL"; | |
9434 | 1499 serv_got_joined_chat(gc, zt2->id, zt2->name); |
9610 | 1500 zephyr_chat_set_topic(gc,zt2->id,instname); |
9328 | 1501 zt2->open = TRUE; |
1502 } | |
2086 | 1503 return; |
1504 } | |
9434 | 1505 |
2086 | 1506 sub.zsub_class = zt1->class; |
1507 sub.zsub_classinst = zt1->instance; | |
1508 sub.zsub_recipient = zt1->recipient; | |
9434 | 1509 |
2086 | 1510 if (ZSubscribeTo(&sub, 1, 0) != ZERR_NONE) { |
9478 | 1511 /* XXX output better subscription information */ |
9610 | 1512 zephyr_subscribe_failed(gc,&sub); |
2086 | 1513 free_triple(zt1); |
1514 return; | |
1515 } | |
1516 | |
9610 | 1517 zephyr->subscrips = g_slist_append(zephyr->subscrips, zt1); |
2086 | 1518 zt1->open = TRUE; |
1519 serv_got_joined_chat(gc, zt1->id, zt1->name); | |
9328 | 1520 if (!g_ascii_strcasecmp(instname,"*")) |
1521 instname = "PERSONAL"; | |
9610 | 1522 zephyr_chat_set_topic(gc,zt1->id,instname); |
2086 | 1523 } |
1524 | |
8644 | 1525 static void zephyr_chat_leave(GaimConnection * gc, int id) |
2086 | 1526 { |
1527 zephyr_triple *zt; | |
9610 | 1528 zephyr_account *zephyr = gc->proto_data; |
1529 zt = find_sub_by_id(zephyr,id); | |
2086 | 1530 if (zt) { |
1531 zt->open = FALSE; | |
9610 | 1532 zt->id = ++(zephyr->last_id); |
2086 | 1533 } |
1534 } | |
1535 | |
9478 | 1536 static GaimChat *zephyr_find_blist_chat(GaimAccount *account, const char *name) |
1537 { | |
1538 GaimBlistNode *gnode, *cnode; | |
1539 | |
1540 /* XXX needs to be %host%,%canon%, and %me% clean */ | |
1541 for(gnode = gaim_get_blist()->root; gnode; gnode = gnode->next) { | |
1542 for(cnode = gnode->child; cnode; cnode = cnode->next) { | |
1543 GaimChat *chat = (GaimChat*)cnode; | |
1544 char *zclass, *inst, *recip; | |
1545 char** triple; | |
1546 if(!GAIM_BLIST_NODE_IS_CHAT(cnode)) | |
1547 continue; | |
1548 if(chat->account !=account) | |
1549 continue; | |
1550 if(!(zclass = g_hash_table_lookup(chat->components, "class"))) | |
1551 continue; | |
1552 if(!(inst = g_hash_table_lookup(chat->components, "instance"))) | |
1553 inst = g_strdup(""); | |
1554 if(!(recip = g_hash_table_lookup(chat->components, "recipient"))) | |
1555 recip = g_strdup(""); | |
1556 triple = g_strsplit(name,",",3); | |
1557 if (!g_ascii_strcasecmp(triple[0],zclass) && !g_ascii_strcasecmp(triple[1],inst) && !g_ascii_strcasecmp(triple[2],recip)) | |
1558 return chat; | |
1559 | |
1560 } | |
1561 } | |
1562 return NULL; | |
1563 } | |
8644 | 1564 static const char *zephyr_list_icon(GaimAccount * a, GaimBuddy * b) |
5202 | 1565 { |
1566 return "zephyr"; | |
1567 } | |
1568 | |
9478 | 1569 static int zephyr_send_typing(GaimConnection *gc, const char *who, int typing) { |
1570 gchar *recipient; | |
1571 if (!typing) | |
1572 return 0; | |
1573 /* XXX We probably should care if this fails. Or maybe we don't want to */ | |
1574 if (!who) { | |
1575 gaim_debug_info("zephyr", "who is null\n"); | |
1576 recipient = local_zephyr_normalize(""); | |
1577 } else { | |
1578 recipient = local_zephyr_normalize(who); | |
1579 } | |
1580 | |
1581 gaim_debug_info("zephyr","about to send typing notification to %s",recipient); | |
1582 zephyr_send_message("MESSAGE","PERSONAL",recipient,"","","PING"); | |
1583 gaim_debug_info("zephyr","sent typing notification"); | |
1584 return ZEPHYR_TYPING_SEND_TIMEOUT; | |
1585 } | |
8212 | 1586 |
9434 | 1587 |
1588 | |
8644 | 1589 static void zephyr_chat_set_topic(GaimConnection * gc, int id, const char *topic) |
1590 { | |
1591 zephyr_triple *zt; | |
1592 GaimConversation *gconv; | |
1593 GaimConvChat *gcc; | |
9434 | 1594 gchar *topic_utf8; |
8644 | 1595 char *sender = (char *)gaim_zephyr_get_sender(); |
8212 | 1596 |
9610 | 1597 zt = find_sub_by_id(gc->proto_data,id); |
1598 gconv = gaim_find_conversation_with_account(zt->name, gc->account); | |
8644 | 1599 gcc = gaim_conversation_get_chat_data(gconv); |
9434 | 1600 |
9610 | 1601 topic_utf8 = zephyr_recv_convert(gc,(gchar *)topic,strlen(topic)); |
9434 | 1602 gaim_conv_chat_set_topic(gcc,sender,topic_utf8); |
1603 g_free(topic_utf8); | |
1604 return; | |
1605 } | |
1606 | |
1607 /* commands */ | |
1608 | |
1609 static GaimCmdRet zephyr_gaim_cmd_msg(GaimConversation *conv, | |
9597 | 1610 const char *cmd, char **args, char **error, void *data) |
9434 | 1611 { |
1612 char *recipient; | |
9478 | 1613 |
9434 | 1614 if (!g_ascii_strcasecmp(args[0],"*")) |
9478 | 1615 return GAIM_CMD_RET_FAILED; /* "*" is not a valid argument */ |
9434 | 1616 else |
1617 recipient = local_zephyr_normalize(args[0]); | |
1618 | |
9478 | 1619 if (strlen(recipient) < 1) |
1620 return GAIM_CMD_RET_FAILED; /* a null recipient is a chat message, not an IM */ | |
1621 | |
1622 if (zephyr_send_message("MESSAGE","PERSONAL",recipient,args[1],zephyr_get_signature(),"")) | |
9434 | 1623 return GAIM_CMD_RET_OK; |
1624 else | |
1625 return GAIM_CMD_RET_FAILED; | |
1626 } | |
1627 | |
1628 static GaimCmdRet zephyr_gaim_cmd_zlocate(GaimConversation *conv, | |
9597 | 1629 const char *cmd, char **args, char **error, void *data) |
9434 | 1630 { |
9610 | 1631 zephyr_zloc(gaim_conversation_get_gc(conv),args[0]); |
9434 | 1632 return GAIM_CMD_RET_OK; |
1633 } | |
1634 | |
1635 static GaimCmdRet zephyr_gaim_cmd_instance(GaimConversation *conv, | |
9597 | 1636 const char *cmd, char **args, char **error, void *data) |
9434 | 1637 { |
1638 /* Currently it sets the instance with leading spaces and | |
1639 * all. This might not be the best thing to do, though having | |
1640 * one word isn't ideal either. */ | |
1641 | |
9610 | 1642 GaimConvChat *gcc = gaim_conversation_get_chat_data(conv); |
1643 int id = gcc->id; | |
9434 | 1644 const char* instance = args[0]; |
9610 | 1645 zephyr_chat_set_topic(gaim_conversation_get_gc(conv),id,instance); |
9434 | 1646 return GAIM_CMD_RET_OK; |
1647 } | |
1648 | |
1649 static GaimCmdRet zephyr_gaim_cmd_joinchat_cir(GaimConversation *conv, | |
9597 | 1650 const char *cmd, char **args, char **error, void *data) |
9434 | 1651 { |
1652 /* Join a new zephyr chat */ | |
1653 GHashTable *triple = g_hash_table_new(NULL,NULL); | |
1654 g_hash_table_insert(triple,"class",args[0]); | |
1655 g_hash_table_insert(triple,"instance",args[1]); | |
1656 g_hash_table_insert(triple,"recipient",args[2]); | |
9610 | 1657 zephyr_join_chat(gaim_conversation_get_gc(conv),triple); |
9434 | 1658 return GAIM_CMD_RET_OK; |
1659 } | |
1660 | |
1661 static GaimCmdRet zephyr_gaim_cmd_zi(GaimConversation *conv, | |
9597 | 1662 const char *cmd, char **args, char **error, void *data) |
9434 | 1663 { |
1664 /* args = instance, message */ | |
9478 | 1665 if ( zephyr_send_message("message",args[0],"",args[1],zephyr_get_signature(),"")) |
9434 | 1666 return GAIM_CMD_RET_OK; |
1667 else | |
1668 return GAIM_CMD_RET_FAILED; | |
1669 } | |
1670 | |
1671 static GaimCmdRet zephyr_gaim_cmd_zci(GaimConversation *conv, | |
9597 | 1672 const char *cmd, char **args, char **error, void *data) |
9434 | 1673 { |
1674 /* args = class, instance, message */ | |
9478 | 1675 if ( zephyr_send_message(args[0],args[1],"",args[2],zephyr_get_signature(),"")) |
9434 | 1676 return GAIM_CMD_RET_OK; |
1677 else | |
1678 return GAIM_CMD_RET_FAILED; | |
1679 } | |
8644 | 1680 |
9434 | 1681 static GaimCmdRet zephyr_gaim_cmd_zcir(GaimConversation *conv, |
9597 | 1682 const char *cmd, char **args, char **error, void *data) |
9434 | 1683 { |
1684 /* args = class, instance, recipient, message */ | |
9478 | 1685 if ( zephyr_send_message(args[0],args[1],args[2],args[3],zephyr_get_signature(),"")) |
9434 | 1686 return GAIM_CMD_RET_OK; |
1687 else | |
1688 return GAIM_CMD_RET_FAILED; | |
8212 | 1689 } |
1690 | |
9434 | 1691 static GaimCmdRet zephyr_gaim_cmd_zir(GaimConversation *conv, |
9597 | 1692 const char *cmd, char **args, char **error, void *data) |
9434 | 1693 { |
1694 /* args = instance, recipient, message */ | |
9478 | 1695 if ( zephyr_send_message("message",args[0],args[1],args[2],zephyr_get_signature(),"")) |
9434 | 1696 return GAIM_CMD_RET_OK; |
1697 else | |
1698 return GAIM_CMD_RET_FAILED; | |
1699 } | |
1700 | |
1701 static GaimCmdRet zephyr_gaim_cmd_zc(GaimConversation *conv, | |
9597 | 1702 const char *cmd, char **args, char **error, void *data) |
9434 | 1703 { |
1704 /* args = class, message */ | |
9478 | 1705 if ( zephyr_send_message(args[0],"PERSONAL","",args[1],zephyr_get_signature(),"")) |
9434 | 1706 return GAIM_CMD_RET_OK; |
9597 | 1707 else |
9434 | 1708 return GAIM_CMD_RET_FAILED; |
1709 } | |
1710 | |
9597 | 1711 static void zephyr_register_slash_commands() |
9434 | 1712 { |
1713 | |
1714 gaim_cmd_register("msg","ws", GAIM_CMD_P_PRPL, | |
1715 GAIM_CMD_FLAG_IM | GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
1716 "prpl-zephyr", | |
9597 | 1717 zephyr_gaim_cmd_msg, _("msg <nick> <message>: Send a private message to a user"), NULL); |
9434 | 1718 |
1719 gaim_cmd_register("zlocate","w", GAIM_CMD_P_PRPL, | |
1720 GAIM_CMD_FLAG_IM | GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
1721 "prpl-zephyr", | |
9597 | 1722 zephyr_gaim_cmd_zlocate, _("zlocate <nick>: Locate user"), NULL); |
9434 | 1723 |
1724 gaim_cmd_register("zl","w", GAIM_CMD_P_PRPL, | |
1725 GAIM_CMD_FLAG_IM | GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
1726 "prpl-zephyr", | |
9597 | 1727 zephyr_gaim_cmd_zlocate, _("zl <nick>: Locate user"), NULL); |
9434 | 1728 |
1729 gaim_cmd_register("instance","s", GAIM_CMD_P_PRPL, | |
1730 GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
1731 "prpl-zephyr", | |
9597 | 1732 zephyr_gaim_cmd_instance, _("instance <instance>: Set the instance to be used on this class"), NULL); |
9434 | 1733 |
1734 gaim_cmd_register("inst","s", GAIM_CMD_P_PRPL, | |
1735 GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
1736 "prpl-zephyr", | |
9597 | 1737 zephyr_gaim_cmd_instance, _("inst <instance>: Set the instance to be used on this class"), NULL); |
9434 | 1738 |
1739 gaim_cmd_register("sub", "www", GAIM_CMD_P_PRPL, | |
1740 GAIM_CMD_FLAG_IM | GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
1741 "prpl-zephyr", | |
9597 | 1742 zephyr_gaim_cmd_joinchat_cir, |
1743 _("sub <class> <instance> <recipient>: Join a new chat"), NULL); | |
9434 | 1744 |
1745 gaim_cmd_register("zi","ws", GAIM_CMD_P_PRPL, | |
1746 GAIM_CMD_FLAG_IM | GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
1747 "prpl-zephyr", | |
9597 | 1748 zephyr_gaim_cmd_zi, _("zi <instance>: Send a message to <message,<i>instance</i>,*>"), NULL); |
9434 | 1749 |
1750 gaim_cmd_register("zci","wws",GAIM_CMD_P_PRPL, | |
1751 GAIM_CMD_FLAG_IM | GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
1752 "prpl-zephyr", | |
9597 | 1753 zephyr_gaim_cmd_zci, |
1754 _("zci <class> <instance>: Send a message to <<i>class</i>,<i>instance</i>,*>"), NULL); | |
9434 | 1755 |
1756 gaim_cmd_register("zcir","wwws",GAIM_CMD_P_PRPL, | |
1757 GAIM_CMD_FLAG_IM | GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
1758 "prpl-zephyr", | |
9597 | 1759 zephyr_gaim_cmd_zcir, |
1760 _("zcir <class> <instance> <recipient>: Send a message to <<i>class</i>,<i>instance</i>,<i>recipient</i>>"), NULL); | |
9434 | 1761 |
1762 gaim_cmd_register("zir","wws",GAIM_CMD_P_PRPL, | |
1763 GAIM_CMD_FLAG_IM | GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
1764 "prpl-zephyr", | |
9597 | 1765 zephyr_gaim_cmd_zir, |
1766 _("zir <instance> <recipient>: Send a message to <MESSAGE,<i>instance</i>,<i>recipient</i>>"), NULL); | |
9434 | 1767 |
1768 gaim_cmd_register("zc","ws", GAIM_CMD_P_PRPL, | |
1769 GAIM_CMD_FLAG_IM | GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
1770 "prpl-zephyr", | |
9597 | 1771 zephyr_gaim_cmd_zc, _("zc <class>: Send a message to <<i>class</i>,PERSONAL,*>"), NULL); |
1772 | |
9434 | 1773 } |
1774 | |
1775 | |
9740 | 1776 static void |
1777 zephyr_add_deny(GaimConnection *gc, const char *who) | |
1778 { | |
1779 gaim_privacy_deny_add(gc->account,who,1); | |
1780 } | |
1781 | |
1782 static void | |
1783 zephyr_remove_deny(GaimConnection *gc, const char *who) | |
1784 { | |
1785 gaim_privacy_deny_remove(gc->account,who,1); | |
1786 } | |
1787 | |
1788 static void | |
1789 zephyr_add_permit(GaimConnection *gc, const char *who) | |
1790 { | |
1791 gaim_privacy_permit_add(gc->account,who,1); | |
1792 } | |
1793 | |
1794 static void | |
1795 zephyr_remove_permit(GaimConnection *gc, const char *who) | |
1796 { | |
1797 gaim_privacy_permit_remove(gc->account,who,1); | |
1798 } | |
1799 | |
1800 static void | |
1801 zephyr_set_permit_deny(GaimConnection *gc) | |
1802 { | |
1803 /* This doesn't have to do anything, since really, we can just check account->perm_deny when deciding whether to di */ | |
1804 return; | |
1805 } | |
9427 | 1806 static int zephyr_resubscribe(GaimConnection *gc) |
1807 { | |
1808 /* Resubscribe to the in-memory list of subscriptions and also | |
1809 unsubscriptions*/ | |
9610 | 1810 zephyr_account *zephyr = gc->proto_data; |
1811 GSList *s = zephyr->subscrips; | |
9427 | 1812 zephyr_triple *zt; |
1813 ZSubscription_t zst; | |
1814 while (s) { | |
1815 zt = s->data; | |
1816 zst.zsub_class = zt->class; | |
1817 zst.zsub_classinst = zt->instance; | |
1818 zst.zsub_recipient = zt->recipient; | |
1819 /* XXX We really should care if this fails */ | |
9478 | 1820 ZSubscribeTo(&zst, 1, 0); |
9427 | 1821 s = s->next; |
1822 } | |
1823 /* XXX handle unsubscriptions */ | |
1824 return 1; | |
1825 } | |
1826 | |
9434 | 1827 |
9427 | 1828 static void zephyr_action_resubscribe(GaimPluginAction *action) |
1829 { | |
1830 | |
1831 GaimConnection *gc = (GaimConnection *) action->context; | |
1832 zephyr_resubscribe(gc); | |
1833 } | |
1834 | |
1835 | |
9478 | 1836 static void zephyr_action_get_subs_from_server(GaimPluginAction *action) |
1837 { | |
1838 GaimConnection *gc = (GaimConnection *) action->context; | |
9610 | 1839 zephyr_account *zephyr = gc->proto_data; |
9478 | 1840 gchar *title; |
1841 int retval, nsubs, one,i; | |
1842 ZSubscription_t subs; | |
1843 GString* subout = g_string_new("Subscription list<br>"); | |
1844 | |
1845 title = g_strdup_printf("Server subscriptions for %s", gaim_zephyr_get_sender()); | |
1846 | |
9610 | 1847 if (zephyr->port == 0) { |
9478 | 1848 gaim_debug(GAIM_DEBUG_ERROR,"zephyr", "error while retrieving port"); |
1849 return; | |
1850 } | |
9610 | 1851 if ((retval = ZRetrieveSubscriptions(zephyr->port,&nsubs)) != ZERR_NONE) { |
9478 | 1852 /* XXX better error handling */ |
1853 gaim_debug(GAIM_DEBUG_ERROR,"zephyr", "error while retrieving subscriptions from server"); | |
1854 return; | |
1855 } | |
1856 g_string_append_printf(subout,"Subscription list <br>"); | |
1857 for(i=0;i<nsubs;i++) { | |
1858 one = 1; | |
1859 if ((retval = ZGetSubscriptions(&subs,&one)) != ZERR_NONE) { | |
1860 /* XXX better error handling */ | |
1861 gaim_debug(GAIM_DEBUG_ERROR,"zephyr", "error while retrieving individual subscription"); | |
1862 return; | |
1863 } | |
1864 g_string_append_printf(subout, "Class %s Instance %s Recipient %s<br>", | |
1865 subs.zsub_class, subs.zsub_classinst, | |
1866 subs.zsub_recipient); | |
1867 } | |
1868 gaim_notify_formatted(gc, title, title, NULL, subout->str, NULL, NULL); | |
1869 } | |
1870 | |
1871 | |
9427 | 1872 static GList *zephyr_actions(GaimPlugin *plugin, gpointer context) |
1873 { | |
1874 GList *list = NULL; | |
1875 GaimPluginAction *act = NULL; | |
1876 | |
1877 act = gaim_plugin_action_new(_("Resubscribe"), zephyr_action_resubscribe); | |
1878 list = g_list_append(list, act); | |
1879 | |
9478 | 1880 act = gaim_plugin_action_new(_("Retrieve subscriptions from server"), zephyr_action_get_subs_from_server); |
1881 list = g_list_append(list,act); | |
1882 | |
9427 | 1883 return list; |
1884 } | |
1885 | |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
1886 static GaimPlugin *my_protocol = NULL; |
2086 | 1887 |
8644 | 1888 static GaimPluginProtocolInfo prpl_info = { |
8749
d7b8eb1f0a18
[gaim-migrate @ 9504]
Christian Hammond <chipx86@chipx86.com>
parents:
8713
diff
changeset
|
1889 GAIM_PRPL_API_VERSION, |
8644 | 1890 OPT_PROTO_CHAT_TOPIC | OPT_PROTO_NO_PASSWORD, |
9478 | 1891 NULL, /* ??? user_splits */ |
1892 NULL, /* ??? protocol_options */ | |
1893 NO_BUDDY_ICONS, | |
1894 zephyr_list_icon, | |
1895 NULL, /* ??? list_emblems */ | |
1896 NULL, /* ??? status_text */ | |
1897 NULL, /* ??? tooltip_text */ | |
9475 | 1898 zephyr_away_states, /* away_states */ |
9478 | 1899 NULL, /* ??? blist_node_menu - probably all useful actions are already handled*/ |
9475 | 1900 zephyr_chat_info, /* chat_info */ |
1901 zephyr_login, /* login */ | |
1902 zephyr_close, /* close */ | |
1903 zephyr_send_im, /* send_im */ | |
9478 | 1904 NULL, /* XXX set info (Location?) */ |
1905 zephyr_send_typing, /* send_typing */ | |
9475 | 1906 zephyr_zloc, /* get_info */ |
9478 | 1907 zephyr_set_away, /* XXX set_away need to fix */ |
1908 NULL, /* ??? set idle */ | |
1909 NULL, /* change password */ | |
9475 | 1910 NULL, /* add_buddy */ |
1911 NULL, /* add_buddies */ | |
1912 NULL, /* remove_buddy */ | |
1913 NULL, /* remove_buddies */ | |
9740 | 1914 zephyr_add_permit, /* add_permit -- not useful, since anyone can zephyr you by default*/ |
1915 zephyr_add_deny, /* XXX add_deny -- maybe put an auto "I'm ignoring your zephyrs*/ | |
1916 zephyr_remove_permit, /* remove_permit -- not useful, see add permit */ | |
1917 zephyr_remove_deny, /* XXX remove deny -- remove above deny, */ | |
1918 zephyr_set_permit_deny, /* ??? set permit deny */ | |
9478 | 1919 NULL, /* --- warn */ |
9475 | 1920 zephyr_join_chat, /* join_chat */ |
1921 NULL, /* reject_chat */ | |
1922 NULL, /* chat_invite */ | |
1923 zephyr_chat_leave, /* chat_leave */ | |
1924 NULL, /* chat_whisper */ | |
1925 zephyr_chat_send, /* chat_send */ | |
1926 NULL, /* keepalive */ | |
1927 NULL, /* register_user */ | |
9478 | 1928 NULL, /* XXX get_cb_info get chat buddy info */ |
9475 | 1929 NULL, /* get_cb_away */ |
1930 NULL, /* alias_buddy */ | |
1931 NULL, /* group_buddy */ | |
1932 NULL, /* rename_group */ | |
9478 | 1933 NULL, /* ??? buddy_free */ |
9475 | 1934 NULL, /* convo_closed */ |
1935 zephyr_normalize, /* normalize */ | |
9478 | 1936 NULL, /* XXX set_buddy_icon */ |
9475 | 1937 NULL, /* remove_group */ |
9478 | 1938 NULL, /* XXX get_cb_real_name */ |
9475 | 1939 zephyr_chat_set_topic, /* set_chat_topic */ |
9478 | 1940 zephyr_find_blist_chat, /* find_blist_chat */ |
9475 | 1941 NULL, /* roomlist_get_list */ |
1942 NULL, /* roomlist_cancel */ | |
9478 | 1943 NULL, /* roomlist_expand_category */ |
9475 | 1944 NULL, /* can_receive_file */ |
1945 NULL /* send_file */ | |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
1946 }; |
2086 | 1947 |
8644 | 1948 static GaimPluginInfo info = { |
8749
d7b8eb1f0a18
[gaim-migrate @ 9504]
Christian Hammond <chipx86@chipx86.com>
parents:
8713
diff
changeset
|
1949 GAIM_PLUGIN_API_VERSION, /**< api_version */ |
8644 | 1950 GAIM_PLUGIN_PROTOCOL, /**< type */ |
1951 NULL, /**< ui_requirement */ | |
1952 0, /**< flags */ | |
1953 NULL, /**< dependencies */ | |
1954 GAIM_PRIORITY_DEFAULT, /**< priority */ | |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
1955 |
8644 | 1956 "prpl-zephyr", /**< id */ |
1957 "Zephyr", /**< name */ | |
1958 VERSION, /**< version */ | |
1959 /** summary */ | |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
1960 N_("Zephyr Protocol Plugin"), |
8644 | 1961 /** description */ |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
1962 N_("Zephyr Protocol Plugin"), |
8644 | 1963 NULL, /**< author */ |
1964 GAIM_WEBSITE, /**< homepage */ | |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
1965 |
8644 | 1966 NULL, /**< load */ |
1967 NULL, /**< unload */ | |
1968 NULL, /**< destroy */ | |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
1969 |
8644 | 1970 NULL, /**< ui_info */ |
8993 | 1971 &prpl_info, /**< extra_info */ |
1972 NULL, | |
9427 | 1973 zephyr_actions |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
1974 }; |
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
1975 |
8644 | 1976 static void init_plugin(GaimPlugin * plugin) |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
1977 { |
8212 | 1978 GaimAccountOption *option; |
8644 | 1979 char *tmp = get_exposure_level(); |
1980 | |
1981 option = gaim_account_option_bool_new(_("Export to .anyone"), "write_anyone", FALSE); | |
1982 prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); | |
8212 | 1983 |
8644 | 1984 option = gaim_account_option_bool_new(_("Export to .zephyr.subs"), "write_zsubs", FALSE); |
1985 prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); | |
8212 | 1986 |
8644 | 1987 option = gaim_account_option_string_new(_("Exposure"), "exposure_level", tmp ? tmp : EXPOSE_REALMVIS); |
1988 prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); | |
8212 | 1989 |
8644 | 1990 option = gaim_account_option_string_new(_("Encoding"), "encoding", ZEPHYR_FALLBACK_CHARSET); |
1991 prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); | |
8560 | 1992 |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
1993 my_protocol = plugin; |
9434 | 1994 zephyr_register_slash_commands(); |
2086 | 1995 } |
1996 | |
5920
7d385de2f9cd
[gaim-migrate @ 6360]
Christian Hammond <chipx86@chipx86.com>
parents:
5872
diff
changeset
|
1997 GAIM_INIT_PLUGIN(zephyr, init_plugin, info); |